Digital PDFs

AH-T066B-MC

May 1983

229 pages

Original

12MB

view download

OCR Version

10MB

view download

Document:	CZIEAB0 IEU11-A,IEQ11-A IEU-IEQ STATIC DIAG MAY 1983 bw
Order Number:	AH-T066B-MC
Revision:	000
Pages:	229
Original Filename:	CZIEAB0__IEU11-A,IEQ11-A__IEU-IEQ_STATIC_DIAG__AH-T066B-MC__MAY_1983_bw.pdf

OCR Text

TEU/IEQ

STATIC

CZIEABO

DIAG

AH-TO66B-MC

v w83

FICHE 1 OF 2 wewusn:

IEU/IEQ STATIC
CZIEABO

DIAG

AH-TOGGB-HC_~mvins,
., ., GHEMRS
FICHE 2 OF 2 wepe v usa

MACRO M1113

PARAMETER CODING

06-SEP-B2 16:46

SEa 1

PAGE 2

.REM ¢
IDENTIFICATION
PRODUCT

CODE:

AC=TO64B-M(C

PRODUCT NAME:

(ZIEABO

JEU/IEQ STATIC

PRODUCT DATE:

SEPTEMBER 1982

MAINTAINER:

CSS MUNICH

AUTHOR:

PETER

REMARKS

TO VERSION B

DIAG

SEEBA(H

S04 0000000004000

INITCODE MODIFYED SO THAT SEVERAL UNIIS CAN BE RUN .
THE

CHANGES ARE

MARKED WITH

¢B»

UPDATED TO VERSION B BY PETER SEEBA(H, 6-SEP-82

THE INFORMATION [N THIS DOCUMENT IS
SUBJECT
TO
CHANGE WITHOUT
NOTICE
AND
SHOULD
NOT BE (ONSTRUED AS A COMMITMENT BY DIGITAL

EQUIPMENT CORPORATION.

DIGITAL EQUIPMENT CORPORATION ASSUMES NO

RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR

NO RESPONSIBILITY ]S ASSUMED

FOR

SOF TWARE ON EQUIPMENT THAT IS NOT

AFFILIATED COMPANIES.

FOLLOWING ARE

DIGITAL
DEC

THE

USE

SUPPLIED

IN THIS DOCUMENT,

RELIABILITY

DIGITAL

1983 BY DIGITAL EQUIPMENT CORPORATION

TRADEMARKS OF

PDP
DECUS

DIGITAL

EQUIPMENT

UNIBUS
DECTAPE

CORPORATION:

MASSBUS

OR ITS

PROGRAM HEADER
1‘-

15~
18-

CONTENTS

ON O VVVAWIWINLES B 8 8 WNUNNINNI NN RO AU PO PO PO NI NN —b b b b e b b b D b
N = ONOWVNOONWVINIDWNIOOONNOO
NS B NOPRWVMEB DN
OO
VOO NN
O S NNNOOPR SO
= NWOH =000 NNOWNIWO D —
WWANN NN
NN NN N
OO O WO N N
POW O ON NOMNO
OO £~ =) = NN

TABLE OF

AND

MACRO M1113

TABLES

SEQ 2

(06-SEP-82 1 6:46

PROGRAM HEADER

DISPATCH TABLE
DEFAULT HARDWARL P-TABLE
SOF TWARE P-TABLE
GLOBAL EQUATeS SECTION
GLOBAL DATA SECTION
GLOBAL TEXT SECTION
GLOBAL ERROR REPORT SECTION
LOCAL MACRO DEF INITIONS
GLOBAL SUBROUTINES SECTION
GLOBAL INTERRUPT HANDL ING ROUTINES

REPORT CODING SECTION
PROTECTION TABLE

INITIALIZE

SECTION

AUTODROP SECTION

CLEANUP CODING SECTION
DROP UNIT SECTION

ADD UNIT SECTION
TEST 1: REGISTER ADDRESSING

TEST 2:
TEST 3:

TEST

TEST 6:

INITIALIZATION TEST
R/W BIT TEST

TEST

SYSTEM CONTROLLER COMMANDS

INTERRUPT

TEST

ADDPESS REGISTER

TEST OF

TEST

(HANNEL

TEST 7: ADDRESS REGISTER TEST OF CHANNEL 2
TEST B8: DATA TRANSFER TEST
TEST 9: SECONDARY ADDRESSING TEST OF CHANNEL 1 (LIS
TEST 10: SECONDARY ADDRESSING TEST OF CHANNEL 1 (TA
TEST
TEST

11:
12:

SECONDARY ADDRESSING TEST OF
SECONDARY ADDRESSING TEST OF

TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST
TEST

15: INCOMPLETE SOURCE HANDSHAKE TEST
16: CHANGING OF THE CONTROLLER CONFIGURATION
17: REMOTE/LOCAL INTERFACE FUNCTION TEST
18: SERVICE REQUEST INTERFACE FUNCTION TEST OF CHANNEL 1
19: SERVICE REQUEST INTERFACE FUNTION TEST OF CHANNEL 2
20: PARALLEL POLL INTERFACE FUNCTION TEST OF CHANNEL 1
21: PARALLtL POLL INTERFACE FUNCTION TEST OF CHANNEL 2
22: END OF A MESSAGE BLOCK TEST
23: DMA DATA TRANSFER TEST FROM CHANNEL 1 10 2
24: DMA DATA TRANSFER TEST FROM (HANNEL 2 10 1
25: MCR FUNCTINN TEST OF CHANNEL 1
26: MCR FUNCTIUN TEST OF CHANNEL 2
27: EXTENDED ADDRESS BIT (Q22-BUS)TEST
28: ADDITIONAL STANDBY TEST

HARDWARE

SOF TWARE

DEVICE

INTERFACE FUNCTION TEST

(LI
(TA

13:
14:

CLEAR

2
2

TEST

DEVICE

CHANNEL
CHANNEL

TRIGGER

PARAMETER

INTERFACE

CODING

SECTION

PARAMETER CODING SECTION

FUNCTION

TEST

MACRO M1113

06-SEP-82 16:46

OnSSwin-=C

GENERAL

NOWVMBWN=O

OPERATING INSTRUCTIUNS
COMMANDSS
SWITCHES

N—=O

CRROR INFORMAT]ON

PERFORMANCE

DEVICE

KTM

TEST

b
o
o

il e
el

)

ol
cd
—

PN
HWIW

»
.

(¥, ]

oo
~

SEQ 3

PAGE 3
TABLE

PARAMETER CODING

PROGRAM LISTING

CONTENTS

INFORMAT]ON

PRGGRAM ABSTRA(T

SYSTEM REQUIREMENTS

RCLATED DOCUMENTS

AND

STANDARDS

DIAGNOSTIC HIERARCHY PREREQUISITES
ASSUMPTJONS

EXECUTION TIME

FLAGS
HARDWARE

QUESTIONS

SOF TWARE QUESTIONS
EXTENDED P-TABLE DIALOGUE

QUICK STARTUP PROCEDURE
TYPES OF

ERROR MESSAGES AND REPORTS

SPECIFIC ERROR MESSAGES AND REPORTS
AND PROGRESS REPORTS

INFORMATION TABLES

SUMMARIES

PARAME TER

CODING

MACRO M1113

06-SEP-82 16:46

1.0

GENERAL

1.1

PROGRAM ABSTRA(T

THE

INFORMATION

TEU-11/1EQ=-11

TESTS

DIAGNOSTIC

PROGRAM PROVIDES

DESIGNED TO VERIFY THE

FUNCTIONALJTY OF

THE

JEU=-11

INTEGRITY AND

JEQ=11

TEST 3,27 AND 28 ARE DEPENDENT ON THE

THE

SOF TWARE

SEQ &

PAGE &

P=TABLE

ANSWERS

(SEE

A SERIES

INTERFACE.

INTERFACE AND ON

6.27 AND 6.28).

THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC
RUNTIME SERVICES SOF TWARE (SUPERVISOR).
THESE SERVICES PROVIDE
THE INTERFACE TO THE OPERATOR AND TO THE SOF TWARE ENVIRONMENT,

THIS PROGRAM CAN BE USED WITH XxxDPe¢,

ACT,

APT,

SLIDE

FOR A COMPLETE DESCRIPTION OF THE RUNTIME SERVICES, REFER
TO_THE XXDP+ USER'S MANUAL.
THERE IS A BRIEF DESCRIPTJON Of
THE RUNTIME SERVICES IN SECTION 2 OF THIS DOCUMENT,

1.2

SYSTEM REQUIREMENTS

POP=-11/LSI-11

PROCESSOR WITH 32K MEMORY OR MORE

[€0-11
TEU=11

INTERFACE
INTERFACE

XXDP+

LOAD DEVICE

1.3

RELATED DOCUMENTS AND STANDARDS

XXDP+

USER MANUAL

CONSOLE

TERMINAL

(M-8634) FOR THE LSI
(M-,648) FOR THE PDP

(VT100,LA36,
(RX,RK,RL

(CHQUSA

ECT.)

)

[EUT11=-A OPTICN DESCRIPTION (YG-C03k(-00) OR
JEQ11-A OPTION DESCRIPTION
IEU/1EQ DIAGNOSTIC LISTING

ALL

1.5

PDP=11

LSI=11

ASSUMPTIONS

PROCESSOR DIAGNOSTIC

SHOULD RUN SUCCESSFULLY

MACRO M1113

06-SEP=82 16:46

PAGE &4-1

NONE
1.6

EXECUTION TIME

EXECUTION TIME IS DEPENDENT ON THE PROCESSOR SPEED AND THE TYPE OF
TEST EXECUTION (QUICK VERIFY PASS OR NOT):
THE FOLLOWING ARE TYPICAL EXECUTION TIMES OBSERVED ON A PDP-11/60:

QUICK VERIFY PASS ?YES ,EXECUTION TIME FOR THE WHOLE PASS IS 28 SEC.
QUICK VERIFY PASS ? NO ,EXECUTION TIME FOR THE WHOLE PASS IS 6,75 MIN.

!l:‘

PARAME TER CODING

SEQ 5

MACRO M1113

THERE

06-SEP-82 16:46

SEQ 6

PAGE S

ARE

NTAINS A BRIEF DES CRIPTION OF THE RUNTIME SERVICES.
FORMATION, REFER T O THE XXDPe¢ USER'S MANUAL (CHQUS).

—

mo
o2

OPERATING lNSTRUCYIONS
—t

2.0

[l
)

(ODING

—

PARAMETER

ELEVEN LEGAL

COMMANDS FOR

THE

DIAGNOSTIC

RUNTIME

SERVICES

(SUPERVISOR).
THIS SECTION LISTS THE COMMANDS AND GIVES A VERY
BRIEF DESCRIPTION OF THEM.
THE XXDP+ USER'S MANUAL HAS MORE DETAJLS.

COMMAND

EFFECT

STARY

START

CONT INUE

CONTINUE

RESTART

PROCEED

START

THE DIAGNOSTIC FROM AN INITIAL
THE

CONTINUE

DIAGNOSTIC WITHOUT

TEST THAT WAS

STAYE

INITIALIZIN

INTERRUPTED

FROM AN ERROR HALT

(AFTER *0)

EXIT

RETURN TO XXDP+ MONITOR (XXDP+ OPERATION ONLY!)

DROP
PRINT

CONSIDERED TO BE ACTIVE AT START TIM[
DEACTIVATE A UNITY
PRINT STATISTICAL INFORMATION (IF IMPLEMENTED

ADD

DISPLAY
FLAGS

IFLAGS

ACTIVATE

A UNIT

FOR

TESTING

(ALL

UNITS

ARE

BY THE DIAGNOSTIC = SECTION 4.0)
TYPE

TYPE

A LIST OF
THE

STATE

ALL DEVICE

ALL

INFORMATION

FLAGS

(SEE

CLEAR ALL FLAGS (SEE SECTION 2.3)

SECTION 2.3)

A (OMMAND CAN BE RECOGNIZED BY THE FIRST THREE (HARACTERS.,
YOU MAY, FOR EXAMPLE, TYPE ''STA'" INSTEAD OF °''START'',

PARAMETER

(ODING

MACRO M1113

2.2
THER:
THESE

06-SEP-82 16:46

SEQ 7

PAGE 6

SWITCHES
ARE SEVERAL SWITCHES WHICH ARE USED TO MODIFY
SWITCHES ARE APPENDED TO THE LEGAL COMMANDS.

SWITCHES ARE TABULATED BELOW WITH A BRIEF

SUPERVISOR OPERATION.
ALL OF THE LEGAL

DESCRIPTION OF

EACH,

IN THE CESCRIPTIONS BELOW, A DECIMAL NUMBER IS DESIGNATED BY °'DDDDD'".
SUITCH

EFFECT

/TESTS LIST

EXECUTE ONLV THOSE TESTS SPECIFIED IN
THE LIST.
LIST IS A STRING OF TEST

NUMBERS, FOR EXAMPLE = /TESTS:1:5:7-10,
/PASS :DDDDD

THIS LIST WwiLL CAUSE TESTS 1,5,7,8,9,10 T0
BE RUN.
ALL OTHER TESTS WILL NOT BE RUN,
EXECUTE DDDODD PASSES (DDDDD = 1 T0 464000)

/EOP:DDDDD

REPORT END OF

JUNITS:LIST

TEST/ADD/DROP ONLY THOSE UNITS SPECIFIED

/FLAGS:FLGS

SET

SPECIFIED FLAGS.

FLAGS ARE

IN SECTION 2.3.

DESCRIBED

PASS MESSAGE AFTER EVERY

(DDDDD = 1 TQ 64000)

DDDDD PASSES ONLY.

IN THE LIST.
LIST EXAMPLE - /UNJTS:0:5:10=12
= 0-63)
USE UNITS 0,5,10,11,12 (UNIT NUMBERS

SWITCH USAGE:

EXAMPLE OF

THE EFFECT _OF

THIS (CM“AND WILL BE:

TESTS 1

THROUGH 5 wWiLL BE

EXECUTED, 2) ALL UNITS WILL TESTED 1000 TIMES AND 3)

THE END OF

PASS MESSAGES WILL BE PRINTED AFTER EACH 100 PASSES ONLY.
A
SWITCH CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS.
YOU MAY,
FOR EXAMPLE, TYPE '‘/TES:1-5"" INSTEAD OF °*'/TESTS:1-5"",

BELOW IS A TABLE
CGMMAND.

START

RESTART

CONTINUE

PROCEED

DROP
ADD

DISPLAY
FLAGS

1FLAGS

ExlT

THAT SPECIFIES WHICH SWITCHES CAN 8E USED BY EA(H

TESTS

PASS

FLAGS

EOP

UNITS

PARAMETER

CODING

MACRO M1113

FLAGY

ARE

0€-SEP=-82 16:46

USED

SET

PACE

Seq 8

CERTAIN OPERATIONAL

PARAMETERS

SUCH AS

LOOPING ON ERROR,
ALL FLAGS ARE CLEARED A7 STARTUP AND REMAIN
CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH.
FLAGS

ARE ALSG CLEARED AFTER A START COMMAND UNLESS SET JUSING THE
FLAG SWITCH.
THE 2FLAGS COMMAND MAY £.SO BE USED TO CLEAR
ALL FLAGS.
WITH TME EXCEPTION OF THE START AND ZFLAGS COMMANDS,
NO COMMANDS AFFECT THE STATE OF THE FLAGS:
THEY REMAIN SET OR

CLEARED AS SPECIFIED BY THE LAST FLAG SwifCH.
FLAG

EFFECT

HOE

HALT ON ERROR - CONTROL IS RETURNED
RUNTIME SERVICES CC: “AND MODE

LOE
IERe
IBE*

LOOP ON ERROR
INHIBIT ALL ERROR REPORTS
INHIBIT ALL ERROR REPORTS EXCEPT
FIRST

ERROR

IXEe

LEVEL

(FIRST

TYPE,

LEVEL

NUMBER,

PC,

CONTAINS

TEST

AND

UNIT)

INHIBIT EXTENDED ERROR REPORTS (THOSE
CALLED BY PRINTX MACRO'S)
DIRECT MESSAGES TO LINE PRINTER

PRI

PNT

UAM
ISR

UNATTENDED MODE (NO MANUAL INTERVFNTION)
INHIBIT STATISTICAL REPORTS (DOES NOT

IDU

STATISTICAL REPORTING)
INHIBIT PROGRAM DROPPING OF

B0¢

TEST

NUMBER

"BELL'' ON ERROR

APPLY

ADR

AUTODROP (CODE

LOOP ON TEST
EXEC TE EVALUATION

HAVE

EXECUTES

TO DIAGNOSTICS WHICH DO NOT

EXECUTE

LOT
EvL

TEST

SUPPOQRT

UNITS

(ON DIAGNOSTICS WHICH

EVALUATION SUPPORT)

*ERROR MESSAGES ARE DESCRIBED IN SECTION 3.1
2.3.1

FLAG (OMMANDS

FLACGS)

THIS

COMMAND

ALL

FLAGS

PRINTED

THE

CURRENT

""""

OfF

lIFL (AGS)

THIS COMMAND CLEARED ALL FLAGS

SETTING

SEE THE XXDP+ USER'S MANUAL FOR MORE DETAILS ON FLAGS.
YOU MAY
SPECIFY MORE THAN ONE FLAG WITH THE FLAG SWIT(M,
FCR EXAMPLE,
T0

AND

CAUSE

TYPE

THE

PROGRAM

10 LOOP ON ERROR,

A "BELL'® ON ERROR,
/FLAGS:
: JER:BOE
LOE

YOU MAY USE

INWIBIT

THE

ERROR REPORIS

FOLLOWING STRING:

PARAMETER CODING

MACRO M1113

2.6

06-SEP-B82 '6:46

SEQ 9

PAGE 8

HARDUARE QUES T1ONS

WHEN
A DIAGNOSTIC IS STARTED, THE RUNTIME SERVICES WILL PROMPT
THE USER FOR HARDWARE INFORMATION BY TYPING ‘'CHANGE HWW (L) 2’

YOU MUST ANSWER “'Y'' AFTER A START COMMAND UNLESS THE HARDWARE

INFORMATION MAS BEEN "PRELOADED’’ USING THE SETUP UTILITY (SEE
CHAPTER 6 OF THE XXDP+¢ USER'S MANUAL'.,
WHEN YOU ANSWER THIS
QUESTION WITH A "'v'', THE RUNTIME SERVICES WILL ASK FOR THE NUMBER
OF UNITS (IN DECIMAL).
YOU WILL THEYN BEL ASKED THE FOLLOWING
QUESTIONS FOR EACH UNIT.

EXAMPLE OF

THE DIALOGUt:

CHANGE HW

(L)

NUNITS

2?2

(D)

UNIT O
DEVICE ADDRESS
(0)
lNTERR PT VECTOR
(0)
PRIORITY LEVEL
Q)
PEVICE PRIMARY ADDRESS (H 0
DEVICE FRIMARY ADDRESS (M 1
IS TESTCABLE

2.5

760150 ?
€20 ?

6?
(0) 0 ?
(0) 1 ?
(LIN/Y
?

SOFTWARE QUESTIONS

AFTER YOU HAVE ANSWERED THE HARDWARE QUESTIONS OR AFTER A RESTART

OR CONTINUE COMMAND,THE RUNTIME SERVICES WILL ASK FOR SOF TWARE
PARAME TERS.

THESE

PARAHETERS WILL GOVERN SOME

THE

WUESTIONS AND THE

DJAGNOSTIC

OPERATICON MODES. YOU WILL BE PROMPTED BY '‘CHANGE SW (L)
IF YOU WISH TO CH*NGE ANY PARAMETERS, ANSWER BY TYPING ''Y
SOF TWARE

QUICK

VERIFY PASS

(L)

DEFAUL!

VALUE

ARE

SPE(lFl(

IF *Y* ,THEN EACH TEST WiLL I TE RgTE ONLY ONCE BEFORE
CONTINUING TO THE NEXT TEST IN EQUENCE.

E
*N°',THEN EACH TEST WILL ITERATE
20 TIMES BEFORE

CONTINUING ON THE NEXT TEST IN SEQUENCE.
ALSO SOME TESTS WILL DO WITH MORE TESTPATTERNS .

NUMBER OF MAT(H CHARACTER COUNTS (0) 63.?
AFTER THIS QUESTION YOU CAN C(HANGE

NUMBER OF BYTE C(OUNTS (0) 2047.

THE NUMBER OF

DMA CY(LES

MACRO MI113

06-SEP-82 16:46

AFTER THIS QUESTION YOU CAN SELECT

:éggasfl‘c
K

DO YUU WANT

THE

EXTENDED ADDRESS BITS FOR

ADDITIONAL

THE

THE ADDITIONAL STANDBY TEST

(L)

THE

HARDWARE

QUESTIONS,

? N

YOU

IN A TABLE

THAT DESCRIBES THE DEVICES UNDER

UNIT

TESVED.

WAY TO BUILD THIS TABLE

TO BE

A MASS STORAGE

IS TO ANSUER ALL QU

YOU HAVE
A MULTIPLEY

CONTROLLER WITH

DEVICE WITH SEVERAL LINES,

ANSWERS ARE REPET

SEVERAL DRIV

THIS BECOMES TED

Us.

1 0 I ILLUSTRATE A MOR t
AF 1 CTIONAL DEVICE, T
AC 0 NTROL MODULE UIT;
THE 8E UNITS ARE DESC

TEST

EXTENDED P-TABLE DJALOGUE

WHEN YOU ANSWER

THE

STANDBY

Q=22 BUS WITHOUT

Cadaslaalasl

2.6

SEQ 10

PAGE 9

Cl ENT METHOD, SUPPOSE YOU ARE TESTING
WAL 1.
SUPPOSE THIS DEVICE CONSISTS OF

(ODING

HT U?ITS

A=t

PARAMETER

NF HARDWARE PARAMETER THAT

(SUB-DEVICES)

ATTACHED

(D)

B8<(R>

UNIT 1
16C000<CR>
CSR ADDRESS (0) 7
0<CR>
SUB-DEVICE # (0 ?
Q=FACTOR

(0)

0 ?

UNIT 2
CSR ADDRESS (0)

1<(R>

160000<CR>

1<(CR>
SUB-DEVICE # (0) ?
Q-FACTOR (0) 1 2?2
O0<(R>

UNIT 3
160000<CR>
(SR ADDRESS (0) ?
2<(R>
SUB-DEVICE # (0 7
0-FACTOR

(0)

0 ?

<CR>

UNIT &

160000<(R>
(SR ADDRESS (0) ?
3<(R>
SUB-DEVICE # (0) ?
<(R>

Q-FACTOR (0) 0 ?

UNIT §
(SR ADDRESS (0)

SUB-DEVICE # (0)
Q-FACTOR (0) 0 ?

UNIT 6
(SR ADDRESS

THERE

CAN VARY AMONG UNITS CALLED THE

Q-f A CTOR.
THIS Q-FACTOR MAY BE O OR 1.
BELOW IS A
10 8 UILD A TABLE FOR ONE XY11 WITH EIGHT UNITS,

# UNITS

T0 IT,

THE OCTAL NUMBERS O THROUGH 7.

160000<CR>

4<(R>
<(R>

(0) ?
160000<CR>
S<(R>
SUB-DEVICE # (0) 7

SIMPLE WAY

PARAMETER CODING

MACRO M1113

06-SEP-82 16:46

Q=FACTOR

(0)

0 ?

SEQ 11

PAGE 9-1

<(R>

UNIT 7
160000<(R>
CSR ADDRESS (0) ?
6<(R>
SUB=DEVICE # (0) ?
1<C(R>
G=-FACTOR (0) 0 ?
UNIT 8
160000<CR>
(SR ADDRESS (0)
7<(R>
4 (0) ?
SUB-DEVICE #
Q=-FACTOR

(0) )

<(R>

NOTICE THAT THE DEFAULT VALUE FOR THE Q-FACTOR CHANGES WHEN A
NON=-DEFAULT RESPONSE IS GIVEN.
BE CAREFUL WHEN SPECIFYING
MULTIPLE UNITS!

AS YOU CAN SEE FROM THE ABOVE EXAMPLE,

THE HARDWARE PARAMETERS

DO NOT VARY SIGNIFJCANTLY FROM UNIT TO UNIT.

NOT VERY EFFICIENT,

THE PROCEDURE SHOWN IS

THE RUNTIME SERVICES CAN TAKE MULTIPLE UNIT SPECIF JICATIONS HOWEVER.

%E;;SREUILD THE SAME TABLE USING THE MULTIPLE SPEC IFICATION
# UNITS

(D)

8<(R>

UNIT 1

160000<CR>
(SR ADDRESS (0) ?
SUB-DEVICE # (0) ? 0,1<(R>
1,0<CR>
UG-FACTOR (0) 0 ?

UNIT 3
160000<CR>
(SR ADDRESS (0) ?
2=5¢<(R>
?
(0)
#
E
SUB=-DEVIC
O<CR>
Q-FACTOR (0) 0 ?
UNIT 7
160000<CR>
(SR ADDRESS (0) ?
SUB-DEVI(CE # (0% 7 6,7<(R>
1<CR>
Q-FACTOR (0) 0
AS YOU CAN SEE IN THE ABOVE DIALOGUE, THE RUNTIME SERVICES WILL

BUILD AS MANY ENTRJES AS IT CAN WITH THE INFORMATION GIVEN IN ANY
ONE PASS THROUGH THE QUESTIONS.
IN THE FIRST PASS, TWO ENTRIES
ARE BUJLT SINCE TWO SUB-DEVICES AND Q-FACTORS WERE SPECIFIED.

THE

SERVICES ASSUME THAT THE CSR ADDRESS 1S 160000 FOR BOTH SINCE [T
WAS SPECIFIED ONLY ONCE.
IN THE SECOND PASS, FOUR ENTRIES WERE
BUILT.
THIS IS BECAUSE FOUR SUB-DEVICES WERE SPECIFIED,
THE
=" CONSTRUCT TELLS THE RUNTIME SERVICES TO INCREMENT THE DATA
FROM THE FJRST NUMBER TO THE SECOND.
IN THIS CASE, SUB=-DEVICES
(1F THE SUB-DEVICE WERE SPECIFIED
2., 3, 4 AND S WERE SPECIFIED.
BY ADDRESSES, THE INCREMENT WOULD BE BY 2 SINCE ADDRESSES MUST
THE (SR ADDRESSES AND Q-FACTORS fOR
BE ON AN EVEN BOUNDARY,.)
THE FOUR ENTRIES ARE ASSUMED TO BE 160000 AND O RECPECTIVELY
THE LAST TWO UNITS ARE
SINCE THEY WERE ONLY SPECIHIED ONCE.
SPECIFIED IN THE

THIRD PASS,

PARAMETER

CODING

MACRO M1113
THE

WHOLE

06-SEP=-82 16:46

PROCESS

SHOWN BELOW.

# UNITS

COULD

(D)

HAVE

SEQ 12

PAGE 9-2
BEEN ACCOMPLISHED

IN ONE

PASS

B8<(R>

UNIT 1
160000<CR>
(SR ADDRESS (0) ?
(Q=7<CR>
SUB=DEVICE # (0) ?
Q=-FACTOR

(O)

0 ?

0,1,0.,,.1,1<(R>

AS YOU CAN SEE FROM THIS EXAMPLE, NULL REPL] ES (COMMAS Eg%ng I NG
A NULL FIELD) TELL THE RUNTIME SERVICES TO REPEAT THE LA
PLY.

PARAMETER CODING

MACRO M1113

0C-SEP-82 16:46

2.7 QUICK START=UP PROCEDURE

T0 START=yP

PAGE

SEQ 13

(XXDP+)

THIS PROGRAM:

BOOT

XXDP+

2. GIVE THE DATE AND ANSWER THE LSI AND 50HZ (IF
IS A CLOCK)

3.
4.

QUESTI]ONS

TYPE

''R NAME'', WHERE NAME

TYPE

''START"

FILE

FOR

THIS

PROGRAM

IS THE NAME OF

THERE

THE BIN OR BIC(

5. ANSWER THE °‘‘(HANGE HW'' QUESTION WITH *'v*’

6. A~suéR ALL THE HARDWARE QUESTIONS
7.

ANSWER THE

°‘'CHANGE

SW'' QUESTION WITH ''N"

WHEN YOU FOLLOW THIS PROCEDURE

YOU WILL BE

DEFAULTS FOR FLAGS AND SOF TWARE PARAMETERS.
ARt

DESCRIBED

2.7.1

IN SECTIONS 2.3 AND 2.5.

CONTROL

USING ONLY

THESE

THE

DEFAULTS

CHARACTERS

A CONTROL C ENTERD DURING THE EXECUTION OF
CAUSES A RETURN TO COMMAND MODE.

A DJAGNOSTIG

A CONTROL fikENYERED DURING ONE OF

. CAUSES THE

THE

REMAINDER

THE

DEFAULTS TO BE TAKEN fOR
OF

THAT

DIALOGUE.

OPERATOR DIALOGUES

PARAMETER CODING

MACRO M1113

06-SEP-82 16:46

SEQ 14

PAGE 11

3.0 ERROR INFORMAT]ION

THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ]SSUED BY
A DIAGNOSTIC: GENERAL, BASIC AND EXTENDED.
GENERAL ERROR MESSAGES
ARE ALWAYS PRINTED UNLESS THE
''IER' FLAG IS SET (SECTION 2.3).
THE

GENERAL ERROR MESSAGF

NAME
(MHERE.

[S OF

THE

FORM:

,TYPE,NUMBER,UNIT NUMBER,TST NUMBER,PC:XXXXXX

NAME = DIAGNOSTIC NAME
TYPE = ERROR TYPE (SYS FATAL, DEV FATAL, HARD OR SOFT)
NUMBER = ERROR NUMBER

UNIT NUMBER = 0 = N (N IS LAST UNIT IN PTABLE)

TST NUMBER = TEST AND SUBTEST WHERE ERROR OCCURRED
PC:XXXXXX = ADDRESS OF ERROR MESSAGE CALL

BASIC ERROR MESSAGES ARE MESSAGES THAT CONTAIN SOME ADDITJIONAL
INFORMATION ABOUT THE ERROR.
THESE ARE ALWAYS PRINTED UNLESS
THE “'IER"’ OR 'IBE'' FLAGS ARE SET (SECTION 2.3).
THESE MESSAGES
ARE PRINTED AFTER THE ASSOCIATED GENERAL MESSAGE.

EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR INFORMATION

SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA.
THESE ARE ALWAYS
PRINTED UNLESS THE ''IER', “IBR'' OR '"IXE'' FLAGS ARE SET (SECTION 2.3).

THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES.

ERROR

EXAMPLES:

CZIEA SOFT ERR 00301 ON UNIT 00 TST 003 SuB 000 PC: 001234

READ=-WRITE BITS NOT

REGISTCR :

CORRECT

1IR , CHANNEL

, GOOD DATA :00000 ,BAD DATA :00001

NOTE THAT THE ERROR NUMBER IS IN THE FORMAT
T

lE.

00302 = ERROR 2 IN TEST 03,
00504 = ERROR & IN TEST 05.

THE

TEST NUMBER AND

IS THE ERROR NUMBER WITHIN THE

TEST

‘TNN' WHERE:

PARAMETER CODING

MACRO M1113

06~SEP-82 16:46

SEa 15

PAGE 12

3.2 SPECIFIC ERROR MESSAGES AND REPORTS
ERROR

MESSAGES:

CALL

MESSAGE

E10
€200
€301

€303
£401
£402
£403
€501
E502
E801

MUX BIT IN CSR NOT SETABLE
CSR CONTENTS INCORRECY
NO INTERRUPT WHEN EXPECTED
INCORRECT PRIORITY LEVEL
BITS IN IR REGISTER INCORRECT
BITS IN ISR REGISTER INCORRECT
DATA TRANSFER FROM CHANNEL 1 TO 2 INCORRECT

£302

BITS NOT CLEARED AFTER BUS RESET

£80¢2

DATA TRANSFER FROM CHANNEL 2 TO 1

£901
€222

ICR CONTENTS INCORRECT
DIR CONTENTS INCORRECT

€250
E¢31
E232
€233
E234
E235
ERROR

INCORRECT

RX BUFFER CONTENTS INCORRECT AFTER DMA (2 T0 1)
RX BUFFER CONTENTS INCORRECT AFTER DMA (1 T0 2)
NO INTERRUPT AFTER DMA
NO INTERRUPT AFTER READ FROM A NXM ADDRESS
BAR CONTENTS INCORRECY
BCR CONTENTS INCORRECLT
REPORTS:

CALL

MESSAGE

ERR1O

ERR20?2
ERR4OY

ERRS501
ERR231

CHAN.: (CC),GO0OD DATA:NNNN ,BAD DATA:NNNN,ITERATION:NN
GOOD DATA TXADDR BAD DATA RXADDR BYTE CNT#
0DDDDD
AAAAAA DDDDDD
AAAAAA (CCCCCC

4.0 PERFORMANCE

AND PROGRESS REPORTS

(AAAAAA) DOES NOT RESPOND
REGISTER: CSR,CHA,:(CC) ,GO0D DATA:NNNNN,BAD DATA:NNNN

ERR201

(FOR JEUT1A IGNORE BIT 9-12)

ERRGO2

CHANNEL

:(CC)

IS SELECTED

AT THE END OF EACH PASS, THE PASS COUNT IS GIVEN ALONG WITH THE
TOTAL NUMBER OF ERRORS REPORTED SINCE THE DIAGNOSTIC WAS STARTED.
THE “'EOP'* SWITCH (AN BE USED TO CONTROL HOW OF TEN THE END

OF PASS MESSAGE 1S PRINTED.

5.0 DEVICE

INFORMATION TABLLS

SECTION 2.2 DESCRIBES SWITCHES.

PARAMETER CODING

MACRO M1113

06-SEP-82 16:46

PAGE

SEQ 16

6.0 TEST SUMMARIES
6.1

TEST 1

=]EX11

: REGISTER ADDRESSING TEST

VERIFY THAT ADDRESSING YHE 8 BUS DEVICE REGISTERS DOES NOT CAUSE
A NON=EXISTENT MEMORY
AN ERROR IN THiS TEST

CONF IGURED OR THAT

TRAP
COULD MEAN THAT

THE DEVICE

THE ADDRESS IS WRONG.

COMMUNICATION BETWEEN THE MAIN CPU AND THE

THROUGH A SET OF SIXTEEN REGISTERS.THE
ASSIGNED ADDRESSES IN THE /0 PAGE.

6.2

IEX = TEST 2

RESETS THE

IEX

THAT

REGISTERS CSR,11k,ISR,ICR,JDR,M(R

NOT

IN A DEFINITIVE

SO THEY ARE NOT TESTED HERE.
THE MUX BIT IN CSR IS ALSO TESTED.

(HECKS ALL R/W BITS OF

%QR?OIHCg:SNNELS.

AFTER RESET

’

TMS 9914 REGISTERS

6.4

CSR,BAR,BCR AND MCR REGISTERS

JT ALSO TESTS THE MASTER CLEAR FUNCTION IN

IN THIS TEST.

PART

STATE

IEX = TEST 3 : R/W BIT TEST

THIS TEST
THE

IS ACCOMPLISHED

SIXTEEN REGISTERS ARE

IN THEIR PROPER INITIALIZATION STATE

REGISTERS BAR AND BCR ARE

6.3

INCORRECTLY

INITIALIZATION TEST

AND ENSURES

IN BOTH CHANNELS ARE

IEX11

JEX = TEST &

1IR,ISR,ICR,IDR APE NOT

CHECKED

SYSTEM CONTROLLER COMMANDS TEST

CHANNEL 1 WHICH ]S SELECTED AS SYTSTEM CONTROLLER, SENDS THE
REN MESSAGE BY MEANS OF THE AUXILIARY COMMANDS SIC AND SRE.
ALSO, BOTH JIR AS WELL AS ISR REGISTERS
6
ARE CHECKED.
1
PART 2 CHANNEL 2 WHICH IS SELECTED AS SYTSTEM
CONTROLLER, SENDS THE
REN MESSAGE BY MEANS OF THE AUXé L g?gv COMMANDS SIC AND SRE.
ALSO BOTH JIR AS WELL AS ISR REGISTERS ARE CHECKED.

IEX = TEST 5 :

6.5
PART

CHECKS

THE

IFC AND
IfC AND

INTERRUPT TEST

DEVICE PRIORITY LEVEL AND

THE FUNCTJON OF

INTERRUPT SEQUENCE IN CHANNEL 1.

INITIATING THIS SEQUENCE WILL BE DONE BY SETTING THE INT ENB,DMA ENB
BITS IN CSR1 AND BO BIT IN IIR 1 REGISTVER.

PART 2 C(HECKS THE DEVICE PRIORITY LEVEL AND

THE FUNCTION OF INTERRUPT SEQUENCE IN CHANNEL 2.
INITIATING THIS SEQUENCE WILL BE DONE BY SE*TING THE

INT ENB,DMA ENB

PARAMETER CODING

SEQ 17

MACRO M1113 06-SEP-82 16:46 PAGE 13-1
BITS

6.6
PART

IN (SR2 AND BO BIT

IEX = TEST 6

IN IIR 2 REGISTER.

ADDRESS REGISTER TEST

(ICR)

CHANNEL

CHECKS THE CORRECT FUNCTION OF ADDRESS REGISTER 1 (ADR)
BY LOADING ITS DEVICE PRIMARY ADDRESS INTO BIT A1-A5S AND RECEIVING THE
ASSIGNED LISTEN On TALKER ADDRESS VIA A THE IEC/IEEE BUS.
NOTE:
THE ULPA BIT IN THE ISR1 REGISTER IS 0 DEPENDENT
FROM THE STATUS OF DPA1 (DPA1=ULPA 1S S SET)
PART 2 CHECKS THE FUNCTION OF THE '‘DAT'', '‘DAL'' AND '‘EDPA'’' BIT OF ADR1 REGISTER

IF THE QUICK VERJFY PASS IS NOT SELECTED,
IT WITH DIFFERENT DPA'S,

6.7
TH,

PART

IEX = TEST 7
TEST

CHECKS

THE

; TEST ITERATION wILL DO

: ADDRESS REGISTER TEST

SAME

TEST

CORRECT

TEST

6 EXCEPT

FUNCTION OF

(ICR) OF
THE

CHANNEL 2

CHANNEL

ADDRESS REGISTER 2

BY LOADING ITS DEVICE PRIMARY ADDRESS
ASSIGNED LISTEN OR

NOTE:

THE

TALKER ADDRESS

VIA

CHANGED

(ADR)

INTO BIT A1-A5 AND RECEIVING THE

THE

JEC/IEEE BUS.

THE ULPA BIT IN THE ISR2 REGISTER IS CEPENDENT
FROM THE STATUS OF DPA2 (DPA2=ULPA IS SET)
PART 2 CHECKS THE FUNCTION OF THE °''DAT'', '‘DAL'' AND ''EDPA'' BIT OF ADR2 REGISTER
IF TNE QUICK VERIFY PASS IS NOT SELECTED, THE TEST ITERATION WILL DO

IT WITH DIFFERENT DPA'S,

6.8

IEX = TEST 8
IS DIVIDED

DATA TRANSFER TEST

THIS

TEST

PART

2 CHECKS DOR AND DJR R EGISTERS BY LOADING THE DOR2 WITH A DATA BYTE
AND READING IT FRO M THE DIR1 (PROGRAMMED DATA TRANSFER FROM

IT CHECKS THE

INTO TWO PARTS.

DATA OUT

(DOR) AND DATA IN (DIR) REGISTERS .

CHECKS DOR AND DIR REGISTERS BY LOADING THE DORY1 WITH A DATA BYTE
AND READING [T FROM THE DIR2 (PROGRAMMED DATA TRANSFER FROM

CHAN.1

TO CHAN.2).

CHAN.2 TO CHAN.1),

If THE QUICK VERIFY PASS | S NOT SELECYED, THE
CARRIED OUT WITH A DIFFERE NT DATA PATTERN

6.9
THIS

IEX = TEST 9
TEST

PURPOSE

FEATURE

CHECKS
THIS

THE

TEST

CHANNEL

JEX = TEST

ITERATION IS

SECONDARY ADDRESSING TEST OF

(LISTENER)

RECEIVING A VALID AS WELL AN

INVALID MY

EXTENDED LISTENER
]S

CHECK

BY MEANS OF

SECONDARY ADDRESS (MSA1)

6.10

TEST

THE

INTERFACE

SECONDARY

CHANNEL

FUNCTION

ADDRESSING

SECONDARY ADDRESSING TEST OF

CHANNEL 1

(TALKER)

PARAME TER CODING

MACRO M1113

06-SEP-82 16:46

PAGE

SEC 18

13-2

THIS TEST CHECKS THE EXTENDED TALKER INTERFACE FUNCT] ON.
PURPOSE OF TMIS TEST IS TO CHECK THE SECONDARY ADDRES SING
FEATURE OF CHANNEL 1 BY MEANS OF RECEIVING A VALID AS WELL AN

SECONDARY ADDRESS (MSA1)

6.1

IEX = TEST 11

SECONDARY ADDRESSING TEST OF CHANNEL 2 (LISTENER)

THIS TEST CHECKS THE EXTENDED LISTENER INTERFACE FUNCTION .
PURPOSE OF THIS TEST IS TO CHECK THE SECONDARY ADDRESSING
FEATURE OF CHANNEL 2 BY MEANS OF RECEIVING A VALID AS WELL AN

SECONDARY ADDRESS (MSA?2)

6.12

IEX = TEST 12

SECONDARY ADDRESSING TEST OF

6.13
PART 1

INVALID MY

C(HANNEL 2 (TALKER)

THIS TEST CHECKS THE EXTENDED TALKER INTERFACE FUNCTION .
PURPOSE OF THIS TEST IS TO CHECK THE SECONDARY ADDRESSING
FEATURE OF CHANNEL 2 BY MEANS OF RECEIVING A VALID AS WELL

SECONDARY ADDRESS

INVALID MY

(MSA2)

INVALID MY

IEX = TEST 13 : DEVICE CLEAR INTERFACE FUNCTION TEST
(HECKS THE DEVICE CLEAR INTERFACE FUNCTION OF CHANNEL 2 BY MEANS OF
?ESE§VING A UNIVERSAL COMMAND (DCL) AS WELL AS AN ADDRESS COMMAND

PART 2 CHECKS THE DEVICE CLEAR INTERFACE FUNCTION OF CHANNEL 1 BY MEANS OF
?ESE§VING A UNJVERSAL COMMAND (DCL) AS WELL AS AN ADDRESS COMMAND

6.1¢4

IEX = TEST 14 : DEVICE TRIGGER INTERFACE FUNCTION TEST

PART 1

CHECKS THE TRIGGER INTERFACE FUNCTION
RECEIVING THE ADDRESS COMMAND GET AS
COMMAND NOT FGET.
PART 2 CHECKS THE TRIGGER INTERFACE FUNCTION
RECEIVING THE ADDRESS COMMAND GET AS
COMMAND NOT FGET.

6.15
PART 1

IEX = TEST 15
CHECKS THE

OF CHANNEL 2 BY MEANS OF
WELL AS THE AUXILIARY

OF CHANNEL 1 BY MEANS OF

WELL AS THE AUXILIARY

INCOMPLETE SOURCE HANDSHAKE TEST

INCOMPLETE SOURCE HANDSHAKE OF CHANNEL 1.
SOURCE HANDSHAKE DOES NOT OCCUR DURING THE DATA TRANSFER,
BECAUSE CHANNEL 2 IS NOT SELECTED AS LISTENER.
PART 2 (HECKS THE INCOMPLETE SOURCE HANDSHAKE OF CHANNEL 2.
SOURCE HANDSHAKE DOES NOT OCCUR DURING THE DATA TRANSFER,
BECAUSE CHANNEL 1 IS NOT SELECTED AS LISTENER.

PARAMETER CODING

MACRO M1113

6.16
PART

IEX = TEST
1

(HECKS

THE

06-SEP=-82 16:46

CHANGING OF

THE

PAGE

SEQ 19

13-3

THE CONTROLLER CONFIGURATION

CONTROLLER CONFIGURATION FROM 1

TO 2

BY MEANS OF THE AUXILIARY (OMMANDS RQC AND RLC,
PART 2 CHECKS THE CHANGING OF THE CONTROLLER CONFIGURAT!ON FROM 2 TO 1
BY MEANS OF THE AUXILIARY COMMANDS RQC AND RLC.

6.17
PART

IEX = TEST 17 : REMOTE/LOCAL

INTERFACE FUNCTION TEST

CHECKS THE REMOTE/LOCAL FUNCTION OF
COMMANDS GTL,LLO,NOT RTL,
PART 2 C(HECKS THE REMOTE/LOCAL FUNCTION OF
COMMANDS GTL,LLG,NOT RTL.

6.18
THIS

IEX = TEST 18 : SERVICE REQUEST
TEST

PART 1

CHECKS THE

CHANNEL 2 USING THE

FOLLOWING

CHANNEL

FOLLOWING

INTERFACE FUNCTION TEST OF CHANNEL 1

SERJAL POLL REGISTER OF

CHANNEL

SETS AND CLEARS THE RSV BIT IN SPR REGISTER OF
AND CHECKS THE SRQ BIT IN ISRZ2.
PART 2 CHECKS THE SERJAL POLL SEQUENCE OF CHANNEL 1.

If QUICK VERIFY PASS IS NOT SELECTED,
OUT WITH DIFFERENT DATA,

6.19

USING THE

CHANNEL

THE SERIAL POLL SEQUENCE

IEX = TEST 19 : SERVICE REQUEST INTERFACE FUNCTION TEST

THIS TEST CHECKS THE SERIAL POLL REGISTER OF

CHECKS THE SRQ BIT [N ISR1,
PART 2 (HECKS THE SERJAL POLL SEQUENCE OF

CHANNEL ¢

CHANNEL 2 AND

CHANNEL 2.

If QUICK VERJFY PASS IS NOT SELECTED, THE SERIAL POLL SEQUENCE

OUT WITH DIFFERENT DATA,

IS CARRIED

IEX =TEST 20 : PARALLEL POLL INTERFACE FUNCTION TEST OF (HANNEL

PART 1 CHECKS PARALLEL POLL SEQUENCE
PART 2 (HECKS PARALLEL POLL SEQUENCE

6.21

IS CARRIED

CHANNEL 2.

PART 1 SETS AND CLEARS THE RSV BIT IN SPR REGISTER OF

6.20

IEX = TEST 21

(LOCAL CONFIGURED).
(REMOTE CONFIGURED).

: PARALLEL POLL INTERFACE FUNCTION TEST OF CHANNEL ¢

PART 1 (HECKS PARALLEL POLL
PART 2 (HECKS PARALLEL POLL

SEGUENCE
SEQUENCE

(LOCAL CONFIGURED).
(REMOTE CONFIGURED).

PARAMETER

MACRO M1113

C(ODING

6.2

06-SEP=-82 16:46

PAGE

SEQ 20

13-4

IEX = TEST 22 : END OF A MESSAGE BLOCK TEST

PARTY

CHECKS THE END OF A MESSAGE BLOCK FROM CHANNEL 1.

CHANNEL 2 SENDS THE

PART

(HECKS THE END OF A MESSAGE BLOCK FROM CHANNEL 2.

CHANNEL 1

€.23
PART

PART

6.26
PART

PART

PART
PART

6.25
PART

PART

EOIl MESSAGE

VIA THE

IEC/IEEE BUS.

EO] MESSAGE VIA THE

1€C/IEEE BUS.

IEX = TEST 23 : DMA DATA TRANSFER TEST FROM CHANNEL 1
SENDS DATA VIA THE

IEC/IEEE BUS

FROM CHAN.

SENDS THE

TO 2

TO 2 BY MEANS OF A DMA

i.6. CHAN, 1 WHICH IS SELECTED
3C
AS TALKER PERFORMS A DATI (CYCLE,
WHEREAS CHAN.2 WHICH IS SELECTED
AS A LISTENER PERFORMS A DATOB CYCLE.
LE
THE MAX. SELECTABLE BYTE C ou N T FOR THIS DATA TRANSFER [S 2x BYTES
AND THE HIGHEST BUS ADDRE S S l S BELOW 32 K,
(HECKS THE NON EXISTENT ME M ORY \j B l T OF CHANNEL 1,
THIS

1S DONE

BY A DMA FRO

SELECTED IN THE BUS
SAME PROCEDURE AS IN
OVER 32Kk (IF MEMORY
SAME PROCEDURE AS IN
OVER 64K (IF MEMORY

A N NO

REG]

EXISTING

[/0 PAGE

ADDRESS

ADDRES S R 13 _REG STER OF CHAN 1 (DAT] CY(LE),
PART 1 EXCE
C ?T THE DATA TRANSFER IS EXECUTED
MANAGEME N T
S AVAILABLE).
X¢ P
PART 1 EXCEPT
THE DATA TRANSFER IS EXECUTED
N
MANAGEMENT
l [S AVAILABLE).

IEX - TEST 24 : DMA DATA TRANSFER TEST FROM CHANNEL 2 TO 1
SENDS DATA VIA THE IEC/JEEE BUS
FROM CHAN. 2 TO 1 BY MEANS OF A DMA
1.E. CHAN, 2 WHICH IS SELECTED AS TALKER PERFORMS A DATI CYCLE,

WHEREAS CHAN.1 WHICH IS SELECTED AS A LISTENER PERFORMS A DATOB CYCLE.
THE MAX. SELECTABLE BYTE COUNT FOR THIS DATA TRANSFER IS 2K BYTES
AND THE HMIGHEST BUS ADDRESS IS BELOW 32 K.

CHECKS THE NON EXISTENT MEMORY BIT OF CHANNEL 1
THIS

IS DONE BY A DMA FROM A NON EXISTING

1/0_PAGE ADDRESS

SELECTED IN THE BUS ADDRESS REGISTER OF CHAN 2 (DATOB CY(CLE).

SAME PROCEDURE AS IN PART 1 EXCEPT THE DATA TRANSFER
OVER 32k (IF MEMORY MANAGEMENT [S AVAILABLE).

IS EXECUTED

SAME FROCEDURE AS IN PART 1 EXCEPT THE DATA TRANSFER IS EXECUTED
OVER 64K

(IF MEMORY MANAGEMENT

[S AVAILABLE).

TEX = TEST 25 : MCR FUNCTION TEST OF CHANNEL 1
(HANNEL 2 TRANSMITS 9 DATA BYTES (50) THAN

SUCCESSIV E EOS CHARACTERS (177)
VIA THE JEC/JEEE BUS TO CHANNEL 1.
AFTER REC El¥l?6 THESE CHARACTERS
THE DMA DATA TRANSFER IS TERMINATED BY C(HANNE
COMP END).
SAME AS PART 1 EXCEPT THAT A WRONG QUANTITY OF SuC CESSIVE EOS

A PREDEFINED QUANTITY

(MC

INPUT) OF

(HARACTERS ARE TRANSMITTED RBEFORE THE CORRECT QUANTITY OF
E0S CHARACTER ARE _TRANSMITTED.

SUCCESSIVE

1.E. 2 EOS CHAR.(25),1 DATA BYTE (50)THAN THE PREDEFINED ECS CHAR,(25®

PARAMETER

(ODING

MACRO M1113

6.26
PART

JEX « TEST 26
T

16:46

PAGE

MCR FUNCTION TEST OF CHANNEL 2

THE

EO S C HARACTERS (177)
AFTER RECEIVIN
l g THESE C(HARA(CTERS

JEC/1EEE BUS TO CHA'.NEL 2.

THE DMA DATA TRANSFER IS TERMINATED BY CHANNEL
SAME AS PART 1 EXCEPT THAT A WRONG QUANTITY OF

(Q22-BUS)

TEST

THIS TESY IS ONLY BE CARRIED OUT IF A Q-BUS
MEMORY IS GREATER THAN 128k (Q22-8US).

IS USED AND

PART

GREATER

PART

6.28
THIS

FINDS OUT

THE

AVAILABLE

MEMORY

SEQUENCE

SAME

AS PAKT

512K

DESCRIBED

ABOVE

(BA 20 SET)AND 1024k
1

EXCEPT

THE

(BA 21

THAN

ALSO EXECUTED WITH

SET)

CHANNELS

CARRIED QUT FROM CHANNEL 2 TO 1,

IEX = TEST 28 ADDITIONAL STANDBY

THE

AVAILABLE

128k,

TEST

CAN BE

USED

YOU WANT

}2E13U§0.21

IGNORING NXM ERRORS BUT

.THE

256K

(BA

DMA DATA TRANSFER

CHECK

THE

OUT

7.0 PROGRAM LISTING

CHECKING

A Q-BUS

SET),

EXTENDED ADCRESS BITS

THE ADDRESS LINE

16,17,

THE ADDRESS REGISTER LINES

PATTERN SHOULD BE CHECKED ON A LOGIC ANALYSER .
LOGIC ANALYSER HAS TO BE CONNECT TO THE ADDRESS LINES 16-21
TRIGGER HAS TO BE CONNECT TO THE SIGNAL ADREN L(E9, PIN &),

THIS TEST IS ONLY CARRIED
THE SOF TWARE QUESTION,

TEST

WITHOUT HEFORV
[T MOVES
A SLIDING ONE®S BIT PATTERN ACROSS

THE
THE
THE

[f YES ,THEN A DMA IS CARRIED OUT BY SENDING DATA VIA THE
1EC/IEEE BUS FROM CHANNEL 1 TO 2.

THE

SUCCESSIVE

(SO)THAN THE PREDEFINED EOS CMAR.(25).

IEX = TEST 27 EXTENDED ADDRESS BIT

2 (COMP END).
SUCCESSIVE EOS

CHARACTERS
ARE TRANSMITTED
BEFORE THE CORRECT QUANT]ITY OF
EOS CHARACTER ARE TRANSMITTED.

1.E. 2 EOS CMHAR.(25),1 DATA BYTE

6.27

SEQ 21

13-§

(HANNEL 1 TRANSMITS 9 DATA BYTES (50) THAN
A PREDEF INED QUANTITY (MC IN®UT)OF SUCCESSIVE

VIA

PART

0¢=-SEP=-82

IS USED AND

YOU ANSWER

J
PROGRAM HEADER AND TABLES
1011

MACRO M11°3

06-SEP-82 16:46

.TITLE

}8;%

1043

PROGRAM HEADER
.ENABL
.

002000

1044
1045 002009
1046
1047
1048

s
. THE

PROGRAM HEADER

1051

002006
002007
002010
002010
002011
002011
002012
002012
002014

103
132
11
105
101
000
000
000
102

060
000001

002014

000000

002016
002020
002020
002022
002022
002024
002024
002026
002026
002030
002030

076724

002032
002034
00203&¢
002036
002036
002040
002040
002042

000000

002016

002032

[S THE

INTERFACE BETWEEN

POINTER BGNDU,BGNAU,BGNSETUP,BGNSW,BGNSF
T, ERRTBL

1054
1071

002004
002005

000

: THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR.

‘gg% 002000

002000
002001
002002
002003

AMA,ABS
z

BGNMOD

}828

1072 002000
002000

PROGRAM HEADER AND TABLES

LSBTTL

1040 000000
1041

PAGE

077336
002216
002234

100004
000000

000000
000000

002124

LSNAME : :

HEADER

LASCIL
LASCII
LASCIL
LASCIL

ASCIL
BYTE

LSREV::

L$DEPO: :
LSUNIT::
LSTIML::

LSHPCP: :
LSSPCP::

LSHPTP::
LSSPTP::
LSLADP::

LSSTA::
L$CO::

LSDTYP::
LSAPT::

LSDTP::
L$PRIO::

.BYTE
.BYTE

C(Z1EA,B,0,0.,0
:DIAGNOSTIC NAME

/C/
727
717
/E/
7A/
0
0
O

LASCII

/8/

LASCIT

70/

.WORD

T$PTHV

WORD

.WORD

LS$HARD

.WORD

L$SOFT

.WORD

L$HW

.WORD

L$SW

.WORD

LSLAST

.WORD

MORD

MWORD

.WORD

.MORD

:REVISION LEVEL

;0
:NUMBER OF UNJTS
sLONGEST TEST TIME

:POINTER TO H.W. QUES.
;POINTER TO S.W. QUES.

;PTR. T0 DEF. H.W. PTABLE
;PTR, TO S.W. PTABLE
:DIAG. END ADDRESS

;RESERVED FOR APT STATS

;DIAGNOSTIC TYPE
;APT EXPANSION

:PTR. 10 DISPATCH TABLE
LSDISPAT(H
sDIAGNOSTIC RUN PRIORITY

SEQ 22

K
PROGRAM HEADER AND TABLES

PROGRAM HEADER

002042

002044
002044

002046
002046
002050
002050
002051

002052

002052
002054
002056
002056
002060
002060
002062
002062
002064
002064
002066
002066
002070
002070
002072
002072
002074
002074
002076
002076

002100
002100
002102

002102
002104
002104
002106
002106
002110
002110

1073

002112
002112
022114
002114
002116
002116
002120
002120

000000

000000
000000
003
003
000000
000000
000000
003352
000000
000000
000000

012422
012340

000000
003414

104035
002504

011120
012314
012230

011112

000000
000000

000000

MACRO M1113

06-SEP-82 16:46

LSENV]::
LSEXP1::

LSMREV::

LS$EF::
LSSPC(::

LSDEVP::
LSREPP::
LSEXPL:
:
LSEXPS::

LSAUT::
LSOUT:
LSLUN::

LSDESP: :

LSLOAD::
LSETP::

LSICP::
LSCCP::
LSACP::

LSPRT::
LSTEST::

LSDLY::

LOSHIME: :

LMORD

LWORD

MORD

PAGE

14-1

:FLAGS DESCRIBE HOW IT WAS SETUP
sEXPANSION WORD

.BYTE
.BYTE

:SVC REV AND EDIT »
CSREVISION
CSEDIT

MORD
MWORD

O
O

LMORD

.WORD

LSDVTIYP

LMORD

WORD

.WORD

L$AU

LWORD

L$DU

LMORD

.WORD

L$DESC

EMT

ESLCAD

LWORD

LSERRIBL

LMWORD

LSINIT

.WORD

LSCLEAN

LWORD

LS$AUTO

.WORD

L$PROT

.WORD

LWORD

:DIAG. EVENT FLAGS

]
: POINTER TO DEVICE TYPE LIST

;PTR. TO REPORT (CODE

;PTR. TO ADD UNIT (CODE
:PTR. TO DROP UNIT CODE
;LUN FOR EXERCISERS TO FILL

;POINTER TO DIAG. DESCRIPTION

;GENERATE SPECIAL AUTOLOAD EMT
;POINTER TO ERRTBL

;PTR, TO INIT CODE
;sPTR. TO CLEAN-UP CODE
:PTR. 1O AUTO CODE

:PTR, T0O PROTECT TABLE
;TEST NUMBER

:DELAY COUNT

:PTR. TO HIGH MEM

SEQ 23

L
PROGRAM HEADER AND TABLES
DISPATCH TABLE

1085

06-SEP=-82 16:46

LSBTTL

1086
1087
1088
}833

PAGE

DISPATCH TABLE

XX
: THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST.
: 1T 1S USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST.

1091

1092 002122
002122
002124
002124
002126
002130
002132
002136
002136
002140
002142
002144
002146
002150
002152

002154

002156
002160
002162
002164
002166
002170
002172

1093

MACRO M1113

002174
002176
002200
002202
002204
002206
002210
002212

000034
012430
012704
013424
014076
015574
016762
023062
027416
031764
033550
035316
037066
040744
043116
044022
044776
046344
050722
052032
053142
054212
055262
057250
063270
067270
071012
072544
075456

DISPATCH 28
.WORD
28
LSDISPATCH::
LWORD
TH
LWORD
T2
WORD
T3
WORD
T4
WORD
TS
WORD
T6
WORD
17
WORD
T8
.WORD
T9
.WORD
T10
MWORD
TN
MWORD
112

LWORD
MWORD
WORD
MWORD
WORD
WORD
MWORD
LMWORD

LWORD
LWORD
MWORD
LWORD
.WORD
WORD
WORD
WORD

T13

T14
T1S
T16
117
T18
T19
120

T21
122
123
T24
125
126
127
128

SEQ 264

M2
PROGRAM HEADER AND TABLES

06-SEP-82 16:46

.SBTTL

SEQ 25

PAGE 16

DEFAULT HARDWARE P-TABLE
=P

ROWARE P-TABLE

CONTAINS DEFAULT VALUES OF

[ele]
ol

000006

P
)8]

o
(=]

160140

000000

DF PTBL

L 10000-L$HW/2

160240

:1ST

PRI06

¢DEVICE PRIORITY LEVEL

O—=O0N
o

(@Yo 0

DOOOOC
QCOO0O0O0O0

OO
PORONINVNIN
WRORINON)
=

2TVTaTo e Yo ¥ P o

NN
ANOMNUND
b b bb

OO0
O00O0O

E PARAMETERS.
THE STRUCTURE OF THIS TABLE
O THE STRUCTURE OF THE HARDWARE P-TABLES,
A '‘TEMPLATE' FOR BUILDING THE P-TABLES.

NN
[a%1a%)
NN
NN

200000000 o
OO 00NN
NOV SN ANN) = =
O 0D

[AS1a ST ST ST ST, 01,8 1,8 1,8 L

d—
D

s e
D
o

ad i o

—
e

D
D

D el

d e

D
ad

D e

d o
b

d
d
—

il i

DEFAULT HARDWARE P-TABLE

MACRO M1113

;1ST

(OF 8) REGISTER ADDRESS
(OF

VECTJUR ADDRESS

;DEVICE PRIMARY ADDRESS FOR (H.1
;DEVICE PRIMARY ADDRESS FOR (H.?2
;DEFAULT VALUE FUR TESTCABLE

L10000:

N
PROGRAM HEADER AND TABLES

d
d

SN NN
N NN W
OO0
NP NN ~N)

SOF TWARE P-TABLE

EE‘RSE ?}MQSSEMBLY

BGNSW

TIME

AND MAY BE

VARIED BY

THE

OPERATOR

SFPTBL

LWORD

L10001=L%SW/2

QvP::
MCINP::

.WORD
.WORD

1
63.

;QUICK VERIFY SWITCH
:NUMBER OF DEFAULT MAT(CH (HARACTER COUNTS

MAINB::

.WORD
ENDSW

sSTANDBY TEST 28,DEFAULT

LESW:¢

SFPIBL:

SO0

AN
S

e
D
o
o

D
d d D e
b

—
d

—d ead

SEQ 26

PAGE 18

THE SOF TWARE TABLE CONTAINS VARIOUS DATA USED BY THE
PROGRAM AS UPERATIONAL PARAMETERS.
THESE PARAMETERS ARE

000004

-—r

06-SEP-82 16:46

.SBTTL
+

D —

d pery

D
—

D nd wd ad
—

) e

SOf TWARE P-TABLE

MACRO M1113

000001
000077
003777
000000
002244

002244

BCINP::

.WORD

ENDMOD

2047,

:NUMBER OF DEFAULT BYTE COUNTS IS 2047 DECIMAL
[S NO

L10001:

PROGRAM HEADER

AND TABLES

SOf TWARE P-TrBLE
b

1
1

)

) ol

el el

1159

2
2
2
2
2
2
2
2
2
2

MACRO M1113

06-SEP-82 16:46

SEQ 27

PAGE 19

.TITLE GLOBAL AREAS
.SBTTL
GLOBAL EQUATES SECTION

002244

B8GNMOD
st

¢ THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT
s

ARE

USED

002244

[N MORE

THAN ONE

TECT.

EQUALS

: BIT DIFINITIONS
100000

81T15==
BIT14==
BIT13==
BIT12==
BIT11==

000001

001000
000400
000200
000100
000040

000001

8IT10==
BI1T09==
BIT08==
BIT07==
BIT06==
BI705==
BIT04==
8]103=BIT02==
BITO1
:=
BIT00==
8119==
BIT8==
B8I117-=
BITh==
8IT¢==
BIT«z=

BI'3==
8i12==
ByT1==
BIT0==

100000
40000
20000
10000
4000
2000
1000
400
200
100
40
20

&
2
1

B1109
BITO8
BI107
BIT06
BITOS
BIT04

BIT03
BIT102
BJT01
BITO00

¢ EVENT FLAG DEFINITIONS
EF32:EF17 RESERVED f OR SUPERVISOR TO PROGRAM COMMUNICATION
:
000040
000037
000036
000035
000034

fF.START==

EF .RESTART==
EF.CONTINUE==
EF .NEW==
EF .PWR==

32.

31,
30.
29.
8.

* PRIORITY LEVEL DEFINITIONS

START (OMMAND WAS [SSUED
RESTART COMMAND WAS [SSUED
;
:

CONTINUE COMMAND WAS I5SUED

A NEW PASS HAS BEEN STARTED
A POWER-FAIL/POWER-UP OCCURRED

[ATH]

S IAURINN
OO

06-SEP-82 16:46

PAGE

19-1

PR]Q7== %60
PR106==
300

PRIOS== 240
PR]O&== 200
PRIO3== 140
PRI02== 100
PRIOY== 40

PRI00== 0

1OPERATOR FLAG BITS
4
BvLz==
LOT==

ADR==

IDyY==
ISR==

UAM==
BOE==
PNT==

PR]==
IXE==
|BE==

1ER==

100000

LOE==
HOE==

40
100

200
400

1000

2000
4000
10000

20000

40000
100000

SEQ 28

[a Vo

M1113

[=]lelalelololele]
SEQESESE
2°

— D

[e]lelelolelaleleBe
s
[elalelelalalaleBad
4
[eleleololelolela B, Tol

GLOBAL AREAS
GLOBAL EQUATES S

MACRO M1113

OOV OO0 N NNNNNNNNNOOCOOOOO
OO O NN NNV
LS (N NNv
W) = O L0 NN
WA = OO0V N WV
NN = OOV NN
WN 2O V00NN
WO 000 NN S~

: THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED
: IN MORE THAN ONE TEST,

(S22 Z2Z2222222ARRAARRRA
AR
AR
RZRR2]

S1EX11 VECTOR AND REGISTER INDIRECT POINTERS

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

002244
002246
002250
002252
002254
002256
002260
002262
002264
002266
002270
272
002274
002276
002300
002302
002304
002306
002310

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

VECC::
VECC2::
1IRX::
JIRLX::
JIRHX::
ISRX::
ISRLX::
ISRHX::
JCRX::
JICRLX::
ICRHX::
IDRX: :
IDRLX: ¢
IDRHX: :
CSRX::
BARX: :
BCRX::
MCRX: :
MCRHX: :

.MORD
LWORD
WORD
.WORD
WORD
.WORD
WORD
.WORD
WORD
WORD
LWORD
.WORD
.WORD
.WORD
WORD
MORD
WORD
.WORD
MORD

0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
O
0

s INTERRUPT VECTOR FOR (HANNEL 1
s INTERRUPT VECTOR FOR CHANNEL 2
sPOINTER TO IEEE INTERRUPT REGISTER
sPOINTER TO LOW BYTE OF IIR REGISTER
;POINTER TO HIGH BYTE OF INTERRUPT REGISTER
;POINTER TO IEEE STATUS REGISTER
;POINTER TO LOW BYTE OF ISR REGISTER
;POINTER TO HIGH BYTE OF STATUS REGISTER
;POINTER TO IEEE COMMAND REGISTER
sPOINTER TO LOW BYTE OF JCR REGISTER
:POINTER TO HIGH BYTE OF COMMAND REGISTER
;POINTER TO IEEt DATA REGISTER
JPOINTER TO LOW BYTE OF IDR REGISTER
;POINTER TO HIGH BYTE OF DATA REGISTER
;POINTER TO CONTROL & STATUS REGISTER
;POINTER 1O BUS ADDRESS REGISTER
sPOINTER TO BYTE COUNT REGISTER
;POINTER TO MATCH CHARACTER REGISTER
;POINTER TO HIGH BYTE OF MCR REGISTER

002316

000000

PLEV::

.WORD

¢POINTER TO THE PRJORITY LEVEL

[=]
o

-t

GLUBAL DATA SECTION

bt et At A
LSS LS N LN ST ST N1 ST ST NI S LSS, N1, N1, ST ST N T NT ST ST ST I NS ST NN S ST, N N1 U TN LN

SEQ 29

PAGE 20

.SBTTL

ddfld-‘—.fl—.—.d-‘ddd—.-‘dd—.—.—‘—.-‘-‘d-‘d-—.-fl—.d-‘—.-.-‘dd-.—.—.—.-‘—.-.d_‘d—.—.-—.—..—-.dddd

~NJ

GLOBAL DATA SECTION

06-SEP-82 16:46

002312
002314

000000
000002

DPA1::
DPA2::

.WORD
.WORD

0
0

;POINTER 10 DEVICE PRIMARY ADDRESS FOR (H.1
;POINTER TO DEVICE PRIMARY ADDRESS FOR (M.?

XXZZ23 RS ARRAAAAARERRAARRRRRRRRRRR)

*PROGRAM CONTROL PARAME TERS

:""".".""""""""""""t'.!t""...

002320
322

000020
000000

JTRDEF ::
ITRCNT::

.WORD
WORD

20
O

s1TERATION DEFAULT
s ITERATION COUNTER

:".""'.".""""""""""."""...t"'

:PROGRAM VARIABLES

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

002324
002326
002330
002332
294 002334
295 002336
296 002340
297 002342
298 002344

000000
000000
000000
000000
000000
00000G
000000
000000
000000

PNTF::
NXMFLG::
MM22: :
MMFLG::
PHHIGH: :
PHLOW: :
VIADD::
PHHSIZ::
PHLSIZ::

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

0
0
0
0
0
0
0
0
O

;FLAG FOR TEST HEADER PRINTOUT
;FLAG USED WHEN ADDRESS IS NXM
sFLAG INDICATING 22 BIT MMU
;FLAG TO SEE IF MEMORY MANAGEMENT THERE
sLOCATION FOR MEMORY SIZE
:LOCATION FOR MEMORY SIZE
;LOCATION FOR VIRTUAL MEMORY SIZC
sLOCATION FOR MEMORY SIZE
sLOCATION FOR MEMORY SIZE

301 002352

000000

MASCOM::

MWORD

¢ COMPLEMENT OF MASK

299 002346
300 002350
302 002354

000000
000000

000000

SIZEPA::
MASK : :
REGADD: :

LMORD
.WORD
.MORD

0
O
O

sLOCATION FOR MEMORY SIZE IN PAGE FORM
; BIT MASK OF READ/WRITE BITS
; ADDRESS OF REGISTER TO Bt TESTED

7N~

LLOBAL AREAS

GLOBAL AREAS

SEo 0 30

MACRO M1113 06-SEP=-82 16:46 PAGE 20-1

GLOBAL DATA SECTION

1303 002356

000000

BUFAB::

LWORD

JLOCATION FOR START ADDR. OF BUFFER A

1305
1306
1307
1308

000000
000000
000000
000000

(SRMSK : :
CSRMS1::
(SRMSZ::
ANS::

WMORD
LMWORD
WORD
MWORD

0
0
0
O

JWORK LOCATION USED
s WORK LOCAT!ON USED
:WORK LOCATION USED
;STORE FOR OPERATOR

1304 002360

002362
002364
002366
002370

1309 002372

13 0 002374

000000

BUFBB::

LWORD

LOGDEV::

LMWORD

CHAN: :

WORD

1311
1312
1313
1314

002376
002400
002402
002404

000000
000000
000000
000900

INTFC1::
INTF(C2::
RSAVE::
(NT1::

.WORD
.WORD
.WORD
LWORD

0
0
0
O

1316
1317
1318
1319
1320
1321

002410
002412
002414
002416
002420
002422

000000
000000
000000
000000
000000
900000

MLAL::
MLAZ::
MTAY::
MTA2::
MSA1::
RXADRH: :

.WORD
.MWORD
LMORD
.WORD
LMWORD
.WORD

0
O
O
0
O
0

1323
1324
1325
1326
1327

002426
002430
002432
002434
002436

000000
000000
000000
000000
000000

TXADRH: :
TXADRL::
ERNU::
CDAT1::
(DAT2::

UORD
.UORD
-WORD
.WORD
.WORD

0
0
0
0
0

000000
000000
0000920

CDAT4::
(DATS::
(DATG::

LWORD
LWORD
.UORD

000000
000000
000000
000000
000000
000000
000000
000000
000000

(DAT9::
CDAT10::
(DATY
CDAT12::
CDAT13::
CDATI4:
CDAT1S::
(DAT16::
(DAT17::

1315 002406

1322 002424

1328 002440

1329 002442
1330 002444
1331 002446

000000

1332 002450
1333 002452

000000
000000

}%22 002476

000000

1334
1335
1336
1337
1338
1339
1340
1341
1342

002454
002456
002460
002462
002464
002466
002470
002472
002474

SDPA: :

LWORD

RXADRL : :

WORD

CDATS.:

.WORD

O
O
0

(DAT7::
CDATS8::

LMWORD
WORD

O
0

CDAT18::

.WORD

.WORD
MWORD
LMORD
.WORD
LWORD
.WORD
.WORD
LWORD
.WORD

0
O
0
0
O
0
0
O
0

sLOCATION FOR START ADDR.

sFLAG FOR CHANNEL

JINTERRUPT FLAG FOR (HA.1,
JINTERRUPT FLAG FOR (HA.?2
YEMPORARV LOCATION TO SAVE DATA
:COUNTER USED IN TEST 23-26

:TEMPORARY STORE TO SAVE DEVICE PRIM. ADDR.
:STORE TO
JSTORE TO
;STORE TO
JSTORE TO
JSTORE TQO
JVOCATION

JLOCATION FOR DMA
sLOCATION FOR DMA
JLINE COUNTER FOR
sVARIABLE COMPARE
sVARIABLE (OMPARE
JVARJABLE
JVARJABLE
;VARJABLE

COMPARE DATA FOR
COMPARE DATA FOR
COMPARE DATA FOR

ISR REGISTER
ISR REGISTER
|SR REGJSTER

JVARIABLE
;VARIABLE
JVARIABLE
;VARIABLE
sVARJABLE
JVARIABLE
JVARIABLE
JVARIABLE
;VARIABLE

COMPARE
COMPARE
COMPARE
COMPARE
COMPARE
COMPARE
C(OMPARE
COMPARE
C(OMPARE

ISR
ISR
ISR
ISR
ISR
ISR
ISR
ISR
ISR

sVARJABLE COMPARE DATA FOR ISR REGISTER
;VARIABLE COMPARE DATA FOR JSR REGISTER
FOR
FOR
FOR
FOR
FOR
FOR
FOR
FOR
FOR

JERROR VARIABLES

1348 002500
1349 002502
1350 002504

1354

DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA
DATA

JVARJABLE COMPARE DATA FOR |SR REGISTER

2452222822222 232232222222222222222222X22220}

1353

TX MIGH ADDRESS
TX LOW ADDRESS
ERROR PRINTOQUT
DATA FOR ISR REGISTER
DATA FOR ISR REGISTER

JVARIABLE Curir ~RE DATA FOR |SR REGISTER

13{,7

1392

SAVE MY LISTENER ADDRESS
SAVE MY LISTENER ADDRESS
SAVE MY TALKER ADDRESS (M.1
SAVE MY TALKER ADDRESS (HW.?
SAVE MSA
FOR RX HIGH ADDRESS

sLOCATION FOR RX LOW ADDRESS

E.tt"t.tt."""""."t""'"'."Q...t'.."

1361

BU fER B

sLOGICAL DEVICE NUMBER

13‘5

1346

IN TEST 27
IN TEST 27
[N TEST 27
ANSWER USED IN T28

002504
002504
002506
002510
002512

000000
000000

600D::
BAD::

000000
000000
000000
000000

LSERRTBL
::
ERRTYP::
ERRNBR: :
ERRMSG: :
ERRBLK::

ERRTBL

LWORD
.WORD

O
0

MWORD
LMWORD
LMWORD
LMORD

O
O
O
O

sWORD USEDFOR ERROR PRINTOUT
sWORD USEDFOR ERROR PRINTQUT

N et aN et et et et estreetereeteneeteneetetentesetneseeetssersessenene

sTABLE AREA FOR MCR FUNTIONS (TEST 25,26)

(RN

ettt ettt ettt et ettt ReRet IR Rt tNe e TRTeICRLIRRRRIOETOITRRORLY

el il

(V]

) e

) D e

D e il o

D D o

el o

e e

003146
000
000

002734
050
000006
050

003041
177
177
177

00304¢

012
000006
012
050

000
000006

000

025

000006

0G0

050

TABF::

TABG::

TABH::

TABK::

d =D =D

[

LEVEN

.REPT
.BYTE
+ENDR
JEVEN
LLIST BEX

e el e

e ALY

127277

)

el e
\I

77,27

.BYTE
.REPT
.BYTE
.ENDR
.EVEN

12.12.50.12.12.12

BYTE
.REPT
.BYTE
.ENDR
LEVEN

0,0,0,0,0,0

)

s«

55.25,50.25.25.25

25.25,25,25,25.25,25.25,25,25

w8
Y e

[V IV TV TV, IV IV 4

(LS, T,
01,81,
¥ 1, ¥

—d el ) ) wd b

IWWAVAVALA

NONLNLNLRLND

[V LV LV 1V [V 1V ,}

MNOMNLNLRLNOLND

VLV 1V 1V IV )}

—

NN
O

i
e
b b b \ Y

[,V NT N1, N1, S, G1V ]
(U LV IV IV IV IV, l= ]

—

e«

(G LV LV LV 1V LV, 1V,]

—dDeb
OO
(LN, VT, N1, V1,8 1,¥ 3

AV LV IV LV 1V 1V, 3

—ld and

e«

[AC1, ST N1, 81 81,8 SV, ]
VAIVTVAWVIVAWVIWAO

—

— ced b b
kb D
[pS1aN 1, W1,
S1,81,¥1,§3
AN
e s 8 v 8 s s
O

MWDV

POMNLALNLNLNVNO

—b e

Vg =t =t 4 — = =t =

2MMAMMMMmMmrTm

[

2MPDMM—

]

MOOODODDDD©D

[V IV IV IV, IV [V [V,

—d ed el e e d b O
POPLRLRLAUNLNVUY

[elelololelelsle]
QOO0O0O0O00O

& € € €€«
<

yoOrWn

Mt
©O 40

CLXP

CNLIST BEX

PAGE

050
MOMDD

002732

003250

::
TABE

000007

06-SEP-82 16:46

—d ) ad e s e e O
(oS N1 N1 N1, N1, G, G1V, ]
[(CLIV IV IV IV [V IV, e

= NN
= LS

) d b

NINUAINLRONDNOND
[T 0 SV IV IV [V, IV, 1V}
O NON NN
—

366 002624

) el i e

0000000000000
N NN NNNNNNNOO
wSwuwuwwwwwwwwuwwwwwwuwwww
ny — OV®NOWVNENNI
= OOV NO VNS W20 0000

) el el

MACRO M1113
GLOBAL AREAS
GLOBAL DATA SECTION
20-2

SEQ N

0.,0,0,0,0,0,0,0,0,0

50,50,50,50,50,50,50,50,50

;9DATA,63 EOS

:72 DATA BYTES

0.0
;9 DATA,63 EOS

77,772,127 ,177,177,177

172,177,177

s 2EOS, 1DATA,63E0S

12,12,12,12,12,12,12,12,12,12

:66 DATA BYTES

.0,0,2,0,0,0,0,0,0

;2 EOS,1 DATABYTE ,63 EOS

GLOBAL AREAS

GLOBAL

MACRO M1113

TEXT SECTION

06-SEP-82 16:46

PAGE 21

.SBTT.

1400

SEQ 32

GLOBAL TEXT SECTION

1401
1402

s e

1404

* MESSAGES, AND ASCII INFORMATION THAT ARE USED IN

: THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS,

1403
1405

: MORE THAN ONE TEST.

1407

R A

1408

16410

1409
1611

003352

003355
003360
003363
003366
00337
003374
003377
003402
003405
003410
003613

061
106
040
M

123
MM
061
106
040
102

000

105

061
117
125
102

040
105
061
117
i21
125

125

1420

1423 003414

003452

13/
121
M
116
124
040
055
066
055

000

R A

AR A

105

m
040
101
117
M
101
124
064
115

125

LSDESC::

105
104
107
123
103
103
060
10
103

RN NN TNICIIIENETIENRITAICICRRRTRROROROTS
A

A AL

1425

/1EUNIEQ DIAGNOSTIC AC-TO64A=-M(/

EVEN

1426

14634

; FORMAT STATEMENTS USED IN PRINT CALLS

}:%2
000001
000001

ARl

DESCRIPT

LASCIZ

LEVEN

1424

1433

ALl

/71EUTY FOR UNIBUS \IEQ11 FOR Q-BUS/

TITEL OF PROGRAM

1422

003417
003422
003425
003430
003433
003436
03441
003444
003447

A A A A

EVEN

1421

134
121
040
122
055
123

INRERE RN R

003414

LASCIZ

16419

003414

DEVIYP
LSDVTIYP::

040
122
116
125

1413

14647

A A A A A R R A

s NAMES OF DEVICES SUPPORTED BY PROGRAM

16412 003352
003352

1455
1456

A R R R A

SV(GBL= 1
SVCINS= 1

GLOBAL AREAS

MACRO M1113

GLOBAL ERROR REPORT

SECTION

06-SEP=-82 16:46

1458
1459
1460
1461
1462

.SBTT.

SEQ 33

PAGE 22
GLOBAL ERROR REPORT

SECTION

:
*

}222

THE G.OBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS
USED BY MORE THAN ONE TEST TO OUTPUT ADDITJONAL ERROR INFORMATION.

: (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVICES.

PRINTB

1465

1466

16467 003456

003454
1468 003454
003454

010146

003472

(62706

003456
003462
003466
003470

1469 003476

003476
003476

1470
1471
1472
1488 003500

003500
1489 003500
003500

063504
003510

003514

003520
003524
003526

003530

012746
012746
010600
104414

000006

013746
013746

013746

002502
002500

#EMG101,RY

012746
010600
104414

ENDMSG

L10002:

BGNMSG

ERR201

PRINTB

#EMG201,CHAN,GOOD,BAD

603554
1492 003554

104423

000004

PRINIB

ENDMSG

L10003:
ERRZ20Z

16494 003556

PRINTB

#EMG202,R2,(HAN,GOOD,BAD

003572
003574
003600
003604
003606
003610

010246
012746
012746
010600
104414
062706

002502
002500
002374

004330
000005
000014

#6,SP

#EMG101,=(SP)
82,-(SP)
SP,R0O
C$PNTB

TRAP

CeMS”~

MOV
MOV

BAD,=(SP)
GOOD,
= (SP)

MOV

SEMGSCY ,=(SP)

MOV
MOV
TRAP
ADD

WEMG203

BGNMSG

013746
013746
013746

ADD

MOV

1493 003556

003556

R1,=(SP)

ERR201::

900004

004265
000001

MOV

MOV
MOV
MOV
TRAP

002374

012746
012746
010600
104416
062706

003556
003562
003566

€RR101::

012746 004170

003536
003540
003544
003546
003550
003554

PRINTB

104423

000012

1491

ERR101

004116
000002

062706

1490 003534

BGNMSG

(HAN,=(SP)

84 ,-(SP)
SP.RO
($PNTB

#.2,SP

MOV
MOV
MOV
TRAP
ADD

#EMG203,-(SP)
#1,-(SP)
SP.RO
($PNTB
#,SP

TRAP

CIMSG

MOV
MOV
MOV

BAD,~(SP)
GOOD
, = (SP)
CHAN,
= (SP?}

ERR20?2::

MOV
MOV
MOV
MOV
TRAP
ADD

R2,-(SP)
#EMG202,-(SP)
#5,-(SP)
sP,RO
CSPNTB
#16,SP

GLOBAL AREAS

MACRO M1113

GLOBAL ERROR REPORT

SECTION

Q6-SEP=-82 16:46

1495 003614

003614
1Sk 003614

SEQ 34

PAGE 22-1
ENDMSG

L10004:

104423

1487 003616

BGNMSG

ERR4O1

1498 073616

PRINTB

#EMG4LOY,CHAN,GOOD,BAD

003616

003616
003622
003676
003652

013746
013746
013746
012746

003642
003644
007646

010600
104414
062706

003656

1499 003652

003652

1500 007¢%2
(I}

1501

012746

002502
002500
002374
004425

ENDMSG

L10005:

003654

BGNMSG

ERR4O?2

1502 003654

PRINTB

WEMGLO2,CHAN

003654

003660
003664
003670
003672
003674

1503 003700

003700
1504 003700

013746

012746
012746
010600
104414
062706

002374

ENDMSG

L10006:

104423

1505 003702

BGNMSG

ERRS01

1506 003702

PRINTB

#EMGSO1,CHAN,GOOD,BAD,
] TRCNT

003702

003702
003706
003712
003716

013746
013746
013746
013746

002322
002502
002500
002374

003726
003732
N03734
003736

012746
010600
104414
062706

000005

003742
1508 003742

104423

000014

ENDMSG

L10007:

BGNMSG

ERR231

1510 003744

PRINTB

#DMAMAD

ASL

TXADRH

1511

003744
003750
003754
003756
003760
003764

012746
012746
010600
104414
062706

(06337

004715
000001
000004

002426

SP,RO
C$eNTB
#2,SP

84 ,-(SP)

TRAP

(SMSG

MOV

MOV
MOV
MOV
TRAP
ADD

CHAN,=(SP)
REMGLO2,=(SP)
82,-(SP)
SP,RO
CSPNIB
#6,5P

TRAP

CSMSG

MOV
MOV
MOV
MOV

1TRCNT ,=(SP)
BAD,=(SP)
GOO0D,=(SP)
CHAN, = (SP)

MOV
MOV
TRAP
ADD

#5,-(SP)
SP,RO
(SPNTB
#4,S5P

MOV

1509 003744

003744

MOV
TRAP
ADD

ERRSO1::

003722 012746 004560

1507 003742

BAD ,=(SP)
600D ,=(SP)
CHAN,=(SP)
#EMGLO1,=(SP)

ERR4O?::

004521
000002
000006

MOV
MoV
MOV
MOV

MOV

1046423

003654

C$MSG

ERR4LO!::

000004

000012

TRAP

#EmMGS01,
= (sP)

TRAP

(IMSG

MOV
MoV
MOV
TRAP
ADD

, = (SP)
#DMANHAD
2 ,-(SP)
SP,RO
(SPNTB
#s,5P

ERR231::

GLOBAL AREAS

MACRO M1113

GLOBAL ERROR REPORT

SECTION

06-SEP=-B2 16:46

1512 003770

006337

002422

1515
1516
1517
1518
1519
1520
1521

042737
005237
005737
002005
042737
005237

100000
002426
002424

002430

100000
002422

002424

004034
004040
00460446
004050
004054
004060
004064

013746
013746
013746
013746
013746
013746
013746

002404
002424
002422
002502
002430
002426
002500

004074

012746

000010

1513 003774
1514 004000

004002
004010
004014
004020
004022
004030
004034

004C70

0064100
004102
004104

1522 006110

0046110
1523 004110

1924 004112

1525
1526
1527
1528

004112
006114

005737
002C05

012746

010600
104414
062706

002430

ASL

RYADRH

BIC
INC
187
BGE
BIC
INC
PRINTB

#100000, TXADRL
TXADRH
RXADRL
2%
#100000,RXADRL
RXADRH
#EMG231,G00D,
TXADRH, TXADRL ,BAD ,RXADRH,RXADRL ,(NT1

191
BGE

1%:

2%:

TXADRL
1%

004651

MOV
MOV
MCv
MO,
MoV
MOV
MOV

INT1,=(SP)
RXADRL ,=(SP)
RXADRM,=(SP)
BAD,=(SP)
TXADRL ,=(SP)
TXADRH,=(SP)
“00D,=(SP)

MOV

#14,=-(SP)

MOV

000022

MOV
TRAP
ADD

ENDMSG

L10010:

104423
Ex]T

000167
177772

MSG

#6231, =(SP)
SP.R0O
C$PNTB
#22,5P

TRAP

($MSG

.WORD
.WORD

JSIMp
L10010=2~-.

:
JEXTENDED ERROR MESSAGES

1529

153C 004116
1531 004170

045
045

123
101

063
122

EMGI01:
EMG201:

1533 004330
1534 004425

045
045

101
101

122
103

1532 004265
1535 004521

1536 004560

1537 004651

}ggg 004715

045

101

117
101

050

103

066
107

154C

.NLIST BEX

.ASCIZ
.ASCI2

/XS3XAREGISTER AT X06%A DOES NOT RESPONDIN/
/XAREGISTER: CSR ,CHA.:XI01XA ,GOOD DATA:X06XA, BAD DATA:Z06%N/

EMG202:
EMG4LO1:

.ASCIZ
.ASCIZ

/XAREGISTER:XTXA ,CHA.:XO1XA ,GOOD DATA:X06XA ,BAD DATA:X06IN/
/XACHAN.:XO1XA ,CORRECT PRIOR]TY:X03XA ,WRONG PRJORITY:Z03XN/

EMGS01:

.ASCI2

EMG203: .ASCIZ
EMG4LO2:
EMG231:

oJMAHAD:

.ASCIZ

.ASCI2Z

.ASCIZ

/XA(FOR JEU11=-A IGNORE BIT 9-f2).!N/
/XACHANNEL :101iA IS SELECTEDXN/
/XACHAN,:XO01XA

,GOOD :X06XA

/XAGOOD DATA

TXADDR

,BAD :X06%A ,ITERATION :%03UIN/

/106!56!03!05156106156103105i56106!N/
BAD DATA

}gzg

;ERROR MESSAGES

1543 005012
1544
1545
1546
1547
1548
1549
1550
1551
1552

SEQ 35

PAGE 22-2

005057
005124
005162
005230
005265
005316
005353
005406
005447

040

040
040
040
040
040
040
040
040
040

122

122
122
102
115
103
116
"M
102
102

105

105
105
111
125
123
117
116
111
111

5101::

E€200::
E301::
E302::
E303::
E4O0V::
E&402::
E403::
ESO1::
ES02::

ASCIZ

.ASCIZ
LASCIZ
JASCJZ
JASCIZ
_ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ
.ASCIZ

/ REGISTER ADDRESSING ERROR - TRAP & /
7/
/
/
7/
/
/7
7/
7
7

REGISTER INCORRECT AFTER BUS RESET /
READ - WRITE BITS INCORRECT /
BITS NOT CLEARED AFTER MASTER RESET /
Mux BIT IN (SR NOT SETABLE /
CSR CONTENTS INCORRECTY /
NO INTERRUPT WHEN EXPECTED /
INCORRECY PRIORITY LEVEL /
BITS IN IIR REGISTER INCORRE(CT /
811S IN ISR REGISTER INCORRE(CT /

RXADDR

BYTE CNT#IN/

OO—MONOON—MIM—NFMr—rMO——~

ONOWNINNN
OVO VOOV NN

VoaYavadellonVdleoVlagtlvaonVdlesuVdlaloVlaalnVdlaaloVtlaloVaa[dVaalYaalnVdaLloVta
1568

[V] N xo

eOSMIUWN~ONMOPO

[olelelolelelelSelols]TIF~

—v N_e——— -[VUtIVyE]

OO0— . uO —r—

TN UM — O = =

L].

L(WwLIAvS To) —rx—axa WDUIDZ2IZIDW L+oWO=—I &I4S

O<« Wg« ——
axax
O EE [

=[V)Te=y NwXeiw—

V] Lad

o~0

06-SEP-82 16:46

Lo oL T e [+ «

MACRO M1113
GLOBAL AREAS
GLOBAL ERROR REPOR T SECTION
PAGE 22-3

SEQ 36

o~ ~

GLOBAL AREAS

MACRO M1113

LOCAL MACRO DEFINITIONS

06-SEP-B2 16:46

SEQ 37

PAGE 23

1570
157
1572
1573
1574

sb
¢THIS SECTION CONTAINS ONLY MACROS WHICH ARE USED
:SEPARATE FROM THE MACRO LIBRARY (SV(34R) (LIBA.MLB)

1577

1578
1579

PRlT MACRO = THIS MACRO CHECKS If INTERRUPT OUCURES
AND WHAT [S THE PRIORITY,

1376
1580

.SBTTL

LOCAL MACRO DEFINITIONS

NN PR N R PR TR E Ot

R LTI R Rt T IILIITIRINRR R ORI R R RRYOITENTSE

1581
1582
1583
1584
1586
1587
1588

TST
BNE
DEC

PRIT
ARG
A
R1
#PRI06
ARG
A
R1

MACRO
157
BNE
DEC

1590
1591
1592
1593
1594
1595
1596

1ST
BNE
DEC
SETPRI
TST
BNE
DEC

ARG
A
R1
#PRIO&
ARG
A
R1

1598
1599

TST
BNE

1585

SETPR]I

1589

SETPR]

1597

1600

1601
1602

1603

P Rt R RN AN TR RO ER TR NERERNNOS

#PRIOS

ARG,ENUM,ERRM,?A
: INTERRUPT OCCURED?
:BRANCH [F YES
:CHECKSLM = 7
s CHANGE PROCESSOR PRIORITY
s INTERRUPT OCCURED?
:BRANCH [F YES
¢CHECKSUM = 6

s INTERRUPT OCCURED?
:BRANCH IF YES
¢ CHECKSUM =
: CHANGE PROCESSOR PRIORITY
s INTERRUPT OCCURED?
:BRANCH [F YES
s CHECKSUM =

SETPR] #PR]O3

.SBTTL

ARG

ERRSOF T ENU" E402,ERRM

NOP
.ENDM

PR]1T

TO 6

:CHANGE PROCESSOR PRIORITY 10 S

; CHANGE PROCESSOR PRIORITY
s INTERRUPT OCCURED?
;BRANCH [F YES

;NO INTERRUPT ERROR

GLOBAL SUBROUTINES SECTION

10 &

10 3

GLOBAL AREAS

MACRO M1113

GLOBAL SUBROUTINES SECTION

06-SEP-B2 16:46

SEQ 38

PAGE 24

=D e

ced

TT T
X3

s il e

o°e
e e e
o O VAV

) Bl e i D e o e il D e

) e

D e o el D ) e e

) e s

D D e

D e oD e

D D ) i e i

D D D e e

D b D e

e e e e e e e e o Lo o Lo T Lo bt st catealoatoatealoato gl s ale Yo Yo aT o Yo Yo Yo Yool o gl o gl o Yo Yo glo oo gTo Lo Xo oo plon o
VHA NN B 55 85 55 85 8 2 5 35 5 NN
AN W N AN N AN RO R NI AINI NINININD = b b b cd b o b et =2 O Qo
0 = O 0 00 O N B R = O O 00 ~ON WV IS NN = © 0 00 NN IS WA = O 0[¢ ]
—=C OB NOWN B AU 2 O 0 M0 O N 8

1607

)

THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES
THAT ARE USED

IN MORE THAN ONE

TEST.

NN eI e r e Rt

e Rentaeeeeeeeeeereveesereeenetecetecee

: SUBROUTINE REGTST - GENERAL PURPOSE REGISTER TEST.
XZEXI

RS2

RAR R

RRR

RARRRARRRARRRRRRAA)

FUNCTIONAL DESCRIPTION:

CHECKS THAT ALL READ/WRITE BITS OF THE SELECTED REGISTER CAN BE
SET, CLEARED, AND INDIVIDUALLY SET (SLIDING ONES PATTERN).
INPUTS:

IF ENTERED AT LOCATION REGTST, THE LOCATIONS FOLLOWING THE
SUBROUTINE CALL MUST CONTAIN THE READ/WRITE BIT MASK, THE
ADDRESS OF THE REGISTER TO BE TESTED, AND THE FIRSY ERROR NUMBER
TO BE USED

(SEE CALLING SEQUENCE).

IF ENTERED AT LOCATION REGTS1, THE READ/WRITE BIT MASK, REGISTER
ADDRESS TO BE TESTED, AND THE FIRST ERROR NUMBER MUST BE LOADED
INTO LOCATIONS MASK, REGADD, AND ERRNBR RESPECTIVELY. THIS
ALLOWS THE ARGUMENTS TO BE VARIED AT RUN TIME.
IMPLICIT INPUTS:

NONE.

OUTPUTS:

ERROR MESSAGES IF ERRORS OCCUR.

IMPLICIT QUTPUTS:

IF ENTERcD AT LOCATION REGTST,
= CONTAINS THE READ/WRITE BIT MASK
REGADD = CONTAINS THE ADDRESS OF THE REGISTER BEING TESTED

MASK

ALWAYS,

MASLOM = CONTAINS THE COMPLEMENT OF THE MASK
= CONTAINS LAST EXPECTED DATA
GOOD
= CONTAINS LAST ACTUAL DATA
BAD

ERRNBR = CONTAINS THE INPUT ERROR NUMBER ¢ 2
ERRTYP = CONTAINS 3 (SOFT ERROR)

ERRRLK = CONTAINS ADDRESS OF REGERR (REGISTER ERROR MESSAGE)
ERRMSG = CONTAINS 3RD REGISTER ERROR MESSAGE
SUBORD INATE ROUTINES USED:

DRS ERROR MA(RO

FUNCTIONAL SIDE EFFECTS:

NONE
.

CALLING SEQUENCE:

Gl OBAL AREAS

MACRO M1113

GLOBAL SUBROUTINES SECTION

(06-SEP-82 16:46

1663

EITHER FIXED PARAMETERS FOLLOW THE SUBROUTINE CALL

1664
1665
1666

SEQ 39

PAGE 24-1

:
:
:

EG.

}ggg

OR PARAMETERS ARE SET DYNAMICALLY :

1671
1672

:
:

EG.

}g;g

;

}ggg

1673

; FIRST ERROR NUMBER

MOV
MOV

#177 ,MASK
CSR,REGADD

CALL

REGTST

MOV

; BIT MASK OF R/W BITS
. REGISTER ADDRESS

#200. ERRNBR

;
:

BIT MASK OF R/w BITS
REGISTER ADDRESS

* FIRST ERROR NUMBER

Et't"t.i't"tt""""t"""'l""'t"'"""'.'t""'."""""Qt"."'

1677
1678
1679
1680
1681
1682

006262
006262
006270
006274
006302

1684
1685
1686
1687

006314
006320
006320
006326

013737
005137

002350
002352

002352

1689 006340
}gg? 006346

012737
012737

006612
006660

002512
002510

1683 006306

1688 006332

017637
062716
017637
062716

000000
000002
000000
000002

062716

000002

017637

012737

000000

000003

002350

REGTST::

002354

002506
REGTST::

013737

1696
1697
1698
1699

053777
017737
043737
€23737

006362

006364
006372
006400
006406

1700 006414

006416

106404

001401

006416

104460

006420
1703 006620

104405

1702 906420

};83 006432

1710 006440

006440

1711 006442
1712 006450
1213 006456

012737

104404

(43777
017737
043737

GET R/W BIT MASK
JUMP OVER ARGUMENT
GET REGISTER ADDRESS
JUMP OVER ARGUMENT

ADD

#2,(SP)

a(SP) ,ERRNBR

GET FIRST ERROR NUMBER

MOV
COM

MASK ,MASCOM
MASCOM

:
:

JUMP OVER ARGUMENT
)
SET UP COMPLEMENT
OF R/W BIT MASK

MOV
MOV

#REGERR,ERRBLK
#RERR1, ERRMSG

¢
:

SET UP ERROR MESSAGE ROUTINE
FIRST ERROR MESSAGE

#3,ERRTYP

t SET UP FOR SOFT ERROR

CHECK THAT ALL R/W BITS CAN BE SET

002500

MOV
BGNSEG

MASK ,GOOD

SET UP EXPECTED DATA

002500
173756
002352
002502

173762
002502
002502
002500

BIS
MOV
BIC
CMP

600D, 3REGADD
aREGADD ,BAD
MASCOM, BAD
8AD,GOOD

:
¢
:
P

SET ALL R/W BITS
READ THE RESULT
KEEP ONLY R/W BITS
ALL R/W B!TS SET?

ELSE REPORT ERROR

BEOQ

ERROR

1$:

005037
005237

:
.
¢
.

002350

};82

1706 006422
1707 006426

a(SP) ,MASK
#2,(SP)
a(SP) ,REGADD
#2,(SP)

MOV

1694 006354
1695 006362

MOV
ADD
MOV
ADD

MOV

002504

}gg%

1701

REGTST

200.

1676

CALL
177
(SR

902500
002506

006732

002510

ENDSEG

173704
002502
002502

($BSEG

TRAP

C$ERROR

TRAP

(SESEG

TRAP

($BSEG

: IF YES, BRANCH

100008:

CHECK THAT ALL R/W BITS CAN BE CLEARED

CLR
INC

MOV

GOOD
ERRNBR

: SET UP EXPECTED DATA
* NEXT ERROR NUMBER

MASK , aREGADD
aREGADD ,BAD
MASCOM, BAD

: CLEAR ALL R/W BITS
. READ THE RESULT
P KEEP ONLY R/W BITS

#RERR2,ERRMSG

* NEXT ERROR MESSAGE

BGNSEG

002350
173700
002352

TRAP

BIC
MOV
BIC

MACRO M1113
GLOBAL AREAS
GLOBAL SUBROUTINES SECTION
1714 006464
1715 006472
1716 006474

006474

104460

006476
006476

104405

:NNNVN\‘

P 2 W o N
P
VB
BWN = O O

002502

002500

CMP
8EQ

ERROR

2%:

SEQ 40

PAGE 24-2

BAD,GOOD
2%

: ALL R/W BITS CLEAR?
BRAN(H
P IF YES,

* ELSE REPORT ERROR

ENDSEG

100018

006536

O WO = NN
NEWO NN
NN
O NN
OWVINE NN~NN

006500

3¢%:
4%:

5%:

006540
006540
006542
006550
006556
006564
006572
006600
006602
006602
006604
006604
006604
006606

000750

006610

000207

006612
006612
1746 006612
006612
006616
006622
006626

INC
MOV
MOV

ERRNBR
NRERR3,ERRMSG
#1,6000

:
*
P

(SERROR

TRAP

(SESEG

BNE

81T

ASL
B(S
BR

YES, TEST IT

ELSE FIND NEXT R/wW BIT
IF ALL DONE, RETURN
ELSE CHECK IF NEXT IS R/W

#177767 ,aREGADD
GOOD , aREGADD

:CLEAR ALL BITS EXEPT
PTSET THE BIT

BI(
CMP

MASCOM,BAD
BAD, GOOD

P KECP ONLY R/W BITS
P ALL OTHER BITS CLEAR?

aREGADD ,BAD

READ

P IF YES, BRANCH
* ELSE REPORT ERROR

10002$:

($BSEG

TRAP

($ERROR

TEST NEXT BIT

TRAP

(SESEG

MOV
MOV
MOV
MOV
MOV
MOV

MASK ,=(SP)
= (SP)
BAD,
, = (SP)
600D
CHAN.=(SP)
,
= (SP)
REGADD
NREGMSG,=(SP)

MOV
TRAP
ADD

SP.RO
($PNTB
#16,5P

RE TURN

BGNMSG

REGERR

PRINTB

#REGMSG,REGADD,
CHAN, GOOD , BAD , MASK

REGERR:
:

MOV

ENDMSG

174/

TRAP

THE Mux BIT

IT BACK

ENDSEG

BR
7%:

P
*
P

BIC
8IS

BEQ
ERROR

104405

600D
7%
13

P R/WBIT?

BGNSEG

MOV

GOOD , MASK

NEXT ERROR NUMBER
NEXT ERROR MESSAGE
FIRST BIT 10 TEST

006632
006636
006642

1748
1749
1750

TRAP

P CHECK THAT EACH R/W BIT CAN BE SET
O —-2000000
OOOOW—=0O

D
and e
D D D i D D el s
-—
— ek el el ) ad
SNONNNNSNSNSN S NNSNSNSNSNSNSNSNNSNNNY
WWIANIWNINIWNWNIN
WRORNNNINI
NI NINININ) = —
oo
NOWVNEB WA=
OO NOWVEWNI—-O
000

1717 006476

—

023737
001401

06-SEP=B2 16:46

006656

NUIST BEX

L10011:

TRAP

#6,-(SP)

CSMSG

GLOBAL AREAS

MACRO M1113

GLOBAL SUBROUTINES SECTION

06-SEP=-82 16:46

SEQ 41

PAGE 24-3

1751 006660
1752 006732

122
12¢

105
10%

107
107

RERRY:
RERR2:

,ASCIZ
,ASCIZ

XREGISTER READ/WRITE BITS (OULD NOT BE
XREGISTER READ/WRITE BITS COULD NOT BE

‘;gz 007077

045

LIVA

101

REGMSG:

.ASCIZ

.XAADD: XO6XA,(HAN %01%A,G00D X06%A, BAD X06%A, R/W BITS X062IN.

};22 007910

1757
1758

122

105

107

RERR3:

ASCIZ

XREGISTER READ/WRITE BITS COULD NOT BE

LIST BEX
EVEN

SETX
CLEAREDX

INDIVIDUALLY SETX

GLOBAL AREAS

MACRO M1113

GLOBAL SUBROUTINES SECTION

06-SEP-82 16:46

SEQ &2

PAGE 25

1760

1761

176
};gé

[ X
: FUNCTIONAL

1766

;

DETERMINES THE SIZE OF CONTIGUOUS USABLE MEMORY AND OUTPUTS T

};23

PAGE

176

1767

1770

17N
1772
1773
1774
1775
1776
1777
1778
1779

1780
1781
1782
};gz

A A

SUBROUTINE MEMIN! = MEMORY SIZING AND MEMORY MANAGEMENT

;

DESCRIPTION:

TO THE

CONSOLE.

IF MEMORY MANAGEMENT

IS AVAILABLE,

ADDRESS AND DESCRIPTOR REGISTERS ARE

L OINPUTS:
:
;
;
:
;
;
:
:
:

NONE
.
IMPLICIT

INPUTS:

NONE
.
OUTPUTS:

};gg

MEMORY SIZE IN K WORDS [S PRINTED

};gg

: IMPLICIT OUTPUTS:

1789

;

AND PAGE ADDRESS REGISTERS ARE SET AS FOLLOWS

%;g§

;

KPDRO TO KPDR? ARE SET T0 77406

1794

;

KPARO 1S SET 10 0

}%8}

;

KPARS POINTS TO THE HIGHEST ADDRESSABLE MEMORY BANK

}ggz

KPAR7 POINTS TO THE 1/0 PAGE

1805

;

}ggg

SUBORDINATE ROUTINES USED:

1810

;

181

1814
1815
1816

:
:
:

1389

131;

1813

THE KERNEL

INITIALIsED.

PHHSIZ
PH.OW
MMFLG
MM2:

1795
1796
1797
1798
};gg

:'"'"""""'"'"""""0"""".'."Q""'t.'..""""Q'.Q""'."

;
;
;
;

};39

AR AR A

INIT ROUTINE.

;
;
:
;
;

;

=
=
=

HIGH WORD OF MEMORY SIZE
LOW WORD OF MEMGRY SIZE
FLAG SET TO 1 If MEMORY MANAGEMENT AVA[LABLE
FLAG SET TO 1 IF 22 BIT MEMORY MANAGEMENT AVAILABLE

IF MEMORY MANAGEMENT 1S AVAILABLE, THE KERNEL PAGE DESCRIPTOR

KPAR1
KPAR2
KPAR3
KPARG
KPAR6

[S
IS
IS
IS
[S

:=-

SET 10 200
SET TO 400
SET TO 600
SET 10 1000
SET TO 1400

IF 22 BIT MAPPING 1S AVAILABLE, IT7 IS ENABLED VIA SR3. MEMORY

MANAGEMENT 1S LEFT DISABLED VIA SRO.

NXM

VPCON

- NON EXISTANT MEMORY TRAP SERVICE ROUTINE

= VIRTUAL TO PHYSICAL ADDRESS CONVERSION ROUTINE

FUNCTIONAL SIDE EFFECTS:
NONE

b b

NOWV S WA =0V

NI PO NI NI TV ANONV PO NIA) =

NOWNB WA =O VO NOWVNNN 2OV

177572
177574
177576
172516

e
d

AN NN NN

172300
172302
172304
172306
172310
172312
172314
172316

£ 85 B 5%
8 B 85 5 £ 8

KT11

MEMINI

STATUS REGISTER ADDRESSES

SRO=
SR1=
SR2=
SR3=
:

177572
127574
177576
172516

KERNEL PAGE

KPDRO=
KPDR1=
KPDR2=
KPDR3=
KPDRL=
KPDRS=
KPDR6=
KPDR7=

DESCRIFTOR REGISTERS

172300
172302
172304
172306
172310
172312
172314
172316

: KERNEL PAGE ADDRESS REGISTERS
172340
172342
172344
172346
172350
172352
122354
172356

OCWVNEBWN 2OV

D e

d e

D el

i e

D e

i e

)

e e

el e

(o Yo Yo Yo Jo Jo To To -To Yo To To To -To -Jo Yo To To Yo To To Yo To To To To To Yo JTo To To To To Jo To Yo -To -To To To

CALL

p)
5
52
53
54
55
56

1859 007242

1860
1861
1862
1863
1864
1865
1866
1867

SEQ 43

PAGE 25-1

¢ CALLING SEQUENCE:

007176
007176
007200
007202
007204
007204
007210
007214
007220
007224
007226
1857 007232
1858 007236

—d

06-SEP=-B2 16:46

KPARO=
KPAR1=
KPAR2=
KPAR3=
KPARG=
KPARS=
KPARG=
KPAR?=
: :
MEMINI

010046
010146

010246
012746
012746
012746
012746

000340
010132
000004
000003

062706
005037
005037
005037

000010
002326
002344
002342

104437

172340
172342
172344
172346
172350
172352
172354
172356
MOV
MOV

MOV
SETVEC

RO,=(SP)
R1.=(SP)

R2,=(SP)
W4 ,NXM, #340

SAVE REGISTERS USED IN
TH]S ROUTINE

SET UP NON-EXISTENT MEMORY TRAP VEC.
#340,-(SP)
MOV
MOV
MOV

= (SP)
#NXM,
#4,-(SP)

ADD

#10,sP

MOV
TRAP

(LR
CLR
CLR

NXMFLG
PHLSIZ
PHAS1Z

2K BANK QOF MEMORY

; SIZE MEMORY UP TO 32k
007246
007252
007256
007260
007266

005777

005737
001147

062737
023727

173072

tos:

002326

010000
002344

002344
160000

aPHLSI?

ADD
(MP

#10000,PHLSIZ
PHLS1Z,#160000

1S1
BNE

NXMFLG
140%

#3,-(SP)
CSSVEC

C(HECK THIS BANK EXISTS

WAS THERE AN NXM TRAP?
If YES, PRINT THE MEMORY SIZE

ELSE GET NEXT 2K BANK
HAVE

REACHED

THE

[/0 PAGE?

MACRO M1113
GLOBAL AREAS
GLOBAL SUBROUTINES SECTION

SEQ 44

PAGE 25-2

BNE

108

NOT,

TRY NEXT 2Kk BANK

orrorY

NN
N N

—NNO

O -0
O ~NO

NN N
-~~~

§ 28K OR MORE = CHECK |F MEMORY MANAGEMENT UNIT PRESENT.
—2 NN

007276
007302
007306
007312

001364

(=l{=l=d%
elelele)

1868 007274
1869

06-SEP-82 16:46

CLR
ST
151

BNE

MMFLG

;

SRO
NXMELG

;
.

1408

ASSUME

NO MEMORY MANAGEMENT

ADDRESS MMU STATUS REGISTER O

WAS THERE AN NXM TRAP?
1F YES, PRINT THE MEMORY SIZE

S OO
=2 e O b b
NI = NN O NN
NWWN=—NO
NN
WNOONOOOW
NWNSLON—-2O~N

007354
007360
007364
007370
007372

172300
000010
077406

(olelelele B ololelolololalele]

007346

000001
172340

OO = b b
=N
WWSNNN
NONOO
S5 = O=O

: MEMORY MANAGEMENT AVAILABLE = SET UP MMy REGISTERS
002332

000006

50%:

000200
177600

MOV
MOV

21, MMFLG
#KPARO,
RO

MOV

R1.(RO)+

CLR
MOV

ADD

DE(
BNE
MOV

172356

60%:

MOV
MOV
MOV

DEC
BNE

FLAG MEMORY MANAGEMENT

AVAILABLE

LOAD FIRST KPAR ADDRESS
SET UP CONTENTS OF FIRST KPAR

R1
#6,R2

SET UP FJRST 6 KPAR'S
LOAD KPAR VALUE

#200,R1

NEXT KPAR VALUE
ALL KPAR'S LOADED?

R
508
#177600,KPAR7

IF NOT, LOAD NEXT
ELSE LOAD KPAR7 WITH [/0 PAGE ADDRESS

LOAD FIRST PDR ADDRESS
SET UP B PDR'S

#¥PDRO,RO
#10,R1
277406, (RO) +

LOAD ALL PDR'S WITH 77406

R1
60$

ALL

LOADED?

If NOT, LOAD NEXT

OO
—
ONO
N
VO ON
WO OW
OO
WV
OO -0
NO
O
W)
Vo
O

007400
007406
007412
007416
007420
007426
007434

[=]elolololelele]
(=1 N]e Jolaolel Jof

007374

=2 LN
=2 NN
N
WNNO NNNO
O PO NN NANNWN
&S NNWNNNNY

1 USE THE MEMORY MANAGEMENT UNIT 1O SIZE THE MEMORY UP TO 128k
177572

(LR

70%:

#1,5R0

157

NXMELG

ADD

#200,KPARS

IF YES, PRINT THE MEMORY SIZE
ELSE POINT KPARS TO NEXT PAGE

BNE

70%

IF NOT,

BNE

172352

cMP

007600

120000

WOOWOW
NAU=NON
= WNOON
NNV
—=

NNNNOO

NININIAINWN
= WN=—aN)

B NWWO
O

007470
007472
007474
007476
007500
007506

O©OOO0OO0O00O
—=—2a2=200

007444
007452
007456
007462

OOOOO0O
O—=OOO0ON)

NOWVNE WO

POURUNINDAD)
b od o cd b oo e ) oed b

S NN 2OV

=l wut
e

il e

) =l

VOO OVOVOVOVOOVOOVOO0O ©

-l

007436

$0$:

WAS THERE

130$

kPARS
, #760

E 128 K OR MORE = (HECK
0 9 007442

POINT KPARS TO FIRST PAGE
ENABLE MEMORY MANAGEMENT
ADDRESS PAGE POINTED TO BY KPARS

KPARS

MOV

ARE

01273%7

IN THE

[/0 PAGE?

TEST NEXT PAGE

JF 22 BIT MMU PRESENT

010000

172352

000020

172516

MOV
MOV

#10,R2
#20.SR3

CMP
BNE

(RO)+, (R1)+
110%

DATA IDENTICAL?

#7600,KPARS

ELSE CAN ONLY USE 124 «

MOV

100%:

007600

(OMPARE DATA AT ADDRESS 0

WITH DATA AT

#120000,R1

OE
BNE

R?
100%

130%

MOV

172352

MM2?2
RO
#10000,KPARS

ASSUME NO 22 BIT MAPPING

(LR
CLR
MOV

002330

USING KPARS
WILL

000001

002330

i10$:

MOV

21 ,AM22

128 x

CHECK B WORDS

ENABLE ¢2 BIT MAPPING

IF NOT, WE HAVE 22 BIT MMy
ELSE CHECKED 8 WORDS?
IF NOT, CHECK NEXT

PRINT OUT MEMORY SIZE

1 22 BIT MEMORY MANAGEMENT AVAILABLE ~ USE
007510

AN NXM TRAP?

TO SIZE MEMORY UP TO & MBYTES
FLAG 22 BIT MMU AVAILABLE

GLOBAL AREAS

GLOBAL

1925
1926
1927
1928

MACRO M1113

SUBROUTINES SECTION
007516
007522
007526
007530

005737
005737
001007
062737

}gg? 007546

001366

1929 007536

023727

06-SEP=-82 16:46

120
002
000

172

1208:
2352

7609

}g%%

005037

}ggg 007570

013737

1935 007552
1936 007556
1937 007562

005037
004737
013737

177572

002340
010026
00233¢

120000
NXMFLG
130%
#200,KPARS

BNE

1208

(Me

002336

1308:
002342

002344

}32?

ADDRESS PAGE POINTED TO BY KPARS
WAS THERE AN NXM TRAP?
IF

YES,

SAVE

ELSE POINT

kPARS
, #177600

1944
1945
1946

013701
013700
000005

0023
0023

1408:

REACHED
IF NOT,

THE MEMORY

TO NEXT PAGE

SIZE

THE [/0 PAGE?
TEST THE NEXT PAGE

010146
012746
012746
010600
104417
062706

007654
007660
1950 007662

012700
104436
012602

1951 007664
1952 007666
1953 007670
1956
1957 007672
1958

QUT

SAVE MEMORY

PHLOW,PHLS 12
MEMORY

mov
MOV

PRINTF

SIZ2E

AND RETURN FROM

THE

PHHS1Z,R1
PHLSIZ.RO

SIZE

SUBROUT INE

GET SIZE HIGH WORD

AND LOW WORD
SHIFT HIGH AND LOW

S
RO
R1

WORDS YO GET THE
NUMBER OF X WORDS

#MS|2E,R1

THE

Silt

007672
000002

000096
000004

012601
012600
000207

045

DISABLE MEMORY MANAGEMENT
CONVERT KPARS T0O PHYS](AL
MEMORY SIZE

VIADD
PC,VPCON
PHHIGM, PHHS ]2

.ENDR

007632
007634
007640
007644
007646
007650

1949 007654

SRO

CLR
JSR
MOV

.REPT
ASL
ROL

1947

1948 007632

(LR

MOV
:

1942 007576
1943 007602

1959

1§71
157
BNE
ADD

: (ONVERT VIRTUAL SIZE 1O PHYSICAL SIZE

1934 007546

1954
1955

SEQ 45

PAGE 25-3

CLRVEC

RESET

MoV
MOV
MOV

(SP)+,R2
(SP)+.R1
(SP)+.RO

;

RESTORE

NLIST
.ASCIZ
LIST

BEX
/XAMEMORY SI7€
BEX

RE TURN

115

MSIZ2E:

JEVEN

THE

NXM VECTOR

THE

REGISTERS

: USED BY THE ROUTINE

IDLTA KIN/

MOV
MOV
MOV
MOV
TRAP
ADD

MOV
TRAP

R1,-(SP)
#MS 7€ ,~(SP)
82.,=-(SP)
SP,RO

(SPNTF
#6,SP
#4 R0

CSCVEC

MACRO M1113
GLOBAL AREAS
GLOBAL SUBROUTINES SECTION

06-SEP-B82 16:46

1961
1962
1963
1964
1965

SEQ 46

PAGE 26

CHRREEERRRRERNCPR RN CCRRNC

RPN ORNOORNRRRERNRROCRROORNOOVNOVCOOQRONCCOOROCOROTTS

SUBROUTINE PVCON = PHYSICAL TO VIRTUAL ADDRESS CONVERSION ROUT INE
2222

2222222222

22222220

22022

222

R2220

222222

2R222])

LX J

FUNCTIONAL

DESCRIPTION:

CONVERTS A PHYSICAL ADDRESS OF UP TO 22 BITS INTO A VIRTUAL

(o -To
To~To
Joo] OO0
N NNNNNNNNN o
NO VS W N =OO®NO VNN —=O 0

VOO OO OVOOVOOOOOOOOOVO

ADDRESS USING KPAR S
INPUTS:

PHH]GH = HIGH WORD OF PHYSICAL ADDRESS
PHLOW
= LOW WORD OF PHYSICAL ADDRESS

IMPLICIT

INPULTS:

NONE
.

OUTPUTS:

VIADD

KPARS

= VIRTUAL ADDRESS USING KPARS

= POINTS TO PHYSICAL PAGE

IMPLICIT QUIPUTS:
NONE.

NONE
.
FUNCTIONAL

SIDE

EFFECTS:

NONE.

CALLING SEQUENCE:
CALL

PVCON

MOV
MOV

RO,=(SP)
R1=(SP)

[

FETETIXIEIEE TR FU TR PN ¥

SUBORDINATE ROUTINES USED:

037724
007724
007726

PV(ON::

.
P

SAVE REGISTERS USED
THIS ROUTINE

OO0

LA S 1 1, V]

[e]elel

007730
007736
007744

NANN

* PUT ADDRESS BITS O TO 6 INTO THE VIRTUAL ADDRESS
’

MOV

BiC

8IS

PHLOW,VIADD

: LOAD LOWEST 15 BITS OF

#120000.VIADD

#1777060,vIADD

PHYSICAL ADDR.

; CLEAR PAGE AND BLOCK INFORMATION
SET

THE

PAGE

RE GISTER 10 XPARS

1 PUT ADDRESS BITS 6 TO 21 INTO KPARS
007752
007756

013700
013701
000006

MOV
nggp‘

PHLOW,RO
zunlcu,n1

: INITIALISE QUR SHIFT RE 6 l St t R
; HIGH WORD WiLL BE SHIFT t 0 l N

ASR

SHIFT

HIGH WORD

GLOBAL AREAS

MACRO M1113

GLOBAL SUBROUTINES SECTION

06-SEP-82 16:46

2018

2019

2020 010012

010037

2022 010020
202% 010022

012600
000207

2021 010016

012601

172352

SEQ &7

PAGE 26-1
ROR

;

INTO LOW WORD

MOV

RO ,KPARS

SAVE AS KPARS

MOV
RETURN

(SP)+ RO

; USED BY THIS ROUTINE
:

.ENDR

MOV

(SP)Y+ R

: RESTORE THE REGISTERS

RO PO NN ~NJ

= OO0~ [,]

SUBROUTINES SECTION

06-SEP-82 16:46

: SUBROUTINE VPCON = VIRTUAL 7O PHYSICAL ADDRESS CONVERSION ROUTINE
X

‘RN

2070 010034
2071 010042

2072 010046
2073
2074
2075
2076
2077 010116
2078 010122

2079 010126

2080 010130

CONVERTS A VIRTUAL ADDRESS TOGETHER WITH KPAR 5 INTO A PHYSICAL

YA PR
PR PR
N
IEITE YA FE FE PRFE
PRFEFEFEPEFEFE
TN PR FE FE PR FE FPEFE FE PR FE FE YR FE
XA

2049
2050
2051
2052
2053
2054
2055
2056
2057
2058
2059
2060
2061
2062
2063
2064
2065
2066

010046
013737

042737
013700

160000
172352

005037
000006

002334

060037
005537
012600

002336
002334

000207

ADDRESS OF

002336

UP TO 22 BITS.

INPUTS
VIADD
KPARS
IMPLICIT

= VIRTUAL ANDRESS
= PAGE

ADDRESS REG

8%75 13 70 15 ARE

[GNORED)

INPUTS:

NONE.
QuUTPUTS:
PHHIGH = PHYSICAL ADDRESS HIGH WORD
PHLOW

= PHYSICAL

ADDRESS LOW WORD

IMPLICIT OUTPUTS:
NONE.
SUBORDINATE ROUTINES USED:
NONE.

FUNCTIONAL SIDE EFFECTS:
NONE
.
CALLING SEQUENCE:
CALL VPCON

VPCON::

002340

NORNNCOC RO OO OOCROORROORRRORCRCORNOROOCOROORCROEQRCEROOROGSCEOCCETROOOTPREOEOTOTY

FUNCTIONAL DESCRIPTION:

WA
NV

Pl
2l

oo ~or

[y L, ¥ 1, N

QOO

2038
2039
2040
2061
2042
2043
2044
2045

2067 010024
2068 010024
2069 010026

SEG 48

PAGE 27

:"."""""'""""""""""""".".'."""."".'Q"."""

N LANAN NN AN AN NN

[ S

DOCOCOOODOO0 o

BN NT ST, N[, V1, V1 ST U1 W1, ¥} ~n)

GLOBAL

MACRD M1113

*
L

GLOBAL AREAS

MOV
MOV

8¢
MOV

CLR
_REPT
ASL
ROL
.ENDR
ADD
AD(

MOV

RE TURN

RO, =(SP)
VIADD ,PHLOW

2160000, PHLOW
KPARS ,RO
PHH]GH
6
RO
PHH
I GH

RO, PHLOW
PHH] GH
(SP)+,RO

SAVE RO

SET UP LOW WORD

DISCARD PAGE

PAGE

WILL

INFORMATION

IN HIGH WORD

INITIALISE HIGH WORD

SHIFT PAGE NUMBER
INTO HIGH WORD
ADD BLOCK NO.

TO LOW WORD

CARRY ACROSS 10 HIGH WORD

RESTORE RO

MACRO M1113
GLOBAL AREAS
GLOBAL SUBROUTINES SECTION

06-SEP-B2 16:46

SEQ 49

PAGE 28
:".""'Q'"""""Q..""':

.SBTTL

INTERRUPT SERVICE ROUTINES ;

SAALAAAAAAALAALLAASALALAS
AL L I

GLOBAL INTERRUPT HANDLING ROUTINES

s b

¢THE

INTERRUPT HANDLING SECTION CONTAINS CODING REQUIRED

;;:S ;ég}gg(;oflACRO. NOTE EVERY

TO USE

INTERRUPT ROUTINE SHOULD SAVE

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

NXM =

INTERRUPT

+FUNTION:

HBwW

VL0V
YO V] &~

SN NT,NT N1 N1, ST.N1,N}
— nd cmld ol d ol ) d o
LSO
—d b

ROUTINE

THIS ROUTINE

IS ASSIGNED

THIS ROUTINE

IS ALSO USED

TO VECTOR 4

WHEN ADDRESSING THE [EX FOR THE FIRST TIME.
If THIS INTERRRUPT IS GENERATED THE IEX
IS INCORRECTLY ADDRESSED.
SUBROUT INE

2103

2115

SERVICE

IN MEMORY MANAGEMENT

;ENTRY CONDTION:

SEXIT CONDTION: WHEN THIS INTERRUPT [S SERVICED TME
:

NXMFLG

SET.

‘USED IN TESTS: AUTO DROP,23,24,

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

012737
000002

000001

002326

BGNSRV

NXM

MOV

o1 NXMELG

ENDSRV

JSET FLAG IF MEMORY

NXM::

|S NON=EXISTENT,

L10012:

RYI

GLOBAL AREAS

GLOBAL

MACRO M1113

06~SEP-82 16:46

INTERRUPT HANDLING ROUTINES

SEQ 50

PAGE 29

117
5118

;"."."""""""""'0'"'"'.""'t"""""'tl"""".'t

2121

SFUNTION:

%132

SEXIT CONDTION: INTFC1 = FLAG, SET WHEN THIS INTERRUPT ]S STRVIED

%}%g

PCALLED BY TEST:5,23,24,25.26
E""'..."""""""""""""""‘""'Q"."'t'."'.""'l

g};g

2122
g}gz

INTSC1 = INTERRUPT SERVICE ROUTINE

GENERAL PURPOSE INTERRUPT ROUTINE FOR CHANNEL 1.

:
SET A FLAG WHEN INTERRUPT WAS GENERATED
:ENTRY CONDTION:

2129

2130
2131 010142

010142
2132 010142

012737

010150
3 010150

000002

2133 010150

000001

002376

BGNSRV

INTS(?

MOV

#LINTEQY

ENDSRV

;SET INTERRUPT FLAG

INTSCY:

£10013:

INTSC2 = INTERRUPT SERVICE ROUTINE

2135

:"'.."'Q""t."'.'"""""'.'Q.".".Qi.'.t'.'.'..'."Q.'Q.

5139
2138

SFUNTION:

2140
g}zg

;
GENERATED
SENTRY CONDITION:

%1122

SEXIT CONDTION: INTFC2 = FLAU,SET WHEN THIS INTERRUPT IS SERVIED

2145

TUSED IN TEST:5,23,24.25.26

;

2139

;

2146

RT]

GENERAL PURPOSE INTERRUPT ROUTINE FOR CHANNEL 2.
SET A FLAG WHEN INTERRUPT [N CHANNEL 2 WAS

:"".t.'.ttt'lt'.'ttlt"t't'l'tt'ttt't't'.t'tttt!lt"ttt".t!t'

2147

2148 010152
010152
2149 010152

012737

010160
010160

000002

2150 010160

000001

002400

BGNSRY

INTS(2

nov

#1,INTFC2

ENDSRV

:SET INTERRUPT FLAG

INTSC2::
L10014:

RT]

GLOBAL AREAS ~ MACRO M1113

GLOBAL

06-SEP-B82 16:46

INTERRLPT HANDLING ROUTINES

2152

SEQ 51

PAGE 30

2153

§1§g

;

2156
2157

sFUNTION:
:

%}g?

EXIT CONDITION:ERROR MESSAGE INVALID INTERRUPT

g}gg

INTERR - INTERRUPT ERROR SERVICE ROUTINE
WHEN AN INVALID INTERRUPT ]S FOUND A
ERROR MESSAGE IS GENERATED.

;ENTRY CONDITION:

2162

SUSED IN TEST:S

2163

:"'."""""'t""""t"""tQtt"'t.".ttt'.""'!."'.tt't

2164
2165 010162
010162
2166 010162
010162

BGNSRV

010164
010166
010170

104457
000764
010172
000000

010200

2167 010172
010175

010203

010206
01021
010214

2168
2169 010216
010216
010216

ERRSOFT 500,E400

040
126

1R
101

116

105
125
000

000002

INTERR

116
114

104

040

122
120

122
124

E400:

LASCIZ

INTERR::
TRAP
LWORD
WORD
.WORD

7/ INVALID INTERRUPT/

124

JEVEN
ENDSRYV

L10015:

RT!

CSERSOFT
500
E400
O

PAGE

SEQ 52

& W J ¢« @ e— N [

2oxg-WD—O)LedL~€dtOL—Oo3—-2_ZFVU0D2 w-YL<O2[n—=0INe

— @

de - [ -

SeQ t -2-

D> DD D>D> > >Q Lt
DDV DUWMDDEDEDEDID
- o 2 W DO ENIDDUWSDDDE

ugoweA—

—

[eW-oVdE4D

2Q-—&

—

- —~0O@O-2 NV@O- I2—e—_C\J ) —)-

MACRO M1113
06-SEP-B2 16:46
GLOBAL AREAS
GLOBAL INTERRUPT HANDLING ROUTINES

[
]

.
.
32-1
E
PAG
46
16:
82
é§p
??N
30U
ING
DL
WAN
UPT
ERR
GLOBAL INT
GLOBAL AREAS
2226

MACRO M1

-SEP-

SEQ 53
AD

GLOBAL AREAS
MACRO M1113 06-SEP-B2 16:46
INTERRUPT HANDL ING ROUTINES

GLOBAL

2228

SEQ 56

PAGE 33

2229

JENN RN C O

5529

;

SUBROUTINE BGIN1

2232
2233
2234
%g%g

.FUNT!ON
.
:
;

THIS SUBROUTINE LOADS THE DPA ADDRESS AND THE
SOf TWARE RESET INTO BOTH CHANNELS,
IT ALSO SELECTS CHANNEL 1 AS SYSTEM CONTROLLER
AND CLEARS MASKO+MASK! REGISTER .

%Sgg

i CALLING FORMAT:

2239

:CALLED BY TEST: 5,7,8,11,12,13,14,15,16,17,19,21,22,23,26

22(.0

RO N E LI

L O R RO C PRI

JSR

LR R RO RPN RO RONRD

ARG IRTINTRIORNOCEOORIORIOIOIQONTY

PC.BGINI

;.'tt"'.t'tt"""""""""t'tt""'tttttt.tttttl't't"t"'t"'t't".'

22641 010534
010534
22642 010536
010536

BGIN1:: BGNSEG

104404

BRESET

2243 010540
2244 010546

104433
113777
012777

002312
000010

22646 010562

005077

171512

2250 010610

112777

2245 010554

2247 010566
2248 010574
2249 010602

113777

002314

171506
171524

171472

TRAP
:LOAD DEVICE PRIM. ADDR.1
JSELECT CHANNEL 2

CLR

a(SRX

sSELECT CHANNEL

000000
000000
000000

171474
171456
171452

MovB
MOvB
MovB

2251 010616
2252 010624

112777
112777

000000
000000

171444
171426

Movse
MOvB

2254 010640
2255 010644

005077
012737

171434
000091

2258 010666
2259 010672
2260 010674
2261 010676

012701
005301
001376
112777

000100

2253 010632

2256 010652
2257 010660

2262 010704

010704
010704

2263 010706

112777

052777
112777

104405

000207

000000

000002
000217

000017

MOovB

171422

mMove

002374

171420
171402
171364

DPAZ, 31 IRHX
#0,31CRHX
#0,3]SRLX
#0,31SRHX

#10,3CSRX

#0,31CRHX
#0,315RLX

#0,31SRHX

:LOAD DEVICE PRIM, ADDR. ¢
:LOAD NOT SWRST IN A(CR 1
;CLEAR LOW BYTE OF [SRI
;CLEAR HIGH BYTE _OF [SR1

sSELLCT CHANNEL 2

:LOAD
NOT SWRST [N ACR 2
;CLEAR LOW BYTE OF ISR2

;CLEAR HIGH BYTE Of ISRZ

CLR
MOV

a(SRX
#1,CHAN

$SELECT CHANNEL
1
:LOAD CHANNEL NUMBER

MoV
DEC
BNE
MovB

#100,R1
R1
1%
#17,31CRHX

:WAIT 100 US
I
Sees
;LOAD NOT SIC IN ACR1

8IS
Mova
1$:

CSRESET

DPA1,3] 1RHX
#10, aCSRX

MovB

171462

($BSEG

MOvVB
MOV

112777
112777
112777

000010

TRAP

ENDSEG
RE TURN

#2 3CSRX
#2{7,31CRHX

SSELECT CHANNEL 1 AS SYSTEM CONTROLLER
:LOAD SIC IN ACR 1

10001$:

TRAP

(SESEG

HA
Tt

MACR0 M1113
06-SEP=-82 16:46
GLOBAL AREAS
GLOBAL INTERRUPT HANDL ING ROUTINES

PAGE

SEQ 55

SUBROUTINE BGINZ

TFUNCTION:

SCALLING FORMAT:

SCALLED BY TEST:

INTO BOTH_CHANNELS

THE

JSR

PC,BGINZ

5.6,8,9,10,13,14,15,16,17,18,20,22,24,25

BGINZ:: BGNSEG

104405

000207

000017

171214

TRAP

CSRESET

:LOAD DEVICE PRIM, ADDR.1
SSELECT CHANNEL 2
;LOAD DEVICE PRIM, ADDR, 2

[
«X

MOVB
MOV
MOvB
(LR
MOvVB
MovB
MOvVB
MOV
MOV
MOvVB
Mov8
MovB

MOV
DEC

MOVB

ENDSEG

RETURN

‘:r'uwrwrfir‘r‘usr\rw

@) M

B R
o

LOAD NOT SWRST [N ACR 1

MOvVB

BNE

HARDWARE

JSELECT CHANNEL 1

BIS

19%:

($BSEG

BRESET

AR LOW BYTE OF [SR1
R HIGH BYTE OF ]SR!

CT CHANNEL ¢

C HANNEL FLAG
NO T SWRST [N A(CR 2
L Ow BYTE OF ISR?
H 1GH

BYTE _OF [SR?
CHANNEL 2 AS SYSTEM (ONTROLLER

l8
IN ACR 2
0

000100

TRAP
:RESET

OO
nNOoOOSNSOONNVO

-t
e
B D) D
NNNNNON

D d
NN

b
e
e
B \) b d o e
PORVPOLRONDANINRULNLN
WSSO NONON)

b
d ah
NNV

wd d
D
NN
=WA

NNNN NNNNNNNNNNW
NON = =

adad
OO =
O =2 D) =D b
b ad D D od d e e ) b d b (O

N = NAUAL AL NINIAINI NI NI NN
NI N S
NWWNNNNNNNSNIN INO NSNS
NNOO NN NNNWNNNNNNNNW

106404

S OOC A
DO
=2 e\

i
D ol i
)

OSSOSO ONSOCONSOONOCONSSPINNOO

i
ol
e
ad e
el oD
i
e
e
D
i) e
)

=
b

e d il ) e e

e i

OOOOOOOOOOOOD

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

—

2299

SOF TWARE RESET

IT ALSO SELECTS CHANNEL 2 AS SYSTEM CONTROLLER

oo
-0
0

RS LS I, ¥
LYY,
N

~O 0o O Oo Co 0o OO OO
OO
~NO N

THIS SUBROUTINE LOADS THE DPA ADDRESSES AND

AND CLEARS MASKO+MASK1

e]elelelelaloelelalolalalelalaleladelelalelelolale
e

NNNNNNNNNYOOO
O NN ES AN
= O V00~

AIRINIRLNIALNLNL NN
PORVNVALNINLALAIRININIPY

;"'""".""""'"""""""""'."'..'.""l"""""Q"""""Q

#17,31CRHX

“L0AD NOT SIC IN ACR2
10002%:

TRAP

(SESEG

GLOBAL AREAS

GLOBAL

MACRO M1113

(06-SEP=B2 16:46

INTERRUPT WANDL ING ROUTINES

2301
30

SEQ S6

PAGE 35

350%
£305

:.0'"tt'."t0"'"""0""'""Q't"""""".".Q"""""QQQ""'.
SUBROUT INE LOOF
:

3
5%8
2310

*CALLING FORMAT:

gggg

TFUNTION :

2315 011070
2316
2317
2318
2319

012701
005301
001376

000001

LOOP:
1%:

000207

MOV
DEC
BNE

RE TURN

*FUNCTION:

s%sg

2327

SCALLING FORMAT:
SCALLED BY TEST:

2329 011072

WAIT::

2334 011104
2335

#1,R1
R1
18

:LOAD LOOP COUNTER
:DECREMENT LOOP COUNTER
SLOOP UNTIL DONE

SUBROUTINE WAIT

5352

ggg% 011102

ALL TESTS EXCEPT 1,2.3.4.5

:.'".'Q.'.""""""""'."""t.'.."'.'Qt..".Q."'..Q.'Q'."'.'Q

g%g;

2330 011076
2331 011100

PC,LOOP

NN NIRRT IEPIRITRIRRERILOIRLININRITRARLIROCTIRICECEERINIROIREOICROTOTS

2320

2328

JSR

:CALLED BY TEST:

231

2312 011060
2313 011064
2314 G11066

R0UTINE
FOR WAIT (AT LEAST) 1 US.

012791

005301
001376

000207

000100

FOR WAIT (AT LEAST) 100 US.
ROUTINE
JSR
PC,WAIT
4,6,8,13,17

;'.."Q'."..""""""""""'QQ.'."'.."Q""'l"'..'.'.'Q"'l't"

1%:

MOV

DEC
BNE

RE TURN

ENDMOD

#100,R)

R1
1$

:DECREMENT COUNTER
:WAIT UNTIL DONE

06=SEP=-82 16:46

SEQ 57

PAGE 36

LIITLE M
.SBTTL
011104

* THE REPORT CODING SECTION CONTAINS THE

: "PRINTS'' CALLS THAT GENERATE STATISTICAL REPORTS.
BGNRPT

RPT

000000

.WORD
.WORD

TRAP

(SRPT

ExIT

000167

LSRPT::

|gl
S

OO0
VOO

NORONY
NN

OCOWOC0000~N~N~
VB WOV~

NONIRONORNONIRNDNINY
AWNN NN N NN NN

MISCELLANEQUS SECTIONS
MACRO M1113
1
GLOBAL INTERRUPT HANDL ING ROUTINE S

lo=2-.

.EVEN

ENDRP1
104425

L10016:

1112

PROTECTION TABLE

1112
1116
1116
1120

THIS TABLE
10 PROTECT

IS USED BY THE RUNTIME
THE LOAD MEDIA,

SERVICES

000000
177777
177777

.WORD
.WORD
.W0PY
TNDPRQT

LS$PROT:
n
-1
-1

cCHELR
sDON'T
sDON'T

TSR ADDRESS
CHECK MASSBUS UNIT NUMBER
(HECK DRIVE Wwi¥Cinm

—X

SEQ 58

PAGE 37

8GNPROT

1112

(o
F 4
ZmTMm

;
:
OO
-

W2 OOV0DN

(06=-SEP-82 16:46

;00

o000
— o wed

S OO®NPA
N

TABLE

MACRO M1'13

.SBTTL

EENesle)

PORURVRNONIND
NORNURNURUNVAIALAD
P S
o8 2R 22 2 Y aF X aF aF 2
WIWNROAUNONIAD
NINURURIND
— s b

QUS SECTIONS

MACRO M1113

06-SEP=-82 16:46

SEQ 59

FAGE 38

INITIALIZE SECTION
CODING THAT

[S PERFORMED

BGNINIT

1046447

000037

000035

000036

103406

012700
1046447

103014

004737

000034

007176

012700

000340

004737
012737
005237
023737
002367

097176

002012

:CLEAR FLAG FOR DISABLE TEST HEADER PRINTOUT
:1S THIS JUST STARTED ?

sIF YES = BRAN(H,

:1S THIS A RESTART ?
s1F

READEF

;IS THIS A NEW PASS ?

#EF .NEW

YES = BRAN(H

BCOMPLETE NEWST

sIF YES = FIRST UNIT AGAIN

READE®

J 1S THIS A C(ONTINUE

#EF .CONTINUE

BCOMPLETE EXINI

:IF YES - DON'T INIT]ALIZE

READEF

IS THIS A POWER FA!L

W#EF .PWR

PC,MEMINI]
INIY

SETPR]

#PRIO7

JSR

PC,MEMIN]

INC

LOGOEV

MOV

1772777

002372
002372

BCOMPLETE NEWST

JSR
Exir

001004

000240

#EF .RESTART

BNCOMPLETE GETPRM

104432

104441

WEF
. START

(MP

BGE

SETVEC

NOP

J1f NOT-MUST BE A NEW UNIT

LOGDEV,LOUNIT

MOV
TRAP

#EF .START
RO

B(S

STARST

MOV
TRAP

8EF _RESTAR
RO
T

8(S

NEwST

MOV
TRAP

NEF NEW,RO

8(s

NEWST

MOV
TRAP

#EF . (ONTINUE
RO

8cs

EXINI

MOV
TRAP

#EF PWR,RO

BCC

:1F YES-MUST BE A POWER FAIL ,RELOAD MMU
TRAP

sSET DIAGNOSTIC TO PRIORTY 7
E MEMORY MANAGEMENT
IZE LOGICAL UNIT NUM
GICAL UNIT TO BE TES

#-1,L0GDEV
NEWST

(SRFLA

sSET FLAG FOR TEST MEADER PR'NTOUT

#14,834716,8340 ;

MAXIMUM UNIT # EXEED
= A NEW START
=

READEF

103421
012700

READEF

PNTF

TRAP

o
o
»

104447

(LR

BCOMPLETE STARST

103425

012700

B8R

sBRANCH

002324

#1,PNTF

[=]

104447

;1S PNT FLAG SET?

MOV

103424

012700

#1000,R0
2$

104447

Bl
BEQ

[
[~

000040

sGET THE OPERATOR FLAGS

012700

000001

001000

RFLAGS

032700
001404
01737
000402
005037

104421

JSinIT::

[=]
DTM

OO N NNVWNAL S BN
WA BN
NNV PO NOMNVN) = b = = O QOOONNNNNOOO
M NINO
SO0 0O0NNOO
OO NOOMRNINO
S SNNOS SO NNO

b
—

—

~No

)

- ol od D
o
-l o ol il e el

AURUNLRL ALY N AV

i
el el e
D e
D i el D il o e

D el oD
D e s

) i) el o
D el D e

il D e il il
D D i D el

RV AL RVAL ARV AV AININIAD —d b b b b b

D D )
S i el

b ed il =D ecd b o cd oD s e d e

s b s b

D ) el D el B d i e el D il o i e =D
D e D el ) e el ) e D il D ) el i

lelol=leiblelolelelclelelilalelalslelololalelolalelololalelalelelalelalmlalelalolalele
e

purpury

[=le)

N] TIALIZE S ECTION CONTAINS THE
t BEGINNING OF EACH PASS,

CSREFG

(SREFG
B

CSREFG

(SREFG
tBe

(SREFG
Be

GE TPRM

(SExlY

.WORD

110020~

MOV
TRAP

#PR107,RO

($SPR1

e
b 4

LXONS

—&£wv<OwvO«€“ow][y4,[«@“xw“[w-w2szs-—
e-44]>XbK«&tWWvL-VndE(LO-VY]DD4Ov[-SN-=ZU2V2Xow4Wt[Vex~etY-(Evt(ewti+e%]t[r]V(>4O=wwtv¢[owVtql()=t(I0ww=tvosVte]ot -—awnPvyaO>»[ -—>o@~
MISCELLANEOUS SECTIONS
INITIALIZE SECTION

MACRO M1113
(06-SEP=-82 16:46

- o [l

PAGE 38-1

—d(¥
v

SEQ 60

w(-O2x—=«.»>~») LX2<oT¢Wy~

we
oo

NN
-

-l

[a]=]

AIRLAIAUAL
A AIRUAL
VNN
N A NVIVWA
0

045
045

97
1046

RINLAINLALNLAY
NN NN AL AN NN AN NI AL NN NININD AN

» 5~ B

QOO

el e

el o

o e

e e

il e

i el i o

s e

= O NSNS BN = = O N

= O

d b d wad b ol ad

) i il i

) il b ol D i e (Pt e (P

e e

S OMNIN) = O

~N OO

o o (G

1V ]

NVOO S NOON

U TV P

P2k aX o oF aF off oF o ol o ol
NNNNN'\)"\:NNI\!NNNNNNNN

SO
O

OO
OrNNO
O~

QCOOQOOOOMNMNIN
QOOOOOWWNWW
OO OWVNE
s

OHroNOCO
-

OOOO

b b 2

b = O OO

bbb s dh O

[elelelelelelelalelolololelelelelels]
[elalelolalalelolalololololnlololo
e

118:

002246
MOV

10464632
000162
MOV
MOV
ADD
MOV
MOV
MOV

MOV
MOV

FINITY:
FINITZ:

LNLIST 8Ex
LASCIZ

ENDINIT

2 DDV DO

VDD

SRR~ ~D~8~~

o
P-4

—

o
&z -

[
alaal

wnCo

~NE

06-SEP-82 16:46

—d e

OO
QO —a
ono
O —
O

NNNNNNNNNNNVNNNNNNNNNNUNNNO
SO

NNNNNNNNNNNNNNNNNN
R =
=~ SO NN—O
NN A L LN A A A W AN AN AN AN AN AN AN AN AN NN N O WO = O & o e

ALRLNIAJAL
ALY NI AL AL AU ANV NI AINLNY = AL ONININ =N

-t ad il e

(alololelolololelolelolelelelolelolelelalalalalelalo
L dolelelel <

SNONNVO

O NN N P UAIWWRNININ) =

SOoONSOON
OO SO ON
OOONO N

OO OCOOOO oo
OOOCOONNNNNNNNNNYN o>oorOrOrOr

b b cd o e

PURUNININD =

i o il i ol e i D il i i oD e o D e D D il s e il o il ol il e D ) i ——d
o ==b

O0C0COOOOOOCOOOOOOOOOOOOOOOOOOCOOO

v NURD

-— b b

OO0

(S ALV IV TV IV SV TV 1V, [V IV .] VASISN (U LV IV TV TV TV TV LV LV IV LV IV IV )
NNNNNNNNO o oo o O O O NN NIV
NN
= OO0 NO WS W N = O OO0 NN E NN =

MACRO M1113
PAGE 38-2
MoV
MoV
MOV
Mov
MOV
TRAP

:LOAD VECTOR FOR CHANNEL 1
:LOAD VECTOR FOR CHANNE. ?2

I8!
12
13

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

#30004, CDAT 17
#36004
. CDAT 18

ExIT
INIT

I4
18
19

#120664 .CDA 111
#120464 .CDA 112
2120744
. CDA 113
#120540.CDA 114
#30012,CDAY 15

110

#104040,CDA 116

1L10020:

ADD

.WORD

TRAP

RO,=(SP)

(RY) ,=(sP)
#FINIT2,-(SP)

#3,-(SP)
210,5P

SP,RO
CSPNTB

*GET PRIORITY

;SAVE THE LEV EL
: SAVE THE DEV ICE P RIMARY ADDRESS 1
; SAVE THE DEV ICE P RIMARY ADDRESS 2
FOR
(HECK
JLOAD COMPARE
FOR
(HECK
JLOAD COMPARE
FOR
(HE(K
:LOAD COMPARE
FOR
(HE(K
COMPARE
s LOAD
FOR
(HECK
JLOAD COMPARE
FOR
(HECK
:LOAD COMPARE
(HECK
FOR
;LOAD COMPARE
FOR
CHECK
JLOAD COMPARE
FOR
(HECK
sLOAD COMPARE
FOR
(HE(K
:LOAD COMPARE
FOR
(HE(K
JLOAD COMPAREL
FOR
(HECK
JLOAD COMPARE
FOR
CHECK
COMPARE
;LOAD
CK
FOR
(HE
COMPARE
;LOAD
FOR
(HE(K
JLOAD COMPARE
FOR
(HECK
;LOAD (OMPARE
FOR
(HECK
;LOAD COMPARE
FOR
(HE(K
;LOAD (OMPARE

CSEXIT
L10020-.

/XAe «WARNING-WILL ASSUME 1EX ADDRESS X06XA (NOT Z06%A)IN/
/XA +WARNING=WILL ASSUME [EXx VECTOR X03XA (NOT ZO3%A)IN/

LLIST BEX
.k VEN

($INIT

MISCELLANEOUS SECTIONS
AUTODROP SECTION

MACRO M1113

06-SEP-B2 16:46

.SBTTL

PAGE

SEQ 62

AUTODROP SECTION

see

: THIS CODE
IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF
s THE “'ADR'' FLAG WAS SET,
THE UNIT(S) UNDER TEST ARE CHECKED T0
s SEE IF THEY WILL RESPOND.
THOSE THAT DON'T ARE IMMEDATELY

NN
NN

OO0O0O
OO0
OO0O00O
OO =N
OOWS
WO

:
LSAUTO:
W4, ANXM, #PRIO7

,SET UP NON =EXISTENT MEMORY

TRA:OVECTOR
vV
MOV
MOV
MOV

#PR107,-(SP)

ADD

#10,SP

ANXM,
= (SP)
#4,-(SP)

#3,-(SP)

CSSVEC

TRAP

=00
OO
NNVVO
NWO
OANV=
OO

NWOW
S 8
NN
N
OO

VAANARD SOV
NO NS NNNN

ocoo—-0CcOoO
OO0

NONVO
S OSHO0O0

d e D
D d i ol

SETVEC

Dot

BGNAUTO

QO0O0OOOOO

DROPPED FROM TESTING.

SIS ST NT ST STNT S 1S B
NNV
ONVNWANES
BN NN

;

(LR
TST
L

NXMFLG

;CLEAR NON =EXISTENT MEMORY FLAG

alIRX

sREFERENCE
R

sTO SEE IF
S

MEMORY ADDRESS

FOR

THE

IT EXISTS.
R

DEVICE

TR PR

cIF THE DEVICE DOESN'T EXIST THE RESULTANT TRAP TO VECTOR 04 WILL
;CAUSE THE DEVICE TO BE DROPPED (SEE INTERRUPT ROUTINE)
;OTHERWISE THE MEMORY REFLRENCE IS UNEVENTFUL AND THE DEVICE [S READY.
SN0
NNV
O S NINO

b od

[elelelelalelelololelelalsle]

AN NLALNL AL NLNINIPLNINVNIN)
AN AN AN N AN AN AN AN NN
NN N
-t
e et b 2 QOOOONNNOI

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

005737
001497

002326

013700

002372

104451

1ST

BEQ
DODY

104436

104461

10%
LOGDEV

DOCLN

1046444

012700

NXMFLG

CLRVEC

000004
10%:

;WAS

THERE

TRAP

:BR IF NOT
:DROP THE DEVICE

?
MOV
TRAP

:CLEAN UP (CODE.
#4

:RETURN VECTOR 0&

TRAP

TO NORMAL

STATgOV
TRAP

ENDAUTO

L10021:

TRAP

LOGDEV,RO
($DODU
C(SDCLN
#6,R0

(SCVEC

($AUTO

MISCELLANEOUS SECTIONS

CLEANUP CODING SECTION

MACRO M1113

2633

(0¢-SEP-8B2

LSBTTL

16:46

PAGE

SEQ 63

(LEANUP CODING SECTION

XJ
MK

2636
%g%g

:
;

2639
2640 012314
2641 012314
2650 012314
012314
012320
2651 012322
012322
2652 012324
012324
2653 012330

2654 012332
012332

012334

2655
2667
2668
2669
2670 012336
012336
012336

THE CLEANUP CODING SECTION CCNTAINS THE CODING THAT
AFTER THE HARDWARE TESTS MAVE BEEN PERFORMED.
BGNCLN

012700
10464

000340

104432
000002

LS LEAN::
#PRIO7

BRESET

104433
012700
104436

SETPR]I

000004

S PERFORMED

sDISABLE

INTERRUPTS

:RESET THE

(LRVEC

ExXIT

(LN

MoV
TRAP

[EX1?

TRAP
sRETURN VECTOR 04 TO NORMAL STATE
MOV
TRAP

#PR107.RO
C$SPR]
CSRESET
#4,R0
CSCVEC

TRAP
.MORD

CSEX]T
L10022-.

TRAP

(SCLEAN

EVEN
ENDCLN

104612

L10022:

MISCELLANEQUS SECTIONS
DROP UNIT SECTION

MACRO MI1113

(06=-SEP-82 16:46

2672
2673

.SBTTL

PAGE

SEQ 64

DROP UNIT SECTION

2674

Sg;g

2678
2679
2680
2681
2682
2683
2684
2685 012340
2686 012340

:§UPVSR DOES THE ''DROPPING''.THIS IS JUST TO TELL THE MAN.
:"'DROPPED'* UNITS ARE RE=-SELECTED ON OPERATOR ''STA'' OR ‘‘ADL*
¢ COMMAND, OTHERWISE REMAIN INACTIVE. THE DISPLAY COMMAND
sWILL PRINT ALL DROPPED UNITS, AND THE P=-TABLES OF THOSE
sWHICH ARE STILL ACTIVE.
i

2675

BGNDU

2695 012340
012340
012344
012350
012354
012356
2696 012360

013746
012746
012746
010600
104417
062706

2697 012364
012364
2698 012366

000167
000030

2710 012370
012373
012376
012401
012404

045
101
1M1
045
045

012407
012412
012415

2711
2712
2713
27146 012420
012420
0124620

THE DROP=-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE

TO NO LONGER BE TESTED.

104
120
104

002372
012370
000002

L$DU::

PRINTF

#FMDROP,LOGDEV

EXIT

;UNIT DROPPED

000006

116
125
124
104
101
122
120

000

045
116
040
062
040

FMDROP:

.ASCIZ

MOV
MOV
MOV
MoV
TRAP
ADD

LOGDEV,=(SP)
#FMDROP,=(SP)
#2,-(SP)
SP,RO
CSPNTF
#6,SP

LWORD
LWORD

JSUMP

L10023-2-.

TRAP

($OuU

/XNXAUNIT XD2%A DROPPED/

17
105

JEVEN
ENDDU

104453

L10023:

gstTIONS

MACRO M1113

06-SEP-82 16:46
.SBTTL

SEQ 65

PAGE 42

ADD UNIT SECTION

E THE ADD=UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES
s

T0 BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK

TO THE

TEST

CYCLE.

BGNAU

EXIT

000167
000000

LSAU::

.WORD
.WORD

JSJMP
L10024=2~.

TRAP

($AU

.EVEN
.
104452

ENDAU

' s

ENDMOD

{

)

L1002¢4:

HARDWARE TESTS

ADD UNIT

SECTiON

MACRO M1113

06-SEP=B2 16:46

2756
%gg;

SEQ 66

PAGE 43

LTITLE HARDWARE TESTS
LOBTTL
TEST 1: REGISTER ADDRESSING TEST

%ggg 012430

BGNMOD

2806

;'"'t't'ttl't"""t""""""'t'tQ't't"t"Q"'ttt'.".'t't"t

TEST 1 =1ExM

gggg

2809

:VERIFY THAT ADDRESSING THE 8 BUS DEVICE REGISTERS DOES NCT CAUSE

2812

:AN ERROR [N THIS TEST COULD MEAN THAT THE DEVICE IS INCORRECTLY

2815
2816
2817

:COMMUNICATION BETWEEN THE MAIN CPU AMD THE IEX11 IS ACCOMPL]SHED
;THROUGH A SET OF SIXTEEN REGISTERS.THE SIXTEEN REGISTERS ARE
;ASSIGNED ADDRESSES IN THE [/0 PAGE.

gg}?

A NON=EXISTENT MEMORY TRAP,

gg}z

; CONF IGURED OR THAT THE ADDRESS IS WRONG.

2818

:"t"'."t"t"""t""tt""t't'tQt"'t'ttt"t'"tt'.'ttt"t'tt

2819
2820
2827
2833
2834 012430

012430
2835 012430
2836 012434
2837 012436
012436
012442

BGNTST

005737
001410

002324

012746
012746
010600
104417
062706

012642
000001

005037

002322

012462
012466
012472
012476
012502
012506
2847 012510

012746
012746
012746
012746
104437
062706
013701

000340
012636
000004
000003

2849 012520
2850 012524
2851 012526

012702
005003
062701

000010

012532

104404

012446
012450
2838 012452
2845 012456
2846 012462

2848 012514

2852 (12532

162701

PNTE
7%
#TSHD1

(LR
SETVEC

[ TRCNT
#4,#LOCATE ,#PRIO7

;CLEAR ITERATION COUNTER
:

ISRX,R1

;GET REGISTER ADDRESS

#8.,R2
R3
#2.R1

:SET COUNTER FOR 8 REGISTER ADDRESSES
:
:GET NEXT REGISTER ADDRESS

000004
7%:

000010
002256

ITRACY: MOV

000002

SUB

000002

10%:

MOV
CLR
ADD

BGNSEG

2853 012534

005004

CLR R4

2855 012540
2856 012542
2857 012544
2B5R 012546
012546
012550

005704
001405
005203

ST
BEQ
INC
ERRHRD

2854 012536

012552

005711

104456
000145
005012

T1::
;1S THE PNT TLAG SET
:IF YES, PRINT THE TEST HEADER

ST
BEQ
PRINTF

153

02 ,R1

(R1)

Ré
20%
R3
101,E101,ERRION

MoV
MoV
MOV
TRAP
ADD

#TSHD1,=(SP)
M ,-(SP)
SP,RO
CSPNTF
84,SP

MOV
MOV
MOV
MOV
TRAP
ADD

#PRI07,=(SP)
#LOCATE ,=(SP)
#4 ,-(SP)
#3,-(SP)
CSSVEC
#10,5P

TRAP

C$BSLG

TRAP
.MWORD
LMWORD

CSERHRD
101
E101

sTEST REGISTER ADDRESS
:WAS THERE A TRAP
:BRANCH IF NO
:
:

003454

BNE
187
BEQ
DODU

002372

.WORD

ENDSEG

DEC

308:

002234

R?
10%
R3

TRAP
C$ESEG
JALL REGISTER ADDRESSES TESTED ?
:BRANCH IF YES
:

LOGDEV

30%

002322
002320

INC

002322
ExQvil:

000004

MOV

TRAP

1ST
BNE

(Mp
8eoQ
BR

CLRVEC

’

IZRA(1

s1F

NO TEST

ITERATION

MOV
TRAP

104401

~y —

TSHD1:

.WORD

#6 RO
CSCVEC
CSEXIT

L10025~-.

:
LOCATE:

L10026:

RT]

BEX
é%S?XAREGISTER ADDRESSING TESTAN/
X

——

062

INC
ENDSRvV

NGE ==

123

JSERVICE ROUTINE LOCATE

045

TRAP

LOCATE

012642

($DODU

TRAP
CSDCLN
;1S QUICK VERIFY PASS SELECTED ?
c1F YES EXIT TEST
JITERATION COUNTER +1
JDEFAULT [TERATION EXECUTED
s1F YES EXIT TEST

BGNSRV

—t PV () (TM)

000002

LOGDEV,R0O

QvP
exav1
ITRCNT
TTRDEF , I TRCNT
Exavt

EXIT TST

005204

ERRIO1

10000%:

DOCLN

640

—

20%:

SEQ 67

PAGE 43-1

2mMr>»2

-t
s e
D

) i

D i

)

D i

D il

D il el

D el

il il e

el i

ol e

[elelelololaolololalelelolololalolololelolalolololelslalolelels]

2859

MACRO M1113
06-SEP-B2 16:46
ER ADDRESSING TEST

NUNLNLALAY AL AL NIALAL NNV
NINDNINLNNDALNINI
NN
VNONIANUN) - O
oo (o X0 Yo Yo X0 Yoo o Yo aXo ol o Yo Yo JVL IV, IV IV, 1V 1V IV, IV, [V IV TV TV, 1V B T V)
£ B N 1Y WWHINWNNONININ)
=2 O OO NSNNSNNOO OO NNV
N —
-t
oo
oo o LSTSTa
P W N N1 N1 Wt Te Yo ¥ Halale Fol Slwle Yo To ¥l

HARDWARE
TEST 1: R

L10025:

TRAP

(SETST

HARDWARE TESTS
MACRO M1113
TEST 2: INITIALIZATION TSt

06-SEP-B2 16:46

SEQ 68

PAGE 46
TEST 2:

.SBTTL

INITIALIZATION TEST

"."""""""'""""""""'"."""""Q'Q"""'Q""

RESET

THE

IEX = TEST 2

JEX AND ENSURE

THAT REGISTERS CSR,IIR,ISR,ICR IDR, H(R

SIN"BOTH CHANNELS ARE IN THEIR PROPER INITIALIZATIONSTATE .

:REGISTERS BAR & BCR ARE NOT IN A DEFINATE STATE AFTER RESET
;SO THEY ARE NOT

TESTED HERE

STHE MUX BIT IN CSR !S ALSO TESTED
OO
(o]e]

PNTF

PRINTF

#TSHD?2

BEQ

013367

OO0O—=000
OPO =2
NSO

TST

TZ::
:1S THE PNT FLAG SET

.lF YES PRINT THE TEST HEADER
MOV
MOV
MOV

000001

O—
NOSS

000004
002322

7$:

CLR

JTRINT

ITRAC2: BRESET

:CLEAR ITERATION COUNTER
:CLEAR HARDWARE

000001

MOV

#1, CHAN

;LOAD CANNEL NUM,

167324

MOV

2CSRX .BAD

:TEST

151

BAD
10%
600D

BIC

017060
002592

002500

#17060,840

SOFT 201,6200,ERR20"

10%:

ENDSEG

13%:

BGNSEG

THE

UNO
N

NO&N

OwN—N

VOWS

104404

(LR

600D

20%

#1 1RNAM,R?

ERRSOFT 202,E200,ERR202

20$:
104405

a8l IRX,BAD

ENDSEG
BGNSEG

#6,SP

CSRESET

:BIT 9=12 AND BIT &4+S ARE NOT TESTED
:CSR SHOULD BE ZERO

;BRANCH IF DATA CORRE(CT
:SET UP DATA FOR ERROR MESSAGE
:ERROR HANDLER
TRAP

10000$:

BAD

MOV

TRAP

.WORD
.WORD
.WORD

TST

BEQ

002502

VN =N

OO0O0O
~O0O0O

WO
S

J Nlalo,
(Yo o Yo W

050

OO0
—
OO000

024
026
NN

D
D
el
i
e
e
b
D e
D
i
bt

A L A N A N AN AN N AN AN WA AN
[elelelelelelele]

)

017737

MoV

TRAP
ADD

#TSHD?2,-(SP)
#1,-(SP)
SP,RO
CSPNTF

TRAP
($BSEG
INITIALIATION STATE OF CSR REGISTER

D o

:NNNNNNNNNNNNNNNNNNN\IN

002324

o OO—=
o o Y]
VIS

NN
NAE
L NNNIONIND
= = =2 =2 OO0 0O
oo oNO SOOI SNIONINO S

Vfis“flvfl"vfi"v&flvfiflvNflUfl"Ufl"UNflVNflvN”UN)

BGNTST

b oD oD

i e

([elelelelelolelalelelelele
o) [alelelololelalelololelalalelolalalelelolalolololololalalolelala]

Q"""'Q'.Q"Q""Q'""""""".Q'Q"".'.'.".Q."..""'.

:GET 1IR CONTENTS
*CONTENTS SHOULD BE ZERO

CSERSOFT

201
E200
ERRZ01

C$ESEG
TRAP

($B8SEG

BRANCH IS YES
:SET UP DATA FOR ERROR MESSAGE

:ERROR HANDLER

TRAP

10001$:

T
(SERSOF

LMWORD
LMWORD

.MORD

202
[200
ERR20?

TRAP

(SESEG

TRAP

($BSEG

HA
TE

alSRX,BAD
#\,BAD
8|
1S
8AD
83
308
CL
600D
M¢
#]SRNAM R?
3 RRSOFT 203,£200,ERR202

104457
000313
005057
003556

‘ERROR HANDLER

.WORD

CSERSOFT
203
£200
ERR20?2

TRAP

($FSEG

TRAP

($BSEG

TRAP

ENDSEG

10002%:

BGNSEG

002502

mMove

TST

BEQ
(LR

MOV

T
ERRSOF

1046457
000314
005057
003556

40%:

104405

a1CRX,BAD
BAD
40%
600D
#1CRNAM,R?

204 ,6200,ERR202

JGET ICR CONTENTS
JCONTENTS SHOULD BE ZERO

JBRANCH IF YES
JSET UP DATA FOR ERROR MESSAGE

;ERROR HANDLER

ENDSEG

10003%%:

BGNSEG

104404,
017737
005737
001410
005037
0127C°2

002502

MOV
TST

aM(RX ,BAD
BAD

MOV

600D
#MCRNAM R2

8tQ
CLR

ERRSOFT

104457
000215
005057
003556

104457
000316
005057

sSET UP DATA FOR ERROR MESSAGE

50%:

000002

002374

000010
000002

167044

cMP

BEQ
8IS

017060
00C010

MOV
MOV

000010

002500

MOV

8IC
cMp
8ta

.WORD
.WORD
.WORD

(SERSOFT
204
£200
ERR202

TRAP

CSESEG

TRAP

($BSEG

sCONTENTS SHOULD BE ZERO

:BRANCH IF YES
;SET UP DATA FOR ERROR MESSAGE

205 ,€200,ERR202

:ERROR HANDLER

10004%:

#2,(HAN

TRAP

(SESEG

;LO0K AT CHANNEL FLAG
SEXIT IF CHANNEL 2 WAS SELECTED

#10,aCSRX
#2,CHAN

JSET Mux BIT

#10

JMUX BIT SHOULD BE
:BRANCH [F YES

13%
#10,600D

1 206,£200,ERR201
ERRSOF

:LOAD CHANNEL FLAG
JGET CSRZ2 CONTENTS
;IGNORE BIT 9-12 AND BIT 4+¢5
SET

;GET GOOD DATA

;ERROR HANDLER

RSOF1

TRAP

.WORD
.WOnrD
.WORD

ENDSEG

002374
002502
002502
002502

167032

;GET MCR CONTENTS

TRAP

mmayeTM

30%:

104404
117737
005737
001410
005037
012702

22737
(01427
052777
012737
017737
042737
022737
001651
012737

;CONTENTS SHOULD BE ZERO
sBRANCH [F VYES

.WORD

104405

;GET ISR CONTENTS
sCLEAR ULPA BI1

DO
W
DOWNM
nNO

017737
042737
005737
001410
005037
012702

2937 013052
2938 013060
2939 013066
2940 013072
2941 013074
2942 013100
2943 013104
013106
013106
013110
013112
2944 013114
013114
013114
2945 013116
013116
2946 013120
2947 013126
2948 013132
2949 013134
2950 013140
2951 013146
013144
013146
013150
013152
2952 013154
013154
013154
2953 013156
013156
2956 013160
2955 013166
2956 013172
2957 C13174
2958 013200
2959 013204
013204
013206
013210
013212
2960 013214
013216
013214
2961 013216
2962 013224
2963 013226
2964 013234
2965 013262
2966 013250
2967 013256
2968 013264
2969 013266
2970 013274
013276
013276
013300

INITIALIZATION

SEQ 69

MACRO M

1EST 2:

TESTS

—

HARDWARE

TRAP

.WORD
.WORD

0»JoNtggR=t[+wl)TVOTTJYSTVe[la
OWN701NW-aIxNOxOxc——»OrNeO oOad[WIO[OLao¥t]ZMN—
6o060ad=IadTIadTMaI0TadI=a0I—AA~MOWOOM—NMOONMgNM
N- IOONOWNN (IOANOMOMAAAANI~N

OororOrOr W3O~0O0O0
o > 2O

ooo

2 'y

— 4

aNAWIZX2LZEF bTio0Ioxltoa "¢oYAS=L S(o=0g>m—)(1V7T4Vg. gO-—d woA-Jd

i—l> DZ e —
A

06=-SEP-B2 16:46

oO>xa>2
NO ew =Nw

a w

TESY

N 0NN N

HARDWARE

PAGE 44-2

SEQ 70

-—I_VN WwiOwbL_ V0,) [O4o+

S— ~ g — Sy o £z [— (V¥ [Ve]

[=Y

TEST

R/w BIT

TESY

2989

LSBTTL

TEST 3: R/W BIT TEST

2990

' ;.'."'.'""""""""""""""'..""'."""""""'.'.:

2991
2992

;
1Ex = TEST 3
STHIS TEST CHECKS ALL R/W BITS OF CSR,BAR,BCR AND MCR REGISTER

;

%ggg

TCSR1

;

2993

*IN BOTH CHANNELS.IT ALSO TESTS THE MASTER CLEAR FUNCTION IN

2996
2997
2998
2999 013424
013424

3000 013424

3001 013430
3002 013432

013432
013436
013442
013444

013446
3003 013452
3004 013456

1)
PRINTF

014047
000001
000006
002322

013456
013662

012700
106441

000340

013664

106433

3005 013464

183

001410

062706
005037

7%:

3006 013466
3007 013472

005037
012737

013500

104407

3010 013504

103004
012737

017167

002350

012737
013737
012737
004737

000167
002300
000455
006320

002350
002354
002506

000107
000600
166514
166506

166526
166520
002502

3008 013500
3009 013502
013502

3011 013512
3012 013514
3013 013522
3014 013530
3015 013536
3016 013542

000403

013542
3017 013544
3018 013552
3019 013560
3020 013566
3021 013572
3022 013574
3023 013600

104404
012777
052777
117737
105777
001410
005037
012702

013604
N13606
01210
013612

106457
000460
05167
003556

013614
013614

104405

3024 01304

50¢5 013614

3026 013616
3027 013624

012737
013737

(LR
SETPR]

PNTF

002374

13S6C:

READBUS

ITRCNT
#PRIO7

TEST HEADER

BAD
#1,CHAN

:CLEAR ERROR LABEL BAD
1LOAD CHANNEL NO.

*DETERMINE BUS TYPE

MOV

;LOAD BIT MASK FOR Q=-BUS DEVICE

217167 ,MASK

.+10
#167 ,MASK
CSRX .REGADD
#301.,ERRNBR
PC,REGTS

#107,9CSRX
#400 . CSRX
@(SRX,BAD
a(SRX
10$
GOOD
#CSRNAM,R2

ENDSEG

MOV
MOV

#TSHD3,
= (SP)
#1,-(5P)
SP RO
(SPNT#

MOV
TRAP

#PR107,RO
($SPRI

TRAP

(SRESET

TRAP

($RDBU

BCC

UNIMSK

#,SP

;

*LOAD BIT MASK FOR UNI-BUS DEVICE
*LOAD REGISTER ADDRESS
-FIRST ERROR NUMBER
*CALL REGISTER TEST

TRAP
($BSEG
SSET ALL R/W BITS THAT CAN BE CLEARED BY M(C
‘MASTER CLEAR
“GET CSR CONTENTS
TALL BITS CLEARED
‘BRANCH 1F YES
SSET UP DATA FOR ERROR MESSAGE
..

10000%:
8177767 ,MASK
BARX,RE GADD

MOV
MOV
MOV
TRAP
ADD

;CLEAR ITERATION COUNTER
- INTERRUPT NOT ALLOWED

;RESET ALL HARDWARE

ERRSOFT 30&,E302,ERR202

002350
0023564

THE

:BRANCH IF UNI-BUS

MOV
8IS
MOVB
1STB
)
CLR
MOV

108 :

“1F YES, PRINT
e

BNCOMPLE
TE UNIMSK
BR
UNIMSK: MOV
MOV
MOV
JSR
BGNSEG

002500
014042

177767
002302

CLR
MOV

;1S THE PNT FLAG SET

7%
#TSHD3

1TRAC3: BRESET
002502
060001

STHE TMS 9916 REGISTERS IIR,ISR,ICR,IDR ARE NOT CMECKED
;
:IN THIS TEST,
:
;"""'.".""'"'."""""""".'...""."""Q"."ll'...'
BGNTST
13::

005737 002324
012746
012746
010600
104417

¢ (SR2.

:BIT MASK OF R/wW BITS
‘GET REGISTER ADDRESS OF BAR

TRAP
MWORD
WORD
"WORD

(SERSOF!T
304
[£302
ERRZ20?

TRAP

(SESEG

—X

SEQ 71

HARDWARE TESTS MACRO M1113 (6-SEP=8B2 16:46 PAGE 45

SEQ 72

TESTS

005237
023737
001402
000137

(A
V],
V]

MNMOW

PC,REGTSY

;CALL REGISTER TEST

2187767 MASK

MCRX,REGADD

JSR
BIT

PC,REGTST
#1,CHAN

850
MOV

#3171, ,ERRNBR
avid

22, CHAN

(LR
BGNSEG

BAD

MOV
MOVB
BIT

#3,8(SRX
SCSRX,BAD
#10,8AD

MOV
MOV

#CSRNAM,R?
#10,6000

#308. ,ERRNBR

MOV

002234

208

:FIRST

ERPOR NUMBER

SBIT MASK OF R/w BITS
SGET

ADDRESS OF

‘FIRST ERROR NUMBER

B(R

MCR

:SALL REGISTER TEST
:WAS CHANNEL 2 SELECTED

S1F

SSET

YES JUMP TO QUICK VERIFY PASS
CHANNEL

FLAG

;CLEAR ERROR LABLE BAD
sSELECT CHANNEL 2
SGET CSR CONTENTS
215 MUX BIT SET

O =

040

045

[a N1V}

000034

ITRCNT,ITRDEF

CASCIZ

TRAP

¢ $t RSOFY
3 14
t 303

:SET UP DATA FOR ERROR MESSAGE

JTROCNT

Exov3

[TRAC3
1S7

:REPEAT TEST WITH CHANNEL ?2

21S QUICK

:1F

VERIFY PASS

YES EXIT TEST

TRAP

(SESEG

SELECTED

:ITERATION COUNTER + 1
:DEFAULT

ITERATION EXECUTED

JIF YES EXIT TEST
SIF

NO TEST

ITERATION
TRAP

.WORD

CNLIST BEX
/7 (SR/
LAS(J2

/73S2%AR-w BIT TESTIN/

LIST BEX

Eggggv
104401

T3SEC

QvP

CMP

JMP
Exlv

013464

($BSFG

YES

SBRANCH [F

10001%:

Exovd

BEQ

TRAP

.WORD
.WORD
.WORD

BNE

INC

002322
002322

1064632

&»

014074

JSR

MOV

001010

3058
3059 014042
3060 014047
3061
3062
3063 014074

000634
005737

[V 1V ]

014006
014010
014014
014016
014022
014030
014032
014036
014036
014040

:FIRST ERROR NUMBER
:CALL REGISTER TEST
:GET REGISTER ADDRESS OF

MOV

104495

3050
3051
3052
3053
3054
3055
3056
3057

#305. ,ERRNBR
PC,REGTSY
B(RX ,REGADD

tNDSEG

—

014000
014002
3049 016004
014004
014004

MOV
JSR
MoV

ERRSOFT 314,E303

3042
3043
3044
3045
3046
3047
3048

013660
013664
013672
013700
013706
013712
013720
013722
013730
013734
013734
013736
013744
013752
013760
013762
013766
013774
013774
013776

3032
3033
3034
3035
3036
3037
3038
3039
3040
3041

OO
OO
O
VO

3028 013632
3029 013640
3030 013644
3031 013652

O-—=0O

OO0O0O0O—200000
OOOOWOOOOO
OOONINO OO
O WS NN
N~
onoooNOONO
—_ONONOSr SO
—

b >

TESYT 3: R/W BT

HARDWARE

L10030:

TRAP

(St 187

HARDWARE
TEST

TESTS

MACRO M1113

SYSTEM (ONTROLLER

3065
3066

TEST

PAGE

St 73

1EX ~ TEST &
CHANEL 1 WHICH IS SELECTED
THE IFC AND REN MESSAGE BY
SRE. ALSO BOTH IIR AS WELL
PART 2 CHANEL 2 WHICH S SELECTED
:
THE IFC AND REN MESSAGE BY
;
SRE. ALSO BOTH IIR AS WELL
PARY
;

307‘.

AS SYSTEM CONTROLLER SENDS
MEANS OF THE AUXILIARY COMMANDS SIC AND
AS ISR REGISTER ARE CHECKED.
AS SYSTEM (ONTROLLER SENDS

MEANS OF THE AUXILIARY COMMANDS SIC AND
AS ISR REGISTER ARE CHELKED.

:"""".'.""""0""""'"'Q".Q..."."..""'Q'QQ"."""'..'t""'.

3075 14076

0146076
3076 014076

3077 014102

3078 014104
014106

3080
3081
3082

(OMMANDS

16:46

LSBTTL
TEST & : SYSTEM CONTROLLER COMMANDS TEST
Q""Q""""'""""""""""""""."""'"""Q""'.""'""'QQ

3067
3068
3069
3070
3071
3072
3073

3079

06-SEP-82

014110
0141164
016116
014120
0164126
014130
016136
016142

3083 014150

3084 016156

014156

BGNTST

005737

001410

181

PNTF

PRINTF

#TSHD&L

BEOC

012746

012746
010600
104417
062706
005037
004737
113777
112777

CLR
: JSR
MOVE
MOVB

113777

MOVB

BGNSEG

14::

;1S THE PNT FLAG SET

SIF YES, PRINT THE TEST HEADER
MOV

[TRCNT
PC,CULPA
DPAT,al IRHX
#10,3(SRX

;CLEAR ITERATION COUNTER

DPA2,al IRHX

MOV
MOV
TRAP
ADD

#TSHD4L ,=(SP)

#1,-(SP)
SP.RO
CSPNTH
84, 5P

SCLEAR ULPA BIT IN ISR 1 AND 2
SLOAD DEVICE PRIM. ADDR. 1 [N ADDR 1
SSELECT CMANNEL 2

‘LOAD DEVICE PRIM. ADDR 2 IN ADDR REG.

3085 014160
3086 014164

104404
105077
052777

CLRB
8IS

@(SRX
82, 9CSRX

;SELECT CHANNEL 1
SSELECT CHANNEL 1 AS SYSTEM CONTROLLER

3088 014200

004737

JSR

PC,WALT

‘WAIT 100 US.

3087 0164172

112777

move

3089 014206

052777

BIS

3091 014220

017737

MOV

3090 014212

3092 016226
3093 014234
3094 014236

3095 014244

012737

022737
001410
012737

016266
014246
014250
014252
3096 014254
016256
3097 014256

106457
000
00
00

3099 014272
3100 014276
3101 014302

001410

3098 014264

014302
014306
014306
014310
3102 014312
014312
3103 014314
3104 014322

MOV

106406
017737

022737

012737

104457
000622
005447
003702

1046406

062777
010737

CMP
)
MOV

#217,31CRHX

#10,3CSRX
#2.CHAN

aliPx,BAD
#400,BAD
10$
#400,6

ERRSOFT 401, 5501 sanso1

(xLOOP
1

MOV

(MP

1SRX,BAD

#121040,BAD

BEOQ
20%
MOV
£121040,6000
ERRSOFT 402.E502,ERRSO1

(KL OOP
BIC

MOV

#10,3(SRX
81, (HAN

TRAP

($BSEG

1==SEND INTERFACE CLEAR TO CHANNEL 1==

SSELECT CHANNEL 2
SLOAD CHANNEL NO.

SGET IIR2 CONTENTS

SIFC BIT IN [IR 2 SHOULD BE SET
“BRANCH If YES
PSET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP
LMORD
LWORD
-WORD
:BRANCH TO BGNSEG IF ERRLOOP 1S
TRAP
:GET ISR2 CONTENTS

(SERSOFT
401
ESO1
ERRSO1
SET
($CLP!

TATN,NDAC,IFC,ATN SHOULD BE SET

‘BRANCH [F YES
YSET UP DATA FOR ERROR MESSAGE
*ERROR HWANDLER

TRAP
(SERSOFT
.WORD
402
uono
£502
WORD
ERRSO!
:BRANCH T0 BGNSEG !F ERRLOOP IS SET
($CLPI
TRAP
SSELECT CHANNEL 1
SLOAD (MANNEL

NUMBER

TESTS
MACRO M1113
(06-SEPSYSTEM CONTROLLER COMMAND
OO0
=—On
NN
NN

W=
NON

017737

OOV
NOWN

.WORD

.WORD
.WORD

b
—

LSRN
Te )

(kLooP

5664
200640

002502
002502

30%:

MOV

(MP

8tQ

0040

MOV

104406
112777

8lI1SRX BAD
0040.BAD
" 20
40$

”n0?40
2
GOOD

(kLoop

000017
165612

002502

165

40%:

002

Move
MOV
1ST

87,31 CRHX
ol IRX,BAD
BAD

50%
8t0Q
GOO0D
(LR
ERRSOFT «05,E501 ,ERRS01

002500

50%:

TRAP

:GET ISRT CONTENTS
sATN NDAC ,ATN

ISRY

SHOULD BE

;BRANCH [F YES
JSET UP DATA FOR ERROR MESSAGES
JERROR HANDLER

TRAP

VWA

(G JVNIVTRV Te
OoO~NO
00O
[LOP
I L« ¥

—ld
OO0

MOMNLWVY

oo—.
oo

Q= OO0O000
OO0 =00
VOO —00
NINOOONO
ONO
—s YN —
NN OMNVOO

#220,31CRHX

MOV
MOV
1ST

#2,CHAN

PC,WAIT

#10,aCSRX

allRl.BAD
BAD
1%
8eQ
6000
CLR
1 «06,6501 ,ERRSO1
ERRSOF

002500

(KLOOP

165476
120440

002502
002502

120440

002500

11%:

MOV
(Mp

e ISR
1

MOV

#120440
1
,600D

BEQ

BAD

alo BAD

128
4

CSERSOF
T

404

.WORD

€502

TRAP

CsCLPl

----- LOAD NOT

IN A(Recccccccccca-

SI(

GEY IIR1T CONTENTS
sTIRT CONTENTS SHOULD BE ZERO
;BRANCH

YES

JSET UP DATA FOR ERROR MESSAGES
JERROR MANDLER
TRAP

JSELECT CHMANNEL

CSERSOF
T

.WORD
.WORD
.WORD

405
ESOV
ERRSO1

RAP

CSESEG

TRAP

($BSEG

----- LOAD SRE IN [(Ri==ceeecccccccceUAIT 100 usS.
JSELECT CHANNEL 2
SEI (HANNEL FLAG

SGET

TIR2 CONTENTS

llR? SHOULD BE ZERO

:BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGES
;ERROR HANDLER
T
CSERSOF
TRAP

JBRANCH TO BGNSEG [F
NflNU"

NN
S B B BN NIAN O SNNOON
NN SO »>O0

(S IV TV IV TV TV TV TV LV 1V 1%

MOvB

SET

ERRSO1
WORD
ERRRLOOP 1S SET

100008%:

#10,3CSRX

(sCLP

BGNSEG

JSR
81S

ES01
ERRSO1

;BRANCH TO BGNSEG

ENDSEG

8IC

CSERSOFT

403

JBRANCH TO BGNSEG IF ERRLOOP [S SET

T 40 4,ES04,ERRSO1
ERRSOF

WV
N

N SWWWNO
NONNO

O0000—=
—~ON—=-O
NSNS
NENNES

Rl
o ¥ oF o F o o o
POPIN)
ot e b = O
OO
O SNV
S~

TRAP

=
O
B
&

d e
b
o e
D i
)
D
D
D
)
i
D e
i
e
e
o
i o
il
kS e
)
) ol
—d sl
e

»
el el val oy vV

LR
R
o

D
e
e
e e

L o
o

i
e
i

W
W
W

el o

JSET UP DATA FOR ERROR MESSAGES
:ERROR HANDLER

ERRSOFT

104405

BEQ
MOV

000020

005406
003702

el
i

;GET IRV CONTENTS
;80 BIT IN JIRY SHOULD BE SET
sBRANCH [F VYES

(MP

106457

[ OR O R W

—

MOV

000625

N ANV

QOO0

OO~

(v IV 1V ]

3136

00
00

SEQ

PAGE 46-1

.WORD

017737
005737
001406
005037

) i e
e b
i
it e

AN AN ANANNI
NN N
S W=200
~NO

AN AN AN AN AN AN LN N

3135

165714

000020

6:46

O00—
OO00O0
WO
NSOV

e s

D el o

OOOOOOCOOC JOLVLOODOOOOCOOOOOCOODOOCOOOOCOOOODOOOOOOOO

HARDWARE
TEST & :

sGET

ISR2 CONTENTS

WORD
.WORD
.WORD

4«06
ESO1
{RRSO!

TRAP

CsCLP!

ERRLOOP IS SEV

:ATN,NDAC ,REN,ATN IN [SR2 SHOULD SET
:BRANCH IFf VES
:SET UP DATA FOR ERROR MESSAGES

HARDWARE
TEST

TESTS

SYSTEM CONTROLLER

3140 014600
0164600
014602
014606
014606
3141 014610
014610
3142 014612
3143 014620
3144 014626
3145 014634
3146 014640
3147 014642
3148 014646

3149

3150
3161
3152
3153

MACRO M1113

0164646
014650
014652
014654
014656
014656
014660
014666
014674
014676

3154 014704

06-SEP-8B2 16:46

COMMANDS

TEST

ERRSOFT 407,E502,ERRSO1

104457
000627
005447
003702
104406
062777
012737
017737
005737
001407
005037

;ERROR HANDLER

CSERSOFT
407
E502
ERRSO1

#10,3CSRX
#1,CHAN
aliRX,BAD
BAD
138
600D

TRAP
.WORD
.WORD
"WORD
:BRANCH TO BGNSEG IF ERRLOOP IS
TRAP ~
SSELECT CHANNEL 1
‘LOAD CHANNEL FLAG
TGET IIR1 CONTENTS
*T1IR1 SHOULD BE Z2ERO
‘BRANCH [F YES
‘SET UP DATA FOR ERROR MESSAGES

alSRX,BAD
#120440,BAD
14%
#120440,G00D

TRAP
.MORD
"WORD
.WORD
:BRANCH TO BGNSEG IF ERRLOOP IS
TRAP
:GET ISR1 CONTENTS
*ATN,NDAC,REN,ATN SHOULD BE SET
‘BRANCH IF YES
‘SET UP DATA FOR ERROR MESSAGES

CSERSOFT
408
ESO!
ERRSO!
SET
CS$CLP?

CKLOOP

000010
000001
165416
002502

165460
002374
002502

128:

BIC
MOV
MOV
ST
BEQ
CLR

002500

ERRSOFT

104457
000630
005406
003702

104406
017737
022737
001407
012737

SEQ 75

PAGE 46-2

408,ES01,ERRSOY

*ERROR MAND.ER

CKLOOP
120440

165372

002502
002502

120440

002500

13%:

MOV
CMP
BEO
MOV

ERRSOFT 409,E502,ERRS01

*ERROR HANDLER

014704
014706
014710
014712
3155 014714
014714
014714
3156 014716

104457
000631
005447
003792

104405
112777

000020

165344

MOVB

#20,31CRHX

g}gg 014732

112777

000000

165330

MOVB

#0,aiCRHX

1ee==LOAD NOT SWRST IN ICR1

3157 014724

112777

148:

000200

ENDSEG

165336

3160

MOVB

#200,31CRHX

teee<lOAD SWRST IN ICR1 HIGH BYTE=====

104404
012777
052777

000010
000002

3166 014764

004737

011072

3168 014776
3169 015004
3170 015012
3171 015020
3172 015022
3173 015030

012737
017737
022737
001410
012737

3165 014756

3167 014770

112777

062777

015030
015032
015034
015036

104457
000632
005406
003702

015040

104406

3174 015049

L E LI

BGNSEG

014740
3163 014742
3164 014750

000217
000010

165330
165322

165304

165302

000001
165240
000400

002374
002502
002502

000400

002500

TRAP
CSESEG
LOAD NOT SRE IN ICR1 (ACR)====s
(ACR)===--

:000 ..........................................................................

3162 014740

(SERSOFT
409
ES02
ERRSQ1

10001$:

*PART 2 CHECKS (SIC © SRE) OF CHANNEL 2

3161

TRAP
.WORD
.WORD
-WORD

SET
CSCLPI

e e L

DL L PR

DL L

DO D

DL LDt

MOV
BIS

#10,3CSRX
#2,3CSRX

TRAP
($BSEG
SSELECT CHANNEL 2
TSELECT CHANNEL 2 AS SYSTEM CONTROLLER

JSR

PC WAIT

‘WAIT 100 US.

move
BIC

MOV
MOV
CMP
BEQ
MOV
ERRSOFT

CKLOOP

#217.31CRux
#10,3CSRx

#1,CHAN
aliRX,BAD
#400,BAD
15%
#400,GOOD
410,£501,ERRS0?

jemme— LOAD SIC IN [(R2-=e-=eccccee coee
SSELFCT CHANNEL 1

*LOAD CHANNEL NUMBER
PGET IIR1 CONTENTS
YIFC BIT IN IIRY SHOULD BE SET
*BRANCH IF YE
PSET UP DATA FOR ERROR MESSAGES
*ERROR HANDLER

IRAP
MORD
.WORD
WORD

CSERSOFT
410
ESO1
ERRSO!

TRAP

($CLPY

:BRANCH TO BGNSEG IF ERRLOOP IS SET

o
o0

WO
S
NEOS
O
NINWN

OO NN
LSNP XN

[=l=l=
OO
NINIPLWN

NN
=

NN
NENNNNES
WW=WWWIWNNGO
NONNNNGE

002500

8IS

sSELECT CHANNEL 2
sLOAD CHANNEL FLAG

Mov
MOV

¢BRANCH [F

WO
N SO
O OWW
NO
N

ERRSOFT

sERROR HANDLER

TRAP

YES

.WORD

;BRANCH TO BGNSEG IF ERR%OPP IS

MOvB
MOV
TST

.0 CRHX
s

N NS
~N~ ~NS
W ~NO
N~ ~NON

D O==
(=4 —=—=0

21%:

.WORD
ERRLOOP IS

;SET UP DATA FOR ERROR MESSAGES

X,.BAD

BEQ
CLR
T
ERRSOF

000635
005406
003702

'''' LOAD NNT

IN ICR2

YES

sSET UP DATA FOR ERROR MESSAGES
cERROR HINDLER

10002%:

104405

MOV
MOV
TST

8faQ
(LR
ERRSOFT

002500

JSR
8IC

BGNSEG
MOvB

.ES01,ERR501

(xLOOP
164750
120440

22%:

MoV
(MP

----- LLOAD

SRE

cWAIT 100 uUS.

1SRX ,BAD

CSESEG
($BSEG

sSELECT CHANNEL 2

IN ACR

sSELECT CHANNEL 1

JLOAD CHANNEL FLAG
JGET JIR1 CONTENTS
;1IR 1 SHOULD BE ZERO
;BRANCH [F YES
¢SET UP DATA FOR ERROR MESSAGES
sERROR HANDLER

¢BRANCH TO BGNSEG

120440,8AD

(ACR)

*11R2 SHOULD BE ZERO
‘BRANCH IF

.E501,ERR501

SIC

*GET IIR2 CON:ENTS

ENDSEG

81S

SET

sGET 1IR2 (ONTENTS
.80 BIT IN IIR2 SHOULD BE SET

cMp
BEQ

ckLooP

104457

SHOULD BE

¢BRANCH [F YES
:SET UP DATA FOR ERROR MESSAGES
sERROR HANDLER

¢BRANCH TO BGNSEG IF

MOV

17%:

¢GET ISR1 CONTENTS

sATN NDAC,IFC,ATN

(xLooP

—=0On—

MU=~
NESNN
(N
NN
NO~NN

OO0

—ONnN- =N

O00O000~

16%:

OO0O0O0

000~

0 GOOD

04 ,ERRS01

ERRSOF1

OO00QC

O0O0—

MOV

b - Yo 1Y

121040

SO PO

BEQ

b 0D I o=t bk (TMY ) b

sorvdoweven

SEQ 76

PAGE 46-3
MOV
(MP

001406
005037

OOO0OO0O0OO—

OOO—==iHrO—
V=N
SN
O NNNNNN

165210
121040

OOO0O0
WO
NS

S, OOONNNNSNOOWVVNESWNNI
e et ad cd d s OO QOO NNOO VNS
ONOOOOSHNIOCOM
N ONISTONS~NINOOOO
N

b e

D e

D o

e o

oD o

s o

ol o

b o

[&laleleolelelelololelealalalelalelolelolelalolalalolololalolololele]

015042
015050
015056
015060
015066
015066
015070
015072
015074
015076
015076
015100
015106
015114
015122
015130
015132
015140
015140
015142
015144
015146
015150
015150
2
0

6:46

O00=

SYSTE

MACRO M1113
06-S
CONTROLLER COMMAN

O0=

TESTS

NN=O
PNONE
NND

HARDWARE
TEST 4 :

sGET ISR1 CONTENTS

ERR%gR

¢ATN_NDA( ,REN,ATN BITS

SHOULD BE

SET

HIRDWARE
:

S
MACRO M1113
06-SEP=-82 16:46
EM CONTROLLER COMMANDS TEST

0 015316
1

015320

2 015326

015326
015330
015332
015334
3213 015336
015336
3214 015340

3215
3216
3217
3218

015346
01535
015362
015366

3219 015370

3220 015374

015374
015376
015400
015402
3221 015404
015404

3222
3223
3224
3225

001410

012737

104406
052777
012737
(17737
005737
001407
005037

015432
015434

104457
000641

000010
000002
164670
002502

120440

002500

3230 015460
3231 015466
015466
015466

112777

000000

015474
015476
015502
015510
0315512
015516

015516
530 015520

3240
3241 015522
3242
3243
3244 015572
015572
015572

23%:

104405

005737

001010
005237
023737
001402
000137

104401

#10,3CSRX
#2,CHAN
31iRX,BAD
BAD
24$
600D

CKLOOP

24%:

MOV
CMP
BEQ
MOV

aISRX,BAD
#120440,8AD
25%
#120440,G00D

ERRSOFT 417,E502,ERRS01

CKLOOP

000200

164616

164610

25%:

4602

002322
002320

MOVB

002322

014130

123

MOVB
MOVB
ENDSEG

002234

EXQV4:

104432
000052

045

BIS
MOV
MOV
ST
BEQ
CLR

ERRSOFT 416,E501,ERRS01

164646
120640

000020

3233
3234
3235
323¢
3237
3238

164732
002374
002502

_
002502
002502

104406
112777

3232 015470

ERRSOFT 415,E5é ERRS01

002500

005447
003702

112777

238

#120440,600D

CKLOOP

015436
015440
3227 015442
015442
3228 015444

3229 015452

MOV

104457
000640
005406
003702

015406
015416
015422
0154264

SEQ 77

46-4

BEQ

002500

104457
000637
(005447
003702

104406
017737
022737
001410
012737

3226 015432

120440

PAGE

062

TSHD4:

#20.31CRHX

#200,a]CRHX
#0,3] CRHX

:BRANCH IF

YES

$SET UP DATA FOR ERROR MESSAGES

*ERROR HANDLER

TRAP
LWORD
-WORD
.WORD
;BRANCH TO BGNSEG IF ERRLOOP IS
TRAP
;SELECT CHANNEL 2

:
*GET IIR2 CONTENTS
:1IR 2 SHOULD BE ZERO
*BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGES

*ERROR HANDLER

TRAP
MORD
-WORD
.WORD
;BRANCH TO BGNSEG IF ERRLOOP IS
TRAP

:GET ISR2 CONTENTS
:ATN,NDAC,REN,ATN SHOULD BE SET
‘BRANCH IF YES
JSET UP DATA FOR ERROR MESSAGES

*ERROR HANDLER

TRAP
MORD

CSERSOF
T
416
ES01
ERRS01
SET
CSCLPI

CSERSOF T
417

WORD
ES502
WORD
ERRS01
;BRANCH TO BGNSEG IFf ERRLOOP IS SET
RAP
C$CLP?
;====LOAD NOT SRE IN ncnz (ACR) ====mw=

;===<L0AD SWRST IN ICRZ (ACR)======e=e=;====L0AD NOT SWRST

IN ICR2 (ACR)=ee==

10003$:

QvpP

CSERSOFT
415
ES502
ERRSO1
SET
($CLPI

;1S QUICK VERIFY PASS SELECTED

BNE
INC
(MP
BEQ
JMP
EXIT

EXQV4
[TRCNT
1TRDEF, ITRCNT
EXQV4
[TRACG
TST

NLIST
.AS.12
SLIST
EVEN
ENDTST

BEX
/XS2XASYSTEM CONTROLLER COMMANDS TESTIN/
BEX

S1F YES EXIT TEST
*1TERATION COUNTER +
*DEFAULT ITERATION exscureo
YIF YES EXIT TEST
*1F NO TEST ITERATION
:

L10031:

CSESEG

TRAP
WORD

CSEX1T
£ 10031-.

TRAP

(SETST

HARDWARE TESTS
MACRO M1113
TEST S: INTERRUPT TEST

Q6-SEP=-82 16:46

3246

SEQ 78

PAGE 47

3247

LSBTTL

TEST S:

3248
3249
3250
3251

:
;PART 1
:
:

JEX = TEST §
CHECKS THE DEVICE PRIORITY LEVEL AND
THE FUNCTION OF INTERRUPT SEQUENCE IN CHANNEL 1. INITIATING THIS
SEQUENCE WILL BE DONE BY SETTING THE INT ENB, DMA ENB BITS IN CSR1

3254

sPART 2 CHECKS THE DEVICE PRIORITY LEVEL AND

3258

%gg%

3255
3256
3257

.
.
.

3259 015574
015574
3260 015574
3261 015600
3262 015602

015602
015606
015612
015614
015616
3263 015622
3264 015626
3265 015632
3266 015636
3267 015644
015644
3268 015646

3269 015652

3270 015656
015656

015662

015666
015672
015676
015700
3271 015704
015704
015710
015714
015720
015724
015726
3272 015732

00S737
001410

002324

012746
012746
010600
104417
062706
005037
004737
004737
012737

016732
000001
000004
002322
010220
010534
000001

104404
005037
005037

002376
002400

012746

000340

013746
012746
104437
062706

002244
000003

012746

012700
104441
112777

000340

gs;g 015754

012701

000010

052777

000101

015760

005737

002376

015770

012700

000300

001040
005301

002374

7%:
(LR
ITRACS: JSR
JSR
MOV
BGNSEG

(LR
(LR
SETVEC

164312

164324

THE FUNCTION OF INTERRUPT SEQUENCE IN CHANNEL 2. INITIATING THIS
SEQUENCE WILL BE DONE BY SETTING THE INT ENB, DMA ENB BITS IN (CSRZ
AND BO BIT IN JIR2 REGISTER.
R

BISHDS ,=(5P)
#1,-(SP)
SP,RO
CSPNTF
#6,SP

INTFCI
INTEFC2
VECCY,#INTSC1,#PRIO7

TRAP
($BSEG
:CLEAR INTERRUPT FLAG FOR CHANNEL 1
:CLEAR INTERRUPT FLAG FOR CHANNEL 2
:SET VECTOR FOR (HA.1
MOV
#PR107 ,-(SP)

SETPR]

#PRI107

JNO INTERRUPT

MOvB

#20,31SRLX

:ssSET BO BIT IN [SRY

0101.8(SRX

#INTSCT,=(SP)

MOV
MOV
MOV
MoV
TRAP
ADD

#PRI07,-(SP)
#INTERR,-(SP)
VECC2,=-(SP)
#3,-(SP)
CSSVEC
#10,SpP

MOV
TRAP

#PR107,R0O
($SPRI]

MOV
MOV
TRAP
ADD

VECC1,=(SP)
#3,-(SP)
CSSVEC
#10,5P

23:SET PRIORITY COUNTER

PRIT

INTFCY,501,ERRLO?

BNE
DEC

649
R1

INTFC?

MOV

2:3SET INT ENB AND DMA ENB BIT IN (SR

"OYSY "ES1O.R1

:CLEAR ITERATION COUNTER
sRESLT HARDWARE
:SET UP PARAMETER
JLOAD CHANNEL NO.

VECC2,#INTERR,#PRIQ7

ADD

JTRCNT
PC,CULPA
PC.BGINT
#1,CHAN

SETVEC

BIS

R R

T5::
;1S THE PNT FLAG SET
:1F YES, PRINT THE TEST HEADER
Jeee
MOV
MOV
MOV

PNTF
7%
#TSHDS

TRAP

000010

000020

AND BO BIT IN IIR1 REGISTER.

TST
BEQ
PRINTF

000010

015732
015736
3273 015740

015764
015766

010142

000340
010162
002246
000003

3277 015760

INTERRUPT TEST

BGNTST

012746
012746
013746
012746
104437
062706

3274 015746

22:TRY WITH INTERRUPT

; INTERRUPT OCCURED?

;BRANCH IF YES
SCHECKSUM = 7

MOV

#PR106,R0O

HARDWARE TESTS MACRO M1113 06-SEP-B2 16:46 PAGE 47-1
TEST

INTERRUPT

015776

TEST

104441

015776

005737

002376
000240

016024
016030
016032

012700
106441
005737
001022
005301
012700
1044461
005737

016040

005301

016002
016004
016006
016012
016014
016020
016022

016036

016042
016046

016050
016054
016056

001031
005301

001013

012700
104441

005737
001004

016060
016062
016064
016066

104457
000765
005316
003654
000240

016070
016074
3280 016076

012700
104441
106301

3278
3279 016070

3281
3282
3283
3284

016100
016102
016104
016106

106301
106301
106301
106301

000200
002376

010137
013737

002502
002316

3292 016142

017737

3294 016156
3295 016166
3296 016166

022737
001410
012737

016174
016176
016200
016202
3298 016204
016206

104457
000767
005265
003702

3291 016142

3297 016174

3299 016206

104406

INTFCH

. INTERRUPT OCCURED?

SCHECKSUM = &

643

INTFCI
648

NOP
.NLISY MEB
SETPR]
#PR107

R1
RI

ASLB

BEQ

20§

ASLB
ASLB
CMP

R
R1
R1,PLEV

MOV
R1,BAD
MOV
PLEV,GOQD
ERRSOFT 502,6403,ERR4O1

002500

CKLOOP

104406

3293 016150 042737

: INTERRUPT OCCURED?
‘BRANCH IF YES

ASLB
ASLB

3287 016116
3288 016122
3289 016130

104457
000766
005353
003616

INTFCI
648
R1

151
BNE

000340

002316

016130
016132
01613¢
016136
3290 016140
016140

3
BNE
DEC

DEC

648:

164132

002502

000202

002502

017000
000202

208:

002502

SCHECKSUM = S

‘BRANCH

($SPRI

MOV
TRAP

#PR10S,RO
C$SPR]

MOV
TRAP

#PR104 ,RO
($SPR]

MOV
TRAP

#PR103,RO
C$SPR]

TRAP
.WORD
"WORD
.WORD

CSERSOFT
SO
402
ERR&OD?

YES

: INTERRUPT OCCURED?
'BRANCH IF YES

;SET PRIORITY

MOV
#PR107,RO
TRAP
($SPRI
;CREATE CORRECT PRI. FOR COMPARISON

fees
Peee
IR
Cae.

‘CHECK INTERRUPT PRIORITY

‘BRANCH IF INTERRUPT WAS OK

‘SET UP DATA FGR ERROR MESSAGE

*ERROR MANPLER

TRAP
.WORD
-WORD
.WORD
:BRANCH BACK TO BGNSEG IF ERROR
IRAP

3CSRX,BAD

:GET CSR1 CONTENTS

CMP
BEQ
MOV

#202,BAD
30$
#202,600D

PINT,SYS CONT SHOULD BE SET
‘BRANCH IF YES
‘SET UP DATA FOR ERROR MESSAGE

#17000,8AD

ERRSOFT 503,E401,ERR501

(KLOOP
30%:

‘BRANCH IF YES
SCHECKSUM = 6

TRAP

MOV

BIC

002500

:INTERRUPT OCCURED?

64%
R1

151

002376

INTFC

BYE
DEC

BNE

000140

020137

001412

153

002276

3285 016110

3286 016114

CSERSOFT
502
E403
ERR&O1
LOOP SET
($CLPI

:IGNORE BIT 9-12
*ERROR HANDLER

TRAP
(SERSOFT
.MORD
503
WORD
E4O1
.WORD
ERRSO!
:BRANCH TO BGMSEG IF ERRLOOP 1S SET
TRAP
CSCLPI

e 79

WARDWARE
TEST

TESTS

MACRO M1113

INTERRUPT

3300 016206

3301 016214

3302 016222

3303 016224

3304 016232
016232
016236

016236
016240
3305 016242
016242
016242
3306 016244
016244
016250
3307
3308 016252
016252
3309 016256

TEST

017737

(Q6-SEP-B2 16:46

022737

000220

164036

002502

012737

000220

002500

001407

8tQ

MOV

013700
104436
013700
104436

002246

002244

8lIRX,BAD

JGET

339

BRANCH IF YES

pgzo.eao

#220,G6000

012746

000340

016300
016304
016306
3314 016312
016312
016316
016322
016326
016332
016334

012746
104437
062706

000003

012746
012746
0137646
0127646
104437
062706

000340
010162
002244
000003

016340

104404

:SET UP DATA FOR ERROR MESSAGE
;ERROR MANDLER

3316 016342

3317 016346

005037

CLRVEC

VECC?

TRAP
JRESTORE INTERRUPT VECTOR

CLRVEC

VECCY

J(DISABLE
sene
rrrrrrrrrrr e

:000 ........................... Y TYYY I

SEYVEL

012700
104441
112777

000340

%gg} 016374

012701

000010

3320 016366
3323 016400

052777

000020

0001017

016400
016404
016406

005737
001040
005301

002400

016416
016422
016424

005737
001031
005301

002400

016410
0164146

012700
104441

SETVEC

IN2

VEC(Z.IINTSCZ.IPR!O?

000300

VECCT,#INTERR,#PRIO7

BGNSEG

002376

016352
016356
3319 016360

ESOV
ERRSO!

INTERRUPT)

CSESEG

MOV
TRAP

VECC?2,RO
CSCVEC

MOV
TRAP

VECC1,RO
CSCVEC

rrr Yy Y

YT YT Y

YT Y

AR P

LY L

SET VECTOR FOR CHANNEL 2

MOV

163672

163704

MOV
TRAP
ADD
2SET VECTOR FOR (HANNEL 1
MOV
MOV
MOV
MOV
TRAP
ADD

(LR

INTFCY

;CLEAR OLD FLAG

SETPRI

#PRIO7

:NO INTERRUPIT

MOvB

#20,31SRLX

(LR

8IS

INTFC?2

PR]T

TRAP

#PR107,-(SP)

#INTSC2,=-(SP)
VECC?, <(SP)
03.-(SP)
CSSVEC
#0,SP

#PR107,=-(SP)
#INTERR,=(SP)
VECC1,=-(SP)
#3,-(SP)
CSSVEC
#10,SP

($BSEG

Jeee

MOV
TRAP
2:sSET BO BIT IN ISR?2 REGISTER

3101.6CSRX

#PR107 ,RO
($SPRI

::sSET INT ENB,DMA ENB IN (SRZ2

MO\IIST HEg10.R1
L

:SET UP PARAMETER FOR (HAN ¢

MOV
MOV

000010

002400

CSERSOFT
504

;PART 2 CHECK THE INTERRUPT FUNCTION AND THE PRIORITY LEVEL OF CHANNEL 2

000010

005037

3318 016352

TRAP
.WORD

10000%:

016270 012746 010152
016274 013746 002246

3315 016340

CONTENTS

.MORD
.WORD

:000 ................. Tz

016264

JIRT

:INT0,80 SHOULD BE SET

ENDSEG

JSR

ERRSOFT 504,E501,ERRSON

33%:

%%}?
3312 016260 004737 010710
3313 016264

(mMp

104457
000770

104405

SEQ 80

47-2

MOV

002502

005406
003702

PAGE

:2:SET PRIOR]ITY COUNTER

INTF(C2,505, iRRLOZ

;s TRY INTERRUPT

1ST
BNE
DEC

INTFC?
65%
R1

lNTERRUPI OCCURED?
:BRANCH IF YES
;CHECKSUH =7

1ST
BNE
DEC

INTFC2
65%
R1

s INTERRUPT OCCURED?
:BRANCH 1F YES
JCHECKSUM = 6

MOV
TRAP

#PR106,R0
($SPR1

TEST

INTERRUPT

012700
104461
005737
001022
005301
012700
104441
005737
001013
005301

016466

1046441

000240
002400
000200
002400

012700

000140

016470

005737

002400

016476
016500
016502
016506
016506

104457
00077
005316
003654
000240

016474

3324
3325 016510

001004

012700
104441
106301

000340

3331 016530

020137

002316

3333 016536
3334 016542
3335 016550
016550
016552

010137
013737

002502
002316

016520
016522
016524
016526

3332 016536

016554
016556
3336 016560
016560

3337 016562
3338 016562

106301
106301
106301
106301

001412

: INTERRUPT OCCURED"
‘BRANCH IF YES
JCHECKSUM = &

INTFC?

65%

NOP
LNLIST MEB
SETPRI
#PRIO7

R
R1
R1
R1
R1
R1,PLEV

40$

CKLOOP
002502

022737
001410
012737

000212

002502

000212

40%:

002502

002500

002502
002502

000220

002500

(3%

sBRANCH [F

YES

#PRI0OS,RO
($SPR]

MOV
TRAP

#PR[04,RO
($SPRI

MOV

#PRIO3,RO

TRAP
.WORD
.WORD
.WORD

CSERSOFT
505
E402
ERR&O?

TRAP

($SPRI

:SET PRIOR]ITY

MOV
#PR]107,R0O
TRAP
($SPRI
;CREATE CORRECT PRI. FOR COMPAR]SON
Jeee
Jeee
;'
Jeee

*CHECK INTERRUPT PRIORITY

‘BRANCH IF INTERRUPT PRI.WAS OK
*SET UP DATA FOR ERROR MESSAGE

Jeee
;ERROR HANDLER

TRAP
.WORD
.WORD
.WORD
:BRANCH TO BGNSEG If ERRLOOP 1S
TRAP

CSERSQFT
506
403
ERR&O1
SET
(SCLP

a(SRX ,BAD

:GET CSR2 CONTENTS

CMP
BEQ
MOV
ERRSOFT

#212,8AD
438
#212,600
507,E401,ERRSO!

SINT,SYS CONT
, MUX SHOULD BE SET
;BRANCH F YES
“SET UP DATA FOR ERROR MESSAGE
:ERROR HANDLER
TRAP
CSERSOFT
.WORD
507
.WORD
E40
.WORD
ERRSO1
:BRANCH BACK T0O BGNSEG IF ERRLOOP SE!T

117006.8AD

CKLOOP
163416
000220

:INTERRUPT OCCURED?

MOV
TRAP

MOV

8IC

104457
000773
005265
003702

017737
022737
001407
012737

3345 016626

INTFC2
65%
R1

MOV
R1,BAD
MOV
PLEV,G0OD
ERRSOFT 506,E403,ERR4D?

002500

163512

3346 016626
3347 016634
33,8 016642
33,9 016644

181
BNE
DEC

BEQ

017737

104406

: INTERRUPT OCCURED"
;BRANCH JF YES
SCHECKSUM = S

ASLB
ASLB
ASLB
ASLB
ASLB
CMP

104406

016624

INTFC2
65%
R1

BNE

104457
000772
005353
003616

3339 016570 042737 017000
3340 016576
3341 016604
3342 016606
3343 016614
016614
016616
016620
016622
3344 016624

181
BNE
DEC

1£3)

65%:

016510
016514
3326 016516

3327
3328
3329
3330

TEST

016426
0164632
01643¢
016440
016442
016444
016450
016452
016456
016460

016462

30 8

MOV
(MP
BEQ
MOV

:IGNORE BIT 9=12

TRAP

a3l IRX,BAD
#220,8AD
50$
#220,600D

:GET J1IR2 CONTENTS
JINTO,B80 B]T SHOULD BE SET
*BRANCH IF YES
‘SET UP DATA FOR ERROR MESSAGE

cscLePt

—~X

HARDWARE TFSTS MACRO M1113 Q06-SEP-B2 16:46 PAGE 47-3

06-SEP-82 16:46

O—wwn—=u
-8 NNO N
WO
N =N
NNINNON

d
b
d o
b
d

002234

045

015626

106601

123

1S1
BNE
INC
(MP

002322

ExQvs:

O
or
W
ON

b
ot o

CLRVEC

002246

002322
002320

ENDSEG
CLRVEC

002244

[elelelololololeleolalelele)

50%:

[0 AV, IV IV TV IV IV ]

.ERROR HANDLER

ERRSOFT 508,E501,ERRS501

3350 016652
01665¢
016654

016732

SEQ 82

PAGE 47-4

062

TSHDS:

BEQ
JMP

EXIT T1ST

TRAP

10001$:

508
ESO1
ERRSO1V

TRAP

(SESEG

MOV

VECC1,RO

MOV

VEC(CZ2,RO

JRESTORE VECTOR (CICABLE INTERRUPT)

VECCT

TRAP

VECC?
Qve

TRAP
‘PASS SELECTED

ITRCNT
I TRCNT
ITR,DEF

ER + 1
?N EXECUTED

[TRACS

ATION

EXQVS

ExQvsS

TRAP

X
BE
é;S?lAlNYERRUPI

(SERSOFT

.WORD
.WORD
.WORD

(SCVEC

CSCVEC

CSEX]T

.WORD

L10032~.

TRAP

(SETST

TESTIN/

L10032:

bl4

HARDWARE TESTS
MACRO M1113
TESY 5 INTERRUPT TEST

TESTS

MACRO M1113

(06-SEP=-82 16:46

TEST 6: ADDRESS REGISTER TEST OF

(HANNEL 1

LSBTTL

3368

3369

SEQ 83

PAGE 48

TEST 6: ADDRESS REGISTER TEST OF (HANNEL 1

;"t""t"'t"'"""'"t'"""""'t'."""""'Q."""t""tt"l""".'

IEX = TEST 6

gg;?

3372
3373

SPART 1 CHECKS THE CORRECT FUNCTION OF ADDRESS REGISTER 1 (#D2) BY LOADING ITS
:
DEVICE PRIMARY ADDRESS INTO BIT A1-AS AND RECEIVING THE ASSIGNED

3375

sNOTE:

3374

gggg

LISTEN OR TALK ADDRESS VIA THE

ON THE STATUS OF DPA1

JEC/IEEE BuUS.

THE ULPA BIT IN THE [SR1 REGISTER IS DEPENDENT

(0DD DPA1 => ULPA IS SET)

3378
3379

;PART 2 cuecxs THE FUNCTION OF THE DAT BIT (DISABLES THE TALK FUNCTION),
THE DAL BIT (DISABLES THE LISTEN FUNCTION) AND THE EDPA BIT (ENABLES
:

3383
3384

;16 THME QUICK VERIFY PASS IS NOT SELECTED, THF TeSt
;17 WITH DIFFERENT DPA'S,

3380
;gg;

:
:

3385

3386 016762
016762

3387 016762

3388 016766
3389 016770

BGNTST

005737

001410

002324

012746
012746
010600
104417
062706
005037
004737

023000
000001

3393 017024
3394 017030
3395 017034
3396 017040
3397 017046

013701
062701
010137
032737
001420

002312
000040

052737

000001

3398 017050

3399 017056

34,00 017064
3401 017072
3402 017100
3403 017106
3404 017110
2,05 017116
3406 017126
34,07 017132
3,08 017140

3409 017146

017146
3410 017150

3411 017156
3412 017164
3413 017172

341 0172176
3415 017206
3616 017212
3,17 017214

[ItRATION WitL DO

.'t""t"'tt.""""""""'t"'t't".t'ttt'.'t".'tt'tt'lt"""t".."'t'

016770
0167764
017000
017002
017004
3390 017010
3391 017014

3392 017020

THE DUAL PRIMARY ADDRESSING MODE, WHICH ARE ALSO PRESENT [N THE
ADR1 REGISTER.

004737

7%:

010220

010710

002410

Al:

000001

002312

052737

000001

002434

052737
052737
052737
000417
042737
042737
042737
042737
042737

000001
000001
000001

002440
002442
002444

000001

002434

1044064
052777

012737
113777
004737

017737
022737
001410
012737

000001
000001
000001
000001
000010
000002

PNTF

;1S THE PNT FLAG SET

PRINTF

#TSHD6

Teee

(LR

ITRCNT

:CLEAR COUNTER

PC,.BGINZ

;SET UP PARAMETER

BEQ

000004
002322

002436
002440
002442
002444

#TSHD6,=(SP)
#1,-(SP)
SP,RO
(SPNTF
#6,5P

DPA1,R1
#40,R1

sGET DPAY ADDRESS
:CREATE MY LISTENER ADDRESS (MLA)

#1,DPA1
3$
#1,(DATY
#1,(DAT?

:1S DPA EVEN
:BRANCH IF YES
.>er ULPA BIT IN COMPARE DATA FOR ISR
:

8IS
BIS
BR
BIC
BIC
BIC
BIC
BIC

BIS

BGNSEG

:STORE MLA

#1.CDAT3
#1,(DAT4
#1,CDATS
.+40
#1,C0ATY
#1.CDAT?
#1.CDAT3
#1.CDAT4
#1.CDATS
#10,3(SRX
#2,(HAN

011060
163046
000020

002502
002502

000020

002500

JSR
MOV
CMP
BEQ
MOV

PL,LOOP
311RX,BAD
#20,8AD
10%
#20,6000

MOVB

:CLEAR ULPA BIT IN ISR 1 AND 2

R1,MLAY

8IS
MOV

163104

MOV
MOV
MOV
TRAP
ADD

MOV
ADD
MOV
BIT
BEQ

163122
002374

002410

:1F YES, PRINT THE TEST HEADER

PC,CULPA

BIS

3%:

JSR

BIS

002436

16::

1£3]

MLAT,QIDRHX

i
:
*BRANCH TO BGNSEG
.CLEAR ULPA BIT IN (OMPARE DATA FOR [SR
:
:
:
:

Pes

sSELECT CHANNEL 2
SLOAD CHANNEL NUMBER

TRAP

($BSEG

jemeee LOAD MLA! INTO DOR le=ccccececes

UAIT ALITTLE
SGET 1IR2 CONTENTS
‘B0 BIT SHOULD BE SET
SBRANCH IF YES
SSET UP DATA FOR ERROR MESSAGES

-4

HWARDWARE

S
S

HARDWARE
TESY 6:

3618 017222
017222
017226
017226
017230
3419 017232
017232
3,20 017236

3421 017242

3422 017250
3,23 017252

34,24 017260

017260
017262
017266
017266
3425 017270
017270
34,26 017272
34,07 517300

MACRO M1113
REGISTER

104406
017737

022737

001410
012737

104406
042777
012737

012737

017332
01733
017336
017340
3433 017342
017362

104457
001133
005406
003792

104406

34,34 017344

017737

3636 017360
34,37 017362

001410
013737

3438 017370

163016

002502

120040

002500

023737

000010

002376

002401

002502

002401

002500

162736

002502

002444

002500

004737

011060

3647 0176446
3448 0174654

012737

0174646

104457
001135
005406
003702
104406

CMP

BEQ
MOV

alSRX,BAD

208
#120040,G00D

‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGES

£120040,B8A0

SATN,ATN,NDAC BIT Uf ISR2 SHOULD BE SET

ERRSOFT 602,E502,ERRSO1

20$:

00250¢

162706

002444

3443 0176426

017737
022737
001410

MOV

002502

BIC

#10,3CSRX

MOV
CMP
BEOQ

alirx,BaAD
w2401 BAD
308

SGET IIRY CONTENTS
*MA_MAC,IFC.BIT IN [IR1 SHOULD BE SET
‘BRANCH IF YES

MOV

#1,CHAN

*LOAD CHANNEL NUMBER

#2401,600D

ERRSOFT 603,E501,ERRSO1

30$:

000002

000077

002374

162652

162614
000020

002502
002502

000020

002500

*ERROR HANDLER

TRAP
(SERSOFT
LWORD
603
LWORD
ES01
WORD
ERRSO1
;BRANCH T0O BGNSEG WHEN ERRLOOP 1S SET
TRAP
($CLPI

S1SRX,BAD

;GET

BEQ
MOV

40%
CDATS,GOOD

‘BRANCH IF YES
PSET UP DATA FOR EPROR MESSAGES

CMP

CDATS.BAD

#10,a(SRX

MOVB

#77.31DRHX

JSR

MOV
CMP
BEQ

22 . CHAN

PC,LOOP

alirx,BAD
#20,BAD
50$

TRAP
LWORD
"WORD
.WORD

(SERSOFT
6064
£502
ERRSO!1

TRAP

($CLPI

BGNSEG WHEN ERRLOOP IS SET

;SELECT CHANNEL 2

MOV
#20,600D
ERRSOFT 605,E501,6RRS5O!

(KLOOP

CONTENTS

*ERROR HANDLER

:BRANCH T

BIS

MOV

ISR1

CATN,ATN,LADS ,NDAC LPAS,(ULPA) BIT SET

ERRSOF1 604,E802,ERRSO1

40%:

SSET UP DATA FOR ERROR MESSAGES

MOV

CKLOOP

162670

*ERROR MANDLER

TRAP
(SERSOFT
WwORD
602
.WORD
ESO0?
.WORD
ERRSO1
;BRANCH T0 BGNSEG WHEN ERRLOOP 1S SET
TRAP
(S$CLP?
SSELECT CHANNEL 1

(KLOOP

000019

112777

163000

000001

104406
052777
012737

017454
017456
017460
017462
3449 017464

10%:

CKLOOP

017400
34,40 017402
3441 017410
3444 0176430
3445 0176436
3446 017446

002502

120040

;ERROR HANDLER

TRAP
(SERSOFT
WORD
601
WORD
ESO1
.WORD
ERRSO1
;BRANCH TO BGNSEG WHEN ennon LOOP [§ SET
TRAP
Cs$CLPT
;GET ISR2 CONTENTS

(KLOOP

104457
001134
005447
003702

3462 017416

SEQ 84

PAGE 48-1

ERRSOFT 601,E501,ERRSO1

017370
017372
017374
017376

3439 017400

(HWANNEL

104457
001132
005447
003702

3,31 017324

3435 017352

104457
001131
005406
003702

3428 017306 017737
3429 017314 022737
34,30 017322 001410
3432 017332

TEST

06-SEP-B2 16:646

*LOAD CHANNEL NUMBER

ieeee- LOAD UNL INTQ DOR=-eecececcennas

TWAIT A LITTLE

SGET [IR2 CONTENTS
SCHECK BO BIT IN 1IR2
‘BRANCH IF YES

‘SET UP DATA FOR ERROR MESSAGES
ERROR HANDLER

(SERSOFT
TRAP
.MWORD
605
.WORD
ESO)
tna501
~WORD
;BRANCH TO BGNSEG WHEN ERRlOOP 1S St
RAP

($(LP\

HARDWARE

TEST 6:

TESTS

MACRO M1113

(Q6=-SEP=-8B2

ADDRESS REG(>15R TEST OF

36,50 0176466

017737

3,52 017502

001410

3,51 017476

3053 017504

376 N1T5712

017512
017514
017516
017520
3455 017502
017522
3456 017524

022737

01,737

CHANNEL

162564

002502

120040

002500

120040

16:46

002502

50$%:

MOYV

S1SRX,BAD

BEOQ

608

CMP

000010
000001
162506
000001

162546
002374
002502
00250¢

BIC
MOV
MOV
C(MP8

3,61

017556

012737

000001

002500

MOV

017564
017566
017570
017572

106457
001137
005406
003702

3666 017612
3467 017614

104406
017737
023737
001407
013737

3662 017564

3463 017574
017574
3666 017576
34,65 017606

3468 017622

001410

017622
017624
01762¢
017630
3469 017632
017632
017632
3470 017634
017634

104457
001140
005447
003702

3472 017644
34,73 017652

032737
013701

3471

162454
002434

002502
002502

002434

002500

000010

3674 017656
3475 017662

062701
010137

Q00100
002414

113777

3479 017700
3480 017706

004737
017737

3482 017720
3,82 017722
3484 017730

001410
012737

3,81 017712

017730
017732

000002
002312

162434

002374

022737
106457
(01141

#10,aCSRX
21, CHAN
aliRx.BAD
#1,BAD

116

000

ERRSOF T 607.5501.Ean501

MOV
CMP
BEQ
MOV

aISRX,BAD
CDAT1.BAD
12%
CDAT1,GOOD

ERRSOFT 608,650, ,ERRS01

*ERROR MANDLER

TRAP
(SERSOFT
MWORD
606
.WORD
£502
.WORD
ERRS0!
;BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
($CLPI
sSELECT CHANNEL 1

*LOAD CHANNEL NUMBER
SGET TIR1 CONTENTS
TMAC BIT IN IIR1 SHOULD BE SET

:BRANCH IF YES

SSET UP DATA FOR ERROR MESSAGES

SERROR HANDLER

CSERSOFT
607
ESO?
ERRSO1
:BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
($CLPI
:GET ISR1 CONTENTS
SATN,ATN,NDAC, (ULPA} BIT SHOULD BE SET
‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGES

TRAP
L.WORD
.WORD
.WORD

*ERROR HANDLER

ENDSEG

100008:

8IS

#10,9CSRX

JSELECT

ADD
MOV

#100,R1
R1,MTA1

JCREATE MY
SSAVE MTA

MOV
MoV

ENDSEG

104405
106404

SSET UP DATA FOR ERROR MESSAGES

SBRANCH {F YES

BGNSEG

052777

3478 017672

BEG

12%:

017636

3,7¢ 017666
017666
017666
34,77 017670
017670

#120040,6000

CKLOOP

106405
1044064

SATN,ATN,NDAC BIT SHOULD BE SET

(xL00P

012737
017737
122737

;GET ISR2 CONTENTS

#120040,BAD

ERRSOFT 606,E502,ERRSO1

3,57 017532
3458 017540
3459 017546

3660 01755¢

SEQ 85

4&B8-2

MOV

104457
001136
005447
003702
104406
042777

PAGE

#2,CHAN
DPAT,R1

CHANNEL

SLOAD CHANNEL NUMBER
:LOAD DFA1 IN RI

011060
162340

000020
000020

162376

002502

002500

(SERSOF!
608
ES50?
ERRSO!

TRAP

(SESEG

TRAP

($BSEG

TALKER ADDRESS

10001$:

BGNSEG
002414

TRAP
.WORD
.WORD
.WORD

TRAP

($ESEG

TRAP

C$BSEG

MOVB

MTAY,31DRHX

;==<LOAD

CMP

cio.au

(R0 BIT [N [IR2 SHOULD BE SET

JSR
MOV

PC,LO0P
alirx,BAD

BEQ
138
MOV
#20,6000
ERRSOFT 609.£501,ERRSON

TALKER ADDR.

(MTA)

SWAIT A LITTLE
:GET TIR2 CONTENTS

INTO DOR Qe===-=

oRANCH |F YES
*SET UP DATA FOR ERROR MESSAGES
*ERROR HANDLER
TRAP
.WORD

(SERSOHT
609

HARDWARE

TEST 6:

TESTS

MACRO M1113

06-SEP-B2

ADDRESS REGISTER TEST OF

01773
017736
3485 017740
0177640
34,86 0177642
3,87 017750
3,88 017756
3,89 017760

005406
003702

017766

104457

3490 017766

104406
017737
022737
001410
012737

017770
017772
017776
371 017776
017776
3492 020000
3493 020006
3694 020014
3495 020022
36496 020030
3497 020032

104406
042777
012737
017737
022737
001410
012737

020040
02006z

104457
001143

3500 020052
3501 020060

104406
017737
023737

3498 020040

020046
020046
3499 020050
020050

(HANNEL

162310
120040

002502
004502

120040

002500

000010
0000017
162230
002001

162272
002374
002502
002502

052001

002500

162200
002440

002502

002440

002500

002502

000010
000002

162162
002374

3510 020136
3611 020144

017737
022737

162106
000020

002502
002502

000020

002500

012737

020162
020166
020166
020170
3515 020172
020172
3516 020176

104457
001145
005606
003702

3918 020210

001410

3617 020202

104406
017737

022737

MOV
CMP
BEQ
MOV

JISRX,BAD
#120040,BAD
14
#120040.600D

ERRSOFT 610,E502,ERRSO?

14%:

BI¢
MOV
[0}
CMP
8t0
MOV

#10,3(SRX
#1,CHAN
31 IRX,BAD
#2001 .8AD
15¢
#2001, 600D

ERRSOFT 611,6801,ERRSOY

(KLOOP

104406
052777
012737

001410

SEQ 86

48-3

(KLOOP

104457
001144
005447
003702

3512 020152

13$:

005406
003702

112777
004737

PAGE

(KLOOP

020076
020100
020102
020104
3505 020106
020106
3506 020110
3607 020116

3613 0201564
3514 020162

001142
005447
003702

3502 020066 001410
3503 020070 013737
3504 020076

3508 020126
3509 020132

16:46

15%:

MOV

(MP

ISRX,BAD

CDAT3.BAD

BEOQ
16%
MOV
(DAT3, 600D
ERRSOFT 612,6502,ERRS0}

000137
011060

162144

120040

002502

(SERSOFT

TRAP
.WORD

(SERSOFT
611

WORD
610
LWORD
ES0?
.WORD
ERRSO1
;BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
($CLP!
SSELECT CHANNEL 1
SLOAD CHANNEL NUMBER
:GET 1IRY CONTENTS
‘MA,MAC,BIT IN IIR1 SHOULD BE SET
JBRANCH IF YES
YSET UP DATA FOR ERROR MESSAGES

"ERROR HANDLER

.WORD
ES01
WORD
ERRSO!
;BRANCH TO BGNSEG WHEN ERRLOOP 1S SET
RAP
($CLP!
:GET

ISR1 CONTENTS
TATN,ATN,
TADS ,NDAC, TPAS, (ULPA) BIT

SBRANCH [F YES
‘SET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

SET

#10,3CSRX
82, (HAN

MOV
CMP

alirx,BAD
#20,BAD

SGET 11R2 CONTENTS
‘80 BIT [N [IR? SHOULD BE SET

movB
JSR

BEOQ

#1%7,310RWX
PC.LOOP

218

MOV
#20,600D
ERRSOFT 613,£501,ERRS501

21%:

TRAP

8IS
MOV

iecee- LOAD UNT [NTO DOR 2=ce=cccecceece
CWAIT A LITTLE

*BRANCH [F VES

‘SET UP DATA FOR ERROR ME SSAGES
JERROR HANDLER

MOV

1SRX . BAD

TRAP
CSERSOF!
.WORD
613
LWORD
[501
WORD
ERRSOQ!
;BRANCH T0 BGNSEG WHEN ERRLOOP IS SET
RAP
(S(LP!
:GET ISR2 CONTENTS

BEQ

22%

‘BRANCH [F

(KLOOP
162056

*ERROR WANDLER

TRAP
CSERSOF1
.WORD
612
LWORD
ES02
.WORD
ERRSO!
:BRANCH TO BGNSEG WHEN ERRLOOP 1S SET
TRAP
($CLP!
SSELECT CHANNEL 2
1LOAD CHANNEL NUMBER

(KLOOP

16%:

.WORD
E501
.WORD
ERRSOQI
:BRANCH TO BGNSEG WHEN fRRLOOP 1S SET
TRAP
(S$CLPI
:GET ISR2 CONTENTS
CATN,ATN,NDAC BiT [N ISR2 SHOULD BE SET
‘BRANCH 1F YES
SSET UP DATA FOR ERROR MESSAGES

(mpP

0120010.8“)

MN ATN,NDAC [N ISR?2 SHMOULD BE SE!T
YES

LA WA N A N N LA

F ¥ 2l 2R 2 MYV
1V ]
S W= OO0~

NEWN=D000
NN

WVTV IV TO U LV IV

(WIV R TV IV V.2 28 2% a8 ¥

LVIV
AV R Ve NIV TV SV N TV BTV

AN
LW UMM AN AL

QOO HNLOONONESNINOO
NNNSOCONOOO SNOON

NN NN ANNIN

MACRDO M1113
06-SEP=B2 16:46
REGISTER TEST OF (MANNEL 1

012737

120040

(€02500

MOv

T
ERRSOF

106457

001146
005447
003702
104406

042777
012737
017737

022737
001410
012737

000010
000001

161776

162040
002374

228:

002502

000001

002502

000001

002500

161746
002436

002502
00£5G2

002434

002500

CMP
BEQ
MOV

Y
ERRSOF

23%:

104457

001150
005447
003702

BIC
mov
MOV

001147
005406
003702

017737
023737
001407
013737

#120040,6000

614,£502 ,ERRSOY

248:

JSEYT UP DATA FOR ERRCR MESSAGES
TRAP

;ERROR MANDLER

.WORD
.WORD
.WORD

;BRAN(H TO BGNSEG wWHEN E?:kgOP l

(kLOOP

106457

104406

SEQ 87

PAGE 48-4

#10,aCSRx

JSELECT CHANNEL 1

8] IRX,BAD

JGET JIRY CONTENTS
JMAC BT IN [JRY SHOULD BE SET
JBRAN(MH |F VES
SSET UP DATA FOR ERROR MESSAGES

81 ,(HAN

23§

_BAD

#1,600D

615, E501,ERRSOY

JLOAD (MANNEL NUMRER

SERROR

WANDLER

TRAP

.WORD
.WORD
.WORD

T
(SERSOF
615
£501

ERRS01

(KLOOP

sBRAN(CH TO BGNSEG WHEN E?RLOOP l S SET

QI5RX ,BAD
MOV
CMP
C DAT1,BAD
2 ‘%
BEQ
T
CDAT1,GOOD
MOV
ERRSOFT 616,6502,ERRSOY

sGET ISRY CONTENTS

RAP

SET

SHOULD 8t

sATN,ATN
NDAC, (ULPA)BITS

sBRAN(CH [F

cscLpPt

VYES

JSET UP DATA FOR ERROR MESSAGES
IRAP

JERROR HANDLER

.WORD
+WORD
.WORD

ENDSEC

100028:

104405

T
( ERSOF
D N —~P»

=2 O O OO NN NN
O S 8 WWAENNININONIN)
—

wwn
w

»
O -

B B B

3535

S LS LN LS LS T8 1 S 1y % N
(elolelolelelalololalelololelolololololololelololololololelole
(o]o
(VL IV TV T T
TN TV T TV T TV TN T TV TN LT N T TN L NN Lo Ly LN L N S N LA A e ~J)

-t

[0 R

M AN LM AN N AN N

WA
NINLALRNLRNLAVND

STo JV P LYV [, V]

[V )
S

39519
3520

LSS LN LN NI NI NSNS NI SIS LN NI SN SIS LN N LS L

TEST 6:

[elelolalelelelololelolalololalalololololololalelelolelolelolele] o

HWARDWARE

6 6

ERRSO!
(SESEG

SPART 2 OF THE ADDRESS REGISTER TEST,
:THIS PART CHECKS THE “'DAL',"'DAT'',"'EDPA'* BITS IN THE IEEE
. ADDRESS REGISTER.
020342
020346
020352
020356
020356
020360
020366
020374
020402

020406
020414
020422

020430
020436
020440
020446
020446
020450
020452

0137C1
052701

110177

104404

002312
000040

161676

000010
000002

004737
042777
012737
017737
023737
001410

011060
000010
000001
161630
002444

161664
002374
002502
002502

002444

002500

113777

013737
106457

001151
005647

002410

161712
002374
161674

COPA1:

ODPA1, R

BIS
MOV

#10,9(SRX
#2,(HAN
MLAY,81DRHX

SSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
ie==<LOAD MLA IN DOR REGISTER=---

#10,3(SRx

JSELECT CHANNEL 1
sLOAD C(HANNEL NUMBER
sGET ISR1 CONTENTS

MOVB
BGNSEG

052777
012737

:GET DEVICE PRIM, ADDR,
;ADD DAT BIT 10 DAP!

MOV
BIS

MOVB

JSR
BIC
MOV
MOV
(mP
BEOQ

MOV

ERRSOFT

#40,R1
R1,81IR4X

;LOAD DEVICE PRIM, ADDR.1 + DAT BIT
TRAP

PC,LOO0P

81, CHAN

S1SRX,BAD

CDATS,BAD

40%

CDATS,GOOD

617,£502,ERRSO1

($BSEG

sWAIT A LITTLE

SATN,ATN,LADS ,NDAC,LPAS, (ULPA)BI T

;BRANCH F YES
sSET UP DATA FOR ERROR MESSAGES

JERROR HANDLER

TRAP

.WORD
.WORD

Sstt

CSE RSOFf1
617
£50 2

(HANNEL

SEQ 88

48-5

=Y
=

VWAV
VWO
OONO
~N~N—
LSS
R o R
o 1,
V]

COO—=
=20
jololale BNJolo

Mov

ERRS501
.WORD
sBRANCH TO BONSEG WHEN E?RLOOP IS SET

ANINPVN

#10,8(SRX

,(HAN

277, 31DRHX
PC,LOOP

#10,3CSRX

PNORVND
=

NNNNNNNNN

[elelel BN elololelelele
o]
OO0
N = d 5 O i b
WNAN
s £
N =2 N NN
S PO
SNE =L
NS NSNSNNNNN
O £ NI
WWOINNAN
NI
W

002500

ERRSOFT

foemo LOAD UNL

CDAT1,BAD

*ATN,ATN,NDAC, (ULPA)BIT

CDAT1,GOOD

618,502, ERRSO1

1GET ISR1 CONTENTS
:BRANCH IF

YES

TRAP

10003$:

002436

~NNN-—NSO

RN
—
& wwn

[=l=l=
el"
oOooor
oo

#10,3CSRX

QONO
sy

002436

PC,LOOP

PNOROLNY
=
Al
L

NNSNNSNNNN

161426

MOV

002500

NINWN

#10,3CSRX
#2,CHAN
MTA1,3]DRHX
#1, CHAN

a1SRX,BAD

MOV

ERRSOF1

(DAT2.BAD
33¢

CDAT2,G00D

619,6502,ERRSO1

NNNNNNNNS

NN
- =N

COOOOO0OD
==
OO=0OO—
2 DN = = PO = O
- LS omd Y b o
W= NP
WS OO
S
N
NNNNNYS
NN
= NS
WOWWANNAWNNGDG WNINO OO

161344

002502

002500

JSR
8IC

MOV
MOV

CMP

8eQ
MOV

ERRSOFT

618
ES502
ERR501

TRAP

CSESEG

TRAP

C$BSEG

SWAIT A LITTLE

sATN,ATN,_NDAC,
TPAS, (ULPA)SHOULD BE
sBRANCH [F YES
sSET UP DATA FOR ERROR MESSAGE

;ERROR HANDLER

TRAP

SET

(SERSOFT

.WORD
WORD
.WORD

619
ES502
ERRSON

TRAP

CSESEG

TRAP

($B8SEG

#2.,CHAN

:GET DEVICE PRIM, ADDR. 1
:SET DAL BIT
;====_0AD DPA1 ¢ DAL BIT INTO ADR 1=~
JSELECT CHANNEL 2
:LOAD CHANNEL NUMBER

MLAY,@1DRHX

;====LOAD MLA1

#10,3CSRX

JSELECT CHANNEL
;LOAD C(HANNEL NUMBER
sGET ISR1 CONTENTS

#10.3CSRx

Move

T
CSERSOF

.WORD
.WORD
.WORD

sSELECT CHANNEL 1
:LOAD CHANNEL NUMBER
sGET ISR1 CONTENTS

10004%:
DPA1,R1
#100.R1
R1, 81 IRHX

161354

SET

sSELECT CHANNEL 2
:LOAD (HANNEL NUMBER
M ttated LOAD MTA1 IN DOR REGISTER (IDR2)

ENDSEG

BGNSEG

SHOULD BE

:SET UP DATA FOR ERROR MESSAGES

ERROR WANDLER

BGNSEG

000010
000902
002414
011060
000010
000001

($CLPI

iNTO DOR====-==cccacacae

:LOAD CHANNEL NUMBER

128

RAP

WAIT A LITTLE
PSELECT CHANNEL 1

#1,CHAN

8ISRX,BAD

MOV

;SELECT CHANNEL 2
:LOAD CHANNEL NUMBER

ENDSEG

3581 020660
[YeRVolVelVolo
-To - NN -Jo -Jo Yo .To .Jo )
WA= OOIJ®
NO
N W

PAGEL

(xLQoP

e lelelelelole
P
—=ON=alO—
AN =2 NN
B
NESNNNNNYN
WO WWINNWN

o~ COoONOOOCOCOS~NOOOCOoONSONSOO
~N

0¢-SEP-B2 16:46

[elelel
OOOO
NN
= 8~
N
QNN

0000000000000 O00O0O0000OOOOD

)
> (VL TV TV LV IV LV TV TV, T SV TV TV VLIV TV TV VL TV YA X 282
(=] NNO OO VNN
S B BRI
= OO N O W

VIV, ]

020454
2 656
2
V4
2
2
2
2
2
2
2
2
2
2
4
2
2
2
2
2
2
2
2
2
2
2
2

(U RV TV LV, LV
~

MACRO M1113

ADDRESS REGISTER TEST

o
o

TEST

TESTS

[elelelalotolololololelelotlololololololololololot
o L)

HARDWARE

PC,LO0P

#1,CHAN

1SRX,BAD

14.BAD
14, 600D

LE502,ERRSO1

JWALT

A LITTLE

INTO DOR 2---=---===cc-

(ULPAIBITS SET
N,NDAC
,LPAS,
sATN,AT
sBRANCH [F YES
JSET UP DATA FOR ERRUR MESSAGE
;ERROR HANDLER

06-SEP-B2 16:46

ISTER TEST OF

CMANNEL 1

SEQ 89

PAGE 48-6

TRAP

ENDSEG

10005$:

(N NN
NN NN N
NONSNNSNNNNY

BGNSEG
BIS

MOV
Mov8

JSR
8lC

MoV
MOV

cMP
8taQ
MOV

#10,9CSRX
#2,(HAN
MTA1,3]DRKHX
PC,LOOP

#10,aCSRx

002434

)
=2
N —

Vi~
SO

=O-—=
OO

8IS

T
ERRSOF

b YNNI
W

161054

CMP
BNE
JMP
BIC
MOV

BIS

CDAT3,G00D

621,£602,ERRSO1

JSR

g \N
-

NSO

—_\)
b

OWwWO

- O =
oo

($BSEG

;====L0AD MTA1 INT0O DOR 2-ecccmecccccex
JWAIT A LITTLE
sSELECT CHANNEL 1
JGET JSR1 CONTENTS

;BRANCH |F YcS
:SET UP DATA FOR ERROR MESSAGE
:ERROR MANDLER

BIIS

SET

TRAP

T
CSERSOF

TRAP

CsCLP

621
.WORD
WORD
ESO2
ERRSO1
.WORD
;BRANCH TO BGNSEG WHEN ERRLOOP S SET
#10,3CSRX
#2 ,CHAN

sSELECT CHANNEL 2
:LOAD CHANNEL NUMBER
Pmemee LOAD UNT INTD DOR 2---=====cceooae

PC,LOOP

PWAIT A LITTLE

#1,CHAN
a1SRX,BAD
CDAT1.BAD

ILOAD CHANNEL NUMBER

622.€502,ERRSO1

*ERROR HANDLER

248
CDAT1,G00D

SSELECT CHANNEL 1

:GET ISR1 CONTENTS

*ATN,ATN,NDAC, (ULPA)BITS
:BRANCH IF YES

#36,0PA1

25%

TavP6
#10,3CSRX

pPA1,RY

#10,8CSRX
#2,CHAN
MLAT,3]DRHX
PC.LOOP

SHOULD BE

SET

:SET UP DATA FOR ERROR MESSAGES
TRAP

10006%:

BGNSEG

MOV
Move

TRAP

:ATN,ATN,TADS ,NDAC,TPAS, (ULPA)

168

MOvVB

8IS

C$ESEG

;GET C(HANNEL NUMBER

ENDSEG

002312

TRAP

CDAT3.BAD

#10,3CSRx

OCONES
noSsN

002500

620
ES502
ERR501

:LOAD CHANNEL NUMBER

alSRX,BAD

0157, 310RHX

NININY
b
VAN
—

161106

002434

OO
=
OOO0OO0r

000010
000002
000137
011060
000010
000001

JSELECT CHANNEL ¢

(SERSOFT

.WORD
.WORD
.WORD

#1,CHAN

(xLOOP

QSN
NNO'N

WWOWWWNWNWNG
NNNNNNNNNNGO

OV
NNNN

T
ERRSOF

OO OONOOOOCONOO
S OONOOSOSNONOOO M NOCONONSO
O OCONOO M NNOONON

VNV S NN J b = OOONNNNNNNOY
B BANNN) bt 2 22 O QOO NNNNYN COWVEBWWNI==2000~N"
QO N NNNN OO wn
~
~

RO M1113

TNNNNE

(79X V]
w

= ) el

e e

D e e

D i e i

D e

D D e

D >} d ed ) d b

2 DO OOOOO

b b b ed e e ek b ek b it S O OO O OO OO0 O0OOOOOOOONNNNNNY

) =
—

) el e

Bl e

) ad

S -l

D D i

AORLALNLAI NI AINININININININININY b b b b e

[eleleleloleleloleloelolelele] (slelelalolelolelelololaleleloclelolelelolelalaleloloclalololaloalalelelclalolelalolalalel
AURNLRNLRNLALALNLNINLNL PV[ASTNT TN TN NN 18 LS LS L) ~N ST NT TN T T T NT TN N LNT ST NN ST NS LN LT ST NN ST T ST N

HARDWARE
TEST 6:

622
ES502
ERRS501

TRAP

CSESEG

:1S LAST DPA1 ADDRESS EXECUTED
:BRANCH IF
:BRANCH IF

T
CSERSOF

WORD
.WORD
.WORD

NO
YES

sSELECT CHANNEL 1

;GET DPAY

JSET EDPA BIT
;===-<L0AD DPA1 £ EDPA BIT [NTO ADR 1===--

;SELECT CHANNEL 2

TRAP

($BSEG

:LOAD CHANNEL NUMBER
i==<<LOAD MLA1 [NTO DOR 2========-=-=--SWALT A LITTLE

0 —

000010
000001

160746

002444

CHANNEL

JSELECT CHANNEL 1

BIC

00
00
00

JLOAD CHANNEL NUMBER

MoV
MOV

:GET ISR CONTENTS

(MP
BEQ

002444

JATN,ATN,LADS ,NDAC,LPAS,(ULPA)

:BRANCH IFf YES
JSET UP DATA FOR ERROR MESSAGES
JERROR HANDLER

MOV

T
ERRSOF

OO0~
OO0O00

NWN
—=~NW
NSO
A%l

JSR
8IC

#10,3CSRX

MOV
cMP

8tQ

(=)
o

[=)]
(=)
N

MOV

ERRSOFT

160630
002374

BIS
Mov8

002312

13%:

COPCY:

;SELECT CHANNEL 2

CSERSOFT

.WORD
.WORD
.WORD

623
ESQ2
ERRS01

TRAP

C$CLP

PC,LOOP

:LOAD (HANNEL NUMBER
;====LOAD UNL INTO DOR 2-===-=cccccccceJWAIT A LITTLE

#1,CHAN

sLOAD CHANNEL NUMBER

CDAT1.BAD
12%
CDAT1,G0OD

sATN,ATN
NDAC, (ULPA)BITS SHOULD BE
;BRANCH IF YES

#7%,31DRHX
alSRX,BAD

626 ,E502,ERRSO1

sSELECT CHANNEL 1

sGET ISR1 CONTENTS

TRAP

10007$:
#10,3CSRX
#2,CHAN

sSELECT CHANNEL 2
:LOAD CHANNEL NUMBER
sGET MY LISTENER ADDRESS
:1S DPA 0DD
;BRANCH IF

#1,CDAT
#1.CDAT?
#1,CDATY
#1.CDAT4
#1.CDATS

442

R1
#1,C0ATY
#1.CDAT?

SET

:SET UP DATA FOR ERROR MESSAGES

sERROR HANDLER

ENDSEG

OO
OM
MDD —
G s bt 5t 2 s T 2X) Gt St St St b P

000010

SET

;BRANCH TO BGNSEG WHEN ERRLOOP ]S SET
#10,3CSRX
#2,CHAN

81S

mMove

AN
QONO
OSSN

QOO
=
—O—
[elelolc JNe Jole
DNNO
OO

40%:

BIT

TRAP

(xLoop

o0 O—=
OO0O0O0O0O0O—~OO—=
(== OO
=ON==LO==N0O
W= 8
W= NSNS NININIES
~N S - &
NENNNNNNNNEGS
oro WV
WO WWWINWNWNG
N~NO NONNSNNNNNNNNO

OO00O0O0- OO00O0O0O0=00~00—
OO0O~O0O—=

W = =
Y
=T DIV To BN o F 0¥ 28 o F o O TMNVNIWVWVINVWVNIOO
W = AN
B
VSO
ES
PrURNUNNDW Q1 NVINVMNINI
NNNNNWES
NNNSNSNNVO
NN NN S
NN
NN S
N WO WNO
WNWNNWNGD
WA ONINUNNINWWNO
NN
NNNNNNE
NNNNN
- O NN NNN = =d N =

e Tl
NP

SEa 90

PAGE 48-7

EOCEETOD
O
NO O+

—

m3zx

—D

VI
Mp
O

WN=NNNINY)
NEANSNSNSN
WW=WWWWSN
NONNNY

TE ST 0 F

(NN
NS
OV
NONSNN

OO00O0O0O
—~ON—==H

06 =SEP-82 16:46

12%:

[@L,¥T
L,SF Yo W o F

N AN NN R AN NN N N NN N

=2 O N NO NN B S S NN WWNNIN
=0 NN M
OO N ESMNNANIN)
=4 = O NN N(e XV IV P W W
AN NN NIND —t
wwn
OSSO ONSANONOCONOOOO ST NOONONSCOSCONOOO T NNOONON SO
WA
= =2 0O NN

—

b o

e cmd

b o

b e o

D e

LS S5 BN B SN SN 85 55 85 285 £ 5 5 8
5 5 5 £ £
[o Yo To o Yo SV LV 10,] AL VAV

AL A NV A NIAI NN NI NINI NI NININI FININIAININIANINNINININD . O —
AUNIRININININLNLRLNLNL
N ANAONINLNUAIALNIAINININININININIAL

[elelelelslolelelelcleclalelaloalalalalelelelelelelelelalolelelololelelelololalololelelolololelelalelelololalalole
el

1 13

T
CSERSOF

WIRD
WIRD
.WORD

624
ESO2
ERR501

TRAP

CSESEG

YES

;CHANCH MLAY 10 0DD
sSET ULPA BIT IN COMPARE DA/A FOR ISR

*BRANCH TO BGNSEG
ICHANGE MLAT

TO EVEN

*CLEAR ULPA BIT IN COMPARE DATA FOR ISR

#1,(DAT3
#1,CDATS

#1,CDATS
TRAP

($BSEG

#10,3CSRX
#2,CHAN
R1.3]DRHX

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
;====L0AD NEW MLA1 INTO DOR 2==e======--

#10,3CSRx

sSELECT CHANNEL 1
:LOAD CHANNEL NUMBER

PC,LOOP

#1,CHAN

SWAIT A LITTLE

MOV

sGET [SR1 CONTENTS

0024446

MOV

sBRANCH [F VYES
sSET UP DATA FOR ERROR MESSAGES

(mp
BEQ

mMove

JSR
8IC

000001

002434
002436

#7%.31DRHX

fmeeee LOAD UNL

SWAIT A LITTLE

C$CLPY

SHOULD BE

TRAP

ENDSEG

TRAP

SET UP DATA FOR ERROR MESSAGES
ERROR HANDLER

T
ERRSOF

—

T
CSERSOF

INTO DOR 2-=-===cocccee

:ATN,ATN,NDAC, (ULPA)BIT
:BRANCH IF YES

MOV

17%:

;SELECT CHANNEL 2
:LOAD CHANNEL NUMBER

SSELECT CHANNEL 1
:LOAD CHANNEL NUMBER
:GET ISR1 CONTENTS

cMp

Y 00

002434
002436
002440
002442
002444

#10,3CSRX
#2 ,CHAN

BEQ

NNV NUVEO —

000001
000001
000001
000001
000001

TRAP

625
WORD
.WORD
E502
ERR501
.WORD
:BRANCH TO BGNSEG WHEN ERRLOOP IS SET

MOV
MOV

ridalalnlals]

002312

MoV

NONNNNNNNNE
WS

000091

BIS

oo oo
dm

OSSO

002500

40%:

C d= bt bmg b Bt ) 0t St G2t St S

NN
NN

002434

—=0O-—
OO
OO

OO0
—
OO0
NONO
VAN
OONWN
NSO

)

NNNNNNNNNNNO
NV

NNNNNESNNNNNES
NS
WNNNLNAN
= NN NN WO

POMNNININIONIMNINININD
=P S~

AN =2 A NN BN £
NS NNNTNNINI
NN &
AN =2 NN
N W NN N O
— B
==L
OV

NN &»
Sroroesro CONOOMNI

e e

e o

b eo

~ NNOOWVMES HWNOINN=2000 ~

b e

[elolelelolalelelolelelolelelole)]

ONLNLNINLRLNINLALNY NN
N1 NN,
[ASLANLNT
ST, N1, N 1,8 LS 1N 1N ) LSLNT,

=
OV NIWVNH
W
=

NUINIAY) =D e b e ecd o o b

ANANAUNNAN
NN NN
NNNNNNNNNNN

-—

N
N

3709 022066
3710

[eleleleleleletoleBNolelelelelolelolalaelelele
]
=OMN=2asfO==NO
NS
ONVNVVVIOWO

3701 022012
3702 022020
3703 022026

sERROR HANDLER

ckLoorp

12%:

o(=] O

021772
3698 021774
3699 022002
3700 022004

sATN,ATN,LADS
,NDAC, (ULPA) ,LPAS BITS SET

ERRSOFT

3697 021772
021772

SEQ 91

PAGE 48-8

002444

O=000000
(el
dlollelole
NOOO =000
S NOOO0O0O0O0
W=O =0rNO —
H
=200 NNO

3686
3687
3688
3689
3690
3691
3692
3693
3694
3695
3696

EL 1

OO0
=
OO0
W
=28
NS
OOV
PNINNIN

3685

16:46

1DVX
M
O
—D
N0

OO0O0O0
—ON=
W= NN
NESANNY
WW=biWW
NONN

021662
021664
021666
021670
021672
021672
021674
021702
021710
021716
021722
021730
021736
021744
021752
021754
021762
021762
021764
021766
021770

021662

OO0O0O0O0O0O—O0O0~
=ON=L
OO0
(NS NSNNIN
S NINNIES
NENNNNNNNNES
WOWWWNWNWNGOG
NNNNNNNSNSNNO

3680 021636
3681 021644
021652
021654

OO0
O000
NN =S
NS
OSSO0V
ON—=NY

HARDWARE TESTS
TEST 6: ADDRESS

10010%:

#1,0PA1

17$

#1,CDATY
#1,CDAT?2
#1,(DAT3
#1,CDATS
#1,CDATS

. +40

;1S DPA EVEN

SET

CSERSOF
T

.WORD
LWORD
.WORD

626
ESO?
ERR501

TRAP

CSESEG

sBRANCH [F YES
sSET ULPA BIT IN COMPARE DATA FOR

ISR

*BRANCH TO BGNSEG

#1,C0ATY
#1,CDAT2
#1,CDAT3
#1.CDAT4
#1,CDATS

*CLEAR ULPA BIT IN COMPARE DATA FOR ISR

#10,3CSRX
#2,CHAN
MTA1,31DRHX

;SELECT CHANNEL 2
:LOAD CHANNEL NUMBER

TRAP

($BSEG

i====L0AD MTA [NTO DOR 2-======c=cccceSWAIT A LITTLE

ISELECT CHANNEL 1
:LOAD CHANNEL NUMBER
:GET ISR1 CONTENTS

ATN,ATN,TADS
,NDAC, TPAS, (ULPA) BIT

002440

:BRANCH If VES
:SET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

.WORD

SET

T
(SERSOF

627

005447
003702
104406

000010
000002

004737
042777
012737

011060
000010
000001
160006
002434

017737
023737
001407

013737

000137

002434

160066
002374

168:

160050

002502
002502

BIS
MOV

;SELECT CHANNEL 2

JSR
BIC
MOV

JWALT A LITTLE

268:
]

000001

002434

BIS

052737
050737
052737

000001
000001
000001

002440
002442
002444

BIS
BIS
BIS

000420
105301

042737
042737
042737
042737
042737

002434
002436
440
002442
002444

052777
012737

000010
000002

157632
002374

004737
042777
012737
017737
023737
001410
013737

011060
000010
000001
157552
002440

157606
002374
002502
002502

002440

002500

104457

001165
005447
003702

157616

INCB

002436

000001
000001
000001
000001
000001

110177

BIS
MoV
MOV
BIT
BNE

002312

BIS

25$:

DE(B

BIC
BIC
BIC
BIC
BIC

BGNSEG

BIS
MOV
COPD1:

UNT

MOVB

TRAP

CSCLPt

INTO

DOR

2 .................

JATN,ATN
_NDAC, (ULPA)SHOULD BE

SET

;BRANCH ]F YES
JSET UP DATA FOR ERROR MESSAGES
;ERROR HANDLER
TRAP

ENDSEG

052737

000001

157766
002374

€502

JSELECT CHANNEL 1
JLOAD CHANNEL NUMBER
JGET ISRT CONTENTS

T
ERRSOF

000010
000002
002414
000001

050737

.'““LOAD

MoV

052777
012737
013701
032737
001021
105201

JLOAD C(HANNEL NUMBER

MOV
(MP
BEQ

002500

.WORD

ERRSO1
.WORD
JBRANCH TO BGNSEG WHEN ERRLOOP IS SET

MOV

160040
002374

106457
0C1164
005447
003702
104405

SEQ 92

48-9

(KLOOP

052777
012737
112777

PAGE

10011$:
#10,3CSRX
#2,CHAN
MTAT R
#1,0PA1

25§

R1
#1,CDATY
#1,CDAT?

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER

CSERSOFT

.WORD
LWORD
.WORD

628
€502
ERRSO1

TRAP

CSESEG

sGET TALKER ADDRESS

;1S DPA1 0DD

:BRANCH [F YES
s CHANGE MTA1 TO 0ODD

sSET ULPA BIT [N COMPARE DATA FOR [SR

#1.(DAT3
#1,CDATL

#1,CDATS

L +42

‘BRANCH TO BGNSEG

#10,9CSRX
#2,CHAN
R1,81DRHX

:SELECT CMANNEL 2
‘LOAD CHANNEL NUMBER

R1
#1,CDATY
#1.CDAT?
#1,CDAT3
#1,CDATL
#1.CDATS

JSR
BIC
MOV
MOV
(MP
BEQ
CDAT3,GOOD
MOV
1 6296502, ERRSO1
ERRSOF

SCHANGE MTA1 TO EVEN
‘CLEAR ULPA BIT IN COMMPARE DATA FOR ISR

TRAP

($BSEG

1ce==LOAD NEW MTA [NTO DOR 2-=====cce=‘WAIT A LITTLE
SSELECT CHANNEL 1
‘LOAD CHANNEL NUMBER
PGET ISR1 CONTENTS
,NDAC, (ULPA),TPAS BIT SET
*ATN,ATN,TADS

‘BRANCH 1f YES

‘SET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP

WORD
.WORD
.WORD

T
CSERSOF

629
E502
ERRS01

—~X

YL LN,V NI N1, ST, N1, N1 T W VT, ST VT ST N1, T VT VY ST, T VT, ST, ST ST VT ST ST VT VT ST, ST N T T ST VTN B o o
B B LN N NN U N U AN U AN N N N AN N NN RO AU PO NV A AUNL PO NI AU NN
N —
DN
QO NNV
WHNWNWAIN 2 OO00OOONNNNOIOOWNME
S WNOIN=2O000ON
M
OO OONSOSNIONSNININOO
NSNS ONOONSNING[o NV, IV}

O —

NN AR A AN AU AL NI N ND

MACRO M1113
06-SEP=B2 16:46
REGISTER TEST OF LMANNEL 1

104404

WA
= = OO~
OSSOSO

NN NN
N N AN NN
N~ NNNNNNNNN

W NN N N U A U AN AN N AN AN AN N N AN N
OSNSNSNNSNSNNNNNNNNNNSNSNNN

lo Yo 38 Yo Yo JVICIVAVAVIRVS IVNN
IV IV= VT
2P 2R 2R aF NN
28 0¥ —=2O
2 31V 1V [VN
VY]
abwl\)—.ccm\lfl-m
OO28 20 NV

AMANNWNNNIN NN
DW=
O OO~

AIRLALALNINLINI AL AN AN AINI NI R RIND AL ALY NI AU AR

TEST

[elelelelolalalelalelelalolalolololololololelaleloelelelalolalololololele
o]

HARDWARE

MACRO M1113

06-SEP-B82 16:46
OF

(MANNEL

16%:

#1587, 310RHX

tececl 0AD UNT INTO DOR 2e=ceccmceccccccs

ERRSOFT

CHMANNEL

‘WAIT A LITTLE

#1,CHAN

‘LOAD

248

MOV

;LOAD

P(.LOOP

1SR, BAD
(DATY ,BAD

(Mp
BEQ

002500

,(HAN

#10,aCSRX

MOV
MOV

002234

24%:

ENDSEG

TQVP6:

1S7

CDAT1,G0OD

630,€502,ERRSO1

NUMBER

SSELECT CHANNEL 1
CHANNEL

NUMBER

SGET ISR1 CONTENTS
sATN,ATN,NDAC,
(ULPA) SHOULD BE
‘BRANCH

YES

SET

‘SET UP DATA FOR ERROR MESSAGES

‘ERROR HANDLER

TRAP

002406

N —

002314

mMovae
mMove

MOovB
JMP

[TRCNT

YIS THIS THE FIRST

TIME

‘BRANCH IF NO

#37,DPA1

SALL DONE

#10,3CSRX

SSELECT CHANNEL 2

PC,WALT

17,31 CRHX
#10,3CSRX

~ —¢

== N

ERRSO1
(SESEG

TEST

$1S DPA1 = DPA?

- INCREMENT DPA1
‘BRANCH [F

YES

i===<LOAD SIC INTO ACR 2
SWAIT A LITTLE

te===LOAD NOT SIC INTO ACR 2
SSELECT CHANNEL 1

:LOAD NEW DPA1 INTO ADR!?

§2§A.DPA1

*RESTOR ENTERED DPA1

"REPEAT THE TEST WITH THE MEW DPA1
TRAP

CSEXIT

L10033-.

BEX

égizzaaooasss REGISTER TEST (ICR) OF CHANNEL 1IN/

NGE

TSHD6:

062

630
E502

TIME PASS

MORD

123

(SERSOFT

THROUGH THE

oPAf, a1 IRHX
Al

EXIT

*BRANCH IF NO
*SAVL ENTERED DPA?

‘CLR DPA!
SSET FLAG TO SEE FIRST
SGET NEW DPA1

#217,31CRHX

MOV

S1F YES EXIT TEST

DPAY
1TRCNT
DPA1

BIC

PORD

TRAP
;1S QUICK VERIFY PASS SELECTED

OPA1

JSR

1%
EXQve:

QvP

DPA1,DPA2

O L oemNnr
— TV
Y e

017
002

CLR
INF
Ir
cMp
BNE
INC
cMP
BEQ
8IS

OO NNINO

2%:

10012%:

1%
DPA1,SDPA

MOV

1%:

.WORD

EXQV6

BNE
ST
BNE

CON) =t

WD
N N NN N SN N S

MOovB

(S$CLPI

;SELECT

MOV

CHANNEL

TRAP

#10,3(SRX

MORD
WORD

N NN N NN NN
NN

WO WNNIN SN NOND =2 MO

= LN NN

N =

2 LN S

N=2NNNNNNSNMNVONNINONONO
NS
W
N N NN N NN NN O WA
NN O WWWWN O

:BRANCH TO BGNSEG WHEN ERRLOOP IS SET

BIS

JSR
BIC

rorOSOD

ONONON
NN
[V I
IV RV VIV]
OONO
—~NW

=0
WVOwn
QOO
—
QOOWM

[P
lelelalalals]
OWVOO—-0Q00
NINOO 2000
85800000
WO
= MmO —
SNV OONNNO

002434

OB
O W

104601

PAGE 48-10
(xLOOP

OO
=
OO0

OO0O=O—O—~=20000QO0O0O0O0O0OOOO
=
=O=mpP=20=-2NONOONOOO=OO0000

045

023060
023060
023060

TEST

WD
= 85
A=
Ss
CIEOWVN
MNINONN

ANOWANNNWN NN
NN NNNNNNNNO

N =L NPON) BNV
B
NESSNSNNSNSNSNNNNS

OCOO0O0O0O0O—-0O00O0
=
—ON=2LO—2—2DN0

O=
OO

L
M—

SNNNNNNNNNSNNNSNNY[o Yo X XoJo Lo Yo Te To o No To Yo N To Yo Jo To Jo Yo To Vol ol ah it dondt S
ES S NN N N NN
NN = = O O N
OB LN
D LWNIN =2 200 NN O
~ NNOOWVNE
OO OCOITNNL/OSTONOSTNOESSNO
SO
OO
ONSOSES
(o X
¥ e QNP e

O —

NI NI NLRIAIAI NN NI NI NN NPV RIAINIAUNIND NN
AN IAS A ANOAVLAIAIALNINININALNINIAIALNININI

3766

lelololelalelolalelololololelalolelolelolalololalolalalololalalalelololelolololololelele]

HARDWARE
TEST 6

L10033:

TRAP

(SET1ST

HARDWARE TESTS
MACRO M1113
06-SEP-82 16:46
TEST 7: ADDRESS REGISTER TEST OF CHANNEL 2

3808

SEQ 94

PAGE 49

LSBTTL

TEST 7: ADDRESS REGISTER TEST OF CHANNEL 2

3809

".'Q".""""'"""""'0'""'""'Q'Q"'""'""""""""""'0"

gg}?

IHlS TEST

3812
1813
1814
1815
gg}g

panr 1 CHECKS THE CORRECT FUNCTION OF ADDRESS REGISTER 2 (ADR) BY
:
LOADING ITS DEVICE PRIMARY ADDRESS INTO BIT AT-AS AND RECEIVING
;
THE ASSIGNED LISTEN OR TALK ADDRESS VIA TH
5 1EC/IEEE BUS
INOTE:
THE ULPA BIT IN THE [SR2 REGISTER 1S DEPENDENT ON THE STATUS Of
:
DPA2 (ODD DPA2 => ULPA IS SET)

3818
3819
3820
3821
3802
3803

‘PART 2 cuecxs I HE rvncrnou OF THE DAT BIT (DISABLES THE TALK FUNCTION),
;
THE DAL BIT .DISABLES THE LISTEN FUNCTION) AND THE EDPA BIT
:
(ENABLES TH" DUAL PRIMARY ADDRESSING MODE), WHICH ARE ALSO
PRESENT IN THE
ADR2 REGISTER
S1F THE QUICK VERIFY PASS IS NOT SELECTED, THE TEST ITERATION
SWILL DO IT W TH DIFFERENT DPA'S.

382‘

'-t"".-

3825 023062
023062
3826 023062
3827 023066
3828 023070
023070
023076
023100
023102
023104
3879 023110
3830 023114
3831 023120
3832 0231264

005737
001410

002324

012746
012746
010600
104417
062706
005037
004737
004737
013701

027334
000001
000004
002322
010220
010534
00231¢

3834 023136
3835 023140

010137
032737

002412
000001

002314

052737

000001

052737

000001

3833 023130

3836 023146

3837 023150

3838 023156
3839 023164
3840 023172

3841 023200
3842 023206
3843 023210
3844
3845
3846
3847
3848

023216
0232264
023232
023240
023246
023246

062701

001420

052737
052737
052737
000417
042737

042737
042737
042737
042737

000001
000001
000001

004737

011060

3855 023312
3856 023314

001413
012737

113777

017737
02273

013737

002436

CLR
JSR
JSR
MOV
ADD
MOV
BIT
BEQ
BIS

[TRCNT
PCLCULTA
PC.BuINT
DPA2.R1
#40,R1
R1,MLA2
#1.DPA2
3g
#1,CDATH

002442

BIS

#1.CDATS

7%
A2:

002436
002440

002612

002436
002440
002442
002444

157004

156746
000020

002402
002402

000020

002500

002402

BIS
BIS

002444

157022
002374

3852 023272

ERE SRR NN |

17::
;1S THE PNT FLAG SET
YIF YES. PRINT THE TEST HEADER
..
MOV
NTSHD7,=(SP)
MOV
#1,-(SP)
MOV
SP,RO
TRAP
CSPNTF
ADD
#,SP
:CLEAR ITERATION COUNTER
*CLEAR ULPA BIT IN ISR 1 AND 2
$SET UP PARAMETER
:GET DPA2 ADDRESS
;CREATE MY LISTENER ADDRESS (MLA)
SSTORE MLA
*1S DPA EVEN
‘BRANCH [F YES
‘SET ULPA BIT IN COMPARE DATA FOR ISR

002434

000001
000001
000001
000001

XSS

PNTF
7%
#TSHD?

000001

000010
000001

3857 023322

XA XXX AR AZAAERRARAR AR ARZERZEE AR

IS CHANGED

£31
BEQ
PRINTF

000040

104404
042777
012737

3853 023276
385¢ 023304

TEST AS TEST 6 EXCEPT THE CHANNEL

BGNTST

3849 023250
3850 023256

3851 023264

1S THE SAME

002502

3$:

BIS
BR
BIC

BIC
BIC
BIC
BIC
BGNSEG

BIC
MOV

¢1.CDAT2
#1.CDAT3
#1,COATS
.+40
#1,C0AT)

#1,CDAT
#1.CDAT
#1.(DATS
#1.CDATS

TRAP

PC,LO0P

SWAIT A LITTLE

020 600D

‘BRANCH IF YES
*SET UP DATA FOR ERRUR MESSAGES

MOV
(MP

aliRX,RSAVE
320 RSAVE

MOV

.
.
teen
;

sSELECT CHANNEL 1
*LOAD CHANNEL NUMBER

MLAZ,alDRHX

BEQ
MOV

e
*BRANCH TO BGNSEG
SCLEAR ULPA BIT [N COMPARE DATA FOR ISR

#10,3CSRX
#1,CHAN

MOVB
JSR

[
[P

RSAVE ,BAD

($BSEG

SLOAD LISTENER ADDRESS OF CHANNEL 1
TGET 1IRT CONTENTS
‘1S BO BIT OF [IR1 SET

Teee

MARDWARE TESTS
MACRO M1113
06=-SEP=82 16:46
TEST 7: ADDRESS REGISTER TEST OF CMANNEL 2

3858 023330
023330
023332
02333¢
023336
1859 023340
023340
3860 023342
3861 023342
3862 023350
3863 023356
3864 023360
3865 023366

3866 023374

023374
023376
023400
023402
3867 023404
023404
3868 023406
3869 023414

002401

002402

012737
013737

002401
002402

002500
002502

023520
023522
023524
023506
3883 023530

104457
001300
005447
003702

3882 023520

106406
017737
023737
001413
013737
013737

023530
3884 023532
3885 023540

106406
042777
012737

3887
3888
3889
3890
3891
3892

023556
023560
023566
023574
023576
023604

004737
017737
022737
001413
012737
013737

023612

104447

31886 023546

3893 023612

10$:

112777

MOV
CMP
8EQ
MOV
MOV

156622

002402

BIS
MOV

#10,aCSRX
#2.CHAN

TRAP
(SERSOFT
WORD
702
-WORD
ESO2
.WORD
ERRSQ!
;BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
($CLPY
;SELECT CHANNEL 2
‘LOAD CHANNEL NUMBER

(MP

#2401 _RSAVE

TMA_MAC,IFC BiT

MOV

BEOQ

MOV
MOV

alIRX,RSAVE

308

#2401,600D
RSAVE BAD

ERRSOFT 703,6501,ERRS01

(KLOOP
156564
002444

002402
002402

002444
002402

002500
002502

30%:

MOV
CMP
BEO
MOV
MOV

ISRX,RSAVE
(DATS,RSAVE
40%
(DATS,GOOD
RSAVE . BAD

ERRSOFT 704 ,E502,ERRSO1

CKLOOP

000010
000001

000077

156540
002374

156522

011060
156464
000020

002402
002402

000020
002402

002500
002502

40%:

TRAP
(SERSOFT
.WORD
701
-WORD
ESO1
.WORD
ERRSO?
:BRANCH TO BGNSEG WHEN ERROR LOOP IS SET
TRAP
(S$CLPI
:GET ISRT CONTENTS
TATN,ATN,NDAC BIT OF ISR1 SHOULD BE SET
:BRANCH [F YES
SSET UP DATA FOR ERROR MESSAGES
..

ERRSOFT 702,€502,ERR501

20%:

;ERROR HANDLER

S1SRX,RSAVE
#120040,RSAVE
208
#120040,6000
RSAVE ,BAD

(KLOOP

022737

104457
001277
005406
003702

3877
3878
1879
3880
3881

002500
002502

156664
002374

023454
023456
023460
023462
023464
023464
023466
023474
023502
023504
023512

3876

120040
002402

000010
000002

001413

1875 023454

002402
002402

104406
052777
012737

3872 023436

3873 023440
3874 023446

156710
1200640

104457
001276
005647
003702

017737

3871 023430

(KLOOP

104406

3870 023422

SEQ 95

49-1

ERRSOFT 701,E501,ERRSO1

104457
001275
005406
003702

017737
022737
0014613
012737
013737

PAGE

TERROR MAND_ER

SGET

I1IR2

CONTENTS

‘BRANCH 1F YES

IN IIR2 SHOULD BE

SSET UP DATA FOR ERROR MESSAGES
..

‘ERROR HANDLER

TRAP
CSERSOFT
.WORD
703
.WORD
ESO1
.WORD
ERRSOQ?
:BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
CSCLPY
;GET ISP2 CONTENTS
SATN,ATN,LADS,NDAC,LPAS,
(ULPA) BIT SET
‘BRANCH 1F YES
“SET UP DATA FOR ERROR MESSAGES
..

:ERROR HANDLER

TRAP
.MORD
.WORD
-WORD
:BRANCH TO BGNSEG WHEN ERRLOOP

TRAP

BIC
MOV

#10,
3CSRX
#1,CHAN

;SELECT CHANNEL 1
*LOAD CHANNEL NUMBER

JSR
MOV
CMP
BEQ
MOV
MOV

PC,LOOP
31 IRX,RSAVE
#20,RSAVE
50%
#20,6000
RSAVE ,BAD

‘WAIT A LITTLE
SGET IIRT CONTENTS
:CHECK BO BIT IN TIR?
‘BRANCH [F YES
SSET UP DATA FOR ERROR MESSAGES
..

MOVB

#77.31DRHX

ERRSOFT 705,E501,ERR501

SET

(SERSOFT
704
ESO?
ERRSO!
1S SET

($CLPI

:LOAD UNL INTO DOR

*ERROR HANDLER

TRAP

(SLRSOFY

705
ESOI
ERRSO?
.WORD
:BRANCH TO BGNSEG WHEN ERRLOOP IS SET

[2
2]V
"]

—

Laalds

—D

D -

.WORD
.WORD

OO0

SEQ 96

PAGE 49-?2

OO
—

06=-SEP=8B2 16:46
ST OF C(HANNEL 2

NNWSNNO

NNSENNES

WWWWWO

(xLOOP
MOV

(MP
BEQ

MOV
MOV

ERRSOFT

RX,RSAVE
ISRX
:12 0040,RSAVE

c 2ooao 600D
RSAVE
,BAD
S

706, eéoz ERRSO1

:GET

ISR1

CONTENS

SATN,ATN_NDAC BIT

*BRANCH

RAP

ISR1

OO0
OO0CO
OO
OOoOOwWwm
oY
OO
(U IV
Y o 2d Y. F o
OO
OO~NO
O
oSN

NNWNNNNO

WW=HAWWNG

MOV
MOV

T
ERRSOF

*ERROR HANDLER

TRAP

156302

002434

002402

002402
002402

11%:

002500
002502

MOV

CMP
BEQ

MOV
MOV

ERRSOFT

OB OW

12%:

024042
024046
024046
024046
024050
024050
024052

ENDSEG

104405
1046404
113777

156216

MOvB

CsCLP!

SMAC BIT IN IIR2 SHOULD BE SET
*BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGES

11§

., cooo
RSAVE

707, 5601 ERRSO1

:ERROR HANDLER

TRAP

T
CSERSOF

TRAP

CsCLP

707
.WORD
501
.WURD
ERRSO1
.WORD
sBRANCH TO BGNSEG WHEN ERRLOOP IS SET
dISRX,RSAVE
(DAT1,RSAVE
12%

CDA
11 cooo

708,5502 ERRSO1

RSAV

sGET

ISR2 CONTENTS

SATN,ATN,NDAC, (ULPA) BIT

:BRANCH iF YES

#10,a(SRX
#1,CHAN

DPA2,R1
#100,R1

R1,MTA2

'ERROR HANPLER

TRAP

SET

T
($ERSOF

-WORD
.WORD
.WORD

708
ES02
ERRSO1

TRAP

(SESEG

TRAP

($BSEG

TRAP

(SESEG

TRAP

(3850

JSELECT CHANNEL 1
LOAD CHANNEL NUMBER
LOAD DPA2 IN R1
(REA'E MY TALKER ADDRESS (MTA)
:SAVE MTA

10001%:

MTAZ ,@1DRHX

SHOULD BE

:SET UP DATA FOR ERROR MESSAGES

10000$%:

BGNSEG
002416

TRAP

JGET JIR2 CONTENTS

BGNSEG
MOV
MOV
ADD
MOV

706
ESO2
ERRSO!

#1,RSAVE

1 IRX,RSAVE

ENDSEG

81C

(SERSOFT

.WORD
.WORD
.WORD

JSELECT CHANNEL 2
;LOAD CHANNEL NUMBER

(KLOOP

002434

SET

:SET UP DATA FOR EXROR MESSAGES

#10,3CSRX
#2,(HAN

NSNS

OCOOWV

NSNS

NNUUINNOY

WW=WWO

MOV
MOV

BEQ

NONEN

WA
= B
NEWE

8IS
CMP

000001
002402

60%:

SHOULD BE

;BRANCH TO BGNSEG WHEN ERRLOOP [S SET

(kLoop

000010
000002
156340
000001

C(sCLPY

YES

RUNMNSN

mMpP
O
OO0
=

OO0

——-0ON—=0O
W= NINES

OO0O00O0—=

OO000
W=
N

OO00—

==ON—==VD
NN = PONNINIE
NN
NNNNES

O0O0O0O0O0O=

oo O—=
CcOo OO
WB
b
N =o
LIV RV
RN R o

O0O0O00O Y

U
SO

ONONSNNONES

O OO NN
B SN NRURONUN)
— -—b
~

(=]

COO—=
OCOO0O

3913
3914
3915
31916

wwwuwwwwvtwwuwwwwgwwuwwwwwwwwwwwww
ooooocororOrOrOrOCCONON o

3911
3912

AINUNVALNL NNV AN NI AL NI AU NI

3910

[e]lelelelelelalelolalelolalolololalelolelololololololelololelolela) o

RN AL A A AL NI AL AV NI AV NI AL NI AUANUNU NI N ~N

HARDWARE TEST
TEST 7: ADDRE

:LOAD TALKER ADDR. INTO DOR

06-SEP=82 16:46
(MANNEL

JSR

MOV
(mp

5
0250
5
0250

MOV
MOV

0240
4
0240

—

i
D il
e
e
e
i
il o
e
e
i
e
e

ONON NS BN N NNNINONIN) = — — O o
[aS 1SR p¥ o B
e Yo No B oY NlaTe Yo Yol V) (=]

[elolelelolalelolololclolololelols)

AININLNLNLNLNLALN PLNINNININININD
PR AR R o o R AP ol S 2F 2 ¥ 2 ¥ oW o B AP o o o

024060
8 024064
0264072

Sta 97

PAGE 49-3

TESY

TESTS
ADDRESS

HARDWARE

JWAIT A LITTLE

JGET TIRY CONTENTS
;80 BIT IN [IR1 SHOULD BE SET

BEQ

;BRANCH [F

*ERROR MANDLER

T
ERRSOF

(kLooP
13%:

MOV

(MP
BEQ

MOV
MOv

T
ERRSOF

YES

SSET UP DATA FOR ERROR MESSAGES
TRAP

alSR X,RSAVE

8120 040,RSAVE
148
#120040,G00D
RSAVE ,BAD

710.€502,ERRS01

sGET ISRT1 CONTENTS

SATN,ATN,NDAC

sBRANCH IF

YES

BIT

052777

000010
000002
156034

002001

002402

164%:

"ERROR MANDLER

sSELECT CHANNEL 2

15%:

002402

71,6501, ERRSO!

;ERROR HANDLER

WWNWWNWNGDG
NNNNNNO

MOV

CMP
BEQ

T
ERRSOF

,BAD

;LOAD CHANNEL NUMBER
JGET 1IR2 CONTENTS
JMA_MAC

BIT

;BRANCH IF

YES

[IR2

RX,RSAVE

T3,RSAVE

vE,
13°600D

,E502,ERRSO1

CSERSOFT

711
E501
ERRSQ1

;BRANCH TO BGNSEG WHEN ERRLOOP
TRAP

S SET
CsCLP?

sATN,ATN,TADS ,NDAC,TPAS,(ULPA)

BIT

:GET [SR2 CONTENTS

sBRANCH [F YES
sSET UP DATA FOR ERROR MESSAGES

*ERROR HANDLER

TRAP

SET

(SERSOF
T

712

E502
ERRS01
:BRANCH TO BGNSEG WHEN ERRLOOP [S SET
#10,3CSRX
#1 _ (HAN

JSR

PC,LO0P

MOV
(mMp

SET

TRAP

LMWORD
.WORD
.WORD

8IC

MOV
Mova

SHOULD BE

LMWORD
.WORD
.WORD

(xLOOP

16%:

ERRSOFT

MOV
MOV

002440

IS SET

TRAP

;SET UP DATA FOR ERROR MESSAGES

RSAVE

O PN

OO0
——0O
NN —
NN
NN —
NNW

155776
002440

710
ES02
ERRSO1

CMP
BEQ
MOV

MOV
MOV

SET

(SERSOFT

TRAP

#10,a(SRX
#2,(HAN
ol IRX,RSAVE
#2001 ,RSAVE
15%
#2001,G00D

8IS

MOV

OO00—
OO00
NN
— 8
NSNS
O
=W
ONON
OOO=0O0~=
N2 D=
O
PONS OIS
NNNNNNE

3+63

SHOULD BE

JBRANCH TO BGONSEG WHEN ERRLOOP

(kLoop

1962

[SRT

sSET UP DATA FOR ERROR MESSAGES

005406

3958
3959
3960
3961

cscLP1

.WORD

(xLOOP
OOQO—
OOoOoOwm
N1,
N1,]
&S B NO
OO~NN
NSO

104406

3947
3948
3949

3957

TRAP

.WORD
.WORD

OO
OO
oSS B
NN
DO
NO

3942
3943
3944
3945
3946

709
ES01
ERRS501

sBRANCH TO BGNSEG WHEN ERRLOOP IS SET

024164
3961

CSERSOF?T

.WORD
.WORD
.WORD

#1587, 210RHX

al[RX,RSAVE
#20,RSAVE

JSELECT CHANNEL 1
JLOAD CHANNEL NUMBER
JLOAD UNT INTO DOR

SWALT

A LITTLE

TRAP

JGET TIRY CONTENTS
;B0 BIT IN IIRY SHOULD BE SE!

{sLP

HARDWARE

TESTS

MACRO M1113

06-SEP-B2 16:46

TEST 7: ADDRESS REGISTER TEST OF CMANNEL 2
3964 024362
3965 024364
3966 024372

001413
01%737
013737

024400
026402
0246406
026406
3968 024410
026410

104457
00131
005406
003702

1970 026420

022737

3967 024400

3969 024412

104406
017737

2971 026426
3972 024430
3973 024436

001413
012737
013737

3974 024646

02644664
024446

104457
001312

0246452
3975 0244564
0264656
3976 026456
3977 026464
3978 026472
3979 0246500

003702

024450

000020
002402

155640

120040

120040
002402

002602

002402

000001

002500

024524
024526
0264530
024532
3984 024534
026534
3985 024536
3986 026544

104457
001313
005406
003702
104406
017737
023737

155514
002434

002402
002402

3088 024554

013737

06243¢

002500

024570
024572
0245764
024576

106457
001314
005447
003702

024600
024600

104405

001413
013737

3987 024552 001412

3992

21%:

MOV

2iSRX,RSAVE

BEQ
MOV
MOV

22%
0120040 cooo
RSA

CMP

013737

002402

22%:

BIS
MOV
MOV
CMP

‘ERROR HANDLER

BEQ
MOV
MOV

002502

23§
RSAVE

002402

MOV
CMP

BEOQ

nov

21SRX,RSAVE
CDAT1 RSAVE

24$

coar1 cono

248

ERROR HANDLER

RSAV

ENDSEG

10002%:

TRAP
MORD
.WORD
.WORD

(SERSOFT
716
£502
ERRS01

TRAP

(SESEG

(4¢tecceccccccccccncccccctsscnccsssssrcscsc
s sssea s ccacocaseasssancnas

TTHIS PART CHECKS THE "DAL'*,"DAT'',"EDPA'* BITS IN THE ADDRESS REGISTER.

IPART 2 OF THE ADDRESS REGISTER TEST.

155436

MOVB

R1,a1IRmx

110177

(SERSOFT
TRAP
.MORD
715
E501
"WORD
ERRSO1
.WORD
:BRANCH TO BGNSEG WHEN ERRLOOP IS SET
($CLP
TRAP
;GET ISR2 CONTENTS
TATN,ATN,NDAC, (ULPA)BIT SHOULD BE SET
‘BRANCH IF VES
‘SET UP DATA FOR ERROR MESSAGES

snnsorr 716,céoz ERRSO1

002502

€S0°2

"ERROR HANDLER

ERRSOFT 716, 5501 ERRSO1

23%:

CSERSOF T
714

"BRANCH IF YES
YSET UP DATA FOR ERROR MESSAGES
P

I3 cooo

DPA2,R1

052701

TRAP
.MORD

.WORD
ERRSO?
:BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
C$CLPY
SSELECT C(HANNEL 2
‘LOAD CHANNEL NUMBEPR
TGET I1JR2 CONTENTS
‘MAC BIT IN [IRZ SHOULD BE SET

#10,3CSRX
22, CHAN
3l IRX,RSAVE
#1 RSAVE

MOV

5999 024616

‘BRANCH [F VES
PSET UP DATA FOR ERROR MESSAGES
i

ERRSOF T 714.,5502 ERRSO1

§33§
3996 024602 013701 002314
3998 026612

SATN,ATN,NDAC [N ISR1 SHOULD BE SET

CKLOOP

3993

3997 024606

;GET ISR1 CONTENTS

#120040,RSAVE

(KLOOP

012737

3991 024600

TRAP
CS$ERSOFT
.WORD
713
.WORD
ESO1
.WORD
ERRSO1
:BRANCH TO BGNSEG wrEN ERRLOOP IS SET
TRAP
($CLP

.WORD

3981 024510

3990 024570

*ERROR HANDLER

005447

155614
002374
002402
002402

3089 024562

;BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGES
..

ERRSOFT 713,6801,ERRSOY

002500
002502

000010
000002
155552
000001

3983 024526

218
#20,600D
RSAVE ,BAD

CKLOOP

104406
052777
012737
017737
022737

3980 024506
3982 024516

BEQ
MOV
MOV

002500
002502

SEQ 98

PAGE 49-4

000040

XXy

BIS

BGNSEG

240, R

ALY

Ll Ll

ot ddd

:GET DEVICE PRIM. ADDR. 2

*ADD DAT BIT 10 DAP2-

*LOAD DEVICE PRIM. ADDR.2 + DAl BI!

HARDWARE
TEST

TESTS

MACRO M1113

ADDRESS REGISTER

024616

104404

TEST

06-SEP-B2 16:46

4000 024620

oa§777

000010

«002 024634

004737

011060

4004 024646

012737

4006
4007
4008
4009

026662
026670
024672
026700

023737
001413
013737
013737

024706
024710
024712
024714

104457
001315
005447
003702

4001 024626
¢003 024640
4005 024654

4010 024706

4011 024716
026716
4012 024720
&013 024726

6014 024734

4015 024742

113777

052777
017737

4019 024770
4020 024776
4021 025000

023737
001412
013737

4022 025006

4023 025014

012737
017737

013737

025014
025016
025020
025022

104457
001316
005447
003702

025024
025024

104405

025026

104404

4029 025052

004737

4024 025024

4025 025026

4026 025030
4027 025036
4028 025044

4030 025056
4031

025064

4032 025072

4033 025100

4034 025106

4035 025110
4036 025116

4037 025124

025124
025126
025130
025132

4038 02513¢

025134

BI(

#10,3CSRX

SSELECT

PC,LOOP

SWALT A LITTLE

155432

8IS

#10,3CSRx

002402

MOV

I SRX, RSAVE

002444

002400

002444
002402

(OPA2:

MLAS,@I1DRMX

002374

155376

MOVB

000002

JSR

MOV

(MP
BEQ
101"
MOV

002500
002502

82, (HAN

CDATS,RSAVE
«0%
CDATS,G00D
RSAVE BAD

ERRSOFT 7176502, ERRSO1

(xL0QP

000077

052777

4017 024754
4018 026762

000010

112777

4016 024746

155452

155440

000010

004737

CHANNEL

002412

1044
042777

012737

$60 99

PAGE 49-5

000001

011060

000010

155352

BIC

155334

MOVB

002374

002434
002402

002500
002502

002436

MOV
MOV

SSELECT CHANNEL 2

SLOAD CHANNEL NUMBER

SGET

ISR2 CONTENTS

SATN,ATN,LADS ,NDAC,LPAS, (ULPA) BIT
‘BRANCH IF YES
JSET UP DATA FOKR SRROR MESSAGES
S

SERROR HANDLER

TRAP
WORD
WORD
.WORD

SET

CSERSOFT
717
€502
ERRSO!

:LOAD CHANNEL NUMBER
cWAIT A LITTLE

#10,3CSRX

SSELECT CHANNEL 2

COATY.RSAVE
12%
CDAT1,G00D

SATN,ATN,NDAC, (ULPAY BIT SHOULD BE
‘BRANCH IF YES
'SET UP DATA FOR ERROR MESSAGES

#2,CHAN
1SRX,RSAVE

RSAVE BAD

ERRSOFT 718,6502,ERRS0?

12%:

taeec OAD MLA [N DOR! REGISTER=ecee-

teamae LOAD UNL INTO DOR===cecccccccaas

PC, LOOP

CMP
BEQ
MOV
MOV

002374
002402

($BSEG

#77,.310RHX

JSR

002462

000002
155270

TRAP

#10,3(SRX

#1,(HAN

BIS

:BRANCH TO BGNSEG WHEN ERRLOOP 1S SET
TRAF
¢ Yeu
A
SSELECT CHANNEL 1

Mov

155324

CHANNEL

JLOAD (HANNEL NUMBER
TGET ISR2 CONTENTS

SET

'ERROR MANDLER

ENDSEG

10003$:

BGNSEG

TRAP
LWORD
.WORD
.WORD

(SERSOFT
718
E502
ERRSO1

TRAP

($ESEG

TRAP

($BSEG

042777
01,737
3777

000010
000001
002416

155242
002374
155224

BIC
MOV
MOVB

#10,3CSRX
#1,(HAN
MTAZ,81DRNX

SSELECT CHANNEL 1
SLOAD LHANNEL NUMBER
;===LOAD MTA?2 IN DORY REGISTER (]DRV)=

2777

000010

155214

8IS

#10,3CSRx

SSELECT CHANNEL 2

002402

MOV

2737

011060

000002

002374

3737

002436

002402

3737
3737

002402
000436

7737

14612

104457
001317
005447
003702

155160

002502
002500

JSR

MOV

(mP

BEQ

MOV
MOV

P(,LOOP

22, CHAN

2l SRX,RSAVE

SLOAD CHANNEL NUMBER

SGET

ISR2 CONTENTS

CDAT2,RSAVE

JATN,ATN NDAC,TPAS, (ULPA) SHOULD SE1

RSAVE ,BAD
(DAT?2 .GOOD

SSET UP DATA FOR ERROR MESSAGES
I

338

ERRSOFT 719,£502,ERRSOY

ENDSEG

SWAIT A LITTLE

:BRANCH IFf VYES

TERROR HANDLER

TRAP
MORD
JWORD
.WORD
100048

CSERSOHT
719
£S0?
ERRSOY

WARDWARE TESTS MACRO M1113 (6=-SE>=B82 16:46
TESY 7: ADDRESS REGISTER TEST Of (MANNEL 2
025134

104405

40%9 025136

013701

002314

MOV

4061 025146
6062 025152

110177

15510¢

Move
BONSEG

4040 025142
025152

9052701

104404

6063 0251564

042777

4045 025170

113777

6044 025162

4046 025176

000001

004737

011060

052777

4049 025216

017737

4050 0252264
4051 025232

4052 025236
4053 025242

4056 025250

012737

023737
001412

013737
013737

025250
025252
025254
025256

104457
001320
005447
003702

025260
025260

104405

4055 025260

4056 025262

025262

4057 025264

104404

4062 025320

012737

«065 025342

4066 025346
4067 025352

4068 025360

052777

017737
023737

001413

013737
013737

000007

011060

000010
000002

154726
002440
002402
002440

4071 025400

012737

000001

004737

011060

042777

4072 025406

112777

407% 025414

4074 025420

052777

4077 025442
(078 025450
4079 025452

023737
001412
013737

4075 025426
4076 025436

4080 025460

4081 025466

012737
017737

013737

155100

Mov8

MLAZ,R1DRHX

iece=0OAD MLA [N CURlecccccccccccccaan

155070

BIS

016.3(591

JSELECT CHANNEL 2

9002402

MOV

002374

MOV

JSR

MOV

(mp
BEQ

002502
002500

MOV
MOv

1, (HAN
PC,LOOP

#2,(HAN

SISRX,RSAVE

(DATL ,RSAVE
36%

RSAVE ,BAD
(DAT4 , 5000

ERRSOFT 720,E502.ERRSO1

CHANNEL

000137
000010

000002
154616

002434

002402

BIT

[N ADDR.

TRAP

($8SEG

CWAIT A LITTLE

;LOAD (MANNEL NUMBER
:GET

ISR2 (ONTENTS

:ATN,ATN _NDAC,LPAS, (ULPA) BITS SET
;BRANCH [F YES
:SET UP DATA FOR ERROR MESSAGE>
Jee.

"ERROR WANDLER

10005%:

CSERSOFT
720
£502
ERRSO1

TRAP

($ESEG

TRAP

($BSEG

BIC

#10,8CSRX

:SELECT CHANNEL

154770

MOvVB

MTA2,31DRHX

i====LOAD MTA2 [N DOR! REGIS'ER====

154760

BIS

#10.3CSRx

002402
002402

MOV
(MP

31SRX,RSAVE
(DAT3,RSAVE

MOV

JSR

002374

MOV

BEO

002502
002500

MOV
MOV

#1,(HAN

P(,LOOP

#2,CHAN
16%

RSAVE ,BAD
(DAT3,GOOD

ERRSOFT 721,£802,ERRSO1

154700

002374

154662
154652

002374
002402

002402
002500
002502

169%:

8IC

#10,9(SRX

MovB

0137.SIDRHI

MOV

JSR

8IS

MOV
MOV

(MP

#1 , (HAN
PC,LOOP

016.3(SRK

#2 ,(HAN
S1SRX,RSAVE

CDAT1,PSAVE

8tQ

24%

MOV

RSAVE

MOV

CDATY,G00D
,BAD

ERRSOFT 722,E502.ERRS01

JGET

TRAP
.WORD
.WORD
.WORD

155006

002374

?2-

:LOAD (MANNEL NUMBER

ENDSEG

(KLOOP
Q00010

($ESEG

sSELECT

BGNSEG

104457
001321
005447
003702

4070 025372

;===LOAD DPA?2 PLUS DAL

TRAP

#10,3C SR

36%:

025360
025362
025364
025366
4069 025370
025370

104406

ADDR,

BIC

0024602

002416

004737

RY,@1IRux

;SET DAL BT

PRIM,

155116

002442
002402
002442

:GEY DEVICE

#100, R

002374

155034

DPAZ R

BIS

000002

113777

4060 025306

6063 025326
6064 025336

000010

012737

4061 025312

002412

042777

4058 025272

4059 025300

000010

012737

4047 025202

4048 025210

000100

SEQ 100

PAGE 49-6

CHANNEL NUMBER

SWAJT A LITTLE

SSELECT CHANNEL 2

JLOAD C(HANNEL NUMBER

:GET ISR2 CONTENTS
SATN,ATN,
TADS ,NDAC, TPAS, (ULPA) BIT
‘BrANCH

YES

SET

SSET UP DATA fOR ERROR MESSAGES
Jeee

TERROR WAND.ER

TRAP
CSERSOF1
.WORD
721
.WORD
€502
.WORD
ERRSO!
:BRANCH TO BGNSEG WHEN ERRLOOP [S SET
TRAP
s
JSELECT CHANNEL 1

;LOAD CHANNEL NUMBER

Jemeee LOAD UNT INTQ DOR==e=ccccccccssa
cWALT A LITTLE

sSELECT CHANNEL 2

:LOAD CHANNEL NUMBER
:GET ISR2 CONTENTS

SATN,ATN,_NDAC, (ULPA) SHOULD BE SET
;BRANCH JF YES
SSET UP DATA FOR ERROR MESSAGES
Jeee

*ERROR MANDLER

(06-SEP=-82 16:46

C(HANNEL

SEQ 101

PAGE 49-7

104457

~OO000O
VO OOMN
S OO
N
VINDAINO
—
PP o PPy
O LHronN

154556

25%:

TSELECT CHANNEL ¢

mMove

R1,81 IRHX

Move

JSR
BlS

(Mo
8EQ

MOV
MOV

002434

MOV
MOV

CMP

BEQ

MOV
MOV

T
ERRSOF

MNONES
N

002434
002402

OO
OOO0O—
—O-—
OO
OOOWm
WVOown
LS
NN
NP S O
P
(VI I
P
v
1V R AV
P
OO
OONN
O ~N
O
NSO
OO &»

154342

154316
002374
002314

8IC

MOV
MOvVB

JSR
BIS

~NHw B
QMUY

NN
S

DPAS,RI

MOV
MOV

12%:
WO WNO
N =N NN

MOV

25%

#200.R1

#10,8CSRX
#1,CHAN
MLAZ ,31DRHX
PC,LOOP

#10,3CSRX

#2,CHAN

S1SRX,RSAVE

CDATS ,RSAVE

;BRANCH [F

:GET DPA2

(eemmm== SET EDPA BlTeeeececcceccccaas

:LOAD DPA2 & EDPA BIT INTD ADDR.
JSELECT CHANNEL 1
;LOAD CHANNEL NUMBER

TRAP

($BSEG

;===L0AD MLA2 INTO DOR1 REGISTER===JWAIT A LITTLE
:SELECT CHANNEL 2
:LOAD CHANNEL NUMBER
:GET JSR2 CONTENTS

(DATS,GOOD

JATN,ATN,_LADS ,NDAC,LPAS, (ULPA) BIT
:BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGES

723.6502,ERRSO1

*ERROR HANDLER

4L0%

RSAVE

,BAD

;BRANCH TO BGNSEG WHEN E?RLOOP

(KLOOP

000077
011060
000010
000002

(S$ESEG

TavP?
#10,3C SRX

JMP
BIS

MOV

40%:

TRAP

;1S LAST DPA ADDRESS SELECTED

T
ERRSOF

000010
000001

722
£502
ERRSO1

#36,DPA2

BIC

(oPBZ:

10006%:

.WORD
.WORD
.WORD

cmp
BNE

BIS

OO0
OO0~
—=0O-—
OO0
OO0OWm
wVoOwm
NN
OIS
BSOS
[V
T I
S
V. LV, IRV
TPV|
OO
OONO
—=~NW
O
OSSN0

N
NNWNINNNNNNNES

002314

ENDSEG

BGNSEG

O—=OO00000
OWVOO =000
NN
OO=2MNNOO
Lk alel=l=2 Jola]
BNO 2RO
—
SONNOOMNN—=O

et YNNI
NN

2000000
=2WVNanOO0oNN0O

ONIWN
O =0 &~
2NNN—ONS
NOO NWOWO
WWNW = WNSNNIRN
S WNNIND S
NSNS SNNNNNNNNES
WWW= WWWWNWNWSNIWNG

OO0O0O0O0O0OO—~O0O—
==ON==3NVO =200

000036

O00—
OO0O00

WWW =N
S NN
W=
NSNS NNNNNNNNE O NBWES
OSSNV
NN = WWIWNWNWSNG
PONWSN
NNNINNNNNNNN O

O0O0O0OO0O0O—=0O0—=
== OMN =t NQ =080

S
W =2

CSERSOFT

TRAP

26%:

OO0
—=
0O OO0

»
o

MACRO M1113

O=O0O
—
N— = 5O
[p ST 1 N1, S P g

N WD WNANWNAWVIWUVAWUAAVANWNWNVWANWN,.
©
oo
o
OO O NV NN NNV WMWVWNANWNVWNWVIWVWANES
S
S0
D
£ W NN LAY N =2 = ONO O WVE D ANNANNIN = 2 OO NNNNNNO
M
oo
o
[e JoTo Yol S¥ Fo X NP Yo YarTo Yo JNTe J,NF JnTo TanTo Yo To W X VTaTo NalV,}
WAV
i
WMV

NIALNINIALNLALNININI
ARV R NVNL NI NI NI NI RN NN AL AN AU A ND N

S ANNINY
= = O~
~N N
WVRRAVLULZWALS S
S ONSPNOMNINVOO SNON S OO0

OV~

b
b
N

t
d
b
—

[ ol O3 ol o

116

mwmmmmmwmmmu\mu\mmmmg
NNNNNNNNNNNNNNNNNN

O
L

i and el

ol
— ol

POl LW W

il
e b O
VNN
= OO0

4091
4092
4093
4094
4095
4096
4097
4098
4099
4100
10
6102

[elelolelelalelololalololalelolelolelalololololelolelolololelele]

4083
4084
4085
4086
4087
4,088
4089
4090

MURNLRLRLALNIRI
NI RO RO NN roroNN

4082

[elelelalolelolelelelole
o] QOOO0O00O

HARDWARE
TESY 7

#10,3CSRX
#1_,CHAN

:SELECT CHANNEL 1
:LOAD CHANNEL NUMBER

PC,LOOP

WAIT A LITTLE

#77 .31 DRHX

:===LOAD UNL

JSELECT CHANNEL 2

CDATT.RSAVE

sATN,ATN,NDAC, (ULPA) BIT
:BRANCH IF YES

:LOAD CHANNEL NUMBER
JGET ISRZ2 CONTENTS

SHOULD BE

1 28
C DAT1,G00OD

JSET UP DATA FOR ERROR MESSAGES

724,€502,ERRSO1

‘ERROR HANDLER

R gnve BAD

ENDSEG

TRAP

10007$:
#10,8(SRX
#1,CHAN
MLAZ,R1
#1,0PA2

INT0 DOR======cececce-=

#10,3CSRX

#2.CHAN
aISRX,RSAVE

RAP

SET

SSELECT CHANNEL 1
¢LCAD CHANNEL NUMBER
cGET MY L ISTENER ADDRESS
+1S DPA EVEN

SET

T
(SERSOH

LMWORD
.MORD
.WORD

724
E502
ERRSO!

TRAP

(SESEC

SO =N
S ONOOSHO
[=X

~N &N

&N~

LEL¥]

(2]

2OV

o« wmmmm;m

OO
DD EEDD—D
ittt bt M Dososoarre
P P

~n
~

O=20O000—0O
OWVO
O =2wnO

(==
(el

MOV

T
ERRSOF

#10,3CSRX
R1,a1DRHX

JSELECT CHANNEL 1
bttt LOAD NEW MLA1

#10,aCSRX
CDATS ,RSAVE

JSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
sGET ISR2 CONTENTS
,LPAS BIT SET
DAC,
(ULPA)
SATN,ATN,LADS,N

CDATS,GOOD

sSET UP DATA FOR ERROR MESSAGES

725,E502,ERRS01

TERROR WANDLER

PC LOOP

82, CHAN

RSAVE . BAD

OO0 0O000O
OWVNOO=2000
SO0 =000
2 OOO0OO0O00
VOO NO
=
BRONOON—O

MOV
MOVB
JSR

8IS

MoV
MOV

OO0
NNy
S8
OWwW
NS

(MP
BEQ

MOV
MOV

ERRSOFT

FONO
N

~ SNES

8IcC

;CLEAR ULPA BIT IN COMPARE DATA FOR [SR

SWAIT A LITTLE

sBRANCH |F

TRAP

($BSEG

[INTO DOR====cec==-

YES

TRAP

T
(SERSOF

MWORD
.WORD
.WORD

7¢5
ES502
ERR501

TRAP

cscept

;BRANCH TO BGNSEG WHEN ERRLOOP IS SET

(xLOoP
40%:

*BRANCH TO BGNSEG

#1,CDATS

40%

O SNV
NSNS

NSNS » NN NNN= — NS

BIS

sCHANGE MLA2 T0O OCD
JSET ULPA BIT IN (OMPARE DATA FOR ISR

:CHANGE MLA?Z2 T0 Evel

~N&W
Pl X
NN NNSNNSNNNY &H

WW = WWWRWNWWNWNG
NNNUINSNNNNSNNSNGO

—==ON==2uVO-=50O

W=
WW=WNRNI
S PUMNIRIES
WS

OO~

L +42

JBRANCH [F YES

R1
#1,CDATY
#1,(DAT
#1,C0AT
#1,CDAT4

alSRX,RSAVE

= SOV

NNNO
W

6164
165

elelolele

6163

BSNMNUN)
et s = o d O

4161
6162

oo OO0

OO0O0O0O0O0O=O0=

== ON==NO—=80

OO00=

O000

OO000000O0=O~

el
il
il
)
e
and ad
- b

EBWNNY

WAL

O MM

VASVAWNA

N
P

b ed

W
W

b md cad
b

oW W

6160

coPC2:

/1
#1,(DAT1
#1,CDAT
#1,CDAT
#1,CDATS
#1,(DATS

WTM
@

b ¥

SEQ 102

PAGE 49-8

20
N

(2
2@]

—

D —

PEPREN

—

Laadx1

—D
wo

WWNNNWWN
O NANNANNWNO N
NNNNYNSONNSN NN
N2 WWIWWN NN NGO
NNWNSNSNNNSNNS

8OO WNWVNIWVNIVNVIVNOO
£

NSNNNNWESNNSNNNNVO

NN
O NN
=

00000000000~
0O

06-SEP-B2 16:46
ST OF CHANNEL 2

)

oooorororOrOrO
OO
[elelelelelololelele]
]
LS BSNRIN = O
N WS WNWNIN
= =2 O000 NN
o oSSO0
OLSY Yo N To P ote Ja i, UF o Yo )

026002

WNW = WSS
ON S

HARDWARE TESTS
TEST 7: ADDRESS

#10,3CSRX
#1 _(HAN

;SELECT CHANNEL 1
:LOAD CHANNEL NUMBER

#77,31DRHX

<=-=L0AD UNL INTO DOR---==c=ccccea-

#10.3CSRX

SSELECT CHANNEL 2
:LOAD CHANNEL NUMBER
:GET ISR2 CONTENTS

PC,LOOP

#2,CHAN

I SRX,RSAVE

TWAIT A LITTLE

cg:r1.asuvz

ATN,ATN,NDAC, (ULPA) BIT SHOULD BE

CDAT1,G00D

“SET UP DATA FOR ERROR MESSAGES

RSAVE ,BAD

7266502, ERRS01

:BRANCH IF

YES

*ERROR HANDLER

12%:

TRAP

10010%:

000001

002314

#1,DPA2

000001
000001
000001

002434
002436
002440

#1,(DAT]

b3 3

#1,(DAT?
#1,(DAT3

;1S DPA EVEN

;BRANCH [F

YES

SET

T
CSERSOF

MORD
.WORD
.WORD

726
ES507
ERRS01

TRAP

(SESEG

;SET ULPA BIT [N COMPARE DATA FOR SR

HARDWARE TESTS MACRO M1113
06-SEP-82 16:46
TEST 7: ADDRESS REGISTER TEST OF CHANNEL 2
6166 026346

052737

000001

002442

4169 026364

042737

000001

002434

042737

000001

002440

4167 0263564
4168 026362

4170 026372

6171 026400

4172 026406
4173 026416
4174 026422

026422
6175 026626
4176 026432

052737
000617

042737

042737
042737

104404
042777
012737

000001

000001
000001

002436

3$:

BIS

#1,CDATS

BIC

#1,CDATY

BIS
8R

Bl
BI(

002442
002444

8IC
BIC
BGNSEG

153646
002374

BIC
MOV

4179 026452 052777 000010 153620

BIS

4177 026440
4178 026446
4180
4181
4182
4183
L1864
4185

113777
004737

026460
026466
026476
026502
026504
026512

012737
017737
023737
001413
013737
013737

026520
026522
026524
026526

104457
001327
005447
003702

026530

104406

4186 026520

4187 026530

000010
000001

002644

002416
011060

000002
153564
002440

002374
002402
002402

002402
002440

002502
002500

042777
012737

000010
000001

4191 0265564

004737

011060

4193 026566

012737

4192 026560
4194 0265764

4195 026602
4196 026610
4197 026612

4198 026620

4199 026626

112777

052777
017737

023737
001412
013737
013737

026626
026630
026632
026634

104457
001330
005447
003702

026636
026636

104405

4200 026636

4201 026640

026640

4202 026642

104404

*BRANCH TO BGNSEG

‘CLEAR ULPA BIT [N COMPARE DATA FOR ISR

#1.CDAT

Pee

#1.CDAT

#1.CDATS
#1.CDATS

PR
P

#10,3CSRX
#1,CHAN

;SELECT CHANNEL 1
‘LOAD CHANNEL NUMBER

016 aCSRX

‘SELECT CHANNEL 2

MOVB
JSR

HTAZ IDRHX
LOOP

MOV
MOV
(MP
BEQ
MOV
MOV

#2.CHAN
aISRX,RSAVE
CDAT3,RSAVE
168
RSAVE BAD
CDAT3

000137

000010

153540
002374

ERRSOFT 727, 5502 Ennsm

153522

PC,LOOP

002402

MOV

002434

002402

JSR

8IS

002374

002434

#10,3CSRX
#1, CHAN

MOVB

MOV

CMP
BEO
MOV

002500
002502

MOV

#137.3I0RHX

#10,3CSRX
#2.CHAN

aISRX,RSAVE
CDAT1,RSAVE
248
(DAT1,G600D
RSAVE . BAD

ERRSOFT 728,E502,ERRS01

24%:

‘LOAD CHANNEL NUMBER
SGET ISR2 CONTENTS
AIN ATN,TADS ,NDAC,TPAS, (ULPA) BJT SET
‘BRANCH [F YES
:SET UP DATA FOR ERROR MESSAGES
..

*ERROR HANDLER

;SELECT CHANNEL 1
*LOAD CHANNEL NUMBER

*GET ISR2 CONTENTS

sATN,ATN_NDAC, (ULPA) SHOULD BE SET
‘BRANCH IF YES
SET UP DATA FOR ERROR MESSAGES

.ERROR HANDLER

100118
;SELECT CHANNEL 1

4204 026656 013701 002416
4205 026662 032737 000001 002314
4206 026670 001021

MOV
BIT
BNE

MTAZ2,R1
#1,0PA2
2s£

‘GET TALKER ADDRESS
‘1S DPA 0DD
*BRANCH IF YES

4209 026702

105201
052737

000001

002434

052737 000001

002436

INCB
BIS

8IS

C$CLPY

*LOAD CHANNEL NUMBER

ENDSEG

MOV

TRAP .

SSELECT CHANNEL 2

#10,3CSRX

002374

(SERSOFT
727
ES02
ERRSO1

eeee- LOAD UNT INTO DOR===eveemee==

BIC

4207 026672
4208 026674

000010

000001

TRAP
MORD
"WORD
.WORD

‘WAIT A LITTLE

BGNSEG

012737

($BSEG

:BRANCH TO oGNSEG WHEN ERRLOOP 1S SET

BIC
MOV

153512

000002

153456

168:

TRAP

ieeee LOAD MTA INTO DOR: REGISTER=====e
SWAIT A LITTLE

153430

4203 026650

042777

Pese

#1.(DATS
.+40

CKLOOP

4188 026532
4189 026540

4190 026546

153630

SEQ 103

PAGE 49-9

#1,CHAN

31 CDATI

#1.CDAT2

TRAP
.MORD
"WORD
.WORD

(SERSOFT
728
ES0?
ERRS01

TRAP
TRAP

CSESEG
($BSEG

*LOAD CHANNEL NUMBER

*CHANGE MTA2 TO 0DD
SEI ULPA BIT IN COMPARE DATA FOR ISR

SEQ 104

PAGE 49-10

w -—

— —

L<0ae.t8LA.(=]A-[~[vel(=]wONOwoO~weA=NNZOxN]TNI2TOra—Qa(V2]MOON0WOP[—-~VtO—O—N——N_O[E[]ANeZ2XX——EA-R-—

HARDWARE T €St S
MACRO M1113 06-SEP-82 16:46
TEST 7: ADDRE SS REGISTER TEST OF CHANNEL 2

NWOIUMO= 0O—

PAGE

———NOe —ee —

W
O
N
M
[elelalelalolele] JONOOM«— DOMNIMOI

045

002314

3$:
ExQv7:

JMP

MOV

S€EQ 105

49-11

EXIT TST

1 0,8CSPX

91 CRHX
P4 19,

¢ WAlT
1 ¥, 1 CRHX
"o 8l SRX
DPA $.al IRHX
A2

SDPA,DPA?2

JBRANCH ]F

YES

SSELECT CHANNEL
¢====LOAD SIC INTO ACR 1
SWAIT A LITTLE

:ee==l OAD NOT SIC
SELECT CHANNEL

INTO ACR 1

;LOAD NEW DPA2 INTO ADR?

SJREPET THE TEST WITH THE
;RESTOR ENTERD DPA2

NEW DPA1
TRAP

+WORD

BEX
/XS2XAADDRESS REGISTER TEST

(ICR)

o— wo —ty

NeOr—Or— [oN[a9l8¥a]s

NN
O NN -

TEST

TESTS
MACRO M1113
06-SEP-82 16:46
ANDRESS REGISTER TEST OF C(MANNEL 2

HARDU;RE

(HANNEL 2N/

L100364:

TRAP

CSETST

HARDWARE TESTS MA(CRO M1 3 06-SEP-82 16:46 PAGE 50

S0 106
¢

TEST 8: DATA TRANSFER TES

4273

LSBTTL

‘27‘.

TEST 8:

DATA TRANSFER TEST

.00""'"""t""'"'""Q"'"""0""'Q'Q"""""'.""0'.""'0'

6275

JEX = TEST 8

4276
z%;g

TNIS TEST IS DIVIDED INTO TWO PARTS
IT CHECKS THE DATA OUT (DOR) AND DATA N (DIR) REGISTERS

4279
428N

PARI
:

4283

:PART 2 (MECKS THE DOR AMD DIR REGISTER BY LOADING THE DOR2 WITH A

2%%2

2%%5

;

4284

4287
4288

CHECKS THE DOR AND DIR REGISTER BY LOADING THE DORY WITH A
DATA BYTE AND READING IT FROM THE DIR?

(PROGRAMMED DATA TRANSFER FROM (HAN.1 TO CMAN.2).

DATA BYTE

AND READING

T FROM THE DIR!

(PROGRAMMED DATA TRANSFER FROM (MAN.2 TO CHAN.T),

SIF THE QUICK VERIFY PASS 1S NOT SELECTED, THE
JCARRIED OUT WITH A DIFFERENT DATA PATTERN

L289

TEST

ITERATION

.'""'."Q"""'"""""""'"'Q"Q""""QQ".QQ.'Q't'.."""""

<190 027416

027416

BGNTST

4291 027416
4292 027422
4293 027424

005737
001410

002324

027424
027430
027634
027436
027440

031730
000001

4294 027644

012746
012746
010600
104417
062706

4295 027450

005037

004737

010220

4296 027454
4297 027460

027460

004737

104404

4298 027462
4299 027470

112777
017737

4301

001407

4300 027476
027506

4302 027506

4303 027514

022737

012737

027514
027516
027520
027522

104457
001441
005447
003702

027524
027524
4305 027526
4306 027532

104405

4304 027524

4307 027536
4308 027542
4309 027550

4310 027552

4311 027560
4312 027566
4313 027574

(314 027576

4315 027606
4316 027612

013701
062701

010137
032737
001412

157
BEQ
PRINTF

000004

002322

7%:

010534

000212
152562

120062

120042

(LR

002502

BEQ

‘BRANCH IFf

($BSEG

TATN,NDAC ,ATN, TADS SHOULD BE SET
YES

*SET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

100008:

TRAP
.WORD
"WORD
"WORD

(SERSOFT
801
ESO2
ERRS01

TRAP

CSESEG

DPA2,R1
#40,R1

:GET DPA2 ADDRESS
*CREATE MY LISTENER ADDRESS (MLA)

#1,C0ATY

*SET ULPA 81T IN COMPARE DATA FOR ISR

002434

8IS

042737

000001

002434

BIC

002450
002444

TRAP

(ICR1)===anac

MOV
ADD

000001

000001
000001

#120042,600D

#TSHDS,=(SP)
0 ,-(SP)
SP.RO
CSPNTF
#4,SP

TCLEAR ULPA BIT IN ISR 1 AND 2

ENDSEG

052737

062737
042737

#120042,BAD

ERRSOFT 801,E502,ERRSO1

MOV
I

002450
002444

JSET UP PARAMETER

;e=e=- LOAD TON IN ACR 1
‘GET ISR1 CONTENTS

002314

000001
000001

PC,BGINY

#212,3ICRHX
aISRX .BAD

002412
000001

052737
052737
000411

;CLEAR COUNTER

MOVB
MOV
MOV

002314
000040

ITRCNT

MOV
MOV
MOV
TRAP
ADD

PC, CULPA

(MP

002560

;1S THE PNT FLAG SET
:1F YES, PRINT THE TEST WEADER
...

JSR

JSR
BGNSEG

152600
002502

TB::

PNTF
7%
#TSHDS

8IS
BIS
BR
BIC
BI(

R1,MLA2
#1.0PA2
3g’

#1,CDAT7
#1,CDATS
¢34
01 COATY

#1.(DAY7
#1.CDATS

:STORE MLA
‘1S DPA EVEN
*BRANCH IF YES
Fees

‘BRANCH TO BGNSEG

sCLEAR ULPA B!T [N COMPARE DATA FOR [SR

s
o

HWARDWARE

TEST

TESTS

DATA

MA(CRQO
M1 3

TRANSFER

6317 027620

027620

G318 027622

TES

1044064

062777

06-SEP=-82 16:46

000010

o1§737

0000017

(%21

027644

004737

011060

4323 027656

012737

4322 027650
4324 027666

6325 027672

4326 027700
4327 027702

4328 027710

113777

052777

017737

022737
001410
012737

027710
027712
027714
027716

104457
001442
005406
003702

027720

104406

4329 027720

4330 027722

017737

4333 027740

013737

4331 027730
4332 027736

4334 027746

023737
001410

027746
027750
027752
027756

104457
001443
005447
003702

027756
4336 027760

104406
042777

4338 027774

112777

4335 027756
4337 027766

002412

000010

152450

BIC

#10,3CSRX

150432

MOVB

MLAZ,aIDRHX

152422

BIS

#10,3CSRX

002502

MOV

002376

000002

0C237¢6

002401

002502

152350

002401

152330

002502

0024446

002500

002444

002502
)

000010

152312

4339 030002

052777

000010

152270

4341
4342
4343
4344

017737
023737
001407
013737

4345 030042

030042
030044
030046
030050

104457
001444
005447
003702

030052
030052
4347 030054

104405

012705

030060

104404

4346 030052

4348 030060

4349 030062
4350 030070
4351 030076
4352 030102
4353 030106
4354 030114
4355 030122

062777
012737
110577
004737
017737
022737
001413

MOV

(MP

BEQ
MOV

PC,LOOP

20$%:

000013
000002

152234
002450
002450

152266

002374

40$:

002502
002502

000252
000010
000001
152174
011060
152136
000020

AB1:

152210
002374
002402
000402

tecee LOAD LISTENER ADDRESS OF

UAIT ALITTLE

“MA,MAC,I+C BIT

600D

CHANNEL

IN 1iR2 SHOULD BE SET

‘BRANCH [F YES
‘SET UP DATA FOR ERROR MESSAGES

‘ERROR MANDLER

TRAP
.WORD
.WORD
.WORD

(SERSOFT
802
ESO1
ERRSO!

TRAP

(S$CLPY

ISRX,BAD

:GET

ISR2 CONTENTS

MOV

CDATS,GOOD

‘SET

UP DATA FOR ERROR MESSAGES

(MP
BEO

CDATS.BAD
308

TATN,ATN,LADS,NDAC,LPAS,
(ULPA) BIT SET
‘BRANCH [F YES

P
#10,3CSRX

wove

mS.alcRex

BIS

MOV

21,

‘ERROR HANDLER

TRAP
.WORD
.WORD
.WORD

CS$ERSOFT
803
ES502
ERRSO1

;BRANCH TO BGNSEG WHEN ERRLOOP IS SET

BIC

MOV

CHAN

#10,a(SRX

($CLPY

;SELECT CHANNEL 1

0000

#2,CHAN

1SRX,BAD
CDAT7.BAD
418
CDAT7,G0OD

ENDSEG

‘LOAD CHANNEL NUMBER

taeae LOAD GTS INTO ACR1 ([CR1)ecececocae-

ssLecr CHANNEL 2

SLOAD CHANNEL NUMBER

SGET ISR2 CONTENTS
INDAC,LADS.LPAS,
(ULPA) SHOULD BE
*BRANCH [F YES
YSET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

10001%:

SET

TRAP
LWORD
"WORD
‘WORD

(SERSOFT
804
£50?
ERRSO1

TRAP

(SESEG

TRAP

($BSEG

MoV

#252,RS

R GET DATA PATTERN==cececcenan-

BIC
MOV
MOVB
JSR
MOV
(MP
BEQ

#10,3(SRX
#1,CHAN
RS.31DPHX
PC.LOOP
Sl 1RX,RSAVE
#20,RSAVE
42%

SSELECT CHANNEL 1
‘LOAD CHANNEL NUMBER
*LOAD DATA PATTERN INTO DOR1
SWAIT A LITTLE
SGET TIRT CONTENTS
‘B0 BIT IN IIR1 SHOULD BE SET
‘BRANCH [F YES

BGNSEG

;BRANCH TO BGNSEG WHEN ERRLOOP IS SET

ERRSOFT 804,E502.ERRSOY

ALY

‘LOAD CHANNEL NUMBER

($BSEG

MOV

MOV
(MP
BEQ
MOV

002500

TRAP

SGET 1IR2 CONTENTS

12401 "BAD

ERRSOFT 803,€502,ERRSO1

30%:

*LOAD CHANNEL NUMBER

alirx,BAD
208
#2401,

CHANNEL

SSELECT CHANNEL 2

#2.CHAN

ERRSOFT 802,€501,ERRSO1

(KLOOP
002374

012737

JSR

#1,CHAN

;SELECT

CKLOOP

000001

030016
030024
030032
030034

MOV

002500

012737

4340 030010

SEQ 107

50-1

BGNSEG

4319 027630

4320 027636

PAGE

NN
W
NN

T
ERRSOF

O00o-*
O00O0

NN
NS
OO
S WV
OV

-—

MOV
MOV

#20,600D

sSET UP DATA FOR ERROR MESSAGE

805,401, ERRSO!

*ERROR MANDLER

RSAVE BAD

WOR D

62%:

B1S

MoV
MOV

#10,8CSRX

#2,(HAN

al [Rx,RSAVE

;GET TIR2 CONTENTS
;81 BIT IN IIR2 SHOULD BE SET

#40,600D

sSET UP DATA FOR ERROR MESSAGE

438

MOV

RSAVE ,BAD

T
ERRSOF

806,6501,ERRS01

NN
O WS NNO

- N NAWNO W

ONNUNO
NS
VINWWO
= N0

NS NNNNNNE
=2 NN NANND
NONNNNNNS

MOV

(LRB
SWAB
(MPB

9 IDRX ,RSAVE
RSAVE

002234
000021
002322
002320

TRAP

TRAP
sREAD DATA FROM DIR REGISTER

sCLEAR LOW BYTE OF
;SWAB DATA FOR

sSET UP DATA FOR ERROR MESSAGE

ENDSEG

000010
000001
000014
011060

8IC

000020

(MP
2
Be

MOV
MOovBe

JSR

151656

MOV

000020

MOV

($CLPI

;CLEAR HIGH BYTE OF RS

*ERROR HANDLER

BGNSEG

ERRSOV

IDR

ERRSOFT

INC
(mMP
BNE

(SERSOFT
806
ES01

(OMPARE

JSWAB HIGH AND LOW BYTE

ADD

50%:

TERAOR HANDLER

SWAB

1S1
BNE

002322

YES

sBRANCH IF YES
sSWAB HIGH AND LOW BYTE

MOV
MOV

002502

($CLPT

sCORRECT DATA RECEIVED

(LRB

002500
002402

JBRAN(CH IF

.WOR D
.WOR D
.WOR D

8t0
SWAB

iy Ao R o o

002602

638

SSELECT C(HANNEL 2
sLOAD CHANNEL NUMBER

240, RSAVE

(€14
BEQ

MOov

CSERSOF1T
805
ESO
ERRSO1

:BRANCH TO BGNSEG IF 5aa§30p WAS SET

(xLo0QP

O0O000O0O00O0-~+
QO
—=—=2ON=-2N0
B
WM =P NMNONIES
£
NN
NNNNE
WV
NN = LI
NGO
SNONNWNNNNO
- OOOONCOO
HWOOWVO —=00Wwm

OO00O0—-200—0O-—

[e]lale]w]

OO0~

TRAP

.WOR D

4498
[elolelelele
)
OO
OO0
—AN
=2 N S

SrONOSOO o
& OO
~

(v 1V]

SEQ 108

(kLOoOP

CO0OO—=OO
=
SOR
OO
LVET VLSNP Y NLULVP
o

VWA
LS BN
NN NN NN =2 O O NO NN
S 8 52 Bl
OO LHrOroNOOO A NIOONSNSOCONOOOMNOON
S
o~

A A8 Ll L L A A W L A A L L L A A A A A A ANAN

6372

6373
6374
4375
4376
377
4378
4379

[slalelalololelalolelolololololelolele] o]
£ MNNIN)
= =t = O (=]
O \:wwwwwwwwwww

4369
4370
3N

OO0000000000000000000O000000DOOOOCOOOOOCODOOOO

4368

LN N AN AN W LN W LA AN AN A N N N N A
LN AN N N N W
N AN U AN AN N AN NN
NLA N NN

TEST 8: DATA TRANSFE

MA(R

WWNO
OO — NN
NNVWVWNES
YN N

TESTS

O =8
NO NN

HARDWARE

TRAP

10002%:
Qvp

50%

#21,RS

[TRONY

JTRDEF
, I TRONT

A81

ERRSO

TRAP

(SESEG

1S QUICK VERIFY PASS SELECTED
sBRANCH IF YES
JCREATE NEW TRANSMIT DATA

sINCREMENT JTERATION (OUNTERB
;ALL DONE
sBRAN(H [F

TRAP

#10,3CSRX
81 ,(HAN

14,31 CRHX
PC,LOOP

al[RX,BAD

cgo.ano

51%

#20,600D

(SERSOF!
807
E801

.WOR D
.WOR D
.WOR D

SSELECT CHANNEL !
sLOAD (HANNEL NUMBER
oot LOAD TCA BIT INTO A(CRY

SWAIT A LITTLE FOR THE B0 BIT

sGET 1IR1 CONTENITS
<BC IN TIR1 SHOULD BE SET

BRANCH [F

VYES

:SET UP DATA FOR ERROR ME >SAUE

L
(8BSt

SEQ 109

WARDWARE TES1S MACRO M1113 (06=SEP=-82 16:46 PAGE 50-3
TEST

DATA

TRANSFER

6396 030412

0306412
030614
0306416
030420

104457
001450
005406
003702

030422

104406

4397 030622

(398 030424
4399 030432

112777
112777

4400 0306440
4601 030646

004737
017737

«403 030460
4L04 030462

001410
012737

6602 030452

4405 030470

030470
030472
030676
030476

104457
001651
005447
003702

030500

104406

4406 030500
4607
¢408
4409
4410

022737

000012
000077
011060
151606

120040

151636
151636

013737

002434

002500

0305642
030546
030546
030550
4616 030552
030552

106457
001452
005447
003702

LG16

MOVR
MOVB

212,81 CRuxX
#77.QIDRHX

(MP

#120040,8AD

PC,LO0P
al$RX . BAD

000

53¢
#120040,600D

ERRSOFT 809,E505,ERRSOY

(KLOOP

4612 03053¢

030554
030554

;BRANCH BACK

002500

151570
00374
002502
002502

4615 030554

(KLOOP

BEQ
MOV

002502

000010
000002
151534
002434

4613 030542

;ERROR WANDLER

JSR
MOV

052777
012737
017737
023737

001410

S51%:

ERRSOFT B08,E501,ERRSON

002502

030502
030510
030516
030524

4411 030532

TEST

104404

538:

104405

;===={JAD NOT
teeee LOAD UNL

CSERSO*Y
808
(S0}
ERRSO!

TRAP

($CLP

ERRLOOP

SATN,NDAC ,ATN, SHMOULD BET SET

SBRANCH [F YES
SSET UP DATA FOR ERROR MESSAGE

TRAP
.WORD
"WORD
.WORD

TO BGNSEG

ERRLOOP

;SELECT CHANNEL 2
:LOAD CHANNEL NUMBER
SGET ISR2 CONTENTS
SATN,NDAC
,ATN, (ULPA)

MOV

ERRSOFT 810, 502 sna501

(DAY

SSET UP DATA FOR ERROR MESSAGE

(KLOOP

:BRANCH TO BGNSEG IF

*ERROR MANDLER

ENDSEG

SHOULD BE

TRAP
LWORD
.WORD
.WORD
ERROR LOOP
TRAP

10003$:

IS SET

($CLP

#10,3CSRx
82 ,(HAN
ISRX,BAD
(DAT1.BAD

SBRANCH IFf YES

(SERSOF
T
809
ES02
ERRSO1

TRAP

SET

CSERSOFT
810
€502
ERRS0Q!
IS SET
C$CLPY
(SESEG

;4ttcccccccccccccccnncccrcecccccnccrncerccccsnecccrs
e e s so et s e e e ma acaanac.

617
44}3

;PART 2 OF
JTHIS PART

J$¢¢cccccccrcrrrrancccccccccccccccccccececs
s e s e e rcceccccccceccrcccccccccnsas

44620

4621

030556

004737

010220

4423
4624
4425
4626

030566
030572
030600
030606

005037
112777
012737
052777

002322
000010
0060002
000002

4622 030562

4627 030614

4428 030622

4629 030626
«630 03063

030634

004737

112777

004737

112777
104404

4.3 030636
4432 030646

112777
017737

4636 030660

001412

4633 030652

022737

SET

TWAIT A LITTLE
SGET ISR1 CONTENTS

;BRAN(H BACK

55%

TON xuro ACR) ccccccccee
INTS DORlececccccccccces

BIS
MoV
MOV
(mp

BEOQ

5cg:

10 BGNSEG

TRAP
.WORD
.WORD
.WORD

010710

000217
011072

DATA TRANSFER TEST
CHECKS THE DATA TRANSFER FROM (MANNEL

151446

TO (HANNEL

PC,CULPA

SCLEAR ULPA BIT

(LR
MOVB
MOV
BIS

ITRCNT
#10,3CSRX
#2,CHAN
82 9CSRX

SCLEAR COUNTER
SSELECT CHANNEL 2
SLOAD CHANNEL NUMBER
SSELECT CHANNEL 2 AS SYSTEM (ONTROLLER

move
JSR

PC,BGIN

#2i7.31cRmx

;SET UP PARAME TER

ISR

SWALT

151434

MOVB

000212
151406

151424
002402

MOVB
MOV

#212.3l(RHX
alSRX,RSAVE

eeeee LOAD TON IN ACR 2
SGET JSR2 CONTENTS

Bt o

;BRAN(N If

120042

002402

(MP

2120042 RSAVE

AND 2

100 US

000017

BGNSEG

tooile LOAD SIC IN A(R 2ececcecee

PC, wWAlT

817,31 CRHX

JSR

151500
002374
151464

R LOAD NOT SIC IN A(R Qececceccces
1RAP

($BSEO

(](RQ)em=mace

SATN,NDAC,ATN,TADS, SHMOULD BE SET
YES

MACRG M1113

TEST B: DATA TRANSFER TEST

00
00

MOV

ol « L ~
Y

000010
000002
002410
011060
000010
0000M

e Y an Ton TR Ve KV R Vol [=]

002434
002450
002644

000001
000001
000001

DDODDDE®DDD ®

002434
002450
002464

;SET

811,£502,ERRSO"

TERROR MANELER

RSAVE ,BAD

UP DATA FOR ERROR MESSAGE
TRAP

100068
DPAT,RI
#L0,R1
R1,MLAY
#1.0PA1

*BRANCH TO BGNSEG

#10,aCSRX
82 ,(HAN
MLAY,3]DRHX
PC,LOOP

SSELLCT CHANNEL 2
:LOAD CHANNEL NUMBER
sme==- LOAD LISTENER ADDRESS OF
WALT A LITTLE
JSELECT CHANNEL 1

TCLEAR ULPA BIT

~NS s

NONSNN NN NN

002502
002502

002444

002500

NUNWVMIN
NNNNNO

000010
000002
000013

000010
000001

—

—_)
b

002444

20%:

NS
O NV

NONNG

NSNS
W=
W WO

1511466

02201,sao

JMA MAC,IFC

812.6501,ERRS0Y

30%:
40%:

DATA FOR ISR

($8SEG

TRAP

;LOAD C(HANNEL NUMBER

DATA $0R |SR

[N COMPARE

#1,(HAN

#2401,600D
MOV
1
ERRSOF

002530

(ML A)

004

#1,(DATY
#1,(DAT7
#1,(DATS

aliRx,BAD

NS
N

002401

(SESEG

JSTORE MLA

NN NN NN NGO

NNNNNNNNNS

002401

TRAP

;1S DPA EVEN
;BRANCH ]F YES
JSET ULPA BIT N (OMPARE

#10.3CSRx

151176

811
ES02
ERRSOI

#£1,(DAMN
#1,(0A17
#1_(DATS

(SERSOF
T

.WORD
LWORD
LWORD

:GET DPA1 ADDRESS
JCREATE My LISTENER ADDRESS

[

000001
000001
000001

—_,
O —WwOwWm

NN NN NN

W NN =

NN -

ADD

H?V

C02312

#120042,600D

ENDSEG

WO O O

NNNEENYNES
N NNES

[elalelolelololldele
T Nelelalelolelololelele
ey
A ON) et
PO =t = NO
PP OVNVOW—LO~O
NN NN SN
NURONIONIINVN
= NDO NN S

SEQ 110

50-6

ERRSOFT

001453
005447
003702

NNNNNE
WNNWNO

PAGE
MOv
MOv

106457

OO0O0-»
OO0OC
WA=

S e

A L A

i i =

120042
002402

-l
il

A LA L A

il
il

N A

i
-

4470
LN
LL72
L67%
L4746

L4669

L A

LN A

Q467
4468

0137%7

OO0
=
—-=ON—=O
NN 8

466¢

0127%7

OO =00
—
—_p N
MORLALNLRL
S

4465

A A

G664

il il

6463

s e

4652
453
6656
4455
L6456
657
4658
4459
«660
(661
6662

)

6449
4450
L4651

AN A A L

NN
4448

D il Tl

L4646

) e e i

6445

) e i

LLLG

-t e e i el e

6439
64640
AN
LL42
6463

[olelelelelololelolele]lele
] [afelelalelololalelolololololelalelalelalelolalololalelololalolololalealolelelelole)

6L38

N N N U N N AN e
N A L L N A AN A L Ll U A A A L AN A AN AN A U AN A A U A
ld )
e e ok e ad e
e e ek e S ODOOOOOOOOOO o lolelolelole) [l
2 DO OOOOOOOOOOOOOO O NSNNNSNNNNNNNY ~ NNNNNN oo
NN — — [elelololole] ~N~
NO N
B BN N N NN
2 OO OO NNNNOPOWNE S WO —=O (=4 QO NO O NN
ONSNSON o [e Yo de W Y V) oo
NNEOCONOOSANLOONONENINOD NSNS
ONOCONI SN NSO

4636 030670
37

OO0
OOO0O
NN =

€635 030662

06-SEP=-82 16:46

NONORD —

TESTS

OO
—
OCOOWV

HARDWARE

JGET

1IRY CONTENTS
BIT

JIRY

(MANNEL ¢

SHOULD BE

:BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGES
:ERROR HANDLER

SET

T
(SERSOF

TRAP

.WORD
.WORD
.WORD

812
ESO!
ERR501

RAP

(sCLP

(xLO00P

sBRANCH TO BONSEG WHEN E?RLOOP IS SET

MOV

;GET ISRY CONTENTS

MOV
ERRSOFT

JBRAN(H [F VYES
;SET UP DATA FOR ERROR MESSAGES
;ERROR MANDLER

(xL00P

;BRANCH TO BGNSEG WHEN ERRLOOP |

cATN,ATN,LADS .NDAC,LPAS, (ULPA)

(MP
BEQ

815

MOV
Move

BI(

MOV

BIT

SET

-WORD
RAP

#10,3CSRX
82 ,(HAN

013,31 (RHx

#10,8(SRX
#1,(HAN

JSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
oo LOAD GTS INTO A(R? (l(R))=ceoceJSELECT (HANNEL
JLOAD C(HANNEL NUMBER

HARDWARE TESTS
MACRG MI111Y
TEST 8: DATA TRANSrpR TEST

4675 031200

017737

677 031216

001407

4676 031206

06=SEP=B2

151092

023737

002450

4678 031216

013737

002450

031224
031226
031230

104457
001456
005447

6679 031224

031232

4480 031234

03123¢

104405
112705

031242

104404

4682 031242

0Q0250¢

002502

SEQ 111

S0-5

MOV

9lSRX,BAD

;GET

BEO

613

SBRANCH

MOV

(DAT?7,8AD

(DAT7 . GOND

ERRSOFT B14,6502,ERRSO!

000252

PAGE

(mp

002500

003702

031234
4681 031236

16:46

AB2:

JSRT

CONTENTS

JNDAL LADS,LPAS,
(ULPA)
1F

YES

10005$:

mMovB

#8252,89%

:GET DATA PATTERN

1RAP
.MORD
.WORD

.WORD

CSERSOFT
814
€502
ERRSO1

TRAP

CSESEG

TRAP

($BSEG

4683 031244
4684 031252

052777
012737

000010
000002

151026
002374

8IS
MOV

#10,a(SRX
82, (HAN

;SELECT CMANNEL 2
SLOAD CHANNEL NUMBER

.87 031270
4488 031276

017737
022737

150754
000020

002502
002502

MOV
(mp

allRx,BAD
#20,BAD

SGET 11R2 CONTENTS
;80 B]T IN 1IR2 SHOULD Bf

4490 031306

012737

000020

002500

031314
031316
031320
031322

104457
001457
005406
003702

031324
4693 031326

104406
042777

&6BS 031260
4486 031264
4489 03130¢

4691

031314

4692 03132¢
6694
4495
4696
4497
<698
4499

031334
031342
031350
031356
031360
031366

110577
004737
001410

012737
017737
022737
001410
012737

031366
031370
031372
031374

104457
001460
005406
003702

031376

104406

<500 031376

4501 031400

017737

4505 031422

001414

4502 031406
4503 031412
4504 031416

4506 031424

4507 031426
4508 031430

4509 031432
4510 031436

6511 031444

031444

031446

031450

105037
000337
120537

151012
011060

‘

010537
013737

106457

001461

005566

BEO

MOV

RS ,8 [ DRHX
PC,LO0P
2%

#20,6000

ERRSOFT B1S,ESOV,ERRSD!

(KLOOP

000010

150744

000001
150702
000040

002374
002502
002502

000040

002500

4/%:

BIC

MOV
MOV
(MP
8¢0
MOV
ERRSOFT

150666

002402
002402
002402

002402

43%:

#10,3CSRX

#1,(HAN
al{Rx,BAD
#40,BAD
433
#40,6000
816,E501,ERRSO?

S1DRX,RSAVE

BEO

«.f

SWAB

002500
002402

(LRB
SWAB

002502

MOV

mov

SBRANCH

YES

;ERROR HANDLER

:SELECT CHANNEL

)

SSWAB HIGH AND LOW BYTE

ERRSOFT 817,6802.FRRS01

CSERSOF1
815
ESO!
ERRSO!

TRAP

($CLPI

TRAP
.WORD
.WORD
.WORD

CSERSOFT
816
£501
ERRS01

TRAP

cscLP?

:READ DATA FROM DIR1 REGISTER

RSAVE ,BAD

TRAP
.WORD
.WORD
.WORD

;LOAD (MANNEL NUMBER
:GET TIR1 CONTENTS
‘8] BIT IN IIRY SHOULD BE SET
SBRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE
SERROR HANPLER

SCLEAR LOW BYTE OF IDR
SSWAB DATA FOR (OMPARE
*CORRECT DATA RECEIVED

RS,GOOD

SET

ERRLOOP WAS SET

RSAVE
RSAVE
RS, RSAVE

RS
RS

INTQO DORO====c-==-

SSET UP DATA FOR ERROR MESSAGE

MOV

(LRB
SWAB
(MPB

;e===L0AD DATA PATTERN
SWAIT A LITTLE

;BRANCH TO BGNSEG

(KLOOP

000305

105005
000305

Move
JSR

SET

:SET UP DATA FOR ERROR MESSAGE

ENDSEG

BGNSEG

SHOULD B.

:BRANCH IF YES

SCLEAR HIGH BYTE OF RS
SSWAB HIGH AND LOW BYTE

SSET UP DATA FCR ERROR MESSAGE
Peee

*ERROR HANDLER

TRAP

CSERSOH!

.WORD

£BO.

.WORD

817

WARDWARE TESTS MACRD M1113
TELT B: DATA TRANSFER TEST
031452

003702

031454
031454

104405

6512 031454

(06=-SEP=-82 16:46

YA ¥

4513 031456
4516 031462
64515 031464

005737
001010
062705

002234

6517 0314764

023737

002320

6516 031470

005237

4518 031502

001257

031504
4520 031506

1044064
052777

519 031504
6521
6522
452%
6524
4525
4526
4527
4528

031514
031522
031530
031534
031542
031550
031552
031560

031560
031562
031564
031566
4529 031570
031570
4530 031572
453%1 031600

012737
112777
004737
017737
022737
001410
012737

000002
000014
011060
150510
000020

002374
150540

000020

002500

000010

6541
6542
6543
(544

017737
023737
001410
013737

150366
002434

031720

4567 031722

031722

012737

(MpP

150422

000001

002374

002434

002500

002502
002502

JATN,NDAC,ATN SHOULD BET SET

:GET

A LITTLE

ISR2 CONTENTS

;BRANCH [F YES
:SET UP DATA FOR ERROR MESSAGE

104406
104405

(SERSOFT
819
ES02
ERRS501

TRAP

(sCLP

#10,8(SRx

JSELECT CHANNEL

MOV
(MP
8t0
MoV

81SRX ,BAD
(DAT1,BAD
55%
(DAY GOOD

:GET ISR1 CONTENTS
:ATN,NDAC,ATN, (ULPA) SHOULD BE SET
:BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE

MOV

#1,(HAN

ERRLOOF S SET

BI1(

(xLo0P
59¢:

1RAP
.WORD
.MORD
.WCRD

:BRANCH BACK TO BGNSEG If
:LOAD (HANNEL NUMBER

"ERROR HANDLER

TRAP

001464
005447
003702

($8SEG

JLOAD (MANNEL NUMBER
P
LOAD TCA BIT INTO A(R2==ceee
JWAIT A LITTLE FOR THE BO BI?
:GET JIR2 CONTENTS
;80 BIT
SHOULD BE SET
;BRANCH [F YES
;SET UP DATA FOR ERROR MESSAGE
:ERROR HANDLER

#120040,8BAD

ERRSOFT 820,£502,ERRSO1

104457

TRAP

CWALT

ERRSOFT 819,502 ,ERRSO?

S3%:

JBRANCH |F NO

PC,LOQP

(xLO0P

042777

031716
64566 031720

812,31 CRHX
877,31 DRHX

002500

4539 031650

031712
031716

MOVR
MOVR

TRAP
CSERSOF1
.WORD
818
.WORD
£501
.WORD
ERRSO1
;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
cscLP
ETEE
I LOAD NOT TON INTO A(R? ===ececea;emm—- LOAD UNL INTO DOR2e==e===eccccccee

82 ,(HAN
814,31 (RHX
PC,LOOP
81 IRX ,BAD
#20,8AD
51%
#20,6000
B18,E501,ERRSM

53¢
#120040,G00D

104406

031710

JSELECT CHANNEL 2

BEQ
MoV

031646

4545 031710

#10,8CSRx

8ISRX,BAD

120040

JTERATION (OUNTER

8IS

JSR

0025C2

DONE

A8?2

BGNSEG

MOV

120040

JINCREMENT

BNE

002502

104457
001463
005447
003702

031664
031672
031700
031702

sALL

150440

031636
031640
031642
031644

4540 031656

JTRDEF, I TRCNT

JTRCNT

017737
001410
012737

(3ESEG

g, [

150470
150470

011040

TRAP

;1S QUICK VERIFY PASS SELECTED
:BRANCH IF YES
;CREATE NEW TRANSMIT DATA

(xLOoOP
51%:

ERRSO!

QvP
50%
#21,RS

MoV
MOV8
JSR
MoV
(MP
BEQ
MOV
ERRSOFT

002502
002502

.WORD

187
BNE
ADD

000012
000077

022737

«538 031646

150564

10006%:

104406
112777
112777

64536 031620

4537 031636

50%:

000010

ENDSEG

INC

002322

003702

(04737

4535 031626
4536 031630

002322

104457
001462
005406

4532 031606

4533 031612

000021

Sea 11?2

PAGE 50-6

ENDSEG

(SERSOF1

.WORD
.WORD

820
£502

TRAP

cscLPt

TRAP

($ESto

.WORD
ERRS01
ERRORLOOP IS SE!T

;BRAN(H TO BGNSEG [F
.

10u07'$:

HARDWARE TESTS
TEST

DATA

WA(RG M1113

TRANSFER

0548 031724
031726

000034

4551 031730

045

549

4SS
455
4556 Q31762

031762

106&&

123

062

TSHDB:

SEQ 113

PAGE SO-7
ExIT

104432

031726

4559

TEST

06-SEP-82 16:46

181

TRAP

NL:IST

BEX

LIST
LEVEN
ENDTST

BEx

ASCIZ

CSEx]T

LWORD

10035~

TRAP

(SETST

/XSCYADATA TRANSFER TESTIN/

110075

HWARDWARE
TEST

TESTS

MACRO M1113

06-SEP-82 16:46

SECONDARY ADDRESSING TEST OF

CHANNEL

6556

LSBTTL

SEQ 114

PAGE 51

(LISTENER)

TEST 9: SECONDARY ADDRESSING TEST OF CMWANNEL 1 (LISTENER)

45%7

NNt I

2228

sTHIS TEST CHECKS THE EXTENDED LISTENER INTERFACE FUNCTION .

4561
6562

sPURPOSE OF THIS TEST IS 10 CHECK THE SECONDARY ADDRESSING
;FEATURE OF CHANNEL 1 BY MEANS OF RECEIVING A VALID AS WELL AS AN INVALID

(564

(NN

6558

4563

NIttt

JEX = TEST 9

;MY SECONDARY ADDRESS

6565 031764

031764

005737
001410

002324

031772
031776
032002
032004
032006

033454
000001

4569 032012

012746
012746
010600
104417
062706

4570 032016
4571 032022

005037

004737
004737

002322

042777
112777

010220
010710

000010
000223

6574 032042

112777

6575 032050

013701

4577 032060
4578 032064
4579 032072

010137
032737
001412

4581 032102

052737

6576 032056

062701

000004

000020

002312

7%:

150244
150226

002446

4582 032110

052737

000001

002444

4584 032120

042737

000001

(02446

062737

000001

002444

4586 032134

4587 032142

032142

042737

104404

00C001

000001

4588 032144

052777

000010

4590 032160

113777

002410

4589 032152

012737

4591 032166

004737

4593 032200
6594 032206

012737
017737

6592 032172

6595 032214
4596 032222
6597 0322264
6598 032232

042777

022737
001610
012737

032232
032234
032236
032240

104457
001605
0054006
003702

032242

106406

6599 032242
4600 032244

017737

000002

011060

000010

002442

;CLEAR COUNTER

#10,3CSRX
#22%, 31 (RHX

sSELECT CHANNEL 1
;=== LOAD DAi INTO A(Ri=<e==ccc--

#20,815RHX

pPAf,RY
#40,R1

#1,CDAT4

Seee

. +04

BIC

#1,CDAT6

8IC

#1,CDATS

8lC

#1,CDATS

150126

8IS

#10,3CSRX

150110

Move

MLAY,31DRHX

150100

BIC

#10,3CSRx

002502

(MP
BEQ
MOV
ERRSOFT

002374
002502

000400

002500

Mov

JSR

MoV
MOV

002502

30%:

MOv

:SET ULPA BIT [N COMPARE DATA FOR ISR
Sees

:BRANCH TO BGNSEG

sCLEAR ULPA BIT IN COMPARE DATA FOR ISR
Seee

Seee

sSELECT CHANNEL 2

#2,CHAN

sLOAD CHANNEL NUMBER

PC . LOOP

SWAIT A LITTLE

#1,CHAN
el IRX,BAD

#400,BAD
30%
#400,6000
901,E501,ERR501

TRAP

($BSEG

;====LOAD LISTENER ADDRESS Of (HAN. 1

sSELECT CHANNEL 1

sLOAD CHANNEL NUMBER
sGET IIR1 CONTENTS

JIFC,BIT IN 1IR1 SHOULD BE SET
:BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGES
sERROR HANDLER

TRAP
.WORD
LWORD
.WORD

(SERSOFT
901
[501
ERR501

TRAP

(scePl

;BRANCH TO BGNSEG WHEN ERRLOOP 1S SET

(KLOOP
150006

;CREATE MY LISTENER ADDRESS (MLA)

BIS

BGNSEG

002374

;GET DPA1 ADDRESS

sSTORE MLA
;1S DPA EVEN
sBRANCH [F YES

#1,CDATS

#TSHDY,~(SP)
#,=-(SP)
SP,RO
CSPNTF
#4,5P

Hputaty LOAD APT BIT INTO ISR1=====-

R1,MLAY
#1,0PA1
38

#1,CDAT6

MOV
MOV
MOV
TRAP
ADD

sCLEAR ULPA BIT IN ISR 1 AND 2
sSET UP PARAMETER

MOV
8lT
BEQ

BIS

38:

I TRCNT

MOvVB

8l(
Mov8

19::

;IS THE PNT FLAG SET
IF YES, PRINT THE TEST HEADER
Seee

PC,CULPA
PC,BGIN

BIS

002442

000001
150036

000400

CLR

ADD

000001

4585 032126

RN OR AR RINNRNPONRRRENRRRNOLICOIRRIRROICTROTORIOTRNSTY

PNTF
[4 )
#TSHDO

JSR
JSR

MOV

000040

052737

000411

A9:

150212

002312

4583 032116

(MSA1),

NN RN T RN PRI P N RN IR TR IR

157
8tQ
PRINTF

002410
000007

¢580 032076

eeIe NN NI R RR RN R ARRNRNRONRRNOCTROCEIOIROQROOOICROCY

BGNTST

6566 031764
4567 031770
4568 031772

6572 032026
6573 032034

e Rt

81SRX,BAD

sGET ISR1 CONTENTS

sEQ 115

HARDWARE TESTS
MACRO M1113
06-SEP-82 16:46
PAGE 51~
TEST 9: SECONDARY ADDRESSING TEST OF CHANNEL 1 (LISYENER)

4601 032252
4602 032260
4603 032262

023737
001410
013737

032270
032272
032274
032276
4605 032300
032300
6606 032302

104457
001606
005447
003702

4604 032270

4607
4608
4609
4610
4611
4612
4613

032310
032316
032322
032326
032332
032340
032346

4614 032352
4615 032360
4616 032362
4617 032366

106406

002500

022737

000000

104406

012737
017737
001410
012737

000010

000001
147630

010100
010100

4628 032660

023737

002446

4630 032470

013737

002446

032476
032500
032502
032506
4632 032506
032506

106457
001611
005447
003702

6627 032452

017737

4629 032466

001410

104406

4633 032510

017737

4635 0325264

001410

«63L 032516

4636 032526

4637 032536

147770
002374

40%:

147736
002502

(€02502

8IS
MOV
MOV
ADD
MOV
MOVB
JSR
MOV

CMP
BEQ

#10,3CSRX
#2.CHAN
MLAT,R1
#100.R1
R1,M$A1
MSA1,.3IDRHX
PC,LOOP
aliRX,BAD

#0,BAD
414

CLR
GOOD
ERRSOFT 903,E501,ERRSO1

147672

0023764
002502

41%:

002502

002502
002500

002502

123737

002420 002502

013737

002420

002500

‘SET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

*APT,INT1 BIT IN IIR1 SHOULD BE SET

428
#10100,G00D

MOV

21SRX,BAD

BEOQ

ass

CMP

MOV

CDAT6.BAD
CDAT

ERRSOFT 905, 5502 ERR501

43%:

*1IR2 SHOULD BE ZERO
*BRANCH IF YES

#10100,8AD

CKLOOP
147550

‘LOAD CHANNEL NUMBER
TGET MLAY
*CREATE MSA1
‘STORE MSA1 TO LOCATION MSA1
seemcece LOAD MSAT INTO DOR2=====e=e=e
TWAIT A LITTLE
SGET I1IR2 CONTENTS

CMP

#1,CHAN
a11RX.BAD

ERRSOFT 904 ,E501,ERRSO?

42%:

TRAP
(CSERSOFT
LWORD
902
"WORD
ES02
.WORD
ERRSO01
:BRANCH TO BGNSEG wrEN ERRLOOP IS SET
TRAP
C$CLP1
JSELECT CHANNEL 2

#10,3CSRX

CKLOOP
147600

*ERROR HANDLER

BIC

MOV
MOV
BEQ
MOV

002500

;ATN,ATN,NDAC LPAS, (ULPA) BIT SET
‘BRANCH [F YES
PSET UP DATA FOR ERROR MESSAGES

TRAP
CSERSOFT
.MORD
903
-WORD
ESO1
.WORD
ERRSO01
:BRANCH BACK TO BGNSEG 1r ERRLOOP IS SET
RAP
(SCLPI
;SELECT CHANNEL 1

CKLOOP

104457
001610
005406
003702

104406

CDAT4,BAD
408
CUAT4,GOOD

ERRSOFT 902,€502,ERRSO1

104457
001607
005406
003702

032440
032442
032444
032446
4626 032450
032450

4631 032476

(MP
BEO
MOV

CKLOOP

005037

022737
001407

4622 032422

4625 032440

002442

000010
000002
002410
000100
002420
002420
011060
147700

042777

4623 032430
4624 032432

002502

052777
012737
013701
062701
010137
113777
004737
017737

032366
032370
032372
032374
4618 032376
032376
4619 032400

4620 032606
4621 032416

002642

MOV

alCRX,BAD

BEQ

448

CMPB

MOV

MSA1,BAD

MSA1,G0OOD

ERRSOFT 906,901, ERRSOY

*LOAD CHANNEL NUMBER
SGET IIR1 CONTENTS

‘BRANCH [F YES
‘SET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP
(SERSOF T
904
.MORD
ESO1
.WORD
ERRS01
.WORD
:BRANCH BACK TO BGNSEG 1r ERRLOOP 1S SET
TRAP
(S$CLPI
:GET ISR1 CONTENTS

*ATN,DAV,NDAC ,NRFD,ATN,LPAS(ULPA) IS SET

‘BRANCH {F YES

‘SET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

CSERSOFT
TRAP
905
.MORD
ESO2
WORD
ERRSO1
"WORD
:BRANCH BACK TO BGNSEG If ERRLOOP 1S SET
C$CLPY
TRAP
:GET ICR1 CONTENTS

‘MSA1 ADDRESS SHOULD BE SET
‘BRANCH IF YES

*SET UP DATA FOR ERROR MESSAGE

‘ERROR HANDLER

HARDWARE
TEST

TESTS

MACRO M1113

SECONDARY

ADDRESSING TEST

032534
032536
032540
032542

104457
001612
005644
003702

032544

104406

4638 032544

4639 032546
4640 032554
4661 032562

052777
012737
017737

4663 032576
4644 032600

001410
012737

032606
032610
032612
032614

104457
001613
005447
003702

032616
4647 032620

104406
062777

4649 032636

112777

4642 032570

4645 032606

4646 032616
4648 032626

06-SEP-82 16:46

022737

CHANNEL

000010
000002
147470

170040

147524
002374
002502

000010

147452

017737

1476410

002402

4652 032656
4653 032660
4654 032666

001413
013737
013737

002444
002402

002500
002502

0056447
003702

032704

104406

4656 032704

000201

002644

052777

000010

4659 032722
4660 032730

017737
022737

147322
000020

4661 032736
4662 032740

012737

4663 032746

001413
012737
013737

032754
032756
032760
032762

104457
001615
005406
003702

032764

106406

4664 032754

4665 032764

4666 032766
4667 032774

032774

112777

002374

000020

002500

002602

000077

032776
4669 033000

104404
052777

000010

4671 033014

113777

0026410

012737

45
#170040,6000D

*BRANCH IF YES
PSET UP DATA FOR ERROR MESSAGE

#170040,8A0

SATN,DAV,NDAC,ATN,NRFD SHOULD BE SET

#10,3CSRX

move

#201.3ICRHx

MOV

BEQ
MOV
MOV

#1,CHAN

002502

147302

ieee-- LOAD DACR INTO ACR1=========ae

468
CDATS,GOOD
RSAVE ;BAD

‘BRANCH IF YES
‘SET UP DATA FOR ERROR MESSAGE
...

CDATS ,RSAVE

COPA9:

000002

CONTENTS

‘ERROR HANDLER

TRAP
.WORD

"WORD
.WORD

MOV
CMP

al [RX,RSAVF
#20,RSAVE

‘GET IIR2 CONTENTS
‘B0 BIT SHOULD BE SET

ENDSEG

#2, CHAN

ESO2
ERRSO1

50%
czo.cooo

RSAVE ,BAD

#77.a3lDRHX

#10,3CSRX

1472564

MOVB

MLAT,alDRWX

#2.CHAN

($CLPI

‘BRANCH IF VES
PSET UP DATA FOR ERROR MESSAGE
fees

*ERROR HANDLER

TRAP
.MORD
"WORD
"WORD

CSERSOFT
909
E501
ERRS01
:BRANCH BACK TO BGNSEG If ERRLOOP 1S SET
TRAP
C$CLP]
;===LOAD UNL INTQ DOR2-====ee=ecececceea100008:

BIS

RAP

*LOAD CHANNEL NUMBER

BGNSEG

MOV

CSERSOFT
908

:BRANCH BACK TO BGNSEG 1r ERRLOOP 15 SET

147272

002374

ISR1

*ATN,NDAC,ATN,LADS,LPAS (ULPA) IS SET

;SELECT CHANNEL 2

MOVB

($CLPI

ERRLOOP IS SET

‘GET

ERRSOFT 909,E501,ERRSO1

508:

TRAP

aISRX,RSAVE

#10,3CSRX

BEQ
MOV
MOV

(SERSOFT
907
£502
ERRSO1

*LOAD CHANNEL NUMBER

BIS

MOV

TRAP
.WORD
uoao
ORD

TO BGNSEG xr

;SELECT CHANNEL 1

ERRSOFT 908,E502,ERRSO?

002402
002402

*ERROR HANDLER

:BRANCH BACK

BIC

CMP

46%:

($CLPI

ERRLOOP IS SET

BEQ
MOV

CKLOOP

104405

4670 033006

147364

RAP

;SELECT CHANNEL 2
‘LOAD CHANNEL NUMBER
SGET ISR2 CONTENTS

MOV

002402

000002

032774

4668 032776

147426

(SERSOFT
906
€901
ERRSO1

010.acsnx
#2,CHAN
S1SRX . BAD

CKLOOP

4657 032706
4658 032714

45%:

TRAP
.WORD
"WORD
.WORD

BIS
MOV
MOV

ERRSOFT 907,E502,ERRS01

104457
001614

032700
032702

:BRANCH BACK TO BGNSEG

CKLOOP

4650 032642

032674
032676

(LISTENER)

CMP

002500

002374

4655 032674

44%:

002502

000001

023737

SEQ 116

51-2

CRLOOP

012737

4651 032650

PAGE

;SELECT CHANNEL 2

LOAD CHANNEL NUMBER

TRAP

CSESEG

TRAP

($BSEG

Geee- LOAD LISTENER ADDRESS OF CHANNEL 2--

SEQ 117

HARDWARE TESTS
MACRO M1113
06-SEP-82 16:46
PAGE 51-3
TEST 9: SECONDARY ADDRESSING TEST OF CHANNEL 1 (LISTENER)

4672 033022

004737

011060

4674 033036

012737

000001

002374

022737

000007

002502

012737

000001

4673 033026

4675 033042

4676 033050

4677 033056

4678 033060

4679 033066

017737

001410

033066
033070
033072
033074

104457
001616
005406
003702

033076

104406

4680 033076
4681
4682
4683
4684
4685
4686
4687

042777

000010

147202

alfrRx,BAD

000001

002374

002442

002500

033216
033220

104457
001617

4697

4698
4699
4700
4701
4702
4703
4704

033222
033224
033226
033224
033230
033236
033246
033252
033260
033262
033270
033270

106406
052777
012737

017737
022737
001410
012737

104457
001620
005406
003702

033300
4706 033302

104406
112777

033310
033310

104405

4707 033310

4708
4709
4710
4711

033312
033316
033320
033324

BEOQ
MOV

005737
001054
005737
001007

#1,BAD

30§

#1,600D

ERRSOFT 910,€501,ERRSO1

000010

000001
147060
147060
002442

30%:

147140

147130

147104
002502
002502
002502

147042
002374
002502
002502

000020

002500

002234

002322

146766

IIR1

SHOULD BE

SET

*SET UP DATA FOR ERROR MESSAGES

$ERROR HANDLER

TRAP
LMORD
.WORD
.WORD

CSERSOFT
910
ESO1
ERR501

TRAP

CS$CLP1

MOV

#1,CHAN

SLOAD

#10.,3CSRX

#1.31CRHX
alIRX,BAD
1SRX .BAD
CDAT4.BAD
463
CDAT4,GOOD

ERRSOFT 911,602, ERRS01

S50%:

‘BRANCH IF YES

;SELECT CHANNEL 2
*LOAD CHANNEL NUMBER
SGET MLAI
*CREATE MSA1
SSTORE MSA1 TO LOCATION MSA1
PR, LOAD MSAT INTO DOR2==========
SWAIT A LITTLE

BIS
MOV
MOV
CMP
BEQ
MOV
ERRSOFT

SSELECT CHANNEL 1
CHANNEL

NUMBER

pPEbaied LOAD NOT DACR INTO ACRl===e===e
*READ IIR1 FOR CLEAR THE BITS
SGET ISR1 CONTENTS
*ATN,NDAC,ATN,LPAS (ULPA) IS SET
:BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP
LWORD

CSERSOFT
911

MORD
.WORD
.WORD

912
ESO?
ERRSO1

"WORD
-WORD

#10,3CSRX
#2,CHAN
aliRX,BAD
#20,BAD
50%
#20,G00D
912,501 ,ERRS501

(KLOOP

000077

*MAC BIT

#10,3CSRX
#2.CHAN
MLAT,R1
#100.R1
R1,M$A1
MSA1,a3I1DRHX
PC,LOOP

MOVB
MOV
MOV
CMP
BEQ
MOV

46%:

SGET IIR1 CONTENTS

:BRANCH TO BGNSEG WHEN ERRLOOP IS SET

CKLOOP

000010
000002
147000
000020

SSELECT CHANNEL 1

BIS
MOV
MOV
ADD
MOV
MOVB
JSR

BIC

005447
003702

033272
033274
033276

4705 033300

CMP

CHAN

CKLOOP

012737

4696 033216

MOV

002500

4689 033150

112777
017737
017737
023737
001410
013737

:LOAD CHANNEL NUMBER

MOV

147172
002374

033156
033164
033172
033200
033206
033210

#5,

002502

000010
000002
002410
000100
002420
002420
011060

4690
4691
4692
4693
4694
4695

SWAIT A LITTLE

#10,3CSRx

052777
012737
013701
062701
010137
113777
004737

042777

PC,LOOP

BIC

033100
033106
033114
033120
033124
032130
033136

4688 033142

JSR

167244

ES02
ERRS01
;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
CSCLPY
;SELECT CHANNEL 2
*LOAD CHANNEL NUMBER
SGET I1IR2 CONTENTS
:B0 BIT SHOULD BE SET
:BRANCH IF YES
PSET UP DATA FOR ERROR MESSAGE
JERROR HANDLER
TRAP
CSERSOF
T

:BRANCH BACK TO BGNSEG

MOVB
ENDSEG

#77,31DRHX

15T
BNE
151
BNE

Qvp
EXOV9
[TRCNT
i

;===LOAD UNL

ERRLOOP

IS SET

TRAP
C$CLPI
INTO DOR2=e=eeececccecccean

10001$:

TRAP

CSESEG

;1S QUICK VERIFY PASS SELECTED
SIF YES EXIT TEST
1S THIS THE FIRST TIME THROUGH THE
*BRANCH IF NO

TEST

B 10
HARDWARE
TEST

4712
4713
4716
4715
4716

TESTS

MACRO M1113

SECONDARY

033326
033336
03330
033346
033350

4717 033356
4718 033360

06-SEP-82 16:46

ADDRESSING TEST

013737
005037
005237
005237
023737
001002
005237

002312
002312
002322
002312
002312
002312

CHANNLL

002406

002314

4719 033364

022737

100037

002312

4721

052777

000010

146676

4720 033372

033374

4722 033402
4723 0336410

001423

112777
006737

000217
011072

1%:

2%:

146660

062777

000010

146650

4727 033436
(728 033442
4729 033450

000137
013737

032026
002406

002312

6726 033430

033450
730 033452

4731

4732 033454
4733

113777

045

L7346

123

062

(LISTENER)

MOV
CLR
INC
INC
CMP

DPA1,SDPA
DPA1
[TRCNT
OPA1
OPA1,DPA2

:SAVE e~renso DPA1
‘CLR DPA
SSET fLAG TO SEF FIRST
SGET NEW DPA1
‘1S DPA1 = DPA?

CMP

#37,DPA1

*ALL DONE

BNE
INC

28
DPA1

BEQ

313

BIS

#10,3CSRX

MOVB

:17 aICRHx

0217 alcnux

BIC

146616

1064432
000074

MOVB
3%:
EXQV9:

TSHD9:

JMP
MOV
EXIT

104401

SSELECT CHANNEL ¢

----- LOAD SIC INTO ACR 2=cecceceecs
SWAIT A LITTLE

----- LOAD NOT SIC INTO ACR 2=====

‘REPET THE TEST WITH THE NEW DPA1
RESTORE ENTERED DPA1

CHANNEL

LOAD NEW DPA1 INTO ADRI

TRAP
.WORD

LIST

BEX

ENDTST

‘BRANCH IF YES

A9
SOPA,DPA

BEX

.ASCIZ

:BRANCH IF NO
S INCREMENT DPA?

SSELECT

DPA1 o1 IRHX
TST

TIME PASS

#10,3CSRX

NLIST

LEVEN

4735 033546

033546
033546

002312

SEQ 118

S1-4

MOVB
JSR

4724 033614 112777 000017 146646
4725 033422

PAGE

/%S2XASECONDARY ADDRESSING TEST OF

CHANNEL

CSEXIT
L10036-.

(LISTENER)IN/

£10036:

TRAP

(CSETST

HWARDWARE

TEST

10:

TESTS

MACRO M1113

06-SEP-82 16:46

SECONDARY ADDRESSING TEST OF

PAGE

CHANNEL 1

757

LSBTTL

SEQ 119

(TALKER)

TEST 10: SECONDARY ADDRESSING TEST OF CHANNEL 1 (TALKER)

4738

:t"'Qt"'.0"'""'t"'t"'"'"'""""QQ"t""'t""'QQ'Q'QQ"Q"'Q'

6739

6762

;PURPOSE OF THIS TEST IS TO CHMECK THE SECONDARY ADDRESSING

(764

;MY SECONDARY ADDRESS (MSA1),

2;2?

1EX = TEST

sTHIS TEST C(HECKS THE EXTENDED TALKER INTERFACE FUNCTION .

6763

:FEATURE OF

l.?l.s

CHANNEL

BY MEANS OF

RECEIVING A VALID AS WELL AS AN INVALID

;""'00'0"""""""0""0'""Qt""'.'.Q."".Q'.'QQ'D'Q"'Q'Q'Q'QQQ

4746 033550

033550

BGNTST

64767 033550
4748 033554

005737
001410

002324

033556
033562
033566
033570
033572
4750 033576
4751 033602

012746
012746
010600
104417
062706
005037
004737

035224
000001

6753 033612

042777

000010

146460

112777

000020

146426

4749 033556

4752 033606

4754 033620

6755 033626

4756 033634

004737

112777

013701

47157 033640
4758 033644

062701
010137

4761 033660

4759 033650
4760 033656

TST
BEQ

PRINTF

000004
002322
010220
010710

000223
002312

000100
002414

146442

032737
001412

000001

002312

052737

000001

052737

000001

002452

4763 033674

052737

000001

002440

4765 0337064

042737

4762 033666

4764 033702
64766 033712
4767 033720
4768 033726

033726

000411

042737
042737

104404

002452

146342
002374

000001
000001

4769 033730
4770 033736

052777
012737

000010
000002

6772 033752

004737

011060

4774 033764

012737

4771 033744

6«77 033756
4775 033772
4776 034000
4777 034006
4778 034010
4779 034016

034016
034020
034022
034026
4780 034026
034026
4781 034030

113777

042777

017737
022737
001410
012737

002414

000010

002436
002440

A10:

BIC

#10,3CSRx

sSELECT CHANNEL 1

MOVB

220,91 SRHX

017737

MOVB
MOV

ADD
MOV

#22%,31CRNxX
oPAf,RY

#100,R1
R1,MTAY

leee

#1,CDAT3

+34

(MTA)

sSET ULPA BIT IN COMPARE DATA FOR ISR
Peee

*BRANCH TO BGNSEG

BIC

#1,CDATS8

;CLEAR ULPA BIT [N COMPARE DATA FOR ISR

BIS
MOV

#10,3CSRX
#2,CHAN

;SELECT CHANNEL 2
:LOAD CHANNEL NUMBER

JSR

PC,LOOP

SWAIT A LITTLE

BIC
BIC
BGNSEG

MOVB
MOV

30%:

*GET DPA1 ADDRESS

SCREATE MY TALKER ADDRESS
:STORE MTA

#1,CDAT?

MOy
cmP
BEQ
MOV
ERRSOFT

002502

;e=e=0AD APT BIT INTO [SRlecccccccecee

8IS

#1,CDAT2
#1,CDAT3

MTAY,31DRHX

#10,3CSRX
#1,CHAN

a11RX,BAD
#400,8AD
30%
#400,600D
1001,€6501,ERRS01

(KLOOP
146222

i2eealGAD DA] INTO A(Rl-=cccccccccececea

;1S DPA EVEN
:BRANCH IF YES

#1,CDATS

#T5MD10,=(SP)
#1,-(SP)
SP,RO
CSPNTF
8 ,5P

:SET UP PARAMETER

#1,0PA1
s

BIS

3$:

PC,BGINZ

817
BEO

BIS

104457
001751
005406
003702
104406

JSR

002502
002502
002500

MOV
MOV
MoV
TRAP
ADD

;CLEAR ITERATION COUNTER
SCLEAR ULPA BIT IN ISR 1 AND 2

BIC

000400

146252
000400

HEADER

[ TRCNT
PC,CULPA

146314

002374

Jees

(LR
JSR

146324

000001

#TSHD10

110::

;1S THE PNT FLAG SET
:1F YES, PRINT THE TES?

7%:

002436

000001

PNTF
7%

MOV

S1SRX,BAD

Teee
Seee

TRAP

($BSEG

s====LOAD TALKER ADDRESS OF CMANNEL 2=-=<

;SELECT CHANNEL 1

:LOAD CHANNEL NUMBER

:GET I1IRY CONTENTS
<IFC,BIT [N 1IRY SHOULD BE SET
:BRANCH IFf YES
:SET UP DATA FOR ERROR MESSAGES
:ERROR HANDLER

TRAP
(SERSOFT
.WORD
1001
.WORD
ESOV
.WORD
ERRSO1
;BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
CSCLPY
sGET ISRT1 CONTENTS

0D 10
HARDWARE
TEST

10:

TESTS

MACRO M1113

SECONDARY

ADDRESSING

06-SEP-82 16:46
TEST OF

4782 034036

023737

002436

002502

4784 034046
4785 0340564

013737

002436

002500

4783 034044

001410

036054
034056
034060
034062

106457
001752
005447
003702

034064

104406

4786 034064

4787
4788
4789
4790 034106
4791 036112

4792 0364116
4793 034126

4794 034130
4795 034136

4796 034144

4797 034146
4798 034152

034152
034154
034156
034160
4799 034162
034162
4800 034164

052777
012737
013701
062701
010137

113777
004737
017737
022737

0014G7
005037

022737

010100

034224
034226
034230
034232
4807 034234
034234

104457
001754
005406
003702

4809 034244
4810 034252
4811 034254
4812 034262

023737
001410
013737

4816
4815
4816
4817
4818

036274
034302
034310
036312
034320

(MP

40$:

146152

(DAT2,BAD

408

104406

017737

000091
146044

;BRANCH TO BGNSEG wr'EN ERRLOOP IS SET

010100

146014

002502

002452

002500

104457
001755
005447
003702

104406

017737
123737
001410
013737

aliRX,BAD
#0,BAD

SGET IIR2 CONTENTS
:1IR2
SHOULD BE ZERO

61§

BIC

#10,3CSRX

CMP

#10100,8AD

MOV

CMP
BEQ
MOV
ERRSOFT

002502
002502

002420

002500

43$:

MOV
CMPB
BEQ
MOV
ERRSOFT

teeceae LOAD MSAT
‘WAIT A LITTLE

INTO DOR2====seeea-

*BRANCH IF YES

YSET UP DATA FOR ERROR MESSAGE
‘ERROR HANDLER

TRAP
CSERSOFT
.WORD
1003
.WORD
ESO}
-wORD
ERRSO1
:BRANCH BACK TO BGNSEG If ERRLOOP 1S SET
TRAP
CS$CLPT
SSELECT CHANNEL 1

#1, CHAN
aliRX.BAD

‘LOAD CHANNEL NUMBER
SGET II71 CONTENTS

423
#10100, 600D

‘BRANCH IF YES
‘SET UP DATA FOR ERROR MESSAGE

3ISRX,BAD

CDAT8.BAD
43%
CDAT8,G00D
1005,E502,ERRS01

CKLOOP
145764
002420

C$CLP!

MOV
CMP

MSA1,alDRHX
PC,LOOP

ERRSOFT 1004 ,E50%, ERRS01

42%:

TRAP

SSELECT CHANNEL 2
;LOAD CHANNEL NUMBER
TGET MTA1
‘CREATE MSA1
“STORE MSA1 TO LOCATION MSA1

CKLOOP

002452

(SERSOFT
1002
ESO?
ERRSO!

#10,3CSRX
#2,CHAN
MTAT,R1
#40,R1
R1,MSA1

BEO
MOV

002500

TRAP
LWORD
.WORD
.WORD

BIS
MOV
MOV
ADD
MOV

MOV
MOV

002502

TPAS, (ULPA) BIT SET

(KLOOP

CLR
600D
ERRSOFT 1003,E501,ERRS01

146106

‘BRANCH IF YES

*SET UP DATA FOR ERROR MESSAGES
*ERROR HANDLER

BEQ

002374
002502

SATN,ATN,NDAC

MOV
(DAT2,600D
ERRSOFT 1002.£502.ERRSO1

MOVB
JSR

002500

000010

001410
012737

034262
034264
036266
034270
4813 036272
0346272

002502
002502

042777

4804 034214
4805 034216

4808 034236

146114
000000

002420
011060

(TALKER)

CKLOOP
012737
017737

4806 036224

146204
002374

SEQ 120

52-

BEOQ

457
31

4801 0364172
4802 034200

4803 034206

000010
000002
002474
000040
002420

CHMANNEL

PAGE

31CRX,BAD
MSA1,BAD
448
MSA1,GOOD
1006,E901,ERRS01

*APT,INT1 BIT IN IIR1 SHOULD BE SET
*ERROR MANDLER

TRAP
(SERSOFT
.MORD
1004
.WORD
ESO1
.WORD
ERRSO1
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
csCLPl
:GET ISR1

CONTENTS

*ATN,DAV,NDAC ,NRFD,ATN, TPAS(ULPA)
‘BRANCH 1F YES
‘SET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

1S SET

TRAP
(SERSOFT
.MORD
1005
.WORD
E502
-WORD
ERRSO1
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
C$CLPI
:GET ICR1 CONTENTS
‘MSA1 ADDRESS SHOULD BE SET
‘BRANCH IF YES
‘SET UP DATA FOR ERROR MESSAGE
JERROR HANDLER

HARDWARE

TEST

10:

TESTS

MACRO M1113

(06=-SEP=B2

SECONDARY ADDRESSING TEST CF

034320
034322
034324
034326

001/56
005644
003702

034330

104406

4819 034330

000010

4822
4823
(8246
4825

036346
036356
034362
034364

017737
022737
001410
012737

145704
170040

002502
002502

170040

002500

034372
034374
034376
034400

1046457
001757
005447
003702

036402

104406

4827 036402

012737

000002

145740

002374

042777
012737

000010
00000

145666
002374

(831 034426
(832 034434

017737
023737

145624
002440

00502
002502

4R33 036442

4836 036666

4835 034452

112777

001410

013737

034652
034454
034456
034460

104457
001750
005447
003702

034462

104406

4836 034462
4837 034464
4838 0346472

000201

002440

4839 034500
4840 034506

000010
000002

4842 034516

012737

000020

5364530
034532

104457
001761
005406
003702

034534

104406

4843 034524
034524
034526
4844 034534

4B4S 034536

48466 034544

034544
034544

4847 034546
4848
849
4850
4851

034546

034550
(034556
034564
034572

4852 034576

001410

112777

106404

042777

BIS

MOV

MOV
CMP
BEQ
MOV

ERRSOFT

&5%:

145642

BIC
MOV

MOVB

MOV
CMpP

002500

145544
000020

145606
002374

46%:

145532

SGET ISR2 CONTENTS
:ATN,DAV,NDAC,ATN.NRFD SHOULD BE
JBRANCH |F YES
SSET UP DATA FOR ERROR MESSAGE

#2 ,CHAN

1007,6502,ERRS01

COPA10:
000010
000002
002414
011060

000010

145522
002374
1465504

165474

CHANNEL

:LOAD CHANNEL NUMBER

SERROR HANDLER

;BRANCH BACK

TO BGNSEG

#10,3CSRX
#1,CHAN

SSELECT CHANNEL 1
:LOAD CHANNEL NUMBER

alSRX,BAD
CDAT3,BAD

:GET ISR1 CONTENTS
JATN NDAC,ATN,TADS,TPAS

#201,alCRHX

ERRSOFT

1008,E502,ERRSO1

SERROR HANDLER

(DAT3,G00D

SSET

YES

TO BGNSEG

BIS
MOV
MOV
CMP

#1C,3( SRX
#2,CHAN

;SELECT CHANNEL 2
:LOAD CHANNEL NUMBER

MOV

#20,600D

50%

‘BRANCH IF YES

ENDSEG

#137,a10RHX

BI(

#10,3CSRx

TRAP

(S$CLPI

ERRLOOP

S SET

(ULPA)

]S SET

TRAP
.WORD
.WORD
.WORD

CSERSOF T
1008
ESO?
ERRS0?

TRAP

cscLePl

ERRLOOP

IS SET

$SET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP
.WORD
.WORD
.WORD

(SERSOFT
1009
ESO1
ERRSO1

TRAP

($CLPI

TRAP

(SESEG

TRAP

($BSEG

;BRANCH BACK

T0 BGNSEG

;===LOAD UNT

INTQ DOR2=c=ccccccccaccccean

10000$:

#10,3CSRX
#2,CHAN
MTAT,alDRHX
PC,LOOP

CSERSOF T
1007
E502
ERRSO1

:GET IIR2 CONTENTS
180 BIT SHOULD BE SET

BGNSEG
BIS
MOV
MOVB
JSR

TRAP
.WORD
.MORD
.WORD

UP DATA FOR ERROR MESSAGE

;BRANCH BACK

alIRX,BAD
#20,BAD

SET

jemme- LOAD DACR INTO A(R1=e=eecccccee

‘BRANCH

MOVB

(S$CLPI

ERRLOOP 1S SET

a1$RX,BAD
#170040,BAD
5%
#170040,6000

ERRSOFT 1009,€501,ERRSO1

50%:

TRAP

:SELECT

(KLOOP

000137

(SERSOFT
1006
E901
ERRSO1

#10,3CSRX

463

BEOQ

002500

TRAP
LWORD
.WORD
.WORD

TO BGNSEG If

BEO

MOV

002502
002502

104405
052777
012737
113777
004737

44$:

:BRANCH BACK

CKLOOP

052777
012737
017737
022737

4841 034514

(TALKER)

(KLOOP

4828 034404
4829 034412

4830 034420

SEQ 121

§52-2

CKLOOP

052777

4826 034372

CHANNEL

PAGE

104’57

4820 034332

4821 034340

16:46

ERRLOOP

sSELECT CHANNEL 2
JLOAD C(HANNEL NUMBER
i====LOAD TALFER ADDRESS OF
SWAIT A LITTLE

SSELECT CHANNEL 1

(HANNEL

SET

Q===

F
MARDWARE

TEST

10:

TESTS

4854 03461¢
4855 034620
4856 034626

6857 034630

«858 034636

034636
034640
034642
034646

4859 034646

034646

034650
034656
034664
034670
034674
Q34700
034706
034712
034720
034726
034734
034742
034750
034756
034760

012737

017737
022737
001410

012737

104406

052777
012737
013701
062701
010137
113777
004737
042777
012737
112777
017737
017737
023737
001410
013737

034776

104406

035000
035006
035014
035022
035030
035032
035040

052777
012737
017737
0022737
001410
012737

035040
035042
035044
035046

104457
001764
005406
003702

035050

104406

4884 035050

4885 035052
4886 035060

035060
035060
4887 03502
4888 0350.6

145432
000001

0000uY

002374

MOV

112777

104405

,(HAN

JLOAD (MANNEL NUMBER

81,

BAD

:MAC BIT

MOV

311Rx,BAD

002500

BEQ
MOV

30§

145360
002374
14§334
002502
002502
002502

002436

002500

(MP

#1,G00D

ERRSOFT 100,£501,ERRSOY

145422
002374

30%:

145370

BIS

#10,aCSRX

82 ,(HAN
MTAY R
840 ,R1
R1,MSA1T
MSAY,alDRHX
PC,LO0P

MOV
MOVB
MOV
MOV

#1,CHAN
81 ,8] (RNX
a11RX,BAD
S1SRX .BAD

#10.3CSRx

CMP
BEO

CDAT2.BAD
468

ERRSOFT

1011,£502,ERRSO

MOV

JBRANCH [F

JIRY

SHOULD BE

YES

SET

:SET UP DATA FOR ERROR MESSAGES
:ERROR

MANDLER

TRAP

C(SERSOFT

.WORD
.WORD
.WORD

1010
€SO

TRAP

(sCL P

ERRSO1
JBRANCH TO BGNSEG WHEN ERRLOOP ]S SET

MOV
MOV
ADD
MOV
MOVB
ISR

BIC

:GET JIR1 CONTENTS

(DAT2.G00D

JSELECT CHANNEL 2

:LOAD CHANNEL NUMBER
JGET MLAY
JCREATE MSA1
:STORE MSAY

TO LOCATION MSAT

;ooeme- LOAD MSA1
SWALT

A LTTTLE

[INTQO DOR2=~ee=ce==-

JSELECT CHANNEL 1
JLOAD CHANNEL NUMBER
mmee- LOAD NOT DA(CR INTO A(Rlececccee
JREAD [IRY FOR (LEAR TWE BITS
:GEYT ISR1 CONTENTS
JATN NDAC ,ATN,TPAS

;BRANCH [F

;StT

YES

DATA

FOR

;ERROR HANDLER

(ULPA)

ERROR

SET

MESSAGE

TRAP

T
(SERSOF

.WORD
.WORD

€502
ERRSO1

TRAP

($CLP

WORD

;BRANCH BACK

(KLOOP

000010
000002
145230
000020

145272
002374
002502
002502

000020

002500

46%:

BIS

#10,3CSRx

MOV
(MP

aliRx,BAD
#20.BAD

MOV

#20,600D

MOV

BEQ

#2.CHAN

50$

ERRSOFT 1012,€501,ERRSO!

TO BGNSEG

JSELECT CHANNEL 2
SLOAD (HANNEL NUMBER
:GET 1IR2 CONIENTS
JBO BIT SHOULD BE SET

:BRANCH IF VES
JSET UP DATA FOR ERROR MESSAGE
J;ERROR MANDLER
TRAP

002322

4891 035076
4892 035104

013737
005037

002312
(002312

145216

0022%

50%:

MOvB
ENDSEG

#137,31DRHX

181

QvpP

151

ITRONT

BNE
002406

BNE

MOV
(LR

[S SET

(SERSOFT

1012
gson
ERRSO1
.WORD
;BRANCH BA(CK TO BGNSEG IF ERRLOOP IS SEU

(KLOOP

000137

1011

ERRLOOP

.WORD
.WORD

«B89 035070

001007

002502
002502

Q00010
000002
002414
000040
002420
002420
011060
000010
000001
000001
145310
145310
002436

SEQ 122

PAGE 52-3
1 (TALKER)

(XLOOP

005737
001054
005737

4890 035074

(MANNEL

005406
003702

104457
001763
005447
003702

4876 034776

000001

16:46

104457
001762

4875 034766
034766
034770
034772
034774
4B77
4878
4879
4880
«881
«882
4883

(06-SEP-B82

SECONDARY ADDRESSING TEST CF

6853 034604

4B60
4861
4862
4863
4B64L
LB6S
4866
4867
4868
(B69
4870
4871
4872
4873
4B74

MA(CRO M1113

;===LOAD UNT

DPA1,SDPA
DPAI

($(LPI

TRAP

{SESEG

INTQ DOR2-======ce=c-c--10001$:

Exovio

TRAP

21S QUICK VERIFY PASS SELECTED
JIF YES EXIT TEST
:1S THIS THE FIRST TIME THROUGH Twt
;BRANCH

sSAVE ENTERED DPAY
;LR DPAY

TES!

6 10
WARDWARE

TEST

10:

TESTS

MACRG M1113

06-SEP-B2

SECONDARY ADDRESSING TEST CF

893 035110

005237

002322

895 035120

023737

002312

002314

002312

4894 035114

005237

002312

001002

4898 035134
4B99 035142
4900 035144

022737
001423
082777

000037

002312

000010

64502 035160

004737

011072

4904 035172

042777

4906 035206
4907 035212
4908 035220

000137
013737

490% 035192

4903 035164

4905 035200

005237

112777

112777
113777

035220
035222

104432
000072

23}} 035224

045

4909

(910

i$:

INC

[TRONT

JSET FLAG TO SEE FIRST TIME PASS

DPA1 ,DPA2

:1S DPAY

DPAI

(mp

BNE

INC

DPA

:GET NEW

DPAI

= DPA?2

JBRANCH IF

s INCREMENT DPAT

145126

(mp
B8EQ
8IS

#37,0PA0
b1
#10_ 9CSRX

;BRANCH IF YES
JSELECT CHMANNEL

000017

145076

MOVB

JSR

PC,

WAIT

002312

145046

MOV8

000217

CN0010
033612
002406

123

145110

MOvVB

145100
C02312

€62

0217.31(Rnl

BIC
3%:

E¥Qv10:

TSHDI10:

Jmp
MOV

EXIT

WALT

l\’.il(fiwx
#10,a(SR»

oPAf,a11RHX
18T

.NLIST

.A?g¥l

LEVEN
ENDTS)

1046401

SEQ 123

52-4

(TALKER)

4913
4914 035314

035314
035314

(MANNEL

PAGE

4896 035126

897 035130

16:46

A0
SDPA,DPAT

:ALL DONE

;=o===L0AD SI( INTC A(R 2=======
A LITTLE

J====L0AD NOT SIC INTO A(R 2-=JSELECT CHANNEL

:LOAD NEW DPA1 [NTO ADR!
:REPEAT THF TEST WITH
JRESTORE ENTERED DPA1

THE

NEW DPAI

TRAP
LWORD
BEX

é%SZ!ASE(ONDARV ADDRESSING TEST OF
X

C(HANNEL

CSEX]T
L 10037-,

(TALKER)IN/

1L10037:

TRAP

(e 15T

W 10

HARDWARE TESTS
TEST

11:

MACRO M1113

SECONDARY

ADDRESSING

06-SEP-82 16:46
TEST

w916

CMANNEL

SEQ 124

PAGE 53
2

LSBTT.

LISTENER)

TEST

11:

SECONDARY

ADDRESSING

TEST

CHANNEL

(LISTENER)

‘917
(918

:""'""'"'""""'"""""""'t"""'0'""."'.""'."QQ'Q""
:
itx = TEST 11

4921

*PURPOSE

4923

;AN INVALID MY SECONDARY ADDRESS (MSA2),

23}8

STHIS TEST CHECKS TME EXTENDED LISTENER INTERFACE FUNCTION .

6922

‘92[,

035316

TEST

TO CMECK

CHANNEL 2 BY MEANS OF

THE

SECONDARY ADDRESSiNG

RECEIVING A VALID AS WELL AS

BGNTST

4926 035316
4927 035322
4928 035324

005737
001410

002324

036772
000001

4929 035344
4930 035350
4931 035354

012746
012746
010600
104417
062706

005037
004737
004737

035324
035330
035334
035336
035340

«932 035360
4933 035366
4936 035374

4935 035402

052777
112777
112777

013701

000004

002322
010220
010534

000010
000223
000020

002314

4936 035406
4937 035412
4938 035416

0627017
010137
032737

000040
002412
000001

4940 035426

052737

4943 035450

000411

4939 035424

4941 035436
4942 035442

035452
035460
035466
035474

035474

001412

052737
052737

042737
042737
042737

104404

104457
002115
005406
003702

035574

104406

4959 035574

4960 035576

017737

:CLEAR COUNTER
SCLEAR ULPA IN ISR
JSET UP PARAMETER

820,81 SRHX

:====| 0AD APT BIT

INTQO

BIS
move

210, 3CSRX
#22%,31CRux

MOV

OPAS,RY

MOV8

SSELECT CHANNEL 2
taeee{OAD DAl INTO A(R2==eeeecees

SGET DPA2 ADDRESS

|SR2======

BIS

#1,(DAT6

SSET ULPA BIT

000001
000001
000001

002446
002442
002444

000001
000001

002612
011060

8ta

0024642
002644

81S
BIS

b33

YES

IN COMPARE

i
o

BIC
BI(
BI(
BONSE
G

#1,CDAT6
#1,CDAT4
#1.CDATS

‘CLEAR ULPA BIT
te..
e

144576
002376

BI(
MOV

#10,3CSRX
#1,CHAN

SSELECT CHANNEL 1
*LOAD CHANNEL NUMBER

144546

BIS

#10,3CSRx

SSELECT CHANNEL 2

144556

000002
144504
000400

002376
002502
002502

000400

002500

MOVB
JSR
MOV
MOV
(MP
BEQ
MOV
ERRSOFT

.+ 04

MLAZ,alDRHX
PC,LO0P
#2.CHAN
a1iRX,BAD
#400,BAD
308
#400,G00D
1101.£501,ERRSO1

(KLOOP
144454

JBRANCH IF

#1.CDAT4
#1,CDATS

3$:

002502

30%:

MOV

BTSHD11,=(SP)
#1,-(SP}
SP.RO
CSPNTF
84, 5P

AND 2

002446

000010

035564
035566
035570
035572

1TRCNT
PC,CULPA
P(,BGINT

MOV
MOV
MOV
TRAP
ADD

0000017

052777

012737
017737
022737
001410
012737

144660

CLR
JSR
JSR

MEADER

002314

4952 035524

035532
035540
035546
035554
035556
035564

A11:

;1S THE PNT FLAG SET
JIF YES, PRINT THE TEST
Teee

‘CREATE MY LISTENER ADDRESS
*STORE MLA
‘1S DPA EVEN

000010
000001

113777
004737

144712
144674

PNTF
7%
#TSHD1I

#40,R)
R1.MLA2
#1.DPA?

062777
012737

4950 035512
4951 035520

7%:

T11::

ST
8tQ
PRINTF

ADD
MOV
8I1

4968 035476
4949 035506

4953
4954
4955
4956
4957
4958

THIS

."t'"""0"""""'0"""'"'Q""Q.""""."""""0"."'.."".'

4925 035316

4964
4945
4946
4967

JFEATURE OF

'BRANCH TO BGNSEG

(MLA)

DATA FOR

IN COMPARE

ISR

DATA FOR

TRAP

te==<LOAD LISTENER ADDRESS OF
TWAIT A LITTLE

[SR

($BSEG
(HANNEL

‘LOAD CHANNEL NUMBER
SGET [IR2 CONTENTS
S1FC,BIT IN [IR2 SHOULD BE SET
‘BRANCH If YES
_
'SET UP DATA FOR ERROR MESSAGES
*ERROR HANDLER

TRAP
.MORD
.WORD
.JORD

{SERSOF!
1101
ESO)
ERRSO!

TRAP

¢ 48!

:BRANCH TO BGNSEG WHEN ERRLOOP 1S SET
1SRX,BAD

;GET

ISR2 (ONTENTS

1-=-

110

W=
WO

002442
002442

002502

(mp
BtO

002500

MOV

T
ERRSOF

O~ -2t
NN

N
~ s

OO0
—O

WO
NS -

OOO0—
OO00O0

WO MNINNIND
S~

164436

002374

40%:

499¢
4995
4996 036060
6997 036066

OO0 =W
VOONN
W= NO
NONNNNO'

BIT

¢SET UP DATA FOR ERROR MESSAGES
sERROR HANDLER

TRAP

CSERSOF
T

TRAP

($CLP!

alle BAD

JGET

PC,LOOP

20 BAD

614

;GET MLAZ2
JCREATE MSA?

JSTORE MSAY TO LOCATION MSAI
------- LOAD MSA1 [NTQ DORV=cececccas
CWAIT A LITTLE

:1IR1

JIRT

CONTENTS

SHOULD BE ZERO

:BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE
:ERROR

HANDLER

TRAP

LMWORD
.WORD

(xLoopP

000092
146276
010100

144340
002374
002502
002502

010100

002500

000010

41%:

8IS

MOV

MOV
cMp

8taQ

MOV

T
ERRSOF

JBRANCH BA(CK
#10,3CSRX
"2, (NAN

002446

002502
002502

002446

002500

62%:

002502

1104, 5501 eaa501

002420

002500

MOV

ERRSOF1

JBRANCH ]F

YES

;ERROR HANDLER

TRAP

CSERSOF
T

$ATN,DAV,NDAC
,NRFD ,ATN,LPAS(ULPA)

¢BRANCH IF VYES
sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER
TRAP

ERRSOFY

(MPB
8EQ

|S SE?

1104
.WORD
.WORD
ESO!
ERRS0!
.WORD
¢BRANCH BA(K TO BGNSEG lF ERRLOOP IS SEV
AP
($CLPl
;GET ISR2 CONTENTS

MOV
(MP

MOV

($CLPI

ERRLOOP

sSET UP DATA FOR ERROR MESSAGE

azs

BEQ

43%:

RAP

#10100

MoV

OSSNV
NUN=N

144216

JSELECT CHANNEL 2
:LOAD CHMANMEL NUMBER

.WORD

1103
ESO1
ERRS01

sGET JJR2 CONTENTS
;APT,INT1 BIT IN JIR2 SHOULD BE SET

a1 iRX . BAD

(xLOOP

002420

TO BGNSEG

CSERSOFT

#10100,8AD

(kLOOP
164246

SET

.WORD
1102
.MWORD
€502
ERRSO1
.WORD
;BRANCH TO BGNSES wrEN ERRLOOP IS SET

600D
T 1103,£501 ,ERRSO
ERRSOF

OONWVY
NOON
W= WWO
NONNO

LPAS,(ULPA)

MOV

CLR

WAVNARO
S
NS
NN
~NNIN)
NS NNNNEDS
W=
NN
NEBNNED

VYES

MOV
MOV
ADD
MOV
mMovBe

BEQ

002500

sBRANCH [Ff

JSELECT (MANNEL 1
:LOAD CHANNEL NUMBER

(MP

WAWARL
S
NS =S

W= MNED
WNONNOO

036040

1102,€502,ERRSO1

JATN,ATN NDAC

#10,9CSRX
#1,(HAN
MLAZ,RY
#100,R1
R1,MSA1
MSA1,3IDRHX

BIC

JSR

WO
NS o

4992 036040

(DAT4,BAD
40%
(DAT4,G00D

(kLOOP

O NNNNSNNNNS
WO WWWNWOOWNG
NNNNNNN—=oNYNOO

OO0O0OO—-OO0O0O0OO0—~
OON—=O=SUR =0
DOO—
D000
OO0~

OOO00O

4987
(988
4989
4990
«991

4993

OO0OO0C0O0O=
—ON—==2N0O
OO0~
OO00O0

36002

(¥
e2 L
NEOENNE

4986

OO0O00O0=
=ON=O

4979
4980
4981
4982
4983
4984
4985

_-DDNN=O

4978

023737

OCO=O—=

L966
4967
4968
4969
4970
4971
4972
4973
6974
6975
4976
w977

NEPRONOO
SN SN S

4965

N NoTaP 1 V] »

(961
(96
496
6964

e Jo! STalel W

Ll SR

TEST

SEQ 105

TESTS
MACRO M1113
06-SEP=-82 16:46
PAGE 53-1
SECONDARY ACDRESSING TEST CF (HANNEL 2 (LISTENER)

NNNNNNNNNNNNNNNNN
OFOM N IS BN
NN VNN NON) = — [=]

HARDWARE

a1 C(RX,BAD
MSA1,BAD
13)
MSA1,G00D

1106,£901,ERRS0?

1S SET

(SERSOFT

110%
WORD
.WORD
ESO?
ERRSO!
.WORD
sBRANCH BA(CK TO BGNSEG lf ERRLOOP 1S SEV
scLP
sGET ICR2 CONTENTS

:MSA1 ADDRESS SHOULD BE SET

sBRANCH IF YES
¢SET UP DATA FOR ERRUR MESSAGE
cERROR HANDLER

J 10

SEQ 126

HARDWARE TESTS
MACRO M1113
06-SEP-82 16:46
PAGE 532
TEST 11: SECONDARY ADDRESSING TEST CF CHANNEL 2 (LISTENER)

036066
036070
036072
036074

106457
002122
005644
003702

036076

104406

4998 036076
4999 036100

042777

000010

017737

144136

5000 036106

012737

5002 036122

022737

5001 036114

5003 036130
5004 036132

001410
012737

036140
036142
036144
036146
5006 036150
036150
5007 036152

104457
002123
005447
003702

5005 036140

5017 036240

5018
5019
5020
5021

036246
036254
036262
036264

5022 036272

036272
036274
036276
036300
5023 036302
036302
5024 0363064

5025 036312

002502

170040

012737

017737
022737
001410
012737

002502

002444

002500

CMP

#170040,BAD

;SELECT

45$:

21$RX BAD

144074
002502

#10,3CSRX

MovB
MOV

#201,3lCRHX
3ISRX,BAD

MOV

CMP
BEQ

#2 ,CHAN

000010
000001
143776
000020

000020

144040

002374

TGET

CDATS.BAD
46%

MOV
(DATS,G
ERRSOFT 1108, ssoz ERRSO1

46$:

002502
002502

002500

BIC
MOV
MOV
CMP
BEQ
MOV

#10,3CSRX
#1,CHAN
aliRX,BAD
#20,BAD
508
#20,600

EQRSOFT 1109, 5501 ERRSO1

CKLOOP
000077

000010
000001

5030 036340

004737

011060

143764

S50%:

MOVE

ENDSEG

#77.31DRHX

CHANNEL

ISR1

002412

052777 000010

143736

*ERROR HANDLER

TRAP
CSERSOFT
LWORD
1107
.WORD
ES0?2
.WORD
ERRSO1
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
(SCLPI
;SELECT CHANNEL 2
*LOAD CHANNEL NUMBER

eeeae LOAD DACR INTO A(R2=====cccecee
SGET lSRZ CONTENTS
*ATN,NDAC,ATN,LADS,LPAS (ULPA)
‘BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE
‘ERROR HANDLER

143726

*LOAD CHANNEL NUMBER

SGET IIR1 CONTENTS
‘B0 BIT SHOULD BE SET
‘BRANCH IF YES
PSET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP
(SERSOFT
.MORD
1109
.WORD
ESO1
.WORD
ERRSO!
:BRANCH BACK TO BGNSEG xr ERRLOOP 'S SET
($CLPI
;===L0AD UNL INTO DORl==--cceccceccanaa-

#10,3CSRX
81, CHAN

SSELECT CHANNEL 1
‘LOAD CHANNEL NUMBER

JSR

pC,L00P

WALT A LITTLE

B81S

#10,3CSRx

IS SET

TRAP
CSERSOFT
.MORD
1108
WORD
ESO?
.WORD
ERRSO1
;BRANCH BACK TO BGNSEG 1r ERRLOOP 1S SET
RAP
(S$CLPY
;SELECT CHANNEL 1

10000$:

HLAZ @l DRHX

IS SET

‘BRANCH IF YES
“SET UP DATA FOR ERROR MESSAGE

BIC
MOV

MOvB

(S$CLPI

ERRLOOP

CONTENTS

COPA11: BGNSEG

143754
002374

RAP

*ATN,DAV,NDAC ,ATN,NRFD SHOULD BE SET

45%
2170040

BIS

TO BGNSEG

(SERSOFT
1106
E901
ERRSO1

*LOAD CHANNEL NUMBER

CKLOOP

10640%
042777
012737

5031 036344

144120

002444

036314
5027 036316
5028 036324

113777

21, (HAN

ERRSOFT 1107, 5562 ERRSO1

104457
002125
005406
003702

104406
112777

#10,3CSRX

MOV

BEQ
MOV

104457
002124
005447
003702

104406
042777

BIC

MOV

002500

002374

104405

5029 036332

002502

000002

036312
036312

5026 036314

44$:

:BRANCH BACK

CKLOOP

000201
144056

023737
001410
013737
)

036220
036222
036224
036226
5015 036230
036230
5016 036232

170040

112777
017737

5011
5012
5013
5014

036202
036210
036212
036220

002374

000010

012737

144172

000001

104406
052777

5008 036160

5009 036166
5010 0361764

(KLOOP

TRAP
.WORD
WORD
.WORD

TRAP

(S$ESLG

TRAP

($BSEG

;====L0AD LISTENER ADDRESS OF (HANNEL 1-

TOELECT CHANNEL 2

K 10

HARDWARE TESTS

MACRO M1113

06-SEP=82 16:46

SEQ 127

PAGE 53-3

TEST 11: SECONDARY ADDRESSING TEST OF CHANNEL 2 (LISTENER)

5032 036352

5033 036360
5034 036366

012737

017737
022737

5035 036374 001410
5036 036376

012737

036404
036406
036410
036412
5038 036414
036414
5039 036416

104457
002126
005406
003702

5037 036404

104406
062777

000002

002374

000001

002500

143664
000001

002502
002502

163654
002376

5040 036424
5041 036432
5042 036436
5043 036442
5045 036454

004737

000010
000001
002412
000100
002420
002620
011060

5047 036466

012737

000002

002374

5052 036524
5053 036526
5054 036534

001410
013737

002442

002500

113777

5066 036460 052777 000010
5048 036476
5049 036502
5050 036510
5051 036516

036534

112777
017737
017737
023737

#2,CHAN

:LOAD CHANNEL NUMBER

BEQ

3o£

:BRANCH IF YES

MOV
CMP
MOV

alinx BAD
BAD

TGET I1IR2 CONTENS
‘MAC BIT IN xxnz SHOULD BE SET

#1,600D

ERRSOFT 1110,E501,ERRSO1

CKLOOP

012737
013701
062701
010137

5064 036666

MOV

000001
143542
143542
002442

30%:

143622

143612

BIC
MOV
MOV
ADD
MOV
MOVB
JSR

#10,3CSRX
#1,CHAN
MLA2,R1
#100.R1
R1,MSAT
MSA1,3IDRHX
PC,LOOP

MOV

#2,CHAN

8IS

MOVB
MOV
MOV
cMP

143566
002502
002502
002502

#10,3CSRX

#1.9ICRHX
allRX 8AD
alSRX.BAD
CDAT4L ,BAD

036536 002127

036540
036542
5055 036544

005447
003702

5056 036546
5057 036554

062777
012737
017737
022737
001410

036544

5058 036562
5059 036570
5060 036576

104406

012737
5062 036606
036606 104457

5061 036600

036610 002130
036612 005406
036614 003702
036616
5063
036616 104406
5066 036620

5065 036626

036626

936626

112777

104405

5066 036630
5067 036634

005737
001054

5069 036642

001007

143524
002376
002502
002502

000020

002500

013737
005037

BIC
MOV

MOV
CMP
BEO

#10,3CSRX
#1,CHAN

alirx,BAD
#20,BAD
so

600D
aso1
ERRSOF T 1112.5501.sn

MOV

CKLOOP
000077

143450

002236

002314
002314

508:

MOVB

ENDSEG

002406

#77,alDRHX

QvP
Exavil

BNE

MOV
CLR

seecee- LOAD MSAT INTO DORI=-=ceeeace

‘WAIT A LITTLE

‘LOAD CHANNEL NUMBER

iceeca- LOAD NOT DACR INTO ACR2===e=e==
READ [IR2 FOR CLEAR THE BITS
‘GET ISR2 CONTENTS
ATN NDAC ,ATN,LPAS (ULPA) S SET
‘BRANCH IF YES
'SET UP DATA FOR ERROR MESSAGE
ERROR HANDLER
CSERSOFT
TRAP

SSELECT CHANNEL 1
‘LOAD CHANNEL NUMBER

WORD

IRRR

RAP

c(scLet

PGET 1IR1 CONTENTS
‘B0 BIT SHOULD BE SET
‘BRANCH IF VES
‘SET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

CSERSOF T
TRAP
1112
LWORD
ESO1
"WORD
ERRSO1
‘WORD
1S SET
ERRLOOP
xr
BGNSEG
TO
BACK
:BRANCH
($CLPI
RAP

;===L0AD UNL INTO DORl=e=ecemeccmcmccces

10001$:

ST
BNE

151

5068 036636 005737 002322
5070 036644
5071 036652

46%:

*LOAD CHANNEL NUMBER
1GET MLA2
‘CREATE MSA1
STORE MSA1 TO LOCATION MSA1

ES02
.WORD
ERRSO1
.WORD
;BRANCH BACK TO BGNSEG xr ERRLOOP 1S SET

CKLOOP
000010
000001
143462
000020

(SERSOFT
TRAP
LWORD
1110
ESO1
.WORD
ERRSO1
.WORD
:BRANCH TO BGNSEG WHEN ERRLOOP IS SET
cscLet
TRAP
SSELECT CHANNEL 1

SSELECT CHANNEL 2

463
BEQ
MOV
CDAT4
ERRSOFT 1111,E502 ERR501

104457

SET UP DATA FOR ERROR MESSAGES

snnon HANDLER

[TRCNT

DPA2,SDPA
OPA2

TRAP

:1S QUICK VERIFY PASS SELECTED
TIF YES EXIT TEST

(SESEG

T1S THIS THE FIRST TIME THROUGH THE TEST
*BRANCH IF NO

*SAVE ENTERED DPA?2
*CLEAR DPA2

036770

036772

045

O
—_—r)

PA GE

NS~

(p =

1%:

2s:

INC

[TRCNT

;SET FLAG T0 SEE FIRST TIME PASS

#217,31CRHX

tece=lOAD SIC INTC ACR 1

INC
CMP
BNE
INC
(MP
BEQ
BIC

DPA2
OPAZ,DPAY
2%
DPA2
#37,DPA2
38
#10,3CSRX

JSR

PC, WALT

MOVB
MOVB
BIS

MOVB

#17,a31CRHX
#10,3CSRX

DPAS,alIRHX

JMP
Al
MOV
SDPA,DPA2
3%
gxavtl: EXIT TST

‘GET NEW DPA2
‘IS DPA1 = DPA?
*BRANCH IF NO
*INCREMENT DPA1
;ALL DONE
*BRANCH IF YES
SSELECT CHANNEL 1
CWAIT A LITTLE

1e===LOAD NOT SIC INTO ACR 1
SSELECT CHANNEL 2

‘LOAD NEW DPA2 INTO ADR?2

‘REPEAT THF TEST WITH THE NEW DPA?
*RESTORE ENTERED DPA2
TRAP

.WORD

123

062

TSHD11:

.NLIST

.f?g%l
-EVEN
ENDTS)

1044601

SEQ 128

53-¢4

CHANNEL 2 (LISTENER)

— bbb
s

COHONNINO

—AN

WWWN
OW
S NNOOONO

VIO
O =00

P-82 16:46

NUMNND

Wwnh—
wOO0O
OO0
OO0
OO0
QOOOO0O0O0O0
OWOOO—=0OO0

SECONDARY ADDR t
OO0—-0O—20~00000000
=O—=2WVN~=20=H0N00MN0OO

11:

MACRO M 1

Q8
O
NW
S0

TEST

TESTS

O
OO0

HARDWARE

AWWOWNNIN
£PIN) =PIV =
NN
NS2NNNNNNSNNOVO
NN
NN N N SN
SN SNINOWAIWNO
LN
NN SNNNNNNWSNSNNI
SN NN

L 10

CSEXIT

L10040-.

BEX

é%iZlASECONDARV ADDRESSING TEST OF CHANNEL 2 (LISTENER)ZIN/

L10040:

TRAP

(SETST

m10

SEQ 129

HARDWARE TESTS
MACRO M1113
06-SEP=-82 16:46
PAGE 564
TEST 12: SECONDARY ADDRESSING TEST OF CHANNEL 2 (TALKER)

SBTTL

TEST

12:

SECONDARY ADDRESSING TEST OF

(HANNEL 2

(TALKER)

:'"""'"'""""""""""""""'Q""""""""t'""'Q't'tt"

sTHIS

TEST

IE X = Tt <T 12

CHECKS

THE

EXTENDED TALKER

INTERFACE

FUNCTION

:PURPOSE OF THIS TEST IS TO CHECK THE SECONDARY ADDRESSiNG

;FEATURE OF CHANNEL 2 BY MEANS OF RECEIVING A VALID AS WELL AS
+AN

INVALID MY SECONDARY ADDRESS

(MSAZ2).

OV
sy

005406
003702
104406

002324
-2

o
o
o
(=]
own

000001

b
)

NY
o~

—

7%:
Al12:

PRINTF

#TSHD1?2

NPV
OWO
ONN

NSO
nNO

O
VW
OO

OO0O—=
OO0ONHr

POROMNORND
BB
OO~NN

000010
000001
002416
011069
000010
000002
142734
000400

—=O—
HO~

002452
002436
002440

1TRCNT
PC.,CULPA
PC.BGINY

MOVB

#2031 SRHX

BIS
MOVB
ADD
MOV
BIT
BEQ

002314

000001
000001
000001

CLR
JSR
JSR

MOV

002452
002636
002440

000400
002402

PNTF

T12::
;1 S THE PNT FLAG SET
;1 F YES, PRINT THE TEST

HEADER

MOV

#TSHD12,=(SP)

Mov
TRAP

SP,RO
CSPNTF

MOV

—d
b
b

[=l=l{=lslalelalelels]
OO0 QOO—=—-00
NONOOOOONO
S SNONOWVMINIWO
=2 NINI = NN
O
COHOWOSIONS

0406

TST

BEQ

OO
OO0

(NN = VWANWWN NN NWWNG
NNAWNNNNNNNNNE

W= WA
= WWWO O NN NWWWNO = O 8
NNNSNNNNVNN
= NNNNNNONOONOD

S OVWVIVIOWSON
= =220 0000 2=
NINNVOMNININ
= NIONIWNININ S SISO
NNNESENNNE
NS NNNNNNNONSONN

= =S8O

AN =N NN
SN NS
NN NNNNNNNY &

-t ad CYN) b =S \ N

MO
N~

(=) =]

BANWNNIN = O NN
O VNN SSMNINNIN) = b
OO O
NORSNNSONSONON S ONNSONSSOCONNONNSOSONONNS

e N elolelelolelele
b lelel N olelalelelalelololelele
Dl lelelelelol lolole BN el

OO0
=
SN

=W
O

BGNTST

AN AN LN AN A U AN AN N AN N NN
VWAME B B NN
= = O NNV

OOOOOOOOOOOOQOOOOOOOOOOOOOOOOOOSOO

D e
e
D e
s
d o
D
e
i
D e
D i
D e
D
e
d
D e
s
b
D
i
i
—d i

5139

lololelolelolalelelelelelal-

POPONINININIAY
b b b b b b ed b d 2 OO
O VB UWN=2O OO NO NS W00
AN AN
NN NN
NI NN
W NN
NN = OV~

IOV
NN AVWAUVIWNA
WVHAVIVAAVAWMIVIWAWVIVAWA

:'"'"'".'."""""""'"""'Q.'.".'Q.."'.'.""t"D"""""."'

3s:

#10,3CSRX
#22%,31CRHX
DPAZ,R]

sCLEAR COUNTER

ADD

#1,=(SP)
e ,SP

sCLEAR ULPA IN ISR 1 AND 2

+SET UP PARAMETER
sSELECT CHANNEL 2
i LOAD DAi INTO ACR2=====e==
it LOAD APT BIT INTO [SR2====:GET DPA2 ADDRESS

#100.R1
R1,MTA2
#1.DPA2
3g

¢BRANCH

sCREATE MY TALKER ADDRESS

:STORE MTA
;1S DPA EVEN
[F

(MTA)

YES

¢SET ULPA BIT IN COMPARE DATA FOR SR

BIS
BIS
BIS

#1,(DATS
#1.CDAT?
#1.CDAT3

BIC
BIC
BIC

#1,(DATS
#1.CDAT2
#1.CDAT3

. +04

"BRANCH TO BGNSEG

BIC

#10,3CSRX

sSELECT CHANNEL 1
;LOAD CHANNEL NUMBER
,====LOAD TALKER ADDRESS OF (HANNEL 1==--

BIS

#10,3CSRX

BGNSEG
MOV
MOVB
JSR

MOV
MOV

CMP
BEQ
MOV
MOV

#1,CHAN
MTAZ2,alDRHX
PC,LOOP

#2,CHAN

al IRX,RSAVE

#400,RSAVE
30
#400,G00D
RSAVE ,BAD

*CLEAR ULPA BIT IN COMPARE DATA FOR ISR

TRAP

($BSEG

JWALT A LITTLE

JSELECT CHANNEL 2

JLOAD CHANNEL NUMBER
JGET [IR2 CONTENTS

JIFC,BIT IN 1JR2 SHOULD BE SET

;BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGES

ERRSOFT 1201,€501,ERRSO1

*ERROR HANDLER

(KLOOP

1201
LMORD
E501
.WURD
ERRSO1
LWORD
;BRANCH TO BGNSEG WHEN ERRLOOP IS SET

TRAP

CSERSOFT

TRAP

C$CLPY

N 10
HARDWARE
TEST 12:

5140
5141
5162
5143
§144
5145

5146
5147
5148
5149
5150
5151
5152
5153
5154
5155

037354
037362
037370
037372
037400
037406
037406

0376410
037412
037414
037416
037416
0376420
037426
037434
037440
037444
037450
037456
037462
037470

5156 037476

5157 037500
5158 037504
5159 037512

5160
5161
5162

5163

SEQ 130

TESTS
MACRO M1113
06-SEP=-82 16:46
PAGE 54=1
SECONDARY ADDRESSING TEST OF CHANNEL 2 (TALKER)

037512
037514
037516
037520
037522
037522
037524
037532
037540

5164 037546
5165 037554

5166 037556
5167 037564
5168 037572
037572
037574
037576

037600
5169 037602
037602
5170 037604
5171 037612

017737
023737
001413
013737
013737

142676
002436

002402
002402

002436
002402

002500
002502

104457

002262
005647
003702
000010
000001
002416
000040
002420
002420
011060
142562
000000

005037
013737

002500
002402

001412

142652
002374

40%:

142620
002402
002402

012737

017737

022737

001413

012737
013737

21SRX,RSAVE
CDAT2 . RSAVE
(0%
(DAT2,G00D
RSAVE .BAD
1202,E502.ERRSO1

#10,3CSRX
#1,CHAN
MTA2,R1
#40,R1
R1,MSA1
MSA1,alDRHX
PC,LOOP
Sl IRX,RSAVE
#0,RSAVE

CLR
600D
MOV
RSAVE ,BAD
ERRSOFT 1203,E501,ERRS01

002502

000010
000002
142504

010100
010100
002402

142546
002374

41%:

002402

002402
002402

5174 037630
5175 037636

013737

002402

002502

037646

104406

5172 037620 001413
§173 037622 013737 002452 002500

YSET UP DATA FOR ERROR MESSAGE
..
*ERROR HANDLER

BEQ

42%

‘BRANCH IF YES

#10100, RSAVE

MOV
#10100, 600D
MOV
RSAVE ,BAD
ERRSOFT 1204 ,£501,ERRSO1

42%:

‘BRANCH IF YES

#10,3CSRX
#2,CHAN
3l {RX,RSAVE

CKLOOP
142446
002452

LWORD
1202
.WORD
ES02
.WORD
ERRSO1
:BRANCH TO BGNSEG WHEN ERRLOOP [S SET
TRAP
CS$CLP1
;SELECT CHANNEL 1
SLOAD CHANNEL NUMBER
TGET MTA2
*CREATE MSA1
*STORE MSA1 TO LOCATION MSA1
teeeeae LOAD MSAT INTO DOR1==-ceeeccee
‘WAIT A LITTLE
SGET IIR1 CONTENTS
:1IR1
SHOULD BE ZERO

BIS
MOV
MOV

CMP

002500
002502

;GET ISR2 CONTENTS
*ATN,ATN,NDAC TPAS,(ULPA) BIT SET
;BRANCH IF YES
‘SET UP DATA FOR ERROR MESSAGES
f..
"ERROR HANDLER
TRAP
(CS$ERSO'T

TRAP
CSERSOFT
.MORD
1203
.WORD
ESO1
.WORD
ERRS501
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
CS$CLP1
sSELECT CHANNEL 2
‘LOAD CYANNEL NUMBER
SGET IIR2 CONTENTS

CKLOOP

104457
002264
005406
003702

104457
002265
005447
003702

BIC
MOV
MOV
ADD
MOV
MOVB
JSR
MOV
CMP

BEOQ

104457
002263
005406
003702

104406
052777

MOV
CMP
BEQ
MOV
MOV
ERRSOFT

CKLOOP

104406
042777
012737
013701
062701
010137
113777
004737
017737
022737

104406
017737
023737

037636
037640
037642
037644
5176 037646

30%:

MOV
CMP

BEOQ
MOV

MOV

SISRX,RSAVE
CDAT8.RSAVE

43%
CDATS8,G00D

RSAVE ,BAD _
ERRSOFT 1205,£502,ERRS01

(KLOOP

PAPT,INTT BIT IN 1IR2 SHOULD BE SET
“SET UP DATA FOR ERROR MESSAGE
..
*ERROR HANDLER
TRAP
.MORD
"WORD

CS$ERSOFT
1204
ES501
-WORD
ERRSO1
:BRANCH BACK TO BGNSEG IF ERRLOOP 1S SET
TRAP
C$CLP1
;GET ISR2 CONTENTS
*ATN,DAV,NDAC ,NRFD,ATN, TPAS(ULPA) IS SET

‘BRANCH If YES
‘SET UP DATA FOR ERROR MESSAGE
..

‘ERROR HANDLER

TRAP
CSERSOFT
MORD
1205
.WORD
ES0?
.WORD
ERRSO1
:BRANCH BACK TO BGNSEG IF ERRLOOP 1S SET

TRAP

cCsCLPY

HARDWARE
TEST

12:

TESTS

MACRO M1113

SECONDARY

S177 037650
5778 037656
5179 037664
5180 037666

5181 037674

5182 037702

ADDRESSING

017737
123737
001413
013737

013737

037702
037704
037706
037710
037712
37712
037714
037722
037730

104406
042777
012737
017737

5188 037744
5189 037746
5190 037754

001413
012737
013737

5183

5189
5185
5186

5187 037736

5191 037762
037762
037764
037766
037770
5192 037772
037772
5193 037774
5194 040002

5195 040010

5196 040016
5197 040024
5198 040032
5199 040034
5200 040042

5201 040050
040050
040052

040054
40056
5202 040060
040060
5203 040062
5204 040070
5205 040076
5206 040104

5207 040112
5208 040114
5209 040122
5210 040130

040130
040132
040134
040136
5211 040140
040140
8212 040142
5213 040150

(06-SEP-B2 16:46
TE

CHANNEL

142410
002420

43%:

002420

002402

013737

000010
000001
142322

L6S:

170040

001413
012737
013737

170040
002402

RSAVE ,BAD

45%:

8EQ
MOV
MOV

45%
#170040,600D
RSAVE ,BAD

;BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE
Tees

01700&0,RSAVE

002440
002402

#10,3CSRX
#2,CHAN

MOV
(MP
BEQ
MOV

SISRX,RSAVE
CDAT3,RSAVE
463
CDAT3,G00D

:GET ISR2 CONTENTS
:ATN,NDAC,ATN,TADS,TPAS (ULPA) S SET
:BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE

#2071, 31 CRHX

RSAVE ,BAD

ERRSOFT 1208,E502,ERR501

cKLOOP
L6%:

000020

002402

BIC
MOV
MOV
CMP
8EQ
MOV

#10,3CSRX
#1,CHAN
alIRX,RSAVE
#20,RSAVE
50%
#20,G00D
MOV
RSAVE ,BAD
ERPSOFT 1209,E501,ERRSO1

CXLOOP
000137

142126

50%:

:ERROR HANDLER

8IS
MOV

MOV

000010
000001
142146
000020

JATN,DAV
NDAC ,ATN,NRFD SHOULD BE SET

TRAP
(SERSOFT
.WORD
120.
.WORD
€502
.WORD
ERKRS01
;BRANCH BACK TO BGNSEG IF ERRLOOP 1S SET
TRAP
(sCLP
:SELECT CHANNEL 2
:LOAD CHMANNEL NUMBER

MOVB

142234
002440

;ERROR HANDLER

#10,3CSRX
#1,CHAN
aISRX,RSAVE

CxLOOP
000010
000002

JGET 1CRZ2 CONTENTS
MSAT ADDRESS SHOULD BE SET
;BRANCH [F YES
:SET UP DATA FOR ERROR MESSAGE

BiC
MOV
MOV

ERF.SOFT 1207 ,E502,ERRSO1

104457
002271
005406
003702
104406
112777

oICRX,RSAVE
MSAT,RSAVE
448
MSA1,G00D

TRAP
CSERSOFT
.WORD
1206
WORD
£901
.WOR
ERRSO1
:BRANCH BACK TO BGNSEG IF ERRLOOP |S SET
TRAP
C$CLPY
JSELECT CHANNEL 1
:LOAD CHANNEL NUMBER
:GET ISR1 CONTENTS

{MP

104457
002270
005447
003702

104406
042777
012737
017737
022737

MoV
(MPB
8EQ
MOV

cKLoop

112777 000201

017737
023737
001413
013737

(TALKER)

ERRSOFT 1206,£901,ERRS01

104457
002267
005447
003702
104406
052777
012737

S€EQ 131

54-2

MOV

104457
(002266
005644
003702

022737

PAGE

MOV

ENDSEG

#137 ,31DRMHX

je—e—- LOAD DACR INTQ A(R2====eeccce=e

Seee

:ERROR HANDLER

TRAP
CSERSOFT
.WORD
1208
.WORD
€502
.WORD
ERRSO1
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
($CLP
:SELECT CHANNEL 1
:LOAD CHANNEL NUMBER
:GET JIR1 CONTENTS
;B0 BIT SHOULD BE SET
:BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE
Jeee

;ERROR HANDLER

TRAP
(SERSOFT
.WORD
1209
.WORD
eSO
.WORD
ERRSOV
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
(SCLP
;=== 0AD UNT INT0 DORleececccccccccccccaas

--X

B 1

HARDWARE

TEST

12:

TESTS

MACRO M1113

(06-SEP-82

SECONDARY ADDRESSING TEST OF

16:46

PAGE

SEQ 132

54-3

CHANNEL 2 (TALKER)

BEBNO
OONN
NSO
NN
OO
O

#1,600D
RSAVE ,BAD

C$BSEG

JLOAD C(MANNEL NUMBER
;=o===0OAD TALKER ADDRESS OF (MHANNEL ==~
SWAIT A LITTLE
JSELECT CMANNEL 2
;:LOAD CHANNEL NUMBER

:GET IIR2 CONTENTS

JMAC BIT IN I]R2 SHOULD BE SET
;BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGES

cKLooP

BIC

MOV

JSR
BIS
MOV
MOvB8

MOV
MoV

TRAP

T
CSERSCOF

TRAP

CeCLPY

#10,3CSRX
#1,CHAN

JSELECT CHANNEL 1
;LOAD CHANNEL NUMBER

#40,R1
R1,MSAY
MSA1,a1DRHX
PC,LOOP

:CREATE MSA1
:STORE MSA1 TO LOCATION MSA1
jmemeeee LOAD MSAT [NTO DOR1=e==c=c-e-

MTAZ,R1

#10,aCSRX

#2.CHAN
#1,81CRHX
aliRX,BAD
31 SRX,RSAVE

CDAT2.RSAVE

468

CDAT2,G00D

RSAVE .BAD

:GET MTA2

JWALT A LITTLE

JSELECT CHANNEL 2
:LOAD CHANNEL NUMBER
Hdoes LOAD NOT DACR INTO A(R2e=~====sREAD [IR2 FOR CLEAR THE BITS
JGET ISRZ2 CONTENTS
JATN,
NDAC ,ATN,TPAS
:BRANCH IF YES

(ULPA)

S SET

:SET UP DATA FOR ERROR MESSAGE

T 1211,€502 ,ERRS01
ERRSOF

JERROR HANDLER

CKLOOP

1211
LMWORD
ES50?2
.MORD
ERR501
.WORD
;BRANCH BACK TO BGNSEG I;RERRLOOP 1S SET

ERRSOFT

X,RSAVE
SAVE

00D
BAD
Mo

(MP
BEQ
MOV
MOV

HAN

MOV
MOV

aCSRX

8lC

NNWNNNNO
NS
N

30§

TRAP

1210
LMWORD
€501
.WORD
ERRS0!
.WORD
:BRANCH TO BGNSEG WHEN ERRLOOP 1S SET

cMp
BEQ

NUSNWSN

NN
NNNNNS
NN = NWWNNO

W= RONRUML S

NEMNES
OO NWVY

S
w WVIRO

OZ,CHAN
[ 1RX,RSAVE
#1 RSAVE

($ESEG

'ERROR HANDLER

MOV
MOV

L6$%:

PC,LOOP

#10,3CsRx

sSELECT CHANNEL 1

TRAP

ERRSOFT 1210,€50%,ERRSO1

MOV
ADD
MOV
MOVB

45%:

MTAZ2
31 DRHX

P OWOr=e

SNINWSNSNSNNNNNSNN=
= NINOY

NN = WNNNONON
S WO RIWNNINU SS

NN NNNNNNNSNSNSNSNSNES
NN = NWWNN NN NWNWOOWNG

30%:

#1,(HAN

PROAD

(MP
BEQ

#10,a(SRX

—_-DyNBORR
NNV
ON) - —b =

—=O-—
HrOTM

OwN-—
OO0

OO0O—
OO0OoOsH
OO0
OO

O—=2O000O000
OrO0O0—2000
ONOO =00
OCOO0O0Orh
OO
ONO=O=O
—
=20NVOO0N—=0O
OO0
QO
O
S5O
OO
=

JSR
BIS

SNSNWNSNNNSNSNNY »

NN NSNSNSNIN
I»
NN 2NN N NN oW~ (=4

LIN) = N~NINURY
IS
(NUNDES

MOV
MOV

Mov
mMNve

SNV
QOB NV

-t e CIN) b cih wd = \NCD) wid e O s = SO

O0O000O0—00O0~-00000—=

OO0

OO0~

QN b = PO
-

OO0O0OOOO—

o OO

040474

OCOO0—=

=20V
W
NO N
S NNV =20V

040406
040410
040412
0404614
040616
040416
040420
0460426
040434
0404462
040450
040452
040460
0460466
040466
040470
040472

MOV
MOV

8IC

NSNS
OO N

—

d P (=]
N b = \NOD —
NN &~

OO0~

OO0

- e

OO0O0OO0O0O0OO—O0O

OV
W —=C OBNOWV

SIUANMAINA
VWA WA U
(AN 1aS 1o I ST NI VI N1, 81,81 N1, 01, ¥)
PORNINIANIRNIAIN)
=D b cd b b
~n

VAN VIV
VIR VT VWA
NIALNIALNVNINL
NNV ALAI NN NINI N
8 8% BN 8 BN N NINAN NN NN

(OPA12: BGNSEG

—

(9
~J

100008:

501,ERRS01

sSELECT CHANNEL 1
;LOAD CHANNEL NUMBER
sGET JIR1 CONTENTS
.80 BIT SHOULD BE SET

TRAP

(SERSOF1

CscLPl

:BRANCH [F YES
sSET UP DATA FOR ERROR *ESSAGE

SERROR HANDLER

TRAP

LMORD
.WORD
.WORD

T
(SERSOF

1212
ES01V
ERRSO1

HARDWARE

TEST 12:

TESTS

MACRO M1113

06-SEP-B2 16:46

SECONDARY ADDRESSING TEST OF

5254 040476

040476
5255 040500
5256 040506
040506
040506
5257 040510

95258 040514
5259 040516
5260 040522
5261 0405%4
5262 040532
5263 040536
5264 06405642
5265 040546
5266 040554
5267 040556
5268 040562
5269 040570
5270 0640572
5271 040600
9272 0640606
5273 040612
5274 040620
5275 0640626
5276 040634
5277 040040
5278 060646
040646
040650
5279
5280
5281 040652
5282
5283
5284 040742
040742
0460762

104406
112777
104405
005737
001054
005737
001007
013737
005937
005237
005237
023737
001002
005237
022737
001423
042777
112777
004737
112777
052777
113777
000137
013737

104401

SeEQ 133

54-4

CHANNEL 2 (TALKER)
(KLOOP

000137

141570

002236
002322

002314
002314
002322
002314
002314

002406

002312

002314
000037

002314

000010

141500

000217
011072
000017
000010
002314
037130

002406

141462

141450
141452
141420

002314

104432
000072

045

PAGE

50%:

move
ENDSEG

#137,3 1 DRHX

;BRANCH BA(CK TO BGNSEG [FESRLOOP IS SET
C$CLP
;===L0AD UNT INTO DORlecccecccccccccaee
10001%:

QvP
15T
Exavi2
BNE
1ST
] TRONT
1%
BNE
DPA2,SDPA
Mov
CLR
DPA?
[TRCNT
INC
DPA?
1%:
INC
DPA2,DPA1
(MP
BNE
2%
INC
DPA2
#37,DPA2
2%:
(MP
3%
BEQ
#10,3CSRX
BIC
mova
#21F,31CRHN
PC, WAIT
JSR
MPRICRHX
Move
#10,aCSRX
BIS
DPAZS, 31 IRHX
MOvVB
A12
JMP
SDPA DPA2
38:
MoV
ExQviZ: EXJT TSY

;1S QUICK VERIFY PASS
JIF YES EXIT TEST

TRAP
SELECTED

;1S THIS THE FIRST TIME THROUGM THE TEST
:BRANCH IF NO

:SAVE ENTERED DPA2
.CLR DPA2
:SET

FLAG

SALL

DONE

TO SEE

FIRST

:GET NEW
2
©1S DPA1 = DPA?
:BRANCH_IF NO
; INCREMENT DPA2
:BRANCH [F
SSELECT

YES

CHANNEL

TIME

PASS

feaae LOAD SIC INTO ACR leeeeececcnn-

SWAIT A LITTLE

jeee- LOAD NOT SIC INTO ACR le=eeeees

SSELECT CHANNEL 2

‘LOAD NEW DPA2 INTO ADR?
SREPEAT

THE

TEST WITH THE NEW DPA1

SRESTORE ENTERED DPA2

TRAP

LMWORD

123

062

TSHD12:

.NLIST
.ASCIZ
LIST
.EVEN
ENDTST

CSESEG

CSEX]T

L 10041~

X
BE

é%S?ZASE(ONDAR( ADDRESSING TEST OF CHANNEL 2 (TALKER)IN/
X

L1004

TRAP

($ETST

HARDWARE

TEST

13:

TESTS

DEVICE

MA(CRO M1113

CLEAR

06~SEP-B2

INTERFA(E

16:46

UN(TION TgST

5286

PAGE

SEQ 136

LSBTTL

TEST 13: DEVICE CLEAR INTERFACE FUNCTION TEST

S287

""'Qt't"'"""""t"""""'t"""'"'Q"t.'"Q"""Qt".""t"

5288
9289
5290

PART
:

5293
5294
5295

:PART 2 CHECKS THE DEVICE CLEAR INTERFACE FUNCTION OF CHANNEL 1 BY MEANS
.
OF RECEIVING A UNIVERSAL “OMMAND (DCL) AS WELL AS AN ADDRESS
.
COMMAND (SDC:.

2%83

;

5296

9297 040744
040744
5298 040744
5299 040750
5300 040752
040752
040756

060762
040764

5301
5302
5303
5304
9305
5306

040766
040772
040776
041002
041006
041014
0641016

5307 0410264

IEX = TEST 13
(HECKS THE DEVICE CLEAR INTERFACE FUNCTION OF CHANNEL 2 BY MEANS
OF RECEIVING A UNIVERSAL COMMAND (DCL) AS WELL AS AN ADDRESS

COMMAND (SDC).

N NN R

R a T

e R RN RN

BGNTST

005737
001410

002324

012746
012746
010600
104617
062706
005037
004737
004737
032737
001404
052737

043040
000001

000403

TST
BEQ
PRINTF

000004
002322
010220
010534
000001

002314

000001

7%:

PNTF
4]
#TSHD13

RN RNt teteeeReEsestseREReETeENeEOEeY

113::
JIS THE PNT FLAG SET
.lF YES, PRINT THE TEST MEADER
A
MOv
#ISHD13,=(SP)
MOV
#1,-(SP)
MOV
SP,RO
TRAP
(SPNTF
ADD
0 ,SP
sCLEAR ITERATION COUNTER
sCLEAR ULPA [N ISR 1 AND 2
:
;1S DPA EVEN
sBRANCH [F VYES
sSET ULPA BIT [N COMPARE DATA FOR ISR

002454

CLR
JSR
ITAC13: JSR
BIT
8tQ
BIS

ITRCNT
PC,CULPA
PC,BGINI
#1,0PA2
3%
#1,CDATS

38:

BIC
BGNSEG

#1,(DAT9

.+10

:BRANCH TO BGNSEG

5308 041026
5309 041034
0610346
5310 0641036

042737

000001

002454

104404
052777

000010

141234

8IS

#10,9CSRX

sSELECT CHANNEL 2

9312
5313
5314
5315

041052
041060
0641066
041074

112777
042777
112777
004737

000010
000010
000024
011060

141202
141212
141202

MOvB
BIC
Movs
JSR

#10,8]1SRHX
#10,3CSRX
#24 ,3I0RHX
PC,LOOP

s===LOAD DCAS BIT INTO ISR2 REGISTER
sSELECT CHANNEL 1
eee- LOAD DCL INTO DOR 1=ecccccccces
IWAIT A LITTLE

5317 041106

012737

5311 041044

5316 041100
5318 041114

9319
5320
5321
£322
5323

041122
041130
041132
061140
041146
041146
041150
041152
04115

5324 0461156
061156
5325 0641160

5326 061166
5327 041174

5328 041176
9329 041204
5330 041212

112777

052777

017737

022737
001413
012737
013737

000223

000010

141216

141172

000002

002374

004500

002402

141130

004500
002402

move

81S

MOV

002402

MOV

017737

allRX.RSAVE

002500
002502

(xLOOP
161100

122737

000024

012737
013737

000024
002402

001413

#10,3CSRx

#2,CHAN

(MP
#4500,RSAVE
8taQ
10%
MOV
#4500, GOOD
MOV
RSAVE,B
ERRSOFT 1301 5501 ERRSO1

104457
002425
005406
003702
104406

#22%,31CRux

002402

002402
002500
002502

10%:

sCLEAR ULPA BIT

[N (OMPARE DATA FOR

TRAP

ISR

($BSEG

:====LOAD DAl INTO ACR 2-o===c=c--

SSELECT CHANNEL 2

:LOAD CHANNEL NUMBER
sGET

[IR2 CONTENTS

sDCAS,INTT1,IFC BIT SHOULD BE SET
sBRANCH IF YES
sSET UP DATA FOR FRROR MESSAGE
Ceee
;sERROR HANDLER
TRAP
CSERSOFT
.WORD
1301
.WORD
ES01
WORD
ERRSON

MOV

al(RX,RSAVE

sBRANCH TO BONSEG IFf ERRLOOP IS SET
TRAP
scLPt
sGET ICR2 CONTENTS

BEQ

20%

:BRANCH [F

(MPR

#24 ,RSAVE

MOV
#24,6000
MOV
RSAVE ,BAD
ERRSOFT 1302,£901,ERRS01

;lCR2 CONTENTS SHOULD BE 24
YES

¢SET UP DATA iOR ERROR MESSAGE
tese
;ERROR HANDLER

FUNCTJON TEST

013

NNNO
NN

mMove
MOV
157

1GET I1R2 CONTENTS

""" LOAD NOT DACR

002502

ANCH TF YES
SET UP DATA FOR

MOV

T
ERRSOF

INTO A(R?

ERROR MESSAGE

.ERROR HANDLER

(xLO0P

21%:
140764

BIC

002374

TRAP

TSELECT CHANNEL 1

22%

.WORD
.WORD
.WORD
ERRLOOP IS
TRAP

*STORE MLA2

;LOAD CHANNEL NUMBER

s====L0AD MLA2 INTO DOR 1

JWAIT

A LITTLE

;GET JIR1 CONTENTS

S811RX, RSAVE
#20,RSAVE

;B0 BIT SHOULD BE

#20, GOOD

sSET UP DATA FOR ERROR MESSAGE

RSAVE ,BAD

JBRANCH

YES

SET

‘ERROR HANDLER

TRAP

.WORD
.WORD
WORD

:BRANCH TO BGNSEG IF fnaioog Is

(xLOOP

000004
011060
000010
000002

140670

22%:

------ LOAD SDC

INTO DOR 1

MovB
JSR

P(.LOOP

SWAIT

160616

0, (HAN
al [RX,RSAVE
#6101 _RSAVE

:LOAD CHANNEL NUMBER

006101

MoV
MOV
CMP

006101
002402

MoV
MoV

26101, GOOD

cBRANCH IF VYES
;SET UP DATA FOR ERROR MESSAGES

1305,£501,ERRSCY

*ERROR HANDLER

8IS

8tQ

ERRSOFT

002431
005406
003702

01773%7
023737
001413

#10,3CSRx

#40,R1
R1,MLA2

T 1304,€501, ERRSO1
ERRSOF

1046457

1046406

;CREATE MLA?

CMP
BtQ

MOV
MOV

003702

004737
052777
012737
017737
02273%7
001413
012737
013737

DPA2,R1

JSR

MOV

000020
002402

;BRAN(CH TO BONSEG

#1,CHAN
HLAZ.alDRux
PC,LOOP

MOV
mMove

1640746

104
002
005406

104406
112777

MOV
ADD
MOV

.WCRD
.WORD
.WORD
ERR%ggg IS

'éé 2 CONTENTS SHCuLD BE ZERO

BEO
(LR

#4,31DRHX

#10,3CSRx
238

RSAVE ,BAD

A LITTLE

JSELECT CHANNEL 2

¢GET IIRZ CONTENTS
sDCAS,MA MAC,INT1 BIT SHOULD BE SE1T

TRAP

+WORD
.WORD

(xLOOP
140560

002454

23%%:

MOV

(MP

BtC

(SERSOHT
1309

£501
ERRSO1
sBRANCH BA(CK TO BGNSEG lF ERRLOOP IS SET
RAP
($CLP?
;GET ISR2 CONTENTS
.WORD

—_

017
022
001
012

;BRANCH TO BGNSEG IF

O x

004

20%:

(kLOOP

~e
R
S5O e
o> > N

113

141036
0024602

NO S NN

WIWN
= WIW~NO

NNNNNN—- YN

OOMNIWVY

104

013
062
010
042
012

TRAP

104
002
005
003

N 2NN
NN NWWO OO

5339 041270
061270
53640 061272
5361 041276
5342 061302
5363 041306
5344 0461314
5345 0461322
5346 041330
5347 041334
5348 0641342
5349 041350
5350 041352
5351 041360
5392 0461366
041366
041370
0641372
061374
5353 041376
041376
5354 041400
5355 041406
5356 041412
5357 041420
5358 041426
5359 041434
5360 041442
5361 041444
5362 0461452
5363 041460
061460
041462
061664
0461466
95364 041470
0461470
5365 041472
5366 041500
5367 041506

017
005
oo
005
013

061264
0461266

104
112

NNUWNNNNNNN
=

5332
5333
5334
5335
53%6
5337
5338

[NTERFACE

S€EQ 135

PAGE 55-1

104457

Lk o

5331

061212
061214
061216
061220
041222
061222
0461224
0461232
041240
041244
061246
041252
041260
041260
061262

CLEAR

06-SEP=-B2 16:46

13: DEVIC

MACRO M1113

TEST

TESTS

—O00—2—0O

HARDWARE

RSAVE
LRSAVE

:ATN,DAV,NDAC
,NRFD ,ATN,LADS
+BRANCH [f VYES

1S SET

NN
W
NS
O
WY

NN
NTNWNNO

NNSONNEGS
NN
= WWIWNO

140522

MOV

(mMPB
8taQ
MOV

000004
002402

MoV

1306,€502,ERRS0"

*ERROR HANGLER

1640406

000020
000020

002402

160460
160462

25%:

002374
1640444

SE! UP DATA FOR ERROR MESSAGES

25§

RSAVE ,BAD

YES

.ERROR HANDLER

TRAP

8] CRNHX

mMove

#7%.31DRHX

#1,CHAN
PC, LOOP

1307
5901
ERRYON

RAP

($CLP)

----- LOAD NOT DACR [NTO ACRZ-----------SSELECT CHANNEL 1
SLOAD CHANNEL NUMBER
----- LOAD UNL INTO DOR 1ecececccccccccceUAIT A LITTLE

:GET JIRT CONTENTS
:80 BIT SHOULD BE SET
;BRAN(H [F

YES

:SET UP DATA

FOR ERROR MESSAGE

:ERROR HANDLER

TRAP

T
CSERSOF

ORD
ORD

£501
ERRS01

NSO

oo
& B
OONN

OO0oOoON

OO0~

815

MOV
MOV

CMP
B8tQ
MOV

NNO

000001
002402

000001

oY
AV
OO

16403¢6

26%:

MOV

27%:

#10,3CSRX
#2,CHAN

81 IRX,RSAVE
#1

27§

RSAVE

#1,6000
RSAVE ,BAD

(SCLP

;SELECT CHANNEL 2
:LOAD CHANNEL NUMBER
sGET JIR2 CONTENTS

sMAC BIT

SHOULD BE

:BRANCH IF

YES

SET

SET UP DATA FOR ERROR MESSAGE

1 1309,£501 ,ERRSO!
ERRSOF

.ERROR HANDLER

(kLOOP

1309
.MWORD
£501
.WORD
ERRSO?
.WORD
:BRANCH BACK TO BGNSEG lr ERRLOOP 1S SET

ENDSEG

10000%:

1046405
XX

1308

:BRANCH BACK TO BGNSEG lSigRLOOP IS SET

(kLOOP

000010
(00002

CSERSOFT

MWORD
.WORD
.MWORD

.uoao

SNNWSNSNSNNGO

*BRANCH 1F

:BRAN(CH BACK TO BGNSEG lF ERRLOOP IS SET

MOV

002500
002502

Cs$CLP

24,6000

alIRX,RSAVE
#20,RSAVE
(MP
8EQ
26%
#20,6000
MOv
MOV
RSAVE ,BAD
T 1308,E501,ERRSO1
ERRSOF

002402
002402

TRAP

JGET JCR2 CONTENTS
JCONTENTS SHOULD BE &

:16 S SRX

JSR

T
CSERSOF

al(RX,RSAVE
[ I3 RSAVE

BIC

Move

MOV

NNWSNNSNSNSNNY

000001
000010
000001
000077
011060

TRAP

.WORD
1306
.WORD
€502
ERRS01
.WORD
;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET

7 1307,£901,ERRSO1
ERRSOF

O VAN

W)= NN ENINONORY
NN NNNNNNS

W PO
N BB
W=
NNV S
NN
NNNNES

0461762

:SET UP DATA FOR ERROR MESSAGE

(xLoop

1046406

5400

(DA19, GOOD

RSAVE ,BAD

(kLooP

000004

Sea 136

55-2

ERRSOFT

003702

5399

PAGE

MOV
MOV

SNO S
» WY

WWVIRO
S

OO0~
OO OO
OO0O0O0OCO~OO0—»=
==ON=SO—2M~,=0O
OOO—
OOO0O0
OOO0OOOO=
2t OMN==N0O

o(=] O
N &

005

5401
5402

16:46
N TEST

—
R
&z —

M
W
WO
WNRU
=N SNISS

==0ONN—0O

OO0O0O—~0O—=

OO0

O0OO0O0

—

5368
9369
5370

TEST 13: DE

HARDWARE

PO
DO

SPART 2 (MECKS THE DEVICE CLEAR INTERFACE FUNCTION OF CHANNEL 2

TRAP

T
CSERSOF

RAP

cscLPt

TRAP

(S$ESEG

LR R

MACRO M1113
06-S EP-82 16:46
PAGE
13: DEVICE CLEAR [NTERFACE
¥ UNCTION TEST

042302

—-O0O

[elele]

[=lele]

0000

N~
OO

;SELECT CHANNEL 2
:LOAD SIC INTO ACR 2

—

= PO

ONOONI—=
oo

& BN
—

a1 {RX,RSAVE

OO
o

#4500,RSAVE
108
#4500,6000
RSAVE ,BAD

ERRSOFT 1310,E501 ,ERRSOY

002500
002402

(mP8
8EQ

002502

($BSEG

20%:

:DCAS,IFC,INTi BIT SHOULD BE SET
:BRANCH [F YES
JSET UP DATA FOR ERROR MESSAGE

‘ERROR HANDLER

JGET

ICR1

CONTENTS

TRAP

T
(SERSOF

TRAP

(saLP

WORD
1310
ESO!
.WORD
ERRSO1
.WORD
ERLOOP IS SET

#24 ,RSAVE

:JCR1 CONTENTS SHOULD BE 2¢

"o, GOOD

:SET UP DATA FOR ERROR MESSAGE

20%

RSAVE ,BAD

:BRANCH

YES

ERRSOF1 1312,€901,ERRS01

sERROR HANDLER

(xLOOP

MORD
.WORD
.WORD
sBRANCH TO BGNSEG IF ERRLOOP IS

Mova
MOV
TST

BEQ
(LR

MOV

1
”n,
all
l

1 CRHX

X,RSAVE

140022

81CRX,RSAVE

002402

MOV

MOV
MOV

002402

TRAP

:LOAD NOT SIC IN ACR 2
:SELECT CHANNEL 1
;====LOAD DA] [NTO ACR l===c=ccoee
:===L0AD DCAS BIT INTO ISR1 REGISTER
ISELECT CHANNEL 2
----- LOAD DCL INTO DOR 2====c-=cceeSWAIT A LITTLE
SSELECT CMANNEL 1
:LOAD CHANNEL NUMBER
*GET IIR1 CONTENTS

;BRANCH TO BGNSEG IFf

RSA
S
1
21
600
RSA
SAVE, B
WeEO

137776

[SR

TWAIT A LITTLE

000024
002402

000001

DATA FOR

*CLEAR ULPA BIT [N COMPARE DATA FOR ISR

PSEU1

108:

000024

DPA

IF YES
ser ULPA BIT IN COMPARE

LKLOOP

160064

IN ISR 1 AND 2

UP PARAME TER

A NCH

OONW
oSN

(U AV ]

OO
Y

OO
OAINO

OO
[o]e]

b d

e D

22D
OO0O0O0O0O0

002454
&
OO

000001
= OO S OOWO NN NO

55-3

002312
0024564

004500
002402

SEQ 137

EAR ULPA BIT

6J0001

[eleololelolalelololelels]
OO =000 00O0—-00
[ole e =l=lelelele
==
QOOOOOONIOOONO

WWOWO W
NWWNS NN
NN

1071

NS ON

NO
S NNNES

5443

544k

R o o¥

5442

OO0~

5438
5439
5440
5441

OODO
WNAARU
S

OO0
——=

=O00—=O
NNV =AY
S

5637

1022

Q&N

O00—

5431
9632
5433
5634
95435
5636

NNWNN o

O0O0O~0O-=

NN o

==20N~O
OO0 O
L
W WY NV 8 it
NOS
L
NNESENNNS

5430

W
AW = W N W NN N N NN N NWNNG
NONVAWNNNNNNNNNNNNNNES

OO00O—=
OOO0OO
WAWARND
S

OO0O0O0O0O0O0O—O4»—O—O—~0O0—=
=—=ONADPONDaN
20O -2N0O
WD =P NN S NORIMNLNININD SO
S

OO0O00O0O0O
SHOWVOWOO
O =N
N

5403
95604
5605

NN
N NO
NNNUINNNO

TEST

TESTS

OOV
OO =

HARDWARE

313t ,ERR501
ERRSOFT 1B}

TRAP

T
(SERSOF

1312
E901
ERRS01
SET
csCLPi

°°°°° LOAD NOT DACR [NTO A(Rl==eecccec=:GET TIR1 CONTENTS
s1IRT CONTENTS SHOULD BE 2ERO
:BRANCH [F YES
:SET UP DATA FOR FRROR MESSAGE
ERROR HANDLER

TRAP

MWORD
.MORD
.WORD

(SERSORT

1313
ESOV
ERRS0!

O00—
OO0 (]
OO0O0O0O0O0O0O—=

ON = =8O
=20

5459

O—0000000
OW—000000
ON—NOONON
JaofJolop
JeolV ]
NN
—O 0=
—
O O0OO0ONNOOON

000004
011060
000010
000001
137602

006101

006101
002472

042552
042560
042566
042570
042576
042604
042606
042606

MOv
ADD
MOV

DPA1,R1

;CREATE MLAI
SSTORE MLA1

MOV
mMovBe

R1,MLA1
#10,8CSRX

"2, (HAN
MLAT,31DRHX

BIS

JSR

#40,R1

(MP

BEQ

22%:

137644

002374
002402
002402

UAIT A LITTLE

BRANCH IF YES
SET UP DATA FOR ERROR MESSAGE
,ERROR HANDLER

(kLooP

LWORD
.WORD
.WORD
;BRAN(H TO BGNSEG I[F ERRLOOP IS

Move

JSR
BIC

(MP

BEQ

MOV
MOV

TRAP

#4,31DRHX

PC.LOOP

#10,3CSRX

", (HAN

alIRX,RSAVE

#6101 _RSAVE

23$

#6101, cooo
RSAVE

ERRSOFT 1315, 5501 ERR501

23%:

137506

000004
002402

CMP
BEQ
MOV
MoV

002454
002402

000004

MOV

e l SRX,RSAVE
C ) AT9,RSAVE

2[ 3

GOOD
( 2AT9

ERRSOFT 1316, ESO? ERRSON

246%:

1314

ES01
ERRSO?

SET

CsCLP

SWAIT
A LITTLE

SELECY CHANNEL
LOAD CHANNEL NUMBER
GEY TIR1 CONTENTS
:DCAS, INT1,MA,MAC BIT SHOULD BE SET

:BRANCH IF YES

sSET UP DATA FOR ERROR MESSAGES

.ERROR HANDLER

TRAP

CSERSOFT

WORD

ESOT

1315

.WORD

ERRS501

RAP

CSCLPI

;BRANCH BACK TO BGNSEG lF ERRLOOP IS SET

(KLOOP
137544

Y
CSERSOF

------ LOAD SDC INTO DOR 2----°°°°°-'°'

LMWORD

002454

(scLpPt

SSELECT CHANNEL 2
SLOAD CHANNEL NUMBER
----- LOAD MLA1 INTO DOR 2===eccccccece-

ERRSOFT

MOV
MOV

002500
002502

P g
o

MoV
MoV

137654

RAP

GET I1IR2 CONTENIS
‘80 BIT SHOULD BE SET

Mov

5677
5478
5479
9480
5481
95482
5483

;BRANCH TO BGNSEG IFf ERR%OOP IS SET

(xLOOP

5471
5472
5473
5476
5475
5476

NONWSN

95470

O NNWNNO

95460
56461
9462
95663
95464
9465
9466
56467
9468
95469

PAGE 55-4

9456
5657
5458

TEST

OO0
OO
O
=Nl
OoN
O

5653
5454
5655

NNWNNNNNNN—
=

95446
5647
5648
5449
5450
5451
9452

6:646

O000O0O—=000QO0-—
-t B O
=t O =t b \ N A = O

95445

MACRO M1113
06-SEPSep
CLEAR INTERFACE FUNC

NN NN
NO

TESTS

DEVICE

00 O=
OO 0O

13:

SRV TSRl L NI NI SR X NV IV JValy¥) F BV UL N NPV [N ,Sle [ VIV P o]
Y LY LY
8
NN NNNNNNES
NS F o 3
SN NN NN NN
NN
WWN= LMW NWNG
OO WV
NN
WNWWWNN WNWO OO
[V IRV VIV
T B o [ ] SN

TEST

HARDWARE

SEQ 138

sGET JLRY CONTENTS
*ATN,DAV ,NDAC ,NRFD ,ATN,LADS IS SET
BRANCH iF YES

SET UP DATA FOR ERROR MESSAGE
.ERROR HANDLER

TRAP

T
CSERSOF

.MORD
.MORD
.WORD

136
E502
ERRS01

TRAP

(sCLP

(kLOOP

:BRANCH BACK TO BGNSEG If ERRLOOP IS SET

MOV

sGET ICR1 CONTENTS

(MPB
8eaQ
MoV
MOV

31CRX,RSAVE

#4 RSAVE

25§

#4,6000
RSAVE ,BAD

T 1317.6901,ERRSO1
ERRSOF

;CONTENTS SHOULD BE 4
:BRANCH IF

YES

SEI UP DATA FOR ERROR MESSAGES
.ERROR HANDLER

TRAP

.WORD

J N
13:

6:46

TEST

£901
ERRSO1
.WORD
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
.WORD

(kL0OOP

000001
000010
00000;
000077

1374446
137446
002374
137430

011060
137372
000020

002502

000020

002500

25%:

se===L0AD NOT DACR

#2 ,CHAN

:LOAD CHANNEL NUMBER

PC,LOOP

‘WAIT A LITTLE

#10,3CSRX
877,31 DRHX

al{rRx,.8AD
#20,BAD

002502

26%

MOV

ERRSOFT

COO0O0O0O0—=
—SON
= =500
N =PI NMNINIES
SN NNNN &H
WM —2 LN ~ o
NO NN ~ o

9495
54696
5497
5498
5499
9500
5501
55G2

#20,600D

1318,E501, ERRSO1

137362
002374

000001

002502

137320

000001

26%:

002502

#10,8CSRX

8I(C

MCV
MOV

002500

ERRSOFT

SGET IIR2 CONTENIS
:B0 BI?

SHOULD BE

:BRANCH IF
‘SET

YES

SET

UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

:SELECT

*LOAD

#1,BAD

‘MAC BIT

27¢

MOV

teaeel 0AD UNL INTO DOR 2==c-cccccccccccacs

#1,CHAN

alirx,BAD

CMP
BEQ

SSELECT CHANNEL 2

TRAP

CSERSOF
T

#1,600D

1319,€501,ERRS01

TGET

CHANNEL

IIR1

TRAP

($CLPI

NUMBER

CONTENTS

SHOULD BE

‘BRANCH IF YES
‘SET

SCT

UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP

CSERSOFT

TRAP

(SCLPT

TRAP

CSESEG

1319
ESO01
ERRSO!1
.WORD
IS SET
ERRLOOP
If
BGNSEG
TO
BACK
;BRANCH
.WORD
.WORD

(xLooP

27%:

uiy

X
[ X

—

104401

;SELECT

#0, 31 CRHX
avP
Exav1y
ITRCNT

*LOAD NOT SWRST INTO ACR?2
YIS QUICK VERIFY PASS SELECTED
JIF YES EXIT TEST
*ITERATION COUNTER + 1

ITRCNT, [ TRDEF
£xav13
{g?c13

CHANNEL

*LOAD SWRST INTO ACR2

‘DEFAULT ITERATION EXECUTED
SIF YES EXIT TEST
“IF NO TEsT 1TERATION

TRAP
~y =

062

BNE
INC
cMp
BEQ
JMP
ExQv13: EXIT

TSHD13:

#10,3CSRX

CSEXIT

LWORD

L10042-.

TRAP

CSETST

BEX

égSZZADEVl(E CLEAR INTERFACE FUNCTION TESTIN/
X

-—

123

10001%:

#200,31CRHX

MOvVB
MOVB
1ST

NGE
=t (N

041002

043040
(=]

002320

BIS

M p 2z

002322
002322

137306
137270
137262

ENDSEG

QLN
——t PV D OTM e

000010
000200
000000
002234

043012
043014
043020
043026
043030
043034
G.3034
043036

?bb

200 ~NO W

NN, N
NSLWAWA
LY
[ 5 QU
P
Y

NAAVAWAWAVUAIWAUVYWLA
(S TV IV LW I
1N I el Al Al A

- ed b e = OOOOO
S W= OO0 NOWN

&»

(=]

(¥
N

5503

(S$CLPI

IN 0 ACRl===ccccccca-

.WORD
1318
ES5O01
.WORD
ERRSO1
.WORD
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET

(kLOOP

000010
000001

TRAP

#1,3]1CRHX

O00—
O00O0
WO

:b AN
NS
NSNNN
=2NN
NN
NN NI NS
NO

OO0O0O0O—~OO——
P le W F e P PV P e )
N=PNON NN S

5484

SEQ 139

PAGE 55-5

005644
003702
NONNNNNNNO

TEST

MACRO M1113
06-SEP-8?2
CLEAR INTERFA (E FUN(CTI

W
OO
oO N

HARDWARE

L10042:

K 11

HARDWARE TESTS MACRO M1113 (6-SEP-82 16:46 PAGE 56
TEST

14:

DEVICE

TRIGGER

INTERFACE

SEQ 140

FUNCTION TEST

5522

LSBTTL

TEST 14: DEVICE TRIGGER INTERFACE FUNCTION TEST

5523

""""..'"""""""""""".""""""""'."""""."".""'.'

5524
5525
22%9

IEX = TEST 14
PART 1 CHECKS THE TRIGGER INTERFACE FUNCTION OF CHANNEL 2 BY MEANS OF
.
:8$Elgé?6 THE ADDRESS COMMAND GET AS WELL AS THE AUXILIARY COMMAND

5528

PART 2 CHECKS THE TRIGGER INTERFACE FUNCTION OF

5531

;'."."".'.""'""'"""""'..'."'.'..'".""""""".'."'.""""

22%8

5532 043116
043116
5533 043116
5534 043122
5535 043124
0463124
043130
043134
043136
043140
€536 043144
537 043150
1,538 043154

BGNTST

005737
001410

002324

012746
012746
010600
104417
062706
005037
004737

0437472
000001

JSR
BGNSEG

PC,BGINT

JTRCNT

T14::
:1S THE PNT FLAG SET
,IF YES PRINT THE TEST HEADER
e
MOV
MOV
MOV
TRAP
ADD
:CLEAR JTERATION COUNTER

137114

BIS

#10,3CSRX

sSELECT CHANNEL 2

137062
137072

MOvVB
8IC

#200,3 ] SRHX
#10,3CSRX

;====L0AD GET BIT INTQ0 |SR2====ccccc-sSELECT CHANNEL 1

ADD

#40,R1

TST
BEQ
PRINTF

000004
002322

7%:

010534

ITAC14:

043154
$539 043156

104404
052777

000010

5541 043172
5542 043200

112777
042777

000200
000010

062701

000040

113777

00«12

137046

000010

5540 043164

112777

5543 043206

013701

5545 043216

010137

5547 043230

004737

5549 043242

004737

5551 043254

012737

55644 0643212

5546 043222
5548 043234

5550 043246
5552 043262

5553 043270
5554
5555
5556
5557

043276
043300
043306
043314
063314
043316
043320
043322
5558 043324
043324
5559 043326

5560 0643334
5561
5562
5563
5564

043342
043344
063352
043360
063360
043362

112777

052777
017737

022737

001413
012737
013737

000223

002314

002412

011060
011060

000010

137076

Mov8

MOV
MOV

137034

MOvVB

316.SIDRHX

137024

BIS

002402

MOV

102501

002402

JSR
JSR

MOV

(MP

BEQ
MOV
MOV
ERRSOFT

002500
002502

104457
002571
005406
003702

104406
017737

122737

001413
(012737
013737

104457
002572

PC,LOOP

136732

000010
002402

002402

002402
002500
002502

10%:

STORE MLA?2

eeee- LOAD MLAZ INTO DOR leecccecccccc=-

UAIT A LITTLE

------ LOAD GET INTO DOR l=cecccccccceaa

PC,LOOP

UAIT LITTLE

#2,CHAN

:LOAD CHANNEL NUMBER

016.3CSRX
ol IRX , RSAVE

#102561 RSAVE

108
#102501,G00D
RSAVE ,BAD
1401,E501 ,ERRSON

MOV

al(RX,RSAVE

BEQ
MOV
MOV
ERRSOFT

208
#10,6000
RSAVE ,BAD
1402,E901,ERRS501

(MPB

£10,RSAVE

($BSEG

:CREAYE MLAZ

(xLOQP

000010

TRAP

;====L0AD DAl INTO A(R 2====ccccccccaa

0PA2.R1

R1,MLA2

RTSHD14 ,=(SP)
#1,-(SP)
SP,RO
COPNTH
#6,SP

SET UP PARAMETER

IZZS,SICRHX

HLAZ alDRHX

002374

102501
002402

CLR

PNTF
7%
#TSHD14

MOVB

000002

136762

CHANNEL
1 BY MEANS Of

zggfggé¥6 THE ADDRESS COMMAND GET AS WELL AS THE AUXILIARY COMMAND

SELECT CHANNEL 2
sGET

IIR 2 CONTENTS

:GET,MA,INTY IFC,MAC BIT SHOULD BE SET

:BRANCH IF YES
;SET UP DATA FOR ERROR MESSAGE
Jeeoe
JERROR HANDLER
TRAP
CSERSOF
T
LMORD
1401
.WORD
€501
LMWORD
ERRSO1
;BRANCH BACK TO BGNSEG IF ERRLOOP IS SE1V
TRAP
(SCLPY
sGET 1CRZ2 CONTENTS

lCRZ CONTENTS SHOULD BE 10

*BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE
Jeee
JERROR HANDLER
TRAP
LMWORD

(SERSOFT
1402

L n
HARDWARE

TEST

14:

TESTS

DEVICE

043364

MACRO M1113
TRIGGER

5589 043526
5590 043534

5591 043542
9592 0643550
5593 043556

FUNCTION TEST

003702
000006
000001

136670
136662

112777

000077

136654

000010
011060

20%:

136664

MOVB
MOVB

#6,31CRHX
#1.31CRHX

MOVB

#77.31DRMX

BIC

JSR
ENDSEG

TRAP _

‘PART 2 OF

004737
104404

010710

THE

#10,3CSRX
PC,LO0P

SWAIT A LITTLE

femoas LOAD UNL

INTO DOR 1===emccccaaan
10000$:

JSR
BGNSEG

PC.BGIN2

;SET UP PARAMETER

000010

136634

BIC

#10,aCSRX

JSELECT CHANNEL 1
:====L0AD

DA]

INTQ

112777

000200

136602

MOVB

#200.31SRHX

;====L0AD

GET

BIT

052777

013701

000223
000010

002312

062701
010137

000040
002410

004737

011060

004737

011060

113777

112777

042777

012737
017737

022737

001413
012737
013737

136616
136612

002410

136566

000010

000001
136502

102501

102501
002402

MOVB

104406
122737

001413
012737
013737

ADD
MOV

#40 R1
R1,MLA1

oPAf
RI

MLA1,alDRHX

136554

MovB

#10,31DPux

136544

BIC

#10.3CSRX

CMP

#102501 ,RSAVE

JSR

002374
002402

MOV
MOV

002402

BEQ
MOV
MOV
ERRSOFT

002500
002502

PC,LOOP

#1,CHAN
aliRX,RSAVE

30
#102501,600D
RSAVE ,BAD
1403,E501,ERRSO1

136452

002402

000010
002402

002500
002502

000010

002402

308:

002574
005644
003702

MoV

aICRX,RSAVE

BEQ
MOV
MOV
ERRSOFT

40%
#10,G00D
RSAVE ,BAD

CMPB

#10,RSAVE

1404 ,£901,ERRSO1

136610

40%:

MOVB

lecccccccccaa-

[SRI1=~cccccccea

:SELECT CHANNEL 2

:CREATE MLA1

:STORE MLA1

:====LOAD MLA1

INTQO DOR 2-=======caces

;====LOAD GET

INTO DOR 2-=======cc==a-

SWAIT A LITTLE
SWAIT A LITTLE

$SELECT CHANNEL 1
:LOAD CHANNEL NUMBER
SGET IIR 1 CONTENTS
IGET,MA,INTT,IFC,MAC BIT SHUOLD BE SET
BRANCH' IF

YES

:SET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP

CSERSOFY

.WORD
.WORD
.WORD

1403
ESO01

TRAP

CsCLP

TRAP

T
(SERSOF

sGET ICR1 CONTENTS
¢ ICR1 CONTENTS SHOULD BE 10
:BRANCH IF YES
¢SET UP DATA FOR ERROR MESSAGE
:ERROR HANDLER

LMORD
.WORD
.WOR

1404
E9O1
ERRSO1

TRAP

cscLPl

:BRANCH BACK 10 BGNSEG IF ERRLOOP IS SET

CKLOOP
000006

A(R

INTQO

ERR501
:BRANCH BACK TO BGNSEG [F ERRLOOP IS SET

CKLOOP

104457

104406
112777

#10,aCSRX

MOVB

002573
005406
003702
017737

#225.31CRHX

BIS

MOV

TEST

042777

112777

($CLPI

jomee- LOAD NOT FGET INTO ACR 2-======-=
smmees LOAD NOT DACR INTQ ACR2=========
$SELECT CHANNEL 1

104405

104457

043640
043642
043644
043646
5604 043650
043650
5605 043652

E901
ERRS01
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
.WORD
.WORD

CKLOOP

104406
112777
112777

004737

5572
5573
5574
5575
9576 043430
5577 043434
043434
5578 0463436
9579 063444
5580 043452
5581 043460
5582 043466
5583 043472
5584 063476
5585 0435C2
5586 043510
9587 043514
5588 043522

INTERFACE

SEQ

PAGE 56=1

005644

042777

043426

06-SEP-82 16:46

#6,3lCRHX

141

nn
HARDWARE TEST S
MACRO M1113 06-SEP-82 16:46 PAGE
TEST 14: DEVI CE TRIGGER INTERFACE FUNCTION TEST

045

a »

XNe = N > Q

=4=£Xel+el>B3 D=0—

[ MMM

5618
5619
5620 043742
5621
5622
95623 044020

[ L= o a o2 -

O—4oO(=o]NOoWV=]<—[,-SD—SNOoDM>DNE—O-—

[—NOeO0—ON0OO ONMe—OMMW[(NeONMNlMONIN o]oOelle]OoIO0

SEQ 142

56-2

ws (S

o w) [V

and ~y
w) > o >|

BEX

/XS2XADEVICE

RVN[O>gxXAd>R=Z @Oo«— ~—o_J

][1]

[](&

TRIGGER INTERFACE FUNCTION TESTIN/

L10043:

TRAP

CSETST

]

OWARE TESTS
T

15:

MACRO M1113

06-SEP=-82 16:46

INCOMPLETE SOURCE HANDSHAKE

TEST

5625
5626
5627
5628
5629
5630
$631
5632
$633

SEQ 143

PAGE 57

.SBTTL
TEST 15: INCOMPLETE SOURCE HANDSHAKE TEST
"""""..""""'""""""""'Qt"'"'"'Qt'Q""QQ""""Q'."""
IEX - TEST 15
‘PART 1 CHECKS THE INCOMPLETE SOURCE HANDSHAKE OF CHANNEL 1. SOURCE HANDSHAKE
;
DOES NOT OCCUR DURING THE DATA TRANSFER, BECAUSE CHANNEL o IS NOT
SELECTED AS LISTENER.
‘PART 2 CHECKS THE INCOMPLETE SOURCE HANDSHAKE OF CHANNEL 2. SOURCE HANDSHAKE
;
DOES NOT OCCUR DURING THE DATA TRANSFER, BECAUSE CHANNEL 1 IS NOT
;
SELECTED AS LISTENER.

563(.

:ttt't""'l"""""'t"""""Q'tt't't"'t'i'""'ttt't.""'."""."'

5635 044022
044022
5636 044022
5637 044026
5638 044030

044030

044036
044040

0464042
044044
5639 044050
5640 044054
5641 044060
5642 044064
044064
5643 044066
5644 044074

BGNTST
005737
001410

002324

012746

064724

012746
010600

104417

ST
B8EQ
PRINTF

062706
005037
0064737
004737

000004
002322
010220
010534

104404
042777
012737

000010
000001

112777
012703

5648
5649
5650
5651
5652

000212
000002

044120
044122
044126
044130
044134

001410
020337
001405
062703
010337

5654 046142
5655 044144
5656 044146
5657 044154

002412
011060

5660 0441764
5661 064200

004737

011060

5663
5664
5665
5666

001413
012737
013737

MOV
MOV

TRAP

7%:
CLR
ITAC1S: JSR
JSR
BGNSEG
136204
002374

136160

5647 044116 020337 002314

5658 044160
5659 044166

5662 044206

044214
044216
044226
044232

044232
044236
044236
044240
5667 044242
044242
5668 044244
5669 044252

0004"¢

112777
112777

017737

022737

11$:

002312

000040
002412

108 :

136122

000013
000125

136102
136102

136044

002402

040000
040000
002402

20%:

002402

;SELECT CHANNEL 1
‘LOAD CHANNEL NUMBER

CMP

R3.DPA?2

002402
002402

fea.
e,
e
‘CREATE MLA
;

INC
BR
MOVB
JSR

R3
1%
MLA2,3lDRHX
PC,LOOP

:
:
R LOAD MLA2 INTO DORl===ccecececccceSWAIT A LITTLE

JSR
MOV

PC,LOOP

CMP

308:

Seee

10$
R3,DPA1
10$
#40,R3
R3,MLA2

208

#15.31CRHX
#125,31DRHX
al {RX,RSAVE

#40000, RSAVE

(KLOOP
136006
000002

eee- LOAD TON INTO A(R leececccceccecc==
SGET A NONE EXISTENTS MLA

BEQ
CMP
BEQ
ADD
MOV

BEQ
0%
MOV
#40000, GOOD
MOV
RSAVE ,BAD
ERRSOFT 1501,€501,ERRS01

002500
002502

($BSEG

#10,3CSRX
#1,CHAN

CSPNTF

TRAP

BIC
MOV

0212 9I(RHX
2.R%

0 ,-(sP)
SP,RO
#4,SP

:CLEAR ITERATION COUNTER
;CLEAR ULPA BIT IN ISR 1 AND 2
‘SET UP PARAMETER

MOVB
MOV

#TSHD1S,=(SP)

ADD

[TRCNT
PC,CULPA
PC.BGINT

MOVB
MOVB

104457
002735
005406
003702
104406
017737
022737

MOV

000001

5645 044102
5646 044110

5653 044140

T15::
;1S THE PNT FLAG SET
:IF YES, PRINT THE TEST HEADER
..

PNTF
7%
#TSHD1S

MOV
(MP

S1SRX,RSAVE
#2 ,RSAVE

;

teeees LOAD GTS INTO ACR 1=cccccecocees
1====LOAD DATA PATTERN INTO DOR 1-==ePWAIT A LITILE
PGET IIRT CONTEN

‘ERR BIT IN IIR aecxsren SHOULD BE SET
‘BRANCH IF YES
*SET UP DATA FOR ERROR MESSAGE
e,
;ERROR HANDLER

TRAP
CSERSOFT
.MORD
1501
.WORD
ESO1
.WORD
ERRSO!
:BRANCH BACK TO BGNSEG 1r ERRLOOP IS SET
RAP
(sCLP?
:GET ISR1 CONTENTS
STADS BIT SHOULD BE SET

B 12
HARDWARE
TEST

15:

TESTS

MACRO M1113

INCOMPLETE

SOURCE

5670 044260
5671 064262
5672 064270

001413
012737
013737

064276
0464300
044302

104457
002736
005447

$673 044276
064304

5674 064306
046306
5675 044310
5676 044316
5677 064324
5678 064332
5679 064336
5680 064340
5681 044344
5682 044352

044352
044356
046356
044360
5683 044362
044362

5684 044364
5685

044364
046364

06-SEP-82 16:46

HANDSHAKE

000002
002602

TEST

001412
005037
013737

002500
002402

135762
002374
002402

104457
002737
005447
003702

508 :

104405

000010

5695 044420

5697 064426

020337
001410
020337

5699 044434
5700 044440

062703
010337

112777
012703

001405

000402

000212
000002

PSEUS:

135672

135654

002314

118

002312
000040
002410

002410
011060

135616

§707 044472 112777
5708 044500 004737
5709 044504 017737
5710 044512 022737

000125
011060
135540
040000

135576
002402
002402

040000

002500

5713 044530

THE

ERRSO1

:BRANCH BACK TO BGNZEG IF ERRLOOP [S SET
TRAP
($CLPI
sSELECT CHANNEL 2
*LOAD CHANNEL NUMBER
‘GET ISR2 CONTENTS
‘ISR REGISTER SHOULD BE ZERO
‘BRANCH [F YVES
‘SET UP DATA FOR ERROR MESSAGE
..
*ERROR HANDLER

TRAP
CSERSOFT
WORD
1503
.WORD
E502
.WORD
ERRSO1
:BRANCH BACK TO BGNSEC [F ERRLOOP IS SET
TRAP
(scLP!
10000$:

TRAP

(SESEG

TEST

112777

001413
012737
013737

10$:

000013

002402

JSR
JSR
BGNSEG

PC,CULPA
PC.BGIN2

;CLEAR ULPA BIT IN ISR 1 AND 2
‘SET UP PARAMETER

8IS

#10,aCSRX

;SELECT CHANNEL 2

CMP
CMP

R3,DPA2
10
R3,DPA1

..
taa.
LR

ADD
MoV

#40,R3
RI MLAY

INC
BR
MOVB
JSR

R3
1%
MLA1,alDRHX
PC,LOOP

Move
JSR
MOV
CMP

0125.310RHX
PC,LOOP
al IRX,RSAVE
860000, RSAVE

MOVB
MOV
BEQ

BEQ

005203
000763
113777
004737

5711 044520
§712 064522

(CSERSOFT
1502
E500

:000 .................. Yy
r Y YT Y YT
PP AT
P P LR
L LR L YL
L LY Y

104404
052777

5706 064464

TRAP
LWORD
.WORD

:THIS PART (HECKS THE INCOMPLETE SOURCE HANDSHAKE OF CHANNEL 2
010220
010710

5702 044446
5703 044450
5704 044452
5705 044460

ENDSEG

;PART 2 OF

004737
004737

5701 044444

*ERROR MANDLER

j¢ttcccccceccccnncccnccncrcccnscarcrerrrrerccee
s s e
r e ccccacac e cccscaccccncan

5689 064366
5690 044372
5691 064376
044376
5692 064400

5698 064432

#10,3CSRX
#2,CHAN
alSRX,RSAVE
RSAVE

C(xLOOP

104406

5686

5696 064424

BIS
MOV
MOV
ST

:BRANCH [F YES
“SET UP DATA FOR ERROR MESSAGE
e

.WORD

BEQ
50%
CLR
600D
MOV
RSAVE ,BAD
ERRSOFT 1503,€502,ERRSO1

002502

gggg

5693 064406
5694 0444164

408
#2.600D
RSAVE ,BAD

ERRSOFT 1502,€502,ERRS01

40$:

135576

002502

20%:

MOVB

BEQ
MOV
MOV

HA
1€

CKLOOP

000010
000002
135726
002402

SEQ 164

57-1

BEO
MOV
MOV

002500
002502

003702

104406
052777
012737
017737
005737

PAGE

#212,alCRHX
02 kS

10$

20§

1%, 31CRHX

30%
#40000, 600D
RSAVE ,BAD

TRAP

($BSEG

12<<<L0AD TON INTQ A(R 2=ccecccmcecceeSGET A NONE EXISTENTS MLA

JCREATE MLA
:

;
;
teeee- LOAD MLA1
TWAIT A LITTLE

INTO DOR2=~=eeceemcacceees

teceee LOAD GTS INTQ A(R 2eeemmcececea--

;====L0AD DATA PATTERN INI0 DOR Qe====‘WAIT A LITTLE
SGET 1IR2 CONTENTS
“ERR BIT IN IIR REGISTER SHOULD BE SET
‘BRANCH IF YES
‘SET UP DATA FOR ERROR MESSAGE
e

¢ 1
TESTS
MACRO M1113
(06-SEP=-82 16:46
INCOMPLETE SOURCE HANDSHAKE TEST
OO0O-—
OO0O0O0
WO
S
NSNS
OO 8swW
OO

#2,G0OD
RSAVE ,BAD
T 1505, €502, ERRS01
ERRSOF

MoV

RSAVE

509

600D

RSAVE ,BAD

MOV

0O —
OOWwWw
NINO WV
£
(=4
[ACR
¥ e

50%:

002234

044054

5743

5744

104401

SET

SSET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

TRAP
WORD

WORD
.WORD

CSERSOF
T
1505

£502
ERR501

TO BGNSEG IF ERRLOOP [S SET
TRAP
CsCLPY

:SELECT CHANNEL 9
SLOAD CHANNEL NUMBER
SGET ISR1 CONTENTS
SISR REGISTER SHOULD BE ZERO

SBRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE

:1F

TRAP

(SERSOFT

TRAP

C$CLPl

TRAP

CSESEG

YES EXiT TEST

sITERATION COUNTER +1
SDEFAULT ITERATION EXECUTED
S1F YES EXIT TEST

BtQ

<IF NO TEST ITERATION

JMP

TSHD1S:

YES

10001$:

ExQvi1S: ExIT

062

SHOULD Bt

;1S QUICK VERIFY PASS SELECTED

’
g =t

123

57462 0464724

SBRANCH [F

ENDSEG

5738 044714
5739 044720
044720
044722
5740
5741

STADS BIT

(kLOOP

1ST
BNE
INC
(MP

002320

CscLP

1506
LWORD
.WORD
ES02
ERR501
.WORD
[S SET
ERRLOOP
IF
BGNSEG
TO
BACK
:BRANCH

WNGE =N

002322
00232¢

TRAP

SERROR HANDLER

ZMr>»2

044672
044676
044700
044704
044712

T
CSERSOF

ERRSOFT 1506,8502,ERRS01

005447

5732 044670
0644670
064670

5745 Q64774
044776
064774

#10,aCSRX
#1,CHAN
SISRX,RSAVE

8icC

MOV
MOV

1ST
BEQ
(LR

002502

044666

5733
5736
5735
5736
5737

40%:

;GET ISR2 CONTENTS

:BRANCH BACK

(xLoop

O
o N
- PN
OTM

5728 044644
5729 044650
5730 044656
064656
064660
044662
064664
5731 044666

«0%

MoV

TRAP

1504
LWORD
E501
LWORD
ERRSO1
.WOR
:BRANCH BACK TO BGNSEG If ERRLOOP [S SET
AISRX,RSAVE
#2 ,RSAVE

(MP
atQ

COC=0O0
OWwWwOoOO
NOVNO
B2 OO
ONO
=
NON-=O

5726 0464636
5727 044642

MOV

(KLOOP

00O
QO
Y
SN
OO
O

5723 044614
5726 064622
5725 044630

SEQ 145

57-2

T 1504 ,£501,ERR501
ERRSOF

O00—
OO0O00O0—=
OO0
=—=0N—=20
WD
WD =N
NSNS
NNENNE
O8N WO
NN=N
NNWNNOE

0464610
5722 044612
0464612

OO0OO000O0OO0O—=
=000 ==r0O
NN=N
NOESNNNNEL
NN =2UNWNWNG
SNNPUISNSNNNG

5714 064536
0646536
04646540
046542
064544
5715 0446546
066546
5716 044550
5717 044556
5718 044564
5719 044566
5720 044574
5721 044602
044602
0646604
0464606

PAGE

O~
OO
NS
N
SN
NN

HARDWARE
TEST 15:

TRAP

CSEXIT

LWORD

L10044-.

TRAP

CSETST

X
BE

égi?lAlN(OHPLEIE SOURCE HANDSHAKE TESTIN/

L10044:

HARDWARE

TEST

16:

TESTS

MACRO M1113

(MANGING CF

THE

06-SEP-82 16:46

PAGE

CONTROLLER CONFIGURAT]ON

5747

LSBTTL

SEQ 146

TEST

16:

CHANGING OF

THE CONTROLLER CONFIGURATION

571.8

;""'"Q."Q""""""""'."Q""tt"t"'lt"'Q"""""""'Q'QQ"'""

5749

S?S‘

:""".t"t"""'Q"""'Q""Q't'.""""QQ'.'.'."Q'""'Q"Q""t"""'

§750
5751
§752
5753

5755 044776
044776
5756 066776
§757 045002
5758 0650064
045004
045010

065014
065016

045020
$759 045026
5760 045030

045030
5761 065032

§762
5763
§764
5765

1EX = TEST 16

:PART 1 CHECKS THE CHANGING OF THE CONTROLLER CONFIGURATION FROM 1 TQ 2
;
BY MEANS OF THE AUXILIARY COMMANDS RQC AND RLC.
:PART 2 CHECKS THE CHANGING OF THE CONTROLLER CONFIGURATION FROM 2 10 1
:
BY MEANS OF THE AUXILIARY COMMANDS RQOC AND RLC.

065036
065042
045050
065052

BGNTST
005737
001410

002324

012746
012746
010600
104417

046262
000001

062706
005037

000004
002322

106406
004737

010220

7%
(LR
1TAC16: BGNSEG

JSR

002314

052737

000001

V02456

8767 045062

042737

000001

002456

5770 0651064
§771 065112

112777
042777

000040
000010

135150
135160

5773 0651264

062701

5768 045070
§769 065076
§772 045120
5774 065130
5775 065136
5776 065142

§777 045146

000403
052777
112777

013701

010137
113777
004737

112777

5778 045156

004737

5780 065166
5781 065174

012737
017737

5779 045160

5782 045202

5782 045210
5784 065212

5785 045220
5786 045226

052777

022737

001413
013737

012737

065226
045230
045232
045234
5787 065236
045236
5788 065240

104457
003101
005406
003702

§790 0452564
5791 045256

001410
013737

5789 065246

104406
017737

023737

000010
000223
002314

135202
135164

JSR
BIT
BEQ
8IS

3%:

135136

000011

135122

000010

135112

011060

000002
1350506

022501

002402

022501

#40,a] SRHX
#10 . a( SRX

ADD

#100,R1

#10,3CSRX
#22%,81CRuxX
DPA2,R1

MOV
MOVB
JSR

R1,MTA2
MTA2,alDRHX
PC,LOOP

JSR

PC,LOOP

cMp

BEQ
MOV

002500

SSET ULPA BIT

MOVB
BIC

MOV
MOV

002502

#1,CDAT10

#1,CDATI0

BIS

002402

TRAP
:CLEAR ULPA BIT IN ISR 1 AND 2

.+10

MOVB

002374
002402

PC,CULPA

8IC

BIS
MOVB

135012

002456

002502

211 .310RNX
#10,3CSRX

22, CHAN
a1 1RX ,RSAVE

222501, RSAVE
108
RSAVE ,BAD

MOV
#22501, 600D
ERRSOFT 1601,6501,ERRSO!

002500

10%:

ADD

;CLEAR ITERATION COUNTER

#TSHD16,=(SP)
#1,-(SP)
SP,RO
CSPNTF
#,SP

($BSEG

‘SET UP PARAMETER
‘1S DPA EVEN
‘BRANCH [F YES

IN COMPARE DATA FOR ISR

*BRANCH OVER NEXT INSTRUCTION

;CLEAR ULPA BIT IN (OMPARE DATA FOR ISR

SSELECT CHANNEL 2
ieecee LOAD DAI INTO ACR 2 =====ecccaa=
teeeee SET UCG BIT [N [SR 2==ccecccceee
SSELECT CHANNEL 1

SCREATE MTA?
I

‘STORE MTA2
R LOAD MTA2 INTO DOR Je=e=ecscceeas
SWAIT A LITTLE

teemee LOAD TCT INTO DOR lececccccccacee
SWAIT A LITTLE

SSELECT CHANNEL 2

‘LOAD CHANNEL NUMBER
“GET 1IR2 CONTENTS

“UCG,MA, [FC,INTY,MAC BIT SHOULD BE SET
*BRANCH' IF YES
SSET UP DATA FOR ERROR MESSAGE

D
*ERROR HANDLER

MOV

31SRX . BAD

TRAP
CSERSOFT
MWORD
1601
.WORD
ESO!
.WORD
[RRSO!
:BRANCH BACK TO BGNSEG IF ERRLOOP |S SET
TRAP
($CLP)
;GET ISR2 CONTENTS

BEQ
MOV

20%
(DAT10,G00D

TBRANCH If YES
YSET UP DATA FOR ERROR MESSAGE

(KLOOP

002456

116::
;IS THE PNT FLAG SET
:1F YES, PRINT THE TEST HEADER
P
MOV
MOV

TTRCNT

PC.BGIN
#1.0PA2
13

B8R

MOV

000100

002416
002416
011060

PNTF
7%
#TSHD16

MOV
TRAP

0105364
000001

5766 065060

006737
032737
001404

£3
8taQ
PRINTF

(MP

CDAT10,8AD

*ATN,NDAC ,DAV,NRFD,ATN,
TADS, (ULPA)IS SET

—~X

D 12

E 12
HARDWARE
TEST 16:

TESTS
MACRO M1113
06-SEP-B2 16:46
PAGE
(HMANGING OF THE CONTROLLER CONF]GURATION

5792 0452664
065264
045266
0645270
065272
5793 0L5274
065276
5794 045276
5795 045304
5796 045312
5797 045314

104406
017737
122737
001407
012737

065322
0453264
045326
045330
5799 045332

104457
003103
005644
003702
112777

000021

000001

134722

5802
5803
5804
5805

112777
052777
012737
017737

000022
000010
000002
134646

134706
134710
002374
002502

000020

002500

5798 045322

5800 045340

ERRSOFT

104457
003102
005447
003702

112777

5806 045404
5807 045412
S808 045414

5809 045422
065422
0654264
0656426
045430
5810 045432
065432
S811 045434
5812 045442
5813 045450
5814 045456
5815 045464
5816 0456466

5817 065474

065476
045476
945500
045502
5818 045504
065504
5819 045506

5820 045514
5821 045522

5822 045526
045526
5823 065526

022737
001410
012737

134762
000011

002502
002502

000011

002500

134730

000020

20%:

30%:

002502

MOV
(MPB
BEQ
FOV

S1CRX,BAD
#11,BAD
30%
#11,600D

MOVB

:21 81 CRHX

MOVB
BIS
MOV
MOV

#22.91CRHX
#10,3CSRX
22, CHAN
alirx,BAD

MovVB

BIC

;----LOAD RGC

AICRHX

000010
000001
134574
000020

134636
002374
002502
002502

000020

002500

33%:

BIC
MOV
MOV
(MP
8E0
MOV

SSELECT CHANNEL 1

ieees LOAD RLC INTO ACR l=eecccccccccccccanan
SSELECT CHANNEL 2
:LOAD CHANNEL NUMBER
SGET IIR2 CONTENTS
;B0 BIT SHMOULD BE SET
*BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE

:ERROR HANDLER

:BRANCH BACK

000137
011060

134564

134554

8IS

MOvV8
JSR

ENDSEG

.WORD

TO BGNSEG xr

SPART

5826 045530

PSEUT6: BONSEG

#10,aCSRX

TRAP
CSERSOFT
WORD
1605
.WORD
ESO1
.WORD
ERR50!
:BRANCH BACK TO BGNSEG 1r ERRLOOP 'S SET
RAP
($CLPY
sSELECT CMANNEL 2

#1370 Q10RMX
PC,LOOP

iaeead LOAD UNT INTO DOR 2eeeccccccccaae
SWAIT A LITTLE
100008%:

2 CHECKS THE CHANGING OF

THE

YR T

YT RS YR

YRYY I

TPR P

RYPYR YR

TRAP
P

CONTROLLER CONFIGURATION FROM 2

XXX ITITITTITYTYT
YT Y ¥ ¥ ¥ 3 T T
T" Y T T T T T

104404

ERRSO!

ERRLOOP IS SETV
RAP
($CLPI

"ERROR HANDLER

104405

2352

CSERSOF!
1604
ESO1

;SELECT CHANNEL 1
SLOAD CHANNEL NUMBER
:GET TIRY CONTENTS
:B0 BIT SHCULD BE SET
‘BRANCH [F YES
;SET UP DATA FOR ERROR MESSAGE

ERRSOFT 1605,€501,ERRSON

40%:

TRAP
WORD
.WORD

#10,3CSRX
#1,CHAN
al1RX,BAD
#20,BAD
«0%
#20,G00D

(KLOOP
000010

TRAP
CSERSOFT
.WORD
1603
.WORD
E901
.WORD
ERRSO!
INTO A(R 2=ececccccccccccane

temea LOAD NOT DACR INTO A(R 2=cececcccces

c16 SCSRX

000 .................... [T
XY YT T YT Y

0465530

*ERROR HWANDLER

(KLOOP

104457
003105
005406
003702

112777
006737

TRAP
CSERSOF
T
LWORD
1602
.WORD
ES0?
.WORD
ERRSO1
;BRANCH BACK TO BGNSEG IF ERRLOOP S SET
TRAP
C$CLP
:GET ICR2 CONTENTS
sTCR CONTENTS SHOULD BE 11
SBRANCH [F YES
;SET UP DATA FOR ERROR MESSAGE

CMP
#20,BAD
BEQ
3¢
MOV
#20,G
ERRSOFT 1604 5501 ERRSO1

003702

106406
052777

;ERROR HANDLER

ERRSOFT 160%,E901,ERRSO!

104457
003196
005406

104406
042777
012737
017737
022737
001410
012737

602,E502,ERRSO

(KLOOP

5801 045346 042777 000010 134724
045354
045362
045370
045376

SEQ 147

58-1

T T """

"""

T"YTYTYTTO O

YT " Y

(SESEG

LY 3

10 1
Y

TRAP

YYUvoorss

($8SEG

002312

000001

002456

000001

002456
134502
1346464
134450

017737
023737
001410
013737

PC.BGIN?
#1,0PA1

21,

NS NN
WO
NNNN

N =fuN

NNNNNNO
=S
NNNNNO
2
NNNNNOUSON

5868 046054
5869 046062

PORLNLNLRNDWWN
NS

046030
5865 046032
5866 046040
5867 046046

OO—O
=ONI—

046004
046012
046014
046022
046022
046024
046026

OO
= OO =
P =t Nt = OOOO

5861
5862
5863
5864

#10,aCSRY

8228,
31 (RHX

000011

002502
002502

000011

002500

[NTJ ACR le=e-cecaceaan

;STORE

[SR

leceeccecaca-

MTAY

Jemem- LOAD MTAT

INTO DOR Qe=eececcccee-

Jeeeee LOAD TCT

INTO DOR 2e===cccecccce-

A LITTLE

PC,LOOP

SWALT

A LITTLE

#1,(HAN

:LOAD CHANNEL NUMBER

JSELECT (HANNEL !

222501, RSAVE

JGET JIRY (CONTENTS
MAC BIT SHOULD BE SET
JUCG,MA,IFC,INTT

RSAVE ,BAD

JSET UP DATA FOR ERROR MESSAGE

16066501, ERRSO1

TERROR MANDLER

#22501,

600D

:BRANCH

YES

TRAP

1606
ESO!
ERRSO1

(3CLP

MOV
(MP

sGET ISRY (ONTENTS

MoV

JSET UP DATA FOR ERROR MESSAGE

ERRSOFT

MOV

(MPB
8t0Q

MoV

T
ERRSOF

sATN,NDA(C ,DAV NRFD,ATN,TADS,
(ULPA)]S SET
;BRANCH [F YES
JERROR

HANPLER

TRAP

T
(SERSOF

TRAP

(scLP

1607
.WORD
E£502
.WORD
ERRSOV
.WORD
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET

;GET JCRY CONTENTS
sICR CONTENTS SHOULD BE M1

sBRANCH [F VYES
JSET UP DATA FOR ERROR MESSAGE

;ERROR HANDLER

TRAP

LMORD
.WORD

30%:

T
(SERSOF

LMORD
.WORD
.WORD

;BRANCH BA(K TO BGNSEG l;RERRLOOP IS SET

BEOQ

20%:

R LOAD DAl

(xLooP

(kLOOP

136262

IN COMPARE DATA fOR SR
:BRANCH OVER NEXT INSTRUCTION
SCLEAR ULPA BIT [N (OMPARE DATA FOR [SR
SSELECT CHANNEL 1

SWALT

10$

002500

YES

PC,LOOP

a11RX, RSAVE

002456

AND 2

JSET ULPA BIT

JSELECT (MANNEL 2

#10,aCSRx

10%:

:BRANCH
8

0§, acsrx
mial,S1DRHX
#11,310RHX

002502
002502

IN ISR 1
S ET UP PARAMETER
3| S DPA EVEN

Rl
oPal,

#100,R1
R1.MTAY

MOV

. LEAR ULPA BIT

I
SET UCG BIT
SCREATE MTAI

840,81 SRMX

104457

104406

#1,(DATI0

ERRSOFT

134312

(DATIO

.+f0

13646446
134436

002456

SEQ 148

58-2
PC,CULPA

-y

O—~2O00000O0O0O0O0O00O o0
WO O —=O 2000000 oo
R OO
O —~=NONONO [=]e]
NVWOOOOO
SO~ =2wOo[\ =]
OWVO—O—O=22—==20
=N b
=2O=OQO—=OfrOoroONOow (=]

010220
010710
000001

005496
003702
104406

PAGE

CONTROLLER CONFJGURATION

OO0
O
Y
WV
OO

oo
(V15]
son

06-SEP-B2 16:46

O~
o0
w &
O WV
o~

584
584
584
584
584
584
584
584
5895
585
585

584

583
583
583
583
583
583
583
584

THE

0064737
0064737

o0
l 2 3

583

WA =O 000NN

982
582
58¢
583
583

MACRO M1113

C(HANGING OF

=000

16:

N = OO0 NN

TEST

TESTS

OO0O0O0O0O0O0O—O—-0O00O00—==-00000O0
- et ON) ad ad O = Q) b \ Nt O b e e P~ PO NOWN
POAN
= N NNLAD B A S NNV O NI NN NN
O N — ~o
NN NNNNNNNNN=
NNNNN NSNS ~
WM
=2 N NN NN NN N NNO O NN NWOWO w
NN
N NN NN TN TN NN N = =2 N NN NN NS -~

HWARDWARE

Move
MOvB
MOvVB

8IC

;====LOAD RG(

.WORD

(SERSOHT

1608
€901

ERRSO

INTO A(R 1o-ccccecacoccccnn

i====L0AD NOT DA(R INTO ACR le=ceccccee-

SSELECT CHANNEL 2
ie===LOAD RL' INTO A(R 2==ce=coccoceccccnns
SSELECT CHANNEL |

—

6 12

NN ~
(N
WN
NO NN ~

000001

000020

MOV

000020

NN
=

000020

OO NW
NSO

134074

COO—
OOOW
POMNLRD
&~

000010
000002

33%:

8
@

sLOAD (HANNEL NUMBER

sBRANCH |F

sGET TIRY CONTENTS
.80 BJT SHOULD BE SET

SET UP DATA FOR ERROR MESSAGE

sERROR HANDLER

(xLoorP

1009
.WORD
E501
.WORD
ERRSO1
.WORD
;BRANCH BACK TO BGNSEG lF ERRLOOP [S SE'

8IS

'l
é

BEQ

ERRSOF T

sBRANCH [F VYES
sSET UP DATA FOR ERROR MESSAGE
JERROR HANDLER

01,ERRSO

;BRANCH BACK

CKLOOP

0000
000137
011060

002234
002322
002322

JSELECT CHANNEL 1

JSR
ENDSEG

PC,LO0P

SWAIT A LITTLE

151

ovp

BI(

BNE
INC

602320

(MP

8EQ

JMP
Exavie: EXIT

045030

: ..... LOAD UNT

#13%, 31 DRHX

INTO

DOR

10001$:
:

ExQvié
[TRONT

:
.

JTRCNT, I TRDEF

1TAC16
181

:
.

EXQvieé

0466342
066342
0466342

TRAP

T
CSERSOF

TRAP

leeccccccccecaa-

TRAP

S QUICK VERIFY PASS SELECTED

F YES EXIT TEST
TERATION COUNTER

EFAULT
F
F

ITERATION EXECUTED

YES EXIT TEST
NO TEST ITERATION

TRAP

.WORD

123

062

TSHD16:

«NLIST
LASCI2
LIST
JEVEY

ENT
106601

X
BE
/XS2XACHANGING OF
BEX

THE

(SESEG

046260
046262

CSCLP

.WORD
16010
ESO!
.WORD
ERRS501
.WORD
70 dGNSt
o lF ERRLOOP IS SET

#10,8CSRX

MOVB

RAP

(SERSOF
T

:LOAD CMANNEL NUMBER
;GET 1IR2 CONTENTS
;B0 BIT SHOULD BE SET

’

TRAP

sSELECT CHANNEL 2

MOV
MOV

MOV

40%:

YES

T 1
ERRSOF

cMP

002500

SEQ 149

58-3

moy
mov

136146
000020

NS
OO
Nt
O =

W=WWIWNG
NO NNV

—

nND

CONTROL

$
PAGE
GURAT ION

OO=WV
NN

046174
046174
046176
046200
046202
046204
046204
046206
046214
046222
046226
046226
046226
046230
046234
046236

THE

(6-

O
O

0466166

OO0~

NS ANND —

NN NN~

[0 -Jo -Jo <Jo -To .}

(W IV IV IV, 1V}

5870 046070
1 046076
046104
046112
046114
046122
066122
046124
066126
046130
046132
046132
046134
066142
046150
046156
046164

OO0O0O0O o

(HMANGING OF

OO0O0O0O0O0O—~

16:

MACRO M1113

OO0~

TEST

TESTS

O=0O—=

HARDWARE

CONTROLLER CONF JGURAT]IONIN/

L 10045:

(SEX]T

L10045-

12
HARDWARE

TEST

17:

TESTS

MACRO M1113

REMOTE/LOCAL

06-$ 37

INTERFACE

16: 46

FUNCTICN TES

PAGE

SEQ 150

5903

JSBYTL

TEST

5905
5906
5907

PAR! 1

1EX = TESY 17
CHECKS THE REMOTE/LOCAL vuucrxon OF
COMMANDS GTL,
LLO, NOT RTL.

590‘

17:

REMOTE/LOCAL

INTERFACE FUNCTION TEST

'""'Q'"""".""""""t""""'."Q'Q"""Q"'Q"Q't"""..t'..""

CHANNEL 2 USING THE FOLLOWING

5908

PAR! 2 CHECKS THE aénOYE/LocAL ruucrxon OF CHANNEL 1 USING THE FOLLOWING

5910

.0't"'"""""""""""'.Q"Qt'OO'.".QQQ'QQ."""""0."..""0"'.QQ

5909

5911 0466344

0466344

BGNTST

5912 066344

005737

002326

066352
066356
046362
066364

012746
012746
010600
1044617

050646
000001

5913 046350
9914 066352

066366
5915 046372
5916 046376
046376

001410

062706
005037
104404

004737
004737

010220
010534

5920 046416

004737

011072

5922 066426

062701

9921 046422
5923
5924
5925
§926
§927
$928
§929

112777

013701

066432
066436
046444
066446
066454
066462
066470

010137
032737

5931 046500
5932 066506
§933 046516

5930 066476

5934 046522
5935 046530

5936 066536

5937 046542

MOV
ADD

042737
042737
042737

000001
000001
000001

002460
002462
002466

004737

011060

52777

012737

001410

066602
046606
066606
066610
5944 046612
066612
5945 066614

104457
003245
005406
003702

5947 066630

001410

104406

017737

023737

JSR

000040

002460
002462
002464
002466

0462737
113777

MOVE

002314

000001
000001
000001
000001

000414

JSR
JSR

133652

001415
052737
052737
052737
052737

5942 046574
5943 046602

5946 046622

000220

7%:
(LR
1TAC17: BGNSEG

002314

012737
017737
022737

046572

8EQ
PRINTF

002612
000001

5938 046550
5939 066556
5940 066566
5941

187

000006
002322

$917 046400
5918 066404

5919 046410

COMMANDS GTL, LLO, NOT
R

000001
002412

000010

3%:

002466
133540

000002
133466
002403

002374
002502
002502

002403

002500

7%
STSHD17

133436

002502

THE

TEST MEADER

($83EG

PC,WALT

SWAIT 100 US

260, R1

te..

#220,3ICRWX
OPA2,R1

R1,MLA?
#1,00A2

;CREATE MLA?

:CLEAR ULPA BIT
Tt
;

JSR

PC,LO0P

CWAIT A LITTLE

.+82

#1.CDATV4
HLAZ 9] DRMHX
#10.3CSRX

#2.,CHAN
alirx,BAD
#2403 ,8AD
10%

MOV
#240%,600D
ERRSOF T 1701.5501,("501

26,5P

ecees LOAD SRE [NTO A(R l==eceemeaana-

#1,(0AT1Y
#1,CDATI?
#1,CDAT13

BEQ

TRAP

ADD

:CLEAR ULPA BIT IN ISR 1 AND 2
SSET UP PARAMETER

8IC
BIC
BIC

MOV
MOV
CMP

BISHD17,=(SP)
£1,=(SP)
SP,RO
(SPNTF

PC,CULPA
PC 'BGINY

3%
#1,(DATI
#1,(DAT1?
#1,(DAT13
#1,(DAT14

MOV
MOV
MOV
TRAP

:CLEAR JTERATION COUNTER

:STORE MLA2
;1S DPA EVEN
BRANCH [F YES
SSET ULPA BIT [N (OMPARE
Ceee
;
;

BIS

10%:

S1F YES, PRINT
to..

TTRCNT

DATA FOR ISR

IN (OMPARE DATA FOR [SR

Ceee
;o= LOAD MLA? INTO DOR leecccccccccas
SSELECT CHANNEL 2

:LOAD CHANNEL NUMBER
:GET 1IR2 CONTENTS
SMA,IFC,RLC,MAC BIT SHOULD BE SET
:BRANCH

YES

JSET UP DATA FOR ERROR MESSAGE
JERROR MHANDLER

MOV

S1SRX,BAD

TRAP
CSERSOFT
LWORD
1701
.MWORD
E50)
WORD
ERRS0!
;BRANCH BACK TO BGNSEG xr ERRLOOP 1S SET
RAP
($CLPY
sGET ISR2 CONTENTS

BEQ

208

CBRANCH If YES

(KLOOP

002460

T17::

;1S THE PNT FLAG SET

MOV
8IT
8t0
8IS
8IS
8IS
BIS

BIC
MOVB |,

133530

PNTF

(MP

coAT1{,8AD

SATN,NDAC ,REM,ATN,LAPS,LADS, (ULPA)
IS SET

1 12

OCy
O

—a

nY —¢

RRSO?

JSET UP DATA FOR ERROR MESSAGE

:ERROR WANDLER

TRAP
.WORD

O
O
O =000 O00O0O0O
OWOO—=O—~-00
OWOO
=0 —=00
OWOOOOO0O0O
OO = O N
O —
WEHNOONO ~O

8IC

Move

JSR

mMovae

JSR
8IS

MOV
MOV

000003

#77.31DRHX
PC,LOOP

#10,3CSRx
", CHAN

allRl BAD
BAD

MOV

(kLOOP
133314

30%:

JSELECT CHANNEL

------- LOAD GTL
SWAIT A LITTLE
------- LOAD UNL
SWAIT A LITTLE

INTO DOR

l-e=cemccmcaac-

INTO DOR

l=e=ce-caccaaa-

JSELECT CHANNEL 2

:LOAD CHANNEL NUMBER
sGET [IR2 CONTENTS
sMi
€ ,MAC

B:T

JBRANCH !F

SHOULD BE

YES

JSET LUP DATA FOR
;ERROR HANDLER

TRAP

B1C

MOV
ADD
MOV
MovB

#10,aCSRX

DPAZ,R1

#40,R1

R1,MLA2
MLAZ2,81DRHX
PC,LOOP

", CHAN

#7.3] CRHX
alirx,.BAD
0%003.BAD

33%

133160

002462

002502
002502

002462

002500

33%:

SSELECT CHANNEL
SCREATE MLA?2

SSTORE MLA2

----- LOAD MLA2
SWAIT A LITTLE

CSERSOF
T

1703

£SO
.WORD
.WORD
ERRS0Q1
ERRLOOP 1S SET

INTO DOR

TRAP

(sCLP!?

l==eeceeceeeaeea

SSELECT CHANNEL 2

csLOAD CHANNEL NUMBER
""" LOAD NOT RTL INTO DOR ?
:GET [IR2 CONTENTS
:MA_RLC,MAC

:BRANCH

BIT

YES

SHOULD BE

SET

#2003,6000
ERRSOFT 1704 ,£501,ERRS01

;ERROR HANDLER

(kLOOP

1704
.WORD
£501
.WORD
ERRSO
.WORD
sBRANCH BA(K TO BGNSEG lF ERRLOOP IS SET

MOV
(MP

8EQ

MOV

ERRSOFT

al
)
40

CDAT12

1705.5502 saa501

JSET UP DATA FOR ERROR MESSAGE

sGET ISR2 CONTENTS

TRAP

(SERSOF
T

TRAP

CsCLPt

$ATN,NDAC ,REN,ATN,LPAS ,LADS(ULPA) IS SET
sBRANCH [F YES
sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER
(SERSOFT
TRAP

LMORD
.MORD

104406

SET

ERROR MESSAGE

;BRANCH TO BGNSEG

#10,3CSRX

WWWWE
NSNS
OOWVMIWVY
NCON
W=
NS
NENNE
W= WWNO
NONNO
PE
=2 NN
~ NN

#10,3CSRX

Al S'DRNI
PC,LOOP

TO BGNSEG

CSERSOFT
1702

.WORD
ESO2
.WORD
ERRSO1
IfEgRLOO P IS SET
(scLP

.WORD

O0O00—-000—-0000—
—ON=DLINO=IS0=00

w VNS

;BRANCH BACK

soi
00D
ERRSOF' 1763,5501,5an501

(mMP
BEQ

NOONNN

NONSNNNSNNSNNNOS

NS NNNNNNNNNES
W WWWWSNWNWNNO
NSNS
OO BWV

(kLoOP

OO0~
OO0O00
OO0~
=2ON=O
o OO

= OO—=

5984

T
ERRSQF

[ a )

MOV

~NO
O»

002500

SEQ 151

59-1

002460

NI NNIRMTO
S WONIWRIES
NS NNNNNNN= NSNS
W=WWWWNWNWNWOO
NGO
NONNNNNNNN—
=N

WWNIWWES

0000000~ O—~0O=
—ON—=2NO-=O0-—=,roO

AU =R ~NROR SRS PN S~

O
O

013737

O00—
OO000

9948 046632
9949 046640
046640
046642
046644
046646
046650

PAGE

—

HWARDWARE TESTS
MACRO M1113
Q6-SEP-B?2 16:46
TEST 17: REMOTE/LOCAL INTERFACE FUNCTION TEST

(xLooP

sBRAN(H BA(K

TO BONSEG

1705
E502
ERRSO:

.WORD
l;REgRLOO P

IS SEV

($CLP)

PC,LOOP

#10,3CSRX

allfll 8AD
02002 8AD
438
#2002.,6

002002

E501 ERR501
1706

133036

002460

002502
002502

002460

002500

63%:

NUNWN

als RX ,BAD
CDA 111.8AD

50%
T
C(DAT11,G00D

1707,£802, ERRSO1

50%:

000010

000021
011060

BIC

mMovB

JSR
BlS

000010
132744

MOV
1ST

002502

BEQ
CLR

002500

002464

002500

;GET ISR2 CONTENTS

RAP

31 IRX.BAD
BAD

53¢

:BRANCH If YES

:SET UP DATA FOR ERROR MESSAGE
sERROR HANDLER

TRAP

132660

CSERSOFT

1707
ES502
ERR501

SET

csaLP

UAl! A LITTLE

SBRANCH IF

YES
:SET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER
TRAP

CSERSOFT

1708

.MWORD
.WORD
.WORD

ES501
ERRS01

RAP

c(scLP

;BRANCH BACK TO BGNSEG lF ERRLOOP IS SETV

BEQ

60
(DAT

cDAT1%,BAD

1T 17
ERRSOF

60%:

CSCLPY

:ATN,NDAC ,REN,REM,ATN,LPAS,LADS (ULPA)SET

9,5502 enn501

;GET ]SR2 CONTENTS
:ATN,NDAC ,REN,REM,LLO,ATN,LADS(ULPA) SET

:BRANCH If YES

sSET UP DATA FOR ERROR MESSAGE
:ERROR HANDLER
TRAP

.WORD
.WORD
.WORD

132702
132672

CSERSOFT

:SELECT CHANNEL 2
GEI I1R2 CONTENTS
CONTENTS SHOULD BE ZERO

PC,LOOP

S1SRX . BAD

MOV

;BRANCH [IF YES
:SET UP DATA FOR ERROR MESSAGE
:ERROR HANDLER
TRAP

#10,3CSRx

MOV

(MP

sSELECT (HANNEL 2
:GET JIR2 CONTENTS
:MA,RLC BIT SHOULD BE SET

:SELECT CHANNEL 1
------ LOAD LLO INTO DOR lececccccecccccns-

(xLOOP

53%:

TWALT A LITTLE

#10,3CSRX
#21.31 DRHX

600D
ERRSOFT 1708,E501 ,ERR501

002502
002502

;SELECT CHANNEL
LOAD MLAZ 1~ro DOR l==eeecee- e
R

.WORD
.WORD
.WORD
;BRANCH TO BGNSEG IF ERRLOOP [S

O)fl)w

WO WWNWINSNGDG

(MP
8EQ

MOV
ERRSOF”

QOWVIWVI

NNNNNNNNG

MOV

(xLOOP

132720

SEQ 152

1706
.WORD
ESO1
.WORD
.WORD
ERRSO1
;BRAMCH BACK TO BGNSEG lF ERRLOOP S SET

(xLooP

NONNOY

W=WbIWO

NOMNON

NO NN

O=—- 0000
OWO =00
NIWNO =NVO
QOOOHr
o
DO —=Or——
NNOOONO

OOV

W W~

O0000O0O-—
—20ON-=VO-—
OO0~
O000

W= WWWO

6011
6012
6012
6014 047350
6015 047356
047356
047360
047362
0467364
6016 047366
047366
6717 047370
6018 047376
6019 047404
6020 0474610
6021 047416

NONSNO

6010

MLAZ,@]DRHX

6007
6008
6009

#10,aCSRX

NUNWVIN

6006

NNNNNO

6001
6002
6003
6004
6005

WNWNNO

6000

O000—
—-ON—=0O

5995
5996
5997
9998
5999

177

OO0~
OO000

5994

062777

QOO0
==
QOO =0

047130
047136
047144
0647150

mo~

HARDWARE TESTS
MACRO L
TEST 17: REMOTE/LOCAL l

& —

Z
—-—
Mo
DWW
TM
P
MO

J 12

%$ERSOFT

709
€502
ERRS01

(xLoop

;BRANCH BACK TO BONSEG IfigRLOOP IS SE1

JSELECT CHANNEL 1
----- LOAD GTL INTO DOR 1-=-=ccesceoes

#10,8CSRX

JSR

" ilDRHl
P( .LOOP

JSR

PC, LOOP

MovB
mMove

277, 310RHX

(sCLPl

IWALT A LITTLE

----- LOAD UNL

TWATT

A LITTLE

INTO DUR 1====--cccccmee

K 12

6:646

W= W N
NESNNY
NN
NO
NN

OO0O0O (=
—ON-— v

;SELECT CHANNEL 2

CMP

COAT14,BAD

sATN,NDAC,REN,LLO,ATN,
(ULPA) IS SET

21SRX.BAD

:GET

63%

MOV

:SET UP DATA FOR ERROR MESSAGE

NVHNE
NENES
OH VWV
NN

*ERROR HANDLER

NNO
NN

TRAP

BIC
#10,3CSRYX
MOVB ~ #20,3l11RLX
Y

;SELECT CHANNEL 1
;====LOAD NOT SRE INTO A(R 1--=ccc---10000%:

:PART 2 CHELKS REMOTE/LOCAL INTERFACE FUNCTION OF CHANNEL 1
XXX

PSEUI7:

002312
002460

002462

002464
002466

000001

S WOOO
M SHOWO
OO == O
NWO—-OOO0OOON—

002403

002460
002462
002464
002466

YT Y

YTy

TRAP

($BSEG

#1,CDAT14

BlC
8lC

#1,CDAT1N
#1,CDAT1?

SCLEAR ULPA BIT
I

#1,(DAT13

.o$2

#1.CDAT13
#1.CDAT14
OPA1,R1

#40,R1

R1,MLA1

MOVB
JSR
BI(

MLAY. aIDRHX
PC,LOOP
#10,3CSRx

MOV

al IRX,BAD

BEQ

MOV

ERRSOFT

#1,CHAN

#2403 ,BAD

10%

#2403, 600D

1711,€501,ERRSG

(MP

P LOAD SRE INTO ACR 2=e=c=cececeae
ISR

Tees

[N COMPARE DATA FOR

ISR

;

‘CREATE MLA?

tes

*STORE MLA1

jemeee LOAD MLA1 INTO DOR 2===cc=c-ee=

‘WAIT A LITTLE

SSELECT CHANNEL 1

SLOAD CHANNEL NUMBER

<GET

JIR1

CONTENTS

:MA,IFC,RLC,MAC BIT SHOULD BE

:BRANCH IF YES

SET

:SET UP DATA FOR ERROR MESSAGE
:ERROR HANDLER

TRAP

CSERSOFT

TRAP

C$CLPY

1711
MORD
ESOI
.WORD
ERR501
.WORD
;BRANCH BACK TO BGNSEG If ERRLOOP [S SET

(KLOOP
MOV

AND 2

CWATT 100 US
SIS DPA EVEN
:BRANCH IF YES
SSET ULPA BIT IN COMPARE DATA FOR
F

#220,3]CRHX

CMP

108 :

PC,WAIT
#1,DPA1
3%
#1,CDATIN
#1,(DAT12

MOV

002500

JSR
BIT
BEQ
BIS
BIS
8IS
8IS

MOV

002502
002502

CS$ESEG

:CLEAR ULPA BIT IN ISR 1
:SET UP PARAME TER

ADD

132422

TRAP
T

PC,CULPA
P, BGIN2

MOV

002374

JSR
JSR

BIC
BIC

132432

BGNSEG

MOVB

132544

004

1710
ES02
ERRSO01

;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
CSCLPI
TRAP

104405
R

CSERSOFT

MWORD
MWORD
.MORD

CKLOOP

63$:

ISR2 CONTENTS

;BRANCH IF YES

CDAT14,G0OD

ERRSOFT 1710,£502,ERRSO1

PONVES

#10,3CSRY

BEQ

O000—=
OO0O0O
—=O—=
=50

BIS
MOV

O=00000000
OWOO—~0O0000Q
ONOO —=NUINNONO

047502

SEQ 153

59-3

ENDSEG

=ON—==HrO- 2O =2 &SSOV NNNO W
O RININIA = R
=N
WORINNINININ

047474
047502
047502

eloleleleleloPlelolelolelelolalololalale]
o

067422
3 047430
047436
0474446
0467446
067454
0474654
047456
047460
047462
047464
047464
047466

PAGE

TESt

OO000
WWNWWES

(el NclelePTlN

TESY

MACRO M 1
REMOTE/LOCAL l N
TESTS

=D
WNES

HARDWARE

31SRX .BAD

coAT11,B8AD

sGET

ISR1

CONTENTS

SATN,NDAC ,REM,ATN,LAPS,LADS,
(ULPAYLS SET

b
—

& —

= —»

BEQ

002500

MOV

ERRSOFY

W= NWWNWNWSNNG
NONNNNNNNNNO
OO OV
OO >

PCLOOP

PC,LOOP

#10.3CSRX
#1,CHAN

aliRY _BAD
#3,BAD

30§

#3,600D

1713,£501,ERRSO1

8IS
MOV

ADD
MOV
MOvB

JSR
8lcC

MOV
Movse

MOV
(MP
BEQ
MOV

D e LOAD GTL INTO DOR 2-==-=s=ecccece=JWAIT A LITTLE

SWAIT A LITTLE

sSELECT CHANNEL 1
:LOAD C(HANNEL NUMBER
JGET JIR1 CONTENTS
JRLC,MAC BIT SHOULD BE SET

;BRANCH IF YES
;SET UP DATA FOR ERROR MESSAGE
;ERROR HANDLER
TRAP
‘

LMWORD
.WORC
.WORD
[S
ERRLOOP
IF
BGNSEG
TO
;BRANCH

(KLOOP
OO =NNONO
=2 OOOQOO
N £ OWO
OOO
O =2 b S d
N N=2OOO0OO0OONCO

CSCLPT

em==a- LOAD UNL INTO DOR 2===ccccceccee-

T
ERRSOF

WHNES
NS AOSS

P
N =R NNNIN
S WNO N(VLS
NESNNNNINNN—N SN~
N2 NN NWNWNNWO QONO
NONNNNNNNN—= —_~NOr

NSNS
= ONIWVY
NNOON

TRAP

277, 31DRHX

(mp
BEQ
MOV

#10,3CSRX

oPA{,R1

240,R1
R1,MLAY
MLAT,@]DRHX
PC,LOOP

#10,aCSRX

#1,CHAN
#7.31CRHX
al [RX,BAD

#2003,BAD
3 b1 3
#2003,600D

T 1744 ,£501 ,ERRS01
ERRSOF

;SELECT CHANNEL 2
JCREATE MLAT
;STORE MLA1

;====L0AD MLA1

SWAIT A LITTLE

TRAP

132052

002502
002502

002462

002500

33%:

MOV

(MP
BEQ
MOV

T
ERRSOF

SEY

(sCLPl

sSELECT CHANNEL 1
:LOAD CHANNEL NUMBER

;====L0AD NOT RTL INTO DOR le-==ecceccceaJGET TIR1 CONTENTS
:MA,RLC,MAC BIT SHOULD BE SET
:BRANCHM IF VES

:SET UP DATA FOR ERROR MESSAGE

;ERROR HANDLER

TRAP

.WORD

Y
CSERSOF

1744
ESO1

CSCLP

114.BAD

;GET [SR1 CONTENTS
sATN,NDAC ,REN,ATN,LPAS,LADS(ULPA)IS SET

112,600D

:SET UP DATA FOR ERROR MESSAGE

RX,BAD

5,6502,ERRS01

sBRANCH [F

YES

sERROR HANDLER

TRAP

T
(SERSOF

WORD

ES0?

MORD

(KLOOP

1713

ESO1
ERRSO1

;BRANCH BACK TO BGNSEG I;RERRLOOP IS SET

C(KLOOP

002462

T
CSERSOF

[NTO DOR 2==========cec=-

.WORD
.MORD

NENIES
OOV
ANINWN

CSERSOFT

.WORD
1712
.WORD
€502
ERRSO1
.WOR
:BRANCH BACK TO BGNSEG I[F ERRLOOP S SET

mMove
MOV
MOV

30%:

TRAP

mMovB

JSR
BIC

132206

YES
;SET UP DATA FOR ERROR MESSAGE
JERROR HANDLER

sSELECT CHANNEL 2

JSR

000003

sBRANCH [F

#10,aCSRX
#1,3
1 DRHX

BIS

W WVIHANES

NEENNES
WN—2WWWO
NONNO

—=ON==apfO==0—

1712,€502,ERRSO?

(KLOOP
~O0O0COO0O00O
WOO—=O~00
NOO
=0 =00

A= RSN SRNOSNIND
B
N NNNNNNNNNES

O00000O—O—-0=
=ON==LO~O—-=2N0DO
000~
OOOO
O0O00O0—00O0—-O0000=
wVo

OO00O0

OO00—

—ON— O

O0CO0O0O—=

OO0

COO~

(=
o

208
C(OAT11.G 00D

P
Yar
el
~NTO OO e
- 3> P >

W=
WNO

002460

SEQ 154

6:46 ' PAGE 59-4

OOV
ONON

WY LY, Lo
NS
NS H

6066 047736
6067 047740
6068 047746
047746
047750
047752

REMOTE/LOC

T O

MA(

17:

—3x

TESTS

o
000
(=]
OO00O
-~ o

HARDWARE

TEST

L 12

.WORD

1715

ERRS501

;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET

M2
HARDWARE TESTS
TEST

17:

MACRO M1113

REMOTE/LOCAL

06-SEP-B2 16:46

INTERFACE

050234
6104 050236

104406
052777

000010

6106 050252

004737

011060

6105 050244

6107 050256
6108
6109
6110
6111
6112

050266
050272
050300
050302
050310
050310
050312
050314
050316
6113 050320
050320
6114 050322

6115 050330

6116 050336
6117 050340

6118 0506346

050346
050350
050352
050354
6119 050356
050356
6120 050360
6121 050366
6122 050374

113777

042777

017737
022737
001410
012737

132024

000010

132014

131760
002002

002502
002502

002002

002500

104406
017737

023737

001410
013737

131730

002460
002460

104406
052777
112777
004737

050464
050466
050470
050472
6135 050474
050474
6136 050476
6137 050506
6138 050512

6139 050516

002502

438:

001410
013737

131712
131702

131636
002502

002502

508:

131672

PC,LOOP

TWAIT A LITTLE

MLA{,al0RHX
#10,3CSRX

al IRX,BAD
#2002 .BAD
438
#2002,600D
1716,E501,ERRSO1

131612

002464

002502

002500

508
CDAT11,600D

‘BRANCH IF YES
‘SET UP DATA FOR ERROR MESSAGE

CDAT1{,BAD

BIS
MOVB
JSR

000010
000001

131574
131564

112777

000077

131552

011060

*ERROR HANDLER

#10.3CSRX
#21.a31DRHX
PC,LOOP

alIRX,BAD
BAD
53¢

SGET IIRT CONTENTS
:CONTENTS SHOULD BE ZERO
‘BRANCH IF YES

#10.3CSRX

SSELELT CHANNEL 1

MOV

31SRX,BAD

‘SET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER
TRAP
CSERSOFT
L,MORD
1718
"WORD
ESO1
"WORD
ERRSO1
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
CS$CLPI
:GET ISR1 CONTENTS

BEQ
MOV

60$
CDAT13, 600D

"BRANCH IF YES
PSET UP DATA FOR ERROR MESSAGE

CMP

CDAT1%,BAD

ERRSOFT 1719,E502,ERR501

60%$:

*ATN,NDAC ,REN,REM,ATN,LPAS,LADS
(ULPA)SET
TRAP
CSERSONT
L.WORD
1717
-WORD
ESO2
.WORD
ERRSO!
:BRANCH TO BGNSEG IF ERRLOOP IS SET
TRAP
C$CLP1
sSELECT CHANNEL 2
teceaa LOAD LLO INTO DOR 2===e=cceccaceaTWAIT A LITTLE

(KLOOP

104406
052777
112777

SSELECT CHANNEL 1

BEQ
MOV

MOV
ST
BEQ

53$:

toeeaa LOAD MLAT INTO DOR 2--=ceececccee-

alSRX,BAD

CMP

CLR
600D
ERRSOFT 1718,E501,ERRSO1

002502

C$CLPY

MOV

{KLOOP

002464

TRAP

SGET JIRT CONTENTS
*MA,RLC, BIT SHOULD BE SET
‘BRANCH IF YES
YSET UP DATA FOR ERROR MESSAGE
*ERRGR HANDLER
TRAP
CSERSOFT
LWORD
1716
.WORD
£501
"WORD
ERRS01
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
CSCLPT
:GET ISR1 CONTENTS

BIC

104457
003267
005447
003702

004737

JSR

MOvB

ERRSOFT 1717,€502,ERRS01

104457
003266
005406
003702

023737

;SELECT CHANNEL 2

MOV
CMP
BEQ
MOV
ERRSOFT

002500

000010
000021
011060

002500

104406
017737

#10,3CSRX

CKLOOP

005037

017737
005737
001407

BIS

BIC

104457
003265
005447
003702

6127 050422
6128 050426
050426
050430
050432
050434
6129 050436
050436
6130 050640

6134 050464

002502

SEQ 155

59-5

CKLOOP

000010

6132 050454
6133 050456

40%

104457
003264
005406
003702

042777

6131 050446

132034

002610

6123 050400

6124 050406
6125 050414
6126 050420

FUNCTION TEST

PAGE

BIS
MOVB

#10,3CSRX
#1,31DRHX

MOVE

#77,31DRHX

JSR

PC L OOP

*ATN,NDAC,REN,REM,LLO,ATN,LADS
(ULPA) SET

‘ERROR HANDLER

TRAP
(SERSOFT
MORD
1719
WORD
ESJ2
-WORD
[RRSOM
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
cscLPl
:SELECT CHANNEL 2
1==<<L0AD GTL INTO DOR 2=====eee cocccnee
TWAIT A LITTLE

teee==LOAD UNL INTO DOR 2==ecccee=e cccnes

N 12
17:

MACRO M1113

REMOTE/LOCAL

ONM-e WONMIO

TEST

TESTS

YOV0AN0OIV0

—COOO0000

TN T

O0OV0Oe-oFlVaYlVatVvlal

050640

104432

050642

000056

6160 050644

045

6158
6159

6161
6162
6163 050720
050720
050720

104401

06-SE P=82 16:45

INTERFACE

FUNCTION TEoT

PAGE

SEQ 156

59-6
L

BAD

£ 02,ERRS01
600D

HANNEL 1
CONTENTS
AC REN,LLO,ATN, (ULPA)

IS SET

;BRANCH BACK TO BGNSEG IF ERRLOO

CkLOOP

TRAP

SSELECT CHANNEL 2
i====LOAD NOT SRE INTQ ACR 2-==-==occce-

13442

10001$%:

1ST
BNE
INC
(MP
BEQ
JMP

EXQV17: EXIT

Qvp

TRAP

CSESEG

Exavi?

J[TRCNT
ITRCNT,ITRDEF
EX av1?
I1 ?Cl?
L)

TRAP

.WORD

)L
xxO

HARDWARE

o— wo -3

2XAREMOTE-LOCAL INTERFACE FUNCTION TESTAN/

L10046:

TRAP

(SETST

MARDWARE TESTS MACRO M1113 06-SEP=82 16:46 PAGE 60
TEST

18:

SERVICE

REQUEST

INTERFACE

FUNCTION TEST OF

6165

LSBTT.

CHANNEL

TEST 18:

SERVICE REQUEST

INTERFACE FUNCTION TEST OF

CHANNEL

6166

:"""Q.""""""'t""""'!""'t'..'""""'""""""Q'Q.""'."t.

6167
6168
6169

;
1Ex - TEST 18
STHIS TEST CHECKS THE SERIAL POLL REGISTER OF CHANNEL 1.
:PART 1 SETS AND CLEARS TME RSY BIT IN SPR REGISTER OF CHANNEL

g};%

‘PART 2 CHECKS THE SERIAL POLL SEQUENCE OF CHANNEL 1.

6174

SIF QUICK VERIFY PASS IS NOT SELECTED,

6176

(RN

2};?

6175

AND CHECKS THE SRQO BIT IN ISR2.

“0UT WITH DIFFERENT

6177 050722
050722
6178 050722
6179 050726
6180 050730
050730
050734
050740
050742
056746
6181 050750
6182 050756

050756
6183 050760
6186 050764

005737
001410

00232¢

012746

05173

104417
062706
012737

000004
000101

104404
004737
004737

010220
010710

012746
010600

000001

002312

000091

002470

6189 051010

042737

000001

002470

6192
6193
6194
6195

052777
012737
017737
022737

000010
000002
131176
001020

002374
002502
002502

001020

002500

051032

051040
0510646
051054

6196 051062

6197 051066
6198 051072

051072
051074
051076
051100
6199 051102
051102
6200 051106
6201 051112

6202 051120
6203 051122

6204 051130

051130

051132
05113¢
051136
6205 051140

000403

062777
112777

001410

012737

000010
000100

1312564
13123

7%:
MOV
ITAC18: BGNSEG

JSR
JSR

3%:

131240

104406
017737
032737

001010
012737

104457

003412
005447
003702

PC,CULPA
PC.BGIN2

TRAP
;CLEAR ULPA BIT IN ISR 1 AND 2
'SET UP PARAMETER

#1.DPA1
3s
#1,(DAT1S

‘1S DPA EVEN
‘BRANCH IF Y
YSET ULPA BIT

BIC

#1,CDAT1IS

:CLEAR ULPA BIT

8IS
MOV
MOV
CMP

#10,8CSRX
#2,CHAN
alIRX,BAD
#1020.BAD

BIC
move

.+10

#10,3CSRX
#00,al1CRLX

10%

MOV
#1020,G00D
ERRSOFT 1801,€501,ERRSO1

CKLOOP
131146
002000

002502
002502

122040

002500

108:

IS CARRIED

#101,RSAVE

BIT
BEQ
8IS

BEOQ

104457
003411
005406
003702

SERIAL POLL SEQUENCE

T18::
:1S THE PNT FLAG SET
“1F YES. PRINT THE TEST HEADER
P,
MOV
#TSHD1B,=-(SP)
MOV
#1,-(5P)
MOV
SP.RO
TRAP
CSPNTF
ADD
#4,SP
:DATA STORE FOR SERIAL POLL SEQUENCE

PNTF
7%
#TSHD18

000001

_
002402

THE

R RO RO PN IR LR ORI OO Rt O NN Rt R Rt R RN e eReERtetereReeROTERRRORETIROITRIOICTOITLY

1S7
BEQ
PRINTF

032737
001494
052737

6190 051016
6191 051026

P AN

BGNTST

6185 050770
6186 050776
6187 051000

6188 051006

DATA.

MOV
BIT
BNE
MOV

aISRX,BAD
#2000 ,BAD
138
#122040,6000

ERRSOFT 1802,€502,ERRS01
(KLOOP

($BSEG

IN COMPARE DATA FOR ISR

|N (OMPARE DATA FOR [SR

SSELECT CHANNEL 1
PPt SET RSV BIT [N SPR lecccccccccccaSSELECT CHANNEL 2
‘LOAD CHANNEL NUMBER
SGET IIR2 CONTENTS
2SRO,BO BIT SHOULD BE SET

‘BRANCH IF YES

PSET UP DATA FOR ERROR MESSAGE
‘ERROR HANDLER

(SERSOF1
TRAP
LWORD
1801
"WORD
ESO!
"WORD
ERRSO1
:BRANCH BACK TO BGNSEG IFf ERRLOOP IS SET
TRAP
($CLPI
;GET ISR2 CONTENTS
‘1S SRQ BIT SET ALSO ATN,NDAC,ATN(ULPA)
‘BRANCH IF YES
‘SET UP DATA FOR ERROR MESSAGE

*ERROR MANDLER

TRAP

CS$ERSOF Y

.WORD
1802
.WORD
ESO?
ERRSO!
"WORD
IS SET
ERRLOOP
IF
BGNSEG
TO
;BRANCH RACK

Q 157

HARDWARE TESTS MACRO M1113 06-SEP=82 16:46 PAGE 60-1
TEST

18:

SERVICE REQUEST

051140

104406

INTERFACE FUNCTION TEST OF

6206 0511642
6207 051150

042777
112777

000010
000000

131130
131110

6209
6210
6211
6212

017737
032737
001410
012737

131006
002000

002502
002502

120040

002500

6208 051156

051164
051172
051200
051202

6213 051210

051210
051212
051214
051216
6214 051220
051220
6215 051222
051222
6216

051222

052777

000010

13%:

131114

CHANNEL 1
TRAP

#10,3CSRX
#0,9lCRLX

SSELECT CHANNEL 1
jmeaaa CLEAR SPR 1 REGISTER-eeeecccccccccenx

MOV
BIT
BEQ
MOV

1SRX,BAD
#2000.BAD
20%
£120040,G600D

SGET ISR2 CONTENTS
*SRQ BIT SHOULD BE CLEARED
:BRANCH IF YES
SSET UP DATA FOR (OMPARE

#10,3CSRX

SSELECT CHANNEL 2

ERRSOF T 1805.5562.5"501

(KLOOP

104406

208:

104405

6217

ENDSEG
I

JERROR MANDLER

TRAP
(SERSOFT
.WORD
1803
LWORD
ES02
.WORD
ERRSO1
:BRANCH BACX TO BGNSEG IFf ERRLOOP IS SET
TRAP
cscLP

100008
:
Y YT YT

P Y Y PP

PP Y Y RY

“PART 2 CMECKS THE SERIAL POLL SEQUENCE OF

6218

6219 051224

0512264

6220 051226
6221 051234
6222 051242

104406

042777

000211

011060

131000
131000

130734
002374

6237 051360
6238 051366
6239 051370
6240 051376

022737
001410
012737

000405

002502

000405

002500

051434
051436

(000013

130752

130732

130672 002502

104457
003414
005406
003702
017737

104457
003415

($BSEG

$2<<<{0AD UNL INTO DOR 2e=ccecceccccsse
SWALT A LITTLE

000010
000001

6243 0516416 023737
6244 051424 001410
6245 051426 013737
6246 051436

TRAP

#77.3IDRHX
P(,LOOP

042777
012737

104406

T et
D L DL L DL L L T

MOVB
JSR

6234 051336
6235 051344

051376
051400
051402
051404
6241 051406
051406
6242 051410

Y X

C{HANNEL 1

131020

002312
000100
002414
002414
011060

6236 051352 017737

(SESEG

P L 2

000077
011060

131024
131030

013701
062701
010137
113777
004737

112777

TRAP

R L

;SELECT CHANNEL 1

000030

6233 051330

PP D

#10.,3CSRX

112777

6228 051302
6229 051306
6230 051312
6231 051316
6232 051326

BIC

6226 051270

004737

131044

6223 051250
6224 051256
6227 051276

PP YR

000010

002402
000010

112777

Y P

BGNSEG

113777
052777
112777
004737

6225 051262

($CLP!

BI(
MOVB

8IS

104457
003413
005447
003702

MOVB
BIS

move

MOVB
JSR

MOV
ADD
MOV
MOVB
JSR

MOvB
BIC
MOV

MOV

CMP
BEQ
MOV
ERRSOFT

RSAVE,alCRLX
#10,3CSRX

#211,31CRHxX
#30,3]1DRHX
PC.LOOP

DPAT,R1

130642

002502

002470

(02500

002502

MOV

pRaippe LOAD LON INTO ACR 2=ecccccccees
teeeee LOAD SPE
SWAIT A LITTLE

INTO DOR 2===ccccecceee

PC,LOOP

SCREATE MTA?
e
SSTORE MTA1
{oee=L0AD MTA1 INTQ DOR 2-=eccccccecces
CWAIT A LITTLE

#10,3CSRX
#1,CHAN

SSELECT CHANNEL 1
SLOAD CHANNEL NUMBER

#100.R1
R1,MTAY

MTA1,3I1DRHX

#1%5,31CRHX

alirRx,BAD

#405,8AD
308
#405,600D
1804.€501,ERRSO1

CKLOOP

002470

i2ee={OAD DATA INTQ SPR 'eeececceccccas
SSELECT CHANNEL 2

&1SRX,BAD

CMP
CDAT15,BAD
BEOQ
338
MOV
CDAT1S,600D
ERRSOFT 1805,E502,ERRSO1

iece=LOAD GTS INTO A(R 2=c-ceccccccaces

<GET IIR1 CONTENTS

SIFC,SPAS,MAC SHOULD BE SET
*BRANCH IF YES
“SET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

TRAP
(SERSOFT
.MORD
1804
.WORD
ES501
.WORD
ERRSO1
:BRANCH BACK TO BGNSEG If ERRLOOP 1S SET
TRAP
(S$CLPI
:GET ISR1 CONTENTS

*NDAC,NRFD,TADS,
(ULPA) SHOULD BE SET
‘BRANCH IFf YES
PSET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER
TRAP
.WORD

(SERSOF!T
1805

o 158

1€

0D 13
HARDWARE

TESTS

MACRO M1113

TEST 18: SERVICE REQUEST
051440
051462
62467 051446
0516444

6248 051466

06=-3EP-82 16:46

INTERFACE FUNCTION TEST OF

005447
003702
104406

052777
012737

000010
000002

002374

6251 051470
6252 051476
6253 051500

022737
001410
012737

001060

002502

6250 051462

6254 051506

051506
051510
051512
051514
6255 051516

051516
6256 051520
6257 051526
6258 051534

017737

130562

001060

130624

002502

000015
130540
002502

130542
002502

002502
002402

002502

6262 051554
6263 051562
051562
051564
051566
051570

013737

002402

002500

6264 051572
051572
6265 0515764
6266 051602
6267 051610
6268 051612

6269 051620

051620
051622
051624
051626
6270 051630
051630
6271 051632
6272 051640

104457
003420
005406
003702

6274 051652

112777

104406

130450
000020

002502
002502

000020

002500

6273 051646

6275 051660

004737

011060

6277 051672

112777

6278 051700

051700
051700
6279 051202
6280 051706
6281 051710
6282 051714

6283 051722

104405
005737

001010
005237
022737

001402

1806,£501,ERRSO1

40%:

MOVB
MOV
C(LRB
SWAB
CMP

BEOQ

#15,31 CRHX
S10RX,BAD
BAD
BAD
RSAVE ,BAD

438

MOV
RSAVE , GOOD
ERRSOFT 1807,£801,ERRSO1

43$:

MOV
CMP
BEQ
MOV

a1 IRX,BAD
#20,BAD
50$
#20,600D

ERRSOFT 1808,E501,ERRSO1

(KLOOP
000011
000031
011060

042777

#1060.8AD
40%
#1060,600D

al{Rx,BAD

(KLOOP

112777
112777
004737

6276 051664

CMP
BEQ
MOV

ERRSOFT

104457
003417
005510
003792
104406
017737
022737
001410
012737

#10,3CSRX
22, (HAN

(KLOOP

000337
023737

001410

BIS
MOV

MOV

002500

6259 051540
6260 051544

6261 051552

33%:

104457
003416
005406
003702

104406
112777
017737
105037

CMANNEL 1

(KLOOP

6249 051454

130430
130430

000137

130416

000010

130406

000000

130366

002234
002402
000176

002402

S0$:

SEQ 159

PAGE 60-2

MOVB
MOVB
JSR

#11,3]1CRHX
#31.3]DRHX
PC,LOOP

JSR

PC,LOOP

Move

BIC

MOVE

ENDSEG

ST
BNE
INC
(MP

BEQ

#1%7.310RHX

#10,3CSRX
#0,31CRLYX

.MORD
ESO2
.WORD
ERRSO1
;BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
($CLPI

SSELECT CHANNEL 2
*LOAD CHANNEL NUMBER

‘GET 1IR2 CONTENTS

*SRQ,B1,80 BIT SHOULD BE SET
"BRANCH' IF YES
SSET UP DATA FOR ERROR MESSAGE
‘ERROR HANDLER

TRAP
(SERSOFT
WORD
1806
LWORD
ESO1
.WORD
ERRSO!
;BRANCH BACK TO BGNSEG IF ERRLUOP IS SET

TRAP
(S$CLPI
se==elOAD TCS INTO A(R Pececcmccccccea"READ DATA FROM DIR2 REGISTER
SCLEAR LOW BYTE OF BAD CONTENTS

*SWAB BAD
:COMPARE TRANSMITTED WITH RECEIVED DATA

‘BRANCH IF EQUAL

PSET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER
TRAP
.WORD
.WORD
.WORD

(SERSOF1
1807
E801
ERRSO1
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
C$CLPI
:GET IIR2 CONTENTS
‘RO BIT SHOULD BE SET
‘BRANCH IF YES
PSET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP
(SERSOFT
WORD
1808
"WORD
ESO1
.WORD
ERRSO1
:BRANCH BACK T0 BGNSEG If ERRLOOP 1S SET
TRAP
C$CLPI
s=e==LOAD NOT LON INTO A(R 2ec==cceces
teeee{0AD SPD INTO DOR 2-ecemcececeeeSWAIT A LITTLE

t====LOAD UNT INTO DOR 2--e=eccmce==
‘WAIT A LITTLE

SSELECT CHANNEL 1

t=c<<(LEAR SPR 1 REGISTERe===eeccncaa-

10001$:

ovP
Exov18
RSAVE
#176 RSAVE

gxovis

TRAP
;1S QUICK VERIFY PASS SELECTED
SIF YES EXIT TEST
:CREATE NEW DATA PATTERN
*ALL DATA PATTERN DONE

S1F YES EXIT TEST

C(S$ESEG

WARDWARE

TEST

18:

TEST S

MACRO M1113

SERV 1CE REQUEST

6284 05172 &
6285 051730
051730
051732
6286
6287
6288 051734
6289
6290
6291 052030
052030
052030

000137

06-SEP=-82 16:46

INTERFACE FUNCTION TEST OF

C507564

CHANNEL

JMP
Exav18: ExIT

104632
000076

045

PAGE 60-3

;IF NO TEST
SEXIT

TEST

[TERATION
TRAP

.WORD

123

062

TSHD18:

NLIST

.A?§%Z
oL

LEVEN
ENDTST
1046401

1TAC18

187

SEQ 160

BEX

é%i?llSEfivlCE REQUEST INTERFACE FUNCTION TEST OF

L10047:

CHANNEL

TRAP

CSEXTT

L10047-.

1IN/

& IARY

hald
4

£ 13

fF 13
HARDWARE
TEST 19:

TESTS
MACRO M1113
06-SEP-82 16:46
PAGE
SERVICE REQUEST INTERFACE FUNTION TEST OF

SEQ 161

61
CHANNEL 2

6293

LSBTTL

6295
6296
6297

1EX = TEST 19
ruxs TEST CHECKS THE SERIAL POLL REGISTER OF CHANNEL 2.
‘PART 1 SETS AND CLEARS THE RSV BIT IN SPR REGISTER OF CHANNEL 2 AND

2%8?

SPART

6302
6303

SIF QUICK VERIFY PASS IS NOT SELECTED,
;OUT WITH DIFFERENT DATA,

629‘

TEST 19: SERVICE REQUEST

INTERFACE FUNTION TEST OF CHANNEL 2

"'.'"""""""""""""Q"t"'Q"'Q"'l"""'.""'t""0."""""

2533
630‘

CHECKS TME SRG BIT IN ISR1.

2 CMECKS THE

SERIAL POLL

SEQUENCE

CHANNEL 2.

THE

SERIAL POLL

SEQUENCE

IS CARRIED

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

6305 052032

052032
6306 052032
6307 052036

BGNTST

005737
001410

002324

052040
052046
052050
052052
052054
6309 052060
6310 052066
052066
6311 052070
6312 052076
6313 052100

012746
012746
010600
104417
062706
012737

053044
000001

106404
004737
004737
032737

010220
010534
000001

6315 052110

052737

6317 052120
6320
6321
6322
6323
6324
6329
6326

6308 052040

6314 052106

6316 052116
6318 052126
6319 052134

052142
052150
052156
052164
052172
052174
052202

PNTF
7%
#TSHD19

MoV

#1071 ,RSAVE

MOV
#TSHD19,=(SP)
MOV
#1,-(SP)
MOV
SP.RO
TRAP
(SPNIF
ADD
24,SP
;DATA STORE FOR SERIAL POLL SEOUENCE

002314

JSR
JSR
BIT

PC,CULPA
PC.BGINY
#1.DPA2

TRAP
;CLEAR ULPA BIT IN ISR 1 AND 2
1SET UP PARAMETER
‘1S
DPA EVEN

000071

002470

BIS

#1,(DAT1S

042737

000001

002470

BIC

01 (DAT1S

042777
012737
017737
022737
001410
012737

000010
000001
130066
001020

130130
002374
002502
002502

001020

002500

Bl
MOV
MOV
CMP
BEO
MOV
ERRSOFT

#10,3CSRX
21, CHAN
a1 {RX,BAD
#1020.BAD
10%
#1020,6
1901 ESO1,ERR501

001404

000403
052777
112777

052202
0522064
052206
052210
6327 052212
052212
6328 052214
6329 052222
6330 052230
6331 052232

104457
003555
005406
003702

052240
0522642
052246
052246
6333 052250

104457
003556
005447
003702

6332 052240

119:;
:1S THE PNT FLAG SET
.lF VES PRINT THE TEST HEADER
‘..

£3
8¢tQ
PRINTF

104406

017737
032737
001010
012737

000004

000101

000010
000100

)

00c402

130144
130124

7%:

ITAC19: BGNSEL

BEQ
13%:

BIS
MOVB

33’

‘BRANCH IF ¥

#10,3CSRX
0106 8l CRLX

(KLOOP
130036
002000

002502
002502

122040

002500

10%:

MOV
811
BNE
MOV

alSRX,BAD
#2000.8AD
138
812204

ERRSOF T 1902.(562 sanso1
(xL00P

($BSEG

SSET ULPA BIT IN COMPARE DATA FOR ISR
:CLEAR ULPA BIT IN COMPARE DATA FOR ISR

SSELECT CHANNEL 2
oo SET RSV BT [N SPR 2ecccccccccccae
SSELECT CHANNEL 1
*LOAD CHANNEL NUMBER
SGET 1IR1 CONTENTS
*SRQ,B0 BIT SHOULD BE SET
"BRANCH [F YES
:SET UP DATA FOR ERROR MESSAGE
;ERROR HANDLER

TRAP
CSERSOFT
.WORD
1901
"WORD
ESO1
.WORD
ERRSO1
:BRANCH BACK 10 BGNSEG 1f ERRLOOP S SET
RAP
C$CLPI
:GET ISR1 CONTENTS
‘1S SRO BIT SET ALSO ATN,NDAC,ATN(ULPA)
‘BRANCH [F YES
:SEI UP DATA FQOR ERROR MESSAGE

*ERROR HANDLER

(SERSOF 1
TRAP
LMORD
1902
.WORD
E507
.WORD
ERRSON
:BRANCH BA(CK TO BGNSEG IFf ERRLOOP S SET

G 13

SEQ 162

WARDWARE TESTS
MACRO M1113
06-SEP-82 16:46
PAGE 61<1
TEST 19: SERVICE REQUEST INTERFACE FUNTION TEST OF CHANNEL 2

052250
6334 052252
6335 052260

104406
052777
112777

6338 052302
6339 052310
6340 052312

032737
001410
012737

6336 052066
6337 052276

6341 052320

052320

052322
052324
052326
6362 052330
052330
6343 052332
6344

052332
052332

042777
017737

000010
000000

130020
130000

000010
127756

130004
002502

120040

002500

002000

8IS
MOVB

#10,3CSRX
20, QICRLX

TRAP
CS$CLPY
sSELECT CHANNEL 2
teceaa CLEAR SPR 2 REGISTEReeoccccccccccccaa

BIT
JEQ
MOV

ozooo BAD
2
120040 ,6000

;sao BIT SHOULD BE (LEARED
“BRANCH IF YES
SSET UP DATA FOR COMPARE

BI(
MOV

002502

#10,aCSRX
a1SRX,BAD

SELE(T CHANNEL 1
GET ISR1 CONTENTS

eansorr 1903.5562.ERR501

104457

003557
005447
003702
208 :

104405

*ERROR HANDLER

ENDSEG

100008:

SPART 2 CHECKS THE SERIAL POLL SEQUENCE OF
104404
052777
113777
042777
112777
004737

000010
002402
000010
000077
011060

12773
127714
127720
127710

6354 052400

112777

000030

127670

112777

004737

BGNSEG

000211

011060

0526412
052416
052622
052426
052436

013701
062701
010137
113777
004737

(002314
000100
002416
0024616
011060

6362 052446

052777

000010

6364 052462
6365 052470

017737
022737

6361 0526440

6363 052454

6366 052476

6367 052500
63682 052506
052506
052510
052512
052514
6369 052516
052516
6370 052520

6371 052526
6372 052534
6372 052536

6376 052544

052566
052546

TRAP

CSESEC

CHANNEL 2

j¥ttecccccccccnccnccccccccccccccccccccccccccco
s sact o cccncc s ccccacccccccccane

637 052334
052334
6348 052336
6349 052344
6350 052352
6351 052360
6352 052366

6355 052406

CSERSOF T

¢t¢eccccoccccccnsnccccnnccccccccc
s et et eccccccccccccsercceccceracccananaee

6345

6353 052372

TRAP

.WORD
1903
'WORD
502
.WORD
ERRS01
;BRANCH BACC TO BGNSEG If ERRLOOP IS SET
TRAP
CSCLPT

(KLOOP

104406

6346

6356
6357
6358
6359
6360

13%:

112777

012737

001410

012737

127670

127622

000002

002376

127562
000405
000405

023737

001410
013737
1046457
003561

MOVB

nso IDRHX

MOV
ADD
MOV
MOoVvB
JSR

opu2.n1
#100.R1
R1,MTA2

BIS

#10.3CSRX

JSR

Mmove

127624

MOV

002502
002502

MOV
cMp

BEOQ

002500

#211,31CRHX

HTAZ.SIDRHX
PC,LOOP

MS.aICRHx

127532

002502

002500

002470

002500

30%:

iecaaa LOAD LON IN"_ A(R le-ececacca-a-

‘WAlT A LITTLE

#2,CHAN

aliRX,BAD
#405,8AD

308

SCREATE MTA2
..
SSTORE MTA?
----- LOAD MTA!
SWAIT A LITTLE

INTO DOR 1===m=c=c=c=a-=

INTO DOR

lececcccccccaa

eeee LOAD GTS INTO ACR leecscscccccacs

SSELECT CHANNEL 2

SLOAD CHANNEL NUMBER

SGET IIR2 CONTENTS
S1FC.SPAS,MAC SHOULD BE

‘BRANCH IF YES

SET

MOV

21SRX,BAD

SSET UP DATA FOR ERROR MESSAGE
;ERROR HANDLER
TRAP
CS$ERSOFT
MORD
1904
.WORD
ESO1
.WORD
ERRSO1
:BRANCH BACK TO BGNSEG If ERRLOOP 1S SE!
TRAP
($CLPI
;GET [SR2 CONTENTS

aso

33¢
(DAT?

‘BRANCH [F YES
SSET UP DATA FOR ERROR MESSAGE

(KLOOP

002470

TRAP
($BSEG
sSELECT CHANNEL 2
;e=ee LOAD DATA INTQ SPR 2eeccecccccacaa
SSELECT CHANNEL 1
eeee LOAD UNL INTO DOR 1e=cececccmanaCWAIT A LITTLE

ieeees LOAD SPE

C,LO0P

MOV
#405,G00D
ERRSOFT 1904 ,E501,ERRSON

104457
003560
005406
003702
104406
017737

#10,8CSRX
RSAVE ,aJCRLX
=
#10.3CSRX
#77.3IDRHX
=
PC,LOOP

MOVB

127642

000013

BIS
MOVB
BIC
MOVB
JSR

CMP

(DAT15,BAD

enasor1 1905, tSoz eaaso1

*NDAC,NRFD,TADS,
(ULPA) SHOULD BE SET

*ERROR HANDLER

TRAP
WORD

CSERSOF1
1905

13
HARDWARE

TEST

19:

6375
6376
6377
6378

TESTS

SERVICE

052550
052552
0525564
052554
052556
052564
052572

MACRO M1113

REQUEST

(6-SEP-82

406

000010
000001
127652

6381 052610

001060

6382 052616

12754
002374
002502

002502
002500

052616
052620
052622
052624

6383 052626

CHMANNEL 2

BIC
MOV
MOV

#10,8(SRX
#1,(HAN
allRX,BAD

LWORD
ES02
WORD
ERRSO1
JBRAN(H BACK TO BGNSEG l‘ ERRLOOP IS SET
TRAP
csCLP?
:SELECT CHANNEL 1
;LOAD CHANNEL NUMBER
:GET JIR1 CONTENTS

BtQ

40%

;BRANCH [F

{mMp

MOV

ERRSOFT

#1060,8AD
#1060,6000D

1906,E501,ERRSO1

(xLOOP

052626

000015

6384 052630

127432

052636
052644
052650
052654

127430
002502
002502
002402

002502

6390 052664

002402

6389 052662

6391 052672
052672
052674

052676
052700
6392 052702
052702
6393 052704

MOv8

6396 052722

6397 052730

:SRQ,B1,80 BIT SHOULD BE SET
YES

JSET UP DATA FOR ERROR MESSAGE
JERROR WANDLER

;BRAN(H BA(CK

#15,31C(RHX

jeee= LOAD T(CS INTO ACR 1 .................

002502
002500

MOV

RSAVE,

:SET UP DATA FOR ERROR MESSAGE

127340
000020

002502
002502

000020

(002500

B8tQ

433

ERRSOFT 1907, 5802 ena501

MOV
(MP
8to
MOV

alIRX,BAD
#20,8AD
50%
#20,600

ERRSOFT 1908, 5501 ERRSO1

;ERROR HANDLER

TRAP
(SERSOFT
LMWORD
1907
.WORD
€802
WORD
ERRSO!
;BRANCH BACK TO BONSEG IF ERRLOOP IS SET
TRAP
(sCLPY
:GET JIRY CONTENTS
;80 BIT SHOULD BE SET
:BRANCH IFf YES
:SET UP DATA FOR ERROR MESSAGE

"ERROR HANDLER

TRAP
(SERSOFT
.WORD
1908
.WORD
€501
.WORD
ERRSO1
JBRAN(CH BA(CK TO BGNSEG IF ERRLOOP IS SETV
TRAP

000011
000031

127320
127320

MOvB
MOvVB

JSR
MOvV8

LOOP
IDRHXY
0137

UAII A LITTLE

6606 052776

052777

000010

127276

8ls

016 8(SRX

JSELECT C(HANNEL 2

004737 011060
112777 000137 127306
052762
6602
6403 052770 004737 011060
6606 053010

053010
053010

6407 053012

64L0R 053016
6409 053020
6610 053026

6611 053032

104405

005737

001010
005237
022737

001402

127256

002234
002402
00017¢

002402

JSR

MOov8

ENDSEG

#11,8IC(RHX
031.310RH!

;BRANCH IF EQUAL

112777
112777

000000

CsCLP

ERRLUOP S SET

SREAD DATA FROM DIR1 REGISTER
;CLEAR LOW BYTE OF BAD CONTENTS
;SUAB BAD
;COMPARE TRANSMITTED WITH RECEIVED DATA

(xLOO0P

112777

RAP

TO BONSEG lF

6399 052742
6400 052750

6405 053002

CS$ERSOFT
1906
E501
ERRSO

81DRX,BAD
BAD
BAD
RSAVE ,BAD

052730
052732
052734
052736
6398 052740

6401 052756

TRAP
.WORD
.WORD
.WORD

MOV
(LRB
SWAB
(mp

(xLOOP

6394 052712
6395 052720

052740

SEQ 163

61-2

(KLOOP

001060

6380 052606

PAGE

INTERFACE FUNTION TEST OF

5447
3702

6379 052600

6385
6386
6387
6388

16:46

eee- LOAD UNT INTO DOR 1==ccececcccccee

PC,LOOP

CWAIT A LITTLE

20, al(RLl

----- CLEAR SPR 2 REGISTER=-====ceccncaa

10001%:

TRAP

183

avp

;1S GUICK VERIFY PASS SELECTED

BEQ

exovio

SIF YES EXIT TEST

B8NE
INC
(MP

($CLPI

ee=- LOAD NOT LON INTO A(R IELTLEL LT
----- LOAD SPD INTQ DOR levcwceccccccaa

Exav19
RSAVE
8176 ,RSAVE

JIF YES EXIT TESY
JCREATE NEW DATA PATTERN
;ALL DATA PATTERN DONE

($ESEG

113
HWARDWARE

TEST

19:

TESTS

MACRQ M1113

SCRVICE REQUEST

6412 053034
6613 053040
053040

6014 053042

64615

22}9 053044
6618
6419 053140
053140
053140

000137

06-SEP-82

16:46

PAGE

INTERFACE FUNTION TEST OF

(52066

CMANNEL 2

.
JMP
EXQvi9: EXIT

104432

SEQ 164

61-3

[TAC19
197

JIF NO TEST
JEXIT TEST

[TERATION
TRAP

000076
045

.WORD

123

062

T1SHDI19:

NLIST

.A?ggl
L

.EVEN
ENDTST
304400

BEX

é%i?!ASERVX(E REQUEST

INTERFACE

FUNCTION TEST OF

L10050:

CSEXIT

1L10050-.

(HANNEL 2IN/

TRAP

CSETST

J 13
HARDWARE
TEST

20:

TESTS

MACRO M1113

PARALLEL

POLL

(06-SF°=82 16:46

INTERFACE

FUNCTION

64621

LSBTTL

6422
6427
6424
6425

SN
=W
O

OO
=

SEQUENCE

CMANNEL

(LOCAL

CONFIGURED).

7%
#T1SHD20

120.:
1S THE PNT FLAG SET

“IF YES, PRINT THE TEST WEADER
MOV
MOV

#TSHD20,=(SP)
#1,-(SP)

ADD

86 ,SP

MoV
TRAP

002620

7%:

MOV
MOV

#1,MSA1
#1460 RSAVE

;LOAD DATA FOR PPR

JSR

PC.BGIN2

sSET UP PARAMETER

MovBs
Move

#4031 SRHX

J1TAC20: JSR

PC,CULPA

#10,3CSRX
#22%
31 CRHX

8IC

BGNSEG

000020

002500

MovB

BIS

MOV
MOov8
MOV
MOV

T
ERRSOF

W WWWO
NONNO

NSNS

10%:

#2,CHAN

. #216,31CRHX

(MPB
8taQ

NONSES
OB NIWV
SN

000020

#10,3CSRX
#20,81DRLX
#10,3CSRX

8IC

S1CRX,BAD
#20,BAD
10
#20,6000

2001 ,€901, ERRS01

NENES
OHMNLWV
NUNNIN

000016

20%:

sSELECT CHANNEL 1
;====L0AD DA] INTQ A(CR 1
s====SET UCG BIT IN ISR 1
SSELECT CHANNEL 1
----- LOAD PP5 INTO PPR 1

TRAP

SSELECT CHANNEL 2

*LOAD CHANNEL NUMBER
..... LOAD

RPP_INTQ

‘GET [CR2 CONTENTS

ACR

:1CR CONTENTS SHOULD BE 20

sBRANCH [F YES
sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER
TRAP

.WORD
+WORD
.WORD
ERRLOOP 1S

MOV

sGET ISRZ CONTENTS

MOV

sSET UP DATA FOR ERROR MESSAGE

ATN,EO] ,ATN SHOULD BE
sBRANCH IF YES

;ERROR HANDLER

MOVB

ENDSEG

TRAP

SET

TRAP

.wORD
.WORD
.WORD

:BRANCH TO BGNSEG IF ERRLOOP IS

(kLOOP

126670

sCLEAR ULPA BIT IN ISR 1 AND 2

;BRANCH TO BGNSEG IF

(MP
BEQ

sP,RO
CSPNTF

+LOAD FIRST PPE

(kLOOP

T
ERRSOF

WWVINE

1046405

PNTF

BEQ

QONOMNINN
OO
NNN
VIV NIWO OO
OO N~N=MNIN
OO
SSONON

NS NNNNNNNS S NNNSNSNNNNESONN
W WWNWNNNGOG
NN NWWRIWNO
= O N
NONNSNSNSNNYS
NNNNNNNONOOO

~—=000000—-000

=ONS—=
NSO
=N
S

OO—O0O—-00—0—=

1ST

PRINTF

w2l OO atRO———
NN S SN
SO

00232¢

OO0O0OQ
WWIWE

OO0~

= ON=O
PNU=NINE

~
NO
NGO

6457
6458

INTERFACE FUNCTION TEST OF

BGNTST

PSS

6456

PARALLEL POLL

;"""""."""""'""""Q"'""""'."'."""tt""'Q""""".".Q

OO0~

6451
6452
6453
6454
6455

20:

:PART 2 CHECKS PARALLEL POLL SEQUENCE (REMOTE CONFIGURED).

QOO
—
OO00O0

6450

TEST

IEX = TEST 20

-—
-0

6429
6430
6431

CHANNEL

SPART 1 CHECKS PAR ALLEL POLL
A
AN
WA
A
A
AW VHA VWA VA
A VA VWA
AN WA N AW
LA WA VWAV
N AN U N N AN U U AN N U A
U N U W AN U U U AN L
N U U L U AN U U U N L AN
N AN N N AN U N LN N AN NN N NN
N1, ] PCIRIPNIRNININD
b cod e eod e o =D o s D o oD
B B B
A N U A N N AN AN N AN N LN AN U A AN AN AN LN AN NN N [p 1N 1,1,
V]WWIANN) =2 = O N NN ONON NN
ES B B
OOONNNOO
O OO NN S NINARINNINI NN = — o~ ~[o JV 0
SO0
(=]
NSO oOoONSOSHOOTrNNO SOOI
OQOOONOOOMMLIOONONSNNOO MU

6428

SEQ 165

;"'"."""""""""'"""""t'.'lt""'."'""""'.""""'Q"'.'Q'

[eYelolelelelolelalalqglelelelileleleleleleolelalelelalelololelolelolaolelelalolelalololalelolelaolelel
o)

6426
64627

TEST

PAGE 62

#16,31CRHX

TRAP

Hd LOAD NOT RPP [NTO A(CR 2
10000%:

TRAP

(SESEG

K 13
HARDWARE TESTS
MACRO M1113
06-SEP=8B2 16:46
PAGE 62-1
TEST 20: PARALLEL POLL INTERFACE FUNCTION TEST OF CHANNEL

SEQ 166

6459

822?

;PART 2 CHECKS THE PARALLEL POLL SEQUENCE

L T

(REMOTE

T T

CONF IGURED)

.000 ..........................................................................

6462 053402
053402
6663 0536404
6664 053412
6465 053420

1044064
052777
112777
004737

6467
6468
6469
6470
6471

012737
017737
122737
001410
012737

6466 053426

053432
053640
053646
0534564
053456

6472 053464

042777

BGNSEG
000010
000025
011060

126666
126656

000001
126620
000025

002374
002502
00250

000025

002500

000010

126646

053464
053466
053470
053472
053474
053474
0536476
053504
053512
053516
053522

104406
112777
112777
013701
062701
010137

000000
0000017
002312
000040
002410

126570
126556

6480 053534

113777

002410

126534

6473
6474
6475
6476
6477
6478

004737

23$:

104404
052777
112777
004737

000010
000005
011060

126520
126510

6488 (53600
6489 053606

017737
122737

126460
000005

002502
002502

000005

002500

6491 053616

6492 053624

053624
053626
053630
053632
6493 053634
053634
6494 053636
6495 053644
6496 053652
053652
053652
6497 053654
053654
6498 053656

011060

012737

112777

Move

MLAf, anoaux

000010

126500

SWAIT
A LITTLE

000001

126424

126416

31CRX.BAD
#5,BAD

MOVB

MOVB
ENDSEG

----- LOAD MLAT INTO DOR 2e===ccccceces

SSELECT CHANNEL 1

‘BRANCH IF YES

00D

#24,31CRHX

#1,3]CRHX

SGET ICRT CONTENTS
S1CR CONTENTS SHOULD BE

126414

BIS

*ERROR HANDLER

TRAP
(SERSOFT
.MORD
2004
.WORD
E901
.WORD
ERRSO1
:BRANCH BACK TO BGNSEG 1r ERRLOOP [S SET
RAP
(S$CLPI
;====L0AD PTS INTO ACR 1 -------------1====LOAD NOT DACR INTO A(R }===cecee10002$:

#10,3CSRX

(SESEG

‘SET UP DATA FOR ERROR MESSAGE

BGNSEG

000010

TRAP

TRAP
($BSEG
SELECT CHANNEL 2
i===<LOAD PPC INTO DOR 2ecevecemcecnaSWAIT A LITTLE

#10,3CSRX

ERRSOF T 2064.5901.£anso1

30%:

SSELECT CHANNEL 2

10001$:

CKLOOP
000024

TRAP
(SERSOFT
.WORD
2003
.WORD
E901
.WORD
ERRSO1
:BRANCH TO BGNSEG IF ERRLOOP IS SET
TRAP
C$CLPY
;----CLEAR PPR REGISTER===cccecacraaas
eee- LOAD NOT DACR INTO ACR le=eeeceeCREAYE MLA1

PC.LOOP

MOV
CMPB

MOV

*ERROR HANDLER

.srons MLA1

#10,3CSRX
#5,3]DRHX
PC.LOOP

BEQ

SLOAD CHANNEL NUMBER
SGET ICR1 CONTENTS
*1CR CONTENTS SHOULD BE 25
*BRANCH IF YES
*SET UP DATA FOR ERROR MESSAGE

016 aCSRX

BIS
MOVB
JSR

BIC

TRAP
($BSEG
;SELECT CHANNEL 2
ceeae LOAD PPU INTO DOR 2eerccccccccaaa
SWAIT A LITTLE

SSELECT CHANNEL 1

BGNSEG

104405
104404
052777

#0,3IDRLX
#1.3ICRHX
DPA1,R1
xao.a1
MLA1

JSR
ENDSEG

104457
003724
005644
003702

104406

MOVB
MOVB
MOV
ADD
MOV

BIS

104405

001410

#1,CHAN
alCRX,BAD
#25,BAD
238
#25,600D

#10,aCSRX

CKLOOP

6481 053542
6482 053546
053546
053546
6483 053550
053550
6486 053552
6485 053560
6486 053566

6490 053614

MOV
MOV
CMPB
BEQ
MOV

ERRSOFT 200%,€901,ERRSO1

104457
003723
005644
003702

042777

#10,3CSRX
#25,0IDRHX
PC,LOOP

BIC

6479 053526 052777 000010 126544

6487 053572

BIS
MOVB
JSR

SSELECT CHANNEL 2

TRAP

(SESEG

TRAP

($BSEG

L 13

SEQ 167

MARDWARE TESTS MACRO M1113 06-SEP-82 16:46 PAGE 62-2
TEST 20: PARALLEL POLL INTERFACE FUNCTION TEST OF CHANNEL 1

6499 053664
6500 053672

113777
004737

002602
011060

126404

6502 053706
6503 053712
6504 053720
6505 053726
6506 053730
6507 053736

012737
017737
123737
001410
013737

000001
126346
002402

002374
002502
002502

002402

002500

6501 053676

042777

000010

126376

053736
053740
0537642
053744
6508 053746
053746
6509 053750
6510 053756

104457
003725
005544
003702

104406
113777
112777

002420
000001

126316
126304

6512 053772
6513 054000

112777
004737

000077
011060

126276

017737
123737
001410
013737

126246
002420

002502
002502

002420

002500

6511 053764

6514 054006

6515 056012
6516 056020
6517 056026
6518 054030
6519 054036

054036
054040
054042
054064
6520 054046
054046
6521 054050
6522 054056

052777

104405

6524 054064
6525 054066
6526 054072
6527 0564076

001012
005237
106137
022737

000010

6529 054106
6530 054112

000137

054112
054114

104432
000074

6533 054116

045

6531

6532

6534
6535
6536 054210

054210
054210

408:

126306

104401

MOV
MOV
(MPB
BEQ
MOV
ERRSOFT

0, CHAN
3l (RX,BAD
RSAVE.BAD
4
RSA
2005 s9o1,ena501

LOAD CHANNEL NUMBER
SGET ICR1 CONTENTS
“ICR CONTENTS SHOULD BE PPE
*BRANCH IF YES
*SET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

#10,3CSRX

MOVB
MOVB

MSA1,alDRLX
#1.@fCRHX

MOVB
JSR

#77.3IDRHX
PC,LOOP

BIS

MOVB

126256

#10,3CSRX

#216,81CRHX

3l CRX,BAD
MOV
MSA1,BAD
CMPB
BEQ
50%
MSA1,G
MOV
ERRSOFT 2006, 5901 ERRS01

CKLOOP

000016

126212

6523 054060 005737 002236
6528 054106 001402

;====LOAD PPE INTO DOR 2-=======eec=-TWAIT A LITILE

BIC

104457
003726
005644
003702

054056
054056

RSAVE,3IDRHX
PC,LOOP

CKLOOP

112777 000216

104406
112777

MOVB
JSR

002402
002420
000157

002402

MOVB

ENDSEG

062

#16,3l(RHX

CSERSOFT
TRAP
2005
.WORD
E901
WORD
ERRS01
.WORD
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
(S$CLPI
TRAP
;====LOAD DATA INTO PPR l====seececcai LOAD NOT DACR INTO ACR l===e=ee===

TSELECT. .ANNEL 2

=== LOAD UNL INTO DOR 2-=======mce=e“WAIT A LITTLE
i---- LOAD RPP INTO A(R 2====ce-eeecc-a$GET ICR2 CONTENTS
: COMPARE DATA
*BRANCH IF YES
“SET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

CSERSOFT
TRAP
2006
.WORD
E901
WORD
ERRS501
.WORD
;BRANCH TO BGNSEG IFf ERRLOOP IS SET
CSCLPI
;====LOAD NOT RPP INTO ACR Demeesostin
10003$:

TRAP

CSESEG

TRAP
.WORD

CSEXIT
10051

18T

ovpP

;1S QUICK VERIFY PASS SELECTED

BEQ

é
EXQV

YEXIT TEST IF YES

BNE
INC
ROLB
(MP

JMP
EXQV20: EXIT

053204

123

50%:

ESELECT CHANNEL 1

EXOV20
RSAVE
MSAI
¥157, RSAVE

1TAC20
TS

NLIST

BEX

LIST
.EVEN
ENDTST

BEX

TSHD20: .ASCIZ

(IF YES EXiT TEST
*CREATE NEW PPE
: CHANGE DATA
ALL PPE DONE

“IF NO TEST ITERATION
SEXIT TEST

/XS2XAPARALLEL POLL INTERFACE FUNCTION TEST OF CHANNEL 1IN/
L10051:

TRAP

CSETST

M3
HARDWARE TESTS
TEST

21:

MACRO M1113

PARALLEL POLL

06-SEP-82 16:46

SEQ 168

PAGE 63

INTERFACE FUNCTION TEST OF

CHANNEL 2

TEST 21:

.SBTTL

PARALLEL POLL

INTERFACE FUNCTION TEST OF

CHANNEL 2

:"Q"tt""'"""'"""""'"""...".".'Q"'"""'.'"""""""""

;PART

JEX = TEST 21

(HECKS PARALLEL POLL SEQUENCE

(LOCAL CONFIGURED).

:PART 2 CHECKS PARALLEL POLL SEQUENCE (REMOTE CONFGURED).
AR

AR AR

b
—

7%:

MOvVB

OCONINESHNO
o
SONON

(oS IV 1, NIV, IV, 1V, ]
WAINIESNIWNSN
N N

AN
O
— e

CO=O
s
OONONININ

BGNSEG

8ls

Movs

8IC

MOV
Movs
MOV

(MPB
8EQ

002500

MOV

T
ERRSOF

=N Q
NONNO

125646
104040

002502
002502

104040

002500

10$:

000016

125620

#10,3CSRX
#22%,
31 CRHX
#40,31SRHX

#10,3CSRX
#20.3IDRLX
#10.aCSRX
#1,CHAN
#216,31CRHX
alCRX,BAD
#20,BAD
108
#20,600D

2101,E901,ERRSO1

ARl

2RRdd]])

T21::
;1S THE PNT FLAG SET
sIF YES, PRINT THE TEST HEADER
#TSHD21,-(SP)
#1,-(SP)

sSET UP PARAMETER

sSELECT CHANNEL 2
:====LOAD DAl INTO A(R 2
¢====SET UCG BIT IN ISR 2

sSELECT CHANNEL 2

----- LOAD PP5 INTO PPR 2

SSELECT CHANNEL 1

‘LOAD CHANNEL NUMBER
----- LOAD RPP

_INTO A(CR

*GET ICR1 CONTENTS

:ICR CONTENTS SHOULD BE 20
+BRANCH IF YES
¢SET UP DATA FOR ERROR MESSAGE
sERROR HANDLER

-WORD

sBRANCH TO BGNSEG IF ERRLOOP IS

MOV

;GET ISR1 CONTENTS

¢ATN,EOI ,ATN
SHOULD BE
sBRANCH IF VYES

cMp

TRAP

SET

T
ERRSOF

¢SET UP DATA FOR ERROR MESSAGE
:ERROR HANDLER

CKLOOP

:BRANCH TO BGNSEG IF ERR%SR; )

MOV

20%:

;LOAD DATA FOR PPR
sLOAD FIRST PPE
sCLEAR ULPA BIT ISR 1 AND 2

(KLOOP

BEQ

OOV
NNOI'N
~NO
NO

#1,MSA1
#140,RSAVE
PC,CILPA
PC .BGINY

JTAC21:

OO
[V,1V
Te
NNO
VIO
Hoo

002420
002402

NOOS
NENNES

79
#TSHD21

CSPNTF

NSO
NS

104405

PNTF

SP,RO

NN =O000

=W
O
NNNWWWWO
=O S
NNNNNNNONNOOOD
W=WWWWNWINSNNG
NONNNNNNNES

TST
8EQ
PRINTF

OOV
N SN

NENNNNNNNEG

002324

[elelelelelelele)
OO —=2—=2000
eleoleolelelelole]
ONOWVNI =00
SO
NN
OO
OWOHrOO
=2

SN
NNSNNSNNSNSNSONN

=2o0000000=000
=VN0O0O =00

OO
OO0

NSO
ONIND
N=LNONNINNONMNDES
WSS

O0OO0—=
OOO0O0
OO00O0O—=
=ON—=D

N—=MUNS
WSS

OO0
—=
QOO0

054436
6573 054440
054440
657L 054442
6575 054450
054450
054450

6568
6569
6570
6571 0
6572

6567

AA RS

BGNTST

OO=0O—0O00=0=
=ON==ALDN0O

NO SOOI

NINVMNLNIRNLNVINININD
WWINRININ)
—b —b —d >

MAAAAALRAAAS A A AL

MovB

ENDSEG

.WORD

#16,3[CRHX

;o= LOAD NOT RPP INTO A(CR 1
10000%:

TRAP

(SESEG

SEQ 169

HARDWARE TESTS
MACRO M1113
PAGE 63-1
06-SEP-8¥ 16:46
TEST 21: PARALLEL POLL INTERFACE FUNCTION TEST OF CHANNEL 2

2555

:PART 2 CHECKS THE PARALLEL POLL SEQUENCE
.‘b cacmcncnvsces LI XY T

6579 054452
054452
6580 054454
6581 054462
6582 054470

6583 054474
6584
6585
6586
6587
6588

054502
054510
054516
0545264
054526

6589 054534

054534
054536
054540
054542
6590 054544
054544
6591 054546
6592 054554

6593 054562

6594 054566
6595 054572

6596 054576
6597 054604

6598 054612
6599 054616

054616
054616
6600 054620
054620
6601 054622
6602 054630

104404
042777
112777
004737

052777

012737
017737
122737
001410
012737

000010
000025
011060

125616
125606

000002
125550
000025

002374
002502
002502

000025

002500

000010

000000
000001

062701
010137

000040
002412

004737

125576

002314

000010
002412

011060

125520
125506

6603 054636

125450
125440

6605 054650

017737

125410

002502

000005

002500

122737

6607 054664 001410
6608 054666 012737
6609 054674
054674
054676
054700

054702

6610 054706
054704
6611 054706

6612 054714
6613 054722
054722
054722
6614 054724
054724
6615 054726

23$:

112777

000010

1044064

MOV
MOV
CMPB
BEQ
MOV

#2,CHAN
alCRX,BAD
#25,BAD
238
#25,GOOD

EY Y

#10,3CSRX

MOVB
MOVB

#0,alpRLX
#1.3ICRHX

ADD
MOV

840, R1
R1,MLA2

BIC
MOVB

JSR
ENDSEG

000005

125430

DPA2,.R1

#10,aCSRX
MLAS,alDRHX
PC,LOOP

000001

125354

125346

(REMOTE CONF IGURED)
Y

125344

ey Py

TRAP
($BSEG
;SELECT CHANNEL
1
i=-aa LOAD PPU INTO DOR le===eececcmcaaCWAIT A LITTLE

SSELECT CHANNEL 2

=
=

*LOAD CHANNEL NUMBER
SGET ICR2 CONTENTS
*ICR CONTENTS SHOULD BE 25
‘BRANCH IF YES
YSET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP
CSERSOFT
.MORD
2103
.WORD
E901
.WORD
ERRSO1
;BRANCH TO BGNSEG IF ERRLOOP IS SET
TRAP
CS$CLP1
;e==e= CLEAR PPR REGISTER===cmccacacccas
f==-- LOAD NOT DACR INTO ACR 2======m==

CREATE MLA2
STORE MLA2

*SELECT CHANNEL 1
:==a- LOAD MLA2 INTO DOR l=ce-c-ecccaceSWAIT
A LITTLE

TRAP

CSESEG

TRAP
($BSEG
;SELECT CHANNEL
1
:=<=<{0AD PPC INTO DOR le==cececcccceSWAIT A LITTLE

MOV

alcnx BAD

SGET ICR2 CONTENTS

#10,aCSRX
BAD

BEQ
o£
MOV
000
ERRSOF T 2164.5901.Eaaso1

MOVB

MOVB
ENDSEG

#24,31CRHX

#1,3]CRHX

SSELECT CHANNEL 2

:ICR CONTENTS SHOULD BE S

‘BRANCH IF YES
*SET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER
TRAP
MORD
-WORD

CSERSOFT
2106
E901
-WORD
ERRSO1
:BRANCH TO BGNSEG IF ERRLOOP IS SET
TRAP
CS$CLPI
;===<LOAD PTS

INTO A(R 2=c=v=eeecemcee-

t====LOAD NOT DACR INTO A(R 2===-====100028:

BGNSEG
000010

#10,2CSRX
#5,31DRHX
PC,LOOP

CMPB

30%:

10001$:

(KLOOP
000024

BIC
MOVB
JSR

BIS

002502

106405
042777

#10,3CSRX
#25.3IDRMX
PC,LOOP

MOV

104457
004070
005644
003702

104406

BGNSEG
000010
000005
011060

6606 054656

ERRSOFT 210%,E901,ERRSO?

104405

052777

BIC
MOVB
JSR

BIS

125474
125464

104404
042777
112777
004737

6604 054642

CKLOOP

104406
112777
112777

042777
113777

BGNSEG

104457
004067
005644
003702

013701

BIC

#10,3CSRX

SSELECT CHANNEL 1

TRAP

CSESEG

TRAP

($BSEG

B 14

SEQ 170

HARDWARE TESTS
MACRO M1113
06-SEP-82 16:46
PAGE 63-2
TEST 21: PARALLEL POLL INTERFACE FUNCTION TEST OF (MANNEL 2

6616 054734
6617 054742

113777
004737

002402
011060

125334

6619 054756
6620 054762
6621 054770

012737
017737
123737

000002
125276
002402

002374
002502
002502

002402

002500

6618 054746

6622 054776
6623 055000
6624 055006
055006

055010
055012
055014
6625 055016
055016
6626 055020
6627 055026

6628 055034

6629 055042
6630 055050

6631 055054
6632
6633
6634
6635
6636

055062
055070
055076
055100
055106
055106

055110
055112
055114
6637 055116
055116
6638 055120
6639 055126

052777

001410
013737

002420
000001

125246
125234

112777
004737

000077
011060

125226

042777

112777

017737
123737
001410
013737

104406
112777

001402

000010

000216

4L0S:

002420

002500

000016

002234

054254

045

6652

125142

123

002402

‘LOAD CHANNEL NUMBER
SGET ICR2 CONTENTS
SICR CONTENTS SHOULD BE PPE

‘BRANCH IF YES
JSET UP DATA FOR ERROR MESSAGE
SERROR HANDLER

MSAY ,31DRLX
#1 a1 CRMX

MOVB
JSR

#77.31DRHX
PC,LOOP

ioee<OAD UNL INTO DOR l=cececccccaaa‘WAIT A LITTLE

MOV
C(MPB
BEQ
MOV
ERRSOFT

MOVB

ENDSEG

187
BNE
INC
ROLB
(MP

BEQ

JMP
EXQV21: EXIT

062

SSELECT CHANNEL 2

MOVB
MOVB

move

S0%:

;=e==lOAD PPE INTO DOR lecccccccccccas
‘WwAIT A LITTLE

TRAP
(SERSOFT
WORD
2105
-WORD
E901
.WORD
ERRSO1
;BRANCH TO BGNSEG If ERRLOOP IS SET
TRAP
C$CLP1
;==== 0AD DATA INT0 PPR Q==cceccccccc=;====L0AD NOT DACR INTO A(R Q2====ce=--

#10,3CSRX

#216,al1CRHxX

alCRX,BAD
MSA1,BAD
50%
MSA1,G0OD
2106.E901,ERRS01

CKLOOP

000137

222? 055166

#2,CHAN
alCRX,BAD
RSAVE .BAD

BIC

125206

002502
002502

002402
002420
000157

104432
000074

#10,3CSRX

BEO
408
MOV
RSAVE, GOOD
ERRSOFT 2105,€901,ERRSO1

125236

125176
002420

005237
106137
022737

055162
055164

CNLIST

TSHD21: .A?g%z
ol

#16,a]CRHX

SSELECT CHANNEL 1

‘=ee=LOAD RPP INTQ ACR leccccocccccce“GET ICR1 CONTENTS
:COMPARE DATA
‘BRANCH [F YES
SSET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER
TRAP

CSERSOFT
MORD
2106
-WORD
£901
__.WORD _ ERRS01
;BRANCH TO BGNSEG IF V'RRLOOP IS SET
TRAP
C$CLP1
;====LOAD NOT RPP INTO AR le==c=ccce-

10003$:

ovP
EXQV21
RSAVE
MSA1
#157 ,RSAVE

1RAP
:1S QUICK VERIFY PASS SELECTED
SIF YES EXIT TEST
‘CREATE NEW PPE
;CHANGE DATA
SALL PPE DONE

1TAC21
ST

YIF NO TEST ITERATION
TEXIT TEST

Exavel

(SESEG

CEXIT TEST IF YES

TRAP
LWORD

CSEXIT
L10052-.

BEX

é%iZ!APARALLEL POLL INTERFACE FUNCTION TEST OF CHANNEL 2IN/

"EVEN

6653 055260

055260
055260

MOV
MOV
(MPB

104457
004072
005644
003702

6645 055154

6648
6649

8IS

RSAVE,alDRHX
PC,LOOP

(kLOOP

104406
113777
112777

104405
005737
001012

6646 055156
6647 055162

125324

104457
004071
005544
003702

055126
055126
6640 055130
6641 055136

6642 055136
6643 055142
6644 055146

000010

MOVB
JSR

ENDTST

104401

110052:

TRAP

CSETST

N
1t

HARDWARE
TEST 22:

TESTS
END OF

MACRO M1113

06-SEP=-B2 16:46

A MESSAGE BLOCK TEST

6655

ste 17

PAGE 64

JSBTTL

TEST 22: END OF A MESSAGE BLOCK TEST

""""'"."""""""""'.""""'."""""""""'.""""."'...

pnnr

1EX = TEST 22

CHECKS THE END OF A MESSAGE BLOCK FROM CHANNEL 1.
EO] MESSAGE VIA THE 1EC/IEEE BUS
‘PART 2 CHECKS THE END OF A MESSAGE BLOCK FROM CHANNEL 2.

;

EO] MESSAGE VIA THE

IEC/IEEE BUS.

CHANNEL 2 SENDS THE
CHANNEL

SENDS THE

005737
001410

002324

012746
012746
010600

057202
000000

062706
005037
004737
004737

000004
002322
010220
010534

104417

104404

PNTF

;1S

PRINTF

#TSHD22

7%:

CLR

JSR
1TAC22: JSR

BGNSEG

[TRCNT

000223
000010
000223

124734
124736
124720

MOVB
BIS

#223,3ICRHX
#10,aCSRX

112777
112777

000203
000211

124704
124676

MovB

#10,9CSRX

042777

000010

013701
062701
010137

002314
000100
002416

004737

011060

113777

MOvVB

124722

002616

124662

000013

1246642

MOVB
MOV

ADD
MOV

MOVB
JSR

MOvB

ENDSEG

S1F

122::

FLAG SET

ves PRINT THE TEST HEADER
Mov

ITERATION COUNTER

TRAP

MTA2,3IDRHX
PC,LOOP

M1%,S1CRHX

eee- LOAD LON INTO ACR 1=eece-ccccece(REATE MTA2
‘$TORE MTA2

seeee LOAD MTA2 INTO DOR 1====c-cce-ecoc‘WAIT A LITTLE

teae=lOAD GTS INTO ACR l=ccecccecccccce
10000%:

124640

BIS

#10,3CSRX

:SELECT CHANNEL 2

042777
012737
017737
022737

000010
000001
124562
000060

124624
002374
002502
002502

BIC

#10,3C SRX

SSELECT CHANNEL
1

alirRx,BAD
#60,B8A0

SGET 1IR1 CONTENTS
‘B].B0 BIT SHOULD BE SET

000060

002500

001410

012737

MOVB
MOV

MOV
CMP
BEO
MOV

006231
005406
003702

017737
022737

#1,CHAN

ERRSOFT 2201,E501,ERRSOY

104457

104406

#125,3lDRHX

10%
#€7,600D

002502
002502

108:

MOV

(MP

RAP

(SESEG

TRAP

($BSEG

eeec LOAD DATA INYO DOR 2==c=c=csccce~

*LOAD CHANNEL NUMBER

‘BRANCH IF YES
‘SET UP DATA FOR ERROR MESSAGE

SERROR HANDLER

TRAP

(CSERSOFT

.MORD
.WORD
.WORD

2201
ES501
ERRSO!

TRAP

csCLP

:BRANCH BACK TO BGNSEG IF ERRLOOP 1S SET

(KLOOP
124532
030004

($BSEG

;----LOAD HDFA INTO ACR l===-ccceee--

000010

124630

#1,-(SP)
SP.RO
CSPNTF
#4,SP

ieeac LOAD DAl INTO ACR 2---=ecec-ecce-

BGNSEG
000125

#T1SHD22,=(SP)

eees LOAD DAl INTO ACR le=ecomeecacce
SSELECT CHANNEL 2

052777

112777

MOV
MOV
TRAP
ADD

StLECT CHANNEL 1

#211.alCRHX
DPA2.R1

#100.R1
R1,MTA2

PNT

“CLEAR ULPA BIT IN ISR 1 AND 2
‘SET UP PARAMETER

#22%,81CRWX

#20%,31CRHX

THE

;CLEAR

PC,CULPA
PC.BGINT

112777
052777
112777

104404

BEQ

104405

A WDAA VWA WD

» B

N WNAWNAWAWNAA

VAW WAAVAAVWAAWNAWVIWAVAWA ASUASAAA WA WA N

BGNTST

112777

VAR VAN AN VAWV
WAAWHWAIWAWVAWVA
VWAV
WU
S FaX 2k 0¥ oF ok 2k o o

o
o
[+
(=]

AN AN
WAV
VWA
N ASHRNIWHWDA
N ARV
UNA VWAV

5 L U AN L U U AN U N N AN LN AN N U AN RO N AU PO NI PO N
- O NN
WNINNVN = 2O OO NNNOOONO
SO NN
ONSOS SO
OMNO SOOI

[elelelelelelelelelalelelalelalelalelelelelelelalelelelolalelololalalelololalolalalolelolalelele
o)

’.""'0'.""""""""""'"'t"'.."".'.""""""""""""."."'

21SRX, BAD

#3000 ,8AD

:GET

ISR1

CONTENTS

*NDAC ,NRFD,LADS SHOULD BE SE1T

-x

€ 14

HARDWARE TESTS
TEST 22: END OF

MACRO M1113
06-SEP-82
A MESSAGE BLOCK TEST

6697 05553&
6698 055536

001410
012737

055544
055546
055550
055552
055554
055554
055556
055564
055570
055574
055602

104457
004232
005447
003702

6699 055544

6700
6701
6702
6703
6704
6705

6706 055604

6707 055612
055612

055614
055616
055620
6708 055622
055622
6709 055624
055624
0556264
6710 055626
6711 055636

6712 055642

6713 055650

104406
017737
105037
000337
122737
001410

012737

104404
052777
112777
004737

6718 055700
6719 055706
6720 055712
6721 055716
6722 055724
6723 055726
6724 055734
055734

017737
105037
000337
122737
001410
012737

055736
055740
055742
6725 055744
055746

6726 055746

055746

062777

000125

002500

20%:

002502

055750
6728 055752

104404
052777

;BRANCH |F YES
:SET UP DATA FOR ERROR MESSAGE

alDRX,BAD
BAD
BAD
#125,BAD
23%

TRAP
(SERSOFT
LMORD
2202
LWORD
ES02
.WORD
ERRS501
;BRANCH BACK TO BGNSEG IF ERRLOOP [S SET
TRAP
CSCLP
;GET DIR1 CONTENIS
:
:SWAB HIGH AND LOW BYTE
;COMPARE WITH LOADED DATA
:BRANCH 1F OK

#125,6000D

ERRSOFT 2203,E222,.ERRS01

CKLOOP
23%:
000002
000003

000204

124434
124426

000010
000126
011060

124420
124410

124366
002502
002502
000126

002502

000126

002500

000010

ENDSEG

TRAP
($BSEG
JSELECT CHANNEL 2
;====LOAD DATA INTO DOR 2-==ecccccceoSWAIT A LITTLE

MOV
(LRB
SWAB
(MPB
BEQ
MOV
ERRSOFT

al0RX,BAD
BAD
BAD
#126,BAD
309
#126,600D
2204 ,E222,ERRSO1

#204,a1CRNX

#0,acsRX

CKLOOP
ENDSEG

#127,31DRHX

BIC

#10,3CSRx

004737

042777

JREAD DATA FROM D]R1
;CLEAR LOW BYTE OF [DR REGISTER
JSWAB HIGH WITH LOW BYTE
:COMPARE DIR CONTENTS WITH LOADED DATA
:BRANCH [F EQUAL
:SET UP DATA FOR ERROR MESSAGE
{ERROR HANDLER
TRAP
CSERSOFT

BGNSEG

MOVB

6731 055774

;SELECT CMANNEL 1

10002%:

6730 055766 112777 000127 124302

6732 056000

i====L0AD HDFE INTO A(R 1-=-=c=cceeea-

.MWORD
2204
LMWORD
£222
.WORD
ERRSO1
;BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
(S$CLPI

BIS

112777

(SERSOFT
WORD
2203
LMORD
E222
.WORD
ERRS01
;BRANCH BACK TO BGNSEG If ERRLOOP [S SET
TRAP
(S$CLPI
100018

124320

6729 055760

TRAP

#10,aCSRX
#126,31DRHX
PC,LOOP

BIC

30$:

:ERROR HANDLER

BIS
MOVB
JSR

BGNSEG

002502

$SET UP DATA FOR ERROR MESSAGE

TRAP
(SESEG
;====L0AD RHDF [NT0 A(R lece-cccccccaa
iee==l 0OAD NOT HDFA INTO A(R l==eecece--

MovB

124400

*ERROR HANDLER

#2,3] CRHX
#3,3]CRHX

MOVB
MOVB

124420

104406

104405

MOV
(LRB
SWAB
(MP8
BEQ

MOV

104457
004234
005675
003702

055746

6727 055750

002502

104406

112777

20%
#30004,600D

CKLOOP
124510
002502
002502
000125

SEQ 172

64-1

ERRSOFT 2202,E502,ERRS01

004233
005675
003702

104405
112777
112777

PAGE

BtQ
MOV

602500

104457

055650
6714 055652
6715 055660
6716 055666

6717 055672

030004

16:46

000010

011060

000010

124302

124272

MOVB
JSR

JSELECT CHANNEL 2

TRAP

(SESEG

TRAP

($BSEG

#10,9CSRX

810,31 CRHX

t=e=clOAD FEQ] INTO ACR 2==e=eeeceean-

PC,LOOP

TWAIT A LITTLE

tee=e 0AD DATA INTO DOR 2======ceece--$SELECT CHANNEL 1

-t g

D14

HARDWARE
TEST 22:

TESTS
END OF

MACRO M1113
06-SEP=-B2
A MESSAGE BLOCK TEST

6733 056006

017737

6735 056022

001410

6734 0560i«

6736 056026

6737 056032

056032
0560364
056036

056040

6738 056042

000050

012737

000050

6761 056060

001410

6743 056070
056070

056072
056076
056076

6744 056100

056100
6745 056102
6746 056110
6747 056114
6748 056120
6749 056126
6750 056130
6751 056136
056136
056140
056142
056144
6752 056146
056146
6753 056150

002502

alIRX,BAD

:GET IIR1 CONTENTS

BEOQ

33¢

‘BRANCH IF YES

CMP

002500

#50,BAD

MOV

‘B],END BIT SHOULD BE SET

#50, 600D

‘SET UP DATA FOR ERROR MESSAGE

ERRSOFT 2205,E501,ERRSO1

*ERROR HANDLER

124206

034004

013737

034004

002502

33%:

MOV

31SRX,BAD

:GET ISR1 CONTENTS

BEQ

408

‘BRANCH [F

126164
002502
002502

_
002502

000127

002502

000127

002500

#34004 ,BAD

MOV

340064,

104457
004237
005675
003702

TERROR HANDLER

a10RX,BAD
BAD
BAD

43$:

TO BGNSEG

#127,8AD
438
#127,6000
2207.E222,ERRSO1

TRAP
MORD
WORD
.WORD

CSERSOFT
2206
E502
ERRSO1

TRAP

($CLPI

:READ DATA FROM DIR1
SCLEAR LOW BYTE
SSWAB HIGH WITH LOW BYTE

ERRLOOP

[S SET

;COMPARE LOADED DATA WITH DIR CONTENTS
*BRANCH IF EQUAL
:SET UP DATA FOR ERROR MESSAGE
‘ERROR HANDLER
TRAP
(SERSOFT
LMORD
2207
"WORD
E222
"WORD
ERRSO1
:BRANCH BACK TO BGNSEG 1r ERRLOOP IS SET
CS$CLPI

CKLOOP

104406

VES

:BRANCH BACK

MOV
CLRB
SWAB
CMPB
BEQ
MOV
ERRSOFT

C$CLPI

:SET UP DATA FOR ERROR MESSAGE

CKLOOP

40%:

ERRSO1

*NDAC ,NRFD,EO],LADS, IS SET

ERRSOFT 2206, esoz ERRS01

104457
0064236
005447
003702

CSERSOF
T
2205
ESO1

:BRANCH BACK TO B5NSEG xr ERRLOOP 1S SET

CMP

002500

TRAP
.WORD
WORD

.WORD

CKLOOP

022737

104406
017737
105037
000337
122737
001410
012737

SEQ 173

64-2

MOV

003702

104406
017737

6742 056062

PAGE

104457
004235
005406

056062
6739 056046

6740 056052

124236

022737

16:46

ENDSEG

056150
056150
6754 056152

104405
112777

000002

124110

MOVB

#2,3]CRHX

;=== 0AD RHDF

6756 056166

112777

000011

124074

MOVB

#11.31CRHX

t====0AD NOT LON INTQ ACR le=ecmcccee-

6755 056160
6757 056174

112777

6758 056202

004737

g;gg 056214

112777

6759 056206

112777

000015

124102

000137

124074

000200

124054

011060

000000

124046

272§
4

Move
MOVB
JSR

mMove

MOVB

XXy

10003$:

#15,31CRHX

ieeee 0AD TCS INTO ACR leeccmceccecene-

#137,a]DRMX

te==={0AD UNT INTO DOR l-cececcmcecea-

PC,LOOP

SWAIT A LITTLE

#200,31CRHX
#0,a1CRHX
Y

te===L OAD SWRST INTO ACR l~=eece=ce-eR

XXX

YTL L

ALE P

056232
6767 056234
6768 056242
6769 056250

104404
052777
112777
042777

000010
000223
000010

124036
124020
124022

8IS
MOVB
BIC

#10,3CSRX
#223 31CRHX
#10,3CSRX

6771 056264

052777

000010

124006

8IS

#10,8CSRX

112777

010710

000223

JSR
BGNSEG

124004

MOVB

FC,CULPA

010220

004737

PSEU18: JSR

004737

6770 056256

PSP P AR L

t=e==LOAD NOT SWRST INTG ACR le=======

DL L

IPART 2 CHECKS THE “'END OF A MESSAGE BLOCK'' OF CHANNEL 2

6764 056222

6765 056226
6766 056232

TRAP
CSESEG
INTO ACR l=ececceecaa--

PC.BGIN2

w22%.31CRHX

Ll Ll

Ll d bt

Ll Ll

d o dod ot da ek dd

;CLEAR ULPA BIT IN ISR 1AND 2
‘SET UP PARAMETER

TRAP
($BSEG
;SELECT CHANNEL 2
jeeee LOAD DAl lNTO A(R 2-===cecemacamSSELECT CHANNEL
1

Geea- LOAD DAl INTO ACR l==eeecceccaaa-

SSELECT CHANNEL 2

—

E 14

HARDWARE TESTS
TEST 22: END OF

MACP. M1113
06-SEP-82 16:46
A MtSSAGE BLOCK TEST

6772 056272
6773 056300
6774 056306
6775 056312

112777
112777
013701
0627017

000203
000211
002312
000100

123770
123762

6777 056322
6778 056330

113777
004737

002614
011060

123746

6776 056316
6779 05633¢

010137

112777

6780 056342
056342
056342
6781 056344
056344
6782 056346

1044064
042777

6784
6785
6786
6787
6788
6789

056362
056370
056376
056406
056412
056414

052777
012737
017737
022737
001410
012737

6791

056422
056424
056426
056430
056432
056632
056434
056442
056450

104457
004240
005406
003702

6783 056354

6790 056422

6792
6793
6794

002414

000013

104406
017737
022737
001410

000010

6800 056504
6801 056510
6802 056516
6803 056520
6804 056526

000337
122737
001410
012737

056526
056530
056532
056534
6805 056536
056536
6806 056540

056540
056540
6807 056542
6808 056550

104406
017737
105037

112777

teee= Lvo MTA1
‘WAIT
A LITTLE

iNTO DOR 2eeeeeccccccces

;----LOAD GTS INTO ACR 2===ccccecceses
1900¢$:

TRAP

CSESEG

TRAP

($BSEG

000010
000002
123646
000060

123710
002374
002502
002502

000060

002500

BIS
MOV
MOV
CMP
BEQ
MOV

#10,3CSRX
#2,CHAN
alirx,BAD
#60,8AD
10%
#60, 600D

SSELECT CHANNEL 2
‘LOAD CHANNEL NUMBER
SGET IIR2 CONTENTS
80,81 BIT SHOULD BE SET
‘BRANCH IF YES
'SET UP DATA FOR ERROR MESSAGE

31SRX,BAD
#30004, BAD
208

TRAP
CS$ERSOFT
L.WORD
2208
-WORD
ES501
WORD
ERRS01
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
($CLP1
:GET ISR2 CONTENTS
*NDAC,NRFD,LADS SHOULD BE SET
‘BRANCH IF YES

210RX,BAD

TRAP
CSERSOFT
WORD
2209
-WORD
£502
.WORD
ERRSO1
;BRANCH BACK TO BGNSEG 1r ERRLOOP 1S SET
TRAP
C$CLP1
;GET DIR2 CONTENTS

BAD
#125,BAD
238
#125,G00D
2210.€222.ERRSO1

‘SWAB HIGH AND LOW BYTE
*COMPARE WITH LOADED DATA
‘BRANCH IF OK
‘SET UP DATA FOR ERROR MESSAGE
‘ERROR HANDLER

000125

123714

MOVB

2128, 310RHXY

ERRSOFT 2208,E501,ERRSO1

CKLOOP

10%:

MOV
(MP
BEQ

MOV

#30004,6

ERRSCFT 2209, 5502 ERR5L1
CKLOOP

123574

002502

002502
000125

002502

000125

002500

20%:

MOV

CLRB

SWAB
(MPB
BEO
MOV
ERRSOFT

BAD

£KLOOP

104406
112777

#1%,31CRNX

SSTORE MTA1

:SELECT CHANNEL 1

104457
004242
005675
003702

104405

#10,3CSRX

002500

6799 056500

ENDSEG

R1,MTA1

BIC

6795 056452 012737 030004
104457
004241
005447
003702

MTA1,3IDRHX
PC,LO0P

;====L0AD HDFA INTO A(R 2=-eec-ecccccaas
teees LOAD LON INTQO ACR 2==eescccceccas
CREATE MTA]

123724

002502
002502

056460
056462
056464
056466
6797 056470
056470
6798 056472

MOVB
JSR

BGN3EG

123616
030004

6796 056460

#203,31CRHX
#211.alCRHX
DPA1 R1
#100.,R1

MOVB

104405

112777

MOVB
MOVB
MOV
ADD

MOV

123726

SEQ 174

PAGE 64=3

23%:

000002

000003

123520

123512

ENDSEG

MOVB

Seeas LOAD DATA INTO DOR leeecccccccess

*ERROR HANDLER

“SET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP
(CSERSOFT
.WORD
2210
"WORD
E22?
.WORD
ERRSO01
:BRANCH BACK 10 BGNSEG IF ERRLOOP 1S SET
TRAP
($CLPY

100058:
#2.alCRHX

#3.3lCRHX

;====LOAD RHDF

TRAP

(SESEG

INTO A(R 2====ece==ce--

Yee==L0AD NOT HDFA INTO ACR 2==c====ee

6 14
HARDWARE TESTS
TEST 22: END OF

MACRO M1113
06-SEP-B2 16:46
A MESSAGE BLOCK TEST

6809 056556
6810 056564

112777

6811 056566

PAGE

SEQ 175

64-4

000204

123504

MOVB
BGNSEG

#204,8] CRHX

;e=== OAD HDFE

042777

000010

123504

BIC

#10,3CSRX

sSELECT CHANNEL 1

6813 056602

006737

011060

JSR

PC,LOOF

CWAIT A LITTLE

6815
6816
6817
6818
6819

017737
105037
000337
122737
001410

123452
002502
002502
000126

002502

000126

002500

056564

6812 056574

6814 056606
056614
056622
056626
056632
056640

6820 056642

6821 056650
056650
056652

056656
056056

6822 056660

104404

112777

052777

012737

056662
056662
6824 056664
6825 056672

104405
042777
112777

056700
6827 056702

104404
112777

6828 056710

6829 056714
6830
6831
6832
6833

056722
056730
056736
056740

6834 056746

056746
056750
056752
056754
6835 056756
056756
6836 056760
6837 056766
6838 056774

6839 056776

6840 0570064

0570064
057006
057010
057012
6841 057014
057014
6842 057016
6842 057024
6844 057030
6845 057034

6846 057042

MOVB

123466

BIS

MOV
C(LRB
SWAB
(MPB
BEQ

002502

MOV

004737

052777

017737
022737
001410
012737

30$:

105037
000337

122737

001410

81DRX,BAD
BAD
BAD
#126.BAD
30%

#126,G600D

TRAP

($BSEG

‘o=ecOAD DATA INTO DOR lececcecccccaSSELECT CHANNEL 2

:READ DATA FROM DIR?
:CLEAR LOW BYTE OF ;DR REGISTER
;SWAB HIGH WITH LOW BYTE
:COMPARE DIR CONTENTS WITH LOADED DATA
*BRANCH IF EQUAL

‘SET UP DATA FOR ERROR MESSAGE
*ERROR HAND.ER

TRAP
LWORD

JWORD
.WORD

(SERSOFT
2211

£Q22
ESO1

:BRANCH BACK TO BGNSEG IfF ERRLOOP S SET

TRAP

ENDSEG

($CLPI

100068
:

000010
000010

123406
123370

BIC
MOVB

#10,a(SRX
#10.a]CRHX

p
CSESEG
SSELECT CHANNEL 1
toecelOAD FEOI INTO A(R l=eceecccecaa-

000127
011060

123366

MOVB
JSR

#127,a1DRHX
PC,LOOP

TRAP
C$BSEG
;=== 0AD DATA INTOQ DOR lo==ccccemcecae
SWAIT A LITTLE

123322
000050

002502
002502

000050

002500

alIRX,BAD
#50,8AD
33%
#50,600D

SGET IIR2 CONTENTS
‘BI,END BIT SHOULD BE SET
;BRANCH IF YE
SSET UP DATA FOR ERROR MESSAGE

000010

BGNSEC

123356

BIS

MOV
CMP
BEQ
MOV

#10,3CSRX

ERRSOFT 2212,E501,ERRSN

(xLOOP
123272
034004

002502
002502

034006

002500

33%:

MOV
CMP
BEQ
MOV

alSRX,BAD
#34004 ,BAD
40%
#34004 , GOOD

ERRSOFT 2212,€502,ERRSO1

104457
004244
005447
003702

104406
017737

#10,aCSRx

CXLOOP

104457
004244
005406
003702

104406

#126,310RHX

ERRSOFT 2211.£222.E501

005675
005406
104406

6826 056700

000010

123474

104457
004243

056660

6823 056662

000126

[INT0 A(R 2==ccccccccccs

(KLOOP
123250

002502

000127

002502

002502
002502

40%:

MOV

alDRX,BAD

(MPB

#127.BAD

(LRB
SWAB

BEOQ

BAD
BAD

438

SSELECT CHANNEL 2

*ERROR HANDLER

TRAP
CSERSOFT
JWORD
2212
-WORD
ESO1
.WORD
ERRS01
;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
Cs$CLPY
:GET ISR2 CONTENTS
*NDAC ,NRFD,EQI.LADS IS SET
‘BRANCH IF YES

‘SET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP
(SERSOFT
.WORD
2212
.WORD
ESO2
.WORD
ERRSO
:BRANCH BACK T0 BGNSEG IF ERRLOOP 1S SET
TRAP
(SCLPI
;READ DATA FROM DIR?
SCLEAR LOW BYTE
*SWAB HIGH WITH LOW BYTE
*COMPARE LOADED DATA WiTH DIR CONTENTS

‘BRANCH IF EQUAL

H 14
WARDWARE
TEST

22:

TESTS

END OF

6847 057044

6848 057052
057052

057054
057056
057060
6849 057062
057062
6850 057064
057064
057064
6851 057066

6852 057076

6853 057102

6854 057110

6855
6856
6857
6858
6859
6860
6861

MACRO M1113

06SEP-BZ 16:46

A MESSAGE BLOCK

TEST

012737

002500

000127

438

MOVE

#2,31CRHX

;=== 0AD RHDF

112777

000011

123160

MOVB

#11 .alCRHX

teee=lOAD NOT LON INTO ACR 2+=e-ceecee-

112777

000015

000137

004737

011072

6865 057172
6866 057176

000137

112777
112777

057176
057200

106432
000046

6869 057202

045

057246
057246

104401

6870
6871
6872 057246

19007$:

123174

6863 057160

6867

TRAP
(S$ERSOFT
<WORD
2213
.WORD
222
.WORD
ERRS01
:BRANCH BACK TO BGNSEG 1r ERRLOOP 1S SET
C$CLPI

000002

011060
002236

6868

ENDSEG

;SET UP DATA FOR ERROR MESSAGE

:ERROR HANJLER

104405
112777

006737
005737
001023
005237
023737
001415
042777

6864 057166

#127.6G00D

ERRSOFT 2213,8222,ERRS501

CKLOOP

057116
057122
057126
057130
057134
057142
057144

6862 057152

MOV

104457
004245
005675
003702
104406

SEQ 176

PAGE 64-5

123166

123160

002322
002322

002320

000010

123126

000217
000017

055320

123

movB

MOVB
JSR
13
BNE
INC
(MP
BEQ
BIC

123110
123076

062

MOVB
JSR

MOVB

JMP
EXQV22: exxr

TSHD22:

#15,31CRHX

#137%,3IDRMX

PC.LOOP
avP
EXQV22
[TRCNT
[TRCNT, I TRDEF
EXQV22
#10,9CSRX

#217,alCRHX

te=a=l0AD TCS INTO A(R 2eecceccccccen-

t===c{0AD UNT [NTO DOR 2===c=ceccece-SWAIT A LITTLE
P1S QUICK VERIFY PASS SELECTED
S1F YES EXIT TEST
*INCREMENT COUNTER
;ALL DONE
SIF YES, EXIT TEST
SSELECT CHANNEL 1

ieaea LOAD SIC INTO ACR lemecccecee

PC,WALT

CWAIT A LITTLE

1TAC22
151

SIF NO TEST ITERATION
TEXIT TEST

#1P.QICRHX

NLIST

BEX

LISt
-EVEN
ENDTST

BEX

.ASC1?

TRAP
(SESEG
INTO A(R 2=e=ce=c-ceccc-

teee- LOAD NOT SIC INTO A(R leeeee=
TRAP
LWORD

CSEXIT
L10053-

TRAP

(S$ETST

/XS2YAEND OF A MESSAGE BLOCK TESTIN/

L10053:

SEQ

HWARDWARE TESTS
MACRO M1113
06-SEP-82 16:46
PAGE 65
TEST 23: DMA DATA TRANSFER TEST FROM (MANNEL 1 TC 2

6874

LSBTTL

TEST 23: DMA DATA TRANSFER TEST FROM (HANNEL 1

T0 2

6875

;'Q""'t'."'"'"'""""""""l'""'"'Q.'""Q""QQ"""QQ"."Q""

6876
6877
6878
6879
6889
6881
6882
6883
6884
6885
6886

;
1EX - TEST 23
SPART 1 SENDS DATA VIA THE IEC/IEEE BUS FROM CHAN. 1 TO 2 BY MEANS OF A DMA
;
1.E. CHAN. 1 WHICH IS SELECTED AS TALKER PERFORMS A DATI CYCLE.
;
WHEREAS CHANNEL 2 WHICH IS SELECTED AS A LISTENER PERFORMS A DATOB
;
CYCLE. THE MAX. SELECTABLE BYTE COUNT FOR THIS DATA TRANSFER IS
;
2K BYTES AND THE HIGHEST BUS ADDRESS IS BELOW 32K.
*PART 2 CHECKS THE NON EXISTENT MEMORY BIT OF CHANNEL 1
:
THIS 1S DONE BY A DMA FROM A NON EXISTING 1/0 PAGE APDRESS SELECTED
:
IN THE BUS ADDRESS REGISTER OF CHAN. 1 (DATI CYCLE).
‘PART 3 SAME PROCEDURE AS IN PART 1 EXCEPT THE DATA TRANSFER 1S EXECUTED
:
OVER 32k (1fF MEMORY MANAGEMENT IS AVAILABLE).

6889

.'"'"'"""""""""""".""'.'.Q""""Q'.Q'.'Q...'.".'.Q"'.l""'

6887
6888

SPART & SAME PROCEDURE AS IN PART 1 EXCEPT THE DATA TRANSFER
;
OVER 64K (1F MEMORY MANAGEMENT IS AVAILABLE).

6890 057250

057250
6891 057250
6892 057254

6893 057256

BGNTST

005737

001410

057256
057262
057266
057270
057272
6894 057276

012746
012746
010600
104417
062706
005037

6896 057306
057306
6897 057310
6898 057314

104431
062700

6900
6901
6902
6903
6904
6905

005003
110320
005203
005301
001374
010037

6895 057302

6899 057320

057324
057326
057330
057332
05733¢
057336

6906 057342
057342

004737

010037

012701

002324

£}

PNTS

123::
;1S THE PNT FLAG SET

PRINTF

#TSHD23

Teee

CLR
JSR

ITRCNT
P(,BGIN?

BEQ

063204
000001
000004
002322
010534

7%:

ITAC23: MEMORY

THE

TEST HEADER

MOV
MOV
MOV
TRAP
ADD

#TSHD23,=(SP)
#1,-(SP)
SP,RO
CSPNTF
8, SP

:CLEAR ITERATION COUNTER
SSET UP PARAMETER
:GET THE FIRST FREE MEMORY LOCATION

ADD
MOV

#2,R0
RO ,BUF AB

TRAP
CSMEM
;USE THE SEC.FREE LOCATION FOR BUFFER
:LOAD START ADDRESS OF BUFFER A

002360

CLR
MOVB
INC
DEC
BNE
MOV

R3
R3,(RO)+
R3
R1
1$
RO,BUFBB

*R3 CONTAINS THE LOADED DATA
*LOAD DATA INTO BUFFER A
SCREATE NEW DATA
12K LOADED
“IF NO ,LOAD NEXT DATA BYTE
TLOAD START ADDRESS OF BUFFER B

010000

MOV
1%:

000340

057352
057356
057362
057364
6907 057370
057370

013746
012746
104437
062706

002246
000003

012746

000340

057400
057404
057410
057412
6908 057416
6909 057424

013746
012746
104437
062706
112777
013701

002244
000003

SETVEC

#10000,R1

VECC2,#INTSC2,8PRI07

057346 012746 010152

000010

000010
000212
002314
000040
002412

:BUILD 2Kk BUFFER SIZE

SSET VECTOR FOR CHANNEL 2
MOV

MOV

SETVEC

VECCY,#INTSCY,#PRIO7

057374 012746 010142

062701
010137

YES, PRINT

000002
002356

012746

6910 057430
6911 057434

“1F

IS EXECUTED

MOV
MOV
TRAP
ADD
;SET VECTOR FOR CHANNEL !
MOV

MOV

122644

MOVB
MOV
ADD
MOV

#212,3]1CRHX
DPA2.R1
#40,R?
R1,MLA?

#PRI0O7,=(SP)

#INTSCS,=(SP)
VECC2,=(SP)
#3,-(SP)
C$SVEC
#10,SP

#PRIO7,=(SP)

#INTSCT,=(sP)

MOV
VECCT,=(SP)
MOV
#3,-(SP)
TRAP
C$SVEC
ADD
#10,SP
;====LOAD TON INTO A(R 1=ccecceccacaa-SCREATE MLA?
F
SSTORE MLA2

177

J 14

SEQ 178

HARDWARE TESTS
MACRO M1113
Q6-SEP-B82 16:46
PAGE _65-1
TEST 23: DMA DATA TRANSFER TEST FROM CHANNEL 1 TO 2

6912 057440

113777

0026412

1044064
005037
1725037
042777
013700

002400
002376
000010
002360

6913 057446
6914 057452
057452
6915 057456
6916 057460
6917 057464
6918 057472

004737

6920 057502
6921 057506
6922 057506

105020
005301
001375

6919 057476

6923 057510
6924 057516
6925 057526
6926 057530
6927 057536
6928 057544
6929 057552
6930 057560
6931 057566

012701

011060

002356
002240
002402
002402
000107
000010
002360
002402
000107

057574
057600

012700
104441

000000

6934 057610

012737

000001

6937 057530
6938 057634
6939 057636
6940 057640

005737
001015
005301
001373

057656
057660
057662
057664
6944 057666
057666
6945 057670
6946 057676

104457
004375
006072
003500

6948 057710
6949 057712

001013
017737

6933 057602

6935 057616
6936 057626

6941 057642
6942 057650
6943 057656

6947 057704

6950 057720
6951 057726

057726
057730
057732
05773¢
6952 057736
057736
6953 057740

057740
057746

042777

000010

112777
012701

000013
077777

017737
012737

104406
052777
012737

005737

012737

28:

122564

122546
122534
122526
129522
122516
122504

;ee== 0AD MLA2 INTO DOR leeeccccccccce-

CLR
CLR
BIC
MOV

INTFC2
INTFCT
#10,3CSRX
BUFBB,RO

;CLEAR INTERRUPT FLAG
SCLEAR INTERRUPT FLAG
SSELECT CHANNEL 1
:

CLRB
DEC
BNE

(RO)+
R1
28

‘FILL BUFFER B WITH JERD
:2K LOADED
PIF NO, CLEAR NEXT BUFFER LOCATION

MOV

SETPRI

PC,LOOP

#10000,R1

BUFf AB,aBARX
BCINP,RSAVE
RSAVE
RSAVE ,aBCRX
#107,3CSRX
#10,3CSRX
BUFBB, aBARX
RSAVE ,aBCRX
#101,3CSRX

#PRIG0

002400
122362

100010

000340

($BSEG

‘BUILD 2K BUFFER SIZE

J===L0AD START ADDRESS OF TABLE A ~==*STORE BYTE COUNT INPUT
‘BILD 2°'COMPL FOR BCR
taecel OAD INPUT INTO B(R l=ecee -=cete===DMA ENB,DMA DIR,INT ENB,SYS CON.
SSELECT CHANNEL 2
teee= OAD START ADDRESS OF TABLE B===te===UOAD INPUT INTO B(R 2--tee==SET DMA ENB,INT ENB [N (SR2=====-

SSET PRIORITY TO ZERO

MOV
TRAP

#PR100,R0
($SPRI

#10.,3CSRX

;SELECT CHANNEL 1

122444

move
MOV

#13% alCRux
877077,

t===clOAD GTS INTO ACR le=cececccccccaa*LOAD LOOP COUNTER

MOV

138:

002502
002500

#1,

CHAN

INTECI

122402
002374

‘HAS INTERRUPT IN CHANNEL 1 OCCERRED
‘BRANCH IF YES
‘DECREMENT COUNTER
*1F MORE,TEST AGAIN

BIS
MOV

#10,aCSRX
82, CHAN

TRAP
MORD
"WORD
.WORD
:BRANCH TO BGNSEG IF ERRLOOP IS
TRAP
sSELECT CHANNEL 2
SLOAD CHANNEL NUMBER

BNE
MOV

11
aCSRX ,BAD

‘BRANCH IF YES
SGET CSR2 CONTENTS

MOV
aCSRX,BAD
MOV
#100006,6000
ERRSOFT 2301,E2%2,ERR201

10%$:

002502

002500

INTFC2

MOV
#100010,600D
ERRSOFT 2302,E2%2,ERR201

11$:

SLOAD CHANNEL NUMBER

108
R1
13$

BNE
DEC
BNE

(KLOOP

104406

TRAP

BIC

CKLOOP

000010
000002

CWAIT A LITTLE

122470

002374

104457
004376
006072
003500

012700
104461

MLA2,3]DRHX

MOV
MOV
NEG
MOV
MOV
8IS
MOV
MOV
MOV

002402

002376

122432
100006

Move

JSR
BGNSEG

122606

010000

013777
013737
005437
013777
012777
052777
013777
013777
012777

6932 057576

122630

SETPR]

#PRIO7

SGET CSR1 CONTENTS
‘BC OF ,DMA DIR,SYS CONT SHOULD BE SET
*ERROR 'HANDLER

CSERSOFT
2301
E232
ERR201
SET
($CLPI

‘HAS INTERRUPT IN CHANNEL 2 OCCURRED

‘BC OF ,MUX SHOULD BE SET
*ERROR HANDLER

TRAP
(SERSOFT
MORD
2302
WORD
[232
.WORD
ERR2O1
:BRANCH TO BGNSEG IF ERRLOOP [S SET
TRAP
CSCLPY
:NO FURTHER INTERRUPT ALLOWED

MOV
TRAP

#PR107.RO
($SPRI

K 14

SEQ 179

HARDWARE TESTS
MACRO M1113
Q06-SEP-82 16:46
PAGE_65-2
TEST 23: DMA DATA TRANSFER TEST FROM CHANNEL 1 TC 2

6954 057746
6955 057754
6956 057762
6957 057770
6958 057776
6959 060004
6960 060012
6961 060014
060014
060016
060020
060022
6962 060024
060024
6963 060026
6964 060034
6965 060040
6966 060046
6967 060050
060050

060052
060054
060056
6968 060060
060060
6969 060062
6970 060070
6971 060076
6972 060104

6973
6974
6975
6976

060112
060120
060126
060130
060130
060132
060134
060136
6977 060140
060140
6978 060142
6979 060150
6980 060154
6981 060156
6982 060162
060162

060164
060166
060170
6983 060172
060172

6984 060174
6985 060200
6986 060204
6987 060210
6988 060214
6989 060216
6990 060220

042777
012737
013737
063737
017737
023737
001405

000010
000001
002356
002240
122300
002502

122324
002374
002500
002509

BIC
MOv
MOV
ADD
MoV
(MP
BEQ
ERRSOFT

002502
002500

104457
004377
006200
003702
104406
017737
005037
023737
001405

(KLOOP

122252
002500
002502

002502

23$%:

002500

104457
004400
006231
003702
104406
052777
012737
013737
063737
017737
023737
001405

001407
005037

000010
000002

122210
002374

002240

002500

002360
122164
002500

002500

30s8:

33%:

002502
002502

122136
002502

002502

40%:

002500

104457

005237
122122
001433
005037

aBCRX,BAD
600D
BAD,GOOD
30%
2304,E235,ERR501

81s
MoV
MOV
ADD
MOV
CMP
BEQ
ERRSOFT

#10,aCSRX
#2,CHAN

8uUfBB,G00D
BCINP,GOOD

aBARX,BAD
600D ,BAD
40%
2305,E234 ,ERRSD1

C(KLOOP

006402
006231
003702
104406
013701
013702
005037

MOV
CLR
CMP
BEQ
ERRSOFT

C(KLOOP

104457
004401
006200
003702

104406
017737
005737

#10,3CSRX
#1,CHAN
BUF AB,GOOD
BCINP,GOOD
aBARYX,BAD
BAD,GOOD
23%
2303,€£234,ERRS01

MOV
1ST
8tQ
CLR
ERRSOFT

aBCRX,BAD
BAD
433
600D
2306,E235,ERRS01

(KLOOP
002356
002360
002404
002404
002500

43:
64%:

MoV
MOV
CLR
INC
(MPB
8tQ
(LR

BUF AB,R1
BUFBB,R2
(NTY
(N1
(R1)¢,(R2)+
46%
600D

sSELECT CHANNEL 1
cLOAD CHANNEL NUMBER
:SET UP COMPARE VALUE
HPP

sGET BAR?! CONTENTS
¢HAS BAR1 THE CORRECT ADDRESS
¢BRANCH [F YES
sERROR HANDLER
TRAP
.WORD
.WORD
.WORD
;BRANCH TO BGNSEG IF ERRLOOP IS
TRAP
sGET BCR1 CONTENTS
;
;1S BCRY1 ZERO
:BRANCH [F VYES
:ERROR HANDLER
TRAP
.WORD
.WORD
.WORD
:BRANCH TO BGNSEG IF ERRLOOP [S
TRAP
sSELECT CHANNEL 2
:LOAD CHANNEL NUMBER
¢SET UP COMPARE VALUE
e
;GET BARZ2 CONTENTS
sHAS BAR2 THE CORRECT ADDRESS
¢BRANCH IF YES
sERROR HANDLER
TRAP

.WORD
.WORD
.WORD
:BRANCH TO BGNSEG If ERRLOOP IS
TRAP
;GET BCR2 CONTENTS
;BCR2 CONTENTS SHOULD BE ZERO
:BRANCH [F YES
sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER

TRAP

CSERSOFT
2303
E234
ERR501
SET
C$CLP

CSERSOF
T
2304
E235
ERRS501
SET
C$CLP

CSERSOFY
2305
E234
ERR501
SET
CSCLP

CSERSOF
T

.WORD
2306
LWORD
E235
.WORD
ERRS501
:BRANCH TO BGNSEG IF ERRLOOP IS SET
TRAP
CsCLP
sPROVIDE FIRST BYTE OF BUFFER A
;PROVIDE FIRST BYTE OF BUFFER B
sCLEAR BUFFER COUNTER
:
sBUFFER A EQUAL BUFFER B
¢1F YES CONTINUE
:CLEAR GOOD

L 14

SEQ 180

HARDWARE TESTS
MACRO M1113
06-SEP=-827 16:46
PAGE 65-3
TEST 23: DMA DATA TRANSFER TEST FROM CHANNEL 1 TO 2

6991 060224
6992 060230

005037
005037

002502
002426

6994 060240
6995 060244

005337
005037

002430
002422

6993 06023¢

6996 060250
6997 060254

6998 060260
6999 060266

7000 060274

010137

010237
005337

116137
116237

060274
060276
060300
060302

104457
004403
006010
003744

060304
7002 060306
7003 060314

104406
023737
001335

7001

060304

7004 060316

7005
7006
7007

;883

060316
060316
060320
060324
060332
060340

104405

005077
112777
017737

005077

:CLEAR BAD
JSET UP DATA FOR ERROR MESSAGE

DEC
(LR

TXADRL
RXADRH

:
:

MOV

002424

MOV

002424

177777
177777

R1, TXADRL

002500
002502

tea.

R2,RXADRL

DEC

RXADRL

MOVB
MOVB

-1(R1),G0OD
-1(R2) .BAD

i
I

ERRSOFT 2307,E831,ERR231

*ERROR HANDLER

CKLOOP

002404

121754
000014
121734

121734

002240

46%:

121736
002502

:BRANCH TO BGNSEG IF

(MP
BNE
ENDSEG

CNT1,BCINP
448

CLR
MOVB
MOV

aCSRX
#14,3]1CRHX
aIDRX,BAD

sALL BYTES COMPARED ?
“IF NO, GET NEXT ONE

7013 060344

012701

012737

7015 060356

005021

060362
060366
060372
060376
060402
060404

012746
012746
012746
012746
104437
062706

060420
060422
060426
060432
060434

005711
005737
062701
001772

7016 60360
7017 060362

7018 060410
7019 060414

060436
060440

7025 060442
7026 060446

060446

060450
060454
060460
060466
060472

002624
000001

002374

aCSRX

012700
104436
162701

104404

005037
005037
042777
010177
012737

000010

1%:

002326

000002

C$CLPI

TRAP

CSESEG

‘CLEAR CSR1

et DL

e DL S

(THE
L

LS R

1/0 PAGE
L

(Riy+

Peen

(R1)
#4,#NXM,#PRIO7

CLR
MOV
187
ST

NXMFLG
#160000,R1

(R1)
NXMFLG
#2,R1
1$
#4

IS USED

L e Sl

:CLEAR TWO WORD IN TABEL €

CLR
SETVEC

ADD

CHAN.

NTABE ,R1

#1,CHAN

BEQ
CLRVEC

000004

MOV

CLR

000340
010132
000004
000003
002326
160000

PSEU23: MOV

005011

005037
012701

TRAP

;CLEAR CSR2, SELECT CHANNEL 1
te=e=l0AD TCA INTO ACR l==scececcccccaa=
:READ DIR1 FOR CLEAR B0 B8IT IN IIR

'PART 2 CHECK THE NON EXISTENT MEMORY BIT OF
;
FOR NON EXISTENT MEMORY

7014 060350

CSERSOFY
2307
E231
ERR231

ERRLOOP IS SET

100008:

CLR

TRAP
.MORD
WORD
.WORD

.¢¢¢ ..........................................................................

7027
7028
7029
7030
7031

BAD
TXADRH

002430

7010
;8};

7020
7021
7022
7023
7024

(LR
(LR

I
JSET UP VECTOR FOR TRAP TO 4

:CLEAR FLAG
JLOAD FIRST ADDRESS Of

MOV
MOV
MOV
MOV
TRAP
ADD

#PR107,=(SP)
ANXM,
= (SP)
84 ,-(SP)
#3.-(SP)
CSSVEC
#10,5P

1/0 PAGE
:FIND A NON EXISTEND LOCATION
feus
*NEXT 1/0 PAGE ADD.(NO AUTO INCR.11/44')
:
‘SET VECTOR & TO NORMAL STATE

MOV
TRAP

#4 R0
CSCVEC

TRAP

($BSEG

SUB
BGNSEG

#2,R1

Dees

002376
002400
000010
121610
000002

CLR
CLR
BIC
MOV
MOV

INTFCY
INTFC2
#10,aC SRX
R1,3BARX
#2.RSAVE

:CLEAR INTERRUPT FLAG
*CLEAR INTERRUPT FLAG
SSELECT CHANNEL 1
‘LOAD BAR1 WITH A NON EXISTS
*LOAD NUMBER OF BYTE COUNTS

002402

*LOAD CHANNEL NUMBER

000002

121612

1/0 ADRR.

X
p Z 0

121470

3%:

NTABE
, 3BARX
RSAVE .aBCRX
#101,3CSRX

MOV

#1,CHAN

#10,3CSRX

#PRIOO

#13,a]1CRHX

&
&

6%:

#PRI100,RO
C$SPR]

;NXM,BA 16+17,DMA DIR,SYS CONT
sERROR HANDLER
[RAP

3CSRX . BAD

sBRANCH If

YES

:GET CSR1 CONTENTS

;BRANCH TO BGNS.G IF

+WORD
+WORD
+WORD
ERR%SR: IS

#PRIO7

sNO FURTHER

MOVB

#14,31CRHX

s====LOAD TCA INTO A(R l===cecccccccas

MOV
MOV

#2,CHAN
aCSRX,BAD

BIS

CMP
BEQ

MOV

#10,aC SRX

#17000,8A0

#111,BAD
128

#111,600D

ERRSOFT 2309.E401,ERRS01

oonN

NNV

b
—

WANANAN

12%:

INTERRUPT

ALhSUED
)

¢SELECT CHANNEL 2
sLOAD CHANNEL NUMBER

;GET CSR2 CONTENTS
: IGNORE BIT 9-12

s INT ENB,MUX,DMA ENB SHOULD BE SET
¢BRANCH

YES

¢SET UP DATA FOR ERROR MESSAGE
:ERROR HANDLER

002502

ENDSEG
CLR
MOV
CLR

10001$:
3CSRX
aIDRX,BAD
aCSRX

D = oe

INTECY
INTFC2
., #1
PHHS[Z

TERRUPT
TERRUPT

mZI

000001

CLR
CLR
(MP

TRAP

CSESEG

,SELECT CHANNEL 1
CSR2
Dég; FOR CLEAR BO BIT IN IIR

T 3 DMA OVER 32k
SO~
OO

7072 060770

MoV
TRAP

CKLOOP

(210 €1,V ]
(VP V]

7064
7065
7066
7067
7068
7069
7070 060760
7071 060764

ITY TO ZERO

005265

060732
060734
060736
060736
060740
060740
060740
060742
060746
060754

—

7061

A ENB,INT ENB (SR2=====ccceANNEL 1
NEL NUMBER

SETPRI

BIC

000111

7060

10%:

000002
121400
017000
000111

QOO
olele]

7059

N2 (NWWWWNN

7057
7058

000014
000010

OWY

=HSONI
b\ N

7053
7054
7055
7056

TABE

#40066, 600D

ERRSOFT 2308,E233,ERR201

000340

WITH STAR ADDRESS OF

sDECREMENT COUNTER
¢1F NO,TEST AGIN

MOV

ANNEL 2

R2
3¢

BNE

MOV

MA DIR,INT ENB.BA16-21,SYS

INTFC1

877077 .R2

MPLEMENT

:===LOAD GTS INTO A(R lee=ecccccccccca
sLOAD LOOP COUNTER
:1S INTERRUPT IN CHANNEL 1 OCCER

MOV
DEC
BNE

121456

#10,aCSRX

MOV
MOV
MOV

MOVB

DEZ2ITBONVTITO=0

NN
S NN
£SOV
ON

)

Qan

2l ")

oM
(=]
]

WAL

O b wd b b s b
ONIMNLMNLININVNOND
N b D d e d d b

OOOMNINO NN
QO=20CO—=
8
O—=200O0ON—=00O0C
=S O=MNHONNIINY

#1716%,3CSRX

BIC

(@]

MOV

RSAVE ,aBCRX

CKLOOP

7052

7063

RSAVE

BIS

7051

7062

NEG

MOV

—T
(P -] [ + T R
OPOODIM DO

NON=VI=ININ
SN
NNWWOSNSNSNGSN

QOO = = O —b

040066

0000000 —=—=0

000013
077777
002376

SEQ 181

146
PAGE 65-4
NEL 110 2

SETPRI

OOOOOOOO0O

— L D ead D \JV D d O

NININIUNNININI
N
SNSNSNSNSNISNSNSN
S

—

NO
-~

HARDWARE TESTS
MACRO M1
TEST 23: DMA DATA TRANSF

FLAG
FLAG

THAN 32K

SEQ 182

HARDWARE TESTS
MACRO M1113
06-SEP-82 16:46
PAGE_65-5
TEST 23: DMA DATA TRANSFER TEST FROM CHANNEL 1 TOQ 2

7073
7074
7075
7076
7077
7078
7079
7080
7081
7082

060776
061000
061002
061006
06°~10
061,14
061020
061026
061032
061036

002404
003005
005737
001002
000137
005037
012737
006737
013700
010037

7084 061046
7085 061050

005903
012737

7083 061042

7086 061056

7087
7088
7089
7090
7091

012701

110320

061060
061062
061064
061066
061072

005203
005301
001374
012701
010037

7093 061100
7094 061102
7095 061106

005301
001375
005037

7098 061122
7099 061126

062701
010137

7092 061076

7096 061110
7097 061116

7100 061132

7101 061140
7102 061144
7103 061150

7104 061156
7105 061162

7106 061170
7107 061176

7108 061206

7109 061212
7110 061220

7111 061226

061226
061232

7112 061234
7113 061242

7114 061250
7115 061256

105020

063200
002336
000001
007724
002340
002356

002334

000001

177572

010000
002360

177572

113777

002412

121136

005437
013777

012777
052777

012777

013777
012777

012700
104441

042777

012737

112777
012701

005737
001014
005301
001373
017737

061310
061312
061314
061316
7123 061320

104457
004406
006072
003500

012737

052777

168%:

20$:
121152

000040
002412

1%
138
PHLSIZ
13§
EXQV23
PHLOW
#1,PHHIGH
PC.PVCON
VIADD,RO
RO, BUF AB

;IF NO SKIP TEST
;
:
;
TJUMP TO TEST END
*LOAD INPUT FOR CONVERSION ROUTINE
e
‘CREATE VIRTUAL ADDRESS
SGET START ADDRESS OF BUFFER A
*LOAD START ADDRESS OF BUFFER A

CLR
MOV

R3
#1,SR0

*R3 CONTAINS
te*ENABLE MEMORY MANAGEMENT®e

MOV

000212
002314

004737
005077
013737

118
13$:

010000

112777
013701

7116 061262
2117 061266
7118 061270
7119 061272
7120 061274

7121 061302
7122 061310

002344

BLT
BGT
TST
BNE
JMP
CLR
MOV
JSR
MOV
MOV

MOVB

DEC
BNE
CLR

R1
208
SRO

ADD
MOV

#40,R1
R1,MLA2

IO
SSTORE MLA2

PC,LOOP
aBARX
BCINP,RSAVE

SWAIT A LITTLE
ie==LOAD START ADDRESS OF BUFFER A====
*STORE BYTE COUNT INPUT

#127,3CSRX
#10,3CSRX

‘-DMA ENB,DMA DIR,INT ENB.BIT 16,SYS ¢
SSELECT CHANNEL 2

CLRB

MOVB
MOV

NEG
MOV

RSAYE
RSAVE ,aBCRX

000127
000010

MOV
BIS

002402
000121

121064
121052

000010
000001

MOV

MOV
MOV

SETPRI

000013
077777

121036

121012

002376

121000

100026

000010

BIC
MOV

002374

23%:

002502

120752

MOVB
MOV
18T

BNE
DEC
BNE

MOV

002500

#212,alCRHX
DPA2 .R1

MLAZ2 .31 DRHX

121114
121102
121074

000000

(rRO) +

Movs

002402

121070

#10600.88ARX
RSAVE , 3BCRX
#121,3CSRX

#PRIG0

BIS

;CREAT NEXT DATA
:
;
‘LOAD 2K
‘LOAD START ADDRESS OF BUFFER B

*CLEAR BUFFER B

12K CLEARED
*IF YES.DO THE TEST
1e+D]SABLE MEMORY MANAGEMENT*+

ie===LOAD TON INTO ACR 1-==se==ecccceae
SCREATE MLA2

;====L0AD MLA? INTO DOR l=ccececcccca-

*BILD 2°COMPL FOR BCR
te===LOAD INPUT INTO BCR l====ce=ceee

;====0AD START ADDRESS OF BUFFfER B==--

te===L0AD INPUT INTO BCR 2--‘—==-SET DMA ENB,INT ENB.BIT16 IN CSR2

*SET PRIORITY 10 2ERO

MOV
TRAP

#10,3CSRX
#1,CHAN

;SELECT CHANNEL 1
*LOAD CHANNEL NUMBER

INTFCY

:1S INTERRUPT IN CHANNEL 1 OCCER
‘BRANCH IF YES
*DECREMENT COUNTER
“IF NO,TEST AGIN
TGET CSRT CONTENTS

#1%,31CRHX
#77877.R
248
R1
238

aCSRX,BAD

MOV
#100026,6000
ERRSOFT 2310,F2%2.ERR201

24%:

*LOAD BUFFFR WITH DATA

R3
R1
16%
#10000,R1
RO,BUFBB

JSR
CLR
MOV

010000

R3.(R0)+

:LOAD COUNTER FOR 2K

INC
DEC
BNE
MOV
MOV

011060
121132
002240

002402
002402

#10000,R1

#10,3CSRX

#PR100,RO
C$SPRI

taeeelOAD GTS INTO ACR leweceemcccccee:LOAD LOOP COUNTER

*BC OF ,DMA DIR,BA 16,5YS CONT
*ERROR HANDLER

sSELECT CHANNEL ?

TRAP
JWORD
"WORD
.WORD

(SERSOFT
2310
E232
ERR201

B 15

SEQ 183

HARDWARE TESTS
MACRO M1113
06-SEP-82 16:46
PACE 65-6
TEST 23: DMA DATA TRANSFER TEST FROM CHANNEL 1 TQ 2
7126 061326

o127§7

7126 061340
7127 061342

00101;
017737

7125 061334

7128 061350
7129 061356

005737

012737

000002

002400
120732

100030

061356
061360
061362
061364

104457
004407
006072
003500

061366
061372

012700
104441

000340

112777

000014

7130 061366

002374

MOV

#2,CHAN

;LOAD CHANNEL NUMBER

002502

BNE
MOV

25%
aCSRX,BAD

*BRANCH IF YES
SGET CSR2 CONTENTS

TST

002500

INfFC2

MOV
#1000%0,6000
ERRSNHFTM 2311,E2%2,ERR201

25%:

*IS AN INTERRUPT [N CHANNEL 2 OCCURED
:BC OF ,BA 16,MUX SHOULD BE SET
*ERROR HANDLER

120676
002374

BIC
MOV

#10,3% SRX
#1,CHAN

;SELECT CHANNEL 1
:LOAD CHANNEL NUMBER

7134 061616

013737

002336

002500

MOV

PHLOW , GOOD

*SET UP COMPARE VALUE

7136
7137
7138
7139

017737
023737
001404

120644
002502

002502
002500

061432
061440
061446
061450

061450

061452
061454
061456

063737

104457
004410
006200
003702

7140 061460
7141 061466
7162 061472

017737
005037
023737

061502
061504
061506

061510

04457
004411
006231
003702

7148 061534

062737

7143 (061500
7144 061502

7145 061512
7146 061520
7147 061526
7149 061542

7150
7151
7152
7152

061550
061556
061564
061566

001404

002240

120620
002500

002502

120560
002374
002500

063737

002240

002500

017737
023737
0014064

120526
002500

104457
004412
006200
003702

017737
005737

120502
002502

7157 061612
7158 061616

005037

002500

061616

001406
104457

001929
Does3i
061624 003702

ADD

MOV
cMP
BEQ
ERRSOFT

30%:

002500

000010
000002
002360

061566
061570
061572
061574
7154 061576
7155 061606

7156 061610

002502

052777
012737
013737

160000

MOVB

002500

31%:

002500

002502

MOV
CLR
CMP

B8CINP.G0OD

9BARX ,BAD
BAD,GOOD
30$
2312,E234.ERRSO1

aBCRX,BAD
600D
BAD,GOOD

teeee 0AD TCA INTO ACR lescccccceccen-

SGET BAR1 CONTENTS
*HAS BAR1 THE CORRECT ADDRESS
:BRANCH IF YES
:ERROR HANDLER

:GET BCR1
:

CONTENTS

:1S BCR1 2ERO
*BRANCH IF YES
:ERROR HANDLER

BIS
MoV
MOV

#10,3C SRX
#2,CHAN
BUFBB, GOOD

;SELECT CHANNEL 2
JLOAD CHANNEL NUMBER
SSET UP COMPARE VALUE

ADD

BCINP, GOOD

Seee

MOV
CMP
BEQ
ERRSOFT

40%:

#14,a1CRHX

BEQ
31¢
ERRSOFT 2313,E235,ERRS01

BIC

002502
002502

#PRIO7,RD
($SPR]

;NO FURTHER INTERRUPT ALLOWED

000010
000001

7135 061426

MOV
TRAP

#PRI1Q7

042777
012737

120652

CSERSOFT
2311
E232
ERRZ01

SETPRI

7131 061374
7132 061402

7133 061410

TRAP
MORD
JWORD
.WORD

MOV
ST

#160000,6000
3BARX .BAD
GOOD ,BAD
40%
2314 ,E234,ERRSO1

TRAP

CSERSOFT
2312
E234
ERRSO1

TRAP
LWORD
LWORD

CSERSOFT
2313
E235
ERRS501

LWORD
LWORD
.WORD

.WORD

SCLEAR BIT 13414415

:GET BAR2 CONTENTS
:HAS BARZ THE CORRECT ADDRESS
:BRANCH [F YES
*ERROR HANDLER

TRAP
MORD
WORD
.WORD

aBCRX,BAD
BAD

:GET BCR2 CONTENTS
:BCR2 CONTENTS SHOULD BE ZERO

(LR
600D
ERRSOFT 2315,E235,ERRS01

SSET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

BEOQ

438

(SERSOFT
2314
E234
ERRSO1

:BRANCH IF YES

TRAP

(SERSOFT

‘YoRD
£33
.WORD
ERRSOM

15
HARDWARE
TEST

23:

TESTS

MACRO M1113

DMA DATA TRANSFER

06-SEP=8B2 16:46

TEST

7159 0616%6

015737

000001

7161
7162
7163
7164
7165
7166
7167

013702
005037
005237
122122
001446
005037
005037

002360
002406
002406

7160 061636

7168
7169
7170
7171
7172
7173
7176
7175
7176
7177
7178

061640
061646
061650
0616564
061656
061660
061664

061670
061676
061706
061710
061714
061722
061730
061736
061746
061752
061756

061756
061760
061762

061764

~179 061766
7180 061774
7181 062002

7182 062004
7183 062010
7184 062016

;}gg 062022

013701

012737
012737
010137
005337
042737
013737
052737
11613/
116237
005037

104457
004414
006010
003744
012737
023737
001322

005037
005077
017737

005077

002356

002500
002502

0000017
000001
002430
(02430
160000
002430
010000
177777
177777
177572

000001
002404

177572
120264
120252
120252

FROM CHANNEL

177572

43$:

468

002426
002402

177572
002240

10 2

MOV

#1,5R0

;e ¢ENABLE MEMORY MANAGEMENTee

MOV
CLR
INC
(MPB
BEQ
CLR
CLR

BUFBB,R2
CNTY
CNTY
(R1)¢,(R2)*
463
600D
BAD

SPROVIDE FIRST BYTE OF BUFFER B
*CLEAR BUFFER COUNTER
:
;BUFFER A EQUAL BUFFER B
SIF YES CONTINUE
*CLEAR GOOD
*CLEAR BAD

MOV

Buf AB,R1

MOV
MOV
MOV
DEC
8IC
MOV
8IS
MOVB
MOVB
(LR
ERRSOFT

002430
002424
002424
002500
002502

46%:

MOV
CMP
BNE

CLR
CLR
MOV

002502
(XXX

7187

CLR

‘PROVIDE FIRST BYTE OF BUFFER A

#1, TXADRN
#1.RXADRH
R1.TXADRL
TXADRL
#160000, TXADRL
TXADRL ,RXADRL
#10000,RXADRL
=1(R1).600D
=1(R2).BAD
SRO
2316,E231,ERR231

STX ADDRESS IS OVER 32K
*RX ADDRESS IS OVER 32K
*GET ADDRESS OVER 32K
P
JCLEAR PAR INFORMATI]ON
;GENERATE RX ADDRESS FROM TX ADDRESS
;RX ADRRES [S TX ADDRESS +2k
Teee
Cees
teeDISABLE MEMORY MANAGEMENT
e+
"ERROR HANDLER

TRAP
WORD
LWORD

.WORD

#1,SR0
CNTY,BCINP
448

SRO
aCSRX
aI0RX,BAD
aCSRX

YT LYY

;**ENABLE MEMORY MANAGEMENTee
SALL BYTES COMPARED ?
S1F NO, GET NEXT ONE

(SERSOFT
2316
E231

ERR231

teeDISABLE MEMORY MANAGEMENT
e+
*CLEAR CSR2,SELECT CHANNEL 1
SREAD DIR1 FOR CLEAR BO BIT IN IIR
PP AL PP

‘CLEAR CSR1

‘PART & DMA OVER 64K

7188

7189 062026
7190 062032
7191 062036

7192
7193
7196
7195
7196

SEQ 184

PAGE 65-7

062044
062046
062050
062054
062056

7197 062062
7198 062066
7199 062074
7200 062100
7201 062106

7202 062110

7203 062114
7204 062116
7205 062126
7206 062126
7207 062130
7208 062132
7209 06213
7210 062140

7211 062146

005037

005037
023727

002404
003005
005737
001002
000137

005037
012737
004737
013700
010037

012701

005003
012737
110320
005203
005301
001374
012701
010037

105020

j4ttcccccccccccecccrcrcscarccccceccccceccocererccccccccsseserccaaccessn
e

002376
002400
002342

PSEU33:
000002

002344

063200
002336
000002
007724
002340
002356

002334

11$:
138:

010000
000001

010000
002360

CLR

16%:

208 :

:CLEAR INTERRUPT FLAG

118
138
PHLSIZ
13$
EXav23

S1F NO SKIP TEST
:
;
:
SJUMP TO TEST END

INTFC2
PHHSIZ,#2

CLR

MOV
MOV

PHLOW
#2.PHHIGH
PC.PVCON
VIADD,RO
RO, BUF AB

CLR
MOV
MOVB
INC
DEC
BNE
MOV
MOV

R3
#1,SR0
R3.(R0)+
R3
R1
16%
#10000,R1
RO,BUFBB

BLT
BGT
ST
BNE
JMP
MOV
JSR

MOV

177572

INTFCY

CLR
CMP

CLRB

#10000,R1

RO) +

:CLEAR INTERRUPT FLAG
*1S THERE MORE THAN 64K

*LOAD INPUT FOR CONVERSION ROUTINE
..
‘CREATE VIRTUAL ADDRESS
TGET START ADDRESS OF BUFFER A
*LOAD START ADDRESS OF BUFFER A

*LOAD COUNTER FOR 2K

*R3 CONTAINS
Te*ENABLE MEMORY MANAGEMENT++
*LOAD BUFFER WITH DATA
*CREAT NEXT DATA
:
:
‘LOAD 2K
*LOAD START ADDRESS OF BUFFER B

“CLEAR BUFFER B

D 15

SEo 185

JSR
CLR

MoV
NEG
MOV
MOV

NN
W= WNNINININI
BN
NNWWONSNNNNES
N
WWWN NO = WO NWNS
O
SNNW
S N NNN=O

CRHX

1
L

DRHX

C
8
RSAVE
C
SAV
S
,@BCRX
a147.acsnx

12eDISABLE MEMORY MANAGEMENT
ve
----- LIOAD TON INTO A(R Te==eeccacacaan
CREAIE MLA?

:STORE MLA2
----- LOAD MLA2 INTO DOR 1-==s-=scccee-

SWAIT A LITTLE

:===LCAD START ADDRESS OF BUFFER A=---

:STORE_BYTE COUNT INPUT
:BILD 2'COMPL FOR BCR

SETPRI

#PR100

8IC

#10,3CSRX
#1, CHAN

+LOAD CHANNEL NUMBER

INTFC1

¢15 INTERRUPT

8IS

MOV
MOvB
MOV

1ST
BNE
DEC
BNE

#19,2CSRX

010600 aBARX
RSAVE, @BCRX
#141,3CSRX

#1331 CRHX
2077077 R1

MOV
TRAP

sSELECT CHANNEL 1

°°°°° LOAD GTIS INTO A(R l=ecccccccceca:LOAD LOOP COUNTER
:BRANCH IF

sIF

YES

IN CHANNEL 1 OCCER

NO,TEST

AGIN

sGET CSR1 CONTENTS

;8C OF ,DMA DIR,BA 17,SYS CONT

ERRSOFT

;ERROR HANDLER

TRAP

002374

117666
100050

0
O

248

2317

.WORD

ERR201

BNE

¢BRANCH IF

VYES

;GET CSR2 CONTENTS

:BC OF ,BA 17,MUX SHOULD BE SET

ERRSOFT

:ERROR HANDLER

TRAP

.MORD
.MORD

(W IV IV, IV Te JV Te)
QOOOQO N
ONOO NSO

QOO O —
OOOO=O —

NNV
NN N

O=O0000

000340

SETPR]

#PR107

:NO FURTHER

BIC

#10,3CSRX
” CHAN

SSELECT CHANNEL 1
sLOAD CHANNEL NUMBER

PHLOW, GOOD

:SET UP (OMPARE

MOV
MOv8
MOV
ADD
MOV

(MP

E232

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
:1S AN INTERRUPT [N CHANNEL 2 OCCURED

B1S

MOV
TST
MOV
MOV

25%:

CSERSOF
T

WORD

.WORD
000010
000002
002400

#PR100,RO
C$SPR]

sOECREMENT COUNTER

MoV
MOV

O00—=
OO000

WNWWWNRINURNI
BN
NNNNNNNESEN
WWNNWNSNW NSO
NNNNNNN=O

OCOO0O0O—00
=0
=P =t fO=

7253 062464

7254 062472
7255 062500
7256 062506

----- LOAD INPUT INTO B(R 1--==co=caa:=DMA_ENB,DMA DIR, INT ENB,BA 17,SYS (
FSELECT CHANNEL 2
----- LOAD START ADDRESS OF BUFFER B------- LOAD INPUT INTQ B(R 1===
----- SET DMA ENB,INT ENB,BIT17 [N (SR2
:SET PRIORITY 10 ZERO

MOV
MOV
MOV

23%:

mmvxo.

120070

IOVBORO BNND

MOv8
MOV
ADD
MOV
movae

;2K CLEARED
JIF YES,DO THE TEST

DDV

AINNIRIAD
NN BN O NIINNIAN — Y
NNNNNNSNO
NN NN NOWW
NN N NN NN
NN NN O O
W ~NO
NN
N NN N NN N N N =P s g W =

OO0O0O0O0O0OO0OO—~OO0O—2000
HAANoLLDO—-20O0—=—==2000

(LR

120104

WO
S
VOSS
ON=W
ONONN

OO0O0O0CO0OOO0O=
——00—=VOOO0O0O

NINSWVMTVNIWON
S &
NNONNNVIOSN
S
WWW—
W NO N =WV
NNNINNNONWVIN

DEC

BNE

OO0O0O0O0O0—~00—=0
=—=O0000===fQ=

-—

~
w
W

(o] =]
oo~

MNINININONAD

[=]
o

TESTS
MA(CRO M1113
(06-SEP 82 16:46
PAGE 65-8
DMA DATA TRANSFER TEST FR M CHANNEL
1 0 2

o
o

~
~n
w
~

SNNSNNSNSNSNSNSNSNSNSNSNSNASNSNNN ~
NN AL AINLNINI NNV NN NI AN AONY~N
WA AVININININIRNININ)
b b b ed ecd D 2 pory
[@Xrelo R NTe QU P VW NE_Tallelo L NTe JU ¥ YV ~)

HARDWARE
TEST 23:

4,1 CRHX

8C INP.GOOD
3BARX .BAD
BAD,GOOD

..... LOAD

:GET BAR1
:HAS BAR1

INTERRUPT

TCA

INTO

CORRECT

ERRZ20N
#PR107,R0O
($SPRI

leeccccccaccccaa

VALUE

CONTENTS
THE

ACR

WORD
ALLoqu
MOV
TRAP

(SERSOFT

23'8
E232

ADDRESS

SEQ 186

002502

30%:

117434

002592

NOOO SN

ORI
N
VAN ANNLNWDN
OOO0OO0OON—

[olelelelele
OCOO0O0O0O -

O=O =000
O=0O00O00O0
ANNNONOO
VIS NOWOO
OO OO
QOO OONO

002500

002502

318

000001

9,6234,ERRS01

MOV

aB(RX,BAD
CLR
(MP
BEQ
ERKSOFT 2320,E235,ERRS01

BIS

MOV
MOV

BIC

ADD
MOV

40%:

MoV

TST

aB8(RX,BAD
BAD
439
600D

BUt AB,R1

BUFBB,R2
CNTY

64
NNNOOODONNINO

(R1)¢+,(R2)¢
469

600D
8AD
#2,TXADRH
#2 ,RXADRH
R1,TXADRL

002426
002422

TXADRL

3160000 TXADRL
TXADRL, RXADRL

#10000, RXADRL
C

=1(R1),600D
-1(R2),BAD
SRO

T 2323,8231 ,ERR231
ERRSOF

T
C(SERSOF

2319
E234
ERRS01

;1S BCR1 2ERO

JBRANCH IF YES
JERROR HANDLER

TRAP

CLEAR BIT 13414415

8CINP, GOOD
BARX.BAD
cgoo.eno

LMORD
.MORD
LWORD

;GET BCR1 CONTENTS

#160000,6000

B8, GOOD
BUF

#1,SR0

43%:

TRAP

sSELECT CHANNEL 2
;LOAD CHANNEL NUMBER

BEQ
CLR
T 2322 ,E235,ERRSOT
ERRSOF

177572

<BRANCH [F YES
;ERROR HANDLER

#10,3CSRX
"2, CHAN

cMP
40%
BEQ
T 2321,E234,ERRS501
ERRSOH

002500

Y
Yo I y=1=][=)
NNN—2OOOO (=4
NNNONONINNOO
NN
VINSNO
SO M OOV
NNNOWOWNWO
O OO

S NNNNNNNNNND
S S
OWWWWNNWWWNNOWNIWVY | OWWWO
O
S NNNNNNNNI=SON
S NNNNO
ONY =2 NNW
= NYNOO S =2PNIOQONNNNNUSES
AN AN
NN LN A N N N N S NI LN O OWNOWNIWVY
NNNNNNNNVVNNNON NN NI =2AIN

N =2NINIWO
&

O NNNNVES
S
WO WWOONIWVT
NONNNNO
=N

O000O0O

_RNelel=aleolole] O=

QO b\
A b DO == =2 O00O0ONOCO=2=2=20000
ONINI W S PONVAINNNINO 8 8
VOO~ NNV

[P lelelelolelalalale
D lelelelelelelele L

95
7296 063020
7297 063024

BEQ
T
ERRSOF

104457

OO0O0-20000

062616

001404

O00O00O0O0O0O0O0O0O—=

O [olelololelelelelololololelelelelelo]
oo ooocoocororOrOOr OO0
nonNY NIRINLNLAIAININININLNIAIAINI
NI NINOND
oo VAW NN AU WUV
O N
O N NN
S ININININY — —b —
(=] NSO NOOCOSOSTNOOON
S

HARDWARE TESTS
MACRO M1113
06-SEP-82 16:46
PAGE 65-9
TEST 23: DMA DATA TRANSFER TEST FROM C(HANNLL 1 10 2

.WORD
.WORD
.WORD

CSERSOFT

2320
£235
ERRSO1

:SET UP (OMPARE VALUE

.GET BAR?2 (ONTENTS
sHAS BARZ2

THE

;BRANCH IF YES
;ERROR HANDLER

CORRECT

ADDRESS

TRAP

LMORD
LMWORD
.WORD

:GET BCRZ2 (ONTENTS
;BCRZ2 CONTENTS SHOULD BE ZERO

JBRANCH [F

CSERSOFT

2321
£234
ERR501

YES

:SET UP DATA FOR ERROR MESSAGE
:ERROR HANDLER

TRAP

.MORD
LMORD
.MWORD

;w+ENABLE MEMORY MANAGEMENT ¢+

CSERSOFT

2322
E235
ERRSO1

:PROVIDE FIRST BYTE CF BUFFER A
:PROVIDE F]RST BYTE OF BUFFER B
JCLEAR BUFFER COUNTER
:BUFFER A EQUAL BUFFER B
JIF YES CONTINUE
;CLEAR GOOD
:CLEAR BAD
:TX ADDRESS IS OVER 64K
sRX ADDRESS IS OVER 64K

'GEI ADDRESS OVER 64K

CLEAR PAR INFORMATION
:GENERATE RX ADDRESS FROM TX ADDRESS
;RX_ADRRES IS TX ADDRESS 2K
SEY UP DATA FOR ERROR MESSAGE

e
."DlSAE.E MEMORY MANAGEMENT
;ERROR H,NDLER

F 15

SEQ 187

HARDWARE TESTS
MACRO M1113
06-SEP 82 6:46
PAGE_65-10
TEST 23: DMA DATA TRANSFER TEST FROM CHANNEL 1 T0 2

063024
063026
063030
063032

104457
004423
006010
003744

7299 063042

023737

7298 063034

012737

7300
7301
7302
7303
7304

063050
063052
063056
063064
063072

7306
7307
7308
7309
7310
7311

063104
063112
063116
063120
063124
063132

112777
005737
001030
005237
023737
001422

7313 063142

004737

7315 063154

012777

7317 063166

017737

7305 063076

7312 063134

7314 063146

7316 063162
7318 063174

7319 063200

001322
005037
042777
112777
004737

112777

002240

177572
000010
000077
011060

117214
117204

46%:

#1,5R0

s **ENABLE MEMORY MANAGEMENTee

BNE
CLR
BIC
Mov8
JSR

L4
SRO
#10,3CSRX
#77,3I0RHX
PC LOOP

:IF NO, GET NEXT ONE
s**DISABLE MEMORY MANA(EMENT
v«
sSELECT CHANNEL 1
e=e- LOAD UNL INTO DOR 1=eeeccccccccc-e
IWAIT A LITTLE

Move
TST
BNE
INC
CMP
BEQ

#0,31 CRHX
QvP
Exave3
1TRCNY
ITRCNY, ITRDEF
ExQve3

(MP

002322
002322

002320

112777

000217

117126

112777

000017

117114

MOvVB

005077

117112

002502

Mov

000137

7322 063204

045

063266
063266

104401

000000
002234

011072

000010
117100

057306

123

MovBs

117156

mMove
JSR

117116

MOV

(LR

Exave3:

062

1SHD23:

CSERSOF
T
2323
E231
ERR231

MOV

117164

104432
000064

7323
7324
7325 063266

177572

0024064

000200

063200
063202

7320
7321

000001

TRAP
.WORD
.WORD
.WORD

JMP

cnfl,BCIne

#200,81CRHX

#217 ,3I1CRHX

i===LOAD SWRST INTO ACR 1=-==c-ceceace

;===LOAD NOT SWRST INTO A(R 1===c=ce-:1S QUICK VERIFY PASS SELECTED
¢IF YES EXIT TEST
s INCREMENT COUNTER
;ALL DONE
:BRANCH IF YES

ee=ee LOAD SIC INTO ACR lesecececcee

PC WAIT

SWAIT A LITTLE

#10,3CSRX

;CLEAR CSR1,SELECT CHANNEL 2

@I0RX _,BAD

:READ DIR1

MP,3ICRHX

aCSRX

[TAC2S

EXIT

CNLIST

BEX

LLIST
.EVEN
ENDTST

BEX

.ASCIZ

JALL BYTES COMPARED ?

jeee- LOAD NOT SIC INTO ACR 1===<--

:CLEAR CSR2,SELECT CHANNEL 1
FOR CLEAR BO BIT

:1F NO TEST ITERATION
JEXIT TEST

In IIR

TRAP
.WORD

/XS2YADMA DATA TRANSFER TEST FROM CHANNEL 1

CSEX]
L1005

TO 23N/

L1005¢:

TRAP

CSETST

615

SEQ 188

HARDWARE TESTS
MACRO M1113
06-SEP=-B2 16:46
PAGE 66
TEST 24: DMA DATA TRANSFER TEST FROM CHANNEL 2 10
1

7327

LSBTTL

TEST 24: DMA DATA TRANSFER TEST FROM CHANNEL 2 T0 1

7330

PAR! 1

SENDS DATA VIA THE

7332
7313
733
7335
7336
7337
7338

:
WHEREAS CHANNEL 1 WHICH 1S SELECTED AS A LISTENER PERFORMS A DATO8
;
CYCLE.
THE MAX. SELECTABLE BYTE COUNT FOR THIS DATA TRANSFER 1S
;
IS 2K BYTES AND THE HIGHEST BUS ADDRESS IS BELOW 32K.
*PART 2 CHECKS THE NON EXISTENT MEMORY BIT OF CHANNEL 1.
;
THIS IS DONE BY A DMA FROM A NON EXISTING 1/0 PAGE APDRESS SELECTED
;
IN THE BUS ADDRESS REGISTER OF CHANNEL 2 (DATOB CYCLE).
:PART 3 SAME PROCEDURE AS IN PART 1 EXCEPT THE DATA TRANSFER IS EXECUTED

7328

"""""'.""t""t"'"""t"'"'Q."'"".t'Q"t""'t""t""""'.'

7329

733

7339
7340
7341

IEX =

TEST 24

IEC/IEEE BUS FROM CHAN, 2 TO1 BY HEANS OF A DMA

1.E. CHANNEL 2 WHICH IS SELECTED AS TALKER PERFORMS
A DAT] CYCLE,

;
OVER 32K (1F MEMORY MANAGEMENT IS AVAILABLE).
:PART 4 SAME PROCEDURE AS IN PART 1 EXCEPT THE DATA TRANSFER IS EXECUTED
OVER 64K (1F MEMORY MANAGEMENT IS AVAILABLE).

73[,2

"""'t'tttt"'tt"""'"""tt.'t"'"tt.t"'t"t"QQ'Q"".QQ"""..'."

7343 063270

063270

BGNTST

7364 063270

005737

002324

063276
063302
063306
063310
063312

012746
012746
010600
10
7
062706

067204
000001

7345 063274
7366 063276

001410

7347 063316
7348 063322
7349 063326

005037
004737

7350 063330
7351
06333¢

062700
010037

7353
7354
7355
7350
7357
7358
7359

005003
110320
005203
005301
001374
010037

063326

7352 063340

063344
063346
063350
063352
063354
063356
063362

104431

012701

002322
010710

010000

002360

063372
063376
063402
063404
7360 063410
063410

013746
012746
104437
062706

002246
000003

063420
0634064
063430
063432
7361 063436

7362 063444
7363 063450
7364 063454

013746
012746
104437
062706
112777

002244
000003

013701
062701
010137

CLR
JSR
MEMORY

ITRCNT
PC.BGIN2
RO

;CLEAR ITERATION COUNTER
:SET UP PARAMETER
SGET THE FIRST FREE MEMORY LOCATION

ADD
MOV

#2.R0
RO, BUF AB

:USE THE SEC.FREE LOCATION FOR BUFFER
SLOAD START ADDRESS OF BUFFER A

CLR
MOVB
INC
DEC
BNE
MOV
SETVEC

R3
R3,(RO)+
R3
R
1%
RO,BUFBB
VECC2,#INTSC2.#PRIO?

*R3 CONTAINS THE LOADED DATA
:LOAD DATA INTO BUFFER A
<CREATE NEW DATA
:2K LOADED
*IF NO ,LOAD NEXT DATA BYTE
‘LOAD START ADDR-SS OF BUFFER B
SSET VECTOR FOR CHANNEL 2

210000, R

SETVEC

VECCT,#INTSC1,#PRIO7

010142

000010
000212

002312
000040
002410

YES, PRINT THE TEST HEADER

MOV
MOV
MOV
TRAP
ADD

#TSHD24,=(SP)
#1,-(SP)
SP,RO
CSPNTF
#,SP

TRAP

(SMEM

:BUILD 2K BUFFER SIZE

MOV

000010

000340

1264::

;1S THE PNT FLAG SET

.xr
t..

010152

012746

PNTF

7%
#TSHD24

MOV
1%:

000340

0636414

7%:
ITAC24:

000002
002356

012746

BEQ
PRINTF

000004

063362

063366

1£31

MOV
MOV
TRAP
ADD
sSET VECTOR FOR CHANNEL 1
MOV

MOV

116624

MOVB
MOV
ADD
MOV

#212,al(RHX
DPAT R1
#40,R1
R1,MLAY

#PRIO7,=(SP)

#INTSC2,=(SP)
vsccz -(sP)
#3,-(SP)
(S$SVEC
#10,5P

#PR107,=(SP)

#INTSCT,-(sP)

MOV
VECCT,=-(SP)
MOV
#3,-(SP)
TRAP
($SVEC
ADD
#10,5P
eeee LOAD TON INTO ACR 2--ceecemcaaca-

CREA!E MLA?
.srons MLA?

H 15

SEQ 189

HARDWARE TESTS
MACRO M1113
06-SEP-82 16:46
PAGE 66-1
TEST 24: DMA DATA TRANSFER TEST FROM (MANNEL 2 TO 1

7365 063460
7366 063666
7367 063472

113777
004737

002410
011060

063472
7368 063474

104404
005037

002400

7370
7371
7372
7373
7374

052777
0313777
013737
005437
013777

7369 063500

063506
063512
063520
063526
063532

7375 063540

7376 063566
7377 063554

7378 063560
7379 063564

7380
7381
7382
7383
7384

005037

002376

012777

000107

042777
013700

012701

105020

000010
002356
002240
002402
002402

115566
116562
002402

000010
002360

116524

005301
001375
013777
013777
012777

063614
063620
7386 063622

012700
104441
052777

000000

7388 063636
7389 063644

112777
012701

000013
077777

7387 063630

7390 063650

012737

005737

7391 063654
7392 063656
7393 063660

001015
005301
001373

063676
063700
063702
063704

104457
004541
006072
003500

063706

104406

7394 063662
7395 063670
7396 063676

7397 063706

7398
7399
76400
7401
7602

017737
012737

063710
063716
063724
063730
063732

042777
012737
005737
001013
017737

063746
063750
063752
06375¢
7405 063756
063756

104457
004542
006072
003500

7603 063740
7604 063746

7606 063760
76407 063766
76408 063774

012737

104406

052777

012737

116532

116502

000101

116464

002402

000010
000002

116476

i=a=c{ OAD MLA1
‘WAIT A LITTLE

(LR

INTF(?2

;CLEAR INTERRUPT FLAG

BIS
MOV
MOV
NEG
MOV

#70,3CSRX
BUF AB, 3BARX
BCINP.RSAVE
RSAVE
RSAVE ,8BCRX

TSELECT CHANNEL 2
1===LOAD START ADDRESS OF TABLE A =-==‘STORE BYTE COUNT INPUT
‘8ILD 2'COMPL FOR BCP
tee==L0AD INPUT INTQ B(R 2=cccesccces

BIC
MOV

#10,3CSRX
BUFBB,RO

MOV

CLRB

DEC
BNE
MOV
MOV
MOV

SETPR]

INTFCT

#3107, 3CSRX

($BSEG

INTERRUPT FLAG

t——==DMA ENB,DMA DIR,INT ENB,SYS CON.
‘SELECT CHANNEL 1
*LOAD START ADDRESS OF BUFFER B

‘BUILD 2K BUFFER SIZE

R1
28
BUF BB, aBARX
RSAVE . 3BCRX
#1071, 3CSRX

12K LOADED
“IF NO, CLEAR NEXT BUFFER LOCATION
‘eee=LOAD START ADDRESS OF TABLE B-=-1e===L0AD INPUT INTO BCR 1==1ee==SET DMA ENB,INT ENB [N (SR}=c=c=e

(RO)+

#PR100

‘FILL BUFFER B WITH ZERO

‘SET PRIORITY TO ZERO

MOV
TRAP

#PR100,RO
(S$SPRI

BIS

#10,a( SRX

;SELECT CHANNEL 2

116424

MOVB
MOV

#1% 31 CRHX
077077.R1

t==ealOAD GTS INTO ACR 2-==e=ceccececee
*LOAD LOOP COUNTER

10
R1
138

‘BRANCH [F YES
‘DECREMENT COUNTER
*1F MORE,TEST AGAIN

MOV

13%:

002502
002500

000010
000001
002376

116362
002374

116342

002502

531

BNE
DEC
BNE

#2 . CHAN

INTEC2

MOV
3CSRX,BAD
MOV
#100016,600D
ERRSOFT 2401,€232.ERR201

10%:

002500

BIC
MGV
1S7
BNE
MOV

116312

002374

#10,3CSRX
#1,CHAN
INTFC
1%
CSRX,BAD

MOV
#100000,6000
ERRSOFT 2402,E2%2.ERR201

11%:

BIS
MOV
SETPR]

*LOAD CHANNEL NUMBER

YIS INTERRUPT IN CHANNEL 2 OCCER

SGET (SRS CONTENTS
‘BC OF ,MUX,DMA DTR,SYS CONT SHOULD SET
*ERROR HANDLER
TRAP
-WORD
‘WORD
"WORD

(SERSOFT
2401
E232
ERR201

TRAP

cscLP

:BRANCH TO BGNSEG IF ERRLOOP IS SET

CKLOOP
000010
000002

TRAP

#10600, R

CKLOOP

100000

*CLEAR

[NTO DOR 2=scemececccee

116450

002374

002400

116412
100016

MLA1,3lDRHX
PC,LO0P

MOV

2%:

002360

MOVB
JSR
BGNSEG
(LR

116544

010000

063566
063570
063572
063600
063606

7385 063614

116610

#10.3CSRX
#2,(HAN
#PR107

sSELECT CHANNEL 2
‘LOAD CHANNEL NUMBER
:1S AN INTERRUPT IN CHANNEL 1 OCCURED
*BRANCH |F YES
*GET CSR1 CONTENTS

‘BC OF SHUOLD BE SET
‘ERROR HANDLER

TRAP
CSERSOFT
MWORD
2402
‘WORD
E232
‘WORD
ERR201
:BRANCH TO BGNSEG IF ERRLOOP 1S SET
TRAP
($CLPY
SSELECT CHANNEL 2
;LOAD CHANNEL NUMBER
sNO FURTHER INTERRUPT ALLOWED

HARDWARE TESTS MACRO M1113 (06-SEP-82 16:46 PAGE 66-2
TEST 24: DMA DATA TRANSFER TEST FROM (HANNEL 2 TO 1
063774
064000

012700
104441

000340

7413 066032

023737

002502

7409
7610
7611
76412

064002
064010
064016
066024

7614 064040
76415 064042

104457
0046543
006200
003702

0664052

104406

064054
064062
066066
064074
064076

017737
005037
023737
001405

064076
0664100
066102
064104

104457
006544
006231
003702

066106

104406

7422 064106
7423
7624
76425
7626
7427
7428
7629
7430

066110
064116
064124
064132
0664140
064146
0641564
064156

7431

064166

7432
7433
7434
7435
7436

001405

066062
064044
066046
064050

7616 064052

7617
76418
7619
76420
76421

11%777
013737
063737
017737

042777
012737
013737
063737
017737
023737
001405

066156
064160
066162
064164

104457
004545
006200
003702

066166

104406

064170
064176
066202
064204
064210

017737
005737
001407
005037

0646210
064212
064214
064216

104457
006546
006231
003702

064220

104406

7437 064220

7438 064222

013701

7442 064242
7643 064246

122122
001433

7439 064226
7440 064232
7441 066236

013702
005037
005237

000014
002356
002240
116252

116260
002500
002500
002502

MOvVB
MOV
ADD
MOV

002500

(MP

*
M4, ICRHX
BUF AB,GOOD
8CINP,GOOD
aBARX ,BAD

BAD, GOOD

BEQ
23$
ERRSOFT 2403,E234,ERRS01

(kLOOP

116224
002500
002502

002502

23$:

002500

MOV
CLR
(MP
BEQ
ERRSOFT

aBCRX,BAD
6GOO0D
BAD,GOOD
30%
2404 ,£235,ERRSO1

116162
002374
002500
002500
002502
002502

308:

8IC
MOV
MOV
ADD
MOV
CMP
BEQ
ERRSOFT

CKLOOP
116110
002502

002502

40$:

002500

MoV
TST
BEQ
CLR
ERRSOFT

002360
0024064
002404

43%:

1% H

:HAS BARZ THE CORRECT ADDRESS
:BRANCH IF YES
:ERROR WANDLER

TRAP
.WORD
.WORD
.WORD

ERRLOOP

TRAP

;GET BCR2 CONTENTS
:
;1S BCRZ2 ZERO
;BRANCH IF YES
:ERROR HANDLER

CSERSOF
T
2404
E235
ERR501

TRAP

csceet

TRAP
.WORD
.WORD
.WORD

CSERSOF
T
2405
E234
ERR501

TRAP

cscLPm

ERRLOOP IS SET

ERRLOOP S SET

;GET BCR1 COUITENTS
sBCR1 CONTENTS SHOULD BE ZERO
¢BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE
:ERROR HANDLER

MOV

BUF AB,R1

+PROV]DE

(MPB
213¢]

(R1)¢,(R2)
469

BUfBB,R?
(NT1
(NT

CsCLPl

TRAP
.WORD
.WORD
.WORD

aBCRX ,BAD
BAD
433
600D
2406,E235,ERR501

MOV
(LR
INC

CSERSOF
T
2403
E234
ERR501

IS SET

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
;SET UP COMPARE VALUE
Cees
:GET BAR1 CONTENTS
:HAS BART THE CORRECT ADDRESS
;BRANCH [F YES
:ERROR HANDLER

:BRANCH TO AGNSEG

(KLOOP
002356

GET BAR2 CONTENTS

;BRANCH TO BGNSEG IF
#10,9CSRX
#1,CHAN
8UFBB, GO0D
BCINP,GOOD
aBARX ,BAD
GOOD.BAD
40%
2405,E234,ERRS01

#PR107,RO
($SPRI

eeee LOAD TCA INTO ACR 2e=e=-cecccccca
SET UP COMPARE VALUE

:BRANCH TO BGNSEG IF

(kLooep
000010
000001
002360
002240
116136
002500

MOv
TRAP

TRAP
MORD
.WORD
.WORD

CSERSIFT
2406
E235
ERRS01
:BRANCH TO BGNSEG IF ERRLOOP 1S SET
TRAP
csCLPy
FlRST BYTE OF

BUFFER A

:PROVIDE FIRST BYTE OF BUFFER B
;CLEAR BUFFER COUNTER
:
¢BUFFER A EQUAL BUFFER B
sIF YES CONTINUE

919

J 15

SEQ 191

HARDWARE TESTS
MACRO M1113
06-SEP-82 16:46
PAGE 66-3
TEST 24: DMA DATA TRANSFER TEST FROM CHANNEL 2 TO 1
7646
7645
7646
7647
7648
7649
7650
76451

064266
064252
064256
066262
064266
064272
064276
064302

7652 064306
7453 064314

7654 064322

005037
005037
005037
010137
005337
005037
010237
005337

116137
116237

066322
066324
064326
066330

104457
004547
005726
003744

066332

104406

7455 064332

7656 064336
7457 064342

023737
001335

066344
066344

104405

7458 064344

7459 064346
7660 064352
7661 064360

;zgg 066366

005077
017737
052777

005077

002500
002502
002426
002430
002630
002422
0026426
002424

177777
177777

CLR
CLR
CLR
MOV
DEC
CLR
MOV
DEC

002500
002502

MOVB
MOVB

600D
BAD

TXADRH
R1, TXADRL
TXADRL
RXADRH
R2,RXADRL
RXADRL

-1(n1) GOOD
-1(R?

ERRSOFT 2407Eéso ERR231
CKLOOP

002404

002240

463:

CMP
BNE

ENDSEG

115726
115714
000010

115706

CLR
MOV
BIS

002502
115712

CLR

:CLEAR GOOD
*CLEAR BAD
*SET UP DATA FOR ERROR MESSAGE
..
:
:
:
.

.ser UP DATA FOR ERROR MESSAGE

‘ERROR HANDLER

TRAP
WORD
WORD
"WORD

(SERSOFT
2407
E250
ERR231

TRAP

C$CLPY

TRAP

CSESEG

:BRANCH TO BGNSEG IF ERRLOOP 5 SET
CNT1,BCINP
L4$

;ALL BYTES COMPARED ?
“1F NO, GET NEXT ONE

100008:
aCSRX
a1DRX,BAD
#10,a(SRX

aCSRX

:CLEAR CSR1,
‘READ DIR1 FOR CLEAR BO BIT IN IIR
‘SELECT CHANNEL 2

*CLEAR CSR2,SELECT CHANNEL 1

:Q” ..........................................................................

7464
;222

*PART 2 CHECK THE NON EXISTENT MEMORY BIT OF CHAN. 1
:
FOR NON EXISTENT MEMORY)

(THE 1/0 PAGE IS USED

00‘0 ..........................................................................

7668 064376
76469 064400

7467 064372

005021
005011

012701

002624

066402

012746

000340

064416
0646422
064424

012746
104437
062706

000003

76470 064402

066406
066412

7471 064430
7472 064434

7473 064440
7674 064442

7475 064446

7476 066452

7677 066454

066454
066460

7478 064462

7479 064466

066466

7480 064470
7481 064474

7482 066500
7483 066506
7484 064512

012746
012746

005037
012701

005711

005737

062701

001772

012700
104436

162701

104404

005037
005037

042777
010177
012737

PSEU24: MOV

CLR
CLR

SETVEC

#TABE ,R1
(R1) +
(R1)

#4,#NXM,#PRIO7

:CLEAR TWO WORD IN TABEL E

tea.
IR0

*SET UP VECTOR FOR TRAP T0 &

000010
002326
160000

1$:

002326

000002

000004

000002
002376
002400

000010
115570
000002

MOV

#PR107,-(SP)

MOV
TRAP
ADD

#3°-(5P)
CS$SVEC
#10,SP

MOV
MOV

010132
000004

CLR
MOV
ST

NXMF LG
0160000 R1

ADD

#2,R1

INEXT 1/0 PAGE ADD.(NO AUTO INCR.1'/44')

CLRVEC

YSET VECTOR & TO NORMAL STATE

SUB

#2,.R1

CLR
(LR

INTECY
INTFC2

:CLEAR INTERRUPT FLAG
‘CLEAR INTERRUPT FLAG

uxnr G

BEQ

BGNSEG

115572

002402

(R1)

BIC
MOV
MOV

#10,3CSRX
R1,SBARX
#2 RSAVE

:CLEAR FLAG
*LOAD FIRST ADDRESS OF 1/0 PAGE

- (SP)
¥NXM,
84 ,-(SP)

FIND A NON EXISTEND LOCATION
;

MOV
TRAP

#4 RO
CS$CVEC

TRAP

($BSEG

TSELECT CHANNEL 1
*LOAD BAR1 WITH A NON EXISTS 1/0 ADRR.
*LOAD NUMBER OF BYTE COUNTS

K15

SEQ 192

HARDWARE TESTS
MACRO M1113
06-SEP-B2 16:46
PAGE 66-4
TEST 24: DMA DATA TRANSFER TEST FROM CHANNEL 2 T0 1

76485 064520
7486 064594
76487 064532

005437
013777
052777

002402
002402
000010

76490 064554
7691 064562

013777
042777

002402
000010

7493 064576
76494 0646064
7495 064612

052777
012737

000010
000002

064612
064616
76496 064620

000000

76497 0646626

012700
1044461
112777

7498
76499
7500
7501
7502

0646632
064636
064640
064642
064644

012702

005737
001015
005302
001373
017737

002400

064660
064662
064664
064666

104457
004550
006072
003500

064670

104406

064672
064676
7507 064700

012700
104461
112777

7488 064540
7489 064546

7692 064570

7503 064652
7504 064660

7505 064670
7506 064672

012777
012777
012777

012737

000117
002626
017161

000013

077777

115430

100016

115552
115540

NEG
MOV
BIS

115522
115510

MOV
BIC

115474
002374

115532
115526

RSAVE
RSAVE ,aBCRX
#10,3CSRX

SSELECT CHANNEL 2

RSAVE ,aBCRX
#10,3CSRX

:LOAD BCR2
SSELECT CHANNEL

BIS
MOV
SETPR]

#10,3CSRX
#2,CHAN
#PR]IO00

SSELECT CHANNEL 2
:LOAD CHANNEL NUMBER
;SET PRIORITY TO ZERO

MOVB

#13,a3]1CRHX

MOV
#PR100,R0
TRAP
CSSPRI
;==L 0AD GTS INTO ACR 2===-ee-mececce-

ST
BNE
DEC
BNE
MOV

INTFC2
6$
R2
3s
2CSRX . BAD

*IS INTERRUPT IN CHANNEL 2 OCCER
‘BRANCH IF YES
*DECREMENT COUNTER
SIF NO,TEST AGIN
:GET CSR2 CONTENTS

MOV
MOV

115502

MOV

115442
3%

002502

002500

MOV

#117,3CSRX
#TABE , 3BARX

000340
000014

115362

;BRANCH TO BGNSEG

SETPR]

#PR]O7

JNO FURTHER

MOVB

#14,a]CRHX

BIC
MOV
MOV

#10,3CSRX
#1,CHAN
aCS$RX,BAD

7512 064736
7513 064744
7514 064746

022737
001410
012737

040060

002502

CMP
BEQ
MOV

#40060,BAD
12¢
#40060,600D0

7516 064764
064764
7517 064766
064766

064766

7518 064770
7519 0647764
7520 065002

;gg; 065010

017000
0460060

7525 065014

BIC

002500

104405

005077
017737
052777

005077

#17000,8AD

12%:
115304
115272
000010

115264

002502
115270
R

CLR

*ERROR HANDLER

SCSRX
3IDRX,BAD
#10,3CSRX

SCSRX

002376

(LR

CSERSOFT
2409
E4O1
ERRS501

TRAP

(SESEG

:CLEAR CSR1
:READ DIR1 FOR CLEAR BO BIT
SSELECT CHANNEL 2
L

LS L

INTFECT

TRAP
.MORD
.WORD
-WORD _

ERRLOOP IS SE
TRAP
CSCLP?

10001$:

JPART 3 DMA OVER 32k

005037

:IGNORE BIT 9-12

:BRANCH TO BGNSEG IF

st DL

CSCLP!

[NTERRUPT ALLOWED

ENDSEG
CLR
MOV
8IS

TRAP

ERRLOOP 1S SET

‘NXM,BA 16417 SHOULD BE SET
*BRANCH IF YES
JSET UP DATA FOR ERROR MESSAGE

CKLOOP

104406

CSERSOFT
2408
E232
ERR201

*SELECT CHANNEL 1
SLOAD CHANNEL NUMBER
SGET CSR1 CONTENTS

ERRSOFT 2409,€401,ERRSO1

104457
004551
005265
003702

7523

7524

002502

TRAP
.WORD
WORD
-WORD

MOV
#PR107,RO
TRAP
($SPRI
;====LOAD TCA INTO ACR 2-==cccecaceoa-

115364
002374
002502

064754
064756
064760
064762

:BC OF ,MUX,DMA DIR,SYS CONT SHOULD SET
*ERROR"HANDLER

CKLOOP

000010
000001
115352

7515 064754

:LOAD LOOP COUNTER

MOV
#100016,600D
ERRSOFT 2408,E2%2.ERR201

6%:

;===SET DMA ENB,BA 16=21,INT ENB (SR1-

#77077.R2

042777
012737
017737

042737

:DMA ENB,DMA DIR, INT ENB,SYS
:LOAD BAR2 WITH STAR ADDRESS OF TABE

#7161, aCSRx

7508 064706
7509 064714
7510 064722

7511 064730

:BILD 2'COMPLEMENT
*LOAD BCR1

SCLEAR CSR2,SELECT CHANNEL1

e e

IN IIR

LD DT T

ettt

¢CLEAR INTERRUPT FLAG

L 15
HARDWARE

TEST

24:

7526
7527
7528
7529
7530
7531
7532
7533
7534
7535
7536
7537

TESTS

MACRO M1153

06-SEP-82

PAGE

DMA DATA TRANSFER TEST FROM CHANNEL 2 T0 1

065020
065024
065032
065034
065036
065042
065044
065050
065054
065062
065066
065072

7538 065076

7539 065102

7540 065106
7541 065112
7562 065114

7543 065116

7544 065120
7545 065122
7546 065126

7547 065132

005037
023727
002404
003005
005737
001002
000137
005037
012737
004737
013700
010937

012701

005003

012737
110320

005203
005301
001374
012701
010037

105020

002400
002342

067200
002336
000001
007724
002340
002356
000001

000010
115060
002240
002402
002402
000127
000010

7567 065264
7568 065272

013777
012777

002402
000121

065300
065304

012700
104441

010000

052777
012737

000010
000002

7573 065330

012701

077777

112777

7574 065334

005737

7579 065354

012737

065340
065342
065344
065346

001015
005301
001373
017737

16$:

000013

100036

:CLEAR INTERRUPT FLAG
:IS THERE MORE THAN 32K
SIF NO SKIP TEST
:
:
;
:JUMP TO TEST END
;LOAD INPUT FOR CONVERSION ROUTINE
S eue
:CREATE VIRTUAL ADDRESS
:GET START ADDRESS OF BUFFER A
:LOAD START ADDRESS OF BUFFER A

*R3 CONTAINS

:CREAT NEXT DATA
:

#10000, R

MOV
MOVB
INC

#1,SR0
R3.(R0)+
R3

*LOAD COUNTER FOR 2K

:**ENABLE MEMORY MANAGEMENT
s+
:LOAD BUFFER WITH DATA

16%
#10000,R1
RO,BUFBB

;
1LOAD 2K
:LOAD START ADDRESS OF BUFFER B

DEC
BNE
BIS
CLR
MOVB
MOV
ADD
MOV
MOVB
JSR
BGNSEG

R1
208
#10,3CSRX
SRO
#212,a]1CRHX
DPAT .R1
#40,R1
R1,MLA1
MLA1,alDRHX
PC.LOOP

: 2K CLEARED
SIF YES,DO THE TEST
SSELLCT CHANNEL 2
;*sDISABLE MEMORY MANAGEMENT
¢

:STORE MLA1
;====L0AD MLA1
SWAIT A LITTLE

115042
115030
115022

BIS
CLR
MOV
NEG
MOV
MOV
BIC

#10,3CSRX
aBARX
BCINP,RSAVE
RSAVE
RSAVE ,aBCRX
#127,3CSRX
#10,3CSRX

TRAP
($BSEG
;SELECT CHANNEL 2
;===LOAD START ADDRESS OF BUFFER A=--$STORE BYTE COUNT INPUT
:BILD 2°COMPL FOR BCR
i====L0AD INPUT INTO B(R 2--======e-:-DMA ENB,DMA DIR,INT ENB,BIT 16,SYS C
:SELECT CHANNEL 1

115012
115000

MOV
MOV

208 :
115132

115110

115074

115062
002402

115016

114764
002374

114740

002400
114726

INTFC2
PHHSIZ, #1
11%
13$
PHLSIZ
13$
EXQV24
PHLOW
#1,PHHIGH
PC.PYCON
VIADD,RO
RO,BUFAB

MOV

CLR

000000

7570 065306
7571 065314

7572 065322

(LR
CMP
BLT
BGT
TST
BNE
JMP
CLR
MOV
JSR
MOV
MOV

BNE
MOV
MOV

010000
002360

104404
052777
005077
013737
005437
013777
012777
042777

7569 065300

177572

SEQ 193

66-5

DEC

000010
177572
000212
002312
000040
002410
002410
011060

012777

002334

118
138:

010000

005301
001375
052777
005037
112777
013701
062701
010137
113777
004737

7566 065256

000001

002344

7548 065134
7549 065136
7550 065140
7551 065146
7552 065152
7553 065160
7554 065166
7555 065170
7556 065176
7557 065202
7558 065206
065206
7559 065210
7560 065216
7561 065222
7562 065230
7563 065234
7564 065242
7565 065250

7575
7576
7577
7578

16:46

002500

(RO)+

:CLEAR BUFFER B

i====L0AD TON INTQ AR 2===-=c=cecca--

*CREATE MLA1
Seee

INTO DOR 2-===--ccceaa-

MOV

#10000, aBARX

i==<<LOAD START ADDRESS OF BUFFER B---

SETPRI

#PR100

:SET PRIORITY 10’ ZERO

8IS
MOV

#10,3CSRX
#2 CHAN

:SELECT CHANNEL 2
*LOAD CHANNEL NUMBER

MOV

#77077.R1

Mov8s

238 :
002502

CLRB

BNE
DEC
BNE
MOV

MOV

RSAVE ,aBCRX
#121,3CSRX

#1531 CRHX

i====LOAD INPUT INTO BCR 1==;====SET DMA ENB,INT ENB,BIT16 IN CSR1

MOV
TRAP

#PR100,RO
C$SPRI

iee==l0AD GTS INTO A(R 2==eccceccccca=
:LOAD LOOP COUNTER

INTFC?

:IS INTERRUPT IN CHANNEL 2 OCCER

#1000%6,G000

:BC OF ,MUX.DMA DIR,BA 16,5YS CONT

248
R1
238
aCSRX,BAD

*BRANCH IF YES
*DECREMENT COUNTER
S1F NO,TEST AGIN
$GET CSR2 CONTENTS

m15
HARDWARE
TEST

24:

TESTS

MACRO M1113

DMA DATA TRANSFER

7580 065362
065 362
065364
065366
065370

104457
004552
006072
003500

065372

104406

7581

065372

7582 065374
7583 065402
7584 065410

7585 065414
7586 065416

7587 065424
7588 065432

042777
012737
005737

001013
017737

012737

065432
065434
065436
065440

104457
004553
006072
003500

065442

104406

065444
065450
7591 065452

012700
104441
052777

7589 065442

7590 065444
7592
7593
7594
7595
7596
7597
7598

065460
065466
065474
065502
065510
065516
065524

7599 065526
065506
065530
065532
065534
7600 065536
7601 065544
7602 065550

7603 065556
7604 065560
065560
065562
065564
065566
7605 065570
7606 065576
7607 065604

7608 065612

7609
7610
7611
7612

065620
065626
065634
065642

7613 065644
065644

065646
065650

012737
112777
013737
063737
017737
023737
001404

104457
004554
006200
003702
017737
005037
023737

001404

104457
004555
006231
003702
042777
012737
013737

042737

063737
017737
023737
001404

104657
004556
006200

06-SEP-82 16:46

TEST

FROM CHANNEL

TC 1

ERRSOFT 2410,E232,ERR201

CKLOOP

000010
000001
0062376

114676
002374

114656

002502

100020

24%:

BIC
MOV
ST

BNE
MOV

002500

#10,3CSRX
#1,CHAN
INTFCT

25%
3CSRX ,BAD

000340
000010
000002
000014
002336
002240
114566
002502

114620
002374
114574
002500
002500
002502
002500

BIS
MOV
MOVB
MOV
ADD
MOV
CMP
BEQ

#PRIO7
#10,aCSRX
#2,CHAN
#14.31CRHX
PHLOW, GOOD
BCINP.GOOD
aBARX .BAD
BAD, GOOD
30$

ERRSOFT 2412,E234,ERRS01

114542

002500
002502

000010
000001

002502

002500

002360

114502
002374
002500

002240
114450
002500

002500
002502
002502

160000

002500

30%:

MOV

CLR
CMP

aBCRX,BAD

600D
8AD, GOOD

BEQ
3¢
ERRSOFT 2413,E235,ERR501

318:

BIC
MOV

;ERROR HAND_ER

JWORD
.WORD
.WORD

2410
E232
ERRZ01

TRAP

cscLPl

ERRLOOP IS SET

TRAP

sNO FURTHER INTERRUPT ALLOWED
MoV

sSELECT CHANNEL 2
:LOAD CHANNEL NUMBER

sGET BAR2 CONTENTS

sHAS BAR2 THE CORRECT
:BRANCH IF YES
¢sERROR HANDLER

:GET BCR2 CONTENTS

ERRSOFT 2414 ,E234,ERRSO1

#PR107,RO
C$SPRI

ADDRESS

TRAP

.WORD
MORD
.WORD

T
C(SERSOF

2412
E234
ERRS501

;1S BCR2 ZERO

;BRANCH IF YES
;ERROR HANDLER

:CLEAR BIT 13414415

BCINP,GOOD
aBARX .BAD
GOOD
, BAD
40%

CSCLPI

:SET UP COMPARE VALUE

#160000, 6000

ADD
MOV
(MP
BEQ

TRAP

T
CSERSOF

2411
E232
ERR201
SET

;====L0AD TCA INTO A(R 2-=====c=c==e-a=

JSELECT CHANNEL 1
:LOAD CHANNEL NUMBER

BUF BB, 600D

CSERSOFT

sSELECT CHANNEL 1
;LOAD CHANNEL NUMBER
;IS AN INTERRUPT IN CHANNEL 1 OCCURED
¢BRANCH If VYES
sGET CSR1 CONTENTS
;8C OF ,BA 16 SHOULD BE SET

#10,3CSRX
#1,CHAN

MOV

BIC

TRAP

.WORD
.WORD
.WORD
;BRANCH TO BGNSEG IF ERRLOOP [S

CKLOOP

SETPRI

sERROR HANDLER

;BRANCH TO BGNSEG [F

MOV
#100020,600D
ERRSOFT 2411,E2%2,ERR201

258 :

SEQ 194

PAGE 66-6

TRAP

LMWORD
WORD
.WORD

(SERSOFT

2413
E235
ERRSON

:SET UP COMPARE VALUE

:GET BAR1 CONTENTS
:HAS BAR1

THE CORRECT ADDRESS

:BRANCH IFf YES
JERROR HANDLER

TRAP

.WORD

CSERSOFT

2414

t£234

N 15

SEQ 195

HARDWARE TESTS
MACRO M1113
06-SEP=-82 16:46
PAGE 66-7
TEST 24: DMA DATA TRANSFER TEST FROM CHANNLL 2 TQ 1
065654
065662
065666
065670
065674

065674
065676
065700
065702
7619 065704

003702

017737
005737
001406
005037

104457
004557
006231
003702
012737

114426
002502

002502

40%:

002500

MoV
aBCRX,BAD
TST
BAD
BEQ
43%
CLR
600D
ERRSOFT 2415,E235,ERRS01

065712
065716
065722
065726
065732
065734
065736
065742
065746
065754
065762
065766
065772
066000

013701
013702
005037
005237
122122
001446
005037
005037
012737
012737
0101%7
005337
042737
013737

002500
002502
000001
000001
002430
002430
160000
002430

002430
002424

7635 066014

116137

177777

002500

move

7634 066006

7636 066022

7637 066030
7638 066034

7639
7640
7641
7642
7643

066034
066036
066040
066042

066044
066052
066060
066062
066066
066066
C66066

7644 066070
7645 066074
764€ 066102

ngz 066110

052737
116237

005037

104457
004560
005726
003744
012737
023737
001322
005037

104405

005077
017737
052777

005077

000001
002356
002360
002404
002404

010000
177777
177572

177572

43$:

L4s:

002426
002422

002424

8IS

002502

Movse

=1(R1),600D

#10000, RXADRL
=1(R2) ,BAD

CLR
SRO
ERRSOFT 2416,E250,ERR231

000001
002404

177572
002240

46%:

177572

114204
114172
000010

114164

002502
114170

7651
7652
7653
7654

056114
066120
066124
066132

005037
005037
023727
002404

002376
002400
002342

7656
7657
7658
7659

006136
066142
066144
066150

005737
001002
000137
005037

002344
067200
002336

MoV
CMP
BNE
CLR
ENDSEG

#1,SR0
CNT1,BCINP
L4
SRO

CLR
MoV
BIS

I SRX
ad]DRX,BAD
#10,9CSRX

CLR

;PART

003005

sERROR HANDLER

TRAP

"ENQB E

;

,PROVIDE

:CLEAR GOOD
sCLEAR BAD
:TX ADDRESS
:RX _ADDRESS

.WORD

e«
Eg ORY MANAGEMENT

PSEU34:

000002

QU AL BUFFER B
Tl

IS OVER 32K
IS OVER_ 32k

sGET ADDRESS OVER 32K

sCLEAR PAR INFORMATION
sGENCRATE RX ADDRESS FROM TX ADDRESS
sRX _ADRRES IS TX ADDRESS +2K
sSET UP DATA FOR ERROR MESSAGE

»+
s**DISABLE MEMORY MANAGEMENT

¢ERROR HANDLER

TRAP

.WORD
v«
s**ENABLE MEMORY MANAGEMENT

24
EZ

sALL BYTES COMPARED ?
sIF NO, GET NEXT ONE
e«
s**DISABLE MEMORY MANAGEMENT

SR1

TRAP

FOR CLEAR 80 BIT

CHANNEL 2

CSESEG

HANNEL 2,SELECT CHANNEL

[IR

&4 DMA OVER 64K

CLR
(LR
cMp
BLT

INTFC
INTFC?
PHHSIZ ,#2
118

1ST
BNE
JMP
(LR

PHLSIZ
13$
EXQV24
PHLOW

BGT
11$:
13%:

ER COUNTER

10002%:

aCSRX

24
EZ2

T BYTE OF BUFFER A
RST BYTE OF BUFFER B

JWORD
.WORD

;ggg

7655 0061364

#1,SR0
BUF AB, R1
BUFBB,R2
CNT1
(N
(R1)+,(R2)+
46%
600D
BAD
#1,TXADRH
#1,RXADRH
R1, TXADRL
TXADR
#160000 TXADRL
TXADRL, RXADRL

ERR501

+BRANCH [F YES
sSET UP DATA FOR ERROR MESSAGE

WORD
.WORD

MoV
MoV
MoV
CLR
INC
(MPB
BEQ
CLR
CLR
MoV
MoV
MoV
DEC
BIC
MoV

7620
7621
7622
7623
7624
7625
7626
7627
7628
7629
7630
7631
7632
7633

.WORD

sGET BCR1 CONTENTS
;BCR1 CONTENTS SHOULD BE ZERO

065652

76164
7615
7616
7617
7618

13%

NTERRUPT
NTERRUPT

FLAG
FLAG

E MORE THAN 64K

KIP TEST

JUHP TO TEST END

:L0AD INPUT FOR CONVERSION ROUTINE

8 16

SEQ 196

HARDWARE TELIS
MACRO M1113
06-SEP-82 16:46
PAGE 66-8
TEST 24: DMA DATA TRANSFER TEST FROM CHANNEL 2 TC 1
7660 0661564

012737

000002

7662 066166
7663 066172

013700
010037

002340
002356

7661 066162

7664 066176

004737
012701

066202
0662064
066212
066214
066216
066220
066222
066226

7674
7675
7676
7677

066236
066236
066240
066246

005301
001375
052777
005037

000010
177572

7679 066260
7680 066264
7681 366270

013701
062701
010137

002312
000040
002410

7678 066252

7682 066274
7683 066302

105020

112777

000001

113774

002240
002402
002402

002402

062777

000010

013777
012777

002402
000141

7690 066346
7691 066354
7692 066362

7693 066370

012777 000147
012?77

010000

066370
066374
7696 066376

012700
104441
052777

000000

7696 0666412
7697 066620

112777
012701

000013
077777

7695 066404

7698 066424
7699 066430
7700 066432
7701 066434

7702 066426

7703 066444
7704 066452

066452
066454
066456
066460

7705 066462
7706 066470

7707 066476
7708 066502
7709 066506

7710 066512

012737

005737
001014
005301

001373

017737

012737
104457
004561
006072
003500

042777
012737

005737

001012
017737

012737

000010
000002

100056

000010
00000t

002376

113570

100040

Dees

MOV
MOV

VIADD,RO
RO, BUF AB

SGET START ADDRESS OF BUFFER A
SLOAD START ADDRESS OF BUFFER A

(LR
MOV
MOvVB
INC
DEC
BNE
MOV
MOV

CLRB

PC.PVCON

#10000,R1

R3
#1,5R0
R3,(RO)+
R3
R
16
#10000,R1
RO,BUFBB

(RO)+

DEC
BNE
BIS
CLR

R1
208
#10,3CSRX
SRO

MOV
ADD
MOV

DPAT.R1
#40,R1
R1,MLAY

MOVE

#212,31CRHX

MOVB
JSR

MLA1,alDRHX
PC,LOOP

113752

MOV
NEG
MOV

BCINP,RSAVE
RSAVE
RSAVE ,aBCRX

113732

BIC

#10,3CSRX

113722
113710

MOV
MOV

RSAVE , 3BCRX
#1461, 3CSRX

CLR

113740

MOV

113726

MOV

SETPRI

aBARX

#1647, 3CSRX

#10000, aBARX
#PRIOO

113674

BIS

#10,3C5RX

113650

MOVB
MOV

#13,a31CRHX
077077 R

002374

002400

113636

16%:

114032

002410
011060
113770

#2,PHHIGH

JSR

20%:

114010

7689 066340

7688 066332

177572

000212

7685 066312
7686 066320
7687 066324

MOV

010000
002360

113777
004737
005077
013737
005437
013777

7684 066306

002334

010000

7665
7666
7667
7668
7669
7670
7671
7672

7673 066232

005003
012737
110320
005203
005301
001374
012701
010037

007724

MOV

23%:

002502

002500

113610

002374

002502

002500

BNE
DEC
BNE
MOV

*LOAD COUNTER FOR 2K

*R3 CONTAINS
P e*ENABLE MEMORY MANAGEMENT
e
:LOAD BUFFER WITH DATA
‘CREAT NEXT DATA
:
:
*LOAD 2K
‘LOAD START ADDRESS OF BUFFER B

:CLEAR BUFFER B

12K CLEARED
‘IF YES,DO THE TEST
TSELECT CHANNEL o
taeD]SABLE MEMORY MANAGEMENT®+

t====L0AD TON INTO ACR Q=-=ceeeeccccce
‘CREATE MLA1
..
:STORE MLA1

t====LOAD MLA1 INTO DOR 2--==eececcecs
‘WAIT A LITTLE

1===LOAD START ADDRESS OF BUFFER A====

‘STORE BYTE COUNT INPUT
‘BILD 2'COMPL FOR BCR
teee=LOAD INPUT INTO B(R lesccecccecs

1-DMA ENB,DMA DIR,INT ENB.BA 17,SYS (
SSELECT CHANNEL 1

1====LOAD START ADDRESS OF BUFFER B--1e===L0AD INPUT INTO BCR 1===
1e===SET DMA ENB,INT ENB,BIT17 IN CSR1

*SET PRIORITY TO ZERO
:SELECT CHANNEL 2

‘LOAD CHANNEL NUMBER

INTFC2

YIS INTERRUPT IN CHANNEL 2 OCCER
‘BRANCH IF YES
‘DECREMENT COUNTER

248
R1
238
aCSRX,BAD

“1F NO,TEST AGIN

*GET CSR2 CONTENTS

*BC OF ,MUX.DMA DIR,BA 17,SYS CONT
*ERRORHANDLER

#10,3CSRX
#1,CHAN

;SELECT CHANNEL 1
‘LOAD CHANNEL NUMBER

BNE
MOV

25%
aCSRX,BAD

*BRANCH IF YES
PGET €S&1 CONTENTS

MOV

INfFCY

#1000£0,6000

#Pr.100,R0
($SPRI

1ee=cl OAD GTS INTO ACR 2===ceccececema*LOAD LOOP COUNTER

BIC
MOV

MOV
TREAP

¥z, CHAN

MOV
#100056,6000
ERRSOFT 2417,62%2.ERR201

24%:

‘CREATE VIRTUAL ADDRESS

TRAP
WORD
WORD
"WORD

CSERSOFT
2417
E232
[RR201

*IS AN INTERRUPT IN CHANNEL 1 OCCURED
‘BC OF ,BA 17 SHOULD BE SET

€16

SEQ 197

T 2618,E232,ERR2CY
ERRSOF

NONNNOWIN
NN
=2 YOO N

8
NN NN O
O ~N~NININUW L
WO WWOOOW
WAANNNNO
O 8~ 8

O NNNSNNOWVIES
WIANOQO OWOWOR W

25%:
ONOOO
& &~

PONINONI NNON
(U TV TV IV LV VLV, ]

QOO0
=0 —
OOOO—=O—

000010
000002

QOOO
—
W

000340

TRAP
.WORD

002502

#PR107

:NO FURTHER INTERRUPT ALLOWED

BIS

#10,8CSRX
#2, CHAN

sSELECT CHANNEL 2

MOV
MovB

MOV
ADD
MOV
(mp
BEQ

30%:

NNOOCO SO

LSS
N TN, N N1V
[V LV IV LV IV IV P
elelelels
i ug

alelelelele
COO0O0O0O—

O=O =000
O=O0O0000O
AINNVONOO
WA
OWO O
OO SO0
—
ONroooOo—-0

002500

31%:

014,31 CRHX

PHLOW, GOOD

BCINP,GO0D
aBARX .BAD
BAD,GOOD

30%

MOV

CLR
cMp
BEQ
ERRSOFT

BIC

MoV
MOV

8IC

ADD
MoV

cMP
BEOQ

@BCRX,BAD
6LID
BAL ,GOOD
3 1%

2620,0235,ERRS01

#10,3CSRX

#1,(HAN

BUF BB, GOOD

#160000, 6000

8CINP,GOOD
aBARX .BAD
GOOD
, BAD
40%

ERRSOFT 2421 ,E234,ERRSOY

113340

002502

40%:

MOV
1ST

8E0Q
CLR

002500

aBCRX,BAD
BAD

6000

ERRSOF1 2622 ,€235,ERRSCY

177572

43%:

MOV
MOV

MOV

44%:

WORD

SETPRI

T 2619,E234 ,ERRS0Y
ERRSOF

SNSNNNVOWSN

= N NWWNWNNININO
&
S NNNNNNNNNVWNE
O WWWWWWNO
WOV

S NNNNNNNNVSES
N

[=leleleleleled
ONO—=OO00O
=B NN NN O S B

O000O0O0O00O0O0O0—
ON=OIHR=2=2r0000
O0OOOOO—~
OOO0—000O0

7743
7744
7745

OCO0O0OO0OOOO~
O =2t = O000

77461

;ERROR HANDLER

.WORD

BNONNMNIWE
OWWWOOOWY

S NNNNNSNN—-O

ONoUN

[elolelelel Jolel
JoliNeloele
ON =Nt
2 NO =
OO0
el Ve B LTV A ST ST NPl SRV Te B o o
S NNNSNSNSNSNESSN
OV
OWUWHWWNNWNGS
O
O~NOMW

HARDWARE TESTS
MACRO M1113
06-SEP=-B2 16:46
PAGE 66-9
TEST 24: DMA DATA TRANSFER TEST FROM (HANNEL 2 TO 1

CLR
INC

#1,S5R0
BUF AB,R1

BUFBB,R2
(N
(N

MOV
TRAP

sLOAD CHANNEL NUMSER
..... LOAD

TCA

INTO

ACR

‘SET UP COMPARE VALUE

;GET BAR2 (ONTENTS
sHAS BAR2

THE

sBRANCH [F YES
;CRROR HANDLER

CORRECT ADDRESS

sGET BCR2 CONTENTS

TRAP

.WORD
.WORD
.WORD

11S BCR2 ZERO

;BRANCH JF YES
*ERROR MANDLER

JSELECT CHANNEL 1
;LOAD CHANNEL NUMBER
:SET UP COMPARE VALUE
:CLEAR BIT 13+14+15
;GET BAR1 CONTENTS

;HAS BAR1 THE CORRECT
sBRANCH IF YES
sERROR HANDLER

TRAP

.WORD
.WORD
.WORD

ADDRESS
TRAP

.WORD
-WORD
.WORD

sGET BCR1 CONTENTS
:BCRY1 CONTENTS SHOULD BE ZERO

sBRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE

cERROR HANDLER

TRAP

.WORD
.WORD
.WORD
Jo~ENABLE M E M ORY MANAGEMENTee
;PROVIDE 3 l R S T BYTE OF BUFFER A
:PROVIDE f | R S T BYTE OF BUFFER B
;CLEAR BU F f 3 R COUNTER

D 16

067200
067200
067202

(R1)+,(R2)*
L6%
6009
BAD
#2,TXADRM

(MPB
BEO
CLR
(LR

(29T

Fo o
NN

OQOMNININ
OSSO

#2 ,RXADRH
R1, TXADRL
TXADRL
#160000, TXADRL
DRL ,RXADRL
Rl

ERRSOFT

000001
002404

177572

002240

46%:

002322
002322

002320

063322

ExXQv2s:

000,RXADRL
R1),600D
R

MOV
(Mp
BNE

#1,S5R0

1ST

Qvp

(NT1,BCINP

449

CLR

177572

002234

LI
NN IR

non

QO
(o]]

[elelelele]
OOOO0O

TO 1

SRO

ExXQV24

BNE
INC
CMP
BEQ
JMP
ExIT

[TRCNY
1 TROEF
ITRCNT

EXQV24

1TAC24

TSt

¢BUFFER A EQUAL BUFFER B
¢1F _YES CONTINUE
;CLEAR GOOD

:CLEAR BAD

;X ADDRESS
¢RX_ADDRESS

IS OVER 64X
IS OVER 64K

:GET ADDRESS OVER 64K

*CLEAR PAR INFORMATION

¢GENERATE RX ADDRESS FROM TX ADDRESS
IS TX ADDRESS + 2K
;SET UP DATA FOR ERROR MESSAGE
sRX_ADRRES

e
1esDISABLE MEMORY MANAGEMENT
sERROR HANDLER

TRAP

.WORD
-WORD
.WORD

T
s**ENABLE MEMORY MANAGEMENe+

¢ALL BYTES COMPARED ?
:IF NO, GET NEXT ONE

s**D]SABLE MEMORY MANAGEMENTt+
;1S QUICK VERIFY PASS SELECTED
JIF YES EXIT TEST
;INCREMENT COUNTER
JALL DONE
;BRANCH [F YES
JIF NO TEST [TERATION
JEXIT TEST

TRAP

104401

TSHD24:

BEX

é%i?lkDHA DATA TRANSFER TEST FROM CHANNEL 2 TO 1IN/

-—

062

NGZ =N

123

g —t

+WORD

067204
067266
067266
067266

ZMrr>»2Z

067174

FROM (MANNEL

O CoaiNr
-t PN
Y e

067164
067172

TEST

SEQ 198

PAGE 66-10

NORNINVNOND
NS B

067022

06-SEP-82 16:46

-tk 2 OO
OO OOOO
NNN=-=OOPOOOO0OO
NNNONONINOO
NN
WNINNO
SO MO0 WVWN
NNNOWOWWO
O OO
N NNOOOoOONNNO

7746 067016
174 7 067020

NNNNNNNNNNNNON

DMA DATA TRANSFER

N NNONNNNNSONNN

24:

MACRO M1113
O—=2—-0000000000—
O=NaLO=2==000N
WO O NN
O NN
=)

TEST

TESTS

OCOO0O0O0O0O0O0O
=
OOOON=2000Q
WA =2 \A N = WWROIWWWN
S 8

HARDWARE

L10055:

T RAP

CSETST

Sea 199

HARDWARE TESTS MACRO M1113 Qf-SEP- 82 16:46 PAGE 67

TEST 25: MCR FUNCTION TEST OF

CMANNEL
1

7779

CSBTTL

TEST 25: MCR FUNCTION TEST OF CHANNEL 1

7780

"""0'Q't""""t't"'""t't"'t"'"'"'Qt"t"'t"t""'""Qt""'.'t'

7781
7782

PART

7784

;

7783

7785

gEX - TEST 25
TRANSMITS 9 DATA BYTES (SO)AND THAN
A PREDEFXNED QUANTITY (MC INPUT)QF SUCCESSIVE EOS CHARACTERS
C(HANNEL

VIA THE JEC/IEEE BUS TG CHANNEL 2.
THE DMA DATA TRANSFER

AFTER RECEIVING THESE CHARACTERS

IS TERMINATED BY CHANNEL 2 (COMP END).

7786
7787

PART 2 SAME AS PART 1 EXCEPT THAT A WRONG QUANTITY OF SUCCESSIVE
:
(HARACTERS ARE TRANSMITTED BEFORE THE CORRECT QUANTITY OF

7789

7788

7790

7791

EOS C(HARACTERS ARE
1.8

TRANSMITTED

2 EOS CHAR,.(25),1

(177)

DATA BYTE

(50)THAN THE

EOS
SUCCESSIVE

PREDEF INED EOS (MHAR.(25)

.'t"'tt""""""'t"""'t""ttt't"'t"'"t'Q'"'t"t""t"""t"""'

067270

BGNTST

7792 067270
7793 0672764
7794 067276

005737
001410

002324

070742
000CO1

7795 067316
7796 067322
7797 067326

012746
012746
010600
104417
062706

005037
004737

067326

067332

012746

067336
067342
067346
067350

012746

000340

013746
012746
104437
062706

002246
000003
000010

012746

000340

013746
012746
104437
062706
112777

002244
000003

067276
067302
067306
067310
067312

7798 067354
067354

067360

067364
067370
067374
067376
7799 067402

012746

7800 067410
7801 067414
7802 067420

013701
062701
010137

7804 067432

004737

7803 067424

7805 067436

7806 067444
7807 067450

7808 067456
7809 067464
7810 067472

7811 067500
7812 067506

7813 067514

7814 067520
7815 067526
7816 067532

7817 067540

113777

042777

005077
113777

052777
052777

012777

013737
062737

005437
013777
005437
012777

000004

002322
010710

7%:
JITAC2S5:

TZS::

1ST
BEQ
PRINTF

PNTF
7%
#TSHDZ2S

;1S THE PNT FLAG SET
.IF YES PRINT THE TEST HEADER
S

(LR
JSR
SETVEC

JTRCNT
PC,BGINZ
VECC2,#INTSC2,#PR]IO7

JCLEAR JTERATION COUNTER
JSET UP PARAMETER
sSET VECTOR FOR CHANNEL 2

010152

SETVEC

VECCY,#INTSCY,#PR]O7

112660

MOVB

#212,81CRHX

002410

112644

MOVB

HLA1 a3 |DRHX

000010

112634

112636
002236

100177
000010

112632

MOV
ADD
MOV

JSR

8I(C

#PR107 ,=-(SP)

MOV
MOV
TRAP
ADD

VECC2, -(SP)
#3.‘(SP)
CSSVEC
#10,SP

1
MOV

MOV
ADD

002402
002402
000107

112556
112540

JWAIT A LITTLE

NEG

MOV
NEG
MOV

BGNSEG

STORE MLA

;----LOAD MLA1

#16 a(SRX

CIABF.SBARX

002402
002402

112602

PC,LO0P

MOV

002236
000011

#INTSCT,=(SP)

INTO DOR 2==~=e~ceccc===

;CLEAR THE MATCH CHARACTER REGISTER
'°'°LOAD CNT INPUT INTO MCR HIGH BYTE~

;=== ENB MATCH BT +EOS (177)IN MCR1-~
SELECT CHANNEL
‘--'LOAD START ADDRESS OF

MCINP,RSAVE
#11,RSAVE

RSAVE aBCRXY
RSAVE
#107,3CSRX

#PR107,-(SP)

JSELECT CHANNEL 1

0100177 aMCRX
Mo, aCSRX
RSAVE

#INTSCS,=(SP)

MOV
VECC1,=(SP)
MOV
#3,-(SP)
TRAP
CS$SVEC
ADD
#10,5P
ee=e- LOAD TON INTO A(R 2==vvccccccc=ee

CREATE MLA1

EHCRX
MCINP aMCRHX

8IS
BIS

002402

sSET VECTOR FOR CHANNEL

DPA1 R1
840 ,R1
R1 MLAY

(LR
MOVB

112622
112606

002734

MOV

000010
0002°2

011060

#TSHD25,-(SP)
#1,=-(SP)
SP,RO
CSPNTF
#4,SP

MOV

010142

002312
000040
002410

MOV
MOV
MOV
TRAP
ADD

TABLE f

:STORE MATCH CHARACTER COUNT [NPUT
cADD 11(OCTAL) DATA BYTES TO INPUT

JBILD 2°COMPL FOR B(R

===~

ee== LOAD INPUT¢DATA BYTES INTO BCR 2REBUILD INPUT ¢+ DATA FOR COUNTER
eee- DMA ENB,DMA DIR,INT ENB [N (SRZ--

HARDWARE TESTS MACRO M1113 06-SEP=-B2 16:46 PAGE 67-1
TEST

25:

7818
7819
7820
7821
7822
7823
7824
7825
7826

MCR FUNCTION TEST

067540

104404

(HANNEL

0675642
067546
067552
067560
067564
067570
067572
0675764
067576

005037
005037
0462777
012700
012701
105021
105300
001375
012777

002400
002376
000010
000110
002624

112520

002624

7828 067612

012777

000101

067620
067626

012700
104441

000000

7832 067642
7833 067650

112777
012701

000013
077777

7827 067606

7829 067620

7830 067626
7831 067636

012777

177667

052777
012737

000010
000002

7834 067654

005737

002400

7837 067664
7838 067666

001373
017737

7835 067660
7836 067662

7839 067674
7840 067702

001015
005301

012737

067702
067704
067706
067710

104457
004705
006072
003500

067712

104406

7841 067712

7842 067716

005737

002376

7845 067734
7846 067736

001013
017737

012737

067752
067754
067756
067760
7849 067762
067762

104457
004706
006072
003500

067764
067770

012700
106441

7850 067764

7851 067772
7852 067776

000001

112336

020000

000340

012701
012702

002734
002624

005237

002404

7853 070002 005037 002406
7854 070006

7855 070012
7856 070014
7857 070016
7858 070022
7859 070026

122122
001431
005037
005037
005037

002500
002502

002426

TRAP

112476

CLR
(LR
BIC
MOV
MOV
CLRB
DECB
BNE
MOV

INTFC2
INTFCI
#10,3CSRX
#72. R0
#TABE R
(R1)+
RO
28
#TABE , aBARX

;CLEAR INTERRUPT FLAG
*CLEAR INTERRUPT FLAG
SSELECT CHANNEL 1
‘CLEAR BUFFER TABE
..
:
;
o
12c=-L0OAD START ADDRESS OF

112460

MOV

#101,3CSRX

tee==SET DMA ENB,INT ENB IN CSRI

2%:

112472

MOV

SETPR]I

112444
002374

8ls
MOV

112420
138

MovB
MOV
ST

BNE
OEC

BNE
MOV

002502

002500

2177667 .aBCRX

#PRI0OO

#10,aCSRX
#2, CHAN

#1%.alCRWX
077877,/

112356

1~1rc2

138
3CSRX,BAD

MOV
#100016,600D
ERRSOFT 2501,€252.ERR201

002374

10%:

002500

308 :

TABLE fanes

INTO BCR 1-=-

MOV
TRAP

sSELECT CHANNEL 2
1LOAD CHANNEL NUMBER

#PR100,R0
($SPRI

eaa- LOAD GTS INTO ACR 2==e=meeeeceee*LOAD LOOP COUNTER
*IS INTERRUPT

IN CHANNEL 2 OCCER

*BRANCH IF YES
‘DECREMENT COUNTER

*1F COUNTER NO ZERO,TEST AGIN
*GET CSR2 CONTENTS

*BC OF ,CMA DIR,MUX,SYS CONT SHOULD SET
*ERROR HANDLER

:BRANCH TO BGNSEG IF

TRAP
WORD
‘WORD
.WORD

C(SERSOFT
2501
E232
ERR201

TRAP

CS$CLPI

ERRLOOP IS SET

#10,3CSRX

:SELECT CHANNEL 1

INTFCI

1IS AN INTERRUPT IN (HANNEL 1 OCCURED

MOV

#1,CHAN

11%
2CSRX, BAD

MOV
#20000, 600D
ERRSOFT 2502,E232,ERR201

11$:

($BSEG

BIC

BNE
MOV

002502

eee= DAD

SSET PRIORITY TO 2ERO

108
R1

CKLOOP

104406

Sea 200

CKLOOP

000010

012737

7847 067744
7848 067752

100016

042777

7843 067722

7844 067730

112406

*LOAD CHANNEL NUMBER

*BRANCH IF YES
*GET CSR1 CONTENTS

1COMP END SHOULD BE SET
‘ERROR HANDLER

TRAP
.WORD
WORD
.WORD
:BRANCH TO BGNSEG IF ERRLOOP IS
TRAP

SETPRI

#PR107

MOV
MOV

#TABF ,R1
#TABE ,R2

:PROVIDE FIRST BYTE OF BUFFER F
*PROVIDE FIRST BYTE OF BUFFER E

INC

CNTY

‘BYTE COUNT

CLR

(MPB
BEQ
CLR
CLR
(LR

C(NTY

(R1)+,(R2)+
338
600D
BAD
TXADRH

:NO FURTHER INTERRUPT ALLOWED

MOV
TRAP

*CLEAR BUFFER COUNTER

‘BUFFER F EQUAL TO BUFFER E
*1F YES, CONTINUE
*CLEAR GOOD
*CLEAR BAD
“SET UP DATA FOR ERROR MESSAGE

CSERSOFT
2502
E232
ERR201
SET
CSCLPI

#PR107.R0O
($SPRI

G 16

HARDWARE TESTS MACRO M1113 06-SEP-82 16:46 PAGE 67=2
TEST

25:

7860
7861
7862
7863
7864
7865
7866
7867

MCR FUNCTION TEST OF

070032
070036
070062
070046
070052
070056
070062
070066

010137
005337
005037
o1o§37
005337
114137
114237

070066
070070
070072
070074

104457
004707
005726
003744

070076

104406

7868 070076

7869 070100
7870 070106
7871 070110

070110
070110

7872 070112

7873 070120
;g;g 070126

023737
001337

104405

012777

112777
017737

CHANNEL

002430
002430
002422
002424
002404
002500
002502

MOV
DEC
(LR
MOV
DEC
MOVB
MOVB
ERRSOFT

002404

000010

000014
112140

(02402

33$:

112160

112142
002502

CNT1,RSAVE
3ng

MOV

#10,3CSRX

MOVB
MOV
D

7882
7883
7884
7885

7886
7887
7888
7889
7890
7891
7892
7893
789¢
7895
7896
7897
7898

070162
070170
070176
070206

070212
070216
070224
070230
070236

070236

000002
1'2140
002236

112134

0£2777
012777
013737
062737

000010
003250
002236
000003

112110
112104
002402
002402

005437
013777
005437

012777

104404

100025

002402
002402
002402
000107

112136

112124

005037
005037
042777
012700
012701
105021
105300
001375

002400
002376
000010
000102
003146

112022

7900 070302

012777

003146

112000

012777
052777
012737

177675

000101
000010
000002

111762
111754
002374

070332
070336

012700
106441

000000

7906 070346

012701

007777

7901
7902
7903
7904

€70316
070316
070324
070332

7905 070340

112777

000013

111:74

111722

TRAP

;ALL BYTES COMPARED ?
SIF NOT, GET NEXT ONE

;SELECT CHA.

#14.3]CRHX
aIDRX,BAD
T

e DL

TRAP

,CLR ALL BIT

IS SET

($CLPI

CSESEG

IN CHA.1

t=ec<0AD TCA INTO ACR 2====evccccces=
*READ DIR2 REG. FOR CLEAR ACCRQ SIGNAL
T

T T

THE FALSE NUMBER OF
IO

T T

L L L L

L T T

EOS CHARACTERS
et

L L L EE

L2t

e L

DL LD

sSELECT CHANNEL 1,SET SYS CON.IN CHA.2
:CLEAR MCR1 REGISTER
ie<eel0AD CNT INPUT INTO MCR l=ecece--

BIS
MOV
MOV
ADD

#10,3CSRX
#TABK , 3BARX
MCINP,RSAVE
#3 RSAVE

SSELECT CHANNEL 2
:=<<LOAD START ADDRESS OF BUFFER K====
:STORE MATCH CHARACTER CNT INPUT
:ADD 3 DATA BYTES TO CNT INPUT

#100025,3MCRX

;===<ENB MATCH ¢ EOS CHARACTER (25))

RSAVE
RSAVE ,@BCRX
RSAVE
#107,aCSRX

‘BILD 2°'COMPL FOR BCR
1==<LOAD BYTE COUNT REGISTER===cecco==*REBUILD INPUT+ DATA FOR COUNTER CNT1
i=<<DMA ENB,DMA DIR,INT ENB,SYS CON

CLR
CLR
BIC
MOV
MOV
CLRB
DECB
BNE

INTFC2
INTFCI
#10,aCSRX
#66. R0
#TABH,R1
(R1)+
RO
348

:CLEAR INTERRUPT FLAG
‘CLEAR INTERRUPT FLAG
SSELECT CHANNEL 1
:CLEAR BUFFER TABH
F
:
Pees
Pees

MOV

2177675 ,3BCRX

;=== 0AD MAX. TRANSFER INTO B(R 1---

MOV
BGNSEG

748

ERRLOOP

(SERSOFT
2503
E250
ERR231

#2,3CSRX
aMCRX
MCINP,aMCRHX

NEG
MOV
NEG

112042

TRAP
WORD
.WORD
.WORD

MOV
CLR
MOVB

BIS

112060

070240
070244
070250
070256
070262
070266
070270
070272

7899 070274

:
;.
L
[
SSET UP DATA FOR ERROR MESSAGE
S
:ERROR HANDLER

10000$:

T T

RIS

012777
005077
113777

052777

;BRANCH TO BGNSEG IF

CMP
BNE
ENDSEG

SPART 2 CHECK

7881 070154

R1, TXADRL
TXADRL
RXADRH
R2,RXADRL
RXADRL
-(R1),G00D
=(R2).BAD
2503,E250,ERR231

CKLOOP

;g;g

7878 07013¢
7879 070142
7880 070146

MOV

MOV
BIS
MOV
SETPR!

MOVB

MOV

#TABH,aBARX
#101,3CSRX
#10,3CSRX
#2,CHAN
#PRIOO

#13, 31 (RHX

07777 .81

TRAP

($BSEG

ie==LOAD START ADDRESS OF BUFFER H==:==<SET DMA ENB,INT ENB IN CSR1SSELECT CHANNEL 2
:LOAD CHANNEL NUMBER
*SET PRI. TO ZERO (ALLOW INTERRUPT)

MOV
TRAP

#PR100,RO
C$SPRI

;===LOAD GTS INTO A(R 2===ccccccaece=

1L0AD COUNTER

£Q

201

H 16
M1113
06-SEP=82 16:46
TEST OF CHANNEL 1

HARDWARE
TEST 25:

7907
7908
7909
7910
7911
7912
7913

:1S INTERRU®PT IN CHANNEL 2 OCCUR

40%:

002400

sBRANCH IF

—
—

63%:

:8C Of ,DMA DIR,SYS CONT ,MUX SHOULD SET
sERROR HANDLER
T
CSERSOF
TRAP
2504
.WORD

000340

MOV
187

;LOAD CHANNEL NUMBER
;1S THERE AN INTERR. IN CHANNEL

MOV
MOV
T
ERRSOF

:GET CSR1 CONTENTS
;COMP END SHOULD BE SET

:BRANCH [F

sERROR HANDLER

SNNAINALHNWNIOO
WNNSLSNVOOOMNO

WVINOY

-\ S5

w WO

W~ B

104405

#PR107

sDISABLE INTERRUPTS

MOV

#TABK,R1
#TABH,R2

sPROVIDE

CNTY
(NT1

CLR
INC
CMPB
BEQ
CLR
CLR
CLR

600D
RAD
TXADRH

DEC
CLR

TXADRL
RXADRH

DEC

Movs
Move
T
ERRSOF

002402

63$%:

CMP
BNE
ENDSEG

1 ALSO

TRAP

CSERSOFT

TRAP

CSCLPT

2505
.WORD
E232
.WORD
ERR201
.WORD
¢BRANCH TO BGNSEG IF ERRLOOP IS SET

(R1)+,(R2)+

63%

R1, TXADRL

MOV
#PR107,RO
TRAP
C$SPRI
;PROVIDE FIRST BYTE OF BUFFER K
FIRST BYTE

BUFFER H

sCLEAR COUNTER
sBYTE COUNT
¢BUFFER K EQUAL BUFFER H
s1F _YES,CONTINUE
:CLEAR GOOD
s CLEAR BAD
:SET UP DATA FOR ERROR MESSAGE

R2,RXADRL

RXADRL
-1(R1),600D
-1(R2) ;BAD

2506 ,E250,ERR231

:SET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER
TRAP

T
CSERSOF

LWORD
LWORD

2506
E250

TRAP

CsCLPt

TRAP

(S$ESEG

ERRZ231
.WORD
:BRANCH TO BCNSEG IF ERRLOOP IS SET

CKLOOP

002404

VYES

SETPR]

MOV

00
02

CSCLP

JSELECT CHANNEL1

MoV

WSS
NNNES
£P0
= WN
SONUN

NNNNNSNNNNYN W

- OO0O0O00000O
NNOOOOOOO0O
NNNINININI NN
NN

OO WVIWVIOWMWNW =NV
N2WINVOW—=0O0O0
M —NO N
WHNANLNIN
NN AN NN NN WNWN O

==000000000
000
—==0-=200—-0000N0OO
=

60%:

TRAP

BIC

MOV

OO0~
OO0
Ot
ony O

~ NNN

o SO

NNNNNNNNN
S N NN S
S3o

W VAN

~ -~

=3 (={=lelele]

0000000000000

003250

E232

(kLoorp

cKLOOP
618

.WORD

ERRZ2O
.WORD
:BRANCH TO BGNSEG IF ERRLOOP IS SET

BNE

2
0

012701

TEST AGAIN

:GET CSR2 CONTENTS

b
—

O —b

;1F _NO,

ERRSOFT

7915
7916
7917
7918
7919
7920
7921

7942
7943
7944

YES

;1S TIME OVER

7914

7941

SEQ 202

PAGF 67-3

CNT1,RSAVE
60%

sALL BYTES COMPARED ?
s1F NO,GET NEXT ONE
10001%:

116

CRO M1113 06-SEP-82 16:46
ION T EST OF CHANNEL 1

7965 070742

045

I&xX-Tx

=
x
o
[
O
w
gVO0JOWDOADW0JUdEXE IW~Yw[ouvm]Oadaw FW-&YASIRyETS -2NVWONg—O+xa-=—20a aJOoWdgxd

20 GS PU —) wo

O QO—O0O=NOOOr—QeN

2]VO[o YVONNNo NNNN8Vo=N lANaaaNI[T

[NAOoSY OeGNUI=NOMI~OSVMN

SEQ 203

PAGE 67-4

Exaves: EXIT

x X [ X x »x

V)o=t

o>bl

[V
[¥¥] Y

BEX
/XS2XAMCR FUNCTION TEST OF

CHANNEL

13N/

L10056:

TRAP

(SETST

J 16
HARDWARE TESTS
MACRO M1113
06-SEP-82 16:46
TEST 26: M(R FUNCTICN TEST OF CHANNEL 2
7970
7971

7973
7974
7975
7976
7977
7978
7979

LSBTTL
R
:
sPART 1
:
.
:
;PART 2
:
:

7981

7972

7980

7982 071012

071012

005737
001410

002324

072474
000001

7986 071040
7987 071044
7988 071050

012746
012746
010600
104417
062706
005037
0064737

000004
002322

012746

000340

071060
071064
071070
071072

013746
012746
104437
062706

002246
000003

000010

071076

012746

000340

071106
071112
071116
071120
7990 071124
7991 071132

013746
0127646
104437
062706
112777
013701

002244
000003

7993 071142
7994 071146

010137
113777

7989 071076

7%:

010534

071050

071054

TEST 26: MCR FUNCTION TEST OF
R
R
R R R
R
[EX = TEST

JTAC26:

799 071154

7996 071160

7997 071166
7998 071172

7999 071200

8000 071206

1.E 2 E0S CHAR.(25),1
R

DATA BYTE

000010
000212

004737

002314
000040
002412
002412
011060

005077
113777

111114
002236

062701

052777

000010
100125

104404
005037

002400

8003 071220
8004 071226
8005 071234
8006 071242
8007 071250

042777
012777
013737
062737
005437

000010
002514
002236
000011
002402

005037

002376

;1S THE PNT FLAG SET
:1F YES, PRINT THE TEST HEADER
Jeen

CLR
JSR

JTRONT
PC,BGINT

:CLEAR ITERATICN COUNTER
;SET UP PARAMETER

SETVEC

VECC2,#INTSC2,#FRIO7

MOV
MOV
MoV
TRAP
ADD

;SET VECTOR FOR CHANNEL 2

VECC1,#INTSCY1,#PRIO7

111110

111100

111052
111046
002402
002402

MOVB
MOV
ADD
MoV
MOvVB
JSR

BIS

CLR
MovB

BIS

BGNSEC

#212,3]1CRHX

DPA2 R
#40,R1
R1,MLA?2
MLAZ,310RHX
PC LOOP

'16.3CSRX

aMCRX
MCINP , dMCRHX

'1001é5.aHCRX

il l

#TSHD26,-(SP)
#,=-(SP)
SP.RO
CSPNTF
#6,SP

MOV

#PRIO7 ,=-(SP)

MOV
MOV
TRAP
ADD

VECCZ2,=(SP)
#3,-(SP)

MOV

#PRI07,=(SP)

:SET YECTOR FOR CHANNEL 1

MOV

111112

126::

PNTF
7%
#TSHD?26

SETVEC

111122

TST
BEQ
PRINTF

MOV

111136

(S50)THAN THE PREDEFINED EOS rHAR,(25)

012746 0103152

071206
8001 071210
8002 071214

CHANNEL 1 TRANSMITS 9 DATA BYTES (SO)AND THAN
A PREDEFINED QUANTITY (MC INPUT)QF SUCCESSIVE EOS CHARACTERS (177)
VIA THE 1EC/IEEE BUS TO CHANNEL 2.
AFTER RECEIVING THESE gHARACTERS
THE DMA DATA TRANSFER IS TERMINATED BY (HANNEL 2 (COMP END).
SAME AS PART 1 EXCEPT THAT A WRONG QUANTITY OF SUCCESSIVE EOS
(HARACTERS ARE TRANSMITTED BEFORE THE CORRECT QUANTITY OF SUCCESSIVE
E0S C(HARACTERS ARE TRANSMITTED.

071102 012746 010142

7992 071136

CHANNEL 2
R R

BGNTST

7983 071012
7984 071016
7985 071020

071020
071024
071030
071032
071034

SEQ 204

PAGE 68

#INTSCS,=(SP)

CSSVEC
#10,5P

#INTSCT,=(SP)

MOV
VECC1,=-(SP)
MOV
#3,-(SP)
TRAP
CSSVEC
ADD
#10,SP
;===<L0AD TON INTO AC(R l===-ccccccccas
;CREATE MLA?2
Jeew

;STORE MLA?
;1====| OAD MLA2 INTO DOR l==ce=c=seccaa
SWAIT A LITTLE

sSELECT CHANNEL 2

:CLEAR MCR2 REGISTER
;===L0AD CNT INPUT INTO MCR HIGH BYTE~-

;=== ENB MATCH BIT +E0S (125)IN M(R2-~TRAP

($BSEG

CLR

INTFC?2

:CLEAR INTERRUPT FLAG

BIC
MOV
MOV
ADD
NEG

#10,3CSRX
#TABD ,aBARX
MCINP,RSAVE
#1171 ,RSAVE
RSAVE

:SELECT CHANNEL 1
;===L0AD START ADDRESS OF TABLE D ===:STORE MATCH CHARACTER (OUNT INPUT
JADD 11(OCTAL) DATA BYTES TO [NPUT
;BILD 2'COMPL FOR B(R

CLR

INTFCH

:CLEAR INTERRUPT FLAG

K 16

HARDWARE TESTS MACRO M1113 06-SEP-82 16:46
TEST 26: MCR FUNCTION TEST OF CHANNEL 2

SEQ 205

PAGE 68-1

8008 071254
8009 071262
8010 071266
8011 071276

013777 002402 111022
005437 002402
012777 000107 111004
052777 000010 110776

MOV
NEG
MOV
BIS

RSAVE , 3BCRX
RSAVE
#107,aCSRX
#10,3CSRX

;====LOAD [NPUT#DATA BYTES INTO BCR 1*REBUILD INPUT+DATA FOR COUNTER CNT1
te—==DMA ENB,DMA DIR,INT ENB.SYS CONT
*SELECT CHANNEL 2

8013 071306
8014 071312
8015 071314
8016 071316

002624

MOV
CLRB
DECB
BNE

#TABE R
(R1)+
RO
28

..
..
i,
.

8012 071302

8017 071320
8018 071326
8019 071334
8020 071342
071342
071346
8021 071350
8022 071356

012700

012701
105021
105300
001375

012777
012777
012777
012700
104441
042777
012737

002624
177667
000101
000000
000010
000001

2%:

001015
005301
001373
017737

071424
071426
071430
071432
8032 071434
071434
8033 0716436
8034 071444
8035 071452
8036 071456
8037 071460

1046457
005051
006072
003500
104406
052777
012737
005737
001013
017737

110664

138

002502

8038 071466
8039 071474
071474
071476
071500
971502
8040 071504
071506
8041 071506
071506
071512
8062 071514
8043 071520

8044 071526
8045 071530
8046 071534
8047 071536
8048 071540
8049 071544
8050 071550

012737
104457
005052
006072
003500
104406
012700
104441
012701
012702

005037
005237
122122
001433
005037
005037
005037

000010 11063
000002 002374

10$:

002400

002500
002502

002426

INTFCA

IS INTERRUPT IN CHANNEL 1 OCCER

BNE
DEC
BNE
MOV

#1%,31CRHX
07787781
10%
R1
13
ACSRX,BAD

CKLOOP
#10,3CSRX
BIS
#2,CHAN
MOV
INTFC2
ST

11$
2CSRX,BAD

#20016, 600D
MOV
ERRSOFT 2602,E432,ERR201

020010 002500

002404
002404

TSt

move
MOV

BNE
MOV

110614 002502

000340
002514
002624

#°0,3CSRX
¥\, CHAN

#100006 ,G00D
MOV
ERRSOFT 2601,E232,ERR201

8030 071416 012737 100006 002500
8031 071424

11%:

30%:

*CLEAR BUFFER TABE

BIC
MOV

#TABE ,aBARX
#177667,3BCRX
#1071 ,3CSRX

SETPRI #PRI00

110722
002374

8025 071376 005737 002376

#72.,R0

1222-LOAD START ADDRESS OF TABLE E=---INTO BCR 1===
t=e==L0AD
1e=-=SET DMA ENB,INT ENB IN CSR?
‘SET PRIORITY TO ZERO
#PR100,RO
MOV
C$SPRI
TRAP
1
SSELECT CHANNEL
*LOAD CHANNEL NUMBER

MOV
MOV
MOV

1107564
110750
110736

8023 071364 112777 000013 110676
8024 071372 012701 077777
8026 071402
8027 071404
8028 071406
8029 071410

MOV

000110

CKLOOP
SEIPRI #PRIO7
MOV
MOV
CLR
INC
(MPB
BEQ
CLR
(LR

CLR

#TABD,R1
#TABE .R2
CNT1
CNTY
(R1)+,(R2)+
338
600D
BAD

TXADRH

1<e==LOAD GTS INTO ACR l===cem=ee-a--*LOAD LOOP COUNTER
"BRANCH IF YES
*DECREMENT COUNTER
“IF NO,TEST AGIN
TGET CSRT CONTENTS

*BC OF ,DMA DIR,SYS CONT SHOULD BE SET
*ERROR HANDLER

(SERSOFT
TRAP
JWORD 2601
"WORD E232
"WORD ERR201
:BRANCH TO BGNSEG IF ERRLOOP 1S SET
(SCLP
TRAP
;SELECT CHANNEL 2
*LOAD CHANNEL NUMBER
*IS AN INTERRUPT IN CHANNEL 2 OCCURED
*BRANCH IF YES
*GET CSR2 CONTENTS

*COMP END.MUX SHOULD BE SET
*ERROR HANDLER
(SERSOF T
TRAP
LMORD 2602
"WORD E232
"WORD ERR201
:BRANCH TO BGNSEG IF ERRLOOP IS SET
CS$CLPI
TRAP
ALLOWED
T
:NO FURTHER INTERRUP
#PR107,RO
MOV
($SPRI
TRAP
D
BUFFER
OF
BYTE
FIRST
:PROVIDE
PROVIDE FIRST BYTE OF BUFFER E
*CLEAR BUFFER COUNTER
‘BYTE COUNT
*BUFFER D EQUAL T0 BUFFER E
“IF YES, CONTINUE
*CLEAR GOOD
*CLEAR BAD

*SET UP DATA FOR ERROR MESSAGE

L 16
M3

W —-—

=2t OOO00O
NNOOOOO

N SNAUNIRND
NN
NN SMNVOO

06-SEP-82 16:46

—==00000

CHANNEL 2

MOV

DEC
CLR

MOV

DEC

MovB
Movse

QOO

T
ERRSOF

NNNNW

33%:

(MP
BNE
ENDSEG

CLR
Movs

MOV

;

RXADRH

;

-1(R1),600D
-1(R2) 'BAD

*SET UP DATA FOR ERROR MESSAGE
..

TXADRL

2603,E231,ERR231

CNT1,RSAVE
30

TRAP

CSERSOFT

;ALL BYTES COMPARED ?
PIF NOT, GET NEXT ONE

CSCLPY

TRAP

CSESEG

3CSRX
#14,31 CRHX
a1DRX,BAD
aCSRX

SSELECT CHAN. 1 ,CLR ALL BIT IN CHA.?
1=<=<LOAD TCA INTO ACR T=-==eesem=ciae
‘READ DIR1 TO CLEAR ACCRQ SIGNAL
TCLEAR CSR1

#12,3CSRX
aMCRX
MCINP GMCRHX

sSET SYS CON IN CHA 1,SELECT CHANNEL 2
:CLEAR MCR2 REGISTER
s====L0AD CNT INPUT INTO M(CR 2

#10,3CSRX

SSELECT CHANNEL 1

#TABG, 3BARX
MCINP.RSAVE
#3,RSAVE
RSAVE

*ERROR WANDLER

10000$:

#1,CHAN

2603
.WORD
E231
"WORD
ERR231
"WORD
:BRAMCH TO BGNSEG IF ERRLOOP IS SET

#100012,aMCRX

te-== ENB MATCH + EOS CHARACTER (12)
‘LOAD CHANNEL NUMBER

tee=LOAD START ADDRESS Of BUFFER G===‘STORE MATCH CHARACTER CNT INPUT
‘ADD 3 DATA BYTES TO CNT INPUT
‘BILD 2'COMPL FOR BCR

110304

RSAVE ,@BCRX
RSAVE
#107,3CSRX

110264

INTFC2
INTFC1
#10,3CSRX

:CLEAR INTERRUPT FLAG
*CLEAR INTERRUPT FLAG
SSELECT CHANNEL 2

(R1)+

#TABH,aBARX

1ZZILOAD START ADDRESS OF BUFFER H==--

#101,3C SRX
#10,3CSRX

tee=SET DMA ENB,INT ENB IN (SR2======
PSELECT CHANNEL 1
*LOAD CHANNEL NUMBER

#66. R0
34%:
€
-

SNSNNNNNNTNNSNNNYNY

NNNNNVNWWONNNOOS

NSNS NNNNSNSNNON

NWNWWRWINWN
NN NSNS

WNNNNNONOONWWO
NNNNNVO
= = O NN £

(002402

OO0O—=
QOO =O—
O==00
NSNS
ONNO
SN
NWNNO

=O=OR==228 V20U
NUWIWNWNIN WNINNINO NN

OO0O0O00O0O0OO0O—-00

St e OOO=
= NOOO
MPORONIRLND
= NVARONDNOWNWNE
b

OO0 —==00000—

-0
oSHMN
&S~
SO

SNNNNNSNSN SNNNSNSNSNN
OOV NN

(elelalololelelelele
o l- o][elalelolelelelolelelelelo]le)

R1, TXADRL

(xLoopP

002404

SEQ 206

PAGE 68-2

RO
34$

2177645 ,3BCRX

MOV

SETPRI

#1, CHAN
#PRI00

te=a=LOAD BYTE COUNT REGISTER l=ee-ecee*REBUILD INPUT+DATA FOR COUNTER CNT1
‘=== DMA ENB,DMA DIR,INT ENB,SYS CONT
TRAP

($BSEG

*CLEAR BUFFER TABH
:
:o..

‘==-L0AD MAX. TRANSFER INTO B(R 2--sSET PRI. TO ZERO (ALLOW INTERRUPY)
MOV

TRAP

#PRI100,RO
($SPRI

8135
8136
8137

06-SEP82216146

(- NNEL

110164

SEQ 207

PAGE 68-3
Move

60%:

MOV

1ST
BNE
DEC
BNE

MOV
MOV

ERRSOFT

"3 a'(RNx

0787,

INTFCT'
43$

R1
40%
3CSRX . BAD

#190006,6060
2604 ,E252,ERR201

kLNOP

22
74

41%:

MOV
MOV

600D

ERRSOFT

32,.ERR201

C(KLOOP

000340
S NOWVWVOWMWAWN
=N
WNN
N WNIOW=OOON=ON
W
NANN A NN N AN W NN NN O
NNNNNNNNNNAN
NN

003044
003146
002404
002404

60%:

004500

#PR107

MOV
MOV

#TABG,R1
#TABH,
R?2

CLR
INC
(MPB
8EQ
(LR
CLR
CLR
DE(
CLR

002424
002424
002500
002502

MOV

DEC

MOVR
MOvVd

(NT1
CNTY
(R1)¢,(R2)+

633

600D
BAD
TXADRH
Ri,TXADRL

TXADRL
RXADRH
R2 ,RXADRL
RXADRL
=(R1),600D

=(R2),BAD

ERRSOFT 2606,E231 ,ERR? 3T

OOO0O0

(xLoopP

002404

002402

638:

(MP
BNE

ENDSEG

cBRANCH [F

YES

:1S TIME OVER

IF NO,

TEST AGAIN

sGET CSR1 CONTENTS

:BC OF ,DMA DIR,SYS (ONT,SHOULD BE SET
sERROR HANDLER
TRAP
(SERSOFT
+WORD
2604
-WORD
£232
.WORD
ERR201
;BRANCH TO BGNSEG [F ERRLOOP IS SET
TRAP
cscLPl

;BRANCH IF

VYES

< COMP END,MUX SHOULD BE SET
sERROR HANDLER

:DISABLE

INTERRUPTS

;PROVIDE

JCLEAR (

TRAP

T
CSERSOF

TRAP

(sCLPl

MOV
TRAP

#PR[07 ,RO

.WORD
.WORD
.WORD
ERRLOOP IS

BYTE OF BUFFER G
BYTE OF BUFFER H

:BUFFER G EQUAL BUFFER HW
c1F YES,CONTINUE
:CLEAR GOOD
;CLEAR BAD
SET UP DATA FOR ERROR MESSAGE

SEY

UP DATA FOR ERROR MESSAGE

.ERROR HANDLER

sBRANCH TO BGNSEG IF

CNT1,RSAVE
60%

[N (HANNEL 2 -

sGET CSR2 CONTENTS

:BRANCH TO BGNSEG

SETPRI

MOV

WOV
NOOS
8 =AW
SOONN

=2=0=00=0000NOO=—

==t OQOO0O0000O0OO=CO0O

012701

;===L0AD GTS INTO A(CR 1
sLOAD COUNTER
;1S INTERRUPT IN CHANNEL 1 OCCUR

sSELECT CHANNEL 2
;LOAD CHANNEL NUMBER
;1S THERE AN INTERRUPT

BIS

MOV
TST

BNE

=N
WNES
NG
NNG

813

MURURNLALNLAL
AL RLNJNINLALNIALALRLRLNIN L,RONLNINININIAINI NI NI NININI NI AL NL NNV ARV RV AN PR RN AL AL PV
NI AINJIAI N
AN AN AN N LN AN AN N AN A U AN AR AN ) O N DAL 0 AV ND A RO R NI AD NI N RO NI NO NI NI NI NI N e b cd b b d b o o cd o e md ed i o o b D
SSMNNNINININ = b s 2 2 O OO~ s NN
B 5 5 B NNWININ
= o O
£ B NMWNANN NINN)
= = OO NN O AN
SO
NNOO NN NNV
OO
NN SO0 NOOCCONO OO SO
ONOON SO

—

i
o

ol o

d e

o Jo 20 -Jo -To To -To -To To Yo Yo To Yo Jo To Yo To.)

WA ANUAINIAND PO NN NI NI NI N b — —
W) =2 OO0 NOWVE WL =20 000~V

—

8115

(elelalelaleolelelelalelalelnlalelelolelololelololelololelolololololololelelolalplelaloleololalolelololel
ol =]o 3
NNNNNNNNNNNNNNNNNNNNSNSNNNNNNNNNSNNSNNNNNNY NNNSNNNNNNSNSNNNN

—-

—

00 0o 0D O OO 00 00

-l d ol o b O
BN
=2OC ®

8098 072076
8099 072

-t

MCR FUNCT]

OO0

26:

MA(

ONGD

TEST

TESTS

QO
—=

HARUWARE

sALL BYTES C(OMPARED ?
sIF NO,GET NEXT ONE

TRAP

.WORD
.WORD
.WORD
ERRLOOP [S
TRAP

(S$SPRI

HARDWARE TESTS MA(CRO M1113
06-SEP=32 16:46
TEST 26: MCR FUNCTION TEST OF (HANNEL 2

072344
072344
8138 072366
8139 072354
8140 072362
8141 072370

104405
062777
112777
112777
004737

8143 072402
8146 072610
8145 072414
8146 0726416
8147 072422
81648 072430
8149 072432
8150 072440
8151 072646
8152 072452

112777
005737
001025
005237
023737
001417
012777
005077
112777
004737

8154 0726466
8159 072470
072470

000137

8162 072374

8153 072456

8156

072472

8157

112777

100018:

000010
QNOQ14
0uwud??
(11060

107726
107706
107706

000000
00223

107660

000200

17646

02322
002322

002320

000010
107634
000217
011072

000017

071050

107640
107616

107604

104432

BI¢
MOov8
MOVEB
JSR

#10,3(SRX
#146,8] CRHX
#77.81DRNX
PC,LOOP

TRAP
(SESEG
SSELECT CHANNEL 1
;===L0AD T(A INTQO A(R lecccccccccccas
‘ecaclOAD UNL INTO DOR lecececccecccaTWAIT A LITTLE

MOVB
<1
BNE
INC
(MP
BEQ
MCV
(LR
MOVB
JSR

#0.aiCRHX
ovP
EXOV26
[TRCNT
JTRCNT,ITRDEF
EXQV26
#10,3CSRX
3CSRX
#217,a1CRHX
PC WALT

*ee=LOAD NOT SWRST INTO A(R 1-ecccceceP1S QUICK VERIFY PAZS SELECTED ?
“IF YES EXIT TEST
“ITERATION COUNTER o1
:DEFAULT ITERATION EXECUTED
S1F YES EXIT TEST
“CLEAR CSR1,SELECT CHANNEL 2
SCLEAR CSR2.SELECT CHANNEL 1
teca=lOAD SIC INTO ACR lo=coeeceeSWAIT A LITTLE

movB

MOVB

JMP
ExQv2é: EXIT

#200,alCRHX

#17,817RHX
1TA( 26
1s7

1ee=LOAD SWRST INTO ACR le=sceecceemce-

1e===LOAD NOT SIC INTO A(R le=ce-“IF NO TEST ITERATICN

TRAP

000050

R158 072474

0u$

072562
072542

104407

8159
8160
8161 072542

SEQ 208

PAGE 68-4

123

062

NLIST

BEX

"LIST
"EVEN
ENDTST

BEX

TSHD26: .ASCIZ

(SEXIT

.WORD

L 10057~

TRAP

(SET1ST

/XS2YAMCR FUNCTION TEST OF (HANNEL 2%IN/

L10057:

HARDWARE TESTS
MACRO M1113
06-SEP-82 16:46
TeST 27: EXTENDED ADDRESS BIT (022-BUS)TES!

8163

LSBTTL

816‘0

SEQ 209

PAGE 69

TEST 27: EXTENDED ADDRESS BIT (022-BUS)TEST

"""."".""'"""""'l""""".""Q"""'"""""."Q."""

8165
8166
g}?g

1EX - TEST 27
THIS TEST IS ONLY BE CARRIED OUT IF A 22-BIT Q-BUS (11/238)1S USED
AND IF THE AVAILABLE MEMORY |S GREATER THAN 128«x.

8169
8170
8171
8172
8173

PARY 1
;
:
:
M

8176

o .'"""""."""""""""'.".'Q"."".".QQt"'."""""'.'.'..

B174
8175

FINDS OUT [F AVAILABLE MEMORY IS GREATER THAN 128k, IF YES, THEN
A DMA [§ cnaaxeo OUT BY SENDING 2K DATA VIA THE IEC/IEEE BUS
FROM CHANNEL1 TO 2.THE DMA CROSS THE BOUNDERY
THE SEQUENCE DESCRIBED ABOVE IS ALSO EXECUTED WiTH 276K (BA 19 St3),
512k (BA 20 SET) AND 1024K (BA 21 SET).

JPART 2 SAME AS PARTY 1 EXCEPT THME CHANNELS
.
IS CARRIED QUT FROM (CHANNEL 2 T0O
1

8177 072544
072544
8178 072544
072544
8179 072546

072546

8180 072550
8181 072554
8182 072556
072556
072562
072566
072570
072572
8183 072576
072576
072600
8184 072602
8185 072610
8186 072614
887 072616

BGNTST

103415

BCOMPLETE

005737
001410

002324

012746
012746
010600
104417
062706

076502
000001

104432
0026564
012737
005737
001410

000004

000004
002324

072616
072622
072626
072630
072632
8188 072636
072636

012746
012746
(10600
104417
062706

075406
006001

012746

000340

072646
072652
072656
072660
8189 072664
072664

013746
012746
104437
062706

002244
000003

072642

012746

127::
:DETERMINE BUS TYPE

READBUS

104407

002350

000004

072674
072700
072704
072706

013746
012746
104437
062706

002246
000003

8191

072716

012737

001000

8192 072724

005037

000010
002364

005037

002376

(SRDBU

B8CS

MOV
MOV
MCV
TRAP
ADD

#INFO3,-(SP)
8 ,-(5P)
SP.RO
CSPNITF
#4,5P

TRAP
.WORD

CSEXIT
L 10060-.

<15 THE PNT FLAG SET
JIF YES, PRINT MESSAGE
Pees

ExIT

181

JEXIT TEST

3$:

MOV
1T
BEQ
PRINTF

¥4, MASK
PNTF
7%
#TSHD27

;
P1S THE PNT FLAG SET
S1F YES, PRINT THE TEST HEADER
..

SETVEC

VECCY,#INTSC1,#PRIO7

MOV
MOV
MOV
TRAP
ADD
;SET VECTOR FOR (MANNEL 1
MOV

#TSHD27,-(SP)
#1.-(SP)
SP.RO
CSPNTF
#4,SP

MOV
MOV
TRAP
ADD
:SET VECTOR FOR CHANNEL 2
MOV

VECCT,=(SP)
#3,-(SP)
($SVEC
#10,5P

MOV

SETVEC

VECC2,#INTSC2.#PRIO7

072670 012746 010152

8190 072712

TRAP

PNTF
2%
®INFO3

7%:

000010

000340

:BRANCH IF Q-BUS

1St
B8EQ
PRINTF

010142

012746

THE DMA DATA TRANSFER

MOV

002366

(LR

MOV

1TAC27: (LR

CSRMS1

:LOAD MASK FOR (SR1

lNlF(‘

JCLEAR INTERRUPT FLAG

#1000, CSRMS?2

MoV
MOV
TRAP
ADD

#PRIO7,=(SP)

sINTSCE. -(sP)

#PRINZ = (SP)

BINTSCS,-(SP)
VEC(C?2,-(SP)
#3,-(SF)
($SVEC
#10,SP

*LOAD EXTENDED ADDR BIT FOR RX CHANNEL

HARDWARE TESTS
MACRC M1113
(06-SEP=-82 16:46
TEST 27: EXTENDED ADDRESS BIT (Q22-BJS)TES?T

8193 072730

005037

8195
8196
8197
8198
8199

0024064
003005
005737
001002

8194 072734

(72742
072744
072746
072752
072754

(023737

072756
072756
8200 072760

104432
002476
006737

8202 072766
8203 072774
8204 073000
8205 073002
8206 073006
8207 073012
£c08 073016

012737
013704
005304
010437
004737
013700
010037

8210 073026
8211 073030
8212 €73036
8213 073044

005003
012737
012737
110310

8201 072764

8209 073022

8214 073046

8215 073052
8216 073056

8217 073060

8218 073062
8219 073064
8220 073066

8221 073070
8222 073074

8223 073100
8224 073102
8225 073104
8226 073106
8227 073110
8228 073114

000240

012701

012700

005237
005203

002400

002342

012701
010037

000240

105020
005301
001374
005037
112777

118

010534
177777
002350

13%:
002336

002334
007724
002340
002356

010070

000020
000001

172516
177572

120000
168

208

013737
005437

002240
002402

002402

8240 073212

052777

000010

107060

8262 073226

013777

002402

8231 073132
8232 073136
8233 073146

8234 073150

8235 073156
B236 073164

0627061

010137
113777

012777

177777

107146

107132

107124

8237 073170 013777 002402
8238 073176 012777 000167
8239 073204 053777 002364

107106
107074
107066

8241 073220

107054

8243 073234

8244 073242
8245 073250

073250
073254

012777

007777

012777 000111
053777

002366

012700
1044641

000000

107050

107036
107030

:CLEAR INTERRUPT FLAG

11
138
PHLSIZ
13$
181

SIF NO SKIP TEST
;
;
;
TEXIT TEST

;1S THERE MORE THAN 128k

TRAP
.WORD

CSEXIT
L10060~-.

PC.BGINY

;

MOV
MOV
DEC
MOV
JSR
MOV
MOV

8177777 .PHLOM
MASK ,Ré
R4
R4 ,PHHIGH
PC,PVCON
VIADD,RO
RO ,BUF AB

;LOAD INPUT FOR CONVERSION ROUTINE
Peee
P
i
sCREATE VIRTUAL ADDRESS
SGET START ADDRESS OF BUFFER A
LOAD START ADDRESS OF BUFFER A

CLR
MOV
MOV
MOVB

R3
#20,5R3
#1,5R0
R3, (RO)

*R3 CONTAINS DATA
LeeENABLE 22-BIT MEMORY MANAGEMENT
e
‘eeENABLE MEMORY MANAGEMENT
¢+
JLOAD FJRST DATA BYTE

In‘
INC

MOVE
DEC
BNE
DEC

010000
002360

INTFC2

PHHS 17 ,MASK

JSR

NOP

MOV

172352

004737

8230 073126

013701

BLT
BGT
187
BNE
EX]T

MOV

177572
000212
002314
000040
002412
002412
011060

8229 073122

(mMP

00234

110320

005301
001374
005300

(LR

002350

SEQ 210

PAGE 69=1

MOV
MOV

NOP

#16000, R

01?0000.R0
KPARS
R3

R3,(RO)¢

R1
108
RO

#10000,R1
RO,BUFBB

*LOAD COUNTER FOR 2K

JSET UP ADDRESS FOR NEXT DATA BYTE

“LOAD NEXT PAGE
SCREATE NEXT DATA
‘LOAD BUFFER WITH DATA
:
:
:
SLOAD 2K
‘LOAD START ADDRESS OF BUFFER B

CLRB
DEC
BNE
(LR
MOVB
MOV
ADD
MOV
MOVB
JSR

(RO) +
R1
20%
SRO
#212,3] (RHX
DPA2.R1
#40,R1
R1,MLA2
MLA2,a]DRHX
PC,LOOP

MOV
NEG

BCINP,RSAVE
RSAVE

*STORE BYTE COUNT INPUT
;BUILD 2°'COMPL FOR BCR

#10,aCSRX

SSELECT CHANNEL 2

MOV

MOV
MOV
BIS

BIS

MOV

BIS
SETPR]

8197777 .3BARX

RSAVE ,@aBCRX
#167,3CSRX
CSRMST, aCSRYX
#7747, 3BARX

:CLEAR BUFFER B
12K CLEARED
“IF YES.DO THE TEST
teeD[SABLE MEMORY MANAGEMENT
¢+
t=ee=LOAD TON INTO ACR i==ce-cececcee-

‘CREATE MLA2
..

SSTORE MLA2
i====LOAD MLA2 INTO DOR leecceccceeaeTWAIT A LITTLE

1===LOAD START ADDRESS OF BUFFER A====-

1===<LOAD INPUT [NTO B(R lecoeceeeea;=DMA ENB,DMA DIR,INT £NB,SYS (0,BAYT6+17
1=<LOAD ADDITIONAL EXTENDET ADDRESS BIT
t=e=<LOAD START ADDRESS OF BUFFER B=--

RSAVE ,@B(RX

1===={OAD INPUT INTO BCR 2---

CSRMS2, aCSRX
#PR100

‘==L OAD EXTENDED ADDRESS BlTS=ecee==‘SET PRIORITY 10 ZERO

#1117, 3CSRX

‘—===SET DMA ENB,INT ENB IN C(SR?
MOV
TRAP

#PR100,RO
($SPR]

HARDWARE

TEST 27:

TESTS

MACRO TM11°3

EXTENDED ADDRESS BIT

oc-ssp-az

8246 073256
8247 073264

042777
012737

000010
000001

8249 073300

012701

077777

8248 073272

112777

8250
8251
8252
8253
8254
8255
8256

073304
073310
073312
073314
073316
073324
073332

005737
001017
005301
001373
017.37
512737
053737

8258
8259
8260
8261
8262
8263
8264

0733460
073342
073344
073346
073350
073356
073364
073370
073372
073400
073406

104457
005215
006072
03500
052777
012737
005737
001015
017737
012737
053737

073414
073616
073420
073422
8266 073424

104457
005216
006072
003500

8267
8268
8269
8270
8271
8272
8273
8274

042777
012737
112777
013737
063737
017737
023737
001404

8257 073340

8265 073414

073424
073630

073432
073440
073446
073454
073462
073470
073476
073504

8275 073506
073506
073510
973512
073514
8276 073516
8277 073524
8278 073530
8279 073536
8280 073540
073540
073542
073544
073546
8281 073550
8282 073556
8283 073564

8284 073572

012700
104441

000013

(022-BLS)TEST
107014
002374

106770

002376

106756
100066
002364

002502
002500
002500

106722
002374

106702
100010
002366

002502
002500
002500

24%:

017737
005037
023737
001404

104457
005220
006231
003702
052777
012737
013737

042737

#10,3CSRX
#1, CHAN

SSELECT CHANNEL 1
*LOAD CHANNEL NUMBER

MOV

877077 .R1

“LOAD LOOP COUNTER

187
BNE
DEC
BNE
MOV
MOV
BIS

015,31 CRHX
INTECT
248
R1
238
3CSRX,BAD
#100066,6000
CSRMS1,GOOD

106640
002374
1086164
002500
002500
002502
002500

002502

30%:

002500

160000

106522
002374
002500

002500

31%:

*ERROR HANDLER

#10,3(SRX
#2 . CHAN
INTFC2
25%
aCSRX,BAD
#100010,6000
(SRMS2,GOOD

:SEL.
CT CHANNEL 2
‘LOAD CHANNEL NUMBER
*HAS AN ;NTERRUPT [N CHANNEL 2 OCCURED
:BRANCH IF YES
SGET CSR2 CONTENTS
:BC OF ,MUX SHOULD BE SET
SSET EXTENDED ADDRESS BIT TO (SR (ON".

SETPR]

#PR]O7

TRAP
LMORD
.WORD
.WORD
:NO FURTHER INTERRUPT ALLOWED

CSERSOFT
2702
E232
ERR201

BIC
MOV
MOV
MUV
ADD
MOV
cMP
BEQ

#10,3CSRX
#1,CHAN
#14,
3] CRHX
PHL OW, GOOD
8CINP.GOOD
2BARX .BAD
BAD,GOOD
308

sSELECT CHANNEL 1
:LOAD CHANNEL NUMBER
ioe==LOAD TCA INTO ACR l==cccccccccc-SSET UP COMPARE VALUE
e
SGET BAR1 CONTENTS
:HAS BAR1 THE CORRECT ADDRESS
SBRANCH If VES

BIS
MOV
ST
BNE
MOV
MOV
BIS

MOV
CLR
(Mp
BEQ

aBCRX,BAD
G00D
BAD,GOOD
31¢

ERRSOFT 2704 ,E235,ERRS01

000010
000002
002360

*HAS INTERRUPT IN CHANNEL 1 OCCURED
*BRANCH [F YES
"DECREMENT COUNTER
SIF NO,TEST AGIN
SGET CSRT CONTENTS
:BC OF ,DMA DIR,SYS (ONT
SSET EXTENDED ADDRESS BIT TO CSR CONT.
(SERSOFT
2701
E232
ERR201

ERRSOFT 2703,E234.ERRSO1

106562
002500
002502

iee==0AD GTS INTO A(R lecececccccccaces

TRAP
LWORD
JWORD
JWORD

ERRSOFT 2702,E232.ERR20?

104457

005217
006200
003702

BIC
Ty,

ERRSOFT 2701.E832,ERR201

25%:

000340

SEQ 211

PAGE 69=2

MOVB

23$:

000010
000002
002400

000010
000001
(00014
002336
002240
106606
002502

16:46

8IS
MOV
MOV

BIC

#10,a( SRX
#2,CHAN
BUf BB, GOND

#160000, G000

‘ERROR HANDLER

MOV
TRAP

:ERROR HANDLER

:GET BCR1 CONTENTS
;
:1S BCR1 ZERO
*BRANCH IF YES

*ERROR HANDLER

SSELECT CHANNEL 2
SLOAD CHANNEL NUMBER
SSET UP COMPARE VALUE

SCLEAR BIT 13414415

TRAP

#PRI07,RO
C$SPR]

CSERSOFT

MORD
WORD
.WORD

2703
E234
ERRS01

TRAP
MWORD
LWORD
.WORD

CSERSOFT
2704
E235
ERRSO1

HARDWARE TESTS
MACRO M1113
(06-SEP-82 16:46
TEST 27: EXTENDED ADDRESS BIT (Q22-BUS)TEST

8285
8286
8287
8288
8289

063737
017737
023737
001404

2299
8291
8292
8293
8294
8295

073600
073606
073614
073622
073624
073624
073626
073630
073632
073634
073642
073646
073652
073654
073660

8297
8298
B299
8300
8301
8302
8303
8304
8305
8306

073670
073674
073700
073706
073710
073712
073714
073720
073724
073730

005237
013702
012737
120322
000240
001415
005037
005037
110337
013737

8296 073664

8307
8308
8309
8310
8311
8312
8313
8314
8315

8316
8317
8318
8319
8320
8321
8322
8323
8324
8325
8326
8327

83,8
8329
8330
8331
8352

073736
073744
073746
073752
073756
073756
073762
073766
073772

073776
074004
074012
074020
074026
074030
074036
074044
074050
074054
074062
074066
074066
074070
074072
0764074
074076
074106
074112
074114
074120

8333 074124

104457
005221
006200
003702
012737
005337
013701
111103
010137
004757

012701

013737
000425
005237
122122
001453
005037
005037
010137
004737

013737
013737
116137
010237
004737
013737
013737
005337
005337
116237
005037

104457
005222
006010
003744
012737
023737
001315
005037
005077

017737

002240
106470
002500

002500
002502
002502

000001
172352
002356

177572

43%:

002340
010024

120000

172352
002360
000001

002500
002502
002500
002334

002336

002406

002426
002430

000001
002404
177572
106154

106142

% ¥

002426
002430
002500

45%:

002422
002424
002502

177572
002240

002502

46$:

SEQ 212

69-3

ADD
MOV
(MP
BEQ
ERRSOFT

BCINP,GOOD
aBARX ,BAD
600D ,BAD
433
2705,E234,ERRSO1

MOV
DEC
MOV
MovB
MOV
JSR

#1,SR0
KPARS
BUFAB,R1
(R1) ,R3
R1,VIADD
PC,VPCON

Sees
;GET BAR2 CONTENTS
;HAS BARZ THE (ORRECT ADDRESS
¢BRANCH F YES
;ERROR MANDLER
TRAP
CSERSOFT
.WORD
2705
.WORD
E234
.WORD
ERR501
s**ENABLE MEMORY MANAGEMENT
-«
s CROSS THE BOUNDERY FOR FIRST BYTE
;PROVIDE FIRST BYTE OF BUFFER A
sGET THE FIRST DATA BYIE
sSET UP DATA FOR CONVERSION ROUTINE
sVIRTUAL TO PHYSICAL CONVERSION ROUTINE

INC
MOV
MOV
(MPB
NOP
8tQ
CLR
CLR
MOov8
MOV

KPARS
BUFBB,R?
#1,(NTY
R3,(R2)+

;CROSS THE BOUNDERY FOR NEXT DATA BYTE'S
sPROVIDE FIRST BYTE OF BUFFER B
sSET UP COUNTER FOR DATA (OMPARE
s COMPARE THE FIRST DATA BYTE

MOV
(mP
BNE
(LR
(LR

#1,SRO
CNT1,BCINP
443
SRO
a(SRX

MOV

002404
002500
002502
002340
010024
002334
002336
177777
002340
010024
00233¢
002336
002430
002424
177777
177572

PAGE

#1£0000,R1

443
600D
BAD
R3,G00D
PHHIGH, TXADRH
MOV
PHLOW, TXADRL
BR
45%
INC
(NTY
(MPB
(R1)+,(R2)+
8EQ
L6%
CLR
GOOoD
CLR
BAD
MOV
R1,ViADD
JSR
PC,VPCON
Mov
PHHIGH, TXADRH
MoV
PHLOW, TXADRL
Movs
=1(R1),600D
MOV
R2,VIADD
JSR
PC,VPCON
MOV
PHHIGH,RXADRH
MOV
PHLOW,RXADRL
DEC
TXADRL
DEC
RXADRL
MOVB
=1(R2) ,BAD
CLR
SRO
ERRSOFT 2706,E231,ERR231

MOV

a@1DRX,BAD

sPOINT TO NEXT LOCATION

¢BRANCH [F EQUAL TO NEXT COMPARE
;CLEAR HIGH BYTE OF GOOD
sCLEAR HIGH BYTE OF BAD
¢LOAD FIRST TX DATA FOR ERROR MESSAGES
sFIRST TX ADDRESS
;GET ADDRESS OVER 128K
sBRANCH TO ERROR REPORT
:
sBUFFER A EQUAL BUFFER B
;1F _YES CONTINUE
:CLEAR GOOD
;CLEAR BAD
:
;VIRTUAL TO PHYSICAL CONVERSION ROUTINE
:TX ADDRESS IS OVER 128K
HE
sLOAD TX DATA FOR ERROR MASSAGE
¢SET UP DATA FOR CONVERSION ROUTINE
¢VIRTUAL TO PHYSICAL CONVERSION ROUTINE
:RX ADDRESS IS OVER_128k
:GET ADDRESS OVER 128K
cees
:
;LOAD RX DATA FOR ERROR MESSAGE
s**D]SABLE MEMORY MANAGEMENT
=+
;ERROR HANDLER
TRAP
CSERSOF
T
.WORD
2706
.WORD
E231
LWORD
[RRZ31
s**ENABLE MEMORY MANAGEMENT
s«
¢ALL BYTES COMPARED ?
¢1F NO, GET NEXT ONE
;**D]SABLE _MEMORY MANAGEMENTe+
:CLEAR CSR2,SELECT CHANNEL 1

<READ DIR1 FOR CLEAR BO BIT

IN IIR

HARDWARE
TEST

27:

TESTS

MACRO M1113

EXTENDED ADDRFSS BIT

gggg 076132

005077

06-SEP-82 16:46
(022-BUS)TEST

106142

XYY

gg%g

SEQ 213

PAGE 69-4

(LR

aCSRX

YT Y Y

YT YT Y Y Y

YYYPT Y

:CLEAR CSRI1

YRS

;PART 2 DMA DATA TRANSFER FROM CHANNEL 2 T0 1
XXX

8338 074136
8339 074142
8340 074146
8341 074152
8342 074154
8343 074162
8344 074166
8345 074170
8346 076174
8347 074200
8348 074204

005037
005037
004737
000240
012737
013704
005304
010437
004737
013700
010037

8350
8351
8352
8353

005003
012737
012737
110310

8349 074210

074214
074216
074224
074232

8354 074236

8355 074240

8356 074244

012701

012700

005237

005203

8357 074246
8358 074250
8359 074252
8360 074254
8361 074256
8362 074262
8363 074266
8364 074270

110320
005301
001374
005300
012701
010037
000240
105020

8366 074274

001374

8365 074272

8367 074276
8368 074302
8369 074310
8370 074314
8371 074320
8372 074324
8373 074332

8374 G74336

8375 074344
8376 074352

8377 074356

8378 074364
8379 074372

8380 074400

8381 074406

8382 074414
8383 074422
8384 074430
8385 074436
074436
076442
8386 074444
8387 074452

8388 074460

002376
002400
010710
177777
002350

PSEU27:

002336

002334
007724
002340
002356

010000

000020
000001

172516
177572

120000

168$:

010000
002360

208

177572
000212
002312
000040
002410
002410
011060

013737
005437

002240
002402

002402

012777
053777

000177
002364

105706
105700

042777

012777

013777
012777
053777

012770

104441
052777
012737

112777

105760

105744

105736

002402

105720

000010

105672

007777

002602
000101
002366

105666

105662
105650
105642

000002

000013

YTYY YT YT Y

YT Y YYPY Y

¥ 4

YY)

CLR
CLR
JSR
NOP
MOV
MOV
DEC
MOV
JSR
MOV
MOV

INTFCY
INTFC2
PC.BGIN2

:CLEAR INTERRUPT FLAG FOR CHANNEL 1
‘CLEAR INTERRUPT FLAG FOR CHANNEL 2
‘SET UP PARAMETER

#177777 ,PHLOW
MASK ,Ré
R&
R4, PHHIGH
PC.PVCON
VIADD,RO
RO, BUF AB

:LOAD INPUT FOR (ONVERSION ROUTINE
Pene
Tee.
‘o
$CREATE VIRTUAL ADDRESS
SGET START ADDRESS OF BUFFER A
:LOAD START ADDRESS OF BUFFER A

CLR
MOV
MOV
MOVB

R3
#20,SR3
#1,SR0
R3.(R0)

‘R3 CONTAINS DATA
to2ENABLE 22-BIT MEMORY MANAGEMENT
e
‘e«ENABLE MEMORY MANAGEMENT®+
‘LOAD FIRST DATA BYTE

INC

MOVB
DEC
BNE
DEC
MOV
MOV
» P
CLRB

#10000,R1

#150000,R0
KPARS

P3,(R0O)+
R1
16%
RO
#10000,R1
RO,BUFBB

2197777 ,3BARX

MOV
NEG

BCINP,RSAVE
RSAVE

MOV
BIS

#177,3CSRX
CSRMS1,aCSRX

RSAVE ,aBCRX
#10,3CSRX

#7787, 3BARX

;**DISABLE MEMORY MANAGEMENTa«
te===LOAD TON INTQ A(R 2==eveeececeee‘CREATE MLA1
F
SSTORE MLA?
i==== 0AD MLA1 INTO DOR 2-=ccecceccceSWAIT A LITTLE

<===LOAD START ADDRESS OF BUFFER A====
*STORE BYTE COUNT INPUT
TBUILD 2°'COMPL FOR BCR

1=e=<LOAD [NPUT INTO BCR l=ceceeceme--

:-DMA ENB,DMA DIR,INT ENB.SYS (0,BA16+17
:==LOAD ADDITIONAL EXTENDET ADDRESS BIT
SSELECT CHANNEL 1

t2<<<{0AD START ADDRESS OF BUFFER B---

8IS

#10,aCSRX

105602

MovB

#1%,31CRHX

te=e=L0AD GTS INTQ A(R 2e==ccccemecca-

MOV

RSAVE . aBCRX
#101,3CSRX
CSRMS2, aCSRX
#PRIOO

12K CLEARED

105626

002374

MOV
MOV
BIS
SETPR]

SLOAD BUFFER WITH DATA
:
;
;
SLOAD 2K
:LOAD START ADDRESS OF BUFFER B

S1F YES,DO THE TEST

SRO
#212,3]1CRHX
DPAT.R1
#40,R1
R1,MLAY
MLAT,alDRHX
PC,LOOP

MOV

SCREATE NEXT DATA

20%

CLR
MOVB
MOV
ADD
MOV
MOVB
JSR

BIC

:LOAD NEXT PAGE

:CLEAR BUFFER B

MOV

SSET UP ADDRESS FOR NEXT DATA BYTE

(RO)+

DEC

MOV

*LOAD COUNTER FOR 2K

tece={0AD INPUT INTO BCR 1--t-===SET DMA ENB,INT ENB IN (SR1
tee=LOAD EXTENDED ADDRESS BlTSe=-==eSSET PRIORITY T0 ZERO
MOV
#PR100.RO
TRAP
($SPRI
sSELECT CHANNEL 2

000000
000010

BNE

005037
112777
013701
062701
010137
113777
004737

013777

MOV

172352

1777¢7

MOV

005301

012777

I I T

YRR Y

#2,CHAN

*LOAD CHANNEL NUMBER

HARDWARE
TEST 27:

8389
8390
8391
8392
8393
8794

TESTS
MACRO M1113
06-SEP=-82 16:46
EXTENDED ADDRESS BIT (022-BUS)TEST

074466
0764472
076476
074500
074502
074504

012701
005737
001017
005301
001373
017737

077777
002400

105570

8396 074520

053737

002364

8395 074512

8397 07452¢

012737

076526
074530
074532
076534
074536
074544
074552
074556
076560

104457
005223
006972
003500
042777
012737
005737
001015
017737

8404 074574

053737

8398
8399
8400
8401
8602

8603 0764566

8405 074602

074602
074606
074606
074616
8406 074612
074612
074616
8407 074620
8408 074626
8409 074634
8410 074642
8411 074650
8412 074656
8413 074664
8414 074672
B4L1S 074674

0764674
074676

8616
8417
8418
8419

074700
074702

074706
074712
074716
0747264

8420 074726
0764726
074730
074732
074734
8421 074736
8622 0764744
8623 074752

8620 074760

8425 074766

84,26 074774
8627 075002

012737

10001&

002502

MOV
18T
BNE
DEC
BNE
MOV

#77777.R1
INTF(2
24%
R
238
SCSRX,BAD

:LOAD LOOP COUNTER
:HAS INTERRUPT [N CHANNEL 2 OCCUPRED
‘BRANZH IF YES
‘DECREMENT COUNTER
“1F NO,TEST AGIN
TGET CSR2 CONTENTS

002500

BIS

CSRMS1,GO0D

“SET EXTENDED APDRESS BIT TO CSR CONT.

23%:

002500

000010
000001
002376

105534
002374

105514

002366

100000

104457
005225
006200
003702
017737
005037
023737
00140«

105374
002500
002502

24%:

81S

CSRMS2, GOOD

“SET EXTENDED ADDRESS BIT

MOV

105452
002374
105426
002500
002500
002502
002500

002502

#100000, 600D

ERRSOFT 2708,E232.ERR201

25%:

SETPR]

#PR]O7

BIS
MOV
MOVB
MOV
ADD
MOV
(MP

#10,3CSRX
#2,CHAN
#14,31CRHX
PHLOW,GOOD
BC INP . GOOD
3BARX .BAD
BAD,GOOD

BEO
30$
ERRSOFT 2709,E234 ,ERRSO1

30%:

002500

105334
902374
002500

063737

002240

002500

105302
002500

TRAP
MORD
.WORD
.WORD

002500

MOV
(LR
(NP
BEQ

aBCRX,BAD
600D
BAD, GOOD
318

ERRSOFT 2710,E235,ERRS01

160000

*ERROR HANDLER

002502

000010
000001
002360

017737
023737

ERRSOFT 2707.E532.ERR201

“BC OF ,DMA DIR,SYS CONT

;SELECT CHANNEL 1
;LOAD CHANNEL NUMBER
;HAS AN INTERRUPT [N CHANNEL
‘BRANCH IF YES
‘GET C(SR1 CONTENTS

104457
005226
006231
003702
042777
032737
013737

042737

#170016, 600D

#10,aCSRX
#1,CHAN
INTFC
25%
SCSRX . BAD

000340

000010
000092
000014
002336
002240
105420
002502

MOV

BIC
MOV
TST
BNE
MOV

104457
005224
006072
003500
012700
104441
052777
012737
112777
013737
063737
017737
023737
001404

SEQ 214

PAGE 69-5

002500

002502
002502

31%:

‘BC OF SHOULD BE SET

*ERROR HANDLER

'BRANCH If YES
JERROR HANDPLER

:GET BCR1 CONTENTS
:
11S BCRY ZERO
*BRANCH [F YES

JERROR HANDLER

#10,3CSRX
#1, CHAN
8Uf BB, GOOD

SSFLECT CHANNEL 2
‘LOAD CHANNEL NUMBER
1SET UP COMPARE VALUE

ADD

BCINP,GOOD

MOV
(MP

#160000,600D
aBARX . BAD
600D, BAD

1 OCCURED

TO CSR CONT.

TRAP
(SERSOFT
.MORD
2708
WORD
E232
‘WORD
ERR201
;NO FURTHER INTERRUPT ALLOWED
MOV
#PR107,RO
TRAP
($SPRI
;SELECT CHANNEL 2
*LOAD CHANNEL NUMBER
tee=olOAD TCA INTO A(R 2====cecececec-e
;SET UP COMPARE VALUE
L.
‘GET BAR1 CONTENTS
;HAS BAR1 THE CORRECT ADDRESS

BIC
MOV
MOV

BIC

(SERSOFT
2707
E232
ERR20?

TRAP
.WORD

WORD
.WORD

($ERSOF
T
2709
E23%
ERRSO1

TRAP
JWORD
"WORD
"WORD

CSERSOFT
2710
E235
ERRSO1

SCLEAR BIT 13+14¢15

*GET BAR2 CONTENTS
*HAS BAR2 THE (ORRECT ADDRESS

HARDWARE

TESTS

MACRO M1113

TEST 27: EXTENDED ADDRESS BIT
8428 075010
8429 075012
075012

104457
005227
006200
003702
012737
005337
013701
111103

8435 075046

004737

8434 075042

8436 075052

8437
8438
8439
8440

8441
8442
8443
8444
8445
8446

075056
075062
075066
075074

075076
075100
075102
075104
075112
075176

8447 075124
8448 075132
8449 075134
8450 075140
8451 075142
8452 075144
8453 075150
8454 075154
8455 075160
8456 075164
8457 075172
8458 075200
8459 075206
8460 075212

8461 075216
8462 075224

8463 075232
8664 075236

8465 075242
8466 075250
8467 075254

075254
075256
075260
075262

8468 075264
8469 075272
8470 075300
8471 075302
8472 075306
B47% 075312
8474 075320
8475 075324
8476 075330

(Q22-BUS)TEST

001404

075014
075016
075020
075022
075030
075034
075040

8430
8431
8432
8433

06-SEP-82 16:46

BEQ
43%
ERRSOFT 2711,E234.ERRSOY

000001
172352
002356

010137

002340

012701

120000

005237
013702
012737
120322

000240
001415
005037
005037
110337
013737

013737
000425
005237
122122
001453
005037
005037
010137
004737
013737
013737
116137
010237
004737

172352
002360
000001

002500
002502
002500
002334

002336

1727777
177572

002430
0024264

MOV
DE(
MOV
MOVB

#1,5R0
KPARS
BUF AB,R1
(R1) ,R3

JSR

PC VPCON

*VIRTUAL TO PHYSICAL CONVERSION ROUTINE

MOV

INC
MOV
MOV
(MFB

002404

NOP
BEQ
CLR
CLR
MOVB
MOV

i
002426

002430
44%:

002500
002592
002340

116237
005037

012737
023737
001315
005037
005077
017737
005077
006337
022737

43%:

002426

002430
002500

45%:

002422
002424

000001
002404

177572
002240

177572
104766
104754
104754
002350
001000

002502
002364

MOV
BR
INC
CMPB
BEQ
(LR
CLR
MOV
JSR
MOV
MOV
MOVB
MOV
JSR

MOV
MOV
DEC
vEC

002502

R1,viADD

#140000,R1

KPARS
BUFBB,R?
#1,(NTY
R3.(R2)+

MOV
cMP
BNE
(LR
(LR
MOV
(LR
ASL
CMP

TRAP

*SET UP DATA FOR CONVERSION ROUTINE

SPOINT TO NEXT LOCATION

;CROSS THE BOUNDERY FOR NEXT DATA BYTE'S
:PROVIDE FIRST BYTE OF BUFFER B
SSET UP COUNTER FOR DATA COMPARE
< COMPARE THE FIRST DATA BYTE

L4
600D
BAD
R3,G0OD
PHHIGH, TXADRH

;BRANCH [F EQUAL TO
SCLEAR HIGH BYTE OF
“CLEAR HIGH BYTE OF
SLOAD FIRST TX DATA
SFIRST TX ADDRESS

PHHIGH, RXADRH
PHLOW, RXADRL

*RX ADDRESS IS OVER 128K
:GET ADDRESS OVER 128k

PHLOW, TXADRL
(5%
CNT1
(R1)+,(R2)+
469
600D
BAD
R1,VIADD
PC.VPCON
PHHIGH, TXADRH
PHLOW, TXADRL
-1(R1},G00D
R2,VIADD
PC.VPCON
TXADRL
RXADRL

MOVB
=1(R2),BAD
CLR
SRO
ERRSOFT 2712,E250,ERR231

46%:

;BRANCH IF YES
*ERROR HANDLER

(SERSOFT
LWORD
2711
JWORD
E234
.WORD
ERRSO1
;v*ENABLE MEM
Y MANAGEMENT#+
SCROSS THE BOUNDERY FOR FIRST BYTE
*PROVIDE FIRST BYT¢ OF BUFFER A
SGET THE FIRST DATA BYTE

MOV

002404

013737
013737

104457
005230
005726
003744

177572

010026

0100264
002334
002236
177777
002340
010024
002334
002336

005337
005337

SEQ 215

PAGE 69-6

#1,5R0
(NTY,BCINP
448
SRO
aCSRX
aIDRX,BAD
aCSRX
MASK
#1000, CSRMS?

NEXT (OMPARE
GOOD
BAD
FOR ERROR MESSAGES

SGET ADDRESS OVER 128K
;BRANCH TO ERROR REPORT
:
‘BUFFER A EQUAL BUFFER B
S1F YES CONTINUE
:CLEAR GOOD
SCLEAR BAD
:
SVIRTUAL TO PHYSICAL CONVERSION ROUTINE
STX ADDRESS IS OVER 128K
S
SLOAD TX DATA FOR ERROR MASSAGE
“SET UP DATA FOR CONVERSION ROUTINE
SVIRTUAL TC PHYSICAL CONVERSION ROUTINE
Pees
;

‘LOAD RX DATA FOR ERROR MESSAGE
teeDISABLE MEMORY MANAGEMENT®e
*ERROR HANDLER

TRAP
MWORD
.WORD
.WORD

(SERSOFT
2712
E250
ERR231

:«+ENABLE MEMORY MANAGEMENT®e
SALL BYTES COMPARED ?
S1F NO, GET NEXT ONE
teeDISABLE MEMORY MANAGEMENT®e
SCLEAR CSR2,SELECT CHANNEL 1
*READ DIR1 FOR CLEAR BO BIT IN IIR
SCLEAR CSR1
*NEXT MEMORY RANGE
*WAS BA 18 SET

HARDWARE

TEST

27:

TESTS

8477 075336
B478 075340
8479 (75346

8480 075352
8481 075360
8482 075364
8483 075366
8484 075374
8485 075376
8486 075402
075402
075404

8487

MACRO M1113

EXTENDED ADDRESS BIT

8488 075406
8489
8490
8491 075454
075454
075454

003403
012737
006337
053737
006337
600240
022737
(01402
000137

06=SEP-82

000400
002362
002362
002306
020000

002362
002364

072724

104401

123

PAGE

508:

002366

EXQV27:

104432
000950
045

16:46

(Q22-BUS)TEST

062

TSHD27:

69-7

BLE
MOV
ASL
BIS
ASL
NOP
CMP
BEQ
JMP
EXIT
MNLIST

.ASCI1Z
.LIST
.EVEN
ENDTST

SEQ 216

508
#400, CSRMSK
CSRMSK
CSRMSK , CSRMS1
CSRMS2
#20000, CSRMS2
EXQV27
[1TAC27
TsT

BEX

:BRANCH [F EQUAL OR GREATER
:SET BA 18
;
;SET EXTENDED ADDRESS BIT FOR
RX CHANNEL

:ALL EXTENDET ADDRESS BIT TES
TED
t1F YES, EXIT TEST
:

)

/%S2%AQ-22 EXTENDED ADDRISS
BIT
BEX

TRAP
.WORD

CSEXIT
L 10060-.

TRAP

(SETST

TESTIN/

L10060:

HARDWARE

TEST 28:

TESTS

MACRO M1113

06-SEP-82

ADDITIONAL STANDBY TEST

8493

16:46

LSBTTL

PAGE

Sea 217

TEST 28: ADDITIONAL STANDBY TEST

8(,9(,

;'t'tt'tt"t.t""""""'t"t"""tQ"'t'."lt't'tttit.'Q"t"'.t"ttt"

BLYS

g:gg

:THE ADDRESS REGISTER LINES TO THE BUS.

8496
8497

IEX = TEST 28

;THIS TEST MOVES A SLIDING ONE'S BIT PATTERN ACROSS THE
;ADDRESS LINE 16,17,18,19,20,21 IGNORING NXM ERRORS BUT (HECKING

8500

:THE PATTFRN SHOULD BE CHECKED ON A LOGIC ANALYSER

ggg%

:THE TRIGGER HAS TO BE CONNECET TO THE SIGNAL ADREN L (EY,PIN&G).

8501

8504
8505

STHIS TEST IS ONLY CARRIED GUT
:THE SOF TWAXE QUESTION.

8506

A G=BJS

IS USED AND

YOU ANSWER

;t'ttt"t.t'Qt"'tt""'t"tt""ttttt'ttt!t'ttttt"tt't"! I EE 2 XEEAEEES

8507 075456
075456
8508 075456
8509 075462
8510 075464
8511

sTHE LOGIC ANALYSER HAS TO BE CONNECT TO ADDRESS LINES 16-21,

075470

8512 075472

075472
075476
075502
075506
075506
8513 075512
075512
075514
8514 075516

BGNTST

005737
001015
005737
001410

012746
012746
010600
104417
062706

104407

075520
8516 075522
8517 075526
8518 075530

103415
005737
001410

85:5 075520

000004

012746
012746
010600
104417
062706

075550
075552

104432
001146

005737
001410

002324

075562
075566
075572
0755764
075576

012746
012746
010600
104417
062706

076220
000001

075602
075606
075612
075614

012746
012746
010600
104417

076244
000001

8520 075554
8521 075560
8522 075562

8523 075602

728::
;1S THIS TEST SELECTED
SEXIT IF NO
:1S THE PNT FLAG 5(7

PRINTF

NINFO2

;PRINT MESSAGE FOR USER

2%:

EXIT

3%:

READBUS

:ARE YOU ON A Q-BUS

BCOMPLETE 5%

:BRANCH If Q-BUS

BEQ

000004

:1F

YES

SEXIT

,PRINT

INFCRMATION

TEST

MOV
MOV
MOV
TRAP
ADD

#INFO2,-(SP)
#1,-(SP)
SP,RO
CSPNTF
#4,SP

TRAP
LWORD

CSEXIT
L10061-,

TRAP

C$RDBU

PNTF
11%
#INFO3

BCS
;1S THE PNT FLAG SET
S1F YES,PRINT INFORMATION
:PRINT MESSAGE FOR USER

11%:

EXIT

1£3

:1F UNI=-BUS EXIT TEST

5¢:

ST
BEQ

PRINTF

PNTF
7%
#TSHD28

;1S THE PNT FLAG SET
SIF YES, PRINT THE TEST HEADER
tens

PRINTF

#INFO1

:PRINT MESSAGE FOR USER

076502
000001
0000064

TS1
BEQ
PRINTF

002324

075530
075534
075540
075542
075544

8519 075550

MAINB
3%
PNTF

076274
000001

104432
001294

075516

TSt
BNE
ST

002242
.
002324

R X

MOV
MoV
MOV
TRAP
ADD

#INFO3,-(5P)
#1,-(SP)
SP,RO
CSPNTF
»4,SP

TRAP
LMWORD

CSEXIT
L10061-.

MOV
MOV
MOV
TRAP
ADD

#TSHD2B,-(SP)
#,-(SP)
SP,RO
CSPNTF
»4,SP

MOV
MOV
MOV
TRAP

#INFOY,=(SP)
1 ,-(SP)
SP,RO
COPNTF

HARDWARE
TEST

28:

TESTS

MACKO M1113

ADDITIONAL

STANDBY

06-SEP-8B2 16:46

TEST

075616
8524 075622
075622

062706

000004

012746

000340

075636
075642
075646
8525 075650
075650

012746
104437
062706

000003

012746

(00340

075660

013746

002244

075626
075632

075654

075666
075670
075672
8526 (75676

8527 075702

8528 075710
8509 075714
8530 075720
8531 075724
8532 075732

032746
012746

012746

002314
000040
002412
002412
011060

8536 075760

005737

075764
075746
075750
075752
075754
075756
075760

8537 075764
8538 075766
8539 075776
8540 076000

8541 076002
8562 076006
8563 076016
8564 076020
8545 076026
8566 076036

000010
010536

000212

000240

000020
002376

076042
076046
8548 076050

012700
104441
112777

000000

8550 076062
8551 076066
8552 076070

005/37
001013
005301

0023/¢

012701

8553 076072 001373
8554 076074

076074
076076
076100
076102

104360

1046457
005361
076634
000000

;SET UP INTERRUPT vECTOR

000013

077777

MOV
MOV

#NXM.
= (SP)
#4,-(SP)

MOV

#PR107,=(SP)

MOV

VECCT,=~(SP)
#3,-(SP)
C$SVEC
#10,5P

MOV
TRAP
ADD

;SET UP PARAMETER

MOV
ADD
MOV
MOVB
JSR

DPAZ.R1
#40,R
R1,MLA2
MLA2,3IDRHX
PC,LOOP

*CREATE MLA2
...
1STORE MLA2
t====LOAD MLA2 INTO DOR 1===ceeeecea-‘WAIT A LITTLE
;CLEAR ANSWER LOCATION
‘nSK ,READY FOR TRIGGER

AN,

STEST ANSWER

aBARX
#1,RSAVE
RSAVE
RSAVE ,3BCRX
MASK , 3C SRX
#107 aCSRX

;LNAD BAR READ LOCATION
‘GE] BYTE COUNT
‘BILD 2'COMPL FOR B"R
*LOAD READ ADDRESS
‘LOAD EXTENDED ADDRESS BIT INTO CSR
‘SET DMA ENB, INT ENB, DMA DIR INTO (SR

MOVB

#13,3]1CRHX

MOV
#PR100,RO
TRAP
($SPR]
;==LOAD GIS INTO ACR 1, START DMA-==--

ST
BNE
DEC

INTFC1
108
R1

*HAS INTERRUPT OCCURRED
‘BRANCH [F YES
‘DECREMENT COUNTER

CLR
MOV
NEG
MOV
MOV
BIS

SETPR]

104212
13%:

T==SELECT CHANNEL 1 AS TALKER======

ANS
TRIMSG,ANS,=-1,NO

NOP

104254
1040464
104236

#212,31CRHX

GMANIL

BEQ
MOV
NEXTBA: CLR

002402

sInNTSCE,=(sP)

PC,BGIN

ITAC28: NOP
CLR

002350

MOV
TRAP
ADD

#3.-(SP)
CSSVEC
#10,5P

JSR

Move

104344

002370

104274
000001
002402
002402
002350
000107

8549 076056

VECCT,#INTSCY,#PRIO7

ADD
NG, SP
SSET UP NON-EXISTENT MEMORY TRAP VECTOR
MOV
#340,-(SP)

MOV

002370

005077
012737
C05437
013777
013777
052777

8547 076042

SETVEC

104443
000404
002370
000120
076563
177777
001764
017737
005037

#4,#NXM,#340

010142

013701
062701
010137
113777
004737

000240
005037

SETVEC

000010

000003

8533 075736
8534 G75740
8535 075744

SEQ 218

70-1

010132
0000u4

012746
104437
062706
004737

112777

PAGE

MOV

BNE

1TAC28
#20,MASK
INTFCA

#PR100

07707701

ERRSOFT 2801,E271

100008:

TRAP
BR
JWORD
"WORD
"WORD
"WORD

CSGMAN
100008
ANS
T$CODE
TRIMSG
-1

‘1F ANSWER WAS YES, DO THE TEST
*SET UP MASK FOR LOADING BA BIT IN (SR
*CLEAR INTERRUPT FLAG

TALLOW INTERRUPT

*LOAD LOOP COUNTER

STEST AGAIN

TRAP
.WORD
WORD
"WORD

CSERSOFT
7801
E271
O

HARDWAPE TESTS
MACRO M1113
(04=SEP-B82 16:46
2¢: ADDITIONAL STANDBY TEST
TES

8586
8587
Bs58e

SETPR]

BLE

20%:

#PR107

MOV

;1S BA 19 SET
*BRANCH IF YES

MASK ,#100

‘WAS BA 17 SET

#14,

;===LOAD

NEXTBA
#400,MASK
MASK

NGP
NOP
NOP

31 CRHX

21DRX , EAD

#20000, MASK
?EgTBA

ExIit

:DISABLE INTERRUPT

#1000 ,MASK
208

MOV
ASL

(mp
BNE

020000

INTERRUPT

TRAP

MASK

MovB
MOV

104070

sDISABLE

TRAP

ASL

(mMp
BNE

000014

#PRI07.RO

g
g
g 0
g Py Ny Py 0

($SPRI

‘BRANCH [F NO
*LOAD BA 19 INTO MASK
TGENERATE NEXT EXTENDED ADDRESS BIT

TCA

INTO ACR le==cmcccas

*READ DIR FUR CLEAR

iHE BO BIT

SALL EXTENDED ADDRESS 81T SHIFTED
;BRANCy

(SEXI]

100

BEX
/XS2%ASTANDBY TESTIN/
/ANXACONNECT YOUR LOCIG ANALYSER TO BDAL

/YAAND THE TRIGGER TO ADREN L

16-21%N/
(E9,PING)ZIN/

/AS2XAFOR SELECT THIS TEST PLEASE ANSWERIN/
/XSOXATHE SOF TWARE QUESTIONIN/
/XS2XATHIS TEST IS ONLY FOR THE Q-BU: INTERFACEXIN/
/1S

THE LOCIG ANALYSER READY FOR TRIAGER?/

6?0 INTERRRUPT WHEN EXPECT®D, RUN TEST 0=26 AT FIRST/
X

—

Y e Ya Y

(N 2 =t s et et Se G St St s )

COL

o
fNe

E271:

INFO3:

TRIMSG:

INFO2:

CSEXIT

MOV

TRAP

NN
e iasl 2 Tt et aYa Y

INFO1:

F4lal
-2 2 J

OO0
OO
SO NOOSO
QORY
=N = NN

o
D
el
i
b

N AN NN N~ O

116

TSHD?8:

($SPRI]

L 10061-.

.WORD

045
045
045
045
045
045

#PR107,R0

.WORD

TRAP

00v502

—d

8580 076502
8581 076563
85k; 076634
£583
8584
8585

002353

#PRI07
181

(mMp

000100

—=SAINONLPVO
=Y

8577 076323
8578 076374
8579 076445

002350

076214
- 076216
8573
8574
8575 076220
8576 076244

10%:

8565
8566
8567
8>68
8569
8570
ST
8572

&»

8564

pleleldelolelelololalelelw]
DNV
= =00 T D=2ONOCN
S NNVOOOON
= NN
TM NN NNORNOAI
N NN NN~
NN
NS BN B NN NN
=N
DNNNOOCONNVINN—N

8558
£559
6560
8561
8562
8563

ExIT

1046432

SEQ 219

70-2

SETPRI

000340

000¢.0¢4

£557

104441

3956

012700

#9555 076104
07

PAGE

104401

ENDMOD

L10061:

TRAP

(SETST

HARDWARE TESTS
TEST

28:

MACRO M1113

06-SEP-B2 16:46

ADDITIONAL STANDBY TEST

SEQ 220

PAGE 71

85N

.TITLE PARAMETER CODING
8
0

LSBTTL

HARDWARE PARAMETER CODING SECTION
BGNMOD

076722
XX

THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS
THAT ARE USED BY TWE SUPERVISOR TO BUILD P-TABLES.
THE

MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE
THE
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS
WITH THE OPERATOR.

8662

076722
076722
076724

BGNHRD

076724
076724
076726
076730
076732

GPRMA WPM1,0,0,160000,177776,YES

:
LSHARD:

GPRMA HPM2,2,0,200,770,YES

8663

000006

8664

003032
077164

172777
000000
000036

8665

004032

GPRMD WPM&,6,0,-1,0,36,YES

GPRMD HPM5,10,0,-1,0,36,YES

.WORD L10062<LSHARD/2

.WORD
.WORD
LWORD
LMWORD

TSCODE
HPMI
TSLOLIM
TSHILIM

.WORD
LWORD
LWORD
LMORD

T$CODE
HPM?
TSLOLIM
TSHILIM

.WORD
.WORD
.WORD
MWORD
LMORD

TSCODE
HPM3
340
TSLOLIM
TSHILIM

.WORD

HPM¢4
-1
M
TSLOL
TSHILIM

LMORD
.MORD
.WORD

TSCODE
HPM5
1

"WORD

TSHILIM

"WORD

GPRML HPM6,12,-1,NO

8666

077006

T$CODE

JWORD
JRD
‘RD
RD

.WORD
.WORD
.WORD

TSLOLIM
T$CODE

HPM6
=1

PARAMETER (ODING

HARDWARE

PARAMETER

MACRO M1113

CODING SECTION

06-SEP=-B2 16:46

8667
8668
8669 077010
8670
8677

8678
8679
8680
8681
8682
8683
8684
8685
8686

ENDHRD

077010
077010
077046
077104
077164
077226
077271

SEQ 221

PAGE 71-1

L10062:
104
126
120
104
106
m

105
105
122
105
105
123

126
103
111
126
126
040

HPMI1:
wWPM2:
HPM3:
HPMé:
HPMS:
HPM6:

-EVEN

NLIST BEX

+ASCIZ
LASCIZ
LASCIZ
.ASCIZ
ASCIZ
LASCIZ

/DEVICE ADDRESS
/
/VECTOR ADDRESS
/PRIORITY LEVEL (FOR LSI WITH FIXED PRI
/DEVICE PRIHARV ADDRESS (H.1
/DEVICE PRIMARY ADDRESS (H.?
/
/1S TESTCABLE IN ?
/

EVEN
LLIST BEX

TYPE &)/

PARAME TER (ODING
MACRO M1113
SOf TWARE PARAMETER (ODING SECTION

0¢-SEP-82 16:46

gggg

LSBT,

8691

:00

8692
8673
8694
8695
8696
8697
8698
8699

07733

8711

077336

000130
077400
177777

077344
077346
077350
077352
(’7354
8713 077356
077356
077360
077362
077364
077366

001052
077427
177777
000003
000077

077370
077372
077374

003130
077520
1177777

077376

075004

8718 07742/
8719 077471
8720 077520

121
116
116
104

8712 077346

8714 077370

8715 077376
8716
8717 077400

8721
8722
8723
8724 077570

LSSOFT::
GPRML

002052

PMQVP,0,-1,YES

GPRMD

SPRM?2,2,D,-1,3,77,YES

GPRMD

SPRM4,4,D,=1,1,3777,YES

8735 077570
g;gg 077710

.WORD L10063-L8SCFT/2

.WORD
.WORD
LMWORD

PMQVP
=1

.WORD
.WORD
.WORD
.WORD
LWORD

T$CODE
SPRM?
=1
TSLOLIM
TSHILIM

.WORD

077471

.WORD

177777
000001
003777

125
1¢5
125
117

111
115
115
040

PMQVP:
SPRM2:
SPRM4:
SPRMS:

GPRML

SPRMS,6,=-1,YES

EXIT

SF1

LNLIST BEX
,ASClZ /QUICK VERIFY TEST

.ASC]Z
,ASCIZ
.ASCIZ

L10063:
SPAT(N::

.BLkWw
LBLKB

SO
400-<.8377>

: PATCH AREA
: LASTAD SHIFT FOR LS! BUG

TS$CODE

SPRM4

-1
TSLOLIM
TSHILIM

.WORD
.WORD
.WORD

TS(CODE
SPRMS
-1

.WORD

T1$CODE

LIST BEX
.EVEN

ENDSF
T

TSCODE

.WORD
.WORD
.WORD

/
/NUMBER QOF MATCH CHARACTER COUNTS /
/NUMBER OF BYTE COUNTS /
/D0 YOU WANT THE ADDIT]ONAL STANDBY TEST/

077570

8734 077570

8738

SOFTWARE PARAMETER CODING SECTION

BGNSF
T

000115

077336
077340
077342

8725
8726
8733

SEQ 222

: THE SOF TWARE PARAMETER CODING SECTION CONTAINS MACROS
: THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES.
THE
: MACROS ARE NOT EXECUTED AS MAZMINE INSTRUCTIONS BUT ARE
; INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.
THE
: MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS
: WITH THE OPERATOR,
e

8700 07733%
8701
8710

PAGE

LEVEN

PARAMETER (ODING
MACRO M1113
SOf TWARE PARAMETER (ODING SECTION

06-SEP-82

16:46

8745
8746 100000
100000

100002

100004

87647 100004

LASTAD

100024

000010

LSLAST::

"ENDMOD

PAGE

SEQ 223

73-1

'53%3
)
TSFREE

"WORD T$S|ZE

‘

PARAMETER CODING
MACRO M1113
SOf TW2RE PARAMETER CODING SECTION

8749
87°.0
B:/53
8/64 100004
8765 100004
100004

100006

100010

8766 100010

06-SEP-B2 16:46

PAGE

SEQ 226

BGNSETUP
BGNPTAB

000009

1
.WORD

000006
160140

.WORD

160140

:1ST

8768 100014

000300

.WORD

PR10G6

:INTERRUPT PRIORITY

g;;; 100022

000000

.WORD

8767 100012

8769 100016
8770 10002C
8773 100024
100024
8774 100024
8775

000420

.WORD

000900
000001

.WORD
.WORD

ENDPTAB
000001

.END

ENDSE TUP

420

0
1

:1ST

(OF

L10066:

(OF 2)

VECTOR ADDRESS

:DEVICE PRIMARY ADDRESS FOR IHW.1
:DEVICE PRIMARY ADDRESS FOR (M.2
:DEFAULT

VALUE FOR

TESTCABLE

L10066:

.WORD

L10066~-./2-1

SEQ 225
74-1
PAGE
06-SEP-82 16:46
MACRO M1113
CODING

TABLE

PARAMETER

SYMBOL

lolelolelelelelw]
eOOO—~OONOO
leclelel JolalololelelalOO~elelelM’NNANMAN
deloleolalolelelalelalolalaleleCOOOOOOOOOQONNI
elelelelelelelololalalelalalelOOUO0OOOOCOCOOO
[OO0elalelOOOCOOOOOOOOOrr

QVOUULOLVOVOVYOLVLOV

X LWEQ
——m e 2 DDV ETEEZXA D DANANANWAIIIIDOUOZDAXIXTXXTNNNE-

SEQ 226
74=2
PAGE
06-SEP-82 16:46
MACRO M1113
CODING

SYMBOL TABLE
PARAMETER

e ole a o e e e e salele s a
dd dgdolelolalelolalalolol
leleleleleleleloleolclclalslalelalalelalelelalslala

(TR TR L LR O O L L U LI LI O T TS TITR

e N0 OO0 TOO000
OO VOVOVONIOOOOTLTNINIOOVONIVOONNOONTOOe ITNOrOrOrrr

111111———rr er d OV VW S IFTEVN— —WU X XZ2A A ABRA INEIZ OIXTX

PARAMETER

MACRO M1113

“ODING

SYMBOL TABLE

06-SEP-82 16:46

PAGE

PDeGorn —WOe=INUvrMV IOTNONVNOOTY XVARAAAAXARANAANAN I2O>AZXNOD0XNEO—AZWLILT LTO(I[|U MOOMNODOO0O0O—OMNOO—O MNVTOMMNOUOWOM BVNA=OERAV=AN eO=NOVAMONNOWIOE

IEr—LDULUAOU~LLO— vO

Bwwauwnoamn
wox

dolalelelalelelelelalelelele)dolelalelolalelel

-—OmM>OM2ODONMNOrIO0—~NOF0VWOIOOW2ANWTA O

SEQ 227

74-3

. ABS.

100024

000000
ERRORS DETECTED:

000
001

VIRTUAL MEMORY USED:

26992 WORDS

DYNAMIC MEMORY:
20774 WORDS
ELAPSED TIME:
00:19:40

(

( 106 PAGES)

79 PAGES)

Z1EABO.BIN,ZI1EABO.SEQ LIBA/ML,21EABO.
SRC