Digital PDFs

AH-S883A-MC

April 1982

199 pages

Original

102MB

view download

OCR Version

122MB

view download

Document:	CZKMDA0 DMS11-DA DMS11-DA STATIC APR 1982 bw
Order Number:	AH-S883A-MC
Revision:	000
Pages:	199
Original Filename:	CZKMDA0__DMS11-DA__DMS11-DA_STATIC__AH-S883A-MC__APR_1982_gray.pdf

OCR Text

DMS11-DA

STATI

AH-S883A-MC

AER LoHE

COPYRIGHTE
MADE

USA

1982

CZKMDAO DMS11-DA STAT‘% #Cay 30A(1052)

CZKMDA.P11

.NLIST
.REM %

20-0CT~

21-0C7-81

09:21

PAGE 1

SEQ,BIN,LOC

IDENTIFICATION

PRODUCT CODE:

AC-S881A-M(

PRODUCT NAME:

CZKMDAQO DMS11-DA STATIC

PROGRAM DATE:

SEPTEMBER 1981

MAINTAINER:

CSS/NPG DIAGNOSTICS

MAYNARD, MASSACHUSETTS.
ALL RIGHTS RESERVED.

THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY
BE USED AND COPIED ONLY IN ACCORDANCE WITH THE
TERMS OF SUCH LICENSE AND WITH THE INCLUSION

OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER
COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE

MADE AVAILABLE TO ANY OTHER PERSON. NO TITLE TO
AND OWNERSHIP OF THE SOFTWARE IS HEREBY TRANSFERRED.

THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
EQUIPMENT CORPORATION:

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

SEQ 0001

CZKMDAO DMS11-DA STATIC MACY11 30A(1052)
CZKMDA.P11
20-0CT-81 17:03

1.0

21-0CT-81

09:21

PAGE 2

ABSTRACT

THE DMS11,-D,=A,~DA LINE UNIT STATIC DIAGNOSTIC TEST THE LINE UNIT

FOR BOTH CCP'® BOP MODES IN THE USYRT MAINTENANCE MODE. THIS DIAGNOSTIC

EXERCISES THE LINE UNIT WITHOUT RESIDENT FIRMWARE IN THE KMC11
GENERAL PURPOSE MICROPROCESSOR. THIS DIAGNOSTIC IS A STAND ALONE

PACKAGE AND SHOULD BE EXERCISED PRIOR TO EXERCISING THE DYNAMIC DIAGNOSTIC

2.0

REQUIREMENTS

2.1

EQUITMENT
PDP=11 PROCESSOR

KMC11 GENERAL PURPOSE MICROPROCESSOR
NOTE: THIS DIAGNOSTIC WILL TEST UP TO 16 KMC11
GENERAL PURPOSE MICROPROCESSOR'S, BUT THEY
MUST BE INSTALLED SEQUENTIALLY ON THE BUSS
DMS11=D LINE UNIT
NOTE: I:%§1DIAGNOSTIC WILL TEST UP TO 8 LINES PER

2.2

STORAGE

THIS DIAGNOSTIC NEEDS A MINIMUM OF

2.3

16K OF MEMORY LOCATIONS

PRELIMINARY PROGRAMS

CZKMBAQD KMC11-8 STATIC PART1
CZKMCAO KMC11-8 STATIC PART?2
PRIOR TO EXERCISING THE STATIC DIAGNOSTIC THE KMC11 MUST BE ERROR
FREE. THIS DIAGNOSTIC DOES NOT TEST THE KMC11

3.0

LOADING PROCEDURE

3.1

ME THOD

LOAD THE DIAGNOSTIC USING THE ABS LOADER. THIS DIAGNOSTIC IS
SELF STARTING. TO RESTART THE DIAGNOSTIC LOAD ADDRESS 200 (8)
AND DEPRESS START.

IF THE DIAGNOSTIC IS ON MAGNETIC MEDIA, FOLLOW THE

INSTRUCTIONS FOR THE MONITOR BEING USED.

4.0

STARTING PROCEDURE

4.1

STARTING ADDRESS (200)

4.2

RESTART ADDRESS

RESTART ADDRESS 200 (8)

SEQ@ 0002

CZKMDAO DMS11-DA STAT C MCV11 30A(1052)
CZKMDA.P11
20-0CT-81 17:03
6.3

21-0CT-81

09:21

PAGE 3

OPERATOR ACTION

DURING THE INITIAL START UP THE DIAGNOSTIC WILL OUTPUT TO THE

TELETYPE THE TITLE OF THE DIAGNOSTIC AND ENTER THE MONITOR. DURING
A RESTART THE DIAGNOSTIC WILL NOT OUTPUT THE TITLE OF THE DIAGNOSTIC
BUT ENTER THE MONITOR DIRECTLY. AFTER ENTRY INTO THE DIAGNOSTIC
MONITOR_THE OPERATOR CAN ENTER THE COMMANDS LISTED IN SECTION
4.4 OF THIS WRITEUP.

5.0

STARTING AND TEST INITIALIZATION:
LOAD AND START MEMORY ADDRESS 200 BY PRESCRIBED
METHOD AS PER PDP-11 PROCESSOR TYPE.
THE CONSOLE DEVICE WILL IDENTIFY THE DIAGNOSTIC ON THE

FIRST START UP.
THE CONSOLE MONITOR ROUTINE IS ENTERED EACH TIME ON START
UP AND OFFERS THE OPERATOR THE FOLLOWING CHOICES AS
(1) DIAG. TEST (2) CONFIGURE
TO WHICH THE OPERATOR MUST RESPOND WITH A 1 OR 2
FOLLOWED BY A CARRIAGE RETURN.
(1) DIAG. TEST
DIAG. TEST IS ENTERED IF THE CONFIGURATION ROUTINE HAS
BEEN PREVIOUSLY ENTERED AND IF NOT WILL AUTOMATICALLY
) g&g'f&O’REHE CONFIGURATION ROUTINE TO SPECIFY KMC11(S) STATUS.
WHEN THE CONFIGURE MODE IS ENTERED FOR THE FIRST TIME
THE CONFIGURE TABLE IS ENTERED FROM THE TOP AND THE FIRST

KMC11 IS SPECIFIED

DEV.ADR.= (6 OCTAL CHARACTERS)
;BUS ADDRESS OF KMC11 CSR
LINES(0=-7) CI.E..#,#.4) OR (A)=ALL (N)=NONE
sLINES TO BE TESTED

(1)ENABLE (0)D ] SABLE

sTO ENABLE OR DISABLE THIS UNIT FROM TESTING

(1) CRC32

: DMST1-DA, DMS11-A HAVE NO CRC32-

(0)EXTERNAL (1) INTERNAL

(0) NO CRC32

TO ENABLE RUNNING TESTS REQUIRING THE
; EXTERNAL DATA LOOP (EXT.LOOP CONNECTOR)

* [F STATUS IS NOT TO BE CHANGED ON CURRENT INQUIRY A CARRIAGE
RETURN (ONLY) MAY BE TYPED
AFTER THE INPUTTING IS COMPLETED AN ‘'«'* IS PRINTED AT WHICH POINT
THE OPERATOR HAS 3 CHOICES BY TYPING AN

.
L

(EXIT) THE CONFIGURE ROUTINE (ENTERS CONSOLE ROUTINE OR
TEST IF DIAG. TEST WAS THE ENTRY POINT

DIAG.

(MODIFY) AN M FOLLOWED BY A #1-16 (DEC) TO SPECIFY THE DESIRED
KMC11°'S STATUS TO BE MODIFIED.
THE STATUS BLOCK IS PRINTED

AND THE NEW STATUS INVOLKED.

(ALL) FROM LAST KMC11 PARAMETER BLOCK POINTED TO EITHER BY
THE INITIAL ENTRY OR_THE 'MODIFY'* ROUTINE THE REMAINING

BLOCKS ARE LOADED WITH SEQUENTIAL DEVICE STATUS TO THE END
OF THE CONFIGURATION TABLE.

SEQ@ 0003

CZKMDAO DMS11-DA STATIC MACY11 30A(1052)
CZKMDA.P11
20-0CT-81 17:03

21-0CT-81

09:21

PAGE &

* ANY COMBINATION OF DEVICE STATUS CAN BE CONFIGURED AND RUN AS

LONG AS AT LEAST 1 KMC11 IS ENABLED IN THE TABLE

CONTROL :
CONTROL C

TYPING ACNTR C (*C) WILL FORCE ENTRY TO THE MONITOR
ROUTINE.

CONTROL G
PROCESSORS WITHOUT CONSOLE PANELS WILL HAVE A SOFT

SWITCH REGISTER WHICH IS INVOLKED BY THE OPERATOR TYPING
A CNTR G (*G). AFTER _THE NEW SWITCH VALUE IS ENTERED THE
PROGRAM IS RESUMED AT THE POINT OF

5.1

INVOLK.

SWITCH OPTIONS:
THE SWITCH REGISTER SETTING MUST BE DONE ACCORDING TO
PROCESSOSITYPE AND HARDWARE ARCHITECT.

T15 = 1
BIT14 = 1
BIT13 = 1

BIT10 = 1
BITO9 = 1
BITO8 = 1

;HALT ON ERROR
:LOOP ON TEST
:INHIBIT ERROR TYPEOUTS

:RING BELL ON ERROR
:LOOP ON ERROR
;LOOP ON TEST IN SWR BITS 07-00

TEST EXECUTION + SEQUENCES:

EACH TEST MUST BE SUCCESSIVELY COMPLETED
BEFORE THE NEXT CAN BE ENTERED.
ALL TESTS

ARE RUN SEQUENTIALLY ON EACH UNIT (KMC +

DMS11D) AND THE CURRENT DEVICE IS SPECIFIED
BY THE SEQUENCE OF THE CONFIGURATION TABLE
(ENABLED UNITS ONLY).

6.0

ERRORS

ALL ERRORS ARE REPORTED ON THE TTY UNLESS CONSOLE SWITCH

13 IS SET (REFER _TO SECTION 5.1 OF THIS WRITEUP). ALL ERRORS

REPORTED HAVE A ENGLISH TYPE STATEMENT EXPLAINING THE ERROR
WITH OUTPUT OF CERTAIN REGISTERS OR MEMORY LOCATIONS WHICH
CAN BE USED AS A AID.

SEQ 0004

CZFMDAO DMS11-DA STAT ¢H;Cg;l 30A(1052)
CZKMDA.P11
20-0CT
7.0

21-0CT-81

09:21

PAGE 5

TEST DESCRIPTION

EACH INDIVIDUAL TEST HAS A WRITEUP EXPLAINING WHAT IT DOES
REFER TO THE TEST ITSELF FOR A EXPLANATION.

SUBROUTINE DESCRIPTIONS USED IN TEST WRITE UPS
MASTER CLEAR:

SETTING MASTER CLEAR ON KMC11 (BIT OF SEL)
CLEARING CONTROL AND STATUS REGISTERS AND
LOADING THE CURRENT LINE NUMBER IN
PRIMARY REGISTER 11.

LINE RESET:

LOADS THE CURRENT LINE NUMBER (IN PRIMARY
REGISTER 11) THEN SETS BIT O IN PRIMARY
REGISTER 12 (LINE RESET).
TEST DESCRIPTIONS

TEST 1

(LINE SELECT REGISTER TEST)

THIS TEST ISSUES A RESET PULSE AND CLEARS
THE CSRS THEN READS AND TEST PRIMARY
REGISTER 11 FOR BEING CLEAR

ERROR REPORT IS ERROR 1

TEST 2 :

(SECONDARY SELECT REGISTER TEST)
THIS TEST READS PRIMARY REGISTER 12
FOR BEING CLEAR AFTER A RESET PULSE

IS EXECUTED.
ERROR REPORT IS ERROR 1

TEST 3 :

TEST 4 :

(LINE STATUS REGISTER TEST)
A RESET PULSE IS ISSUED AND PRIMARY
REGISTER 13
IS TESTED FOR BEING CLEARED.
ERROR REPORT IS ERROR 1

(LINE CONTROL REGISTER TEST)

A RESET PULSE IS ISSUED AND PRIMARY

ARE NOT TESTED.

ERROR REPORT IS ERROR 1

TEST S :

(TRANSMIT STATUS MULTIPLEXER REG. TEST)
A RESET PULSE IS ISSUED AND
THE
CORRESPGNDING LINE (CURRENTLY UNDER TEST)

IS CHECKED FOR BEING CLEAR.
ERROR REPORT IS ERROR 1

TEST 6 :

(RECEIVE STATUS MULTIPLEXER REG. TEST)

A RESET PULSE IS ISSUED AND THE

CORRESPONDING L INE (CURRENTLV UNDER TEST)
IS CHECKED FOR BEING CLEAR
ERROR REPORT IS ERROR 1

TEST 7 :

(PRIMARY REG. 11 WRITE/READ TEST)
A ONE BIT IS WALKED THROUGH BITS 6.5 AND 4

OF PRIMARY REGISTER 11.

THE BITS ARE

SEQ@ 0005

CZKMDAO DMS11-DA STATIC
HACCY’}‘I 30A(1052)
CZKMDA.P11
20~0CT-81

21-0CT-81

09:21

PAGE 6

WRITTEN THEN READ FOR BEING SET.

ERROR REPORT IS ERROR 2

TEST 10:

(PRIMRY REGISTER 12 WRITE/READ TEST)
A ONE BIT IS WALKED THROUGH PRIMARY
REGISTER 12, BITS
4,5,6 AND 7.
THE BITS
ARE WRITTEN THEN READ AND CHECKED FOR
BEING SET.
ERROR REPORT IS ERROR 2

TEST 11:

(PRIMARY REGISTER 13 READ/WRITE TEST)
BIT 3 OF PRIMARY REGISTER IS WRITTEN
AND READ IF CRC32 IS ENABLED.
ERROR REPORT IS ERROR 2

TEST12:

(mmv REGISTER 14 READ/WRITE TEST)
A ONE BIT IS w.xeo ruaoucu PRIMARY
REGISTER 14, BITS
0
g AND 7. BIT

3 IS ALSO TESTED IF cncS IS ENABLED.
THE BITS ARE WRITTEN THEN READ AND

CHECKED FOR BEING SET AND CLEARED.
ERROR REPORT IS ERROR 2

TEST 13:

(SECONDARY REGISTER O READ TEST)
A LINE RESET IS DONE AND SECONDARY
REGISTER 0 (RECEIVE BUFFER) IS READ
AND CHECKED FOR BEING CLEAR.

ERROR REPORT IS ERROR 3

TEST 14:

(SECONDARY REGISTER 1 READ TEST)

A LINE RESET IS ISSUED AND SECONDARY
REGISTER 1 IS READ AND CHECKED FOR

BEING CLEAR

ERROR REPORT IS ERROR 3

TEST 15:

(SECOND REGISTER 2 READ TEST)

A LINE RESET IS ISSUED AND SECONDARY

ERROR REPORT IS ERROR 3

TEST 16:

(SECONDARY REGISTER 3 READ TEST)
A LINE RESET IS ISSUED AND SECONDARY

NOT CHECKED).

FRROR REPORT IS ERROR 3

TEST 17:

(SECONDARY REGISTER & READ TEST)
A LINE RESET IS ISSUED SECONDARY
REGISTER & IS READ CHECKED FOR
BEING CLEAR

ERROR REPORT IS ERROR 3

TEST 20:

(SECONDARY REGISTER 5 READ TEST)
A LINE RESET IS ISSUED AND SECONDARY

1
SEQ@ 0006

CZKMDAO DMS11-DA STATIC
H;C‘Y,;‘l 30A(1052)
CZKMDA.P11
20-0CT-81

21-0CT-81

09:21

PAGE 7

(SECONDARY REGISTER 7 READ TEST)

A LINE RESET IS ISSUED AND SECONDARY
REGISTER 7 (CHARACTER LENGTH) IS
READ AND CHECKED FOR BEING CLEAR.

ERROR REPORT IS ERROR 3

TEST 22:

(SECONDARY REG. 1 WRITE TO READ ONLY BIT “RSOM'")
A LINE RESET IS ISSUED AND THE 'RSOM'
(BIT 0) IS WRITTEN WITH A ONE BIT
THEN READ AND CHECKED FOR NOT BEING

SET (READ ONLY).
ERROR REPORT IS ERROR &
TEST 23:

(SECONDARY REG. 1 WRITE TO READ ONLY BIT ‘REOM'")
A LINE RESET IS ISSUED AND THE ‘'REOM
(BIT 1) IS WRITTEN WITH A ONE BIT
THEN READ AND CHECKED FOR BEING CLEAR.

ERROR REPORT IS ERROR &

TEST 24:

(SECONDARY REG. 1 WRITE TO READ ONLY BIT "RXGA'")
A LINE RESET IS ISSUED AND THE 'RXGA"

(BIT 2) IS WRITTEN WITH A ONE BIT

THEN READ AND CHECKED FOR BEING CLEAR.
ERROR REPORT IS ERROR &

TEST 25:

(SECONDARY REG 1 WRITE TO READ ONLY BIT "ROR'")
A LINE RESET IS ISSUED AND THE ‘ROR'’

(BIT 3) IS WRITTEN WITH A ONE BIT

THEN READ AND CHECKED FOR BEING CLEAR.

ERROR REPORT IS ERROR 4

TEST 26:

(SECONDARY REG. 1 WRITE TO READ MLY BIT "ABCATM)
A LINE RESET IS ISSUED AND THE ‘'ABCA
(BIT 4) IS WRITTEN WITH A ONE BIT THEN

READ AND CHECKED FOR BEING CLEAR.
ERROR REPORT IS ERROR 4

TEST 27:

(SECONDARY REG. 1 WRITE TO READ ONLY BIT '‘AB(CB'")
A LINE RESET IS ISSUED AND THE ‘'AB(CB'

(BIT 5) IS WRITTEN WITH A ONE BIT THEN

READ AND CHECKED FOR BEING CLEAR.

ERROR REPORT IS ERROR 4

TEST 30:

(SECONDARY REG. 1 WRITE TO READ ONLY BIT *‘ABCC'")

A LINE RESET IS ISSUED AND THE ''ABCC''

(BIT 6) IS WRITTEN WITH A ONE BIT THEN
READ AND CHECKED FOR BEING CLEAR.
ERROR REPORT IS ERROR 4

TEST 31:

(SECONDARY REG. 1 WRITE TO READ MLV QIT "ERRCK"'")
A LINE RESET IS ISSUED AND THE ‘ERR

BIT 7) IS WRITTEN WITH A ONE BIT THEN

SEQ@ 0007

CZKMDAO DMS11-DA STATIC
H;Ca}‘l 30A(1052)
CZKMDA.P11
20-0CT-81

21-0CT-81

09:21

PAGE 8

READ AND CHECKED FOR BEING CLEAR.

ERROR REPORT IS ERROR &

TEST 32:

(SECONDARY REG. 2 INCREMENTAL DATA PATTERN TEST)

A MASTER CLEAR IS ISSUED AND SECONDARY

REG. 2 IS WRITTEN UITH THE
CURRENT DATA
PATTERN C(INCREMENTAL 1-377) THEN THE

ERROR REPORT IS ERROR 10

WHEN THE FULL DATA PATTERN IS REACHED

(377) A LINE RESET IS ISSUED AND THE

ICQEELS!TER IS READ AND CHECKED FOR BEING

ERROR REPORT IS ERROR 11
TEST 33:

(SECONDARY REG. 3 °'‘TSOM BIT \RITE/READ/RESET TEST)

A LINE RESET IS ISSUED, THE '‘TSOM
(BIT 0) IS SET THEN READ AND CHECKED FOR
BEING SET.

ERROR REPORT IS ERROR 5

THE BIT IS THEN WRITTEN TO A 0O, READ AND

CHECKED FOR BEING CLEAR.
ERROR REPORT IS ERROR 5

THE BIT IS THEN REWRITTEN AND A LINE
RESET ISSUED AND REREAD AND CHECKED
FOR BEING CLEARED.

ERROR REPORT IS ERROR 8

TEST 34:

(SECONDARY REG. 3 °‘TEOM'' BIT WRITE/READ/RESET TEST)

A LINE RESET IS ISSUED, THE °‘‘TEOM' BIT
(BIT 1) IS SET AND THEN READ AND
CHECKED FOR BEING SET.

ERROR REPORT IS ERROR 5

THE BIT IS THEN WRITTEN TO A 0, READ
AND CHECKED FOR BEING CLEAR

ERROR REPORT IS ERROR S

THE BIT IS THEN REWRITTEN AND A
LINE RESET ISSUED AND THE BIT REREAD
AND CHECKED FOR BEING CLEARED.

ERROR REPORT IS ERROR 8

TEST 35:

(SECONDARY REG. 3 °'‘TXAB'’ uax.rsmemmesn TEST)

A LINE

(BIT

RESET IS ISSUED, THE

‘‘TXAB'‘

BIT

2) IS SET THEN READ AND CHECKED FOR

BEING SET.

ERROR_REPORT IS ERROR
S

THE BIT IS THEN WRITTEN TO A 0, READ AND
CHECKED FOR BEING CLEAR

ERROR REPORT IS ERROR §

THE BIT IS THEN REWRITTEN AND
A LINE
RESET ISSUED AND THE BIT REREAD AND CHECKED
FOR BEING CLEARED.

ERROR REPORT IS ERROR 8

TEST 36:

(SECONDARY REG. 3 '‘TXGA'* WRITE/READ/RESET TEST)

SEQ 0008

CZKMDAO DMS11-DA STATIC MACY11 30A (1052)
CZKMDA.P11
20-0CT-81 17:03

21-0CT-81

09:21

PAGE 9

A LINE
RESET IS _ISSUED, "‘TXGA'' BIT
(BIT
3) IS SET THEN READ AND CHECKED FOR
BEING SET.
ERROR REPORT IS ERROR 5
THE BIT IS THEN WRITTEN TO A 0, READ AND
CHECKED FOR BEING CLEAR.
ERROR REPORT IS ERROR 5
THE BIT IS THEN REWRITTEN AND A LINE
RESET ISSUED AND THE BIT REREAD AND
CHECKED FOR BEING CLEARED.

ERROR REPORT IS ERROR 8

TEST 37:

(SECONDARY REG. 4 INCREKNTAL WRITE/READ TEST)

A MASTER CLEAR IS_ISSUED AND AN INCREMENTAL

DATA PATTERN (1-377) IS WRITTEN TO THE
SYNC REG. (REG. 4) THEN READ AND CHECKED
TO BE THE SAME AS THE CURRENT DATA PATTERN.
ERROR REPORT IS ERR?! 10
ON THE FINAL DATA PATTERN (377) A LINE RESET
IS ISSUED AND THE REGISTER IS REREAD

AND CHECKED FOR BEING CLEARED.

ERROR REPORT IS ERROR 11

TEST 40:

(SECONDARY REG. 5 "PROTEX'* (BIT 0) WRITE/READ/RESET TEST)
A LINE RESET IS ISSUED AND THE 'PROTEX'

BIT (BIT 0) IS WRITTEN TO A ONE THEN
READ AND CHECKED FOR BEING SET.

ERROR REPORT IS ERROR 6

THE BIT IS THEN WRITTEN TO A 0
REREAD AND CHECKED FOR BEING CLEAR.

ERROR REPORT IS ERROR 6

THE BIT IS THEN REWRITTEN TO A ONE AND
A LINE RESET IS ISSUED AND THE BIT REREAD
AND CHECKED FOR BEING CLEAR.
TEST 41:

(SECONDARY REG. 5 'PROTEY'" (BIT 1) WRITE/READ/RESET TEST)

A LINE RESET IS ISSUED AND THE 'PROTEY’

BIT (BIT 1) IS WRITTEN TO A ONE THEN
READ AND CHECKED FOR BEING SET,

ERROR REPORT IS ERROR 6

THE BIT IS THEN WRITTEN TO A 0
REREAD AND CHECKED FOR BEING CLEAR.

ERROR _REPORT IS ERROR
6

THE BIT IS THEN REWRITTEN TO A ONE AND
A LINE RESET IS ISSUED AND THE BIT REREAD
AND CHECKED FOR BEING CLEAR.

TEST 42:

(SECONDARY REG. 5 'PROTEZ'’ (BIT, 2) WITEIREAD/RESET TEST)
A LINE RESET IS ISSUED AND THE
'PROTEZ'’

BIT (BIT 2) IS WRITTEN TO A ONE THEN
READ AND CHECKED FOR BEING SET.
ERROR REPORT IS ERROR 6
THE BIT IS THEN WRITTEN TO A 0

REREAD AND CHECKED FOR BEING CLEAR.

SEQ 0009

CZKMDAO DMS11-DA STATIC
H;C(Y,;l 30A(1052)
CZKMDA.P11
20-0CT-81

21-0CT-81

09:21

PAGE 10

ERROR REPORT IS ERROR 6

THE BIT IS THEN REWRITTEN TO A ONE AN
A LINE RESET IS ISSUED AND THE BIT REREAD
AND CHECKED FOR BEING CLEAR.

TEST 43:

(SECONDARY REG. 5 "WIDLE'' (BIT 3) UUTE/READ/RESET TEST)

A LINE RESET IS ISSUED AND THE
°
BIT (BIT
3) IS WRITTEN TO A ONE THEN
~
ED FOR BEING SET.

THE BIT IS THEN WRITTEN TO A 0
REREAD AND CHECKED FOR BEING CLE

ERROR REPORT IS ERROR 6

THE BIT IS THEN REWRITTEN TO A ONE AND
A LINE RESET IS ISSUED AND THE BIT REREAD
AND CHECKED FOR BEING CLEAR.

TEST 44:

(SECONDARY RE G. 5 "'SAM" (BIT &) WRITE/READ/RESET TEST)
A LINE RESET gS ISSUED AND
THE "'SAM'*
BIT (BIT 4) IS
WRITTEN TO A ONE THEN
READ AND CHECKED FOR BEING SET.
ERROR REPORT IS ERROR 6
THE BIT IS THEN WRITTEN TO A 0
REREAD AND CHECKED FOR BEING CLEAR.
ERROR REPORT IS ERROR 6
THE BIT IS THEN REWRITTEN TO A ONE AND
A LINE RESET IS ISSUED AND THE BIT REREAD
AND CHECKED FOR BEING CLEAR.

TEST 45:

(SECONDARY REG. 5 'SSL'* (BIT 5) WRITE/READ/RESET TEST)

A LINE RESET IS ISSUED AND THE ‘‘SSL

BIT (BIT 5) IS WRITTEN TO A ONE THEN
READ AND CHECKED FOR BEING SET.

ERROR REPORT IS ERROR 6
THE BIT IS THEN WRITTEN TO A 0

REREAD AND CHECKED FOR BEING CLEAR.
ERROR REPORT
IS ERROR 6

THE BIT IS THEN REMITTEN TO A ONE AND
A LINE RESET IS ISSUED AND THE BIT REREAD
AND CHECKED FOR BEING CLEAR.

TEST 46:

(SECONDARY REG. 5 'PROTO'' (BIT 6) WRITE/READ/RESET TEST)
A LINE RESET IS ISSUED AND THE ‘PROTO"
BIT (BIT 6) IS WRITTEN TO A ONE THEN
READ AND CHECKED FOR BEING SET.

ERROR REPORT IS ERROR 6

THE BIT IS THEN WRITTEN TO A 0
REREAD AND CHECKED FOR BEING CLEAR.

ERROR REPORT IS ERROR 6

THE BIT IS THEN REWRITTEN TO A ONE AND
A LINE RESET IS ISSUED AND THE BIT REREAD
AND CHECKED FOR BEING CLEAR.

SEQ@ 0010

CZKMDAO DMS11-DA STATIC 1C5;1 30A(1052)
CZKMDA.P11
20-0CT-81

21-0CT-81

09:21

PAGE 11

TEST 47:

TEST 50:

(SECONDARY REG, 7 °'RDATA2'’ (BIT 1) UUTE/READ/RESET TEST)

A LINE RESET IS ISSUED AND THE 'RDATA2'’
BIT (BIT 1) IS WRITTEN TO A ONE THEN
READ AND CHECKED FOR BEING SET.

ERROR REPORT IS ERROR 6

THE BIT IS THEN WRITTEN TO A 0
REREAD AND CHECKED FOR BEING CLEAR.

ERROR REPORT IS

ERROR
6

THE BIT IS THEN REHUTTEN TO A ONE AN
A LINE RESET IS ISSUED AND THE BIT REREAD
AND CHECKED FOR BEING CLEAR.

TEST 51:

(SECONDARY REG.
7 'RDATA3'’ (BIT 2) WRITE/READ/RESET TEST)

A LINE RESET IS ISSUED AND THE 'RDATA3'’

BIT (BIT 2) IS WRITTEN TO A ONE THEN
READ AND CHECKED FOR BEING SET.

ERROR REPORT IS ERROR 6

THE BIT IS THEN WRITTEN TO A 0
REREAD AND CHECKED FOR BEING CLEAR

ERROR REPORT IS ERROR 6

THE BIT IS THEN REWRITTEN TO A ONE AN
A LINE RESET IS ISSUED AND THE BIT REREAD
AND CHECKED FOR BEING CLEAR.

TEST 52:

(SECONDARY REG. 7 °‘TDATA1'’ (BIT, 5) UUTE/READ/RESEY TEST)
A LINE RESET IS ISSUED AND THE
'‘TDATAT''

BIT (BIT 5) IS WRITTEN TO A ONE THEN
READ ANC CHECKED FOR BEING SET.

ERROR REPORT IS ERROR 6

THE BIT IS THEN WRITTEN TO A 0
REREAD AND CHECKED FOR BEING CLEAR.

ERROR REPORT IS ERROR 6

THE BIT IS THEN REWRITTEN TO A ONE AND
A LINE RESET IS ISSUED AND THE BIT REREAD
AND CHECKED FOR BEING CLEAR.

TEST 53:

(SECONDARY REG. 7 ""TDATA2'* (BIT 6) MITE/READ/RESET TEST)
A LINE "ESET IS 1 ?SUED AND THE °‘TDATAZ''
BIT (BIT 6) IS WRITTEN TO A ONE THEN

SEQ 0011

CZKMDAO DMS11-DA STAT C MCV‘H 30A(1052)
CZKMDA.P11
20-0CT
7:03

21-0CT-81

09:21

PAGE 12

READ AND CHECKED FOR BEING SET.

ERROR REPORT IS ERRN 6

THE BIT IS THEN WRITTEN TO A 0

REREAD AND CHECKED FOR BEING CLEAR.

ERROR REPORT IS ERROR 6

THE BIT IS THEN REWRITTEN TO A ONE AND
A LINE RESET IS ISSUED AND THE BIT REREAD
AND CHECKED FOR BEING CLEAR.

TEST S54&:

(SECONDARY REG.
7 °'‘TDATA3'' (BIT 7) W TE/READ/RESET TEST)
A LINE RESET IS ISSUED AND THE “‘TDA
BIT (BIT 7) IS WRITTEN TO A M I’HEN
READ AND CHECKED FOR BEING SET.

ERROKk REPORT IS ERROR 6

THE BIT IS THEN WRITTEN TO A 0

REREAD AND CHECKED FOR BEING CLEAR.

ERROR REPORT IS ERROR 6

THE BIT IS THEN REWRITTEN TO A ONE AND
A LINE RESET IS ISSUED AND THE BIT REREAD
AND CHECKED FOR BEING CLEAR.

TEST 55:

(TRANSMIT AND RECEIVE INITIALIZATION TEST FOR CCP PROTOCOL)
THIS TEST WILL UTILIZE THE INTERNAL DATA

LOOP (LOOPING THE OUTPUT OF THE USYRT

TRANSMITTER TO THE USYRT RECEIVER)
AND THE ON BOARD SINGLE STEP MAINTENANCE CLOCK.
THE FOLLOWING PROGRAMING STEPS ARE DONE

ISSUE A MASTER CLEAR
SET_PROTOCOL TO CCP (BIT 6-SEC. REG. 5)
LOAD SECONDARY SYNC REGISTER WITH A 26 (OCT.)
ENABLE TENA, RENA AND MAINT. (LK, BITS M8 & MC

SET "TSOM'* BIT 0-SECONDARY REG 3

READ “‘TBMT''
(BJT-PR]
13) AND TEST BIT IS CLEAR
AFTER SETTING '‘TSOM'* (AND NO CLK PULSES)
ERROR REPORT IS ERROR 12
THE MAINTENANCE CLOCK IS STEPPED 2 (FULL)

CLOCK TICKS.

TBMT''
IS REREAD AND CHECKED FOR BEING SET AFTER
THE 2 CLOCK TICKS.
ERROR REPORT IS ERROR 13
TRANSMIT DATA BUFFER (SECONDARY REGISTER 2)

WITH THE

STX

IS LOADED

(START OF TEXT) CHARACTER (2).

THE MAINTENANCE CLOCK IS STEPPED 7 TICK

THE

ERROR REPORT IS ERROR 1

'TSOM*

"'SYNC FLAGTM RECEIVED IS REREAD AND CHECKED

FOR BEING SET,

ERROR REPORT IS ERROR 15
THE MAINTENANCE CLOCK IS STEPPED 9 TICKS

THE

BIT IS WRITTEN

T0
A 0
THE MAINTENANCE CLOCK IS STEPPED
8 TICKS
THE

"SYNC FLAG" RECEIVED 1S READ (BITS S-SEC 13)

AND CHECKED FOR BEING SET.

'SYNC FLAGTM RECEIVED 1S READ AND CHECKED

FOR BEING CLEAR (CLOCKING IN A NON FLAG CHARACTER)
ERROR REPORT IS ERROR 16

A SERIES OF 3 DATA CHARACTERS (101) ARE LOADED

CZKMDAO DMS11-DA STAT C MACY11 30A(1052)
CZKMDA.P11
20-0CT-81 17:03

21-0CT-81

09:21

PAGE 13

SEQ 0013

INTO THE TRANSMIT DATA BUFFER FOLLOWED BY
THE MAINTENANCE CLOCK STEPPED 8 TICKS
THE & DATA CHMACTER IS LOADED AND THE MAINT.

CLOCK STEPPED 2 TICKS.

PRIMARY REGISTER 13

TEST S56:

IS READ AND STATUS BITS

*
.

0 AND 2 (RDA AND RAC) ARE CHECKED FOR BEING SET
ERROR REPORT FOR 'RAC'' (RECEIVER ACTIVE) IS ERROR 17
ERROR REPORT FOR 'RDA’'’ (RECEIVE DATA AVAIL.) IS ERROR 18

CHECKED FOR CONTAINING THE SYNC FLAG VALUE (26)
ERROR REPORT IS ERROR 20

THE RECEIVE DATA BUFFER IS READ (SEC 0) AND

(TRANSMIT AND RECEIVE INITIALIZATION TEST FOR BOP PROTOCOL)
THIS TEST WILL UTILIZE THE INTERNAL DATA LOOP
(LOOPING THE OUTPUT OF THE USYRT TRANSMITTER TO
THE USYRT RECEIVER) AND THE ON BOARD SINGLE STEP
MAINTENANCE CLOCK.
THE FOLLOWING PROGRAMING STEPS ARE DONE

ISSUE A MASTER CLEAR
SET PROTOCOL TO BOP AND SECONDARY ADDRESS MODE
LOAD SYNC SECONDARY ADDRESS REG. WITH A 376
SET TRANSMIT ENABLE, RECEIVER ENABLE AND

INTERNAL DATA’LOOP MODE (MB & MC) (PRIMARY
687
SET ““TSOM'* TRANSMIT START OF MESSAGE (SEC 3-BIT 0)

TEST "“TBMT**
IS NOT SET
ERROR REPORT IS ERROR 12

STEP CLOCK
2 TICKS
TEST "TBMT*'
IS NOW SET
ERROR REPORT IS ERROR 13
CLEAR ‘‘TSOM'*
B
LOAD THE TRANSMIT DATA BUFFER SECONDARY SYNC

ADDRESS (376)
STEP MAINT CLOCK 7 TICKS

TEST THAT SYAC FLAG RECEIVED

IS NOW SET.
ERROR REPORT IS ERROR 14

(PRI

13-8IT 3)

THE TRANSMIT DATA BUFFER 1 S LOADED UITH A0
THE MAINTENANCE CLOCK IS $ T EP 9 TIC
THE SYNC FLAG RECEIVED BIT IS THEN TESTED
FOR BEING CLEAR
ERROR REPORT 1S ERROR 16
A SERIES OF 3 DATA CHARACTERS (101) ARE LOADED

INTO THE TRANSMIT DATA BUFFER AND EACH FOLLOWED
BY STEPPING THE MAINTENANCE CLOCK 8 TICKS
THE FOURTH DATA CHARACTER IS LOADED FOLLOWED

BY STEPPING THE MAINTENANCE CLOC
.
.
.

CKS

THE RECEIVER STATUS BITS "RACT§ "ROATM (PRI
ARE READ AND CHECKED FOR BEING SET.

ERROR REPORT
ERROR_REPORT
THE "RSOMTM*
(SEC 1-BIT 0)
ERROR REPORT

FOR 'RAC’’ IS ERROR 17
FOR 'RDA'* IS ERROR 18
RECEIVE START OF MESSAGE BIT
IS TESTED FOR BEING SET.
IS ERROR 19

THE RECEIVE DATA BUFFER IS READ AND TESTED
FOR CONTAINING THE 376 (SYNC ADDRESS)

13-8ITS 2 & 0)

CZKMDAO DMS11-DA STATIC MACY11 30A(1052)

CZKMDA.P11

20~0CT-81 17:03
*

TEST 57:

21-0CT-81

09:21

PAGE 14

ERROR REPORT IS ERROR 20

(END OF MESSAGE TEST FOR BOP PROTOCOL)
THIS TEST EXECUTES IN THE FOLLOWING SEQUENCE
ISSUES A MASTER CLEAR SEQUENCE

SET THE CMARACTER LENGTH REGISTER (SEC 7) A 0 (8 BIT))
SETS TENA,

RENA AND INTERNAL DATA LOOP SINGLE

STEP, MAINTENANCE CLOCK

SET "TSOM'' TRANSMIT START OF MESSAGE
STEP THE MAINTENANCE CLOCK 1 TICK
TEST “TBMT'' FOR SET AND CONTINUE STEPPING
CLOCK TILL SET

LOAD TRANSMIT DATA BUFFER WITH A 0
CLEAR '‘TSOM'* BIT

RUN A STATUS_CHECK LOOP (400 OCTAL) STEPPING
THE CLOCK 1 TICK AND MONITORING SYNC FLAG

RECEIVED FOR SETTING

ERROR REPORT IS ERROR 14
A LOOP TO MONITOR THAT RECEIVE DATA AVAILABLE

(RDA) WILL SET WITHIN 400 (OCTAL) CLOCK TICKS

WHILE ALSO MONITORING THE TRANSMITTER (TBMT)

.
TEST 60:

TO SUPPLY DATA

ERROR REPORT IF "RDA' FAILS TO SET IS ERROR 34

AFTER 'RDATM SETS THE RECEIVE DATA BUFFER

TRANSMIT END OF MESSAGE (TEOM) 1S SET
A LOOP TO MONITOR THAT THE SYNC FLAG_ RECEIVED
(S/F) SETS WITHIN 400 (OCTAL) CLOCK TICKS.
ERROR REPORT IS ERROR 22
THE MAINTENANCE CLOCK IS STEPPED 2 TICKS
AND ‘REOMTM RECEIVE END OF MESSAGE IS TESTED
FOR BEING SET.

ERROR REPORT IS ERROR 21.

(END OF MESSAGE TEST FOR CCP MODE)
THIS TEST EXECUTES IN THE FOLLOWING SEQUENCE
ISSUE A MASTER CLEAR

SET CHARACTER LENGTH REGISTER TO 0 (8 BITS)
SET PROTOCOL TO CCP (SEC 5-BIT 6=1)
LOAD THE SYNC ADDRESS REGISTER WITH A 26

SET TENA RENA AND INTERNAL SINGLE STEP MAINT CLOCK

STEP CLOCK AND LOOP UNTIL “‘TBMT'' SETS
LOAD THE_TRANSMIT DATA BUFFER WITH AN STX (2)

TEST THAT SYNC FLAG RECEIVED (S/F) SETS WITHIN

400 (OCTAL) CLOCK TICKS

ERROR REPORT IS ERROR 15

ERROR REPORT IS ERROR 34
SET ''TEOM' (TRANSMIT END OF MESSAGE)

CLEAR_THE '‘TSOM'* BIT
TEST THAT 'RDA’’ SETS WITHIN 400 (OCTAL) CLOCK
TICKS (THE TRANSMITTER IS ALSO SERVICED WHILE
MONITORING THE ‘RDA’)
TEST THAT SYNC FLAG RECEIVED (S/F) SETS WITHIN
400 (OCTAL) CLOCK TICKS. (THE RECEIVE IS ALSO
MONITOR TO PREVENT AN OVERRUN)

SEQ 0014

CZKMDAO DMS11-DA STATIC MACY11 30A(1052)
CZKMDA.P11
20-0CT-81 17:03
*
TEST 61:

21-0CT-81

09:21

PAGE 15

ERROR REPORT IS ERROR 22

(CHARACTER LENGTH TEST FOR BOP PROTOCOL)
THIS TEST EXECUTES IN THE FOLLOWING SEQUENCE
ISSUE A MASTER CLEAR
SET PROTOCOL TO BOP

SET CHARACTER LENGTH REG.(SEC 7)
RECEIVE BITS TO ACCEPT 7 BIT CHARACTER ALTERS

SET TENA, RENA AND INTERNAL SINGLE STEP MAINT CLOCK

STEP CLOCK UNTIL

‘‘TBMT" SETS

TEST THAT SYNC FLAG RECEIVED (S/F) SETS
WITHIN 400 (OCTAL) CLOCK TICKS

ERROR REPORT IS ERROR 14

A SEQUENCE IS RUN TO MONITOR THAT SYNC
FLAG RECEIVED (S/F) GOES AWAY (WITHIN 400(OCTAL)
CLOCK TICKS

ERROR REPORT IS ERROR 33

THE SEQUENCE MONITORS ““TBMT'* AND ‘RDA'’
TO QUTPUT 2 DATA CHARACTERS THEN LOAD THE
DATA LENGTH REGISTER TO TRANSMIT AND RECEIVE
CHARACTERS AS_SPECIFIED BY THE CURRENT CHARACTER

LENGTH UNDER TEST. WHEN 'RDATM SETS THE RECEIVE
DATA BUFFER 1S READ AND THE DATA IS COMPARED

AGAINST THE DATA SENT.

ERROR REPORT IS ERROR 23
%?cngA" FAILS TO SET WITHIN 400 (OCTAL) CLOCK

ERROR REPORT IS ERROR 34

SET ‘TEOM'* TRANSMIT END OF MESSAGE

STEP MAINTENANCE CLOCK AND CHECK AFTER
EACH TICK THAT SYNC FLAG RECEIVER 1S NOT SET,

*
*

UNTIL ‘RDA’* SETS
ERROR REPORT IS ERROR 36 (S/F SET)
ERROR REPORT IS ERROR 34 (RDA FAILED TO SET)
WHEN "RDA'* SETS THE DATA REGISTER IS REREAD

AND THE DATA COMPARED AGAINST THE TRANSMITTED

ERROR REPORT IS ERROR 23
REOM'* IS MONITORED FOR SETTING WITHIN 400
(OCTAL) CLOCK TICKS
ERROR REPORT IS ERROR 21
THE TEST IS RERUN FOR REMAINING CHARACTER

LENGTHS 6,5,4,3,2

& 1

TAE DATA VALUE TRANSNITTED IS DECREASED ONE

NOTE:

TEST 62:

BIT POSITION FOR EACH DATA CHARACTER LENGTH.
THE CHARACTER LENGTH FRAMING (TRANSMIT AND RECEIVE)

IS CHECKED BY THE 2 CONSECUTIVE DATA CHARACTERS
BEING TRANSMITTED AND RECEIVED.

(ERROR CHECK TEST FOR CCITT=CRC WITH INITIALIZE SET TO
-1 (BOP MODE))
THIS TEST WILL gHECK THAT THE CCITT POLYNOMIAL

(X16 + X12 + X15

+ 1) WITH
A PRESET OF -1

THERE IS NOT FORCED ERROR CONDITION IN THIS TEST.
THIS TEST PERFORMS THE FOLLOWING SEQUENCE

ISSUE A MASTER CLEAR SEQUENCE

SEQ 0015

CZKMDAO DMS11-DA STATIC CY‘II 30A(1052)
CZKMDA.P11
20-0CT-81 17

21-0CT-81

09:21

PAGE 16

SET CHARACTER LENGTH TO 8 BITS/CHARACTER
SET PROTOCOL TO
80'1’ AND ENABLE CCITT-CRC16
SET TENA, RENA AND ENABLE INTERNAL SINGLE
STEP, MAINTENANCE CLOCK

SET "TSOM’
el
STEP CLOCK UNTIL “‘TBMT'* SETS

LOAD ADDRESS WORD (TDB)
CLEAR "“TSOM
STEP CLOCK AND TEST SYNC FLAG RECEIVED
SETS WITHIN 400 (OCTAL) CLOCK TICKS
ERROR REPORT IS ERROR 14
.
STEP, CLOCK, OUTPUT DATA (ON "‘TBMT') AND TEST
CRDA SETS WITHIN 400 (OCTAL) 'CLOCK TICKS
ERROR_REPORS IS ERROR 34
TEST THAT DATA READ xs SAME AS SENT

ERROR_REPORT IS ERROR
TEST THAT 'ERRCKTM BIT 55 NOT SET
ERROR REPORT 1S ERROR

STEP CLOCK AND READ RECEIVED DATA WORDS
UNTIL SYNC FLAG RECEIVED SETS
TEST SYNZ FLAG_RECEIVED SETS WITHIN 400
(OCTAL) CLOCK TICKS

ERROR REPORT 1S ERROR 36

TEST ALL DATA RECEIVED WITHIN 400 (OCTAL)
CLOCK TICKS

ERROR REPORT IS ERROR 34
TEST ALL DATA RECEIVED IS SAME AS SENT
ERROR REPORT 1S ERROR 23
TEST THAT "ERRCKTM IS NOT SET
ERROR REPORT IS ERROR 25
STEP CLOCK, READ DATA AND TEST SYNC FLAG

RECEIVED SETS WITHIN 400 (OCTAL) CLOCK TICKS

*
4

TEST 63:

ERROR REPORT
STEP CLOCK 2
ERROR REPORT
TEST "ERRCK'*
ERROR REPORT

IS ERROR 22
TICKS AND_TEST
IS ERROR 21
IS NOT SET
IS ERROR 25

"REOM'* IS SET

(ERROR CHECK TEST FOR CCITT=CRC WITH INITIALIZE SET TO O (BOP MODE))
THIS TEST WILL CHECK THE CCITT POLYNOMIAL

(X16 + X12 + X5 +1) WITH A PRESET OF 0.
THERE IS
NO FORCED ERROR CONDITION IN THIS TEST.
THIS TEST PERFORMS THE FOLLOWING SEQUENCE
ISSUE A MASTER CLEAR SEQUENCE
SET CHARACTER LENGTH TO 8 BITS/CHARACTER
SET PROTOCOL TO BOP AND ENABLE CCITT-CRC16
WITH A PRESET OF =1
SET TENA, RENA AND ENABLE INTERNAL SINGLE
STEP, MAINTENANCE CLOCK

SET "“TSOM
w0
STEP CLOCK UNTIL '‘TBMI'* SETS

LOAD ADDRESS WORD (TDB)

CLEAR

‘‘TSOM

STEP CLOCK AND TEST SYNC FLAG RECEIVED

SEQ 0016

CZKMDAO DMS11-DA STATIC MACY11 30A(1052)
CZKMDA.P11
20-0CT= 117:03
*

21-0CT=81

09:21

PAGE 17

SETS WITHIN 400 (OCTAL) CLOCK TICKS
ERRM REPMT IS ERROR 14

§
OUTPUT DATA (ON '‘TBMT'") AND TEST
DA" SETS "WITHIN 400 (OCTAL) CLOCK TICKS
ERROR_REPORT IS ERROR 34

TEST THAT DATA READ IS M AS SENT
ERROR_REPORTIS ERROR

ERROR_REPORT IS ERR

TEST THAT “ERRCK'’ BIT
gs NOT SET

SET *'TEOM'*

STEP CLOCK AND READ RECEIVED DATA WORDS

UNTIL SYNC FLAG RECEIVED SETS

ERROR REPORT IS ERROR 36

ERROR REPORT IS ERROR 34
TEST ALL DATA RECEIVED IS SAME AS SENT
ERROR_REPORT IS ERR
TEST THAT ERRCK" 13NOT SET
ERROR REPORT IS ERROR 25
STEP CLOCK, READ DATA AND TEST SYNC FLAG

.
.

.
TEST 64:

TEST SYNC FLAG RECEIVED SETS WITHIN 400
(OCTAL) CLOCK TICKS

TEST ALL DATA RECEIVED WITHIN 400 (OCTAL)
CLOCK TICKS

RECEIVED SETS WITHIN 400 (OCTAL) CLOCK TICKS
ERROR REPORT IS ERROR 22

STEP CLOCK 2 TICKS AND_TEST

ERROR REPORT IS ERROR 21

"REOM' IS SET

TEST "ERRCK'* IS NOT SET
ERROR REPORT IS ERROR 25

(ERROR CHECK TEST FOR CRC-16 (BOP MODE))
THIS TEST WILL CHECK THAT THE CRC-16 POLYNOMIAL

(X16 + X15 + X2 +1) WILL FUNCTION WITHOUT SETTING

THE ERROR CHECK BIT.

THERE IS NO FORCED ERROR

CONDITION IN THIS TEST.

THIS TEST PERFORMS THE FOLLOWING SEQUENCE

ISSUE A MASTER CLEAR SEQUENCE
SET CHARACTER LENGTH TO 8 BITS/CHARACTER
SET PROTOCOL TO BOP AND ENABLE CCITT-CRC16
WITH A PRESET OF -1
SET TENA, RENA AND ENABLE INTERNAL SINGLE
STEP, MAINTENANCE CLOCK

SET "TSOM'
STEP CLOCK UNTIL ““TBMT'* SETS

LOAD ADDRESS WORD (TDB)

CLEAR ' TSOM

STEP CLOCK AND TEST SYNC FLAG RECEIVED

SETS WITHIN 400 (OCTAL) CLOCK TICKS

ERROR REPORT IS ERROR 14
)
STEP CLOCK, QUTPUT DATA (ON “‘TBMT') AND TEST

ERROR REPORT IS ERROR

ERROR_REPORT
IS ERROR

RDA'*

SETS WITHIN 400
§2CTAL) CLOCK TICKS

TEST THAT DATA READ IS SAME AS SENT

TEST THAT "ERRCK' BIT IS NOT SET
ERROR REPORT IS ERROR 25

SEQ 0017

CZKMDAO DMS11-DA STATIC C
Y11 30A(1052)
CZKMDA.P11
20-0CT-81 17

21-0CT-81

09:21

PAGE 18

SEQ 0018

SET "“TEOM'"

STEP CLOCK AND READ RECEIVED DATA WORDS
UNTIL SYNC FLAG RECEIVED SETS
TEST SYNC FLAG_RECEIVED SETS WITHIN 400
(OCTAL) CLOCK TICKS
ERROR REPORT 1S ERROR 36
TEST ALL DATA RECEIVED WITHIN 400 (OCTAL)
CLOCK TICKS
ERROR REPORT IS ERROR 34
TEST ALL DATA RECEIVED_ IS SAME AS SENT

ERROR_REPORT
1S ERROR
TEST THAT “ERRCKTM IS NOT SET

ERROR REPORT IS ERROR 25
STEP CLOCK,

READ DATA AND TEST SYNC FLAG

RECEIVED SETS WITHIN 400 (OCTAL) CLOCK TICKS

TEST 65:

ERROR REPORT IS ERROR 22
STEP CLOCK 2 TICKS AND_TEST
ERROR REPORT IS ERROR 21
TEST "ERRCK'* IS NOT SET
ERROR REPORT IS ERROR 25

~ ~
"REOM'* IS SET

(ERROR TEST FOR CCITT=CRC WITH INITIALIZE SET TO -1

THIS TEST WILL CHECK THAT THE CCITT POLVNOHI AL

(X16 + X12 + X15 + 1) WITH A PRESET
OF -1

THERE IS NOT FORCED ERROR CONDITION IN THIS TEST.
THIS TEST PERFORMS THE FOLLOWING SEQUENCE

ISSUE A MASTER CLEAR SEQUENCE
SET CHARACTER LENGTH TO 8 BITS/CHARACTER
SET PROTOCOL TO BOP AND ENABLE CCITT=CRC16

WITH A PRESET OF =1

SET TENA, RENA AND ENABLE INTERNAL SINGLE
STEP, MAINTENANCE CLOCK

SET ""TSOM'’
o
STEP CLOCK UNTIL *‘TBMT'* SETS

LOAD ADDRESS WORD (TDB)

CLEAR '‘TSOM

STEP CLOCK AND TEST SYNC FLAG RECEIVED

SETS WITHIN 400 (OCTAL) CLOCK TICKS

ERROR REPORT IS ERROR 14
STEP, CLOCK, OUTPUT DATA (ON “‘TBMT'‘) AND TEST

RDA'SETS WITHIN 400 (OCTAL) CLOCK TICKS
ERROR_REPORS IS ERROR 34
TEST THAT DATA READ 1s SAME AS SENT

ERROR_REPORT
IS ERROR
TEST TWAT ERRCKTM BIT {3 NOT SET
ERROR_REPORT IS ERROR 25

SET_"'TEOM"

STEP CLOCK AND READ RECEIVED DATA WORDS
UNTIL SYNC FLAG RECEIVED SETS

TEST SYNC FLAG RECEIVED SETS WITHIN 400
(OCTAL) CLOCK TICK
S

ERROR REPORT IS ERROR 36

TEST ALL DATA RECEIVED WITHIN 400 (OCTAL)
CLOCK TICKS

ERROR REPORT IS ERROR 34

TEST ALL DATA RECEIVED IS SAME AS SENT

(CCP MODE))

CZKMDAO DMS11-DA STAT “ MCY}‘I 30A(1052)
CZKMDA.P11
17:0
20-0CT~

21-0cT-81

09:21

6
PAGE 19

ERROR_REPORT IS ERROR 23
TEST THAT

"ERRCK’

IS NOT SET

ERROR REPORT IS ERROR 25
STEP CLOCK,

READ DATA AND TEST SYNC FLAG

RECEIVED SETS WITHIN 400

(OCTAL) CLOCK TICKS

ERROR REPORT IS ERROR 22
.
STEP CLOCK ¢ TICKS
AND TEST "REON"
T

ERROR REPORT IS ERROR 24

IS SET

SEQ 0019

CZKMDAO DMS11-DA STATIC?ACV‘H 30A(1052)
7:03
CZKMDA.P11
20-0CT-81
TEST 66:

21-0CT-81

09:21

PAGE 20

(ERROR CHECK TEST FOR CCITT=CRC WITH INITIALIZE SET TO 0 (CCP MODE))
THIS TEST _WILL CHECK THE CCITT POLYNOMIAL

(X16 ¢ X12 + X5 +1) WITH A PRESET OF 0.
NO FORCED ERROR CONDITION IN THIS TEST

THERE IS

THIS TEST PERFORMS THE FOLLOWING SEQUENCE

ISSUE A MASTER CLEAR SEQUENCE
SET CHARACTER LENGTH TO 8 BITS/CHARACTER
SET PROTOCOL _TO BOP AND ENABLE CCITT-CRC16

WITH A PRESET OF -1
SET TENA, RENA AND ENABLE INTERNAL SINGLE
gzgp.%&[smce CLOCK

.
.

STEP CLOCK UNTIL “‘TBMT'* SETS
LOAD ADDRESS WORD (TDB)
CLEAR "“TSOM'"
STEP CLOCK AND TEST SYNC FLAG RECEIVED
SETS WITHIN 400 (OCTAL) CLOCK TICKS
ERROR REPORT IS ERROR 14
.
STEP CLOCK, OUTPUT DATA (ON ‘‘TBMT'") AND TEST
RDA'’ SETS WITHIN 400 (OCTAL) CLOCK TICKS
ERROR_REPORS IS ERROR 34
TEST THAT DATA READ IS SAME AS SENT

ERROR_REPORT IS ERROR 23
TEST THAT 'ERRCKTM BIT IS NOT SET
ERROR REPORT 1S ERROR 25
SET *‘TEOM'"

STEP CLOCK AND READ RECEIVED DATA WORDS
UNTIL SYNC FLAG RECEIVED SETS

ERROR REPORT IS ERROR 36

ERROR REPORT IS ERROR 34

ERROR REPORT 1S ERROR 2
TEST THAT 'ERRCKTM IS NOT SET
ERROR REPORT IS ERROR 25
STEP CLOCK, READ DATA AND TEST SYNC FLAG

B
*
.

*
TEST 67:

TEST SYNC FLAG RECEIVED SETS WITHIN 400
(OCTAL) CLCCK TICKS

TEST ALL DATA RECEIVED WITHIN 400 (OCTAL)
CLOCK TICKS
TEST ALL DATA RECEIVED

IS SAME AS SENT

RECEIVED SETS WITHIN 400 (OCTAL) CLOCK TICKS
ERROR REPORTIS ERROR 22

STEP CLOCK 2 TICKS AND TEST

ERROR REPORT IS ERROR 21
TEST "ERRCK'* IS NOT SET
ERROR REPORT IS ERROR =24

"REOM IS SET

(ERROR CHECK TEST FOR _CRC=16 (CLP MODE).
THIS TEST WILL CHECK THAT THE CRC-16 POLYNOMIAL

(X16 + X15 + X2 +1) WILL FUNCTION WITHOUT SETTING

THE ERROR CHECK BIT.

THERE IS NO FORCED ERROR

CONDITION IN THIS TEST.

SEQ 0020

CZKMDAO DMS11-DA STAT‘C MACY11 30A(1052)
CZKMDA.P11
20-0CT-81 17:03

21-0CT-81

09:21

PAGE 21

2
SEQ 0021

THIS TEST PERFORMS THE FOLLOWING SEQUENCE

ISSUE A WASTER CLEAR SEQUENCE
SET CMARACTER_LENGTH TO 8 BITS/CHARACTER
SET PROTOCOL TO BOP AND ENABLE CCITT-CRC16
WITH A PRESET OF =1
SET TENA, RENA AND ENABLE INTERNAL SINGLE
STEP, MAINTENANCE CLOCK

.
*
*
*

*
.
.

.
*

*
TEST 70:

STEP CLOCK UNTIL “TBMT** SETS
LOAD ADDRESS WORD (TDB)
CLEAR "TSON'"
STEP CLOCK AND TEST SYNC FLAG RECEIVED
SETS WITHIN 400 (OCTAL) CLOCK TICKS
ERROR REPORT IS ERROR 14
STEP. CLOCK, OUTPUT DATA (ON ‘‘TBMT') AND TEST
RDA'* SETS WITHIN 400 (OCTAL) CLOCK TICKS
ERROR_REPORS IS ERROR 34
TEST THAT DATA READ IS gfl AS SENT
ERROR _REPORT IS ERROR 2
TEST THAT "ERRCKTM BIT 58 NOT SET
ERROR REPORT IS ERROR
SET "‘TEOM"'
STEP CLOCK AND READ RECEIVED DATA WORDS
UNTIL SYNC FLAG RECEIVED SETS
TEST SYNC FLAG RECEIVED SETS WITHIN 400
(OCTAL) CLOCK TICKS

ERROR REPORT IS ERROR 36

TEST ALL DATA RECEIVED WITHIN 400 (OCTAL)
CLOCK TICKS
ERROR REPORT IS ERROR 34
TEST ALL DATA RECEIVED IS SAME AS SENT
ERROR_REPORT 1S ERROR
2
TEST THAT "ERRCKTM IS NOT SET

ERROR REPORT IS
ERROR 25
STEP CLOCK, READ DATA AND TEST SYNC FLAG

RECEIVED SETS WITHIN 400 (OCTAL) CLOCK TICKS
ERROR REPORT IS ERROR 22
STEP CLOCK 2 TICKS AND TEST

ERROR REPORT IS E

"REON

IS SET

TEST "ERRCK'' IS NOT SET
ERROR REPORT IS ERROR =24

(CCP MODE ODD PARITY “ERRCHK'® MODE)
THIS TEST WILL CHECK THAT THE ODD PARITY
GENERATION LOGIC (IN USYRT) WILL NOT RAISE

THE

'ERRCHK'' BIT WHEN THE RECEIVER RECEIVES

THE DATA CHARACTER.
THIS TEST EXECUTES IN THE FOLLOWING SEQUENCE.

ISSUE A MASTER CLEAR
SET TRANSMIT AND RECEIVE TO 7 BIT CHARACTER
LENGTH
SET PROTOCOL (CCP) STRIP SYNC AND ODD PARITY
GENERATION AND DETECTION
LOAD SYNC REGISTER (SEC 4) WITH SYNC CHARACTERS (26)
SET TENA, TENA AND INTERNAL SINGLE STEP LOOP

SET "TSOM'* (TRANSMIT START OF MESSAGE)

CZKMDAO DMS11-DA STATIC?9(5}1 30A(1052) 21-0CT-81 09:21 PAGE ZZJ

CZKMDA.P11

20-0CT-81

STEP CLOCK UNTIL “TBMI'* SETS

TEST THAT SYNC FLAG RECEIVED (S/F) SETS

.
.
TEST 71:

WITHIN 400 (OCTAL) CLOCK TICKS
ERROR REPORT IS ERROR 15
CLEAR ‘TSON" BIT
§ ,CLOCK
AND OUTPUT DATA AND MONITOR THAT
ROA" SETS WITHIN 600
(OCTAL) CLOCK T1CKS
ERROR REPORT IS ERROR 34

READ DATA RECEIVED AND VERIFY DATA IS

SAME AS SENT

ERROR_REPORT IS ERROR 23
THE 'ERRCHK'* BIT IS READ AND TESTED FOR
NOT BEING SET

ERROR REPORT IS ERROR 25

(CCP MODE EVEN PARITY "ERRCHK'* MODE)

THIS TEST WILL CHECK THAT THE EVEN PARITY

GENERATION LOGIC (IN USYRT) WILL NOT RAISE THE

(ERRCHK
" BIT WHEN THE RECEIVER RECEIVES THE DATA
THIS TEST EXECUTES IN THE FOLLOWING SEQUENCE.

ISSUE A MASTER CLEAR
SET TRANSNIT AND RECEIVE TO 7 BIT CHARACTER
LENGTH
SET PROTOCOL (CCP) STRIP SYNC AND ODD PARITY
GENERATION AND DETECTION
LOAD SYNC REGISTER (SEC 4) WITH SYNC CHARACTERS (26)
SET TENA, TENA AND INTERAL SINGLE STEP LOOP

SET *‘TSOM'* (TRANSMIT START OF MESSAGE)

STEP CLOCK UNTIL °‘TBMT'' SETS

TEST THAT SYNC FLAG RECEIVED (S/F) SETS
WITHIN 400 (OCTAL) CLOCK TICKS
ERROR REPORT IS ERROR 15

CLEAR

"‘TSOM'’ BIT

RDA'*

SETS WITHIN 400 (OCTAL) CLOCK TICKS

STEP CLOCK AND OUTPUT DATA AND MONITOR THAT

ERROR REPORT IS ERROR 34

ERROR_REPORT IS ERROR 23
THE 'ERRCHK'' BIT IS READ AND TESTED FOR
NOT BEING SET
ERROR REPORT IS ERROR 25

TEST 72:

READ DATA RECEIVED AND VERIFY DATA IS
SAME AS SENT

(TRANSMITTER UNDERRUN_ TEST-BOP MODE)
THIS TEST WILL CHECK THAT A FORCED UNDERRUN

CONDITION WILL SET “‘TSA"* (TRANSMITTER STATUS
AVAILABLE) “‘TERRTM'
(TRANSMITTER ERROR) AND
THAT THE RECEIVER WILL SET THE "RXAB"
(RECEIVER ABORT)
THIS TEST EXECUTES IN THE FOLLOWING SEQUENCE

ISSUE A MASTER CLEAR SEQUENCE
SET CHARACTER LENGTH TO 8 BITS
SET PROTOCOL TO BOP
SET TENA, RENA AND INTERNAL SINGLE STEP MAINT CLOCK

SET "TSOM'' (TRANSMIT START OF MESSAGE)

SEQ 0022

CZKMDAO DMS11-DA STATIC C
A ;1 30A(1052)
CZKMDA.P11
20-0CT-81

21-0CT-81

09:21

PAGE 23

STEP CLOCK UNTIL “TBMT'* SETS
LOAD AN _ADDRESS CHARACTER
CLEAR “TSOM'* BIT
sl
STEP CLOCK AND OUTPUT DATA (ON “‘TBMT* SET)
UNTIL SYNC FLAG RECEIVED (S/F) SETS
.

TEST SYNC FLAG RECEIVED SETS WITHIN 400
(OCTAL) CLOCK TICKS

ERROR REPORT 1S ERROR 14
o
STEP CLOCK AND OUTPUT DATA UNTIL *RDA
(RECEIVE DATA AVAILABLE)

.
.

.
NOTE:

TEST 73:

SETS

TEST "RDA’ SETS WITHIN 400 (OCTAL)
CLOCK TICKS

ERROR REPORT IS ERROR 34

STEP CLOCK AND READ DATA BUFFER WHEN
‘RDA’* SETS UNTIL °'‘TSA'" (TRANSMIT STATUS AVAILABLE)
SETS
TEST "TSA'' SETS WITHIN 400 (OCTAL) CLOCK TICKS
ERROR, REPORT IS ERROR 36
TEST *“TERR'
(TRANSMIT ERROR (SEC 3-7) IS SET
ERROR REPORT 1S ERROR 26
STEP CLOCK AND READ RECEIVE DATA BUFFER
WHEN "RDA* SETS AND TEST "RXAB' (RECEIVER
ABORT) SETS WITHIN 400 (OCTAL) CLOCK TICKS
ERROR REPORT IS ERROR 27
THE 'RXAB" (177) IS GENERATED BY THE USYRT
TRANSHITTER LOGIC ON AN UNDERRUN CONDITION

(TRANSMITTER UNDERRUN_TEST FOR CCP MODE)
THIS TEST WILL CHECK THAT A FORCED UNDERRUN

CONDITION WILL SET “‘TSA'* (TRANSMITTER STATUS

AVAILABLE) "TERRTM
(TRANSMITTER ERROR) THEN CONTINUE
STEPPING THE CLOCK UNTIL A SYNC FLAG IS RECEIVED
INDICATING THE TRANSMITTER SENT SYNC CHARACTERS

(SECONDARY REG 4).
WHEN THE UNDERRUN CONDITION OCCURRED
THIS TEST EXECUTES IN THE FOLLOWING SEGUENCE

ISSUE A MASTER CLEAR SEQUENCE
SET CHARACTER LENGTH TO 8 BITS
SET PROTOCOL TO CCP
LOAD SYNC REGISTER WITH SYNC CHARACTER (26)
SET TENA, RENA AND ENABLE INTERNAL SINGLE
STEP, MAINTENANCE CLOCK

SET "“TSOM'"
STEP MAINT. CLOCK UNTIL *‘TBMT'* SETS
LOAD TRANSMIT DATA BUFFER WITH AN STX (2)
STEP CLOCK AND OUTPUT DATA AND TEST SYNC

FLAG RECEIVED (S/F) SETS WITHIN 400 (OCTAL
CLOCK TICKS
ERROR REPORT, IS ERROR 15

CLEAR ‘TSOM'’

STEP. CLOCK AND QUTPUT DATA AND TEST

RDA'* SETS WITHIN 400
(OCTAL) CLOCK TICKS
ERROR REPORT IS ERROR 34
STEP (LOCK, READ RECEIVE DATA BUFFER
WHEN "RDA'“SETS UNTIL “TSA'
SETS
TEST THAT *“TSATM SETS WITHIN 400
(OCTAL)

SEQ 0023

————

CZKMDAO DMS11-DA STATICH;C‘V);l 30A(1052) 21-0CT-81 09:21 PAGE 26L

CZKMDA.P11

20-0CT-81

CLOCK TICKS

ERROR _REPORT IS ERROR 36
TEST THAT °'‘TERR'® (TRANSMITTER ERROR) IS SET
ERROR REPORT IS ERROR 26

STEP CLOCK AND TEST SYNC FLAG RECEIVED SETS
WITHIN 400 (OCTAL) CLOCK
T
ERROR REPORT IS ERROR 28

*
TEST 74:

SEQ 0024

"(RECEIVER OVERRUN TEST FOR CCP MODE)

THIS TEST WILL FORCE A RECEIVER OVERRUN CONDITION

BY NOT READING THE SECOND DATA CHARACTER RECEIVED.

THE "ROR’* BIT IS READ (SECONDARY REG. 1-BIT

AND CHECKED FOR BEING CLEAR (RESULT OF
ORIGINAL READING).

THIS TEST EXECUTES THE FOLLOWING SEQUENCE

ISSUE ‘A MASTER CLEAR SEQUENCE
SET CHARACTER LENGTH TO 8 BITS
SET PROTOCOL TO CCP
LOAD SYNC ADDRESS REGISTER WITH SYNC (26)
SET TENA, RENA AND ENABLE INTERAL SINGLE
STEP, HAINTENMCE CLOCK
SET "‘TSOM'’
STEP CLOCK 9 TICKS
CLEAR ‘‘TSOM'’
LOAD DATA REGISTER WITH CHARACTER (SOH=1)
STEP CLOCK 16 TICKS
LOAD FIRST DATA CHARACTER
STEP CLOCK 8 TICKS
LOAD 2ND DATA CHARACTER
STEP CLOCK 8 TICKS
LOAD 3RD DATA CHARACTER
STEP CLOCK 8 TICKS
READ RECEIVE DATA BUFFER

LOAD 4TH DATA CHARACTER
STEP CLOCK 16 TICKS (FORCE RECEIVER OVERRUN)
TEST THAT 'ROR''
IS NOW_SET
ERROR REPORT IS ERROR 29
READ "ROR'* 2ND TIME AND TEST BIT
IS CLEAR
ERROR REPORT IS ERROR 30

.
.

TEST 75:

(RECEIVER OVERRUN TEST FOR BOP MODE)
THIS TEST WILL FORCE A RECEIVER OVERRUN CONDITION BY

NOT

REACING THE SECOND DATA CHARACTER RE EIVED.
THE
'noa BIT IS READ (SECONDARY REG. 1-BIT
3)
AND CHECKED BOR BEING SET.
THE BIT IS THEN REREAD
NE‘ADE":GESIKED FOR BEING CLEAR (RESULT OF ORIGINAL

THIS TEST EXECUTES THE FOLLOWING SEQUENCE

ISSUE A MASTER CLEAR SEQUENCE
SET CHARACTER LENGTH TO 8 BITS
. SET PROTOCOL TO BOP AND ENABLE SECONDARY ADDRESS
MODE
.

LOAD SYNC REGISTER (SECONDARY 4) WITH A 376.
SET TENA, RENA AND ENABLE INTERNAL SINGLE
STEP MAINTENANCE CLOCK.

CZKMDAO DMS11-DA STATIC CV11 30A(1052)
CZKMDA.P11
20-0CT= 117 :03

21-0CT-81

SET*

09:21

PAGE 25

CLEAR L on?
STEP CLOCK

2 TICKS

CAD TRANSMIT DATA BUFFER WITH SECONDARY
ADDRESS (376)
STEP CLOCK 14 TICKS
LOAD DATA
BUFFER WITH CONTROL CHARACTER (0)
STEP CLOCK 8 TICKS
LOAD 1ST DATA CHARACTER
STEP CLOCK 8 TICKS
LOAD 2ND DATA CHARACTER
STEP LOCK 0 TICKS
LOAD
3RD DAT CHARACTER
STEP CLOCK 8 TICKS

READ RECEIVE DATA BUFFER

LOAD 4TH DATA CHARACTER
STEP CLOCK 16 TICKS (FORCE RECEIVER OVERRUN)
TEST "ROR 81
SET.
ERROR REPORT
IS ERROR “29
REREAD THE m BIT AND TEST THAT BIT
WAS CLEARED AND INITIAL READ.
L

TEST 76:

ERROR REPORT IS ERROR 30

(TRANSMIT ABORT AND RECEIVE ABORT TEST)

THIS TEST WILL CHECK THAT A °‘‘TXAB'' (TRANSMITTER
ABORT) WILL TRANSMIT AN ABORT CHARACTER
AND THE USYRT RECEIVE LOGIC WILL SET THE ‘RXAB'’
(RECEIVE ABORT) BIT WHEN THE CHARACTER IS
CLOCKED INTO THE RECEIVER.
THIS TEST EXECUTES THE FOLLOWING SEQUENCE

ISSUE A MASTER CLEAR SEQUENCE
SET PROTOCOL TO BOP AND ENABLE SECONDARY
ADDRESS MODE
LOAD_SECONDARY ADDRESS REGISTER WITH A 376
SET TENA, TENA AND ENABLE INTERNAL SINGLE
STEP, CLOCK

CLEAR FTSOM

URITE TRANSMIT DATA

BUFFER WITH SECONDARY

ADDRESS CHARACTER(376)
STEP CLOCK 14 TICKS TO SYNC THE RECEIVE LOGIC

WRITE TRANSMIT DATA BUFFER WITH CONTROL

CHARACTER (0)

STEP CLOCK 8 TICKS TO TRANSMIT OUT THE

CONTROL cuARA§ ER
TRANSMI T

PATA_CHARACTERS

(10)

STEP CLOCK 8ICK

READ RECEIVE

DATA BUFFER (SECONDARY ADDRESS)

READ RECEIVE

DATA BUFFER (1ST DATA CHARACTER)

STEP CLOCK 8 TICKS

STEP CLOCK9 TICKS (TRANSMIT IN ABORT CHARACTER)
READ “RXAB'' AND TEST FOR
BEING SET
ERROR REPORT IS ERROR
31

SEQ 0025

DA
CACY"
H
CZKMDAO DMS11-STA.‘
CZKMDA.P11

30A(1052)

21-0CT-81

09:21

PAGE 26

SEQ 0026

!EST (BOP MODE))
Y SETTING
LOGIC

TEST 77:

TING “RXGA"’

(RECEIVE GO AME

THIS TEST WILL EXECUTG THE FOLLOWING SEQUENCE
ISSUE A MASTER CLEM SEQUENCE
SET PROTOCOL TO BOP AND ENABLE LOOP MODE
SET TENA, RENA AND ENABLE INTERNAL SINGLE

STEP%&JIEWCE CLOCK
SET

STEP CLOCK 2 TICKS

CLEAR SO

GRITE TRANSMIT DATA BUFFER WITH FIRST
DATA CHARACTER (101)
STEP_CLOCK 14 TICKS (SYNC LOGIC AND XMIT
FIRST_CHARACTER)

LOAD 2ND DATA CHARACTER (101)
STEP

L0AD

CLOCK 8 T

SRD DATA CHARACTER (101)

STEP CLOCK 8 TICKS

SET "TEOM'* AND "“TXGA"
STEP (CLOCK 8 TICKS (SEND CRC #1)
READ DATA REGISTER (ADDRESS:LM=1(BOP))
STEP CLOCK 8 TICKS (SEND CRC #2)
READ DATA REGISTER (1ST DATA CHARACTER)
STEP CLOCK 8 TICKS

.
TEST 100:

READ DATA aesxsren (2ND DATA CHARACTER)
9 TICKS
STEP CLOCK
TEST THAT 'RXGATM IS NOW SET
ERROR REPORT IS ERROR 32

(EXTERNAL DATA LOOP TEST)
THIS TEST CHECKS THAT THE EXTERNAL DATA LOOP
AND CLOCK PATH 1S FUNCTIONAL (EXTERNAL DRIVERS
AND RECEIVERS) ~THE TEST WILL TRANSMIT AND
RECEIVE A WALKING ONES DATA PATTERN (1 TO 200)
THIS TEST WILL EXECUTE ONLY IF THE OPERATOR
WAS ENABLED THE EXTERNAL TEST (CONFIGURATION)
THIS TEST WILL EXECUTE THE FOLLOWING SEQUENCE
ISSUE MASTER CLEAR SEQUENCE
SET PROTOCOL TO BOP
SET TENA, RENA AND ENABLE EXTERNAL SINGLE

STEP, MAINTENANCE CLOCK

2 TICKS
(LOCK
STEP
FTSON" DATA BUFFER _(CURRENT DATA PATTERN)
ELEAR TRANSMIT

CGAD

TEP CLOCK AND TEST

*
.

CLOCK TICKS

''TBMT'*

ERROR REPORT IS ERROR 13

SETS WITHIN

TEP CLOCK AND TEST 'RDA'" SETS WITHIN
CLOCK TICKS
42
ERROR REPORT IS ERROR
READ RECEIVE DATA BUFFER AND TEST

CZKMDAO DMS11-DA STATICH9C5§1 30A(1052)
CZKMDA.P11
20-0CT-81
*
TEST 101:

21-0CT-81

09:21

8
PAGE 27

DATA CHARACTER IS SAME _AS SENT

ERROR REPORT IS ERROR 23

(CRC=32 TRANSMITTER ERROR CHECK TEST)

THIS TEST WILL CHECK THAT THE TRANSMITTER

CHECK ERROR FLAG (PRI14-BIT

2) WILL SET BY

TRANSMITTING A DATA MESSAGE WITH TRANSMIT CHECK MODE

ENABLED AND AN ILLEGAL CRC-32 CODE APPENDED TO THE
DATA MESSAGE.

THE DATA WORD TRANSMITTED IS A BYTE OF ALL ZEROS

AND THE APPENDED 32 BIT CRC IS
A_1

THIS TEST EXECUTES ONLY IF EXT. TESTS ARE CONFIGURED
THIS TEST WILL EXECUTE THE FOLLOWING SEQUENCE

ISSUE A MASTER CLEAR SEQUENCE
SET PROTOCOL TO BOP AND DISABLE USYRT ERROR
CHECK_FUNCTIONS

ENABLE CRC=32 TRANSMIT CHECK MODE (PRI13-BIT 5)
.

TEST THAT BITS 1 & 2 OF PRIMARY REGISTER 14
ARE NOT SET.
ERROR REPORT 1S ERROR 38

SET TENA, RENA,

ENABLE CRC-32 (CHECK MODE)

AND ENAgh; EXTERNAL SINGLE STEP MAINT. CLOCK
SET TS
STEP CLOCK 2 TICKS
*
CLEAR
SEGUENCE 70 TRANSMIT THE DATA BYTE
AND 2 CRC BYTES, STEPPINGCLOCK 8 TICKS

TEST 102:

FOR EACH AND TESTING “TBMTTM SET

ERROR_REPORT IS ERROR 13
SET "“TEOM'*
STEP CLOCK 17 17 TICKS
.
TEST "TCRCE'*
IS SET AND 'RCRCE' IS CLEAR
ERROR REPORT IS ERROR 38
FIRST TIME THROUGH TEST CHECK ‘‘TCRCE'’
CLEARS BY WRITING THE BIT WITH A ONE.

ERROR REPORT IS ERROR 38
SECOND TIME THROUGH TEST CHECK *‘TCRCE"

ERROR REPORT IS ERROR 38

CLEARS BY ISSUING A LINE RESET.

(CRC-32 RECEIVER ERROR CHECK TEST)

THIS TEST WILL CHECK THAT RECEIVE CHECK

ERROR FLAG (PRIT4=BIT 1) WILL SET BY TRANSMITTING

A MESSAGE (1 BYTE=1) WITH AN APPENDED CRC-32

CODE (32

BITS=0) AND THE CRC LOGIC PLACED IN

CHECK_MODE (NON-GENERATE).

THIS TEST WILL EXECUTE ONLY IF EXTERNAL TEST ARE

ENABLED (CONF IGURATION)
THIS TEST WILL EXECUTE THE FOLLOWING SEQUENCE
ISSUE A MASTER CLEAR SEQUENCE

SET PROTOCOL TO BOP AND DISABLE USYRT
ERROR CHECK_FUNCTIONS
TEST THAT ““TCRCE'‘ AND *RCRCE'* ARE NOT SET

ERROR REPORT IS ERROR 38

SET TENA,

RENA AND ENABLE CRC-32

AND EXTERNAL SINGLE STEP MAINTENANCE CLOCK.

SEQ 0027

CZKMDAO DMS11-DA STATIC C
i5;1 30A(1052)
CZKMDA.P11
20-0CT-81

.
*
.
TEST 103:

21-0CT-81

09:21

PAGE 28

SET *“TSOM"*
STEP CLOCK 2TICKS
CLEAR “'TS
TRANSMIT THE DATA_CHARACTER AND 4 CRC-32
BYTES, TESTING, AFTER EACH CHARACTER CLOCKED
OUT THAT "“TBMT'* IS
SET
ERROR REPORT IS ERROR 13
SET '‘TEOM'"
CLOCK IN 4 CHARACTERS (READ DATA REG. AFTER
EACH CHARACTER RECEIVED)
TEST "RCRCE'*
(PRIT4=BIT 1) IS SET
ERROR REPORT IS ERROR 38
il
FIRST TIME THROUGH TEST CHECK ‘RCRCE
1S CLEANED BY WRITING THE BIT WITH A ONE

ERROR REPORT IS ERROR 38
Mt
SECOND TIME THROUGH TEST CHECK “‘TCRCE
IS CLEANED BY ISSUING A LINE RESET.
ERROR REPORT IS ERROR 38

(CRC=32 NON-ERROR TRANSMIT § RECEIVE TEST)

THIS TEST WILL CHECK A NON-ERROR CRC RECEIVE
CHECK AND NON-ERROR TRANSMIT CHECK BY TRANSMITTING
A DATA STREAM (NON-GENERATE) WITH A PRECALCULATED

CRC-32 APPENDED.

THE DATA STREAM CONSISTS OF

WALKING A ONE ACCROSS 16 BITS (1 TO 100000).
THIS TEST EXECUTES ONLY OF THE EXTERNAL DATA TESTS
ARE ENABLED (CONFIGURATION)
THIS TEST EXECUTES THE FOLLOWING SEQUENCE

ISSUE A MASTER CLEAR SEQUENCE
SET PROTOCOL TO BOP AND DISABLE USYRT
ERROR_CHE CKING
SET CRC-32 TO TRANSMIT CHECK MODE
SET TENA, RENA AND ENABLE CRC-32 AND
EXTERNAL SINGLE STEP MAINTENANCE CLOCK
TEST THAT "TCRCE'* AND 'RCRCE'* ARE NOT SET
ERROR_REPORT 1S ERROR 38

SET "“TSOM'*

STEP CLOCK2 TICKS

SEQUENCE TO OUTPUT AND RECEIVE THE DATA AND

=32 CHARACTERS MONITORING THAT THE CHARACTERS

RECEIVE VITHIN 11 CLOCK TICKS
ERROR REPORT
IS ERROR

TEST THAT TCRCETM AND -RCRCE' ARE NOT SET
ERROR REPORT 1S ERROR 39
?Sgig; TEST FOR EACH DATA VALUE AND CALCULATED

TEST 104:

(CRC-32 TRANSMIT GENERATE_TEST)

THIS TEST WILL CHECK CRC-32 YRANSHIT GENERATE BY
TRANSMITTING A ONE WORD BUFFER OF
A WALKING ONE
(1 TO 100000) DATA PATTERN AND CHECKING THE

RECEIVED CRC32 DATA.

THIS TEST WILL EXECUTE ONLY IF EXTERNAL TESTS

SEQ 0028

CZKMDAO DMS11-DA STAT C MACY11 30A(1052)
CZKMDA.P1
20-0CT-81
17:03

21-0CT-81

09:21

D
PAGE 29

ARE ENABLED (CONFIGURATION)

THIS TEST WILL EXECUTE THE FOLLOWING SEQUENCE

ISSUE
A MASTER CLEAR SEQUENCE
SE;I%TOCOL TO BOP AND DISABLE USYRT ERROR

SET TENA,

RENA, ENABLE cnc-sz AND EXTERNAL

SINGLE STEP MAINTENANCE CLOC

SET_TRANSMIT GENEQATE MODE
TEST *‘TRCRE
RCRCE'* ARE NOT SET
egahoaszpar 1s ERROR 39

STEP
CLOCK
2 TICKS
SEGUENCE TO

QUTPUT 2 DATA CHARACTERS

AND RECEIVE 2 DATA CHARACTERS AND
4 CRC BYTES (SETTING AND CLEARING
'TEOM'* AT_APPROPRIATE TIMES) AND MONITORING
NOT MORE THAN 11 CLOCKS TICKS ARE REQUIRED

*
*

FOR EACH CHARACTER

ERROR _REPORT IS ERROR 41
TEST THAT GENERATED CRC=32 IS SAME AS CALCULATED
ERROR REPORT IS ERROR 40
REPEAT TEST FOR EACH DATA VALUE.

SEQ 0029

CZKMDAO DMS11-DA STAT C HACH‘I 30A(1052)
CZKMDA.P11
20-0CT-81
17:03
AR AR AR AR

ddda ittt

21-0CT-81

09:21

PAGE 30

S£@ 0030

ittt ididiiiiiitiiidiiiaiiitiitisiiissds

THE FOLLOWING ARE THE ASSOCIATED ERRORS (NUMBERED)
AND THEIR DATA HEADER STATEMENTS.

ERROR1 :PRIMARY REGISTER ERROR
ERROR2:FLOATING ONE'S ERROR
ERROR3: SECONDARY REGISTER READ ERROR
ERRORG
: THE FOLLOWING READ ONLY BIT CAN BE WRITTEN
ERRORS
: TRANSMIT STATUS REGISTER BIT FAILURE
ERRORS:MODE CONTROL REGISTER BIT FAILURE
ERROR?: CHARACTER LENGTH REGISTER BIT FAILURE
ERRORS: TRANSMIT STATUS REGISTER BIT FAILED TO CLEAR AFTER LINE RESET
ERROR9:MODE CONTROL REGISTER BIT FAILED TO CLEAR AFTER LINE RESET
ERROR10: SECONDARY INCREMENT ONE'S TEST FAILURE
ERROR11:SECONDARY REGISTER DID NOT CLEAR AFTER LINE RESET
ERROR12: TBMT NOT RESET AFTER TSOM SET WITH TENA SET
ERROR13:TBMT FAILED TO SET
ERROR1%:S/F DID NOT SET AFTER FLAG SENT
ERROR15:S/F DID NOT SET AFTER SYNC SENT
ERROR16:S/F DID NOT RESET
ERROR17:RAC FAILED TO SET AFTER 3 DATA BYTES TRANSMITTED
ERROR18:RDA FAILED TO SET AFTER 3 DATA BYTES TRANSFERED
ERROR19:RSOM FAILED TO SET
ERROR20:F IRST DATA BYTE TRANSMITTED IN ERROR
ERROR1:REOM FAILED TO SET AFTER TEOM SET
ERRORZ2:LINE FAILED TO RESYNC AFTER TEOM SET WITH IDLE RESET
ERROR23:DATA TRANSMITTED INCORRECTLY
ERRORZ% :ERROR CHECK BIT FAILED TO SET
ERROR2S :ERROR CHECK BIT SET AND SHOULD NOT HAVE
ERROR26:NO TRANSMIT ERROR ON A FORCE UNDERRUN
ERRORZ7:NO ABORT INDICATIONS RECEIVED ON A FORCE UNDERRUN
ERROR28:L INE DID NOT RESYNCE ON A FORCE UNDERR
ERROR29:RECE IVER OVERRON DID NOT SET ON A FORCEOVERRUN
ERROR30:RECEIVER OVERRUN DID NOT RESET AFTER STAUS READ
ERROR31:NO RECEIVE ABORT ON A TRANSMIT OF A ABORT
ERROR32:NO RECEIVE GO AHEAD ON A TRANSMIT OF GO AMEAD
ERROR33:DEVICE IS STILL TRYING TO SYNC
ERROR34:THE KMC11 IS HUNG
ERROR3S:NO S/F AFTER TEOM WAS SET
ERROR3:S/F SET BEFORE LAST DATA BYTE RECEIVED

ERROR37

D NOT SET ON A TRANSMIT UNDERRUN

ERROR3S: CRC~52
ERROR STATUS BITS (PR14-162)
ERROR39: CRC-32 TRANSFER CAUSED STATUS ERROR
ERROR40: CRC-32 GENERATED IS NOT CORRECT
ERROR41: TRANSFER INCOMPLETE
ERROR42:"RDATM* FAILED TO SET ON DATA TRANSFER

THE FOLLOWING FOUR FIELDS ARE PESENT IN EVERY ERROR MESSAGE.

TEST
(OCTAL # OF FAILING TEST)

PC
(PROGRAM ADDR. OF ERROR)

KMC11
(1-16) # OF CONFIGURED UNIT)

LINE
(# OF FAILING LINE

THE FOLLOWING DESCRIBES THE OTHER POTENTIAL DATA AND STATUS FIELDS OF THE ERROR REPORTS.

(0-7)

CZKMDAO DMS11-DA STATIC MACY] 1 30A(1052)

CZKMDA.P11

20-0CT-81 17:03

21-0CT-81

09:21

PAGE 31

REG = NUMBER OF FAILING REGISTER AS ADDRESSED BY KMC11.
EXP = VAUE OF EXPECTED DATA OR STATUS
REC = VALUE OF RECEIVED OR READ DATA OR STATUS

PRI12 = CONTENTS OF PRIMARY REGISTER 12

CRC=HI = HI ORDER 16 BITS OF CALCULATED CRC-32
CRC=LO = LOW ORDER 16 BITS OF CALCULATED CRC-32
PRIT4 = VALUE OF PRIT4 (LINE UNIT STATUS)
PRIT4(SHBE) = STATUS VALUE THAT PRIMARY REG 14 SHOULD BE

SHBE-HI = CALCULATED HIGH ORDER 16 BITS OF CRC-32
SHBE-LO = CALCULATED LOW ORDER 16 BITS OF CRC-32
WAS-HI = RECEIVER HIGH ORDER 16 BITS OF CRC-32
WAS-LO = RECEIVED LOW ORDER 16 BITS OF CRC-32
DATA = DATA WORD TRANSMITTED

8.0
%

DIAGNOSTIC LISTING

3
SEQ 0031

CZKMDAO OHSH-gA ST?T‘% ?9(5;1 30A(1052) 21-0CT-81 09:21 PAGE 32G ’

CZKMDA.P11

16%

1624

1625

.ENABL
«NLIST

ABS,AMA
MD,MC,CND

.LIST

LIST

SEQ,LOC.BIN

SEQ 0032

CZKMDAO ?HS11-SA
SIAT&?
HACV11 30A(1052) 21-0CT-81 09:21 PAGE 33

B e¥

CZKMDA.P11

631

SARARARAAAAAARAAAAAARAEAAAAAAAAAAAAAAAAAAAAARARORAAAAAROAOY

START OF STATIC TEST LISTING

Qttlt.'t....t.tt.t..."""'it".'tt.l't.'t.....'.'.......

SEQ 0033

CZKMDAO DMS11-DA STAT ¢ MAC Y1 1 30A(1052)
CZKMDA.P11
20-0CT~ 1 17 :03
1632

21-0CT-81

09:21

PAGE 34

SEQ 0034

CZKMDAO

czmA.rfis
1633

1635

11-gA STATIC

MACY11 30A(1052)

T-H 17:03

21-0CT-81

09:21

PAGE 35

3
SEQ 0035

C2 KMDAQ DMS 11=DA STATIC
CZKMDA PN

-SO-OCT-‘s 17:0; -

6
6
6

MACYI

(1052)

21-0CT-81

09:21

3
SEQ 0036

CZKMDAO DMS11=DA STATIC MACY1 1 30A(1052)
CZKMDA.P11
20-0CT-81 17:03

21-0CT-81

09:21

PAGE 37

3
SEQ 0037

1640
1641

.LIST
.ENABL

164
1644
1645

JLIST ME
JTITLE CZKMDAO DMS11=DA STATIC
;*«COPYRIGHT (C) 1981

}&a

s*MAYNARD, MASS. 01754

w.g

CNLIST

w.g

SEQ,LOC.BIN
ABS,AMA

MC,MD,CND

:«DIGITAL EQUIPMENT gonp.

}ggg

:*PROGRAM BY RAY BALDWIN/R. J. COLLINS

1651

;*THIS PROGRAM WAS ASSEMBLED

}ggg

1654
1655

- %

000001
160000

$TN=1
$SWR=160000

1659
1660

001100

STACK= 1100
LEQUIV EMT,ERROR

1663
1664
1665
1666
1667
1668
1669

000011
000012
000015
000200
177776

1671

177772

PIRG=

177570

DDISP=

}229

1658

}gg;

177774

167,

177570

1675

1676
1677
1678

.SBTTL

000000
000001
00000

]OT,SCOPE

;:STACK LIMIT REGISTER

DSWR=

: ;MARDWARE SWITCH REGISTER

177772

177570
177570

R7=

}us

00000

PC=

1688
1689
1690
1691
169§

000000
000040
000100
000140
000200

PRO=
PR1=
miz
PR3=
PR& =

16‘39
169
1694
1695

ooog«o
000300
000340

R3=
R&=
RS=

20
4]
1

00000

000009

: :PROGRAM INTERRUPT REQUEST REGISTER

: :HARDWARE DISPLAY REGISTER

:*GENERAL PURPOSE REGISTER DEFINITIONS

RO=
R1=
aiz

168

1684

::BASIC DEFINITION OF SCOPE CALL

STKLMT= 177774

00000
000004
000005

ooooog

;:BASIC DEFINITION OF ERROR CALL

;*MISCELLANEOUS DEF INITIONS
HT=
11
:;CODE FOR HORIZONTAL TA8
LF=
12
::CODE FOR LINE FEED
CR=
15
::CODE FOR CARRIAGE RETURN
CRLF= 200
:;CODE FOR CARRIAGE RETURN-LINE FEED
PS=
177776
::PROCESSOR STATUS WORD
.EQUIV PS,PSW

1679
1680
1681
mg

::HALT ON ERROR, LOOP ON TEST. INMIBIT ERROR TYPOUT

BASIC DEFINITIONS

;*INITIAL ADDRESS OF THE STACK POINTER s#% 1100 »##

.EQUIV

1670
}g;‘

USING THE PDP=11 MAINDEC SYSMAC

+*PACKAGE (MAINDEC=-11-DZQAC=CS), JAN, 1981.

ag:

SP=

%
2%
15

: ;GENERAL REGISTER
: :GENERAL REGISTER
: :GENERAL REGISTER

::GENEPAL REGISTER
::GENF AL REGISTE
::GENM AL REGISTER
::GE' RAL REGISTER

::GE £RAL REGISTER

2:STACK POINTER

: :PROGRAM COUNTER

«PRIORITY LEVEL DEFINITIONS

PRS=
pag:
PR7=

0
40
100
140
°8

A
00
40

::PRIORITY LEVEL 0
::PRIORITY LEVEL 1
::PRIORITY LEVEL g
::PRIORITY LEVEL
S:PRIORITY LEVEL 4

::PRIORITY LEVEL S
::PRIORITY LEVEL 9
S:PRIORITY LEVEL

JE e B

e e

e T

e R

- OV

(DD

Mmoo @

ggssssoses
g
388

e o B

e e R e

PR S

e e

e I Jr

e e

—

SWié=
SW13=
Swi2=
SWil=
SW10=
20098

—

QT |

oSt

8832022

SEEEESEEE]

s QNS

nnnuwunnunn

—

W
S8 O =20
c«K<<< 8SSERs2
N Hhunn " n

o
c

(.21 n a1 p s [ Y SISy NSy iy Ny NSy Wiy Wy Wy iy iy iy vy —

OOOO%O

YR S

698

IR JOS S

SIRRNRUKIES ONOWVESWN=2O
VO NOWNSWN=O

16
169

o : siiiss

NV WN=OO

NNNNNNNNNNNNNNNNNYY

e I

NNNNNNNNNNNNNNNNNNNNNNNSN
wViun EESEEENNNEW

CZKMDAO DMS11-DA STAI‘C MACY11 30A(1052) 21-0CT-81 09:21
CZKMDA.P11
20-0CT 1 17:03
BASIC DEFINITIONS

§u13=" " 100000

;*"'SWITCH

40000
20000
10000
4000

SW05=

n3
PAGE 38

SEQ 0038

pui

RERSFrro

- sasssmenees
&~

%g
—

—

x
>

p—y

—

33
58
W

v
v

3 3253
EES
A

D e

D d e

NNNNNVNNNNNNYNNNY

e =D

TM~

1 30A(1052)

21-0C7-81 09:21
BASIC DEFINITIONS

PAGE 39

SEQ 0039

s*BASIC "CPU" TRAP VfCYfl ?DDRESSES
IME

TBITVEC=14
TRTVEC= 14

BPTVEC= 14
10TVEC= 20
PWRVEC=
EMTVEC=

TRAPVE(C=34
TKVEC= 60
TPVEC= 64
PIRQVE(C=240
$SWR=163400
$TN=1
$N=1

OUT AND OTHER ERRORS

..RE;E:VED AND ILLEGAL INSTRUCTIONS
::TRACE TRAP

: ;BREAKPOINT TRAP (BPT)
..INPUTIOUTFUT TRAP (IOT) ««SCOPE++
FAIL

..EHULATOR TRAP (EMT) *+ERROR+**
‘TRAP'' TRAP
::TTY KEYBOARD VECTOR
::TTY PRINTER VECTOR

; ;PROGRAM INTERRUPT REQUEST VECTOR

CZKMDAO DMS11-DA S'AT C MACY11 30° (1052)
21-0(7-81 09:21
CZKMDA.P1
20-C7-81 17:03
RAP CATCHER
1798
17

.SBTTL

1771

100000

177
177

8
PAGE 40

SEQ 0040

TRAP CATCHER

'AL;.. WSED LOCATIONS OF THE VECTOR AREA CONTAIN
.42, 10T SEQUENCE TO CATCH AND PROCESS ILLEGAL

1774
1775

'TRAPS AND INTERRUPTS THAT MIGHT OCCUR.
:*THE 10T TRAP WHICH IS TAKEN ON THE ILLEGAL TRAP/INT

177

:*TRAPS TO THE $SCOPE ROUTINE WHICH (IF THE RETURN PC IS

177

:*LESS THAN 1002) JUMPS TO THE SERROR ROUTINE.

1778

;#THE SERROR ROUTINE WILL REPORT THE ERROR AS FOLLOWS:

1781
1782
1783

*UHERE XXX=LOCATION OF ILLEGAL TRAP
YYYYVY=PC AT TIME OF TRAP
'NOTE IF THE PROCESSOR IS NOT AN 11/05 THE PROGRAM

1779
1780

o
PC=YYYYYY UNEXPECTED TRAP TO XXX
;*AND RETURN TO THE PROGRAM AT PC=YYYYYY+2

};gg

1786

]';gg
1789

CAN BE STARTED AT ADDRESS 0 AS WELL AS ADDRESS 200.

000000

$40CAT: HALT

000002

000737

}773(1)

000006

000004

002004

.WORD

1792
1793

000174
000176

000000
000000

DISPREG:.WORD
SWREG:
.WORD

1795

000200

000137

1794

888.'15;2

.UO;I‘)

002004

.SBTTL

.=100

::mg? TO 177700 & TIME OUT (NOT ON

.START

::VECTOR TO STARTING ADDRESS

0
0

;s SOFTWARE DISPLAY REGISTER
:SOFTWARE SWITCH REGISTER

ax.STA

::G0 TO START OF PROGRAM

340

STARTING ADDRES(ES)

JMP

ssHALT

;;WITH PRIORITY LEVEL 7

CZKMDAO DMS11-DA STATIC MACY11 30A(1052)
21-0CT-81
| CZKMDA.P11
20-0CT- 117 :03
COMMON TAGS

1797

09:21

.SBTTL

1798
1799
1800
1801

s AR AR AR R AR AN AR

SEQ 0041

AR AT AR

AR AARAAAAAAAAAAAAAAAAAAAARARARRO
RS

s*THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS

s*USED IN THE PROGRAM.

000000
000000
000000
000000
000000
000000
000
000

$PASS: .WORD

$STSTNM:

.BYTE

$AUTOB: .BYTE
$INTAG:

.BYTE

STKB:
$TPS:
$TPB:
SNULL:

177562
177564
177566
.BYTE

SREGAD:

.WJORD

001162
001164
001166
001170
001172
001174
001176
001200
001202
001204
001206
001210
001212
001214
001216
001220
001222

000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000

$SREGO:
.WORD
$SREG1:
.WORD
$SREG2:
.WORD
$SREG3:
.WORD
$REG4:
.WORD
SREGS:
.WORD
$SREG6:
.WORD
$SREG7:
.WORD
$TMPO:
.WORD
$TMP1:
.WORD
$TMP2:
.WORD
$TMP3:
.WORD
$TMP4:
.WORD
$TMPS:
.WORD
$TMP6:
.WORD
$TMP7:
.WORD
$TMP10: .WORD

DI SPLAY

SWR:

001160

177570
177570
177560
177562
177564
177566
000
002
012
000
000000

DDISP

i; START OF COMMON TAGS

PASS COUNT
THE TEST NUMBER

ERROR FLAG
SUBTEST ITERATION COUNT
OPE LOOP ADDRESS
SCOPE RETURN FOR _ERRORS
w
(=]

000000
000
000
000000
000000
000000
000000
000
001
000000

.=1100
[=l=lelelelalalelalel Jelelelelelelel)]

1835
1836
1837
1838
1839
1840
1841
1842
1843
1844
1845
184
1847
1848
1849
1850
1851

001100

BNele
Lol NTe]

001100
001100
Q01102
00110
001104
001106
001110
001112
001114
Q01115
001116
001120
001122
00112
001126
001130
001132
001136
001135
001136
001140
001142
001144
001146
001150
001152
001154
001155
001156
001157

[=lelelelalelelelelelelelelelelele

1803
1804
1805
1806
1807
1808
1809
1810
1811
1812
1813
1814
1815
1816
1817
1818
1819
1820
1821
1822
1823
1826
1825
1826
1827
1828
1829
1830
1831
1832

1833

COMMON TAGS

TOTAL ERRORS DETECTED

2 sCONTAINS ITEM CCNTROL BYTE
2 sCONTAINS MAX. ERRORS PER TEST
;sCONTAINS PC OF LAST ERROR INSTRUCTION
2 sCONTAINS ADDRESS OF °*GOOD' DATA

L CONTAINS ADDRESS OF "BAD' DATA
i:CONTAINS 1GooD* DATA

2CONTAINS 'BAD' DATA
s ;RESERVED==NOT TO BE USED

s sAUTOMATIC MODE INDICATOR
s s INTERRUPT MODE INDICATOR
:;ADDRESS OF SWITCH REGISTER
:;ADDRESS OF DISPLAY REGISTER
::TTY KBD STATUS
;:TTY KBD BUFFER

s:TTY PRINTER STATUS REG. ADDRESS

1802

PAGE 41

::TTY PRINTER BUFFER REG. ADDRESS
s sCONTAINS NULL CHARACTER FOR FILLS
s sCONTAINS # OF FILLER CHARACTERS REOUIRED
..INSERT FILL CHARS. AFTER A 'LINE FEED'
;" TERMINAL AVAILABLE FLAG (BIT<07>=0=YES)
: :CONTAINS THE ADDRESS
s:WHICH (SREGO) UAS oawneo
::CWTAINS ((SREGAD) +0)
EGAD) +2)
GAD) +4)

:;USER DE

ZKMDAO DMS11-DA sm‘c MACY11 30A(1052) 21-0CT=81
ZKMDA.P11
20-0CT-81 17:03
COMMON TAGS
nsi

1853

1854

1855
wsg
1857
1858

001224

000000

001
001
0015 5
001236

177607
077
015
000012

001226

1859

16‘8

1864
1865
1866
1867
1868
1869
1870
1871
187
187
1874
1875
1876
1877
1878
1879
1880
1881
1882
1883
1884
1885
1886
1887
1888
1889
1890
1891
1892
1893
189%
1895
1896
1897
1898
1899
1900
1901
1902
1903
1904
1905
1906
1907

000207

000002
000002
000207
000020
000001
000100
000200
000020
000100
000000
000001
000001
000001
000002
000004
000001
3
000004
000005
000010
000007
000200
000001
000010
000100
000040
000200
000040
000004
000002
000001
000002
000004
000004
000010
000020
000040
000100
000200
000002
000004
000010
000200
000001

)

.WORD

$BELL:

.ASCIZ
.ASCII
.ASCII
.ASCIZ

<207><377><377>
/7%/
<i5>
<12>

$ESCAPE : 0
$QUES:
$CRLF:
SLF:

SEQ 0042
; sUSER DEF INED

:;ESCAPE ON ERROR ADDRESS
::CODE FOR BELL
:SQUESTION MARK
: *CARRIAGE RETURN
::LINE FEED

;:"t.tt"tttt'ttttt.t'ttt't'.ttt'itt'tttt'.tQt.ttttttt'.'."."t

001240

PAGE 42

$TMP11:

}gg?

000377

09:21

PROGRAM CONTROL PARAMETERS

"ROVAR:

EXIT=207

EXITT=RTI
EXITI=RT]
EXITS=207
TENA=BI
T4
TSOM=81T0
TAC=BITé
TSA=BIT?
TBMT=8]T4
CCP=BIT6
BOP=0
RENA=BIT0
RDA=BITO
=
=2
1=
CCITT=
CRC16=X!Y
0DDP=2
EVENP=X!7
CRCEN=BIT3
CRC32=X1Y12
ERRCK=BIT7
SOH=001
SF=BIT3
MB=B1T6
MA=BITS
MC=BIT?
LM=BITS
RAC=BIT?
RSA=BIT1
RSOM=BITO
REOM=BIT1
RXGA=8]T
RXAB=BIT
ROR=BIT3
ABCA=BIT4
AB(CB=BITS
ABCC=BIT6
ERRCK=BIT?
TEOM=BIT1
TXAB=BIT
TXGA=BIT
TERR=B]T
PROTEX=BIT0

CZKMDAO DMS11-DA STAT . MACY11 30A(1052)
21-0CT-81
1 7:03
CZKMDA.P11
COMMON TAGS

09:21

]

SEL6=6
BSELO=0

NOWVMSWN—=O

NS NN = © = b b e e b ek b
NN ilNOWVNSNNN=O
NOMASWN=O N I It hhhhn

SEC

viviuivuvaaiviaunnawg

WA
=

e e

00OV
VOV OVOVOOO

cd e
e

1
1
1
1
1
1
1
1

22D 23

000002
000004
000010
000020
00004
000100
000200
000001
005227
000007
000026
000002
000001
000004
000003
000001
000002
000004
000010
000010
000011
000012
000013
000014
000015
000016
000017
000000
000001

PROTEY=BIT1
PROTEZ=B]T2
NIDLE=BIT3
SAM=BITé
SSL=BITS
PROTO=B;T6
APA=BIT
RDATA1=BIT0
RDATA2=BIT1
RDATA3=B]T2
EXCON=BIT3
EXADD=BIT4
TDATA1=BITS5
TDATA2=BITé
TDATA3=BIT7
LNRST=BITO
INCL=05227
DISCRC=
SYN=26
STX=2
SOH=1
EOT=4
ETX=3
INIT=BITO
LOCK=BIT1
LNLOCK=BIT?2
TLOCK=BIT3
oy
B

b cd e cd od cd e cd b

VNN
WN = OV NOWVNSWN-=O

NI NN N NI NI NINININ) =

000002
000004
000010
000020

D e

e e

D e

ggggggggggaoaoaoaaaooooooooooooooooooooo
2232 oawomau~—oouwombw~doogwgwfuwag
32

D0-0c 18

PAGE 43

SEQ 0043

CZKMDAO DMS11=DA STATIC c
Y11 30AC1052) 21-0CT-81
czmA P11
20-0CT-81 17:03
COMMON TAGS

09:21

1964
1965

000001
;

BSEL1=1
BSEL2=

196
1968
1969

€00005
ooooo;

BSEL4=4
BSELS=
asngzg

197;
197
1974

000040
000004
000002

CRCHK=BITS
TCRCE=BIT2
RCRCE=BIT1

1969

1970
1971

}gg 001242

.ROEND :

001242

000000

1985
1986

001252
001254

1988

001260

1987
1989

001256

CLINE:

.WORD

000000
000000

NXTLIN:
LINBYT:

.WORD
.WORD

000000

CLKDAT:

001262

000000

SEQ 0044

PROGRAM

REGIST: oevsu

mg 001244 000000
1983
001246 000000
1984 001
000001

BSEL7=
ECRC=BIT3

}g;a 001240 000000
1981

BSEL3=

00000
000010

}3;5

PAGE 44

CLINED:
SOVICE:
CMFLAG:
CRC32F:

TSTNUM:

;REGISTER NUMBER STORAGE FOR TYPE OUT
0

:CURRENT LINE POINTER

.WORD
.WORD
.WORD

0
O
BITO

.WORD

cac-szf

:TEST # FOR ERROR REPORT

.WORD

O
O
0

:CURRENT LINE POINTER DECIMAL
:CURRENT DEVICE
#
:PROGRAM COMMAND FLAG

*FLAG FOR NEXT LINE TO BE TESTED
uows LINES ENABLED
m/sxr FLAG

R¢

CZKMDAO DMS11-DA STATIC MACY11 30A(1052) 21-0CT-81 09:21 PAGE 45
CZKMDA.P11
20-0CT-81 17:03
ERROR POINTER TABLE

2010
2011
201%
2013
2014
2015
2016
2017
2018
2019
2020
2021
2022
2023
2024
2025
2026
2027
2028
2029
2030
2031
2035
2033
2034
2035
2036
2037
2038
2039
2040
2041
5045
043
2044
2045

.SBTTL

SEQ 0045

ERROR POINTER TABLE

;*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR.
:*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN

'LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE lS PERTINENT.
s*NOTE1:

;*NOTE2:

IF SITEMB IS O THE ONLY PERTINENT DATA IS (SERRPC

EACH ITEM IN THE TABLE CONTAINS & POINTERS EXPLAINED AS FOLLOWS:
s;POINTS
:;POINTS
:sPOINTS
:;POINTS

001264

001264
1266
001272
001274
001302
001
001312
001314
001322
001326
001332
001334
001342
001344
001352
001354
001362
001364
001372
001374
001402
001404
001412
001414
001422
0014%4
001432
001434
001442
001444
001452
001454
001462
001494
001472
001474
001502
001504
001512
001514

$SERRTB:

035124

04101;
03515
041012
035200
041012
035236
041012
035311
0410;2
035356
041022
035420
041022
0354
04102
035564
0%102;
03565
041012
035726
041012
036010
041022
036064
04108;
0361
04102;
03614
041022
036207
041052
036231
041022
036312
041g
036
04102
03641

58
e e

040140

040624

040140

0460624

EM2,DH1.DT1,DF1

040140

040624

EM3,DH1,DT1,DF1

040140

0460624

EM4 ,DH1.,DT1,DF1

040216

040644

EM5,DH2,DT2,DF2

040216

040644

EM6,DH2,DT2,DF2

040216

040644

EM7,DH2,DT2,DF2

0460216

040644

EM8,DH2,DT2,DF2

040216

040644

EM9,DH2,DT2,DF2

040140

040624

EM10,DH1,DT1,DF1

040140

040624

EM11,DH1,DT1,DF1

040216

040662

EM12,DH2,DT3,DF2

040216

040662

EM13,DH2,DT3,DF2

040216

040662

EM14,DH2,DT3,DF2

040216

040662

EM15,DH2,DT3,DF2

040216

040662

EM16,DH2,DT3,DF2

040216

040662

EM17,DH2,DT3,DF2

040216

040662

EM18,DH2,DT3,DF2

040216

040662

EM19,DH2,DT3,DF2

040216

040644

EM20,DH2,DT2,DF2

EM1,DH1,DT1,DF1

TO THE ERROR MESSAGE
TO THE DATA HEADER
TO THE DATA
TO THE DATA FORMAT

CZKMDAO DMS11=DA STATIC MACY11 30A(1052) 21-0CT-81_ 09:21 PAGE 46
CZKMDA.P11
20-0CT-81 17:03
ERROR POINTER TABLE

001774

002002

N =
N —

ERENESRER

—_—

OWONO =
WN—=2WWNWWWN
NOoOwWwowow
NON

9
2090

001752
001754
001762
001794
001772

23e SRSFRYRSRRER ® aog

2083
2084
2085
2089

208 001744
00174z

001624
0016
001634
001642
001644
001652
001654
001662
001696
001672
001674
001702
001704
001712
001714
001722
0017;3
0017,

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

206 0016z

366

001612

040216

040662

040322 040712
e
10

O =

001604

0410%;
364

—t

50
51
Sg
53
2054
5855
59
2057
58
59

001522
001524
0015
0015
001542
001544
001552
001554
001562
0015?6
001572
001574
001602

SRERSRERSRER
RRRRRRRERGRIRIRARGRERIRIREGR
—AN-IN-ON—.N—lfl—.flsfl—.fl—lfldfl-‘fidfl-‘fl—h

204;

EM21,DH2,DT3,DF2

EM22,DH5,DT5,DF5

0460216

060644

EM23,DH2,DT2,DF2

040216

040662

EM24,DH2,DT3,DF2

040216

040662

EM25,DH2,DT3,DF2

040266

040700

,DF4
DH4
DT
EM26,

040266

040700

EM27 .DH4 ,DT4 ,DF 4

0460266

040700

EM28,DH4,DT4,DF4

040266

040700

EM29,DHé DTS, DF 4

040266

040700

EM30,DH4,DT4,DF4

040266

040700

EM31,DHé ,DT4,DF4

040266

040700

EM32,DHé4 ,DT4,DF4

040322

040712

EM33,DH5,DT5,DF5

040266

040700

EM34 ,DH4,DT4,DF4

040322

040712

EM35,DH5,DT5,DF5

040322

040712

EM36,DH5,DT5,DF5

040322

040712

EM37 ,DH5,DT5,DF5

040366

040726

EM38,DH6,DT6,DF6

040436

040744

EM39,DH7 ,DT7,DF7

040526

040766

EM40,DH8,DT8,DF1

0460266

040700

EM&1,DH4 ,DT4,DF4

040216

040662

EM42,DH2,DT3,DF2

SEQ 0046

CZKMDAO DMS11-DA STATIC MA
CY‘II SOA(IOSZ)
CZWA.PH
20-0CT-81 17:03

100
101

1o§
103
104

105

21-0(7-81 09:21 PAGE 47
OR POINTER TABLE

gEGI'TOCING ROUT INE

002004

.BEGIN:

002
882012
2012
002016
002020
00 §'5
002032
002

SBTTL

012706
005026
022706
001374
012706
012737
012737
012737

&
SEQ 0047

;CLEAN UP THE REST OF THE VARIABLE TABLE

INITIALIZE THE COMMONTAGS

::CLEAR THE COMMON TAGS (SCMTAG) AREA

001100
MOV
#SCMTAG,R6
;:FIRST LOCATION TO BE CLEARED
CLR
(R6) +
:3CLEAR MEMORY LOCATION
001140
CMP
#SWR,R6; :DONE?
BNE
.6
LOOP BACK IF NO
001100
MOV
#STACK , SP
..serur THE STACK POINTER
..mmuze A FEW VECTORS
043564 000020
nss xorvsc
1orv;croa FOR SCOPE ROUTINE
340 oooogz
nov
#34 uiorveco ::LEV
043114 000030
MOV
#SERROR
.em v;croa FOR ERROR ROUTINE

012737 000340 000032

MOV

mo uénrvec* ..LEVEL

10
2062 o1§737 000340 000036
108 002070 013737 035036 035030

MOV
MOV

#340.,9# TRAPVEC+2: L EVE
SENDCT, SEOPCT ..serup eno-or-mocm COUNTER

2110

MOVB

109 002054

012737 050058 000034

109

005037

002076

002102

112737

001226
000001

2115
2116
2117
2118
5119
120
2121

002124
002130
002136
002144
002152
002160

013746
012737
012737
012737
022777
001012

21z§ 002162 000403

512
126

2125

002164
002170

012716
ooooo;

000004
002164 000004
177570 001140
177570 001142
177777 176760
002172

002172

012737

000176

5}% 002206

012637

000004

001140

2129
2131

139

}2‘

002212

2234
002240
002242
002250
oo% 52
00
385222

145 002264

2146

”TRAP S#TRAPVEC

TRAP VECTM FOR TRAP CALLS

SESCAPE

;iCLEAR THE ESCAPE ON ERROR ADDRESS

..smou
-SLPERR

..mxmuze THE LO P
ADDRESS FOR SCOPE
TUP THE ERRORLOOP ADDRESS

#1,SERMAX

:;ALLOW ONE ERROR PER TEST

::SIZE FOR A flmpwe SWITCH nesism IF NOT rouno OR IT

*:EQUAL TO A

MOV
MOV
MOV
MOV
CMP
BNE

658:

668:

B8R

‘=1"', SETUP FOR A SOFTWARE SWITCH REGISTER.

@FERRVEC, =~ (SP) ..save ERROR VECT oa
2648 usfmvec
SET UP ERROR VECTOR
#DSWR,S
..se TUP FOR A MARDWARE SWICH REGISTER
m:sfi oxsmv :sANDA HARDWARE DISPLAY REGISTER
#-1,3S6R
..mv ro REFERENCE HARDWARE SWR
668"
: ;BRANCH IF NO TIMEOUT TRAP OCCURRED
658

MOV
RTI

#658, (SP)

MOV

#DISPREG,DISPLAY

SAND

THE HARDWARE SWR IS NOT
= =1

$SBRANCH IF NO TIMEOUT

$3SET UP FOR TRAP RETURN

MOV

#SWREG, SWR

::POINT TO SOFTWARE SWR

MOV

(SP)+,9#ERRVEC

;;RESTORE ERROR VECTOR

.SBTTL TYPE PROGRAM NAME
005227

..TYPE THE NAME OF THE PROGRAM IF FIRST PASS

177777

213§ 002216 001041
2133 002220 022737 035070 000042
134 002226 001435
135
002230
104401 002266
13
2138
2139
120
141
u.g

MOV
MOV

648:

2126 002200 012737 000174 001142

2130

CLR

001115

2111 002110 012737 002110 001106
zng
116 012737 002116 001110
11%

MoV

005737 000042
001
023727 001140 000176
001005
104402
00040
112737

000416

000001

001134

INC

BNE
CMP
aee
TYPE

#-1

673
#SENDAD ,a#42
m

::FIRST TIME?

S:BRANCH IF NO
::ACT=11?
.-.-anmcu 1 YES
ASCIZ STRING

.SBTTL GET wu.ué roa SOF TWARE suircn REGISTER

%g:

::688:

ST
BNE
CMP
BNE
GTSWR
BR

Y 7¥)
69$
SWR, #SWREG
70s

MOVEB

#1,$AUTOB

678

ASCIZ

70$

:SARE WE RUNNING UNDER XXDP/ACT?
:SBRANCH IF YES
..sonwe SWITCH REG SELECTED?
CH IF NO
22GET SOFT-SWR SETTINGS
::SET AUTO-MODE INDICATOR

GET OVER THE ASCIZ

<CRLF>#CZKMDAO DAST1-DA STATIC W<CRLF>

§§

[ala)

67%:

PC,$SIZE

PC,a#STKINT

NININIALASNINININNINININI
NN NN NN N NN NI NN NN NN NN NN NN NN NN NN NN NN NN NN

MACY11 30A(1052) 21 -0CT=-81 09:21 PAGE 48
17:0
GET VALUE FOR SOFTWARE SWITCH REGISTER

D e e

0§40.P§u

648:

D D d

Y A R S A

D d

(SP)+,R0
#1,R0
LOOP
#2.R0

;G0 TO LOGIC TEST LOOP
*CONF IGURATION MODE

d
D

PC,MODTAB
LMOMIT

D
d D

3s:

TYPE

D e e

::67%:

D e

668:

*MODIFY THE CONFIGURATION ROUTINE

678

::TYPE ASCIZ STRING

égs

::GET OVER THE ASCIZ

LMONIT
TEST LOOPING ROUTINE

LOOP:

lgTACK.SP

D e

)

#340,PSVW
CMFLAG
CLINE

;<==<<< ALLOW INTS.

CLINED
$OVICE

#KMCTAB=6,CURTAB

D d D d

D e

NXTUN:

[+ ]
W
W

;LOGIC TEST?

SS888Se RES28BEIRAE ped= o IS ERY P A I

s :GET SVE R THE ASCIZ

<15><12>/(1)DIAG.
TEST(2) CONF IGURATION /

::658:

18:

d
D
D d cmd D cd d cd D e
b

s:TYPE ASCIZ STRING

AR A St

65%

035006

002542

2$:
::658:

041134
002452

043002

64$:

CYCLE:

001102
002616

001244

PC,GETKMC

:B= NO KMCS ENABLED

BEQ
JMP

TST

18
CYCLE
KMCNT
2%
SEOP

TYPE

65$

::TYPE ASCIZ STRING

BR
.ASCIZ
JSR
JMP
JSR
BR
CLR

TYPE

::658:

—

md e

;Kmmmmmaal(LLLL=

#STACK,SP

«MONIT:

SEQ 0048

64$:

;1S THERE KMC'S ENABLED
:B=N0O

:*GET OVER THE ASCIZ

<15><12>/NO UNITS ENABLED/
PC,MODTAB

LOOP

PC,GETLIN

sSET UP_CONFIGURATION TABLE

sNOW ENTER LOGIC TEST

NXTFUN

;FINISHED ALL LINES GET NEXT UNIT

658

::TYPE ASCIZ STRING

STSTNM
4$

“:GET OVER THE ASCIZ

BR
.ASCIZ

<15><12>/Now TESTING LINE/

MoV

CLINED,-(SP)

TYPOS

ssSAVE CLINED FOR TYPEOUT

::G0 TYPE--OCTAL ASCII

CZKMDAO DMS11=DA STATIC

CZKMDA.P11
3

S
o0

PAGE 49

.BYTE

::TYPE 6 DIGITS

652 104401 002660
656 0004604

TYPE
BR

‘273
$

*:TYPE ASCIZ STRING
:3GET OVER THE ASCIZ

ooge

013746 001246

002676

104401

21; 002702 000402

221

09:21

10 002676 10440
2214

21-0CT=81

GET VALUE FOR SOFTWARE SWITCH REGISTER

651
26

MACY11 30A(1052)

'go-on-“ 17:03

002710

.BYTE

ggn:

002704

2215 002710 000137 002714

ASCIZ

::698:

KMC #/

MOV
SDVICE,=(SP)
TYPDS

;:;SAVE
SDVICE FOR TYPEOUT
:360 TYPE-=DECIMAL ASCII WITH SIGN

688

*3GET OVER THE ASCIZ

JMP

LTEST

TYPE

68$:

* :SUPPRESS kmmc ZEROS

LASCIZ

39:

$:TYPE ASCIZ STRING

;RUN LOGIC TESTS

SEQ 0049

PONIND [\
NN N

&N ¥s EIBNRURGnNSomIa

AN NN NINININNINININININI NN
W

Y11 30A(1052) 21-0CT-81 09:21 PAGE 50
17:03
PRELIMINARY PRIMARY REGISTER READ TESTS
L;g;}l.

002714

SEQ 0050

PRELIMINARY PRIMARY REGISTER READ TESTS

Jennnnnnnntnteneeeeenennnnnt

TEST

s«LINE SELECT REGISTER TEST
s*DO A MASTER CLEAR, VERIFY THAT ALL

sennnanectnsaneatetstnnaees

;*BITS ARE IN THE CORRECT STATE OF REGISTER PRI
R

002714
002716
002726

0027

012737

004737
005000
105;90
001376
005014
005064
005064
oosogl.
012737
logg

003002
3006
003014

005037
023737
001403

003016
003020

012637

104001

000137

000001
000001

001105
00126

044736

fST1:
1018:

108
000002
000004

000006
000011
000011

001240

1028:

001202

001204
001202

score

MOV
MOV

RESET

#1,STSTNM

S$STMP1
$TMPO,STMP1
TST2

JMP

1018

;# FOR TYPE OUT
JCLEAR THE WORLD

JINITIAL TTY INPUT

JINITIALIZE THE CSR REGISTERS
3
:
3
;SAVE THE REGISTER FOR TYPE OUT
:READ PRI11

(SP)+,$TMPO

;:POP, STACK INTO $TMPO
sJPUT
HH

"EXPECTED'' IN STMP1
;COMPARE RESULTS

:ERROR IN

PRI

;LOOP ON ERROR

JenaRRnnnnttenneeeenannnnnn

TEST 2 stntnnannnnaasessnvennntanns

;*SECONDARY SELECT REGISTER TEST
:*D0 A MASTER CLEAR, VERIFY THAT ALL
;*BITS ARE IN THE CORRECT STATE OF REGISTER PRIT2
P

TEST 2

"tttttt:ttttttttttttttttttttttttttttttttlttttt'ttltttttttttttttt

SONRE SIOME
soconz eomie 2 KM
L#2,TSTNUM
srsnes
15737 000002 001265
MOV
003042
S
101$:
RESET
0030

3044
003C50
003052

003054
00;823
00
00
003070

004737
005000
105200

881 76
5014
885066
5064
005064

044736

108:

000002
8888%

JSP
CLR
INCB

BNE
CLR
CLR
CLR

CLR

e ey L

;s LOAD THE NO. OF THIS TEST

#1,TSTNUM

CLR
CMP
BEQ

AT T T RN AR AR AR AR AR ANE AR ACE AN ARS

PC,a#STKINT
RO
RO
108
(R4)
2(R4)
4(RG)
6(R4)
#PRIT11,REGIST
LPRIN

ERROR

002732

JSR
CLR
INCB
BNE
CLR
CLR
CLR
CLR
MOV
READ

MOV

001204

TEST 1

AR AR AR

0027
002740
002742
002744
0027
002750
002754
002760
0027
002772

00g776

PC,a#STKINT
RO
RO

108
(R4)
2(R4)
4(RG)

6(R4)

LOAD THE NO. OF THIS TEST

:# FOR TYPE OUT

JCLEAR THE WORLD

JINITIAL TTY INPUT

JINITIALIZE THE CSR REGISTERS
3
:

eeYy

7%
75

102

012737

1044

C Y 1 30A(1052)

'go-on-b

C{KMDAQC DMS11-DA STATIC

CZKMDA.P11

103 &1) 6
1 84.
1
9 7 881

7
116 023737
77 003124 081‘03
78 003126
1 og1

2373 003130

001202

001240

21-0CT-81

09:21

PAGE 51

PRELIMINARY PRIMARY REGISTER READ TESTS

1028:

001204

MOV

mns.azcm

:SAVE THE REGISTER FOR TYPE OUT

MOV
CLR

(SP)+,$TMPO
$TMP1

;:POP STACK INTO $TMPO
:PUT "EXPECTED'' IN $STMPI

READ

cMP
BEQ

ERROR

000137 003042

JMP

PRI

$TMPO, STMP1
TST3
1

1018

‘READ PRI12

:COMPARE RESULTS

*ERROR IN

PRI12

:LOOP ON ERROR

%81

Jenntnsnnnntteeceeetannnnns TEST 3 aecennnnececnnnananecnneene

284

:«D0 A LINE CLEAR, VERIFY THAT ALL

2“

3 tARRRRAAARARRCORRRARAAARARAAARARARANANAACARAREARANRANSAAAAAOASRAOSR

ggg

;

s«LINE STATUS REGISTER TEST

gzas

:*BITS ARE IN THE COKRECT STATE OF REGISTER PRI13

287

2291

003134

23 t't.t.;.'tttt.tt.t.t't"..ltttttt't..t.t.tt.t.'.tt..ttt.tt..tt'

oooog4

2292
2293

003136 012737 000003
003144 012737 000003

2295
2296
2297
2298
2299

00315¢
003162
oomg
00317
003200

012737
1ot.4§o
012637
012737
023737

2301

003210

104001

2294

2300

003152

003206

104417

001403

TEST 3

00110
00126

000013 001240
000013
omzos
000020 001204
001202 001204

TST3:

101$:

SCOPE

MOV
MOV

c;.srsm
#3.TSTNUM

MOV
READ
MOV
MOV
CMP

mng.necxsr
PRI
(SP)+,$TMPO
#20,$TMP1
STMPO, STMP1

ERROR

LRESET

BEQ

%g 003212 000137 003152

JMP

: LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT
;SAVE THE REGISTER FOR TYPE OUT
:READ PRI13
::POP STACK INTO STMPO
:PUT “EXPECTED'* IN S$TMP1
*COMPARE RESULTS

TSTé

1018

:LOOP ON ERROR

:ERROR IN PRI13

JRRRARRARARRAARACRRRNRRRNAAE TEST 4 sacntntantntnntattntttttens

2308

s«BITS ARE IN THE CORRECT STATE OF REGISTER PRI14

230%
2307

*«LINE CONTROL REGISTER TEST
:*D0 A LINE CLEAR, VERIFY THAT ALL

S;%

::ltttt.tttttlt".'.'t!tt.tt'.tttt.t'tt.tttt.tttttttttt.ttt."'

%g};

2313
2314

003216

2317

003234

2;15 003220 0157 7 000004 00110
2 1g 003226 012737
00126
104417

2318 003236
012737 000014 001240
2319 003244 1044.59 000014
2320 003250 o1§6
001202
81 833 54 005037 001204
;
3260 023737 001202
323

32,

003266

003270

001403

104001

ggg 003272 000137 003234

2327

001204

TEST &

. :ttttt.;.lttttttttttt't'tt.ttttt.t..t.t.ttt.t.t..tttt'tt"'l."'
§T4:
SCOPE

01$:

MOV
MOV

#6,STSTNM
#4.TSTNUM

MOV
READ
MOV

#PRI14,REGIST
,PRI14
(SP)+,$TMPO

;SAVE THE REGISTER FOR TYPE OUT
:READ PRI14
::POP STACK INTO $TMPO

BEQ

1STS

LRESET

CLR
CMP

ERROR

JMP

$TMP1
$TMPO, STHP1
1

1018

: LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT

SPUT "EXPECTED' IN STMPI
;COMPARE RESULTS
*ERROR IN

PRI

:LOOP ON ERROR

alal

ifii

C MACY11 30A(1052)
—

117:03

PAGE 52

NN N NN

JRNRRRRRNARARANAICRIRIRRANANES TEST § tensssnnsnennanatetentetens

s*TRANSMIT STATUS MX REGISTER TEST
;*DO A MASTER CLEAR, VERIFY THAT ALL

;*BITS ARE IN THE CORRECT STATE OF REGISTER PRI16

::'.l...'....."."t..............'..Q.l'..l..'...'.'...'..t.'.

NINININNIN
N NN NNMINININLNI NN AN NININ RN NN

N"UNHUG{UN”UNHUN:
N NN
r
S
Wh—=O SELYFRRURS
LLE5E
v«umxmwwmmg
VO
NN WN=OVo
N
SINI8EEeER 33 wwuuwwuuwufi
SESEYo (V.7 DA

09:21

21-0CT-81

PRELIMINARY PRIMARY REGISTER READ TESTS

TEST S

"ttt...;t..t."t.tt'.""""'tt"....t.t"Qt.t.l't..t'.."..tt'

8157 7 000005 oonos
12737 000005 00126
S

004737 044736

005000

001376
000002
000004
888806

0159.7
012737
004737
043737
043737
023737
001403
104001
000137

oo1§o
000377 001204
047274
047352 001202
001204
047352
001202 001204

16
000016

SCOPE

MOV
MOV

#5,8TSTNM
#5.TSTNUM

JSR

PC,a#STKINT

INCB

RESET

CLR

BNE

001240

102$:

003314

: LOAD THE NO. OF THIS TEST
*# FOR TYPE OUT

;CLEAR THE WORLD

108

(R&)

CLR

005064
005064
oosog«

012737
104420

1018:
08:

1os§oo

005014

TS15:

;INITIAL TTY INPUT

:INITIALIZE THE CSR REGISTERS

CLR
CLR
LR

2(R4)
4(RG)
6(R4)

;
:
.

MOV
MOV
JSR
BIC
BIC
CMP
BEQ
ERROR
JMP

(SP)+,$TMPO
#377.$TMP1
PC, .MASK
MASK , $TMPO
MASK _ $TMP1
$TMPO, STMP1
TST6
1
1018

::POP STACK INTO $TMPO
-PUT "EXPECTED'* IN STMP1
:CALCULATE THE MASK
*MASK OUT LINES NOT INUSE
*MASK OUT LINES NOT IN USE
:COMPARE RESULTS
¥
:ERROR IN PRI6
*LOOP ON ERROR

MOV
EAD

#PRI16.REGIST
PRI16

:SAVE THE REGISTER FOR TYPE OUT
:READ PRI16

:ttttttQtttttt'.tt"tttttlt. TEST 6 (1332222332332 333333333333333]

*#RECEIVE STATUS MX REGISTER TEST
“«D0 A MASTER CLEAR, VERIFY THAT ALL

PRI17
“«BITS ARE IN THE CORRECT STATE OF REGISTERtttttttttttt't
t.tt.'t
;:ttttttttttt"'ttttttt'ttttttttfitttttlttt

£3333323233S3

S AP ANAR
SNIRTIIRLS
S

TEST 6

':tttttt;ttttttttttttttttt'.tttttttttttttt.tttt'ltttttttttttlttt'

012737 000006 00110
012737 000006 00126
oooogs
004737 044736

005000
1os§oo
001376

005014

005064
885066
sogl.

012737

TS16:

1018:
08:

#6,8TSTNM
#6._TSTNUM
PC,aNSTKINT

INCB
BNE

RO
108

CLR
CLR
CLR

2(R4)
4(R&)
6(R&)

CLR

000002

000017

SCOPE

MOV
MOV
RESET
JSR

001240

1028:

MOV

(R4)

#PRI17,REGIST

: LOAD THE NO. OF THIS TEST
*# FOR TYPE OUT
:CLEAR THE WORLD
;INITIAL TTY INPUT
;INITIALIZE THE CSR REGISTERS

:
:
:

:SAVE THE REGISTER FOR TYPE OUT

21-0CT-81

09:21

PAGE 53

PRELIMINARY PRIMARY REGISTER READ TESTS

MOV
JSR

LPRIN7

(SP)+,$TMPO
$TMP1

PC, .MASK

BIC

MASK, STMPO

CMP

smbb $THP1

BIC

BEQ

ERROR

JMP

MASK $TMP1

TST

101 $

SEQ 0053
AD PRI1?

sn\cxNTO $TMPO
fiur'txpscm' IN $STMP1

cALcume THE MASK
SK OUT LINES NOT INUSE

msx OUT LINES NOT IN USE
;COMPARE RESULTS

:ERROR IN PRI17

:LOOP ON ERROR

CZKMDAO DMST11-DA STATIC MACYI11 30A(1052)
CZKMDA.P11
20-0CT-81 17:03
3;.

C
21°0CT-81 09:21 PAGE 54
OATING ONE TEST OF PRIMARY REGISTER 11,12.13

.SBTTL

tPRIMRY REGISTER WRITE/READ TEST
tFLOAT A 1 THROUGH PRI11

400
2601

'THE FOLLOWING BITS ARE NOT TESTED
v «x<BITO!BIT1!BIT2!BITI!BIT7?>%x

;‘02

i3 3i333 3333332323

403
22815.

407

003560

000004

2408

003562

012737

2412
2613
2416
2415
26416

003612
003614
003616
003616
003622

000004
104414

003624

104416
000000

10“%0

TEST 7

000007

001102

66$:

000011

MOV

MOV
MOV
MOV
101$:
648:

000011

SCOPE

WRITE
0

PRI

JWRITE DATA INTO PRI
:DATA

(SPM $TMPO
663 $TMP1

#BITO'BITI '8172‘8173'8"7 $STMP1

SCOPE
MSTCLR

READ

001204

2421

003650 042737

001204

BIC

2423

2624
2425

2426
2627

2428
2429

003656

00
003670

003674
003674

003700
003702

123737

001403

000217
001202

10400
000137

003614

006237

003622

001346
000400

BIC

001204

PRI

READ PRI

POP STACK INTO STMPO
EXPECTED INTO $TMP1

aaxfo'axr1-exrz'éxrsvsxrr $TMPO

CMPB

65%:

; LOAD THE NO. OF THIS TEST

# FOR TYPE OUT
:SAVE REGISTER FOR TYPE OUT
*START WITH BIT 7

MOV
MOV

2620 003642 042737 000217 001202

#7,STSTNM

#7.TSTNUM
IPRIH REGIST
#8177,66%

2418 003630 012637 001202
2619 003634 013737 003622
2622

232233333333 3333133333233 33232333323332332323233223]

ttttttt'tttttttttttttttttttttttttttttttttttttttt.ttt..ttttt.t'.

t§17:

2409 003570 012737 000007 001262
2410 003576 012737 000011 001240
26411 003604 012737 000200 003622

2417

FLOATING ONE TEST OF PRIMARY REGISTER 11,712,113

tttttttttt'tttt"t't'.tt'tt TEST 7 1 3333333333333 33233323323323221%]

598
399

SEQ 0054

$TMPO,STMP1

DATA CORRECT?

BEQ

65$

:BR IFYES

ASR

663

:SHIFT BIT IN 66%

ERROR
JMP

BNE
BR

2
1018

648
TST10

;CLEAR DON'T CARE

;CLEAR UNWANTED BITS

JFLOATING ONE'S ERROR OF PRI
;LOOP ON ERROR

:IF 66%3=0 THEN DONE
i

2432

JRRARARRARARARCACECERANARARan TEST 10 AR AARRRARNNRNRRRANRARARAREY

2435
2436

:*THE FOLLOWING BITS ARE NOT TESTED
i* *#+<BITO!BITI!BIT2!BIT3>#+

2433
2434

tPRIHARY REGISTER URITE/READ TEST
'FLOAT A 1 THROUGHPRI12

%2%

IRARRRARAARARARAARARAR AN

5228
2441

2442

003704

000004

2443

003706

012737

2447
2448

003736
003740

000004
1704414

2444
2445
2446

003714
003722
0037

AARAAARAAAARRAAAARAAARARRARARARNAAAAAAARARARRANSY

TEST 10

tttttttttttttttttttttttttttt.tlt'tlttttttlttttttttt.ttttttttt't

000010

012737 000010
012737 000012
012737 000200

001102

t§7110:

001262
001240
003746

SCOPE

MoV

MoV
MOV
MOV
1018$:

SCOPE
MSTCLR

710, SYSTM

010 STNUM
#PR112 REGIST
#BIT7,66%

: LOAD THE NO. OF THIS TEST

# FOR TYPE OUT
:SAVE REGISTER FOR TYPE OUT
*START WITH BIT 7

CZKMDAO DMS11-DA STATIC MACY11 30A(1052) 21-0CT-81 09:21 PAGE 55
CZKMDA.P11
20-0CT-81 17:03
FLOATING ONE TEST OF PRIMARY REGISTER 11,12,13
000012
1

00120

66$:

WRITE

,PRIN2

READ

,PRI12

;WRITE DATA INTO PRI12

DATA

am mnz

001504
001202

MOV

MOV
BIC

3
fiursxre TED INTO S$TMP1
asxf '3111'017 'bxrg
:CLEAR DON'T CARE

001202 001204

CMPB

STMPO.S$TMPi

8830‘
17

001204

003740

BIC

003746

(SP)o srnpo

SEQ 0055

#BITOIBIT1iBIT2IBITS,STMPI

BEQ

gss

JMP

1018

ASR
BNE

668
648

ERROR

B8R

STACK INTO S$TMPO

:DATA CORRECT?

*CLEAR UNWANTED BITS

:BR IF YvES

:FLOATING ONE'S ERROR OF PRI12

:LOOP ON ERROR

TST11

;SHIFT BIT IN 668
xr 668=0 THEN DONE

IRRRRANEARANRRCRRRRRARNANEAN

TEST

Aaaaneaneanattavansavetses

;*PRIMARY REGISTER WRITE/READ TEST

;*FLOAT A 1 THROUGH PRI13

;*THE FOLLOWING ARE READ ONLY BITS

;% *x<BITO!BIT1!BIV2!BIT3!BIT4!BIT6!BIT7>
%
:*AND SHOULD BE READ AS ZERO

PIRAARARARRARAARAAR NN AAAANAAAARARAAAAAAAAAAAAAARAAARAAAAAAARRARORAES

TEST N

tt.lttttttt.t..itt..t"'t"ttt'lttttttt'ttt't.t".".ttttt.tt'.

2478
2479
2480

004030
004032
004040

000004
012737
012737

2482
2483

004052
0040564

100043
012737

2485

004070

000004

2481

26484

486

004046
004

004072

000011
000011

105737 001256

012737

000013

000200

001102
001262

004074
004074
004100

2491

004106 o1§637 oo1285

104416
000000

004100

2490 004102 104420 000013
492

004112

013737

004100

004134

2497
2498
2499
2500
2501
2502

004144
004146
004152
004152
004156
004160

2505

004142

123737 001202

001403

10400;
000137
006237
001346
000400

004072
004100

ST12
ppn113 REGIST

SCOPE

cncszr

#8IT7.66$

MSTCLR

668:

WRITE
0

,PRI13

MOV

(sp)* $TMPO

001204

READ

MOV

BIC

49 004126 052737 000020 001204

496

BPL
MOV
101$:

493 0064120 042737 000337 001204

2495

#11,$TSTNM
#11.TSTNUM

MOV
648:

000013

SCOPE
MOV
MOV

TST8

001240

104414

2487
2488
2489

t8711:

BIS

001204

CMPB

658:

PRI13

: LOAD THE NO. OF THIS TEST
*# FOR TYPE OUT

; CRC32 ENABLED?

:SAVE REGISTER FOR TYPE OUT

*START WITH BIT 7

:WRITE DATA INTO PRI13
:DATA

READ PRI13

- POP STACK INTO $TMPO

$TMP1

‘PUT EXPECTED INTO STMP1

T.$TMPi

;TBMT SHOULD BE SET

cexfo'alr1-3112'6113'9114'3176'3117 STMP1
srnpo $THP1

-DATA CORRECT?

BEQ

658

:BR IF YES

ASR
BNE
BR

663
643
TST12

;SHIFT BIT IN 668
xr 668=0 THEN DONE
¥

ERROR
JMP

2
1018

:CLEAR ALL READ ONLY BIT

*FLOATING ONE'S ERROR OF PRI13
:LOOP ON ERROR

JRRRRARARRARRRRERRRRRRRRRRRRt TEST

12 wennncrsnnannstsetttnnntnnn

CZKMDAO DMS11=DA STATIC MACY11 30A(1052) 21-0CT=81 09:21 PAGE 56
CZKMDA.P11
20-0CT-81 17:03
FLOATING ONE TEST OF PRIMARY REGISTER 11,12,13
og

;*PRIMARY REGISTER WRITE/READ TEST

:«FLOAT A 1 THROUGH PRI14

509

v wx<BIT1!BIT2>*e

508

s«THE FOL oumg ARE READ ONLY BITS

510

s*AND SHOULD BE READ AS 2ERO

51“

4 IRRARRARAARARRAARANAARAANCRIAAAAAAAAAAAAAAAAAACAAAAACEAAAAAARAAAS

zg}s

: TEST 12

SS“S

519

517
518
519
520

2521
2522

004162

004164
004172
oot.%oo
004206
004214
004216

gszs 004220
526
2525
2526

2527
2528
2529
2530
2531
2532
2533

004220
004224
004226

004232
004236
004244
004252
004256
004260

004266

000004

012737
012737
015737
012737
000004
104414

104416
000000
104420

012637
013737
042737
105737
100406
042737

042737

. ‘tt!ttt;ttttttttttttQtttttttttttttitttttttttttttt.tttttttttttt't

000012
000012
000014
000200

oono%
00126
00.540
004224

fSt12:

101$:

648:

000014

668:

000014

001202
004224 001204
000006 001204
001256

000010 001202
000010

001204

$335 00576 123737 001202 001206 ''°%°
2536

004302

2537

004304

2539

004312

001403
104002

2538 004306 000137 004216

%367 00e3le 00932 O0e2e
2542 004320 000400

SscoPe

MOV
MOV
MOV
MOV

#12,$TSTNM
#12.TSTNUM
#PRI14 ,REGIST
#BIT7,66$

: LOAD THE NO. OF THIS TEST
*# FOR TYPE OUT
:SAVE REGISTER FOR TYPE OUT
*START WITH BIT 7

WRITE
0
READ

PRIG

JWRITE DATA INTO PRITS
:DATA
*READ PRI14

SCOPE
MSTCLR

(SP)+,$TMPO
+:POP STACK INTO $TMPO
66S,$TMP1
*PUT EXPECTED INTO STMP1
#8171!B1T2,$TMP1
:CLEAR ALL READ ONLY BITS
CRC32F
: CRC32 ENABLED?
1108
: SKIP IF vss
#BIT3,$TMPO
: CLEAR CRC32 EN.

cwpB

STNPO.STHPI

BIC

BEQ

ERROR

658:

PRI

MOV
MOV
BIC
TSTB
B8MI
BIC

JMP

BAE

#8IT3,STMPI

DATA CORRECT?

658

:BR IF YES

1018

:LOOP ON ERROR

648

TST13

sFLOATING ONE'S ERROR OF PRI

3 66So0
THEN DONE
¥

SEQ 0056

CZKMDAD DMS11-DA STAT‘C MACY11 30A(1052) 21-0CT-81 09:21 PAGE 57
CZKMDA.P11
20-0CT-81 17:03
PRELIMINARY SECONDARY REGISTER READ ONLY TEST
222

.SBTTL

SEQ 0057

PRELIMINARY SECONDARY REGISTER READ ONLY TEST

22;

IRRRRRRRARAARACCCRCRANRAANNS TEST 13 annnnnanaovnnvvonttonevvnes

gg?

R T

54
548
559

s*RECEIVE DATA BUFFER SECONDARY READ TEST
s*DOES A LINE RESETY
:*READS SECONDARY REGISTER SECO

gg%
554

555

ZSS?
2557
2558
2559
2560
561
5
563
2564
2565
%ggg

004322

000004

004340
004342
004350
004354
004360
004366
004374
004376
004400

104417
012737
10“;0
012637
01%7%7
023737
001403
104003
000137

0043246
004332

012737
012737

e e Tl

TEST 13

AR AR AR AR RN AT EIE TR AR AR ARRRANEARCAT AR AR

00001
000013

001102
001262

000000
000000
001202
000000
001202

001240

TST13:
1$:

001204
001204

004340

SCOPE

MOV
MOV

LRESET
MOV
READ
MOV
MOV
CMP
BEQ
ERROR
JMP

#3,STSTNM
#13,TSTNUM
#SECO,REGIST
.SECO
(SP)+,$TMPO
#0,$TMP1
$TMPO,STMP1
TST14
3
18

;s LOAD THE NO. OF THIS TEST
s# FOR TYPE OUT
sSAVE REGISTER FOR TYP OUT
JREAD SECONDARY DATA
;:POP STACK INTO $TMPO
sLOAD EXPECTED INTO $STMP1
;COMPARE RESULTS
HH
sREAD ERROR OF SECO
;LOOP ON ERROR

%ggg

JRRRRRRARRAAARCRCERRRNARRANSE TEST 14 tantnannnantnrtsrtvetvetets

%g;%

2570
2571

s*RECIEVE STATUS SECONDARY READ TEST
;*READS SECONDARY REGISTER SEC1

,‘2,2;;-

2576

2577 004404

2578
2579
2580
2581
258%
2583
584
2585

0044
004414
004422
004426
004432
0044
004442
004450

000004

012737
012737
104417
012737
1044;0
012637
01;7;7
023737

000014
000014

001192
001262

000001
000001
001202
000000
001202

001240

TST14:
1$:

001204

TEST 14

SCOPE

MOV
MOV
LRESET
MOV
READ
MOV
MOV
CMP

#14,STSTNM
#14,TSTNUM
#SEC1,REGIST
.SECT
(SP)+,$TMPO
#0,$TMP1
$TMPO,STMP1

gsgon
;STIS
JMP
1s

228?

s LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT
sSAVE REGISTER FOR TYP OUT
sREAD SECONDARY DATA
2:POP STACK INTO $TMPO
sLOAD EXPECTED INTO $STMP1
;COMPARE RESULTS

:iiEAD
ERROR OF SEC1
:LOOP ON ERROR

JeRRRRRRRRRRRtanteretntnnnns TEST 15 sennnnnnnanantnnvannnnnnens

259

s*TRANSMIT DATA BUFFER SECONDARY READ TEST

559

;*READS SECONDARY REGISTER SEC2

ggg

2598

eIy

-;tttttt;tttttttttttttttt'tttttttttttttttt.tt'tttt'tttttttttttttt

gggg
%228 ?8288%
ggg 004462 000137 004422

5297

TEST 15

:
S

NN RN AR AR

RR RN

e e e I T

AR RARAARARRRNS

CZKMDAO DMS11<DA STATIC MACY11 30A(1052) 21-0CT=81 09:21 PAGE 58
CZKMDA.P11
20-0CT-81 17:03
PRELIMINARY SECONDARY REGISTER READ ONLY TEST

% o 93 n%g?gr 000015
1 882276 81 737 000015

00110
0012

004502 012737 000002
004514
1044 g

001240

608

004504

104417

0045

0129

120

- 353" #15,8TSTNM
MOV
#15, TSTNUM
18:

004542

}(‘) 004544

140

10400

000137

MOV
READ

csscs(REGIST

;SAVE REGISTER FOR TYP QUT
READ SECONDARY DATA

MOV
CMP

STHP1
swo STMP1

OAD EXPECTED INTO STMP1
:COMPARE RESULTS

ERROR

MOV

004524 015 7
001204
0045
88 7 001202 001204
00454

LRESET

Ismo $TMPO

BEQ

004504

LOAD THE NO. OF THIS TEST
l FOR TYPE OUT

JMP

..POP STACK INTO $TMPO

TST16°

:LOOP ON ERROR

*READ ERROR OF SEC2

22}%

JRRRARAANAARAANCACENACEOANANARSE TEST 16 tnnanannannnonavtetttvrtanen

2619

:«THE FOLLOWING BIT(S) ARE NOT CHECKED

2614
2615

*«TRANSMIT STATUS SECONDARY READ TEST
**READS SECONDARY REGISTER SEC3

261

:v wx CBITO'BITS!BITSL>

2613

2619
52229
262

2623

004550

2626

006566

000004

2624 004552 012737
2625 004560 012737

001102
001262

2627 004570
2628 004576
2629 004602

012737 000003
104.4.;0 000003
012637 001202

001240

263§

004622

023737

001202

001204

004634

000137

004566

2630

012737 000000 001204

2631 004614 042737 000160 001202

2633
263,

gg;g

004630
004632

001403
104003

t§716:
18:

TEST 16

SCOPE

MOV
MOV

#16,STSTNM
#16, TSTNUM

MOV
READ
MOV

#SEC3.REGIST
,SEC3’
(smo smpo

LRESET

MOV

BIC

20.$

CMP

BEQ
ERROR

$TMPO, STHP1
1sT17°
3

JMP

2637

2638

; LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT
;SAVE REGISTER FOR TYP QUT
READ SECONDARY DATA
..POP STACK INTO STMPO

oem'ans'am impo
1s

EXPECTED INTO STMP1

:MASK DON'T CARE BITS
:COMPARE RESULTS

hm ERROR OF SEC3

:LOOP ON ERROR

:tttttttttttttttttt'tttttttt TEST 17 L 3333333333333 3133332331322

2639

:*SYNC SECONDARY ADDRESS SECONDARY READ TEST

2640

:*READS SECONDARY REGISTER SEC&

2“}

2 i3

gfiz

“S

3332322321333 3 1131321322213 21232323232 232222223223222221%

ttttttttttttttttttttttttt'ttttttttttt.Q..tttt.t.tttltttt'.ti'tt

000016
000016

104417

646

004640

gu.o

004656

651

004663

000004

012737 000017
012737 000017

00110
00126

650 004660

012737

008882

001240

652
2653
2654

0129
o1§ 37
023737

1202
0
001202

00667,
004676
004704

1o¢4§9

TEST 17

tttttttttttttttttttttttt"t'tttttttt'tttttttttttttttttltt'tt'tt

2647 004642
2648 004650

104417

3132232233333 33333312313 322323232333223223222232222222223

001204
001204

t§7T17:
18:

SCOPE

MOV
MOV

#17,STSTNM
#17.TSTNUM

MOV

#SEC4,REGIST

;SAVE REGISTER FOR TYP OUT

MOV
MOV
CMP

(SP)+,$TMPO
#0.$THP1
$TMPO, STMP1

::POP STACK INTO $TMPO
:LOAD EXPECTED INTO STMP1
:COMPARE RESULTS

LRESET

READ

,SECé4

: LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT
sREAD SECONDARY DATA

SEQ 0058

5
CZKMDAO DMS11=DA STATIC CY1‘I 30A(1052) 21-0CT=-81 09:21 PAGE 59
CZKMDA.P11
20-0CT-81 17:03
PRELIMINARY SECONDARY REGISTER READ ONLY TEST
SS

004712

00140

004716

0001

59 004714 1ol.og

BEQ

004656

R 2

004722
004724
004

004740

004742

004750

2674 004754
2675 004760

oooogl.
012737

TEST 20

#20,8$TSTNM
#20,TSTNUM

MOV

#SECS,REGIST

sSAVE REGISTER FOR TYP OUT

012637 001202
012737 000000 001204

MOV
MOV

(SP)*.STHPO
#0.$TMP1

;:POP STACK INTO $TMPO
:LOAD EXPECTED INTO STMP1

104003

ERROR

012737

00110
00126

012737

000005

001240

104417

104420

000005

023737
001403

001202

%287(9)

005000

000137

004740

ST20:

18:

LRESET

READ

001204

.SECS

CMP
BEQ

$TMPO,STMP1
1ST21

JMP

2681

2682

;s LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT

READ SECONDARY DATA

;COMPARE RESULTS

*READ ERROR OF SECS
:LOOP ON ERROR

JRRRRRRRRRRAACARCERERRRRNANRSCESY TEST 27

2683

wetanantnnatvattvatttrtatns

tCHARACTER LENGTH SECONDARY READ TEST
tREADS SECONDARY REGISTER SEC7

2685

R i

gggg

: TEST 21

2689

2690 005004

000004

005006
005014
005022
005026

012737
012737
104417
012737

000021
000021

001102
001262

000007

001240

697

012737

000000

001204

699

005056

001403

005062

000137

2695 005032
96 8850

698 005050

005

10“§0 000007
012637 001202

023737 001202 001204

104003

R i a2

R R R R

s I s I IIIIIIIIIIIIL

tnntttuntnntntttn"tnttnnnn"tttnnnntnnn"t

2691
269;
2693
696

2701

SCOPE
MOV
MOV

000020
000020

004766
004774

2678 004776

-;ttnnhntnnttnunu"ntn"t"tnntnnnu"nnnnn

2676
2677

2700

;LOOP ON ERROR

-REAos SECONDARY REGISTER SECS

:*MODE CONTROL SECONDARY READ TEST

664

26;;

:READ ERROR OF SEC4

JRARARARRRRRRRRteteeentnennn TEST 20 wenvntnennnnaetneenntetetes

66§

2669
5270

JMP

gfi‘?z

15120

ERROR

SEQ 0059

005022

t§121:
1$:

scope

MOV
MOV
LRESET
MOV

#21,8TSTNM
#21,TSTNUM

#SEC7 ,REGIST

sSAVE REGISTER FOR TYP OUT

MOV

#0,8$TMP

sLOAD EXPECTED INTO $TMP1

BEQ

TST22

;LOOP ON ERROR

READ
MOV

CMP

ERROR
JMP

SEC?
(SP)* 8THPO

$STMPO, STHN

;s LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT

sREAD SECONDARY DATA
2:POP STACK INTO $TMPO

;COMPARE RESULTS

:READ ERROR OF SEC7

CZKMDAO DMS11-DA STATIC CY11 30A(1052) 21-0CT=81_09:21 PAGE 60
17:03
CIKHDA.P11
RECEIVE STATUS REGISTER WRITE TEST
20-0CT~
.SBTTL

SEQ 0060

RECEIVE STATUS REGISTER WRITE TEST
IRRRRARARRAAARRENRCRAARNs
“4h TEST 22 tatananeasnteaenttttaeetees

;*RECEIVE STATUS REGISTER SECONDARY) BIT TEST
:"HSR;gT'QOES A WRITE ) THE READ ONLY BITS

;*AND THEN CHECKS TO MAKE SURE IT WAS NOT WRITTEN

SINARARRARRAAAA

;

AT AAAAARAAAAAAAAARRARAAAAAAAAAAAAAAARAAAAAAAOAOY

TEST 22

2;22;§§
YNV

——
SN

HN ONONES
W
o
W
|

OO
=2 000
=4

—b

82SR
v

g33383838888sss

ltt.ttttll.t....ltl".'."'t..t.Q..l'.t.t..fi.'tt.'ttfi.t"".".

tér22:

00002
00002

000001

fggsst
000001
001240

WRITE

ggxo

177;76 001202

001204
001202

SCOPE
MOV

MOV

BIC

:# FOR TYPE OUT

,SEC1,RSOM

;WRITE THE READ ONLY BIT RSOM

SP)+,$TMPO

::POP STACK INTO srnpo

srnpg.srnp1

:LOAD EXPECTED INTO STMP1
sTEST IF SET

'555}JREGIST

ERROR

005104

: LOAD THE NO. OF THIS TEST

#22.TSTNUM

:SAVE REGISTER FOR TYP OUT

c‘c<a§on> $TMPO :CLEAR UNWANTED BITS

CLR
CMP
BEQ

001204

#22,$TSTNM

Enaoa RSOM CAN BE WRITTEN

JMP

:LOOP ON ERROR

JRRRRARRRRRRRRRARRCRRRRRANNt TEST 23 sentnnnnnavsttnntttttvvtnns

:*RECEIVE STATUS REGISTER (SECONDARY) BIT TEST
:7f£saggit
DOES A WRITE TO THE READ ONLY BITS

;%AND THEN CHECKS TO MAKE SURE IT WAS NOT WRITTEN

SIRRARRAARAAAAAAAAAAARAARAAAAAARAARAAAAAAAAAAAAAAAAAAAAAAAAAARRELS

TEST &3

tItl'.t'ttttttfi"tt't""ttt.'tttltttttlt..t'l..tttttIt.'l.tt.'

00002
00002

001102
001262

000001

000005
00124

177;°g 001202
001202 001204
005200

t5123:
1$%:

SCOPE

MoV

#23,8TSTNM

; LOAD THE NO. OF THIS TEST

E2¥SET #23.TSTNUM
WRITE

, SEC1,REOM

:# FOR TYPE OUT

sWRITE THE READ ONLY BIT REOM

MOV

OSEC}+REGIST

MOV
BIC

(SP)+,$TMPO
;::POP STACK INTO STHPO
o‘c<aéon>.srnpo*CLEAR UNWANTED BITS

gg:

srnsoL$THP1

READ

CLR

ERROR
JMP

SEC

sSAVE REGISTER FOR TYP OUT

$TMP

*LOAD EXPECTED INTO STMP1

*ERROR REOM CAN BE WRITTEN

:TEST IF SET

:LOOP ON ERROR

JRtRtRRRRNRRRRnenennrnnnnnnt

TEST 24

wenanannnnnnnnnnreanansneens

CZKMDAO DMS11-DA STATIC MACY11 30A(1052) 21-0CT-81 09:21 PAGE 61
CZKMDA.P11
20-0CT-81 17:03
RECEIVE STATUS REGISTER WRITE TEST

SEQ 0061

758

s*RECEIVE STATUS REGISTER (SECONDARY) BIT TEST

760

% %% RXGA #»

759

'THIS TEST DOES A WRITE TO THE READ ONLY BITS

761

:'NO THEN CHECKS TO MAKE SURE IT WAS NOT WRITTEN

;2;

;g’so
769

767

005256

768

005260

144

5%2

773

005312

;98

0137 7

000024

00110

419

000001

000004

10“;9

000001

55?6 012737 000026
5274

182417

012737

774
775

005316
005

0156
042737

2;;8

00?343‘2.

85?{05

779

885

779 005344

%;3(1)

005346

0050%7

104004

000137

fSr24:

00126

000001 001240

score

e e e T T T

MOV

LRESET

WRITE

AT R TR RN AR RN AR ARERRANEARERCANRATARRARRRES

#24,STSTNM

;s LOAD THE NO. OF THIS TEST

4 TSTNUM

l FOR TYPE OUT

SECT.RXGA

JWRITE THE READ ONLY BIT RXGA

MOV

bsect REGIST

:SAVE REGISTER FOR TYP OUT

.SECT

001204

5'5'5

STH’?LSTMP1

CLR

I.OAD EXPECTED INTO $TMP1

TEST IF SET

ERROR

005274

T T

‘ERROR RXGA CAN BE WRITTEN

JMP

.I.ON’ ON ERROR

JRRRRRRAARAAAAERCCARRRRnsnnn TEST 25 NARRRRAANRAAARAAARAARERAARE
tRECEIVE STATUS REGISTER (SECONDARY) BIT TEST

'THIS TEST DOES A WRITE TO THE READ ONLY BITS

;t t#w ROR #«

s*AND THEN CHECKS TO MAKE SURE IT WAS NOT WRITTEN
R

; TEST 25

??
5797
2792

AR AR

2793 005352

000004

%7732 00%%

?&Z{; 000025

000025

001105

2797 005372

005354

012737

10“19
000001

000010

801

005416

04% ;7 7

001202

88?236

8‘2)%3;

001204

00126

;% %2200 (1)6%{3 001240
800 005412 012 gg
Og ;O;
802

005426

2805

005440

AR AR AR AR

001202

001204

;gg

281

L T

(SP)* $TMPO
2:POP STACK INTO ST!PO
l‘C(RXGA) $TMPO ;CLEAR UNWANTED BITS

2787

810
811

MOV
BIC

2786

gggg

001202

2785

00120
177773

2784

5334

TEST 24

READ

5;3%

2796

005442

005037

mogl.

000137

1202

005370

t§725:
'

ScOPE

L R

e T R LRI

#25,8TSTNM

:gxo
MOV

WRITE

iggg} REGIST
(SP)# $TMPO

JWRITE THE READ ONLY BIT ROR

CLR

$STMP

LOAD EXPECTED INTO $TMP1

BIC

S'E';

ERROR
JMP

#25.TSTNUM

.ROR

0‘C<ROR> $STMPO

Sffiég.tmfl

RAR AN ARN AR EANEAAACARCARRRARRAAER

1))

rg\E'SET

)

;s LOAD THE NO. OF THIS TEST

:# FOR TYPE OUT

SAVE REGISTER FOR TYP CQUT
2:POP STACK INTO $TMPO
;CLEAR UNWANTED BITS

TEST IF SET

*ERROR ROR CAN BE WRITTEN
:LOOP ON ERROR

JARRRRRARRARRRCRCERCERARRanns TEST 20 AEARRRRAARAAREAARRARREACARS
s*RECEIVE STATUS REGISTER (SECONDARY) BIT TEST
s*THIS TEST DOES A WRITE TO THE READ ONLY BITS
:% wx ABCA #

s*AND THEN CHECKS TO MAKE SURE IT WAS NOT WRITTEN

MACY11 30AC1052) 21-0CT=81 09:21 PAGE 62
17:03
RECEIVE STATUS REGISTER WRITE TEST

SEQ 0062

::t.l'......'."."".'..'Q'.l.'.t.t.'...".Q"Q..'.""'Q..'Q'.

TEST 26

t.t.'."tt..'.....tt'..'"'.C..t't'l't..'.t.t.t.'...'.'.'."'.'

38%36 88"25

g3533¢

Ufl\"UiEhJ

O—=
O ==

0012

000001

1240

177757

001202

001204

ooooo;
ogC1: go:;
001204

t4726:
-

SCOPE

MOV

o 6,$TSTNM

WRITE

iggg} REGIST
(SPj+,$TMPO

1,ABCA

:gxo
MOV
BIC

n FOR TYPE OUT

;WRITE THE READ ONLY BIT ABCA

;SAVE REGISTER FOR TYP OUT
:POP STACK mro $TMPO

m«éw STMPO:ELEAR UNWANTED BITS

CLR

g?;

srmg.stm

ERROR

005464

LOAD THE NO. OF THIS TEST

fg\s'ssr 6. TSTNUM

:LOAD EXPECTED INTO ST

TESt IF SET

tnaoa ABCA CAN BE WRITTEN

JMP

:LOOP ON ERROR

JRRRRRRARRRRRARRCECRRRRANNNNSY

TEST 27 atnaanaaatttatantattanttnes

:*RECEIVE STATUS REGISTER (SECONDARY) BIT TEST
:T&:{SA;EgT
DOES A WRITE TO THE READ ONLY BITS

;%AND THEN CHECKS TO MAKE SURE IT WAS NOT WRITTEN

s iRRARAARAAAAAANRAAAARANAARAAAARAAAAAAAARAARAAAAAAAAARAAAAAAARNS

TEST 27

ttttttttttttt.tttttitttttt.ttttt.tttttttttttit.t.ttttt'ttttt.tt

000027 00110

000027 00126

000001
000001

000040
001240

000001
oggg;
177
001202
001504
001202 001204

005560

t4127:

SCOPE

MOV

#27.8TSTNM

WRITE
MOV
READ
MOV
BIC
CLR
g?;

,SEC1.ABCB
;WRITE THE READ ONLY BIT ABCB
#SEC1.REGIST
:SAVE REGISTER FOR TYP OUT
SEC1
<sp)o $TMPO
::POP STACK INTO STMPO
m«éc» $TMPO :CLEAR UNWANTED BITS
$STMP
:LOAD EXPECTED INTO STMP1
sm;g,$THP1
resr IF SET

ERROR

rggm

JMP

LOAD THE NO. OF THIS TEST

#27.TSTNUM

4 FOR TYPE OUT

tanon ABCB CAN BE WRITTEN

*LOOP ON ERROR

Jennnnnnnnnnesneenesecennnns

TEST 30 weensnnnnnnnnnnsannsnnnnnnn

s*RECEIVE STATUS REGISTER (SECONDARY) BIT TEST
::TQ{S&E%T.BOES A WRITE TO THE READ ONLY BITS

;*AND THEN CHECKS TO MAKE SURE IT WAS NOT WRITTEN
SRR

RRARRAAAR

TEST 30

RN ENANARANARAANRAARAAARACNAANRAANRAARARARRARCRNNS

CZKMDAO DMS11=DA STATIC MACY11 30A(1052)

CZKMDA.P11
m

‘;1

37
874
grs

';9
8
3;3

-go-ou-b 17:0;

09:21

PAGE 63

SEQ 0063

'Qt"."t.t......"'t""...'..Qtt.t.'.t....tt.tt..'t.tt.'.'t..

5628 m
110
$730: MOV
383" 0§g'rsmun
STSTNM
12737
8888%8
88
65
1822"
$:
LRESET
656

19
880 og

ITE

2664 %lz.z
124
76 01
mgg
g?o% §3 9 7 °9 ; 001202

880 00571
881 005714

aa;

21-0CT=81

RECEIVE STATUS REGISTER WRITE TEST

005722

037
737

:gxo
MOV
BIC
CLR
CMP

001204

001403

BEQ

883 005724 1
8‘3‘5’ 005726 000137 005654

ERROR
JMP

LABCC

LOAD THE NO. OF THIS TEST

c FOR TYPE OUT

:WRITE THE READ ONLY BIT ABCC

mgJREGIST :SAVE REGISTER FOR TYP OUT
tsmo $TMPO
:POP STACK INTO smo
rc«éco STMPO tL
AR UNWANTED BITS
$TMP
swo.srm

:LOAD EXPECTED INTO STMP1
resr IF SET

&
1s

tnnoa ABCC CAN BE WRITTEN
:LOOP ON ERROR

ST31

gg?

JRRRRRARARRANRERCCEAAAARANNR TEST 31 srnnnanttentRRRRRARRRRRORES

2891

s*AND THEN CHECKS TO MAKE SURE IT WAS NOT WRITTEN

888
889
890

s*RECEIVE STATUS REGISTER (SECONDARY) BIT TEST
:«THIS TEST DOES A WRITE TO THE READ ONLY BITS
:% #% ERRCK w*+

%gg

; IRRRRARRANAAANRRRNAAAAAARNANRAAAAAARAARAARAAARANAANAAAANAAAAR RN D

897 005732

2898
2899
gggo
1
%g

005734
005742
005750
005752
005760
oosreg

000004

015737
012737
104417
1044.19
01273

TEST 31

Qtttttttttt.tt.t.t..t'tt'.ttttttttttttt.tt.lt.....tttttlt't'iit

000031
000031
000001
oooom

101.1.59

oonog
00126
ooosoo
001240

t4731:
18:

SCOPE

MOV
#31,8TSTNM
MoV
#31.TSTNUM
LRESET
WRITE
,SEC1,ERRCK
MOV
#SEC1.REGIST
READ

,SEC1

: LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT
:WRITE THE READ ONLY BIT ERRCK
:SAVE REGISTER FOR TYP QUT

2904 00577 otse
gg;
S 005776 042737 177
001202

MOV
BIC

(SP)+,$TMPO
::POP smcx INTO STMPO
#*C<ERRCK>, $TMPO
LEAR UNWANTED BITS

006010 023737 001202 001204
006016 001403

CMP
BEQ

smg.srm
TST3

005750

JMP

006020
006022

CLR

5309
10

005037 5

$TMP1

:LOAD Exbecreo INTO STMP1

4
1$

‘ERROR ERRCK
osm BE WRITTEN

tm IF SET

:LOOP ON ERR

3BV
SoalE

.80-0(T°‘1 17:03

21-0CT-81_

09:21

PAGE 64

TRANSMIT DATA BUFFER REGISTER FLOATING ONE'S TEST
+SBTTL

TRANSMIT DATA BUFFER REGISTER FLOATING ONE'S TEST
Jetnnnnntnanetenetennnnennnt TEST 32 anennennnnnnnnecsennnenneee

s*TRANSMIT DATA REGISTER (SECONDARY)
s*INCREMENT ONE'S TEST

SINARRARAARAAAARCRAARAAAAAAAAAAAAAAAAAAAAAAAAAANAAAAACAAACAACONS

TEST 32

--'..'t.;Q.'t.t.'Qttt'tttt'.t.t..'.tt'...t....ttt'tt....tt.'..t.'

01
4

1
01
12

1046414

104416

76
88210
110

3
000002
000002

013737 006070

006116 001403

oomso

10401;

oomig

oos; 7

006142

104417

006122 oootg

001202

1ou.§g
012637
oosogr
023737

%}93 ?32‘6?;
006172 000137

MSTCLR

658:

0
READ
MOV

001204

006070

ooooos
00120
001204
001202 001204
006142

18:

001204

006062

scoPe
MOV
MOV
MOV
MOV

648:

006132
032737 000400 006070
006140 001751

006144
006150
006154
005160

t§132:

126
006070
001240

000002

000000
104420
00000
012637 00120
123737

83"05

0060
gggg

R I S B R N O R IS S O VO N i o — h?i
§

AD DMS11=DA STATIC MACY11 30A(1052)

WRITE

,SEC2
,SEC2

(SP)+,$TMPO
658,$TMP1

BEQ

663

ERROR

28:

#32.TSTNUM
#B171,65%
#SEC2.REGIST

MOV

CMPB

668:

:;g.srsm

JMP
INC

STMPO,STMP1

: LOAD THE NO. OF THIS TEST

:# FOR TYPE OUT
*START WITH BIT 0
;SAVE REGISTER FOR TYP OUT

:DATA
*READ THE DATA JUST WRITTEN
::POP STACK INTO $TMPO
:LOAD EXPECTED

STEST IF CORRECT

“YES GO TO

10.

:SECONDARY REGISTER INCREMENT ONE'S FAILURE

658

*LOAD NEXT DATA

*LOOP ON ERROR

BIT
BEQ

#8178,65%
648

READ
MOV
CLR
cmP

,SEC2
(SP)+,$TMPO
$TMP1
sm»g.srm

;READ AND TEST IF CLEARED
::POP STACK INTO S$TMPO
:LOAD EXPECTED
STEST IF ALL CLEAR

JMP

:LOOP ON ERROR

LRESET

2530& W’

*TEST IF ALL DONE
*NO GO TO 64$

‘DID NOT CLEAR AFTER RESET

SEQ 0064

20-0CT

MACY11 30A(1052)

17:03

21-0CT-81

09:21

SS——|

lalnl

KMDAO DMS11-DA STAI‘

KMDA.P11

PAGE 65

TRANSMIT STATUS REGISTER (SECONDARY) READ WRITE TEST
.SBTTL

SEQ 0065

TRANSMIT STATUS REGISTER (SECONDARY) READ WRITE TEST
JRtRRRRRRRRRRRteReeeeanennans TEST 33 anvnnnttatttRtttRRtRRRRRAIRSY

s*TRANSMIT STATUS REGISTER (SECONDARY) BIT TEST

s*THIS TEST DOES A:

e
i
Hd
i

S
7

9
70

006176

164
16
w 4

006234

006250

ggr

29764
2975
2976
2977

006242

0157 7
012737

000033
000033

001102
001262

10“18
10“§
012637

00000;
00000
001202

000001

012737 000001

001204

1046417

04 737

023737

177776

001202

001204

001403
104005
000137

006300

01%6 7

001;02

005037
023737
001403
104005
000137

007204
001202

2985
ggg

006312
006316
006324
006326
%3332

2938
2989

334
342

10“19
10441

000003

2990
2991

006296
006274

006306

006214

104416
1044%0

000003

042737

177776

000000

006214

000001

3
001;92 h

006
0063

0050%7
023737
001403

001204
001202 001204

Zggz

0064

000137

006342

éooo

999
1

006376

042737

104019

177778+

4$:

TEST 33

001202

scope

MOV
MOV

LRESET
WRITE
READ
MOV

e LI

18:

;s LOAD THE NO. OF THIS TEST
s# FOR TYPE OuUT
sSET BIT TSOM
JREAD VERIFY
::POP STACK INTO STMPO

#TSOM, STMP1

;LOAD EXPECTED

BEQ
ERROR
JMP

i$
S
43

sTRANSMIT STATUS REGISTER TSOM WRITE FAILURE
;LOOP ON ERROR

WRITE
READ

,SEC3.0
.SEC3

JRESET BIT TSOM
sREAD VERIFY

BIC

#-C<TSOM>,$TMPO ; CLEAR UNWANTED BITS

BIC

#-C<TSOM>, STMPO :CLEAR UNWANTED

CMP

STMPO,STMPT

MOV

CLR
CMP
BEQ
ERROR
JMP

5%:
:

#33,8$TSTNM
#33,TSTNUM
,SEC3,TSOM
.SEC3
(SP)+,$TMPO

MOV

001204

10“;0
012637

882354

75133:

001202

006344
006350

S?’gi

-;Qttttt;tttt'tt.t'ttttt't'.tttt.tltttt.ttttttttttttttttt.t.tt.t'

006256
006260
006262
006266

78
79

1. WRITE AND A READ VERIFY
« CLEAR AND A READ VERIFY
« WRITE AND A LINE RESET THEN A READ VERIFY
OF BIT TSOM

(SP)+,$TMPO

;:POP STACK INTO $TMPO

sLOAD EXPECTED
sTEST FOR RESET
JYES SKIP ERROR
STRANSMIT STATUS REGISTER TSOM FAILED TO CLEAR
:LOOP ON ERROR

WRITE
LRESET

,SEC3,TSOM

JWRITE TSOM

BIC

.SEC3
(SP)+,$TMPQ

JREAD VERIFY
::POP STACK INTO $TMPO

#-C<TSOM>,$TMPO :tLEAR UNWANTED BITS

ERROR

$TMP1
$TMPO,$TMP1
TST34

sLOAD EXPECTED
sTEST FOR A RESET
HH

:LOOP ONERROR

READ
MOV

CLR
CMP
BEQ

JMP

S$TMP1
$TMPO,STMPY
gs

sTEST FOR A SET

.‘fRANSHH STATUS REGISTER TSOM FAILED TO CLEAR AFTER RES

JRRRRARARRAARRRRRRRRRRnnnnnt TEST 34 aanannsaannnnnennsnttnnetnne
s*TRANSMIT STATUS REGISTER (SECONDARY) BIT TEST

s*THIS TEST DOES A:

i
H

1. WRITE AND A READ VERIFY
2. CLEAR AND A READ VERIFY

seesesesnananas Ng
§
g

SEEEEEEEEY
U“flU“AU“hU“hU“ASEERERRRe

VONOWVNSWN=O
VRN NS

§§%&fi&&£

888
BEEELSB8BELEESEYNN
N
VIS
NN
WNN=O
ARLEIBNRTRR
OVRBNO
VS WN—=O

lalnl

DMS11<DA sw‘c MACY11 30A(1052)
11

20-0CT-81 17:03

21-0CT=81

09:21

PAGE 66

TRANSMIT STATUS REGISTER (SECONDARY) READ WRITE TEST

SEQ 0066

3. WRITE AND A LINE RESET THEN A READ VERIFY

OF BIT TEOM

;:ttt.Qtt.tQtt't"tt'.t'.tttt.t.t""'.'.t't'.'tt'."t""t.'tt.

-'Qttttt;t'tQt'tt'ttttt'."Q!tQttt'.ttttttttt.ttttt't.t'tt.t'tt"

006404

006406 3157 7
006416 012737
006422 104417
006426 104416
006432 1ou.§9

000034 00110
000034 00126
ooooog 000002
00000

006442

177775

0064

0126

042737

001;0;

T5734:
48:

001403
104005

oou.;g 000137 006422

ooa.”
6"71. 104416 000003 000000
006512

012637

042737

001;0;

177775

001403
104005

882?23 000137 006422

006542 1044.19 000003 000002
006550

006552

10441

1044%0

000003

001;02
177775

BEQ
ERROR

18
S

58:

,SEC3

BIC

#~C<TEOM>,$TMPO :CLEAR UNWANTED BITS

BEQ
ERROR

JMP

23
S

:YES SKIP ERROR
sTRANSMIT STATUS REGISTER TEOM FAILED TO CLEAR

WRITE

,SEC3,TEOM

;WRITE TEOM

READ

LSEC3

JREAD VERIFY

$TMP1
$TMPO,$TMP1

:LOAD EXPECTED
STEST FOR A RESET

LRESET

006602

001403

BEQ

006606 000137 006550

JMP

006604

MoV
BIC

CLR
CMP

104010

;TRANSMIT STATUS REGISTER TEOM WRITE FAILURE

READ

WRITE

012637
042737

006570 005037 001204
006574 023737 001202 001204

*LOAD EXPECTED
*TEST FOR A SET

006556
006562

001202

#TECM, STMP1
$TMPO, STMP1

JMP

CLR
CMP

2:POP STACK INTO $STMPO

#C<TEOM>,$TMPO :CLEAR UNWANTED

MoV

001202

006520 005037 001204
006526 023737 001202 001204
006532
006534

(SP)+,$TMPO

: LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT
:SET BIT TEOM
*READ VERIFY

BIC

MOV
CMP

006502 1ou.§o 000003
006503

SCOPE

MOV
#34,$TSTNM
MOV
#34.TSTNUM
LRESET
WRITE
.sec;.rem
READ
,SEC
MOV

001202

006450 o1§7§7 000002 001204
006456 023737 001202 001204
006464
006466

TEST 3%

ERROR

,SEC3.0
(SP)+,$TMPO

$TMP1
$TMPO, STMP1

:LOOP ON ERROR

;RESET BIT TEOM

*READ VERIFY

J:POP STACK INTO $TMPO

:LOAD EXPECTED
*TEST FOR RESET

:LOOP ON ERROR

(SP)+,$TMPO
2:POP STACK INTO STMPO
#*C<TEOM>,$TMPO :CLEAR UNWANTED BITS

TST35

*LOOP ONERROR

:fRANSHIT STATUS REGISTER TEOM FAILED TO CLEAR AFTER RES

;ttttttttttttttttt"tttttt.t

TEST

35 L 3333333333333 2333233232222 A

*«TRANSMIT STATUS REGISTER (SECONDARY) BIT TEST
:#THIS TEST DOES A:

i
v
i
i

1. WRITE AND A READ VERIFY
. CLEAR AND A READ VERIFY
. WRITE AND A LINE RESET THEN A READ VERIFY
OF BIT TXAB

;:lttttttttttt'tit'ttttttttttttttt!ttQ'ttttttttfitttttttttttttttt

006612

000004

TEST 35

':tttttt;tttttttttttttt'ttttttttttttttttttt't.tQttttt.fitt'tttlttt

TS135:

SCOPE

‘"V‘rNCNFJfi:
S S oo @S OWW
SV (L8 NN

Ogs.STSYNH
#35.TSTNUM

000003
9

000004

WRITE
READ

.sscg.rxaa
,SEC

177

001502

BIC

#AC<TXAB> ,$TMPO :CLEAR UNWANTED

001202

001204

1;9

o
NWVIWNNNNOO

SO NONOS®S

NOWNNNNONO

000063

W
W=20OWWWWN
==

+:POP STACK INTO $TMPO

#TXAB,STMP1
?;nro.srnr1

*TEST FOR A SET

ERROR
JMP

S
48

sTRANSMIT STATUS REGISTER TXAB WRITE FAILURE
*LOOP ON ERROR

WRITE
READ
MOV
BIC
CLR
CMP
BEQ
ERROR
JMP

,SEC3.0
.SEC3
(SP)+,$TMPO
#*C<TXAB>,STMPO
$TMP1
$TMPO, STMP1
28
5
48

;RESET BIT TXAB
*READ VERIFY
+:POP STACK INTO $TMPO
:CLEAR UNWANTED BITS
:LOAD EXPECTED
*TEST FOR RESET
*YES SKIP ERROR
:TRANSMIT STATUS REGISTER TXAB FAILED TO CLEAR
*LOOP ON ERROR

,SEC3,TXAB

;WRITE TXAB

,SEC3
:READ VERIFY
(SP)+,$TMPO
+:POP STACK INTO $TMPO
#*C<TXAB>,$TMPO :CLEAR UNWANTED BITS
¥§?§g.srnp1

gg:

001202

001204

000003
00120
177773

001202

WRITE
LRESET
READ
MOV
BIC

001202

001204

gg:

001204

:SET BIT TXAB
*READ VERIFY

MOV

000000

000004

(SP)+,$TMPO

58:

CLR

ERROR

006756

JMP

:LOAD EXPECTED

$STMP1

:LOAD EXPECTED

:TRANSMIT STATUS REGISTER TXAB FAILED TO CLEAR AFTER RES

*TEST FOR A RESET
*LOOP ONERROR
TEST

annannnnnennevsanttnvetetnns

*#TRANSMIT STATUS REGISTER (SECONDARY) BIT TEST
*#THIS TEST DOES A:

i
*
e

1. WRITE AND A READ VERIFY

. CLEAR AND A READ VERIFY
. WRITE AND A LINE RESET THEN A READ VERIFY
OF BIT TXGA

::tttttt'ttt't't"'tt'ttttttttt.tttttttlt't'tttttt'.fi.ltttt"..t

TEST 36

"tttt.t;t.ttttttttttttt"'tt.ttttittltittt.tttit.'t'ttttti.tt.tt

000036
000036

0003

1;0;

177767

000030

001102
001262
000010

001202
001204

TS136:
=

SCOPE

MOV
fggssr

#36,$TSTNM
#36.TSTNUM

WRITE
READ
MOV

.secg.rch
.SEC
(SP)+,$TMPO

:SET BIT TXGA
*READ VERIFY
+:POP STACK INTO S$TMPO

#TXGA,STMP

*LOAD EXPECTED

BIC

MOV

SEQ 0067

: LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT

JRRRRRARRARAANAEACERRCRNANARANAS

NNNOOANNN

S8RSR

MOV

001204

006630

SPER SB

—>

gRe ey

MOV
fggser

000003
000003
091;05
177773
00120%
001202

o
EW

&N
NORO o

001105
00126

000004

gge3es&
=
N

R
ggesesee
FSPIILRE
SS
AN O BB IC AR
PN

N NN
N AN NN

N N

N AN NN

SSSC
s
s

8888;5
§

o
N
8
823§§
-Nwnirnon

(-=0

&»H

sEsife§§§§§ “

nacv;1 30A(1052) 21-0CT=81 09:21 PAGE 67
17:0
TRANSMIT STATUS REGISTER (SECONDARY) READ WRITE TEST

: LOAD THE NO. OF THIS TEST
*# FOR TYPE OUT

#AC<TXGA> ,$STMPO : CLEAR UNWANTED

— 2

001202

]
7

007036

H~N

8258&

;

S NONONS

37
g?

7
03
5
7

[]
—s

19
1

o
~
D OB NONOEESs

O b b b

—_00

g SReR32222 82SR8R322

—
NN
NWNWWWWWWWW
B

N A N N N N N NN N AN NN NN NN W W N N W W W

T&C MACY11 30A(1052)
21-0CT-81
09:21
PAGE 68
-81 17:03
TRANSMIT STATUS REGISTER (SECONDARY) READ WRITE TEST

7
37
37
3;

000002
00000

001204
18

000000

091;0
177767

001202

001204

007036

000003

000010

000003

001202
177767
001204
001202
007164

001202
001204

85”6

?;W.STHP‘I

sTEST FOR A SET

ERROR
JMP

5
4%

sTRANSMIT STATUS REGISTER TXGA WRITE FAILURE
:LOOP ON ERROR

WRITE
READ

,SEC3.0
,SEC3

sRESET BIT TXGA
sREAD VERIFY

$TMPO,STMP1
gS

sTEST FOR RESET
sYES SKIP ERROR
sTRANSMIT STATUS REGISTER TXGA FAILED TO CLEAR
;LOOP ON ERROR

MOV
BIC

CLR

SEQ 0068

(SP)+,$TMPO
:;POP STACK INTO STMPO
#*C<TXGA>,$TMPO ;CLEAR UNWANTED BITS
$TMP1
sLOAD EXPECTED

CMP
BEQ
ERROR
JMP

58:

WRITE
LRESET

,SEC3,TXGA

;WRITE TXGA

MoV
8IC
CLR
gg:

,SEC3

(SP)+,$TMPO
#*C<TXGA>,$TMPO
$TMP1
glrfl;g.flm"l

sREAD VERIFY

ERROR

:TRANSMIT STATUS REGISTER TXGA FAILED TO CLEAR AFTER RES

READ

JMP

:;POP _STACK INTO $TMPO
;CLEAR UNWANTED BITS
sLOAD EXPECTED
sTEST FOR A RESET
;LOOP ONERROR

.SBTTL

SYNC SECONDARY ADDRESS REGISTER (SECONDARY) FLOATING ONE'S TEST
JRnRRRRRRRntereeeetenennnnnt

TEST

37 sannnnnnnndettenentestontne

:*SYNC SECONDARY REGISTER (SECONDARY)
'INCREKNT ONE'S TEST

IRARARAAAAAANAATAAAANAAAANAARNAANAAAAAAAEAAAAAAAAARAARANAARAAONY

TEST 37

QQttttttttttttttttttttt'tttttQtQttttQttttt.t'tt't'.ttt.tt'.t"t

#37,$TSTNM
#37.TSTNUM
#B171,658
#SEC4,REGIST

007262
7266

104414
104416

000004

MSTCLR
WRITE

,SECé

104420

000004

READ

.SEC4

007270

007%6
007 S
007310
007316

012637
013737
123737
001403

007320 10‘01;
007322

000137

001202
007270
001202

005237

007270

007344

10“§0

000004

7350
007354
007360

032737
001751
104417
012637
005037
023737

7366

001403

007372

000137

007370

104013

658:

000400

001202
001204
001202
007342

007270

BEQ

66$:
28:

001204

MoV
MoV
CMPB

001204
001204

007262

007326

007332
7340
007342

18:
64$:

oooggl.
t47137: SCOPE
012737 000037 001102
MOV
015737 000037 001262
MOV
01 7;7
007270
MOV
012737
001240
MOV

0072
007230
007236
007244
007252

AV AVLIV [VLV V.]
SNNN
~

N N N N NN N NN N

N W W

".'fi‘.’f‘.’!‘.’f‘.‘!".’f“_!d“fifig‘flgfi‘g‘fitfifigfiafifi....a..\-’a';;:.‘::..:..
SRV NN NS e L R A R AR Z S SRR RUK LSS S NEGR

CZKMDAO DMS11-DA STATIC CV‘|1 30A(1052) 21-0CT-81 09:21 PAGE 69
CZKMDA.P11
20-0CT~81 17:03
SYNC SECONDARY ADDRESS REGISTER (SECONDARY) FLOATING ONE'S TEST

(SP)+,$TMPO
658 ,$TMP1
STN’O.‘T”I

ERROR

66$

INC

65$

JMP

10.
18

: LOAD THE NO. OF THIS TEST
*# FOR TYPE OUT
*START WITH BIT 0
;SAVE REGISTER FOR TYP OUT
:DATA

READ THE DATA JUST WRITTEN

:;POP STACK INTO $TMPO
sLOAD EXPECTED
TEST IF_CORRECT
ES GO TO 66$

SECWA&Y REGISTER INCREMENT ONE'S FAILURE
:LOOP
ON ERROR

:LOAD NEXT DATA

BIT
BEQ
LRESET

#8178,65%
648

;TEST IF ALL DONE
:NO GO TO 648

MoV
CLR
CMP

.SEC4

(SP) +,$TMPO
$TMP1
$TMPO,STMP1

sREAD AND TEST IF CLEARED

READ

BEQ

ERROR
JMP

TST40

11.

:;POP STACK INTO $TMPO
sLOAD EXPECTED
;TEST IF ALL CLEAR

610 NOT CLEAR AFTER RESET
:LOOP ON ERROR

SEQ 0069

alisl

ZKMDAO DMS11<DA sm‘c MACY11 30A(1052) 21-0CT-81 09:21 PAGE 70
ZKMDA.P11
20-0CT-81 17:03
MODE CONTROL REGISTER (SECONDARY) READ WRITE TEST

180

.SBTTL

}31

1g§

SEQ 0070

MODE CONTROL REGISTER (SECONDARY) READ WRITE TEST

JennnRnRnnentteneseeannnnnet TEST 40 tenanenntenanteneessntnnens

184

:*MODE CONTROL REGISTER (SECONDARY) BIT TEST

185

:*THIS TEST DOES A:

189

1. WRITE AND A READ VERIFY

188
189

i
.

. WRITE AND A LINE RESET THEN A READ VERIFY
OF BIT PROTEX

190

}3;

195
196
197

007376
007400
007406

oooogl.
012737
012737

198
199

007414
007416

0074
007434

o129 7
062737

007456

001403

3206
S

007424

104417
104416

3210
3211
321;
3213
3214

000040
000040

oonos
00126

000005

:
000001

001;02
177776

001202

104.450 000005

104416 000005 000000

007474
007500
7506
007512
007516

1o:.4§o
012637
042737
005037
023737

000005
001202
177776 001202
001204
001202 001204

333}; 88;;332

000137

007414
000005

515
16

TST40:
48:

007526
007526

001403
104.009

LRESET
WRITE

;LOAD EXPECTED
:TEST FOR A SET

ERROR
JMP

6
‘s

:MODE CONTROL REGISTER PROTEX WRITE FAILURE
:LOOP ON ERROR

READ
MOV
BIC
CLR
CMP

,SECS
:READ VERIFY
(SP) +,$TMPO
::POP STACK INTO STMPO
#~C<PROTEX>,$TMPD
:CLEAR UNWANTED BITS
STMP1
:LOAD EXPECTED
$TMPO, STMP1
sTEST FOR RESET

WRITE

,SECS.PROTEX
.

:WRITE PROTEX

(SP)+,$TMPO

007550

0126

1;02

MOV

007562
007566

005037
023737

001204
001202

CLR
CMP

000137

007542

4
25

26
27

%;
31

3
3

234

007554 832737 177776 001202
007574
007576

001403
104011

001204

:RESET BIT PROTEX

WRITE
LRESET

JMP

4;9 000005

,SECS.0

:YES SKIP ERROR
*MODE CONTROL REGISTER PROTEX FAILED TO CLEAR

10«19
10441

2s
6

007534
007542

007544

(SP)+,$TMPO
::POP STACK INTO $TMPO
#*C<PROTEX>,$TMPD
:CLEAR UNWANTED

BEQ
ERROR

19
20

221

:WRITE BIT PROTEX

#PROTEX,STMP1
$TMPO, $TMP1

BEQ

58:

,SECS.PROTEX

: LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT

:READ VERIFY

MOV
CMP

#40,STSTNM
#4640, TSTNUM

,SECS

MOV
BIC

000001

SCOPE
MOV
MoV

READ

007442 012737 000001 001204
007450 023737 001202 001204

TEST 40

';ttttt"tttt'tt.ttttt'tQttttttttt'.tttt.tttt.tt'tt"t.t..t'tttt.

007460 104.009
3207 oo;l.ez 000137 007414

3209!

. CLEAR AND A READ VERIFY

::ttttt.tttt.t'ttt"tttl.tttt.'t..t'i.t.t'.t.t'ttttt'.tt""""

191

19‘

& o

READ

,SECS

:LOOP ON ERROR

:READ VERIFY

::POP STACK INTO S$TMPO

BIC

#*C<PROTEX>,$TMPD

BEQ
ERROR

TST41
9,

JMP

$TMP1
$TMPO,STMP1
5%

:CLEAR UNWANTED BITS

:LOAD EXPECTED
:TEST FOR A RESET

3
sMODE CONTROL REGISTER PROTEX FAILED TO CLEAR AFTER RESE

:LOOP ONERROR

JRRRRARRRAAAARERERCACRNARNans TEST AR

22222222 222222222221

;*MODE CONTROL REGISTER (SECONDARY) BIT TEST
:*THIS TEST DOES A:

i
i

1. WRITE AND A READ VERIFY

2. CLEAR AND A READ VERIFY

30A(1052) 21-oct-a1 09:21 PAGE 71

€ CONTROL REGISTER (SECONDARY) READ WRITE TEST

SEQ 0071

3. WRITE AND A LINE RESET THEN A READ VERIFY

OF BIT PROTEY

;:'t.tt.t..."""""'.'tt.t..Q.Qt...tt.."Q't'..'....'.....".

TEST 41

3
b
e

;: &

-~ OHNO
W=O
N=2WN~N

g
3

NSO~

SPICOUNEER

LN
N

8SIXRRAN2BII
-0

000041
000041

00110
0012

t87141:
=

000002

SCOPE

MOV
fggssr

#41,8TSTNM
#41.TSTNUM

WRITE

,SECS.PROTEY

READ

S07508 001202

MOV

001204

gg:

000005
00120

001204

—

O =t

SRR
R
8Bgos®
53 O8N

3
3 o

W
WNNN

828SR2R2
@SS 355

NNV

258
33

.tt..t"'........'..""'t't.'.'..'ti.Qt....'......'...""..'.

007622

000005
000005

000000

001202

001204

177;g 001202
007622

000005
000005
00120
17777
001204
001202

000002

58:

13MPO, $THP1

:TEST FOR A SET

ERROR
JMP

6
48

:MODE CONTROL REGISTER PROTEY WRITE FAILURE
:LOOP ON ERROR

WRITE
READ
MOV
BIC

,SECS.0
.SECS
(SP)+,$TMPO

sRESET BIT morev
*READ VERIFY
:POP srAcx INTO $TMPO
rcmiors» srmb
uumreo BITS

CMP
BEQ
ERROR
JMP

srnpo $TMP1
2
6
4

tssr ron neser
*YES SKIP ERROR
*MODE CONTROL REGISTER PROTEY FAILED TO CLEAR
:LOOP ON ERROR

WRITE

,SECS.PROTEY

:;WRITE PROTEY

xfisc

,SECS

BIC

#*C<PROTEY>, sTMPY’

gg:

;gg:g.srnp1

ERROR

007750

STMP

LRESET
READ

CLR

001204

:POP STACK INTO $TMPO

#AC<PROTEY>,$TMPD’
:CLEAR UNWANTED
cpaorev $TMP1
;LOAD EXPECTED

MOV

001202

(SP)+,$TMPO

:WRITE BIT PROTEY

*READ VERIFY

BIC
MOV

CLR

.SECS’

OAD THE NO. OF THIS TEST
c FOR TYPE OUT

JMP

(SP)+,$TMPO

;
:READ VERIFY

:POP STACK INTO $TMPO

:CLEAR UNWANTED BITS

STMP1

:LOAD EXPECTED

*MODE CONTROL REGISTER PROTEY FAILED TO CLEAR AFTER RESE

:TEST FOR A RESET

*LOOP ONERROR

JRRARRRRANRRANRRERRRRNRRRANY

TEST 42

tantnaannnnantasnstnsntents

:*MODE CONTROL REGISTER (SECONDARY) BIT TEST
tTHIS TEST DOES
A
Il.

1. WRITE AND A READ VERIFY
« CLEAR AND A READ VERIFY
« WRITE AND A LINE RESET THEN A READ VERIFY
OF BIT PROTEZ

lttttttttttttttttttttttttttt..lt.tttt".tttttttfi.'tt't'.ttt..'

;
010012

TEST 42

ttttttttt'ttttttttttt"t."t.tfittittt.'t....i'ttttt'tt.'.tltt.'

000004

t§742:

SCOPE

CZKMDAO DMS11=DA STATIC

CZKMDA.P11
i

301
gg;

MACY11 30A(1052)

20-0(7-‘ moi

10014 815 4 888&5

}

"1“Z1;

1125

21-0CT=81

MoV

10032
10441
S 000004
1382 1044
5
10044 01 9
1 g
10050
7 177
001202
10056 012737 880004 881 04
10094
737
001202
001204
010072
10074

001403
ogg

303 018?7

000137

010030

305
309

010102
010110

104416
104420

000005
5

010140

001403

09:21

PAGE 72

MODE CONTROL REGISTER (SECONDARY) READ WRITE TEST

000000

: LOAD THE NO. OF THIS TEST

#462.TSTNUM

WRITE
READ
MOV
BIC
MOV
CMP

.sscg.mtez
:WRITE BIT PROTEZ
SEC
*READ VERIFY
(SP)+,$TMPO
:;POP STACK INTO $TMPO
#*C<PROTEZ>,$TMPD
-CLEAR UNWANTED
#PROTEZ,STMP1
;LOAD EXPECTED
$TMPO, STHP1
STEST FOR A SET

JMP

BEQ
ERROR

#62,$TSTNM

rggm

WRITE
READ

:# FOR TYPE OUT

1$
6

;MODE CONTROL REGISTER PROTEZ WRITE FAILURE

,SECS.0
,SECS

;RESET BIT PROTEZ
*READ VERIFY

*YES SKIP ERROR

:LOOP ON ERROR

30 810114. 8}. 9 7 091 %
308 010120
7 177
001202
309 010126
005037 001504.
glo 010132
023737 001202 001204

MOV
BIC
CLR
CMP

(SP)+,$TMPO
<:POP STACK INTO $TMPO
#*C<PROTEZ>,$TMPD
:CLEAR UNWANTED BITS
$TMP1
:LOAD EXPECTED
$TMPO, STMP1
:TEST FOR RESET

31;

ERROR

010142

104006

BEQ

sg}‘ 3}8}'53 000137 010030

319

58:

ins 010150 104.4.19 0000065 000004
317
318
319
gszo
321
32;
323

010156

010160
010134
010170
010176
010202

010210
010212

10441

1ou.§g
0126
042737
005037
023737
001403
104011

000005
001;%
177
001202
001204
001202 001204

JMP

WRITE

LRESET

*MODE CONTROL REGISTER PROTEZ FAILED TO CLEAR

;WRITE PROTEZ

READ
MOV
BIC
CLR
CMP

,SECS
:READ VERIFY
(SP)+,$TMPO
-;POP STACK INTO $STMPO
#*C<PROTEZ>,S$T
:CLEAR UNWANTED BITS
$TMP1
:LOAD EXPECTED
$TMPO, STMP1
STEST FOR A RESET

JMP

BEQ
ERROR

33%;. 010214 000137 010156

,SECS.PROTEZ

TST43
9,

¥
;MODE CONTROL REGISTER PROTEZ FAILED TO CLEAR AFTER RESE

:LOOP ONERROR

3%%9

;tttttttttttttttttttttlttt.l TEST ‘3 1 3333333322333 3333333333331 3%

329
330

:«THIS TEST DOES A:
e

3328

+«MODE CONTROL REGISTER (SECONDARY) BIT TEST

331
333
33

ggg

31‘;9

339 010220

owz%
010
010 38
010240
010 l.s

1. WRITE AND A READ VERIFY

. CLEAR AND A READ VERIFY
. WRITE AND A LINE RESET THEN A READ VERIFY
OF BIT NIDLE

2 IARRRARARAARARREARARARRAAAAANRARAANAARAAAAARAARRNRANAARRARAANARARER

338

340
341
3%2
343
344

1T
i
e

TEST 43

. 'tttttt;ttttttttttttttt'tttl'tttttttttttttttttttttttll.tttttttit

TS143:

0157 7 000043 00110
012737 000043 00126
104417
48:
10441
S 000010
1044
5

3%
'§937 000010
1779567 001202
# 0109
010264 012737
001204

scoPe

MOV
#43,$TSTNM
MOV
#43.TSTNUM
LRESET
WRITE
,SECS.NIDLE
READ
SECS

O
MOV

SEQ 0072

: LOAD THE NO. OF THIS TEST
4 FOR TYPE OUT
:WRITE BIT NIDLE

*READ VERIFY

eI
0P EXPECTED
STACKMTO
SINTE)
MNIDLE,STMP1s g;LOAD

11-DA STA ‘
—

IKMDA.P11

20-0CT=

}8 7
10

}8 1

;R;
1

029

137

10 13 '82“

MACY11 30A(1052) 21-0CT-81 09:21_ PAGE 73
17:03
MODE CONTROL REGISTER (SECONDARY) READ WRITE TEST
001202

010236

001204

000000

10316
1044
10
81
1;0;
10
7 1
34 001202
103
ogr 0013
10340 023737 001202 001204
010
1403

3}8335 000137

01035

1oaogg

010236

o1o§2

104.:.19

000005

1ou.§g

810

mog
810 76

10441

.
000010

58:

126
001;0;
737 177767 001202

10404 00 ogr 001204

cvo

gmo.stm

;TEST FOR A SET

ERROR

:MODE CONTROL REGISTER NIDLE WRITE FAILURE

WRITE

,SECS.0

;RESET BIT NIDLE

JMP

:LOOP ON ERROR

READ
MOV
BIC
CLR
CMP
BEQ

SEC
*READ VERIFY
(SP)+,$TMPO
2;POP STACK INTO $STMPO
#~C<NIDLE>,$TMPO
:CLEAR UNWANTED BITS
$TMP1
:LOAD EXPECTED
$TMPO, STMP1
*TEST FOR RESET
°%
:YES SKIP ERROR

JMP

‘s

ERROR

*MODE CONTROL REGISTER NIDLE FAILED TO CLEAR

WRITE

,SECS,NIDLE

;WRITE NIDLE

READ

,SECS

;READ VERIFY

$TMPI

:LOAD EXPECTED

LRESET

:LOOP ON ERROR

MOV
BIC

(SP)+,$TMPO
::POP STACK INTO STMPO
#*C<NIDLE>,$TMPO
:CLEAR UNWANTED BITS

CMP
BEQ
ERROR
JMP

$TMPO, STMP1
TST44
9,
58

CLR

010410 023737 001202 001204
010416 001403
0104.50 104011
010422 000137 010364

:TEST FOR A RESET
i
:MODE CONTROL REGISTER NIDLE FAILED TO CLEAR AFTER RESET
:LOOP ONERROR

IRRRRAARRARAANEAEARRARAAAAAR

i
e

ggg

snxsnnnananntntntnttttantnes

. WRITE AND A LINE RESET THEN A READ VERIFY
OF BIT SAM

;:tttttttttttt.ttttttttttttttttttttttQt..tlttttttttt.tttt.tttttt

3386

3387 010426

TEST 44

.o tQtttt;tttttttttttttt'ttttttttttttttttltt'ttttttttltt.t.tttttt'

000004

388 0104
015737 000044 00110
389 010436 012737 000044 00126

TST44:

31
Oloces 106616
s 000020 O
302 010456 1044 388835
393

TEST 44

*«MODE CONTROL REGISTER (SECONDARY) BIT TEST
:«THIS TEST DOES A:
e
1. WRITE AND A READ VERIFY
v
. CLEAR AND A READ VERIFY

380
381

010460 01 9 7 091;2;

394 010494 84 gr 177
001202
395 0104 05 12737 ooooso 001204
399 0105
85 737 001202 001204

330 3}32?3 102‘03
333 8}8'3‘}5 ooo?gg 010444
01

010516

104416

000005

010530

012637

001202

0 owsgg 1044 § 000005

=
000000

SCOPE

MOV
MOV

#44,STSTNM
#44.TSTNUM

: LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT

LRTIE
.sEcs.san
READ .SECS’

WRITE BIT SAM
*READ VERIFY

MOV

(SP)+,$TMPO

::POP STACK INTO STMPO

BIC
MOV
CMP

#°C<SAM> ,STMPO :CLEAR UNWANTED
#SAM, STMP1
:LOAD EXPECTED
$TMPO, STHP1
:TEST FOR A SET

Efifim ?
JMP
4

MODE CONTROL REGISTER SAM WRITE FAILURE
:LOOP ON ERROR
:

WRITE

,SECS.0

;RESET BIT SAM

MOV

(SP)+,$TMPO

::POP STACK INTO STMPO

READ

SEQ 0073

*READ VERIFY

CZKMDAO DMS11=DA STATIC MACY11 30A(1052)

CZKMDA.P11
83
02

'go-ocb‘t moi

} g‘u

E ; (1”7;757 001202

10556

001403

1 s«i

97 001383 001204

105
}osu. 000137

1
1;
13

18
10572
010576

1
419
10441
1 4.9

18
19

010624
010626

001403
104011

1%
15
19
17

010600
010604
10612
010616

5? 010630

21-0CT-81

01 9

010444
000005

PAGE 74

R'c‘

g;ggw.mro .-c%a mmnggn BITS

BEQ

(MP

000020

09:21

MODE CONTROL REGISTER (SECONDARY) READ WRITE TEST

58:

1 ;
7 177
001202
037 001504.
023737 001202 001204

ERROR
JMP
WRITE
LRESET
READ

2
2

:TEST Fm RESET

*YES SKIP ERROR

*MODE CONTROL REGISTER SAM FAILED TO CLEAR
:LOOP ON ERROR

,SECS,SAM

;WRITE SAM

,SECS

;READ VERIFY

TSTé
9,

33
*MODE CONTROL

MOV
BIC
CLR
cMP

(SP)+,$TMPO
#2C<SAM> ,STMPO
$TMP1
sm»g.srm

JMP

EQ
ERROR

000137 010572

$TMPO, STHP1

::POP STACK INTO STMPO
:CLEAR UNWANTED BITS
:LOAD EXPECTED
STEST FOR A RESET

:LOOP ONERR

:ttttt.Qtttttttttt'tttt'tttt TEST ‘5 L 2333333233133 333 3333333332331

4
5

*«MODE CONTROL REGISTER (SECONDARY) BIT TEST
*#THIS TEST DOES A:

26
27

iw
e

3428

010634

000004

38
39

010652
010656

104417
104416

010662
1 ovo“g
g 01067
010700
010706

000005

010714
010716

}3; 2 000137

010652

010726

104416

000005

010762
10764

}3;9§ 000137

010652

010772

104416

000005

ga
59

000040

TS145:
48:

104450
5
3:'. 9 7
1;2;
37 177
001202
01 7;7 000040 001204
023737 001202 001204

S
49

55
59

OF BIT SSL

ogzeos
1

000000

000040

SCOPE

MOV
MOV

LRESET
WRITE

#45,8TSTNM
#45.TSTNUM
,SECS.SSL

READ
MOV
BIC
MOV
CMP

.SECS
(SP)+,$TMPO
#2C<SSL>,$TMPO
#SSL,STMP1
$TMPO, STHP1

JMP

BEQ
ERROR
WRITE

010732 1ou.§9 000005
0107
81 9
ogtgg;
01074
37 177
001202
01075
ogr 881204
81075/. 23737
001202 001204
001403
ogg

TEST 45

22 tttttt;ttttttttttttttttt'tttittttt'ttttttttttttttttt.tttttt'tt.

39 010636 015737 000045 001102
37 010646 012737 000045 001262

50
51
sg
53
5%

. WRITE AND A LINE RESET THEN A READ VERIFY

- | L 3332323 dd 2233313333333 3333338333331 3333331332332 2222%]3

gg
3‘

1. WRITE AND A READ VERIFY
. CLEAR AND A READ VERIFY

18
6

,SECS.0

: LOAD THE NO. OF THIS TEST
*# FOR TYPE OUT
;WRITE BIT SSL

*READ VERIFY

2:POP STACK INTO S$TMPO
:CLEAR UNWANTED
:LOAD EXPECTED
*TEST FOR A SET
;MODE CONTROL REGISTER SSL WRITE FAILURE

:LO0OP ON ERROR
:RESET BIT SSL

READ
MOV
BIC
CLR
CMP

.SECS
(SP)+,$TMPO
#2C<SSL>,$TMPO
$TMPI
$TMPO, STHP1

*READ VERIFY
::POP STACK INTO STMPO
:CLEAR UNWANTED BITS
:LOAD EXPECTED
*TEST FOR RESET

JMP

*LOOP ON ERROR

WRITE

,SECS,SSL

BEQ
ERROR

2
6

SEQ 0074

*YES SKIP ERROR
*MODE CONTROL REGISTER SSL FAILED TO CLEAR

:WRITE SSL

30A(1052)

DMS11-DA STA
CZKMDA.P11
20-0CT

106417

1101
110
11024
110

110
11036

21-0(7-81 09:21 PAGE 75
CONTROL REGISTER (SECONDARY) READ WRITE TEST
58:

1822
9
1 9
14
9 7
7
1403

LRESET

READ

MOV
BIC

001202

#C<SSL>,STMPO

CLR
(MP

001204

$TMP1
$TMPO,STHP1

BEQ

ERROR

104011
000137

ECS

isph $TMPO

JMP

TST46

SEQ 0075

:READ VERIFY

2:POP STACK INTO $STMPO
:CLEAR UNWANTED BITS

:LOAD EXPECTED
:TEST FOR A RESET

*MODE CONTROL REGISTER SSL FAILED TO CLEAR AFTER RESET

*LOOP ONERROR

ttttt.t'ttt.t"tt"'t.'.tt.

ffsr ‘6

ARRRARRAAAANAAAAAAAACOAENEASY

+*MODE CONTROL necxsm (SECONDARY) BIT TEST
-mxs TEST DOES

i
i
i

1. WRITE AND A READ VERIFY
. CLEAR AND A READ VERIFY
.o’mg; mg s LINE RESET THEN A READ VERIFY

:R 3323333338222 223233331333 311333 8321283313322 2330222322223222%3

b et

SRR RN
NN

000046
000046

001102
001262

000005
000005
00120
17767
000100
001202

000100

48:

000000

000005

000100

i 001202
881202 001204

LRESET
WRITE
READ

58:

#46,$TSTNM
#46.TSTNUM

: LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT

,SECS.PROTO
.SECS

;WRITE BIT PROTO
*READ VERIFY

ERROR

:MODE CONTROL REGISTER PROTO WRITE FAILURE

WRITE

,SECS.0

:RESET BIT PROTO

MOV

(SP)+,$TMPO

::POP STACK INTO STMPO

JMP

READ

00129 001202
881202 001204
011060

SCOPE

MOV
MOV

MOV
BIC
MOV
gg:

011060
000005

t§746:

001202
001204
001204

Rr2

b b o
b b b
SRS oNNbSRb eTSR
SRR NN
=SS SIREVET

D
D

]
D
b e cnh
D
D
ki

T
e T

i
D)

e e

D
D el

e R

D el el
D

R
e R

) e cod
h
)

e
R

e vmed
D e

e
I

D el cd

TEST 46

ttttttttttttttt.ttttt."tttttt..t't.tt'tttttlttttt.'t..t"'.t.t

=lelelolalalalalelololelelelololelalolelolelalelolalelolalo
ol le)

;

(SP)+,$TMPO
#PROTO,STMPT
s;moL$TMP1

m<p§oro> $TMPO
48
.SECS

::POP STACK INTO STMPO
:CLEAR UNWANTED
:LOAD EXPECTED
:TEST FOR A SET

:LOOP ON ERROR
*READ VERIFY

BIC

CLR

rc<péoro> $TMPO

BEQ

(MP

srmo.srm
2

*YES SKIP ERROR

‘s

*LOOP ON ERROR

STMP

-CLEAR UNWANTED BITS

:LOAD sxbscTED

:TEST FOR RESET

ERROR

WRITE
LRESET
READ

,SECS.PROTO

;WRITE PROTO

,SECS

;READ VERIFY

JMP
MOV
BIC
CLR
(MP
BEQ

ERROR

*MODE CONTROL REGISTER PROTO FAILED TO CLEAR

(SP)+,$TMPO
::POP STACK INTO $TMPO
rwfiorm $TMPO
-CLEAR UNWANTED BITS
:LOAD EXPECTED
swg,STHP1
resr FOR A RESET

*MODE CONTROL REGISTER PROTO FAILED TO CLEAR AFTER RESET

i
C KHDAO

3516

11-8A STA.‘i HACV;i 30A(1052)

011244

000137

011206

21-0CT-81

09:21_

JMP

PAGE 76

MODE CONTROL REGISTER (SECONDARY) READ WRITE TEST

;LOOP ONERROR

SEQ 0076

ain
NN

KMDAO DMS11<DA STATIC

KMDA.P11

MACY11 30A(1052)

'go—on-‘f moi

}5
5

21-0CT<81

.SBTTL

g%})
ssg 011250 30090‘
sg‘ 3" 25
1% gr
[
1
012737
011266
011270

104417
104416

539 011
540 011314

042737
012737

537 011 73 1044;
538 011
0126

"tt.ttt;tttt.tttttt..'.".Q'.tt.....Q....t..'.t..t.t..t....'..'.

7 00110
7 00126
000007

000001

177776
1

001202
001204

000007
091;92

TS§147:
48:

s«g ong
001403
543 011
104007
issfi 8}}% 000137 011266
546

011340

104416

548
549
550
551
ssi
553
g?’s’

01135
011356
011364
ongro
011376
011400
8”285

31 6
1202
737 177776
005037 001204
023737 001202
001403
104007
000137 011266

547 ong«g

104.459

000007

011414

000000

001204

558 omlg
559 011422

560 °"‘§2
561 0114

1ol.4§g 000007
01 9

091 02

37 177776 001202
ogr omgo:.

sog 011440 023737 001202 001204
56 onu.s oouog
564 01145
1o:.o§
:
011452

000137 011414

58:

#67,8TSTNM
#47.TSTNUM
,SEC7.RDATA1

,SEC7
(SP)+,$TMPO

: LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT
:WRITE BIT RDATA1

:READ VERIFY
- :POP STACK INTO $TMPO

BIC
MOV

#2C<RDATAT>, $TMPD
:CLEAR UNWANTED
#RDATA1,STMP1
;LOAD EXPECTED

BEQ
ERROR
JMP

1$
7
48

WRITE

,SEC7.0

READ

001202

10441

LRESET
WRITE

cMP

ssg 011406 104.1.19 000007 000001

scoPe
MOV
MOV

READ
MOV

541 011322 023737 83520!2 001204

$TMPO,STHP1

sTEST FOR A SET

:CHARACTER LENGTH REGISTER RDATA1 WRITE FAILURE
:LOOP ON ERROR
:RESET BIT RDATA1

MOV
BIC
CLR
cMP
BEQ
ERROR
JMP

,SEC?

:READ VERIFY

(SP)+,$TMPO
-:POP STACK INTO $TMPO
#*C<RDATA1>,$TMPD
-CLEAR UNWANTED BITS
$STMP1
:LOAD EXPECTED
$TMPO, STMP1
sTEST FOR RESET
;s
:YES SKIP ERROR
:CHARACTER LENGTH REGISTER RDATA1 FAILED TO CLEAR
4
:LOOP ON ERROR

WRITE

,SEC7.RDATA1

:WRITE RDATA1

READ

,SEC7

:READ VERIFY

BIC
CLR

#*C<RDATA1>,$TMPD
-CLEAR UNWANTED BITS
$TMP1
:LOAD EXPECTED

LRESET

MOV

CMP
BEQ
ERROR
JMP

(SP)+,$TMPO

$TMPO,STMP1
TSTS0
§1.
$

-:POP STACK INTO $TMPO

:TEST FOR A RESET
3
:CHARACTER LENGTH REGISTER RDATA1 FAILED TO CLEAR AFTER
:LOOP ONERROR

568

Jenennnnnnnnntenecennnnnnnns

570
571
572

s*THIS TEST DOES A:
ot
L

569

TEST 47 encancnnnncennnnaneenennnne

: TEST 47

531

CMARACTER LENGTH REGISTER (SECONDARY) READ WRITE TEST

::.tttt'tttt.Qtt"t.'.t..'tt..t..tQ..tt'.t...QQ'.QQ.'Q"Q".'.'.

565

SEQ 0077

:*CHARACTER LENGTH REGISTER (SECONDARY) BIT TEST
:«THIS TEST DOES A:
e
1. WRITE AND A READ VERIFY
i
. CLEAR AND A READ VERIFY
v
. WRITE AND A LINE RESET THEN A READ VERIFY
v
OF BIT RDATA1

557

PAGE 77

Jennnnnntteteteeeeennanennnt

521
5 ;
5
524
5§25
5

535
536

09:21

CHARACTER LENGTH REGISTER (SECONDARY) READ WRITE TEST

TEST SO senncnsnsnnanansnnnnnnnnnne

s*CHARACTER LENGTH REGISTER (SECONDARY) BIT TEST

1. WRITE AND A READ VERIFY
2. CLEAR AND A READ VERIFY

30A(1052)c 21-0CT-81_09:21

PAGE 78

:®
:*

TEST 50

358

NNWNNNNOO

SO NONOSSS

WO WWWWN ==
NWVWNINNYN ONOY

-2

18:

001204

011474

,SEC7,.RDATA2
.SEC7
(SP)+,STMPO

;WRITE BIT RDATA2
sREAD VERIFY
: sPOP STACK INTO STMPO

#RDATA2,STMP1
s;mo.sfm

;LOAD EXPECTED
*TEST FOR A SET

5%:

#*C<RDATA2>,$TMPD’

BEQ

001204

;CHARACTER LENGTH REGISTER RDATA2 WRITE FAILURE

WRITE
READ

,SEC7.0
,SEC7

sRESET BIT RDATA2
:READ VERIFY

2
7

:YES SKIP ERROR
:CHARACTER LENGTH REGISTER RDATA2 FAILED TO CLEAR

:LOOP ON ERROR

MOV
BIC
CLR
CMP

(SP)+,$TMPO
< :POP STACK INTO STMPO
#*C<RDATA2>,$TMPD
:CLEAR UNWANTED BITS
$TMP1
:LOAD EXPECTED
$TMPO,$TMP1
:TEST FOR RESET

JMP

WRITE
LRESET

,SEC7.RDATA2

;WRITE RDATA2

MOV
BIC
CLR

,SEC7

(SP)+,$TMPO
::POP STACK INTO $TMPO
.
#*C<RDATA2>,$TMPD
:CLEAR UNWANTED BITS
$TMP1
:LOAD EXPECTED

;READ VERIFY

gm.srm

<TEST FOR A RESET

ERROR
JMP

21.
$

:CHARACTER LENGTH REGISTER RDATA2 FAILED TO CLEAR AFTER
*LOOP ONERROR

grgg

011622

:CLEAR UNWANTED

JMP

1202

; LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT

BIC

BEQ
ERROR

2$:

000007
000007
00120
17777
001204
001202

WRITE
READ
MoV

MOV
CMP

1 07
171578 001202

001204
001202

#50,$TSTNM
#50,TSTNUM

ERROR

011474
000007

4$:

SCOPE
MoV
EggSET

:LOOP ON ERROR

s*CHARACTER LENGTH REGISTER (SECONDARY) BIT TEST
s*THIS TEST DOES A:

NOWVS
N =OVNV

000007
177578
00120
001202

000002

883

3
b

SNNNONS
OWWW
N NWNNN

2283%

—d

SER
8-uiageege
oS
SIS WS

‘U‘Ugg

fsrso:

80603

g b SRoR=222 o &~

Viun

Lo T

—

&c;svwz§?fi=:gpflNflUfiggrfl:;
33FAVRIXASSS
RPG N NN ATy P 7533
g 33
&! SN O
o INH

b =D

]

d e
D e
d
d

D =D

b
=D
D md =

D o

d
D omd
D md =t
b e

bt i

WNN=O

wv
b
e

L Ly

SIARRARARANAAANANAAAAANA
NN NAAAANANAAAANAAAAAANAAACOCAAARORRNRD

3. UllT; AND A LINE RESET THEN A READ VERIFY
OF BIT RDATA2

JRRRRRARARRRNRERRCERRRNRRANS

N—

;*
c*
c*

TEST

sannnnnnnnnnennannsannnanen

1. WRITE AND A READ VERIFY
« CLEAR AND A READ VERIFY
« WRITE AND A LINE RESET THEN A READ VERIFY

OF BIT RDATA3

SIRARRRANAAARRANENAARAARARAANAAAAAARARAAARAAARPIRRARARRARARAANARS

SEQ 0078

D e

§E 288BLRRRES
wvivauvawunuaviaaawn
A

—

'”=3~4
~ <~
B33
%abu

HARACTER LENGTH REGISTER (SECONDARY) READ WRITE TEST

TEST 51

SRR

011664

000004

RR AR AR AR

t5151:

SCOPE

AN AR

AR AR ARNAANRANANENRANANRAAEAA
AR RRARARAES

11696

119 6

011706
011712
01171

8117

81;7;7

000051

00110

7
7
1;95

000004

012737 000051

104417

10441
1044
82 9

177

0012

MOV

48:

001202

1
yrr 000004 001204
011736 023737 001202 001204
011744
011743
8}};34

001403
104007
000137

011702

011754
011762
011766

104416
104450
0159 7

000007
000007
00120

012004
012012

853737
001403

001202

335833

000137

011702

012022
012030
012032
012036
012042

104416
10441
104420
012637
042737

000007
000007
oo1;o§
177773

001202

012054
012062
012064
012066

023737
001403
104025
000137

001202

001204

011772 042737
012000 005037

012014

012050

104007

005037

177773
001204

001204

000000

LRESET

WRITE
READ
MOV

58:

18
7
4

:CLEAR UNWANTED

#RDATAS,STMP1 ;LOAD EXPECTED
$TMPO, STMPI
STEST FOR A SET
°

;CHARACTER LENGTH REGISTER RDATA3 WRITE FAILURE
:LOOP ON ERROR

,SEC7.0
,SEC7
(SP)+,$TMPO

;RESET BIT RDATA3
*READ VERIFY
::POP STACK INTO $TMPO

$TMPO,$TMP1
;s

*TEST FOR RESET
:YES SKIP ERROR

JMP

:LOOP ON ERROR

WRITE
LRESET
READ
MOV
BIC

,SEC7.RDATA3

:WRITE RDATA3

,SEC?
(SP)+,$TMPO
#*C<RDATA3>,ST

;READ VERIFY
::POP STACK INTO STMPO
:CLEAR UNWANTED BITS

CMP
BEQ
ERROR
JMP

$TMPO,STMP1
1ST52
21.
58

ERROR

CLR

012030

;WRITE BIT RDATA3
*READ VERIFY
::POP STACK INTO $TMPO

BEQ
ERROR
JMP

CMP
BEQ
-

:# FOR TYPE OUT

#*C<RDATA3>, $TMPD

BIC
CLR

001204

,SEC7,RDATA3
,SEC7
(SP)+,$TMPO

#2C<RDATA3>,$TMPD
:CLEAR UNWANTED BITS
$TMP1
:LOAD EXPECTED

$TMP1

:CHARACTER LENGTH REGISTER RDATA3 FAILED TO CLEAR

:LOAD EXPECTED

*TEST FOR A RESET
33
*CHARACTER LENGTH REGISTER RDATA3 FAILED TO CLEAR AFTER
:LOOP ONERROR

sRARRRARAAARAAAECRERAARANens

TEST

52 1323212222222 22332222222222223}

;*CHARACTER LENGTH REGISTER (SECONDARY) BIT
:«THIS TEST DOES A:
i
1. WRITE AND A READ
i
. CLEAR AND A READ
o
. WRITE AND A LINE
i
OF BIT TDATA1

TEST

VERIFY
VERIFY
RESET THEN A READ VERIFY

::ttttttttttttttt'tttitttttttiltttttttttt.ttt'ttfitt't.t.tttttttt

012072

000004

TEST 52

"ltttt';ttttttttttfittttttttttttt.tt'ttttttlttttttttttt'ttttttttt

0120764
012108
012110
012112
012120

012737
012737
104417
104416
104450

000052
000052

001102
001262

000007
000007

000040

012136

012737

000040

001204

A Qs M gy

TS152:
4s:

ScoPE

MOV
MOV
LRESET
WRITE
READ

#52,8TSTNM
#52. TSTNUM

,SEC7.TDATA1
.SEC7

;WRITE BIT TDATA1
*READ VERIFY

MOV

#TDATA1,$TMP1

;LOAD EXPECTED

SEQ 0079

: LOAD THE NO. OF THIS TEST

#51.TSTNUM

BIC

WRITE
READ
MOV

001202

000004

#51,8TSTNM

MOV

MOV
CMP

e S S

11702

lalis

"gi

AO DMS11-DA SYAY‘C nncv;1 30A(1052) 21-0CT=81 09:21 PAGE 79
P11
20-0CT-81 17:0
CHARACTER LENGTH REGISTER (SECONDARY) READ WRITE TEST

: LOAD THE NO. OF THIS TEST
*# FOR TYPE OUT

LOGETED PO SO SR,

144
152
1
;se

833737
140;
1oaog
000137

170
174

104420
0156

1;§ 104416

001204

012110

000007 000000
000007
091;?;

001202

12
go
2
gg

001204

D
D
d
D
D
e
e o
e
b e
b
b
b

001202

200 042737 177

[elelelelelelelelelalelelelelelelelelelaleleleleta)

11=DA STATIC MACY11 30A(1052) 21-0CT=81 09:21 PAGE 80
20-0CT=81 17:03
CHARACTER LENGTH REGISTER (SECONDARY) READ WRITE TEST

005037 001204
023737
00140

001202

10400
000137

012110

104416

000007

22
236
240
264

104417
104450
012637

262
270
272
276

023737
001403
194025
000137

000007
00120

250 042737 177737
256 005037 001204

001202

$TMPO, $TMP1
1$
7
48

READ
MOV

,SEC7
(SP)+,$TMPO

WRITE

58:

001202

:LOOP ON ERROR

;RESET BIT TDATA1

*READ VERIFY
::POP STACK INTO $STMPO

CMP
BEQ
ERROR
JMP

$TMPO, STMP1
$

WRITE

LRESET
READ
MOV
CMP
BEQ
ERROR
JMP

012236

:CHARACTER LENGTH REGISTER TDATA1 WRITE FAILURE

#-C<TDATAT>,$TMPD

BIC
CLR

001204

,SEC7.0

;TEST FOR A SET

BIC

CLR

000040

CMP
BEQ
ERROR
JMP

$TMP1

:CLEAR UNWANTED BITS

:LOAD EXPECTED

:TEST FOR RESET
*YES SKIP ERROR
JCHARACTER LENGTH REGISTER TDATA1 FAILED TO CLEAR
:LOOP ON ERROR

,SEC7,TDATA1

:WRITE TDATA1

,SEC7
(SP)+,$TMPO

;READ VERIFY
-:POP STACK INTO $TMPO

$TMPO,$TMP1
TSTS3
21.
5$

*TEST FOR A RESET
i
:CHARACTER LENGTH REGISTER TDATA1 FAILED TO CLEAR AFTER
:LOOP ONERROR

#AC<TDATAT>,$TMPD
:CLEAR UNWANTED BITS
$TMP1
:LOAD EXPECTED

;ttttttttttttttt"t'tttfit't.

TEST

53 1 3333333333332 3323332333233 23273 7]

**CHARACTER LENGTH REGISTER (SECONDARY) BIT TEST
;*THIS TEST DOES A:
i
1. WRITE AND A READ VERIFY
i*
. CLEAR AND A READ VERIFY
i
. WRITE AND A LINE RESET THEN A READ VERIFY
i
OF BIT TDATA2
::ttttttttttttttttttttttttttttttt'tttt'tttt.tttt'ttttttttttttttl

300

oo
RN NN
NN NN

—d

d =D oD

d md

(=lelelelelelelelelelelelelelelele)

000004

012737
012737
104417
104416
1oc4§o
0156 7

000053
000053

001102
001262

000007
000007
00120

000100

ggg

85’{3;

001202

001204

362
593

104027
000137

012316

370
376
402

104416
104429
012637

000007
000007
001202

336
344

042737
01§737

TEST 53

"tttttt;tttttttttttttttttttttt.tttt.ttttttttttttttt'tttt'ttt'ttt

302
310
316
350
326
332

177677
000100

7S153:
48:

001202
001204

#53,8TSTNM
#53,TSTNUM

: LOAD THE NO. COF THIS TEST
:# FOR TYPE OUT

,SEC7.TDATA2
.SEC7
(SP)+,$TMPO

;WRITE BIT TDATA2
*READ VERIFY
:;POP STACK INTO $TMPO

BIC
MOV

#2C<TDATA2>, $TMPD
:CLEAR UNWANTED
#TDATA2,$TMP1
;LOAD EXPECTED
g;npo.srnp1

STEST FOR A SET

ERROR
JMP

7
4

;CHARACTER LENGTH REGISTER TDATA2 WRITE FAILURE
*LOOP ON ERROR

WRITE
READ
MOV

,SEC7.0
.SEC7
(SP)+,$TMPO

;RESET BIT TDATA2
*READ VERIFY
+:POP STACK INTO $TMPO

828
.

000000

SCOPE

MoV
MoV
LRESET
WRITE
READ
MOV

SEQ 0080

CZKMDAO DMS11=DA STATIC MACY11 30A(1052) 21-0CT=81 09:21 PAGE 81
CZKMDA.P11
20-0CT-81 17:03
CHARACTER LENGTH REGISTER (SECONDARY) READ WRITE TEST

012406 o:.g 7 177677 001202
12414
9 7 0015
124
3737 001202 001204
12426

124
§} 2

BIC
CLR
(MP

#°C<TDATA2>,$TMPO
:CLEAR UNWANTED BITS
$TMP1
:LOAD EXPECTED
$TMPO, STMP1
sTEST FOR RESET

ERROR
JMP

:CHARACTER LENGTH REGISTER TDATA2 FAILED TO CLEAR
:LOOP ON ERROR

58:

WRITE
LRESET

,SEC7,TDATA2

:YRITE TDATA2

oou.o;

104.02
000137 012316

12436
012444

104416
10441

000007

012466

005037

001204

012476

001403

012502

000137

000100

81 “3 1ou.§g 000007
12452 0126
oo129;
0154.56 042737 177677
001202

BEQ

104025

*YES SKIP ERROR

READ
MOV
BIC

,SEC7
:READ VERIFY
(SP)+,$TMPO
:POP STACK_INTO $TMPO
m<16m2> smb
LEAR UNWANTED BITS

CMP

smpo $TMP1

resr FOR A asser

moa

‘gn

cmcrsn LENGTH REGISTER TDATA2 FAILED TO CLEAR AFTER

CLR

0126470 023737 001202 001204
012500

SEQ 0081

$TMP1

BEQ

012444

EXPECTE

*LOOP ONERROR

JRRARRRARARARRRACRRANACARAARNr

TEST

§4

AR RRRRRAAARARARANARARANAAAR

*«CHARACTER me 'REGISTER (SECONDARY) BIT TEST

:*THIS TEST DOES
A

i
i
i
.'

1 i

012506

000004

012526
012552

104417
104416

001102
001262

000007

000200

3779 0125446 042737 177577

001202

781

012560

001204

783

01257

786

012576

0125
1ou.§o 000007
012540 012637 oo1§o

t§754:
48:

SCOPE

LRESET
WRITE

READ
MOV

i il sl

2122232322322323322220%3

1ol.og7

.SEC7
(SP)+,$TMPO

;WRITE BIT TDATA3

*READ VERIFY
:POP STACK_INTO $TMPO

CMP

$TMPO,$TMP1

BEQ

000137 012524

,SECZ.TDATA3

: LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT

#*C<TDATA3>, $TMPO’

n; 012568 001403

001202

#54,$TSTNM
#54. TSTNUM

BIC

MOV

3}53%

it ittt i

TEST 54

MOV
MOV

3780 012552 o1§737 000200 001204
;gg

t'ttttttt'ttttttttttt'tttttttttttttttttt'ttttttttttttt.tttttttt

012510 012737 000054
012516 012737 000054

023737

1. WRITE AND A READ VERIFY
. CLEAR AND A READ VERIFY
. WRITE AND A LINE RESET THEN A READ VERIFY
OF BIT TDATA3

ERROR

NTDATAS,STMP1

CLEAR UNWANTED

;LOAD EXPECTED

*TEST FOR A SET

:CHARACTER LENGTH REGISTER TDATA3 WRITE FAILURE

.SEC7

sRESET BIT TDATA3

$STMPO, STMP1

rssr FOR RESET
:YES SKIP ERROR
* CHARACTER LENGTH REGISTER TDATA3 FAILED TO CLEAR
:LOOP ON ERR

,SEC7.TDATA3

:WRITE TDATA3

JMP

WRITE

,SEC7.0

3788 012610 35
oo1§o;
3789 012614
37 177577 001202
790 31 2
so§7 001204

READ

MOV
BIC
CLR

(SP)+,$TMPO
:POP STACK INTO $TMPO
#*C<TDATA3>, srmb
:CLEAR UNWANTED BITS
$TMP1
:LOAD EXPECTED

792

BEQ

000007 000000
787 315604 1044 9 000007

791

793
77315.

796

104416

012626

023737 001202

012636
3:5&‘22

104007
000137 012524

012644

104416

0126

1403

000007

001204

CMP

000200

ERROR
JMP

WRITE

:LOOP ON ERROR

*READ VERIFY

1 30A(1052)

21-0(7-81

09:21

PAGE 82

HARACTER LENGTH REGISTER (SECONDARY) READ WRITE TEST

58:

LRESET

SEC7

:READ VERIFY

isr» $TMPO
:POP STACK INTO S$TMPO
c~c<16Am> srmb
:CLEAR UNWANTED BITS
STHPg.STHP1

:LOAD EXPECTED

rssr FOR A RESET

CHARACTER LENGTH REGISTER TDATA3 FAILED TO CLEAR AFTER

:LOOP ONERROR

?ACV‘H 30A(1052)
[~
.

21-0CT-81

.SBTTL
e

PAGE 83

TRANSMIT AND RECEIVE INITIALIZATION TEST
JARRRRRRRRRRRRRRRRRRRnRnnnet TEST 55 ancnnnnnennnnnenaennenntens

d d

W=D

'TRANSHIT AND RECEIVE INITIALIZATION TEST.

JE
R
R
N
JF O

080998 %8800

IR R
R

2. LOAD STX INTO TDB
3. STEP THE CLOCK 2 (10)
g. LOOK FOR S/F TO BE RESET
STEP THE CLOCK 6 (10)
6. LOAD A DATA CHARACTER INTO TDB

%909

OF B
N
N

FOR A LOOK AT S/F TO BE SET ON RECEPTION

OF THE SECOND SYNC.

IE B

%90, %9:%

JF JF
OF IR

S/F ON RECEPTION OF THE FIRST SYNC
11. STEP THE CLOCK 2 (10) AND LOOK FOR
S/F RESET, THEN STEP THE CLOCK 6 (10) FOR

%0909 90%00900000%:

! THE CLOCK 6 (10) AND LOCK FOR THE FIRST

IR OF JF 2% JF 2% 2R B

Be W00 0000000090909

B 5505
B6

AND TRANSMIT

17. LOAD A DATA CHARACTER INTO TDB
AND TRANSMIT

18. LOAD A DATA CHARACTER INTO TDB
AND TRANSMIT

19. TEST FOR THE FOLLOWING CONDITIONS:
A. RAC TO BE SET

B. RDA TO BE SET

d
d
d
d
—

O NOWVSWN=O

&%&&K&%figgfifig

CLEAR THE SYNC REGISTER
ISSUE A MASTER CLEAR
SET PROTOCOL
= CCP
LOAD SYNC CHARACTER INTO SYNC SECONDARY
REGISTER
5 . SET TENA,RENA,MB,MC
. SET TSOM
. TEST FOR TBMT RESET
. STEP THE CLOCK 2 (10)
. TEST FOR TBMT SET AND TAC SET
0. RESET TSOM, TEST THAT TBMT RESET, STEP

20. READ THE DATA REGISTER TO HOLD THE STX CHARACTER

tleS TEST WILL SYNC THE SEND RECEIVE LOGIC.
:*PROTOCOL = CCP
;*THIS TEST WILL PERFORM THE FOLLOWING SEQUENCE:

VRNV

09:21

TRANSMIT AND RECEIVE INITIALIZATION TEST

IRRARARAAAAARAANAAAAAAAAARAAARAARAAARAAAAAAAAAAAAAAARAAAARARARAARS

TEST 55

b
—

—\) =2
(=
=]
oo

338

tttttltitttttttttttttt"ttttttttttlt.i'tttfi'tttt.t!...'t'tt.'tt

t5155:
18:

SCOPE

MoV

#55,STSTNM

WRITE

,SEC5.CCP

MoV
#55, TSTNUM
MoV
#13.SLPADR
MSTCLR
WRITE

WRITE

,SEC4,SYN

LOAD THE NO. OF THIS TEST

# FOR TYPE OUT
sSET RET(RN ADDRESS 10 18
:ISSUE A MASTER CLEAR

:SET MODE CONTROL _REGISTER
PROTOCOL
= CCP
:LOAD SYNC SECONDARY ADDRESS REGISTER

,PRI14,TENA!RENA!MB!MC

:ENABLE THE FOLLOWING:

R §§8 - AR

—

17:03

000013
001;0;
17775
000020
001202
001204
000020

1204

1206
1206

#TBMT ,STMPO
4
S$TMPO,STMP1
$TMP1,STHP

.SEC2,STX

01276g
00000
2

838 88

§ S5F S8 g

000002
00001

00;202
001204
000010

001502
001204
000010

S
&R |8

000010

888 38

120
17776

TENA
:
RENA
:
M8 AND MC
:
“SET TSOM
*READ REGISTER
::POP STACK INTO STMPO

*CLEAR UNWANTED BITS

sTEST TBMT
*RESET SKIP ERROR

PREPARE TO REPORT ERROR

:LOAD EXPECTED ALSO

LOAD EXPECTED

;TBMT NOT RESET AFTER TSOM AND TENA

:LOOP ON ERROR
sENABLED
.2%2
sSTEP THE CLOCK 2 TICKS
.PRI3
sREAD REGISTER
(SP)+,STMPO
:;POP STACK INTO S$STMPO
#AC<TBMT>, STMPO sCLEAR UNWANTED BITS

Jhur Qhur Pur S Gy

=000
D b b b

1202
1202

8388 388

N=
N NNNSNYN
w~N NNSNNNO
=

012740

£ 2 hNN = NWWNIN

NNONNOESES

gTMT .STHP

QO NNNS

(=1~

5
2 8 Rt
—

$TMP1,$THP

000010

g;am.smfio

012740

3 Neded SIR I3 § b NN
§
)= b
O RU=R
=D o
g ad U =5 L Ui
(ad
~
SNNNNESENN MONNNNN

W
—
ON&OchNO
SO0
~ NOM\NWN
N

O
o

32SRS

NN NN

PAGE 84

#AC<TéM >,$TMPO

00120
177;6;

-2 OO0

gaaes

W
NN WA NN NN N N N NN NN NN NN NN NN DWW
NWNNN

09:21

i?z}lgstm

e
R
I
P
R
e e T
B
ol e o) e

D e e e B

e e s T

e e e e

e R e

e e Y

OO0O0O0O0O0CO0O0O0
OO00O00O0O0O0OO0OOO0OOO0OO0O0O0OOO0O0O
OO00

__21-0C T-81

TRANSM] T AND RECEIVE INITIALIZATION TEST

LSEC3,TSOM

O0O0O0O0O0O0O0O0O0O

e33%
S ERER AR L L L

lals

MACY1 1 30A(1052)

7%2

-PRI13

(SP)+,$TMPO

#2C<SF>, $TMPO
zgr.sm’o

$TMPO, $TMP1
STMP1 . $TMP2

pgr.sfmz
1‘.
1

,SEC3,0
B.*
"PRI13

(SP)+,$TMPO

#2C<SF>,$TMPO
ggr.smfio

sTEST TBMT

sSET _SKIP _ERROR

:PREPARE TO REPORT ERROR

:LOAD EXPECTED ALSO
-LOAD EXPECTED
;TBMT FAILED TO SET WITH TSOM SET
*AND CLOCK STEPPED 2 TIMES
:LOOP ON ERROR

sLOAD START OF TEXT CHARACTER
sSEND FIRST SYNC CHARACTER
sREAD REGISTER
::POP STACK INTO STMPO
sCLEAR UNWANTED BITS
TEST SF

*SET SKIP ERROR

*PREPARE TO REPORT ERROR

:LOAD EXPECTED ALSO

sLOAD EXPECTED
:S/F DID NOT SET AFTER SYNC SENT

sRESET TSOM
sSEND SECOND SYNC
sREAD REGISTER
:;POP STACK INTO STMPO
sCLEAR UNWANTED BITS
;TEST SF

:SET SKIP ERROR

$TMPO, STMP1
$STMP1 . STMP2

:LOAD EXPECTED ALSO

012740

:LOOP ON ERROR

00002
00001

.22

sSTEP CLOCK 11 TICKS
sREAD REGISTER

{gr.shvz

.PRIN3

:PREPARE TO REPORT ERROR

:LOAD EXPECTED
:ga‘cm NOT SET AFTER SECOND

DMS11=DA STATIC

CZKMDA.P11

MACY11 30A(1052)

'go-oct-“ moi

1
1

12637 ?91;0;
7

32737

17776

000010

001

14 ;
137
881 2 001204
013737
001204 001206
737
10 001206
1040

} g;g
13374
13402
01 02
013414
81;:
1
013432

000137 012740
104416
5 000101
182421
2
104416
5 000101
104421
2
104416
000101
104421
104416
000101
104421
104420

000004
000013

013454
013462
omrg
81347
13500

042737
032737
001014
013737
013737

17777
000004
001202
001204

013514

104021

3}335

000137 012740

013522
0135

032737 000001
1014

013556

104022

013450 012637

013506 052737

001 o;

MOV

881535

1
1
13352
1
1

013440
01

21-0CT=81

001206
001202

BEQ
MOV
MOV
BIC
ERROR

78
sm?.srm
STMP1 . STMP2
#SF,$TMP2
16.

*RESET SKIP ERROR
PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO
:LOAD EXPECTED
:;{&m NOT RESET AFTER 1 CLOCK

JMP
WRITE
STEP
WRITE
STEP
WRITE
STEP
WRITE

13
,SEC2.°'A
.8.+
.gsc A
.8.%
.SEC2.°'A
.8.%
.sss A

:LOOP ON ERROR
:LOAD DATA #1
*SEND CHARACTER
:LOAD DATA #2
:SEND CHARACTER
:LOAD DATA #3
:SEND CHARACTER

MOV

(SP)+,$TMPO

BIT
BNE
MOV
MOV
BIS

#RDA,$TMPO
98

$TMPO, STMP1
STMP1 . $TMP2
#RDA, $THP2

JMP

READ

1046024

ERROR

012740

#RAC, $TMP2

JMP

813610

000137

-:POP STACK INTO $STMPO

17.

012737 000026 001204
023737 001202 001204

13612

;READ REGISTER

ERROR

13572
13600

001403

.2+
.PRI13

sTEST SF

#*C<RAC'RDA>,$TMPD
:CLEAR UNWANTED BITS
#RAC,STMPO
STEST RAC
13
:SET SKIP ERROR
$TMPO, STMP1
PREPARE TO REPORT ERROR
STMP1 .STMP2
:LOAD EXPECTED ALSO

MOV
MOV
CMP

013606

#SF ST

BIC
BIT
BNE
MOV
MOV

ERROR

::POP STACK INTO $TMPO

*CLEAR UNWANTED BITS

BIS

(SP)+,$TMPO

rc<§fmmo

STEP
READ

013532 013737 001202 omgo:.
013540 013737 001204 001206
013546 052737 000001 001206

813525
104420 000000
1%563 012637 001202

PAGE 85

BIC

BIT

oo1zo§
00120
001204
001206

og;sa 000137 012740

09:21

TRANSMIT AND RECEIVE INITIALIZATION TEST

BEQ
J

18.

,SECO
(SP)+,$TMPO

:LOAD EXPECTED

;RECEIVER FAILED TO BECOME ACTIVE

SAFTER DATA SENT

:LOOP ON ERROR

:TEST RDA
*SET SKIP ERROR

:PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO
:LOAD EXPECTED

;RECEIVE DATA AVAILIBLE DID
*NOT SET AFTER DATA SENT

:LOOP ON ERROR

;READ THE DATA RECEIVED

#SYN, $THP1
$TMPO, STMP1

::POP STACK INTO ST
:LOAD EXPECTED DATA
* COMPARE

20.

:DATA SEND DOES NOT COMPARE

TSTS6

:LOOP ON TEST

Rk RRRRARRRRRRCRRananennnt

TEST

56 vevanannsavnanananrnevavene

E:TRANSHIT AND RECEIVE INITIALIZATION TEST.
:%THIS TEST WILL SYNC THE SEND RECEIVE LOGIC.

s *PROTOCOL = BOP
::THIS TEST WILL PERFORM THE FOLLOWING SEQUENCE:

SEQ 0085

__21-0CT-81

000004

013642
013644

104414
104416

000005

000020

fi}a
4019 013652
104416 000004 000376
232? oua.s 104416 000014 000321
l.ofi
402

4024 013695 10441
000001
4025 0139 4 1044
40, 9 813 00 81 9
1 o;
40,
1;704
7 177757 001202
4028
29

01 715
013720

032737
001414

SEQ 0086

1. CLEAR THE ADDRESS REGISTER
;. ISSUE A MASTER CL EM
SET PROTOCOL = BOP
SET
SECONDARY ADDRESS
E
&. LOAD THE ADDRESS INTO THE SYNC SECONDARY
REGISTER
. SET TENA,RENA,MB,
MC
. SET TSOM
. TEST FOR TBMT RESET
. STEP THE CLOCK 2 (10)
TEST roa TBMT SET AND TAC SET

0. RESET TSOM

STEP THE CLOCK 14 (10) FOR TRANSMIT
% &Agelrwo ADDRESS AND LOOK FOR S/F

1;. LOAD A CONTROL m OF ZERO INTO THE TDB
13. STEP THE CLOCK 2 (10)
}g LOOK FOR S/F TO BE RESET

16. LOAD A DATA CHARACTER INTO TDB
AND TRANSM
17. LOAD A DATA CHARACTER INTO TDB
AND TRANSMIT

19. TEST FOR THE FOLLOWING CONDITIONS:

AND TRANSMIT

A. RAC TO BE SET

B. RDA TO BE SET
C. RSOM TO BE SET

20. READ THE DATA REGISTER TO HOLD THE CONTROL
CHARACTER OF ZERO

IRRARAANAAAAAANAAAAAAAAAAAARAANANARARRNANAAARAAAANAAAANAAARARAES

TEST 56

ttttttttttttttttitttttt'ttttttttttttttttt'tttt.ttt.tt.t.ttt.ttt

401; 013620 012737 000056 001102
4013 013626 olsm oooosg 881262
4014 013634
012737 01364
1106
4015
1.019

PAGE 86

18. LOAD A DATA CHARACTER INTO TDB

013616

09:21

TRANSMIT AND RECEIVE INITIALIZATION
TEST

(1052)

L .....-.'l.!ol'l.Q.I.....!o!...!.lo..l...l....-...o...o.o.o.-lo..

2% I

MCVH

11-DA STA

LR 20 R

KMDAO

(c: KMDA.P!l’?s :-‘g

000020

001202

t6756:
18:

SCOPE

MOV
MOV
MOV

MSTCLR
WRITE

#56,$TSTNM
#56. TSTNUM
#1$.SLPADR
,SECS.BOP'SAM

: LOAD THE NO. OF THIS TEST
*# FOR TYPE OUT
:SET RETURN ADDRESS TO 1$
:1SSUE A MASTER CLEAR
:SET MODE CONTROL REGISTER

:
E‘e‘?’?fifl‘w?’
:LOAD SYNC SECONDARY ADDRESS REGISTER
.PRI14,TENA!RENA'MB!MC ismms THE FOLLOWING:
:
RENA

WRITE

,SEC4,376

WRITE
READ
MOV
BIC

,SEC3,TSOM
*SET TSOM
PRI1S
am REGISTER
(SP)+,$TMPO
:POP STACK INTO smo
FAC<TBMT>, STMPO:CLEAR uum ED BITS

BIT
BEQ

#TBMT, $TMPO
3s

AND M(C

:TEST TBMT
:RESET SKIP ERROR

:
1
4

SS5E5888

lsin

AD DMS11=DA STATIC

MACY11 30A(1052)

2o-ocr-“ 17:0

137,
13737 881 2
01
13737
001206
137
737
20
13744 1o¢o1§
13746 000137 013642

01
0 1 82
01

13752 1821. 1 000004
13756
137
137

13776
14002
14006
814.01

140
014026

4.9
13
1 9
091 g;
7

177

38:
oo1$o

52737
104015

14036

014060

104416

104416
104421
104420

000020 001206

000003

000002
00001
00001

01 9 7 og1;o;

ou.o?l.
814.0 2

37 177767
032737 000010

014126

104016

14100
omos
014110
014116

READ
MOV

PRI13
(SP)+,$TMPO

STEP

000000

000376

JMP

:LOOP ON ERROR

WRITE

17776

,SEC3,

014170

001414

om% 032737 000010 00120

BIC
BIT

#2C<SF>,STMPO
#SF ,STMPO

:CLEAR UNWANTED BITS
sTEST SF

ERROR

14.

‘36'“"’ NOT SET AFTER FLAG + ADDRESS

13
.sscz.o

;LOAD CONTROL CHARACTER

(SP)+,$TMPO

::POP STACK INTO STMPO

16214

8}8}6
014222
014
14
16242

104020

000137 013642
104416
5 000101
104421
35
104416
5 000101
104421

STEP
READ

:CLEAR UNWANTED BITS

sTEST SF

*RESET SKIP ERRCR

PREPARE TO REPORT ERROR

.-gfixoxo NOT RESET AFTER 1 CLOCK

JMP
WRITE
STEP
WRITE

18
,SEC2,'A
.8.%
.gsc A

*LOOP ON ERROR
:LOAD DATA #1
*SEND CHARACTER
*LOAD DATA #2

.gec A

SLOAD DATA #3

STEP

000101

WRITE

000004

*STEP CLOCK 11 TICKS
*READ REGISTER

16.

014260 104416
104421

$TMPO,$TMP1

*SET SKIP ERROR
*PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO
:LOAD EXPECTED

STMP1 . STMP2
#SF,$TMP2

WRITE

014266

#SF , STMPO

::POP STACK INTO STMPO

MOV
BIC

000101

104421

.2
.PRI13

BEQ

16246 104416

014254

53
$TMPO, STMP1
STMP1,STMP2
#SF,$TMP2

#2C<SF>,$TMPO

ERROR

(SP)+,$TMPO

BIC

MOV

014
013737 001204 001206
814 06 042737
10 001206

;RESET TSOM

:LOAD THE ADDRESS
:SEND FLAG
*READ REGISTER

BIT

0“153 013737 001502 001204

SAND CLOCK STEPPED 2 TIMES

.SEC2.376
.7.%2
.PRIT3

BNE
MOV
MOV
8IS

oo1zog

sTEST TBMT
:SET SKIP ERROR
PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO

WRITE
STEP
READ

MOV

042737

#AC<TEBMT>,$TMPO : CLEAR UNWANTED BITS

:LOAD EXPECTED
:TBMT FAILED TO SET WITH TSOM SET -

014150 012637 09150;
014156

*READ REGISTER
::POP STACK INTO $TMPO

#TBMT . STMP
13.

JMP
WRITE

00002
00001

;sr'eaplms CLOCK 2 TICKS

#1BMT,ST
4
$TMPO, STMP1
STMP1 ,$TMP

MOV

001202
001202

,2%2

-PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO
:LOAD EXPECTED
;TBMT NOT RESET AFTER TSOM AND TENA
:LOOP 2{.‘ ERROR

BIT
BNE
MOV
MOV

832@3 000137 013642
.
014132 104416 000002 000000
104421
104420

PAGE 87

$TMPO,$THP1
STMP1.$THP
#TBMT STHP
1;.
1

BIS
ERROR

001014
013737 001202 001204
013737 001204 001206
052737 000010 001206

014140
014144

09:21

MOV
MOV
BIC
ERROR
JMP
BIC

032737 000020
00120
1914
013737 oo1goz 001204
13737 001204 001%06

§}233° 000137 013642
014042
014050
014056

21-0CT=81

TRANSMIT AND RECEIVE INITIALIZATION TEST

STEP

.B.«

.8.*

.SEC2.'A
2

:LOAD EXPECTED ALSO
:LOAD EXPECTED

*SEND CHARACTER

SEQ 0087

00150¢

000137

013642

032737

000001

1014

001202
001204
000001
013642

READ
MOV
BIC

09:21

PAGE

PRI13
sREAD REGISTER
(SP)+,$TMPO
: sPOP STACK INTO $TMPO
3
.lA)cHMYED 8ITS
:CLEAR
#*C<RAC'RDA>,$TmPd

g'x‘g

#RAC,$TMPO

MOV
MOV

$TMPO, STMP1
STMPT . $THP2

BIS

#RAC
, $THP2

JMP

BIT

#RDA, $TMPO

MOV
MoV

STMPO,STMP1
$TMP1,$TMP2

BNE

17.

BIS

#RDA, $TMP2

JMP

ERROR

:SET SKIP ERROR
PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO
:LOAD EXPECTED
;RECEIVER FAILED TO BECOME ACTIVE
:AFTER DATA SENT

:LOOP ON ERROR

:TEST RDA
*SET SKIP ERROR

18.

:PREPARE TO REPORT ERROR

:LOAD exfies;gotusg

XPECTED
H
sRECEIVE DATA AVAILIBLE DID
sNOT _SET AFTER DATA SENT
;LOOP ON ERROR

;READ REGISTER
::POP STACK INTO STMPO
*CLEAR UNWANTED BITS

001202
001204
000001

BNE
MoV
MOV
8IS

013642

JMP

000000
001202
00037
00120

READ
MoV

013642

TEST

000001

091;02
177776
000001

014404
014410
014410
014414
014420
014426
0144
0144
014444
014452
014460
014462
014466
014466
014472
014476
014504
014512
014514
014516

§§é§ 001502
000004

104

=20

16323
014
014
14374
14402

7
32737
1014

W
NNNO

814 4
1 58
01435

104 4
1

g33228se

1427
1427
014
01431
01431
014
16326
14
014342

O & NNO
S

4009
408
4088
4089
4090
4091
409
409
4096
4095
4
409
4098
4099
4100
4101
410
410
4104
6105
610?
4107
4108
4109
4110
4111
611§
4113
6116
4115
4116
4117
4118
4119
4120
4121
4122
4123
4126

7-81

21-0C
88
T AND RECEIVE INITIALIZATION TEST
g B0l e 30A(1052) TRANSM]

a8gee:
N = =
R
R

CZKMDAO DMS1
CZKMDA.P11

108
$TMPO,STMP1
S$TMP1,$THP2
1280".87"?2

:TEST RSOM

*SET SKIP ERROR

*PREPARE TO REPORT ERROR

:LOAD EXPECTED ALSO

:LOAD EXPECTED

;RSOM FAILED TO SET

:LOOP ON ERROR
,SECO
(SP)+,$TMPO

:READ THE DATA RECEIVED
::POP STACK INTO $TMPO

MOV

#376,$TMP1

:FIRST DATA CHARACTER IS ADDRESS

BEQ
ERROR
JMP

1ST57
20.
1$

:LOOP ON TEST

CMP

$TMPO, TP

* COMPARE

*DATA SEND DOES NOT COMPARE

———.

ZO-OCT-“ 17:03

11=DA STATIC

MACY11 30A(1052)

END OF RSSA&’&ST
21-0CT-81

.SBTTL

:21_

PAGE 89

SEQ 0089

END OF MESSAGE TEST
Jetantnatnateneeesenennannen TEST 57 sevnnenecnnennennecnneneene

s*END OF MESSAGE TEST.
s*THIS TEST WILL PERFORM THE END
s*OF THE MESSAGE FOR PROTOCOL = BOP
I

::THIS TEST WILL PERFORM THE FOLLOWING SEQUENCE:
MASTER CLEAR
SYNC THE SEND RECEIVE LOGIC
TRANSMIT 3 DATA CHARACTERS
TEST FOR RAC AND RDA
WHEN LOADING THE THIRD DATA CHARACTER
SET TEOM
9 READ THE DATA AND DISCARD
. ACCEPT THE CRC CHECK CHARCATERS
8. TEST FOR REOM SET
1.
;
.
&.
S.

v
e
v
*
e
e
e
e
v

;:tttttttt

4522

OO0 00O0O0O00O

ooogol.

T81s7:

104414

101$:

b
d
b
b

456

885037 8"’352

18:

4383 003037 0130%¢
4556 104416 800007 000000

4564

4600
uog

D e

elelelelalalelelelelelelelelelalalel)

4572

461
461

b o

104416

000005

000014

000000

000321

104416
104421

000003
00000

000001

8032 37

000020

001202

1ou.§9 00001
o129
00120

ol
el el o

104421
1044 9

00000
ooog1

0159
83(1)005
32737
10
001202

scoPe

MOV
MOV

#57,$TSTNM
#57.TSTNUM

CLR

508+

WRITE

.SECS.BOP

;LOAD MODE CONTROL REGISTER

WRITE
STEP

,SEC3,TSOM
.

RENA
:
:
MAINTENANCE BITS: M8, MC
*SET TSOM
*STEP THE CLOCK ONCE

BIT

#TBMT ,$TMPO

<TEST FOR BUFFER EMPTY

WRITE

.sec§.8

*RESET TSOM

MOV
BIT

(SP)+,$TMPO
#SF,$TMPO

::POP STACK INTO $TMPO
STEST FOR S/F

MSTCLR

CR
WRITE
WRITE

28:

4640 104416 383%5 889’.6»99
mg
4652

38:

READ
MOV

STEP
READ

BNE

4714

BIS

ol meh cmmd el

e wh e

227 1 303; 000000
508
4676 001
4900 0137 ; 881 0 881204
4706 8137 7
4722

052737

104016

TEST S7

. 'lttQtt;'tttttfittt.t"t't"'t.t.tCt.t...'ttt't..t'ttt‘..tt.t..t.

4526 012737 000057 oonos
4532
012737 000057 00126
4540

ARERRRRRAARAARANANRARAANAAAAARANAAAAAAANANAAAAAARAARORS

00120
10

1306

001206

?fifa
MOV

MOV

ERROR

Sase
,SEC7.0

: LOAD THE NO. OF THIS TEST
*# FOR TYPE OUT

:CLEAR THE KMC11

:SET CHARACTER LENGTH TO 8 BITS

.PRI14,TENA!RENATMB'MC

.PRI13
(SP)+,$TMPQ

.2
.PRI13

o
3s
$TMPO,
$TMP1

iEMME THE FOLLOWING:

*READ THE STATUS REGISTER
::POP STACK INTO ST

:STEP THE CLOCK ONCE
*READ THE STATUS REGISTER

$TMPO . $TMP2

#SF,$THP2
14.

:S/F DID NOT SET AFTER FLAG SENT

2} 1

e 20-0(7-“ 17:03

———

MACY11 30A(1052)

n7
21-0CT-81 09:21_ PAGE 90
OF MESSAGE TEST

END

SEQ 0090

}: % 000137 014542

JMP

:LOOP ON ERROR

A
41
4185
flfl?

1%
104421
1%
1044
014740 01 9
}:7«2.
&7 ;

78:

STEP
READ
MOV
Sé{

.2
PRI13
(SP)+.$T
%?IT.ST

:STEP THE CLOCK ONCE
*READ THE STATUS REGISTER
::POP STACK INTO ST
:TEST FOR BUFFER EMPTY

fi”

}2% 381?5

10s:

gg;

mA.itm

:TEST FOR DATA AVAILIBLE

MOV
B8R

(SP)+,$THPO
12$

JMP
WRITE

s
.Secs.rson

READ

,PRI13

4.1%3 14.;2‘ 1
4191
419
4193

1
001202

014772 1 4.29

2 °°°58'
1

u.ns
01500

126

4197
4198

015014
015020

00013
104416

14.54;

4200

015032

1044

001202

120

g3 B
g oo
4199 1501% 104.04.;
4199

4201
4202
4

015

104421

0150
015042
0150

156
120
032737 000010
105;

v
000002

25}?

3:?%2

421;

omos

8156 7 001202
031;:;5

s
001202

012637
001202
000743

4218 015130

0126

418 013150 104621
4219 015124 10“9 000001
015134
015122

4227

01520

4221
l.zzg
4223
422%
4225
4226

042737
032737

423
453

22§g
4236

091 0

177775

WP
00120
00120

01515
1914.
01515 813 7 001202 001204
0151
13737 001204 001206
o1s19¢ 052737
001206
015174 1o:.o§s
015176 000137 014542

2 2(09, 015202 000400

4;}1

;

148:

1ou.§9

4213
015112
4216 015116

4219
4

138:

001202

g N ing owee
4.209 §1sgs:§ 104.059
4207
015
0001
14.54;
4208 msoeg 1044 8ooo1
4209 01507

1;::

WRITE
READ

SECO

:LOAD A DATA CHARACTER

:READ THE DATA REGISTER
2:POP STACK INTO ST

g
ERROR 34.

:DEVICE IS HUNG

STEP

;STEP THE CLOCKONCE

MOV
BIT
BNE

(SP)+,$TMPO
#5F ,$TMPO
158

foe A
ERROR 22.
JMP
18
READ ,PRI13

MOV

(SP)+,$TMPO

:LOOP ON ERROR
:END THE MESSAGE
*READ THE STATUS REGISTER

::POP STACK INTO STMPO
STEST FOR SF AFTER TEOM SENT
*YES BRANCH

:NO S/F AFTER TEOM SET
:LOOP ON ERROR

::POP STACK INTO $TMPO

ggA.imo

STEST FOR DATA

READ

,SECO

:READ THE DATA

apaib i o
READ .SEC1

;READ REGISTER

MOV
BR

(SP)+,$TMPO
138

MOV

(SP)+,$TMPO

BIC
BIT

168:

,SEC2,°A

+;POP STACK INTO STMPO

::POP STACK INTO STMPO

#*C<REOM>,$TMPO :CLEAR UNWANTED BITS
#REOM, STHPO
:TEST REOM

BNE
MOV
MOV
BIS
ERROR
JMP

1
$TMPO, $TMP1
STMP1,STHP
#REOM, STHP
;1.
3

*SET SKIP ERROR
:PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO
:LOAD EXPECTED
;REOM FAILED TO SET AFTER END OF MESSAGE
:LOOP ON ERROR

TST60

Jennnnnnnnnnnneneeennnnnenns TEST G0 sevssnnnnsannennnenannnnnee
**END OF MESSAGE TEST.
;*THIS TEST WILL PERFORM THE END

:#0F THE MESSAGE FOR PROTOCOL = CCP
.k

s*THIS TEST WILL PERFORM THE FOLLOWING SEQUENCE:

CZKMDAO
11=DA STATIC
CZKMDA.P11

CZKMDAO DMS11-DA STATIC MACY11 30A(1052) 21-0CT-81 09:21 PAGE 91
CZKMDA.P11
20-0CT-81 17:03
END OF MESSAGE TEST

4239
4240
4241
4 :.;

I
w
e
I

4245

l. 4

;:ttt.tttt

424
4244

4248

4251
4252

015204

8ooog:.

4255
4.259

015222
8152 4

104414
005037

01535

4258
4259
4260
4261

015234
015240
015246
015256

005037
104416
104416
104416

01554
000007
000005
000004

4253 015206 157 7 000060 oonos
4254 o1s%u. 012737 000060 00126
425

256

5
.
4.
S.

155

015262

005037 8154.7

104416

000014

SYNC THE SEND RECEIVE LOGIC
TRANSMIT 3 DATA CHARACTERS
TEST FOR RAC AND RDA
WHEN LOADING THE THIRD DATA CHARACTER

. ACCEPT THE CRC CHECK CHARCATERS

8. TEST FOR RESYNC OF THE LINE BY TESTING S/F
L3 33222233333 28

22 AR RN
TS160: SCOPE
101$:
18:

MOV
MOV

MSTCLR
CLR

CLR

CLR
WRITE
WRITE
WRITE

000000
000100
000026

000321

WRITE

#60,$TSTNM
#60. TSTNUM
508+

015270
015276

104416
104421

000003
ooooog

000001

4270

015312

032737

000020

001202

000002
00000

000002

000010

001202

4268 015302 1ou.§o 00001
4269 015306 012637 oovzog
015320
om%
015330

001766
104416
104421

4276 015336 1044 9 00001
4275 015340 012637
00120

4276
4277

4278

015344
015352

81535:.

852737
001015
105227

000000

4279
015360 001363
4280 015368 o1§7 7 00120
4281 81537 013737 00120
4282

015376

052737

000010

1204
1206

001206

0154046

4285
z.zag
4287

015406
015414
015420

104416
104421
wugg

000003
ooooog
gooom

000000

l‘.zao

012236

33&3;

000020

001202

4292

015446

032737

000001

001202

4288 815:. 4 ng

1205

3s:

508:

4283

428% 815406

104017

28:

453? 015440 104419 000002 000101

48:
78:

118+

528+
.SEC7,0
.SECS.CCP
.SEC&,SYN

ittt

i333223222322¢%1

,SEC3,TSOM
.2

BIT

#TBMT ,$TMPO

READ
MOV
BIT
BNE

.PRI13
(SP)+,$TMPO

#SF ,$TMPO
4$

BNE
MOV
MOV

28
$TMPO, STMP1
$TMPO . $TMP2

READ
MOV

BEQ
WRITE
STEP

INCB

.PRI13
(SP)+,$TMPO

2
,SEC2.STX
.2

R AR AR AR NS

: LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT

_
2SET CHARACTER LENGTH TO 8 BITS
:LOAD MODE CONTROL REGISTER
:LOAD A SYNC CHARACTER

.PRI14,TENA'RENATMB'MC

WRITE
STEP

iEmME THE FOLLOWING:

RENA

:
MAINTENANCE BITS: M8, MC
SSET TSOM
:STEP THE CLOCK ONCE

*READ THE STATUS REGISTER
::POP STACK INTO STMPO
:TEST FOR BUFFER EMPTY

:NO CONTINUE STEPPING THE CLOCK
:LOAD A CHARACTER
*STEP THE CLOCK ONCE

*READ THE STATUS REGISTER
::POP STACK INTO $STMPO
:TEST FOR S/F

BIS

#SF ,$TMP2
15.

:S/F DID NOT SET AFTER SYNC SENT

WRITE
STEP
READ

,SEC3.0
.
.PRI13

;RESET TSOM
:STEP THE CLOCK ONCE
*READ THE STATUS REGISTER

%gm.swo

<TEST FOR BUFFER EMPTY

BIT

#RDA, $TMPO

*TEST FOR DATA AVAILIBLE

ERROR

MOV
108:

:CLEAR THE KMC11

4265
4266
4267

TEST 60

4264

4271
427
4273

SET TEOM
9. READ THE DATA AND DISCARD

2228

1. MASTER CLEAR

e
I

4 4.9

WRITE

(SP)+,$TMPO

,SEC2,°'A

::POP STACK INTO $TMP

:LOAD A DATA CHARACTER

=3
—

54
2"

MACY11 30A(1052)

O0-oergs ool

e ey

§ 23

1405
"59 880gog

8§§2

120

104059

5552

104420

gg%

831;55

eS R
(Y
R

5546 000137

015224
000003 000002 12$:
00000
138:
00001
00120
000010 001202
015224

e e

000001

14$:

5572 1ou.§o 000000
5576 012637 001202
5602 000743

001202

15%:

8
PAGE 92

11$
SECO

ggv

i%:”"""

JMP
WRITE
STEP
READ
MOV
BIT
BNE

1s
,SEC3,TEOM
.
.PRI13
(SP)+,$TMPO
#5F,$TMPO
158

ERROR

22.

READ

,PRI13

g:gs 4!
ERROR 34.

JMP

000013

sssg 01%6 7 001202

09:21

END OF MESSAGE TEST
118:

. e

5544

000137
104.4.1?
104421
1044 9
8159
032737
oo1ogs

R i

-0

-— B §SEORE8
D =3
D

D
d

VO~

5500
5504
5512
5513
5
5526
55

21-0CT-81

BEQ
READ

s«fi 1 192 000000
‘53 ?3404

[=l{elelelelalelalelelalalelelelotalate)

lalin
NN

Y
&»H BB SS S I YNNI
I I
W
W

11-DA STATIC

MOV

SEQ 0092
;READ THE DATA REGISTER
+;POP STACK INTO ST

:DEVICE IS HUNG

:LOOP ON ERROR
:END THE MESSAGE
;STEP THE CLOCKONCE
*READ THE STATUS REGISTER
::POP STACK INTO $STMPO
:TEST FOR SF AFTER TEOM SENT
:YES BRANCH
;NO S/F AFTER TEOM SET

:LOOP ON ERROR

gfl

mA.imro

(SP)+,$TMPO

::POP STACK INTO $TMPO

READ
MOV
B8R

,SECO
(SP)+,$7P0
138

;READ THE DATA
::POP STACK INTO $TMPO

TST61

:TEST FOR DATA

— =y

§§

—_

09:21_ PAGE 93
C n 30A(1052)c 21-0CT-81_
HARACTER LENGTH TEST
3

~
‘flu%zuunuc
0y
LRURZSST Ufl“—jg

11-DA STA

P ¥

.SBTTL

SEQ 0093

CHARACTER LENGTH TEST
JARRRRRRRRRRRRTRCTRRRRRRRRNt

TEST 6]

tenanenennenaneattenetanens

2t at 2t ol 2t b ot 0¥ JF R

s*CHARACTER LENGTH TEST FOR PROTOCOL = BOP
s*THIS TEST WILL PERFORM THE FOLLOWiNG
.:SEOUENCE

o
o
;e
e
o
o*
'
' o
;e

6. SYNC THE SEND RECEIVE LOGIC FOR PROTOCOL
BOP BY SENDING THE FLAG AND ADDRESS PLUS
CONTROL BYTE AT 8 BITS/CHAR
7. SET THE CHARACTER LENGTH
8. TRANSMIT 3 DATA BYTES AND TEST THE

2R IR

ottt

1. RESET THE CHARACTER LENGTH REGISTER
BITS/CHAR
T0_7
2. SET_THE ONE BIT IN BIT POSITION 6 OF
OF THE DATA BIT REGISTER
3. SET THE DATA STEP CLOCK FOR 7 BITS/CHAR
4. ISSUE A MASTER CLEAR
5. SET THE CHARACTER LENGTH REGISTER TO
8 BITS/CHAR FOR INITIALIZATION OF
THE SEND RECEIVE LOGIC

DATA BYTE RECEIVED TO THE DATA BYTE TRANSMIT
-D

9. TEST IF ALL CHARACTER LENGTHS HAVE BEEN TESTM D
IF NOT LOAD NEW VALUES AND CONTINUE

SIRAARARAARAAAAAAAAAAAAAAARAAAAAARAARAAAAAAAAAARAAAAAAAES
e
OTD

TEST 61

SIRRAARAAARAAAAAAAAAAANARARAAAAAAAAARARAAAANAAARAARARARRAR
A AR
AAR

TST61:

SCOPE

#61,STSTNM

Mov
MOV

#347 48
#7758

;LOAD THE CHARACTER LENGTH REGISTER

MoV

#B1T6,68

*SET THE ONE BIT IN BIT POSITION

MoV

#238,SLPADR

mMov

015640

000100

238:

000000
016124

000321

MSTCLR
CLR
CLR
CLR
CLR
CLR
WRITE

75:

: LOAD THE NO. OF TKIS TEST
:# FOR TYPE OUT

Mov

#61,TSTNUM

508+2
11s+$
528+
818+
618+

*ISSUE A MASTER CLEAR

;:LOAD THE MODE CONTROL REGISTER

,SEC7

:LOAD THE CHARACTER LENGHT

#-2.708+2

.WORD

WRITE

:6 FOR 7 BITS/CHAR

:SET THE RETURN AT 38

,SECS,BOP

MOV

WRITE

:TO 7 BITS/CHAR

,PRI14,TENA'RENA'MB'MC

:
:
015732

104416

000003

000001

WRITE

,SEC3,TSOM

iE::BLE THE FOLLOWING:

RENA
MAINTEMANCE BITS: MB, MC
MAINTENANCE BITS: MB. MC

*SET TSOM

CZKMDAO DMS11<DA suuc mvy 30A(1052) 21-0CT=81 09:21 PAGE 9%
CZKMDA.P11
20-0CT=-81 17:0
CHARACTER LENGTH TEST

4 79 015740 104421
437 81 766 1044
4378 015750 85
4379 015754

28:

1
120

7 000020

001202

16120

015776

015762

oongg

4
4
4385

1
01
016012

104416
104421
104420

00000
ooooog
00001

4389

016032

105227

000000

4381

15;94 0137

12005 104416 8oooo

4
016016
4387 016022
4388 016030

4390 016036 001363
4391 016040 013737 001202
439 816046 013737 001202
4393
016054 052737
6396

016062

4396
4397
4398

016070
016070
01607«

38:

001204
001206
001206

104016

4395 016064 000137 015654
104421

104420

00001

4400 016104

032737 000020

4403

000000

016112
016114

016122

016130

016120

001411
104416

000002

005227

177776

104416

000007

4405 omgg 001003
4407

016134

000000

016136
016144
016146

032737
001406
105227

68:

708:

*NO CONTINUE STEPPING THE CLOCK

WRITE
WRITE
STEP
READ

MOV
BIT
BNE

,SEC3.0
.2
.PRI13

(SP)+,$TMPO
#SF,$TMPO
248

8NE
MOV
MOV
BIS

73
$TMPO, $TMP1
$STMPO, STMP2
#SF,S$TMP2
14.
238

JMP

.séci.o

:TEST FOR BUFFER EMPTY

;LOAD ADDRESS

*RESET TSOM
:STEP THE CLOCK ONCE
*READ THE STATUS REGISTER

::POP STACK INTO STMPO
*TEST FOR S/F

:S/F DID NOT SET AFTER FLAG SENT

:LOOP ON ERROR

STEP
READ

:STEP THE CLOCK ONCE

BIT

(SP) +,$TMPO

#TBMT ,$TMPO

+:POP STACK INTO $TMPO

WORD

BEQ
WRITE

INC

BNE

WRITE

.PRI13
g%
SEC2

*READ THE STATUS REGISTER

:TEST FOR BUFFER EMPTY

;LOAD A DATA CHARACTER

#-2

718

,SEC7

WORD

BIT
BEQ
INCB

#SF ,STMPO
108
#0

sTEST IF SF STILL SET
*NO BRANCH
*TIMEOUT FOR S/F

4414 016152 001003

BNE

108

*BRANCH IF NOT TIMEOUT

4416 016156 000137 015654

JMP

238

:LOOP ON ERROR

2233 016136
4410
4411
m%

441

4415

016154

718:

000010

016170
016172

001202

000000

00141
1o«.§

4420 016176 o1§6
00120
4421 016205 013737 016120

618:

ERROR

33.

001202 108:

BIT

#RDA,STMPO

001204

MOV
MOV

(SP)+,$TMPO
6S,STHP1

BEQ

128

442

01251

023737 001202 001204

4424
4425
4626
4427

016220
016222
016226
016232

1o:.o§7
oogt 7 015654
10 527 000000
00131

44623

4428

016216

016234

10404

000137

015654

4631

104421

000002

016242

016250

104416

000003

BEQ
READ

CMP

001411

u.gg 016236
4630

8$:

104041

4417 omos 032737
4418
4419

48:

6S,.412

MOV

001202

:STEP THE CLOCK ONCE
*READ THE STATUS REGISTER
::POP STACK INTO $TMPO

MOV

INCB

SEQ 0094

PRI13
(SP)+,$TMPO

#TBMT,$TMPO

ERROR

24$:
78:

oooooi

4399 016100 012637 001202

01
4602

508:

BIT

BEQ

0000

0126
oo1zos
032737 000010
001202
001017

SiEP
READ
MOV

)

118:
128:

138:

$TMPO, STMP1

*DEVICE IS STILL SENDING SYNC CHARACTERS

*TEST FOR DATA AVAILIBLE
;READ THE DATAREGISTER

::POP STACK INTO S$TMPO
*GET EXPECTED

*TEST FOR CORRECT DATA

ERROR
JMP
INCB
BNE

5 38
#0
78

:DATA WAS NOT TRANSMITTED CORRECTLY
*LOOP ON ERROR

JMP

238

*LOOP ON ERROR

ERROR

000002

118
,SECO

27O GO AWAY

WRITE

STEP

34.

,SECZ,TEOM

:DEVICE IS HUNG

-END THE MESSAGE

:STEP THE CLOCKONCE

lalin

ZKMDAO DMS11-DA STATIC

ZKMDA P11

MACY11 30A(1052)

zo-oct-‘f 17:03

4
44
44

1
1
1

&
4

1
1

104044
002137

4439
4440

016
016

001005
10404

w.g
4443

16
016

81 637
001202
32737 000001

4435

4461

44t

16
016

016

4445 mg 2
«49 16
444
16;4
4448
016350
4449 816 56
4450
451
4452
4453
4456

016
01€
016366
016
016372

1044
1
159
120
32737 000010
1403

15654

000013

ogzm

015654

104421
104420

ooooog
00001

4455 016376 012637 001202
4456 016402 032737 000001
001404
104420

158:

001202

4457
4458

016410
016412

4460
4661

016622
016422

104420

000001

4463
4466

016432
016440

042737
032737

177775
000002

001202
001202

001202

001204

4462 016626 012637 00120
016446
001017
016450 013737
016456 013737
016464 052737

001204
000002

4469

016472

471

016500

4473

016506

4475

016510

006237

016120

4
4478
4679

8165 2
016526
016532

005337
105737
001403

015722
016120

4481

816540

4470 016476

4472

105227

001333

016514

162737

000137 015654

016540 000400

ERROR
JMP

v
238

:S/F SET BEFORE SECOND DATA BYTE RECEIVED
:LOOP ON ERROR

818:

168:

READ

,PRI13

:DEVICE IS HUNG

MOV
BIT

(SP)+,$TMPO
#RDA, $TMPO

;:POP STACK INTO $TMPO
:TEST FOR DATA

READ
MOV
MOV
CMP
BEQ

,SECO
(SP)+,S$TMPO
6S,STHP1
$TMPO,STMP1
158

sREAD THE DATA

23,
238

:DATA WAS NOT TRANSMITTED CORRECTLY
:LOOP ON ERROR

STEP
READ

.2
.PRI13

:STEP THE CLOCK ONCE
*READ THE STATUS REGISTER

808
,SECO

*NO BRANCH TO 80$
*READ THE DATA

READ

,SEC1

:READ REGISTER

BIC
BIT

#*C<REOM>,$TMPO :CLEAR UNWANTED BITS
#REOM, $TMPO
:TEST REOM

BEQ

ERROR
J

MOV
BIT

(SP)+,$TMPO
#RDA, $TMPO

MOV

(SP)+,$TMPO

BNE
MOV
MOV
BIS

INCB

BNE

JMP

cLe

SUB

178:

*NO BRANCH

148
34.

ASR

016134

INCB

BNE
ERROR

ERROR

016502 000137 015654

4480 016534

4482

001206
001206

;READ THE STATUS REGISTER
::POP STACK INTO $TMPO
:TEST FOR SF AFTER TEOM SENT

MOV

1o:.o§s

4474 016508 000241
476

000000

80s:

PRI13
(SP)+,$TMPO
ogr.sfmo

BEQ
READ

000000

4459 016416 012637 001202

4665
4466
4467
4468

14$:

1046420
o1§9 7 00120
013737 016120 001204
023737 001202 001204
001403
104027
000137

PAGE 95

READ
MOV
BIT
BEQ

528:
001202

09:21

CHARACTER LENGTH TEST

001202

105227 8ooooo
104420

21-0CT=81

(SP)+,$TMPO

16$
$TMPO, STMP1

$TMP1,$TMP2
#REOM, $TMP2
#0

158

21,

238

::POP STACK INTO STMPO
:TEST THE DATA

::POP STACK INTO STMPO
:TEST IF DATA AVAILIBLE

::POP STACK INTO STMPO

*SET SKIP ERROR
:PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO
:LOAD EXPECTED
;REOM FAILED TO SET AFTER END OF MESSAGE

:LOOP ON ERROR

#41,48

ISTB
BEQ

75$
68
TST62

23s

TST62

JMP

SEQ 0095

11=DA STAI‘% MACY11 30A(1052)

—_—

20-0CT

17:03

21-0CT-81 09:21 PAGE 96
E RROR CHECK TEST FOR ALL ERROR DETECTION
.SBTTL

ERROR CHECK TEST FOR ALL ERROR DETECTION
JARRRRRRRRRRRRTReRReRnnnnnnt

TEST 62 tecnnnnensanennneeeenetente

s*ERROR CHECK TEST_FOR PROTOCOL = BOP
s*ERROR CHECK X Y Z = CCITT=1

JINRAAARAARARRAAAAANAAAAAARAAAAAAANAANAAAAANNAAAANAAAACOORNNONOS

TEST 62

FERRSEg;s%go«row»o«»o~
SEEUEL

SARRAAARARAAAAAAANAANAAAANAACAAANAARAAAAANRAAANAAAAANAAANAAAASAAAACONS

t$162:

NOONON

-t O N

648:

b
b
b
b

\fl§\fl\fi\h\fl\fiu\h

2s:

38:

A T

508 :

~N NO=

,SEC7.0

CLR

f00s+

;s:

:SET CHARACTER LENGTH TO 8 BITS/CHAR

.SECS.BOP!'CCITT-}

:LOAD MODE CONTROL REGISTER

1008+
1108+
52%+
508+
118+
,PRIT4,TENA'RENA'MB'MC

%Eun:ue THE FOLLOWING:

WRITE
STEP
READ

,SEC3,TSOM
.2
.PRI13

RENA
:
:
MAINTENANCE BITS: M8 ,MC
*SET TSOM
:STEP THE CLOCK ONCE
*READ THE STATUS REGISTER

BIT

#TBMT,$TMPO

:TEST FOR BUFFER EWPTY

MOV

658,.+12

STEP
READ

.2
.PRI13

BEQ

016720
000000

001202

WRITE

MOV

001202

W
NOANNNUWNNNNO=OO

SpRaaes8Rls2522

O—=OOOO—=OOO
== -

758

RO
2
&»H
e
WWNON

—

d md

b b

452

(=1~ —_——

—

BEDDDDDS

000001

#62,$TSTNM
: LOAD THE NO. OF THIS TEST
TSTNUM
*# FOR TYPE OUT
#,65%
:LOAD CHARACTER BUFFER
#64S, SLPADR
:SET RETURN ADDRESS TO 64$
;ISSUE A"MASTER CLEAR

CLR
CLR
CLR
CLR
CLR
WRITE

000321

SscoPe

MOV
MOV
MOV
MOV
?E;cu
WRITE

000000

d ed

D e

g288
28X

[=lelelelelelelelelelelelelelela)

WRITE
WRITE

MOV
BIT
BNE
INCB
BNE
MOV
MOV

(SP)+,$TMPQ

:LOAD ADDRESS
*RESET TSOM

(SP)+,$TIPO
#SF,$TMPO
248
3s
$TMPO, STMP1
STMPO . STMP2

+:POP STACK INTO STMPO
*TEST FOR S/F

#SF,$TMP2

JMP

648

READ

.PRI13

STEP

MOV
BIT

*NO CONTINUE STEPPING THE CLOCK

,SEC2.0
.SEC3.0

BIS

ERROR

+:POP STACK INTO $TMPO

*STEP THE CLOCK ONCE
*READ THE STATUS REGISTER

14.

:S/F DID NOT SET AFTER FLAG SENT

:STEP THE CLOCK ONCE

(SP)+,$TMPO

+:POP STACK INTO S$TMPO

#TBMT ,$THPO

:LOOP ON ERROR

*READ THE STATUS REGISTER

:TEST FOR BUFFER EMPTY

4539

11=DA STATIC
20-0CT-81

0170

MACY11 30A(1052)

-‘g 17:0}

§3

IKMDA.P11

1405

17036

25‘5

}; 4

017676

45644

017050

327;7 000001

4561

4545
4.549
454

l.s:.s

104416

"823
14
17
1044
170% 01 g
17070

005337

4551
4552

01711
017112

14.0;
1o:.o§

4556
4555

017120
017120

104420

4559

017144

001414

4
4563

017162
017170

042737
104.031

4565

017176

000002

8176

4549
0170764 013737 017042
4550 817108 883 7 001202
4553

21-0CT-81

09:21

BEQ

.WwORD

INC

108:

BIT

65s:
001202

BEQ
READ
MOV

SEQ 0097

,SEC2

:LOAD A DATA CHARACTER

:+1 TO DATA OUT

#RDA, $TMPO

:TEST FOR DATA AVAILIBLE

118
,SECO
(SP)+,$TMPO

;READ THE DATA REGISTER

::POP STACK INTO $TMPO

19s

:=1 T0 DATA (CHR. REC.)

308
23,

*DATA OK BRANCH
:DATA TRANSMITTED INCORRECTLY

MOV
CMP

658,$TMP1
$TMPO, STMPY

JMP

648

READ

,SEC1

BEQ
ERROR

308:

000001

WRITE

DEC

001204
001204

0171164 000137 016574

PAGE 97

ERROR CHECK TEST FOR ALL ERROR DETECTION

:GET EXPECTED
:TEST FOR CORRECT DATA
:LOOP ON ERROR
;READ REGISTER

l.ssg 8171 4 0129
09120
4557
017130
042737 177577 001202
4558 017136 032737 000200 001202

MOV
BIC
BIT

(SP)+,$TMPO
::POP STACK INTO $TMPO
#*C<ERRCK>, $TMPO
:CLEAR UNWANTED BITS
#ERRCK , $TMPO
*TEST ERRCK

4560 017146 o1§737 001202 001204
4561 017156 013737 001204 001206

MOV
MOV

$TMPO, STMP1
STMP1,STMP2

PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO

JMP

64$

:LOOP ON ERROR

BR
INCB

BNE

12$
#0
78

JMP

64$

STEP

:STEP THE CLOCKONCE

(SP)+,$TMPO
#SF,$TMPO

::POP STACK INTO STMPO
STEST FOR SF AFTER TEOM SENT

000200

001206

4564 017172 000137 016574

118:

4568 817204 001
017206

10404

4571

017216

104416

4573

017 .;3

104420

00001

000000

4570 017210 000137
4572

017222

104421

016574

000003

BIC
ERROR

318:

4566 017176 000406
4567 017200 105%7 000000
4569

BEQ

ERROR

000002

153:

138:

4574 017232
012637 oo1zos
4575 017236 032737 000010
001202

4576
4577

017244
017246

oou.og
105227

4579

017254

104044

4578 017252 001003
4580 01725

4581 017

l.sag 817
4583
017272

ogo1§7

4587

817306

4592
4593

017332
01733¢

1008:

032737 800001 001202 14$:

000000
4584 017276 001351
4585 817
1040‘;
4586
017302 000137 016574

4588 017
1ou.§9 000000
4589 017312
012637
00120
4590 017316
01 7;7 17042
001204
4591 017 ;4 8537 7
001202 001204
00140
1040

4594 017336 000137 016574

READ

MGV
BIT

16574

001
105

WRITE

1108:
1208:

BEQ
INCB

BNE

ERROR

JMP

cgnucx.smz
25.

34,

,SEC3,TEOM

.PRI13

148
40

148

36.

648

*RESET SKIP ERROR

:LOAD EXPECTED
;:ERROR CHECK SET

:DEVICE IS HUNG

:LOOP ON ERROR

-END THE MESSAGE

*READ THE STATUS REGISTER
*NO

BRANCH

:S/F CAME UP BEFORE LAST DATA BYTE RECEIVED

:LOOP ON TEST

BIT

#RDA,$TMPO

BNE
ERROR
JMP

13s
.
648

:DEVICE IS HUNG
:LOOP ON ERROR

READ
MOV
MOV
CMP

0
(SP)+,$TMPO
653,$TMP1
$TMP0, STHP1

;READ THE DATA
+:POP STACK INTO STMPO
*GET EXPECTED DATA
*TEST DATA

JMP

648

:LOOP ON ERROR

BNE
INCB

BEQ
ERROR

1208
#

408
23,

STEST FOR DATA

*0K BRANCH
*DATA TRANSMITTED INCORRECTLY

ERR
T
S

21-0CT-81 09:21 PAGE 98
CHECK TEST FOR ALL ERROR DETECTION
! SOA(IOSZ) RROR

S—

4
45
4600

7
32737
14614

{5 fad

17
1
017

40$:

7
000200

1%
@ fo o e g
4603 017404 8‘ 7 000200 1206
4606
017412 104031

032737
001
105%;
001351
1040%6
000137
104421
1044 9
0126
0457%7
032737
001014
013737
013737
052737
1060;;
0001
104659
0126
84 737
32737
801414

:LOAD EXPECTED

016574

00001
001202
000001

(SP)+,$TMPO
#RDA, $TMPO

001202

708:

52%:

000000

8176
01764
17644
17650
17228
017
017666

104031
137
S; 7
022737
17 ;
2737
1402

:TEST FOR DATA

708

.SECO

(SP)+,$THP1
198

sREAD THE DATA
:;POP STACK INTO $TMP1
;=1 TO DATA CHRS.

0§F.87HPO
158

sTEST FOR S/F AFTER TEOM SET
:YES BRANCH

:S/F DID NOT SET AFTER TEOM SET
;LOOP ON ERROR

016574

158:
000001
001;02
17777
000002
001202
001204
000002

016574
1
1;9;
177
000200

:READ REGISTER
+:POP STACK INTO STMPO

#*C<REOM>,$ TMPO :CLEAR UNWANTED BITS
#REOM, STMPO
sTEST REOM
168
$TMPO,STMP1
STMP1,STHP
g?EOH.STHP

*SET SKIP ERROR

:PREPARE TO REPORT ERROR

:LOAD EXPECTED ALSO

:LOAD EXPECTED

:REOM FAILED TO SET AFTER END OF MESSAGE
:LOOP ON ERROR

168:

001204

1957‘
017042
176

017042

000377

017042

:READ REGISTER

TMPO

120
120

gl ol oy
464§ 8176 8427 7 880 00 001206

4644
4645
6649
464
4648
4649
4650

:STEP THE CLOCK ONE TIME
:READ THE STATUS REGISTER
::POP STACK INTO $TMPO

PRI13

000000
001296
017676
000010

:LOOP ON ERROR

S8R |

1826 1
1044
0129
032737
0014
1046§
01;
005337

PREPARE TO REPORT ERROR

:LOAD EXPECTED ALSO

000137

888 S8

017614
174
174
017426
0174
017434
017442
17444
17450
017456
017460
017460
17466
017470
017474
017476
017500
017504
017504
017504
017510
017514
0175
017526
017534
017536
017544
017552
017
817562
017566
17593
175
17576
017
817612

STEST ERRCK
SRESET SKIP ERROR

#ERRCK,ST
418

4605
460?
460
4608
4609
4610
4611
461;
461
4616
4615
4619
461
4618
4619
, 2250
1
462§
4623
4626
4625
4629
4627
4628
46%3
4630
4631
463;
4633
4634
4635
46
463
46
4639
4640

;READ REGISTER

SEC1

(SP)+,$TMPO
::POP STACK INTO STMPO
#*C<ERRCK> TMPO
:CLEAR UNWANTED BITS

:;POP STACK INTO STMPO

:CLEAR UNWANTED BITS

*TEST ERRCK
SRESET SKIP ERROR

PREPARE TO REPORT ERROR

:LOAD EXPECTED ALSO

:LOAD EXPECTED

178:

;LOOP ON ERROR

sTEST IF GO AHEAD CHARACTER

sTEST IF ALL CHARACTER'S TESTED

CZKMDAO DMS11<DA STATIC

CZKMDA.P11
4651

MACY11 30AC1052)

'go-oct-fi mo}

017670 000137 016574

88
17ele
01
4
17676 888‘000

21-0CT=81

09:21

PAGE 99

ERROR CHECK TEST FOR ALL ERROR DETECTION

oy
198:

JMP

SEQ 0099

648

15763

:CHR. COUNTER

465

JeRRRRRRRRRRRRRTRR
R RN anenns TEST 63 rrnnnnnntentteRRRRRRRARRRERS

465

s*ERROR CHECK X Y 2 = CCITT

«sg

s*ERROR CHECK TEST FOR PROTOCOL = BOP

‘“o

4661

666“§
‘“‘

4665

017700
817708

4.66""9 17710

w71

017

005037

177

10«19

TS163:

00110

012737 00006 00156

4668 817716 12737 m 330
1-698 17726 012737 01
1106
46
17732 104414
648:
“;i

17740

104416

4676 017756 005037
017760
017764
017770
017776
020000
020006

TEST 63

22 ARRARAAAAANRAAAAARAAARNRRNNRERAARNRAAAAAAAANAAAAAAANAAAAAAAAAAANORENDY

12737 000063

4675
4676
4677
4678
4679
4‘239

L3333 3333223233222 213338213 1332 1323222332322 323222232222221

005037
005037
005037
005037
005037
104416

021034

000000

MOV

#63,$TSTNM

CLR

198

S 000001

WRITE
CLR

CLR
CLR
CLR
CLR
CLR
WRITE

000321

,SEC7.0

4684
4685

l.ug
4687

4688

4689

020012
020020

20026
0200

104416
104421

000003
ooooo;

1044 g 00001
156
120
wgg

13737

020

104416
104416
104421
1044 g
01 9
032737

4698

020112

105227

000000

4700

0201

1§7

83150

02011

4699 8 1
4703

020126
0201
020142

1017

;

013737
52737

104019

3s:

1
1 os
10 001202
001202
000010

017732

104421

000002

020150
020150

20056

001204

WRITE
STEP

READ
MOV

,SECS,BOP!CCITT=0

:LOAD MODE CONTROL REGISTER

1008+
1108+
52842
508+
118+
,PRIT4,TENA'RENA'MB'MC

igunzus THE FOLLOWING:

]

508:

MOV

658,.+12

BNE

248

WRITE
WRITE
STEP
READ
MOV
BIT
INCB

,SEC2.0
.SEC3.0
.2
,PRI13
(SP)+,$TMPO
#SF,$TMPO

RENA

MAINTENANCE BITS: M8 ,MC

*SET TSOM
:STEP THE CLOCK ONCE

*READ THE STATUS REGISTER
::POP STACK INTO $TMPO

:TEST FOR BUFFER EMPTY

:NO CONTINUE STEPPING THE CLOCK

:LOAD ADDRESS
*RESET TSOM
:STEP THE CLOCK ONCE
*READ THE STATUS REGISTER
::POP STACK INTO ST
*TEST FOR S/F

BNE

MOV
BIS

$TMPQ, STMP2
#SF,$TMP2

JMP

64$

14,

:S/F DID NOT SET AFTER FLAG SENT

STEP

:STEP THE CLOCK ONCE

ERROR

;43:
$:

,PRI13
(SP)+,$TMPO

#TBMT ,$TMPO

MOV

001206
001206

,SEC3,TSOM
.2

BIT

BEQ

000000

4704 3 0144 000137

4705
4706

2s:

020034 032737 83002 001202

020042

469 0

4701
4702

000001

-SET CHARACTER LENGTH TO 8 BITS/CHAR

4691
52
469,
469
469 8
4695
76
46
20102
4697

:# FOR TYPE OUT

f00s+

l-&g

468

: LOAD THE NO. OF THIS TEST

#63. TSTNUM

MOV
1,658
;LOAD CHARACTER BUFFER
MOV
#64S,SLPADR
:SET RETURN ADDRESS TO 64$
MSTCLR
:ISSUE A"MASTER CLEAR
WRITE

020406

0204
0204
020630
020114
020340
000014

ScoOPE
MOV

$TMPO, STMP1

:LOOP ON ERROR

(1052)

21-0CT=81

09:21

PAGE 1

E%&:?.??’“M‘:‘RS ?‘7‘%1 ERROR CHECK TEST FOR ALL ERROR DETECTION
:READ
THE STATUS REGISTER
o8 Bee o933y 98 (')
=5°° (S’%Hsr
.--533
STACK
INTO ST
‘;33
}gf : 7 000020 001202
BIT
#TBMT.ST
:TEST FOR BUFFER EMPTY
2;}
bi 1 215 000002
35?1: ;gecz
:LOAD A DATA CHARACTER

2;}

8823?§ 021034

2;}?
P4
PYal

27 1
i§
2 %
3
47

-y

.WORD

19s

:+1 TO DATA OUT

,SECO

32737 000001 001202 10$:
980638
1616 1044

ag
RREAD

'c‘%
g;ffi%%m
gggoa g’
JMP
648

g ol

104420

000001

13 ; ?583 %3%
"'O;
§ 300?57 017732
o

i2;539

INC

65%:

2392 3}.85 (7";'2
‘1’9%% 120
7?7 000200 00120

e 058 ¢ 1%’5"5 001202 001204
‘;? 0
°,37§7 001504. 001206
. § 8%3? 84
001%06
P4
$o31
.
g?s' 3%3 8 3%?3; 017732

mA.srm

READ

,SEC1

'BIT
a'?\c'

fln’vo.srm
STMP1,$TMP2
#ERRCK , STMP2
25 ]
64$

4738 § oi‘sg 1os§§9 000000
s
2;23 0 0
?8104%
agey 050
°°°Rs 8«%35 000002 128:
o
1§§3"
es °S°
050 a5 100
'0‘2 1 000001§
rior I
o 9 120
Tee
030378
0159
2;4 §zoc$3 8§140;
-5 .

s
ERROR
i’:x’re
STEP
READ
MOV
17
aeo

#d
34.
fgzcs.reon
2
.PRI13
(SP)+,$TMPO
#SF,$TMPO
148’

749

02041

BNE

148

4751

473%

4748

3;2

0004

105

1003

2750 §ou% ?840“
475

000000

137 017732

737

000001

1008:

001202

o B 001B oy
iG B e
& 8 0480 0136 9
pisi
4761
a7y
950a3
020454
9013737 020;
001504
4755 0

4762

020462

023737

001202

318:

001204

14$:

INCB

;TEST FOR DATA AVAILIBLE
:READ THE
iR
HEDATA
DATAREGISTER
REGISTE

. ;E;x &ou comgscv DATA
*DATA TRANSMITTED INCORRECTLY
:LOOP ON ERROR
:READ REGISTER
:READ
REGISTER

:giik:cxosrmo"
#ERRCK , STMPO

353
MOV
BIC
ERROR
JMP

SEQ 0

:CLEAR
UNWANTED BITS
5.’.5221‘2255 sl

*PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO
:LOAD EXPECTED
;ERROR CHECK SET
:LOOP ON ERROR

128

:Es&x,cs“ lgmmm
f
-END THE MESSAGE
:STEP
CLOCKONCE
*READ THE
THE STATUS
REGISTER
::POP STACK INTO ST
*TEST
FOR SF AFTER TEOM SENT
*NO BRANCH
.

ERROR 2463

Et/)('JPcg‘ttgrmm LAST DATA BYTE

g'x‘g

gkg;.smo

STEST FOR

ERROR

34.

CMP

$TMPO,

JMP

=
e
) :59’ isegg $TMPO
MOV
'3 §’
m fMP1
STMP1

Est

o RT
;:8533 s'rficx
THE DATA
INTO STMPO
;“GET
Esraé:%\CTED DATA
:DEVICE IS HUNG

:TE

898

CZKMDAO 0"811-gk ST?I‘; ?995}1 30A(1052) 21-0CT-81 09:21 PAGE 101
CZKMDA.P11
ERROR CHECK TEST FOR ALL ERROR DETECTION
4763
7

% 1 -

2;6

6;$°
4

10
512

k77§

4774
4775
477
47

1?4‘

54
350
55
556

4780

1§7 7 881;04

ognncx.

737
104031
137

000200

017732

2;34 8

; ’12‘

001204

020642

5337

021034

032737
001009
105
001351
1040;9
0001

000010

418

$TMPO, STHP
STMP1 ,$TMP2

001202

708:

52%:

000000
017732

158:

4801
480
4803

0702
0 ;}6

4810
4811
4812
481
4814
4815
481
481
4818

02074
02075
02075
7
7
8 07764
077
100
021006

‘PRI13

:PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO
:LOAD EXPECTED

;STEP THME CLOCK ONE TIME

*READ THE STATUS REGISTER
::POP STACK INTO $TMPO

%gA.imo

*TEST FOR DATA

LSECO

:READ THE DATA

198

:=1 TO DATA CHRS.

#SF ,STMPO
15

53s
22.
648

+;POP STACK INTO $TMP1
:TEST FOR S/F AFTER TEOM SET
*YES BRANCH

:S/F DID NOT SET AFTER TEOM SET
:LOOP ON ERROR

(SP)+,$TMPO

;READ REGISTER

+:POP STACK INTO STMPO

#>C<REOM>,STMPO :CLEAR UNWANTED BITS
#REOM, $TMPO
:TEST REOM

000002

001202
001204
000002

32737 000200
1414
13737 001202
13737
001204
2737
00
104031
137
. 01773
5; 7
0202
022737
176

"SEC1

4805 8 0; ¢ 0001§§ 017732
480 8§§; i 1?44 9 839001

*RESET SKIP ERROR

:LOOP ON ERROR

(SP)+,$TMP1

e wom

032737
001014
013737
013737
1325 7

(SP)+,$TMPO

B Lk e
4799 .0
4800 020672

;READ REGISTER

:LOOP ON ERROR

001;0‘
001206
001206

g?s 31‘ 7 000001

4793

SEC1

648

%8138

2;81

479

;0K BRANCH
*DATA TRANSMITTED INCORRECTLY

177
000200

7
7

001202

8 061
0616
020616
020624
020626
0
0
0

628
2

(SP)+,$TMPO
:;POP STACK INTO $STMPO
#*C<ERRCK> , $TMPO
:CLEAR UNWANTED BITS
#ERRCK, $TMPO
STEST ERRCK

4785
47
4787
4788
4789
4790
4791
4792

40$:

14 ;

SEQ 0101

168:

$TMPO, STMP1
STMP1 . STHP
#REOM,STHP
1.
648
LSEC1

(SP)+,$TMPO

#*C<ERRCK>, STMPO
17$
$TMPO,

K,$TMPO
$TMP1

020200

PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO
:LOAD EXPECTED

;REOM FAILED TO SET AFTER END OF MESSAGE

:LOOP ON ERROR
:READ REGISTER

$:POP STACK INTO ST

:CLEAR

UNWANTED BITS

:TEST ERRCK

*RESET SKIP ERROR
PREPARE TO REPORT ERROR

STMP1 ,$TMP2

:LOAD EXPECTED ALSO

653

:LOOP ON ERROR

ggmx.smz
17%:

*SET SKIP ERROR

n’o.sss

:LOAD EXPECTED

sTEST IF GO AHEAD CHARACTER

CZKMDAO DMST1=DA STATIC MACY11 S0AC1052) 21-0CT-81 09:21 PAGE 103

CZKMDA.P11
]
4819

;

2
S

D0-0c 181 17508

021014

1 12
1
10

E RROR CHECK TEST FOR ALL ERROR DETECTION

m;‘

;7
000377 020200
A ;
137
017732

0510
01
1834. 888‘000

BEQ

o
198:

CMP
BEQ
JNP

17,

#377,65%
18$
643

SEQ 0102
sTEST IF ALL CHARACTER'S TESTED

TST64

:CHR. COUNTER

482

Jennnnnnnnanteecerneennnnne TEST 64 seennnnannntanetanatanttane

**ERROR CHECK TEST FOR PROTOCOL = BOP

“ 1

| IRRAANAARAAANRARENAARANAARANNAANAARAAAAAANANRACANAANNOANNAANANORES

*#ERROR CHECK X Y Z = CRC16

‘l.g;f

: TEST 64

‘835

. ttt.tt;'Q't.tt'.tt.'."'t'.t...ttttt.t..t.....tt.t.t.t.'.tt.t.'

"}9 021038

4837
l.asg
4839
4840

02104 81 737 m oonos
021046 012737
0012
021054 012737 oooog,n 0213
8 1
012737 021070 001106

484

ogtor

48641

021070

4843
4844

021076
021104

w.g
4847
4848
4849
4850
gssn

0 mg
0211
0211 g
021132
0 nsg
021142

4845

021112

104414

005037 02217;
104416
104419

00000

005037
885037
sogr
005037
005037
104416

021544
1570
wgg
0212
021476
14

oosog

021544

TS164:

648:

SCOPE

MOV
MOV
MOV
MOV

#64,STSTNM
#64. TSTNUM
#,658
#64S, SLPADR

CLR

198

CLR

1008+

MSTCLR

ooooog
00000

WRITE
WRITE

000321

CLR
CLR
CLR
CLR
CLR
WRITE

;ISSUE A'MASTER CLEAR

,SEC7.0
:SET CHARACTER LENGTH TO 8 BITS/CHAR
,SECS.BOP!CRC16 :LOAD MODE CONTROL REGISTER

1008+
1108+
528+
508+
118+
,PRIT4,TENA'RENA'MB'MC

485

4854
4855
l.asg
4857
4858
4859

021
021
021
021
85'

104416 83%3 000001
;
1044
88001
8159
1208
32737 000020 001202

4861

021
1

0137
1044.12

4864
4865

021
021

4860

m"i

021

4369 021
4867 021

4868 81
4869

021

4870 81
4871
021
4872 021
487

4874

: LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT
:LOAD CHARACTER BUFFER
*SET RETURN ADDRESS TO 64$

8 1

021

104421

oowgg

10441

1824 1
1044

000000
1

120
10

105227

000000

1 ;
137
13737

52737

104016

38:

001202
508:

1 os 881 04
00120
1206

001206

WRITE
STEP
READ
MOV
BIT

,SEC3,TSOM
.2
.PRI13
(SP)+,$TMPQ
#TBMT ,$TMPO

MOV
WRITE

658,.+12
.ssc;.o

STEP
READ

|
.PRI13

BEQ

85«')2“
000

15
32737

1017

28:

fEm'”‘" THE FOLLOWING:

RENA

:
MAINTENANCE BITS: M8 ,MC
*SET TSOM
:STEP THE CLOCK ONCE
*READ THE STATUS REGISTER
::POP STACK INTO STMPO
:TEST FOR BUFFER EMPTY

*NO CONTINUE STEPPING THE CLOCK

.gsc .0

:LOAD ADDRESS

MOV
BIT

(SP)+,$TMPO
#5F,$TMPO

2:POP STACK INTO ST
*TEST FOR S/F

INCB

BIS

#SF ,$TMP2

WRITE
BNE

BNE
MOV
MOV

ERROR

248

*RESET TSOM

:STEP THE CLOCK ONCE
*READ THE STATUS REGISTER

3$
$TMPO, STMP1
swg $TMP2

14.

:S/F DID NOT SET AFTER FLAG SENT

———)

58 8T Ty
021070

ggfggg

e
d
d
e
e

001202
65%:
108:

8Ry

NNWN NOO

puert

001202

N &

§8 8223888
SESsSuSRSIoG:
SS82s8e%08
&
SRUNSINRSNI
NN

JMP

648

STEP

MOV
8IT
BEQ

STBMT ST

WORD

BIT

READ

308:

?R228IR22
o832

22 FR FASRRRRIS~....2SENIILE55 N SKRSRRS&RSA
vl

WNON
8 &

D
B =Dl
b
D
) e
el ot e
b o o)

D
D
e
=D

)

D e

VAWV SN

OO0

) e
= o D o
D end o

CT-81 09:21 PAGE 109

WRITE

INC

BEQ
READ
MOV
DEC
MOV
CMP
BEQ
ERROR
JMP
READ

MOV
BIC
BIT

BEQ
MOV
MOV
021070

31s:

000000

118:

000000

:
1008

001202

021070

14$:

1108:

:
1208

(SP)+.$T
13

SEQ 0103 |

:STEP THE CLOCK ONCE
*READ THE STATUS REGISTER
::POP STACK INTO ST

:TEST FOR BUFFER EMPTY

;LOAD A DATA CHARACTER

198

:+1 TO DATA out

#RDA, STMPO

sTEST FOR DATA AVAILIBLE

118
SECO
(SP)+,$TMPC
198
658, $TMP1
$TMP0, STHPY
$
23,
648

sREAD THE DATA REGISTER
::POP STACK INTO $TMPO
:=1_TO DATA (CHR. REC.)
sGET EXPECTED
sTEST FOR CORRECT DATA
sDATA 0K BRANCH
sDATA TRANSMITTED INCORRECTLY
:LOOP ON ERROR

:READ REGISTER
:;POP STACK INTO $TMPO
#*C<ERRCK>,$TMPO
:CLEAR UNWANTED BITS
#ERRCK
, STMPO
sTEST ERRCK
31
*RESET SKIP ERROR
,SEC1

(SP)+,$TMPO

$TMPO, STHPI
STMP1.STHP2

INB

ERROR

34.

JMP
BR

;LOOP ON ERROR

,SEC2

ogmx.smz
25,

WRITE
STEP
READ

Gt 001202

PRI13

BIC
ERROR

JMP

02107g
00000
00000;
00001

000000

RROR CHECK TEST FOR ALL ERROR DETECTION

022172

e emd)

30A(1052)E 21-0

000002

o
D =

coad o
b

(=]

000137
1

wnN

alal

= 538 8 334385308000 000ERERARSSE §g

A0 _DMS1

648
128
78

648

,SEC3,TEOM

.
.PRI13

:PREPARE TO REPORT ERROR

:LOAD EXPECTED ALSO

:LOAD EXPECTED
;ERROR CHECK SET
:LOOP ON ERROR

sDEVICE IS HUNG
:LOOP ON ERROR
-END THE MESSAGE

:STEP THE CLOCKONCE

:READ THE STATUS REGISTER
::POP STACK INTO STMPO

MOV
BIT
BEQ
INCB
BNE
ERROR
JMP
BIT
BNE
INCB
BNE.
ERROR
MP

(SP)+,$TMPO
#SF,$TMPO
14$
#0
148
36.
648
#RDA,$TMPO
1208
138
3%,
648

:S/F CAME UP BEFORE LAST DATA BYTE RECEIVED
:LOOP ON TEST

READ

,SECO

sREAD THE DATA

STEST FOR SF AFTER TEOM SENT
*NO BRANCH

sTEST FOR DATA

sDEVICE IS HUNG
:LOOP ON ERROR

CZKMDAD DMS11-DA STATIC

CZKMDA.P11
931
49
49
49
4935
23

021
1612
1
1
0216
}g

49
49

1636
1642

MACY11 30A(1052)

-30-0(1'“ 17:0;

4940 021646

21-0CT-81

1
7
1
013737
021
001582
737
001202 001
1% ;
0
137 021070
og

MOV
MOV
CMP
BEQ
ERROR
JMP

648

::POP STACK INTO $TMPO
:GET EXPECTED DATA
:TEST DATA
*0K BRANCH
:DATA TRANSMITTED INCORRECTLY
:LOOP ON ERROR

1044
01

READ
MOV

SECT
(SP)+,$TMPO

:READ REGISTER
:;POP STACK INTO $TMPO

#ERRCK , $TMPO
418
$TMPO, STMP1
$STMP1,$TMP2

:TEST ERRCK
:RESET SKIP ERROR
:PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO

JMP

648

:LOOP ON ERROR

STEP

1775

1
;

120

BIC

032737 000200
00120
414
1;7 7
001202 001

BIT
BEQ
MOV

495
4

021
1708

2737
104031

BIC
ERROR

498
4949

021714
021714

4953

021736

001406

4955

021744

012637

494

13737

001204 001206

000

MOV

001206

000137 021070
104421

4950 021720 1044 9 00001
4951 0517 6 012637
001202
4952 021730
032737 000001 001202

418:
538:

85};32

4958 021754
4959

0217

4961
4

021770
021772

4964
4965
4.969

022000
022000
022000

4963

005337

022172

032737 000010 001202
oo1oo$

021764 1os§
021774

001204

001351
1040%9

- 000000

000137

021070

104421

000004

528:
548
:
158:

4967 022
1ou.§o 000001
4968 022010 012637 091;%
4969 022014 042737 177
001202

4974

0 5046

052737

000002

237

ggggg

000137

021070

4978

022062

1044

980
4981

02207,
0251

37
32737

4975

4979

022054

022

1oao§s

1 9

022106

001414

4985

02 1;4

2737
104031

498
4984

4986

ogzno
0 5116

022132

1;9;

177
000200

001206

»
oo1zog
00120

13737 001202 001504
13737 001204 001206
000200

001206

cgmcn.smz
25.

:CLEAR UNWANTED BITS

:LOAD EXPECTED

:STEP THE CLOCK ONE TIME

*READ THE STATUS REGISTER
::POP STACK INTO $TMPO
:TEST FOR DATA

READ

,SECO

:READ THE DATA

DEC

198

:=1 TO DATA CHRS.

BIT

#SF ,$TMPO

INCB

MOV
ene

70$

(SP)+,$TMP1

::POP STACK INTO $TMP1

;TEST FOR S/F AFTER TEOM SET

158

*YES BRANCH

53s
22.

:S/F DID NOT SET AFTER TEOM SET

JMP

648

STEP

READ
MOV
BIC

4970 022022 032737 000002 001202
4971 022030
001014
4972 022032
013737 ootsoz 001204
4973 02204
omgr 001204 001206

#*C<ERRCK>, $TMPO

.PRI13
(SP)+,$TMPO
#RDA, $TMPO

ERROR

(SP)+,$THPO
6 %fm
$STMPO,
STHP1
32:

READ
MOV
BIT
BEQ

4954 021740 104.459 000000
23;9

N8
PAGE 104

ERROR CHECK TEST FOR ALL ERROR DETECTION

4941 8 1656
49
1662
49
1664
49%% 0 1%8

09:21

:LOOP ON ERROR

.SEC1
:READ REGISTER
(SP)+,$TMPO
+:POP STACK INTO $TMPO
#*C<REOM>,$TMPO :CLEAR UNWANTED BITS

BIT
BNE
MOV
MOV
BIS

#REOM, $TMPO
168
$TMPO, $TMP1
$TMP1 ,$TMP2

sTEST REOM
:SET SKIP ERROR
:PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO

JMP

21.

648

;REOM FAILED TO SET AFTER END OF MESSAGE

READ

,SEC1

;READ REGISTER

BIC
BIT

#*C<ERRCK>, $TMPO
c;ancx.smfio

MOV
MOV

$TMPO, STMP1
$TMP1.STMP2

ERROR

MOV
BEQ
BIC

ERROR

#REOM, STMP2

(SP)+,$TMPO

17$

0§Racx.smpz

25.

:LOAD EXPECTED

:LOOP ON ERROR

::POP STACK INTO STMPO

:CLEAR UNWANTED BITS
*TEST ERRCK
*RESET SKIP ERROR

“PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO
:LOAD EXPECTED

CZKMDAO DMS11-DA
STA.“
MCV" 30A(1052) 21-0CT-81 09:21 PAGE 10
ERROR CHECK TEST FOR ALL ERROR DETECTION
CZKMDA.PI

4987

022134

8 140

137

S; 7 2;6

&
4990
4991
499
4993

144
152
154
162
194.

2737
1 ;
2737
14 ;
1

4995
4999

0 17g
022172

000401
000000

§996

022170

000377

021336

178:

021336

021070

JMP

648

cMP
BEQ

#176,65%
17;
#377.65%
188
648

INC

{MP

18%:

19%:

BEQ
JMP
B8R
0

SEQ 0105

;LOOP ON ERROR

65%

JTEST IF GO AHEAD CHARACTER
JTEST IF ALL CHARACTER'S TESTED

TST6S

¥
JCHR. COUNTER

4999

JRRRRARARARARCECERCEROCRNRRRns TEST 65 122132 2222222223222
222¢8221

3 CRAARRRARRAARARARAARAAAAAARAAAAAAAARAAAAAAAAAAAAACAAAAAAAANACAANONY

5000
5001

s*ERROR CHECK TEST FOR PROTOCOL = CCP
J*ERROR CHECK X Y Z = CCITT=1

500

5007 022174

000004

SO011

012737

S008
5
S010

022176
022204
(022212

5015
5013
5014

022226
0222
022234

5016

022250

S018
5019

022262
0222
022272
022276
022302

5015

5017

5021
gg%%

022220

022242

022256

012737
012737
012737
104414
005037
104416

104416
104416

005037

005037
005037
005037
005037
104416

TEST 65

ttttttttttt.ttt.t."tt"tttttttttttt"tttttttt.Qtt.t.'tt..t't't

000065
000065
000001

022226

001105
00126
022502

001106

7§765:

MoV

023174
000067

000000

MSTCLR
CLR
WRITE

000004

000026

WRITE

000005

022710

022734
023052
022410
022642
000014

648:

SCOPE

MOV
MOV
MOV

000140

WRITE
CLR

CLR
CLR
CLR
CLR
WRITE

000321

#65,8TSTNM
#65,TSTNUM
#1,65%

ldS.SLPADR
19%
.SEC7.,0

022310

5031

022340

5027 022316
5028 022322
5029 022326
5030 0553 5

104416

000003

104421
104420
01%6 7
032737

ooooog
00001
00120
000020

5033 02235

013737

022502

5035

022356

005237

022
022372
022376
0224

104421

023174

1044 g 00001
0159
001202
032737 000010
001017

022412
022414

001363
013737

36
5037
5038
5039
040

5041
5042

sSET CHARACTER LENGTH ro 8 BITS/CHAR

SECS CCP'SSL'CCITT-1
,SEC&4.SYN

ioos+g

022342

022362

022403

001766

000001

2$:

1108+
528+2
508+2
11842
JPRIT4&, TENA!RENA'MB'MC

001202

02
PR113
(SPH $STMPQ
#TBMT. $TMPO

022354

MOV

WRITE

65$,

STEP

00000

BEQ

3s:

001202

000000
001202

,SEC3,TSOM

STEP
READ
MOV
BIT

10“19 000002 000000

105%%7

WRITE

508:
001204

iE"M:BI.E THE FOLLOWING:
RENA

3
MAINTENANCE BITS: M8 _MC
:SET TSOM

:STEP THE CLOCK ONCE
READ THE STATUS REGISTER
::POP STACK INTO $TMPO
*TEST FOR BUFFER EMPTY

sNO CONTINUE STEPPING THE CLOCK

SEci 0 sLOAD A CHARACTER

INC

ios

READ
MOV
BIT
BNE

LPRI13
(SP)+,$TMPO
#SF., $TMPO
248’

BNE
MOV

3s
$TMPO,$TMP1

INCB

sLOAD MODE CONTROL

:LOAD SYN CHARACTER

5025
5026

sSET RETURN ADDRESS TO 64$%

sISSUE A MASTER CLEAR

5024

LOAD THE NO. OF THIS TEST
0 FOR TYPE OUT
:LOAD CHARACTER BUFFER

sSTEP THE CLOCK ONCE

READ THE STATUS REGISTER
:POP STACK INTO $TMPO
‘TEST FOR S/F

CZKMDAO DMS11-DA SYAT‘% ”C(Y,y 30A(1052) 21-0CT-81 09:21 PAGE 103

CZKMDA.P11

20-OCT=-

5043 022422
§82"
4
5

436

ERROR CHECK TEST FOR ALL ERROR DETECTION

013737

001202 001206
osggr 380013
001206

MOV

BIS

$TMPO, STMP2
cgr.sfmz

104017

ERROR

648
,SEC3.0
.
.PRI13
(SP)+,$TMPO
#TBMT .$THPO

g&ag
so:.s
504
5050
5051
5052

0 ‘4.2‘ 000137
3 44h 182416
452 104421
0 2‘53 1044.9
0
0136
0 4.96 032737

022226
000003 000000
00000
78
00001
oo1zos
000020 001202

JMP
WRITE
STEP
READ
MOV
8IT

5054

0%2476

104416

000002

WRITE

gggg

855?93

005237

023174

5053

5055

0224764

001405

022502

ooooog

5058 ozgsw 032737 000001
5059
5060

022516
022520

001450
104420

5065
5066

022550
022552

001403
104027

5068
5069

022560
022560

104420

000001

5073
5076

022604
022606

001414
013737

001202

5061
5002
5063
5064

ozzs%
022530
022534
022542

o1§e 7
005337
013737
023737

658:

001202

5081

5083
5085
5087

022662

104421

138:

022666

104420

00001

000002

118:

12$:

022672 0156 7 oovzos
5089 022676 032737 000010
001202

022704 oouo;
5091 ozzrog 105227 000000

§83
85 ;}‘ ‘1’8}.322
gow. 02271
137 022226
095
5099
5097
5098

ozzrio
0227
022732
022736

#RDA, $TMPO

:TEST FOR DATA AVAILIBLE

MOV
DEC
MOV
CMP

(SP)+,$TMPO
198
658, $TMP1
$TMP0, STMP1

JMP

648

READ

,SECI

BEQ
READ

1008:

032737 000001 001202 14$:
ootoog
1os§§ 000000
1108:
001351

118
,SECO

308
23.

;READ THE DATA REGISTER

+;POP STACK INTO $TMPO
:=1 TO DATA (CHR. REC.)
*GET EXPECTED
*TEST FOR CORRECT DATA

;DATA 0K BRANCH
:DATA TRANSMITTED INCORRECTLY

*LOOP ON ERROR
;READ REGISTER

MOV
BIC
BIT

(SP)+,$TMPO
+:POP STACK INTO STMPO
#*C<ERRCK>,$TMPO
:CLEAR UNWANTED BITS
#ERRCK , STMPO
:TEST ERRCK

MOV
BIC
ERROR
JMP
B8R
INCB
BNE
ERROR
JMP

$STMP1 . STMP2
#ERRCK , STMP2
25.
648
128
40
78
34.
648

:LOOP ON ERROR

STEP

:STEP THE CLOCKONCE

(SP)+,$TMPO
#SF,$TMPO

+:POP STACK INTO S$TMPO
“TEST FOR SF AFTER TEOM SENT

BEQ
MOV

001204

31$:

000003

BIT

BEQ
ERROR

013737 001204 001206
062737
001206
104031
000137 022226
000406
105227 000000
00130
104042
00013 ozzzzg
104416

:+1 TO DATA OUT

10$:

022614
022622
022630
022632
022636
022636
022640
022644
022646
022650
0226564

198

INC

308:

:LOOP ON ERROR
;RESET TSOM
*STEP THE CLOCK ONCE
*READ THE STATUS REGISTER
+:POP STACK INTO STMPO
:TEST FOR BUFFER EMPTY
JLOAD A DATA CHARACTER

001202
023174
022502 001204
001202 001204

:S/F DID NOT SET AFTER SYNC SENT

SEC2

5070 022564 012637 001202
5071 022570 042737 177577 001202
5072 022576 032737
200
001202

5075
5076
5
5078
5079
5080

.worD

000000

5067 022554 000137 022226

BEQ

15,

SEQ 0106

WRITE
READ

MOV
BIT
BEQ
INCB

31
$TMPO,STMP1

,SEC3.TEOM
.PRI13

148
#C

EfiSon
}2’
JMP
04$

BIT
BNE
INCB
BNE

#RDA, $TMPO
1208
138

*RESET SKIP ERROR
:PREPARE TO REPORT ERROR

:LOAD EXPECTED ALSO
:LOAD EXPECTED
;ERROR CHECK SET
:LOOP ON ERROR

:DEVICE IS HUNG
-END THE MESSAGE

*READ THE STATUS REGISTER

*NO BRANCH

S/F CAME UP BEFORE LAST DATA BYTE RECEIVED

*LOOP ON TEST

*TEST FOR DATA

AO DMS11-DA s"l‘f MACY11 30AC1052) 21-0CT=81 09:21 PAGE 1o’

i i

-a_nu-a-fi:;ru_a;n=;rg::;ra—w:-ua.a-hu.a-na;:;;-hu-a;;a;;_hd.a:ra-‘-hn::_fiz.a_fis.aaraz;ahs.a
ViAW
&~
W
WWWWW
NN
b b b b e b b bb

P11

17:03

ERROR CHECK TEST FOR ALL ERROR DETECTION

022226

1;0

2502
1202

0 ggos
023012
0 3012

104
012637

023030
0%3032
0 ggzg
02
023048

001407
104420
012637
337
001406

023022

02305

READ

MOV

001204

MOV
CMP
BEQ

001204

:GET EXPECTED
DATA
:TEST DATA
*0K BRANCH

DEC

198

;=1 TO CHR COUNT

ooooog
00001
001202

538:

STEP
READ
MOV

.2
.PRI13
(SP)+,$TMPO

:STEP THE CLOCK ONE TIME
*READ THE STATUS REGISTER
+:POP STACK INTO STMPO

708
,SECO
(SP)+,$TMP1
19
158

;READ THE DATA
+:POP STACK INTO $TMP1
:=1 TO DATA CHRS.
:B=ALL CHRS REC.

INCB
BNE
ERROR
JMP

40
53s
22,
648

:S/F DID NOT SET AFTER TEOM SET
:LOOP ON ERROR

READ
MOV

,SEC1
(SP)+,$TMPO

:READ REGISTER
+;POP STACK INTO STMPO

001202

BIT

000000
001204
023174

708:

177577

023110
023112

001014
013737

001202
001202

001202

001204

528:

023126
023134
023136
023142
023146
023154
32§}22

052737
104039
000137
005237
022737
00177
85%{3

022226

54$:
158:

BNE
MOV

MOV

001206

022226
022502
000026

022502

000177

022502

023166 0001g; 022226

BEQ
READ
MOV
DEC
BEQ

BIC
BIT

023120 013737 001204 001206

gsfim1
TMPO, STHP1
408

::POP STACK INTO $STMPO

000001
oo1zo;

vouuuy

;READ THE DATA

023174

104450
012637

023174

SECO

(SP)+,$TMPO

23,
648

000000

023172 0nn'

:DEVICE IS HUNG
:LOOP ON ERROR

ERROR
JMP

105227
001354
104026
000137

34,
648

023050
023054
023056
ogsoeo
023064
023064
023064
023070

023172

ERROR
JMP

022226

032737 000001

023074 042737
023102 032737

178:

188:
198:

#RDA, $TMPO

#*C<ERRCK>, $TMPO
#ERRCK , $TMPO
17$
$TMPO, STMP1

$STMP1 . STMP2

BIS
ERROR
JMP
INC
CMP
BEQ
ggz

#ERRCK , $TMP2
24,
64$
658
#26.65%
17$
:;;7.653

B8R

TST66

JMP
0

*DATA TRANSMITTED INCORRECTLY
:LOOP ON ERROR

:TEST FOR DATA

:CLEAR UNWANTED BITS
:TEST ERRCK

:SET SKIP ERROR
:PREPARE TO REPORT ERROR

:LOAD EXPECTED ALSO

:LOAD EXPECTED

;TEST IF ALL CHARACTER'S BEEN TRANSMITTED

648

:CHR. COUNTER

JRARRRRRRRAREACERCEORRRANARNAY

TEST 66 wennanannnnnnattavnretrannns

**ERROR CHECK TEST FOR PROTOCOL = CCP
**ERROR CHECK X Y Z = CCITT=

SRR RRRRRRA AR AAARARRRARAAARAAAANAAAAAARARARAARAREY

;

TEST 66

SEQ 0107

CZKMDAO DMS11-DA ST?I&% 1HACV11 SOA(‘IOSZ)E 21-0CT=81 09:21 PAGE 1
CZKMDA.P11
20~0C
7:03
RROR CHECK TEST FOR ALL ERROR DETECTION
155
129

153
15
160
161
16;
163

:
o RARRRRARAAAAANAAAAARRNCRRNNRRAAAANRANANAAAANAANAAAANAAAAAAACAARAAS

176

7
12737
1%
012737
1
012737 023230
1046414
005037

1105
1;6
023504
001106

02417

t5166:

648:

SCOPE

MOV
LSTSTNM
: LOAD THE NO. OF THIS TEST
MOV
r;muu
# FOR TYPE OUT
MOV
” és
:LOAD CHARACTER BUFFER
MOV
#64S, SLPADR
*SET RETURN ADDRESS TO 64$
MSTCLR
;ISSUE A°MASTER CLEAR
CLR

CLR

i osog

5164 3
104416
5165
%6 104416 000005 000141
5159 8 %s 104.:.19
000026

WRITE
WRITE
WRITE

5168
5169
5170
5171
g};g

CLR
CLR
CLR
CLR
WRITE

516

5174
5175
51;9
§177

0232
(23270
023%46
023
023306

SEQ 0108

00503

oosogr
005037
oosogr
005037
104416

023736
024054
053412
023644
000014

000321

,SEC7.0
:SET CHARACTER LENGTH TO 8 BITS/CHAR
.SECS.CCP!SSL'CCITT=0
;LOAD MODE CONTROL
3&4 SYN
:LOAD SYN CHARACTER

1108+
szsos
508+
11842
,PRIT4,TENA'RENA'MB'MC

fsmme THE FOLLOWING:

WRITE
STEP

,SEC3,TSOM
.2

|
RENA
:
MAINTENANCE BITS: M8 ,MC
*SET TSOM
:STEP THE CLOCK ONCE

BIT

#TBMT ,S$THPO

:TEST FOR BUFFER EMPTY

013737 023504 023356

MOV

658,.+12

5184 ogs

005237 024176

INC

i9s

5187
5188
5189
5190
5191
sw;
5193

0233764
023400
023406
023410
023414
023416
023426

012637
032737
001017
105227
001363
013737
013737

MOV
BIT
BNE
INCB
BNE
MOV
MOV

(SP)+,$TMPO
#SF ,$TMPO
248
3s
$TMPO, STMP1
STMPO . STMP2

023440

104017

023312
023320

104416
104421

000003
oooooi

000001

5180 023334

032737

000020

001202

5182 023344

5178 023324 1044 g 00001
5179 023330
012637
001202
5181

023342

5183

023352

5185
5186

023
023370

5194

5195

023432

001766

000002

104421
104420

ooooog
00001

38:

000000

508:

052737

000000

02
023456

104416
104421

oo1§oz 001204
001202 001206

000003
00000

5200 023460 104459 00001
5201 0234
8126
001202
szog 023470

5
5204

5205

023476
023500

023504

5 89 85%21

5209
5210

023512

023520
023522

WRITE

001202
000010 001202

000010

001206

78:

032737 000020 001202

001405
104416

000002

005237

024176

oooogg

65s:

032737 000001 001202 10$:
001450
104420

000000

STEP
READ

BIS

o
000000

READ
MOV
BEQ

104416

g}gg 053442 000137 023230
5198
5199

28:

ERROR

.PRI13
(SP)+,$TMPO

*READ THE STATUS REGISTER
::POP STACK INTO STMPO

*NO CONTINUE STEPPING THE CLOCK

,SEC2,0 :LOAD A CHARACTER

.2
.PRI13

#SF,$TMP2

;STEP THE CLOCK ONCE
*READ THE STATUS REGISTER

::POP STACK INTO STMPO
STEST FOR S/F

JMP

648

15,

:S/F DID NOT SET AFTER SYNC SENT

WRITE
STEP

,SEC3.0
.2

;RESET TSOM
*STEP THE CLOCK ONCE

BIT

#TBMT . STMPO

*TEST FOR BUFFER EMPTY

.WwoRD

READ
MOV

BEQ
WRITE

INC

BIT

BEQ
READ

.PRI13
(SP)+,$TMPO

8s
,SEC2

:LOOP ON ERROR

*READ THE STATUS REGISTER
+:POP STACK INTO STMPO
:LOAD A DATA CHARACTER

198

;41 TO DATA OUT

118
,SECO

;READ THE DATA REGISTER

#RDA,STMPO

:TEST FOR DATA AVAILIBLE

CZKMDAO DMS11=DA

STATIC

MACY11 30AC1052)

TSPR W (R
1

12637

1
1%

5
544

13737
7

ggz

% ;

ggz

0241

023504
001202

1?
E }

1040
gg 000137 023230

5220
5221
gz §
5226
5225

5
5

5229
5227

023626
0236

sgza 0 gg‘

3550

1044

8}. g
7
0
83 7
0
1614
02361 8137 7
023616 013737
042737
1o:.og1

200

1
ogterd 100t oo
szfi 023650 moa;
5235

023656

104416

023230
000003

5236 02
104421 ooooog
5237 023670
104420
00001
5238 0236764 012637 001202

000002

023706

oou.og

3521

353;}2 33?223 000000

5243

023716

gzas

35_;}3

33%737

5249

023742

10404;

244 023720

gggg 85;33 000137

000001

12$:

138:

1008:

gggs

%
023776

001202

023230

14$:

—

001 ;
1040

szfi 024014 1824%9 oooo1§

538:

ggg? §2o1o 005337 024176
104421

sga. 024020 81

5265 024026

5266

024032

001407

00000

001202

032737 000001

*DATA TRANSMITTED INCORRECTLY
:LOOP ON ERROR

MOV
BIC
BIT
BEQ
MOV
MOV

(SP)+,$TMPO
::POP STACK INTO $TMPO
#*C<ERRCK>, $TMPO
:CLEAR UNWANTED BITS
#ERRCK , $TMPO
:TEST ERRCK
31s
*RESET SKIP ERROR
$TMPO, STMP1
:PREPARE TO REPORT ERROR
$TMP1,STHP2
:LOAD EXPECTED ALSO

JMP

648

READ

001202

,SEC1

:gmx.smz
25,

128

:=1 T0 DATA (CHR. REC.)

*DATA OK BRANCH

;READ REGISTER

:LOAD EXPECTED
;ERROR CHECK SET

:LOOP ON ERROR

:DEVICE IS HUNG

JMP

648

STEP
READ
MOV

.
,PRI13
(SP)+,$TMPO

:STEP THE CLOCKONCE
*READ THE STATUS REGISTER
+:POP STACK INTO STMPO

148

*NO

WRITE

,SEC3.TEOM

BIT

#SF,$TMPO

INCB

ggs

£Q

JMP

3,‘,{

ERROR

:LOOP ON ERROR

-END THE MESSAGE

*TEST FOR SF AFTER TEOM SENT
BRANCH

36,

:S/F CAME UP BEFORE LAST DATA BYTE RECEIVED

f“gg""‘”

STEST FOR DATA

3%,

:DEVICE IS HUNG

648

JMP

648

MOV
MOV

READ

(SP)+,$TMPO
658,$7MP1

BEQ
ERROR

408
23,

:LOOP ON TEST

:LOOP ON ERROR

$TMP0, STHP1

:READ THE DATA
+:POP
STACK INTO STMPO
:GET EXPECTED DATA
*TEST DATA

JMP

64$

*LOOP ON ERROR

READ

,PRI13

*READ THE STATUS REGISTER

BIT

#RDA, $TMPO

:TEST FOR DATA

CMP

024010

.
648

gzw 000137 023230

5262

ERROR
JMP

ERROR

5252 023750 1044
5253
023756 01013737
6§9 oo“vngnoug
ggsa 8 3760
023504 001504.
55
3;96 23737
001202 001204
sgs
5257

*GET EXPECTED
*TEST FOR CORRECT DATA

ms:
B
af
ERROR 34.

104044

000137 023230

58,$TMP1
TMP0,STHPY

BIC
ERROR

5239 023700 032737 000010 001202

5240

::POP STACK INTO STMPO

BEQ

001206

SEQ 0109

(g».smo

MOV
CMP

00120
00120
001204
001206

053640 000

MoV
DEC

000137 023230

szg« 023652 000137

ERROR

1;«
001204

1; ;
177
000200
001202
001204

F 9
21-0CT-81 09:21 PAGE 109
CHECK TEST FOR ALL ERROR DETECTION

DEC

STEP

MOV
BEQ

198

(SP)+,$TMPO

70$

*0K BRANCH
*DATA TRANSMITTED INCORRECTLY

;=1 TO CHR COUNT
:STEP THE CLOCK ONE TIME

::POP STACK INTO STMPO

CZKMDAO DMS11-DA SYAI‘% MACY11 30A(1052) 21-0CT=81 09:21 PAGE 118

CZKMDA.P11

20-0CT

0240346

02405

68
9
0

E RROR CHECK TEST FOR ALL ERROR DETECTION

17:03

1044

g g 8 405
40

1os§§Z 000000
1

5275 024

000137

§27
5 ;3
£
5280
5281
5282
5283
5284

1044
012637
042737
032737
001014
013737
013737

5276

024

5 79

0246066

§285

READ

024040 8&
1 91.
0246044
7 024176
024050 001406

3 4066
4
024072
024076
026106
024112
024114
024122
024130

szeg 0241

059

70$

528

024140
024144

0001
005237

023230

54$:

15s:

1
;

091
177577
001202
000200 001202

024156

00177

5292

024166

00140

823230
023504

5289 024150 022737 000026 023504
5291

024160

022737

§293

024170 000137

5295

024174

22239

0246174

024176

INCB
BNE

ERROR

001202 001204
001204 001206
052737 000200 001206
1040

5287
5288

MoV
DEC
BEQ

178:

023230

000401

000000

198:

5298

::POP STACK INTO $TMP1
:=1 TO DATA CHRS.
:B=ALL CHRS REC.
:S/F DID NOT SET AFTER TEOM SET

64$

READ
MOV
BIC
BIT
BNE
MOV
MOV
BIS
ERROR

,SEC1
:READ REGISTER
(SP)+,$TMPO
::POP STACK INTO S$TMPO
#*C<ERRCK>, $TMPO
:CLEAR UNWANTED BITS
o;mx.mfio
*TEST ERRCK
17%
:SET SKIP ERROR
$TMPO, $THP1
:PREPARE TO REPORT ERROR
STMP1,$THP2
:LOAD EXPECTED ALSO

JMP
INC

:LOOP ON ERROR

#ERRCK ,$TMP2

:LOAD EXPECTED

24,

65$

CMP

#26.,65%

CMP

#177,65%

JMP

64$

TST67

178

BEQ

188:

538

22.

:READ THE DATA

JMP

BEQ

000177 023504

,SECO

(SP)+,$THP1
198
158

SEQ 0110

:TEST IF ALL CHARACTER'S BEEN TRANSMITTED

188

:CHR. COUNTER

5299

JRRRRANNRARANSRCERRANARANNASY TEST 67 tenannntananrttnestsrstvttns

533(0)%

33 L3333 a2 2333323232323 3331383313 3333

5300
§301

:*ERROR CHECK TEST FOR PROTOCOL = CCP
s*ERROR CHECK X Y Z = CRC16

?3382

53%

5307
024200
5308 024202
5309 024210

000004
012737
012737

ss1§

104414

oonos
00126
024506
001106

g}e 352 7:'3 ?322% 025589
5315 024246 104416 000005 o:oo”%l.cg
5316 024254

gsw

024262

318
5319
§320

024 og
024272
024276

§322

024306

5321

3 %302

104419

83503

TEST 67

1 tttttt‘tttt.ttttttfitttt'ttttttttttttttt.'.tttt.tttltttttltttttt

000067
7
5310 024216 01 7§7
og1
5311 024224 012737 024232
024232

3 2333332333323 222233222222%1

4714

5037
005037
8850 7

024740
025056
024414

104416

005037 853846

000026

000321

TS167:

648:

SCOPE
MOV
MOV
MoV
MOV

MSTCLR

#67,$TSTNM
#67.TSTNUM
#1,65%
#64$, SLPADR

: LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT.
:LOAD CHARACTER BUFFER
:SET RETURN ADDRESS TO 64$

:ISSUE A"MASTER CLEAR

sv'i?rs ’gga 0
SET CHARACTER LENGTH TO 8 BITS/CHAR
WRITE .SECS.CCP'SSL!CRC16
:LOAD MODE CONTROL
WRITE
CLR

EC4.SYN
.g

:LOAD SYN CHARACTER

CLR
CLR
CLR

1108+
528+
508+

WRITE

,PRIT4,TENA'RENA'MB'MC

CLR

118+

;ENABLE THE FOLLOWING:

CZKMDAO DMS11-DA STATIC MACY11 30A(1052)

CZKMDA.P11

20-0CT

1 17:03

21-0CT-81

09:21

PAGE 111

E RROR CHECK TEST FOR ALL ERROR DETECTION

4316
4322
4
024
8 4
1
024
024
gg
3 2 54

104416
104421
1044
gsg
7
1729
137
53‘5"2'19

§335

104421

5336
5337
5338
5339
53,0
5341
sy.g
534

024

000001

1
20

264506
0

001202

024360
000000

024
024376
0244
02441
024412
024416
024420
ozu.gz

1044 9
1
0126
1205
32737 000010
001202
1017
105227 000000
001
0137
001505 001204
013737 001202 001206

5345

024442

104017

§347
5348
5349

024450
024450
024456

5344 024434

052737

000003
ooooog

000000

5350 024462 1ou.§9 00001
5351 zmg 012637
001202
s;si 024472

5353
53564

5355

024500
024502

ozl.sos

5359

5360
5361
sse;
5363
5364
5365
5369
5367

024522

024524
0245
024536
024540
osl.
024554
0245
024560

001405
104416

000002

032737 000001
001450

65:

.
001202

02461

gsrs

024612

108:

1o44§g 000000

.gecs.rson
SSET TSOM
.
:STEP THE CLOCK ONCE
.PRI13
*READ THE STATUS REGISTER
(SP)+,$TMPO
::POP STACK INTO ST
#TBMT,STHPO
:TEST FOR BUFFER EMPTY
2
*NO CONTINUE STEPPING THE CLOCK
658,.+412
535‘“ :LOAD A CHARACTER

STEP

READ
MOV
8IT
BNE
INCB
BNE
MOV
MOV

.PRI13
(SP)+,$TMPO
#SF,$TMPO
248
3s
$TMPO, STHPY
STMPO . STMP2

:STEP THE CLOCK ONCE

*READ THE STATUS REGISTER
::POP STACK INTO STMPO
*TEST FOR S/F

BIS

#SF,$TMP2

JMP

64$

15,

:S/F DID NOT SET AFTER SYNC SENT

WRITE
STEP

,SEC3.0
.

:RESET TSOM
*STEP THE .CLOCK ONCE

BIT

#TBMT . STMPO

:TEST FOR BUFFER EMPTY

.WwORD

READ
MOV

BEQ
WRITE

INC

BIT

BEQ

READ

.PRI13
(SP)+,$TMPO

:LOOP ON ERROR

*READ THE STATUS REGISTER
::POP STACK INTO STMPO

8s
SEC2

JLOAD A DATA CHARACTER

#RDA, STMPO

;TEST FOR DATA AVAILIBLE

SECO

;READ THE DATA REGISTER
2:POP STACK INTO ST
:=1 TO DATA (CHR. REC.)
*GET EXPECTED
:TEST FOR CORRECT DATA
:DATA OK BRANCH
*DATA TRANSMITTED INCORRECTLY
*LOOP ON ERROR

198
118

:+1 TO DATA OUT

MOV
DEC
MOV
cMP

(SP)+,$TMPO
198
658, $TMP1
STMP0, STMP1

1ol.o§
000137 024232

ERROR
JMP

648

B
BIT

Bhaw,
SO Sl
#ERRCK , STMPO
:TEST ERRCK

MOV

$TMPO, STHP1

u.o;

000001

i
i Nal B L,
5372 024602 032737 000200 ootfoz
5374

78:

MAINTENANCE BITS: M8 ,MC

WRITE
STEP
READ
MOV
BIT
BEQ
MOV
mte

ERROR

248:

TENA

RENA

o1§6
001 35
005337
025
0137 7
024506 001204
85 737
001202 001204

3359 05504 106420
5373

508:

032737 000020 001202

gggg 3%3}4 oo”snzugru 025200
5358 024514

3s:

001206

5346 024444 000137 024232
104416
104421

28:

;

SEQ 0111

1414

013737
13737

3377 094c3e Jego3

001202 001504
001204

10 20

5378 024636 000137 024232

831 06

001206

BEQ

MOV

sase

*RESET SKIP ERROR

*PREPARE TO REPORT ERROR

STMP1,$THP2

:LOAD EXPECTED ALSO

648

:LOOP ON ERROR

BRROR 35NCK.STHPZ
JMP

READ REGISTER

oROR CHECE
SEY CoTED

lalsl
P~y

KMDAO DMS11<DA STATIC MACY11 30A(1052) 21-0CT-81 09:21 PAGE 115
KMDA..P11 .gO-OCF“ 17:0
ERROR CHMECK TEST FOR ALL ERROR DETECTION
79

4‘&‘%

w ?8%%9 000000
u%
o:.§

%6
13
024660
16
104421
4672
1044

423

81
120
32737 000010

024712

105227

0264720

0014

001202

000000

ogz 3

539% 8 4

goo;gr 024232

52; 6

5399

02474

1008:

o%?

w.o:.;

5528? 8 2;§§ 000137

56402 024752
5403 0247
§'£°‘ 024762

000002 1;;:
138:

gog 02471
ggos

118:

4%
4

g9o 3 4710

318:

000001

001202

024232

5419
5525'1)

025

STEST FOR DATA

:LOOP ON TEST

;READ THE DATA
+:POP STACK INTO STMPO
*GET EXPECTED LATA

ERROR

R
ol
ERROR zg.
JMP
648
DEC

198

STEP

READ

MOV

001202

)*DATA
(AT
TRANSMITTED INCORRECTLY

(SP)+_,$TMPO

%gA.imo

MOV

(SP)+,$TMP1

DEC

:LOOP ON ERROR

.PRI3

gé;

READ

001204

025200

gagg.smo

648

,SECO

198

;=1 TO CHR COUNT
;STEP THE CLOCK ONE TIME

*READ THE STATUS REGISTER
2:POP STACK INTO $STMPO

*TEST FOR DATA

:READ THE DATA

::POP STACK INTO S$TMP1
:=1 TO DATA CHRS.

i
f00 g
e
5424 8 5
104.059

e,
ERROR
22,

:S/F DID NOT SET AFTER TEOM SET

3453
5453 3°§§87°
5070 1044 g

198©

READ

;READ REGISTER

000137

024232

SI.gg 025074

01 9

5431

032737 000200

5430

025100

025106

001 o;
17757

88150

00120

2038 053116 01I%F 001202 001204
§234 025124 o1§m 001504. 001206

JMP

MOV

158

*LOOP ON ERROR

BEQ

025

:S/F CAME UP BEFORE LAST DATA BYTE RECEIVED

148

gz S

3 ggg‘

1 4;9 000000

%gg

36.

,SECO
(SP)+,$TMPO
658, $TMP1

001202

5418 02504

ERROR

BNE

READ
MOV
MOV

0126

5419 025036

*NO BRANCH

5414

000001

148

INCB

:DEVICE IS HUNG

538:

°31Zo;

BEQ

3%,

ooooog

338 3

::POP STACK INTO $TMPO
*TEST FOR SF AFTER TEOM SENT

(SP)+,$TMPO
#SF,$TMPO

648

104421

ssz}s

MOV
BIT

:LOOP ON ERROR
-END THE MESSAGE
;STEP THE CLOCKONCE
*READ THE STATUS REGISTER

JMP

su; 025012
0250

:DEVICE IS HUNG

ozsmg 1044 9 00001

64$
,SEC3,TEOM
.
PRI13

JMP

541

JMP
WRITE
STEP
READ

aga ;fi’
ERROR 34,

S,‘.{

55233 3 gggg 000137 024232

ssm ?égggg 005337 025200

14$:

104420
000000
01;6
oo1§oz
013737 024506 001204

3606
034776 o140y 01202 001204
5439 025000 104057

64$

SEC1

(SP)+,$TMPO

BIC

#*C<ERRCK>, $TMPO

R
MOV

L —
TMP1 . STHP2

BIT

RRCK, $TMPO

*B=ALL CHRS REC.

:LOOP ON ERROR

::POP STACK INTO $TMPO

:CLEAR UNWANTED BITS

STEST ERRCK

OREPARE
T0 RCRORT ERROR
:LOAD EXPECTED ALSO

SEQ 0112

C%WAO MS"-SA STA.“ MCV}" 30A(1052)

CZKMDA.P11

S 0251
1

Efi’f

gsz 7

001206

‘i&

g}s

024506

0251

000177 024506

0 g};

137

024232

142;

gl-‘l‘:g 8517 000401
gszzl.? 025

21-0CT-81

BIS

ERROR

178:

000000

09:21

PAGE
1

ERROR CHMECK TEST FOR ALL mon DETECTION

198:

JMP

#ERRCK ,$TMP2

:LOAD EXPECTED

24,

INC
gg;

658
41';3.653

CMP

#177,658%

BEQ

sTEST IF ALL CHARACTER'S BEEN TRANSMITTED

18$

JMP

SEQ 0113

T1ST70

:CHR. COUNTER

S“g

.tl't.ttt..tt't't'tt'...'.. fES" 70 L 1333333333333 3333233332311

Sslzgg

ttttt.tttt.Q't'ttttt.t.ttttt'tt'ttttt.t._Q...Qt'"tttttttttt'.'

5450
5451

*«ERROR CHECK TEST FOR mrocou. = CCP
-sanon CKECK X Y Z = ODD PARITY

Sszgg
5459

5457

ttttttt..t.ttttt..'t."tttttttt..t.t'.t't.tt.tt.ttt't'tt.ttt..t

025202

5458 025206 012737 000070 oonog
5459 025212
012737 000070 00126
gzgo 025220
012737
025500

10 ss 6 012737 025

scai 025

5463
56464

104414

5467

001106

025
025242

005037
104416

025754
7

025

005037

025640

5465 025250 104416
sceg 025256 104419

5468
5469
ggg

025270
0252764
025

TEST 70

005037
005037
104416

t§7170:

648:

000347

S 000144
000026

ogswe
025562
000014

SCOPE

MOV
MOV
MOV

MOV

MSTCLR

uls.amn
198
,SEC7.347

CLR

§28+

CLR
CLR
WRITE

5476

5475

025306

025314

5477 025326

104416

104421

1044 g
O1 9

000003

00000

000001

28:

1205

S
GRG0 AR
5480 02534 013739 025500 025352
025346 1044.19

s«g
5483

5356
025

005237
104421

5487

025402

001017

5484 025
1044 9
5485 3 5370 t39
54,
5374 032737
5488

:SET CHARACTER LENGTH ro 7 BITS/CHAR

508+
118+
,PRIT4,TENA'RENA!MB'MC
:

5476 025

5481

ssr RETURN ADDRESS TO 64$

.sscs-CCP!SSL'0DDP
:LOAD MODE CONTROL
5C4.SYN
:LOAD SYN CHARACTER

5475

547

LOAD THE NO. OF THIS TEST
c FOR TYPE OUT
:LOAD CHARACTER BUFFER

;1SSUE A"MASTER CLEAR

CLR
WRITE

WRITE
WRITE

000321

#70,$TSTNM
m TSTNUM
1.658

025404

105227

1 os

000000

001202

5489 025410 001 ;
5490 025412 013737
001202 001204

508:

.PRI13

*READ THE STATUS REGISTER

MOV

(SP)+,$TMPO

MOV

LD
658,

INC
STEP

WRITE

38:

*SET TSOM

READ

.PRI13
tsno $TMPO
#SF ,$TMPO

INCB

BNE
MOV

*STEP THE CLOCK ONCE

::POP STACK INTO $TMPO

gcé o :LOAD A CHARACTER

READ
MOV
BIT
BNE

RENA

MAINTENANCE BITS: M8 ,MC

,SEC3,TSOM

STEP

2 000000

025754
ooooog

WRITE

iE"“’"‘ THE FOLLOWING:

248’

3s
$TMPO, $THPI

;STEP THE CLOCK ONCE

e cuock

*READ THE STATUS REGISTER
::POP sucx INTO ST
fss OR S/F
-

EKAOAPIT

CZKMDA.

|20-001-81
1750
Y

05330

053¢

0254

033737 000018

il 025234

BIS

ERROR

%3 3A34 R1044TE T: Rk
05360 fisg ?

100l

001206

001208

:21

WRITE

BIeT

080635 001202

PAGE
1

Ten

Lhaon

seo s

#SF.SfmP2

13,

.3563-

:S/F DID
NOT SET A
FTER

20 053306 3273
7 00000 1 001202 108:

5506

3307 03531 00114431
55
025506

5509

§510
28213

0 5513

0255

OOE

053308

3378y

0255

3737

1;2

ogs

051300

e g
s
5550
1040
3313 §§§§§§ 000157 0252
34

§§%§ 033340 10{%%?
551

3319

5556

025364

(WP

O9139¢

Bra

sos:

000000

118:

00133

025234
418:
gszg oo E—— 00
0002
S
3334 033600 1046%9 0019
gszs 8 2t O 937 88 03
0001 001202
5526
025610 0 ‘o
7
.

001204

33
50 093630 005337 05595
ggn
8 56
3¢34

0014
06
e

Sgg s 2& 581524
3338
3235
Ssga

70
528

%00

055644 000157 025234
ggg

§239 02565 1?“ 9

#T8 GMT.3TPQ
WRDA.STMPO

T FOR DATA AVAILIBLE

1 ;

51 ¢ gg;% §9 7 &égo 001203
s han
154
y
3354

025%00
033708

g
013757 o
01
013737

3345 033714 042737

B06E
0013

00 001206
1

4RDA,

,SECO

[RIATRe

198 STHPY

658,

STMPO,

STHP1

JNP

b4s

BEQ

198

INCB

158

ERROR 35

(gfl $TMPO

#*C<ERRCK>,$TMPO

Beq 178 kST

B
MoV
BE

BIC

iTEST FOR BUFFER EMPTY

eren

:LOAD A DATA CHARACTER

R io
;TES

;READREAD THE DATA REGISTSTER

::POP STACK

iifer

TO
SIACK IN
jrg REC.ShwN )

*GET EXPECT
ED.ECT

sTEST FOR
COR =

DATA

e cTLY

$200P ON ERROR
:

DEC

READ

SIaee

Lt o't

TSTMPO
ARDA.GTAPO.
708
,SEC

:DATA TRANSM CH
ITTED

1S
BIT
gg.
READ

12050

SDATA OK BAMN

ERROR 54,
NCB

RESET TSOM ok

shea e STars sesls

o
3
J
418
I

wg:

158:

737

MOV

001204

2325) 8%?293 000157

2348 043

READ

DEC

025500

BBI
ETQ

:LOOP ON ERROR

i e W
308 9 2309 8823§§ 025754
g
R
5”’;
TE

SEQ 0114

seTecTion

S _HUNG

Soeke NE SIafis RE —
cIEn
::POP STACK IN

TEST FOR DATA
;READ THE DATA
::

TO STHPO

POP STACK INTO
§$

TM1

:B=ALL CHRS REC.

;

;S/F DID N
OT SET AFT
ER TEOM SE
T

:LOOP ON ERROR
i T

ATEhro
: :POP SVI
QEEEA;‘"’s.IMwe
IED BITS

TEST Encs o

IPREPARE1O REPORT ERROR

fiehK, e$TlMP2 o eoio
;
#ERRC

CZKMDAO MS"

A STA

MCVH 30A(1052)

CEKROA.PTT | 20-0CT-81
17
547

sszg

;

000177

sgi

025234

3%
gg;

21-0CT-81

;7 %oogo 025500 178:

o5ars
0
57 883300

09:21

PAGE
1

ERROR CHECK TEST FOR ALL moa DETECTION

025500

ooy
198:

INC
gg

658

'c'?;

“‘7.653

JMP

SEQ 0115

g 658
sTEST IF ALL CHARACTER'S BEEN TRANSMITTED

1ST71

:CHR. COUNTER

g
gss

:.ttttttt.t.'t""t'tt.t'..Q YEST 71 1 33322333333 8333333311313 1%1

560

**ERROR CHECK X Y Z = EVEN PARITY

gss

s«ERROR CHECK TEST FOR PROTOCOL = CCP

5561

s IRARARAARAARARAACAARAAAAAARAARAANRAAAAAAANANAAAANAANNANCACAANEES

: TEST TMM

5565

5566 025756
§567 025760
012737 000071
gsea 025766
012737
7

569 0548177

5570 026002
5571

026010

nnnaottnnnnnnnnnttnnnntt"nnnnnnnntnno

oongs
0015

1 026254

012737 026010 001106

104414

t§171:

gsrg

026012

005037

026536

ssrg

026040

005037

02642

SCOPE
MOV
MOV

#71,8TSTNA
m tsmun

MSTCLR
CLR

MOV

648:

MOV

573 026016 104416 000007 000347
5576 026026 104416 000005 000145
5575 0
10“19 8ooom 000026

WRITE
WRITE
WRITE

§577
§578
ggz

CLR

026044
026050
026054

005037
005037
104416

0261
026344
000014

CLR

000321

WRITE

061. LSLPADR

558

7.347
:SET CHARACTER LENGTH TO 7 BITS/CHAR
sscs-CCP!SSL'EVENP
:LOAD MODE CONTROL
.SEC&L.SYN
;LOAD SYN CHARACTER

§28+

508+
118+
,PRIT4,TENA'RENA'MB'MC

ozsoes 104416

5584
5585

026070
026074

5588

026112

5586
5587

104421
1044
0017

issr FOR s/r

026210

001

;

13737

52737

10401

ogoooo

WRITE

38:

15 001202
000000

120

00120
1

508:

1204

1206
1206

STEP

BNE

INCB

BNE

MOV

MOV
BIS

ERROR

.+12

*NO CONTINUE srsmus THE CLOCK

#5F ,$TMPO

BIT

1017

6192
os

658,

BEQ

srer THE CLOCK ONCE

599
1

-POP STACK INTO ST
fssT FOR aumu

105227

(SP) +,$TMPO
#TBMT.STMPO
i

6160

026164

MOV
BIT

:STEP THE CLOCK
nw THE STATUS ae
"sm

INC

598

*SET TSOM

.2
.PRI13

026150 359 7

6128

,SEC3,TSOM

STEP
READ

523

104421

136

WRITE

MOV

595

RENA

MAINTENANCE BITS: M8 ,MC

6254 026126

10441

599

88001

2s:

{E#LE THE FOLLOWING:

0137

gsoo 026122

595

3 000001

026100 8}59
1205
026104
7 000020
001202

5589 026114
591

Mrnuren

ssr RETURN ADDRESS TO 64$

;ISSUE A'MASTER CLEAR

5581
&5

LOAD THE NO. OF THIS TEST
FOR TYPE OUT

géé 0 :LOAD A CHARACTER

%8’

TMPO,$THP1

TMPO

. STHP2

cgr. fmp2
15.

:S/F DID NOT SET AFTER SYNC SENT

21-0C7-81

n9
PAGE 116

:21

138 ATl ! soncosd RROR CMECK TEST FOR ALL € RROR DETECTION
000137
1 ug
1044
1
59
7
1405

2215

}‘

2215

001202

104416

000002

5237

026536

658:

1044
&1) g

001
7 026
0462737 830 00 831202

1
;

013737
54
1304
85 737 001202 001204
1403

5627

78:

1424

561
5618
5619

5256

000000

032737 000001 001202 108:

5619

5625

000137 026010
ooo‘og

308:

0
5630
026
&31 0263

10555
001
10404
000137

000000

118:

026010

5634
5635
5639
563
5638
5639
5640
%1

1044 9
012637
032737
001407
1ou.§9
01 g
005337
001406

00001
001202

5644
5645
5646
5647
5648
5649
5650
5651

001354
104059
000137
026010

56:3

su.i

sosg
5653

5654
5655
56
gcs

658

104421 ooooo;
000001

32737
1411

000200
:

00 ;sr

MOV
P

658, $TmP1
$STMP0, STHP1

READ
MOV
DEC
BIC

198

:+1 TO DATA OUT

118

,SECO
(SP)+,$TMPO
198
#8IT7,$THPO
$

23,

JMP

648

418

;TEST FOR DATA AVAILIBLE

;READ THE DATA REGISTER
::POP STACK INTO $TMPO
:=1 T0 DATA (CHR. REC.)
*MASK THE PARITY BIT
:GET EXPECTED
*TEST FOR CORRECT DATA

*DATA OK BRANCH
:DATA TRANSMITTED INCORRECTLY

:LOOP ON ERROR

.PRI13
(SP)+,$TMPO
#RDA, $TMPO
70$
,SECO
(SP)+,$TMP1
198
158

BNE
ERROR
JMP

53s
22.
648

READ
MOV
BIC

,SEC!
;READ REGISTER
(SP)+,$TMPO
+;POP STACK INTO $TMPO
#*C<ERRCK>, $TMPO
:CLEAR UNWANTED BITS

MOV
MOV
BIC

$STMPO, STMP1
STMP1,STHP2
cgnncx.smz

158:

001202

26254
022737 800026
026254

#RDA, $TMPO

BEQ

:LOAD A DATA CHARACTER

READ
MOV
BIT
BEQ
READ
MOV
DEC
BEQ

548:

mgr 7 001202 881204
31 737 385 04
1506
gr 7
20 001206

BIT

INC

,SEC2

528:

1ou.§9 000001
0126
091?9;
737 1775
omsoz

:TEST FOR BUFFER EMPTY

#0
78
34.
648

001202

105527 000000

.WwORD

WRITE

:LOOP ON ERROR
;RESET TSOM
:STEP THE CLOCK ONCE
SREAD THE STATUS REGISTER
::POP STACK INTO ST

INCB
BNE
ERROR
JMP

S3$:

000000
oo1§g:
026

648
,SEC3.0
.
PRI13
(SP)+.$T
STBMT.ST
8s

BEQ
ERROR

w.ogr

JNP
WRITE
STEP
READ
MOV
BIT
BEQ

STEP

INCB

BIT
BEQ

178:

INC
CMP

o;nncx.swo
178

6
#26,65%

:DEVICE IS HUNG
:LOOP ON ERROR

:STEP THE CLOCK ONE TIME

*READ THE STATUS REGISTER
::POP STACK INTO $TMPO
:TEST FOR DATA

:READ THE DATA
+:POP STACK INTQ STMPI
:=1 TO DATA CHRS.
:B=ALL CHRS REC.

:S/F DID NOT SET AFTER TEOM SET
:LOOP ON ERROR

STEST ERRCK
*RESET SKIP ERROR

PREPARE TO REPORT ERROR
:LOAD EXPECTED

:LOAD EXPECTED ALSO

SEQ 0116

CZKMDAD DMS11-DA STATIC WACYI1 S0A(1052) 21-0CT-81 09:21 PAGE 1Y

CZKMDA.P11
59

%
5664
5665

T-81

65
0265
0265

177

¥z§

17:0

000177

137 026010
01
8883m

ERROR CHECK TEST FOR ALL ERROR DETECTION

0262564

BEQ

—
.
198:

&n;

JMP
3'

17;

flur.css

64$

18172

SEQ 0117 |
;TEST IF ALL CHARACTER'S BEEN TRANSMITTED

:CHR. COUNTER

1 30A(1052)_ 21-0CT-81 09:21 PAGE 11'
TRANSM IT UNDERRUN ERROR TEST
20-0(7-‘1 17:03

CZKMDAO DMS11-DA STATIC MACY 1

CZKMDA.P11
;229

.SBTTL

SEQ 0118

TRANSMIT UNDERRUN ERROR TEST

2223

JERRRRAARAARARNERAORRANAANNS TEST 72 222232 2222222222222 2X212}

56;1

.-:m PROTOCOL = BOP

5670

*«TRANSMITTER UNDERRUN TEST

§27

s*THIS TEST WILL SYNC THE SEND RECEIVE LOGIC

S“S“%

3 IRARARARNARARANRANARAAAAAARAAAAAAANAAAAAAAAAAAAAAAAANASAAAAOAOANNS

5674
5675
567
567
5678
5679
5680
5681

s«TRANSMIT A ZERO DATA BYTE
s*READ AND DISCARD THE DATA SENT
:*STEP THE CLOCK 2 MORE CLOCK TICKS
s*TEST IF TERR SET TO INDICATE A UNDERRUN CONDITION
:*WITH THE IDLE MODE BIT RESET THE HANDLING OF A UNDERRUN
:«CODITION FOR PROTOCOL = BOP
:*AN ABORT WILL BE SENT AND THE INDICATION
s+WILL BE RABORT SET

ssggls'

5686

. 'tQtttt;ttttttt.ttttttttt"ttt'ttt"'tt.t.ttt..t.tttQ't.'.l".tt

5687 026540

000004

5690
5691
5692
5693
5696

026556
026560
026564
026570
026574

104414
005037
005037
005037
005037

026734
027114
027034
027312

5696

104416

000005

026542 012737 000072 001102
5689 026550 012737 000072 001262

5695 02
5697

5699

026614
026622

104416

104416
104416

000014

000003

02
026634

104421 ooooog
104450 00001

026644

032737

5701
5702 026640 012637 001202
5703
5706

026652

5705 026656

000001

WRITE

STEP
READ

000000

WRITE

001 os
10

001202

000020

001202

5715
5716
5717
5718

026732 1os§§ 000000
026736 001354
026740 013737 001202 001204
026746 013737 001202 001206

000002

000101

000010

001206

5721

2s:

104416 000002

012637
032737
oo1o§9
032737

1044 g

001403
104419

052737

026764

000137 026556

104016

000000

026754

026762

WRITE

001202

026700
026704
026712
026714

5719

WRITE

000020

001766

709
5710
5711
§712

5720

MSTCLR
CLR
CLR
CLR
CLR

MOV
BIT

5707

026722
026724

SsCoPE

MOV
MOV

WRITE

000321

000003
ooooo;

5713
5714

1018$:

9000000

104416
104421

026674

TS172:

000000

026662
026670

708

TEST 72

BEQ

3s:

508 :

WRITE
STEP

#72,8TSTNM
#72,TSTNUM
508+2
5§28+2
708+2
618+2

,SEC7.0

,SECS,BOP

: LOAD THE NO. OF THIS TEST
¥ FOR TYPE OUT

:CLEAR THE KMC11

:SET CHARACTER LENGTH TO 8 BITS
:LOAD THE MODE CONTROL

.PRI14,TENA'RENATMC'MB
,SEC3,TSOM

.2
,PRI12

(SP)+,$TMPO
#TBMT ,$TMPO

.secg.o

;ENABLE THE TRANSMITTER

sAND RECEIVER PLUS MAINTENACE MC AND MB
:SET TSOM
:STEP THE CLOCK ONCE
:READ THE STATUS REGiSTER
::POP STACK INTO STMPO
:TEST FOP BUFFER EMPTY

*NO CONTINUE STEPPING THE CLOCK

:LOAD ADDRESS

,SEC3,0
|

*RESET TSOM
:STEP THE CLOCK ONCE

MOV
BIT
BNE
BIT

(SP)+,$TMPO
#SF,$TMPO
4$
#TBMT,STMPO

::POP STACK INTO $TMPO
*TEST FOR S/F

INCB
BNE
MOV
MOV

#0
3s
$TMPO, STMP1
$TMP(, $TMP2

ERROR

14,

READ

BEQ
WRITE

BIS

JMP

,PRI13

508
,SEC2,°'A

#SF,$TMP2

1018

*READ THE STATUS REGISTER

:TEST FOR BUFFER EMPTY
:LOAD A DATA CHARACTER

:S/F DID NOT SET AFTER FLAG SENT

:LOOP ON ERROR

Goini.

"2S

WA NI
WNVIWAWV
~
NNNNN ~ NNNN
W
W
NN
[+ ] NOWNESSWWIN

P11

VI
NN
&S W
(=4 0

DMS11=DA STATIC MACY11 30A(1052) 21-0CT=81 09:21 PAGE 113
20-0CT-81 17:03

026770

8 6770
9774.

182" 1
1044

8 ;8?'2'

smg

027000 815?

3 7016

7022

104416

032737

TRANSMIT UNDERRUN ERROR TEST

001202

000002

000101

000001

057823

0126

027070
027072

001404
104420

000000

032737

000200

027

032737

78:

oo1oog
1cs§§ 000000
001354
10404;
000137 026556
104421
104459

48:

0270
0270
027036
02704
027042
027046
02705

708:

oog
1

001202

188:

027110 oo1oog
027112 105227
000000
027116 001353
027120 104044
83%5 000137 026556
027126
027132

4§o
012637

027146
027152
027154
027162
027170

032737
001014
013737
013737
052737

027136

027176

042737

10403

027200 000137

027204
027210

104421
104420

00120

177577

s
001202

;STEP THE CLOCK ONCE
*READ THE STATUS REGISTER

gam.smo

<TEST FOR BUFFER EMPTY

WRITE

BIT

BNE
INCB
BNE
ERROR
JMP
STEP
READ

52¢:

BNE
INCB
BNE
ERROR
JMP

001202

000000
001212

027244
027250
027256
027264
027266

0156 7
042737
032737
001017
013737

104420

000001

001202
62%:
218:

001;%
177
001202
000004 001202
001202 omgo:.

057508
0i3737 00604
001508 618:
027310 1o§227
000

60$
,SECO

:LOAD A DATA CHARACTER

STEST FOR DATA

:DEVICE HUNG ERROR

:LOOP ON ERROR

;TEST FOR TSA TO SET

2:POP STACK INTO $TMPO

:TEST FOR DATA AVAILIBLE

;::POP STACK INTO $TMP4

#TSA,STMPO

198
188
36.
1018

:TSA DID NOT SET ON A FORCE UNDERRUN ERROR

:LOOP ON ERROR

,SEC3
(SP)+ ,$TMPO

;READ REGISTER
::POP STACK INTO STMPO

#TERR,$TMPO
208
$TMPO, STMP1
$STMP1 . STMP?
#TERR . $TMP2

:TEST TERR
:SET SKIF ERROR
:PREPARE TO REPORT ERROR
;LOAD EXPECTED ALSO
-LOAD EXPECTED

1018

:LOOP ON ERROR

(SP)+,$TMPO
62$
,SECO
(SP)+,$TMP4

::POP STACK INTO STMPO

,SEC1

:READ REGISTER

#*C<TERR> ,$TMPO :CLEAR UNWANTED BITS

ERROR

26.

JMP

012637
032737
001404
1ou.§o
012637

(SP)+ _,$TMPO

+:POP STACK INTO $TMPO

BIC

026556

20$:

.2
.PRI13

(SP)+,$TMP4

000200 001206
00000
00001

188
40
78
34.
101s

MOV

BEQ
READ

BIT
BNE
MOV
MOV
BIS

001202 001204
001204 001206

,SEC2,°'A

#RDA, $TMPO

READ
MoV

001202

(SP)+,$TMPO

BIT

000200 001202

027214
027220
0 7253
0 75
027234

027240
027240
027240

.2
,PRI13

MoV

001202

SEQ 0119

STEP
READ

MOV

001202 8S:

35;%3 012637 001212
027102

STEP
READ

MOV
BIT
BEQ
READ
MOV
READ

MOV
BIC
BIT
BNE
MOV

.2
.PRI13

IRDA.‘THPO

:TERR DID NOT SET ON A FORCE UNDER RUN

*BEGIN LOOKING FO AN ABORT

:'fEST FOR DATA AVAILIBLE

::POP STACK INTO STMP4

(SP)+,$TMPO
+:POP STACK INTO STMPO
#*C<RXAB>,$TMPO :CLEAR UNWANTED BITS
#RXAB, ST
:TEST RXAB
228
:SET SKIP ERROR
$TMPO, STMP1
*PREPARE TO REPORT ERROR

1
S e L
INCB #0

By LY
T
.

CZKMDAO DMS11-DA STATIC MACY11 30A(1052)

CZKMDA.P11
778
779
780
781

ng
5783

g;gg

20-0CT-81 17:03

857;1‘
73516

00133
10403

0
027324
027324

000137

027324

026556

21-0CT-81

228:
238:

000400

09:21

PAGE 12

TRANSMIT UNDERRUN ERROR TEST

SEQ 0120

BNE
ERROR

598
o

JMP

1018

sNO RECEIVE ABORT OCCURED ON
sA TRANSMIT UNDER RUN ERROR
;LOOP ON ERROR

TST73

7
g7gg

JERRRRRRRARAANEECRCCCCCORN
s TEST 73 Attt
ettt tntateeattetas

5791
579
579
5794
5795
5796
5797

s*THIS TEST WILL SYNC THE SEND RECEIVE LOGIC
s*TRANSMIT A ZERO DATA BYTE
s*READ AND DISCARD THE DATA SENT
s*STEP THE CLOCK 2 MORE CLOCK TICKS
s*TEST IF TERR SET TO INDICATE A UNDERRUN CONDITION
s*WITH THE IDLE MODE BIT RESET THE HANDLING OF A UNDERRUN
s*CODITION FOR PROTOCOL = CCP

5800

SRR

5788
g%

s*TRANSMITTER UNDERRUN TEST
H :FOR PROTOCOL = CCP

5798
5799

;*THE LINE WILL RESYNC AND THE INDICATION OF THIS
;*WILL BE S/F SET

5801

5804
S805
5806
5807
S808

:
000004
012737
012737
104414
005037
005037
005037
005037
104416
104416
104416

100073
000073

001102
001262

5810
5811
5812
5813
5814
5815

027326
027330
027336
027344
02
027352
027356
027
027
027374
027402

027522
027710
027630
030056
000007
000005
000004

000100
000026

5818
5819

027416
027426

104416
104421

000003
OOOOOS

000001

5822

027440

000020

001202

000002
00000§

000002

5816 027410
5817
5820
5821
5823
5826
5825

5826
5827

0274
0274

027446
027450
027456

027462
027466

104416

10“59
0126

032737
001766
104416
104421

1044 9
0126

000014

00001
001205

00001
00120

5828 82;372 33%37 000010

000321

001202

AR AR

AN AR RN ARANCRARANRAARANRANRANANCARAS

TEST 73

2z tttttt;tttttttttttttttttttttttttttt'tttttttttttttitttttttttt'tt
TST73:
SCOPE
MOV
#73,8TSTNM
; LOAD THE NO. OF THIS TEST
MOV
#73,TSTNUM
:# FOR TYPE OUT
101$:
MSTCLR
sCLEAR THE KMC11
CLR
508+2
CLR
528+2
CLR
708+g
CLR
538+
WRITE
,SEC7.0
sSET CHARACTER LENGTH TO 8 BITS
WRITE
,SECS.CCP
;LOAD MODE CONTROL
WRITE
,SEC4,SYN

WRITE

2$:

3s:

5
027502 0327;9 000020 001202
ggg‘ 35;?}? ?822?3 000002 000101
5833 027520 105229 000000
508:

.PRH‘.TENA!REM!HC!E ;ENABLE THE TRANSMITTER
;AND RECEIVER PLUS MAINTENACE MC AND M8

WRITE
STEP

,SEC3,TSOM
ok

JSET TSOM
sSTEP THE CLOCK ONCE

BIT

#TBMT ,STMPO

:TEST FOR BUFFER EMPTY

READ
MOV

LPRI3
(SP)+,$TMPO

READ
MOV

BEQ
WRITE
STEP

g'x‘g

PRI12
(SP)+,$TMPO

2%
,SEC2,STX
ol

fir.sim

BIT
#TBMT ,STMPO
EIE!?TE sggCZ 'A
INCB 40

JREAD THE STATUS REGISTER
::POP STACK INTO $TMPO
sNO CONTINUE STEPPING THE CLOCK
sLOAD A CHARACTER
sSTEP THE CLOCK ONCE

JREAD THE STATUS REGISTER
2:POP STACK INTO $TMPO

:TEST FOR S/F

sTEST FOR BUFFER EMPTY
LOAD A DATA CHARACTER
’

CZKMDAO DMS11-DA SYAI“ MACY11 30A(1052) 21-0CT-81 09:21 PAGE 12§

CZKMDA.P11

20-0CT

75264
0275
75

1; 4
13737
13737

7550

104017

7542

052737

17:03

TRANSMIT UNDERRUN ERROR TEST

001206

58 2 9 ;236 000137 027344

2321g

7556
104416 833%3 000000 78:
75% 104421

027570

1044 g

ooog1

gu.s

8 ;ooo

331Zo§

000020

001202

5847

02761

000002

000101

5848
5849
5850
5851
5852
5853
£
5855

BNE
MOV
MOV

158? 881
01 :
1206
10

027576 012637

027616
027624
027626
027632
027634
027636

gzw.z
027646

1g“19

001 os

ooooog
00001

001404
104420
012637

000000
001212

5
027652 012637 001202
5857 027656 032737 000001 001202

5859
5861

027664
027666
027672
027676

s“f 027676 032737 000200 001202

027704 oo1oog
027706 1osz§ 000000

5868
5869

027722
027722

104420

000003

027732

042737

177577

5870 027726 012637 oo1§o;
5871

5873
5874
5875
5876
5877
5878

101s

READ

19s:

WRITE

:S/F DID NOT SET AFTER SYNC SENT

.gscs.o
.

;RESET
TSOM
:STEP THE CLOCK ONCE

*READ THE STATUS REGISTER

gam.smo

:TEST FOR BUFFER EMPTY

(SP)+,$TMPQ

,SEC2,°'A

#RDA, $TMPO
188
#0
78
34.
101s

MOV
BIT

(SP)+,$TMPO
#RDA, $TMPO

STEP
READ

BEQ
READ
MOV

BIT

BNE
INCB

.2
.PRI13

608
,SECO
(SP)+,$TMP4

BIC

198
#0

,SEC3

#TERR,STMP

STEP

5880

030006

saai

030014

104421

027344

5885 0300
5886 03004

5887 030046

208:

104420

030010 012637 091;0;

5883 030022
5884 0300

001206

042737

177767

001202

000010

001206

538:

2:POP STACK INTO $TMP4

TSA DID NOT SET ON A FORCE UNDERRUN ERROR
:LOOP ON ERROR
;READ REGISTER

23.
1018

:TERR DID NOT SET ON A FORCE UNDER RUN
:LOOP ON ERROR

.PRI13

*READ REGISTER

(SP)+,$TMPO

MOV
MOV

$TMPO, $TMP1
STMP1 . STHP2

INCB
BNE

::POP STACK INTO $TMPO
:TEST FOR DATA AVAILIBLE

:PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO

#2C<SF>,$TMPO

BIS

:TEST FOR TSA TO SET

$TMPO, STMP1
STMP1.STHP

BIC

BIT
BNE

13737 001202 001204
8137;7 001204 omgoe
sgr 7

READ

MOV

032737 000010 001202
1017

5888 030054 10 ggr 000000
5889 030060 001347

ERROR
JMP

:LOOP ON ERROR

:TEST TERR
:SET SKIP ERROR

8IS

052737 000200

:DEVICE HUNG ERROR

#*C<TERR> ,$TMPO :CLEAR UNWANTED BITS

027764

027772 10403
027774 000137

:TEST FOR DATA

+:POP STACK INTO STMPO

#TERR ,$TMPO
208

MOV
MOV

:LOAD A DATA CHARACTER

(SP)+,$TMPO

BIT
BNE

027750 013737 001202 001204
027756 013737 001204 001206

::POP STACK INTO STMPO

#TSA,STMPO

Efifim %2‘
JMP
101s
READ

:LOOP ON ERROR

.PRI13

BIT
BNE
INCB
BNE
ERROR
JMP

MOV

001202

15,

027740 032737 000200 001202
027746 001014

5879 0
5881

608
:

528:

3“5 32%35 ?3}.342
5329 027716 000137 027344

JMP

WRITE
STEP

SEQ 0121

$THP1
. STMP2

cgr.sfnpz

ERROR

188:

gs
TMPO,
STMPO

BIS

MOV

032737 000001 001202 8S$:
oo1oog
1os§§ 000000
708:
0013564
104.04.;
000137 027344
104421
104420

#SF ,STMPO
238

#SF,$TMP2

40
208

:LOAD EXPECTED

*BEGIN LOOKING FO AN ABORT
::POP STACK INTO STMPO
:CLEAR UNWANTED BITS

:TEST SF
*SET SKIP ERROR
PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO
:LOAD EXPECTED

CZKHDAD ONS11-DA STATIC

homon ey
1

MACY11 SOA1052) 21-0CT-81

100 0r8s Tl

030062

589

000400

£ 10
PAGE 122

RANSMIT UNDERRUN ERROR TEST

104034

; 830094 000137 027344
589
388 78

09:21

238:

SEQ 0122

ERROR

28.

:LINEDID NOT RESYNC ON A roacs

JMP

1018

:LOOP ON ERROR

1ST74

;UNDERRUN ERROR WITH IDLE RESET
::

21-0CT-81_09: 21 PAGE 12§

%28488328 238858

CZKMDAO DMS11-DA STAI‘% ?9(5;1 30A(1052)
CZKMDA.P11
20-0CT
RECEIVER OVERRUN
T
.SBTTL

RECEIVER OVERRUN TEST
JRRRRRRRRRRRRRRRCRRRRnnnnnnt TEST 74 teennancncsasssectesneneens

-RECEIVER OVER RUN ERROR TEST FOR

3901

s*PROTOCOL
= CCP
'THIS TEST UILL TRANSMIT DATA TO

:'THE RECEIVER IN MAINTENANCE MODE AND FAIL TO READ
s*THE SECOND DATA BIT TO FORCE THE OVERRUN CONDITION

SINAAAAARARAAAANENAAAAAAAAAANAANAANANAAAANRAAAAAAAAOOAAOOAOORAOY

:
oo
LS LV

T$174:
101$:

§E§E

b L

BB
NN

SCOPE

MOV
MOV

#76,$TSTNM
#74.TSTNUM

WRITE

,SEC7.0

MSTCLR

: LOAD THE NO. OF THIS TEST
*# FOR TYPE OUT

;CLEAR THE KMC11

*SET CHARACTER LENGTH TO 8 BITS/CHAR

WRITE

.SECS.CCP

WRITE

_PRI14,TENA'RENA!‘M8 MC

WRITE

056

—

-hd-a-hasasz

RRRRRvn

TEST 74

'-tttt'."'.t...ttt..t'tt"".tttttQt.tttQl...!t'.'.'.'.t.....ttt

:
:

VIVVAWIWAVIAWIVIWN

SEQ 0123

.sscl. SYN

:LOAD MODE CONTROL

;LOAD SYN CHARACTEF.

PRl R ol o ¥ X S O O
N =2 N\ =d ) =b ) = b [\) b
S ON2ON=ON
OO = O

RERRRRRRRRRR

e
b
b
o

o
&

NNNSNNNO=ONNO

puty

& =

—

®RO Eflgiy:-nu-u:-.
NERERVE
o
W ;z\rflcrfl\“hJMhJfllt~
W =2 LN AN NN ~2 NN
(V]

d e

o
N

000001

WRITE

.sscs TSOM

000000
000001

2?%3‘

.ggcz SOH

STEP
WRITE

0001 01

WRITE
STEP
WRITE

0001 01

STEP
WRITE
STEP

0001 01

.9,
.SEC3.0

.SEC2,101
.8.+*
,SEC2,101

.8.*
,SEC2,101
J8.*

igms THE FOLLOWING:

RENA

MAINTENANCE BITS: M8, MC

*SET TSOM

;RESET TSOM

:LOAD SOH INTO TDB
:LOAD DATA #1
STRANSMIT DATA #1
:LOAD DATA #

sSEND DATA #
:LOAD DATA #
¢ SEND DATA #

:ATFPE'I‘S POINT THE FIRST DATA BIT SHOULD BE IN THE RECEIVER
LSECO

;READ THE DATA

,SEC2101
.16.%2
.SEC1

:LOAD DATA
#4
*SEND DATA #6 AND FORCE THE OVER RUN
nm REGISTER

BIC
BIT

#*C<ROR> ,$TMPO
#ROR,STMPO

tl.
AR UNWANTED BIT
:TEST ROR

BIS

ERROR

#ROR, $TMP2

JMP

1018

nscgvekogea&‘n DID NOT SET ON

*LOOP ON ERROR

READ

,SEC1

:READ REGISTER

MOV

WRITE
STEP
READ

MOV

17567
000010

BNE
MOV
MOV

001202
001204
000010
030110

000001
001202

)

MOV

(SP)+,$TMPO
(SP)+,$TMPO

1$
$TMPO, STMP1
STMP1 _STMP?

29.

(SP)+,STMPO

::POP STACK INTO S$TMPO
:POP STACK INTO sm»o

:SET SKIP ERROR
PREPARE TO REPORT ERROR
:LOAD exfiscreo
ALSO
LOAD EXPECTED

::POP STACK INTO STMPO

CZKMDAO
CZKMDA.P11

A
S

MCY;I 30A(1052)
:0

21-0(7-01

EIVER OVERRUN
T

gsfi 35737
000010 1%
1‘16
1373 g1z
177767

042737
1040

000010

000137

030110

BIC

OR,$TMPO

SEQ 0124

;CLEAR o.mmreo BITS

:TEST ROR
*RESET SKIP ERROR

MOV
MOV
8IC

$STMPO, STHP1
STMP1 . $TMP?2
#ROR, $TMP2

*PREPARE TO REPORT ERROR
:LOAD EXPECTED
ALSO
:LOAD EXPECTED

JMP

1018

:LOOP ON ERROR

TST75

ERROR

28:

PAGE 12‘

c~c<aoa> $TMPO

BIT
BEQ

000400

09: 21

30.

:ROR DID NOT RESET AFTER READING

ascsxven STATUS REGISTER

'ttQtt.t..t.tt'i""t.tttt. TEST 75 1 3333323322123 33 23333333320 ]

nascuven OVER RUN ERROR TEST FOR
:*PROTOCOL
= BOP

*#THIS TEST WILL TRANSMIT DATA TO

*#THE RECEIVER IN MAINTENANCE MODE AND FAIL TO READ

+*THE SECOND DATA BIT TO FORCE THE OVERRUN CONDITION

::t'.tttttttttt'.ttt'ittttt.ttttit.tttfittt.t.tt't...t't'.t.t"'.

TEST 75

NO=0\NO

¢>au>:g>a~

e e

O =

IIINS

S
L % 2l 2
I
NN =) =AY =2 N) =2 2 \) =
Yo Yo Yo Yo Yo Yo Y0 N

RRRRRRRRRRRRE

§§§§§§§§

tttt.t.ttttttt.ttttttt'ttt'tttttttttttltttt...tt'tt.tt!t‘.t"tt

t87175: SCOPE

000075
000075

1018:

MOV
#75,$TSTNM
MOV
#75.TSTNUM
MSTCLR
WRITE
WRITE
.sscsgor'sm
WRITE
.sscl. 76

: LOAD THE NO. OF THIS TEST
‘4 FOR rwe ouT
;CLEAR THE KMC11
sSET cumcren LENGTH TO 8 BITS/CHAR
:LOAD MODE CONTROL
;LOAD ADDRESS

WRITE

,SEC3,TSOM

RENA
:
:
MAINTENANCE BITS: M8, MC
*SET TSOM

WRITE
STEP
WRITE
STEP
WRITE
STEP
WRITE

sscz 376
4. %2
.sec .0
8.«
.sec ,101
8.+
.ssc ,101

:LOAD ADDRESS INTO TD8
:SYNC THE LOGIC
*LOAD CONTROL CHARACTER
*SEND CHARACTER
:LOAD DATA #1
*TRANSMIT DATA #1
*LOAD DATA #

WRITE

000000
000376

000101

000101
000101

STEP
WRITE

STEP
g?éte

.2%0
.SEC3.0

8.+
gec,101

fEME THE FOLLOWING:

:STEP THE CLOCK 2 TICKS
*RESET TSOM

:SEND DATA #
.I.OAD
BA;A
’

atr”;reus POINT THE FIRST DATA ax’r suouw ee IN THE RECEIVER
READ

000101

_PRI14,TENA!RENA!M8 M

MOV
WRITE

STEP

READ
MoV

,SECO

:READ THE DATA

(smo.smo
.ssc

::POP STACK imo $TMPO
:LOAD DATA #

ssc
(SP)+,$TMPO

::POP STACK INTO $TMPO

-2

*SEND
DATA #4 AND FORCE THE OVER RUN
*READ REGISTER

C WAO DHSN-DA
SYA.“ ?9(5;1 SOA(‘IOSZ) 21-0(7-81 09: 21 PAGE 12!

CZKMDA.P

RECEIVER OVERRUNT

6007

6010
6011
oo1§

7}7 1727767 83 sgg
737 000010
001
19“
13737
1582
1
13737
01
1206
052737
10
001206

28}4 030656 104035

6015
6019
601
6018
6019
wgo
6021
oozg
6023&
6025
602
6027
6028
29

030660 000137
30664
104420
841.
7%
030702 03 7
030710
001414
03071 137 7
03072
137
030726 062737
030734

104036

030742 000400

MOV
MOV
8IS

#AC<ROR> STMPO ;CLEAR UNWANTED BITS
:TEST oa
*SET SKIP ERROR
$TMPO, STMPY
*PREPARE TO REPORT ERROR
STMP1 | STMP2
:LOAD sxbecm ALSO
#ROR, $TMP2
LOAD smc TED

JMP
READ
MOV
BIC
BIT
BEQ
MOV
MOV
BIC

1018
,SEC1
(SP)+,$TMPO
#*C<ROR>,$TMPO
#ROR, STMPO
28
$TMPO, STMP1
STMP1 ,STMP2
#ROR, $TMP2

JMP

1018

B8R

1ST76

BIT
BNE

030430
18:
000001
091;0;
1 7767 001202
001202
001502 001204
1206 001206
001206

030736 000137 030430

030742

BIC

2s:

ERROR

#ROR, ST
1$

29.

30.

nscgvekogsnmm DID NOT SET ON
:LOOP ON ERROR
sREAD REGISTER
+:POP STACK INTO srmo
:CLEAR UNWANTED BITS
:TEST ROR
*RESET SKIP ERROR
*PREPARE TO REPORT ERROR
:LOAD EXPECTED
ALSO
:LOAD EXPECTED
:ROR DID NOT RESET AFTER READING
*RECEIVER STATUS REGISTER
:LOOP ON ERROR
¥

SEQ 0125

C KDAO
MS"MAJ%
MCV" 30A(1052)
60
6031
60

21-0CT-81

.SBTTL

IRRRRARARAAANNNE

104416
104421
104416

6059
6060

0310
031040

104421
104416

031052
031060
031
031072
031076
031104
031112

104416
104421
104416
104421
104416
104416
104421

607

6074

6075

6079
6077
6078

6079

6080

0%10 6

031043

0 1113

6085

104414
104416
104416
104416

104416

104421

0126
104421
1044

03114

04421

0%1132

831163

gns
031156
031162

0;11
0311

8 1216
031226

t47176:

TEST 76

MOV
#76,STSTNM
MOV
#76.TSTNUM
MSTCLR
WRITE
,SECS.
sm

000014 000321

WRITE

000004

000003

000004
000003
2
0000
000002
000020
000002
00002
000002
00002
38888;

000376

000001

000000

000376
000000
000101
000101
000109
000006

7;7

g
013737

052737

WRITE

STEP
WRITE
WRITE
STEP
WRITE
STEP
WRITE
STEP
WRITE
STEP
WRITE
WRITE
STEP
READ

00150
00120

3&2’ 881 04
1206

001206

,SEC3,TSOM

;LOAD THE_ADDRESS

3
:

fgme THE FOLLOWING:

RENA
MAINTENANCE BITS: M8, MC

*SET TSOM

*2
:STEP 2 CLOCK TICKS
.SEC3,
*RESET TSOM
.secz 76
:LOAD THE ADDRESS
.14+
:SYNC THE LOGIC
sec .0
:LOAD CONTROL CHARACTER
8.+
*SEND CONTROL CHARACTER
.sec ,101
SLOAD DATA #1
.8.+
:SEND DATA M
.ssc ,101
:LOAD DATA #
8.«
SSEND DATA #
.SEC2,101
sLOAD DATA #
.SEC3.TEOM!TXAB :SET TEOM + TXABORT
.a.:SEND CRC #1
am ADDRESS

MOV

(SP)+,$TMPO

STEP

: LOAD THE NO. OF THIS TEST
*# FOR TYPE OUT
:CLEAR THE KMC11
.LOAD MODE CONTROL

.PRIE, mumsmM8 !MC

isph $TMPO

MOV
1

.SEC&

MOV

STEP
READ

1044

81 )

WRITE

STEP
READ

?126

0126
104421
1044

SCOPE

000076 00110
000076 0012
101$:
000005 oooo;o

1044 9

0311
0311 g
0311

o i
6084

AN AAAAAARAAAAAAAAAAANAAAAAANAAAAAAROAAAAAAOANES

tti.t.t.t..tt.tt.tttt".."'.ttt.ttttt'l.l".ttt'ttt.....tt'.t.

031006
031014
031020

6070
6071
6072

TRANSMIT AND RECEIVE ABORT TEST

*THE RESPONCE AT tue RECEIVER WILL BE
-A RECEPTION OF AN ABORT

030762
0307
030772
031000

6069

SEQ 0126

*TRANSMIT ABORT AND aecme ABORT TEST

6048
6049
6050
6051
605
605
6054
6055
6056
6057

606;
6063
6064
6065
6066
6067
6068

:«THIS TEST WILL FORCE
AN ABORT
'snumon WITH THE IDLE BIT SET T0 0

6069 8%8756 0157 7

6061

PAGE
1

:;{;5;".'.."t"t.'..t."t' YEST 76 L 3333333333232 333132233311%1]

6035
60
60
60
6039
6040
6041
604;
604
6044

6058

09:21

TRANSMIT AND RECEIVE ABORT TEST

- POP sucx INTO $TMPO

,8.#
.SEC

§£
2
am conmoL CHARACTER

8.+
.SEC

*SEND
aw DATA

(SP)+,8TMPO
,9.#

::POP STACK INTO ST
#1

:POP STACK INTO STMPO

fnmsmT ABORT CHARACTER

READ

.SEC

BIC
BIT

m<aan> $TMPO ;CLEAR UNWANTED BITS
#RXAB, STHPO
:TEST RXAB

BIS

#RXAB.STHP

MOV

BNE
MOV
MOV

(SP)+,$TMPO

1$
$TMPO, $THP1
STMP1. STHP

*READ REGISTER

*:POP STACK INTO srmo
*SET SKIP ERROR
*PREPARE TO REPORT ERROR
:LOAD EXPECTED
ALSO
:LOAD EXPECTED

E%WAO MS"-%A SY?I“ ”C;;! 30A€1052) 21-0CT-81 09:21 PAGE 12’ KMDA.P11

608
6090

TRANSMIT AND RECEIVE ABORT TEST

031232

104037

1234

000137

1 48
12640

000400

030762

1$:

SEQ 0127

ERROR

31.

JMP

1018

SRXAB DID NOT SET ON A TRANSMIT
sOF AN ABORT
;LOOP ON ERROR

1S177

;A
11-SA
1
STA.‘C MCV*‘! SOA(‘IOSZ)
CZKMDAO DMS

6091
609

21-0(1-'1

09:

PAGE 12

RANSMIT AND REC IVE GO AHEAD TEST
.SBTTL

SEQ 0128

TRANSMIT AND RECEIVE GO AMEAD TEST
Jrannsnnntntnecseeseenennanet TEST 77 snvnnsncnansnsccceneneneens

*THE RESPONCE AT THE RECEIVER WILL BE

SS
SENENRUR
LS ERVERRURN S VBN
oI NS
e
WN 2RISR

:$LBO8
;*TRANSMIT GO AHEAD AND RECEIVE GO AMEAD TEST
:*THIS TEST WILL FORCE A GO AMEAD
'SITUATIM WITH THE IDLE BIT SET T0 0
D

'A RECEPTION OF A GO AHEAD CHRACTER

IRARRRAARAAAARAVAAAAAAAAAAANNRAAANAAANAANNAAAAAANRAACACAANORCES

TEST 77

tt.tttt.t.tt'.'.tttt'.".'.'.tt...l.t.t'...Qt.'...'il...Q't't"

031;“ 15 7 000077
031242

80092‘

031252
031
031 %
03

012737
104414
104416
104416

000077
000005
000014

$8177:

001262 101$:
000040
000321

ScoPE

MOV
MOV

#77.8TSTNM
#77.TSTNUM

WRITE

,SECS.BOP!LM

MSTCLR
WRITE

: LOAD THE NO. OF THIS TEST
:# FOR TYPE OUT

:CLEAR THE KMC11
LOAD MODE CONTROL (USYRT LOOP MODE)

.PRIS, rmmm‘mmc iEME THE FOLLOWING:
RENA

b e

Nl
et 2

VIS WN=O

ooooooorr O O MCOMOONONONONONOMONMONMONONONONMONMONONOMOMOMCOMOMOAOMONONONO

b —

i cd

) -

031%2
031
031310
031316

104416
104421
104416
104416

0313
8313
1
031350
031356
031
8 1
31372
03137g
0316402
oguos
03141
831613
31422

10“1?
104421
104416
104421
104416
104421
1044
0126
104421
1044
0126
181‘-4 1
1044
0126

0313;3

8;16

104421

mflAlNTEWCE BITS: M8, MC

000003
000004
3
2

000001

WRITE

.sess,TSOM

‘SET TS

000000
000101

WRITE

.SEC3.0

*RESET on

000101

WRITE

.SEC2.101

000101

WRITE

000012

WRITE

888836
0000

000020

STEP

WRITE

STEP

031450
0;1228
8 1
31‘96
8314 4
31502

032737
191‘
‘lg 7
13737
052737
104040

000004

00120

1502
1204

1204
1206

STEP

.8.+

:SEND CRCM

MOV

(SP)+,$TMPO

::POP STACK INTO S$TMPO

MOV
STEP
READ
MOV
STEP
READ

831 504
31510

000137

031260

MOV
BIC
BIT

001206

.sec ,101

*LOAD DATA #

.SEC3,TEOM!TXGA :SET TEOM + TXGA

.SEC

8.+
.SEC

(SP)+,$TMPO
.a.

3»0,$THPO

lsm $THPO

*READ ADDRESS

*SEND CRC #2

sREAD DATA #1

2:POP STACK INTO $TMPO
:SEND CRC
#2
:READ DATA #3
-POP STACK INTO STMPO
TRANSMIT 6O AHEAD CHARACTER
nw REGISTER

:POP STACK INTO smo

#*C<RXGA> ,$TMPOtL
AR UNWANTED BITS
nXGA, STMPO
:TEST xo\

BNE
MOV
MOV
BIS

18
$TMPO, STMP1
STMP1 . STHP
#RXGA,STHP

JMP

1018

ERROR

18:

2ND.DATA

*SEND DATA #

READ

03}2 "l ¢
1
03144 8‘;9 7 1 7;% 001503

:LOAD

8.+

STEP

mi 1ST. DATA

:SYNC mt LOGIS'O SEND 1ST.DATA
:SEND 2ND.DATA

READ

_14.%2
.8.+

STEP

120
2

.SEC2, 1o1

:STEP 2 CLOCK TICKS

32.

*SET
SKIP ERROR
mms T0 REPORT ERROR
:LOAD sxbme ALSO
LOAD EXPEC ED

:RXGA oxb NOT SET ON A TRANSMIT
S0F A GO AHEAD

:LOOP ON TEST

C KOAO
6147

11-gA STA_“ Mtv;l SOA(IOSZ)
031510

000400

21-0(

09:21

PAGE 1

RECEIVE GO AMEAD TEST
TST100

MACYI1 0AC1052) 21-0CI-81

PAGE I

RANSMIT AND RECEIVE GO AMEAD TEST

g7RI R

CZKMDA.P11

09:21

CZKMDAD DWS11-DA STATIC
6]‘3

..'QQQ..'..Q."'.Qt".QQ"..'..QQ.'.'."'..l.t"'.'.....'.'..'t

:SEXTRF

23?0
g}?

;THIS TEST RUNS ONLY EXT. DATA LOOP

g}gz

P
*IN THE BOP MODE USING THE EXTERNAL DATA LOOP CLOCK
:THE TEST IS weuoen TO CHECK THE EXTERNAL DRIVERS mo muvm.

2}2}

:THIS TEST WILL PERFORM THE FOLLOWING SEQUENCE

6159

6160

.g.sser PROTOCOL= BOP

616
6164

:5.=STEP CLOCK 2 TICKS
9:.STEP CLOCK UNTIL TBMT SETS

*9=READ DATA BYTE AND VERIFY

;THIS TEST WILL TRANSMIT A WALKING ONES DATA mrm

mi
6154

:1.=ISSUE A MASTER CLEAR PULSE

:3.=SET rm RENA,MB (EXTERNAL LOOP)

6161

%.=SET TSOM

=TRANSMIT 7DATA BYTES OF THE CURRENT DATA PATTERN

6165

*8=TEST THAT

616

6168
6169
617

6173

6174
6175
6176
6177
6178
6179
6180
6181
mg
6183
6184

tt.ttttt.'.tttttl.t"t"'t..ttt.ltt't"tt'ttt..t"...t't.‘...t.

031512 000004

031514
0315%
031530
031536
031540
ogme
0 1;242
031
031594.
031572
031600

015737 000100
012737 000100
132737 000200
oomg
012737 031530
012737 000001
012737 000007
104414
104416 888805
10“19 mg
1%
01373

oouos
00126

t47100: SCOPE

001260 108:

0011
00151
001212 18:
000000
ooo1§1
031632

6188 031626 104416 000002
118:
6189 0316
oooogg
28:
6190 031634 012737
000011 032056

619§
619
- 619
6195
619?
619
6198
6199
00
6201
6202
6203

IS SET

6185
031606 104416 83000 000001
mg 031614 104421 000004
6187 031620 104416 000003 000000

6191

'RDA'’

ogw.z

031646
831652
031656
ogwa
031
33167
31974.
831 02
031710
ogm
031716
031722

104421

104420
8129
032737
001014
5337
1! ;
137
052737
104015
137
005337
001341

218:

00001
001204
000020 001204
032056
1204 omgoe
20 001206
031554
001212
228:

#100,$TSTNM
#100. TSTNUM
#200.CLKDAT
13
#108, SLPADR
#,87TMP3
#7.$TMPS

: LOAD THE NO. OF THIS TEST
*# FOR TYPE OUT
.18 exr TESTS ENABLED?
:B=NO SKIP TEST
*SET RETURN ADDRESS (ERROR)
SINITIALIZE DATA PATTERN
*COUNT DATA SENT

mnl
TENA'RENA'NS
WRITE
ses“TSOM
STEP
WRITE
sscs 0
WRITE .SEC2’

;ENABLE
EXT. LOOP, XMIT & REC.
*LOAD DATA FOR TRANSMITTING
*SET
TRANSMIT START OF MESSAGE
:STEP CLOCK 2 TICKS
*CLEAR
TSOM
SLOAD THE DATA WORD

MOV
STEP
READ
MOV
BIT
BNE
DEC
BNE
MOV
BIS
ERROR
JMP
DEC
BNE

;1S TBMT SET?
*B=YES TRY FOR 2ND BYTE
*WITHIN WATCH LOOP
*B=YES
*LOAD DATAA FOR ERROR

MOV
MOV
BITB
BNE
MOV
MOV
MOV
MSTCLR
1TE
WRITE
MOV
0

$TMP3, %8

99..9%
.2
PRI13
(SP)+,$TMP1
#20,$MP1
$
\
i“
TMP1,$TMP2
ogo.sMP2
13.
13
$TMP
18

*SHOW TBMT SHOULD BE SET

;=1 TO DATA SENT
*B=SEND NEXT DATA

lalinl

ZKMDAO DMS11-DA STAT‘C MACY1 SOA“OSZ)
21-0CT-81 09:21 PAGE 13
ZKMDA.P11
20-0CT-81 17:03
RANSMIT AND RECEIVE GO AMEAD TEST

6218
6219
6220
6221
6222
6223
6224
6225
6226
6227
6228
6229
6230
6231
6232
6233
6234
6235
6236
6237
6238
6239
6240
6241
6242
6243
6244

6245
6246
6247
6248
6249
6250
6251
6252
6253
6234
55
6256
6257
6258
6259

032006
032012
03201
032024
0320
032034
032036
032042
032046
032050
032054
0320
032056

NO
WO

\flarfl;: NNO

1044

000011

032056

A H

-WATCHDOG COMPLETION OF DATA BYTE

MoV

58:

STEP

READ

MOV

BNE
MOV

BIS
ERROR

JMP

READ

5
$TMP1,$TMP2

#1,8THP2
42.

JMP

78:

ASLB
BCS

.SBTTL

(SP)+,$TMPO
STMP3. STMP1
$TMP1 . $TMPO
73
23.

$TMP3
2%

;1S 2ATA AVAILABLE?
:B=Y

:UPDATE WATCHDOG
:B=KEEP TRYING

:LOAD ERROR DATA
sSHOW RDA SHOULD BE SET

sREAD DATA

;1S XFER CORRECT?

;UPDATE DATE DATA & TEST FOR DONE

JMP

8$:

sCHECK IF RDA IS SET

,SEC

BEQ
ERROR

PRI13

READ DATA CHR. AND VERIFY

MOV
MOV
CMP

9$:

,$TRP1

BNE
DEC

68:

”9..9%

(smo $TMP1

BIT

001204

(=]
W
NN

s
2 8R

032006

gt 032002
Bl

OO—==

6216
17

10
11
12

012737
04421

6213

031724
031724
031732
g317
174
0317
031754
31756
017
031764

SEQ 0131

sTEST NEXT CHR.

TST101

CRC-32 TESTS

AR RARAAAARAAAAAAAAAAAA
RN ARANAANNAACAAAARAAARCAAARAAAAACORRAY

sSCRCTER

sTHIS TEST WILL CHECK THAT THE TRANSMITTER

CHECK (CRC=32)ERROR FLAG (PR14[2]1:(1)) WILL SET BY TRANSMITTING
A DATA MESSAGE WITH _THE XMIT CHECK MODE ENABLED
AND AN ILLEGAL CRC 32 CODE APPENDED TO THE DATA
sWORD.

sTHE DATA WORD TRANSMITTED IS A EY{E OF ALL ZERO'S

:AND THE APPENDED 32 BIT CRC IS
;**B0P
- MODE ONLY

sTHIS TEST WILL PERFORM THE FOLLOWING SEQUENCE
1. ISSUE A MASTER CLEAR PULSE
2. SET PROT 0oCOL
= BOP
. SET CRCHK (TRANSMITTER cuscx MODE)

4 . TEST TCRCE,

AND RCRCE
ARE

NOT SET

SET ECRC, TENA, M8 (EXTERNAL LOOP)

6. SET TSOM’

. STEP CLOCK 2 TICK
8. TEST FOR TBT SET (RDY.FOR DATA)
LOOP TO TRANSMIT TH
S DATA BYTE (0) AND OUTPUT
:TH E 4-8 BYTES OF CRC-3
10. SET TE oM
s 9%, TICK CLOCK 15. MORE TIMES TO PRESENT TEOM TO THE TDB

:12. TEST THAT °'‘TCRCE'* IS SET (TRANSMIT CRC ERROR) (REPORT IF NOT)

20-0CT-81 17

CZKMDA.P11

CZKMDAO DMS11-DA STATIC MAC

30A(1052) 21-0CT-81 09:21 PAGE 135
CRC=32

TESTS

SEQ 0132

ggeo

;13. IF FIRST TIME TEST THAT "RCRCE'* CLEARS BY WRITTING TO A ONE

ezeg

:13. IF SECOND TIME A LINE RESET IS ISSUED AND ‘‘TCRCE'* IS TESTED

626

6264
6265
gsgg

6269 03

oszoes
03207

012737
o1§7 7

000101
000101

6273
6276
6275
6276
6277
6278

03210
032106
032110
032114
032122
032126

105737
100402
ooo1§7
012737
104414
104416

001256

oszorg 00 ogr 032604

6279 032132

6281
6282

6283
6285

6287
6289

6291
6292
6293
6295

6297

032140
032144

032150

032156
032160

032166

032174
032176
032202
032210
032216
032222
032230
032236
032244
032246

032246

104416

104420
012637

032737

001411
013737

042737

104046
000137
104416
104416
104421
104416
012737
012737
000427

FOR BEING CLEARED.

000014
001292

000006

001202

001204

000006
032114
000014
3

000131
000001

000003
032612
000005

000000
032606
032610

032114
000256

032342

032364

001334
104416

104421

000003

000042

18:

#101,$TSTNM
#101.TSTNUM

1SI8
8MI
JMP
MOV
MSTCLR
WRITE

CRC32F
1$
118
#18,SLPADR

WRITE

READ
MOV

128

*INIT.PASS FLAG

.PRI1S,CRCHK

-SET TRANSMIT CHECK MODE

PRIV
(SP)+,$TMPO

:GET CRC=-32 ERROR STATUS BITS

28
STMPO, STMP1

*B=YES
*SET UP ERROR STATUS

:CRC32 ENABLED?
:B=YES
*SKIP TEST EXT. LOOP NOT ENABLED
*SET RETURN ADDRESS (ERROR)
*ISSUE A MASTER CLEAR
,SECS,BOP'!DISCRC
;SET BOP MODE

BIT

”CRCE!RCRCE.STH’O

JARE STATUS BITS CLRAR?

BIC

#TCRCE 'RCRCE,$TMP1

*SHOW BITS SHOULD BE CLRAR

READ

,PRI13

BIC
BIT

#AC<TBMT>,$TMPO :CLEAR UNWANTED BITS
#TBMT, STHPO
:TEST TBMT

BEQ
MOV

28:

ERROR
38.
:PRI14 BITS 182 SHOULD NOT BE SET
JMP
1s
WRITE
,PRI14,ECRC'TENA'MB'RENA
:SET EN. CRC=-32,TENA,EXTERNAL S/S
WRITE
.SEC3,TSOM
STEP
2%2
JSTEP THE CLOCK 7 TICKS
WRITE
,SEC3.0
*CLR TSOM
MOV
#BADCRC,138
:POINT TO DATA & ILLEGAL CRC
MOV
45,148
*1 DATA 4 CRC
BR
358
:TEST THAT "‘TBMT'' IS SET (RDY. FOR DATA)
MOV

358:

BNE
MoV
MOV
BIS
ERROR
JMP
MOVB

DEC

000002

: LOAD THE NO. OF THIS TEST
‘4 FOR TYPE OUT

;TEST THAT BITS 182 OF PRIMARY 11 ARE CLEAR

3s:

001204
001206
001206

00120

MOV
MOV

CLR

001204

032350 oossgr 032610

032354
032356

TEST 101

T§T101: SCOPE

000040

001202
001204
000020

001014
013737
013737
052737
104015
000137
117737

6315

000007

000013

001202
001202

032272
032274
osgsos
032310
032316
032320
032324

6313
6314

000005

177757
000020

6301
6302
6303

6312

001106

042737
032737

012637

6307

032574
032114

000013

032252

032256
032264

00110
00126

1o44§o

6298

6305

;

-:t"ttt;t.tttt"tttttt"t""'.t"t...t.Qt't'tt..'t.t't..."".t

6270
6271

6280

(PREVIOUSLY READ REGISTER CONTENTS IS WRITTEN)

;

627,

;

BNE
WRITE

STEP

;READ REGISTER

(SP)+_,STMPO

2:POP STACK INTO STMPO

358
S$TMPO,STHP1
STMP1.STMP
ATBMT.STHP
13.
13
@13$.4$

*SET SKIP ERROR
;PREPARE TO REPORT ERROR
;LOAD EXPECTED ALSO
:LOAD EXPECTED
STBMT FAILED TO SET W/TSOM SET & CLK STEPPED.

:LOAD A DATA BYTE AND CRC 32

*DONE?

,17.%2

:TICKS SHOULD LOAD THE TEOM (176)+TEOM NOT SHIFT

3s
.s;cs TEOM

:B=NO
*SET TEOM

CZKHDAO DHSI1

A STATIC MACY11 30A(1052) -gCT-81 09:21 PAGE 132
.gO-OC ‘1 17:03
CRC-

b
h
b

6$:

000014
02

000006

SNN

8288 &R

78:
8s:

001204
001202
001204

032114
032604
032114

2
000014
001202
001202
000004
000004

032114

§8828 §§§

NON =

=28 P

purQurd

6
0
7

032617

—

[«

=]
W
N

O
W
N

OO ==

6
7
7
7

000001
001204
001202
001204

sACTUAL VALUE
:SET UP EXPECTED
+EXPECTED
,
;1S "TCRCE'* SET?

g!
1:.

;B=YES

12%

:1ST. TIME OR 2ND.

108

:TEST FOR CLEARING “‘TCRCE'* BY WRITTING THE BIT WITH A ONE

032460
000000
104420

PRI14
(SP)+,$TMPO
$TMPO,STHP1
#8171,$THPO
#8172,$THPO
$TMP1,$TMPO

resr FOR TYPE OF CLEAR TO BE TESTED

fst

BNE

—

SENNY

NOWNNN

3888

&5 FRSEN

W
"
SESS

(=1=1=]

BEQ
moa

440

032460

8888

b e

000

RVIS NN =

[

6328
29

SEQ 0133

TEST ""TCRCE'* IS SET AND ‘RCRCE'* IS NOT

READ
MOV
MOV
BIC
BIS
CMP

OO0 oOOrOOOOOM

CZKMDA.P

MOV

$TMPO, 78

;REWRITE ORIGINAL CONTENTS OF REG.

READ

PRI

;READ ERROR STATUS BIT FOR BEING CLEAR

gam
MOV
MOV

PRI

(SP)+,$TMPO
$STMPO. STMP1

*SET UP EXPECTED

BIC

#8IT2.$TMPO

BEQ
S'R'I;OR

9
;g

9- ES .
*“TCRCE'* FAIL TO CLEAR BY REWRITE OF A 1

}gs

:NOW RERUN AND DO 2ND CLEAR.

BIT

*CLR THE "‘TCRCE'* BIT

#TCRCE,STMP1

:1S BIT CLEAR?

9s:

con

108:

ISSUE A LINE RESET AND TEST THATL;TCRCE"
CLEARS
LPRIT2,LNRST
NE RESET

am
MOV
MOV
11$:

‘PRI
(SP)+,$TMPO
$TMPO. STMP1

BIC
BIT

#BIT2.STMPO
#TCRCE,STMP1

BEQ
Sggoa

TST102
38.

12%:

148:

BADCRC:

.BYTE
BYTE
BYTE
BYTE
BYTE
BYTE

*READ ERROR STATUS BIT FOR BEING CLEAR
;SET UP EXPECTED
:CLEAR THE "TCRCE'* BIT
:1S BIT CLEAR?

¥
:PASS FLAG FOR CLEARING ROUTINES

0
1
0
0
0
0

:DATA WORD
*LSB OF 32 BIT CRC
*CRC (ILLEGAL)
*CRC (ILLEGAL)
*CRC (ILLEGAL)
*CRC C(ILLEGAL)

CZKMDAO DMS11-DA STAT‘C MACY11 30A(1052) 21-2(7-81 09:21 PAGE 132

CZKMDA.P11
6

20-0CT-81 1 7:03

CRC-

TESTS

SEQ 0134

:;Qtt.tttttt""'.t"Q't't"'t"'.'ti"Q't".'...t'.........QQQ'.

2“

:SCRCRER

£
6369
6370

:THIS TEST WILL cusgx THAT THE RECEIVER CHECK (CRC=32)
:ERROR FLAG (PR14C1]:(1) WILL SET BY TRANSMITTING A DATA
*MESSAGE WITH THE CRC~32 ENABLED AND "'S GENERATE

6371

:MODE NOT ENABLED (=CHECK MODE) (PR13[5J(1), THE APPENDED

23;5

:CRC=32 IS 32 BITS =0000000001

6374

=1,

AND THE MESSAGE IS 8 BITS

g ;s

:THIS TEST WILL PERFORM THE FOLLOWING SEQUENCE

637
6378

;1. ISSUE A MASTER CLEAR PULSE
5 SET PROTOCOL=BOP

2"’33?

.-g. ggcrprgg"TRANSMIT THE DATA BYTE (0) AND OUTPUT THE 4-8 BIT CRC

6379
6380
6381
m;
638

:3. TEST TCRCE AND RCRCE ARE NOT SET
:4. SET ECRC, TENA, RENA, MB (EXTERNAL DATA LOOP)
5. SET TSOM
.-9. STEP CLOCK 2 TICKS
:7. TEST FOR '‘TBMT’* SET (RDY FOR DATA

6386
6387
6388
6389
6390

:10. TICK CLOCK 24. MORE TIMES TO PRESENT TEOM TO RDS
:11. TEST THAT RCRCETM IS SET (RECEIVE CRC ERROR) (REPORT IF NOT)
:12. IF FIRST TIME TEST THAT RCRFE CLEARS BY RITTING. TO A ONE
:12. IF SECOND TIME A "LINE RESET'’ IS ISSUED AND ‘'TCRCE'* IS TESTED
*FOR BEING CLEARED.

6391
ggg

6394
6395

032620

000004

032636
032642

005037
105737

032662

104414

6396 032622 012737 000102 001102
6397 032630 012737 000102 001262
6398

6403

6405

6406

032664

032672

104416

2 ; tttttt‘ttttt.ttt.tt.ttt't'tttttttltttttttt"tt.tttt'tttttt..'tt.
75T102: SCOPE

MOV
MOV

033366
001256

6400 032
1ool.o;
6401 032650 000137 033356
6402
032654 012737 032654 001106
000013

TEST 102

CLR
TSTB

18:

000007

000040

#102,STSTNM
#102. TSTNUM
128
CRC32F

BMI
JMP
MOV

1$
118
#18,SLPADR

WRITE

,SECS,BOP!'DISCRC

MSTCLR

WRITE

: LOAD THE NO. OF THIS TEST
*# FOR TYPE OUT

:CRC32 ENABLED?

.PRI1S,CRCHK

READ
MOV
BIT

,PRIT4
(SP)+,$TMPO
#TCRCE 'RCRCE,$TMPO

6411

032720 omgr 001202 001204

MOV

$TMPO, STMP1

6415

032742

104416

6417

032756

104421

032716

001411

818
035788 Veioes
et
6414 032736 000139 032654
6419 032750

104416

164

000131

3 000001

818 035758 1anse 0963 93298
6420 032776 012737 ooooog 033372

:B=YES
*EXT. LOOP NOT ENABLED
*SET RETURN ADDRESS (ERROR)

-SET THE BOP MODE

-SET XMIT MODE =NO GEN.

TEST THAT BITS 182 OF PRIMARY 14 ARE CLEAR.

6407 032700 104450 000014
6408 032704 0129 7 001202
6409 032710 032737 000006 001202
6410

:PASS FLAG

BEQ

28:

BICw
SERCEIRCRCE.STPO
JMP
1s

;ARE STATUS BITS CLEAR?

*B=YES

*SET UP ERROR STATUS

SBRI1BITS 163 SHOULD
NOT BE SET

WRITE

,PRI14,ECRC'TENA'RENA'MB

:EM.CRC,TENA,RENA'EXT.DATA LOOP

STEP

.o+

:STEP THE CLOCK

WRITE

.gess.fson

MOVT ASABTAC.138
MOV
#5,148

SSOINT TODATA & ILLEGAL CRC
*1 DATA 4CRC

EN2
FRRREPAIIIIIIINIINS
QA
S WWNN) —

P11

2o-ocr-‘1 17:03

000427
1044
8}. 9
7

% 032737
8
001914.
013737
0
3 013737
0 ggs 052737

1
1;2

177

117737 000

033102

000000

033110

104420

0 30”92 005237 033370
033073 104416 000002
033104 1044.55 000020

33EEREEER §22$2222$

258:

BR
3
-TEST TBMT IS SET
READ
PRI13
MOV
(SP)+,$TMPO

:READ REGISTER
::POP STACK INTO $TMPO

BIT
BNE
MOV
MOV
BIS

;TEST TBGMT
:SET SKIP ERROR
:PREPARE TO REPORT ERROR
:LOAD EXPECTED ALSO
:LOAD EXPECTED

JMP

#TBMT,STHPO
3s
$TMPO, S THPI
$TMP1,STHP
#TBMT . STHP
13.
13

3$:

MOVB

138,48

:LOAD DATA BYTE

48:

BIC

ERROR

000000

033114
033116

0057%9
005337

033126

104416

000003

033140
933144
033150
033152
033156

104421
104420
005726
005337
001370

000020
000000

033160

104420

033372
000002

033372

STEP

,8.%2

TST
DEC

(SP)+
14$

258

MOV

#6148

STEP
READ
ST
DEC
BNE

033176 052737 000002 001202
33206 023737 001202 001204

MOV
MOV
BIS
cMP

033216 000137 032654

JMP

033222

005737

BEQ
ERROR

58:

033366

°3§ % 104416 000014

:READ DATA TO PREVENT ROR
;BUMP STACK
*DONE?

,SEC3,TEOM

,B.#2
.SECO
(SP)+
148
458

"RCRCE'’
PRI

:B= NO

:READ DATA TO PREVENT ROR

IS SET

(SP)+,$TMPO
STMPO, STMP1

#3171.$THPO
STMPO . $TMP1
55
38.

:SET UP EXPECTED

:SET EXPECTED
:1S RECEIVED ERROR SET
*B=YES

:TEST FOR TYPE OF CLEAR TO BE TESTED

fst

BNE

033230 013737 001202 033242

2TBMT FAILED TO SET W/TSOM £ CLK STEPPED

-8 TICKS

,SECO

BNE

:TEST
READ

001403
104046

#C<TBMT>,$TMPO :CLEAR UNWANTED BITS

INC
1,SEC2
WRITE

WRITE

458:

SEQ 0135

:LOAD DATA CHR. AND STEP CLOCK

READ

033164
012637 001202
033170 013737 oo1zo§ 001204
033212
033214

FEN
PAGE 135

TESTS

001503

033102

09:21

CRC=32

000020 00120

033132 012737 000004 033372

'S
o
2ESEIFRRUR

21-0CT-81

001202 001204
001204 001206
000020 001206
0
56 104015
033060 000137 0326564

033122 001331

RREXRPR
~N
o NN

alal

DMS11=DA STATIC MACY1 1 30A(1052)

128

108

:1ST. OR 2ND. TIME
:8=2ND.

;TEST FOR_CLEARING "'TCRCE'* BY WRITTING THE BIT WITH A ONE
MoV
;REWRITE THE ORIGI
ONTENTS
$TMP0, 78

3am

PRI

- &

§§§§so
5?‘39 66”?03‘
Bs:
0332 015737 00150 001204

MOV
BIC

350’ $TMPO
i's’ggl‘stm
. STHP1

*SET
UP EXPECTED
*CLR THE ‘RCRCE'* BIT

3% 4 ?31’623

gsgoa §§

"35535" FAILED TO CLEAR BY REWRITE OF A

33262

oazrgr

33270 032737

%88

oiee
000 omes
ossi?g 000137 032654

001202

)

#81T1.$THPO

BIT

#RCRCE, STMPO

e
JMP

READ ERROR STATUS BIT FOR BEING CLEAR

*IS BIT CLEAR?

e
’

)

DHSH-SA ST?I‘% ”Cs;l 30A(1052)mc_;gfl-81 09:21 PAGE 132
1

TESTS

12 10“1

f 000001

3 g‘r’ 7

o 001204

1044

108:

;ISSUE A "LINE

WRITE
READ

:33
BIC

ss ogr 4 omgos
33330 032737
00120
R
3§
56 001406
"
g
104.049

BEQ
ERROR

033370 000000

3%366 83&1)30 o—

128

033372

%8:

000000

138:

BIT

3"
0

SEQ 0136

RESET'* AND TEST THAT 'RCRCE'*

,PRI12,LNRST

CLEAR

Emguesf

.PRING’

#81T1.$THPO
#RCRCE, STMPO
TST103
38.

:CLEAR
THG’F'RCRCE" BIT
:IS BIT CLEAR?

3&5}}."F?

:SET UP EXPECTE

’

PASS FLAG

CZWAODHS‘H-SA STAT&
$ C
M 1 30“1052’(“
CZKMDA.P

g
&
6498

-gCT°01 09:21 PAGE 139

SEQ 0137

SRARRAARANAAAAAAARAAAACIANAARAANNAAAAAANAAARAAAAANAACEAAAAAAANAD

s SCRCNER

:THIS TEST WILL CHECK A NON-ERROR CRC IECEIVE CHECK AND NON-ERROR TRANSMIT CHECK

6495

:BY TRANSMITTING A DATA STREAM (NON-GENERATE) UITH A PREsCALCULATED CRC APPENDED (3 WORDS (1 DATA £2¢C

6499
6500

: THE DATA PATTERN CONSISTS OF WALKINGA ONE ACCROSS 16 BITS
;(1.E. 170 1
), AND THE 32 BIT CRC IS CALCULATED FROM
:ROUT INE CALLED BY "JSR
PC,CRCCAL".

650§

sTHIS TEST WILL PERFORM THE FOLLOWING SEQUENCE

6504
ggOS

.i- ISSUE A HASTER CLEAR PULSE

SET PROTO =BO:RC

SET TENA, a;

*%. SET_"‘CRCHK "(fnmsnmsp. CHECK MODE)

6508
6509
6510
6511
631
631
6514
6515
631
651
6518
6519
6520
6521
652
6523
6526
6525
6529
6527
6528
6529
6530
6531
653;
6533
6536
2?;2

033374
033376
033406
033412
033416
033420
033426
033432
033440
033446
033450
033456
033464

000004
012737
012737
105737
10040;
000137
012737
012737
012737
104414
104416
104416
104416

6537
6538
6539
6540

033472
033476
033502

1046;0
015 7
032737

654

6544
6545
6549
6547
6548

.;. TEST, “TCRCE'*

AND ‘RCRCE'*

SET_"“TSOM"
STEP CLOCK 2 TICKS
TEST FOR ““TBAT"' SET
CALCULATE CRC

:8.

ARE NOT SET

% LOOP TO TRANSMIT THE DATA AND CRC

}% . TICK CLOCK TO COMPLETE DATA STREAM

TEST THAT '‘TCRCE'' AND "RCRCE'* BITS ARE NOT SET (REPORT IF EITHER SET)
UNTIL DONE

213, UPDATE DATA BIT AND LOOP
:

TEST 103

tttttttt....ttttt..""t't.t...tttt.Qtt.t't..t...'.'t..t.t"..t

gSS

0335
033530
033534
033542
033546

t47103: SCOPE

MOV
MOV
ISTB
BM]
JMP
MOV
MOV

#103, srsmn
OAD THE NO. OF THIS TEST
#103. TSTNUM
.c FOR TYPE OUT
CRC ér :CRC32 ENABLED?
1018
148
.
#18, SLPADR
:SET RETURN ADDRESS (ERROR)
” 8s
sINITIALIZE DATA LOW WORD

000005
000013
000014

WRITE

.sscsaowoxscnc

WRITE

.PRIN% nswscac'rm'm

000014
001202
000006

READ

000103
000103
001256

034110
033446
000001
100000

1018:

WRITE

03346?
00000
000004
000003

}

:BIT 15 OF 2ND. WORD IS LAST OUT

:BOP MODE AND DISABLE CRC-16

:SET XMIT MODE-NON GENERATE

TEST THAT ‘‘TCRCE'*
AND 'RCRCE'* ARE NOT SET.

MOV

(SP)+,$TMPO

mnct'acncz.swo

;ARE CRC STATUS BITS CLEAR?

BIC

ncacé!ncncs.smo

:SHOW EXPECYED

WRITE

gess,TSOM

:SET TSOM

WRITE

.SEC3.0

SCLR TSOM

MOV
523“

28:

PRI

BIT

BEQ

8427%7 000006
104049
00013
104416
104421
104416

:‘s’\r'cm #100000,13s

STEP

$TMPO,

$TMP1

:B=Y

:PRIT4 182 SHOULD NOT BE SET
:2 TICKS

CZKMDAO DMS11 -gA SYAI‘C ?;S;}l

CZKMDA.P11

MOV
CLR
JSR

= S 2
=e
2 2

034074

CLR

MOV
MOV
MOV
MOV
MOV
MOV

RoooOo

SEQ 0138

agR2
CCAL

CALCULATEHE 32-BIT CRC

“gxcu
oao fi
ggc IS IN STMP4 AND LOW ORDER IN S$TMP

[=]

oNNNN

—SANNO

SNNNNNNNNNON

28:.‘32332‘38"

g32830

& 0O
vVOO0 O0O00O
&
3
g

# fise §9§’°§

30A(1052) 21-?(7-81 09:21 PAGE 13‘

35%:

MOVB
INC
gam

:1ST. 2 BYTES ARE 0

138, (R2)+
STMPS,tns)o
mw. (R2)
n..ws
#8..118

*STORE DATA
:CRC
:REPOINT TO DATA
*COUNT 8 BYTES OF DATA OUT
:COUNT 8 CHARACTERS IN

@9%.35$
98
LSEC2

;ADDITIONAL CLOCK TICKS MAY BE REQUIRED BECAUSE OF

.usm LOGIC INSERTING OF Z2EROS IN DATA STREAM.

034104

348:
36%:

:THE FOLLOWING SEQUENCE WILL MONITOR BOTH XMIT AND REC
:SIGNALS TO COMPLETE DATA AND CRC MESSAGES.
g?”
#11.,128
:WATCH DOG XFER (CAN INSERT UP TTO 2 0°'S/BYTE)

DEC

BEQ

READ
BIT
BEQ
READ

,PRI13
#RDA, (5P)+
378
,SECO

BEQ

ST
DEC

37%:

READ

5$:
001%0%

1202
1204

000006
33446
34074

034106
033446

001 04

6$:

:1S RDA SET?
:B = NO
*YES READ DATA

(SP)+
118

:DROP DATA ON FLOOR
SARE ALL DATA CHRS. IN?

PRI13

;1S TBMT SET?

*B=YES-GO

DEC
BGT

108
7%

ARE ALL CHRS. SENT?
iNO LOAD NEXT

gff"'o

:CLR END OF MESSAGE

36$

38s
figcs.rem

aano KEEP STEPPING

*B=FLAG SENT
*SET END OF MESSAGE

;NOW TEST THAT "“TCRCE'* AND 'RCRCE'* ARE NOT SET

READ
MOV
BIC
8IT
BEQ
MOV
MOV

mu
:READ REGISTER
(SP)+,$TMPO
-POP STACK INTO S$TMPO
maf.ace'ncncb $TMPO ;CLEAR UNWANTEDBITS
#TCRCE 'RCRCE, $TMP0
sTEST tcace'ncacs
6$
:RESET SKIP ERR
$Tmo srm
*PREPARE TO moar ERROR
STMP1 . $THP?2
50» EXPECTED
ALSO

ERROR

39.

BIC

001206

*B= YES

#TBMT, (SP)+

BLT
au:m

388:

:T00 MANY TICKS AND NO RESPONSE?

BIT

BEQ
000002

i2s

663

JMP

ASL
BCS

ROR
JMP

ncncé'acnce STMP

.Lw EXPECTED

8%
148

:UPDATE THE DATA

138
13

;ALLIGN BIT XFERED

CERmOA P 00-SLas Tacad! S0a1052) RO Tesys 021 PAce 138
§606 030060 000137 033446

ses:

6610

661;

661

sroae DATA AND CRC

074

08:

1;::
13%:
148:

:WATCH DOG COUNTER FOR DATA anes mwsrcneo
*ACTUAL DATA XMITTED (MIRRORED)

B8R

TST104

03410

118:

6619
6617
6618

0341
0341
03411

6619 03411
6620

98:

0341

%
gmc'ncs
:2ND. 2 CRCS

8s:

6614

6615

SEQ 0139

B W

gggs

6611

*CURRENT DATA PATTERN

:POINTER TO DATA FOR XMIT

*BYTES OF DATA SENT(STARTS @ 10 ocn

*BYTES OF DATA REC. (STARTS @ 10
O

CZKMDAO DMS
11-gA STA.‘C MCV}! SOA(‘IOSZ)CRC-;gCY-fl 09:21 PAGE 163

m.r 1
1

SEQ 0140

;:.t.'Qt.0....'.'..'.."""..'....Q."..t....""."'......."..

:SCRCTGN

nus
TEST WILL cuecx cnc-sz
tmsm nm Y ) TRANSMITTING
: A ONE WORD BUFFER OF
A WALKI
DATA PATTERN

*AND CHECKING THE RECEIVED CRC
om. rue EXPECTED CRC FOR THE DATA
:MESSAGE (WORD) IS CALCULATED IN THE ROUTINE CALLED BY ‘SR PCCRCCAL

;THIS TEST WILL PERFORM THE FOLLOWING SEQUENCE

6631

;1. ISSUE A MASTER CLEAR PULSE

66
663
6634
6635
66;9
66
6638
6639
6640
6641

§ SET_PROTOCOL=80P
:3. TEST "‘TCRCETM AND "RCRCE'* ARE NOT SET
4. SET ecnc RENA, TENA, M8
:5. SET TSOM
;9. STEP CLOCK
2 TICKS
:7. TEST “TBMT'* FOR SET (RDY. FOR DATA)
:8. LOOP TO TRANSMIT AND RECEIVE THE DATA WORD
:9. SET TEOM
:10. LOOP TO STEP CLOCK AND RECEIVEWE CRC=32
:11. TEST RECEIVED CRC=32

m’;

ggz

“46

:12. UPDATE DATA PATTERN AND REPEAT UNTIL DONE

6647

034112

000004

6650

034130

105737

tttttttttttttt'tttttttt'ttt.t.tttttttlt..ttti..ttttt.tt'.lt'ttt

6648 034114 012737 000104 001102
6649 034122 012737 000104 001262
6651

034134

665 0321
6653
034142
6656 034150

10040

034166

1018:

104414

18:

034166
ogl‘.m
0
834

012737 834752 034750
005037 034756
104416 3%3” 000007
104416
1% 000131
104416

000013

6663

034

1202

034216

aseg 034222 1044

000000

6664
6665
6669
6667
6668
6699
6670
6671
6672

7;7 1727771 881 0
%
7 000006
00120
0
‘3
14 ;
03425
1§7
1502 001204
834 56 013737
001204 001206
34 94
;7 7
1206
834.
1 7;7
120
1204
2737
1204
0 308 104047

6676

034326

6‘2;4. 8 3}‘ 1 RZ 3"63 000001 2%
6675 034%2 104421
104416

000000

MOV
MOV

#104,$TSTNM
#104 . TSTNUM

BM]

1018

TSTB

000137 034762
012737 034164 oonog
012737 000001 03474

6657
6658
6659
6660
6661

87104: SCOPE

001256

6655 034156 012737 100000 034754
6656

TEST 104

JMP
MOV
MOV

MOV

MSTCLR

MOV
CLR
WRITE
WRITE
WRITE

READ

MOV

CRC3oF

168
” 8%

#1$,SLPADR

#100000,13s

: LOAD THE NO. OF THIS TEST
OR TYPE OUT

cncsz emso’

ser RETURN ADDRESS (ERROR)

TIALIZE DATA (LOW WORD)

mnm.ize DATA XMITTED (15=LAST BIT OUT)

nzs 18
:POINT TO DATA XMITTED
*KEEP A RECORD OF TIMESDATA READ
secs BOP!DISCRC
:SET BOP MODE & DISABLE CRC-16
Pnnl RENA ! TENA'ECRC'M8
.PRI13.0

.PRI

(SP)+,$TMPO

N.MODE (CRC-32)

sREAD nséxsrsn

::POP STACK INTO STMPO

BIC
BIT
BEQ
MOV
MOV
BIC
MOV
BIC
ERROR

#*C<TCRCE'RCRCE>.$TMPC ;CLEAR UNWANTED BITS
#TCRCE 'RCRCE, ST
TEST TCRCE'RCRCE
s
:RESET SKIP ERROR
TTMPO, srm
*PREPARE TO REPORT ERROR
STMP1
. STHP2
50» EXPECTED ALSO
n'cgsémcncs STMP
.LOAD EXPECTED
$TMPO,
$THP1
#RCRCE ' TCRCE,$TMPI
;SHOW BITS SHOULD BE CLEAR
39

WRITE

.SEC3.0

Jm’re
2‘:‘!.-

%EC3,TSOM
35

:SET THET
:STEP CLOCK 2 TICKS
:CLR TSOM

CZKMDAO ons11-gA SYAI‘% ?9?5;1 SOA(IOSZ)C c-;gCT°ll 09:21 PAGE 16* >

CZKMDA.P11

NN&SOOWBN

834360 358:

ggggig
1

a§§§%§8a2§§§~wawnuuu~whc~
TP ey
[- -

°°°§°°
SELEES
R
rgg

j=l=1=]

03655

FE4KRS

SO0

PRgEEEeE

)

034550

gRee K
2SN ~NO,

6716

322
g8
8\“§88§333 23333
Vi
=¥
SRR 88 2N~
NN
P
oy S Sty
A
v
NN SN
WWAND
BN
U
WRO W
SN0 > W= SN WAN 38 N=N~N

6707 03431

6708

® =888

& &H

e
lolelelelel=]

S
w

—

SEETREREEEEY

o mo

w2888828%
28gd

TESTS

034760

4$:
438:
448:

468:

13
20

000003

000000

034744

034760

000013
000001

BGT
BLT
WRITE
47%:

WRITE

42%:
45%:

#11.,158

.PRI13
iaoA (SP)+

YTE OUT COUNTER FOR DATA

;LOAD av?t TO BE XMITTED

sWATCH DOG THE TICKS
sMONITOR TBMT FOR SETTING

seco

(sP)+

14$
15%

443
4$
9
358
478
gecs.tson

:8=N0 STEP AGAIN

i3s

,SEC3.0

iss

BEQ
READ

618
PRI13

BEQ
READ

45$
,SECO

#RDA, (SP)+
(SP)+

148

DEC
9s
BNE
428
- STORE NEXT 4 (8-BIT)BYTES

MOV
MOV

STEP

DEC

BEQ
READ

BIT

BEQ
READ

MOVB

osfnpe 108
#10.,15s
g

iss

618
PRI13

#RDA, (SP)+
5%
SECO

sEXCHANGE DATA BYTES

sARE WE XMITTING DATA OR FLAG?
:B=DATA

:B=FLAG SENT
sSET TEOM
GO CLOCK TEOM OuT
;CLR TEOM

;BYTE COUNTER

sWATCH DOG DATA XFER

ZEROS MAY BE INSERTED AND STRPPED BY
: 700 MANY TICKS?
:B=YES
sUSYRT SO ADDITIONAL CLOCK TICKS HUS!
:BE COMPENSATED FOR = IS RDA SET?
:B=NO STEP AGAIN

sREAD DATA REGISTER

STACK

;STEP FOR NEXT CHR.

;BYTE COUNTER
:DATA STOREAGE = STMP6 AND STMP7
sMONITOR RDA FM DATA BYTE COMPLETION

s 700 MANY TICKS

:B=YES
:1S RDA SET?

(SP).a10s

:B=RDA IS NOT SET
sREAD CRC CHARACTER
:STORE CRC BYTE

(SP)+

:POP STACK

INC

108

INC
DEC

148
98

sREAD D.R.

sPOP STACK

:1S TBMT SET?

DEC

MOV

:B=NO

PRI13

#TBMT, (SP)+

oli..

STEP

RDA SET?

ggREsTHAN 11. CLOCKS SINCE A TBMT

61%

MOV

INC

834764
3474
03476

@11s.48

:CLOCK FLAG AND DATA UP TO CRC CHRS.

MOV

034756
034744

034728

INC
DEC

BIT

000000

116
746

READ
BIT

BEQ
3
DEC

000002

8t1

STEP

READ

000003

118
LSEC2

BIT

830748

000004
00121
§§§8&

INC
gaxrs

8;2756
760

034765

0,98

move

BEQ
READ

000000

MOV

SEQ 0141

sDONE?

CZKMDAD DMS11-DA STARC MACY11 30A(1052) 21-0CT-81 09:21
C ZKMDA.P11
20-0CT 1 17:03
" CRC-32 TESTS

6733 034646 001347

BNE

6735

&).

6739

56 oo:.gg 047462

103425

6749

8;2720

104051

67
og:no 0060
2;2. 034714 000137

rgm
WITH CRC IN STMPG § STMP

BNE
gz

6%
STMPG , STHP7

azno
: I1’:sm|‘.,¢m ORDER WORD CORRECT?

*B=YES

ROR
JMP

138
13

ERROR

41.

6752 034726 013737 034754 001222 68:
6753
034734
10405
6756 034736
000137 034164

MOV
ERROR
JMP

40.

8735 03¢7¢e 990909

6755

000000

8s:

8730
034732 090009
6760 034756 000000

}g;
138:

6761

034742

034756

§765 03reg
g;gg 034762

1%8:

000000

JMP

000000

HIGH ORDER WORD CORRECT?

*DONE?

168

SALLIGN DATA XMITTED
:DO NEXT DATA VALUE

138,$TMP10
1$

;CRC GENERATED IS NOT CORRECT

:#Img"of\?:
ChRS. T TTED
. 2 DATA cms.

:# TIMES D.R. READ

000400

CALCULATE THE CRC

$TMPS, STHP6

ASL

347564
034164

722 000137 034164

TST105

g;6

;ENTER ROUTINE TO LOOP FOR NEXT LINE

g;gg

6770

6771 034764

6772 0347

:LOAD DATA FOR CRC CALU.

pc CRCCAL

61%:

2;;9

:B=NO

ATA’ MESSAGE

JSR

tmP

6744 03470 oggg ; 034742
034706

518

:TEST THAT THE GENERATED CRC IS SAME AS tuc TED

3737 001214 001216
191
85? ; 001212 001220

6745

SEQ 0142 |

cu.cuwe THE CRC=32 FORME cuaneur

§¥§§2 83?705 034742

6740 8
6741
2;2 8

an
PAGE 142

TEST 105

ttt.tit.t'tt.tt.ltttt""t'.tt't.ttt.'t.t.ttt.t.'..t..t'tt".tt

31”3%7i 000105 oonog

t§7105: SCOPE

MOV

6773 034776 012737 000105 00126
2;;;. 035002
137
002576
g;;

MOV
JMP
.SBTTL

677‘

#105.$TSTNM
#105. TSTNUM
CYCLE

: LOAD THE NO. OF THIS TEST
‘# FOR TYPE OUT

END OF PASS ROUTINE

tttl.ttttt..tttt.ttittt't"ttttttt.l.lttttit"ttltll.lt't'..tl'

6779
6780

S INCREMENT THE PASS NUMBER (SPASS)
S«TYPE "END PASS #XXXXX'' (wens XXXXX 1S A DECIMAL NUMBER)

2;8

'IF THERE ISN'T JUMP TO NXTUN

6781

2«]F THERES A MONITOR GO TO IT

§78¢
739 032000
03501 oo”snongri oon%
6787

6788

035014 oos; 7 0011
035020

042737

7100000

SE0P:
001100

come
CLR
STSTNM

:;7ERO_THE TEST NUMBER

BIC

::DON'T ALLOW A NEG. NUMBER

INC

$PASS

#100000,8PASS

: INCREMENT THE PASS NUMBER

CZKMDAO DMS11-DA

CZKMDA.P11

6789
6790

MACY1! SOAC1052) 21-0CT-81 09:21 PAGE 143

5327

DEC
SEOPCT: .WORD

Do-oc s 7ol

035
0350

6791
gg
679
679
50
679%
582
6795
035
6799
5
679
5052
6798 035056

035060 0137

6801

035

eaog

END OF PASS ROUTINE

035064

00140

883710

$GET42: MOV
BEQ

RESET

SENDAD: JSR

6803
03507,
40
6804 ogson 000240
6805 035076 000240

uo; 035100

6807

6808
6809

035100 000137
035102
035104

00251
37

035114
035122

050040
000043

6810 035107

6811
6812

(PC)+
1

$DOAGN:

,
377

000

051501

02012

NOP
NOP
NOP
JMP

SRTNAD: .WORD
S$ENULL: .BYTE

iu.z n

aPC)+
nxruu
=1,

SEQ 0143

::YES
;;RESTORE COUNTER
::TYPE "END PASS #"
*SAVE SPASS FOR TYPEOUT
..eo TYPE--DECIMAL ASCII WITH SIGN
TYPE A NULL CHARACTER
..esr MONITOR ADDRESS

*BRANCH IF NO MONITOR

iCLEAR THE WORLD

rc.mo)

1
: :LOOP?

86T
$DOAGN
MOV
(PC)+,3(PC)+
SENDCT: .WORD 1
$EOPCT
TYPE
SENDMG
MOV
$PASS, = (SP)
TYPDS
TYPE
SENUL

1
0
104401 835107
oung
1100
10440
104401
035104

6799
6800

’

STATIC

::G0 TO MONITOR

+:SAVE ROOM
*:FOR
SIACT1
: :RETURN

Nuu CHARACTER STRING

015 042412 oazng SENDMG: .ASCIZ <15><12>/£uo PASE”¥

MmN=ONN—OV—N10‘1w‘N—MOWO0—3170&-7020a7c032m602
32[8¥=]383838383833833-= 83383£¥S 8S3S83I8E—AyE33I58I3E3I—S8E3I3Z8S3E¥53=83838oa a3x
1=)agV (—“-TMw) ~o oX —-a —== —bw_~ S- @— w a

o=v[AO=l"e4oowwP©[aalw<—]=~eY[leblV—NWetNAlOIkNeNMlaFI=MlbEeNeROlOTatO=IlMeTN3lrOba~O~l-eNO~l=TaRGOilM—>@wV~—vwL.<oNaNY\=l]RelbaO—WNllal=eOblWeINlOarlT-e~O—w(w3a--<—PMl~NselaOJOlaTbl—3aNIleyl0Nbe[4@woea.w<|l—=[eY-lbal=NeOO=cNTlOIabMeWTl—aNNlIre(INl—NIPeo([—(1><—~w.<]7&lN[%a)+)eRle—N1SaTlO5bOalMI1eNkOl1OaIl1aTMl5ReONle[~(o-w©4>’e[<=y()N¥lV-]e1la1N=la51RMlEe‘2l-aw~01”o“)eva(£b<>OMliNw)[elMa-NOla0RAla~wow~<-<—tNv~la=lgOOalW=NTOo(Md~a4sB—N9N]]L[)%4ow(W-C

uNFO=xTTMMo[=4)T(w—~[eN%u=%M-Pv])iv\OI0uNvT‘Omr—Nor2~O1NNz1OWsNo=aW.“fNslMw=o.—2(-Lwa—w<~—a%_lrl]=zsoTNMqN5OmNNnI7NONnA0N4a(Sw(-ww—v‘~=c[GO)nO-¥4=NNs5—n3WO\yT‘nO61»(m)~—vw4-~50=][m21aT5NM%zO1Ns5Im1-Ns5Em&U1mw—<—~O_vrOmO1uNN—O1uONmMI‘TTnN5O[“2@”mm1o—X~—LON~%)]nW5ONNmTM”A=eNz3t——wwa2~sNoMvA‘LaA“LOs1N-ea(o]m4—0~=“%-r]2ba=wOo0-lNmw=mRmnm“TOL)yln“/mwl|
(
—
@
a
w
3
mmmmunxxsxsms”smusxsmnsmmxmANRIemswsynxxxxss SFN8IIIOC3NCMIINI8NSTOSIOTILEMNSILNE
-w wa
~ w

ZO-OCT-‘

PAGE 14

CZKMDAO DMS11-DA STAT g MACY11 30A(1052) 21-0CT-81 09:21
17:03
CZKMDA.P11
ERROR MESSAGES
2 12
SEQ 0144

—-

—_

m—<w o—¥L *w)

(TMTM

a (7]

w—~

MACY11 30A(1052) 21-0CT-81 09:21 PAGE 162

1 1 7:03

=DA w TA

ERROR MESSAGES

SEQ 0145

/SECONDARY INCREMENT ONE'S TEST FAILURE/

.ASCIZ

/SECONDARY REGISTER DID NOT CLEAR AFTER LINE RESET/

w x g— &

.ASCIZ

/TBMT NOT RESET AFTER TSOM SET WITH TENA SET/

EMI13:

LASCIZ

/TBMT FAILED TO SET/

.ASCIZ

/S/<"/>/F DID NOT SET AFTER FLAG SENT/

LASCIZ

/8/<"/>/F DID NOT SET AFTER SYNC SENT/

LASCIZ

/S/<'/>/F DID NOT RESET/

«ASCIZ

/RAC FAILED TO SET AFTER 3 DATA BYTES TRANSMITTED/

33833333
338333833

.ASCIZ

o M [Ta) ~

"21"a)

338535

g
e ALl

Vso—O0oOnN~—OBR2T0N8e“o—1wFn0TrOo2nrYN“e—R—1OOI‘OAV2NOB0INIO2NN0BNO

ALALAL ALl
LA

3
5
5
5
5
5
5
0
9
4
8
O
C
O
0
O
0
O
0
O
0
O
0
0
O
0
O
0
O
0
O
0
O
0
0
O
a
l
a
l
a
l
a
l
a
l
a
l
a
l
a
l
a
l
a
l
a
l
a
l
a
l
a
l
a
l
a
l
a
VRrde
ianR Tn n n nTRn mSnRYIZIlaE]
=&3\3 8P8O3 838 —oISA —IMN\e—OOoMONNTWMM-3~F8U3NNA3=838V3=8=3

NN T—ININOeN=N=ONWNT=WNN=F—3OI=NNNNINVNTNO~WNO=—=INvrW—o=v~

20-0CT

o0 0MMmnm
o

TR, 3 8383 S SRI N

oONON
OM—O
T
O
V
—3F
OmM
3338 883

~
~

oco
0 0300 <O cBR2R

ALAL
e

O0VN“‘7N

—

040

16310“ SSR

/RDA FAILED TO SET AFTER 3 DATA BYTES TRANSFERED/

EM19:

.ASCIZ

/RSOM FAILED TO SET/

EM20:

.ASCIZ

/FIRST DATA BYTE TRANSMITTED IN ERROR/

EM21:

.ASCIZ

/REOM FAILED TO SET AFTER TEOM SET/

EM22:

.ASCIZ

/LINE FAILED TO RESYNC AFTER TEOM SET WITH IDLE RESET/

EM23:

.ASCIZ

/DATA TRANSMITTED INCORRECTLY/

EM24:

.ASCIZ

/ERROR CHECK BIT FAILED TO SET/

EM25:

.ASCIZ

/ERROR CHECK BIT SET AND SHOULD NOT HAVE/

EM26:

.ASCIZ

/NO TRANSMIT ERROR ON A FORCE UNDERRUN/

b ek © =
OO
wVsHo

—ed
2 wvisswn
NI
&S = b onN

—
b

=l{=l=]=]

g gwu-w
=2 NN
-2 NN
WSO

VESSNOND
NOOO

N
N

b e \ ) b

HENVONOO

w RRTIID

ONONINNONONINO
OWVINN= SNV
NIN SN

NO = NNINO
=2 O

R RIR
IR IS v

OO0

NN=NON

= )=

228 RISRR 2RARAR ARERR

=D b

REANNR

.ASCIZ

NOWVO =W

D12
PAGE 146

EM18:

R RRREVE &2
AARRRAR
RS NE&HESNNON NO s = —=O0O0NO

508

21-0CT-81 09:21
ERROR MESSAGES

—-=O000
ViSO

N
= =2
)

ONN=NNO
=N
SNNO

RAR

WO O~

RRERERERERX823
eSSRS2
SR
&

30A€1052)_

SEQ 0146

20-0CT-81 17 :03

1 30A(1052) _ 21-0CT-81 09:21 PAGE 145

ERROR MESSAGES

SEQ 0147

+ASCIZ

/NO ABORT INDICATIONS RECEIVED ON A FORCE UNDERRUN/

EM28:

+ASCIZ

/LINE DID NOT RESYNCE ON A FORCE UNDERRUN/

EM29

.ASCIZ

/RECEIVER OVERRUN DID NOT SET ON A FORCE OVERRUN/

.ASCIZ

/RECEIVER OVERRUN DID NOT RESET AFTER STAUS READ/

3NO=—O382“"2O——ONNO

EILN45&7m1zAusO4sxRIurNmS1zmumnmr Ao=a5cl1'Lg"1S5q15S1\=)ac5l‘5c15l1dl5q1l TFO2—NMON=AO=—NAMNOL4—-AIOT—NMO.NoWaeMOWNIlTWVNr~arl—=nyrd—in=nNOVAWMN=VANNVIMNIrNOIMNV—TMNOM

S3383838

071FNOWT6=OTNOnTNO2W

EM27

OTONr—r—r—NIT 312 N1 O IN

AaoNoaoEoRSoeoRosOosoaoeonoMotoaoosoosooonooooRoo[~l-TletlelatlatlelEeYlpastelEatRlataR]

11-DA STAI‘C MA Y

ASCIZ

/NO RECEIVE ABORT ON A TRANSMIT OF A ABCRT/

+ASCIZ

/NO RECEIVE GO AHEAD ON A TRANSMIT OF GO AHEAD/

CZKMDAO DMS11-DA STATIC MACY11 30A(1052)
21-0CT-81 09:21
CZKMDA.P11
20-0CT-81 17:03
ERROR MESSAGES

7037

03744

106

053105

041511

7039
7040

7
8 7696

4524
054522

69116
047111

5204
83 12

70;8 8 722§ 820195 §51511 85166

EM33:

704 §§7SO‘ 0126
105 046513 EM34:
7044 751 8§BS 3 858 1 05151
7045
7069
7047
7048

0375
037526
037534
037542

824040
7518
046044
052040

047125
0514640
05;102
047505

00g107
043057
051105
020115

.ASCIZ

F 12

PAGE 148

SEQ 0148

/DEVICE IS STILL TRYING TO SYNC/

.ASCIZ /THE KMC11 IS HUNG/

EM35:

.ASCIZ

/NO S/<'/>/F AFTER TEOM WAS SET/

Bl
g
s s
0375
027523 020106 042523 EM36:
705; 037
020126 042505 065506

.ASCIZ

/S/<"'/>/F SET BEFORE LAST DATA

.ASCIZ

/RSA DID NOT SET ON A TRANSMIT UNDERRUN/

7051

7053
7056
7055

0375764
037602
037610

042522
020126
041040

046040
040504
055131

051501
040524
0%0105

7058
9

037627
037636

122
062111

0640523
047040

042040
05;117

037642
037650
037656
037666

051440
020116
047101
052440

7067

037712

037726

051440
020123

7061
7062

052105
020101
046523
042116

EM37:

047440
051124
052111
051105

7065 83;2;5
82??%% 832;53 031063 EM38
37706 0462440 051122 051117
040526

052524

051120

032061

7072 037750 052040 04055

051516

37720

0264

044502

7073
7076
7075

037756
037764
037772

042502
051525
040524

0201
042105
05;55‘

0460503
051440
020123

7079

0460022

052101

04;105

044440

;081

0400
820036

7083

040046

051042

040504

020042

52040
8;0154
;1 1
04 685

020117
7117
29101
123

042523
042040
051124
051105

126

0405

051516

047503

050115

042514

;8;9 82
821}82 83 gOi 8%?6%% EM4O
7078 040014 043440 049105 051105
04 513
051122

ASCIZ /CRC-32 ERROR STATUS BITS (PR14-182)/

051524

;8;? 03;;42 8%??33 831233 8g?82; EM39

02015§
835?2‘

BYTE

ASCIZ /CRC=32 TRANSFER CAUSED STATUS ERROR/
v

ASCIZ /CRC=32 GENERATED IS NOT CORRECT/

020184
041505

7084 040054 8‘0508 848111 062105

EM42:

.ASCIZ

/'RDA' FAILED TO SET

7085
7086
7087
;ggg

04
0400
040076
828}?;

7090

04011

EM41:

_ASCIZ

/TRANSFER

7092

040126

7091 040120 04;552 OgOlS? 04711

~Agrhr

oY PRS-

TAT

VED/

s Bt

FER/

Lot

CZKMDAO DMS11-DA STAI‘% MACY11 30A(1052) 21-0CT-81 09:21 PAGE 148

CZKMDA.P11

7093

709?

709
7098
7099
7100
7101
7102
7103
7106
7105
7106
7107

20-0CT

17:03

040134
82 }zg

524

0198
0401
040176
040204
040212
040216
040224
040
04024
040246
040256

1
11
0425 g
8241
522
0
8
02004
8
11
61
047111
054105

0154

0
24

5548

052211
;
8825
b
0001
8425 4
20040
0465440
020011
004505
00652g

7108
7109
7110
711

040262
0402
040276
0305

042525
020040
020040
020011

00010
0425246
020040
045440

14}

040313

047111

105

711§

7114
7115
7116

7117
7118
7119
7120
7121
7122
7123
7126
7125
7126
7127
7128
129
7130
7131
713
7133
7134
7135
7

713
7139
7140
7141
714
7143
7144
7145
7146
7147
7148

040310

040330
040336
040344
040352
040360
040366
040374
040402
040410
040416
060426
040432
040436
040444
040452
0404
040466
04764
040502
040510
040516
040526
0605;2

040534
040542
040550
040556
040594
0405 s
04
040606
060614
040622

0200640
020040
0;8211

030461
047111
051120
020040
020040
020011
1
047111
054105
042522
020040
020040
045611
0646011
051103
04641411
004517
004464
024064
000051
0%0040

020040
045411
046011
0464123
004511
046055
0;6553
051501
020040
000
040624

020011

ERROR MESSAGES

S%}$§

SEG 0149

DH1:

LASCIZ

TEST

KMC11

LINE

REG

EXP

052123
041520
043515
046040
020040
020040

DH2:

LASCIZ

TEST

KMC11

LINE

EXP

REC/

052123
041520
041515

DHé:

LASCIZ

TEST

KMC11

LINE/

052123
041520
041515

DHS5:

LASCIZ

TEST

KMC11

LINE

PRI2/

DH6:

LASCIZ

TEST

KMC11

LINE

EXP

REC/

CRC-LO

151

REC/

6040
8 0040
0040
020040

046040

042526
020040
065640
020011
004505
030511
042526
020040
045440
020011
004505
004520
000103
042526
020042
04151
047111
026503
0415 8
0511
0511 g
0441

052123
041520
030481
004505
044510
048055
030511
030511
042502

DH7:

.ASCIZ

TEST

KMC11

LINE

CRC-HI

042524
020240
041515
827111
042502
04412
00451
826512
605
040504

052123
1520
030461
505
044055
82850;
52
853411
20117
040524

DH8:

LASCIZ

TEST

KMC11

LINE

SHBE-H] SHBE-LO WAS-HI

046040
020040
00006§
052123
041520
041515
046040
020040
020040

.EVEN

PRIT4

PRIT4(SHBE)/

WAS-LO

DATA/

88888 2>

zlfl

‘-

-h ey

;

17:03

H 12

PAGE 150

SEQ 0150

12640

001204

001 566

bT1:

.WORD

TSTNUM,SERRPC,SDVICE,CLINED ,REGIST,STMP1,$TMPO,0

1116
001204

001 los

pT2:

.WORD

TSTNUM,SERRPC,SDVICE,CLINED,STMP1,$TMP0,0

001116
001206

001246
001204

DT3:

.WORD

TSTNUM,SERRPC,SDVICE,CLINED,STMP2 ,$TMP1,0

001246

DTé:

.WORD

TSTNUM,SERRPC,SDVICE,CLINED,O

00}}68

001246

DTS5:

.WORD

TSTNUM,SERRPC,SDVICE,CLINED,$STMPO,0

00120

881116 001246 DT6:
001202

001204

.WORD TSTNUM,SERRPC,SDVICE,CLINED,STMPO,S$TMP1,0

88}}}3

88}%’{2

DT7:

.WORD

001206
001116
001514
001220

000000
001246
00121%
00122

DT8:

.WORD

TSTNUM,SERRPC,SDVICE,CLINED,STMPS,STMPS
,STMP6,STHP7 ,$TMP10,0

000

001

DOF1:

.8Y7¢e

0,0,1,1,0,0,0,0

000
000
000

001
000
001

DF2:

.BYTE

0,0,1,1,0,0

DFé:

.BYTE

0,0.1.1

001

DF5:

.BYTE

0,0,1,1,0

000
000
00C
%

001
000
001
000

DFé6:

.BYTE

0,0,1,1,0,0

DF7:

.8Y7T€

0,0,1,1,0,0,0.0

TSTNUM,SERRPC,SDVICE,CLINED,STMPS ,STMPS,STMPO,STMP2,0

.EVEN

sROUTINE USED TO LOAD OR MODIFY THE KMC11 PARAMETER STATUS BLOCKS.
:TWO ENTRY POINTS ARE USED, ONE AS THE INITIAL START-UP AND THE

*SECOND AS THE MODIFY TABLE ROUTINE POINT.

:WHEN INITIALLY ENTERED FROM THE MONITOR ROUTINE THE FIRST
:PARAMETER BLOCKS STATUS IS INVOLKED FROM THE CONSOLE TO
*WHICH THE OPERATOR MUST INPUT THE FIRST DEVICE ADDRESS INTERRUPT
:VECTOR, PRIORITY AND WHETHER THE DEVICE IS TO BE ENABLED OR

:DISABLED.

AFTER THE FIRST KMC11 IS SPECIFIED
CIF]
THE ROUTINE
-

§§§§§§§§§§§§§§SERRE

001116

3388883833888

NINNONINON)
&
&~

1118

21-0CT-81 09:21
ERROR MESSAGES

£RQF

S
i
OCO0O00O0

wwho

RRRRRRRRRRRRRER
233
S3 RRRS
RFUERNS

RER2TTRIFRRLI2ES

—

lalal
NN
x

30A(1052)
MAC Y11
]

IED BY
:ENTERS THE CONFIGURE MODE AS SPECIFIED
BY T THE AS ASTERISK (* OPERATOR THEN HAS THE

: NB = INCLUDE INTERRUPT VEC. + PRI.
I
H
M
:#=1->16., OPENS THE PARAMETER BLOCK AND INVOLKS

:THE CHANGE OF STATUS (AFTER INPUTTING STATUS
:THIS THEN IS LAST BLOCK OPEN)

*A (CR) sFILLS REMAINDER OF TABLE WITH SUCCESIV E DEV _ADR
sAND IDENTICAL STATUS AS/PER LAST (T HE LAST STATUS BLOCK

sENTERED) *NOTE IF ISSUED AS FIRST COMMAND {N "MODIFY
sMODE THE TABLE IS FILLED AS/THE FIRST KMC11.
*E (CR) ;EXITS TO THE CALLING ROUTINE I1.E. (MONITOR)

sHOLD REC. TTY CHR.
.'POINTS TO_CURRENT W" OPEN
# OF KMC11°S ENABLED

062466

: MOV

MCTAB R1

:POINT TO PMTER TABLE-BLOCK
1

062626
0462466
041070
041166

CMP
BNE
MoV
MOV

R1,#KMCTBE
1$
#KMCTAB,
R1
g}. CURTAB

:DONE
?
:BR=N

041130

041154

D b

041066

041072

CLR

JMP

(R1)+

: CURRENT BLOCK OPEN

:CLEAN THE MESS

sMODIFY TABLE ROUTINE ENTRY POINT

TYPE

,64$

::TYPE ASCIZ STRING

MODTAB

::GET OVER THE ASCIZ

: TST

CONFIG

:FIRST TIME?

658

::TYPE ASCIZ STRING

BNE
JMP
TYPE

/7?27

1$
SETTAB

:BR=NO

643

£R

PT+2

:GET FIRST SETUP

RDCHR
v
TYPE

(SP) , CHRADR
CHRADR

:ECHO

ASCIZ

#115,(SP)+
25$
#101,-(SP)
1118
128
ngsL(SP)+

MOV

#KMCTAB,R1

B8PL

:BR=NO

BEQ

:B8=NO

—

CMP
CMP
BNE
JMP
CMP8
BEQ
BR

*:GET OVER THE ASCIZ

<15<12>/«

RRRRRRRR RRRRRRRRRRR
M) = b b
3--.-.
NN
RERSELE N-N-§
RN
83OO NgNO

ASCIZ

P R

e ol

e D D e do

SEQ 0151

b Do

OOOOCO %% vsven,

o —
O e—e

S D b

$2F URERTHEE XN 33388SNSFERE

w
—

;

—

=3
KRR RRRRRRR RRR RRRRRRRRRRRR

)

SHE
28
b e

D e

o ch

NN
3 Vo~V Wn)
=

lalal
NN

7221

C117:03
MACY11 30A(1052) ERROR
21-0CT-81
09:21 PAGE 15‘ .
MESSAGES

BEQ

NOTR

;IS IT A M2
;IS IT AN A?
*BR=YES

;IS IT AN E?
:B=Y GO

c{m # orcmcn S ACTIVE AND STORE IN 'XMCNT''
ST

1ST8

INC

ADD

(R1)

KMCNT

#6.R1

:1S UNIT ENABLED?

:ARE LINES ENABLED?

SYES

KMDAO DMS11=DA

STATIC MACY11 30A(1052) 21-0CT=81 09:21 PAGE 155

KROAPTT |20-0CT-81 1703
1
;
7

061
127
1274

041276

726
1276
7268
041
69
041
7270 041

ERROR MESSAGES

127 042626
133;

CMP
BNE

000

104413
1 sgg
1
041062
10001

RTS

258:

72?
“} } 1 370; 000020
gri 321 16 g%
7% 041

7275

041322

7277

041330

005000

7 79 041326 oe;roo 000006
005301

7278 821332 001;74.

7279
041334 062700 042460
7280 041340 010037 041070
7281 041344 104401 041352
mg 041350 000432
728

::658:

648

7259
7287
7288

38:

104401

7289 041442 000403
7290

041444

::67%:

7291

041452

668
:

7293

041456 012046

48:

729; 041452 012703 000003
7296

041460

104403

061466

104401

7295 oms;
7296 04146
7297

006
001

7298 041470 000404

7299
7300
7301
m;

041502

041502
041504

041472

68s:

730 onsos
763
7304 82151 013746 041062
7305

041514

10440

;3.399 041516 013701
7310

7311

7;1;

041522

041526

731

82'5“

7315
7316

82'5”
041554

7314

041544

458:

104401

737

104401
004737

041530

708:
1

:DONE?
:B=N

*YES

(SP)+,R0

;IS # 42

RO, CUNIT

*PRINT LINE UNIT #

RO.R1

#8*216
NOTR

IS #<16.?

*BR=

#6. RO

;MULTI X 6.

268

#KMCTAB=6,R0
RO, CURTAB
65s
$

::TYPE ASCIZ STRING
::GET OVER THE ASCIZ

<15><12>!(DEV.ADR.) (ENABL.-LINES) (CRC/32-EXT/INT) UNIT#!

;ROUTINE TO DISPLAY CONTENTS OF CURRENT BLOCK
TYPE

.67

B8R

66$

MOV

#3.R3

LASCIZ

MOV

TYPOS

688

::GET OVER THE ASCIZ

DEC

R3
458

:NO SUPPRESS

698

.ASCIZ /

TYPDS

(RO)+,=(sP)

6
1

B8R
MOV

::TYPE ASCIZ STRING

<15><12>/

BYTE
BYTE

*:TYPE ASCIZ STRING

*3GET OVER THE ASCIZ

4
CUNIT,=(SP)
CURTAB,R1

;ROUTINE TO MODIFY PARAMETER BLOCK
TYPE

--718:

°‘f

LASCIZ

MOV

58:
000406

ADD
MOV
TYPE
B8R

BEQ

041070

;% 041522

DEC

TYPE

-:698:

005303
001401

CLR

ADD

BNE

;gg;. 041436
041436
041436

RDDEC
v
MOV
MOV
cLC

268:

SEQ 0152

:A 'W'° HAS BEEN TYPED READ THE DECIMAL # FOLLOWING

?LE
BGT

000241

R1,#KMC TBE
18

718

708

::TYPE ASCIZ STRING

+:GET OVER THE ASCIZ

.ASCIZ

<15><12>/DEV.ADR.=/

JSR

PC,8$

TYPE
JSR

1208
PC.78

:GET LINE ENABLE BYTE

CZKMDAO DMS11=DA STATIC MACYI1 S0AC1052) 21-0CT-81 09:21 PAGE 153
CIRMOAPIT |20-00T-81 17.08
ERROR MESSAGES
1560

1564

10640}

041566

TYPE

1614

150

55;33:
004737

106401

1624 083416

822252

041626
%;SS:

16‘8 024737 04225
}gn

821%3

041

152741

0001

104401

041702

105721

000415

041740

105741

7337

041744

105741

7334 ougz 004737 042252

p; 108

ASCIZ

<155<12>/(0)EXTERNAL (1) INTERNAL /

JSR

gIs8
ISTB

ASCIZ

§s

778

768

7338 821746 100023

BPL

7343

042016

012737

7346
7347
7348

042030

104411

7350

042040

7352

042044

112711

042054

00144

177777

gzg 0462026 000137 041134
042032

7349 062036

7351

005726

7355
7359

04 023
82

7358
7359

04 ogs
04

736!!§

82 106

105011
122710

064 oo1439

112037
ogu.;

7360 32 076 122737
7361
102 ogwn

2112 oogl. 5

123727

107$:

7371

04215

'.oosoi

7372 042152 00137

798
8s

JMP
ST

*B=NO

::TYPE ASCIZ STRING
:GET OVER THE ASCIZ

(WARNINGINO CRC-32 TESTING/<15><12>

#-1,CONF1G

MODTAB
(SP)+

MOV

#STTYIN,RO

:GET TTY BUFFER

BEQ

1108

:B=NO

(RO)

MOVB

#-1,(R1)

BEQ

1108

*ANY CHANGE IN STATUS?

#'A.(RO)

sTEST FOR ALL LINES

CLRB
(MPB

(R1)
#'N, (RO)

;1S IT N FOR NO LINES

MOVB
BEQ

(RO)+,$TMPO
1108

BEQ

1108

:B=ENABLE ALL LINES

:B=YES NO LINES ENABLED
*DONE?
*B=YES

CMPB
BEQ

#54,$TMPO
107§

‘A COMMA
*B=YES ONLY A SEPERATOR

CMPB

STMPO,#67

SLESS THAN

CMPB

1088:

518

.ASCIZ /

BLT

000060

1358 065155 993980 000360 001202
736399 831 2 1o§; 7 001202
1

TYPE
BR

CMPB

000054 001262

001202

*INT LOOP MODE

RDLIN

7364 822114 123727 001202 000067
7368 gz 1
o1§ g;
9
142
105337
7370 04 143 001403

=(R1)

TST8

001202

TST8

78:

000116

- “GET OVERTHE ASCIZ

:WITH CRC=32 ?

MOV

177777

::TYPE ASCIZ STRING

=(R1)

S1$:

105710

“5822 001447

042050 12271g 000101

735

041066

012700 046124

7353

7354

-:798:

78s:

*UPDATE POINTER ,TEST FOR ENABLING CRC32

<155<12>/(1) CRC32 (0) NO CRC32 7/

042016

; INSERT OTHER CLOCK BIT

(R1)+

8PL

7342

:GET OVER THE ASCIZ

PC,108

100025

7341

::TYPE ASCIZ STRING

#100,-(r1)

PC.108

IST8

7339
041750 104401 041756
730 041756 000420

GET OVER THE ASCIZ

JSR

739 041742

ssTYPE ASCIZ STRING

/(1)ENABLE (0)DISABLE /

TYPE

%73:

73%

SEQ 0153

LASCIZ

TYPE

‘

1693

1128

$TMPO.#60

Bt
INCB

#360.8TAPO
ST

ASLB

MOV
DECB
BEQ
BNE

#.R
ST
1098
108$

*B=NOT VALI

SONLY 0-7°S ARE VALID

SOAVE ONCY OCTAL DIGIT

2INIT MASKING BIT
*FIND BIT POSITION OF ENABLED LINE
*B=FOUND IT
*NEXT LINE BIT

1564

162
}246
193
172

005581
000207
104401 042174
000411

RRRRRRRR
RRRRRRRRRRRRR RRRRRRRRRER RRERR
RN
N
NINININININININININI
NN NN

[LS
SIS
TN ¥ )

13 oog137 042030
6

4
4

726

104401

sg
52

001534.

104491 001235
000675
104412
8(1,2600
1401
000207
104410

302

110037
104401
122700

041060
041060
000060

122700

000061

141

322

7564

152721

6 000404
142721
33%, 000401
gzo 005201
330

898:
8s:

108:

§§‘

013700

1058:

000200

118:

1148:

20127

1158:

358 10901
352
1 820006

1 0}?

042626

393 §e 21 000010
12021

128:

e
138:

sINVALID CHR.

1078

:TRY AGAIN

as (R1)

INC
RTS
TYPE
B8R

R1
PC
818
0s

JMP

TYPE

,SQUES

LASCIZ

TST

1128

BIS8

*SET BIT FOUND (THIS LINE ENABLED)

:MOVE TO NEXT BYTE
*DONE
::TYPE ASCIZ STRING
::GET OVER THE ASCIZ

<15><12>/SYNTAX ERROR/<15><12>

(SP)+

:POP STACK

TYPE
B8R
RDOCT
MOV
BEQ

SCRLF
s
(SP)+,R0
9%

:CHANGE STATUS?
*BR=NO

RTS
RDCHR

MOV
ST

MOV
P8
BEQ

RO, (R1)
(R1)+

(SP)+,RO
#15,R0
114$

*HIGH BYTE NOT =0

:LOAD DATA
:C.R.?

MOVB
TYPE
CMP8

RO,CHRADR
,CHRADR
#60,R0

:0?

(MP8

#61,R0

;1?2

823

::TYPE ASCIZ STRING
$:GET OVER THE ASCIZ

BEQ
TYPE

000200

041070

BEQ

--838:

000207

342 oosrss

“213:

001405
104401 042316

310
314 000401

320

1108:
oy

9s:

54 °‘§‘,’°°
56 12 og 000015
Ssz 0014
94
0
76

ERROR MESSAGES
1098:

44 010911
546 005721

123

I IS

338RS 3
~

MACY1?1 30AC1052) 21-0CT=81 09:21 PAGE 15

~D0-0cT-8) 17503

—

W ¢Ng

[alsl

11-DA STATIC

.ASCIZ

BISB

B8R
BICB
B8R
INC

1058
83s

/?/

108

#200,(R1)+

1158
1158
R1

#200,(R1)+

RTS
PC
AN "'A"* WAS DETECTED SET REMAINING BLOCKS WITH SUCCESSIVE
:PARAMETERS (BASED) AS LAST BLOCK OPEN '‘CURTAB''.

1ST

MOV

(SP)+

CURTAB,RO

;GET CURRENT BLOCK

MOV
ADD

RO,R1
#6.R1

335

#10, (R1)+

}3‘)0 (R1)

:si‘r'
NEW D.A
r

(WP

ADD

MOV

R1 .#KMCTBE

(ROS+, (R1)+

;AT END?

;SAME LINES + UNIT ENABLE BIT

SEQ 0154

TT-SA STAT‘C MACY11 30A(1052) 21-0CT-81 09:21 PAGE 152
T-81 17:03

4514

4
5604
012
8'429""

464

000040

456

251

2446
ogmsg
02444
0450
26114

075 047117

MOV
MOV

(RO)+, (R1)+
ng CURTAB

}ls.:

8&'

MODTAB

IZOS:

LASCIZ

'LINES(O=7)(C1.E..#.%.%) OR (A)=ALL(N)=NONE

061134

420
4
4
u.s
45

SEQ 0155

ERROR MESSAGES

7% zogl
zg
041070

2?6

261?3
2

4 g

;SAME E/1 BIT

13§

440
036451
85:.512

02010

.EVEN

;KMCT1 PARAMETER BLOCKS

042466

000000

042472

000000

042470

000000

- PARM!TER BLOCK FOR KMC#01
KHC 01: 0

KHCPOT: 0

;CONTROL + STATUS REGISTER FOR KMC11 #01

LO BYTE = LINES

ENABLED (BIT O =

Kgm TgR oLOCK FORaylE'6NT=300,EXT=100/ HIBVTE

LINE O + 7 = LINE 7) - BIT 15

CRC32ENABLED 0 = NOT

042474

000000

KH
CRO2: 0

042500

000000

K:E'S&‘ TgR BLOCK'LgRBLT'E ,6'3" =300,EXT=100/ HIBVTE

04625062

888000

KHC 03: 0

042506

000000

Kfi% TgR BLOCK
O“R:’T‘E'&JT 00 EXT=100/ HIBYTE ZOO-CRCSZEMBLED 0 = NOT

042510

000000

042516

000000

o«sm 000000
045504

042512
042514

042520
042522

000

000000
000000

KMCP02: 0

KMCPO3: 0

KHCRO7: §

042536

000000

il
042544 000000
°‘§§’§8
000000
82 552 000000

LINEO ¢+ 7 = LINE ?) - BIT 15

JCONTROL + STATUS REGISTER roa KHCTI 005

042532 000000

000000

ENABLED (BIT 0 =

KHC 05: O

mcm: 0

045534

LO BYTE = LINES

JCONTROL + STATUS REGISTER FOR KHC‘H #04

oazsgg 000000
000000

00=CRC32ENABLED 0 = NCT

;CONTROL + STATUS REGISTER FOR WTT #03

KMCPO4: 0
LO BYTE = LINES
ENABLED (BIT O =
KI;CSOG TgR - lF'gRBz’l"g :5'5“ =300,EXT=100/ HIBVTE

KMCPOS : 0
"3532::
L

0425

:L0 BYTE = LINES ENABLED (BIT 0 = LINE O ¢+ 7 = LINE 7) = BIT 15

KHCRO‘ 0

000000
000000

042524 000000

:CONTROL + STATUS REGISTER FOR KHCTT #02

.LO BYTE = LINES ENABLED
5
= LINE 7) - BIT 15
Lg“aH‘E ’&r.a oo.sxmoo/ mam oo-cncszsma.so 0 = NOT

;CONTROL + STATUS assxsm ron KMC11 #06

:L0 BYTE = LINES ENABLED (BIT 0 = LINE
0 +

K;CSOG ToR BLOCK'LgRBLT'E's';T 00,.EXT=100/ HIBYTE
KMCPO?7:

LINE
O + 7 = LINE 7) - BT 15
OO-CRCSZEMBLED 0 = NOT

sCONTROL + STATUS REGISTER roa KHCII 007
LO BYTE = LINES ENABLED

KI;
CS07:T(E)R 8LOCK %8“R:'T"E:16'8" =300, EXT-IOOI HIBVTE

LINE 7) - BIT 15

00-CRC32MBLED 0 = NOT

= LINE 7) - BIT 1§

OO-CRCSZENABLED 0 =

BT
R ARO
eg gs
'.‘2‘“:‘, ) m“.%g“B"r'g'&gr"§oo
EXT= 1oo/ mam5$o-cnc
2ENABLED 0 = NOT
:

ENChS:
KMCS09:
.

SCONBYTE
= LINES ENABLED (BIT 0cCLINECD + 7 = LINE 7) = BIT 15
I.O BYTE INT.=300,EXT=100/ HIBVTE560-CRC32E 0 = T
S

JPARAMETER BLOCK FOR KMC#10

CZKMDAO DMS11-DA

STATIC MACY11 30AC1052) 21-0CT-81 09:21 PAGE 156

CZKMDA.P11
0-0c T-81
T8 1708
7485
554
7%
7%

7491

566 000000

ERROR MESSAGES

KMCR10:

749

SEQ 0156

:CONTROL + smus aesxsm ron mcn no

KMCP10:
KMCS10:

7488

.LO BYTE = 5”‘5
%o +7=LINE T - BIT 15
o ms
{n
00, sxmoo/ mm
=CRC32ENABLED 0 = NOT

:PARNET R uocx

3'4’ $70

KMCS11:

0 BYTE xn% "Soo
sxmoo/ mns wscncszsmso 0=
=

; PARAMETER BLOCK roa KMCA1

000000

KMCR1

:CONTROL + smus assxsm roa mcn "2

749
§72 000000
7495 042574 000000

KMCP1 :
KMCS12:

749 o:.gsn 000000
7498 042600 000000
76499 042602 000000

KMCR13: 0
KMCP1 8
KMCS13:

;CONTROL + STATUS REGISTER FOR mcn ”3
LO BYTE = LINES ENABLED (BIT 0 = LINEO ¢+ 7 = LINE 7) - BIT 15
0 BYTE INT.=300.EXT=100/ HIBYTE oo-cncszzmeo 0 = NOT

7501
7502
7503

KMCR14: 0
KMCP14: 0
KMCS14: 0

;CONTROL + smus REGISTER FOR KMC11 #14
.LO BYTE = LINES ENABLED (BIT 0 = LINE 0 + 7 = LINE 7) - an 15
0 BYTE INT.=300,EXT=100/ WIBYTE oo=cnc32£ms|.£o 0=

000000

KMCP15: €

LO BYTE = LINES ENABLED (BIT 0 =

7500

042604
042606
042610

7504
7505 042612

LO BYTE = LINES ENABLED
5 NEO+7=LINTD) = sn 15
0 BYTE INT.=300, sxmoo/ mam 00=CRC32ENABLED 0 =

PMTER BLOCK FOR KMC#13

PARMETER BLOCK FOR KMCA14

000000
000000
000000

;PARAMETER BLOCK FOR KMC#15
KHCR1S 0
;CONTROL + STATUS REGISTER FOR KHCl‘l ”ns

000000

7506

042614

7509

7508
7510

042620

000000

KH
CR16: 0

;211

042624

000000

KMCS16: 0

;g}‘

042626

000000

7507

042616

000000

KMCS15: 0

7518

7519
7520
7521
7522
7523
7524

gszz 000000

7528

042630

042634
042640
042644
062646
042654
oazggg

:CRC32 ENABLE INTO ‘‘CRC32F'

041070

GETKMC: MOV

000207
005761

000002

28:

062701 000006
1$:
020127 042626
oo1ggl.
012737 042460 041070

100364

042
010137 041070 042670 012104
042672

111137

001254

042700

112137

001260

7531

042704

005037

7533

04271

190%7

753

oo-cacszemso 0=

KMCTBE: 0

013701

7529 822676 oosr§1

7530

;L0 BYTE INT.=300,EXT=100/ HIBYTE

:THIS ROUTINE WILL LOAD THE CSR ADDRESS INTO 'R4'* THE
Ll
ENABLE BYTE INTO "I.IABYT" » EXT./INT. STATUS INTO °'‘CLKDAT'

7525 042

7526
7527

200=CRC32ENABLED 0 = NOT

;PARAMETER BLOCK FOR KMC#16
;CONTROL + STATUS REGISTER FOR KHCH #16
KMCP16: 0
;L0 BYTE = LINES ENABLED (BIT 0 = LINEO + 7 = LINE 7) - an 15

7515
751

751

LINE O ¢ 7 = LINE 7) - BIT 15

:LO BYTE INT.=300,EXT=100/ HIBYTE

oazng

105711

58
fd pow om
7540 o«zrfi 162700 0462466

BPL

(R1)+

8PL
BITB
BNE
MOV

:GET CURRENT TABLE POINTER

;ENABLED?

IST8

PC
zum

m CURTAB
(R1)+.Ré4

CLR

001256

CURTAB,R1

#6,R1
R1.#KMCS16+2
;@ END OF TABLE?
28
*B=NO
#KMCTAB=6, CURTAB

MOV
MOV

MOVB

001256

001003
012737 000200

RTS
ST

MOVB

7534 32 714 132737 000200 001260

7535
722
;2%9 §E ;i‘

ADD
CMP
BNE
MOV

(R1),LINBYT

:BR=NO

*NOW POINTING TO CURRENT KMC
*GETKMC CSRO
*GET LINES ENABLED

(R1)+,CLKDAT

;LOAD CLOCK LOOP STATUS

(R1)

*CRC32 ewmeo’

CRC32F

268
26$
#200, CRC32F

#200,CLKDAT

B
Ll
SUB
#KMCTAB, RO
Ls

:CLEAR CRC32 FLA

*B=NOD
SEXT?
*B=NO
*ENABLE CRC32 FOR TESTING

ve i

CZKMDAO DMS11<DA STATIC MACY11 30A(1052) 21-0CT=81 09:21 PAGE 15’
CZKMDA.P11 20-0(7»‘1 17:03
ERROR MESSAGES
;221

7543

7544
7545

042746

042750

062752

75
760
7
7is:.5 9 04 796
7548 062774
7549 04

7550
;ss?

001405

005202

38:

162700 000006

oo14.91
0007 ;
o1o;
001246
012737 000001
062719 000002
00020

001252

043012
043014

001437
033737

7557 043022 001003

001252

1$:

001254

7558 o:.so% 006337 001252
7559 043030
000766
7560 063032 012700
000001
7561

043036

030037

7562

043042

7564

043050

006

566

043056

013737

001244

7568
7569

063066
043072

006337
006337

001242
001242

7563

oo1ogt.

7567 043062

7570

218:

043044 oos% 001244

7565 043052 000771

043076

006337 001242

006337

043112

SUB

og.no

BEQ
BR
MOV
MOV
ADD
RTS

TSTB

A
3s
R2,$DVICE
#1.NXTLIN
#2,(SP)
PC

;CURRENT UNIT #

*SET SWITCA FOR NEXT LINE TO BE TESTED
_

001242

22%:

*B=YES
:IS THIS LINE ENABLED?

ASL
BR
MOV

NXTLIN
1$
#1.R0

:TRY FOR NEXT LINE
;FIND UNIT #

BNE

22%

BIT

38:

RONXTLIN

CLINED

MOV

CLINED,CLINE

ASL

ASL
ADD
RTS

*B=YES

*SCALE FOR LINE

:ON THIS LINE?

*UP BY ONE LINE

ASL

000207

:DONE THIS UNIT?

3s
NXTLIN,LINBYT

ASL
ASL

oomg

CLINED ;INIT. FORMATED LINE #

NXTLIN

BEQ
BIT

INC

7571 043102 006337 00125
7572 043106 062716 000002

;g;z

|
sea 0157 |

INC

BNE

28:

001252

SALLIGN BIT TO TRY AGAIN

218

CLINE

CLINE
CLINE
CLINE

NXTLIN
#2,(SP)

STRY NEXT LINE

:;OBTAIN REG. FORMAT

4 LEFT

;SET NXTLIN FOR NEXT TIME IN

;g;g

.SBTTL

7577

;;tt.tttt.t.tt."ttttt't"t't..tttttt.tt!tt.t.ttt'tittl.tt.Q."'t

7578

:*THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT,

7581
7582

:«THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE:
tesW15=1
HALT ON ERROR

7579
7580

1eSW13=1

7584

s*CALL
e
043114

7590 043114

104407

7592

043122

001775

759

o:.§1 2

032777

$ERROR:

7591 043116 1os;37 001103

7595
596

BELL ON ERROR

:«SW09=1

7586
;gg;

759

INHIBIT ERROR TYPEOUTS

:«SW10=1

7585

7589

ERROR HANDLER ROUTINE

:«SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OF THE ERROR CALL
**AND GO TO SERRTYP ON ERROR

7583

omgl. 013777 001102
043140
043142

001402
104401

002000

001230

78:
136010

136000

——

BEQ

GETLIN: CLR

7554 ol.soog 105737 001252

;THIS ROUTINE WILL OBTAIN THE NEXT SEQUENTIAL LINE
:(IF ENABLED) FROM LOCTION ‘NXTLIN:'*
(PRESENT BY GETKMC)

7ssf 043002 005037 001244
7555
7556

48:

—

LOOP GN ERROR

ERROR

CKSWR

INCB

BEQ

MOV
BIT

BEQ
TYPE

: ;ERROR=EMT AND N=ERROR ITEM NUMBER

SERFLG
7%

;:TEST FOR CHANGE IN SOF T-SWR

$:3ET THE ERROR FLAG

*:DON'T LET THE FLAG GO TO ZERO

STSTNM,aDISPLAY ::-DISPLAY TEST NUMBER AND ERROR FLAG

#BIT10.3SWR
1$
,S$BELL

::BELL ON ERROR?

SINO = SKIP
*:RING BELL

CT-81_ 09:21 PAGE 158

CZKMDAO DMS11-DA STATIC MACY11 30A(1052) 21-0
CZKMDA.P11
20-0CT-81 17:03
ERROR HANDLER ROUTINE

BE ko gy e
7588
82 156 1 9 14
2 001116
7600 04 194 117737 135726 021114

;252

043320

7625
7626
7627
7628
7629
7630
7631
7632
7633
7634
7635
7636
7637
7638
7639
7640
7641
764
7643
7644
7645
7646
7647
7648
7649
7650
7631
7652

043324
043326
0433
043334
043334
043340
043342
043344
043346
043354
043356
043362
043
043370
043374
043376
043402
3404
043406
043406

047526

001002

000 5
04327
001116

MoV

036503
047125
052103
040522

00004

005777
100002
000000
104407
032777
00140
013716
005737
001402
013716

135600

001000

4(SP) ,$ERRPC

#2,SERRPC
108
$ERRPC,=(SP)

.SCRLF

LASCIZ
+ASCIZ

000042

s:GET PC AT TIME OF FALSE TRAP
:;ADJUST PC
:: TYPE HEADER
::SAVE SERRPC FOR TYPEOUT
::60 TYPE=--OCTAL ASCII(ALL DIGITS)

s:GET FALSE TRAP VECTOR ADDR

::SAVE SERRPC FOR TYPEOUT
::60 TYPE=--OCTAL ASCII(ALL DIGITS)

(SP)+,(SP)+
::POP FALSE TRAP VECTOR PCEADDR
208
<200>'PC= *
' UNEXPECTED TRAP TO °*

JSR

TYPE

PC,SERRTYP
-SCRLF

::6G0 TO USER ERROR ROUTINE

TST

aswR

3s:

HALT
CKSWR
BIT

zgxro9.asun

4$:

Mov
TST

§§SCAPE

MOV

$ESCAPE, (SP)

s;HALT ON ERROR
::SKIP IF CONTINUE
sHALT ON ERROR!
:;TEST FOR_CHANGE IN SOFT-SWR
::LOOP ON ERROR SWITCH SET?
2:BR IF NO
:sFUDGE RETURN FOR LOOPING
::cufcg FOR AN ESCAPE ADDRESS
::BR IF NONE
2:FUDGE RETURN ADDRESS FOR ESCAPE

CMP
BNE
HALT

#SENDAD
, a#42
63

208:
2$:

001226

:ERROR IS ILLEGAL TRAP

.EVEN

12%:

135564

s:STRIP AND SAVE THE ERROR ITEM CODE
::SKIP TYPEOUT IF SET
s SKIP TYPEOUTS
s:1F RETURN PC LESS THAN 1002

CTED TRAP OR INTERRUPT

(SP)
, SERRPC
= (SP)
$ERRPC,

001110
001226

035070

208
%SP).01002

118

000040
054105
042105
020120

SEQ 0158

:;COUNT THE NUMBER OF ERRORS
s;GET ADDRESS OF ERROR INSTRUCTION

#6, (SP)

001235

043410
001235

000002

001116
001116

043276
000004
001116
001116

004737
104401

022737
001001
000000

:;PROCESS UNEXPE

016637
162737
1046401
013746
104402
104401
162716
011637
013746
104402
104401
022626
000422
050200
020040
062520
052040

135740

04§%10
043216
04%2%8
0432
043234
063236
043262
0432646
043252
043256
043260
0463266
043266
043270
043276
3
043312

101046

020000

7606
7607
7608
7609
7610
7611
7612
7613
7614
7615
7616
7617
7618
7619
7620
7621
7622

063206

032777
001055
021627

(2]

;28;

0431
04
043202

—_—

7601
7602
7603

SERTTL

18:

BPL

BEQ

5$:

6$:

SLPERR . (SP)

RTI

.SBTTL
S

2:ACT=11 AUTO-ACCEPT?
CH IF NO

::R ETURN

ERROR MESSAGE TYPEOUT ROUTINE
RAAAARAAAAAAAAR

AN RARANARAAAARAAANANNARAAAAARARIARAOAARARES

s*THIS ROUTINE USES THE '‘ITEM CONTROL BYTE'' (SITEMB) TO DETERMINE WHICH
s*ERROR IS TO BE REPORTED. IT THEN OBTAINS, FROM THE ‘ERROR TABLE'' (SERRTB),
s*AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR.
043410

$ERRTYP:

CZKMDAO DMS11-DA STAT‘% ?9(5}1 30A€1052) 21-0CT-81 09:21 PAGE 158

CZKMDA.P11

20-0CT

7653

043410

76
7657

04
0463424

7659

ERROR MESSAGE TYPEOUT ROUTINE

104401

001235

153700
1004

001114

0434

013746

001116

7661
766§
7663
7664
7665

0434
04
04
04 l-g
04

10440
00044
005300
006300
006300

766

043“3

062700

7656 063414
7655 06341
7658

7660

7669

043444

7668 043452
7669
7670
7671
7672
76
7674
7675
7676
7677

063456
043460
043462
043464
063470
043474
043476
043500
043502

7680

043512

7678

043506

01004
ogg

006300

010146

7679 043510 012001
7681
7682

7683

7684

7685

7686

043514
043516

043520

043552

04635246

043526

A H

5$:

6$:

012601

012600
104401
000207

020040
043564

BEQ
TYPE
WORD
TYPE
MOV
BEQ
TYPE
WORD
TYPE

MOV

MoV

MOV
TSTB

BNE

s:IF ITEM NUMBER IS ZERO, JUST

::TYPE THE PC OF THE ERROR
ssSAVE SERRPC FOR TYPEOUT

..ERROR ADDRESS

2:60 TYPE==OCTAL ASCIICALL DIGITS)
+:GET
OUT
..ADJUS! THE INDEX SO THAT IT WILL
$3
WORK FOR THE ERROR TABLE

(R0)+,28

sFORM TABLE POINTER

:PICKUP "ERROR MESSAGE'* POINTER

O
+SCRLF

..SKIP TYPEOUT IF NO POINTER
::TYPE THE “ERROR MESSAGE"
::, ERROR MESSAGE'' POINTER GOES HERE
::"'CARRIAGE RETURN'' &‘LINE FEED
s:PICKUP ‘DATA HEADER'® POINTER
:;SKIP TYPEQUT IF 0
..TYPE THE ‘DATA HEADER
.:D TA HEADER'' POINTE!I GOES HER§
.. CARRIAGE RETURN'' & 'LINE FEED'

::BR_IF NO DATA TO BE TYPED

0
,SCRLF
(RO)+,48
5§

R1,-(SP)

:SAVE

(Rb)o R1

::PICKUP ‘DATA TABLE'' POINTER

(RO)+,RO
(RO)+

..PICKLP DATA FOMAT
s"OCTAL'®
OR ‘DECIMAL

MOV

8(R1)+,-(SP)

[Eis

Mov
TYPDS
TST
BEQ
TYPE

8(R1)+,-(SP)

POINTER

::BR IF DEC IML

..SAVE a(R1)+ FOR TYPEOUT

2:6G0 TYPE--OCTAL ASCII(CALL DIGITS)

B8R

(R1)
9%
11%

é$

98:

MOV

(SP)+,R1

..RESTORE R1

118:

ASCIZ
.EVEN

043560

000

:SAVE RO
::PICKUP THE ITEM INDEX

2:SAVE 9(R1)+ FOR TYPEOUT
::60 TYPE=--DECIMAL ASCII UITH SIGN
..IS THERE ANOTHER NUMBER?
:BR IF NO
..TYPE TWO(2) SPACES

8$:

001235

$SERRPC ,=(SP)

#SERRTB RO

TYPOC

78:

aNSITEMB,RO
18

ADD

BEQ

000402

043546

7703

3s:

104402

7695

;778}

001235

28:

SEQ 0159
.."CARRIAGE RETURN'' & "LINE FEED''

108
RO
RO
RO

MOV

013146

;gg‘ 043544 000764

043560

001235
043500

$SCRLF

RO,=(SP)
RO’

TYPOC
BR
DEC
ASL
ASL
ASL

001264

001003

013146
104405
005711
001403
104401

7699
7700

MOV

1$:

012000
105720

043530
043530
043532
043534
043536
043540

043550
043552
043556

BISB
BNE

001415

7687
7688
7689
7690
7691
7692

7696
7697
7698

TYPE

MOV
CLR

012037 063462
001404
104401
000000
104401
012037
001404
104401
000000
104401

108:

.SBTTL
SRR

MOV
TYPE
RTS

::LOOP

(SP)+.RO
SCRLf
PC
/7

JRESTORE RO
.."CARRIAGE RETURN'' & "LINE FEED''
*RETURN
::TWO(2) SPACES

SCOPE HANDLER ROUTINE
AR RN

AR AN

T RN AN RN

RANANANANANANANAANRARRANRRNNS

tTHIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS.

IT WILL INCREMENT

7705

'AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG.(DISPLAY<7:0>)

7707

tTHE SWITCH OPTIONS PROVIDED BY THIS ROUTINE
AR

7706

7708

s*AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<ES:08>
s *SW14=1

LOOP ON TEST

CZKMDAO DMS11-DA STATICMCB;’
CZKMDA.P11
20-0CT-81
7709
7710
[44)
m
(44
7716
7715
7716
[44)4
7718
7719
7720
7721

;;5

7724
7725
7726
7727
7728
7729
7730
7731
7732
7733
7736
7735
7737
7739
7740
77641
7742
7743
7744
7745
77646
7747
7748
7749
7750
7751
7752
7753
7754
7755
7756
7757

7758
7759
7760
7761
776

776
7764

30A(1052) OPE
21-0(7-81
09:21 PAGE 165
HANDLER
ROUTINE

s *SW09=1

LOOP ON ERROR

'%28831
* %

i
043564
043564

$SCOPE:

104407

LOOP ON TEST IN SWR<7:0>

SCOPE

000416

$XTSTR: BR

043612
043616
0436%8
043630
043634
043636
043640
043644
043646
043646

01374
01273
5737
012637
3
022626
012637
1

MOV
MOV

043666
043672
043674
043702
043706
043712
0437164
043720
063726
043730
043734
043740
043746
043754
0437

032777

001404
127737
001430

105737
00141;
032777
001404
013737
000415
105037
105237
011637
011637
005037
112737
013777
013716
2

FOR CHANGE IN SOF T-SWR

::G0 TO ERROR ROUTINE IF RETURN fit LESS THAN 1002

043610

043654
043656
043664

EST

..OTHERUéSE CONT(NUE

021627
10100;
000137
032777

001057

: :SCOPE=]OT

CKSWR

043566
043572
043576
043600

043606

SEQ 0160

001002
043114
040000

3636
177060

000004
000400
135256

135332

SP) , #1002
18
SERROR
#8I1T14,aSWR
SOVER

.-.-unexmreo TRAP OR INTERRRUPT
ARE TRAPPED WERE VIA 10T
+:60 PROCESS UNEXPECTED TRAP
..Loor ON PRESENT TEST?
IF SW14=1

::IF RUNNING ON THE “XOR'* TESTER CHANGE

@NERRVEC,-(SP)
#5$ ;omvec

::SAVE THE CONTENTS OF THE ERROR VECTOR
..ser FOR TIMEOUT

-#AAMNSTART OF CODE FOR THE XOR itsrsmmu

000004

ar177060

2:THIS INSTRUCTION TO A "NOP'*

(NOP=240)

TIME OUT ON XOR?

MOV
(SP)+, @#ERRVEC ..aesroas THE ERROR vscroa
BR
$SVLAD
:GO TO THE NEXT TEST
58:
CMP
(SP)+,(SP)+
ICLEAR THE STACK AFTER A TIME OUT
MOV
(SP)+.3#ERRVEC :;RESTORE THE ERROR VECTOR
B8R
78
LOOP ON THE PRESENT TEST
6$:; MWANNEND OF CODE FOR THE XOR iesreunn
135264
BIT
#8IT08,aSWR
:;LOOP ON SPEC. TEST?
BEQ
2s
::BR IF NO
001102
CMPB
@SWR,STSTNM
..on THE RIGHT TEST?
SWR<7:0>
2s:

001103
001000

135236

001110

0011C6

001103
001102
001106
001110
001226
000001
001102
001106

18:

BHI
JMP
BIT
BNE

78:

BEQ

TSTB

BEQ

BIT
BEQ
Bngv

48:
CLRB
SSVLAD: INCB

001115

135166

SOVER:
.SBTTL

$OVER

..ms AN ERROR OCCURRED?

aanosa.asua
48
%cgzn.umn

..LOOP ON ERROR?
::BR IF NO
::SET LOOP ADDRESS TO LAST SCOPE

SERFLG
STSTNM

::2ERO THE ERROR FLAG
+:COUNT TEST NUMBERS

$SVLAD

MOV
MoV
CLR
MOVB

(SP),SLPADR
(SP).SLPERR
SESCAPE
#1,SERMAX

ggy

SLPADR. (SP)

MOV

:BR IF YES

SERFLG

::BR IF NO

::SAVE SCOPE LOOP ADDRESS
::SAVE ERROR LOOP ADDRESS
:iCLEAR THE ESCAPE FROM ERROR ADDRESS
“ONLY ALLOW ONE(1) ERROR ON NEXT TEST

STSTNM,aDISPLAY ..oxspuw TEST NUMBER

;?oge agrum ADDRESS

TYPE ROUTINE

e ARAAARAARAAAAAAARAAANRETRARAAAANANAAANAAANAAAAAANAANAAAANAARAANNSY

s*ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITH A 0 BVTE.
:#THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED.

:*NOTE1:

; *NOTE2:
::NOTE :

SNULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER.

SFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED.
SFILLC CONTAINS THE CHARACTER TO FILL AFTER.

s*CALL:
;*1) USING A TRAP INSTRUCTION

CZKMDAD onsn-on STATIC MACY1 1 30A(1052)_

CZKMDA.P11

31 17:03

7765
776?
776
7768
7769

777i
4 1“ 043762 105737 001157
7772 043766 100002
mf
043770 000000
777% 043772 000407

7775 83774 010046
;77779
776 017600 000002
8’12002 11204
7778
004
00100
7779 wooe
5726
7781
7783
7785

010

012600

044016
044020
044026
044026

000002
122716
001430
122716

044012

062716 000002

7786 044032
001006
7787 044034 005726
7789

7791

7792
7793

044036

000011

TYPE ROUTINE

;e
: *OR
‘e
I
‘e

18:

28:
608:

3s:

A ¥

001235
105037

044250

044050
044056

004737
123726

044132
001156

5%:
68:

066 105366 000001

78:

044046 000755

7798

044072

7800

044100

002770

7799 064076 004737 044132

;381

044104

105337

000770

;gg‘

7805
7806
7807
7808
7809

#2,(SP)

RTI
CMPB
BEQ
CMPB

(SP)+,RO

#HT , (SP)
8s
#CRLF, (SP)

58
(SP)+

;sMESADR IS FIRST ADDRESS OF AN ASCIZ STRING

:;1S THERE A TERMINAL?
*BR IF YES
::HALT
HERE IF NO TERMINAL
; SLEAVE

*SAVE RO
..ser ADDRESS OF ASCIZ STRING
::PUSH CHARACTER TO BE TYPED ONTO STACK
“3BR IF IT ISN'T THE TERMINATOR

::IF TERMINATOR POP IT OFF THE STACK
::RESTORE RO

::ADJUST RETURN PC

: SRETURN
2:BRANCH IF <HT>

2:BRANCH IF NOT <CRLF>

:POP <CR><LF> EQUIV

STYPE A CR AND LF

SCRLF
CLRB

SCHARCNT

::CLEAR CHARACTER COUNT

JSR
CMP8

PC,STYPEC
SFILLC.(SP)+

2:G0 TYPE THIS CHARACTER
::IS IT TIME FOR nuen CHARS. ?

:3GET NEXT CHARACTER

BNE
MOV

28
SNULL , = (SP)

DECB

1(SP)

::AND THE NULL CHAR.
::DOES A NULL NEED TO BE TYPED?

PC,STYPEC

2360 TYPEA NULL

BLT

DECB

$CHARCNT

::1F NO GO GET NEXT CHAR.
::GET # OF FILLER CHARS. NEEDED
::BR IF uo-so POP THE NULL OFF OF STACK

2:D0 NOT COUNT AS A COUNT

;HORIZONTAL TAB PROCESSOR

044106 112716
000040
8s:
064112 004737 0464132
9s:
044116 132737 000007 044250
044126 001372
044126

7810 044130
7811

ADD

MOV

JSR

044250

STPFLG

MOV
MOV
MOVB
BNE
ST

TYPE

044040
044042

F 13
PAGE 161

1$
3s
RO,=(SP)
a2(sP) RO
(RO)+,=(SP)
4
(SP)+

BNE
ST

104401

09:21

TYPE
,MESADR
TYPE
ME SADR

STYPE: TSTB
BPL
HALT
BR

000200

779 044060 001350
7795 044062 013746 0011564

7796
7797

21-0CT-81

044132

005726

000724

STYPEC:

MoV8
JSR
BITB
BNE

..nsruce m WITH SPACE
3:TYPE
A SPACE
* SBRANCH xr NOT AT
::TAB STOP

(SP)
pc $TYPEC
#7.SCHARCNT
98’
(SP)+
2
@$TKS
108
asTkB

..cm IN KYBD BUFFER?
::BR_IF NOT
*GETCHAR

:MJD001
*MJD001
*MJD001

#SXOFF,(SP)

:WAS CHAR XOFF

*MJD001

TST

mg 044132
7813
044136
7814 044140

105777
100922
017746

135006

135002

ISTB
BPL
MOV

7816

122716

000023

CMPB

7815 044144 062716 177600
044150

7817 044154 001012

7819 Oealse 105777 134762
7820 044162

100375

BIC

BNE

BPL

nmbo <sn
1028

v
1018

2:POP SPACE OFF STACK

:3GET NEXT CHARACTER

2ISTRIP EXTRANEOUS BITS
::BR IF NOT

WAIT FOR CHAR

*MJD001
*MJD001

Fertted

:MJDOO1

SEQ 0161

CZKMDAO DMS11-DA STATIC MACY11 30A(1052) 21-0CT-81 09:21 PAGE 163
TYPE ROUTINE

tune
77600
000021

BIC
CMPB

117716
716
122716
001366

MOVE

1028:
108:

134740

prgihrd

RERSnNO

SSSNIF

3313333333335

00001

134732
000002

044250
000012

NP RS

000002

18:

BNE
ST

SEQ 0162

aSTKB,(SP)

::GET CHAR

:MJD001

1018
(SP)+

::BR IF NOT
:3FIX STACK

*MJD001

0177660 (SP)
#SXON, (SP)

::STRIP IT
$:WAS IT XON?

;g{fl

ag;ps

::WAIT UNTIL PRINTER IS READY

MOVB
C(MP8

2(SP),asTPB
#CR,2(SP)

::LOAD CHAR TO BE TYPED INTO DATA REG.
::IS CHARACTER A CARRIAGE RETURN?

BNE
CLRB
BR
CMPB

BEQ
INCB
SCHARCNT: .WORD
S$TYPEX: RTS
.SBTTL

18
STYPEX

SCHARCNT

#LF,2(SP)
STYPEX
(PC)+
0
PC

*MJD001
*MJD001

*MJD001
*MJD001
*MJD001

:SBRANCH IF NO
..vss-cwu CHARACTER COUNT
SEXIT

::IS CHARACTER A LINE FEED?
::BRANCH IF YES
:COUNT THE CHARACTER

s ;CHARACTER COUNT STORAGE

BINARY TO OCTAL (ASCII) AND TYPE

SRR AAAAAAAAAARAARAANAAERARAAAAAAANAAANARAANAAAANAAAANOAAAARAAAOARS

tTHIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-DIGIT

;*OCTAL (ASCII) NUMBER AND TYPE IT.
'%I{EOS--ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE
- %

:®
o
o
'
' 4

MOV

TYPOS
.BYTE
BYTE

NUM,-(SP)
N
M

: :NUMBER TO BE TYPED

..CALL FOR TYPEOUT
:sN=1 TO 6 FOR NUMBER OF DIGITS TO TYPE
::M=10R 0
::1=TYPE LEADING ZEROS
: :0=SUPPRESS LEADING ZEROS

s *STYPON-==-ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST
:*$TYPOS OR $TYPOC
s#CALL:

v
i
;l

MoV
TYPON

NUM, - (SP)

: :NUMBER TO BE TYPED
*:CALL FOR TYPEOUT

.--wfoc--emn HERE FOR TYPEOUT OF A 16 BIT NUMBER

i
=ey rugs-a

SsSuawe S
N

PEYNNNE NS

)
ol el e
el e

OO NN

b
D b

e
v

OO0
=== g—ec
(DSECM\”UMU
N

117:03
d

20-0CT

CZKMDA.P11

044477

MOV
TYPOC

STYPOS: MOV
MOVB
MOVB

NUM, = (SP)

::NUMBER TO BE TYPED
::CALL FOR TYPEOUT

a(SP) ,=(SP)
1(SP).S$OFILL
(SP)+,$OMODE+1

::PICKUP THE MODE
::LOAD ZERO FILL SWITCH
::NUMBER OF DIGITS TO TYPE

ADD
BR

#2,(sP)
$TYPON

#1,S0FILL
#6,SOMODE
+1
#3,S0CNT

::SET THE 2ERO FILL SWITCH
:sSET FOR SIX(6) DIGITS
::SET
7:5 ITERATION COUNT

MoV
MOV

R&.=-(SP)
RS.-(SP)

SAVE R4
..SAVE RS

STYPOC: MOVB
MOV8
STYPON: MOVB

::ADJUST RETURN ADDRESS

21-0(7-81

SRoREouCRgosRaeEaa

o
SEEss
u§u:2RINSNEERARREGSICSSIIREGA

b b
OO
-t
-t et OO

b =)
e

5
4356

coooco

3 g

112‘70‘

ol e

& 3%33%3§§§§§§§§§§§§§§§§§§§§§§§

CZWAO DHS‘H -gA SYM‘C ”C‘V,;l 30A(1052)
CZKMDA.P

000002

044501

e
18:

SOMODE +1,Ré
R4
#6.Ré
Ré

MOV
CLR
ROL

R
RS

ROL
ROL
MOV

RS
RS
R5.R3

DECB

SOMODE

2$:

BR
ROL

3s:

ROL

58:

78:

68:
000004

12(SP) .

33
k5
R3

BIS
BIS

BGT
BLT
INC
BR
MOV
MOV
MOV
MOV
MOV

2
é$
R4
2
(SP)+,RS
(SP)+.Ré&
(SP)+.R3
2(SP) .4 (SP)
(SP)+. (SP)

48:

SOFILL,.R&

78
#177770.R3
4
R4
5%
Ré
#'0,R3
» R3

BPL
BIC
BNE

177770

000002

PAGE

NEG
ADD
MOVB

MOVEB

000012

044500

09:21

SEQ 0163

Y TO OCTAL (ASCII) AND TYPE

BEQ
INC

MOVB
TYPE
DECB

RTI

R3.8$
8$
$OCNT

s;GET THE NUMBER OF DIGITS TO TYPE
:sSUBTRACT IT FOR MAX. ALLOWED
::SAVE_IT FOR USE
::GET THE_ZERQ FILL SWITCH
::PICKUP_THE INPUT NUMBER
::CLEAR_THE OUTPUT, WORD
: ;ROTATE MS8 INTO *C
;60 DO mMsB8
::FORM THIS DIGIT

s:GET LSB OF THIS DIGIT
..;;P; THIS DIGIT?
F NO

..GET RID OF JUNK
sTEST FOR 0

..SU’PRESS THIS 0?
IF YES
T
sDON'T _SUPPRESS ANYMORE 0'S
..MKf THIS DIGIT ASCII
MAKE ASCII IF NOT ALREADY
;:SAVE FOR TYPING
..GO TYPS n1us DIGIT
OUNT

..BR IF MORE TO DO
:BR_IF DONE

..INSME LAST DIGIT ISN'T A BLANK
;GO DO THE LAST DIGIT

: SRESTORE RS
s ;RESTORE R4
R3
s sRESTORE
s:SET THE STACK FOR RETURNING
2 :RETURN

BYTE
0
sSTORAGE FOR ASCII DIGIT
BYTE
0
:TERMINATOR FOR TYPE ROUTINE
SOCNT:
.BYTE
O
2:0CTAL DIGIT COUNTER
$SOFILL: .BYTE
0
..ZERO FILL SWITCH
$0MOD E: .WORD
0
; s NUMBE R OF DIGI'T‘S TO TYPE
.SBTTL CONVERT BINARY TO DECIMAL'AND TYPE ROUTI

8s:

RN RRARANRAAAAAAAAAAARAAAAAAAAANANAANAARAAAAAAAAAAANAANAAANAANES

'THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 5-DIGIT

;#SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE
;*NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED

;*BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE
:*REPLACED WITH SPACES.

sALL:
®
MOV

$TYPDS:

TYPDS

MOV
MOV

NUM,-(SP)

; sPUT_THE BINARY NUMBER ON THE STACK

::GO TO THE ROUTINE

::PUSH RO ON STACK
:;PUSH R1 ON STACK

CZKMDAO DMS11=DA STAT € MACYIN SOA(IOSZ) 21-0CT=81 09:21 PAGE 1
ONVERT BINARY TO DECIMAL AND TYPE ROUTINE
20-0CT 117:03

CZKMDA.P11

010246
010
010346
01
1660
100004
005405
1127

Pis
044540 0127
798 0idses More
194

7945
1946
7947
1948

044350

044552
044556
044560
Quu362

003002

01600
160103
002402
005202

R§.~(SP)

000001

044716
000040
044706

044572
044574
044576
044600

001002
105716
100407
106316

7957
7958
7959
7960
7961

044604
044612
044616
044622
044624

11666
05270
05270
11022
005720

1964

0a4e3d

003002

1956

Q44602

103003

18:

CLR

2$:

CLR

3s:

Sus

#SDBLK

,R3

# (RS

48:

1972
79
797%
1975
7976
7977

000001
000060
000040

177777

5$:

ASLB

6s:

8IS

1978

044664
0uies
064670

044674

0ur02

7980 (0447

7981
1982
798
7984
7985
79
7987

044710
04712
714
044716

012616

%fl23090
001750
000144
000012
000004

THROUGH IF

::BR _IF NO

::YES=-SET THE SIGN
..HAKE THE BCD DIGIT ASCII
MAKE IT A SPACE IF NOT ALREADY A DIGIT
::PUT THIS CHARACTER IN THE OUTPUT BUFFER
..J051 INCREMENT ING
I'ECK THE TABLE INDEX
GO DO THE NEXT DIGIT

::GO TO EXIT
::GET THE LSD
8s:

177777

:G0 CHANGE TO ASCII

TST8

177776

..UAS THE LSD THE FIRST NON-ZERO?
=1(SP) ,=2(R3)
(R3)
(SP)+ RS

012603

012602
012601
012600
104401
01

DONE

:sADD BACK THE CONSTANT
..CHECKtIF oCh 016‘1,780

ADD

FALL

7% Biiesd 00078

100003
116663
105013
012605

::SETUP THE OUTPUT POINTER
ssSET THE FIRST CHARACTER TO A BLANK
..CLEM THE BCD NUMBER

..STlli% oggus LEADING 0°S?

7967 0ciess 105736
044644
6
044656
044656

sGET THE CONSTANT
HSRWFTMS 8cb DIGIT

000010
7968 044633 Oborat
002746

7968
7969
7970
7971

T _NUMBE

:: INCREASE THE BCD DIGIT BY 1

7950 044366 060105
7931 044370 005703
7952
7953
7954
7955

ON STACK

:sPUSHRS ON STACK
s:SET m SUITCN AND SIGN

020200
000020
000055

ON STACK

:sPUSH R2

s ;PUSH

044506
044510
Qusie
518
Qa
524
044526
04330

7933
7934
1935
o
1937
79
793y
7940

SEQ 0164

IF NO

..VES“SET THE SIG&FM TYPING

(SP)+.R3

044716
000002

$DBLK

2(SP),4(SP)

000004

(SP)+. (SP)

$DTBL:

$DBLK:
.SBTTL

ssNOW TY

NUMBE

s sADJUST THE STACK
:;RETURN TO USER

.BLKW
4
TTY INPUT ROUTINE

s ARRARRRARAAARAAAANERN
AN
RARNANARNARANARRAANRNANAAARRRNNRARORNNS

‘ENABL

LSB

RS8R

INPUT ROUTI

NNNN

3333

N§

STKCNT .WORD

SEQ 0165
: sNUMBER OF IEEHS IN QUEUE

..WTPUY POINTER

s TTY KEYBOARD QUEUE

s*TK INITIALIZE ROUTINE
s*THIS ROUTINE WILL INI TIALIZE TH; TTY KEYBOARD INPUT QUEUE
s*SETUP THE INTERRUPT VECTOR AND URN ON THE KEYBOARD INTERRUPT

E'CALI.:

Hod
o

JSR
RETURN

§3822238

iR
WO N
o
W
~

$TKINT: CLR

PC.STKINT

MOV
MOV
MOV
MOV

#STKQSRT,$TKQIN ..MVE THE STARTING ADDRESS OF THE
$TKQIN, $TKQOUT +sQUEUE INTO THE INPUT & WTPU&POINTENS.
#STKSRV, 34 TKVEC ..;ggn*xgeTHE KEYBOARD VECT
gogéwxvscoz

STKCNT

sCLEAR COUNT OF ITEMS IN QUEUE

MOV

0100 asTKS

rus
IIu.m DONE KEYBOARD
INTERRUPT
:ENABLE TTY
S:RETURN TO CALLER

s*TK SERVICE ROUTINE
s*THIS ROUTINE WILL SERVICE THE TTY KEYBOARD INTERRUPT

RRRRRIR RRRRRRRRRRRRR|RRR

s*BY READING THE CHARACTER FROM THE INPUT BUFFER AND PUTTING
s*IT IN THE QUEUE.
;«IF THE CHARACTER IS A "'CONTROL=C’* (“C) STKINT IS CALLED AND
:*UPON RETURN EXIT IS MADE TO THE '‘CONTROL-C'* RESTART ADDRESS (.MONIT)

134134

177600

000021

000003

§TKSRV: MOVB
BIC

CMP

308:

046162
044736

001230

000023

fic.smm

JMP
cMP
BNE
CMP

LMONIT
(SP) .47
2%
#SWREG, SWR

CMP
BNE

#X, STKCNT

TST

(SP)+

TYPE

3s:

C EAN m XON OFF STACK

JSR

BEQ

2%:

(SP)+

;3:)L#SXON

(SP) .43
1$

000176

ssPICKUP THE CHARACTER
..STRIP THE JUNK

cMP
BNE

TYPE

18:

000001

BNE
ST
RTI

xg -(SP)
#4177, (SP)

BR
CMP

SCNTLC

(SP)+

38’

. SBELL

58
(SP) 423

IS IT A MM XON?
..BRANCH IF
TURN

..IS IT A CONTROL C?
: ;BRANCH IF NO

¢sINIT THE KEYBOARD
s:CLEAN UP STACK
:sCONTROL C RESTART

:1S IT A CONTROL G?

: :BRANCH IF
::1S SOFT-SWR SELECTED?
::60 TO SWR CHANGE
::1S THE QUEUE FULL?
..BRMCH IF NO

Rl NG THE TTY BELL
sCL EAN CHARACTER OFF OF STACK
o-fl'lflx

3
3

EEE@E@EBE
RETRERESS SSSERECEERReeesy

130A(1052) 21*0(7-.1 09 21 PAGE 16‘

SEX T

;IS IT A CONTROL-S?

\s\fl\h—.

Sy
W

17:03

21-0(1’-81

134020

318:

134012

000021

133764

48:

BNE
CLR
ST

044735
58:
L

K13
PAGE 166

x; -(SP)
#4C177,(SP)
(SP)+, 421
318
$TKCNT

..coum THIS CHARACTER

BGT
BIC

X3
#40, (SP)

::BRANCH IF YES
*:MAKE IT UPPER CASE

INC

$TKQIN

TST8

BPL
MOVB
BIC
CMP
BNE
INC

CMP
BLT
CMP
MOVB
CMP
BNE
MOV
RTI

32¢
asTKS
(SP)+

SEQ@ 0166

: ;BRANCH IF NO
..oxsm.e TTY xevaomo INTERRUPTS
*CLEAN cm OFF STA
..um FORA CHAR
..Loor uml. ns THERE
*GET THE
CTER
SIMAKE IT -an ASCII
3318 IT A coumou.-o?
: :BRANCH IF NO

:‘r’}'

328:

044730

09 21

INPUT ROUTI

177000

i DU S

22838

zé

RRRRRReRRRpRERRRRRRRRRE =2
PN &RERSRSRSRI
NS

sESmSEEeRe

gsrxs

#100,38TKS

(SP) ,#140
A3
(SP),M75
<sP$+.asmm

..ggemw E TTY KEYBOARD INTERRUPTS

::IS IT UPPER CASE?
*:BRANCH IF YES
::IS IT A smm. CHAR?
2:AND PUT IT IN QUEUE
::UPDATE THE POINTER

$TKQIN, #STKQEND ..so OFF THE END?
5%
: :BRANCH IF NO
#STKQSRT,$TKQIN :;RESET THE POINTER
: SRETURN

wviviviinaunminawn

NN
N
o

FETS
RS

'SOFTUARE SWITCH REGISTER CHANGE ROUTINE.
:*ROUTINE IS ENTERED FROM THE TRAP HANDLER. AND
WILL
:*SERVICE_THE TEST FOR CMANGE IN SOFTWARE SWITCH REGISTER TRAP

RRRRR]RR

000176

001140

:*CALL WEN OPERATING IN TTY INTERRUPT MODE.
$CKSWR:
#SWREG, SWR
318 me SOFT=SWR SELECTED
aue

133672

::EXIT IF NOT

158

..xr NOT, EXIT

#°C177,(SP)

SMAKE IT

a$TKS

MOVB

@S$TKB,=(SP)

CMP
BNE

(SP) ,#?
2s

BPL

133666
177600
000007

15$

TSTB

BIC

SIS A CHAR WAITING?

YES

7-BIT ASCII

..ls IT A CONTROL=G?
}w"‘5"1 PUT IT IN THE TTY QUEUE

AR RAAAARARAANAAAAARN
AN AAAANANNAANNNRRANARARRAARANAARNARRARASY

s*CONTROL IS PASSED TO THIS POINT FROM EITHER THE TTY INTERRUPT SERVICE

NO NN
W
W)
~N
NO~

&~
285\‘&5
O =

SO
NN
~o

(V]

SRRoRR
R R ;§ 28

:*ROUTINE OR FROM THE SOFTWARE SWITCH REGISTER TRAP CALL,

SRaEen SepeeR
Kfifg&‘%‘v{‘.
S

000 N

vl v

3
=3SSSSSSSSRRRERERst
RRg:383
8

pury

[« ]

MACY11 30A(1052)

000001

AS A RESULT OF A

;*CONTROL-G BEING TYPED, AND THE SOFWARE SWITCH REGISTER BEéNG SELECTED.

és:

CMPB

BEQ
ST

JSR

(SP)+

PC,STKINT

ARE WE RUNNING IN AUTO-MODE?

ZBRANCH IF YES

..CLEM CONTROL=G OFF STACK
FLUSH THE TTY INPUT QUEUE

asiks

#1.SINTAG

..ser INTERRUPT MODE INDICATOR

TYPE

,SCNTLG

::ECHO THE CONTROL=G (*G)

MOV
TYPOC

SWREG, ~(SP)

..SAVE SWREG FOR TYPEQUT
rvpe-ocm. ASCII(ALL DIGITS)

CLR

-(SP)

$SGTSWR: TYPE

198:

CLR

MOVEB

001135

?wroen

TYPE

.SMSWR

,SMNEV

*DISABLE TTY KEYBOARD INTERRUPTS

::TYPE CURRENT CONTENTS
PRW FOR NEW SWR

::CLEAR COUNTER

CZKMDAO DMS11=DA STATIC MACY1
CIKMDA.P11
20-0CT-81 17:03

130A(1052) 21-0(7-81 0921 PAGE 16’

101
1o§
}84
105

045
ooso:.g
g g‘ 105777 133570
100375
045
117746 1335

5133
1
gno
11

S
s
5376 1
045400

INPUT ROUTI

78:

3}89 825323
062716 1;768(‘)

3"5 3:54.04

1
5412
8114 045414
gug 045422

8117

6162
001135

000001

oo;
01277 ooo1og 133522
137 00233
8s:

8118
8119
3120
151
g}g

045426
021627 000025
0454
1005
045434
104401 046167
045440 oezrog 000006
045444 00073

98:

8124
8125

045446

108:

021627

000015

8126 04545 001922
8127 045454 005 62 000004
8128 045460 00140

a1§3 04
8130
04564

mg 045500 123727 001135 000001

8133 045506 001 ;
8134 045510 012777
000100 133426
8135

04551

313

045526

138

0455

8140
gm

0455
045540

814
8144
8145
314.9
8147

8139 0455
14.;

8148

004

8156

044132

0024

MOVB

rc"? (SP)

148:
15$:

168:

-(SP)

::1S 1T A CONTROL=C?
:;BRANCH
IF NOT
$3YES, ECHO comou.-c (*C)
..CLEAN UP STAC

BNE
MOV
JMP

3
#100,a87KS
LMONIT

wwc IF NO
$3ALLOW TTY KEYBOARD INTERRUPTS
::CONTROL=C RESTART

cMP
BNE
TYPE
ADD

(SP) ,#25
108
,SCNTLU
#6,SP
98

::18 n A CONTROL=-U?
H IF NOT
..vss. ECHO CONTROL=U (*U)
: IGNORE_PREVIOUS INPUT
SSLET'S TRY IT AGAIN

(SP) 415

3318 IT A <CR>?

(MPB

BNE
ST
BEQ

SINTAG.#1

MOV
ADD

2(SP) ,@SWR
#6,SP

BNE
MOV

15
#100,387KS

:SBRANCH IF NOT
:RE-ENABLE TTY KBD INTERRUPTS

JSR

rc.sr;:sc

TYPE

RTI

CMP

BLT

BGT
BIC

#60, (SP)+

o:.sssg 00140
82”5
16
045554
16
0455
16
045
8° 266 099992

BEQ
ASL
ASL
ASL
INC

78
(SP)
(SP)
(SP)
2(sP)

045564

CMP

SCRLF

igum.n

000060

005766

000002

056616

177776

106401
000720

001234

TST

178:
188:
.DSABL

EENABLE TTY xevaom INTERRUPTS?

:3BRANCH IF NO
..vss. IS IT THE FIRST CHAR?
:;BRANCH IF YES
$:SAVE NEW SWR
:3CLEAR UP STACK

(MPB

m
4(SP)
118

042726

045544

S:MAKE IT -en ASCII

(SP) .43
13
SCNTLC
#6,SP

000067

3915

::THE NEW SWR
:3CHAR THERE?
::IF NOT TRY AGAIN
::PICK UP

MP
BNE
TYPE
ADD

881

3150 32”72
151
045576
155

;

021627 000060

8149 045570 00066
a1s§

20$:

016677 000002 133450
°3£ 06
11$:

8131 045476 104401 oo“%zngg

3139 045520

-(SP)
’ms

BIC

000003

401
og

CLR
1ST8
B8PL

SEQ 0167

8IS

B8R

TYPE
B8R
LSB

(sm MN67

188

:SECHO <CR> AND <LF>

:SRE-ENABLE TTY xao INTERRUPTS?
SRETURN

$3ECHO CHAR
S:CHAR < 0?

22BRANCH

IF YES

SICHAR > 77

$SBRANCH IF YES
$:STRIP-OFF ASCII

%(sfi

::1S THIS THE FIRST CHAR

=2(SP), (SP)

:3SET IN NEW CHAR

$QUES
208

*BRANCH IF YES
..uo. SHIFT PRESENT
;i
CHAR ovsa TO MAKE
ROOM FOR NEW ONE.
*:KEEP COUNT OF CHAR
*GET THE NEXT ONE

SSTYPE 2<CRO<LF>
$3SIMULATE CONTROL=-U

tttltttttt.ttttttt'ttt't.'!t..ttl.tQt..t.tt'tt..tt.'.'t"t.'t.t

S4THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY

CZKMDAD DMS11-DA STATIC CV11 30A(1052)
CZKMDA.P11
20-0CT- 117:03

1
161

816;
316

8165
8169
816
8168
8169
8170
8171
817
8173
8176
8175
8176
8177
8178
8179

04561
045616
065613
Okggs
0456264
0456;3
0456
0456%%
045636
045644
045650
045656
045660
045666

5602

11646

000002

016666

5066
005046
012746
000002
5737
1775
005337
117766
5;37
023727
100;
01273
00000

LRE
PAGE 168

044735

044732

..?USH gOUN THE PC AND

CLR
CLR
MOV
RTI

4(SP)
-(SP)
#648,=(SP)

..GET READY FOR A CHARACTER
sPUT NEW PS ON STACK
..PUY NEW PC ON STACK

1T
BEQ
DEC
MOV8B
INC

srxcnr
1$
STKCNT
a$TKQOUT,4(SP)

s:WAIT ON A CHARACTER

MOV

000004

4(SP§,2(SP)

$TKQOUT

::POP NEW PC AND PS

s ;DECREMENT THE CCUNTER
..GET ONE CHARACTER
:UPDATE THE POINTER

CMP

$TKQOUT, csrxoeno DID lT GONSFF OF THE END?

MOV

#STKQSRT,$TKAOUT'& -RESET THE POINTER
: :RETURN

BNE
2:

s:GET A CHARACTER FROM THE QUEUE
ssCHARACTER IS ON THE STACK
s;WITH PARITY BIT STRIPPED OFF

(SP) ,=(SP)

SRDCHR: MOV

18:

RTI

H IF

l't.tttt..t'..ttttti'.'."'.t...Q.‘.t.Q...t...".'..'.'t'...Qt.

'E:{S ROUTINE WILL INPUT A STRING FROM THE TTY
@

8189
8190
8191
819%
8193
8196
8195
8196
8197
8198
8199
gggo
1
820%
8203
8204
8205
8206
8207
8208
8209
8210
8211
8212

Y INPUT ROUTI

648:

8180

8184
8185
8186
8187
8188

09 21

s*CALL:
CHR
e
i
RETURN HERE

164

21-0(7-81

L
:t

H®

045670
045672
045676
045700
045704
045706
045710
045712
045716
045720
045722
0457%6
045732
045732
045742
045744
045750
045752
065723
045762
045764
065768
045770
045776
046002
046006
46010

010346
005042
01270
022703
101456
104410
112613
122713
001022
005716
001007
112737
104401
01;71?
00530
020327
1034
111337
104401
000746
005716
001609
11273
104401
00501
12271
001003

RDLIN
RETURN HERE

SRDLIN: MOV
CLR
1$:
MOV

2$:

CMP

BLOS

RDCHR

108:

0461;
1777

6$:

046124
046122
046122

000134
046122
000025

046122
7$:

#STTYIN+30.
,R3
5%

CLEAR THE RUBOUY KEY

..GET ADDRESS
..BUF;ERYEULL’

<:G0_READ ONE CHARACTER FROM THE TTY
s:GET CHARACTER
A RUBOUT
..IS };

(SP)+, (R3)
#177,(R3)
5%

MOv8
TYPE
MOV
DEC
CMP
BLO
MovB

#'\,98
.98
#-1,(SP)
R
R3.ASTTYIN
4%
(R3) ,9%

;60 READ ANOTHER CHAR.

BEQ
Move

78
#'\,98

::TYPE A BACK SLASH

CMPB
BNE

#25,(R3)
8s

TYPE

5$:

-($P)
lSTTYIN R3

MOVB
CMPB
BNE
TST
BNE

046122

R3 =(SP)

s:INPUT A STRING FROM THE TTY
s sADDRESS OF FIRST CHARACTER WILL BE ON THE STACK
:;TERMINATOR WILL BE A BYTE OF ALL 0°'S

TST

TYPE
CLR

(SP)
63

(SP)

.98
(SP)

..IS }?Izofflf FIRST RUBOUT?
::TYPE A BACK SLASH
::SET THE RUBOUT KEY
::BR

YES

.'SET¥PPE° TYPEOUT THE DELETED CHAR.
0

..RUBOUT KEY SET?
IF NO

::CLEAR THE RUBOUT KEY
..IS CHARACTER A CTRL V?
::BR IF NO

8s:

000022
1235
6124

48:

001234

B8R

$:60 PICKUP ANOTHER CHACTER

:3CLEAR THE BUFFER AND LOOP

(MPB
BNE

#15,(R3)+
23

::CHECK FOR RETURN
::L00P IF NOT RETURN

TYPE
ST

,SLF
(SP)+

::TYPE A LINE FEED
:SCLEAN RUBOUT KEY FROM THE STACK

CLRB

MOV
MOV

MOV

2 2

NS
SHWNOO

STTYIN

S:TYPE THE INPUT STRING

$QUES

SSTYPE A *2°

$3ECHO THE CHARACTER

(g;>.9s

::CLEAR RETURN (THE 15)

=1(R3)

:SRESTORE R3
SSADJUST THE STACK AND PUT ADDRESS OF THE

(SP)+,R3
(SP) ,~(SP)

4(SP3 ,2(SP)

#STTYIN,4(SP)

FIRST ASCII CHARACTER ON IT

: sRETURN

BYTE

STTYIN:
SCNTLC:
SCNTLU:
SCNTLG:

.BLKB_
.ASCIZ
.ASCIZ
.ASCIZ

30.
74C/<15><12>
/°U/<15><12>
/4G/<15><12>

SMNEW:

.ASCIZ

/ NEW =/

.SBTTL

READ AN OCTAL NUMBER FROM THE TTY

.BYTE

.ASCIZ

:*STORAGE FOR ASCII CHAR. TO TYPE

<15><12>/SWR = /

: s TERMINATOR

::RESERVE 30. BYTES FOR TTY INPUT
::CONTROL '€
::CONTROL 'V
::CONTROL ‘G

L L

b tiibiobiebuietiiabobbiui

s*THIS ROUTINE WILL READ AN OCTAL (ASCII) NUMBER FROM THE TTY AND
s*CHANGE IT TO BINARY.

s*THE INPUT CHARACTERS WILL BE CHECKED TO INSURED THEY ARE LEGAL
s*OCTAL DIGITS, IF AN ILLEGAL CHARACTER IS READ A '*?"" WILL BE TYPED
;*FOLLOWED BY A CARRIAGE RETURN-LINE FEED. THE COMPLETE NUMBER MUST
s*THEN BE RETYPED. THE INPUT IS TERMINATED 8Y TYPING A CARRIAGE RETURN.
2=CALL:

822 §gdddd

°:§§§§:

WSS Sooo

—

i
i
*
000004

000002

SRDOCT: MOV

MOV
MOV

18:

046352

RDUCT
RETURN HERE

MOV
MOV

RDL IN

MOV
MOV
CLR

::READ AN OCTAL NUMBER
$3L0W ORDER BITS ARE ON TOP OF THE STACK
*:HIGH ORDER BITS ARE IN SHIOCT

(SP) ,=(SP)

::PROVIDE SPACE FOR THE

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

S:PUSH R1 ON STACK
::PUSH R2 ON STACK

4(SPS ,2(SP)
RO, =(SP)
(SP)+,R0
RO,S5$
R

INPUT NUMBER
3
::PUSH RO ON STACK

S:READ AN ASCIZ L{NE

2:GET ADDRESS OF 1ST CHARACTER
SSAND SAVE IT
:3CLEAR DATA WORD

EEW

MOV
RTI

SMSWR:

3
RS

::TYPE A CONTROL 'V

’
::6G0 START OVER
:31S CHARACTER A '“R'%?
::BRANCH IF NO
::CLEAR THE CHARACTER
'LF
SSTYPE A "CRTM &

?9:2

98:

$SCNTLU

1
0;2.(n3)
3
(R3)
.SCRLF

TYPE

38:

SEQ 0169

B8R
CMPB
BNE
CLRB
TYPE
TYPE

RSNS 24

HHOONNS
NOW—=O - 0O — b WO~
bNO
=
=
ONNON
=
WYW NN = N = =

2332822SSR
NEoers333588R :
b
d md

TYPE

046167

E—————_—_—g—_g—_ g —_g—_—_g—g—_g— g~ oy P W -

w
-

0000

®
S

—

p—y

—

255552 =3
—

z
w

—b

R
RR R R R R RRS
SNES bt i 2 AP P A- VONOWVESW

alal

09:21 PAGE 168
30A(1052) TTY21-0CT=81
MACY11
INPUT ROUT INE
17:03

210(1-.1
09:21 PAGE 178
OCTAL NUMBER FROM THE TTY

046322
046326
0463
(0463
0463
046340
046342
046344
046346
046350
046352
046354
046360
046362

3s:

000012
046362

ROL

ADD
BR
TST

MOV

MOV
MOV

MOV
MOV
RTI
TST

CLRB

b1 H

001234

$HIOCT:
.SBTTL

TYPE

WORD

TYPE

.WORD

(31

..PICKW THIS CHARACTER
I ZERO GET OuUT
MAKE SURE THIS CMCTER

..IS AN OCTAL DIGIT

]

R1
R2
R1

R2
#-C7,(SP)

(SP)+,R1
23
(SP)+

R1,12(SP)

R2.$HIOCT

s:%8

2:STRIP THE ASCI! JUNK

..ADD IN THIS DIGIT
LOOP

..CLEM TERMINATOR FROM STACK

23SAVE THE RESULT

(SP)* R

;:POP STACK INTO R2

(SP)+

2:RETURN
ssCLEAN PARTIAL FROM STACK

(SP)+,R‘l
(SP)+.RO
(RO)

L, SQUES

2:POP STACK INTO R1
::POP STACK INTO RO
::SET A TERMINATOR

J:sTYPE UP THRU THE BAD CHAR.

33" (R

..TRY AGAIN

’

R LF"

:HIGH ORDER BITS GO HERE

READ A DECIMAL NUMBER FROM THE TTY

RARNAAANARAANA AN RRAAAARAAAARAANAAANNRANANAAANARAAAAACOOES

'THIS ROUTINE WILL READ A DECIMAL (ASCII) NUMBER FROM THE TTY AND
;*CHANGE IT TO BINARY. IF 1'00 MANY CHARACTERS OR ANY ILLEGAL CHARACTERS
s*ARE READ A °*?'' FOLLOWED BY
A CARRIAGE RETURN-LINE FEED WILL BE TYPED.
:*THE COMPLETE NUMBER MUST BE RETYPED. THE INPUT IS TERMINATED BY THE
:*USER TYPING_ A CARRIAGE RETURN. THE RANGE OF THE INPUT NUMBER IS
;*POSITIVE 32767 TO NEGATIVE 32768.
s *CALL:

v
i

000004

000002

000055

::PROVIDE SPACE FOR

RO,=-(SP)

: ;PUSH RO ON STACK

4(SPJ,2(SP)

MOV

R1,=-(SP)

MOV

RDL IN

MOV
MOV
CLR
CLR
(MPB

BNE

:;READ A DECIMAL NUMBER
“:NUMBER IS ON TOP OF THE STACK

(SP) ,~(SP)

MOV

18:

046532

RDDEC
RETURN HERE

SRDDEC: MOV

8298

#'7,(SP)
43

ROL
BIC

320

8295

(MP8
BLT

BGT

177770

046316

(RO)+,=(SP)
3s
#'0,(SP)

ASL
ROL
ASL

8285
8286
8287
8288
8289
8290
8291
8292

CLR

MOVB
BEQ
(MPB

ASL

3538
S3SE

8284

2%:

?3’3%§

OO—=O0ONO

8283

005002
1

33333333
SEESEINITS

2
3

8269

}’.‘

CZKMDAO DMS11-DA
S!AT‘
¢ C
TM 130“1052)

CZKMDA.P11

R2,-(SP)

(SP)+,R0
RO,6$
-($P)
R2
#'-, (RO)

::THE INPUT NUMBER

*PUSH R1 ON STACK

*:PUSH R2 ON STACK

S:READ AN ASCIZ LINE

::ADDRESS OF 1ST CHAR.
::SAVE INCASE OF BAD INPUT
::CLEAR DATA WORD
::SIGN SET POSITIVE
::SEE IF A MINUS SIGN WAS TYPED

::BR IF NO MINUS SIGN

CZKMDAO DMS11-DA sm‘c MACY11 30A(1052) 21-0CT=81 09:21 PAGE 17‘1'

CIKMDA.P11
8
8
[

20-0CT-81 17:03

046426
046426
046430

112002
112001
001424

8331
8332

046436
046440
046444
046446

003032
122701
oogt.zr
032716

334

0464564

006316

°§23 0464
8

8333

046452

READ A DECIMAL NUMBER FROM THE TTY
28:

12%01 000060

001024

046460

046464
046466

006316
006316
062616
102416

046474

060116

8340 046470 162701

8342

8343

8344
8345

8347
8348
8349
8350
gg;
8353
8354
8355
8356
8357

046476

MOVEB
MOVB
BEQ

000071

170000

::SAVE FOR LATER USE
*:PICKUP THIS CHARACTER
$:GET OUT IF ZERO

BGT
(MPB
BLT
BIT

5s
#'9,R1
53
#AC7777.(SP)

::IS A DIGIT BETWEEN 0 & 9

ASL

(SP)

(SP)
(SP)
(SP)+,(SP)
5§

tiug
s:%8,
::+10.
: :OVERFLOW ISN'T ALLOWED

BNE

MOV
ASL
ASL
ADD
BVS

000060

SUB

102412

R2
48
(SP)

::CHECK IF NUMBER IS NEG
S:BR IF NO
*IYES==NEGATE THE NUMBER

(SP)+
(RO)

48:

MOV
MOV
MOV
MOV
RTI

046524
046526
046530
046532
046536

005726
105010
104401
000000
104401

58:

ST
CLR8
TYPE
LWORD
TYPE

8358 046540 000720

::SAVE <OR LATER

ST
BEQ
NEG

012666 000012
012602
012601
012600
000002

68:

$:BR IF NUMBER WOULD OVERFLOW

*:OVERFLOW ISN'T ALLOWED

005702
001401
005416

001234

(SP) ,=(SP)

::DON'T LET NUMBER GET TO BIG

046502
046504
046506

046510
046514
046516
046520
046522

$SMAKE SURE THIS CHARACTER

$:STRIP AWAY THE ASCII JUNK

BVS

3s:

#'0.R1

ADD

046500 000752

SEQ 0171

(RO)+,.R2
(RO)+.R1
3s

(MP8

8335 046456 011646

335
8337
338
8339

R1,(SP)

(SP)+,12(SP)
(SP)+.R2
(SP)+.R1
(SP)+.RO

$QUES

+:L00P

::SAVE THE RESULT
::POP STACK INTO R2
$:POP STACK INTO R1
$:POP STACK INTO RO
* SRETURN

::CLEAN PARTIAL NUMBER FROM STACK
*:SET A TERMINATOR
S:TYPE THE INPUT UP TO BAD CHAR.
::POINTER GOES HERE
Sitmiecges gi pr

S:TRY AGAIN

ggg

.SBTTL

8361

: ;t'tttttttttttttttttttt't"t.t'tttttttttt.ttttt.tt'.tttt'tt!ttt'

33322

:#SLSTAD WILL CONTAIN THE LAST AVAILABLE MEMORY LOCATION

8362
8363
8364
8367

8370
8371
8372
8373
8374
8375
8376

ROUTINE TO SIZE MEMORY

S:ADD IN THIS DIGIT

S*CALL:
iw
JSR
PC.$SIZE
ta
RETURN
046542

046544
046546
046552
046556
0465
046572
046576
046602

010046

010146
013746
013746
012737
015737
013746
013746
010600

8377 046604 104400
8378 046606 012637

$SIZE:

000114
000116
000116 000114
000002 000116
000004
000006

MOV

RO,=(SP)

::SAVE RO ON THE STACK

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV

R1.=(SP)
::SAVE R1 ON THE STACK
ari14,-(sP)
*:SAVE MEMORY ERROR VECTOR PS & PC
a116.-(SP)
16,3014
::IGNORE PARITY ERRORS WHILE SIZING
#RTI.a#116
@NERRVEC,-(SP) ;:SAVE PRESENT ERROR VECTOR PS & PC
@NERRVEC+2,~(SP)
SP.RO
::SAVE THE STACK POINTER

TRAP
MOV

(SP)+, 3#ERRVEC+2

:;SET THE ERRVEC PS TO THE PRESENT PS

006

8379 046612 012737 046632
8380 046620 012701 020000

000004

MOV
MOV

#28 AWERRVEC
#20000,R1

::PUSH OLD PSW AND PC ON STACK
::SAVE THE PSW IN @#ERRVEC+2
;:;SET FOR’ TIMEOUT
*:FIRST ADDRESS

CZKMDAO DMS11=DA smgc
MACY11 30A(1052) z1-ocr-s1 09:21 PAGE 173

CZKMDA.P11

20-0CT-81 17:03

8
8:66
8
6632
gsas 046636

4
6

005711
005721

000775
162701 000002
01

309 0466640 81 637

8387
8388
8389
8390
8391
339§

TINE TO SIZE MEMORY

000006

18:

(R1)

2s:

BR
SUB
MOV

02 m

MOV
MOV
MOV
MOV
MOV
MOV

<smo.uenave
(SP)+.an116
(SP)+.an114
R1,8LSTAD
(SP)+,R1
(SP)+.RO

046644 012637 000004
046650 012637 000116
046656 012637 000114
066660 010137 046672
012601
6666 012600

MOV

8393
839

046670
046672

000207
000000

8397

046674

017600

000000

.WRITE: MOV

8399 046706
017601
8400 046710 062716
8401 046714 020027

000000
000002
000010

MOV
ADD
CMP

gggg

8398
8402

066720

8405

046734

8407
8408

046746
046746

8410

046

SLSTAD:

8403 046722 042737 000017

840%

0462700 177760
050037

046746 WPRI:

046746

WPINS:

8409 046750 000423
8411

046752 012737 000020 047010

8413

046764

8414

8415

8416

046760

052700

766

103376

046770

046774

8417 047

8418

8419
8420
8421
al.zg
32%:.

047

047010
047012
047016
047020

006100

042700

004000
047010

18:

104416

000012

8427
8428

000010

047040

0462737

000360

8430 047043 012701 000004
8431 04705
300
8432

047054

*YES GO TO WRITE SECOND.

BIC

005301

:CLEAR OLD PRIMARY ADDRESS

B8R

WREX

;G0 TO EXIT

MOV

oem WINST1

;SET THE WRITE BIT

ROL

BIC

#4C340,R0

MOV

R1.WINST2

ROMCLK
122100

BIS

BCC

.READ:

R1.4(R4)

T11,R0

*LOAD DATA INTO SEL4

:SET A MARKER INTO RO

*ROTATE TO ALIGNE ADDRESS

sCONTINUE UNTIL MARK FOUND

RO, WINST1

:LOAD THE SECONDARY ADDRESS

,PRI12

*MASK EVERYTHING ELSE

*LOAD DATA

PRI

047072

RPRI:

18:

MOV

:GET THE REGISTER

RO.#10
RSEC

STEST IF A SECONDARY
*YES GO TO READ SECONDARY

#% Ri
RO

SLOAD A SHIFT COUNT
*SHIFT SECONDARY ADDRESS

#2,(SP)

BIC

mo RINST

DEC

P
BLT

MOV
ASL

ROMCLK

;822 3?5599 553%

a(SP) RO

ADD

8436

104415

mir
RO

:LOAD NEW PRIMARY ADDRESS

BNE

047070

WPINS

*GET THE DATA
*BUMP THE STACK
STEST FOR SECONDARY nssxsm WRITE

RO, WPINS

8433 047056 001375

fi%é

a(5P) .R1
#2,(SP)
RO.#10

;READ THE KMC11 PR'MARY OR SECONDARY KMC11 REGISTER ROUTINE

000000

8429

;GET REGISTERS

us c

BIC

WINST1: 0
WRITE
WINST2: 0
WREX:
EXITT

8426 047026 062716 000002
020027
00 4;7

::CONTAINS THE LAST ADDRESS

BLT

WRITE

000010

a(sP) RO

..LAST ADDRESS
*RESTORE R1
*:RESTORE RO

:BUMP THE STACK

BIS

010137 047016

8425 047022 017
047032
047036

WSEC:

177437

050037
000000
104416
000000
000002

PC
0

:;RESTORE MEMORY ERROR VECTOR

#2, (SP)

MOV

104415
122100

::TRY ANOTHER
..onop BACK
RESTORE THE STACK

ADD

BIS

8406 046740 010164 000004

::TEST THIS ADDRESS
::STEP TO NEXT ADDRESS

(sfi».manvecoz+;RESTORE ERROR VECTOR

;WRITE KMC11 ROUTINE

062716 000002
002414

RTS
.WORD

umo

SEQ 0172

gfg

:8‘3?2§¥°

:BUMP THE STACK

*CLEAR THE OLD ADDRESS

LOAD THE REGISTER ADDRESS

-l

—>
) [o
<L)

0990846

Ngg NOg_.... 2228 &
>38'88
288
W

—3

b
b
D
e
e
d
b e
o
e
b e
b

RINST:

21004

MOV
MOV
MOV

1774

BIC

047146
004000

RSEC:
18:

177437

047146
000012
000010

MOV
MOV
BR
CLR
BIS
ROL
BCC
BIC

BIS
WRITE
RINST1: 0
READ
MOV
MOV
MOV
MOV
MOV
MOV

b
b e

REXIT:
EXITT
.MSTCLR:

000100

CLR
BISB
CLR

000001

000002
000004
000006
001262 047232
000011
000002

000001

000003

000001

000000 000006
ooooog
000007

ROUTINE TO SIZE MEMORY

b e

17:03

b e

WA
=

AR R RRRRRRRRRRRRRRRRRRRRR
NNNNNNNNNNNNNNNNNNNNNY
=%
~
a3R
o
~
NIERREFREGE EXNrruoREI
N~N o
>
=4
R
WS
w
W

IIIIIIIINA
- gz33
BRIUFAR
)3 333333333 o8
SRR
S I
%

MACY11 30A(1052) 21-0CT=81 09:21 PAGE 17§

000001

08:
-ROMCLK:

1$:

CLR
CLR
CLR
MOV
WRITE

(SP)+,RO
(SP)+.R1

::POP STACK INTO RO
::POP STACK INTO R1

#4C<377>,(SP)

:CLEAR UPPER BYTE

4(R4) [=(SP)

R1,=(SP)
RO, =(SP)
REXIT
RINST1
#BIT11,R0
RO
18
#4C340,R0

RO,RINST1
,PRI12
,PRI10
(SP)+,RO
(SP)+.R1
(SP)+.R2
RO, ~(SP)
R2.=(SP)
R1,=(SP)

(R4)
#BIT6.1(R&)
(R&)

2(R&)
4(R4)
6(R4)
CLINE,108
,PRITT

.WORD

BISB

#BIT1,1(R&)

EXITT

MOV
ADD

SEQ 0173

a(SP) ,6(R4)
#2,(SP)

2:PUSH 4(R&) ON STACK

:;PUSH R1 ON STACK
::PUSH RO ON STACK
:GO TO EXIT
;CLEAR THE OLD INSTRUCTION
:SET ROTATION STOP MARK
*ROTATE LEFT TO ALIGN ADDRESS
:CONTINUE UNTIL MARK FOUND
*MASK EVERYTHING ELSE

:LOAD THE REGISTER ADDRESS
;READ PRIMARY 10
::POP STACK INTO RO
::POP STACK INTO R1
+:POP STACK INTO R2
::PUSH RO ON STACK
::PUSH R2 ON STACK
::PUSH RT ON STACK
:%:CLEAR RUN, IF UP

*SET MASTER CLEAR

;:CLR THE CSR REGISTERS

;RELOAD THE LINE NUMBER
:RETURN

:SET ROMI

:LOAD THE INSTRUCTION
:BUMP THE STACK

BISB #BIT1!BITO 1(R4) :CLOCK INSTRUCTION
gif?r
#8IT21BIT1/BIT0,1(R4)
;CLEAR ROMO, ROMI, STEP

s*THIS ROUTINE IS USED TO MASK DATA RETURNED
s*FOR TESTS THAT READ PRIMARY REGISTER'S
:*16,17. THIS ROUTINE WILL DETERMINE THE LINE

000010
001254 047350
047350

000001

047350

LMASK:
_*

’

; *NUMBER AND CALCULATE THE MASK CHARACTER

MOV
MOV

#8. R1
LINBYT,9S

:COUNT SHIFTS

?E\cf

#98 R2

:.aLINBYT

RORB
ROLB

(R2)
1(R2)

BITO>C
‘C > BIT8

SWAB

F 14
CZKMDAO DMS11-DA
StAY‘C ?9(5;1 30A(1052) 21-0(7-01 09:21 PAGE 174
CZKMDA.P11
ROUTINE TO SIZE MEMORY

8493 04

177777

%‘23"5 o«% 143337 047350 wii
3239 83%50E 000207
000000
98:

8498
8499
8500

047352

000000

MASK:

#-1,MASK

BICB 9%,MASK
5XITS

SEXIT

:CALCULATE MASK CHARACTER

315581

850
8504

MOV

SEQ 0174

*CRC=32 MAINTENACE CHECK

047354

.CRC:

ggz 047354 000137 047364

JMP

CRCENT

8507

:THIS ROUTINE uxu CALCULATE THE 32 BIT CRC CODE GENERATED

8509

;18 x320x264x230x220x160x120x11ox10*x80x70x50x40x20x01

8508

8510
8511
851
851
8514

8515

8516
8517
8518

*AS A RESULTOF THE 32 BIT DATA STREAM.

047360

047362
047364
047370

000000

000000
005037
104401

8519 0473764 000425
8520

8521
8522

047450
047450

8529
8530
8531
ass§
8533
853,

047462

047470
047476
047500
047506
047512
047516

012737

010237
010337
012737
012702
012703
000261

177777

047526
047530

006137
103404

8545

8547

8548

047550

047554

005737

001425

::658:

B8R
643
GET OVER THE ASCIZ
.ASCIZ <15><12>/ENTER ufi TO 10 DIGIT OCTAL MSG.CODE/<15><12>

047362

RDOCT

:FLAG TO INDICATEENTRY POINT
CALFLG ;FLAG TO INDICATE ENTRY POINT
,65$
;:TYPE ASCIZ STRING

MOV
MOV
B8R

(SP)+,R2
sHIoCT, R3
+10

MOV
MOV
MOV
MOV
MOV

R2,$TMPO
R3.$STMP1
#323. . CRCNT
#016667.R2
#002301.R3

ROL

$TMPO

:GET LOW ORDER DIGITS
*HI ORDER DIGITS

:ENTER HERE WITH HIGH ORDDER DIGITS IN R3 AND
:LOW ORDER IN
R2
CRCCAL: MOV
#-1,CALFLG
:INDICATE ENTRY POINT

18:

001204

8538 047532 on.gsr 001202
8539 047536 074337 001204
8540 047542 005337 047360
8541 047546 001363
854
8546

047362

001202
001204
000040 047360
016667
002301

8535 047520 006137 001202
8536
8537

CRCNT:

648:

104412

8523 047452 012602
8524 047454 013703 046362
8525 047
000403
aszg
852
8528

*OR EXPRESSED OCTALLY AS
*THIS ROUTINE WILL READ UP TO A 32 BIT (BINARY) (10CIGIT OCTAL)
msn FROM THE TELETYPE CONSOLE IF ENTERED FROM LOCTION
:"'CRCENT:"*
AND CALCULATE AND PRINT THE RESULTANT CRC REMAINDER.
THE RESULTANT CRC CODE IS STORED IN LOCATIONS ‘‘CRCHI & CRCLOW'

CALFLG: 0
CRCENT: CLR
TYPE

047362
047376

THE CRC POLYMOMIAL

2s:

SEC

ROL
BCS

$TMP1
2s

isr

ALFLG

:USE STMP TO CALCULATE CRC

:LOW ORDER OF POLY
*HIGH ORDER OF POLY
;LEFT AND ENTER A ONE IN BIT O (CARRY)
:B=CARRY SET (NO XOR)

XOR
a ,STMPO
:EXCLUSIVE OR LOW
XOR
‘STMP1
*EXCLUSIVE OR HWI
DEC
cncm
BNE
1$
sm»o + TMP1 CONTAIN, THE CALCULATED CRC CODE
BEQ

:B=TYPE RESULTS

:MESSAGE CRC SO BIT31 IS'BIT 0 OF $TMP2 AND

:BIT O IS BIT 15 OF STMP3, THE CRC IS ARRANGED TO

CZKMDAO DMS11-DA STATIC CY11 30A(1052) 21-0(7-81 09:21 PAGE 172

CZKMDA.P11

20-0CT-81 17:03

TINE TO SIZE MEMORY

gsao

amecr THE SAME ORDER IN WHICH IT WOULD BE TRANSMITTED

aggg

8552

:IF IN GENERATE MODE

047556 013737

001202 001

ggé 047564 o1§7§7 881 04 0015?3

8555 047572 012737 000040 047360
assg 047600 006337 001206
8557

047606

006137

001210

38:

8558 047610 006037 001212
8559 047614 006037 001214
8560 047620 005337 047
8561

assi
8563

8564

047630

8567

047662

8571

047670

8573
8574

047700

8576
8577
8578

047704
047706

8572 0476764

8575

8579

000401

047636

64S:

047712

8584
8585

047720
047724

::678:
668
:

*DOUSLE PRECISION LEFT

STMPS
$TMPS
gncm
s

:SHIFT THE CARRY IN
:INTO LOWER WORD
:=1 TO TOTAL SHIFT COUNT

RTS
PC
;RETURN TO CALLER
:TYPE THE z OCTAL WORDS

B8R

TYPE

643

658

::TYPE ASCIZ STRING

MOV

$TMP1,=(SP)

::SAVE S$TMP1 FOR TYPEOUT
..me HIGH ORDER
360 we-ocm ASCII(ALL DIGITS)

*GET OVER THE ASCIZ

047364

.67

*TYPE ASCIZ STR

..ssr OVER THE ASCIZ

MOV

$TMPO, ~(SP)

::SAVE STMPO FOR TYPEOUT

JASCIZ

rvpoc

/ /

::TYPE LOW ORDER
so TYPE=-OCTAL ASCIICALL DIGITS)
Y AGAIN

CRCENT

:*THIS nounue ISSUES A LINE nestr TO THE CURRENT LINE

047726
047734

104416
000000
104416
000002

000011

000012

000001

.LRESET:

MOV

WRITE
.WORD

08:
22 L A2 a3 d

8589

WRITE
EXITT

CLINE, 108

;LOAD THE CURRENT LINE NUMBER

PRIV
O

,PRI12,BITO
i3

:ISSUE A LINE RESET PULSE
T3

I i

e 2222223 23232222223222223

rms ROUTINE WILL TICK THE MAINTENACE CLOCK

"N’ NUMBER OF TIMES, 'W'' WILL BE ON THE STACK

323?

ggg

22 t"nttnnt"nt"ttnnntttnntnntnt"nt"ntnnnnn

859,

047736

017637

000000

8596

047750

005737

050046

8595 047744
047754

8598 04775
8599 047762

062716 000002
003435

104459 000014

012637

050042

050046

.TICK:

0477 04.5737 177400 osool.s
8601 047774 05 7;7 000040 050042
64$:
8602 050002 004737 050036

860

sm:

TYPE

8583 047712 013737 001242 047724

8597

ROL

: COUNT

;

*+BEING EXERCISED.

8582

8588

m CRCNT

ASL

TYPOC

047676

gggg

8586
8587

MOV

;SAVE FORWARD ORDER CRC

STMP1 . STHP

-:658: .ASCIZ <1s><12>/cucm'rto CRC = /

047700 013746 001202
104402
000137

$TMPO, STMP

8568 047662 013746 001204
8569
8570 047666 104402
104401

MOV

BNE

000207

104401

MOV

ROR
ROR
DEC

047624 001365

047626
0476

8565 047634 000412

8566

SEQ 0175

osooog 005337 050046
050012

001416

MOV

a(sP) 678

ADD

o; (SP)

BLE

. TICKEX

READ

MOV

678

:BUMP THE STACK

.PRI4

;GET CONTENTS OF PRIMARY 14

67§

*COUNT TICKS

(SP)+,66

BIC
BIS
JSR

nmbom
6
5 s

BEQ

.TICKEX

DEC

:GET "W

::POP STACK INTO 668

ch ERRONIOUSE DATA
:SET MA BIT
*ISSUE WALF TICK
*DONE EXIT

SEQ 0176

e
§$:‘i

2737

000040
0036
050046
N

050042

BIC

#MA ges

BNE

648

WRITE

.PRIS

JSR
DEC

658:

000014

66%:
678:

000000

“§§§§§§§§=

b 4

;RESET MA

Ps 658
67§

sISSUE OTHER MALF TICK
:COUNT TICK

. TICKEX

*YES EXIT

sxxrs

.TICKEX:
EXITT
-SBTTL TRAP DECODER

*NOT ZERC CONTINUE

:TICK COUNT

SIARARRRNAARAAAAAAAAAANAACANANAANANARNAAAAAAARNAAAAAAARARAARAAAORAS

s*THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE '‘TRAP'' INSTRUCTION
s*AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS
s*0F THE DESIRED ROUTINE. THEN USING THE ADDRESS CBTAINED IT WILL
:*GO TO THAT ROUTINE.
STRAP:

(=1=1

N §
c2ss-\xg

050052
050054
050060
050062
050064
050066
050072

=g22

alsl

FRERRREZCIZECIEEEREEE gg3

H 14
DMS11-DA STATIC MACY11 30A(1052) 21 =0CT-81 09:21 PAGE 176
P11
20-0CT 117:03
ROUTINE TO SIZE MEMORY

MOV

RO,=(SP)

::SAVE RO

TST

=(R0)

s ;BACKUP BY 2

ASL

s;POSITION FOR INDEXING

RTS

Mov

Movae
050106

MoV

2(SP) ,RO
(RO) ,RO

$TRPAD(R0O) ,RO

::GET TRAP ADDRESS
::GET RIGHT BYTE OF TRAP
;;INDEX TO TABLE
::G0 TO ROUTINE

s;THIS IS USE TO HANDLE THE "'GETPRI'' MACRO
011646
6666

000004

000002

$TRAP2: MOV

MOV
RTI

.SBTTL

(SP) ,=(SP)

4(SPS,2(sP)

:sMOVE THE PC DOWN
::MOVE THE PSW DOWN
:sRESTORE THE PSW

TRAP TABLE

s*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED
:%BY THE "'TRAP'* INSTRUCTION.

$TRPAD:

ROUTINE

$TRAP2

22CALL=TYPE

+:CALL=TYPOS
+:CALL=TYPON
+:CALL=TYPDS

TRAP+4(104404)
TRAP+5(104405)

TTY TYPEOUT ROUTINE
TYPE OCTAL NUMBER (WITH LEADING ZEROS)
TYPE OCTAL NUMBER (NO LEADING ZEROS)
TYPE OCTAL NUMBER (AS PER LAST CALL)
TYPE DECIMAL NUMBER (WITH SIGN)

s s CALL=GTSWR

TRAP+6(104406)

GET SOFT-SWR SETTING

s s CALL=CKSUR
23CALL=RDCHR
2sCALL=RDLIN
s sCALL=RDOCT
2 sCALL=RDDEC
23CALL=MSTCLR

TRAP+7(104407)

TEST FOR CHANGE IN SOF T-SWR
TTY TYPEIN CHARACTER ROUTINE
TTY TYPEIN STRING ROUTINE
READ AN OCTAL NUMBER FROM TTY
READ A DECIMAL NUMBER FROM TTY

+:CALL=TYPOC

050140

«ROMCLK ;;CALL=ROMCLK

+10

CALL TO ISSUE A MASTER CLEAR
CALL TO CLOCK ROM ONCE

CZKDAO DflS"-gA
STA.“
MCV‘H 30A(1052) 21-0(7-81 09:21 PAGE 17;

CZKMDA.P11
1

8501 f

201

866
01
8664
5015
8665
050152

8666

TABLE

7%6

000001

JWRITE

;:CALL=WRITE

-LRESET s CALL=LRESET

-READ
TICK
DIAGED: .WORD
-END

s CALL=READ
::CALL=STEP

SEa 0177
TRAPH’(‘IO“‘I;) CALL TO WRITE ROUTINE

TRAP+17(104417) CALL TO LINE RESET ROUTINE

YRAPOSO(IO“SO) CALL TO READ ROUTINE
TRAP+21(104421) STEP CLOCK HANDLER

CZKMDAO DMS11-DA STATIC MACY11 30A(1052) 21-0CT-81 09:21 PAGE 1
CZKMDA.P11
20-0CT-81 17:03
CROSS REFERENCE TABLE == USER SYMBOLS

ABCA
ABCB

= 000020
= 000040

ABCC = 000100
APA
= OggQOg
BADCRC 03261

BCRAD. 001264
BITO = 000001

BIT00 = 000001
B8IT01 = 000002
8110% = 000004
BITO3 = 000010
BIT04 = 000020
BITO5 = 000040
BIT06 = 000100
BIT07 = 000200
BITO8 = 000400
BIT09 = 001000
8IT1
= 000002
BIT10 = 002000
BIT11 = 004000

18994
19004

19014
19144
3293

0064
17514

2456

17614
17404
17394
1738
17374
17368
17354
17340
17334
17324
17504

2559

BIT2

= 000004

17314
17304
17294
1728%
17274
17264
17454

BIT3

= 000010

BIT4
BITS
BIT6
BIT7
BIT8

8!T1§ = 010000

BIT13
= 020000
BIT14 = 040000
BIT15 = 100000

6358%

6419

1868

1874

2875

2493

1751
1750
1749
174
174
1746
1745
1744
1743
174
189

;925

594
8412

879

1875

8476

8477

7735
7633
1895

7741
1903

3156

6320

1894

8586

1908

6454

1907

1916

1915

1932

1923

1931

1984

2620

2621

2455

6470

6484

8473

1974

2420

2421

2455

2456

2493

1909

1917

1933

1973

2420

2621

2455

2456

2420

2621

2455

2456

8476

8477

8446

7601
7721

1892

1896

1897

1904

}zggl

}gg%

6321

6336

6348

8477
1910

1918

1934

1971

= 000020
=
0
= 000100
= 000200

17474
17464
17454
%zglil

1867
1389
1869
5%78

1871
1891
1872
;233

1899
1900
1888
1890

191
1912
1901
1902

1919
1920
1913
1906

2493
1972
1921
1914

2631
2631
2493
1922

841
2631

4357

8463

2421

2646

2°84

= 000400

17434

2939

3170

6404

6533

4157

4366

4502

4673

4844

5696

5980

6049

6110

6182

6278

8558'
4501
67§O
2181

8545
4502
4726
g‘ls

4504
674;
513

4505
47?1
5151

4549
5001
5164

4555
5014
5165

457N
5015
5167

4599
501
5168

4659
SgIg
5

‘67;
506
5219

4673
5069
5235

724
7715

99+
86544

BPTVEC= 000014
BSELO = 000000
BSEL1 = 000001
BSELi = 00000§
BSEL]

8;7
853

2529

gg’ = 88(1)%
=

BSEL4 = 000004
BSELS = 000005
BSEL6 = 000006
BSEL7 = 000007
CALFLG 047362
CCITT = 000001

CCP = 000100

CHRADR 041060
CKSWR = 104407

2493

323
9

SEQ 0178

};{‘7’5 4016
17584
19634
19644
19654

}gg;

6659

1898

1905

2420

19664

19674
19684
19694
19704
85164
18794
4675
gogz

8517«
4488
4676
g’gl‘l.

7;110
7590

262
763

1572' ;g

4 6§

;§15

5165

7400

5315

5465

5574

5814

5914

CZKMDAO DMS11-DA STAI‘C MACY11 30A(1052) 21-0CT-81 09:21 PAGE 180
CZKMDA.P11
20-0CT-81 17:03
CROSS REFERENCE TABLE == USER SYMBOLS

CLINED 001362

}gg%l 5175' 228?
19814

174

7566+

CLKDAT 0012
CMFLAG 001250
CONFIG 041
CR
=
1
CRCCAL 047665
CRCEN = ooogg‘
CRCENT 047
CRCHK =
0
CRCNT
047
CRC16 = 00000

1988¢
19844
72140
16260
6551
18834
8505
197;0
85154
1%800
5317
18844
19874
16674
72128
2177+
218§'
167
2007
2015

617
173+
7229
7831
6

7530«

7534

7343w
7841
85284

85174
279
8531+
4830
5318

8578
05
BSLgt
484
5363

2481
147
7269+
72154
2193#
1824
2009
2017
2047
2059
%071

530
785
7304
7;;1'
4
118
011
2019
2051
2061
2075

71834

CLINE

00124

CRC32 = 000007
CRC32F 001556
CRLF_ = 000200
CUNIT
041
CURTAB 041070
CYCLE
002576
DDISP = 177570
DF1
04101
DF2
06102

7568+

7569+

7125

7158

7570+

’?60
68

,163
58

7165

7168

7553« 7563+

8560+
4846
5385

4B47
5404

4B
5431

4897
5436

4913
5437

4932

5301

5314

5315

273
841

6399

6526

6650

7531«

7536+

7280+

7306

76420

7430«

7518

7522«

7526

7539

2013
2021

2025
2023

027
029

085
031

71724
203

2035

2037

2039

2041

2043

2073

2087

777

2073

2087

71094

047
087

;053
158+

2055

2089

7155#

7567+

6
8555«
4844
5369

DF4
DFS

041030
041034

2045
2057
2049

DF7

041047

2083

DH4
DH5

0402
04032

2057
2049

2059
;071

2061
2075

2063
2077

2079

19254

6278

6404

6533

6659

5117
011

013

DFé

DHé
DH?

041041

2081

2045

040
0460436
040526
050152

2081
2083
2085

DISPLA 001142
DISPRE 000174
DSWR = 177570
o1
040624

18244
17924
16724
00

DIAGED

DISCRC=

o1
DT4
DT5
DT6
D17

0460644

015

1814

2047

1204
71274
737»

S118t
12g
182
009

017

051

2126%

2019

2053
2063
2077

20%3

7593+

0%1

2055
2065
2079

2055
2065

SO 3

027

7149

039
7
1604

041
069

023

5033
061
2075

035
5093
077

037
095
079

ECRC_ = 000010
EMTVEC= 000030

19714
17614

3289
2104+

3415
105+

€535

6660

EMN

057

EH1§
EM

035726

036010
036064

0;9
031

71684

6882‘

68924
69004

102#

7751«

031
059
;071
16;'
71654

085

089

1754
2069

2069

0
057
2049
031
083

0460766

089
067
179

2067
7\4#

04
0407
04071
040726
040744

D18

SEa 0179

045

051

71524
04
07

CZKMDAO DMS11~DA STATIC MACY1
CIKMDA.P11
20~OCT-81 17:03
EM6
EMIS
EM1&
EMI7
EMI8
S
R
£
el
oz
EMSS
EM3%
EM3S
EM3S
EMS7
EM38
E
E
EM30
EM31
EM32
EM3S
EM34
EM3S
EM36
s

036107
036147
036207
036331
03631
03637
15
03641
O3eds
036sel
036811
036646
036704
036754
037032
0371
037155
035
03753
037515
037367
037445
037504
037526
037560
037607

EM39
EM,
EMG0
EMal

037742
035236
04
04011

037676

EMG2

EMS.
EM6

035311
035356

EM8
EMO

035466
035564

EM7

420

Emnck= 000900

1 30A(1052) 21-0CT-81 09:21 PAGE 18%

0
0
039
041
043
009
045
047
049
5051
053
055
057
5059
2061
063
2011
065
2067
069
5071
5073
5075
S077
079
-

081

5015
017

68354
68420

5021
5033

68554
68664

019

68484

2905

4557

MR
R
B
R
5226 5280 soB1 S285 s31

ETX
= 000003
EVENP = 000005
= 000020
EXCON = 000010
EXIT = 000207
EXITI = 000002

19304
188264
191
191
186
18654

GETLIN 045002
GNS
= eewves U

70834

19650 19020 2901
18

70654

7071#
gsare
70774

5089

SEQ 0180

6
9108
691
69
69
69574
681N
69414
69484
69548
6963#
6
&9
698N
69874
¢
7003#
gaoon
2010
70218
7090
70574
70434
70464
70518
708

5083
2013
5085
5087

ERRVEC= 000004

EXITY = 00080
GETKAC TM 04263

CROSS REFERENCE TABLE == USER SYMBOLS

4558

4562

4598

4599

4603

s32

EBEBRR
R
536 %430 3 35 55 %5 382

w39

@S9+

€386e

7290

7299

2115

2Tiee

2127+

7726

7721+

7725«

7732+

373

837

378

5560

S573

S574

5576

5620

5627

5628

5632

5652

5657

008r B BB
gl
7s1§:

mrs

aser

sen

1791

2167

2189

2199

2207

2213

7227

7235

7283

785

2146

2156

CZKMDAO DMS11=DA STATIC MACY]
CZKMDA.P11
20-0CT-81 17:03

GTISWR = 104406
HTY
= 880211
INCL =
005227
INIT

I0TVEC=

KIPARO= wessss |
KMCNT
041
KMCPO1
042470

1 30A(1052) 21-0CT-81 09:21 PAGE 183'

731

8650

86?2

;141
6644
19;“
19314

”Sgl
8

7841

2102«

2103«

72138

7253«

365
183
4504

KMCPO.
KMCPO
KMCPO4

82 476
504
06%512

74540
74584
74624

KMC

042526

764704

KMCPOS

KMCPO?7
KMCPOB
KMCPO9

KMCP10
KMCP11

KMCP1
KMCP1

KMCP14
KMCP15
KMCP16
KMCRO1
KMCRO2
KMCRO3

KMCRO4
KMCROS

KMCRO6
KMCRO7
KMCRO8

KMCRO9
KMCR10
KMCR11
KMCR12
KMCR13

KMCR14
KMCR15

KMCR16
KMCSO1

KMCSO.
KMCSO3

KMCS04
KMCSO05
KMCS

KMCSO

KMCS
KMCS09
KMCS10
KMCS11
KHCSli
KMCS13
KMCS14

0425

0425
042542
042550

065556
042564

82%572
600
042606
042614
042622
042466
042474
042502

04%510

042516

0425%4

042532
042540

045546

042554
042562
042570
042576

04%604

042612

0426;0

74664
74740
74784
74824

74864

74904

74944
74984

75024
75064
75104
74494
74534
74574

74614
74654

76694

74734
74774

74814

74854
74894
74934
74974

75014
75054

75094

042472

76514

042506

74594

045500

82%514
5;(2’
0425
82 536
544

042552
042560
042566
042574
04 605
04261

CROSS REFERENCE TABLE == USER SYMBOLS

8643
17594

74554

74634
74674
76714

74754

74794
74834
74874
764914
74954
7499
75034

7319

7324

7332

“gl.

7259+

7341

8655

“sgg

7407

3627

SEQ 0181
520

36;.

“gs

573

:660

gg:?

3222

8648

8663

7261
7835
7528+

= 000040
LM
LNLOCK= 000004
LNRST = 000001
= 000000
L
N1
= 000040
= 0001
L
= 00014
INS
= 000200
LNG
INS
= 000240
= 000
N6
= 00034
IN?
LOCK = 00000
LOOP
00245

LRESET= 10441

18914
19334
19234
19514
195;:
195
19544
19554
19564
19574
19584
19324
159

7216
611

7426
7841
7556

6346

6480

17714

2192

848
198

874
§§°

317

3486

3508

a;s
1

7220

558

002714
LTEST
MA
- = 000040

3797
2215
1880#

BoboN
2217#
8601

8605

1888#¢

3861

4020

191

7226

MASK

047352

= 000100

= 000200

MODTAB

041134

MSTCLR= 104414

NIDLE = 000010
NOTR
041122
NXTLIN 001252
NXTUN
002512

PIRQ = 177772
PIRQVE= 000240
PRI10 = 000010

PRI11 = 000011
PRI12 = 000012

PRI13 = 000013

PRIT4 = 000014

2354

5579

355

5697

18904
3861
5579
5697

216§

241

448

4841

5012

19104
7224
19854
2178%

3343
7251
7547«
2195

16714
17654
1935¢

8420

6277

18814

19390
}236'

5451

2241
2272

5916

2602

2626

2649

5671

3583

3605

631

365

5941
268

5982

4262
5933

6051

3159

3857

3356

3363

3367

7558+

7561

7571

5465

5467

5511

5245
276

541
44

2299

2483

5182

sgog

4158
5916

7;531

72200
B6SOW

5464

8453

gzeg
27

5312

3347
7273
7556

425
437
4707

| 4g
438
474k

ssga
6}25

558
8207

§319
022

89
316

849+

4262

6656

346
7211
7554
6808

5967
29

8493+

4158

gss

165

5178

-2318
4851

7540

goza

5113

19394
4680

7522

2522

sogz

5498
;ggg

7447H

486

2296

54
zggg‘

3557

5816

2295

4037
4311
469%

00
gae

2389

4020
5816

7279

8485

2388

19380

4025
4303
4686

7;54

7513

21
16654
19864

177

32
§175

462

4370

4680

693

037
393

485

71;

744

770

796

3749

775

5172

5322

06
390

085
1;

5022

3701

133
60

111
38

5470

6183

6289

485

6415

5022

6535

5172

3555

4035

«155

4255

4360

4499

4670

S517

S518

5522

5542

5547

%415
450

5417
452

2469
701

2534
820

6344

6480

8418

8451

2488

2490

5237

szgz

4370
051
7344

5571

4086
4398
4779

4134
44
435

559
6279

5607
6297

519
gszz

84984

4509

015
334;

524
ga?o

6111

4509
111
433

5690

5808

3866

591

3878

5978

3892

6048

3904

6109

3917

5470
6°81

3937

4171
4441
4865

4184
4454
437

& og
451
4915

4;0
452
4950

43
4
sgg

4276
4573
osg

4287
4608
5050

56
6405

570
642

5752
65

sr;g
65

5761
6580

826

584
6684

5
isi%

5§32

861
2697

533

4020
sgfe

5350

4158
5916

&5533

4370
6351

5§47

4509
6111

6 g
KMC TBE
= 00001
LF
LINBYT 001254

436

7520

KMCTAB

7507#
75118

16
624

KMCS15
KMCS16

SEQ 0182

20-0CT-81

CZKMDA.P11

182
09:21TABLEPAGE
21-0CT-81
30A(1052) CROSS
CZKMDAO DMS11=DA STATIC MACY11
SYMBOLS
USER
==
REFERENCE
17:03

_—

CZKMDAO DMS11=DA STATIC MACY11 30A(1052)

CIRMOAPTT | 20-0CT-81 17.08
PRITS = 000015

PRI1E = 000016
PRI17
= 00001
PROTEX= 000001
PROTEY= 000002
PROTEZ= 000004
PROTO = 000100
PRO
= 000000
PR1
= 000040
PR.
= 000100

PRS
PR,
PRS
PR6
PR7

= 000140

61
6281
esgg
ofga
19400
13614
19600
1907¢
19084
19094
19134
16834
16894
16904

000200
000240
000300
000340

PT
PYRVEC=
RAC
=
RCRCE =

041166
000024
000004
000002

7222
17600
1892¢
19740

= 000001

18754
4656
5208
5848

RDA

= 177776
= 177776

RDATA1=
RDATA2=
RDATAS=
RDCHR =
RDDEC =
ROLIN =
RDOCT =

READ

000001
000002

104410
104413
104411
104412

= 104420

16520
169
16944
16954

16684
1669#

1915#
19164
1917#
7241
7067
7
2156

2242
2628
2
$162
§
3585
3787
4

4287
4458
4636
4857
5036
5219
5413
5617
5820
6069

REGIST 001240

09:21

PAGE 184

89
2?91

6317
6660

2350
84
Sos
5
3208
90

2353
203
251
3299
3491

6331

6662
15

33
3?90

6345

08
500

i9
67
15
3507

19
3511

1669
2151«
7237

6407

6415

6451

6465

6467

6481

23
1

3939
8283

3940
6286

394
8409

4088
6412

4089
6471

4093
6485

6540

6543

6593

65%

6598

666

3939
45446
5245
5857

3949
4581
5265
6574

3953
4610
5358
6685

4088
4715

4098
4752

4102
4781

4189
4886

4210
4923

4292
4952

4313
SOS8

4417
5095

4443
5115

3549
3597
3645

3%
3604
3652

3
3608
3656

2384
9747
3027
248
50
3654
3904
4184

2417
2773
3038
3258
61
3681
3917
4191

452
799
3065
320
88
91
3937
4200

90
2825
3075
396
98
200
3958
4208

256
2851
3086
3306
3509
379
4025
$212

2360
877
311
3
3537
3%
4037
4217
6441
4608
4783
4967
5186
369
3385
5761
4001
628

382

2604
2931
%1%
3354
3558
%

3536
3586
3632
7395
86584
8265
7389

2273
2651
2969
173
3392
3595
3798
4107

4294
4461
4686
4865
505
5237
5417
5634
5826
6072

3539
3587
3635
8191

8318

8522

22
2673
2979
3200
3402
3606
3
4118
4303
4515
469
4878
3060
§ 2
3428
56 §
584
6075

3540
3588
3636
86554

5506

5526

5615

5636

5729

5738

5763

B8656N

86574

2319
2695
2
3210
3413
3633
3878
4166

46311
4523
4707
4888
5069
Soe3
3476
Jed
5855
6078

2350
721
017
3221
3440
3643
3892
4171

4315
4536
4717
4897
5087
Goer
348
3701
5859
61 ¢

&377
4546
4726
4915
s
578
5408
Sro8
5869
619

4385
4555
47kk
4930
$13
53
3308
Sreh
380
@l

I|
|
|

2172+

541
6725

——

SEQ 0183 |

7238

5395
6710

——

CROSS REFERENCE TABLE =-- USER SYMBOLS

16914

=
=
=
=

239
3
5199
3247
3295
3487

21-0CT-81

4 92
4573
47S3
4938
81
536
33
57
5933
6135

44619
4588
4767
4950
5128
330
3308
57640
so37
6192

443
4596
4779
4954
5178
3360
5330
5750
sek9
07

123
34
3547
30
4052
42

444
4612
4796
4978
53
3%03
5765
6005
6281

4274

4807
5028
5210
5402

3607
5769
6017

0380
6331 gses o i U} GBS B LY 863 8 HB £n
19700 32a1s 3375 396, 5578 5305, S8i%. AT 2445+« 2483« 2519+ 2550+ 2581

CZKMDAO DMST1-DA STATIC MACY11 30A(1052) 21-0CT-81 09:21 PAGE 182

CZKMDA.P11

RENA = 000001
REOM

= 000002

20~OCT-81 17:03

CROSS REFERENCE TABLE == USER SYMBOLS

2603

g? Je

5579

5697

1g¥ao
-

18950

4799

861

2745

2650e

594

5951

84290
18934
8428
18944
18974
18964

B44SH
2719
S771
2771

2723
S772
2775

4109
5776
6137

4110
6080
6138

4114
6081
6142

6085

SEC3

SEC4

= 000003

= 000004

SECS = 000005

SEC6
SEC7

= 000006
= 000007

5705
5993
6309
e
3038
3885
4513
S198
5841

3396
2560
4717
5402
6075
2582

2823
4217

4978
6017
2606
4080
4862

5714
5995
6436
2628
3066

4970

3395
3958
4759
5417
6126
2719
2826
4461
6078
2926
4082
4882
5728

6185

8187

6290

6563
g8
3065
4026
4571
5326
5920
6292

19474

2650

2651

3157

3
3,87
4846
6278
19494
1950r
606
3702
4156

OBN
3488

OB
3497

1980
3267

2672
69

4521
5235
5869

2613
395

3190
396

6404

6533

B
3498
5315
6659

2606
606
3728
4259

2695
el
3729
4368

336
35
3
44

5015

6007

4016
429
49564
5638
6439
2746
2851
4636

5980
4315
5060
5740
6446
2747

2875
4726

6049
4419
5102
5765
6576
2771
2876
4767

3890
4272

3929
4291
5333

3931
4382
5356

4468

5939

5611
5991
6188
196
3036
3136
4430
5176
5818

5956

446k

047040
= 000002
047116
= 000001
= 000004
= 000004

= 000002

5952

4463

RPRI
RSA
RSEC
RSOM
RXAB
RXGA

SEC2

653

4226

2801

4967
6005
2603
4078
4711

6415

84528
B660N

4938
5949
19454
4066
4691

6289

4219

5165

4974

6111

8450*
8436

2799
4107

2850+

2749

6051

8445+
8407

3391
2559
4812
5360
6072
2581

2824+

4969

19114
19634
4588
5267
6069
19648
2798

279

4630

5916

4803

2797

2772«

4509

1898

= 000001

2046s

4370

= 000010

SEC1

2720v

ROR

= 000020
=

26%+

4158

5816

822"
8039+ Be3oe 84378

SECO

2672+

SEQ 0184

4020

REXIT. 0e7170
RINST 047072
RINST1
04714
ROMCLK= 10441

3406
4118
4783
SS0B
6129
2720

2825
4555

5128
6135
2929
4084
5033
582
6003

3411
4191
4888
5528
6132
2721

2849
4596
5219

2850
4625

5278

S369

5428

022

4627

5539

6680
2969
3074
4049
4684
5348
5922
14

5832
6058

2942
4188
5183
5847
6060

5923
6062

2078
3075
4162
4692
5385
59

2079
308
4169
4742
5474
5988

2088
3086
4198
4855
54
6055

4863
5583
6057

30l
3113
4285
4913
5605
6067

6548

3160

3162

3173

3860

4019

4261

Bl
3509

Wiz
3858

5696

339
4016
S814

4
4157
5914

37
652
375
4843

355
3656
7%
5014

35S
3edo
377
5164

300
305

w0
3507
5465
33
Jews
373
4501

2931
4168
5056

3415
4212
4930
S617
6218
2745

6183

6416

1909
%06
5574

4672

6418

10
/e

6443

3219
3917

5925
6064

2%
3112

6546

3221
3543

5927

2876+

2902+

4628

4798

6008

6012

6019

4445
5117
5859
7
2772

4458
5210
5933
ez

4546
5252
1
ert
2797

5322

5470

2877
4796

4807

2902
4897

3933
4402
5481

3935
45
5502

4050
4540
5590

5649

5929
6118

5935
6120

5937

6°22

6115
6586

302
3
4375
5048
5706
6117

6588

3027
3
4383
S
5750
612
6674

5016

5166

5316

4260
5980

350
4366
6049

345
4502
6110

1
4673
6182

3B
81
8
5314

3ses
3690
3787
5464

s
91

350
3700
3798
5695

47
¥,

3017
3122
4301
5026

5769

4
3983

57
P/

5573

58
3%

15
CZKMDAO DMS11-DA STATIC MACY11 30A(1052) 21-0CT-81
09:21 PAGE 186
CZKMDA.P11
20-OCT=-81 17:03
CROSS REFERENCE TABLE == USER SYMBOLS
SELO = 000000
SEL2 = 000002
SEL4 = 000004
SELE = 000006
SETTAB 04107
SF
= 000010

SOH
= 000001
SSL_
= 000040
STACK = 001100
STEP = 104421

STKLMT= 177774
STX
= 000002
SWR
001140
SWREG
000176
SW0
= 0000017
SW00 = 000001
S0l
= 000002

sw02
sw03
SW04
SW05
w06
sW07
SW08
SW09
sl
SW10
SWil
sW12
swi3
SWik
SWi5
su2”
sw3
S
SWS
swé6
sW7
SW8
SW9
SYN

= 000004
= 000010
= 000020
= 000040
= 000100
= 000200
= 000400
= 001000
= 000002
= 002000
= 0046000
= 010000
= 020000
= 040000
= 100000
= 000004
= 000010
= 000020
= 000040
= 000100
= 000200
= 000400
= 001000
= 000026

5813
19590
19604
1961#
19620
72168
18874
4068
4525
5046
5719
18864
19120
10
3877
4083
4397
4778

5177
5523
5856
5998
6121
6438
16704
19274
18234
7761
1793
17234
17130
17120
17116
17100
1709
17084
17078
1706#
17054
17064
17224
17034
17024
17014
17004
16994
16984
17214
17208
1719%
17184
17174
17164
17154
17144
19264

5913

7231

SEQ 0185

5979

3899
4173
4616
5194
5882

3906
4179
46
5239
5883

3907
4202
4702
5338

3911
4276
4746
5346

3919
4282
4787
5389

3920
4305
4867
5486

3926
4387
4873
5492

4054
4393
4917
5595

4055
4410
4958
5601

3443
2im
3916
4170
4514
4BGk

3452

3459

3463

5015

5165

5315

5465

5574

3930
4183
4522
4B77
5262
5633
5926
6061
6131
6675

3932
4199
4535
4914
5327
5700
5928
6063
613
6683

3934
4216
4572
4949
5335
5707
5930
6065
6186
6706

3936
4267
4607

4036
4273
462k
5027
5386
5735
5987
6071

4051

4065
4302
4693

4079
4376
4706

5475
5819
3992

5483

6123
6445

3895
4073
4575
S188
5837
5923
3442
2150
3903
4163
4453
4856
51
592
5921
6056
6125
6547

3890
2098
8035
2125

4272
2117+
8076
2139

5824
2119
8129+
8035

2125«

2139

759

7601

8074

8097

3960

4261

5016

5166

5316

5466

4069
4531
5089
5828
19284
3439
2100
3891
4085
4431
4795
5185
5879

5236
56
5926
6059
6128
6570

5349
5723
593
6068
6191
6721

5038
5710

6074
6291

6311

6116
6315

4081
4384
4743
5112
5497
5842
5
6119
6417

7629

7633

7721

7735

7737

5575

5815

5915

4685
5035
5412

1723
1722
1721
1720
1719
1718
1717
1716
1715
1714

3860

4059

BRODARIY RR & 500
o
FLS2BSKR RG2S

Vug ~$§M5
d-‘g

=e%
'an

BAACRSIINIR
NS

bpd —B

33
N

(=1

=N
3“WaSrd
S

NO\OO

VNN
S
O NWO
ON
OWVI0D
= =)

TERR = 000200
TKVEC = 000060
TLOCK = 000010

g3%ng

= 000002

21-0CT-81
AGE 18
CROSS REFERENCE TABLE == USER SYMBOLS

62;;
4

228

6522

4851
6289
4301

6699

TEOM

NINON)

TDATA2= 000100
TDAT
000200
TENA = 000020

©o
o ogvv

TDATA1= 000040

TCRCE = 000004

1 30A(1052)

—SVNS
VO

TAC_
= 000100
TBIiTVE= 000014
TBMT
= 000020

b d b d e \ ) e A\ =D b

CZKMDAO DMS11-DA STA
20-0CT

CZKMDA.P11

4162
5920

2480+
821+
4254+

5977+

7160

TST105
1ST11
ST

0347
004030
004162

1812
TST20
1ST21
TST22
TST23
TST264
TST25
TST26
TST27

003024
004722
005004
005
005162
005256
005352
005446
005542

F 15
CZKMDAO DMS11-DA STA TIC MACY11 30A(1052) 21-0CT-81_ 09:21 PAGE 188
CZKMDA.P11
20-0CT -81 17:03
CROSS REFERENCE TABLE == USER SYMBOLS

1ST52
TST53
1ST54
1ST55
IST56
TST57
1ST6
TST60
1ST61
TST62
1ST63
TST64
TST65
TST66
1ST67
1817
TST70
TST71
TST72
1ST73
1S176
TST75
1ST76
1ST77

012072
012300
012506
012714
013616
014522
0034
015204
015606
016542
017700
021036
022174
023176
0246200
3560
025202
025756
026540
027326
030072
030412
030744
031242

NN
N NN

007604
010012
010220
010426
0106
011042
011250
003276
011456
011664

SENNAR
R WO - N -t NN =L
NN WWMN O =W~ a OISO

TST41
1ST4
1874
TST44
TST45
TST46
1ST47
TSTS
TST50
TST51

TXAB

4494n

- \D =

k=]

TYPON = 104404
TYPOS = 104403

Rgs

TYPOC = 104402

AUCD
OO 0o

TXGA =
10
TYPDS = 104405
TYPE = 104401

db—‘-‘“@—‘s
O=0NWVNOON

00661
00702
007226
003216
007376

TST35
1S136
TST37
TST4
1ST40

1ST

2856
88%

GO0 NN NN
NOONW=ON=O

005636
005732
0060;6
8821 6

~
o
Co

TST
IST31
TST
18T

SEQ 0187

3084
3132
; 05

7888

8096
8224

8570

7243
7600
7697
819

851

7281
7405
7788

8204
8564

CZKMDAD DMS11-=DA STAI‘C MACY1
CZKMDA.P11
20-0CT=-81 17:03
VINST1
WINST2

WPINS

047010
047016

046746

WPRI
046722
WREX
0470
WRITE = 104416

1 30A(1052) 21-0CT-81 09:21 PAGE 188

3211'
17+

8403+

84034
8409
615

199
01

CROSS REFERENCE TABLE == USER SYMBOLS

16
21

84084

sagz:
2450
78

488
88

209
11

323
4049
4188
4370
4540
4855
S085
5322
5502
5705
5913
5981
6055
6120
6309
6533

046752
= 000001

8402
18764

8410#
1879

Z
= 000004
SAUTOB 001134
$8DADR 001122
$BDDAT 001126
$8ELL
001230
SCHARC 044250
SCKSWR 045236
SCMTAG 001100
$CM1
= 000010
$CM2
= 000020
$CM3
= 000010
$CM6 = 00001
SCNTLC 04616
SCNTLG 046174
SCNTLU 046167
SCRAP = 177777

18784
18204
1815#
1817#
1854#
7790«
80744
1803#
1835¢
18354
1833¢
18434
8029
8095
8120
16284

= 000002

6676

6680

SEQ 0188

84194

05+

3858
4026
4169
4368
4521
4851
5056
5316
5496
5699
5847
5980
6051
6118
6292
6480
WSEC
X

219
39

2
861
4050
4198
4375
4571
4862

5164
sszg
557
5706
5914
sos;
605
6122
6314
6534
99

524
01
24

449
5
86

&
4; 9
438
467
&
5165
5333
5574
5714
5915

6058
61264
1
6535
6701

§719
ogg

59
80

745
osg
26

771
064
295

97
7
929
408
426
4606
4686

8418

3487
§o9o
902
4080
4261
440
468
4913
S172
5354
5579
5813
5920
5989
606
618
64
6548
8420

1884

7992

8039

4078
4§
4383
4673
4882
5166
5348
5575
5728
5916
5988
6060
6182
6344
6546

S014

5176
5385
5583
5814
5922
5991
6066
6185
05
6563
S1

79
074
305

507
728
931
4086
42
44
4691
S01S
5183
5464
5590
5815
5923
5993
6066
6187
6415
6586
8469

823
0

315
5

gr;
93
415
427
4501
4692
S016

5198
5465
5605
5816
5925
5995
6067
6188
6416
6588
8584

1880

1882

1881
2143+

1882
8088

1884
8245

7645
7807

804
7833+

8238
78384

2096
18374
18374

2106
18384
18384

2108
18394
18394

2109
18404
18404

18414
18414

18424
18424

18434
18434

18454
8238#

18464

18474

18484

18494

18504

18514

23264
5‘°°
SOL#
27034
2810
178
1634
328

7596
7800+
8654
2095
18364
18364
1835
18444
8110
82404
13
184
;9
4738
26114
2706
8144
29504
3146
348

823w
gt
g:
250
1%
104
28334
2953
1%
337

22240
608
506
9
on

g g

zgavc
2363
5118
93
3
84
29984
134
3824

2544k
639
7
8594
3001
1904
214

gssc
o5#
2547
6414
7554
;
»
32294
4

gaoc
98
5504
953:
5
8664
2‘
g

283
40;:
25674
961
62
28854
g49
384
13

758%

3761

37674

3807#

8484

39654

1877#

574

1880

1884

569

9594
1;10

754

144

40064

9
11;

54
74
935
4157
4285
4502
4711
S022
5206
5466
5611
5818
5927
5997
6110
6278
6418
6659
8586

18524

875
1;5

3
3556

3776
401
415
4291
4509
4742
5026

5235
5470
5695
5824
5929
6003
6111
6436
6660
8610

18534

1
36

586
78
4019
4162
4301
uq
84
5033
5314
5474
5696
5832
5935
6049
6115
6289
6443
6661
86614

160
391
359

4020
4168
4366
4520
4844
504
5315
5697
5841
5979
60
6117

6465
6674

H15
CZKMDAO DMS11-DA STAI"C MACY] 1 30A(1052) 21-0CT-81 09:21 PAGE 190
CZKMDA.P11
20-0CT-81 17:03
CROSS REFERENCE TABLE == USER SYMBOLS

4232

L2478

43214

4324

634

4487

5 gl
396

5539
9704

1L4
90 ”

6&0
90

670
90‘2'

56824
928
65

57854
6095

672

91010
677

76
00
804
2176+

7984H
68
7149

7152

7155

7158

97900

6794

7706
7754

7739

7745+

7754

7149
7609
7667
76524
7597+

715
7613

7155
7614

7158
7645

7160
7659

7162

793

7841

7638

7645

7749+

8652
1655
82984

8524

8093+«
7600+

8112
7645

8132
7656

8245

2111+
6276*
2112«
839%4#
5139
438

3856+
6402+
763

‘g" 49974 gg%o
SCRLF

001235

;3§§0

SOBLK

044716
035100
044706
001264

794
6791
7945
198

035032

2108+

SDTBL
SOVICE

AD
SENDCT

SENULL
oP

03507
035036
035107
035104
035006

SERFLG
RMAX
SERROR

00110
001115
043114

SEOPCT

68024
79
68104
68054
67844

18064
18124
2104

591+
110«
8%

001116

SERRTB
SERRTY
SERTTL

001264
043410
001112

18134
7607«
20044
7626
18104

SFILLC

001156

18314

001226

18534

SFILLS 001155
$GDADR 001120
S$GDDAT 001124
$GET42 035060
SGTSWR 045326
$SHD
= 000003
SHIOCT 046362
SICNT
001104
SINTAG 001135
SITEMB 001114

18304
18144
18164
6794
80964
1654
8287+«
18074
18214
18114

SLPADR

18084
6178+
18094
8390«
2129
8099

SLF

001236

SLPERR
SLSTAD

001110
046672

001106

IL = weeenn |
SMNEW
046212

33;

213
210
679
6798
2185

SERRPC

SESCAP

SEQ 0189

18574

2303

109«

7841

7645

7645
7750
7720

7645

7636

8228

4014+
6529*
7743

4359+
6653+
7748+

7629

767

7777

2%1 1

51 w

iig

SI198
2611

2544
61’

550
620

552
]

404

5980
62

685
764

284§
§92 #

209

7640

627

7841

240;

51
6024

Bg}

8484
2950

o
3384
5900

4104
8
04

2859
959

de,
421

L4898

4655K

465

SSOSI 54478 54

46604

43;80

48;9

58004

58964

5899

59044

59624

7697

7789

7841

8130

8218

7160

7162

7165

7168

7546+

7165

7168

7598«

7599+

7600

7606+

5011+
7754

5161+

5311+

5461+

5570

200;1 g‘l‘ # 51%" gl il g 78 5200

430

6934
2781

866
961

o
430

8238

8299

8359

4669+
7747«

4840+
7752

333

534

%gm

5388
936

2567
641

57§
64

8744
993

2885
007

4498+
7743«
7754

27
7

10
790

8
92674

WCOBR
623
ggl

4458

712
7964

de
469

2465

7184
307
9

e
10;8

5365’

CZKMDAO DMS11-DA STAI‘C MACY11 30A(1052) 21-0CT-81 09:21 PAGE 19{

CZKMDA.P11

20-0CT-81 17:03

SNULL

001154

SNWTST= 000000

SOCNT

044476

044500

§?"3

575

S77

S83#4

4
[
483

4
L35
4997

14
&
gogf

4
44
5004

4144
4691
0104

2284

99”
S
S006#

114
mw
S156#

0594
754
3

7902«

7915#

7738
6787«
7386
8655
8658
8656
8657

7744
978 *
64

6 i‘

63944
7873«

7868«

SREG4
SREGS
SREG6
SREG7?
SRTNAD

18414
18424
68084

SR2A

001176
001200
035102

= wmamane |

SSAVRE= weteen |J

$SCOPE 043564
$SETUP= 000127

6270

65224

7872«

7877

7278

758

;9;5

38310

4
44978
147

41 gl
465
515

4229

4247
4
gi

556
591
6170

69
5970
6266

704

4064

4414

G778

2428
401
58044

2904
L1488
SO08F

556
5904
6103
67744

3134

1074
7;30
54564

152#
7714
S65#4

Se4
S6B6#

7880

7891«

7917#

6809
8150

8221

8238

2108

67704
7751»
796
841

7144

561
590&
611

~R807

154
S69#
5992
61768

S460#4
5896
6101
6768
6894

SEQ 0190

7924

71
424
43830
5297

S
597
62728
5154

g“l

794

S
3‘3
483
104

42564
4

4831

794
6392

56914
2331
984

>
6040
6520

764

5984

”
‘69“
61728

5314
48354
62684

5544

8704

a:go

42514
S974m

864
43508
6044R

340
44934
61054

8296

8299

8357

8359

2109

2133

2136

6786

7590

7632

111
578
898
484
46

112
600
9 g
S
4837

230
624
965
581
008

261
647
013
g‘)
5158

229
66
061
77

2315
691
1
725
&

338
716
154
77;
56

18374
18384
1839#
18404

8659

2148
0914

83674

1654
37
74
1
54

16554
40

730

5
678
; ‘g

:';'xa ) 001146
STKCNT 044726

6454

$SIZE
04654
$STUP = 17777

1634

841

77144
2101

043720

210
0914

SSVLAD

721

545
580
604
99“

7722
18044
18554
81634
83134
81864
82604
81794
1833#
1835#
18364

001166
001170
001172
001174

5447
saog
604
65264

SOVER
043746
$PASS
001100
SQUES
001234
SRDCHR 045600
SRDDEC 046364
SRDLIN 045670
SRDOCT 046224
SRDSZ = 000036
SREGAD 001160
SREGO
001162
SREG1
001164

SRE
$RE

CROSS REFERENCE TABLE == USER SYMBOLS

25350
710

7715

210

803

7762

77464

244
4012

29.
415

5806
9001
7;(53{

17
44

5910

2104

8038

8039

1853
2479
gglz.o
0
4253

1854
2517
846
388
4352

S109
SSS
;27
36
4495

7710

7716

7; 2

5976
9909
09

;agl ;m %317
79894 8004+ 8039

7841
8056+

6046
7581

79
81%

9107
582

8245

174
Sgg
77

8009 8020
8172+

6270
7 gl-

9392
Sgo

9552
S

8050

8078

8105

7735

7739

?64601

7740

677
7

781
633
7746

CZKMDAO DMS11-DA STATIC MACY11 30A(1052) 21-0CT-81 09:21 PAGE 195

CZKMDA.P11

20~OCT-81 17:03

CROSS REFERENCE TABLE == USER SYMBOLS

$TKEN= 044735

43530 §822

STKQSH 044734
$TKS 001144

79000 8005 80
18 S 812 S

S$TKSRV

19058

STKQIN 0447
045

$TW0. 001903

005+

e£ S

2388
2561%
2696%
280

932«

018+
77«
3138
305
3307«

Joed

2390
256
0698
826+

3039s
3115+
3202«
3%
45+

Jae3e
3541

3463
3548+

3165
32s0e
331

3451+
3511+

3452+
351

§2¢
539«

3791

3731*

2299

3031
3114+
3201+
30
3321

3163«
349
3308+

3789+

297

3021

970t

029
090
3176
359
19«

3589
3655*

8066e

453%
2607
48%
0853+

3087+

3587+
3647

Paamne e,

806k

42
605+
725
852«

3079

3369

3730+

8063«

2418
583w
2722+
2827

943w

3367«
3446
3510«

;b'i' ST
P81 7988 8010« 80c6e 8048

2245

3019+

8062+

SEQ 0191

3393«

396

3596+
3656+

599
3682+

3799+

380

3733

3741

2971+

03«

2455+
0629%
2749%
0855

2973

3404+

7+
3«

3608+
3685

8e7+

3g6e«

3743

230e
2%

2631%
2751
0878+

2980+
3040e
311
3204
700
b

*
3549+

3610
3692+

3751%

3750«

3869

B0Sés

8076

8092«

8102

2322

8114s

385¢

491+
2632
2774w
2879+

35
76
301+
7

2981«

3042
124+
11e
3971«
8

76+

23¢
300
366

3490¢
3551

586+

136+

140

34
3693«

S
706

3871

3885
4173

3754

788+

3893«
3939«
4040

3894+
3940
4062

3895
39
4053+

3905«
3951
4055

3906+
3959«
4057

3907
3961
4067*

3909
4026*
4068+

4177
4220
4305

4178
4222
4312%

4185+
4269+
4313

4189
4275%

4192+
4276

4201*
4280

4202
4081
4387

4119+

4121

4209+
4088+
4391

4219+
.
4410

b4
4557«
4610
4696
4746
4799
4880
4939+
4981
5070«
5131

4524
4574+
4627+
4708+
476
4809+
489
694
5030
50764

5180

4525
4575
4628
709
4768+
481
4898+
4951+
5037+
50 9*
5187«

‘5%9
4581
4930
4715
4769
‘gas
4899+
49§5
50
5089
51

4547+
4599
4687+

8
4940
4983
5071+
5133

6517
4560
4626
4701
4760
4808+
4889+
4941
50;9'
5073
3179+

4530
4589+
4637+
4718+
477
4858+

5129+

4464
4556%
4609+
4695+
47645%
4798+
4879+
4933
4980
5028
5130«

3429+
5509«
5600
3702«
5751+
5828
5874
5954

5430+
551
590 *
570
5752«
583
5881«
6002«

5431
5553'
56
5722'
5755
5835
5882+«
6006+

5433
5522
591
5 12
575
Ss
5
6007«

5477+
SS‘gt
591 *
5 15
5762+
3844r
5885
6008

5376

5388+

5 gz

539§

4091

4463
4550
4601
4731
4797«
4872
4931+
4979«
SOS;'

4098

4100

4109+

I
5361 5
3370« 5371« 5 ;

4110

5478
2541'
920'
g 17
762
584
5934+
6010

4112

5485+
354
592
g 1
770+
5843
5938+
6018+

54
3546
5935'
g ;5*
771
Ss§8'
5939+
6019+

3918«
4027+
4069

4958
504
509
5195

3490
5586+
59
g
7
385
§ 8
602

938¢
4039+
4089

4
490
4968+
504
5103«

519

4916
4969
3051+
5105
3201+

3403+«

5405

549
5587
5950'
3 ;9
3774
3
394
602

499+
5%+
3631+
5737«
5821+
3870«
5950
6070+

4867
4917
4970
5052
14+

4787
487N
4923
4972
505
51

5414+

541

5202

5500
5595
3
5
58;
5871+
5951«
6073+

5599
54
g 43
827+
587
595
6076+

CZKMDAO DMS11-DA STATIC MACY11 30A(1052) 21-0CT-81 09:21 PAGE 19§

CZKMDA.P11

20-0CT-81 17:03

CROSS REFERENCE TABLE == USER SYMBOLS

6079+

6127

6130

6334
6428

6
6452+

7
6455

6670

149

95‘3-

6348
6464

195

959 ”

85
276
42

358+

298+
454+

6§ * 6
6485
STMP1

001204

8529«
18444
2389+

8535+
gl.l.t

675%
859
2%

676
854+
83

2724+
881
020+

725

%03*
00
0S5+

04
09+
og

‘3’54'
1
43

i‘

25;%

079
502

3871+

sTMP4G
$STMPS
$STMP6

001210
001212
001214
001216

fin’" 88(1)%52

1 gt
7%
44

541
g-

550+
7

3897+«

53«

6137+

6408
6468

6318«
64
6469
9596

6411
6470+

9;23

299
456

3;1457

32
$92*

386+
528+

750+
907
039'

51
933«
31

76%
34
041

828+
73
78«

i 1*
l.g
53«

S;
57«
5S4

§61t
58
464t

593

360
06+

137+

551
S7%

561+
58

3909«

910

780«

6426
6484
7

654

138

562

176

96
501+

599
3705+

3922+

3951

781

3802

4057

405

409

4630+

464

4700

4720

4721

4731+

4772+

497
5192«

4983
5213«

5063+
5225

5104+
5283+

4812«

4944
5118+

5342+

5374«

6121
4549+

4813
5375

4177«
4550

4871
4984
5214

5404

4891+

5042«
§224c

5405

5599«
5875
6140
630

5621«
5885+
6141
6319

6193
6322

5639
5942«
6194
6335«

7152
18514
1852#
18454

7155
6752«

8536

8539«

8553

8568

6453+

6483+

3872+
3953«
4113«
4531«
4773«
4974+

5284+
5601+
S886+
flls- «

3885+
4043
4179
4602+
4803
5043«
5344+
5718+
5944
SE}Z:

179

6225«

18474
18484
18494

761+
6556
6719

974

477

2479

482

32?23 ?;‘;0 ]
g e 50

91 O+
1

3
46
e me
502

654st

3898+«
4044
4223+
4603
4B13r
5044r
g 75«
19«
5955+«
6214

5622

4222+
4560

5529+
5775
6023
6285+

'529'

850

4043

41%84529

5512
§774«
6022«
6221

3952«
6102«
4530
4733
4973
5226
5600
5876«
glza:

6319

4042

4784+

6429

$STMP3

6136

4031

4773
284

S84+

6133«

630

960+

4101
4448

4963
5105

117

732*

4100«
G447

4613

89+

512+
10

3952

001222
001224
001206

533«

706

$TMP10
$STMP11
$STMP2

953 *

SEQ 0192

6596

442
460%

489

4933

5418+

5511+

5654+
5943
619
633

5756
6011
6220+
6428+

6597

6667+

749

3910
4059+
428B1v
4632
4872+
S076*
5434
5757«
63116304

3911+
072«
4282+
4642%
4873+
5134+

5435
5775«
6012«
6429

3923+
4073+
4392+
4643*
4903+
5135+«
5491
S??g6023
6430+

3924+
4092+«
4393%
4701+
4904
5193«
5492+
5836
6024+
6597+

6742

7165

7168

8558+

3943+
4093+
4467+
4702«
4944
5194+
5545+
5837+
+
6598+

*
4101+
4468+
4732+
4945+
5225+«
g
*
8§75+
6085+
6668+

59
614 277
290
2924 300 23
omm oy unoon, g oamoon,

315#
o

8553+

350559+

3899+
4058+
4224+
4631+
4B14r
5075«
5376
5756
5956+
6303+

4223
4561

8557«

6557

542

554

5564

564

576

S78#

586

CZKMDAO DMS11-DA STAI‘C MACY11 30A(1052) 21-0CT-81 09:21 PAGE 19&

CZKMDA.P11

20-0CT-81 17:03

CROSS REFERENCE TABLE == USER SYMBOLS

598

1 2

;7“

2;1
7%50

00115
00115
1150
050052
050074

$TRPAD
S$TSTNM

050106
001102

‘lg'

; 9

b75

204

/71

4228
4826
56456

6251
4B35
54584

42538
48374
5554

18284
18324
18274
flgz’

7830+
7771
782

7841
7841
7841

86594
8628
18054

86474
86604
864N
2196+

898+
84

g *
533+

39104
$ ;8
$TPB
$TPFLG
$TPS
STRAP_
$TRAP2
$TRP =

oM
04
1

2578+

5961
6;93‘

600+

578
7738

ue,

;:lou

4
;l

8420
99

gg ”

113

5
1

59764
6351

60%2
63

4479
5145
5686

BO4LBE
B6O6IN

BOLON
B662H

B6SOF
BO63N

86S1H
BO6LA

865;

2230+

2261+

2292+

2315+

65+
581+

3013«
9

1
7%

109+
725+

624+

35292+
4150+

3340+
4253+

.
4352+

36+
4495+

7593

764

7706

773

7766

7751

112

1478
389+
73834
8299

82374

STYPEC

77714
792

B638

8646

7834

7836

783

78114

8136

§099
185;
73
82374

;111
gSi'
I4 i #
8238

$SGET4= 000009
SOFILL 04447
$40CAT 000000
.
= 050154

-BEGIN

;004

7867«
17864
17714
4381*
72288
798644

7871«
7603
1787
4519+
72364
7988

7881
7716
17914
4690+
7284m
79924

868;
3
2163

8484w
2169

68014

20934

.CRC
.LRESE
.
.MONIT

047354
047712
047274
00233

85044
85824
35
1504

.READ
-ROEND

04702
001242

84254
19794

JMSTCL

04717

104

9
3

‘6620
544
5908

3244+
4012+

8233

8022

61744
6764

614
6646

‘gg‘.'
5
589%

196*
3854

8219

8647
78734
8648
7841
7841

617"
664

61074
6619

3
5

154+
773«

8201

78714
7870
78664
781
782
77244

723

4150#

2517+

8189

044
044314
044254
000023
000021
043610

707

4148

2479+

8188

STYPOC
STYPON
STYPOS
SXOFF =
S$XON_ =
SXTSTR

10
‘li’

2443+

7349
8651

7806

649
5295
5806

%’

618

1
o

2408+

STTYIN 046124
STYPBN= sxxeex |
STYPDS 044502

044252

401;‘

2372«

716+

6786

STYPEX

5
GuN

oan

2338+

6772%

7799

6105
65244

896
"

8657

6648+

04413

449
31584
786

86564

6524

8650

23'

86554

6396*

79304

5458+

ne,

8654

6270%

04376%

5308+

691+

86534

4837«

STYPE

5158+

669+

ous

401

60690
648

4666

9%2'

5008+

647

8544

43528
20080
5664

6?“
63964

4350
5209
55674

5974
o

4319
4995
5565

SEQ 0193

5567+

742+

5688+

768+

5806+

794+

5910+

820+

5979'

846+

6046

86584
2556+

872+

6107+

8649

79164
18024
72914
7993

1858
5032+
730
7994

8032

8115

4861+

480+

73428

B2454

21684
6809
7645
8359

219?'
1
004
85214

22004
;21“
7148%
71864
7754 @ 7841
8525

C KHDAO0fl$11-gA STAY‘% MACY11 30A(1052) 21-0CT-81 09:21 PAGE 19&
17:03

-ROMCL
-ROVAR
+START

047
38
1264
;

-TICKE
LMRITE

050050
046674

JICK

CROSS REFERENCE TABLE == USER SYMBOLS

84724
18624
1

8660
1795

2092#

597

04
1

8609

8397#

86144

SEQ 019

15
09:21
81_
TIC
H9C711
30A(1052)
21-0CTSTA
DMS11-DA
CZKMDAO
CROSS REFERENCE TABLE == MACRO NAMES
20-0CT -81 17:03
CZKMDA.PIN

197
PAGE

PUSH
REPORT
SCOPE

SET

577

17664
16444
16614

7930
17664
229

%
8

2785

3869

8262

8315

2260
599
964
gB

291
623
012
3676

3881

3895

457

5566

NNWWN:
OOON—=O

S ONNWNNON
NN =100 &
—00

O\
-

NN
SO =

SIENSILS

NN NN O WVMIWNINO 00~
=

RERCSLOD 2

w
~

(L IV VIV 2T T

2W2NW
o
WS
NONNIN S OO

=&
:§iofifl§
—

[V,

GEEe
s
W

ow—ug
own
e AV, ]

o WSS
S &~

OIS

ONSHNCT OO
avnmv'vcvnh
Vo

6127

1629¢

4955
5201
5414
3639
5860
6133

4760

O WM OO WNINO
O

79
599

6771

4951
5187
5403
5635
5856
6130

4745

NCOWVIVVNISNINSN

018

IWAANES
8 8 BN
N g&O&WN

3259
g499
740
4067
4295
4524
4727
4939
5179

2297
22
039
297
3538
3778
4108
631;
454

o
WVIONSNO

249
3489
3730
4053
4288
4516
4718
4931
5129

%991

274
696
028
3270
3510
3751
4087
4304
4537

(V1 T

3852
5908
16294
5222
16254
17664
2652

OQONNNONWS

PARTAB
POP

290
714
242
4251
6105
4028
5652

6749

00 =N OO VO H oW

NSET

259
689
194
4148
6044
3920
5542

377
136#
2228
§667
152
4010
5974
3869
3372
7187
2243
674

107

6215

094
443g
470
4921
5136
3
5758
6223

WM NVON & =

ESCAPE
GETPRI
GETSWR
MULT
NEWTST

614
6599
17664
17664
17664
17664
17664
645

SSB;

573
6200
6605

Skg
78

8595

S S8
o VIIAES
AUCO~ SSAO NN —

&
Sgg;
572

&
4424
4633

756
4074
4428
4644
M
5124
5393
5747

8475

s@Lo LaY ]

6320

204
745

8426

V= =N
= =0 &N O
O~O~ OGO
(=1=1. T 0G0

4415

247
67;
2
264

8400

S
N
oo~ NN ES 8 8 WNNWWNN
NN
Voo~ O ONIN & O O =~y
WNe~NWT NNO WNNN = N

254
9%
735
4045

8398

O NN
= YW N

192!0
17664
17664
1
656

VIS
85 85 8 85 WINNIANIND

BUMP
COMMEN
ENDCOM
ERROR

587

16
CZKMDAO DMS11-DA STAT C MACY11 30A(1052) 21-0(7-81
CZKMDA.P11
20-0CT- 117:03
CROSS REFERENCZ TABLE -- MACRO NAMES

09-21 PAGE 198

$380

i
s
8664
094
26

SLASH
SPACE
STARS

4558
5281

4599
5372
6426

8648

8649

277
§677
177

300
§699

6122
5960

226
4228
6028

1858
§:45
107
52
5908

2228
5667
152
4010
5974

6778
8588

SWRSU
TEST

3878

7687

7614

2164
7379
22164

2336

3892

6796

4941
5940

$538
§ir2
784

386
83
6353
9%20

4025
4807

4037
4897
5880

6662

7659

2186
7405

8575
7224

7233

d
e
e
e
e
e
e
d e
—

ooooonOrONONONON

2484

2520

4826

4997

5447

5556

3965

4229

4655

5785
5962

4981
6008

7310

7317

2370

71874

334
334

595.

8659

8656

20914
2446

7577

4636
5539

143
8655

8592

4625
5428

6591

TRMTRP
TYPBIN
TYPDEC
TYPNAM
TYPNUM
TYPOCS
TYPOCT
TYPTXT

3682

8
5631
6596

SEQ 0196

5147

5297

7281

7287

7297

7222

CZKMDAO DMS11-DA STATIC MACY11 30A(1052) 21-0(T-81 09:21 PAGE 198

SMSTCL
SPARAM
SREAD
SROMCL
SROVAR
SSECO
$SEC2
$SEC3
STICK
STSTN

le3or
16
16
de3as
1632¢
lec8r
16268
16254
16084
16284
162o#
le3d#
16334
1633#
16294
1625#

geus
100
3850
5906

2305
1
46
2218
2280
Bury
8461
7445
8423
8472
1859
3ei
2950
2703
8588
2226
s
310
4008
5972

CROSS REFERENCE TABLE == MACRO NAMES

430
143

2503

29
2303
Bioow
8472#

2326

2360

84614
84794
19904
gser
3181

2589
3518

2611

2636

2658

2680

86154
2257

2288

2311

233

2368

2404

687
319
4146

griz
30
4249
6103

SWRITE
$xZ

16284
16288

8395
2218

842
2224

SSCMRE
SSCMTM
SSESCA
SSLRST
SSNEWT

4997
5904
17964
17964
17664
16284
17664

5002
5962
1835
1843

5147
5970
1836
1844

8579
2228

85884
2259

2290

SSSET

8038

8647

8648

8649

$SSKIP

2266

2277

EQUAT

-HEADE
KT11
SSETUP
SCMTA
SEOP

-SERRO
“SERRT

2630
2641
g835
3103
3469
3848

2645
3107
3852
5908

263
3097
3803
5784
1644w
1644#
16440
16448
16448
1644k
1644#
1644#

2437
2658
¢8i0
3143
3478
3965

2667
315¢
4010
5974

655
3139
3962
589
1656

2091
1,96
6776
7575

2465
2663
2850
3148
3518
4006

2689
319
4148
604k

2677
3177
4122
1

o738
3gB8
4348
6170

2764
1336
4491
6266

2790
138
4862
92

2816
%3
4833
6520

2439

2255

2280

2286

2303

2309

5152
8031
1837
1845

5297
8040
1838
1846

5302
8092
1839
1847

5447
6101
1840
1848

5452

5556

2313

2336

2370

8650

8652

639%
8656

2357

2391

2714
3242
4251
6105

2300

26
3226
4228
6029

2503
2685
o885
3190
3566
414k

2740
90
4350
6172
2323

2726
3274
4319
6090

2511
2703
o892
3229
3575
4229

2766
3338
4493
6268

2752
3322
4479
6147

2546
2710
912
3238
3614
4247

2792
3386

2778
3370
4482
6229

2550
2729
917
3277
3623
4321

1842
1850

2406

2441

8655

8656

2429

3418
4653
6351

1
73

5563

9567
2736
2950
3285
3662
4346

1841
1849

2818
3434
4835
6522

2574

2842
80
5004
6644

2249

2473
2680
o866
3181
3527
4106

SEQ 0197

2844
3482
5006
6646
2464

2830
3466
482%
6487

WVINWMIWNYN
NOON-=ON

SLINEL
SLINE2
SLINTA
SLUt
SLUIA
SASK

20-0CT-81 17:03

Voo
O

CZKMDA.P11

CZKMDAO DMS11-DA STATIC MACY] 1 30A(1052° 21-0CT-81 09:21 PAGE 2
CZKMDA.P11
20-0CT-81 17:03
CROSS REFERENCE TABLE == MACRO NAMES

STYPO
S40CA

16444
16444

7841
1769

. ABS.

0501564

000

ERRORS DETECTED:

CZKMDA ,CZKMDA/CRF
/SOL /NL : TOC=CZKMDA
RUN-TIME: 148 148 14 SECONDS
RUN-TIME RATIO: 1063/313=3.3
CORE USED: 45K
(89 PAGES)

SEQ 0198