Digital PDFs

AH-T066B-MC

May 1983

229 pages

Original

110MB

view download

OCR Version

144MB

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_gray.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

PARAMETER CODING

MACRO M1113 06-SEP-82 16:46 PAGE 2

.REM £

IDENTIFICATION
PRODUCT CODE:

AC=-T064B=-M(

PRODUCT NAME:

C(ZIEABO IEU/IEQ STATIC DIAG

PRODUCT DATE:

SEPTEMBER 1982

MAINTAINER:

CSS MUNICH

AUTHOR:

PETER SEEBACH

REMARKS TO VERSION B

4000000000004
04% 0

INITCODE MODIFYED SO THAT SEVERAL UNI1S CAN BE RUN .
THE

CHANGES ARE MARKED WITH +B+

UPDATED TO VERSION B BY PETER SEEBACH, 6-SEP-82

THE INFORMATION IN THIS DOCUMENT IS
SUBJECT
TO
CHANGE WITHOUT
NOTICE
AND
SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
EQUIPMENT CORPORATION.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT.

NO RESPONSIBILITY IS ASSUMED

FOR
SOF TWARE ON EQUIPMENT THAT IS NOT

AFFILIATED COMPANIES.

THE USE
SUPPLIED

OR
BY

RELIABILITY

DIGITAL

FOLLOWING ARE

DIGITAL
DEC

TRADEMARKS OF

PDP
DECUS

DIGITAL EQUIPMENT CORPORATION:

UNIBUS
DECTAPE

MASSBUS

OF
OR ITS

= NN
S IoFISHSF =S

O OO NYWWWIWVAWNLES 8N 85 5N NN
WAINI NI NI NINI NI NI NO NI NIND =
SN
= ONOWVNOONVNIDWNO
OO SN
O = WNNNOORI SO0 =W
- NANVN NN
VIO" NNOMWWOD
O O NV ON) NOMNOW

b cd cd e

WO
00 —

PROGRAM HEADER AND TABLES
TABLE OF CONTENTS

6538

MACRO M1113

06-SEP-82 16: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

TEST g:

INITIALIZATION TEST

TEST
3: R/W BIT TEST
TEST & : SYSTEM CONTROLLER COMMANDS TEST

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

S5: INTERRUPT TEST
6: ADDPESS REGISTER TEST OF

CHANNEL 1

7: ADDRESS REGISTER TEST OF CHANNEL 2
8: DATA TRANSFER TEST

9: SECONDARY ADDRESSING TEST OF CHANNEL 1 (LISTENER)
10: SECONDARY ADDRESSING TEST OF CHANNEL 1 (TALKER)
11: SECONDARY ADDRESSING TEST OF CHANNEL 2 (LISTENER)
1;: SECONDARY ADDRESSING TEST OF CHANNEL 2 (TALKER)
13: DEVICE CLEAR INTERFACE FUNCTION TEST
14: DEVICE TRIGGER INTERFACE FUNCTION 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: PARALLEL POLL INTERFACE FUNCTION TEST OF CHANNEL 2
22: END OF A MESSAGE BLOCK TEST
23: DMA DATA TRANSFER TEST FROM CHANNEL 1 TO 2
24: DMA DATA TRANSFER TEST FROM CHANNEL 2 10 1
25: MCR FUNCTION TEST OF CHANNEL 1
26: MCR FUNCTIUN TEST OF CHANNEL 2
27: EXTENDED ADDRESS BIT (Q22-BUS)TEST
28: ADDITIONAL STANDBY TEST

HARDWARE

PARAMETER CODING SECTION

SOF TWARE PARAMETER CODING SECTION

SEQ 2

MACRO M1113

06-SEP=B2 16:46

SEQ 3

PAGE 3

NOWVSGWN=O

OPERATING INSTRUCTIONS

MN=O

ERROR INFORMATION

PERFORMANCE AND PROGRESS REPORTS

DEVICE

TEST

PROGRAM LISTING

OWWW

NONONONINRNININD

b =

OV
=CO

GENERAL INFORMATION

CONTENTS

TABLE OF

PARAME TER CODING

PROGRAM ABSTRACT

SYSTEM REQUIREMENTS

RELATED DOCUMENTS AND STANDARDS

XXDP+ USER MANUAL

(CHQUSA

)

IEUT1=-A OPTICN DESCRIPTION (YG-CO3k(C-00) OR
1EQ11-A OPTION DESCRIPTION
IEU/IEQ DIAGNOSTIC LISTING

1.4
ALL

1.5

DlAGNOSYlC HIERARCY PREREQUISITES
PDP=11

OR LSI=11

ASSUMPTIONS

PROCESSOR DIAGNOSTIC SHOULD RUN SUCCESSFULLY

SEQ &

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.

254

PARAMETER CODING

poes

PARAMETER CODING

MACRO M1113

2.0

06-SEP-B2 16:46

SEQ 6

PAGE 5

OPERATING INSTRUCTIONS

THIS SECTION CONTAINS A BRIEF DESCRIPTION OF THE RUNTlHE SERVICES.
FOR DETAILED INFORMATION, REFER TO THE XXDP+ USER'S MANUAL (CHQUS).

2.1

{OMMANDS

THERE ARE 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 DETAILS.

EFFECT

START THE DlAGNOSTlC FROH AN INITIAL STA E
START THE DIAGNOSTIC WITHOUT INITIALIZING
CONTINUE AT TEST THAT WAS INTERRUPTED (AFTER “()
CONTINUE FROM AN ERROR HALT

RESTART

CONT INUE

PROCEED

EXIT

RETURN TO XXDP+ MONITOR (XXDP+ OPERATION ONLY!)
ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE
CONSIDERED TO BE ACTIVE AT START TIMC

ADD

DROP

DEACTIVATE A UNIT

DISPLAY

(IF

IMPLEMENTED

CLEAR ALL FLAGS (SEE SECTION 2.3)

ZFLAGS

YOU MAY,

INFORMATION

TYPE A LIST OF ALL DEVICE INFORMATION
TYPE THE STATE OF ALL FLAGS (SEE SECTION 2.3)

FLAGS

A COMMAND CAN BE

STATISTICAL

BY THE DIAGNOSTIC = SECTION 4.0)

RECOGNIZED BY

FOR EXAMPLE,

THE

FIRST

THREE

TYPE "'STA' INSTEAD OF

CHARACTERS.

‘'START'',

PARAMETER CODING

MACRO M1113

2.2

06-SEP-B2 16:46

SEQ 7

PAGE 6

SUITCHES

THERt ARE SEVERAL SWITCHES WHI C H ARE USED TO MODIFY SUPERVISOR OPERATION.
THESE SWITCHES ARE APPENDED TO THE LEGAL COMMANDS.
ALL OF THE LEGAL
SWITCHES ARE TABULATED BELOW W I EH A BRIEF DESCR%E;{ON OF EACH,

IN THE CESCRIPTIONS BELOW, A D ECIMAL NUMBER IS

GNATED BY “‘DDDDD"".

SWITCH

EFFECT

/TESTS:LIST

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

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

/FLAGS:FLGS

THIS LIST WILL CAUSE TESTS 1,5,7,8,9,10 10
BE RUN.
ALL OTHER TESTS WILL NOT BE RUN.
EXECUTE DDDDD PASSES (DDDDD = 1 10 64000)
SET SPECIFIED FLAGS.
FLAGS ARE DESCRIBED

/EOP:DDDDD

REPORT END OF PASS MESSAGE AFTER EVERY

JUNITS:LIST

TEST/ADD/DROP ONLY THOSE UNITS SPECIFIED

/PASS:DDDDD

IN SECTION 2.3.

DDDDD PASSES ONLY.

(DDDDD = 1

TQ 64000)

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

EXAMPLE OF SWITCH USAGE:

THE EFFECT OF

THIS COMMAND WILL BE:

1) TESTS 1

THROUGH 5 wILL 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.
VYOU MAY,
FOR EXAMPLE, TYPE ''/TES:1=5"" INSTEAD OF '*/TESTS:1=5"",

BELOW IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED BY EA(CH
COMMAND.

START
RESTART

CONT INUE

PROCEED

DROP

ADD
PRINT

DISPLAY
FLAGS

IFLAGS
ExIT

TESTS

PASS

FLAGS

X
X

X
X
X

X
X
¥
¥

EOP

UNITS

PARAMETER CODING

MACRO M1113

2.3

0€-SEP-B2 16:46

SEQ 8

PACE 7

FLAGS

FLAGS ARE USED TO SET UP 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 ALSC CLEARED AFTER A START COMMAND UNLESS SET USING THE
FLAG SWITCH.
THE ZFLAGS COMMAND MAY A_SO BE USED TO CLEAR
ALL FLAGS.
WITH THE 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 SwWifcH.
FLAG

EFFECT

HOE

HALT ON ERROR = CONTROL IS RETURNED TO
RUNTIME SERVICES CO#TMAND MODE

LOE
IER*
IBE*

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

(FIRST LEVEL

CONTAINS

ERROR TYPE, NUMBER, PC, TEST AND UNIT)
INHIBIT EXTENDED ERROR REPORTS (THOSE
CALLED BY PRINTX MACRO'S)

IXE*
PRI
PNT

DIRECT MESSAGES TO LINE PRINTER
PRINT TEST NUMBER AS TEST EXECUTES

BOE

"BELL'' ON ERROR

UAM
ISR

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

STATISTICAL REPORTING)
INHIBIT PROGRAM DROPPING OF UNITS

APPLY

ADR

TO DIAGNOSTICS WHICH DO NOT

SUPPORT

EXECUTE AUTODROP CODE

LoT
EVL

LOOP ON TEST
EXECUTE EVALUATION (ON DIAGNOSYICS WHICH
HAVE

EVALUATION SUPPORT)

*ERROR MESSAGES ARE DESCRIBED IN SECTION 3.1

2.3.1

FLAG COMMANDS

FLA(GS)

THIS COMMAND PRINTED

THE

CURRENT

""""

OF ALL FLAGS

ZFL(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 SWITCH,
FCR EXAMPLE,
T0 CAUSE

THE

PROGRAM

TO LOOP ON ERROR,

AND TYPE
A "BELL'' ON ERROR,
/FLAGS:LOE:IER:BOE

YOU MAY USE

INHIBIT

THE

ERROR REPORTS

FOLLOWING STRING:

PARAMETER CODING

MACRO M1113

2.4

06-SEP=-B2 '6:46

SEQ 9

PAGE 8

HARDWARE QUESTIONS

WHEN A DIAGNOSTIC

IS STARTED,

THE RUNTIME SERVICES WILL PROMPT

THE USER FOR HARDWARE INFORMATION BY TYPING '‘CHANGE HW (L) 2"
YOU MUST ANSWER ''Y'* AFTER A START COMMAND UNLESS THE HARDWARE

INFORMATION HAS 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 THEN BE ASKED THE FOLLOWING
QUESTIONS FOR EACH UNIT,

EXAMPLE OF

THE DIALOGLE

CHANGE HW

(L)

00?113 ?

DEVICE ADDRESS

(0)

760150 ?

PRIORITY LEVEL

(Q)

6 ?

INTERRUPT VECTOR

(0)

420 ?

DEVICE PRIMARY ADDRESS C(H 0
(0) 0°?
(0) 12?2
DEVICE PRIMARY ADDRESS C(H 1
?
(LINZY
IS TESTCABLE IN

2.5

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 PARAMETERS WILL GOVERN SOME DIAGNOSTIC §PE(!F1C

OPERATION MODES. YOU WILL BE PROMPTED BY

""CHANGE SW (L)

IF YOU WISH TO C(MANGE ANY PARAMETERS, ANSWER BY TYPING *'v'.

THE

SOF TWARE WUESTIONS AND THE DEFAULT VALUE ARE

QUICK VERIFY PASS

(L)

¥ ?

°Y'

THEN EACH TEST WILL

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

CONTINUING TO THE NEXT TEST

ITERATE ONLY ONCE BEFORE

IN SEQUENCE.

CONTINUING ON THE NEXT TEST IN SEQUENCE.

ALSO SOME

TESTS WILL DO WITH MORE

TESTPATTERNS

NUMBER OF MATCH CHARACTER COUNTS (0) 63.?
AFTER THIS QUESTION YOU CAN CHANGE

NUMBER OF BYTE COUNTS (0) 2047. ?

THE NUMBER OF DMA CYCLES

PARAMETER CODING

MACRO M1113
AFTER THIS

06-SEP-82 16:46

SEQ 10

PAGE 9

QUESTION YOU CAN SELECT

THE ADDITIONAL STANDBY TEST

:égSRSHEC
K EXTENDED ADDRESS BITS FOR

THE

Q0-22

DO YUU WANT THE ADDITIONAL STANDBY TEST (L)

2.6

BUS WITHOUT

? N

EXTENDED P=-TABLE DIALOGUE

WHEN YOU ANSWER THE HARDWARE QUESTIONS, YOU ARE BUILDING ENTRIES

IN A TABLE THAT DESCRIBES THE DEVICES UNDER TEST.

WAY TO BUILD THIS TABLE

UNlT T0 BE TESVED.

THE SIMPLEST

IS TO ANSWER ALL QUESTIONS FOR EACH

IF YOU HAVE A MULTIPLEYED DEVICE SUCH AS

A MASS STORAGE CONTROLLER WITH SEVERAL DRIVES OR A COMMUNICATION
DEVICE WITH SEVERAL LINES, THIS BECOMES TEDIOUS SINCE MOST OF
THE ANSWERS ARE RE°ETlTIOUS.

TO ILLUSTRATE A MORC EFFICIENT METHOD, SUPPOSE YOU ARE TESTING
A FICTIONAL DEVICE, THE XY11.,
SUPPOSE THIS DEVICE CONSISTS OFf

A CONTROL MODULE WiTA EIGHT UNITS (SUB-DEVICES) ATTACHED T0 IT.
THESE UNITS ARE DESCRIBED BY THE OCTAL NUMBERS O THROUGH 7.

THERE

lS ONE HARDWARE PARAMETER THAT CAN VARY AMONG UNITS CALLED THE

Q-FACTOR.
THIS Q=FACTOR MAY BE O OR 1.
BELOW IS A SIMPLE WAY
TO BUILD A TABLE FOR ONE XY11 WITH EIGHT UNITS,
# UNITS

(D)

B8<(R>

UNIT 1
160000<CR>
CSR ADDRESS (0) ?
0<CR>
SUB-DEVICE # (0 ?

Q=FACTOR (0)

0 ?

UNIT 2
CSR ADDRESS (0) ?

1<(R>

160000<CR>

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

UNIT 3
160000<CR>
CSR ADDRESS (0) ?
2<(R>
SUB-DEVICE # (0) ?
<CR>
Q-FACTOR (0) 0 ?
UNIT &

160000<CR>
CSR ADDRESS (0) ?
3<(R>
SUB-DEVICE # (0) ?
<(R>
Q-FACTOR (0) 0 ?

UNIT S
(SR ADDRESS (0) ?

160000<CR>

4<(R>
SUB-DEVICE # (0 7
Q=-FACTOR (0) 0 ?
<(R>

UNIT 6
160000<CR>
(SR ADDRESS (0) ?
S<(R>
SUB=-DEVICE # (0) ?

PARAMETER CODING

MACRO M1113 06-SEP-82 16:46 PAGE 9-1
Q=FACTOR (0) 0 ?

<(R>

UNIT 7
160000<CR>
CSR ADDRESS (0) ?
6<(R>
SUB-DEVICE # (0 ?
1<(R>
Q=FACTOR (0) 0 ?
UNIT 8
160000<(R>
CSR ADDRESS (0)
7<(R>
SUB-DEVICE # (D) ?
<(R>
Q-FACTOR (0) 1 ?
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 SIGNIFICANTLY FROM UNIT TO UNIT.

NOT VERY EFFICIENT.

THE PROCEDURE SHOWN IS

THE RUNTIME SERVICES CAN TAKE MULTIPLE UNIT SPECIFICATIONS HOWEVER.

LET'S BUILD THE SAME TABLE USING THE MULTIPLE SPECIFICATION

FEATURE.

# UNITS

(D)

B<(R>

UNIT 1

160000<CR>
CSR ADDRESS (0) ?
SUB-DEVICE # (0) ? 0,1<CR>
1,0<CR>
G-FACTOR (0) 0 ?

UNIT 3
160000<CR>
CSR ADDRESS (0) ?
2=5<(R>
?
(0)
#
E
SUB-DEVIC
O0<CR>
Q-FACTOR (0) 0 ?
UNIT 7
160000<CR>
CSR ADDRESS (0) ?
SUB-DEVICE # (0) ? 6,7<CR>
1<(CR>
Q-FACTOR (0) 0 ?

AS YOU CAN SEE IN THE ABOVE DIALOGUE, THE RUNTIME SERVICES WILL
BUILD AS MANY ENTRIES AS IT CAN WITH THE INFORMATION GIVEN IN ANY
ONE PASS THROUGH THE QUESTIONS.
IN THE FIRST PASS, TWO ENTRIES
ARE BUILT SINCE TWO SUB-DEVICES AND Q-FACTORS WERE SPECIFIED.

THE

SERVICES ASSUME THAT THE CSR ADDRESS IS 160000 FOR BOTH SINCE IT
WAS SPECIFIED ONLY ONCE.
IN THE SECOND PASS, FOUR ENTRIES WERE
Qp}}l THIS IS BECAUSE FOUR SUB-DEVICES WERE SPECIFIED. THE
CONSTRUCT TELLS THE RUNTIME SERVICES TO INCREMENT THE DATA
'
FROM IHE FIRST NUMBER TO THE SECOND.
IN THIS CASE, SUB-DEVICES
(IF THE SUB-DEVICE WERE SPECIFIED
2. 3, 4 AND S WERE SPECIFIED.
BY ADDRESSES, THE INCREMENT WOULD BE BY 2 SINCE ADDRESSES MUST
BE ON AN EVEN BOUNDARY.) THE CSR ADDRESSES AND Q-FACTORS FOR
THE FOUR ENTRIES ARE ASSUMED TO BE 160000 AND O RESPECTIVELY
SINCE THEY WERE ONLY SPECIFIED ONCE. THE LAST TWO UNITS ARE
SPECIFIED IN THE THIRD PASS.

PARAMETER CODING

MACRO M1113

06-SEP-B2 16:46

THE WHOLE PROCESS COULD HAVE BEEN ACCOMPLISHED

SHOWN BELOW.

# UNITS

(D)

SEQ 12

PAGE 9-2
IN ONE

PASS AS

B<(R>

UNIT 1
160000<CR>
(3R ADDRESS (0) ?
SUB=DEVICE # (0) ? 0=7<CR>
0-FACTOR (0) 0 ?
0,1, 0....1 1<CR>
AS YOU CAN SEE

FROM THIS EXAMPLE,

NULL REPLIES

(COMMAS EN CLOSING

A NULL FIELD) TELL THE RUNTIME SERVICES TO REPEAT THE LAST REPLY.

PARAMETER CODING

MACRO M1113

06-SEP=-82 16:46

2.7 QUICK START=UP PROCEDURE

PAGE

SEQ 13

(XXDP+)

T0 START=yP THIS PROGRAM:

1. BOOT XxxpP+

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

TYPE "'R NAME'', WHERE NAME

FILE

FOR

THIS PROGRAM

[S THE NAME OF

THERE

THE BIN OR BIC

4. TYPE “START"
5. ANSWER THE '‘CHANGE HW'' QUESTION WITH *'v*'

6. ANSWER ALL THE WARDWARE QUESTIONS
7. ANSWER THE ''CHANGE SW'* QUESTION WITH *N''
WHEN YOU FOLLOW THIS PROCEDURE

YOU WILL BE USING ONLY

DEFAULTS FOR FLAGS AND SOF TWARE PARAMETERS.
ARE

DESCRIBED

2.7.1

IN SECTIONS 2.3 AND 2.5.

C(ONTROL CHARACTERS

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

A DIAGNOSTIG

A CONTROL 7 ENTERED DURING ONE OF

. CAUSES THE

THE

THESE DEFAULTS

REMAINDER

THE OPERATOR DIALOGUES

_DEFAULTS TO BE TAKEN FOR
OF

THAT

DIALOGUE.

06-SEP-82 16:46

PAGE 11

3.0 ERROR INFORMATION

3.1 TYPES OF ERROR MESSAGES
THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED 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 MESSAGE

NAME

IS OF

THE FORM:

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

+WHERE; 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 ADDITIONAL
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',
“'IBRTM OR "IXE'"' FLAGS ARE SET (SECTION 2.3).

THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL ERROR

MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES.

EXAMPLES:

CZIEA SOFT ERR 00301 ON UNIT 00 TST 003 SuB 000 PC: 001234
READ-WRITE BITS NOT CORRECT

, GOOD DATA :00000 ,BAD DATA :00001

NOTE THAT THE ERROR NUMBER IS IN THE FORMAT 'TNN' WHERE:
T

IS THE TEST NUMBER AND

IE.

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

IS THE ERROR NUMBER WITHIN THE TEST

SEQ 14

MACRO M1113

PARAMETER CODING

¢
MACRO M1113

06-SEP-82 16:46

SEQ 15

PAGE 12

3.2 SPECIFIC ERROR HESSAGES AND REPORTS
ERROR

MESSAGES:

ME SSAGE
MNININININININY
O 00 CO WSS B SN NN
WWNWWWWWNTNIO
OO OO0O0O0O0O0O000O
WV ESANIN =2 O N =2 N =N =2 (NN = NN = O

mmmmmmmmmmmmmmmmmmm

PARAMETER CODING

ERROR

READ = WRITE BITS INCORRECT

BITS NOT CLEARED AFTER BUS RESET
MUX BIT IN CSR NOT SETABLE

CSR CONTENTS INCORRECT
NO INTERRUPT WHEN EXPECTED
INCORRECT PRIORITY LEVEL

BITS IN IIR REGISTER INCORRECT
BITS IN ISR REGISTER INCORRECT

DATA TRANSFER FROM CHANNEL 1 TO 2 INCORRECT
DATA TRANSFER FROM CHANNEL 2 TO 1 INCORRECT

1CR CONTENTS INCORRECT
DIR CONTENTS INCORRECT
RX BUFFER CONTENTS INCORRECT AFTER DMA (2 TO 1)
RX BUFFER CONTENTS INCORRECT AFTER DMA (1 TO 2)
NO INTERRUPT AFTER DMA
NO INTERRUPT AFTER READ FROM A NXM ADDRESS

BAR CONTENTS INCORRECT
BCR CONTENTS INCORRECT
REPORTS:

CALL

MESSAGE

ERR101
ERR201

REGISTER AT (AAAAAA) DOES NOT RESPOND
REGISTER: CSR,CHA.:(CC) .cooo DATA:NNNNN,BAD DATA:NNNN
(FOR IEU11A IGNORE BIT 9-12)
REGISTER: (RRR),CHA.:(CC) ,GOOD DATA:NNNN,BAD DATA:NNN

ERR202
ERR501
ERRZ23

CHAN.: (CC) ,CORRECT PRIORITY:(PPP) ,WRONG PRIORITY: (PPP)
CHANNEL :(CC) IS SELECT ED
CHAN.: (CC),GOOD DATA:NNNN ,BAD DATA:NNNN,ITERATION:NN
GOOD DATA TXADDR BAD DATA RXADDR BYTE CNT#
DDDDDD

AAAAAA

DDDDDD

AAAAAA

CCCCCC

4.0 PERFORMANCE AND PROGRESS REPORYS

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 CAN BE USED T0 C NIROL HOW OFTEN THE END

OF PASS MESSAGE IS PRINTED.

5.0 DEVICE

INFORMATION TABLES

SECTION 2.2 DESCRIBES SWITCHES.

PARAMETER CODING

MACRO M1113

06-SEP-82 16:46

SEQ 16

PAGE 13

6.0 TEST SUMMARIES
6.1

TEST 1 =IEX11

: REGISTER ADDRESSING TEST

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

CONF IGURED OR THAT THE ADDRESS IS WRONG.
COMMUNICATION BETWEEN THE MAIN CPU AND THE

IEX11

INCORRECTLY

IS ACCOMPLISHED

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

6.2

IEX = TEST 2 :

RESETS THE

INITIALIZATION TEST

IEX AND ENSURES THAT REGISTERS CSR,I1IR,ISR,ICR,IDR,MCR

IN BOTH CHANNELS ARE IN THEIR PROPER INITI ALIZATION STATE’
REGISTERS BAR AND BCR ARE NOT IN A DEFINIT IVE STATE rrea RESET
SO THEY ARE NOT TESTED HERE.
THE MUX BIT IN CSR IS ALSO TESTED.

6.3

IEX = TEST 3 : R/W BIT TEST

THIS TEST CHECKS ALL R/W BITS OF

éga?OYHc§:$NNELS.
+

CSR,BAR,BCR AND MCR REGISTERS

IT ALSO TESTS THE MASTER CLEAR FUNCTION IN

THE

TMS 9914 REGISTERS IIR,ISR,ICR,IDR ARE NOT CHECKED

6.4

IEX = TEST & : SYSTEM CONTROLLER COMMANDS TEST

IN THIS TEST.

PART 1

CHANNEL 1 WHICH 1S SELECTED AS SYTSTEM CONTROLLER,

SENDS THE

REN MESSAGE BY MEANS OF THE AUXILIARY COMMANDS Sic AND SRE.
ALSO, BOTH IIR AS WELL AS ISR REGISTERS ARE CHECKED.

PART 2 CHANNEL 2 WHICH 1S SELECTED AS SYTSTEM CONTROLLER,

SENDS THE

REN MESSAGE BY MEANS OF THE AUXILIARY COMMANDS SiC AND SRE.

IFC AND
IFC AND

ALSO BOTH IIR AS WELL AS ISR REGISTERS ARE CHECKED.

IEX = TEST 5 : INTERRUPT TEST

6.5
PART

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 AND BO BIT IN IIR 1 REGISTER.

PART 2 (HECKS THE DEVICE PRIORITY LEVEL AND

THE FUNCTION OF INTERRUPT SEQUENCE IN CHANNEL 2.
INITIATING THIS SEQUENCE WILL BE DONE BY SEYTING THE INT ENB,DMA ENB

PARAMETER CODING

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

BITS IN CSRZ AND BO BIT IN IIR 2 REGISTER.

6.6
PART

IEX = TEST 6 : ADDRESS REGISTER TEST
1

CHANNEL 1

CHECKS THE CORRECT FUNCTION OF ADDRESS REGISTER 1

BY LOADING ITS DEVICE PRIMARY ADDRESS

ASSIGNED LISTEN Or
NOTE:
THE ULPA BIT IN THE
FROM THE STATUS OF
PART 2 CHECKS THE FUNCTION

TALKER ADDRESS VI
ISR1 REGISTER IS
DPA1 (DPA1=ULPA I
OF THE °‘‘DAT'', ‘DA

IF THE QUICK VERIFY PASS IS NOT SELECTED, TH
IT WITH DIFFERENT DPA'S.

6.7

(ICR) OF

IEX = TEST 7 : ADDRESS REGISTER TEST

(ADR)

INTO BIT A1-A5 AND RECEIVING THE
3

gD “EDPA’'' BIT OF ADR1 REGISTER
T

ITERATION WILL

(ICR) OF CHANNEL 2

THI5 TEST IS THE SAME TEST AS TEST 6 EXCEPT THE CHANNEL IS CHANGED
PART 1 CHECKS THE CORRECT FUNCTION OF ADDRESS REGISTER 2 (ADR)

BY LOADING ITS DEVICE PRIMARY ADDRESS INTO BIT A1-A5 AND RECEIVING THE

ASSIGNED LISTEN OR TALKER ADDRESS VIA THE IEC/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 THE QUICK VERIFY PASS IS NOT SELECTED, THE TEST ITERATION WILL DO
IT WITH DIFFERENT DPA'S.

NOTE:

6.8

IEX = TEST 8 : DATA TRANSFER TEST

THIS TEST

IS DIVIDED

IT CHECKS THE

PART

INTO TWO PARTS.

DATA OUT

(DOR) AND DATA IN (DIR) REGISTERS .

CHECKS DOR AND DIR REGISTERS BY LOADING THE DOR1 WITH A DATA BYTE
AND READING IT FROM THE DIR2 (PROGRAMMED DATA TRANSFER FROM

CHAN.1

TO CHAN.2).

PART 2 CHECKS DOR AND DIR REGISTERS BY LOADING THE DOR2 WITH A DATA BYTE
AND READING IT FROM THE DIR1 (PROGRAMMED DATA TRANSFER FROM

CHAN.2 TO CHAN.1).

IF THE QUICK VERIFY PASS IS NOT SELECTED, THE TEST
CARRIED OUT WITH A DIFFERENT DATA PATTERN

ITERATICON IS

6.9

CHANNEL 1

(LISTENER)

EXTENDED LISTENER INTERFACE FUNCTION .
IS TO CHECK THE SECONDARY ADDRESSING
BY MEANS OF RECEIVING A VALID AS WELL AN

INVALID MY

IEX = TEST 9 : SECONDARY ADDRESSING TEST OF

THIS TEST CHECKS THE
PURPOSE OF THIS TEST

FEATURE OF

CHANNEL

SECONDARY ADDRESS (MSA1)

6.10

TEX = TEST 10 :

SECONDARY ADDRESSING TEST OF

CHANNEL 1

(TALKER)

Q17

PARAMETER CODING

MACRO M1113

06-SEP-82 16:46

SEQ 18

PAGE 13-2

THIS TEST CHECKS THE EXTENDED TALKER INTERFACE
PURPOSE OF THIS TEST IS TO CHECK THE SECONDARY
FEATURE OF CHANNEL 1 8: MEANS OF RECEIVING A V
SECONDARY ADDRESS (MSA1)

6.1

IEX = TEST 11

L AN INVALID My

: 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 INVALID My

SECONDARY ADDRESS (MSA2)

6.12

IEX = TEST 12 : SECONDARY ADDRESSING TEST OF CHANNEL 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 AN INVALID MY

SECONDARY ADDRESS (MSA2)

6.13
PART 1

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

SD
PART 2 CHECKS THE DEVICE CLEAR INTERFACE FUNCTION OF

CHANNEL 1 BY MEANS OF

?ESE§V1NG A UNIVERSAL COMMAND (DCL) AS WELL AS AN ADDRESS COMMAND

6.14
PART 1

IEX = TEST 14 : DEVICE TRIGGER INTERFACE FUNCTION TEST
CHECKS THE TRIGGER INTERFACE FUNCTION OF CHANNEL 2 BY MEANS OF
RECEIVING THE ADDRESS COMMAND GET AS WELL AS THE AUXILIARY
COMMAND NOT FGET.

PART 2 CHECKS THE TRIGGER INTERFACE FUNCTION OF CHANNEL 1 BY MEANS OF
RECEIVING THE ADDRESS COMMAND GET AS WELL AS THE AUXILIARY
COMMAND NOT FGET.

6.15

IEX = TEST 15 :

INCOMPLETE SOURCE HANDSHAKE TEST

PART 1 CHECKS THE 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 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.

PARAMETER CODING

MACRO M1113

6.16

06-SEP-82 16:46

SEQ 19

PAGE 13-3

IEX = TEST 16 : CHANGING OF THE CONTROLLER CONFIGURATION

PART 1

(HECKS THE CHANGING OF THE CONTROLLER CONFXGURA!ION FROM 1 10 2
BY MEANS OF THE AUXILIARY COMMANDS RQC AND
R
PART 2 CHECKS THE CHANGING OF THE CONTROLLER CONF!GURAYION FROM 2 TO 1

BY MEANS OF

6.17

THE AUXILIARY COMMANDS RQC AND RLC.

IEX = TEST 17 : REMOTE/LOCAL INTERFACE FUNCTION TEST

PART 1

CHECKS THE REHOTE/LOCAL FUNCTION OF CHANNEL 2 USING THE FOLLOWING
COMMANDS GTL,LLO,NOT RTL.
PART 2 CHECKS THE REHOYE/LOCAL FUNCTION OF CHANNEL 1 USING THE FOLLOWING
R
COMMANDS GTL,LLG,NOT

6.18

IEX = TEST 18 : SERVICE REQUEST INTERFACE FUNCTION TEST OF CHANNEL 1

THIS TEST CHECKS THE SERIAL POLL REGISTER OF

CHANNEL 1

PART 1 SETS AND CLEARS THE RSV BIT IN_SPR REGISTER OF CHANNEL 1
AND CHECKS THE SRQ BIT IN ISR2.
PART 2 CHECKS THE SERIAL POLL SEQUENCE OF

CHANNEL 1.

IF QUICK VERIFY PASS IS NOT SELECTED, THE SERIAL POLL SEQUENCE IS CARRIED

OUT WITH DIFFERENT DATA,

6.19

IEX = TEST 19 : SERVICE REQUEST INTERFACE FUNCTION TEST

THIS TEST CHECKS THE SERJAL POLL REGISTER
PART 1 SETS AND CLEARS THE RSV BIT IN SPR
CHECKS THE SRQ BIT IN ISR1,
PART 2 CHECKS THE SERIAL POLL SEQUENCE OF
If QUICK VERIFY PASS IS NOT SELECTED, THE
OUT WITH DIFFERENT DATA,

6.20

OF CHANNEL 2.
REGISTER OF CHANNEL 2 AND
CHANNEL 2.

SERIAL POLL SEQUENCE IS CARRIED

IEX =TEST 20 : PARALLEL POLL INTERFACE FUNCTION TEST OF CHANNEL

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

6.21

OF CHANNEL 2

(LOCAL CONFIGURED).
(REMOTE CONFIGURED).

IEX = TEST 21 : PARALLEL POLL INTERFACE FUNCTION TEST OF CHANNEL 2

PART 1 (HECKS PARALLEL POLL SEGUENCE
PART 2 C(HECKS PARALLEL POLL SEQUENCE

(LOCAL CONFIGURED).
(REMOTE CONFIGURED).

MACRO M1113

PART

6.23
PART

IEX = TEST 22 : END OF A MESSAGE BLOCK TEST
CHECKS THE END OF A MESSAGE BLOCK FROM CHANNEL 1.
EOl MESSAGE VIA THE IEC/IEEE BUS.
(HECKS THE END OF A MESSAGE BLOCK FROM CHANNEL 2.
EOIl MESSAGE VIA THE IEC/IEEE BUS.

PART
PART

CHANNEL 1 SENDS THE

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 CHAN.2 WHICH IS
3 CTED AS A LISTENER PERFORMS A DATOB CYCLE.
THE MAX. SELECTABLE BYTE

PART

CHANNEL 2 SENDS THE

IEX = TEST 23 : DMA DATA TRANSFER TEST FROM CHANNEL 1 TO 2

AND THE HIGHEST BUS ADDR

CHECKS THE NON EXISTENT M

UN T FOR THIS DATA TRANSFER

RY
IS DONE BY A DMA FROM B N
SELECTED IN THE BUS ADDRES RE
SAME PROCEDURE AS IN PART 1 3 xC
THIS

OVER 32K (IF MEMORY MANAGEME NT

moom
ot ) o= Vo 2 e (D

PART 1

SEQ 20

PAGE 13-4

wnre

6.22

06-SEP-82 16:46

PARAMETER CODING

X(
SAME PROCEDURE AS IN PART 1 EXLE
N
OVER 64K (IF MEMORY MANAGEMENT

IS 2k BYTES

X ISTING [/0 PAGE ADDRESS
E R OF CHAN 1 (DATI CYCLE).
T HE DATA TRANSFER IS EXECUTED
AVAIL ABLE)
T HE DATA TRANSFER IS EXECUTED

A VAILABLE).

IEX = TEST 24 : DMA DATA TRANSFER TEST FROM CHANNEL 2 TO 1
PART

SENDS DATA VIA THE IEC/IEEE 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 TN%S
DATA TRANSFER IS 2K BYTES

PART

CHECKS THE NON EXISTENT MEMORY BIT OF (HANNEL 1

AND THE HIGHEST BUS ADDRESS IS BELOW

THIS IS DONE BY A DMA FROM A NON EXISTING 1/0_PAGE ADDRESS

SELECTED IN THE BUS ADDRESS REGISTER OF CHAN 2 (DATOB CYCLE).
PART 3 SAME PROCEDURE AS IN PART 1 EXCEPT THE DATA TRANSFER IS EXECUTED
OVER 32k (IF MEMORY MANAGEMENT IS AVAILABLE)
PART 4 SAME PROCEDURE AS IN PART 1 EXCEPT THE DATA TRANSFER IS EXECUTED
OVER 64K (IF MEMORY MANAGEMENT IS AVAILABLE).

6.25
PART

PART

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

SUCCESSIVE EO0S C CHARACTERS (177)
VIN
TE
VIA THE IEC/IEEE BUS TO CHANNEL 1. AFTER RECEIVING
THESE CHARACTERS
THE DMA DATA !RANSFER IS TERMINATED BY CHANNEL 1 ( COMP END).
SAME AS PART1 EXCEPT THAT A WRONG QUANTITY OF SuC CESSIVE EOS

A PREDEFINED QUANTITY (MC

INPUT) OF

CHARACTERS ARE TRANSMITTED BEFORE THE CORRECT QUANTITY OF SUCCESSIVE
EOS CHARACTER ARE YRANSHIYYED

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

PARAMETER CODING

MACRO M1113

6.26
PART

06-SEP=B82 16:46

IEX = TEST 26
1

SEQ 20

13-5

MCR FUNCTION TEST OF CHANNEL 2

(CHANNEL 1 TRANSMITS 9 DATA BYTES (50) THAN
A PREDEFINED QUANTITY (MC INPUT)OF SUCCESSIVE EOS CHARACTERS

VIA THE

PART 2

PAGE

IEC/IEEE BUS TO CHANNEL 2.

(177)

AFTER RECEIVING THESE CHARACTERS

THE DMA DATA TRANSFER IS TERMINATED BY CHANNEL 2 (COMP END).
SAME AS PART 1 EXCEPT THAT A WRONG QUANTITY
OF SUCCESSIVE EOS
CHARACTERS
ARE TRANSMITTED
BEFORE THE CORRECT QUANTITY OF SUCCESSIVE

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

6.27

IEX = TEST 27 EXTENDED ADDRESS BIT (Q22-BUS) TEST

THIS TEST IS ONLY BE CARRIED OUT IF A Q-BUS
MEMORY IS GREATER THAN 128K (Q22-BUS).
PART

FINDS OUT

YES

THE AVAILABLE MEMORY

IS USED AND

IS GREATER

THE

THAN 128K.

,THEN A DMA IS CARRIED OUT BY SENDING DATA VIA THE

1EC/IEEE BUS FROM CHANNEL 1 TO 2.

THE

PART 2

6.28

AVAILABLE

SEQUENCE

DESCRIBED ABOVE

1S ALSO execurso WITH 256K

512k (BA 20 SET)AND 1024K (BA 21
SAME AS PART

EXCEPT

THE

SET

CHANNELS

CARRIED OUT FROM CHANNEL 2 T0 1.

(BA

THE DMA DATA TRANSFER

19 SET),

IEX = TEST 28 ADDITIONAL STANDBY TEST

L?%aobgs;efiag
BE USED IF

YOU WANT

TO CHECK THE EXTENDED ADCRESS BITS

IT MOVES
A SLIDING ONE'S BIT PATTERN ACROSS THE ADDRESS LINE 16,17,

}3E1g
.20,21

IGNORING NXM ERRORS BUT

CHECKING THE ADDRESS REGISTER LINES

THE PATTERN SHOULD BE CHECKED ON A LOGIC ANALYSER .
THE LOGIC ANALYSER HAS TO BE CONNECT TO THE ADDRESS LINES 16-21
THE TRIGGER HAS TO BE CONNECT TO THE SIGNAL ADREN L(E9, PIN &).
THIS TEST IS ONLY CARRIED OUT
THE SOF TWARE QUESTION.

7.0 PROGRAM LISTING

A Q-BUS

IS USED AND

YOU ANSWER

J
PROGRAM HEADER AND TABLES
1011

MACRO M11%3

06=-SEP=-82 16:46

PAGE 14

.TITLE PROGRAM HEADER AND TABLES

}8;%

.SBTTL

1040 000000
1041
1043
1044
1045 002000
1046
1047
1048
}8?8

s
. THE PROGRAM HEADER

002000
002001
002002
002003
002004
002005
002006
002007
002010
002010

103
132
M
105
101
000
000
000

002011
002012
002012
002014
002014

060
000001

002016

076724

002020

077336

002022
002024
002024

002216

002026
002030
002030
002032
002032
002034
002034
002036
002036
002040

100004

002020
002022

002026

102

000000

002234

000000

000000
000000

002040 002124
002042

IS THE INTERFACE BETWEEN
THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR.

‘

1054
1071
1072 002000

002016

AMA,ABS
s
2000

BGNMOD

1051

002011

.ENABL
.

002000

‘gg% 002000

002000

PROGRAM HEADER

LSNAME : :

LSREV::

L$DEPO: :
LSUNIT::
LSTIML::

LSHPCP: :

LS$SPCP::
LSHPTP: :
LSSPTP::

LSLADP: :
L$STA::
L$CO::

LSDTYP::
LSAPT::

L$DTP::

LS$PRIO::

POINTER BGNDU,BGNAU,BGNSETUP,BGNSW,BGNSFT
,ERRTBL

HEADER

CZ1EA,B,.0,0.0
:DIAGNOSTIC NAME

LASCII
LASCII
LASCII
LASCI1
LASCII
BYTE
.BYTE
BYTE

/7C/
727
71/
/E/
7A/
O
O
O

LASCII

/8/

LASCII

70/

WORD

TSPTHV

LWORD

LSHARD

.WORD

LSSOFT

LWORD

LSHW

.WORD

L$SW

.WORD

LSLAST

LWORD

.WORD

LWORD

.WORD

LSDISPATCH

sREVISION LEVEL

;0
sNUMBER OF UNITS
:LONGEST TEST TIME

:POINTER TO H.W. QUES.

:POINTER TO S.W. QUES.
sPTR. TO DEF. H.W. PTABLE
;PTR. TO S.W. PTABLE

;:DIAG. END ADDRESS
sRESERVED FOR APT STATS

:DIAGNOSTIC TYPE
:APT EXPANSION

:PTR. 70 DISPATCH TABLE

;DIAGNOSTIC RUN PRIORITY

SEQ 22

K
PROGRAM HEADER AND TABLES
PROGRAM HEADER

002042

000000
000000

O VYW
AT

NINININININININOND

[e=lelelelolelolel=]
[oleleolelololelel=

002046

000000

003
003
000000
000000
000000

003352
000000
000000

000000

012422
012340
000000

003414
104035

002504
011120

POND) b b b

b b

012314

1073

012230

011112
000000
000000

000000

MACRO M1113

06-SEP=-B2 16:46

LSENV]::

LSEXP1::
LSMREV::
LSEF::

L$SPC::
LSDEVP::

:
L$REPP:

LSEXPS::

LSEXPS5::
LSAUT::
LSOUT::
LSLUN::

LSDESP::
LSLOAD::

LSETP::
LSICP::

LSCCP::

LSACP::
LSPRT::

LSTEST::
LSDLY::
LSHIME::

.WORD
.WORD
+WORD

SEQ 23

PAGE 14-1

:FLAGS DESCRIBE HOW IT WAS SETUP

;EXPANSION WORD
:SVC REV AND EDIT #

CSREVISION

CSEDIT

.WORD
+WORD

+WORD
.WORD
.WORD

X
0

.WORD

+WORD

LSAU

.WORD

L$DU

+WORD

L$DESC

EMT

ESLCAD

.WORD

LSERRTBL

.WORD

LSINIT

.WORD

LSCLEAN

+WORD

LSAUTO

-WORD

L$PROT

.WORD
.WORD
.WORD

; POINTER TO DEVICE TYPE LIST

LSDVTYP
"
;PTR. TO REPORT CODE

.WORD

+WORD

:DIAG. EVENT FLAGS

;: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.

TO AUTO CODE

;PTR.

TO PROTECT TABLE

sTEST NUMBER

sDELAY COUNT

;PTR. TO HIGH MEM

1093
) o

)

) e

]

)

] ]

]

)

D el

D -

043116
)

) e =

= =t

+WORD

]

DISPATCH_28
OO

.WORD

]

LSDISPATCH::
.WORD

]

] ]

.SBTTL

]

000034

MACRO M1113

]

SSNNINNNIN)
= =3 - - — et
O NN
= NWO
WD S WA ~N)
o &H» ~ &
~ ~N oW
[« X &»
2F > o

(=lolelelelelelelele] o o o

SNNOOSTNOOSNOON
S SN

DISPATCH TABLE

PROGRAM HEADER AND TABLES

NONINININININININD
b b d b b b b b b =2 O OO NN S NN =
CONOWVSWN=OVRNO
WV WN—=O

)

—

IWAWNWNLES
85 8 BN WNIWNIWNIWNNINI NN N

o [elelelelelelelelelelelelelele]
=1=] [sleleleleleoleleoleleoleolelele
]
~N XN NTNTNTNTNTNTNTNTNT
N NT N1 N

(06-SEP-82 16:46

PAGE 15

: IT IS USED BY THE SUPERVISOR TO DISPATCH TO E & C H TEST.

THE DISPATCH TABLE CONTAINS THE STARTING ADDR E S S OF

SEQ 24

DISPATCH TABLE

EACH TEST.

m2
PROGRAM HEADER AND TABLES

DEFAULT HARDWARE P-TABLE

MACRO M1113

06-SEP-82 16:46

.SBTTL

1101
110%

DEFAULT HARDWARE P-TABLE
(L lalind
4

110

ROWARE P-TABLE CONTAINS DEFAULT VALUES OF

1104
1105
1106
1107
1108

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

1109
1110 002214

002214
002216
002216

000006

1121 002216
1122 002220
1123 002222
1124 002224
1125 002226
1126 02230
1127

160140

1111

SEQ 25

PAGE 16

1128
1129 002232

002232

000000

-LSHW/2

LSHW::
DFPTBL::
-WORD

:1ST (OF 8) REGISIER ADDRESS
:1ST (OF 2) VECTOR ADDRESS

;DEVICE PRIORITY LEVEL
:DEVICE PRIMARY ADDRESS FOR (H.1
;DEVICE PRIMARY ADDRESS FOR (H.2
;DEFAULT VALUE FUR TESTCABLE

L10000:

N
PROGRAM HEADER AND TABLES

SOF TWARE P=-TABLE

113%
113
1134

06-SEP-82 16:46

.SBTTL

SEQ 26

PAGE 18

SOFTWARE P-TABLE

see
: THE SOFTWARE TABLE CONTAINS VARIOUS DATA USED BY THE
: PROGRAM AS OPERATIONAL PARAMETERS.
THESE PARAMETERS ARE
¢ SET UP AT ASSEMBLY TIME AND MAY BE VARIED BY THE OPERATOR
: AT RUN TIME.

1135
1136
1137
}}%g

1140 002232
002232

MACRO M1113

002234
002234

1150 002234
1151 002236
1152 002240
1153 002242
1154 002244

11e8 002244

1156 002244

000004

000001
000077
003777
000000

L$SW::
SFPTBL:
QVP::
MCINP::
BCINP::
MAINB::

BGNSW
.WORD

SFPTBL
L10001=L$SW/2

JWORD
.WORD
.WORD

1
63.
2047.

.WORD
ENDSW
ENDMOD

;QUICK VERIFY SWITCH
sNUMBER OF DEFAULT MATCH CHARACTER COUNTS
;NUMBER OF DEFAULT BYTE COUNTS IS 2047 DECIMAL
:STANDBY TEST 28,DEFAULT

IS NO

L10001:

PROGRAM WEADER AND TABLES
SOF TWARE P=TABLE
1159
1170

MACRO M1113

06-SEP=-82 16:46

SEQ 27

PAGE 19

.TITLE GLOBAL AREAS

}};;

.SBTTL

1509

}5}? 002244

GLOBAL EQUATES SECTION

BGNMOD

121§

i THE GLOBAL EQUATES SECTION CONTAINS PROGRAM EQUATES THAT

121

14e

} }g

: ARE USED IN MORE THAN ONE TEST.

1216

1231
1232 002244

EQUALS

: BIT DIFINITIONS

100000

81T15== 100000
BIT14==
BIT13==
8IT12==
BIT11==
BIT10==
BIT09==
BIT08==
81T07==
BIT06==
BIT0S5==
BIT04==
BIT03=BIT02==
BITO1==
BIT00==

40000
20000
10000
4000
2000
1000
400
200
100
40
20
10
&
2
1

001000

8119==

BITO09

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

BIT8==
BIT7-=
BITh==
BIT ==
BITe==
BI'3==
BIr2==
eiT1==
BIT0==

BITO8
BIT07
BIT06
BITOS
BIT04
BIT03
BIT02
BIT01
BIT00

: EVENT FLAG DEF INITIONS
P " EF32:EF17 RESERVED FOR SUPERVISOR TO PROGRAM COMMUNICATION

000040

000037
000036
000035
000034

EF.START==

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

1.
30.
59.
8.

* PRIORITY LEVEL DEFINITIONS

: START COMMAND WAS [SSUED
*
:
:
*

RESTART COMMAND WAS [SSUED
CONTINUE COMMAND WAS I5SUED
A NEW PASS HAS BEEN STARTED
A POWER=-FAIL/POWER=UP OCCURRED

[aTA)

= =2NINNNWN
OO

06-SEP-B2 16:46

PAGE 19-1

PRI87==
PR] g==
PRIOS==
PRI04==

40
00
240
08

PRIO3==

PRI02== 100
PRIO1== &0

PRI00== 0

:OPERATOR FLAG BITS

fvL==
LOT==

ADR==

IDU==
ISR==
UAM==
BOE==

PNT==
PR]==

100000

IXE==
IBE==
1ER==
LOE==

HOE==

40
100
200
400

1000
2000

4000
10000
20000
40000

100000

SEQ 28

M1113

(=lelelelelelel-)
orororos
gO

—

OOOOOOOg
o>
[eolelelelelols]

[=l=lelelelelelBal

GLOBAL AREAS
GLOBAL EQUATES S

]

s 1EX11 VECTOR AND REGISTER INDIRECT POCINTERS
OSNOOSTNOC
ST NOOSNOOSNOON
-

S S S NN N N OO O AN S

[elelelelelelelelelelelelelelelalelolalel=0"¢
OO0O00000000000O000000000

NN
NN

CRRRRRRRRNRRRRRROERRRROCCERORCERRRROEEROERNRORNOONRAORNOERRNRY

VECC1::
VECC2::
1IRX::
TIRLX::

LWORD
WORD
LWORD
LWORD

O
O
O
O

s INTERRUPT VECTOR FOR CHANNEL 1
s INTERRUPT VECTOR FOR CHANNEL 2

ISRHX: :

LWORD

sPOINTER TO HIGH BYTE OF STATUS REGISTER
sPOINTER TO IEEE _COMMAND REGISTER
sPOINTER TO LOW BYTE OF ICR REGISTER

TIRHX::
ISRX::
ISRLX::

ICRX::
ICRLX::

ICRHX: :

WORD
.WORD

LWORD

O
O
O

O
O

IDRX::
IDRLX::
IDRHX: :
CSRX::
BARX::
BCRX::

WORD
LWORD
WORD
WORD
WORD
.WORD

0
O
O
O
O
O

DPA1::
DPA2::

WORD
LWORD

0
O

MCRX::
MCRHX: :

000000

WORD
.WORD
.WORD

PLEV::

.WORD
WORD
.WORD

0
O
O

;POINTER TO IEEE INTERRUPT REGISTER
sPOINTER TO LOW BYTE OF IIR REGISTER

;POINTER TO HIGH BYTE OF INTERRUPT REGISTER
;POINTER TO IEEE STATUS REGISTER
sPOINTER TC LOW BYTE OF ISR REGISTER
;POINTER TO HIGH BYTE OF COMMAND REGISTER
;POINTER TO IEEt DATA REGISTER

sPOINTER TO LOW BYTE OF IDR REGISTER

sPOINTER
;POINTER
sPOINTER
sPOINTER
;POINTER
sPOINTER

TO
TO
TO
TO
TO
TO

HIGH BYTE OF DATA REGISTER
CONTROL & STATUS REGISTER
BU% ADDRESS REGISTER
BYTE COUNT REGISTER
MATCH CHARACTER REGISTER
HIGH BYTE OF MCR REGISTER

sPOINTER TO DEVICE PRIMARY ADDRESS FOR (H.1

sPOINTER TO DEVICE PRIMARY ADDRESS FOR (M.2
sPOINTER TO THE PRIORITY LEVEL

:"'..'.'.'l"""""""""."QQ'.."'..."'

sPROGRAM CONTROL PARAMETERS
S

000020
000000

2322233222232

1 TRDEF : :
ITRCNT: :

222222222200RRRRRRRRRRRRRRRRRRR] )

.MORD

WORD

s ITERATION DEFAULT

s ITERATION COUNTER

“

cRERRRRRRARRRROERORERRRRORRRRRRORRRRRRNRRRORRRRORRETS

000000

N
v

~N
w
N

M VARIABLES
*PROGRA
sERRERARRRRARRRRRROEROERRERTOCERRRRRORORRNREREORERORSE

=
o

voooo-ag \ngguuv-‘c»ocn~u>unawnn»nca<nn-e8knitvMU-aCM00l~uruntwAChocl~u>~n

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

PNTF::

NXMFLG::
MM22::
MMFLG::
PHHIGH: :
PHLOW: :

VIADD::

GLOBAL DATA SECTION

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

PHHSIZ::
PHLSIZ::
[P

000000

SIZEPA::
MASK : :
MASCOM: :
REGADD::

LWORD

.WORD
.WORD
WORD
WORD
.WORD

.WORD
LMWORD
WORD
WORD
.WORD
.WORD
.WORD

0
O
O
O
0

O
O
O
O
0
0
0

sFLAG FOR TEST HEADER PRINTOUT

sFLAG USED WHEN ADDRESS IS NXM,

sFLAG INDICATING 22 BIT MMU
sFLAG TO SEE IF MEMORY MANAGEMENT THERE
;LOCATION FOR MEMORY SIZE
sLOCATION FOR MEMORY SIZE
;LOCATION FOR VIRTUAL MEMORY SI12C
sLOCATION FOR MEMORY SIZE
:LOCATION FOR MEMORY SIZE
sLOCATION FOR MEMORY SIZE IN PAGE FORM
; BIT MASK OF READ/WRITE BITS
: COMPLEMENT OF MASK

: ADDRESS OF REGISTER TO BE TESTED

SEQ 29

PAGE 20

o
o

D s
e
s
D e
D e
D
e e e e
D
D e
D e
e
e
e e
e
D e
D e
D e
e
D e
e
D
— o

P
T
—-———————

06-SEP-B2 16:46
+SBTTL

S S LN N 1N V]~N)
NN NN NN PN NN NI NI NO NLSS ST NTNT N NN L S
LS LN LN LY NONLNINLNLALNLNLNINLNLNL
[+ ] 0 NN NNNNNNNNOC
O O O° OVYWV
BN W NN
OO0 0000
OO
VOO
&~
OV~
win

MACRO M1113
wLOBAL AREAS
GLOBAL DATA SECTION

20-1

s TEMPORAR Y LOC

s COUNTER USED

: TEMPORAR Y ST0
S TORE T0 SAVE My
3
SAVE My

VICE PRIM. ADDR.

ER
ADDRESS
ER ADDRESS

R ADDRESS (H.1

AAAAAA

AR RARRRRRRRRRRRRRRRRRRR]]]

*ERROR VARIABLES
000000
000000
000000

002512

000000

GOOD::

BAD::

AR RRRRRRRRRRRRRRRRRRRRRR
] ]

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

.WORD

0
0

.WORD
.WORD
.WORD
.WORD

[=l=lele]

ORD

sWORD USE D FO
sWORD USE D FO

ER ROR PRINTOUT
ER ROR PRINTOUT

[

Rttt

tetntttttttetdR Rt Rttt RRRERRARORRAGCORRRARRORRRRROROARRRRORRORORRRORORGRORTEOTY

“TABLE AREA FOR MCR FUNTIONS (TEST 25,26)

:'..'."....'."."""""""."..'.."lll'l"..'.'l.'.."'.."'..l"".

VDDV VDVDDVDDVIVDVDDVVDVDDDDD

MMMMMMMMMMMMMM
MMM m

)
)
]

0 Pt O

)
)

0 5t

)
]
]
)

Bt Pt Pt Pt

)
)
)

% Pt P

)
)

sVAR]ABLE COMPARE DATA

sVARIABLE COMPARE DATA
JVARIABLE COMPARE DATA
sVARIABLE COMPARE DATA
sVARIABLE COMPARE DATA
sVARIABLE COMPARE DATA
sVARIABLE COMPARE DATA
JVARIABLE COMPARE DATA

)

JVARIABLE COMPARE DATA
sVARIABLE COMPARE DATA

)

FOR
FOR
FOR
FOR
NTER

RX HIGH ADDRESS
RX LOW ADDRESS
DMA TX HIGH ADDRESS
oL
DMA TX LOW ADDRESS
FOR ERROR PRINTO uT
COMPARE DATA FOR ISR
COMPARE DATA FOR
COMr ARE DATA FOR
COMPARE DATA FOR
COMPARE DATA FOR
JVARIABLE COMPARE DATA FOR
sVARIABLE COMPARE DATA FOR
JVARIABLE COMPARE DATA FOR
L
L

SAVE MY TALKER ADDRESS (H.2
SAVE MS A

0 P

S
S
:S

DATA

)

000000

s INTERRUP T FLA
s INTERRUP T FLA

.WORD
.WORD
.WORD
+WORD

:STORE FO
sLOGICAL 0
sFLAG FOR CH

LT 7 AV AV AV AV AV AV AV AV XV AV NV XV XV XV XV Y7, )

N
~
~

02466

sWORK LOC

[AlAalalAlAlaTAlAlalalAlalaYalATaT214)

~N
&~

[=lel=lelel=]

.WORD
.WORD
+WORD

ELOCATIO?

DVDDVDDDVVDDDVDDDDDDODDDODD

(SRMS2::

ANS::

sLOCATION

MMMMMMMMMMMMMMM
MMM

+WORD
+WORD
.WORD
+WORD
.WORD
+WORD
+WORD
+WORD
+WORD
.WORD
+WORD
+WORD
+WORD
+WORD
+WORD
.WORD
+WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
+WORD
+WORD
.WORD
.WORD
+WORD
+WORD
.WORD
.WORD

PAGE

. P -

— ) —f VT

16:46

[aa)

BUFAB::
BUFBB::
::
CSRMSK
CSRMS1::

WWNNINININ)
= b b 2 OO O O NNNNO OO
NOOSTNOOSNNOO
S NOOSNOON SN

gOOOOOOOOOOOOOOOO
OCO00000VDO000000O00O00O0O0O0O0000

[=l=leleldlelele]

56
60

06=SEP=82

WN=O VNV

\NU"U“JN”UN”UN”U"UNF‘-h‘-“h*-h‘-‘—WDC"DSKRSZ
WN =OVONOWVSWN
-0V~

w
o
w

GLOBAL AREAS

o (=lelelelelelelelelelelelelolelelelelelalelelelelelelelelelelelelelelelelelele
o)

MACRO M1113

GLOBAL DATA SECTION

GLOBAL AREAS

MACRO M1113

GLOBAL DATA SECTION

1355
1356 002514

06-SEP-B2 16:46

1357
00 sg;
1358 0025

050

125
125
125
125
125

155
125
125
125
125

125
125
125
125
125

1366 002624

000007

1359
1360
1361
1362
1363
} gg

002551
002563
002575
002607
002621

1367
1368
1369 002732

3;(1)

1372 002734
1373

1374

1375
1376 003041

}ggg

1379 003044
1380
1381
1382

11252

155
125

000

050

TABF::

177

1393

1394
1395
1396
1397

.BYTE

"REPT

012

050

.EVEN

TABG::

BYTE

50,50,50,50,50,50,50,50.5

1125.125.125.125.125.125.125.125.1
§.1 5.1 2.1 §.195,1 2.1?5.155.1 5,125
5.155

:9DATA,63 EOS

:72 DATA BYTES

125.125,125.125,125,125,125,125,125,125
125,125,125,125,125,125,125,125,125,125
125.125.125.125.125.125.125.125,125.,125
125,125,125,125,125,125,125,125,125,125
125,125,125

0,0,0,0,0,0,0,0,0.0

0.0

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

:9 DATA,63 EOS

177,177,172,172,172,472,172 172,122,177
177,177,177

12,12,50,12,12,12

: 2605, 1DATA,63E0S

"REPT
BYTE
-ENDR

6
12,12,12,12,12,12,12,12,12,12

.BYTE
"REPT

0,0,0,0,0,0
6

:66 DATA BYTES

.BYTE

25,25,50,25.25.25

:2 E0S.1 DATABYTE,63 EOS

BYTE

25,25.25.25,25.25.25.25.25.2

EVEN
000

000006

000

TABH::

-ENDR

}ggg
1392

.BYTE
-ENDR
.BYTE

-ENDR
BYTE

1388

1391 003250

LREPT

BYTE

}ggz

1385 003146
1386

BYTE
BYTE

.EVEN

177

000006

NLIST BEX
.BYTE

JBYTE
BYTE
BYTE
JBYTE
BYTE
-EVEN

TABE : :

000

000006

125
125

TABD::

SEQ 31

PAGE 20-2

-EVEN

025

000006

025

050

TABK::

"REPT

.ENDR
JEVEN
LLIST BEX

GLOBAL AREAS

MACRO M1113

GLOBAL TEXT SECTION

06-SEP-B2 16:46

1400

s MESSAGES, AND ASCII INFORMATION THAT ARE USED IN

: MORE THAN ONE TEST.

O
oo

)

) i

0 ol ol ol oF ak b

il
il

GLOBAL TEXT SECTION

: THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS,

Oi
04

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

; NAMES OF DEVICES SUPPORTED BY PROGRAM

09
10

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

POl ¥ S

— o

PAGE 21

.SBTTL

681

SEQ 32

12 003352
003352

00335%

00335
003360
003363
003366
003371
003374
003377
003402
003405
003410
003413

061
106
040
m
123
M
061
106
040
102
000

105

061
117
125
102
040
105
061
117
121
125

125

DEVTYP
LSDVTYP::

LASCIZ

040
122
116
125
134
121
040
122
055
123

/1EUYY FOR UNIBUS \IEQ11 FOR Q-BUS/

.EVEN

1413

1419

1421

A AR ALl
R R
L

* TITEL OF PROGRAM

1420

1422

1423 003414

003414

003417
003422
003425
003430
003433
003436
023441
003444
003447
003452

134
121
m
116
124
040
055
066
055

000

105

M
040
101
117
m
101
124
064
115

125

L$DESC::

105
104
107
123
103
103
060
10
103

1425

/1EUNIEQ DIAGNOSTIC AC-TO64A=M(/

LEVEN

1426
1433

14634

; FORMAT STATEMENTS USED IN PRINT CALLS

}zgg
14647

JASCIZ

.EVEN

14624

1455
1456

DESCRIPT

000001
000001

SV(GBL= 1
SVCINS= 1

MACRO H1113
GLOBAL AREAS
GLOBAL ERROR REPORT SECTIO

06-SEP-82 16:46

.SBTTL

SEQ 33

PAGE 22

GLOBAL ERROR REPORT SECTION

: THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS
PRINTB
: USED BY MORE THAN ONE TEST TO OQUTPUT ADDITIONAL ERROR INFORMATION
: (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVIC ES.
1467 003454

BGNMSG

ERR101

1468 003454

PRINTB

#EMG101,RY

003454

004116
000002

003472

000006

1469 003476

003476
003476

oo
oo

O—=O»
osOoo o

OO = b
cd d b
N S ONININNW
SONNNNN

O =2000000

OO
=t b b
rosonNN

O=-=000

oo oo

&~
SO0

L10002:

002502

BGNMSG

ERR201

PRINTB

#EMG201,CHAN,GOOD
,BAD

000012
004265
000001
000004

PRINTB

#EMG203

ENDMSG

L10003:

BGNMSG

ERR202

PRINTB

#EMG202,R2,CHAN,GOOD
,BAD

MOV
MOV
MOV
MOV
TRAP
ADD

R1,=(SP)
#EMG101,-(SP)

TRAP

CSMS”

MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

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

MOV
MOV
MOV
TRAP
ADD

#EMG203,-(SP)

TRAP

C$MSG

MOV
MOV
MOV
MOV
MOV

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

#2,-(SP)
SP,RO
(SPNTB
#6,SP

ERR201::

000004

104423

O=0000000

D NWNNNININ)
= -o

AN LN N N NN NN v

elelele]
=l=laTa)

wugu
oW

VAWV

1498 00

(=1=3

1491

WAVAWAWD &5

o
8888888 383883383888383
W

1490

3500

ENDMSG

1046423

70
7
72
1488 003500
500
1489 003500

ERR101::

#EMGICT ,=(SP)

#6,-(SP)

SP,RO

C$PNTB

#.2,5P

#1,-(SP)

SP,.RO
(SPNTB

6 ,SP

ERR202::

MOV
MOV
TRAP

ADD

CHAN,=(SP)

R2,=(SP)
#EMG202,-(SP)
#5,-(SP)

SP,.RO
($PNTB

#14,5P

:
SEQ

GLOBAL AREAS

MACRO M1113

GLOBAL ERROR REPORT SECTION

oo§614

06-SEP-82 16:46

1495 003614

1496 003614

PAGE 22-1

L10004:

ENDMSG

104423

1497 003616

BGNMSG

ERR4O1

1498 003616

PRINTB

#EMG401,CHAN,GOOD,BAD

003616

003616
0036%2
003676

013746
01;766
013746

002502
00%500
002374

003656

012746

000004

003672

3642
003646
002646

1499 003652

003652
- 003652

000012

ENDMSG

L10005:

BGNMSG

ERR&02

1502 003654

PRINTB

#EMG4L02,CHAN

B 003700

013746
012746
012746
010600
104414
062706

002374
004521
000002
000006

ENDMSG

1505 003702

BGNMSG

ERRSO1

1506 003702

PRINTB

#EMGS01,CHAN,GOOD,BAD,
I TRCNT

003702
003706
003712
003716

013746
013746
013746
013746

002322
002502
002500
002374

oosrge
003732
003734
003736

012746
010600
104414
062706

000005

003742
1508 003742

104423

000014

ENDMSG

L10007:

BGNMSG

ERR231

1510 003744

PRINTB

#DMANHAD

003744

012746

1511 003764

006337

003750
003754
003756
003760

012746
010600
104414
062706

004715

000001

000004

002426

ASL

TXADRH

SP,RO
($PNTB
#12,5P

TRAP

(SMSG

MOV
MOV
MOV
MOV
TRAP
ADD

CHAN, =(SP)
REMG4L02,=(SP)
#2,-(SP)
SP,RO
CSPNTB
#6,5P

TRAP

($MSG

MOV
MOV
MOV
MOV

ITRCNT,=(SP)
BAD,=(SP)
GOOD,=(SP)
CHAN = (SP)

MOV
MOV
TRAP
ADD

#5,-(SP)
SP,RO
CEPNTB
#14,5P

MOV

1509 003744

003744

#6,-(SP)

#EMG4O1,=(SP)

ERRSO1::

003722 012746 004560

1507 003742

MOV

ERR4D2::

L10006:

104423

003702

BAD,=(SP)
GOOD,=(SP)
CHAN . =(SP)

MOV
TRAP
ADD

1501 003654

003654
003660
03666
003670
003672
003674
1503 003700
003700

MOV
MOV
MOV

MOV

104423

003654

C($MSG

ERR4O::

01%746 004425
010600
104414
062706

TRAP

#EMGS01,=(SP)

TRAP

($MSG

MOV

, = (SP)
#DMAMAD

ERR231::

MOV
MOV
TRAP
ADD

M ,-(SP)
SP,RO
CSPNTB
#4,SP

GLOBAL AREAS

MACRO M1113

06-SEP=B2 16:46

GLOBAL ERROR REPORT SECTION
1512

003770

006337

1514
1515
1516
1517
1518
1519
1520

004000
004002
004010
004014
004020
0040 S
004030

00 g ;
04
005237
005737
002005
oagr 7
005237

0024

004034
004040

01§766
013746

80 404
00 aga

004050 013746

oossgz

1s1§ 003774 oog;§7 oo$4§8

1521 004034

004044

013746

004054
004060
004064

013746
o1§746
013746

004074
004100
004102
004104

012746
010600
104414
062706

004110
v 0064110

104423

ASL

RXADRH

BGE
BIC
INC
ST
BGE
BIC
INC

1%
#100000, TXADRL
TXADRH
RXADRL
28
#100000, RXADRL
RXADRH
#EMG231,GO0OD,
TXADRH, TXADRL ,BAD ,RXADRH ,RXADRL ,CNT1

151

100000
002426
002424

002430

100000
002422

002424

SEQ 35

PAGE 22-2

1$:

2%:

PRINTB

TXADRL

002422

1524 004112
1525
1526

004112
0064114

002430
002426
002500

000010

000022

EXIT

000167
177772

EMG101:
EMG201:

1533 004330

045

101

122

EMG202: .ASCIZ

}ggg 004715
1540
}221

154§ 005012

1544 005057
1545 005124
1546 005162
1547 005230
1548 oosges
1549 005 1g
1550 00535
1551 005406
1552 005447

L10010:

TRAP

($MSG

MSG

LMORD
"WORD

JSJMP
L10010=2-.

2y, =(SP)
SP,RO
(S$PNTB
#22,5P

NLIST BEX

063
122

1537 004651

296231, =(SP)

TXADRL ,=(SP)
TXADRH
.= (SP)
~00D,=(SP)

;

123
101

1536 004560

MOV

RXADRH,=(SP)

EXTENDED ERROR MESSAGES
045
045

1534 004425
1535 004521

BAD,=($P)

MOV
MOV
TRAP
ADD

ENDMSG

1530 004116
1531 004170

1532 ooaies

MOV

MOV
MOV
MOV

}g%g
1529

CNT1,=(SP)
RXADRL ,=(SP)

MOV

004070 012746 004651

1522 004110

MOV
MOV

045

045
045

045

040

040
040
040
040
040
040
040
040
040

101

101
101

101

117
101

122

122
122
102
115
103
116
11
102
102

050

103
103

103

066

107

.ASCIZ
.ASCIZ

EMG203: .ASCIZ

EMG4O1: .ASCIZ
EMG402: .ASCIZ
EMGS01:

.ASCIZ

UMAHAD:

.ASCIZ

EMG231:

.ASCIZ

/XS3XAREGISTER AT %06%A DOES NOT RESPONDIN/
/XAREGISTER: CSR ,CHA.:%01%A ,GOOD DATA:%06%A, BAD DATA:Z06IN/

/XA(FOR IEUI1-A IGNORE BIT 9-12).IN/
/XAREGISTER:XTXA

,CHA.:301%A ,GOOD

DATA:X06%A ,BAD DATA:X06XIN/

/XACHAN.:X01%XA ,CORRECT PRIORITY:Z03%A ,WRONG PRIORITY:X03%N/
/XACHANNEL :X01%A IS SELECTEDIN/
/XACHAN,:X01%A

,GOOD :zong

/%AGOOD DATA

TXADDR

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

/%06X56%03%05%56206%56%03%058S6%06IN/
BAD DATA

;
*ERROR MESSAGES

105 £101:: .ASCIZ / REGISTER ADDRESSING ERROR = TRAP & /
105
105
m
125
123
117
116
111
111

€200::
E301::
esog::
E303::
E4O01::
eaog::
E403::
ESO1::
ES502::

.ASCIZ
.ASCIZ
"ASCIZ
.ASCIZ
.ASCIZ
"ASCIZ
.ASCIZ
L.ASCIZ
.ASCIZ

7/
/
7
/
7/
7/
/
7/
7/

REGISTER INCORRECT AFTER BUS RESET /
READ = WRITE BITS INCORRECT /
BITS NOT CLEARED AFTER MASTER RESET /
MUX BIT IN CSR NOT SETABLE /
CSR CONTENTS INCORRECT /
NO INTERRUPT WHEN EXPECTED /
INCORRECT PRIORITY LEVEL /
BITS IN IIR REGISTER INCORRECT /
BITS IN ISR REGISTER INCORRECT /

RXADDR

BYTE CNT#IN/

(=lelele]
0NN —
6%6

SEQ 36

PAGE 22-3

—MNO= PNNNNN oxoZ2Z~om (V23JTI-4TVIV

W@xia-dw Nwiw
[T

]Lol

R
R

[-4-4 (ST NS

V] Ll

[-4=2

=E oW

06-SEP-B2 16:46

oOVWAOoOldOolelsloantoantL

MACRO M1113
GLOBAL AREAS
GLOBAL ERROR REPORT SECTION

FROM A NXM ADDRESS

GLOBAL AREAS

MACRO M1113

LOCAL MACRO DEFINITIONS

H
15

00000000
NN NNNNNN~N
W) = OO 00 NN S NN —

1570
15
15
15
15
15
15
15
15
15

06-SEP-B2 16:46

SEQ 37

PAGE 23
«SBTTL

LOCAL MACRO DEFINITIONS

see

sTHIS SECTION CONTAINS ONLY MACROS WHICH ARE USED

;SEPARATE FROM THE MACRO LIBRARY
AL

(SVC34R)(LIBA.MLB)

dRRddRRddRd

:PRIT MACRO = THIS MACRO CHECKS IF INTERRUPT OCCURES
:

AND WHAT

]

IS THE PRIORITY.

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

.MACRO

PRIT

BNE

isT

1584
1585

ARG

DEC
SETPRI

R1
#PRI06

DEC
SETPRI
ST

R1
#PRIOS

ARG,ENUM,ERRM, ?A

‘BRANCH IF

YES

SCHECKSUM = 7
:CHANGE PROCESSOR PRIORITY TO 6

1586
1587

ST
BNE

1591

BNE

1597

SETPR] #PR103

:CHANGE PROCESSOR PRIORITY 10 3

BNE

‘BRANCH IF YES

NOP
LENDM

PRIT

1588
1589
1590
1592
1593
1594
1595
1596

1599
1601
1602

1603

ARG
A

DEC
RI
SETPRI
#PRI0&4
ST
ARG
BNE
A
DEC
R1

1598

1600

ARG
A

: INTERRUPT OCCURED?

.SBTTL

ARG

ERRSOFT ENUM,E4O2.ERRM

*INTERRUPT OCCURED?
‘BRANCH IF YES

:CHECKSUM = 6
*CHANGE PROCESSOR PRIORITY TO §
* INTERRUPT OCCURED?
:BRANCH IF

YES

SCHECKSUM = S
:CHANGE PROCESSOR PRIORITY 10 &
: INTERRUPT OCCURED?
‘BRANCH IF YES
SCHECKSUM = &

*INTERRUPT OCCURED?

:NO INTERRUPT ERROR

GLOBAL SUBROUTINES SECTION

GLOBAL AREAS

MACRO M1113

GLOBAL SUBROUTINES SECTION

06-SEP-82 16:46

SEQ 38

PAGE 24

14e

: THE GLOBAL SUBROUTINES SECTION CONTAINS THE SUBROUTINES

THAT ARE USED IN MORE THAN ONE TEST.

2 @

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

: SUBROUTINE REGTST = GENERAL PURPOSE REGISTER TEST.

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

FUNCTIONAL DESCRIPTION:

D e

OOOCONOOOOFOO

SNN NN NN N N NN AU R NI AR RO RN = b s b b
s b s = O O
O%?ON)C’Ofl)C’Ofl)CFOW’S:gfi;g:gfi;g: ® OOVONFWNE
NN = OO0 NV
NN = OO0V
NV NN = OO 00

1607

D o

D e

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

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 FIRST ERROR NUMBER

D e

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 OUTPUTS:

WSS iy =
N

S
(s X QY IV, IV VWAV
N = OO
- OO NO WV

—

D el el

D i

k) D

)

) il il

D il

)

s e

e e

ooooccororOrOr OO OO OO

INPUTS:

IF ENTERED AT LOCATION REGTST,
MASK
= CONTAINS THE READ/WRITE BIT MASK
REGADD = CONTAINS THE ADDRESS OF THE REGISTER BEING TESTED
ALWAYS,
MASCOM
600D

BAD

CONTAINS THE COMPLEMENT OF THE MASK
CONTAINS LAST EXPECTED DATA
CONTAINS LAST ACTUAL DATA

CONTAINS THE INPUT ERROR NUMBER + 2
CONTAINS 3 (SOFT ERROR)
ERRBLK = CONTAINS ADDRESS OF REGERR (REGISTER ERROR MESSAGE)
ERRMSG = CONTAINS 3RD REGISTER ERROR MESSAGE

ERRNBR
ERRTYP

: SUBORD INATE ROUTINES USED:

DRS ERROR MA(RO

* FUNCTIONAL SIDE EFFECTS:

NONE.

; CALLING SEQUENCE:

GLOBAL AREAS

MACRO M1113

GLOBAL SUBROUTINES SECTION

06-SEP=-82 16:46

SEQ 39

PAGE 24-1

}22

EITHER FIXED PARAMETERS FOLLOW THE SUBROUTINE CALL :

1664

;

EG.

}gg;

;

1665
1666

:
;

cA5L

17
CSR

REGTST

200.

: BIT MASK OF R/W BITS
: REGISTER ADDRESS

: FIRST ERROR NUMBER

}ggg

OR PARAMETERS ARE SET DYNAMICALLY :

1671
167

:
:

EG.

1676

E".'Q"""."t""'0""""i"""""""""."Q""Q."Q"""t'."'

167
}g;g

:
:

1677
1678 006262
1679 006262
1680 006270
1681 006274
1682 006302

1683 006306

1684
1685
1686
1687

006314
006320
006320
006326

1688 006332
1689 006340
}gg? 006346

017637
062716
017637
062716
017637
062716

000000
000002
000000
000002
000000
000002

002350

013737
005137

002350
002352

002352

012737
012737
012737

000003
006612
006660

002354

002506
REGTS1::

002504
002512
002510

}gg%

MOV
CALL

#177 ,MASK
CSR,REGADD

#200. ,ERRNBR
REGTST

: BIT MASK OF R/W BI7S
* REGISTER ADDRESS

; FIRST ERROR NUMBER

MOV
ADD
MOV
ADD
MOV
ADD

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

:
:
:
:
:
:

MOV
COM

MASK ,MASCOM
MASCOM

: SET UP COMPLEMENT
: OF R/W BIT MASK

MOV
MOV
MOV

#3 ERRTYP

#REGERR,ERRBLK

#RERR1,ERRMSG

GET R/W BIT MASK
JUMP OVER ARGUMENT
GET REGISTER ADDRESS
JUMP OVER ARGUMENT
GET FIRST ERROR NUMBER
JUMP OVER ARGUMENT

: SET UP FOR SOFT ERROR
: SET UP ERROR MESSAGE ROUTINE
: FIRST ERROR MESSAGE

: CHECK THAT ALL R/W BITS CAN BE SET

1694 006354
1695 006362

013737

1696 006364
1697 006372
1698 006400
1699 006406

053777
017737
043737
023737

006362

1700 006414

1701 006416

104404

001401

006416

104460

006420
06620

104405

1702 006420

REGTST::

MoV
MOV

002350

002500

MOV
BGNSEG

MASK , GOOD

: SET UP EXPECTED DATA

oogsoo
173756
002352
002502

173762
002502
002502
002500

BIS
MOV
BIC
CMP

GOOD , aREGADD
aREGADD,BAD
MASCOM,BAD
BAD,GOOD

:
:
:
:

£EQ

ERROR
1%:

};82

ENDSEG

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

TRAP

($BSEG

TRAP

(SERROR

TRAP

(SESEG

TRAP

($BSEG

: IF YES, BRANCH

: ELSE REPORT ERROR

100008

* CHECK THAT ALL R/W BITS CAN BE CLEARED

1706 006422
1707 006426
};83 006432
1710 006440

006440

1711 006442
1712 006450
1713 006456

005037
005237
012737

104404

043777
017737
043737

9002500
002506
006732

002510

CLR
INC
MOV

GOOD
ERRNBR
#RERR2,ERRMSG

: SET UP EXPECTED DATA
* NEXT ERROR NUMBER
: NEXT ERROR MESSAGE

MASK , aREGADD
SREGADD,BAD
MASCOM, BAD

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

BGNSEG

002350
173700
002352

173704
002502
002502

BIC
MOV
BIC

GLOBAL AREAS
MACRO M1113
GLOBAL SUBROUTINES SECTION
1714 006464
1715 006472
1716 006474
806674
1717 006476
1718
};18

006476
006476

083737
001401

06-SEP=-B2 16:46

002502

104460

006504
006512
006520
0065%6
006530

104405

1727 0065364
};gg 006536
1730 006540

012737
0 7%7
033737
001004
006337

103425
000770

006540
1731 006542
1732 006550
1733 006556
1734 006564
1735 006572

104404
04%777
053777
017737
043737
023737

006602
1738 006604
00660
006604
};28 006606

104460

1736 006600
1737 006602

1741 006610
1742
1743
1744
1745 006612
006612
1746 006612

006612
006616
006622
006626
006632
006636
006642
006646
006650
006652

1747 006656

006656

1748
1749
1750

006656

001401

CMP
SEO
ERROR
2%:

17%\ 006500 005;%7 00;508
17 g
17%
1726
1725
1726

002500

007010
000001
002500

002510
002500
002350

3$%:
4%

173604
173576
002502
002502
002500

MoV
MoV
BIT
BNE
ASL

BCS
BR

BEQ
ERROR

6%:

7%:

000016

s IF YES,

BRAN(H

: ELSE REPORT ERROR
10001$:

ERRNBR
#RERR3, ERRMSG
#1,600D

: NEXT ERROR NUMBER
* NEXT ERROR MESSAGE
: FIRST BIT 10 TEST

IF ALL DONE, RETURN

GOOD , MASK

GOOD
7%

* R/WBIT?
YES,

#177767,aREGADD
GOOD , aREGADD
AREGADD ,BAD
MASCOM, BAD

BAD, GOOD
1)

(SERROR

TRAP

CSESEG

TEST

; ELSE CHECK IF NEXT IS R/W

;CLEAR ALL BITS EXEPT
P SET THE BIT
: READ IT BACK
: KECP ONLY R/W BITS

TRAP
($BSEG
THE MUX BIT

* ALL OTHER BITS CLEAR?
i IF YES, BRANCH

* ELSE REPORT ERROR

10002%:

TRAP

: ELSE FIND NEXT R/W BIT

ENDSEG

002350
002502
002500
002374
00;356
007077
000006

ALL R/W BITS CLEAR?

BGNSEG

BIC
BIS
MOV
BIC
CMP

104405
000750

013746
013746
013746
013746
013746
012746
015766
010600
104414
062706

ENDSEG

INC

5%:

000207

BAD,GOOD

:
: CHECK THAT EA CH R/W BIT CAN BE SET

002500

177767
00%500
173572
002352
002502

SEQ 40

PAGE 24-2

; TEST NEXT BIT

TRAP

(SERROR

TRAP

CSESEG

MOV
MOV
MOV
MOV
MOV

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

MOV
MOV
TRAP
ADD

#6,-(SP)
SP,RO
($PNTB
#16,5P

TRAP

(SMSG

RETURN

BGNMSG

REGERR

PRINTB

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

REGERR::

MOV

ENDMSG

104423
NLIST BEX

L10011:

#REGMSG,=(SP)

GL OBAL AREAS

MACRO M1113

GL OBAL SUBROUTINES SECTION

06-SEP-B2 16:46

SEQ 41

PAGE 24-3

1751 0066?0
17S§ 0067 8

1
1

10%
105

107
107

RERR1:
RERR2:

,ASCIZ
LASCIZ

XREGISTER READ/WRITE BITS COULD NOT BE SETX
XREGISTER READ/WRITE BITS COULD NOT BE CLEAREDX

};gg 007077

045

101

REGMSG:

.ASCIZ

.%AADD: X06XA,(HAN Z01%A,G00D Z063A, BAD X06%A, R/W BITS R063N.

};2‘ 00701

1757
1758

105

107

RERR3:

,ASCIZ

XREGISTER READ/WRITE BITS COULD NOT BE INDIVIDUALLY SETR

LLIST BEX
+EVEN

MACRO M1113
GLOBAL AREAS
GLOBAL SUBROUTINES SECTION

06-SEP-B82 16:46

SEQ &2

PAGE 25

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

: SUBROUTINE MEMINI = MEMORY SIZING AND MEMORY MANAGEMENT INIT ROUTINE.
w

DETERMINES THE SIZE OF CONTIGUOUS USABLE MEMORY AND OUTPUTS [T

68
69

PAGE ADDRESS AND DESCRIPTOR REGISTERS ARE INITIALISED.

'Na=\ffl'i\i\rfl‘d\PN‘U\PQ‘U\PN'iflrN-Q\PN

) i
D
i
) i
D
)
il i
D
i e
i
D
s
D
i
D
i
D e
i

FUNCTIONAL DESCRIPTION:

TO THE CONSOLE.

IF MEMORY MANAGEMENT

IMPLICIT INPUTS:
NONE
.

OUTPUTS:
HIGH WORD OF MEMORY SIZE

PHHSIZ
PH.OW

LOW WORD OF MEMORY SIZE
FLAG SET TO 1
FLAG SET TO 1

MMFLG

MM2¢

MEMORY SIZE

IF MEMORY MANAGEMENT AVAILABLE
IF 22 BIT MEMORY MANAGEMENT AVAILABLE

IN K WORDS IS PRINTED

IMPLICIT OQUTPUTS:

IF MEMORY MANAGEMENT IS AVAILABLE, THE KERNEL PAGE DESCRIPTOR

Pt B
et S

KPAR1

KPAR2
KPAR3

OO0

0008 ¥
i
e
D
el
—

VB
AN =OVO~N

D i
D il
D il
D
D
D
il
D il
el

om0

KPARG
KPARG IS SET

—

SET AS FOLLOWS

:=-

TO 77406

wunnunnunwm

KPAROQ

©o 0D 0o 00 0o 0o 00 0o 0O 0o Oo 00 00 00 0o

THE KERNEL

NONE.

KPDRO 10 KPDR7 ARE SET

IS AVAILABLE,

INPUTS:

AND PAGE ADDRESS REGISTERS ARE

—

NN~

:."""".'."""""""'QQ"""".l.".""..0""""""""""."

T0O 1400

KPARS POINTS TO THE HIGHEST ADDRESSABLE MEMORY BANK
KPAR7 POINTS TO THE

1/0 PAGE

IF 22 BIT MAPPING IS AVAILABLE, IT IS ENABLED VIA SR3. MEMORY

MANAGEMENT

IS LEFT DISABLED VIA SRO.

SUBORDINATE ROUTINES USED:
NXM
VPCON

NON EXISTANT MEMORY TRAP SERVICE ROUTINE
VIRTUAL TO PHYSICAL ADDRESS CONVERSION ROUTINE

FUNCTIONAL SIDE EFFECTS:
NONE

MACRO M1113

06-SEP-B2 16:46

PAGE 25-1

: CALLING SEQUENCE:

}g};

1819

;

CALL

MEMINI

18%0

}gzg

: KT11 STATUS REGISTER ADDRESSES

18%5

177572

1826
1357
}g g

SRO=

177574
177576
172516

}gig

1832
1833
1834
1835
1836
1837
1838
}gzg

SR1=
SR2=
SR3=

177572

177574
177576
172516

: KERNEL PAGE DESCRIFTOR REGISTERS

172300
172302
172304
172306
172310
172312
172314
172316

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

}g:}

172300
172302
172304
172306
172310
172312
172314
172316

: KERNEL PAGE ADDRESS REGISTERS

1843
1844
1845
1846
1847
1848
1849
}ggg

172340
172342
172344
172346
172350
172352
172354
172356

1852 007176

KPARO=
KPAR1=
KPAR2=
KPAR3=
KPARG=
KPARS=
KPARG=
KPAR7=
MEMINI::

1853 007176
1854 007200
1855 007202

010046
010146
010246

007204
007210
007214
007220
007224
07$§6

012746
012746
012746
012746
104437
062706

000340
010132
000004
000003

1858 007236

005037

002344

1856 007204

1857 007232

}ggg 007242

172340
172342
172344
172346
172350
172352
172354
172356
MOV
MOV
MOV

SETVEC

000010

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

#4.,#NXM,#340

:
:
:

SAVE REGISTERS USED IN
THIS ROUTINE

: SET UP NON=EXISTENT MEMORY TRAP VEC.

005037

002326

CLR

NXMFLG

: CLEAR NXM FLAG

005037

002342

CLR

PHHS 12

CLR

}321

: SIZE MEMORY UP TO 32k

186§ 007246 005777 173072
1864 007252
1865 007256

005737
001147

002326

1867 007266

023727

002344

PHLSIZ

fos:

1866 007260 oogrsr 010000 002344

160000

aPHLSI2

: CHECK THIS BANK EXISTS

ADD

#10000,PHLS]Z

P ELSE GET NEXT 2K BANK

(MP

NXMFLG
140%

PHLS1Z,#160000

#340,=(SP)
#NXM,
= (SP)
#6,-(SP)
#3,-(SP)
CSSVEC
#10,5P

: START WITH 1ST 2k BANK OF MEMORY

1ST
BNE

MOV
MOV
MOV
MOV
TRAP
ADD

: WAS THERE AN NXM TRAP?
: IF YES, PRINT THE MEMORY SI1ZE
: HAVE WE REACHED THE 1/0 PAGE?

(T~

GLOBAL AREAS

GLOBAL SUBROUTINES SECTION

SEQ 43

MACRO M1113

GLOBAL SUBROUTINES SECTION

012737
012700
005001
012702
010120
062701

1886 007344

00137

005302

000001
172340

012737

177600

012700
012701
012720
005301
001374

172300
000010
077406

1903 007426
1904 007434

023727
001364

172352

007442
007444
007452
007456

1913 007462

1915 007470
1916 007472
1917 007474
1918 007476

1919 007500
1920 007506

192
1922
1923

1924 007510

508:

000200

172352
000001
120000
002326

1909
1910
1911
1912

002332

000006

005037
012737
005737
005737
001053

1905
1906
1907
1908 007436

MMFLG

BNE

140%

ASSUME NO MEMORY MANAGEMENT

ADDRESS MMU STATUS REGISTER 0
WAS THERE AN NXM TRAP?

SRO
NXMFLG

YES, PRINT

THE MEMORY SIZE

MEMORY MANAGEMENT AVAILABLE = SET UP MMU REGISTERS

1889 007354
1890 007360
1891 007364
1892 007370
1893 007372
1894
1895
1896
1897 007374
1898 007400
1899 007406
1900 007412
1901 007416

1902 007420

CLR
ST
53

1874 007306
1875 007312
1876
1877
1878
1879 007314
1880 007322
1881 007326
1882 007330
1883 007334
1884 007336

MOV
MOV

#1,MMFLG
#XPARO,
RO

ADD

#200,R1

CLR
MOV
MOV

DEC

BNE

172356

608:

FLAG MEMORY MANAGEMENT AVAILABLE

LOAD FIRST KPAR ADDRESS
SET UP CONTENTS OF FIRST KPAR
SET UP FIRST 6 KPAR'S
LOAD KPAR VALUE

R1
#6,R2
R1.(RO)+

NEXT KPAR VALUE
ALL KPAR'S LOADED?

508

MOV

#177600,KPAR7

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

MOV
MOV

#XPDRO,
RO
#10,R1

LOAD FIRST PDR ADDRESS
SET UP 8 PDR'S

MOV
DEC
BNE

#77406, (RO) +
R1
60%

LOAD ALL PDR'S WITH 77406
ALL

LOADED?

IF NOT, LOAD NEXT

: USE THE MEMORY MANAGEMENT UNIT TO SIZE THE MEMORY UP TO 128k

062737

000200

70$:

002330

012702

000010

ADD

#200,KPARS

BNE

120000
130$

, #7600
KPARS
708

128 K OR MORE = CHECK

$0s:

CLR

NXMF LG

CMP

007600
:

005037
005000

1§31

BNE

172352

KPARS

#1,5R0

177572

CLR

MOV

1887 007346

TRY NEXT 2k BANK

P 28K OR MORE = CHECK IF MEMORY MANAGEMENT UNIT PRESENT.

007276

1885 007342

IF NOT,

1872

108

MM22

010000
120000

172352

012757

000020

172516

MOV
MOV

#10,R2
#20,5R3

CMP
BNE
DE ¢
BNE
MOV

(RO)+, (R1)+
1108
R2
100%
#7600, KPARS

1008:

012737
000417

007600

012737

000001

172352

B8R

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

IN THE

1/0 PAGE?

IF NOT, TEST NEXT PAGE

ASSUME NO 22 BIT MAPPING

COMPARE DATA AT ADDRESS 0

RO
#10000,KPARS

012737
012701

022021
001006
005302
001374

POINT KPARS TO FIRST PAGE
ENABLE MEMORY MANAGEMENT
ADDRESS PAGE POINTED TO BY KPARS
WAS THERE AN NXM TRAP?

JF 22 BIT MMU PRESENT

CLR
MOV

MOV

871

BNE

001364

SEQ &4

PAGE 25-2

1868 007274
1869
1870

06-SEP-82 16:46

GLOBAL AREAS

WITH DATA AT 128 K

#120000,R1

USING KPARS

WILL CHECK 8 WORDS

ENABLE ¢2 BIT MAPPING
DATA IDENTICAL?

IF NOT, WE HAVE 22 BIT MMy
ELSE CHECKED 8 WORDS?
IF NOT, CHECK NEXT
ELSE CAN ONLY USE 124 K
PRINT QUT MEMORY SIZE

1308

é 22 BIT MEMORY MANAGEMENT AVAILABLE = USE TO SIZE MEMORY UP TO & MBYTES

002330

f108:

mov

#1,MM22

FLAG 22 BIT MMU AVAILABLE

GLOBAL AREAS

MACRO M1113

GLOBAL SUBROUTINES SECTION

1925

007

s7§7

19%6 007522
1927 007526

005737
001097

}g ? 007544

001364

1928 007530
1929 007536

}gii

1934 007546
1935
1936
1937
}ggg

007552
007556
007262
007570

oe§7 7
023727

005037

005927
004737
013737
013737

06-SEP=B2 16:46

120000

120%:

002326

oooigg
172352

17;352
177600

120000

;; ADDRESS PAGE POINTED TO B8Y KPARS

#200 ,KPARS
kPARS ,#177600

* ELSE POINT TO NEXT PAGE
: REACHED THE [/0 PAGE?

157
BNE

NXMFLG
130%

BNE

1208

ADD
CMP

f308:
002342
002344

}g’:’(‘)

CLR
JSR
MOV
MOV

SRO

VIADD
PC,VPCON
PHHIGM, PHHS 12
PHLOW,PHLS1Z

: WAS THERE AN NXM TRAP?
: IF YES,
SAVE THE MEMORY SIZE

IF NOT, TEST THE NEXT PAGE

: DISABLE MEMORY MANAGEMENT
: CONVERT KPARS TO PHYSICAL
* MEMORY SIZE
: SAVE MEMORY SIZE
:

; PRINT OUT MEMORY SIZE AND RETURN FROM THE SUBROUTINE

1942 007576
1943 007602
1944
1945

013701

013700
000005

002342

1408:

002344

1946

1947

1948 007632

010146
012746
012746
010600
104417
062706

1950 007662
1951 007664
1952 007666

012602
012601
012600

007660

1953 007670
1954
1955
1956

1957 007672

mov

PHHS1Z,R1

: GET SIZE WIGH WORD

ROL

MOV
LREPT
ASL

.ENDR

007632
007634
007640
007644
007646
007650
1949 007654
007654

1958
1959

1 ST

; CONVERT VIRTUAL SIZE TO PHYSICAL SIZE

177572

002340
010054
002334
002336

SEQ 45

PAGE 25-3

012700
104436

: AND LOW WORD
: SHIFT HIGH AND LOW
: WORDS TO GET THE

NUMBER OF

; PRINT

K WORDS

PRINTF

#MSIZE,R1

THE SiZE

CLRVEC

: RESET THE NXM VECTOR

MOV
MOV
MOV

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

; RESTORE THE REGISTERS
: USED BY THE ROUTINE

CNLIST

BEX

JLIST
LEVEN

BEX

007672
000002
000096

000004

000207

045

PHLSIZ,RO
&
RO

RE TURN

101

115

MSIZ2E:

.ASCIZ

/XZAMEMORY SIZE = XID4XA KIN/

MOV
MOV
MOV
MOV
TRAP
ADD

R1,=(SP)
#MS1ZE ,=(SP)
#2,-(SP)
SP,RO
CSPNTF
#6,SP

MOV
TRAP

#4 R0
CSCVEC

GLOBAL AREAS

MACRO M1113

GLOBAL SUBROUTINES SECTION

06-SEP-B2 16:46

SEQ 46

PAGE 26

1%1

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

196

: SUBROUTINE PVCON = PHYSICAL TO VIRTUAL ADDRESS CONVERSION ROUTINE

1964

1967
1968

:
:

196

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

}322

: FUNCTIONAL DESCRIPTION:

1969
}3;?

:
:

197

1975
1976
1977
1978
1979
1980

:
3
:
3

1981
}335

3
:
:

1984

}3;4

CONVERTS A PHYSICAL ADDRESS OF UP TO 22 BITS INTO A VIRTUAL
ADDRESS USING KPAR S,
INPUTS:
PHHIGH = HIGH WORD OF

1985
1986
1987

3
:
:

PHLOW

IMPLICIT

= LOW WORD OF PHYSICAL ADDRESS

INPUTS:

NONE
.
OUTPUTS:

VIADD
KPARS

= VIRTUAL ADDRESS USING KPARS
= POINTS TO PHYSICAL PAGE

IMPLICIT OUTPUTS:
NONE
.

}ggg

: SUBORDINATE ROUTINES USED:

1990
1991
1992
1993
1094
1995
1996
1997
1998
1999

:
:
:
3
:
:
:
:
:
:

2001
2002 027724
2003 007724

PHYSICAL ADDRESS

NONE
.

FUNCTIONAL SIDE EFFECTS:
NONE
.

CALLING SEQUENCE:

PVCON::

CALL

PVCON

MOV
MOV

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

: SAVE REGISTERS USED IN
: THIS ROUTINE

288§ 007726

010046
010146

2008 007730

013737

002336

002340

MOV

PHLOW,VIADD

: LOAD LOWEST 15 BITS OF PHYSICAL ADDR.

58}? 007744

052737

120000

002340

8IS

#120000,VIADD

: SET THE PAGE REGISTER TO KPARS

%889

2009 007736 042737

: PUT ADDRESS BITS O TO 6 INTO THE VIRTUAL ADDRESS
177700 002340

58}%

#177700,viADD

: PUT ADDRESS BITS 6 TO 21

2014 007752

013700

5019
o1

000006

2015 007756

BIC

013701

002336
002334

: CLEAR PAGE AND BLOCK INFORMATION

INTO KPARS

MOV

PHLOW,RO

: INITIALISE QUR SHIFT REGISTER

LREPT
ASR

6
R1

: SHIFT HIGH WORD

MOV

PHHIGH,R1

: HIGH WORD W!LL BE SHIFTED IN

GLOBAL AREAS

MACRO M1113

GLOBAL SUBROUTINES SECTION

2018
2019
2020 010012

010037

202; 010020
2023 010022

012600
000207

2021 010016

012601

06-SEP-B2 16:46

172352

SEQ &7

PAGE 26-1
ROR
.ENDR
MOV

;

RO,KPARS

: SAVE AS KPARS

MOV
RE TURN

(SP)+ RO

* USED BY THIS ROUTINE
:

MOV

(SP)+,R1

INTO LOW WORD

: RESTORE THE REGISTERS

028

SEG 48

PAGE 27

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

SUBROUTINE VPCON = VIRTUAL TG PHYSICAL ADDRESS CONVERSION ROUTINE

:""".'.".""'"""""""..".'..".""0..'...'.'."'."."'.'.
>

NIAY NI NININIAIAI
NI NI NINI NI
o
(od=l=lelelelelell=lel=]
S
OV~
WN =0 Y

054

06-SEP-B2 16:46

MACRO M1113
GLOBAL AREAS
GLOBAL SUBROUTINES SECTION

FUNCTIONAL DESCRIPTION:

CONVERTS A VIRTUAL ADDRESS TOGETHER WITH KPAR 5 INTO A PHYSICAL

ADDRESS OF UP TO 22 BITS.

INPUTS:
VIADD
KPARS

= VIRTUAL ADDRESE (BITS 1 3 10 15 ARE
= PAGE ADDRESS REGISTER 5

IGNORED)

IMPLICIT INPUTS:

2041

: OUTPUTS:

PHHIGH = PHYSICAL ADDRESS HIGH WORD
PHLOW

= PHYSICAL ADDRESS LOW WORD

g IMPLICIT OUTPUTS:
:

NONE.

i SUBORDINATE ROUTINES USED:
g FUNCTIONAL SIDE EFFECTS:

NONE.

: CALLING SEQUENCE:

:
VPCON::

CALL VPCON

MOV

RO, =(SP)

BIC

#160000, PHLOW

DISCARD PAGE INFORMATION

CLR
REPT
ASL
Rghbk

PHHIGH
6
RO
PHHIGH

INITIALISE HIGH WORD

:
:

RO,PHLOW
PHHIGH
(SP)+ RO

: ADD BLOCK NO. TO LOW WORD
: CARRY ACROSS TO HIGH WORD
: RESTORE RO

MOV

ADD
AD(
MOV

RETURN

SAVE RO

SET UP LOW WORD

VIADD ,PHLOW

KPARS R0

PAGE WILL GO IN HIGH WORD

SHIFT PAGE NUMBER
INTO HIGH WORD

MACRO M1113
GLOBAL AREAS
GLOBAL SUBROUTINES SECTION

06-SEP-82 16:46

SEQ 49

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

s INTERRUPT SERVICE ROUTINES ;

.SBTTL

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

GLOBAL INTERRUPT WANDLING ROUTINES

sTHE

INTERRUPT WANDLING SECTION CONTAINS CODING REQUIRED TO USE

:Ins ;Eg;gSC;OHACRO. NOTE EVERY INTERRUPT ROUTINE SHOULD SAVE

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

NXM = INTERRUPT SERVICE ROUTINE

sFUNTION:

IS ASSIGNED TO VECTOR 4

THIS ROUTINE

IS ALSO USED

WHEN ADDRESSING THE IEX FOR THE FIRST TIME.
IF THIS INTERRRUPT IS GENERATED THE IEX
IS INCORRECTLY ADDRESSED.
SUBROUTINE

IN MEMORY MANAGEMENT

;ENTRY CONDTION:

PEXIT CONDTION: WHEN THIS INTERRUPT IS SERVICED THE

NXMFLG

IS SET.

USED IN TESTS: AUTO DROP,23,24,

b
b d e

&N
ocoonNN

OO0O000O0

(elelelelele)

:"'."..""""."".""0"".""".".".""""".".'.
puur s
rd

e—

—

22
22255500000
SN N—'OOON&U‘&U‘N

NN
NN

THIS ROUTINE

012737
000002

000001

002326

BGNSRV

NXM

MOV

#1,NXMFLG

ENDSRV

sSET FLAG IF MEMORY IS NON=-EXISTENT.
L10012:

RTI]

GLOBAL AREAS

MACRO M1113 06-SEP-B2 16:46 PAGE 29

GLOBAL INTERRUPT HANDLING ROUTINES

%}};

:".""Q't'"Q"0"""t"'.""""'t".t""t"'..t.l."'ttt.t

21%1

SFUNTION:

g}lg

212§
%}54.

INTSC1 = INTERRUPT SERVICE ROUTINE

GENERAL PURPOSE INTERRUPT ROUTINE FOR CHANNEL 1.

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

3‘%2

SEXIT CONDTION: INTFC1 = FLAG, SET WHEN THIS INTERRUPT IS SLRVIED

%}%g

gcmso BY TEST:5,23,24,25,26

21239

E'"'.t.'tt"'.'t"""t't""""'QQ"Q'!"'tt"t".t"".""'t

2130

2131 010142
010142
2132 010142
2133 010150

010150
- 010150

012737

000001

002376

BGNSRV

INTSC1

MOV
ENDSRV

#1,INTFCY

:SET INTERRUPT FLAG

L10013:

000002

2135

2138

SFUNTION:

5}22
2145

SEXIT CONDTION: INTFC2 = FLAG,SET WHEN THIS INTERRUPT [S SERVIED
TUSED IN TEST:5,23,24,25,26

%}gg

2139
2140
5}25

RN RN

INTSC1::

PR R RPN

RN PR R R R R

R R R AR RN

RTI

RN RARRRRR ORI TR RRCOOTONROY

INTSC2 = INTERRUPT SERVICE ROUTINE

GENERAL PURPOSE INTERRUPT ROUTINE FOR CHANNEL 2.

:
SET A FLAG WHEN INTERRUPT IN CHANNEL 2 WAS
:
GENERATED
sENTRY CONDITION:

21‘6

:"'.'.|'t""".t't'l""""".'.t'ttt"l'tt'.'tt'tt.""..t"

2147

2148 010152
010152

2149 010152
2150 010160

010160
010160

012737

000002

000001

002400

BGNSRV

INTSC2

MOV
ENDSRV

#1,INTFC2

sSET INTERRUPT FLAG

INTSC2::
L10014:

RT]

e 50

GLOBAL AREAS

GLOBAL

MACRO M1113

06-SEP-B2 16:46

INTERRUPT HANDLING ROUTINES

SEQ 51

PAGE 30

15
%15

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

2156
2157
%}gg

sFUNTION:
WHEN AN INVALID INTERRUPT IS FOUND A
:
ERROR MESSAGE 1S GENERATED.
sENTRY CONDITION:

%}g?
%16§

;USED IN TEST:S

%}gg

INTERR = INTERRUPT ERROR SERVICE ROUTINE

sEXIT CONDITION:ERROR MESSAGE INVALID INTERRUPT

:'Q"'Q'Q't't."tt""'t"""tt'QQ""'Q.'Q."Q'Q"lt't.""t'.

2164
2165 010162
010162
2166 010162
010162
010164
010166
010170
2167 010172
010175
010200
010203
010206
010211
010214

2168
2169 010216
010216
010216

BGNSRV
104457
000764
010172
000000
040
126
mm
m
105
125
000

000002

INTERR

ERRSOFT 500,E400

m
101
104
116
122
120

116
114
040
124
122
124

E400:

.ASCIZ

.EVEN
ENDSRYV

INTERR::

TRAP
WORD
.WORD
LWORD

/ INVALID INTERRUPT/

L10015:

RTI

CSERSOFT
500
E400
O

GLOBAL AREAS

MACRO M1113 06-SEP-B2 16:46 PAGE 32

SEQ 5

GLOBAL INTERRUPT HANDLING ROUTINES

173

)

17‘.

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

z;;g

;

SUBROUTINE CULPA

21;3

;

AND THE MASK BITS IN IIR REGISTER FOR BOTH CHANNELS .

%177

SFUNCTION:

5}3?
5132

THIS SUBROUTINE CLEARS THE ULPA BIT IN ISR REGISTER

:CALLING FORMAT:
JSR
PC,CULPA
SCALLED BY TEST: ALL TESTS EXCEPT TEST 1,2,3,14,23,24,25,26,27

2183

2184 010220

010220
2185 010222
010222
2186 010224

2 2223232223332 22323232223223222232232222332323232333332323232333223233323222322222323222322322]

CULPA:: BGNSEG

104404

BRESET

:RESET HARDWARE

TRAP

C$BSEG

CSRESET

104433
112777

000000

172036

MOVB

#0,3ICRHX

TRAP
:LOAD NOT SWRST INTO ACR 1

2188 010240
2189 010246
2190 010254
2191 010260

112777
112777
005077
052777

000000
000000
172020
000002

172022
172000

MOVB
MOVB
CLR
BIS

#0,31CRHX
#0.31IRHX
aCSRX
#2,3CSRX

:LOAD NOT SWRST INTO ACR 2
*LOAD EVEN DPA INTO ADR 2
SSELECT CHANNEL 1
SSELECT CHA. 1 AS SYSTEM CONTROLLER

2193 010274
2194 010300
2195 010302

012701
005301
001376

2197 010312
2198 010320

112777
004737

000040
011060

2200 010332

004737

011060

2202 010344

112777

000000

2187 010232

219§ 010266

012777

112777

000010

000217

000100

172040

MOV

172012

171774

MOVE
28:

2196 010304 112777 000017 171756
2199 010324

MOV
DEC
BNE

MOVB

171756

MOVB
JSR

#217.31CRHX
#100,R1
R1
28

#17.31CRHX
#40,91DRHX
PC,LOOP

112777 000077

171744

112777 000200

171724

Move

#200,3]1CRHX

2203 010352

112777

000002

171674

MOVB

#2,9]1 IRHX

2205 010366

052?77

000002

171704

BIS

2207 010402

012701

000100

2210 010412
2211 010420

112777
112777

000017
000042

171650
171650

112777

00077

171636

MOVB

112777 000200
112777 000000

171616
171610

MOVB
MOVB

2201 010336

2204 010360 012777 000010

2206 010374

2208 010406
2209 010410

112777 000217

005301
001376

521§ ouo«ge

004737

5 14 010440

004737

2217 010460
2218 010466
2219 010674
2220 010500
2221 010506

112777
112777
005077
112777
112777

010432

215 010644
2216 010452

2222 010514
2223 o1os§z

2224 010530

010530
010530
2225 010532

011060

000000
000000
171600
000000
000000

112777 000200
112777 000000
104405

000207

MOVB

#10,3CSRX

JSR

171716

MOVB

171712

MOV

171666

MOVB
38:

171572
171566

171552
171546

171546
171540

MOV
DEC
BNE

MOVB
MOvB
JSR

JSR

MOVB
MOVB
CLR
MOVB
MOVB

Mmove
MOVB

ENDSEG

RETURN

#77,31DRHX
PC,LOOP

#0,31CRHX

#10,3CSRX

SSELECT CHANNEL 2

*LOAD SIC INTO ACRI
SWAIT 100 uS
dess
feee

:LOAD NOT SIC INTO ACR!

:LOAD EVEN MLA 2 INTO DOR 1
SWAIT A LITTLE

:LOAD UNL INTO DOR 1
SWAIT A LITTLE

SSET SYSTEM CONTROLLER 1 IN IDLE STATE

feee

:LOAD EVEN DPA INTO ADR 1

SSELECT CHANNEL 2

#2,3CSRX

SSELECT CHANNEL 2 AS SYS. CONTROLLER

#100,R1

SWAIT 100 US

#217.31CRHX
R1
{3

#17,31CRHX
#42 ,91DRHX
PC,LOOP

077.310RNX
PC boop

356 31 CRHX
#0,31CRHX
#0.3ISRLX
#0.31SRHX
aCSRX
#0,3ISRLX
#0.alSRHX

#200,31CRHX
#0,31CRHX

SLOAD SIC INTO ACR
e

:LOAD NOT SIC INTO ACR2
:LOAD EVEN MLA INTO DOR 2
SWAIT A LITTEL

:LOAD UNL INTO DOR 2
SWAIT A LITTLE

SSET SYSTEM CONTROLLER 2 IN IDLE STATE
teee
:CLEAR LOW BYTE OF ISR2
SCLEAR HIGM BYTE OF ISR2
SSELECT CHANNEL 1
SCLEAR LOW BYTE OF ISR1
SCLEAR HIGH BYTE OF ISR1

SSET SYSTEM CONTROLLER 1 IN IDEL STATE
o
10000$:

TRAP

(SESEG

;

GLOBAL AREAS

GLOBAL

2226

MACRO M1113

06-SEP-B2 16:46

INTERRUPT HANDLING ROUTINES

PAGE 32-1

SEQ 53

ADI

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

Sg%qg

"'.l't"Q"Q""""""""""Q'".t"'." 2232222232332 22232332322222221

ggéo
?

223

SEQ 54

PAGE 33

SUBROUTINE BGIN?

SFUNTION:

THIS SUBROUTINE LOADS THE DPA ADDRESS AND THE

2323SSSTTTTTTTSS

zgsa
gzgz

SOF TWARE RESET INTO BOTH CHANNEL

IT ALSO SELECTS CHANNEL 1 AS svsrén CONTROLLER

AND CLEARS MASKO+MASK1 REGISTER
.

2%3;

JCALLING FORMAT:

22‘0

52?9

JSR

PC,BGINT

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

2241 010534

2222222222222 22222232232223222222223232232333223233323223233232223222222220222022212]

BGIN1:: BGNSEG

010534
2262 010536
010536
2243 010540
2244 010546

104404

104433
113777
015777

002312
000010

2246 010562
2047 010566
2248 010574
2249 010602

005077
112777
112777
112777

2251 010616
2252 010624
2253 010632

171506
171524

MOVB
MOV

171512
000000
000000
000000

171474
171456
171452

CLR
MOVB
MOVB
MOVB

112777
112777
112777

000000
000000
000000

171444
171426
171422

MOVB
MOVB
MOVB

2255 010644
2256 010652

012737
052777

000001
000002

002374
171420

2259 010672
2260 010674
2261 010676

005301
001376
112777

010704
010704

104405

2245 0105564

2250 010610

113777

112777

2254 010640 005077

002314

000010
171434

2257 010660 112777 000217
2258 010666 012701 000100
2262 0107064

2263 010706

000207

TRAP

($BSEG

DPA1,alIRHX
#10,3CSRX

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

CSRESET

aCSRX
#0,3]CRHX
#0.3ISRLX
#0.,3SRHX

SSELECT CHANNEL
1
.LOAD NOT SWRST IN ACR 1
*CLEAR LOW BYTE OF ISR1
SCLEAR HIGH BYTE OF ISR1

BRESET

000017

171472

171462

DPAZ,al IRHX

move

#10,3CSRX

CLR

MOV
BIS

171402

1%:

171364

MOVB

MOVB
MOV
DEC
BNE

MOVB

ENDSEG

RE TURN

#0,31CRHX
#0.3ISRLX
#0.alSRHX

aCSRX

#1,CHAN
#2.3CSRX

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

.LOAD DEVICE paxn ADDR. 2
*SELECT CHANNEL 2

:LOAD NOT SWRST IN ACR 2
:CLEAR LOW BYTE OF ISR2
SCLEAR HIGH evte OF ISR2

SSELECT CHANNEL1

:LOAD CHANNEL NUMBER
SSELECT CHANNEL 1 AS SYSTEM CONTROLLER

*LOAD SIC IN ACR 1
SWAIT 100 US

B
:LOAD NOT SIC IN ACR1

10001$:

TRAP

(SESEG

HA
{3

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

g 65

SUBROUTINE BGINZ

SFUNCTION:

THIS SUBROUTINE LOADS THE DPA ADDRESSES AND THE

AND CLEARS MASKO+MASK1 REGISTER.

SOF TWARE RESET INTO BOTH CHANNELS ,
IT ALSO SELECTS CHANNEL 2 AS SYSTEM CONTROLLER

JSR

PCALLING FORMAT:

PC.BGIN2

*CALLED BY TEST: 5,6.8,9,10,13,14,15,16,17,18,20,22,24,25
BGIN2:: BGNSEG

104404

104405

000207

=N
O

MOVB
MOV

i
NN

i
NNWY

MOVB
CLR

MOVB

WWES
SO NONON)
oo
s SSoroMNVO

— i e e
B\ e e e e
PORLVPLNUNVNNRNOWNLE

— e e e B ) e D
e
NNNNNON
NN

ONNCOONOOOOONS~ON

BRESET
OO0O0O0O0OCOO0O0O0O—=0O00

NON = = NYNNNNNNNNNNNNY

NfiflU"UNHU&MUNMUN”UN”UU“&N%:

e O
e i

104433
77

S OOO ROt ad cd OO i ald ad O
- O
= e \)
el
) i i i )

)
i
S
R
I
e
T
e I
e
e
TR
T
e

s e i i e i e il i i i 2 ODOOOOOOOOOOOO
OO0O0O0OO0OCOOOOOOONNNNNNNNNNNNN
VAAVIWNES 85 5N WNAIN) = O © NN VW SN WNIAIND = b b b b
OSSOSO ONSOCONSOCONOONSMNINOCO

CRARRRR AR RN R AR RN R R RN RN RN RN RN NRRRRNARNRANRNRRNANRNRRNRRRRROERRORORROERORROERROEROECRTETY

O
O

:
;
;

[elelelelelolelelelelelelelelelelotelelelelelelelele)

BIFSREN2ETEIFTARARNZE v
3

MNONINIRONIRONI
NI NN
[LSLNL S LN NN N NN N N
NNNNNNNNNO o
0w VW =00 oo
~N
N

AUNLNLNLNINLNLNONLNLNUNUNU
NNV N NN
AN
NN NN
0O
O O VOOV
OO
Ve~
VIS WNN=0O

1€

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

267

N
~

SEQ 55

PAGE 34

MOVB
MOVB

MOV

MOV
MOVB
MOVB
MOVB

BIS
1%:

000017

171214

;RESET HARDWARE
DPA1,al IRHX
#10,3CSRX

DPA2,al IRHX
ACSRX

#0,alCRHX

TRAP

CSRESET

:LOAD DEVICE PRIM. ADDR.1
SSELECT CHANNEL 2

‘LOAD DEVICE PRIM. ADDR. 2
PSELECT CHANNEL 1

*LOAD NOT SWRST IN ACR 1

sCLEAR LOW BYTE OF ISR1
;CLEAR HIGH BYTE _OF ISR1

#2,CHAN
#0.a1CRHX
#0.3ISRLX
#0.3]SRHX

#2.3CSRX

sLOAD CHANNEL FLAG
‘LOAD NOT SWRST IN ACR 2
‘CLEAR LOW BYTE OF ISR?
SCLEAR HIGH BYTE OF ISR2
SSELECT CHANNEL 2 AS SYSTEM CONTROLLER

#100.R1
R1

‘WAIT 100 US
-~

#10,39CSRX

#217.31CRHX

MOVB
ENDSEG

#17,31CRHX

RE TURN

($BSEG

#0.3ISRLX
#0.alSRHX

MOVB
MOV
DEC

TRAP

sSELECT CHANNEL 2

:LOAD SIC IN ACR 2

*LOAD NOT SIC IN ACR2
100028:

TRAP

(SESEG

GLOBAL AREAS

MACRO M1113

06-SEP-B2 16:46

GLOBAL INTERRUPT MANDL ING ROUTINES

SEQ 56

PAGE 35

§§8§

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

%ggg

PCALLING FORMAT:

2310

*CALLED BY TEST:

s
538?

:
*FUNTION :

%§1§ 011060 012701
000001
005301
11

2313 011064
2314 011066

2315 011070
2316
2317
2318
2319

001376

LOOP:
1%:

MOV
DEC
BNE

RETURN

2320

2521
Sggz

:
*FUNCTION:

2327

2328

2329 011072
2330 011076
2331 011100
ggg% 011102
2334 011104
2335

012721
005301
001376
000207

000100

JSR

#1.,R1
R1

PC.LOOP

ALL TESTS EXCEPT 1,2,3.4.5

;LOAD
LOOP COUNTER
:DECREMENT LOOP COUNTER

;'.""""""""'"'"""""...."QQ..'."'."""'Q""""'.".'

000207

gggz

SUBROUT
INE LOOP
R0UTINE
FOR WAIT (AT LEAST) 1 US.

:LOOP UNTIL DONE

A L

SUBROUTINE WAIT
FOR WAIT (AT LEAST) 100 US.
ROUTINE
PCLWAIT

SCALLING FORMAT:

JSR

PCALLED BY TEST:

4,6,8,13,17

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

WAIT::
1%:

MOV
DEC
BNE
RETURN
ENDMOD

#100,R1
R1
1%

;DECREMENT COUNTER
SWAIT UNTIL DONE

MISCELLANEOUS SECTIONS MACRO M1113
GLOBAL INTERRUPT MANDLING ROUTINES

2348

NNRONNININNIRONY!

378 011104
00 0o 0o 0D 00 00 ~J
VIS NN = OO

:00

THE REPORT

CODING SECTION CONTAINS

"PRINTSTM CALLS THAT GENERATE

BGNRPT

O
o

000167

ExXIT

THE

STATISTICAL REPORTS.

LSRPT::

RPT

000000

.WORD

JSJMP
L10016=2~.

TRAP

(SRPT

EVEN
ENDRPT
104425

BGNMOD

SEQ 57

PAGE 36

JIT7 E MISCELLANEOUS SECTIONS
.SBT TL
REPORT CODING SECTION

349

3
3
3
3
3
3
3

06-SEP=-82 16:46

L10016:

MACRO M1113

06-SEP-82 16:46
.SBTTL

SEQ 58

PAGE 37

PROTECTION TABLE

see

011115
0

THIS

TABLE

10 PROTECT

IS UEED BY THE RUNTIME SERVICES

THE

LOAD MEDIA.

BGNPROT

LSPROT::

011112

000000

.WORD

sCHELR (SR ADDRESS

0MNne

177777

LMOPY

sDON'T CHECK DRIVE wiMSlm

011116

011120

177777

LWORD

CNDPROT

;DON'T CHECK HASSBUS UNIT NUWSER

-r

el
s]
NN
20 28 2F 22 ok aF F
ONONININININD
R F S S S0 o S

ANEOUS SECTIONS
ION TABLE

06=SEP=82 16:46

SEQ 59

PAGE 38

INITIALIZE SECTION

:00

NNNNNO:OOOMMU\MM’
&£ S wpiwroronOND
SbbWOb
OSSO
SO0
O0MNVOO

(=1

D
—

O
o

) o

s o

ol i

D i

D il

D o

D e

i e

)

S SNUN
oosroNOSsNN QO MMNINO

it D il D ld D il il D il s D D D il i D il D il S il D il D D ld il
I
JO W
Y
S
S
S
S
S
S
e
e
I
NNLNLNLNLRLNLNLNLNLNL
NNV VNNNV P
(=l=]=]
VWS WIWWWNININININ)
= b < =2

[el=l=l=lrl=l=l"l=l=l=llalelelelelelelollolelelelelelolelaleleolelelalalelolelelate
Lo Lol
D D d b D md b e o
D d D D D b D D
D d b b =D

—

BGNINIT

[=]=]

P THE INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED
s AT THE BEGINNING OF EACH PASS.

104421

032700
001404
865Z3;

001000

005037

002324

012700

000040

104447

000001
2%:
38:

103424

012700

1046447

000037

103425

012700

104447

000035

103421

012700

1046447

000036

103406

012700

104447

103014
004737

000034
007176

EXINI:

001004

104441
004737

012732

005237
023737
002367
000240

RFLAGS

;GET

BIT
BEQ
SSV

#1000,R0
28
g;.PNTf

;1S PNT FLAG SET?
*BRANCH IF NO
SSET FLAG FOR TEST HMEADER PRYNTOUT

CLR
READEF

PNTF
WEF .START

SCLEAR FLAG FOR DISABLE TEST HWEADER PRINTOUT
21S THIS JUST STARTED ?
:1F

READEF

;1S THIS A RESTART

#EF .RESTART

;1F YES = BRANCH

READEF

;1S

#EF .NEW

;1F

READEF

;1S THIS A CONTINUE

#EF .CONTINUE

007176

177777

002372
002372

NEWST:
002012

YES = FIRST UNIT AGAIN
?

:1F YES = DON'T INITIALIZE

READEF

;1S THIS A POWER FA'L

WEF .PWR

JSR

EXIT

JSR

MOV

SETVEC

NOP

PC,MEMINI

INIT

#PRIO7

:1F NOT=MUST BE A NEW UNIT

#EF .START,RO

BCS

STARST

MOV

#EF .RESTART,RO

BCS

*Be
NEWST

MOV

#EF .NEW,RO

BCS

NEWST

MOV

#EF . CONTINUE
,RO

BCS

EXINI

MOV

#EF .PWR,RO

TRAP

BCC
:1F YES=MUST BE A POWER FAIL,RELOAD MMU

;

;SET DIAGNOSTIC TO PRIORTY 7

TRAP

(SREFG

CSREFG

(SREFG
*Be

CSREFG
*Be
GE TPRM
CSEXLY

L10020~-.

MOV

#PR107,RO

TRAP

SINITIATE MEMORY MANAGEMENT

LOGDEV
LOGDEV,LSUNIT
NEWST

SNEXT LOGICAL UNIT 10 BE TESTED ?
:1S THE MAXIMUM UNIT # EXEEDED ?
P1F YES = A NEW START

SINITIALIZE LOGICAL UNIT NUMBER.

#14,836716,8340 ;+++JUST FOR DEBUG PROGRAM;:::::::::::.
SSPACE FOR DEBUG PROGRAM

(SREFG

.MORD

PC, MEMINI

#-1,L0GDEV

CSRFLA

MOV

TRAP

BCOMPLETE EXINI

GETPRM: INC
(MP
BGE

THIS A NEW PASS ?

BCOMPLETE NEWST

TRAP

YES = BRANCH.

BCOMPLETE NEWST

STARST: SETPR]

000340

THE OPERATOR FLAGS

BCOMPLETE STARST

BNCOMPLETE GE TPRM

104432

012700

LSINIT::

($SPRI

MACRO M1113

JSBTTL

WNLOOVNYON

NN
NNONRONINNON
POV
S o ¥ ¥ O o o o
NV
VWAV

el
D

S;lous

2550 011606

(R1) RO

000007

BEQ

000007

PRINTB

&
8 OO

.oo

;GET THE P-TABLE POINTER [NTO R1

s1F

NOT AVAILABLE

,GET

THE

MOV

LOGDEV,RO

8c(

GE TPRM

MOV

RO,=(SP)

TRAP
MOV
NEXT ONE

10§

HAKE

#7.(R1)

IT 76xxx0

#FINIT1,(R1),RO ;INFORM THE USER

MOV
MOV

(R1),=(5P)
#FINITY,=(SP)

MOV
TRAP
ADD

SP,RO
CSPNTB
#10,5P

002264
002266

002272
002274

002276
002300

002302
002304
002306

000007

3 —

000007

002310

BIC

PRINTE

002270

ADDRESS 2

LOW BYTE LABLE OF ADDRESS 2

HIGH BYTE, ADDRESS 3
ADDRESS &

LOW BYTE LABLE OF ADDRESS &
HIGH BYTE ,ADDRESS 5
ADDRESS 6

LOW BYTE LABLE OF ADDRESS 6 (PPR)
HIGH BYTE ,ADDRESS 7 (DOR)

SRI

ADDRESS OF

ARI

ADDRESS OF BUS ADDRESS REGISTER

RHX

cr (R1)

#3,-(SP)

HIGH BYTE, ADDRESS !

»x

002254

:LOAD ADDRESS 0
:LOAD LOW BYTE LABLE OF ADDRSS 0

CONTROLESTATUS REGISTER

ADDRESS OF BYTE COUNT REGISTER

» 0 »x 0
B
=

002250
002252

T rs W NS NS NP
e e N T 0 N Gt ' T Ot it Gt it P, Gt it s St P,
s TMes Os ¢« O
Me & M
ses & ==
s & &
(=) R e B e
w’w(flfi
a—-— ’-—- ’—-—- IO oo XD o bt D) ot ) et B e
WTMe B
o
-] oL] -~

002262

P
Ll Lok Tk Lok Toted Lok Dol
ok Tatad. Talk. Tolada
Lttt
=D NDOOPDNDOSTDVDND—=NID—=DND
s et ON et PN
N et O wts b b e ity T de
b D -

108:

COWVWVO VOO VW —
WHONO=NONOCO

NNVONONINNO

002260

(SGPHRD
RO,R1

:SAVE THE ADDRESS
DOES THIS DEVICE ADDRESS END IN NON-ZERO?
s1F NOT = OK (76XXX))

#7.8

MOV

=
e
o

=5 OOwN

LOGDEV,R1

BNCOMPLETE GE TPRM

ssaa 011600
549 011602

GPHARD

002372

SEQ 60

PAGE 38-1

NOP
NOP
NOP
NOP
NOP

011574

06-SEP-B2 16:46

—

3541 011540
542 011546
3543 011552
544 011560
SSLS 011564
569 011572

MACRO M1113

Y N
N b N N - N -d N S
NS N =t N = N = N b N b N b N - NN N
s s O OO N
N
NN NN N N NN L L L L A A N N NN N AN AN N N NN O —
- S OONNNNNNNNNNNNN NNNNNNNNNNNNNNNNOS

5«0 0115

p——

2517 011346
2518 011352
2519 011360
2520 011364
2521 011372
252; 011376
2523 011404
2524 011412
5525 011416
520 0114;&
2527 011430
2528 011436
25%3 011444
011450
2530
2531 011456
253; 011462
2533 011470
253% 011476
2535 011502
2539 011510
gSS 011514
538 011522
3559 011$i2

gSlg 11306
513
011310
2514 011314
2515 011316
2516 011 25
01132
011;26
on %6
011332
011336
011340
011342

prd

811 04

=
O=0
al
00O
o
322222 OO00O0
S OW=O
—O—= O00O0O0
OO000OC
gd
ogesgegecgee
SRS
S22
R
N
=2
NN
=2
N
=
N
=2
R
=
N
=2
)
NN
=0
N=N=N
Ofw
O0000
O
=2
R
=2
R
=5
NN
=
N =Y = PRUNINY —4 R —

2511 011304

509 011272
510 011274
011274
011300
011302

-t

2505 011262
2509 011264
507 011266
508 011270

2547

e laal

SCELLANEOUS
ITIALIZE SEC

ADDRESS OF MATCH CHARACTER REGISTER
HIGH BYTE OF MCR REGISTER

GE! VECTOR
?055 THIS VECTOR END IN NON = ZERO ?
NOT = Ok (XxXx0)

MAKE

1T xx0

#FINIT2,(R1),RO : INFO RM THE

USER

g 15
S

-y

SR
Foom
s

w
oo

~oN
-0

NN
o0

"""

—————

Y-

p—

— —— — Y
—— i p—
NN T S
ooorororO
O
NNNNNNNNNNNOO
OO00O0
WNRIAIRY
= =8 —s
NNOWVES BN =20~
NORONO
N
SNONO
oo
OSSO ONS

OO0 COOOO0O0O0OOOOOOOOOOOOCOOO

D —

20p000 8

—r —

000

LS LNTNTNTNTNTNTSTNTSTNLNTNTNTSTNT
ST NI ST NN
NLS SN
VI
NNV
A VANV
N N WNA
AN
VIV
SNNNNNNNNooorrOrOOOO
VVWAWVA VNN
~
0
~
oo
W
IR
—

LS LN LN NTNT NN LS LN

galous

MACRO M1113

06-SEP=B2 16:46

SEQ 61

PAGE 38-2

MOV

010046

011146
012746 012132
81 746 00000
10600
1046414
oegr
0111
012137

000010
oosza‘
002246

118:

062737 000004 002246

81 1 ;
102

oo% 13

012737
012737
01%7 7
012737
015757
01 7;7

12005
120052
12006
120064
170060
o;oog‘

002436
002440
002442
002444
002446
002450

012737

170044

002456

MOV
MOV

(ri)+,R
R2,PLEV

SGET PRIORITY
SSAVE THE LEVEL

04, VECC

MOV
MOV
MOV

(R1)+,DPA1
(R1) ,DPA2
#120040,CDAT1

MOV
MOV
MOV
MOV
MOV
MOV

OISOOSO.CDAT
#120052.CDATS
#120060,CDATS
#120064 ,CDATS
#170060.CDAT6
#20024,CDAT?

MOV

#170044 .CDAT9

MOV

01e737 170080 002432

:LOAD VECTOR FOR CHANNEL 1
:LOAD VECTOR FOR CMANNE. 2

ADD

MOV
MOV

012137 00231
011137 002314
012737 150040 002434

(R1),VECCY
(R1)+,VECC2

#170050,CDAT8

MOV
MOV
MOV
MOV
TRAP
ADD

:LOAD COMPARE DATA FOR
:LOAD COMPARE DATA FOR
:LOAD COMPARE DATA FOR
:LOAD COMPARE DATA FOR
:LOAD COMPARE DATA FOR
:LOAD COMPARE DATA FOR

:LOAD COMPARE DATA FOR [SR CHECK

:LOAD COMPARE DATA FOR ISR CHECK

:LOAD COMPARE DATA FOR ISR CHECK
;LOAD COMPARE DATA FOR ISR CHECK
:LOAD COMPARE DATA FOR ISR CHE(CK

MOV
MOV
MOV

#170042,CDATI0
#120664,CDAT11
0120464.CDAT1§

012737
012737

120540
030012

002466
002470

MOV
MOV

#120540,CDAT14
#30012,CDAT1S

;LOAD COMPARE DATA FOR ISR CHECK
:LOAD COMPARE DATA FOR ISR CHE(CK

012737
012737

030004
034004

002474
002476

MOV
MOV

#30004,CDAT17
#34004,CDAT18

:LOAD COMPARE DATA FOR ISR (HE(CK
:LOAD COMPARE DATA FOR ISR (HECK

EXIT

INIT

012737

MOV

104040 002472

MOV

104432

#120744.CDAT13

0106066.CDAT16

:LOAD COMPARE DATA FOR ISR CHMECK

:LOAD COMPARE DATA FOR ISR (HECK
TRAP

.MORD

000162
045
045

101
101

052
052

.NLIST

FINIT1:
FINIT2:

.ASCIZ
.ASCIZ

CSPNTB

#10,5P

ISR (HECK
ISR CMECK
ISR CHECK
ISR CHECK
ISR CMECK
ISR CHECK

002456
002460
002462
002464

SP RO

SSAVE THE DEVICE PRIMARY ADDRESS 1
SSAVE THE DEVICE PRIMARY ADDRESS 2
:LOAD COMPARE DATA FOR ISR CHECK

170042
120664
120464
120744

(RY) ,=(sm)
#FIN[T2,=(5P)
#3,-(SP)

012737
012737
012737
012737

RO,=(SP)

CeEXIT

L10020-.

/%A*+WARNING-WILL ASSUME [EX ADDRESS Z06%A (NOT Z06%A)IN/
/%A++WARNING-WILL ASSUME IEX VECTOR X03%A (NOT X03%A)IN/

LEVE
LLIST BEX

ENDINIT

10661

L10020:

TRAP

(SINIT

MISCELLANEOUS SECTIONS MACRO M1113 06-SEP-82 16:46 PAGE 39

Q
vt

AUTODROP SECTION

2599

.SBTTL

601

260
%60
604
2605
2606
2607
2608 012230

: THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE [F
¢ THE
"ADR''
FLAG WAS SET.
THE UNIT(S) UNDER TEST AR E CHECKED TO
¢ SEE IF THEY WILL RESPOND.
THOSE THAT DON'T
ARE IMMEDIATELY
: DROPPED FROM TESTING.
;==

BGNAUTO

2609 012230

2616 012230
012230
012234
012240
012244
012250
012252
2617 012256
2618 012262
2619
2620
2621
2622
2623

012746
012746
012746
012746
104437
062706
005037
005777

000340
010132
000004
000003
000010
002326
167762

262‘

2625 012266
2626 012272
2627 012274
012274
012300
2628 012302
012302
2629 012304
012304
012310
2630 012312
2631 012312
012312
012312

AUTODROP SECTION

SETVEC

LSAUTO: :
#4,#NXM #PRIO7

;SET UP NON -EXISTENT MEMORY TRAP VECTOR.
Mov
#PR107,=(SP)
MoV
#NXM, = (SP)
MoV
#4,=(SP)
MoV
#3,-(SP)
TRAP
CSSVEC
ADD
#10,5P
CLR
NXMFLG
sCLEAR NON <=EXISTENT MEMORY FLAG
ST
alIRX
sREFERENCE MEMORY ADDRESS FOR THE DEVICE
sTO SEE IF IT EXISTS.
A AAAAA LA A A A A A A AR A A A A A A A A A A Al A
AR
AR ARl ld ]
sIF THE DEVICE DOESN'T EX1ST THE RESULTANT TRAP TO VECTOR 04 WILL
sCAUSE THE DEVICE TO BE DROPPED (SEE INTERRUPT ROUTINE)
sOTHERWISE THE MEMORY REFERENCE IS UNEVENTFUL AND THE DEVICE IS READY.
:".'..Q'."'.'..""'"1"""""'..'.."'.l..'."l'.."."""'.'t"

005737
001407

002326

013700
104451

002372

1ST
BEQ
0ODU
DOCLN

104444
012700
104436

104461

NXMFLG
10%
LOGDEV

CLRVEC

000004
108:

ENDAUTO

;WAS THERE A TRAP ?
:BR_IF NOT
:DROP THE DEVICE

MOv
TRAP

s CLEAN UP CODE.
#4

TRAP
sRETURN VECTOR 04 TO NORMAL STATE
MOV
TRAP
L10021:

TRAP

LOGDEV,RO
($DODU
(SDCLN
#4,RO
CSCVEC

($AUTO

MISCELLANEOUS S ECT] ?ga

CLEANUP CODING SECT

MACRO M1113

06-SEP-B2 16:46

+SBTTL

SEQ 63

PAGE 40

(CLEANUP CODING SECTION

see

OFSNNOSS

NN
NN NN
WWNNNNIA)
b b

D e D

OO0O0COO0O0O0O
000

NN
WWWN
WWW

WW
bs

:
:

THE CLEANUP (O Dl NG SE CTION CCNTAINS THE CODING
AFTER THE HARD WA RE TE STS HAVE BEEN PERFORMED.

THAT S PERFORMED

BGNCLN

012700
1044461

000340

104436

104432

#PR107

BRESET

104433

012700

SETPRI

LSCLEAN::

000004

CLRVEC

sDISABLE INTERRUPTS
SRESET

THE

MOV
TRAP

IEX1?

sRETURN VECTOR 04

TO NORMAL

TR AP
STA!SO
v

TRAP

EXIT

(LN

#PRI07,RO

C$SPRI

CSRESET
#4,R0

CSCVEC

TRAP

000002

.WORD

.EVEN
ENDCLN
104412

L10022:

TRAP

(SCLEAN

MISCELLANEOUS SECTIONS

DROP UNIT SECTION

MACRO M1113

06-SEP=-82 16:46

SEQ 64

PAGE 41

zg;

.SBTTL

674
2675

see
: THE DROP=UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE

2678
2679
2680

:SUPVSR DOES THE '‘DROPPING'.THIS IS JUST TO TELL THE MAN. .
: 'DROPPED* UNITS ARE RE=-SELECTED ON OPERATOR
‘'STA'' OR '‘ADC
sCOMMAND, OTHERWISE REMAIN INACTIVE. THE DISPLAY COMMAND

32%9

DROP UNIT SECTION

; TO NO LONGER BE TESTED.

2681

;WILL PRINT ALL DROPPED UNITS, AND THE P-TABLES OF THOSE

gggg

sWHICH ARE STILL ACTIVE.

2684
2685 012340
2686 012340

BGNDU

2695 012340
012340
012344
012350
012354
012356
2%
012360

013746
012746
012746
010600
104417
062706

2697 012364
012364
2698 012366

000167
000030

2710 012370
012373
012376
012401
012404

045
101
m
045
045

012407
012412

012415
2711
2712
2713
2714 012420
012420
012420

104
120
104

002372
012370
000002

L$DU::

PRINTF

#FMDROP,LOGDEV

EXIT

;UNIT DROPPED

000006

116
125
124
104
10

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

WORD
.WORD

JSJMP
L10023=2-.

TRAP

C$bu

/XNXAUNIT XD2XA DROPPED/

17
105

.EVEN

ENDDU
104453

L10023:

own
2m

—n

py=:

x!’m

—t 7z

MACRO M1113

06-SEP=-82 16:46

SEQ 65

PAGE 42

ADD UNIT SECTION

see

THE ADD=-U NIT SECTION CONTAINS ANY CODE

TO THE TEST CYCLE.

LS8
&~
oo
s

BGNAU

EXIT

000167
000000

ENDAU
104452

THE PROGRAMMER WISHES

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

e ey

SN SO0V0ON0N
VIS

CTIONS

.SBTTL

o000

w—r

NNNRNNINNN
O

:‘NN PONINININ
NNNNNNNNSN
=
= = b >

MISCEL
ADD

“4

B
s

ENDMOD

LSAU::
AU

L10024:

.WORD
.WORD

JSJMP
L10024=2~.

TRAP

($AU

HWARDWARE TESTS MACRO Mi113
ADD UNIT SECTION

06-SEP=-B2 16:46

756
;8;

SEQ 66

PAGE 43

.TITLE HARDWARE TESTS
LSBTTL
TEST 1: REGISTER ADDRESSING TEST

ggg 012430

BGNMOD

806

:""t't'.'.'""""Q""'t""'Q'Q'Q'tt'.""'lt"""t'.""'t.

zggg

TEST 1 <1EX11

809

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

;A NON=EXISTENT MEMORY TRAP,

?
;g}
313

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

%3}4

:CONF IGURED OR THAT THE ADDRESS IS WRONG.

2815
2816

:COMMUNICATION BETWEEN THE MAIN CPU AMD THE IEX11 IS ACCOMPLISHED
:THROUGH A SET OF SIXTEEN REGISTERS.THE SIXTEEN REGISTERS ARE

818

:"Qt"t"'t"""""0""""0"...t'tt't"t't'ttt"'.'t"'t""

%817

:ASSIGNED ADDRESSES IN THE [/0 PAGE.

819

gazo

25;7
2833
2834 012430
012430
gass 012430
836 012434
2837 012436
012436

BGNTST
005737
001410

002324

012746
012746
010600
104417
062706

012642
000001

005037

002322

012462
012466
012472
012476
012502
012504
2847 012510

012746
012746
012746
012746
104437
oo;roe
013701

000340
012636
000004
000003

000010
002256

ITRAC1: MOV

2849 012520

O1 7o§

000010

MOV

2851 O S§6

062701

012442
012446
012450
— 012452

2845 012456
2846 012462

2848 015514

2850 012524

2852 0125%2

012532

5853 812534

854 012536
2855 012540
2856 012542

165701

00500

7%:

000002

108:

104404

2857 012544

012552

104456
000145
005012

2858 012546
012546
012550

PNTF
7%
#TSHD1

CLR
SETVEC

ITRCNT
#4,#LOCATE,#PRIO7

:CLEAR ITERATION COUNTER
:

ISRX,R1

:GET REGISTER ADDRESS

#8.,R2

:SET COUNTER FOR 8 REGISTER ADDRESSES

000004

005004

005711
005704
001405
005203

T1::
;1S THE PNT FLAG SET
:1F YES, PRINT THE TEST HEADER

ST
BEQ
PRINTF

SUB

#2,Ri

CLR

ADD

BGNSEG
CLR R4

ST
ST
BEQ
INC

ERRHRD

#2.R1
(R1)
R&
20%
b

101,E101,ERR101

MOV
MOV
MOV
TRAP
ADD

#TSHD1,=(SP)
#1,-(SP)
SP,RO
CSPNTF
#4,5P

MOV
MOV
MOV
MOV
TRAP
ADD

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

;GET NEXT REGISTER ADDRESS
:

TRAP

C($BSEG

TRAP
WORD
LWORD

C$ERHRD
101
E101

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

HAI
TE!

HARDWARE TESTS MACRO M1 113 06-SEP=-B2 16:46
TEST 1: REGISTER ADDRESS ING TEST

104444
005737
001007
005;37
023737
001401
000732
012700
104436

002372

30%:

002234
002322
002320

EXQV1:

000004

BR
CLRVEC

005204

104401

Exavi

£ZRAC1

LOCATE

INC
ENDSRV

TSHD1:

—

062

MOV
TRAP

LOGDEV,RO
C$DODV

TRAP

CSDCLN

MOV

#4,R0

TRAP

CSEXIT
L10025~-.

;1S QUICK VERIFY PASS SELECTED ?
:1F YES EXIT TEST
sITERATION COUNTER +1
*DEFAULT ITERATION EXECUTED

:IF YES EXIT TEST
:1F NO TEST

ITERATION

’

BGNSRV

NS ==

123

CSESEG

;

TRAP

:SERVICE ROUTINE LOCATE
LOCATE::

.WORD

CSCVEC

L10026:

000002

045

TRAP

308

EXIT TST

104432
000046

ERR101

:ALL REGISTER ADDRESSES TESTED ?
:BRANCH IF YES

QvP
Exav1
[TRCNT
ITRDEF, ITRCNT

002322

.WORD

R2
;gs

LOGDEV

2mMr->»2

2877
288
2890 012642
2891
2892
2893 012702
012702
012702
2894

10000%:

104405
005302
001361
005703
001404
013700
104451

20%:

O
—nr
- TN
) e

012640
012640

003454

Me
o o o

012554
2859 012556
012556
012556
2860 012560
2861 012562
gbbi 012564
863 012566
2864 012570
012570
012576
2865 012576
012576
2866 012600
2867 012604
2868 01%606
2869 012612
2870 012620
2871 012622
2872 012624
0126%&
012630
2873 012632
012632
012634
2874 012636
012636
2875 012636
2876 012640

SEQ 67

PAGE 43-1

RTI

BEX

6ggzzaaeclsxsa ADDRESSING TESTXN/

L10025:

TRAP

CSETST

MACRO M m ?
INIT IALI IAT1ON TES

HARDWARE TESTS

TEST 2:

06-SEP=-B2 16:46

$90§

290

SEQ 68

PAGE 44

.SBTTL

TEST 2:

INITIALIZATION TEST

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

1EX = TEST 2

904
905
906
907

"RESET THE IEX AND ENSURE THAT REGISTERS CSR.IIR.ISR.ICR IDR HCR

IN"BOTH CHANNELS ARE IN THEIR PROPER INITIALIZATION STATE

2908
2909

REGISTERS BAR & BCR _ARE NOT IN A DEFINATE STATE AFTER RESET

STHE MUX BIT IN CSR IS ALSO TESTED

;SO THEY ARE NOT TESTED MERE

2910

N
01%706
591
04

BGNTST

002324

00004
02322

000001

7%:

002374

O &MV

OWwW—\W

UNON

MOV

aCSRX,BAD

sTEST THE

TST

BAD

#17060,8AD
10S

TRAP

INITIALIATION STATE OF

TRAP

10000%:

BGNSEG
TST

BAD

(LR

GOOD

20%

NAM,R2

ERRSOF T zoz.ezob.sanzoz
ENDSEG

BGNSEG

CSRESET

($BSEG
CSR REGISTER

sCSR SHOULD BE ZERO

:BRANCH IF DATA CORRECT
;SET UP DATA FOR ERROR MESSAGE
;ERROR HANDLER

sGET 1IR CONTENT
sCONTENTS SHOULD BE ZERO
BRANCH IS YES

T
CSERSOF

.WORD
.WORD

201
E200

TRAP

CSESEG

TRAP

($BSEG

.WORD

allR! BAD

#TSHD2,=(SP)
#1,-(SP)

:BIT 9=12 AND BIT 4&+5 ARE NOT TESTED

ENDSEG

MOV

fown-=un

sLOAD CANNEL NUM,

BEQ

Vi=un

VIOWSS

#1,CHAN

MoV

20%:

MOV
MOV
MoV
TRAP
AD

MOV

CLR

002502

;1S THE PNT FLAG SET
lF YES, PRINT THE TEST HEADER

sCLEAR ITERATION COUNTER
s CLEAR HARDWARE
TRAP

ERRSOF T 201.E200.ERR201

13%:

WWO
S

CLR _ITRINT

BEQ

10%:

OO0O0O
=000

#TSHD2

BIC

002500

104404

PRINTF

BGNSEG

002592

104405

PNTF

ITRAC2: BRESET

167324
017060

017737

T2::

TST

BEQ

013367
000001

o000
—=
OO000

0127
2914 012704
2915 012710
2916 01271%
01271
012716
012722
012724
01%7 6
2917 012732
2918 012736
012736
2919 012740
2920 012746
012746
2921 012750
292% 012756
2923 012764
2924 012770
2925 012772
2926 012776
012776
013000
013002
013004
2927 013006
013006
013006
2928 013010
013010
2929 013012
2930 013020
2931 013024
2932 013026
2933 013032
2934 013036
013036
013040
013042
013044
2935 013046
013046
013046
2936 013050
013050

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

ERR201

SET UP DATA FOR ERROR MESSAGE
.ERROR HANDLER

TRAP

T
CSERSOF

TRAP

CSESEG

TRAP

($BSEG

.WORD
.WORD
.MWORD

10001%:

202
£200
ERR20?

83
CL

@ISRX,BAD

#1,BAD
gAD

0$
GOOD

#1SRNAM_ R2
MC
T 203,6200,ERR202
3 RRSOF

O"NWN

308:

JGET ISR CONTENTS
*CLEAR ULPA BIT

$CONTENTS SHOULD BE ZERO
‘BRANCH IF YES

$SET UP DATA FOR ERROR MESSAGE

*ERROR WANDLER

ENDSEG

10002%:

NNNIN =

BGNSEG

002502

mMove

TST

BEQ
CLR

S B

MOV

NNV NNWNWNWNWNE B

ERRSOFT

40%:

@lCRX,BAD
BAD
40%
GOOoD
#1CRNAM,R?

204 ,£200,ERR202

sGET ICR CONTENTS
sCONTENTS SHOULD BE ZERO

sERROR HANDLER

10003%:

BGNSEG

002502

T
ERRSOF

000010

sERROR HANPLER

600D
#MCRNAM,R?2

MOV

000002

205,£200,ERR202

CLR

TST
BEQ

50%:

sGET MCR CONTENTS
s CONTENTS SHOULD BE ZERO
sBRANCH IF YES

aMCRX ,BAD
BAD

.WORD
“WORD
-WORD

CSERSOFT
203
€200
ERR202

TRAP

($ESEG

TRAP

($BSEG

sBRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE

ENDSEG

MOV

TRAP

.WORD
.WORD
+WORD

T
CSERSOF
204
€200
ERR202

TRAP

CSESEG

TRAP

($BSEG

sSET UP DATA FOR ERROR MESSAGE

ENDSEG

TRAP

10004%:

CSE RSOFT

.WORD
+WORD
.WORD

205
€200
ERR? 02

TRAP

(SESEG

sLOOK AT CHANNEL FLAG
SEXIT IF CHANNEL 2 WAS SELECTED
sSET MUx BIT
:LOAD CHANNEL FLAG
sGET CSR2 CONTENTS

: IGNORE BIT 9=12 AND BIT 4+5

000010

sMUX BIT SHOULD BE SET

000010

:GET GOOD DATA

+BRANCH IF

YES

sERROR HANDLER

TRAP

.WORD
.WORD

T
RSOF

O
ooTM

8é

mrom

NUNONNN

NOWM=SUINSN
NOSMNNSN
OW=WwWWwWW

WO
S
VIOWSS
VIV

OO0
—=
OCOO00O

ONNNO%W\”&“NN-‘-Q-Q-..._.
consO bo&bbNOgbl‘ObNOOOObbbNOObJ‘ObNOOOObbbNOOb
(=T
0 0 X«

2 O O

SEQ 69

PAGE 44-1

b b

b s

00250%
00250

OCOO

NN
wirnoruoruoNON NININLNLNLNINLANLNINLNI

D
D i
e

) e

N N U U U

D e
—

N U N NU U L A

DOV~

$33 $333
W) -

nnvnnvzfvnnvnnu
OO
O
~NO

2
o

N AN U U Ul U L AN U N U U U W U U AN N U U U A AN U N U AN N AN N N NN N N N N

[elel=l=]=]l=]=leleleleleclelelalelclalelelelelelelelalelelelelelelalelelelelelelelelelelelelelolelele]
b B D D o
d D D d e
D D b D D D D D e
D o e
D D D D D b D b D D

~
&»

INITIALIZA

06=-SEP=-B2 16:46

VO
M <

2937 01§052

TEST 2:

—_—

-2
00O

TESTS

OO00O00O
—-O0O0OsHr-—

HARDWARE

06=-SEP=B2 16:46

61%:

1ST
BNE
INC
(MP

.WORD

QvP

ERR201

Exove

ITRCNT

, ITRCNT
ITRDEF

BEQ

JMP

EXIT TST

DDSNV

Exave:

SEQ 70

PAGE 44=2

Exave
ITRAC2

TRAP

ad b
I
IS
IC
1D
MC

.WORD

/
/
/
/
/

xs2 A INITIALIZATION TESTAN/

L10027:

TRAP

CSETST

HARDWARE TESTS MACRO M1113
TEST 3: R/W BIT TEST

06-SEP=82 16:46

989

LSBTTL

990

SEQ 71

PAGE 45

TEST 3: R/W BIT TEST

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

991

~ 8

IEX = TEST 3

STHIS TEST CHECKS ALL R/W BITS OF CSR,BAR,BCR AND MCR REGISTER

299

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

STHE TMS 9914 REGISTERS IIR,ISR,ICR,IDR ARE NOT CHECKED

;

:CSR1 + (SR2.

34+

%996

2997
2996
2999 012454
013424
3000 0\3454
3001 013430
3002 013432

013432
013436
013442
013446

013446
3003 013452
3004 013456

013456
013462
3005 013464
013464

3006 013466
3007 013472

3008 o1gsoo
013500
3009 013502
013502
3010 013506
3011 013512
3012 013514
3013 013522
3014 013530
3015 013536
3016 013542
013542
3017 013544
018 013552
019 013560
020 013566
3021 013572
sozg 013574
3023 013600

3024 013¢04

005737
001410

002324

012746
012746
010600
104417

014047
000001

062706
005037

000004
002322

012700
104441

000340

104433

005037
012737

7%:

002374

104407
103004
012737
000403
o1§737
013737
012737
004737

002350

000167
002300
000455
006320

002350
002354
002506

104404
012777

000107

166526

001410
005037
012702

002500
014042

052777
1177;7
105777

104457
000460
J05162
003556

013614
013614

104405

o1§737
013737

CLR
SETPRI

ITRCNT
#PRIO7

T3SEC:

CLR
MOV

READBUS

BAD
#1,CHAN

000400
166514
166506

177767
002302

;CLEAR ERROR LABEL BAD
:LOAD CHANNEL NO.

TRAP

CSRESET

:DETERMINE BUS TYPE
:BRANCH IF UNI=-BUS

TRAP

(SRDBU

#107,3CSRX

TRAP
($BSEG
:SET ALL R/W BITS THAT CAN BE CLEARED BY M(

BEQ
(LR
MOV

108
GOOD
#CSRNAM, R?

‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE
R

#400,3CSRX
@CSRX,BAD
@CSRX

ERRSOFT 304 ,E302,ERR202

002350
002354

#PR107,R0
($SPRI

MOV

BIS
MOVB
1STB

MOV
TRAP

#4,5P

BCC
;LOAD BIT MASK FOR Q-BUS DEVICE
;
*LOAD BIT MASK FOR UNI-BUS DEVICE
*LOAD REGISTER ADDRESS
:FIRST ERROR NUMBER
SCALL REGISTER TEST

BGNSEG

#TSHD3,=(SP)
#1,=(5P)
SP.RO
CSPNTF

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

MOV
BR
UNIMSK: MOV
MOV
MOV
JSR

166520
002502

MOV
MOV
MOV
TRAP
ADD

;CLEAR ITERATION COUNTER
*INTERRUPT NOT ALLOWED

;RESET ALL HARDWARE

BNCOMPLETE UNIMSK

017167

013606
N13606
013610
R 8:%235
026 013616
027 013624

:IN THIS TEST.
:
:"""""""""'."""""."."'..".'.".".'..."""".:
BGNTST
13::
1St
PNTF
;1S THE PNT FLAG SET
BEQ
7
P1F YES, PRINT THE TEST WEADER
PRINTF
#TSHD3
—

ITRAC3: BRESET
002502
060001

IMASTER CLEAR
TGET CSR CONTENTS
SALL BITS CLEARED

)

MOV
MOV

10000$:
#177767 MASK
BARX , REGADD

UNIMSK

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

TRAP
.WORD
MWORD
"WORD

(SERSOFT
304
E302
ERR202

IRAP

(SESEG

H
.

SEQ 72

#305. . ERRNBR

:FIRST ERROR NUMBER

002 354
002 506

MOV
MOV

egix.aecnoo

‘GET REGISTER ADDRESS OF BCR

00% 50
002356
002506

MOV
MOV

:CALL REGISTER TEST
:BIT MASK OF R/W BITS

#311. ERRNBR
PC,REGTST

:FIRST ERROR NUMBER
SCALL REGISTER TEST

MCRX ,REGADD
gnm

#2.CHAN

BAD

‘GET REGISTER ADDRESS OF MCR
:WAS CHANNEL 2 SELECT

S1F YES JUMP TO QUICK VERIFY PASS
SSET CHANNEL FLAG

:CLEAR ERROR LABLE BAD
TRAP

#3,3CSRX
aCSRX . BAD

;SELECT CHANNEL 2
SGET CSR CONTENTS

208
#CSRNAM,R?2

‘BRANCH IF YES
;SET UP DATA FOR ERROR MESSAGE

#10,BAD

002500

:FIRST ERPOR NUMBER

PC a;éts1
0187767
. MASk

#10, 6000

314,303

T1S MUX BIT

SET

Raas

10001$:

T3SEC
QvP

000634
005737

EXOV3
ITRCNT
ITRCNT,ITRDEF
Exav3

002320

§;§Ac3

TRAP

(SESEG

104601

S1F YES EXIT TEST
SITERATION COUNTER + 1
:DEFAULT ITERATION EXECUTED
sIF YES EXIT TEST
S1F NO TEST

ITE<ATION

TRAP

P
[

104432
000034
040
045

;REPEAT TEST WITH CHANNEL 2
11S QUICK VERIFY PASS SELECTED

T
RSOF

TRAP

<WORD
.WORD
~WORD

104495

($BSEG

#308. ERRNBR

SCALL REGISTER TEST

osrm

JSR

PC,REGTS

(=1
JV T

JSR

avf

043 013744
044 013752
3045 013760
3046 013762
goz.r 013766
048 013774
013774
013776
014000
014002
3049 014004
014004
014004
3050 014006
3051 014010
3052 014014
3053 014016
3054 014022
3055 014030
3056 014032
3057 014036
014036
014040
3058
3059 014042
3060 014047
§061
062
014074
3063

MOV

—

037 013712
038
013720
039 013722
§°‘° 013730
041 01373¢
0137
; 0137

013706

WNO = NN NO

036

002506

028 01363
029 01364
030 013644
031 01 esg
0 i 01366
033 013664
og« 013672
035 013700

NN N NN N NN N NN

HARDWARE TESTS
TEST 3: R/W BIT

(SRNAM:

WORD

X
BE

/ CSR/

/2S2%AR-W BIT
X

TESTIN/

L10030:

TRAP

(SETST

MACRO M1113 06-SEP-B2 16:46
HARDWARE TESTS
TEST & : SYSTEM CONTROLLER COMMANDS TEST

SEQ 73

PAGE 46

SBTTL

TEST &

SYSTEM CONTROLLER COMMANDS TEST

:""..'.'.'.'.'"""'.""""'.""'.'"'.Q""".""""'.O'"'Q'QQ""'

;PART

IEX = TEST &

CHANEL

1 WHICH IS SELECTED AS SYSTEM CONTROLLER SENDS

THE IFC AND REN MESSAGE BY MEANS OF THE AUXILIARY COMMANDS SIC AND

SRE. ALSO BOTH [IR AS WELL AS ISR REGISTER ARE CHECKED.

SPART 2 CHANEL 2 WHICH IS SELECTED AS SYSTEM CONTROLLER SENDS
:
THE IFC AND REN MESSAGE BY MEANS OF THE AUXILIARY COMMANDS SIC AND

;

SRE. ALSO BOTH IIR AS WELL AS ISR REGISTER ARE CME(KED.

088
089
090

3091
309
309
3094
3095

2
2
2

2
2
2
2
2

RERSSIREREEFIFENRERSFRSRR OO

ONNN

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

244
0146246
014250
014252

3096 014%54
014254
097 014256
8 014264
099 014272
100 016§76

3101 014302
014302
014304
014306
014%10
3102 014312
014312
3103 014314
3104 014322

BGNTST

005737
001410

002324

01%766

015522

012746
010600
104417

062706
005037

004737
113777
11;777

113777

104404
105077

oaogzo
002312
000010

002314

166114

004737

011072

012737
017737
022737
001410
012737

PRINTF

000217

000010

7%:
166112
166130

166076

CLR
ITRACG: JSR
MOVB
MOVBE

ggxgec

166106

002374
002502
002502

000400

002500

DPAZ, @1 IRHX

CLRB

@CSRX

move

#217,31CRux

JSR

166066

000002
1660264
0006400

[TRCNT
PC,CULPA
DPA1,al IRHX
#10,3CSRX

8IS

166070

8IS

MOV
MOV
CMP
B:O
MOV
ERRSOFT

104457

#2,3CSRX

MOV

165774

002502

012737

121040

002500

121040 002502

108:

104457

ooooz;
00544
003702

MOV

165756
002374

20%:

(SPNTF

#4,5P

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

*LOAD DEVICE PRIM. ADDR 2 IN ADDR REG.

sSELECT CHANNEL 1

TRAP

($BSEG

SSELECT CHANNEL 1 AS SYSTEM CONTROLLER

~<SEND 6NIERFACE CLEAR TO CHANNEL 1==

#2,CHAN
alirx,BAD
#400,8AD
10$
#400,6
401,£501,ERRSO1

*LOAD CHANNEL NO.
SGET 1IR2 CONTENTS
SIFC BIT IN IIR 2 SHOULD BE SET
‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER
TRAP
CSERSOFT

#10,3CSRX

a1SRX,BAD

(MP
#121040,BAD
BEQ
208
MOV
#121040,600D
ERRSOFT 402,E502,ERRSO1

BIC
MOV

#1,-(SP)
SP,RO

SWAIT 100

US.

SSELECT CHANNEL 2

MORD
401
.WORD
ESO1
.WORD
ERRS01
:BRANCH TO BGNSEG If ERRLOOP IS SET
TRAP
cscLP
:GET ISR2 CONTENTS

*ATN,NDAC, [FC,ATN SHOULD BE SET
‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER
TRAP

MORD
-WORD
.WORD

(KLOOP

000010
000001

;CLEAR ITERATION COUNTER

ADD

#TSHD4G ,=(SP)

PC,WALT

CKLOOP

104406
017757

1044
042777
012737

TRAP

000621
005406
003702

022737
001410

#TSHD4

;1S THE PNT FLAG SET
T1F YES, PRINT THE TEST WEADER
MOV
MOV

000004
002322

ooooo;

052777

PNTF
7

000001

052777

112777

ST
BEQ

#10,3CSRX
21, (HAN

(SERSOF!

402
esog
ERRS01

:BRANCH TO BGNSEG !f ERRLOOP IS SET
TRAP
cscLPt
sSELECT CHANNEL 1
SLOAD CHMANNEL NUMBER

- Q0 74

WARDWARE TESTS MACRO M1113 06=SEP=B2 16:46 PAGE 46=1
TEST

SYSTEM CONTROLLER COMMANDS TEST

105 014330

}8? 8}2 gg 0 %Z$7 000020 ooSsos

017737

165714

00250

MOV

alIRX,BAD

JGET

109 014354

MOV

ERRSOFT 403,E501,ERRSO

csg.oooo

SSET UP DATA FOR ERROR MESSAGES

g::

108 014346 012739 000020 002500
014354
014356

014360
014362
3110 014
014

104457
oooesz

0054
003702
1044

CKLOOP

;111 014

017737

165664

002502

311
014402
174 014406

001410
012737

120040

002500

11; 014374

3115 014415
01441
014414

014416
014420
3116 014422
014422
117 014424
118 014432
119 014440

3120 014444
3121 014446
3122 014452
014452
014454
014456
014460
3123 01446
01446
014462
3126 014464
2144646
3125 014466

3126 M44?6

127 (1¢S02

022737

002502

11;777
017737
005737

001406
005037

000017
165612
002502

165636
002502

40$:

508:

006737

011072

001407
005037

000220

000010
000002
165522
002502

165604

165566
165564
002374
002502

#17,31CRHX
a1 IRX,BAD
BAD

ENDSEG

CONTENTS

JERROR HANDLER

TRAP
MORD

.WORD
.WORD
;BRANCH TO BGNSEG IF ERRLOOP IS
TRAP
:GET

ISR1

CONTENTS

*ERROR MANDLER

TRAP
MWORD

;====L0AD NOT SIC IN ACReceeccccces oo
SGET IIR1 CONTENTS
:T1IR1 CONTENTS SHOULD BE ZERO

:BRANCH IF YES
JSET UP DATA FOR ERROR MESSAGES
*ERROR MANDLER
TRAP
.WORD
.WORD
.WORD

sSELECT CHANNEL 1

JSR

PC,WAIT

SWAIT 100 US.

#10,3CSRx
#2,CHAN
aliRX,BAD

BAD

002500

CKLOOP

017737

165476

oogso

139 014572

012737

120440

002500

120440

00250

1M%:

MOV

21SRX.BAD

MOV

#120440,600D

CMP
BEQ

#120440,BAD
12%

CSERSOF
T
404
€502
ERRSO1

WORD
.WORD
;BRANCH TO BGNSEG IF ERRRLOOP IS SET
TRAP
cscLPl

#10,3CSRX

BIS
MOV
MOV

ESO1
ERRSO1
SET
cscLP

*BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGES

BIC

#220,31CRux

C'inso"
40

:ATN,NDAC,ATN [N ISR1 SHOULD BE SET

100008
:

BEQ
1%
CLR
GOOD
ERRSOFT 406,E501,ERRSO1

136 014554

022737
001‘19

MOVB
MOV
ST

MOvB

1046457
000626
005406
003702
104409

408
#120040,6G00D

IIR1

:gghzé; }? 552' SHOULD BE SET

BGNSEG

000010

005737

BEQ
MOV

#120040,BAD

BEQ
50%
CLR
GOOD
ERRSOFT 405,ES01,ERRSO1

002500

104404
042777

313; 014534
3133 014536
3134 014542
0164542
014544
014546
014550
3135 016555
01455

SI1SRX.BAD

CMP

ERRSOFT 404 ,E502,ERRSO1

104405

112777

MOV

CKLOOP

104457
000625
005406
003702

052/77
012737
otrrgr

137 016592
138 014570

308:

005447
003702

128 014506
129 014514
130 014555
131 014530

120040

104457
000624

104406

géé.auo

CSERSOF
T
405
ESO1
ERRSO1

TRAP

CSESEG

TRAP

C$BSEG

Tencel 000 $08 N JCRieenconsunsamanns
*SELECT CHANNEL 2
SSET CHANNEL FLAG
:GET IIR2 CONTENTS

:1IR2 SHOULD BE ZERO

‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGES
*ERROR HANDLER
TRAP
MORD
.WORD
.WORD
:BRANCH TO BGNSEG IF ERRLOOP 1S
TRAP
:GET

ISR2 CONTENTS

CSERSOFT
406
ES01
[RRSO!
SET
CSCLPY

SATN,NDAC,REN,ATN IN ISR2 SHOULD SET
*BRANCH If YES
SSET UP DATA FOR ERROR MESSAGES

HARDWARE TESTS
MACRO M1113 06-SEP-8 2 16:46
TEST & : SYSTEM CONTROLLER COMMANDS T 33 T

&bl‘bl‘bbbbbbbbbbgbbbbbbbbbbbbbbbbbb
b b e d d

ERRSOFT 407,E502,ERRS01

;ERROR HANDLER

CKLOOP

WORD
.WORD
.WORD
:BRANCH TO BGNSEG IF ERRLOOP IS

(=lelolelolelelelelelelelelelelelelelelalelelalalelalelalelolelole
o)

3140 014600

SEQ 75

PAGE 46-2

128%:

BIC

#10,3CSRX

sSELECT CHANNEL 1

MOV

aliRx,BAD

:GET IIR1 CONTENTS

MOV

o
o

#1,CHAN

BAD

CLR

600D

BEOQ

TRAP

:1IR1

138

SHOULD BE ZERO

SSET UP DATA FOR ERROR MESSAGES
:ERROR HANDLER

TRAP

) e

WORD
LWORD
.WORD
:BRANCH TO BGNSEG IF ERRLOOP IS
TRAP

e
o
e
i
D o

120440

002500

138:

Nb@bbb'\log

o
e
o
e
—

BEQ
MOV

14$
#120440,6000

SBRANCH If YES
SSET UP DATA FOR ERROR MESSAGES

#120440,BAD

*ATN,NDAC,REN,ATN SHOULD BE SET

ENDSEG

TRAP

10001$:

409

TRAP

CSESEG

jeme—- LOAD NOT SRE IN ICR1

(ACR)=====

MOVB

#0,3iCRHX

teeee 0AD NOT SWRST IN ICR1

(ACR)====-

#200,31CRHX

teeee 0AD SWRST IN ICR1 HIGH BYTf=====

eSB e I

B e RS -

e i

0w D

@ o

(=15

W= WWWNWN
NONNNNNNNYN

R B RSy

(=]

OOWW
NNOVNUN

oOoONNOO

NNNNNNNN
VAV
Y o o

- - —b

2
¥

D D -l D el i il

D el il i

IV I IV IV IV IV IV IV I R
I

) e

m - e

-eoneene oo e
e es
o

an @ o -

TRAP

($BSEG

#10,3CSRX

sSELECT CHANNEL 5

MOvVB

#217,31CRHX

seeeeel0AD SIC IN [(R2====cccccccacan

BIS

#2,3CSRX
PC, WAIT

SSELECT CHANNEL 2 AS SYSTEM CONTROLLER
SWAIT 100 US.

BIC

#10,3CSRx

SSELECT CHANNEL 1

MOV

alirx,BAD

SGET IIR1 CONTENTS

MOV

000400

MOV

JSR

000400

ESO2
ERRSO1

#20,31CRHX

BGNSEG

000010

CSERSOF
T

LWORD

MOVB

MOVB
: R

*ERROR HANDLER

.WORD
.WORD

: ¢ bemmammoe= R e Em e

—

:GET ISR1 CONTENTS

:PART 2 CHECKS (SIC & SRE) OF CHANNEL 2
OO0 O0O0O0O0O0O0OO0O0O0O0O0COO00O0

ogogo
o e IV IV, IV, IV ]
W [o
N=O0V0O~N
v‘N-‘OOgN
&~

N =

—

w
w

NN NN
— B e e e d

NN
NN NAN NN
—
il i ) ) e o ) )
NNNNO
P

148:

000020
000200
000000

S1SRX ,BAD

CMP

(SERSOFT

408
ESO1
ERRSO1
SET

~ CSCLPY

MOV

ERRSOFT 409,E502,ERRS01

D o

002502
002502

CSCLP1

:BRANCH IF YES

CKLOOP
165372
120440

cs;nsorr

40
ES02
ERRSO1
SET

:LOAD CHANNEL FLAG

ERRSOFT 408,E501,ERRSO1

TRAP

CMP
BEQ
MOV

#1,CHAN

#400,BAD
15%
#400, GOOD

ERRSOFT 410,£501,ERRSO1

CKLOOP

:LOAD CHANNEL NUMBER

SIFC BIT IN IIR1 SHOULD BE SET
‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGES

*ERROR MANDLER

MORD
.WORD
.WORD

CSERSOFT
410
ESO1
ERRSO!

TRAP

($CLPY

TRAP

:BRANCH TO BGNSEG IF ERRLOOP IS SET

ERRSOFT

v
ada S 7

(N
NN
VO~

MOV

O
WY
PRNWN

121040

CMP
BEQ

sGET ISR1 CONTENTS
sATN,NDAC ‘IFC ATN SHOULD BE SET

040,G00D

£502,ERRSO1

(kLooP

TOAD

sSELECT CHANNEL 2
sLOAD CHANNEL FLAG
sGET IIR2 CONTENTS
;B0 BIT IN IIR2 SHOULD BE SET
sBRANCH IF YES

MOV
MoV

CMP
BEQ

MOV

;SET UP DATA FOR ERROR MESSAGES
;ERROR HANDLER

T
ERRSOF

TRAP

.WORD
.WORD
-WORD

:BRANCH TO BGNSEG IF ERR%g:; IS
-

000017
165064

002502

002500

104457

s====LOAD NOT SIC IN ICR2 (A(R)====
sGET _IIR2 CONIENTS

s1IR2 SHOULD BE ZERO
CL R

ERRSOF T

:BRANCH [F YES

.E501 ,ERR501

:SET UP DATA FOR ERROR MESSAGES
+ERROR HANDLER
TRAP

«WORD
.WORD
.WORD

ENDSEG

10002%:

BGNSEG

197 015214
198 0152%2
199 015230

CSESEG

:SELE(& CHANNEL 2

sLOAD CHANNEL FLAG
sGET 1IRT CONTENTS
:1IR 1 SHOULD BE ZERO

002500

:BRANCH IF YES

CLR

sSET UP DATA FOR ERROR MESSAGES

T
ERRSOF

+ERROR HANDLER

164750
120440

MOV
(MP

TRAP

.WORD
.WORD
.WORD

C(kLOOP
W
~

500 815534
01
015242
20§ 015550
203 015256
206 015262
205 015264
3206 015270
015270
015572
015274
015;76
3207 015300
015300
208 015302
209 015310

YES

TRAP

BIS

CkLOOP

001406
005037

‘BRANCH IF

sSET UP DATA FOR ERROR MESSAGES
sERROR HANDLER
LWORD
.WORD
«WORD
;BRANCH TO BGNSEG IF ERRLOOP IS

3183 015114
3184 0151%2
3185 015130
3186 015132
3187 015140
015140
015142
015144
015146
3188 015150
015150
3189 015152
3190 015160
3191 015166
319% 015172
3193 015174
3194 015200
015200
015202
015204
015206
3195 015210
015210
015210
3196 015212
015212

MOV

SN
NONNN
ww
V‘—'WU‘W:&

g181 015100
18% 015106

OO
=—Or
NN
NN

3179 015066
015066
015070
015072
015074
3180 015076
015076

SEQ 76

PAGE 46-3

RS W

O0O—=
OO0
WO
NSOV

2177 015056
178 015060

0177

O00O0 OO0O—=
- ON —=2N0
L
NN
~N NNNNES

3175 01506%
3176 01;05

MACRO M1113
06-SEP-B2 16:46
CONTROLLER COMMANDS TEST

(= oo
o &H
o &»

HARDWARE TESTS
TEST & : SYSTE

sBRANCH TO BGNSEG IF ERRLOOP IS

cgzoazg.sao
31SRX

,BAD

sGET ISR1 CONTENTS

sATN _NDAC,REN,ATN BITS

TRAP

SHOULD BE

SET

HARDWARE TESTS
MACRO M1113
06-SEP=-B2 16:46
TEST &4 : SYSTEM CONTROLLER COMMANDS TEST

015

120440

BEQ

002500

000010

#120440,6000

#10,3CSRX
#2,.CHAN

aliRX,BAD

BAD

002500

24$

SV
NNOON

GOOoD
ERRSOFT 416,E501,ERRS01

164644
120440
120440

002502
002502

24$:

000020
000200
000000

002500

164616
164610
164602

25%:

MOV

&
0440,BA
D

0440,G00D

£502,ERR501

EXQvé:

TRAP

sSELECT CHANNEL ¢2

TSHD4:

cscLP

sGET I1IR2 CONTENTS
:1IR 2 SHOULD BE ZERO

sBRANCH IF

YES

;SET UP DATA FOR ERROR MESSAGES
:ERROR HANDLER
TRAP
WORD

CSERSOF
T
416

sGET ISR2 CONTENTS

TRAP

cscLPt

sATN,NDAC,REN,ATN SHOULD BE

sBRANCH IF YES

SET

sSET UP DATA FOR ERROR MESSAGES
sERROR HANDLER

TRAP

CSERSOF
T

«WORD
«WORD
«WORD

417
E502
ERR501

TRAP

cscLP1

:BRANCH TO BGNSEG IF ERRLOOP IS SET

MOvB
MOvB
MOvB

s====LOAD NOT
:----LOAD

SRE

SURSI

IN ICR2

----- LOAD NOT SWRST

lch

(ACR) .........

IN ICR2

10003$:

ExQvé
ITRCNT
, ITRCNT
ITRDEF
EXQvé
ITRACS
ST

(A(R)===e===
(ACR)=====-

:1S QUICK VERIFY PASS SELECTED
sIF YES EXIT TEST
s ITERATION COUNTER ¢ 1
sDEFAULT ITERATION EXECUTED
<IF YES EXIT TEST
sIF NO TEST ITERATION
TRAP

062

CSERSOF
T

415
E502
ERR501
SET

CKLOOP

ENDSEG

002322

014130

al RX,BAD

T 41
ERRSOF

002234
00232
00232

MOV
CMP

BEQ

TRAP

ES501
«WORD
.WORD
ERR501
;BRANCH TO BGNSEG IF ERRLOOP IS SET

CKLOOP

NN=N

~N ONNO

CKLOOP

«WORD
«WORD
«WORD
;BRANCH TO BGNSEG IF ERRLOOP IS

23%:

VI
NN

WO WW
= WO
NNINNONW

NNN
NNwN

=OnN-=

T 415,€502,ERRSO1
ERRSOF

002502

123

104401

23%

sBRANCH IF YES
sSET UP DATA FOR ERROR MESSAGES
;ERROR HANDLER

MOV

°°°°§
===

OCO0OO0O
nRON
S

b e

-k
b O

—

3212 015326
015326
015 g
015
015
3213 015336
015336
214 015340
215 015346
216 015354
217 015362
3218 015;66
3219 015370
3220 015374
015374
015376
015400
015402
3221 015404
015404
322% 015406
3223 015414
32264 015422
3225 015424
3226 015432
015432
015434
015436
015440
3227 015442
015442
3228 015444
3229 015452
3230 015460
3231 015466
015466
015466
g3§ 815470
33
015474
234 015476
235 015505
23€ 01551
237 015512
238 015516
015516
015520
239
240
3241 015522
26;
24
24t 015572
015572
015572

WO WWWNO
NNNNN~NO

511 81% 8 00141
012737

g
ol 7]

210

SEQ 77

PAGE 46-4

CSESEG

CSEXIT

«WORD

L10031-,

TRAP

(SETST

BEX
6%32!!5'515" CONTROLLER COMMANDS TESTIN/

L10031:

HARDWARE TESTS MACRO M1113
TEST S: INTERRUPT TEST

06-SEP-B2 16:46

324
324

.SBTTL

TEST 5:

INTERRUPT TEST

:""'ttt"tt""'Q;"""t"'tt"t"'t'ttt'tQ't'.ttt"'t"'t"""'tt""""

248
249

‘PART 1

250

525%

IEX = TEST
CNECKS THE DEVICE PRIORITY LEVEL AND
THE FUNCTION OF INTERRUPT SE QUENCE IN CHANNEL
1 . INITIATING THIS
SEQUENCE WILL BE DONE BY SETTING THE INT ENB, DMA ENB BITS IN CSR1
AND BO BIT IN IIR1 REGISTER.

:PARY 2 CHECKS THE DEVICE PRIORITY L EVEL AND
THE FUNCTION OF INTERRUPT SE QUENCE IN CHANNEL 2. INITIATING THIS
SEQUENCE WILL BE ONE BY SETTING THE INT ENB, DMA ENB BITS IN CSR2
AND BO BIT IN IIRZ REGISTER.

254

255

556
S7

'..."'"'QQ"""'"""".""'."Q".""Q".""'.Q."""."""""C..'

BGNTST
OO
OO0
=

002324

PRINTF

1r YES, PRINT THE TEST HEADER
MOV

CLR
ITRACS: JSR
JSR

002374

MOV

BGNSEG

CLR
CLR
SETVEC

ITRCNT

:CLEAR ITERATION COUNTER

#1.CHAN

:LOAD CHANNEL NO.

PC,CULPA
PC.BGINT

#1,-(5P)

ADD

#4,SP

TRAP

($BSEG

MOV

#PR107,=(SP)

OONO

ONNSO
—_-NN—-O

000340

000010

INTFCY
INTFC2
VECCT,#INTSC1,#PRIO?

:CLEAR INTERRUPT FLAG FOR CHANNEL 1
‘CLEAR INTERRUPT FLAG FOR CHANNEL 2
:SET VECTOR FOR CHA.1
MOV

SETVEC

VECC2.#INTERR,#PRIO7?

000340
000020
000101
000010
002376

000300

#PR107

:NO INTERRUPT

#20,31SRLX

:::SET BO BIT IN ISR1

g1o.a1

$33SET PRIORITY COUNTER

#101,3CSRX

MOV

#PR107,~(SP)

MOV
MOV
TRAP
ADD

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

MOV

#PR107,RO

TRAP

CSSVEC
#10,5P

#INTERR,=(SP)

C$SPRI

S3ISET INT ENB AND DHA ENB BIT IN CSR

INTFC1,501,ERRGO2

::TRY WITH INTERRUPT

INTFCY

lnteaaufii OCCURED?

: CHECKSUM

64%

VECCT, -(SP)

#3,-(SP)

MOV

SETPRI

#INTSCT,-(5P)

MOV

TRAP
ADD

000003
000010

SP,RO
CSPNTF

SRESET HARDWARE
SSET UP PARAMETER

MOV

000003

#TSHDS ,=(SP)

MOV

MOV
TRAP

7%:

oW
o NOOONOr

SNNNN

BEQ

15::
;1S THE PNT FLAG SET

PNTF

NS VINSONN
NNNOwN
N

1ST

016732
00001

&
OCOH

—000
-=O0000
OO-—
OOOOg
=000
Caa—OO ©
SHSNOWNON
v

Oeb—as

OOb
b
N Srownonn

O=0000

At Nk
\
O e
oSN

OCO==0

3258
3259 015574
015574
3260 015574
3261 015600
3262 015602
015602
015606
015612
015614
015616
3263 015622
3264 0156%6
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
015732
015736
2273 015740
274 015746
3275 015754
3276
3277 015760
015760
015764
015766
015770

SEQ 78

PAGE 47

*BRANCH IF v;s

MOV

#PR106,R0

SEQ 79

HARDWARE TESTS MACRO M1113 06-SEP=B2 16:46 PAGE &7-1
TEST S:

§1§773

104441

15776

1601
1601
160 g
160
16026
168 g
16
160

$737 002376

441
5737
1
g
5
012
1 444}
$737
1013

016040
016062
016066
016050
016054
016056

005301
012700
104441
005737
001004
104457

016066

000240

016060
016062
016064

3278

3279 016070

016070
016074
3280 016076

DEC

000200
002376

151
BNE

DEC

000140
002376

1S1
BNE

648:

000340

002316

287 016116
288 0161%2

010137
013737

002502
002316

289 016130

ST
BNE

000765
005316
003654

012700
104441
106301

00141;

002500

104457
ooo7og
00535
003616

29; 81616

177;7

164132

oossog

295 016164
296 016166

001410
012737

000202

002500

0161764
016176
016289
0165
3298 016204
016506

104457
000767
005265
003702

3299 016206

INTFCY
64%

INTFCI
64$

SETPRI

#PR107

ASLB

: INTERRUPT OCCURED?

TRAP

CSSPRI

MoV

#PRI0S,RO

MOV
TRAP

#PR104,RO
(S$SPRI

MoV
TRAP

#PR103,R0
($SPRI

TRAP
LWORD
"WORD
.WORD

gsensorr
501
E402
ERR40D2

208:

: INTERRUPT OCCURED?
‘BRANCH IF vgs

SCHECKSUM =

: INTERRUPT OCCURED?
:BRANCH IF YES

SCHECKSUM = &

: INTERRUPT OCCURED?
:BRANCH IF YES

TRAP

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

St
R
Baes
i
:CHECK INTERRUPT PRIORITY

MOV
MOV

R1,BAD
PLEV,GOOD

SSET UP DATA FOR ERROR MESSAGE
i

208

‘BRANCH IF INTERRUPT WAS OK
*ERROR MANDLER

TRAP
CSERSOFT
LWORD
502
"WORD
£403
‘WORD
ERR&O1
:BRANCH BACK TO BGNSEG If ERROR LOOP SET
IRAP
CSCLPI
,

MOV

ACSRX,BAD

:GET CSR1 CONTENTS

BEQ
MOV

308
vsgz GOOD

‘BRANCH IF YES
*SET UP DATA FOR ERROR MESSAGE

#17000,8A0
osoz.aio

ERRSOFT 503,£401,ERRS01
CKLOOP

C$SPRI

:SET PRIORITY

RI
R
RI
R1
R1,PLEV

BIC
CMP

308:

b 4

ASLB
ASLB
ASLB
ASLB
CMP

CKLOOP

104406

ERRSOFT 502,E403,ERR4O1

293 016150
042737 017000 00250
294 016156 022737 000202 002502

297 016174

INTFCI
648

NOP
NLIST MEB

BEQ

016130
016132
015124
016136
3290 016140
81614
01614

INTFCI

002376

106301
106%01
106301
106301
020137

286 016114

000240

281 016100
zag 016102
283 016106
284 016108
285 01611

291

INTERRUPT TEST

*IGNORE BIT 9-12
TINT,SYS CONT SHOULD BE SET

*ERROR HANDLER

TRAP
CSERSOF T
.WORD
503
E4O1
‘WORD
"WORD
ERRSO!
:BRANCH TO BGNSEG IF ERRLOOP 1S SET
TRAP
CSCLPY

WA
TE

HARDWARE 1?5!5 MACRO M1113
TEST 5: INTERRUPT TEST

00
01

016206
016214

017737
8%7 7

016224

012737

3305

3306

16222

16
16

i6s%e
1624

01626

1624

16262

016244
816 46

16250

2307
308 016 Ss
016252
016256
309
310
31
Slg 016260
016264
313

016264
016270
016274
016300
016304
016;06
3314 016 15
016312
016;16
016322
016326
016332
016334
3315 016340
016340
%316 016342
317 016346
3318 016352
016352
016356
3319 016360
320 016366
251 016374

32§ 016400

016400
016404
016406
016410
016414
016416
016422
016424

06-SEP-82 16:46

006220 008308
407
000220

104457

80810e
782
1044

002246

013700
104436

002244

004737

010710

012746
012746
013746
012746
104437
062706

000340
010152
002246
000003

012746
01;746
013746
012746
104437
062706

000340
010162
002244
000003

104404
005037
005037

MOV

al1RX,BAD

:GET IIR1 CONTENTS

MOV

#220 gooo

SSET UP DATA FOR ERROR MESSAGE

CMP
BEQ

#220,8AD
7

$INTO,B0 SHOULD BE SET
SBRANCH IF YES

ERRSOFT 504,E501,ERRSO1

000010

002376
002400

CLRVEC

:ERROR MANDLER

JSR

SETVEC

.WORD
-WORD
-WORD

SETVEC

; (DISABLE INTERRUPT)
-

VECC?

£501
ERRS501

CSESEG

TRAP

VECC2,RO
CSCVEC

;RESTORE INTERRUPT 'E"°:ov

PC,BGIN2

VECC2,#INTSC2,#PRIO?

:SET UP PARAMETER FOR CHAN 2

:SET VECTOR FOR CHANNEL Sov

VECC1,#INTERR,#PRIO7

ADD

;SET VECTOR FOR (HANNEL ;ov

BGNSEG

CLR
CLR
SETPRI

005737
001260
005301
012700
104441
005737
001%31
005301

002400

BIS

INTFCI
INTFC2
#PR107

;CLEAR OLD FLAG
e
*NO INTERRUPT

#101,3CSRX

BNE

DEC
1s1

BNE
DEC

#INTERR,=(SP)

#10,5P

TRAP

($BSEG

MOV

#PR107,RO
C$SPRI

#3,-(SP)

CSSVEC

:::TRY INTERRUPT

SCHECKSUM = 7

INTFC2

#PR107,=(SP)

$3:SET PRIORITY COUNTER

: INTERRUPT OCCURED?

65%
R1

CSSVEC

#10,5P

:::SET INT ENB,DMA ENB IN CSR?

INTFC2

65%

#3,-(5P)

ADD

:::SET BO BIT IN ISR2 REGISTER

MOV
#10,R1
.LIST MEB
PRIT
INTFC2,505,ERR402

#INTSC2,=(SP)

VECC2,=(SP)

VECCT,-(SP)

TRAP

#20,31SRLX

#PR107,=(SP)

MOV
MOV
MOV

TRAP

MOVBE

002400

VECC2

gSEISOF!
04

TRAP

MOV
MOV

000020
000101

000300

10000%:

MOV

000340

000010

TRAP

012700
104441
112777
052777
012701

ENDSEG

104405

013700

002500

SEQ 80

PAGE 47-2

‘BRANCH IF YES

: INTERRUPT OCCURED?

*BRANCH IF YES
TCHECKSUM = 6

MOV
TRAP

#PR106,R0

($SPRI

-3
-

002400

000140

sCHECKSUM = &

MOV
TRAP

#PRI07,RO
C$SPRI

T 506,E403,ERR4O
ERRSOF

OWNIN

O
&
&
o
o

40%:

ACSRX,BAD

#17000,BAD

017000
000212

#212,BAD

#212,600D
ERRSOFT 507,E401 ,ERRS0?

000212

MOV

003702

CkLOOP

163416

000220
000220

43%:

sBRANCH [F

INTERRUPT PR].WAS OK

sSET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP

T
CSERSOF

WORD
.WORD
.WORD

506
E4O3
ERR4O1

CSCLP

;BRANCH TO BGNSEG IF ERR%S OP IS SET

CkLOOP
163512

*CHECK INTERRUPT PRIORITY

002500

MOV

- WNES
VISV

S
[V VIO

002502
002316

R1,BAD
PLEV,GOOD

oog
oS
Vo

C$SPRI

sCREATE CORRECT PRI. FOR (OMPARISON

P>O=—

OO
WO =000
oSN
N <= NWWWNWWNES N
WW = NO O O000O MO
NNNIN
= b b
e O

bbb
OO0OO0O

PLEV

OO0~

#PR103,RO

TRAP

sSET PRIORITY

002316

[=lelele] O
~N
NSNS ~N
W=
NN
NONNN

MOv

C$SPRI

.WORD
.WORD
.WORD

000340

cooo
—

#PRI04,RO

TRAP

s INTERRUPT OCCURED?
sBRANCH [F YES

NSNS
ON N
WVIWNSN

o
oo
o
oo
~ WL PNONININON)
= b b

MOv

C$SPRI

sBRANCH IF YES

65%:

oooocoococccrrOr
O O ONCOCOOOCCOCOCOCOCOC

OCOOOOOOO0OOOOOOOOOOOOOOC
D
e
D o
D e e D D D ) D e
D D ) D e il D

D =D =Di e
D e

#PR10S RO

TRAP

; INTERRUPT OCCURED?

002400

VIS WN =000

W =0V~

FERE

:BRANCH IF YES
sCHECKSUM =

ST
BNE
DEC

MOV

TRAP

:INTERRUPT OCCURED?

DEC

000200

D
D
b et
—

W
W
o

NN N NN NN N NN
WA N WWNWNWWNNO
NN N

NN AN N N NN NN N

w
w

WAN
NN

NN
NN NN

OO0

644

SEQ 81

PAGE 47-3

18T

AWMV
WVTA VAWM
WVAWVAVAY.
VWA RIS IIIINIIIINNS
SEEIESS SS& VIV
NNOONONO
YW &
SRRSFNSENOONNO SNO
~ SO SNOOSS &R oonNnNOOO HSMNOON SFRESFRNSaroc

06-SEP-B2 16:46

000240

— T

mwn

& —

—

COO0OO0OOOOOOOOOOOOOO
) e
D o
D D oD o D D D e ) B i D el )

M1113

C
T
ONT

-HUX SHOULD BE SET

T A FOR ERROR MESSAGE
D LER
TRAP

.WORD

sBRANCH BACK TO BGNSEG l;RESRLOO P

SET

cscLPl

:GET IIR 2 CON

*INTO,B0 BIT ESHOULD BE SET

*BRANCH IF

SSET UP DATA FOR ERROR MESSAGE

—

—=

50%:

002234

TRAP

002322
002320

00013

10001$:

VECCT

015626

ITRDEF

EXQVS:

104432

JMP

EXIT TST

Qv
ITRACS

104401

MOV

VECCT1,RO

MOV

VECC2.RO

, ITRCNT

CSCVEC

sITERATION COUNTER ¢ 1
:DEFAULT ITERATION EXECUTED
sIF YES EXIT TEST
J1F NO TEST ITERATION

TRAP

CSEX]T

.WORD

L10032-.

TRAP

(SETST

BEX

6%32!AINTERRUPY TESTIN/

—

TSHDS:

N2 =N

062

< rnr
e daal 2l

123

(SESEG

:1S QUICK VERIFY PASS SELECTED
sIF YES EXIT TEST

000030
045

TRAP

EXQVS
002322

08
ESO1
ERRSO1

TRAP

VECC2

ITRONT

gSERSOII

.WORD
WORD
.WORD

JRESTORE VECTOR (DIZABLE INTERRUPT)

QvP

WNOINONON)
=

NNNNNNSNNY

CLRVEC

D
D i
D
D
D
i

CLRVEC

TMMe

SESS
ONNNN

D i
D

002246

ENDSEG

emr-p>»2Z

8333

80 783

013700

sERROR HANDLER

Oggz -

002244

—

SEQ 82

PAGE 47-4

ERRSOFT 508,E501,ERRS01

104457

06-SEP-B2 16:46

013700
104436

oooororo
O O O

VO~NOWV
S

M1113

104405

D D

3351

m D

—ern

muv
-

SSES
gSFE

Z—
D

3350

) i

TESY S:

[elelelelolelelelelelelelalelelelelatolalele
Loy

HARDWARE

L10032:

HARDWARE TESTS MACRO M1113 06-SEP-B2 16:46
TEST 6: ADDRESS REGISTER TEST OF CMANNEL 1

368

SEQ 83

PAGE 48

LSBTTL

TEST 6: ADDRESS REGISTER TEST OF CHANNEL 1

IEX = TEST 6
3
;PART 1 CHECKS THE CORRECT FUNCTION
OF Aoonsgs REGISTER 1 (AD®) BY LOADING ITS
INTO BIT A1=AS AND RECEIVING THE ASSIGNED

’§;9
é7
69

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

3
3

;7
74

375

:NOTE:

DEVICE PRIMARY ADDRESS
LISTEN OR TALK ADDRESS VIA THE IEC/IEEE BUS.
THE ULPA BIT IN THE ISR1 REGISTER IS DEPENDENT
ON THE STATUS OF DPA1 (ODD DPA1 => ULPA IS SET)

g;g

78
79

sPART 2 CMECKS THE FUNCTION OF THE DAT BIT (DISABLES THE TALK FUNCTION),
:
THE DAL BIT (DISABLES THE LISTEN FUNCTION) AND THE EDPA BIT (ENABLES

231

380

18
3384

THE DUAL PRIMARY ADDRESSING MODE, WHICH ARE ALSO PRESENT IN THE

ADR1 REGISTER.

s1F THE QUICK VERIFY PASS 1S NOT SELECTED, THF TEST IIERATION WILL DO
217 WITH DIFFERENT DPA'S,

3385

:'t".'...'t"""".t"'tt"0"'Q"'.'Q.'l.t"""'.'t".Qt""t.""'...".'

BGNTST

3386 016762

016762
3387 016762
3388 016766

005737
001410

002324

016770
016774
017000
017002
0170064

012746
012746
010600
104417
062706

023000
000001

391 017014
3292 017020
3393 017024
3394 017030

004737
004737
013701
062701

3389 016770

gsoo 017010

3395 017034
3396 017040
3397 017046

3398 017050

3399 017056
400 017064
3,01 017072
3,02 017100

005037

010137
032737
001450

052737

052737
052737
052737
052737

3,08 017140

042737
042737
042737
042737

017146

104404

3409 017146

PRINTF

000004
002322
010220
010710
002312
000040
002410
000001

002312

000001

002434

000001
000001
000001
000001

34,03 017106 000417
3404 017110 oasrgr 000001
g:os 017116
06 0171§4
3,07 017132

ST
BEQ

000001
000001
000001

000001

7%:

Al:

002436
002440
002442

002444

;210 01715C
11 017156
3412 017164
13 017172

052777
012737
113777
004737

000010
000002
002410
011060

163122
002374
163104

415 017204
g&lb 017212
417 017214

022737
001410
012737

000020

002502

000020

002500

414 017176 017737

163046 002502

ITRCNT

MOV
MOV
MOV
TRAP

:CLEAR COUNTER

ADD

#TSHD6,=(SP)
#1,-(SP)
SP,RO
CSPNTF
#4,5P

PC,CULPA
PC,BGIN2
DPA1,R1
#40,R1

:CLEAR ULPA BIT IN ISR 1 AND 2
:SET UP PARAMETER
:GET DPA1 ADDRESS
:CREATE MY LISTENER ADDRESS (MLA)

BIS

#1,CDATY

SSET ULPA BIT IN COMPARE DATA FOR ISR

BIS
BIS
BIS
BIS

3%:

#TSHD6

16::
;1S THE PNT FLAG SET
S1F YES, PRINT THE TEST HEADER

JSR
JSR
MOV
ADD

MOV
BIT
BEQ

002436
002440
002442
002444

002434

CLR

PNTF
7%

BR
BIC
BIC
BIC
BIC

R1,MLAY
#1,DPA1
3%

#1,CDAT?
#1,CDAT3
#1,CDAT4
#1,CDATS

. +40
#1,C(DATY

;STORE MLA
:1S DPA EVEN
:BRANCH IF YES
% i
oy

*BRANCH TO BGNSEG
SCLEAR ULPA BIT IN COMPARE DATA FOR ISR

#1,CDAT?
#1,CDAT3
#1,CDAT4

#1,(DATS

-o
-e
-

BIS
MOV
MOVB
JSR

#10,3CSRX
#2,CHAN
MLA1,31DRHX
PC,LOOP

;SELECT CMANNEL 2
:LOAD CHANNEL NUMBER
ie=e==|
0AD MLA1 INTO DOR 2==esccccccce
SWAIT A LITTLE

(MP
BEQ
MOV

#20,BAD
10%
#20,G00D

:BO BIT SHOULD BE SET
:BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGES

BIC

BGNSEG

MOV

alirx,BAD

TRAP

:GET 1IR2

CONTENTS

($BSEG

163016

120040

002502
002502

120040

002500

108:

20%:

000010

NONNO
OWVIN

BIC

MOV
MOV

CMP
BEQ

002401
002401

MOV

ERRSOFT

VOVWN

NONNNNOT

NEONNNNEG
WWWWNO

als RX,BAD
"2 0040,BAD

20$

015 0040,60
GOOD

602,E502,ERRSO1

002444

002502
002502

002444

002500

30%:

MOV

sATN_ATN_NDAC BIT OF

ISR2 SHOULD BE SET

SBRANCH [F YES

sSET UP DATA FOR ERROR MESSAGES
*ERROR WANDLER
TRAP

CSERSOF
T

WORD
+WORD
.WORD

602
ES02
ERR501

csCLP

#2401 ,BAD
30 $

sMA MAC,IFC,BIT
sBRANCH IF YES

alirx,BAD

#2401,600D

603,6501,ERRSO1

sLOAD CHANNEL NUMBER

sGET IIR1 CONTENTS

IN IIRT

SHOULD BE SET

sSET UP DATA FOR ERROR MESSAGES
sERROR HANDLER
TRAP

(SERSOFT

RAP

CSCLP

603
.WORD
£501
.WOR
ERRS01
.WORD
;BRAN(H TO BGNSEG WHEN E?RLOOP IS SET
31SRX,BAD

:GET ISR1 CONTENTS

408

sATN,ATN,LADS
,NDAC LPAS,(ULPA) BIT SET
;BRANCH IF YES

1
ERRSOF

604 ,£502,ERRSO1

;ERROR HANDLER

BIS

MOV
MOovB

JSR

162614

MOV

000020

MOV

000020

:GET ISR2 CONTENTS

CMP
BEQ
MOV

40$%:

T
CSERSOF

601
.WORD
ES501
.WORD
ERRS501
.WORD
;BRANCH TO BGNSEG WHEN E?:gg LOOP IS SET
cscLPl

sSELECT CHANNEL 1

CDATS.BAD

CDATS,GOOD

(MP
BEQ

:SET UP DATA FOR EPROR MESSAGES
TRAP

CSERSOFT

TRAP

($CLPY

604
.WORD
.WORD
ES0?2
ERRSO1
.WORD
;BRANCH T0O BGNSEG WHEN ERRLOOP IS SET

(kLOOP

0000190
00000
00007
011060

TRAP

#10,3CSRX
#1,CHAN

(kLOOP
162706

sERROR MANDLER

sBRANCH TO BGNSEG WHEN E?:LOOP IS _SET

C(KLOOP

NS
COWWV
NENNE
W= WNWWO

104406

CMP
BEQ

T
ERRSOF

N Bty

0054
003702

MOV
MOV

O SNV
NINSN
W= WWWNWNDO
NONNNNNYNY O

OWWV

3449 017464
017464

(xLOOP

NS
O

NENNS
W=

8883
&
OO0O00O0-—
—=ON —=O
OO0
=

8 CDCDsE
OO0 W=WNES
=ON=0O OO0O0O0
—=ON==I
W=
W=
N=SNONNN RO
S
LW -

OO0O0O0O0O—
OO0~

O OO0~

O0O0—=

o=
o0

017462

SEQ 84

PAGE 48~

T 601,E501,ERRS01
ERRSOF

O CO0O0—=00—=
= ON = O = =D
=N SN
NEONNNNNNES

N NN NI NN NN NN
B NN NN N NN Wi NN NN NN N NN WWANNNI
WNNNONY
—
W
NNNNY OOWVE

8 85 8 B
O

D e
D e
D
B
D el
D
B e
D
D
D
D e
D
e
D e
D e
D
— e

D o

) e

FREER ¥
WNWN
W
SBIFGE U

W
N=0O0VONO>:

[VIIVIIVILSTNTNTS)

FRERERR ¥

SWN-O

—

d D

NNNNNNNNNNNN NNNNNNNNNNNNNNNNNNNNNNNNNNNNSNSNSNSN

[elelalelelelelalelelalelelalelolalelelelelelelalalelelelelelelalelalalelelalelelelelele)

3418 017

RN
’4’CMN&BE;ONFNNDCDNNDNJ’WUNJCNFgaUhthmF SERIIEFIEENENFRRNSF

HARDWARE TESTS
MACRO M1113 06-SEP-B2 16:46
TEST 6: ADDRESS REGISTER TEST OF CHANNEL 1

#10,9CSRX

#2,CHAN
#77,31DRHX
PC,LOOP

aliRx,BAD

:SELECT CHANNEL 2

;LOAD CHANNEL NUMBER
Je———- LOAD

UNL

lN]O

DOR ...............

SWAIT A LITTLE

#20,BAD

sGET IIR2 CONTENTS
sCHECK BO BIT IN IIR2

#20,G00D

:SET UP DATA FOR ERROR MESSAGES

50%

:BRANCH IF

YES

ERRSOFT 605,E501 ,ERRS01

:ERROR HANDLER

(KLOOP

605
MWORD
ESO01
.WORD
ERRSO1
.WORD
:BRANCH TO BGNSEG WHEN ERRLOOP [S SET

TRAP

T
(SERSOF

TRAP

($CLP?

SEQ

HARDWARE TESTS MACRO M1113 06-SEP=B2 16:46 PAGE 48-2
TEST 6:

ADDRESS REG.3i€R TEST OF

CHANNEL

17737 162564
002502
31 0174
};‘03 §83Z$7
1380«0 805585
si 1z§o¢ 1:739 120040 002500

€4

017 15

017512
817 1%
17516
017520

3455 o};s

50%:

MOV
ggg
MOV

zégools.ano
#120040,G00D
31SRX,BAD

ERRSOFT 606,E502,ERRSO1

104457
8811
gaa
003702

oyl

(KLOOP

56 8173 4 8412737
799 000010
162546 60%:
000001
002374

MOV

#10,aCSRX
#1,CHAN

59 017546

(MPB

#1,BAD

57 0175 S

58 017540

017737

60 017554

001419

162504

122737

000001

61 017556

012737

000001

017564

104457

3462 017564

017566
017570
017572
3463 017574
0175764
3266 017576
65 017606
3666 017612

3467 017614

3468 0176%2

104406
017727
023737
001407
013737

1624564
002434

002502
002502

002434

002500

104404
052777

000010

73 017652
3474 017656

013701
062701

002312
000100

7¢ 017666

017666
017666
3477 017670
017670

010137

000002

162434

002374

002414

81 017712
82 017720

022737
001419

000020

002502

000020

002500

017732

012737

104457

001141

#1,600D

MOV
CMP
BEQ
MOV

aISRX,BAD
CDAT1.BAD
12%
CDAT1,G00OD

ERRSOFT 608,E502,ERRS01

TRAP
MORD
-WORD
.WORD

SGET IIR1 CONTENTS

*MAC BIT IN [IR1 SHOULD BE SET

:BRANCH IF YES

SSET UP DATA FOR ERROR MESSAGES

*ERROR HANDLER

TRAP

CSERSOFT
.MORD
607
.WORD
ESO1
.WORD
ERRS01
:BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
(CSCLP1
:GET ISR1 CONTENTS
SATN,ATN,NDAC, (ULPA} BIT SHOULD BE SET
CBRANCH IF YES

:SET UP DATA FOR ERROR MESSAGES

*ERROR HANDLER

100008:

16230 002502

TRAP
.WORD
.WORD
.WORD

CSERSOFT
608
ESO02
ERRSO1

TRAP

(SESEG

TRAP

($BSEG

8IS

#10,3CSRX

sSELECT CHANNEL 2

MOV
ADD

DPAT,R1
#100,R1

:LOAD DPA1 IN R1
JCREATE MY TALKER ADDRESS (MTA)

#2,CHAN

R1,MTA1

SLOAD CHANNEL NUMBER

SSAVE MTA

10001$:

MOVB
JSR

MTA1,31DRHX
PC,LO0P

CMP
BEQ

cgo.suo
13

MOV
MOV

=== 0AD TALKER ADDR.
LITTLE

aliRrx,BAD
#20,G00D

ERRSOFT 609,E501,ERRSO

ERRSO1

sSELECT
CHANNEL 1
SLOAD CHANNEL NUMBER

ENDSEG

MOV

(CSERSOFT

606
ssog

;BRANCH TO BGNSEG WHEN e?:kgop 12’35;1

BGNSEG
162376

o1rr§2

118:

ENDSEG

002414
011060

80 017706 017737

11$

ERRSOFT 607,E501,ERRSO1

MOV

104405
104404

aliRx,BAD

:ERROR MANDLER

BGNSEG

113777
004737

MOV

128:

78 017672
79 017700

3484 017730
017730

BEQ

002500

104405

o1§73

MOV

CKLOOP

104457
001140
005447
003702

2275 017662

002502

001137
005406
003702

017622
017624
01re§e
017630
69 017632
017632
017632
3470 017634
017634
3,71 017636

g:ri 017644

002502

BIC

‘35:&?5"1?°¢§s°" SHOULD BE SET
SSET UP DATA FOR ERROR MESSAGES
;GET ISR2 CONTENTS

TRAP

CSESEG

TRAP

($BSEG

INTO DOR 2======

2 CONTENTS

;

IN 11R2 SHOULD BE SET
IF YES

DATA FOR ERROR MESSAGES

JERROR HANDLER

TRAP

.WORD

CSERSOFT

609

HWARDWARE TESTS
MACRO M1113 06-SEP=-B2 16:46
TEST 6: ADDRESS REGISTER TEST OF CMANNEL 1

80370¢

01774

oo
»

RERER

OO SN OON

8888

OO0O0O0O

1044

(xLOOP

177
827 7

162310
120040

803503
00250

012737

120040

002500

1619

PORINIRININD
b b cd
) ad

3485

13%:

BEQ

MoV
T
ERRSOF

104457
00116;
00544
003702
1066?9

0427

012737
017737
022737
001410
012737

000010

162%72

000001
162230
002001

002374
002502
002502

052001

002500

148%:

162200
002440

002502
002502

002440

002500

158%:

SERIVEIR
== ONNNY
oS NNO

i e
e
PUND) b

Fan 25388

AN AN N NN N NN

[l
w

001144
005447
003702

052777
015737

112777
7?7
17737

022737
001410
012737

000010
00002;
0001
11060
162106

020

000020

162162
002374

16%:

162144

002502

001410

sGET ISR2 CONTENTS
sATN,ATN NDAC BiT

sBRANCH

YES

IN ISR2 SHOULD BE SET

sSET UP DATA FOR ERROR MESSAGES
sERROR WANDLER
TRAP

#10,3(SRX

MoV
a1iRrx,BAD
MoV
#£001.8AD
(MP
158
BEO
#2001, 600D
MOV
T 611,6501,ERRSO1
ERRSOF
#1,CHAN

002500

002505
00250

21%:

ESO%
ERR501

sBRANCH TO BGNSEG WHEN ERRLOOP IS SET
cscLPt
TRAP

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
sGET IIRT CONTENTS
¢MA_MAC,BIT

IN [IR1

SHOULD BE

SET

sBRANCH [F YES
sSET UP DATA FOR ERROR MESSAGES

;ERROR HANDLER

TRAP

T
CSERSOF

611
.WORD
ES501
WORD
ERR501
LWORD
sBRANCH TO BGNSEG WHEN E?:kOOP IS SET
P

;GET ISR1 CONTENTS

(sCLP

MoV
(MP
BEQ
MOV
ERRSOFT

:ATN,ATN,
TADS ,NDAC,TPAS,(ULPA) BIT
;BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE
JERROR HANDLER

(xLOOP

612
WORD
.WORD
ESO2
ERR501
.WORD
sBRANCH TO BGNSEG WHEN ERRLOOP [S SET

BIS
MoV

#10,3CSRX
#2,(HAN

sSELECT CHANNEL 2

PC,LO0P

SWAIT A

2157, 310RHX

alirx,BAD

MOV
(MP
BEQ

sLOAD CHANNEL NUMBER
R LOAD

UNT

INTO

DOR

SET

TRAP

(SERSOFT

TRAP

cscLP

2=ceeeee P——

LITTLE

sGET IIR2 CONTENTS
;B0 BIT IN IIR2 SHOULD BE SET
sBRANCH [F

VYES

sSET UP DATA FOR ERROR MESSAGES
sERROR HANDLER
TRAP

(SgRSOl!

61
.WORD
[501
WORD
ERRS01
.WORD
sBRANCH TO BGNSEG WHEN E?:kOOP IS _SE!

(xLOOP

162056
120040

(SSRSO'!

«WORD
.WORD

#20,BAD
(MP
213
BEQ
022.6000
MoV
ERRSOFT 613,501 ,ERRS0

002502

001145
005406
003702

017737
022737

BIC

MOove
JSR
MOV

104457

10660?

1 20040, 600D
1 0,£502,ERRSO1

(kLOOP

1046457

106609

%oolo.aao

(xLO0P

001143
005406
003702
017737
023737
001410
013737

l RX,BAD

ESOI
-WORD
RRS501
. WORD
sBRANCH TO BGNSEG WHEN E?:ggOP IS _SET
CscLPt

+WORD

104457

104406

MOV
(MP

oR—w@

§‘77

SEQ 86

PAGE 48-3

D
.BAD

:GET ISR2 CONTENTS
JATN,ATN NDAC

TBRANCH IF YES

IN ISRZ2 SMOULD BE

CSCLPY

SET

HWARDWARE TESTS MACRO M1113 06-SEP-B2 16:46 PAGE 4B8-4
TEST 6: ADDRESS REGISTER TEST OF

§S19 020212

5§20 020

020

012737

001149

020
3521 020
020
S i 020

702

§23

02024

§27

1044
062777

12737

020264

012737

020272
020276
020276
020300
3529 020305
020302

104457
001147
005406
003702
104406

gsso 020304
531 020312
gSSg 020320
53 ozosiz

017737
023737
001407
013737

020330
ogossz
020334
020336

104457
001150
005447
003702

020340
020340

104405

3534 020330

3535 020340
ss“

002500

MOV

#120040,6000

ERRSOFT 614,E502,ERRSOY

:SET UP DATA FOR ERROR MESSAGES

*ERROR WANDLER

TRAP

CSERSOFT

MORD

88 La

2 4 8 8 6 017737
S
5%
827 7
g 9 020262 0O 1419
3528 0 0575

CMANNEL 1

104457

8 0

0224

120040

ot
614

.WORD

CKLOOP
000010
000001

162040
002374

000001

00250

000001

002500

22%:

161776 00250

BIC
MOV

#10,aCSRX
#1,(HAN

MOV

#1,600D

MOV
cMp
BEQ

SLOAD CHANNEL NUMBER

a{iax.ano
#1,8AD
23§

:GET IIR1 CONTENTS
SMAC BIT IN [IR1 SHOULD BE SET
‘BRANCH [F YES

ERRSOFT 615,E501,ERRSO1

(kLOOP
161746
002434

002502
002502

002434

002500

238:

MOV
CMP
BEOQ
MOV

S1SRX,BAD
CDAT1.BAD
248
CDAT1,GOOD

ERRSOFT 616,E502,ERRSO1

24%:

SSET UP DATA FOR ERROR MESSAGES

*ERROR MANDLER

CSERSOFT
TRAP
MWORD
615
.WORD
ESO1
.WORD
ERRSO1
:BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
(CSCLPY
:GET ISR1 CONTENTS
SATN,ATN,NDAC, (ULPA)BITS SHOULD BE SET
:BRANCH [F YES
SSET UP DATA FOR ERROR MESSAGES

*ERROR WANDLER

ENDSEG
: XX

ELEELEEE L EEEEEEELEEEX
St
R
gB

3537

SPART 2 OF THE ADDRESS REGISTER

ggzg

:.ADDRESS REGISTER.

(SERSOFT
616
ES02
ERRSO1

TRAP
WORD
LWORD
JWORD
100028

TP P EE YT

ES02

.WOR
ERRSO1
;BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
(CSCLPY
sSELECT CHANNEL 1

TRAP
R

(SESEG
R

STHIS PART CHECKS THE “'DAL","'DAT"',"EDPA'* BITS IN THE IEEE

3538

3541 020342
542 020346
543 020352

013701
052701
110177

ogosso

104404

S44 020356

gsas 020360
546 020366
547 020374
548 020402

549 ogocoe
550 020414
551 ogo« 2
ssi 020430
gss 020436
§54 020440
3555 020446

020446
020450
020452

052777
01§737
113777
004737

002312
000040
161676

000010
000002
002410
011060

104457
001151
005447

002444

LT T LT
T-

MOV
BIS
MOVB

DPA1,R1
#40,R1
R1,31IRMX

:GET DEVICE PRIM. ADDR. 1
:ADD DAT BIT TO DAP1
SLOAD DEVICE PRIM. ADDR.1 ¢ DAT BIT

BIS
MOV
MOVB
JSR

#10,3CSRX
#2,CHAN
MLA1,alDRHX
PC,LO00P

sSELECT CHANNEL 2
SLOAD CHANNEL NUMBER
ie=eel OAD MLA IN DOR REGISTER=======eSWAIT A LITTLE

MOV

#1,CHAN

SLOAD CHANNEL NUMBER

BGNSEG

161712
002374
161674

042777 000010 mgu.
01;737 000001 oos 74
0 7;7 161630 00 sog
023737 002444 00250
001419
013737

002500

COPA1:

BIC

MOV

(MP

> - cecesccocces R

#10,3CSRx

a1SRX,BAD

CDATS.BAD

BEQ
408
MOV
CDATS, GOOD
ERRSOFT 617,6502,ERRSO1

EEECEETOE®O
@S D@ oS
-- o ®® o m D -

TRAP

- -

($BSEG

SSELECT CHANNEL 1

SGET ISR1 CONTENTS

SATN,ATN,LADS ,NDAC ,LPAS, (ULPA)BIT

*BRANCH IF YE
SSET UP DATA FOR ERROR MESSAGES
*ERROR HANDLER
TRAP
MWORD
.WORD

SET

(SERSOFT
617
ES02

HWARDWARE TESTS
MACRO M1113 06-SEP-B2 16:46
TEST 6: ADDRESS REGISTER TEST OF CHANNEL 1

3596 020766

MOVB

-0

004737

CDAT1,GOOD

NNNNN

002436
002436

#10,3CSRX
#2,.CHAN

MTAT,3]DRHX
#1,CHAN

CMP

CDAT2.BAD

BEQ
MOV

a15RX,BAD

338

CDAT2,G0OD

ERRSOFT 619,E502,ERRS01

SO—=0O0
(==L =l=

OO —-ON
OOW—
O=NO
—
nNOOON

33%:

u"L

l"to

DOR----------------

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
sGET ISR1 CONTENTS

;ATN,ATN NDAC, (ULPA)BIT

SBRANCH [F YES

TRAP

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
;=====_0AD MTA1

SWAIT A LITTLE

CSERSOFT

.WORD
.WORD
.WORD

618
E502
ERRS501

TRAP

CSESEG

TRAP

($BSEG

IN DOR REGISTER

(IDR2)

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
sGET ISR1 CONTENTS

sATN,ATN,NDAC,
TPAS, (ULPA)SHOULD BE
sBRANCH IF YES

;SET UP DATA FOR ERROR MESSAGE
sERROR HANDLER
TRAP
.WORD
.WORD
10004%:

SET

CSERSOFT

.WORD

619
ES502
ERRS01

TRAP

(SESEG

TRAP

($BSEG

MOV

DPA1,R1

MOVB
BIS

R1,aiIRHX
#10,3CSRxX
#2,CHAN

sGET DEVICE PRIM, ADDR. 1
sSET DAL BIT
s====L0AD DPA1 + DAL BIT INTO ADR 1=-sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER

MOVB

MLA1,al1DRHX

;====L0AD MLA1

MOV
BGNSEG

002500

SHOULD BE SET

:SET UP DATA FOR ERROR MESSAGES
;ERROR HANDLER

ENDSEG

BIS

002502

ERRS017

cscLP

10003$:

MOV

NINWN

NNN=-en
NNNNNNNNES

595 020760

CDAT1,BAD
128

'-----LOAD

SWAIT A LITTLE

ENDSEG

8IS
MOV

000010

WO W NWN

359% 020750
gSOL 020756

c; CHAN
#7%,31DRHX

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER

BGNSEG

02071

588 020714
589 0507 2
590 020726
§591 0507
59% 020742

12%:

°°°°°°§ v
—_-— OO=O0O0—

58 0506
584 0206
585 020676
586 020704
587 02071%

#10,3CSRX

ERRSOFT 618,E502,ERRSO1

W
=S
=N
NS =S
NESNNSN
OHVWNY | WO WWW

o o~ N

NN%NS
NN

=1=]

—_

[«

W
W

VWA

576 0206;6
3577 020632
578 020640
3579 020642
3580 020650
020650

MOV

N = =
OO
— OgOOOO
o000
=

575 020616

MOV

CMP
BEQ

- A b\ -t O
N OMNIWN S

560 8 0502
561
020506
Sbi 020514
563 0205 5
564 8 05
565
0205
566 020540
3567 020546
020546
020550
0%0552
020554
3568 020556
020556
020556
3569 020560
020560
2570 020562
571 020570
357; 020576
573 020604
576 020610

BIS

737

553 0 06?2

WORD

;BRANCH TO BGNSEG WHEN f$§k8°’ IS SET

(xLOoOP

‘g’g‘i%

b b S

003702

8 0654
0426

3556

SEQ 88

PAGE 48-5

#100,R1

MOV

31SRX,BAD

MOV

CDAT4 ,GOOD

CMP

goa14.auo
63

ERRSOFT 620,6502,ERRS01

SWAIT A LITTLE

INTO DOR 2==========cee

sSELECT CHANNEL
:LOAD CHANNEL NUMBER
sGET ISR1 CONTENTS

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

‘BRANCH IF YE

:SET UP DATA FOR ERROR MESSAGE
sERROR HANDLER

WARDWARE TESTS
MACRO M1113 06-SEP=-B2 16:46
TEST 6: ADDRES S REGISTER TEST OF CHANNEL 1

0207
02077
02077
020774
3597 020776
020776
020776
3598 021000
021000

TRAP

36%:

10005$%:

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

S NN
W= NNON
NS NNNNSN
WN—=WWWN

NONNNN

=ON<S=Pf
O

T
ERRSOF

NNOWN

NINNNNNNNNNOY

sGET CHMANNEL NUMBER
;e===L0AD

MTA1

INTO

DOR

6%0
E Og
ERR501

TRAP

CSESEG

TRAP

C$BSEG

2===== P

SWAIT A LITTLE
sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
sGET ISR1 CONTENTS

0157, 310RHX

SET

T
CSERSOF

621
£502

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
ieeeee LOAD

UNT

INTO

DOR

cscLPt

2=eecccccccccces

sWAIT A LITTLE

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
sGET ISR1 CONTENTS

002434
002434

sATN,ATN,NDAC, (ULPA)BITS SHOULD BE SET
sBRANCH IF YES
sSET UP DATA FOR ERROR MESSAGES

MOV

;ERROR HANPLER

ERRSOFT

24%:

ENDSEG

161054

TRAP

10006$:

622
ES502
ERR501

TRAP

CSESEG

:BRANCH IF NO
:BRANCH IF YES

:SELECT CHANNEL 1

25%:

- NN

NSO

BGNSEG
BIS

COPB1:

T
CSERSOF

.WORD
.WORD
.WORD

;1S LAST DPA1 ADDRESS EXECUTED

002312

oo
D
N
OWO

000036

sBRANCH IF YgS
sSET UP DATA FOR ERROR MESSAGE
JERROR HMANDLER
TRAP
WORD

.WOR
ERR501
.WORD
;BRANCH TO BGNSEG WHEN E?:LOOP IS SET

#10,3CSRX
#2,CHAN

16%:

=4
=4
o
=4
o

W=
N NN SO
NENNNNNNNNEG
WO WWWNWNWNDO

CDAT3, GOOD

621,£502,ERRS01

CkLOOP

8
OHrVWVY
NNO'N

s NN—- O~NS
NOONWOWO
NS agyNNoNw
NNNNE
WNWNDO
NNNNES

sSELECT CHANNEL 2

CSERSOF
T

.WORD
.WORD
.WORD

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

W
=S
NS
OV

OCOO0OO0

—a
s £ °°~2
Rororo
ONWNIO
=N
& WwWrON R

3612 021110
3613 021116
3614 051124
3615 021130
3616 021136
3617 021144
3618 021152
3619 021160
3620 021162
3621 021170
021170
021172
021174
021176
3622 021200
021200
021200
3623 021202
;gza 021210
25 021212
3626 021216
3627 021224
3628 021230
sogg 021234
021240
3630
021240
31 0 12‘5
osg 0 155
633 021256
3634 021264

o000
=

021100
3611 021102

—-=OO00O00O0—

3604 021036
ggos 021044
06 02105
3607 021
3608 021062
3609 021070
021070
021072
021074
021076
3610 021100

=00
—

0231030

ENDSEG
BGNSEG

599 021005

85101
01
021016
g 021024

SEQ 89

PAGE 48-6

MOV
MOovB

JSR

#200,R1
R1,a1 IRHX
#10,3CSRX

#2,CHAN

MLAT,3]1DRHX

PC,LO0P

GET DPAT

:SET EDPA BIT

=<==L0AD DPA1 & EDPA BIT INTO ADR 1====
TRAP

($BSEG

SELECT CHANNEL 2
:LOAD CHANNEL NUMBER
i====L0AD MLA1 INTO DOR 2-=====scccecees
IWAIT A LITTLE

SEQ 90

ERRSOFT

3 021342

408%:

& 021350

623,£502,ERRSO1

‘BRANCH IF YES

SSET UP DATA FOR ERROR MESSAGES

sERROR HANDLER

TRAP

CSSRSOF!

.WORD
62
.WORD
E502
ERR501
.WORD
;BRANCH TO BGNSEG WHEN E?SLOOP IS SET

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
:----Lvo

@ISRX,BAD

002434

MOV

ERRSOFT

12%:

000010

UNL

l”‘o

ooa

CSCLP1

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

624 ,6502,ERRSO1

BNE
—

000001

442

R1
#1,CDAT1
#1.CDAT
#1.CDAT

sERROR HANDLER

TRAP

sSELECT CHANNEL 2

CSERSOF!

LWORD
.WORD
.WORD

62
ES502
ERR501

TRAP

CSESEG

sLOAD CHANNEL NUMBER
sGET MY LISTENER ADDRESS
:1S DPA 0DD
sBRANCH IF YES
sCHANCH MLA1 TO 0ODD

*BRANCH TO BGNSEG

*CHANGE MLA1 TO EVEN
*CLEAR ULPA BIT IN COMPARE DATA FOR ISR

#1,CDATS

(2]

COPC1:

#1.CDATS

000001

13%:

sSET UP DATA FOR ERROR MESSAGES

sSET ULPA BIT IN COMPARE DAIA FOR ISR

000001

sATN,ATN,NDAC, (ULPA)BITS SHOULD BE SET
sBRANCH IF YES

10007$:
#10,3CSRX
#2,CHAN
MLAT,R1
#1,0PA1

002374

000001

CDAT1,BAD
12%
CDAT1,GO0D

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
sGET ISR1 CONTENTS

ENDSEG

160630

021574

678 0216%2
3679 021630

MOV

002434

gg?& 0%1576
75 021604

3676 021612

CDATS,GOOD

SGET ISR1 CONTENTS

sWAIT A LITTLE

70 021552
71 021560
7% 021566
73 021574

;677 021616

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

#10,3CSRX

MDD

5 021356
2229 021364
0%1370
3648 021376
3649 021404
3650 021412
§251 021420
52 021422
3653 021430
021430
021432
021434
021436
3654 021440
021440
021440
3655 021645
3656 02145
3657 021456
3258 021462
59 021470
3660 021472
ggg1 021474
% 021502
3663 021510
gggk 021516
5 0215%4
0515 2
667 021534
021536
9 Oglgkb

CDATS.BAD

CkLooP

St et S s St (T D) St Bt Bt et St P
vunununno
dalalalalel o

e 021340
I

*LOAD CHANNEL NUMBER

408

MOV

XX
BEODCRE

0 021
3641 021
021330
021332
021334

;SELECT CHANNEL 1

#1,CHAN

al1$RX,BAD

[~ —n0
%l=1=] ()
D<
<A<
(7
@

g
itS

#10,3CSRX

(===
g
[={=l=]

35 8 1270
%9
1276

OOOOO?
S ON)
= b

HARDWARE TESTS
TEST 6: ADDRESS

#1,CDATS

TRAP

($BSEG

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

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

#10,3CSRxX

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER

PC LOOP

#1,CHAN

sWAIT A LITTLE

HARDWARE TESTS

MACRO M1113

06-SEP=-B2 16:46

TEST 6: ADDRESS REGISTER TEST OF CHANNEL 1

80 021636

160414 00250
1 021644 017737
53727 002444
00250

8§ 021652

001410

021654

013737

021662
0216664
021666
051670
3685 0 167%
0%167
gsse 021674

104457
001161
005447
003702

84 0 166%

000010

004737

011060

012737
112777

2290 021722

042777

369% 021736
3693 021744
3694 021752
3695 021754

017737
023737
001407
013737

91 021730

3696 021762

012737

002500

MOV

CMP

a1SRX,BAD

:GET ISR1 CONTENTS

BEQ

CDATS.BAD

MOV

408

CDATS,GOOD

‘BRANCH IF YES

SSET UP DATA FOR ERROR MESSAGES

ERRSOFT 625,E502,ERRS01

160376

40%:

#10,3CSRX

JSR

PC,LOOP

SWAIT A LITTLE

002374
160360

000010

160350

BIC

002502
002502

MOV
CMP
BEQ
MOV

002374

002434

002500

160314
002434

MOV
MOVB
MOV

#2,CHAN
#77,31DRHX
#10,3CSRX
#1, CHAN

alSRX,BAD
CDAT1,BAD
12%
CDAT1,GO0OD

ERRSOFT 626,E502,ERRS01

021762
021766
021766
021770
3697 021772
021772
021772
3698 021774

104405
032737

000001

002312

BIT

#1,DPA1

3700 022004
3701 022012
3702 022020
3703 022026
3704 0220364

052737
052737
052737
052737
052737

000001
000001
000001
000001
000001

002434
002436
002440
002442
002444

BIS
BIS
BIS
BIS
BIS

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

706 022044

042737

000001

002434

BIC

#1,CDATY

042737

000001

002442

BIC

#1.CDATS

3699 022002

3705 022042

3707 022052
3708 022060

3709 022066

3710 022074

3711 022105

104457
001162
005447
003702

001420

000417

042737
042737

042737

12$:

000001
000001

000001

002436
002440
002444

:LOAD CHANNEL NUMBER
teecee LOAD UNL INTO DOR 2==eeecceccces
SSELECT CHANNEL 1

:LOAD CHANNEL NUMBER

SGET ISR1 CONTENTS
sATN,ATN,NDAC, (ULPA)BIT SHOULD BE SET
:BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGES

*ERROR HANDLER

ENDSEG

BEQ

17%:

:ERROR HANDLER

BIS

000002
000077

000001

SATN,ATN,LADS ,NDAC, (ULPA) ,LPAS BITS SET
TRAP
csgasort
WORD
62
.WORD
ES02
.WORD
ERRSO1
:BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
CSCLPY
:SELECT CHANNEL 2

CKLOOP

104499
052777

687 021702
3688 0%1710

3689 021716

002444

SEQ 9

PAGE 48-8

BIC
BIC

BIC

BGNSEG

100108:
;1S DPA EVEN

17§

‘BRANCH IF YES

. +40

*BRANCH TO BGNSEG

TRAP
.WORD
"WORD
.WORD

CSERSOFT
626
ES02
ERRS01

TRAP

CSESEG

JSET ULPA BIT IN COMPARE DATA FOR ISR
e
Raan
feee
I
sCLEAR ULPA BIT IN COMPARE DATA FOR ISR

#1,CDAT2
#1.CDAT3

S
s

#1,CDATS

022102
371§ 022104
3713 022112
3714 022120

104404
052777
01§737
113777

000010
000002
002414

160166
002374
160150

BIS
MOV
MOVB

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

TRAP
(S$BSEG
:SELECT CHANNEL 2
:LOAD CHANNEL NUMBER
;==== 0AD MTA INTO DOR 2===ecccccccccc=

716 022132

042777

000010

160140

BIC

#10,3CSRX

SSELECT CHANNEL 1

002502

MOV
CMP
BEQ

§r1s 022126

3717 022140

004737

012737

3718 022146 017737
%719 022154 023737
720 022162 001410
3721 022164

013737

022172
022174

104457
001163

3722 022172

011060

000001

002374

002440

002502

160104

002440

002500

JSR

MOV

PC,LOOP

#1,CHAN

al$RX,BAD
CDAT3,BAD
16%

CDAT3,GOOD

ERRSOFT 627,E502,ERRS01

TWAIT A LITTLE

:LOAD CHANNEL NUMBER

SGET ISR1 CONTENTS
:ATN,ATN,TADS ,NDAC,TPAS,(ULPA) BIT
‘BRANCH IF YES

SET

:SET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP
MORD

CSERSOFT
627

40
46

12777
7;7
777
012737
017737

7 §

14g7

734 02227

023737

13737

CKLOOP
10
2

1
1106
1
000
3330 4
4

002434

gge
4

052777
81 737
1 7g1

000010
000002
002414

157766
002374

000001

002312

1os; 1
85
7
052737

000001
000001

002434
oosaso

052737

000001

002444

0223064
0
s
0

739 022324
740
022332
761
74; 0
743 0 g

764 022352
745 022

74? 022366

052737
052737

764 000420

748 022376
749 022400

750 022406
751 025414
7s§ 02 4;2
753 022430
754 022436

755

032737
001021

022436

105301
042737

000001

002434

042737

000001

002444

oagr 7
042737
042737

104404

000001
000001
000001

022440

052777

000010

757 0224564

110177

157616

756

022446

012737

oogooz

758 022460

004737

811060

05¥Z17

002440

759 022464
760 022472
761
022500

00 44g
00244

002374

022526
022530

022532

104457

001165
005447

003702

CDATY Sooo

ERRSO1

;====L0AD
INTO DOR 2
SWAIT A LITTLE
SSELECT CHANNEL 1
:LOAD CHANNEL NUMBER
SGET ISR1 CONTENTS
SATN,ATN,NDAC,

SBRANCH IF YES

(ULPA) SHOULD BE SET

SSET UP DATA FOR ERROR MESSAGES

:ERROR HANDLER

10011$:

TRAP
MORD
WORD
.WORD

cssasorv
6
€ oi
ERRS01

TRAP

CSESEG

BIS
MOV
MOV

#10,3CSRX
#2,CHAN
MTAT,R1

;SELECT CHANNEL 2
:LOAD CHANNEL NUMBER
:GET TALKER ADDRESS

INCB
8IS
BIS

Ri
#1,C0AT1
#1,CDAT

*CHANGE MTA1 TO 0DD
SSET ULPA BIT IN COMPARE DATA FOR ISR
o

BIS

#1,CDATS

BIT
BNE

BIS
BIS

B8R

#1,0PA1
25§

#1.CDAT
#1.CDATA

442

DECB
BIC

R1
#1,C0ATY

BIC
BGNSEG

#1,CDATS

BIC
BIC
BIC

#1,CDAT
#1,CDAT
#1,CDAT4

:1S DPAT 0DD
‘BRANCH IF YES
s
b

*BRANCH TO BGNSEG

*CHANGE MTA1 TO EVEN
SCLEAR ULPA BIT IN COMMPARE DATA FOR ISR
Yo
o
.

TRAP

($BSEG

BIS

#10,3CSRX

;SELECT CHANNEL 2

MOVB

R1.3IDRHX

teeee 0AD NEW MTA INTO DOR 2e=ececceccee

MOV

JSR

MOV

0225264

Esoi

;BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
CSCLPY
;SELECT CHANNEL 2
:LOAD cuauue$ NUMBER

ENDSEG

764 022516 013739 002440 002500

0025

#157,310RMx
PC.LooOP
#10,3CSRx
#1,CHAN
a1$Rx,BAD

ERRSOFT 628,E502,ERRS01

BIC
MOV
MOV

765 022524

000010
°2982'
1

157332

DAT1.BAD

157606
02374
025

0 %ggg

062777
012737
017737

002436
002440
002442

CMP

MOV

248:

000001
000001

#10,3CSRX
#2.CHAN

BEQ

002500

736
737
738

BIS
MOV

move
JSR
BIC
MOV
MOV

0
74
85

104457
001164
005447
003702

104405

168:

60050

022272
022276
022276
0
3735 0
0

‘WORD

ggg

#2,CHAN

PC .LOOP

#10,3CSRX
#1,CHAN
a1$RX,BAD
ggets.

CDAT3,GOOD

ERRSOFT 629,£502,ERRS01

SLOAD CHANNEL NUMBER
SWAIT A LITTLE

SSELECT CHANNEL 1
SLOAD CHANNEL NUMBER
SGET ISR1 CONTENTS

‘3&2&?&"1}“33 NDAC, (ULPA) ,TPAS BIT SET

SSET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

TRAP

MORD
.WORD

.WORD

cssnsovr

6
ES02

ERRS01

—d

-z

1244
7
12737

7 9
7
7¢8
729
7
7

.WORD

702

731

SEQ 92

PAGE 48-9

88;«47

3723
724
725

RO M1113
06-SEP-82 16:46
ER TEST OF CMANNEL 1

TEST 6: ADDRESS

HWARDWARE TESTS

c
WARDWARE TESTS

MACRO M1113

06-SEP-82 16:46

TEST 6: ADDRESS REGISTER TEST OF

3766
767

768
7

01 7;7

776

022616

013737

002434

022624
022626
022630
022632

104457
0011
005447
003/5¢2

0226

1o«4gs

3778 0226
0226

779 0226
780 8 64

8857 7
193&

157452

005737
1007
013737
005037
5237
005237
023737
oo1og;
oos;
022737
oo14;3
0557 7

002322

79% ogzr

0047;7

01107;

796 022746

o~§777

ooog1o

gros 022762
799 ozgros
3800 022774

000137
013737

795 022740
797 022754

022776
3301 022776
80

gggi 023000

113777

045
104401

SWAIT A LI Lfif

MOV

al1$RX,BAD

SGET ISR1 CONTENTS

SDA!1.8AD

MOV

Cghtl 8°°°

ERRSOFT 630,E502,ERRSO1

248:

ENDSEG

TQVP6:

TST
BNE

Qvp
EXQV6

BNE
MOV
CLR

1%
DPA1,SDPA
DPA1

002406

002314

00231;
000037

002312

000019

157352

snun

#10,3CSRx
21, CHAN

BEQ

002500

00232
00 15
002312

1%:

2%:

157334

[TRCNT

:ERROR HANDLER

TRAP
MORD
.WORD
.WORD

CSERSOFT
630
E502
ERRSO1

TRAP

(CSESEG

;1S QUICK VERIFY PASS SELECTED
*IF YES EXIT TEST

PC,WAIT

SWAIT A LITTLE

#217,31CRHX

157272

MOVB

DPAT,alIRWX

BIC

062 TSHD6:

SSET UP DATA FOR ERROR MESSAGES

JSR

oo; 12

123

(ULPA) SHOULD BE SET

#10,aCSRX

#17,31CRHX

3$:
Exove:

SBRANCH IF YE

ITRCNT
DPA1
DPA1,DPA2
2%
DPA1
#37,0PA1
33

MOVB

002312

SATN,ATN,NDAC,

INF
In.
CMP
BNE
INC
CMP
BEQ
BIS

157332

017024
002406

SSELECT CHANNEL 1
SLOAD CMANNEL NUMBER

$1S THIS THE FIRST TIME THROUGM THE TEST
*BRANCH IF NO
:SAVE ENTERED DPA1
:CLR DPA1
SSET FLAG TO SEE FIRST TIME PASS
:GET NEW DPA1
11S DPA1 = DPA2
‘BRANCH IF NO
: INCREMENT DPA1
SALL DONE
‘BRANCH IF YES
SSELECT CHANNEL 2

MOVB

157324

:LOAD CnAuui# NUMBER

100128:

00001

104432
000062

382 023060

023060
023060

002312
00231

112777 000217
112777

00 83

002234

781
022644
7a§ 8 65
78
652
784
022660
785 8 696
7
670
787 022676
788 022702
789 022704
790 022710
791 og 718
792 0 %72

793 02 7;2

PC . LOOP

CMP

0024

777 022624

JSR

025

023737

1427

#10,3CSRX

BIC
MOV

022606

022614

157 go
02374

774

775

MOV

BIS

777
12737

17737

168:

?2;

94
608

;BRANCH TO BGNSEG WHEN ERRLOOP 1S SET
TRAP
CSCLPY
sSELECT CMANNEL 2

77
77

157 ;s

SEQ 93

PAGE 4810

(KLOOP

124499
7
7;7

CMANNEL 1

#103CSRX

JMP
MOV
EXIT

Al
SDPA,DPA1
TST

t==e=lOAD SIC INTO ACR 2

tee==l0AD NOT SIC INTO ACR 2
SSELECT CHANNEL 1

:LOAD NEW DPAT INTO ADR1

TREPEAT THE TEST WITH THE NEW DPA1
SRESTOR ENTERED DPA1

TRAP
MORD

($8l§!
L10033-.

BEX

4 6§§ZZAADDRESS REGISTER TEST (ICR) OF CHANNEL 1IN/
L10033:

TRAP

(SETST

= 0 9%

WARDWARE TESTS MACRO M1113 06-SEP-82
16266 PAGE 49
TEST 7: ADDRESS REGISTER TEST OF CHANN

808

LSBTTL

TEST 7: ADDRESS REGISTER TEST OF CMANNEL 2

809

'Q"Q"Q"""Q""l""Q'"."'"""'"'."Q'QQ""Q".."""""""Q'Q

a1§

PART 1 CHECKS THE CORRECT FUNCTION OF ADDRESS nesxst n

815

;nors:

a}g

rnls TEST IS THE SAME TEST AS TEST 6 EXCEPT THE CHANNEL IS CMANGED

81
814

3}9

(ADR) BY

OADING ITS DEVICE PRlflAav ADDRESS INTO BIT
AND RECEIVING
HE ASSIGNED LISTEN OR
ADDRESS VIA THE 1ec/xee BUS.

THE ULPA BIT

IN THE ISaz ascxsrsn 1S DEPENDENT ON THE STATUS OFf

DPA2 (ODD DPA2 => ULPA IS SET)

;

THE DA, BIT

313

‘PART 2 tuEtxs (HE FUNCTION OF THE DAT BIT (DISABLES THE TALK ruuctxon)

820
821

- g

S1F THE QUICK VERIFY PASS IS not SELECTED, THE TEST ITERATION

SWILL DO IT W'TH DIFFERENT DPA'S.

38 ‘

.Qtt.Q.Q'- ML 2 L 2222222222222 2323323333332300332330333323322032021

3825 82383§

BGNTST

gaze o%soe 005737 002324
827 023066
3828 023070

015766
012746
oaooog
10441
062706
005037

3831 023120

004737

023114

004737

gesa ozswga
833 023130
34 023134
835 023140
836 023146

013701
062701
0101;7
032737
001420

gasa 023156

052737

3837 023150
839 023164

gaao 023172
841 023200

1St

001410

023070
023074
023100
oz§1oz
023106
gagg 023110
8

DISABLES THE LISTEN FUNCTION) AND THE EDPA BIT
(ENABLES TH" ‘DUAL PRIMARY ADDRESSING MODE), WHICH ARE ALSO
PRESENT IN rue ADR2 REGISTER,

BEQ
PRINTF

027334
000001
000004
002322
010%%0
010534

002314
000040
002412
000001

002314

052737

000001

002434

052737

000001

002440

052737
052737

3ae§ 023206 000417
3843 023210
;saa °S§§‘°
845 023224

042737
045727
042737

848 023246
023246
ga49 023250

104404
042777

3846 023232 042737
gaar 023240 042737

000001
000001
000001

000001
000001

000010

157022

850 023256 012737 000001 00;374
3851 023264 113777 002615 157004
gasg 023272 004737 01106
85 ozsiro 017737 156746 oogaoz
854 023304 022737 000020 002402
855 023312
856 023314
857 023322

001413
015737
013737

000020
002402

CLR
JSR

ITRCNT
PCLCULTA

A2:

MOV
ADD
MOV
BIT
BEQ

DPA2,R1
#40, R1
R1 HLAZ
#1.DPA2
3g’

BIS

#1.CDAT

002500
002502

JSR

BIS

002442
002444

7%
#TSHD?

7%:

002436

002434
005436
002440

PNTF

BIS
BIS

B8R

BIC
BIC
BIC

BIC
BIC

BGNSEG

BIC

MOV
MOVB

JSR

MOV

CMP

BEQ
MOV
MOV

;1S THE PNT FLAG SET
.xr YES, PRINT THE
el

TEST HEADER

MOV
MOV
MOV
TRAP
ADD

#TSHD7 ,=(SP)
#1,-(SP)
SP,RO
CSPNTF
#4,5P

PC.BuINT

:CLEAR 1reaarxo COUN
sa
:CLEAR ULPA BIT IN ISR 1 AND 2
‘SET UP PARAME TER

#1,CDATY

:SET ULPA BIT IN COMPARE DATA FOR ISR

#1.CDAT

#1.CDATS
#1,CDATS

.+40

l\ CDAT
#1.CDAT
#1.CDAT

#1.CDAT4
#1.CDATS
#10,3CSRX

#1,CHAN
HLAZ o IDRHX
C,L00P
aié“' RSAVE
RSAVE
$
#20,G00D
RSAVE ,BAD

:GET DPA2 ADDRESS
sCREATE MY LISTENER ADDRESS (MLA)
;STORE MLA
:1S DPA EVEN
‘BRANCH IF YES

s
e

PO
PP

:BRANCH TO BGNSEG

sCLEAR ULPA BIT IN COMPARE DATA FOR ISR
S
e

Sa
fee

sSELECT CHANNEL 1

TRAP

C$BSEG

*LOAD CHANNEL NUMBER
:LOAD LISTENER ADDRESS OF CHANNEL 1

SWAIT A LITTLE

SGET IIRT CONTENTS

$1S BO BIT OF IIR1 SET

*BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGES
feee

3858 0

S MACRO M1113 06-SEP=B2 16:46
S S REGISTER TEST OF CHMANNEL 2

TEST 7: A

O om
D

HARDWARE

0
053352

ERRSOFT 701,E501,ERRSO1

;ERROR HANDLER

(xLooP

1
.WORD
ES501
+WORD
ERRS501
.WORD
sBRANCH TO BGNSEG WHEN ERROR LOOP IS SET

108:

S1SRX ,RSAVE

MOV

ERRSOFT

cscLPl

SSET UP DATA FOR ERROR MESSAGES

RSAVE ,BAD

702,6502,ERRS01

SBRANCH IF YES

‘ERROR WANDLER

ISR1

SHOULD BE

TRAP

(MP
BEQ

4 01,RSAVE

MOV
MOV

#2401,G00D
RSAVE ,BAD

703,E501,ERRS01

sSELECT CHANNEL 2
JLOAD CHANNEL NUMBER
sGET 1IR2 CONTENTS
JMA MAC,IFC BiT

:BRANCH IF YES

002444
002402

002500
002502

308:

‘ERROR HANDLER

TRAP

WORD
RAP

cscePt

BEOQ

40%

MOV

RSAVE .BAD

CDATS,GOOD

+BRANCH [F YES
+SET UP DATA FOR ERROR MESSAGES

704 ,6502,ERRSO1

*ERROR MANDLER

T
ERRSOF

CDATS,RSAVE

O=000O0

OO N—-O
NO

BIC

MOV
MOvB

JSR

#10,

#1_,CHAN

@CSRX

#77,31DRHX

MOV

(MP
BEQ
MOV
MOV

T
ERRSOF

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

TRAP

BIT

SET

(SERSOFT
704
ESO%
ERR501

.WORD
.WORD
.WORD
:BRANCH TO BGNSEG WHEN E?:LOOP IS SET

(KLOOP
40%:

CSERSOFT

703
ES501
ERRS501

;GET ISP2 CONTENTS

MOV

SET

JSET UP DATA FOR ERROR MESSAGES

dISRX,RSAVE

MOV
CMP

cscLP

:BRANCH TO BGNSEG WHEN EéRLOOP 1S SET

(kLOOP

002402
002402

SSERSOF!

IN 1IR2 SHOULD BE

.WORD
.WORD

156564
002444

SET

.WORD
02
.WORD
E502
ERR501
LWORD
;BRANCH TO BGNSEG WHEN E?:LOOP IS _SET
0

T
ERRSOF

TRAP

#120040,G00D

BIS

MOV
MOV

SSEISOII

JATN,ATN_NDAC BIT OF

(KLOOP

20%:

sGET ISR1 CONTENTS

TRAP

#120040,RSAVE
20%

0
0
3859 0
0
023340
860 02334
861 02334
862 02335
gao 023356
864 0
0
;865 0 gbb
866 023374
02 374
023376
0 g200
023402
3867 023404
023404
3868 023406
3869 023414
3870 023452
3871 023430
3872 023436
3873 023440
3874 023446
3875 023454
023454
023456
023460
02346
3876 023464
023
3877 023466
3878 023474
3879 023502
3880 023504
3881 023512
3882 023520
023520
023522
0235264
0235%6
3883 023530
023530
3884 023532
3885 023540
gaao 023546
887 023554
3888 023560
889 823566
890 2;576
891 023576
892 023604
893 023612
023612

SEQ 95

PAGE 49-1

#20,G00D

RSAVE , BAD

705,6501,ERRS01

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
sLOAD UNL INTO DOR

cscLPt

sWAIT A LITTLE

sGET IIR1 CONTENTS
sCHECK BO BIT IN 1IRT
+BRANCH IF

YES

sSET UP DATA FOR ERROR MESSAGES

‘ERROR HANDLER

TRAP

(SERSOFT

~N 5
o

[N 8RR

wwn

(==
[=1=}

W =NON
NNBENNS
W=
NNw

OO0O0O0O—
==0N-—

(kLOOP

50%:

OfOWV
NN

T
ERRSOF

WS
NGBS

000~
OCOO0O

RSAVE ,BAD

706,6502,ERRS01

sGET ISR1 CONTENS
sATN,ATN,NDAC BIT

‘BRANCH [F YES

IN ISRT

000010

#10,3CSRX
#2.,CHAN
a1 IRX,RSAVE
#1,RSAVE

60%:

000001

000001
002402

MOV

ERRSOFT

#1,G0O0D
RSAVE ,BAD

707,6501,ERRSO1

156302
002434

11%:

002434
002402

als RX ,RSAVE
(DA T1,RSAVE
12%
BEQ
MOV
(DA T1,600D
RS VE .BAD
MOV
ERRSOFT 7 08,£502,ERRS01
MOV

CMP

12%:

3918 024014

*ERROR WANDLER

TRAP

4014

156254

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
sGET IIR2 CONTENTS
sMAC BIT

002374

MOV
MOV
ADD
MOV

ENDSEG

IN IIR2 SHOULD BE

156216

MOvB

SET

*ERROR MANDLER

TRAP

CSERSOFT

707
ES5O01
ERRS501

;BRANCH TO BGNSEG WHEN E?R LOOP IS SET
RAP
cscLP

;GET ISR2 CONTENTS

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

SET

sSET UP DATA FOR ERROR MESSAGES

*ERROR HANDLER

TRAP

«WORD
.WORD
.WORD

10000%:

TRAP

(SESEG

TRAP

($BSEG

#10,3CSRX
#1,CHAN

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER

#100,R1

sCREATE MY TALKER ADDRESS (MTA)
sSAVE MTA

DPAZ,R1

R1,MTA2

sLOAD DPA2 IN R1

10001%:

BGNSEG
002416

706
ES502

sBRANCH IF VYES
sSET UP DATA FOR ERROR MESSAGES

ENDSEG

BIC

T
CSERSOF

ERRS01
;BRANCH TO BGNSEG WHEN ERRLOOP | S SET
TRAP
CsCLPl

BGNSEG

3919 024016

SET

sSET UP DATA FOR ERROR MESSAGES

.WORD
.WORD
.WORD

(KLOOP

401
4«01

104404
13777

SHOULD BE

.WORD

(xLOOP

NN
NNE
WW=WWO
NNUNNOT

W=
IS
~ S WE
Of OV
NNSN

6
#120040,G00D

ERR501
;BRANCH TO BGNSEG WHEN E?zkgoP I S _SET
P

.WORD
WORD

NBWBES
OCOOWV
VOVWSN

OO0 NN
==0ON=O
OOO?
--ow--owg
= WNES
W
—
N
=NNN

NN
NNNNES
WW=WWWNDO
NINWNNNNOY

[elelololelel
el

OO0O0-—
OO0O0O0O0—=

9ISRX, RSAVE

oagoolo.nsuvz
MOV

3917 024012

024042
3924 024046
024046
024046
3925 024050
024050
3926 024052

-WORD
.WORD
.WORD

010

SEQ 96

PAGE 49-2

001301

OO0~

P8 g\fi\flbbl‘bbv‘ww&”\)—'

NN N NN NN NN NN R NN
N N N U N NN AN N NN N

o
WAL S

O ONONSNINOON
&

FEFFFRES B

MACRO M1113 06-SEP-82 16:46
S REGISTER TEST OF CHMANNEL 2

NN
AN N U N N U

2822228 3

e
PR m®E ®
g 8238 s R

ol=l=lelelelelelelalelelelelelelelelelelelelelelelelelelelelelell=l=l=1=]

HARDWARE TES
TEST 7: ADDR

MTAZ2,31DRHX

TRAP

(SESEG

TRAP

($BSEG

;LOAD TALKER ADDR. INTO DOR

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

3927

928

024060

0240

931 024102

004737

011060

177§7 156160 002403

MOV

JSR

PC,LO0P

al [RX,RSAVE

SGET xxas CONTENTS

012737

MOV

#20,G00D

SSET UP DATA FOR

ERRSOFT 709,E501,ERRSO1

*ERROR WANDLER

CKLOOP

000020

00250

3932 024110 015737 002402 oozsog

3933

3934

024116

026116
024120
024122
8%‘1 &

003702

104406
0177§7

3937 024144

001413

022737

3938 024146
3939 0241564

01§737
013737

026162
024164
0264166
024170

104457
001306
005447
003702

3940 024162

3941 024172

3942
3943

024172

024174
024202

104406

052777
012737

3944 024210
3945 024216
3946 0242264
3947 024226
3948 024236

017737
022737
001413
015737
013737

026242
0246244
024246
024250
3950 024252
026252
3951 024256
3952 024262

104457
001307
005406
003702

3949 024242

3953 024270
3954 026272
3955 024300

3956 024306

104406
017737
023737

001413
013737
013737

024306
oz«gto
026312
026314
3957 024316
024316

104457
001310
005447
003702

3959 oz«sio

012737

104406

156122

00240

120040
002402

002500
002502

000010
000002

002402
002402

002001
002402

002500
002502

155776
002440

002402
002402

002402
002440

002502
002500

112777

000137

017737
022737

011060

155676
000020

155752

002374

155734

002402
002402

ERROR MESSAGES
TRAP
LWORD
.WORD

(SERSOFT
709
ESO1
ERRSO1

BEQ

148

‘BRANCH [F

BIS
MOV

MOV
CMP
BEQ
MOV
MOV

#120040,RSAVE
#120040,G00D
RSAVE ,BAD

MOV
CMP
BEQ
MOV
MOV

#10,3CSRX
#2,CHAN

al IRX,RSAVE
#2001 _RSAVE
15%
#2001, GOOD
RSAVE .BAD

alSRX,RSAVE
CDAT3,RSAVE
16%
asavi.auo
CDAT3 GOOD

ERRSOFT 712,£502,ERRS01

BIC

#10,3CSRX

Move

#1%7,310RHxX

MOV
(MP

al [RX,RSAVE
#20,RSAVE

MOV

JSR

SATN,ATN,NDAC BIT IN ISR SHOULD BE SET
YES

SSET UP DATA FOR ERROR MESSAGES
.

*ERROR HANDLER

TRAP
MORD
.WORD
.WORD

(SERSOFT
710
ES02
ERRSO1

TRAP

(SCLPY

;BRANCH TO BGNSEG WHEN ERRLOOP IS SET

ERRSOFT 71i,E501,ERRSO!

16%:

1SRX ,RSAVE

CMP

CkLOOP
000001

.WORD

ERRSOFT 710,E502,ERRS01

15%:

LITTLE

MOV
MOV
MOV

148:

SWAIT A

:BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
CSCLP1
:GET ISR1 CONTENTS

CKLOOP

3960 024334

026346
0264354

156076
002374

156034
002001

000010

3962
3963

138:

RSAVE ,BAD

CKLOOP

042777

004737

002405

120040

3958 024320

3961 024342

MOV

104457
001305
005406

024126
0541 6
3935 024130

3936 024136

SEQ 97

PAGE 49-3

#1,CHAN

PC,LO00P

;SELECT CHANNEL 2
:LOAD CHANNEL NUMBER

SGET IIR2 CONTENTS
‘MA,MAC BIT IN IIR2 SHOULD BE SET
:BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGES
s

*ERROR HANDLER

TRAP
CSERSOF
T
MORD
711
.WORD
ESO1
.WORD
ERRSO1
:BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
CSCLPY
:GET ISR2 CONTENTS
*ATN,ATN,
TADS ,NDAC , TPAS, (ULPA) BIT SET

*BRANCH [F YES
SSET UP DATA FOR ERROR MESSAGES
free

*ERROR MANDLER

TRAP
CSERSOFT
MORD
712
.WORD
ES02
.WORD
ERRS01
:BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
($CLPI
sSELECT CHANNEL 1

SLOAD CHANNEL NUMBER

:LOAD UNT INTO DOR

SWAIT A LITTLE

SGET IIRT CONTENTS
:
‘B0 BIT IN IIR1 SHOULD BE SET

994
99 5

§996 024602

997 024606
998 024612

5999 024616

—

-2

0 —

NN
NNW

mzE

-2

MOV

RSAVE gno

*ERROR MANDLER
-WORD

21%:

MOV

CMP

2iSRX RSAVE

MOV

#120040,G00D

BEQ
MOV

22%:

.WORD
WORD

ES501
ERRS01

RAP

cscLm

:BRANCH TO BGNSEG WHEN E?RLOOP IS SET

CKLOOP

NN NN

1046405

sBRANCH IF YES
sSET UP DATA FOR ERROR MESSAGES

218

#20,G00D

ERRSOFT 713,6501,ERRSOY

W& R -~

(===
OO

3991 024600

99§

BEQ

802232 808302

SEQ 98

PAGE 49-4

MOV

NESWES

W
—
=N~

2
&

4404

'S R
LN &~
»H
~ VOl O O O O O
'S
NNIN)
= b —
&~
OO ONOO

[=lelelelelelelelele]

&~ WN =09

VOO

L es if

02440

06-SEP-82 16:46
ST OF CHANNE L2

NN NNES

0 ‘E;‘
§96$
% 8
964 8 6362

o
rp—
m»
22882 888g— OOg

TEST 7: ADDRESS

OO0~
OO0O0O0O0O0O—
80
QO
eegoes OOO0OO0 ==0ON==WN
83
W
—
2
Sal
W
—
NESWES
NEOWES
NN
8 =N
O
=N
NN =W
RGN JNAINNI' | NN
NS
NNNNYN &

HARDWARE TESTS

:GET ISR1 CONTENTS
sATN,ATN NDAC IN ISR1 SHOULD BE SET
:BRANCH IF YES

01§0010.aSAvE
22

sSET UP DATA FOR ERROR MESSAGES

RSAVE ,BAD

ERRSOFT 714 ,E502,ERRSO1

*ERROR HANDLER

CKLOOP

714
MORD
.WORD
E502
ERRS501
.WORD
sBRANCH TO BGNSEG WHEN ERRLOOP [S SET

BIS
MOV

#10,3CSRX
#2,CHAN

CMP

#1,RSAVE

MOV

BEQ
MOV

MOV

sSELECT CMANNEL 2
sLOAD CHANNEL NUMBER
sGET 1IR2 CONTENTS

al [RX,RSAVE

TRAP

CSERSOFT

TRAP

CsCLP

sMAC BIT IN 1IRZ2 SHOULD BE SET
sBRANCH IF YES

23 $

sSET UP DATA FOR ERROR MESSAGES

#1,600D

RSAVE ,BAD

ERRSOFT 715,E501,ERRSOY

sERROR HANDLER

(KLOOP

715
ESO1
ERRS01
.WORD
;BRANCH TO BGNSEG WHEN E?:LOOP IS SET

TRAP

LWORD
.WORD

002434

002402
002402

002434
002402

002500
002502

155514

23%:

MOV
CMP

2 1SRX, RSAVE
CDAT1.RSAVE

MOV

RSAVE ,BAD

BEQ
MOV

sGET ISR2 CONTENTS

sSET UP DATA FOR ERROR MESSAGES

*ERROR HANDLER

ENDSEG

TRAP

10002%:

(XXX
T T
LT T

cscLPt

sATN,ATN,NDAC, (ULPA)BIT SHOULD BE SET
sBRANCH IF YES

24$
CDAT1,GOOD

ERRSOFT 716,6502,ERRSO1

24%:

CSERSOFT

TRB
il

TER TEST.

(SERSOFT

WORD
.WORD
.WORD

716
ES502
ERR501

TRAP

(SESEG

sPART 2 OF THE ADDRESS REGIS
:THIS PART CHECKS THE "‘DAL","'DAT *“ “EDPA'* BITS IN THE ADDRESS REGISTER.
T LT T T
T LT
EXEXLIIT

MOV
BIS

MOVB
BGNSEG

DPA2,R1
#40,R1

R1,a1 [RNX

;GET DEVICE PRIM, ADDR, 2
sADD DAT BIT TO DAP?;LOAD DEVICE PRIM, ADDR.2 + DAT BI!

MACRO M1113 06-SEP-B2 16:46
TEST 7: ADDRESS REGISTER TEST OF CMANNEL 2

HARDWARE

4000

TESTS

0246 8 3«0"?%
113777
024626

461

4001
600;
46
400
4640
4004 024646
4005 024654
4006 02466
4007 02467
4008 02467
4009 0247
4010 8 :;

og&r;r

0024110
11

155452 COPA2:
122««5

W ogml me
nir 19939 oog‘o

837 7
0 161;
01§r§
013737

002446

00240

002444
002402

oossoo
002502

005
003702

024716

104406

4011 024716

401; 024720
4013
024726
6016 0247
6015 024742

ERRSOFY

6016 024746

6017 024754
4018 024762
4019 024770
4020 024776
4021 025000
602§ 025006
4023 025014

025014
025016
025020
025022

4026 025024

025024

155352
002374

004737
052777
012737
017737
023737
001412
013737
013737

011060
000010
000002
155270
002434

15532
002374
002402
002402

002434
002402

002500
002502

001316
005447
003702

128:

o
~

RS
N ReosSN

CDATS,GOOD

RSAVE gAD

717,6502,ERRSO1

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

CBRANCH IF YE

:SET UP DATA FOR ERROR MESSAGES

*ERROR MANDLER

TRAP

000010
000001

155242
002374

sSELECT CHMANNEL 1
sLOAD CHANNEL NUMBER

JSR
BIS
MOV
MOV
CMP
BEQ
MOV
MOV

PC,LOOP

SWAIT A LITTLE

#77,31DRHX
#10,3CSRx

#2,CHAN
a1SRX ,RSAVE

CDAT1.RSAVE
12%
CDAT1,G00D

RSAVE .BAD

7186502, ERRSO1

:.----Lo‘o

l"'o

sATN,ATN
NDAC, (ULPA} BIT SHOULD BE

sBRANCH [F YES
sSET UP DATA FOR ERROR MESSAGES

*ERROR WANDLER

TRAP

10003$:

011060
000010
000002
155160
002436

155214
002374
002402
000402

002402
002436

002502
002500

MOVB

JSR
BIS
MOV
MOV
CMP
BEQ
MOV
MOV
T
ERRSOF

33%:

ENDSEG

#10,3CSRX
#1,CHAN
MTAZ2,31DRHX
PC,LO00P

#10,3CSRx

#2,CHAN

1SRX, RSAVE
CDAT2,RSAVE
338
RSAVE

CDAT2

,BAD

GOOD

719,£502,ERRSO1

cscLP?

Do.-------------.

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
sGET ISR2 CONTENTS

ENDSEG

BIC
MOV

s‘slSO'l

1
.WORD
ES502
ERRS501
LWORD
;BRANCH TO BGNSEG WHEN E?=L00’ IS SET

BGNSEG

106457

001317
005447
003702

CDATS ,RSAVE
«0%

SWAIT A LITTL

#10,3CSRX
#1,(HAN

ERRSOF
T

104405

004737
082777
012737
017737
023737
001412
013737
013737

a1 SRX, RSAVE

SELECT CHANNEL 2
:LOAD CHMANNEL NUMBER
:GET ISR2 CONTENTS

P, LO0P
#10,3CSRx
#2,CHAN

BIC
MOV

MOVB

113777 002416 155224

WNANANANNONO
N «b =8

[elolelelelelelele
ol
ugnfiagasbuha«uunghnvhufinu
[=]=]

=J=]

155334

1064457

104404

' ok

000077

40%:

($BSEG

MLAZ,31DRHX

(KLOOP

000010
000001

042777
016737

TRAP

sSELECT CHMANNEL 1
se=== OAD H%A IN DOR! REGISTER=wweee

#10,3CSRX

.WORD

062777
012737
112777

JSR

(P
BEOQ
MOV
MOV

034710 001315
447

024712
024714

BIC
MOV
A
noy

104457

SEQ 99

PAGE 49-5

:SELECT CHANNEL 1

SET

T
CSERSOF

.WORD
.WORD
.WORD

718
ESO02
ERRS01

TRAP

(SESEG

TRAP

($BSEG

SLOAD (MANNEL NUMBER

te==LOAD MTA2 IN DOR1 REGISTER (IDR1)=

SWAIT A LITTLE

SSELECT CHANNEL 2
SLOAD CHANNEL NUMBER
SGET ISR2 CONTENTS

SATN,ATN,NDAC, TPAS, (ULPA)

‘BRANCH [F YES

SHOULD SET

SSET UP DATA FOR ERROR MESSAGES

*ERROR MANDLER

TRAP

.WORD
.WORD
.WORD

10004%:

$ERSOH!

19
£502
ERRSO!

HARDWARE TESTS
TESY 7: ADDRES

8 51

4039
0251
4040 02514

40461 8
6042

0251

4043 0 2156
4046 0
lgs
4045 0 21
&04? 02517
4047 02520
4048 02521
4049 025216
4050 025224
4051 025232
aosg 025
4053 025 68
4054 02525

025250
025252
025254
025256

4055 025260

025260
055560
4056 025 63
02526

4057 025264
4058 025;72

4059 025300
4060 025306
4061 025312
4062 025320
406 0253;2
4064 0253
4065 025342
4066 025344
4067 025352
4068 025360
025360

025362
823366

MACRO M1113

06-SEP=B2 16:46

104405

(MANNEL 2

81 701

002314

MoV

110177

155102

ggxgtc

$2701

104494

02 100

0462777

880010

113777

00241

052777
012737
017737

00018
oggog
155034

01 7;7

0047;7

023737

00151;

01§73
013737

0001

1106

002642
002402
002442

#10,3CSRX

;SELECT CHANNEL 1

155100

MOVB

MLAZ,31DRMX

seeee 0AD MLA [N DORlecccccccccccccces

1ssgro
002374
00 ‘os

8IS
MOV
MOV

#10,3CSRx
#2,CHAN
a1 SRX,RSAVE

SSELECT CMANNEL 2
:LOAD CHMANNEL NUMBER
SGET ISR2 CONTENTS

ooisr‘

MOV

JSR

00240

(MP

BEQ

002502
002500

MOV
MOV

025370

c1,$uuu
PC, LOOP

goava.asavc

RSAVE ,BAD
CDAT& GOOD

ERRSOFT 720,E502,ERRSO1

SSET DAL BIT

000010
000001

004737

011060

002416

000010

155006
002374

*ATN,ATN,NDAC.LPAS, (ULPA) BITS SET

TBRANCH [F YES

SSET UP DATA FOR ERROR MESSAGES
-

*ERROR WANDLER
-

TRAP

10005$:

154770

000002
1547264
002440

002374
002402
002402

002402
002440

002502
002500

720
€502
ERRSO1

TRAP

(SESEG

TRAP

($BSEG

MTAZ,alDRHX

teeeel0AD MTA2 IN DOR! REGISTER====

BIS

#10,3CSRX

SSELECT CHANNEL 2

MOV
MOV
CMP
BEQ
MOV
MOV

PC,LOOP

#2,CHAN
a1 SRX,RSAVE
(DAT3,RSAVE
16%
RSAVE ,BAD
CDAT3 GOOD

ERRSOFT 721,502, ERRSO1

104457

sSELECT CHANNEL 1
SGET CHANNEL NUMBER
TWAIT A LITTLE

SLOAD CHANNEL NUMBER
SGET ISR2 CONTENTS
sATN,ATN,TADS ,NDAC,TPAS, (ULPA) BIT SET
:BRANCH IF YES
*SET UP DATA FOR ERROR MESSAGES
b

*ERROR WANDLER

001321

TRAP

CSERSOFT

.WORD

ES02

LWORD

005447

.WORD

CKLOOP

104406
042777
012737

000010
000001

004737

011060

013737

002434 002500

112777 000137

154700
002374

154662

16%:

BIC
MOV

#10,3CSRX
#1,CHAN

JSR

PC,LO0P

Move

052777 000010 154652
01;737 000002 002374
017737 154616 002402
023737 002434 002402
00151;

BIS
MOV
MOV
CMP
BEQ

013737

MOV
0

002402

002502

;senso;v

.WORD
.WORD
.WORD

MOVB

JSR

154760

#10,3CSRX
#1,CHAN

($BSEG

SWAIT A LITTLE

ENDSEG

BIC
MOV

TRAP

SLOAD CMANNEL NUMBER

BGNSEG

4069 025370 003702
4070 025372
4071 025400
4072 025406
4073 0256414
4074 025420
4075 0256;2
4076 0254
4077 0256442
4078 025450
4079 025452
4080 025460
4081 025466

i===L0OAD DPA2 PLUS DAL BIT IN ADDR. 2-

BIC

104405

01;737
01 7;7
023737
001413
013737
013737

R1,a1 1Rux

155116

368:

104404
042777
015737

(SESEG

:GET DEVICE PRIM. ADDR. 2

#100 . R1

001320
005447
003702

052777

TRAP

DPA2,R1

BIS

104457

113777

SEQ 100

PAGE 49-6

MOV

#157,31DRHX

10,3CSRX
#2,CHAN
a1 SRX, RSAVE
CDATY.RSAVE
248

CDAT1,G0OOD

RS AVE ;BAD

ERRSOFT 722,E502,ERRS01

721

ERRSQ!

:BRANCH TO BGNSEG WHEN ERRLOOP 1S SET
TRAP
CSCLPY

;SELECT CHANNEL 1
TLOAD CHANNEL NUMBER

teceee LOAD UNT INTO DOR====e==e= S
SWAIT A LITTLE

SSELECT CHANNEL 2
SLOAD CHANNEL NUMBER
SGET ISR2 CONTENTS
TATN,ATN,NDAC, (ULPA) SHOULD BE SET
‘BRANCH IF YE

SSET UP DATA FOR ERROR MESSAGES
e

*ERROR WANDLER

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

0254

104457

025
025474

005
003702

SEQ 101

PAGE 49-7

0 Skg§
00132;
47
44

4082 025476

025476
025476
4083 025500
4084 025506
4085 025510

1044?5

TRAP

022737
0010 ;
0001
85;7 7

000036

4088 025526
4089 O%SS 2
4090 0255

052701

000200

409
4092
4093
4094
4095
4096

042777
01%737

000010
000001

154532
002374

004737
052777
01;737
017737
023737
001413
013737
013737

011060
000010
000002
154450
002444

154504
002374
00¢402
002402

002444
002402

002500
002502

4086

4087

025514

025522

0255

0%5540
025546
025554
025562
025566
025574

4097 025602

4098 025610
4099 0%5616
4100 025620
410 0256%2

4102 0256

025634
025636
025640
025642
4103 025644
025644

6104 025646
4105 025654
4106 025662
4107 025670
4108 025674
4109 025702
4110 025710

4111
611;
6112
6114

025716
025754
025726
025734

6115 025742

110177

104404

113777

#36,0PA2

25%:

CMP
BNE
JMP
BIS
BIS

#200,R1

GET DPA
i=======SET EDPA B l '----------------

#10,3CSRX
#1,CHAN

sSELECT CHANNEL 1
sLOAD CHANNEL NUMB 3 R

0C2314
_
154556

154516

002412

154514

104406

042777
012737

000010
000001

004737
052777
012737
017737
023737
00161;
013737
013737

011060
000010
000002
154342
002434

154376
002374
002402
002402

002434
002402

002500
002502

112777

000077

154424
002374

(OPB2:

40%:

154406

104405

R1,a1 IRHX

Move

:LAZ.alDRHl

TRAP

:1S LAST DPA ADDRESS SELECTED

SSELECT SHANNEL 2

:LOAD DPA2 & EDPA BIT INTO ADDR.
TRAP

CkLOOP

;BRANCH TO BGNSEG WHEN ERRLOOP |

JSR
BIS
MoV
Mov
CMP
BEQ
MoV
MoV
ERRSOFT

BIC
MOV

032737

000001

002314

BIT

MOVB

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER

sGET ISR2 CONTENTS

sATN,ATN,LADS ,NDAC,LPAS, (ULPA) BIT

sBRANCH IF YES

SET

sSET UP DATA FOR ERROR MESSAGES

*ERROR HANDLER
.WORD

#10,3CSRX
#1,CHAN

#77,31DRHX
a1 SRX,RSAVE
CDAT1.RSAVE
12%
CDAT1,GOOD
RSAVE .BAD

7246502, ERRS01

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
:===LOAD UNL INTO DOR

TRAP

sWAIT A LITTLE

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
;GET ISR2 CONTENTS
sATN,ATN,NDAC,

‘BRANCH IF YES

(ULPA) BIT SHOULD BE SET

sSET UP DATA FOR ERROR MESSAGES

*ERROR HANDLER

TRAP

.WORD
.WORD
.WORD

ENDSEG

154316
002374

($BSEG

s===LOAD MLAZ INTO DOR1 REGISTER====

sWAIT A LITTLE

BIC
MOV

(SESEG

‘BRANCH IF NO

JSR
BIS
",
MoV
@ISRX,RSAVE
MoV
CDATS,RSAVE
(me
40%
BEQ
CDATS,GOOD
MoV
RSAVE ,BAD
MoV
T 723,6502,ERRSO1
ERRSOF

000010
000001
002412

Tave?
#10,3CSRX

MOVB
BGNSEG

042777
01%737
113701

25%

oPAg.at

MOvB

12%:

10006$:

MOV

BIC
MOV

104457

02575
02575

EnRs01

ENDSEG

001323
005447
003702

001324
005447
003702

025754
025762
025770
025774

002314

$$EI50'I

r{3 ¥

104457

025742
025744
025746
025750

4116 02575
6117
4118
4119
4120

13701

027172
000?10

.WORD
.WORD
-WORD

10007%:
#10,3CSRX

#1,CHAN

MLA2,R1

#1,0PA2

sSELECT CHANNEL 1

sLOAD CHANNEL NUMBER
sGET MY LISTENER ADDRESS
:1S DPA EVEN

TRAP

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

4121

026002

026006

001021

PR i 8 6004 105; 1
6124 026014
4125 0 60%8
4126 026030

4127 026036
4128 026044

4129 026046
4130 026050

BNE

105301
L2737

002444

800001

002434

4140 026134
4161 026142
6142 026150
4143 026156
L1644 026160

012737
017737
023737
001413
013737

000002
154110
002444

002374
002402
002402

002444

002500

104404

000001
000001
000001
000001

013737

002402

38:

002436
00 aag
00244
002444

154144

COPC2:

002502

042777
012737

4156 026264
4158 026274

4159 026302

012737
017737

023737
001412

013737
013737

000010
000001

154064
002374

000002
154002

002374
002402

002434

002500

00243

40$:

002402

4161 056316
416§ 026322

4163

026324

4164 026332
4165 026340

104405

032737
0014§o

osgr 7

052737
052737

#1,CDAT
#1.CDAT
#1,CDATA
#1,CDATS

e
D
Ay
Rt

R1
#1,CDATY

000001

002314

000001

002434

000001
000001

002436
002440

SCHANGE MLA2 TO EVEN
:CLEAR ULPA BIT IN COMPARE DATA FOR ISR

TRAP

($BSEG

#10,3CSRX
R1,91DRHX
PC .LOOP

;SELECT CHANNEL 1
AD NEW MLAT [INTO DOR======= ;e====|
SWAIT A LITTLE

MOV
MOV
CMP
BEQ
MOV

#2,CHAN
aISRX,RSAVE
CDATS ,RSAVE
408
CDATS,GOOD

:LOAD CHANNEL NUMBER
SGET ISR2 CONTENTS
;ATN,ATN,LADS
,NDAC, (ULPA) ,LPAS BIT SET
‘BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGES

BIS

#10,3CSRx

RSAVE . BAD

BIC
MOV

#10,3CSRX
#1,CHAN

JSR

PC,LOOP

8IS

MOV
MOV

CMP

BEQ

MOV
MOV

#77.31DRHX

#10,3CSRX

#2,CHAN
aISRX,RSAVE

SSELECT CHANNEL 2

*ERROR MANDLER

CSERSOFT
TRAP
725
MORD
ESO2
"WORD
ERR501
.WORD
:BRANCH TO BGNSEG WHEN ERRLOOP IS SET
(SCLPY
TRAP
;SELECT CHANNEL 1
*LOAD CHANNEL NUMBER

te=e= 0AD UNL INTO DOR=====ccccccceTWAIT A LITTLE

SSELECT CHANNEL 2

*LOAD CHANNEL NUMBER
SGET ISR2 CONTENTS

CDAT1.RSAVE

*ATN,ATN,NDAC, (ULPA) BIT SHOULD BE SET

CDAT1,GOOD

SSET UP DATA FOR ERROR MESSAGES

12%

RSAVE .BAD

ERRSOFT 726,E502,ERR501

faee
*BRANCH TO BGNSEG

BIC
MOvVB
JSR

MOVB

002502

:CHANGE MLA2 TO 0DD

't Soars
.4

ERRSOFT 725,E502,ERRS01

002402

ok 852310 003702
026312

#1.CDATA

CKLOOP

026302 104457
026304 001326
026306 005447

026315

DECB
BIC

MOV

104457
001325
005447
003702

104406

BIS
BR

BIC
BIC
BIC
BIC
BGNSEG

4150 026222 112777 000077 154046
4151 026230 004737 011060
4152 026234 052777 000010 154036
4157 026266

8IS

4139 026126 052777 000010

4155 026256

:SET ULPA BIT IN COMPARE DATA FOR [SR

00244

000001

154162

4153 026242
4154 026250

01.CDA1§
#1,CDAT

000001

052737
ooo«so

002436
00 “8

000010
154154
011060

4148 026206
4149 026214

BIS
BIS

#1,(DATT

052737

800001
000001

042777
119177
004737

0261764
026176
026200
026202
6147 026204
026204

:BRANCH IF YES

BIS

4136 026110
6137 026116
4138 026122

4146 026174

0026%‘

737
042737
042737
042737

4145 026166

000001

4131 8 6056
P g
6064
6133
026072
6134
026100
6135 026106

026106

INCB

052737
052737

$EQ 102

PAGE 49-8

‘BRANCH IF YES
..

*ERROR HANDLER

b
BIT
BEQ

BIS

BIS
BIS

TRAP
MORD
"WORD

10010$:
#1,DPA2
3s

;1S DPA EVEN
‘BRANCH [F YES

#1.CDAT
#1.CDAT

e
s

#1,CDAT1

CSERSOF 7
726
ESO2

.WORD

ERRSO1

TRAP

(SESEG

SSET ULPA BIT IN COMPARE DATA FOR ISR

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

4129
8 6356 05 727 800001 002444
4168 026362 000417

6346

052737

000001

002442

6169 026

042737

000001

002434

4173 026414
6174 0264 %

042737

000001

002444

6170 0263 g
4171 026400
a17§ 026406

026422

042737
042737
042737

104404

000001
000001
800001

6175 oge« &

062777

000010

6177 026440
4178 026446

113777
004737

002416
011060

4176 026432

4179 026452

4180 026460
4181 026466
4182 026474

01 7;7

055777

012737
017737
023737

4183 026502 001413

4184 0265064

4185 026512

4186 026520

026520
026522
026524
026526
4187 026530
026530
4188 026532

013737

000001

000010

002436
002440
002442

002502

002500

104404

000010

4204 026656

013701

002416

012737
032737

4206 026670 001021
4207 026672
4208 026674
4209 026702

105201
052737
052737

MOV

#10,3CSRX

16$

RSAVE ,BAD
CDAT3

GOOD

ERRSOFT 727,E502,ERRS01

16$:

153522
153512

BIC
MOV

#10,3CSRX
#1, CHAN

MOV
MOV
CMP
BEQ
MOV

#2,CHAN
aISRX, RSAVE
CDAT1.RSAVE
24$
CDAT1,GOOD

MOVB
JSR
BIS

002502

153430

000001

002374

000001

002314

000001

(S$BSEG

MOV

#1%7.31DRHX
PC,LOOP
#10,3CSRX

RSAVE ;BAD

ERRSOFT 728,E502,ERRSO1

:LOAD CHANNEL NUMBER

SSELECT CHANNEL 2

‘LOAD CHANNEL NUMBER
*GET ISR2 CONTENTS
:ATN,ATN,TADS ,NDAC,TPAS,(ULPA) BIT SET

*BRANCH IF YES

*SET UP DATA FOR ERROR MESSAGES
e

*ERROR HANDLER

TRAP
CSERSOFT
MORD
727
"WORD
ESO2
.WORD
ERRS01
:BRANCH TO BGNSEG WHEN ERRLOOP 1S SET
CSCLPY
TRAP
;SELECT CHANNEL 1
:LOAD CHANNEL NUMBER

temee=l0AD UNT INTO DOR===cccccceee
SWAIT A LITTLE
SSELECT CHANNEL 2
‘LOAD CHANNEL NUMBER
SGET ISR2 CONTENTS
*ATN,ATN,NDAC, (ULPA) SHOULD BE SET
‘BRANCH 1F YES
*SET UP DATA FOR ERROR MESSAGES
-

*ERROR HANDLER

ENDSEG

100118$:

BGNSEG

042777

4205 ogcobz

MOV

24%:

4202 026642

4203 026650

BEQ

#1,CHAN

CKLOOP

002434

026640

BIS

002500

002374
002402
002402

4201 026640

TRAP

#2,CHAN
aISRX,RSAVE
CDAT3,RSAVE

002402

MOV
MOV
CMP

MOV

153620

000002
153456
002436

104405

Rt
B

teee= OAD MTA INTO DOR? REGISTER======
SWAIT A LITTLE

012737
017737
023737
001412
013737

026636
026636

:CLEAR ULPA BIT IN COMPARE DATA FOR ISR

MTA2,alDRHX
PC,LOOP

4193 026566
4194 026574
4195 026602
4196 026610
4197 026612

4200 026636

#1.CDAT
#1,CDAT
#1.CDATS

MOVB
JSR

002374
002402
002402

4190 026546 112777 000137
4191 026554 004737 011060
4192 026560 052777 000010

104457
001330
005447
003702

#1,CDATY

153630

oo§374

153540
002374

026626
026630
026632
026636

BIC
BIC
BIC

#1,CDATS

s
*BRANCH
TO BGNSEG

;SELECT CHANNEL 1

000010
000001

4199 026626

Sowd

BIC

”.+ soats

#10,3CSRX

042777
012737

013737

#1,CDATS

BIC

4189 026540

4198 026620

BIS
BR

BIC
BGNSEG

104457
001327
005447
003702

104406

BIS

153646

000002
153564
002440

002440

3%:

SEQ 103

PAGE 49-9

002434

002436

BIC

#10,3CSRX

;SELECT CHANNEL 1

MOV

MTAZ,R1

SGET TALKER ADDRESS

BNE

25¢

MOV
BIT

INCB
BIS
BIS

#1, CHAN
#1,0PA2

R1
#1,CDAT1
#1.CDAT2

TRAP
MORD
.WORD
.WORD

CSERSOFT
728
ESO2
ERRS501

TRAP

CSESEG

TRAP

($BSEG

*LOAD CHANNEL NUMBER
*1S DPA ODD

*BRANCH
IF YES

*CHANGE MTA2 TO 0DD
*SET ULPA BIT IN COMPARE DATA FOR ISR
-

027170
027170

4244 027172
4245 027176
4246 027200
4247 027204
4248 027206
4249 027214
4250 027220
4251 0272;4
4252 027230

4253 027236

4254 027240
4255 027244

002402
002440

153266
002374
002402
002402
'
002502
002500

COPD2:

MOV

T
ERRSOF

104457

001331
005447
003702

005737
001054
005737
001007
013737
005037

005237
005237
023737
00100;
005237
022737

VE ,BAD
AT3GOOD

9,£502,ERRSO1

*BRANCH TO LOAD NEW MTA

*CHANGE MTA2 TO EVEN
SCLEAR ULPA BIT IN COMPARE DATA FOR ISR

s====L0AD NEW MTA INTO DOR REGISTER==-

sWAIT A LITTLE

sSELECT CHANNEL 2
:LOAD CHANNEL NUMBER
sGET ISR2 CONTENTS

sATN,ATN,TADS ,NDAC,TPAS, (ULPA) BIT SET
sBRANCH IF YES
sSET UP DATA FOR ERROR MESSAGES

*ERROR HANDLER

TRAP

T
CSERSOF

WORD

ES502

.WORD

.WOR

000010
000001
000137
011060
000010
000002
153124
002434

153206
002374
153170

153160
002374
002402
002402

002434
002402

0025900
002502

#1573 10RHX
PC,LOOP

#10,3CSRX

#2,CHAN
aISRX,RSAVE

CDAT1.RSAVE
4

ERRSOFT

24%:
002234

fQVP7:

002322
002314
002314
002322
002314
002314

002314
000037

002314

DAT1,G0OD
SAVE .BAD

30,6502, ERRSO1

1%:

2%:

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
jeeee- LOAD

UNT

INTO

ERR501

TRAP

DOR===eeccccccccs

sATN,ATN,NDAC, (ULPA)
sBRANCH IF YES

SHOULD BE SET

sSET UP DATA FOR ERROR MESSAGES
sERROR HANDLER

TRAP

10012%:
QVP

Exav?
ITRCNT

DPA2,SDPA
DPA?
ITRCNT
DPA

DPAZ2,DPA1
2%
DPA2

Cs$CLP

sWAIT A LITTLE

sSELECT CHANNEL 2
:LOAD CHANNEL NUMBER
sGET ISR2 CONTENTS

ENDSEG

002406

002312

#10,3CSRX
#1,CHAN

16%:

729

;BRANCH TO BGNSEG WHEN ERRLOOP IS SET

C(kLOOP

001332
005447
003702
104405

SAVE
RSAVE

(=2
2 1

104406

BIS

1046457

15 876

011060
00001g
000002
153232
002440

00%434
002436
00%640
002442
002444

25%:

UV O
0t ) = (TM) cd e ced cd e cd e P o o
S o
BPAPBWs Os s s & & s o
-l 20
FeRoooomey
NOYOYYY
o000
WM
WXIVO—OO0OO0O0O
>
s s PPOOOPPIPP
s
i S
02UV
) el ) =t
TSN —
(V¥ V]

027160
027162
027164
027166
4243 027170

4242 027160

000001
800001
000001
000001
002001

002444

NOD=OVDRBIOIIRRRRRD

042777
012737
112777
004737
052777
012737
017737
023737
001412
013737
013737

027062

000001

0 662
00244

NTVON

4231 027064
4232 027072
4233 027100
4234 027106
4235 027112
4236 027120
4237 027126
4238 027134
4239 027142
4240 027144
4241 027152

052737
000420
105301
042737
042737
042737
042737
042737
110177
004737
05%777
012737
017727
023737
001413
013737
013737

800001
000001

et b

gg 737
737

U (D et b

4210 056710
4211 026716
4 1§ 026724
4213
026732
6%14 0267
4215 026736
4216 056746
6217 026752
4218 0%6760
4219 026766
4220 0%6774
4221 027000
4
g 027004
652 02701
42264 02702
4225 027026
4226 027034
4227 0270
4228 027044
4229 027052
027052
027054
027056
027060
4230 027062

SEQ 104

PAGE 49-10

06-SEP-82 16:46
REGISTER TEST OF CHANN EL 2

e FTY T s 0 0o

MACRO M1113

« 2O mmom

HARDWARE TESTS
TEST 7: ADDRES

CSERSOFT

.WORD
.WORD
.WORD

730
ES502
ERR>01

TRAP

CSESEG

:1S QUICK VERIFY PASS SELECTED
sIF YES EXIT TEST
1S THIS THE FIRST TIME THRU THE TEST
:BRANCH IF NO

:SAVE ENTERED DPA?2
:CLR DPA2
:SET FLAG TO SEE FIRST TIME PASS
:GET NEW DPA2
:1S DPA2 = DPA1
JBRANCH IF NO

: INCREMENT DPA?2
sALL DONE

naa?unai TESTS
MACRO u1112 06=SEP=82 16:46
TEST 7: ADDRESS REGISTER TEST OF CMANNEL 2
A

4
¢

7
7274

44
4261

4 o;
4263
4264
4265

77 22
gg127?9
?
027

7310

02731
027
;

“ 87
4 39

2 gg 027334

02764164

BIC
move

7
777

7;
17

793

JSR
MOve

11377

152736

MOVB

?s 77;

1;7
13737
g

15:
406

045

123

1597

002314

ooooos

4270
427 05751‘

027414

BEQ

19
1;;833
17
1

062

8IS

38:
Exov?:

TSHD7:

#10,3CSRY
#217 a#canx

:BRANCH IF YES

rg “‘}
#17,31CRuxX
#10,3CSRX

SWAIT A k' %E
ieee=
0AD NO sxs INTO ACR 1
SSELECT CMANNEL

DPAZ,al IRMX

JMP
A2
MOV
SDPA,DPA2
EXIT 18T

SSELECT
CHANNEL 1
;==== 0AD g#c INTO ACR 1
‘LOAD NEW DPA2

INTO ADR2

SREPET THE TEST WITH THE NEW DPA1
SRESTOR ENTERD DPAQ
S

.WORD t130§a-.

NLIST agx
.t?ggz
.EVEN
ENDTST

104401

SEQ 105

PAGE 49-11

gigzznaooasss REGISTER TEST (ICR) OF CHANNEL 23N/

L10034:

TRAP

CSETST

M3
TEST

: DA‘A'§IANS
FER

06-SEP-B2 16:46
SBTTL

SEQ 106

PAGE 50
TEST B8: DATA TRANSFER TEST

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

JTHIS YfgsS DIV 18
DED INTO TWO PARTS
ll CHECKS

HE DATA OU

(DOR) AND DATA IN (DIR) REGISTERS

PAI! 1 CHECKS THE DOR AND DIR REGISTER EVD%OQDING THE DORT WITH A
:
:

DATA BYTE AND READING IT FROM T
(PROGRAMMED DATA TRANSFER FROM CHAN.1

TO CMAN.2).

iPART 2 (H CKS THE DOR AMD DIR REGISTER BY LOADING THE DOR2 WITH A
3

ATA BYTE AND READING IT FROM THE DIR1

(PROGIAHHED DATA TRANSFER FROM CHAN.2 TO CHAN.1).

:1F THE QUICK VERIFY PASS IS NOT SELE(TED. THE TEST ITERATION IS
;CARRIED OUT WITH A DIFFERENT DATA PATTERN

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

BGNTST

027416
027416

002324

8 7613
74

e 8
6§§9 8 7536
{8 dte
4??3 8 755

6311
027560
o 1;
75
027574
6313
6314 027576
4315 027604
4316 027612

000
iz-hu-‘

NNONINS

R W

§°
b
Lo ]
=)OOb ==
NN

NENNNE
WO W~
NNNNN
=WWO OO

0275264

7%:

CLR
JSR
JSR
BGNSEG

YES, PRINT THE TEST HEADER
#TSHD8,=(SP)

MOV
TRAP

SP,RO
CSPN!F

1TRCNT

ADD

sCLEAR COUNTER

” -(SP
#6,SP

sCLEAR ULPA BIT IN ISR 1 AND 2
sSET UP PARAMETER

MovBe
MOV

[ ] 21 z.alcnux

----- LOAD TON IN ACR 1 (ICR1)==cccee

MOV

[ ] 12004

T
ERRSOF

PC,CULPA

F IS RX,B

# 12
'A $

ootz.euo

8 01 .ssoéeaaso1

ENDSEG

TRAP

($BSEG

SGET ISR1 CONTENTS
SATN,NDAC ATN TADS SHOULD BE SET
SBRANCH IF ¥
SSET UP oArA FOR ERROR MESSAGE
*ERROR HANDLER

TRAP
.WORD

10000%:

;GET DPA2 ADDRESS

002314

CSERSOFV

«WORD
.WORD

ESO%
ERR501

TRAP

CSESEG

MY LISTENER ADDRESS (MLA)
.g?g EE

:1S DPA EVEN
.BRANCH IF_YES
SEI ULPA BIT IN COMPARE DATA FOR ISR

002314

0001

000001
000001
000001

Mov

PC,BGINT

CMP
BEQ

($:
NNN=NNNNINN
= -

72 [

75264

NN AN =2 NN N

4304

7522

T
{?
THE PNT FLAG S ET

MOV

NS 8
osrsw
NN=N

027514
027516
027520

PNTF
7%
#TSHDB

000001

NNNSNNSN

027460

4298 0 7665
4299 02747
4300 027476
6%01 027504
“ Og 027506
4303 027514

PRINTF

252
NN
=2

g
6%3? 0%7660

BEQ

031730

OOOOOOOQOOgO
o
PNORNLND
= PO O NI S
g;\h\fi\RCDUl-‘
SN =N

[
ornon

027426
027424
0274
0274
0274

187

BRANCN TO BGNSEG
:CLEAR ULPA BIT IN COMPARE DATA FOR ISR

3%:

® (DAIS

06-SEP-B2 16:46

D
—3 2 2
:l‘
N NNNNNNNNS
W=
W w—omwwug
NONNNNNNNTN
NO 938
22 NN
NENTNT N

SEQ 107

PAGE 50-1

BGNSEG

shEste

BIC

b
15 6;2

002401
002401

002500

#10,3CSRX

MOV
MOVB
JSR
8IS
MOV
MOV

” snan
MLAZ,alDRWX
pg LOOP
#10,3CSRx
#2,CHAN
alirx,BAD

BEO
MOV

$
#2401 Sooo

CMP

#2401 .BAD

ERRSOFT 802,E501,ERRSO1

002502
002502

002444

002500

20%:

OONNONN—
NSO

002450

LU NINTNTNT
N
NN
N NN

152234

OO0
= =O—
OOOWVMWNOW

WOWWWNNWN
NNNNNNNNYN

000010

308:
4«0%:

002450

a1SRX,BAD

MOV

CDATS,GOOD

(MP
BEQ

[=1- X=PLot

O=-O—=00

WNNNNNNES

- NNN
N WNDO

000252

DATS.BAD
0s

BIC

MOV
move
BIS
MOV
MOV
CMP
BEQ
MOV

[

#10,3CSRX

#1,CHAN
#13%,31CRHX

#10.aCSRX
#2,CHAN
a1$RX,BAD
CDAT7.BAD
4“1
CDAT7,GOOD

ERRSOFT 804 ,E502,ERRS01

8882
'y

MOV

ERRSOFT 803,£502,ERRS01

~N S
OBV
NNESN

W =2 L NN

[elelelelelel
dol e
- M) = i \ ) b s

S NNNWVINNES

152330
002444

CKLOOP

-t O
—-.O
OOOS-OOO-‘
L=
(=NS
PN
OMNNES

— -oé-‘
PO OO MroRr

VAWAVAWVAWA

~N -

OO000

CKLOOP

OfSWV
N NWN

5 28823
OOS
oo
W
—g
W=~

W
=

2883

[+ X =]

NNNNNNNY

ooeoooggéoooo
888
Sgsszzasess
cjggfiagxasea;a;»

[elelelelelelelelelelelelelelelelelel-]

NN NN N

000000000000

N
VB WNV=-=09

R
O O O
O O
POl

VNV

PO ¥ W W W O

—

NV
W =0V

TEST 8: DATA
IR

MACRO M1 113
ANSFER T EST

TRAP

SWAIT A LITTLE

sSELECT CHANNEL 2
:GET 1IR2 CONTENTS
:MA MAC,IFC BIT IN 1iR2 SHOULD BE SET
:BRANCH IF YES
*SET UP DATA FOR ERROR MESSAGES
:ERROR MANDLER

TRAP

:GET ISR2 CONTENTS

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

CBRANCH IF YES

SSET UP DATA FOR ERROR MESSAGES

‘ERROR MANDLER

TRAP

CSERSOFT

TRAP

CsCLP

803
.WORD
WORD
ES502
ERR501
.WORD
;BRANCH TO BGNSEG WHEN ERRLOOP S SET

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
se===

0AD

GTS

INTO

ACR1

([(R1)=cecccccccs

sSELECT CHANNEL 2

sLOAD CHANNEL NUMBER
sGET ISR2 CONTENTS
(ULPA) SHOULD BE SET
sNDAC,LADS,LPAS,
sBRANCH IF YES

sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER
TRAP

L1%:

ENDSEG

#252,RS

jeceeean GET

AB1:

MOV
BGNSEG

BIC

#10,3CSRX

sSELECT CHANNEL 1
:LOAD CHANNEL NUMBER
sLOAD DATA PATTERN INTO DOR1

10001$:

#1,CHAN

JSR

PC .LOOP

MOVB

MOV

(MP

BEG

RS.3IDRMX

al [RX,RSAVE

#20,RSAVE

42%

CSERSOF
T

.WORD
802
ES501
.WORD
ERR501
.WORD
sBRANCH TO BGNSEG WHEN E?gkgOP IS SET
cscLP

.WORD
LWORD
.WORD

MOV

($BSEG

JSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
s====0AD %lSYENiI ADDRESS OF CHANNEL 1

DATA

CSESEG

PATTERN==cccccccccee

TRAP

sWAIT A LITTLE

sGET TIRT CONTENTS
sBO BIT IN IIRT SHOULD BE SET
+BRANCH IF

YES

CSERSOFT

804
ES02
ERRSO1

($BSEG

HARDWARE 1%21?' MACRO M1113

TEST 8: DA

ANSFER TEST

06-SEP=-B2 16:46

gl 88737 002202 005302

:226g°°20
ERRSOFT a$s.t§31.ca.sov

MOV

NOON

SEQ 108

PAGE 50-2

MOV

;SET UP DATA FOR ERROR MESSAGE

*ERROR MANDLER

014

4359 8 0}%8
B
163

o $EE

4389 038;26

4390 030354
2;81 §;8362

s St
4394 030402
4395 030404

NNYN

000040

00240

000040
002402

00%500
002502

rg o erer
e
S

- OOW~N

NWVWOWES VWNONSES
WWOOO
NNV

8-09
8882 22
Y|OOU!S 8;§ss§

BIS

MOV
MOV

(MP
BEOQ

MOV
MOV

#10,3CSRX

#2,CHAN

ES501
ERRS501

RAP

cscLP

ilsll RSAVE

#40,RSAVE

433
#40,600D

RSAVE ,BAD

T 806,6501,ERRSO1
ERRSOF

sSELECT CHANNEL ¢
sLOAD CHANNEL NUMBER
sGET IIR2 CONTENTS
;81 BIT IN IR SHOULD BE SET
sBRANCH IF

YES

:SET UP DATA FOR ERROR MESSAGE

‘ERROR MANDLER

TRAP

CxLOOP
152034

002402
002402
002402

002500
002402

002402

43%:

002502

MOV

Q=8N
NO NN

T
ERRSOF

000021

002322

000010
000001
000014
011060

151732
002374
151706

000020

002502

000020

005502

002500

806
ES501
ERR501

TRAP

cscLPt

sCORRECT DATA RECEIVED

RS
RS
RS
R5,GO0D

sBRANCH IF YES
sSWAB HIGH AND LOW BYTE
sCLEAR HIGH BYTE OF RS
sSWAB HIGH AND LOW BYTE
sSET UP DATA FOR ERROR MESSAGE

807,6801,ERRSO1

*ERROR HANDLER

RSAVE ,BAD

TRAP

10002%:

807
EBO1
ERRS01

TRAP

(SESEG

ST
BNE

QvP

INC
(MP
BNE

ITRCN

A81

sCREATE NEW TRANSMIT DATA
s INCREMENT ITERATION COUNTERB
sALL DONE

BIC

#10,3CSRX

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBE R

JSR
MOV

PC,LOOP

SWAIT A

(MP

;B0 IN 1IR1 SHOULD BE SET

MOV

#20,G00D

BGNSEG

MOV
MOvVB

2
Bt

sBRANCH [F

#1,CHAN
014,31 CRHX

3 sax.auo
5

,BAD

CSERSOFT

.WORD
.WORD
LWORD

;1S QUICK VERIFY PASS SELECTED

ITRDEF
, I TRCNT

T
CSERSOF

.WORD
.WORD
.WORD

sREAD DATA FROM DIR REGISTER
sCLEAR LOW BYTE OF IDR
;SWAB DATA FOR COMPARE

ENDSEG

ADD

50%:

151656

RSAVE
RSAVE

RS, RSAVE

002234

002322
002320

@ IDRX ,RSAVE

44f

(VI
Pl SS
NS

- N NVO NN

i ghik

NONNNNNYN

4384 030322
4385 030326

152120

N NN
NN N

e gt

NS NNNNNN

030306
030;06

=23 8888883
N%nrON
- NN =2 N

4380 030306

(=l=l=
- OnN ~

030;76
030300
030302
030304

000010

42%:

030220

4377 030266
4378 030570
4379 030276

et gt

4
8 0202
4365
04
&
0
16
4367 03022

4371 030244
637i 030550
4373 030254
4376 030256
4375 030260
4376 030262

WORD
WORD

:BRANCH TO BGNSEG IFf taag O0P WAS SET

(xLOOP

gis

gt
she
4368 8§§ 0
4369 0 g
4370 03024

S‘ngOfl

.WORD

}6‘

TRAP

YES

sBRANCH IF NO

TRAP

------ LOAD TCA BIT INTO ACRY
ITTLE FOR THE BO BIT
:GET IIR CONTENTS
sBRANCH [F

YES

:SET UP DATA FOR ERROR MESSAGE

($BSEG

- Q01 ”

MARDWARE TESIS MACRO M1113 06-SEP=B2 16:46 PAGE 50-3
TEST B: DATA TRANSFER TEST

4396 03041

ERRSOFT BOB,ESO1,ERRSON

8 0615
104457
0616 001450
8 041

4397 0
4398

030424

4399

0304 8

.WORD

106&99

1157

112777

.WORD

(xLOOP
00001

000077

151626

151636

51%:

MOVB

ll;.il(RNI

MOvBe

#77 ,81DRHX

cMpP

l%iOOis.alD
53

030470
030472
030474
0;0676

104457
001451
005447
003702

030500

106409

4607 030508

05277

4408 03051
4409 030516
4410 030524
4411 030532
441; 0305

01;7 7
017737
023737
001410
013737

030542
030544
030546
030550

104457
001452
005447
003702

030552
44615 030554
030554
030554

104406

441

030545

44614 030552

“16

120040

002500

MOV

EATN.NDA(
ATN, SHOULD BET SET
CBRANCH IF YES

#120040,G00D

sSET UP DATA FOR ERROR MESSAGE

(kLOOP
00001g

151570

0000
151534
002434

002374
002502
002502

002434

002500

538%:

BIS

JBRAN(H BACK
#10,8CSRx

MOV
MOV
(MP
BEQ
MOV

#2 ,(HAN
91SRX ,BAD
CDAT1,BAD
55%
CDAT1,GOOD

*ERROR MANDLER

:BRANCH TO BGNSEG IF

ENDSEG

4617
2:}3

e w W

@S e

s@ W W D

4620

L6221 OSOSSS
~42§ 030562
4423 030566
L4624 030538

0067;7
004737
005037
112777

010;20
010710
002328
00001

4426 030606

052777

000002

4425 0306

4627 030614

4428 030622

4429 osoeig
4430 0306

030634

463 030636
4632 030644

4633 030652
4636 030660

015737

112777

004737

112777
104404

11;777
017737

022737
001412

Te D

DD e WD B

CSERSOFT
810
ES02
ERRSO!

TRAP

cscLPt

TRAP

CSESEG

e m e e em o om e @ s

iW
W
e e D

151500

PC,CULPA
PC,BGINZ
1TRCNT
#10,8CSRX

:CLEAR ULPA BIT IN ISR 1 AND 2
:SET UP PARAME TER
;CLEAR COUNTER
sSELECT CHANNEL 2

151464

BIS

#2,9CSRX

sSELECT CHANNEL 2 AS SYSTEM CONTROLLER

002374

00021

151446

000017

151434

000212
151406

151424
002402

120042

TRAP
.WORD
.WORD
.WORD

JSR
JSR
CLR
MOvVB

000002

1107;

cscLPt

W W W S R W S D W W 0P WO T G D W en

:PART 2 OF DATA TRANSFER TEST
:THIS PART CHECKS THE DATA TRANSFER FROM CHANNEL 2 TO CHANNEL
.- XX

TRAP

ERROR LOOP IS SET

10003$:

: DR RI PR >
e
e

CSERSOFT
809
ESO2
ERRSO1

:LOAD CHANNEL NUMBER
;GET ISR2 CONTENTS
:ATN,NDAC
,ATN, (ULPA) SHOULD BE SET
:BRANCH IF YES
JSET UP DATA FOR ERROR MESSAGE

(KLOOP

104405

TRAP
.WORD
.WORD
.WORD

TO BGNSEG IF ERRLOOP IS SET

sSELECT CHANNEL 2

ERRSOFT 810,6502,ERRSO1

5¢%:

ERRSO1

;ee==0AD UNL INT] (0Rlecccccccccccces

ERRSOFT 809,E502,ERRSO1

01273

ESO1

;eeee 0OAD NOT TON INTO A(R] cccccccces

4405 03047

QSISOO!
0

sBRANCH BACK TO BGNSEG IF ERRLOOP |S SET
TRAP
cscLP

BEQ

4406 030500

TRAP
+WORD

88§£83

440
8 0655 8227
7 120028 885505
4403 03046
oomg
4406 0

;ERROR MANDLER

002402

MOV

MOvB
JSR

MOVE

BGNSEG

MOVB
MOV

(MP
BEQ

#2,CHAN

0217.31(RN!
PC WAlT

#17,31CRMX
#212 91 (RWX
9l SRX ,RSAVE

#120042 . RSAVE
8

;LOAD CHANNEL NUMBER

;je====l0AD SIC IN A(R 2eccccc=e
:WALIT 100 uS

iee===L0AD NOT SIC IN A(R 2===cecccee
TRAP

($BSEG

;=====0AD TON IN ACR 2 (I(R2)=eecceGET ISR2 CONTENTS

SATN,NDAC ,ATN,TADS, SHOULD BE SE!
SBRANCH If YES

06-SEP=B2 16:46

MACRO M1113

TEST 8: DATA TRANSFER TEST

: 81 7;7 00060 80302
127%7

caSi 051006

4453 0 1018
4454 03102
4455 031056
4456 031032
4457 031040
4458 031046
4459 031054
4460 031062

4461 031064

031074
031076
021100

104404

052777
012737

113777

004737

0462777

012737
017737
022737
001410
012737

3%:

002401

002590

001454
005406
003702

1044
“e
L6664 031105
0;110‘ 0177?9 151146 002502 20%:

0024
002502
teoe 031120 0237
001410
444 002500
37
cees 031150 0137 002

112777

062777
012737

NOO Nw
sO008 0O

012737

)

052799

#10,aCSRX
#2,CHAN
MLAT ,3IDRHX
PC,LO0P

#10,3CSRX

#1,CHAN

alirx,BAD

#2401 .BAD

#2401,600D

20%

812,6501,ERRSO1

30%:
40%:

( ?ERSO!I

3 50
3

IliOl

TRAP
(SESEG
sGET DPA1 ADDRESS
sCREATE MY LISTENER ADDRESS (MLA)

sSTORE MLA

:1S DPA EVEN
:BRANCH [F

VYES

sSET ULPA BIT IN COMPARE DATA FOR ISR

*BRANCH TO BGNSEG
sCLEAR ULPA BIT

(xLOOP

($BSEG
TRAP
_
;SELECT CHANNEL 2
:LOAD CHANNEL NUMBER
------ LOAD LISTENER ADDRESS OF CMANNEL 2

JWAIT A LITTLE

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
JGET IIR1 CONTENTS

sMA MAC,IFC BIT

‘BRANCH IF YES

ERRSOF1

;ERROR MANDLER

MOvB

BIC

MOV

SHOULD BE

SET

(¢1484

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

BEQ

MOV

IN IIR1

sBRANCH [F YES
sSET UP DATA FOR ERROR MESSAGES
sERROR MANDLER
(SERSOFT
TRAP

sGET ISR1 CONTENTS

MOV
(MP

BIS

IN COMPARE DATA FOR [SR

.WORD
812
ES501
WORD
ERR501
.WORD
SET
IS
sBRANCH TO BGNSEG WHEN E?: LOOP

sSET UP DATA FOR ERROR MESSAGES
TRAP

(Sgasoot

TRAP

(sCLP

8!
.WORD
€502
.WOR
ERRSO!
.WORD
:BRANCH TO BGNSEG WHEN ERRLOOP 5 SET

(xLOOP
Y

4470 031165
4671 03115
4672 031156
L67% 031194
La74 031172

001455
005447
003702
1044

. +04

#,(DAT
#1,(DAY7
#1,(DATS

MOV

104457

Ot
O =
=
=1

og11so

) =t
[

031130
0311;2
03N

#1,(DAT7
#1,CDATS

ERRSOF1

106457

#1,(DAN

00§636

b1)

002434
002450
002444

R1,MLAY
#1.0PA1

002312

C) e e e D) et e e TV
20
VBNV

#40,R1
ODODODODEO®D»D®D

4447 030756
4448 0§8760
449 0
7?6
4450 ogor 4

DPA1,R1

cees 03070
ceee 030750

00231
00004

030732

14’}

010137
032737
00161;
0527
052737
052737
000411
062737
0462737
062737

TRAP

100048:

1 L5

4463

8; 701

4%:

439
710
4440
714
4461 030720
4442
030724

104405

*ERROR WANDLER

.WORD
.WORD

fl~¥cna—unc> <CSWwVW
<O <-<fvna§

706

EsSS?e..so1

;SET UP DATA FOR ERROR MESSAGE

.WORD

WO
OO

4638

70
704
;82

RSAV

ERRSOFT 81,

1046457

00145
88566
3702

#120042,600D

MOv
MOv

OONES
NSO

6§

SEQ 110

PAGE 50-¢4

e lal

HARDWARE TESTS

#10,3CSRX
22, (HAN

215,31 CRNx

#10.3CSRX
#1,(HAN

sSELECT CHANNEL 2
:LOAD CHANNEL NUMBER
fTeoeceee L0‘°

G'S

]Nlo

TSELECT CHANNEL 1

TLOAD CHANNEL NUMBER

“(“2

(l(azj--.----

TESTS

TEST B: DATA TR

ACRG M1113
SteR TEST

4475 8 1200
4476

031206

4477 031214

4478 031216

4679 031224
031224
031226
031230
031232

06-SEP=-B2 16:46

00245

151058

80230

MOV

002450

002500

MOV

0;1; 4

~
N~

031444
031446
031450

4501 031400
650§ 0;1606
4503 031412
4504 031416
4505 031422
4506 031424
4507 0;16 6
4508 031430
4509 031432
4510 031436
4511 031444

NONNNNNSN

als
| R ,BAD
0 A 17,8AD
(D
1
613
(DA 17,6

T 81
1 4 €50
ERRSOF

AB?2:
1510;6

TRAP

.WORD
.WORD
.WORD

100058%:

(SESEG

TRAP

($BSEG

sSELECT CHANNEL 2
sLOAD (HANNEL NUMBER
===« 0AD DATA PATTERN INTO DOR2eeccccce
SWAIT A LITTLE
sGET IIR2 CONTENTS
:B0 BIT IN IIR2 SHOULD BE SET

002500

MOV

JSR

(MP

BEQ

PC,LOOP

8l IRX ,BAD

#20,BAD

423

#20,G00D

T 815,E501,ERRSO
ERRSOH

BIC

150702

MOV
MOV

000040

MOV

(MP
BEQ

sBRANCH [F YES
sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER
TRAP

#10,3C(SRX

#1,(HAN

alIRX,BAD

#40,BAD

433

#40,600D

ERRSOF1 816,E501 ,ERRS01

TRA P

sSELECT CMANNEL 1
sLOAD CHANNEL NUMBER
sGET IIRT CONTENTS
;81 BIT IN IIRT SHOULD BE SET

;BRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE
sERROR MANPLER
TRAP

.WORD
.WORD
.WORD

(xLOOP

43%:

21DRX ,RSAVE

MOV

ERRSOFT

TRAP

;READ DATA FROM DIR1 REGISTER

RSAVE
RSAVE

sCLEAR LOW BYTE OF IDR
sSWAB DATA FOR (OMPARE

u.f

RS
RS
RS
RS.,GOOD

:BRANCH [F YES
sSWAB HIGH AND LOW BYTE
sCLEAR HIGH BYTE OF RS
sSWAB HIGH AND LOW BYTE
sSET UP DATA FCR ERROR MESSAGE

817,6802,FRRS01

*ERROR MANDLER

RS, RSAVE

002402

T
CSERSOF

815
ESO!
ERRS0?

.WORD
.WORD
.WORD
sBRANCH TO BGNSEG IF ERRLOO P WAS SET

(xLOOP

002502

TRAP

#10,3CSRx
#2,CHAN
RS, IDRHX

000020

002500
002402

50 2
RR501
5

8IS

BGNSEG

000020

002402

13 RSOFT

sGET DATA PATTERN

MOV

000040

sSET UP DATA FOR ERROR MESSAGE

#252,R5

002502
002502

42%:

SBRANCH [F YES

MOovB

MOV
MOvB

000010
000001

sGET ISRT CONTENTS
*NDAC LADS ,LPAS, (ULPA) SHOULD Bc. SET

ENDSEG

002374

NO"NN

N=NNSONN
NEOENNNVINNES
W=
NESES

O§1376

4500 031376

8OO -‘-00088'\!00-‘2

031366
031370
031372
031374

O0O0=OO=O—=0O—

4693 0N iz
4494 0313
4495 031342
4496 031350
4497 031356
4498 031360
4499 031366

000252

oOoOOW \u-tunnvvusf
NONNNWN
8F>u~
WNO
NNV
OO = NN
NNNN
NNs: NOON

4692 0% %6

NESNNNNS

031314
031;16
031320
031;22

BEQ

NEESED

031270
031%76
031304
031306
031314

OO0 = OgOO -, OO
= b

L4LB6 031%6‘

4487
(488
4489
4490
4491

OO
WVO =00 WN
NWVIWWOWES
VWO NS

4GBY 031244
4484 031252
44BS 031260

W=
WS
&

03124

O0000O0
=
-t N = b

481 0N
482 03124

N =N

03N
031

(MP

4480 0%

SE@ N

PAGE 50-5

Mmoo

HARDWARE

RSAVE

,BAD

sCORRECT DATA RECEIVED

TRAP

.WORD
.WORD

(scepPt

(SERSOFT
81 6
€501

ERRSO
csaP

MACRO M1113

TEST 8: DATA TRANSFER TEST

4538 031646

031722
031722

NV
OO
O
N

O
=R

51%:

0025C2
120040

ow W—‘MNWN?
NONNNNNYN

;BRANCH [F NO

BIS
MOV

#10,9CSRX
#2,(HAN

sSELECT CHANNEL 2
sLOAD (MANNEL NUMBER

JSR
MOv

PC,LOOP

JWAIT A

#14,31 CRHX

a1 {Rx,BAD

(MP

#20,8AD

MOV

#20,G00D

51%

00243¢

($BSEG

LITTLE FOR THE BO BIT

CONTENTS
;BO BIT SHMOULD BE SET
sBRANCH [F VYES

sGET JIR2

(kLOOP

.WORD
818
ESO1
.WORD
ERRS01
WORD
;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET

MOVB
MOvB
JSR
MOV

BI(C

MOV

(xLOOP

ENDSEG

TRAP

Jeeeee LOAD

NOT

'0“

emeee LOAD

UNL

l“'o

luto

TRAP

A(Rz

T
CSERSOF

cscLP

m o-

00“2 ...... Emec e

sWAIT A LITTLE

sGET ISR2 CONTENTS

sATN,NDAC,ATN SHOULD BET

sBRANCH [F

YES

SET

sSET UP DATA FOR ERROR MESSAGE
TRAP

T
(SERSOF

.WORD

819

TRAP

csaP

.WORD
ES502
ERRS501
.WCRD
sBRANCH BACK TO BGNSEG IF ERRLOOF IS SET
#10,3CSRX
#1, CHAN

a15RX,BAD

CDAT1.BAD
5%
BEQ
CDAT1,G0OD
MOV
ERRSOF1 820,£502,ERRSO1
(MP

55%:

TRAP

sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER

MOV

002434

s INCREMENT [TERATION COUNTER
sALL DONE

ERRSOFT 818,E501,ERRSON

BEQ
MOV
T
ERRSOF

53%:

CSESEG

AB?

(xLOOP

000010
000001

TRAP

;1S QUICK VERIFY PASS SELECTED

BNE
BGNSEG

JTRONT
ITRDEF ,ITRCNT

(MP

002500

ERRSO1

;BRANCH [F YES
sCREATE NEW TRANSMIT DATA

BEQ

000020

000012

10006$%:

.WORD

#21,R5

MOve

o
NOCNN

104406

6567 031722

000010

OOV

0;17;0

4546 031720

50%:

~B
or OV

031710
031712
031714
0;1716

833 R
s

031650
0;1656
031
031672
4543 031700
4544 031702
4545 031710

N
—

4539
4540
4561
‘S&i

031646

NEONNNNS

031636
031640
031642
031644

2892283 gess Ssse

4530 031572
4531 031600
653§ 0;1606
4533 031612
6536 031620
6535 0316;6
4536 031630
4537 031636

NNNNN

031570

4529 031570

031560
031562
031564
0;1566

4523
0315
6524 0;15
6525 031542
6526 031550
4527 031552
4528 031560

ENDSEG
QvP
508

000 51
002322
002320

N NWNNWNN

&5 ; 0315

¥
T3

SEQ 112

PAGE 50-6

002234

W=
NN~
&N 'uc:~rv~u~ég
NNWN N

031504
6550 031506
6521 031514

OO
=

03146
0 1‘?6
031470
031474
031502
0 120‘

-8

6515
6516
6517
4518
4519

OO
— OOOg
(elele]
’“‘\”if
oNO
RO
-NN
= N S

it
6513 gh
0 1623
6514

003702

0000
- N
-

031454

S
PSR

031452

6512

06-SEP-B2 16:46

b
AV

WARDWARE TESTS

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
sGET ISR1 CONTENTS
sATN,_NDAC,ATN, (ULPA)
sBRANCH IF YES

SHOULD BE

SET

sSET UP DATA FOR ERROR MESSAGE

sERROR HANDLER

TRAP

T
(SERSOF

TRAP

CsCLPt

TRAP

(SESEG

820
LMWORD
[502
LWORD
ERRS501
LMORD
SET
IS
ERRORLOOP
IF
BGNSEG
TO
;BRANCH
10007%:

WARDWARE TESTS

MACRO M1113

TEST B: DATA TRANSFER TEST

4548 8;17 4

1726

4549

031726

4550
4551 0%17%0
essi
455

4554 0317()
03176
031762

06-SEP-B2 16:46

ExIT

104432

SEQ 113

PAGE S0-7
187

TRAP

0000

045

123

062

TSHDB:

NLIST
LASCIZ
LIST
LEVEN

ENDTST
106460

CSfx;!

.WORD

L10035~-.

TRAP

(SETST

BEX
/XS2YADATA TRANSFER TESTIN/
BEX

L10075:

MACRO M1113

06- SEP-82 16:46

TEST 9: SECONDARY ADDRESSING TES T OF

CHANNEL 1

455
655
4558
6559
4560
4561
656
456
4564
4565 031764

032232
0322364
032236
032560

4599 032242

032562
4600 032244

PRINTF

@®

A9:

CLR

BOC
-

7%:

Q=W
<HADD

033454
000001

000001
000001
000001

002446
002442
002444

000001
000001
000001

002446
002442
002444

000400

s
WV

000010

3%:

MOV

7%
#TSHDY9

ITRCNT

PC,CULPA

PC,BGIN2

#10,3CSRX

;CLEAR COUNTER

MOV

MOV
MOV
TRAP
ADD

#TSHD9,=(SP)
#1,-(SP)
SP,RO
CSPNTF
#4,5P

sCLEAR ULPA BIT IN ISR 1 AND 2
:SET UP PARAMETER

sSELECT CHANNEL 1
;=====| 0AD DA] INTO A(Rl==ecccccc-;=== 0AD APT BIT INTO [SR1ecece==
:GET DPA1 ADDRESS
:CREATE MY LISTENER ADDRESS (MLA)
sSTORE MLA
:1S DPA EVEN
:BRANCH IF YES

404

*BRANCH TO BGNSEG

,
31 CRHX
#22%
#20,91SRHX

oPAT,R1

#40,R1
R1,MLA1
#1.DPA1

#1,CDAT6
#1.CDATS
#1.CDATS
#1,CDATE
#1.(DAT4

:SET ULPA BIT IN COMPARE DATA FOR ISR
*CLEAR ULPA BiT IN COMPARE DATA FOR ISR

#1,CDATS

#10,aCSRX
#2,CHAN

sSELECT CHANNEL 2

TRAP

($BSEG

sLOAD CHANNEL NUMBER

s====LOAD LISTENER ADDRESS OF CHAN. 1
'

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
sGET IIR1 CONTENTS

sIFC,BIT IN IIR1 SHOULD BE SET

30%:

sBRANCH IF YES

T 901,£501,ERRS01
ERRSOF

sSET UP DATA FOR ERROR MESSAGES
sERROR HANDLER

(KLOOP

901
.WORD
E501
WORD
ERR501
.WORD
;BRANCH TO BGNSEG WHEN ERRLOOP [S SET

MOV

sGET ISR1 CONTENTS

MOV

002502

19::

:1S THE PNT FLAG SET
:IF YES, PRINT THE TEST HEADER

sWAIT A LITTLE

000400

150006

ODODODDDDDOD D>

002312

000001

) e bt bt ) St bt B VY -00O0
O <
2090y
LVLVVD -~

mMove

=N
O8O

=R O NIWRININY
O NIRIN
IR

1ST

BEQ

VAN
=

032200

4594 032206
4595 032214
4596 0325 2
4597 0322264
4598 032232

002324

PNTF

OONO
NSO

4593

~5 350

{8 d8se

BGNTST

032142
4588 032144
4589 032152

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

N =N

4573 0320
6574 0320‘8
4575 03205
4576 0320564
4577 032060
4578 032064
4579 032072
4580 032074
4581 032102
4582 032110
4583 032116
4584 032120
4585 0321%2
4586 0321
4587 032142

‘MY SECONDARY ADDRESS (MSAT).

O
-

4571 032022

657% 0320;2

SFEATURE OF CHMANNEL 1 BY MEANS OF RECEIVING A VALID AS WELL AS AN INVALID

4570 032016

(LISTENER)

SPURPOSE OF THIS TEST IS TO CHECK THE SECONDARY ADDRESSING

03177
031776
032002
032004
032
4569 03201

TEST 9: SECONDARY ADDRESSING TEST OF CHANNEL 1

IEX = TEST 9
:
;THIS TEST CMECKS THE EXTENDED LISTENER INTERFACE FUNCTION .

23 8883 OOOOO?O -0 — RRREFFFSI2RSR g2g3222 838

4566 031764
4567 031770
4568 0%177%

(LISTENER)

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

0;1764

LSBTTL

SEQ 114

PAGE 51

HWARDWARE TESTS

#400,G00D

alSRX,BAD

TRAP

CSERSOFT

TRAP

(sCLP

SEQ 115

HARDWARE TEST S
MACRO M1113 06-SEP=-82 16:46 PAGE 51-1
TEST 9: SECONDARY ADDRESSING TEST OF CHANNEL 1 (LISTENER)

032440
032442
032444
032446
4626 032450
032450
4627 032452
4628 0324660
4629 032466
4630 032470
4631 032476
032476
032500
032502
032504
4632 032506
032506
4633 035510
4636 032516
4635 0325264
4636 032526
4637 032534

40%

ERRSOFT

902,502, ERRS01

MOV

NN N NNINININN—- o

WO NIWNON

40%:

WOWWWNWO

00000 —=O00000

147770

002374

MOV
MOV
ADD
MOV

COATL ,GOOD

#10,3CSRX

#2.,CHAN

JSR

MLAT,R1
#100,R1
R1,MSA1
MSA1,31DRHX
PC,LOOP

(MP

#0,BAD

MOV

aliRx,BAD

614
8EQ
600D
CLR
T 903,E501,ERRS01
ERRSOF

OCOOWV

V=N

BIS

mMove

8 NO"SNIN

032376

4619 032400
4620 032406
4621 032414
4622 032422
4623 032430
4624 032432
4625 032440

sATN,ATN_NDAC LPAS,(ULPA) BIT SET
3
:BRANCH IF YES

sSET UP DATA FOR ERROR MESSAGES
sERROR HANDLER
TRAP
.WORD
.WORD
ORD

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
sGET MLAY
sCREATE MSA1
sSTORE MSA1 TO LOCATION MSA1
teeeece|
0AD MSAT

SWAIT A

LITTLE

INTO

T
CSERSOF

902
E502
ERR501
S SET

cscLPt

DOR2

SGET IIR CONTENTS
:1IR2 SHOULD BE ZERO
:BRANCH IF YES

sSET UP DATA FOR ERROR MESSAGE

;ERROR HANDLER

TRAP

.WORD
AP

CSCLP

sBRANCH BACK TO BGNSEG I;RE RRLOOP IS SET

C(kLOOP

000010

61%:

BIC

MOV
MOV

CMP

010100

BEOQ

010100

MOV

T
ERRSOF

#10,3CSRX

#1,CHAN

aliRX,BAD

#10100,8A0

428
#10100, GOOD

9046501, ERRSO1

002502
002502

002446

002500

147550
002420

002502
002502

002420

002500

42§%:

MOV

CMP
BEQ
MOV

sAPT,INT1 BIT IN IIR1 SHOULD BE SET

sBRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE
;ERROR HANDLER
TRAP

E501
ERR501

AISRX,

sGET ISR1 CONTENTS

‘BRANCH IF YES

cgare.aao

CsCLPl

*ATN, DAV NDAC ,NRFD ,ATN,LPAS(ULPA)

IS SET

sSET UP DATA FOR ERROR MESSAGE

sERROR HANDLER

TRAP

.WORD
«WORD
.WORD

(kLOOP

sBRANCH BACK TO BGNSEG l;REgRLOO

MOV
(MPB
BEQ
MOV

sGET ICRY CONTENTS

ERRSOFT

CSERSOFT
904

sBRANCH BACK TO BGNSEG I;REgRLOOP IS SET

CDAT6,GOOD
ERRSOFT 905,€502,ERRSO1

438:

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
sGET IIR1 CONTENTS

.WORD
.WORD
.WORD

(xLOOP

002446

T
CSERSOF

903
ES501
ERR501

.WCRD
.WORD

147600

SIS SR
NONN&

4618 032376

d°-.2

032370
032372
032374

[=]=]

661% 035360
4613
032344
4614 032352
4615 032360
4616 032362
4617 032366
032366

N =N

4606 0
08
4607 03231
4608 032316
4609 032322
4610 0323;6
4611 032332

CDAT4,BAD

(MP
BEO

CKLOOP

S 2883 Sgfeeps2 888 2 oo dg

032270
032272
0 % 4]
032276
4605 032300
032300

it 002442 002502
813739 002442 002500

OO0O0O0

4606 0

6
9

OO=

460
4605

OO —=O—

4601 8

a1CRX,BAD
MSA1,BAD
443
MSA1,GOOD

906,£901, ERRSO1

:MSA1 ADDRESS SHOULD BE SET
3
sBRANCH IF YES

sSET UP DATA FOR ERROR MESSAGE

sERROR HANDLER

CsCLPl

SEQ 116

HWARDWARE TESTS

MACRO M1113 06-SEP-B2 16:46 PAGE 51-2
TEST 9: SECONDARY ADDRESSING
NG TEST OF CHANNEL 1 (LISTENER)

0325

104457

TRAP

SERSOFT

0 ga
032542

005644
003702

.WORD
.WORD

E901
ERRS01

TRAP

CSCLP1

0 siz 001612

4638 032544

032544
4639 032546

1
409
052777

4644 032600

012737

4640 03255¢
4641 03 ses
aekg 032570
4643 032576

4645 032606

012737
017737
022737
801419

032606
032610
032612
032614

104457
001613
005447
003702

032616

104406

4646 032616

.WORD 306

CKLOOP

000010

1475;4

00000
147470
170040

ooss 4
00 sos
00250

170040

002500

042777
012737

000010
000001

147452
oo;sra

4650 032642
4651 032650
4652 032656

017737
023737
001413

147410
002444

002402
002402

002444
002402

002500
002502

4653 032660
4654 032666

4655 032674

112777

013737
013737

032676
032676
032700
032702
4656 032704
032704
4657 032706

104457
001614
005447
003702

4660 032730

022737

104406

4658 032714
4659 032722

052777
012737
017737

4661 032736

001413

4662
4663

032740
032746

4664 032754

015737
013737

032764
4666 032766
4667 032774

032774

ogsrra

4668 032776

osgrro

106609
112777

000201

#10,3CSRX

;SELECT CHANNEL 2

#170040,G00D

SSET UP DATA FOR ERROR MESSAGE

#2,CHAN
31$RX ,BAD
#170040,8AD
45%

ERRSOFT 907,E502,ERRS01

458:

147426

000010
000002
147322

000020
000020
002402

147364
002374
002402

147302

*GET ISR1 CONTENTS
*ATN,NDAC,ATN,LADS,LPAS (ULPA)
‘BRANCH IF YES

#201,31CRux
CDATS,GOOD

RSAVE .BAD

BIS
MOV
MOV

#10,3CSRX
#2,CHAN
aliRX,RSAVE

BEQ

50%

MOV
MOV

#20,RSAVE

#20,G00D
RSAVE ,BAD

ERRSOFT 909,E501,ERRS01

COPA9:

CSCLPI

aISRX,RSAVE
CDATS .RSAVE
468

CMP

S50$:

TRAP

MOV
CMP
BEQ

CKLOOP

000077

CSERSOFT
907
ES502
ERRS01

;SELECT CHANNEL 1
*LOAD CHANNEL NUMBER

ERRSOFT 908,E502,ERRS0?

002500
002502

TRAP
.WORD
"WORD
"WORD

#10,3CSRX
#1, CHAN

MOV
MOV

002402

*ERROR MANDLER

BIC
MOV

move

46%:

:LOAD CHANNEL NUMBER
:GET ISR2 CONTENTS
*ATN,DAV,NDAC ,ATN,NRFD SHOULD BE SET
‘BRANCH IF YES

:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET

CKLOOP

104405
104404

MOV
MOV
CMP
BEQ
MOV

032754 104457
032756 . 001615
032760 005406
032762 003702

4665 032764

BIS

CKLOOP

4647 032620
4648 032626

4649 032636

4$:

:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET

MOVB

ENDSEG

#77,31DRHX

;=====L0AD DACR INTO ACR1====c=eccaIS SET

:SET UP DATA FOR ERROR MESSAGE
Sass

*ERROR HANDLER

TRAP
CSERSOFT
.WORD
908
"WORD
ES502
.WORD
ERRS01
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
CSCLPI
;SELECT CHANNEL 2
*LOAD CHANNEL NUMBER
*GET IIR2 CONTENTS

:B0 BIT SHOULD BE SET

:BRANCH IF YES

SSET UP DATA FOR ERROR MESSAGE
e

:ERROR HANDLER

TRAP
.WORD
"WORD
"WORD

CSERSOFT
909
ESO1
ERRS01
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
CSCLP
;===LOAD UNL INTO DOR2===== e
100008:

BGNSEG

TRAP

CSESEG

TRAP

($BSEG

4669 033000

052777

000010

147272

BIS

#10,3CSRX

;SELECT CHANNEL 2

4671 033014

113777

0026410

147254

MOVB

MLAT,3IDRHX

tee==LOAD LISTENER ADDRESS OF CHANNEL 2=-

4670 033006 012737 ooooos 002374

MOV

#2.,CHAN

*LOAD CHANNEL NUMBER

667§ 033022
4673 0 0;2
4676 0330
4675 0 048
6679 03305
4677 033056
4678 0 §060
4679 033066

004737
0462777
012737
17737
22737
1619
01273

033066

104457

033076

104409

—O

TEST 9: SECONDARY ADDRE

PC,LOOP

#10,3CSRx

147244
002574

#7,CHAN

00 SOS
00250

002500

MOV

ERRSOFT

033079 003406
0%%074
002702
4680 033076
4681
4682
4683
4684

033100
033106
033114
033120

4685 0331%&
4686 033130

4687 033136
4L6BB 033142
4689 033150
4690 033156
4691 033164
469% 033172
4693 033200
4694 033206
4695 033210
4696 033216

033216
033220
033222
033224

4697 033226
033226
4698 033230
4699 033236
4700 033244
4701 033252
4702 033260
4703 033262
4704 033270

001410
012737

033300
4706 033302
4707 033310
033310
033310
4708 033312
4709 033316
4710 033320

104406
112777

104405

005737
001054
005737
001007

#1,600D

910,€501,ERRS01

#10,aCSRX

#1,CHAN
#1.31CRHX
aliRx,BAD
aISRX .BAD

002442

MOV

T
ERRSOF

CkLOOP
46%:

002322

sERROR HANDLER

TRAP

CSERSOF
T

sSELECT CHANNEL 2

TRAP

cscLPt

sLOAD CHANNEL NUMBER
sGET MLA1
sCREATE MSA1
sSTORE MSA1 TO LOCATION MSA1

CDAT4 .BAD
468
CDAT4, GOOD

911,€502,ERRSO1

"SA1

tho

DORZ ..........

sWAIT A LITTLE

sSELECT CHANNEL 1
+sLOAD CHANNEL NUMBER
s=====L0AD NOT DACR INTO A(R]==ccccesREAD IIR1 FOR CLEAR THE BITS
sGET ISR1 CONTENTS
sATN,NDAC,ATN,LPAS

sBRANCH IF

YES

(ULPA)

IS SET

sSET UP DATA FOR ERROR MESSAGE

sERROR HANDLER

TRAP

CSERSOFT

TRAP

CSCLP

911
WORD
.WORD
ES502
ERRS501
.WORD
;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET

sGET IIR2 CONTENTS
+B0 BIT SHOULD BE SET

000020

002234

sBRANCH IF YES
sSET UP DATA FOR ERROR MESSAGES

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER

000020

000077

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
sGET IIRT CONTENTS
sMAC BIT IN IIR1 SHOULD BE SET

:------LOAD

#10,3CSRX

000010

sWAIT A LITTLE

.WORD
910
ES01
.WORD
ERRS501
.WORD
sBRANCH TO BGNSEG WHEN ERRLOOP IS SET

147140

104457

104457
001620
005406
003702

4711 033324

002374

308:

001617
005447
003702

033270
033272
033274
033276

4705 033300

147172

010137
113777

104406
052777
012737
017737
022737

al{RX,BAD
#1,BAD
o$

C(xLooP

05277
012737
013701
062701

004737
042777
012737
112777
017737
017737
023737
001410
013737

SEQ 117

6 SEP-B2 16:46 PAGE 51-3
3 T OF CHANNEL 1 (LISTENER)

=00

MACRO M

(¥, =

HARDWARE TESTS

MOV

T
ERRSOF

146766

50%:

sBRANCH IF

YES

+sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER
TRAP

CSERSOF
T

LWORD
WORD
.WORD

91?2
ESO1
ERRS01

TRAP

cscLPt

TRAP

(SESEG

CkLOoOP

sBRANCH BACK TO BGNSEG IF ERRLOOP IS SET

MovB

:---LOAD

UNL

ENDSEG

TST
BNE
ST
BNE

INTO

DORZ ..................

10001$8:

s1S QUICK VERIFY PASS SELECTED
sIF YES EXIT TEST
s1S THIS THE FIRST TIME THROUGH THE TEST
sBRANCH [F NO

002314

002312

1%:

28:

146676
146660

CLR
INC
INC

CMP
BNE
INC

DPA1

CMP
BEQ
BIS

JSR

PC WAIT

MOVB
BIC
MOVB
38
EXQv9:

DPA1,SDPA
DPA1
1TRCNT
gpu1.ovaz
$
DPA1
#37,0PA1
3
#10,3CSRX

MOVE

14664
14665
146616

002312

rucs 514

#217, alcaux

01? a1 CRHX
" ACSRX
oPA1 a1 IRHX

A9
JMP
SDPA,DPA1
MOV
EXIT TST

s SAVE ENTERED DPA1
:CLR DP

ET FLAG 70 SEE FIRST TIME PASS
sGET NEW DPA
UD

N NNNNN
WINNNNIWNN
NNNNNNNNWNNNIONNNNYN

002406

IR
= AN —

:&3?35o4=14>¥$¥ ig
o
o

SEQ 118

FANNEL 1 (LISTENER)
STC0e
16:46

w
My
om
w

[elelelelelelelalelelalelel=l=l=l-lelal-

WIN
NO WV
W= OOV
VO NV

PO T o W W o W o R P P R aP P P P oF
NNNNNNNNNNNNNNNNNN

—

Lad
w

B 10

;1S DPAY = 0PA2

.BRANCH IF NO
INCIGHENT DPA1
ALL DONE

BRANCN IF YES
;SELECT CHANNEL 2

i==<=LOAD
SIC INTO ACR 2=-eeeeees
TTLE

A
SWAIT

;====LOAD NOT SIC INTO ACR 2===e=
SSELECT CHANNEL 1
:LOAD NEW DPAT INTQ ADR1

sREPET THE TEST WITH THE NEW DPA1

:RESTORE ENTERED DPA1

(SE

6=.
3
L100
123

104401

062

TSHD9:

NLIST
.ASCIZ
LIST
.EVEN
ENDTST

B EX
/ giZXASECONDARV ADDRESSING TEST OF
B

CHANNEL 1 (LISTENER)IN/

CSETST

HWARDWARE TESTS MACRO M1113

TEST 10: SECONDARY ADDRESSING

c10

~SEP-82 16:46 PAG§‘$2

TEST

CHANNEL 1

4737

LSBTTL

(TALKER)

TEST 10: SECONDARY ADDRESSING TEST OF CMANNEL 1

(TALKER)

‘; g

:"'.'Q'.'Q'"""""""'0""".0Q.Q'OQQ'QQ'QQQ'Q".QQ"'Q"QQQ'OQ"Q'

2;2?

STHIS TEST (nEcxg THE EXTENDED TALKER INTERFACE FUNCTION .

474

SPURPOSE OF THIS TEST IS TO CMECK THE SECONDARY ADDRESSING

L7464

;MY SECONDARY ADDRESS (MSA1).

474

;FEATURE OF

‘7‘5

CHANNEL 1 BY MEANS OF RECEIVING A VALID AS WELL AS AN INVALID

."QQQQ.".Q'Q"""""00"'"'0"0'0"0'.'.'.QQ"QQ.'.QQ0.0."'.00.00"00

4746 0

ssg

BGNTST

4747 8 géo 005737 002324
47648 033554
4749 0 zss

012746

035224

oegr
0050
004737
004737

ooogoa
008 28
01 ;2
010710

4750 033576

4751 033602
arsg 0

033612

1$1

001410

03356
§
570

4753

EX = TEST 10

BEQ
PRINTF

PNTF

7
#TSHD10

;1S THE PNT FLAG SET

S1F YES, PRINT THE TEST WEADER
- ol

81 746 000001
1 og
10441

062777

ooo1g

4756 0
112777 002%
4755 033626 112777 ooog
475; 0
013701
00231
4757 03
0 0687?1
0010
4758 033644 010137 002414

MOV

#T5HD10,=(SP)

ADD

#6,5P

MOV
MOV
TRAP
7%:

146460

1646442

A10:

146426

CLR

ITRCNT

sCLEAR ITERATION COUNTER

BIC

#10,3CSRx

SSELECT CHANNEL 1

#1.0PA1

JSR
JSR

MOVB
MOVB
MOV
ADD
MOV

PC,CULPA
PC,BGIN2

csgi.alcaux
#20,3]SRHX
oPAf,R1
#100,R1
R1,MTA

#1,-(SP)
SP.RO
CSPNTF

SCLEAR ULPA BIT IN ISR 1 AND 2
:SET UP PARAMETER

;==== GAD DAl INTO A(R]eccccccccccccccs
teee={ 0AD APT BIT INTO [SR1eccccccccces
:GET DPA1 ADDRESS
:CREATE MY TALKER ADDRESS (MTA)
SSTORE MTA

4759 033650

032737

000001

002312

BIT

4761 033660
476 oggooe
4763 033674

052737
052737
052737

000001
000001
000001

002452
002436
002440

BIS
8IS
BIS

#1,CDATS
#1.CDAT2
#1,CDAT3

4765 033706
4766 033712
4767 033720
4768 033726

042737
o4$7§7
042737

000001
000001
000001

002452
002436
002440

BIC
BIC
BIC
. BGNSEG

#1,CDATS
#1,CDAT
#1,CDAT

4769 033730

052777

000010

146342

BIS

#10,3CSRX

;SELECT CHANNEL 2

4771 033744

113777

002414

146324

MOVB

MTAT,alDRHX

tee==lOAD TALKER ADDRESS OF CHANNEL 2==-

BIC
MOV
MOV

#10,3CSRX
#1,CHAN
aliRx,BAD

4760 033656

00141;

4764 033702 000411

033726

104404

4770 033736 012737
4772 8;;752

804737

4776 034000
4777 034006
4778 034010
4779 034016

022737
001410
012737

000002

11060

146314
002374
002502

000400

002500

034016
034020
034022
034024

104457
001751
005406
003702

os«ogo

104429

4780 034026

4781 034030

017737

3$:

002374

477t
033756 042777 000010
4774 033764 01;737 000001
4775 033755 017737 146252

000400

BEQ

B8R

MOV
JSR

002502

CMP
BEQ
MOV
ERRSOFT

. 404

#2,CHAN

PC,LOOP

#400,BAD
308
#400,G00D
1001,E501,ERRSO1

CKLOOP
146222

002502

308:

MOV

:1S DPA EVEN
:BRANCH IF

YES

SSET ULPA BIT IN COMPARE DATA FOR ISR
s

‘BRANCH TO BGNSEG

SCLEAR ULPA BIT IN COMPARE DATA FOR ISR
e
o

TRAP

($BSEG

*LOAD CHANNEL NUMBER
SWAIT A LITTLE

SSELECT CHANNEL 1
SLOAD CHANNEL NUMBER
SGET I1IR1 CONTENTS

T1FC,BIT IN 1IR1 SHOULD BE SET
‘BRANCH IF YES
PSET UP DATA FOR ERROR MESSAGES
:ERROR HANDLER

TRAP
.WORD
‘WORD
"WORD

CSERSOF T
1001
ESO1
ERRSO1

TRAP

CSCLPY

:BRANCH TO BGNSEG WHEN ERRLOOP 1S SET
aISRX,BAD

:GET ISR1 CONTENTS

Q119

D10

4785

4786

36
'A

046

002436

002502

gg:

002436

002500

MOV
ERRSOFT

068

064

4787 § 2
a7 S4i0ke

4789 034102
4790 0
103
6791 03411

679; 034116
4793 034124
L7946 034130
4795 0341
4796 034144
4797 034146
4798 034155
03415

800002 003;96
00010

002414
8000‘0
0%650
002420
011060
1646114

000000

4B13 034272

034272
4B146 034274

4815 034302
4816 034310
4817 034312
4818 034320

146204

40S:

MoV
BIS

MOV
ADD
MoV
Move
JSR

146152
00250

MOV

00250

gE:

002500

‘BRANCH IF YES

SET UP DATA FOR ERROR MESSAGES
ERROR HANDLER
TRAP

siflSO'!

WORD
WORD

ES50
ERR501

#10,3CSRX

#2,CHAN

MTAT,R1

#40,R1

R1,MSA1
MSA1,31DRHX

cscLP

sSELECT CHANNEL 2
;LOAD CHANNEL NUMBER
:GET MTA1
:CREATE MSA1
:STORE MSA1 TO

LOCATION MSA1

PC,LO0P
aliRx,BAD

SWAIT A

“$

;BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE
JERROR HANDLER
TRAP

#0,BAD

600D
CLR
ERRSOFT 1003,€501 ,ERR501

LITTLE

:GET IIR2 CONTENTS
s1IR2 SHOULD BE ZERO

OOWVIWVY WN—=
W
NONN
N OSSN

16460446

146106
002374

41%:

002502

BIC
MOV

MoV

010100

002502

ggs

010100

002500

MOV
ERRSOFT

~WORD
AP

CsCLPl

:BRANCH BACK TO BGNSEG I;ReaaLoop IS SET
#10,3CSRX

#1,CHAN

alirRx.BAD

#10100,8A0

423
#10100,GOOD

1004 ,E501,ERRSO1

sSELECT CHANNEL 1
;LOAD CHANNEL NUMBER
sGET 1171 CONTENTS

;APT,INT1 BIT IN IIR1 SHOULD BE SET
sBRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER
CSERSOFT
TRAP

.WORD
.WORD
.WORD

146014
002452

002502
002502

002452

002500

42%:

cscLPl
:GET ISR1 CONTENTS
sATN,DAV NDAC ,NRFD ,ATN,TPAS(ULPA) IS SET

MOV
g?:

Mov
T
ERRSOF

£502,ERRS01

145764

002420

002502

002502
002500

43%:

‘BRANCH F YE

SSET UP DATA FOR ERROR MESSAGE

:ERROR HANDLER

TRAP

.WORD
.WORD
.WORD
0

Mov

;GET ICR1 CONTENTS

MOV
ERRSOF1

1,G00D

:BRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE
;ERROR HANDLER

gg:fi

CSERSOFT

1005
ESO%
ERRS01

:BRANCH BACK TO BGNSEG I;RESRLOOP 1S SET

(kLOOP

002420

1004
ES501
ERRS01

;BRANCH BACK TO BGNSEG l;aigRLOOP IS SET

CxLOOP

OV
noNWBWN

WN=WW WO
N ONNO

000010
000001

T
CSER SOF

1003
ES501
ERRS01

.WORD
WORD

W= WNWO
NONNO

OO0O0O0
OQO=

o -a°-.2 8000 == ON) =
0000

034264
034266
034270

OO =O—=
—-ON=0O
W=\NNE&

4B10 034252
4811 034254
4812 034262
034262

OO0 OO0
W=

034234

4B0B 034236
4809 Ogéskk

:ATN,ATN,NDAC TPAS, (ULPA) BIT SET

;BRANCH TO BGNSEG WHEN :?:kgov 1S SET

(kLOOP

034224
034226
034230
034232

4«B07 034234

8853@283?e..soa

(kLOOP

034154
034156
034160
4799 036165
03416
4800 034194

4801 034172
680§ 034200
4803 034206
4B04 034214
4805 034216
4806 034224

DAT2,BAD
0$

«WORD

3 83g23=282e9:

&7 i
47

06-SEP-82 16:46 PAG; 52=1
Y ADDRESSING TES OF CHANNEL 1 (TALKER)

TESY 10: SECOND

SEQ 120

ACRO M1113

e lal ol

HARDWARE TESTS

6.£901 ,ERR501

:MSA1 ADDRESS SHOULD BE SET

CSCLPY

E 10

HARDWARE TESTS
TEST

10:

MACRO M111 3

06;2%?-82 16:46

SECONDARY ADDRESSING T

80343243
8

4819 0

4820 0

23 3 8

OF CHANNEL 1

MORD
.WORD

TRAP

00010

00250

5?3

002500

MOV
#170040,G600D
ERRSOFT 1007,£502,ERRSO1

170040

4825 0
4826 0
g
03437
0 gr«
034376
og:aoo
4827 0 aos
03440

170040

034420

4833 ogaaaz
LB 034444
4835 034452

034452
034454
034456
034460
4836 034462
034462

4837 034464
4838 034472

4839 034500

4840 034506
4841 034514
434; 034516

4843

034524
034524
034526
034530
034532

4844 034534

034534
4845 034536
4846 034544

000010

000201

145666

37 000007

002374

37
37

002502
002502

10
37

145624
002440

002440

034550
034556
034564
034572

4852 034576

&45%:

145642

MOV
CMP

#10,3CSRX

#2,CHAN
axéax 8‘°

f; 0040,BAD

7
0
7

000010
000002

145544

000020

145606
002374

46%:

002502

002500

145532

;=====[0AD DACR INTQ A(Rl1=ccccccccces

:BRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE
:ERROR HANDLER

sSELECT CHANNEL 2
*LOAD CHANNEL NUMBER

CMP
BEQ
MOV

#20,BAD
50%
#20,600D

:B0 BIT SHOULD BE SET
*BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE

al[RX,BAD

MOVB

ENDSEG

:GET IIR2 CONTENTS

:ERROR HANDLER

TRAP
.MORD
.WORD
.WORD

000010

145522
oogs 4
145504

145474

BIS
MOV
MOVB
JSR

BIC

CSERSOF T
1009
ESO1
ERRSO!

;BRANCH BACK TO BGNSEG If ERRLOOP !S SET

#137.31DRHX

;===LOAD UNT

TRAP
(S$CLPY
INTO DOR2====ccccccanccans -

100008:

COPA10: BGNSEG
000010
000002
002414
011060

IS SET

TRAP
CSERSOF T
-WORD
1008
.WORD
ES02
.WORD
ERRS501
;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
C$CLPI

#10,3CSRX
#2,CHAN

ERRSOFT 1009,E501,ERRS01

S08:

sSELECT CHANNEL 1

SGET ISR1 CONTENTS
:ATN,NDAC ,ATN, TADS, TPAS (ULPA)

(KLOOP

000137

:SET UP DATA FOR ERROR MESSAGE
:ERROR MANDLER
TRAP
(CSERSOFT
WORD
1007
-WORD
ssog
.WORD
ERRS01
;BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
CS$CLPI

BIS
MOV

MOV

002502

ERRSO1

:LOAD CHANNEL NUMBER
sGET ISR2 CONTENTS
‘3:2&23'1?°¢E§""'""° SHOULD BE SET

S1SRX,BAD
CDAT3.BAD

#201,a31CRux

E901

;SELECT CHANNEL 2

SLOAD CHANNEL NUMBER

CKLOOP

7
1
6
2
6
7

#10,3CSRX

1006

(CSERSOFT

:BRANCH BACK TO BGNSEG l;aiszOO:‘éE’§tt

#1,CHAN

BEQ
46$
MOV
CDAT3,GOOD
ERRSOFT 1008,£502,ERRS01

7
0
7
2
9

BIC

MOV

MOove

002500

4847 034546

034546

MOV
MOV

CKLOOP

034544
034544

4848
4849
4850
4851

.WORD

BIS

«831 034426
4832 034434

CKLOOP

145740 44%:

002374
oozsos

4830

(TALKER)

1756
§9“
00002
145704

4828 034406

104457

4821 0
«8 i 034346

4829 034412

Q121

PAG$A52°2

#10,3CSRX
#2,CHAN
MTAT,alDRHX
PC,LO0P

#10,3CSRx

TRAP

(SESEG

TRAP

($BSEG

sSELECT CHANNEL 2
*LOAD CHANNEL NUMBER
;====L0AD TALKER ADDRESS OF
TWAIT A LITTLE

SSELECT CHANNEL 1

CHANNEL 2==-

F 10

WARDWARE TESTS MACRO M1113 06-SEP-B2 16:46 PAGE 52-3
TEST

10:

SECONDARY ADDRESSING TEST OF

CMANNEL

(TALKER)

4853 034604

4854 0 618

012737

000001

002374

MOV

‘”9868

0025

(MP

0000017

002500

30§

SMAC BIT IN IIR1 SHOULD BE SET

012737

BEQ

#1,8AD

630

1u9

0000017

a1ifx.BAD

;LOAD CHANNEL NUMBER

2737

MOV

#1,CHAN

4855 0346

17737 142«?2 8o§28$

SBRANCH IF YES

0346
034640
034642
034644

104457
001762
005406
003702

485

4858 0346

4859 034646
03464
4860 034650
4861 034656

4B62 034664
4863 034670
4864 0%:674

4865 034700
4866 og:roe

4867 034712

4868
4869
4870
4(B71
687§

4873

034720
osargg
0347
034742
034750

034756

4B74 034760

4875 034766

106609
052777
012737
0137
701
1

)

000010
000002
002414
000040
002420

11.54;2
002374

002420
011060

145370

000001
000001
145310
145310
002436

002374
145334
002502
002502
002502

002436

002500

000010

145360

LB76 034776
4877
4878
4879
4880
<881
«882

035000
035006
035014
ossogz
035030
035032

4883 035040

000010
000002
145230
000020

145272
002374
002502
002502

000020

002500

4884 035050

4886 035060

035060
035060

30%:

BIS
MOV
MOV
ADD
MOV

#10,3CSRx
#2,CHAN
MTAT,RI
#40,R1
R1,MSA1

BIC

#10,3CSRx

MOVEB
JSR
MOV
MOVB
MOV
MOV
CMP

BEQ

MOV

ERRSOFT

MSA1,alDRMX
PC,L00P
#1,CHAN
#1.31CRHX
alIRX,BAD
ISRX,BAD
CDAT2,BAD

46%

(DAT2,G0OOD

1011,£502,ERRS01

8IS
MOV
MOV
CMP
BEQ
MOV

000137

002234

4891 035076
4892 035104

002312
002312

145216

#10,3CSRX
#2,CHAN
alirx,BAD
#20,BAD
0s
#20,600D

ERRSOFT 1012,€501,ERRSO1

002322
002406

MOVB

ENDSEG

SSET UP DATA FOR ERROR MESSAGES

*ERROR WANDLER

TRAP
LWORD
.WORD
.WORD

CSERSOF
T
1010
ESO1
ERRSO1

:BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
cscLPt
sSELECT CHMANNEL 2
SLOAD CHANNEL NUMBER
sGET MLAY
SCREATE MSA1
;STORE MSAT1 TO LOCATION MSA1

iecceee|
OAD MSAT
TWAIT A LITTLE

INTQ DOR2=ceecccccs

SSELECT CHANNEL 1

‘LOAD CHANNEL NUMBER
teccee LOAD NOT DACR INTO A(Rl=cccccee
JREAD IIRY FOR CLEAR THE BITS
JGET ISR1 CONTENTS
JATN _NDAC,ATN,TPAS (ULPA) S SET

‘BRANCH IF YES

JSET UP DATA FOR ERROR MESSAGE
*ERROR MANDLER

TRAP
.WORD
.WORD
.WORD

CSERSOF
T
1011
ES02
ERRSO1

TRAP

cscLP

TRAP
.MORD
.WORD
.WORD

(SERSOFT
1012
£SO
ERRSO!

;BRANCH BACK TO BGNSEG IF

(KLOOP

4887 0350¢2
4888 035006
«<889 035070
4890 035074

ERRSOFT 1010,E501,ERRSO1

(kLOOP

035040
035042
035044
035046

035050
4885 035052

n Sooo

(KLOOP

034766
034770
034772
034774
034776

MOV

SGET IIR1 CONTENTS

ERRLOOP S SET

sSELECT CHANNEL 2
SLOAD CHANNEL NUMBER
SGET IIR2 CONTENTS
‘B0 BIT SHOULD BE SET
‘BRANCH IF VES
SSET UP DATA FOR ERROR MESSAGE

*ERROR MANDLER

:BRANCH BACK TO BGNSEG IF ERRLOOP IS SETV

#137,31DRHX

;===LOAD UNT

TIRAP
($CLPY
INTO DOR2==eeeeeccccccen 10001$:

TRAP

(SESEG

ST
BNE
1871

QvP
Exavio
I1TRCNT

;1S QUICK VERIFY PASS SELECTED
JIF YES EXIT TEST
;1S THIS THE FIRST TIME THROUGH THE

MOV
(LR

DPA1,SDPA
DPA1

*SAVE ENTERED DPA1
:CLR DPA1

BNE

*BRANCH IF

TES!?

610
WARDWARE

TESTS

4893

110

MACRO M1113

os-s;r-ez 16:46

TEST 10: SECONDARY ADDRESSING TEST
005237

4895 035120
48
8 §1 6

489
130
4898 0351
4899 035142
4900 035144

001
;
805
82
7
0014 ;

OF CMANNEL 1

4894 8 §114 oog 7 88§ fg
12

002314

oossn;
000037

002312

ossr

000019

145126

03516

0047;7

011

4904 035172

042777

4906 035206
4907 035212

0001;7
013737

4901 0 5158
4902

4903

0 5194

4905 0 sgoo
4908 035220
035220
035222

4909
4910
23}1 035224

112777

113777

045

1$:
2%:

145110

(TALKER)

INC

BIS

DPA1
#37,0PA1
33
#10,3CSRX

: INCREMENT DPA1
SALL DONE
:BRANCH IF YES
SSELECT CHANNEL 2

JSR

PC, WALT

(MP

BNE
INC
(MP
BEQ

MOVB

DPA1,DPA2
23

#217,31CRMX

MOV

#17,31Ckux

oog 15

145046

move

DPAT,311Rux

03361
002406

145100

002312

123

062

BIC
3%:

JMP
MOV

E¥Qv10: EXIT TSTY

TSHD10:

sSET FLAG TO SEE FIRST TIME PASS

:GET NEW DPA1

NLIST
.:?ggz
.EVEN
ENDTS

104401

ITRCNT

DPAT

145076

oog1o

SEQ 123

52-4

30001

104432
000072

491
4914 035314

035314
035314

00081

PAGE

#10,3CSRx
A10
SDPA,DPA1

$1S DPA1 = DPA2
‘BRANCH IF NO

teeeel0AD SIC INTC ACR 2eeeceee
SWAIT A LITTLE

;====L0AD NOT SIC INTO ACR 2-==
SSELECT CHANNEL 1

*LOAD NEW DPAT INTO ADR1

JREPEAT THF TEST WITH THE NEW DPA1
*RESTORE ENTERED DPA1

TRAP
WORD
BEX
6zgzzasecouoaav

ADDRESSING TEST OF

CHMANNEL

CSEX]T
L 10037-,

(TALKER)IN/

L10037:

TRAP

(SETST

W10

SEQ 124

MARDWARE TESTS
MACRO M1113
06-SEP-B2 16:46
PAGE 53
TEST 11: SECONDARY ADDRESSING TEST CF CHANNEL 2 "LISTENER)
916

SBTTL

(917
918
4919
4920

TEST 11: SECONDARY ADDRESSING TEST OF C(MANNEL 2 (LISTENER)

itX = 7 EST 11
.
THE EXT ENDED LISTENER INTERFACE FUNCTION .
CHECKS
sTHIS TEST

:PURPOSE OF THIS TEST IS TO CHMECK THE SECONDARY ADDRESSING

4921
49?2
49?2
4924

;FEATURE OF CHANNEL 2 BY MEANS OF RECEIVING A VALID AS WELL AS
;AN INVALID MY SECONDARY ADDRESS (MSA2),

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

4925 035316

BEQ

PRINTF

036772
000001

712

PNTF
7%
#TSHD1

[ TRCNT

7%:

PC,CULPA
PC,BGINI

#10,3CSRX
#22%,31CRHX

Al1:

3%:

002502

30%:

MOV

#TSHDT,=(SP)

ADD

#4,5P

MOV
MOV
TRAP

sCLEAR COUNTER
sCLEAR ULPA IN ISR 1 AND 2

#1,=(SP)
SP,RO
CSPNTF

JSET UP PARAMETER

sSELECT CHANNEL 2
:----LOAD

DAl

lN'O

A(Rz ..........

*24

sGET DPA2 ADDRESS
sCREATE MY LISTENER ADDRESS (MLA)

sBRANCH IF

YES

sSET ULPA BIT IN COMPARE DATA FOR ISR

*BRANCH TO BGNSEG

#1,CDATE
#1,CDATSL
#1,CDATS

SCLEAR ULPA BIT IN COMPARE DATA FOR ISR

#10,3CSRX
#1,CHAN

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
;====LOAD LISTENER ADDRESS Of CHANNEL 1--

:LAZ.alonux

TRAP

($BSEG

sWAIT A LITTLE

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
:GET 1IR2 CONTENTS
SIFC,BIT IN [IR2 SHOULD BE SET

ERRSOF1 1101,€501 ,ERRSO1

sBRANCH IF YES
:SET UP DATA FOR ERROR MESSAGES
sERROR HANDLER

(xLOOP

1101
LMORD
ESO!
.WORD
ERRS01
.WORD
sBRANCH TO BGNSEG WHEN ERRLOOP S SET

MOV

NS =
OO—=WV

144454

rrgd

;STORE MLA
:1S DPA EVEN

:rv-:-:uunas

000400

YES, PRINT THE TEST MEADER

#40,R1
R1,MLA2
#1,DPA2

002446
002442
002444

JIF

;====LOAD APT BIT INTO [SR2======

#1,(DAT6
#1,C(DATS
012(DA!5

002446
002442
002444

000001
000001
000001

[T
« Pl oy
2000
VOO

002314

i::

:1S THE PNT FLAG SET

#20,9]SRHX

DPA2,R1

OODODODDDODOD®D

NNN=NNNUNN=
S NYNNNNNOO-NOOOr

TS7

NOWVIN

NONNNNNNNNS

NS NNNNNNNYN 8
W= WIWWNWNWN O

002324

OB R 2D
MBOO—WNO O o
TM

OO
OO
=
N
—w

-O000
-kt
O
NNNSNNNS
NS NNNNNNNONS OONN
WWW = NN
= NWO O NN NWWWO = O N8

4960 035576

NE
WO

035564
035566
035570
035572
4959 035574
035574

COOOOOO=O0= O00000OOOOOO=—=O00O
—=OR—=INO—=—80
FEFOVNNNOWSO
= == N0
LS NENTNTNY
VLN NY S ST N N 1w NN NP S Te LTV NT NT NV S W1

035474

4948 035476
4949 035504
4950 035512
4951 035520
495% 035524
4953 035532
4954 035540
4955 035546
4956 035554
4957 035556
4958 035564

OO0~
OO0
WD &~

4929 035344
4930 035350
4931 035354
493§ 035360
4933 035366
493 035374
4935 035402
493% 035406
4937 035412
4938 035416
4939 035424
4940 035426
4941 035434
494% 035442
4943
035450
4944 035452
4945 035460
4946 035466
4947 035474

O
~N5»

0353%4
035330
035334
035336
035340

4926 035316
4927 035322
4928 035324

BGNTST

[

0 5216

MOV

#400,600D

alSRX ,BAD

sGET ISR2 (ONTENTS

TRAP

CSERSOFT

TRAP

CscLPY

110

WARDWARE TESTS MACRO M1113 06=SEP=B2 16:46 PAGE 53-1

TEST 11:

SECONDARY ACDRESSING TEST OF

4961 035604

023737

002442

002502

4963

013737

002442

002500

a9o§ 035612 081419
035614

4964 0356 s

0356
ogse 3
035626
ogse 0
4965 0 5635
0;563

4969
4967
4968
4969
4970
4971
497§

062777
012737
013701
062701
010137
113777
004737

000010
000001
002412
000100
002420
002420
011060

144436
002374

4974 035706

022737

000000

002502

005037

002500

4973

035676

4975 035712

4976 035714
4977 035750

035720
035722
ossr;«
035726
4978 035730
035730
4979 035732

o177§7
001407

104406
052777

012737
017737

4983 035762
4984 035764

001410
012737

4985 035772

022737

144346

002502

010100
010100

144340
002374
002502

4988 036015

023737

002446

002502

013737

002446

002500

4987 036006

017737

4989 036020

001410

036030
036032
036034
036036
4992 036040
036040
4993 036042
499¢
4995
4996
4997

036050
036056
036060
036066

614

BIS
MOV
MOV

#10,3CSRX
#2,CHAN
a1iRX.BAD

BEQ
MOV

42%
#10100,G00D

#10100,8A0

CKLOOP

144246

002502

42%:

MOV

al1SRX,BAD

BEQ

438

CMP

(gl!b.BAD

MOV
CDAT6,G00D
ERRSOFT 1105,£502,ERRSO1

005447
003702
104406

*1IR1

alirRx,BAD

ERRSOFT 1104,E501,ERRS01

104457
002121

017737
123737
001410
013737

#0,BAD

CMP

002500

CKLOOP
144216
002420

002502
002502

002420

002500

43%:

TRAP
CSERSOF T
WORD
110
.WORD
ESO
.WORD
ERRS01
:BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
cscLP?

CMP

BEQ

002502

*ERROR MANDLER

;SELECT CHANNEL 1
:LOAD CHANNEL NUMBER
SGET MLA2
SCREATE MSA2
*STORE MSA1 TO LOCATION MSA1
;e=====|
0AD MSAT [NTQ DOR]==ceeee --TWAIT A LITTLE

MOV

418:

‘BRANCHM IF YES

SSET UP DATA FOR ERROR MESSAGES

#10,3CSRX
#1,CHAN
MLAZ,R1
#100.R1
R1,MSA1
MSA1,31DRHX
PC,LO0P

CKLOOP
000010
000002
144276

JATN,ATN_NDAL LPAS,(ULPA) BIT SET

BIC
MOV
MOV
ADD
MOV
MOVB
JSR

CLR
600D
ERRSOFT 1103,E501,ERRSO1

104457
002120
005406
003702

4990 0360%2
4991 036030

40%:

144404

035772
035774
035776
036000
4986 036002
036002

104406

CDAT4,BAD

408
CDAT4,GOOD

ERRSOFT 1102,£502,ERRSO1

104457
002117
005406
003702

4980 035740
4981 035746

4982 035754

(MP

BEO
MOV

(xLOOP

03563¢
035642
035650
035654
035660
035664
035672

‘

CHANNEL 2 (LISTENER)

104457
oog11e
005447
003702
104406

SEQ 125

MOV
(MPB
BEQ
MOV

alCRX,BAD
MSA1,BAD
44
MSA1,GO0D
ERRSOFT 1106,£901 ,ERRSO

SGET IIRT CONTENTS

SHOULD BE ZERO

:BRANCH IF YES

SSET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

TRAP
CSERSOFY
.WORD
1103
.WORD
ESO1
.WORD
ERRSO1
;BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
($CLPT
sSELECT CHANNEL 2
SLOAD CHANNEL NUMBER
:GET 1IR2 CONTENTS

SAPT,INT1 BIT IN I1IR2 SHOULD BE SET
‘BRANCH IF YES
JSET UP DATA FOR ERROR MESSAGE

*ERROR MANDLER

TRAP
CSERSOFT
MORD
1104
.WORD
ESO1
"WORD
ERRS01
;BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
CSCLP

:GET ISR2 CONTENTS

sATN,DAV NDAC ,NRFD ,ATN,LPAS(ULPA)

‘BRANCH IF YES

JSET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

IS SET

TRAP
CSERSOFT
LMORD
1105
"WORD
ESO2
"WORD
ERRSO!
:BRANCH BACK TO BGNSEG If ERRLOOP 1S SET
TRAP
cscLP
;GET ICR2 CONTENTS

*MSA1 ADDRESS SHOULD BE SET
‘BRANCH IF YES
JSET UP DATA FOR ERROR MESSAGE
JERROR HANDLER

J 10
HARDWARE TESTS
TEST

11:

MACRO M1113

06-SEP=82 16:46

SECONDARY ADDRESSING TEST OF

SEQ 126

PAGE 53-2

CHANNEL 2 (LISTENER)

104457

TRAP

CSERSOF T

036072
036074

005644
003702

.WORD
.WORD

E901
ERRSO1

036076

104503

TRAP

CSCLPY

0 89§ 002122

4998 036076
4999 036100

042777

WORD

CKLOOP
000010

144172

S000 036106
5001 036114
sooi 036122

012737
017737
022737

000001
144136
170040

oogsra
00 sos
00250

§004 036132

012737

170040

002500

5003 0361

5005 036140

001419

036140
036142
036144
036146
5006 036150
036150
5007 036152
5008 036160

104457
002123
005447
003702

5010 036176
5011 036202
sotg 036210

017737
023737
001410

5009 036166
5013

036212

5014 036220
036220
036222
036224

036226
5015 036230
036230
5016 036232
5017 036240
5018 036246
5019 036256
5020 036262
5021 036264

5022 036272

036272
036274
036276

104406
052777
012737

012737
017737
022737
001410

012737

000010
000002

144120
002374

144056
002444

002502
002502

002444

002500

&5%:

144074

000010
000001
143776
000020

144040
002374
002502
002502

000020

002500

03631%
036312

104405

036314
5027 036316

104404
042777

000010

5029 036332

113777

002412

5031 036344

#170040,600D

000077

143764

*ERROR HANDLER

#10,3CSRX
#2,CHAN

MOV
CMP
BEQ

aISRX,BAD
CDATS ,BAD
46%

SGET ISR2 CONTENTS
:ATN_NDAC ,ATN,LADS,LPAS (ULPA) IS SET
‘BRANCH IF YES

#201,31CRux
CDATS,GOOD

ERRSOFT 1108,£502,ERRS01

BIC
MOV
MOV
CMP
BEO
MOV

#10,3CSRX
#1, CHAN
aliRx,BAD
#20,BAD
50%
#20,G00D

ERRSOFT 1109,E501,ERRS01

508:

SSET UP DATA FOR ERROR MESSAGE

BIS
MOV

MOV

46%:

*LOAD CHANNEL NUMBER
SGET ISR1 CONTENTS
*ATN,DAV ,NDAC ,ATN,NRFD SHOULD BE SET
TRAP
CSERSOFT
LWORD
1107
.WORD
ES02
.WORD
ERRS01
;BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
CSCLPI
;SELECT CHANNEL 2
:LOAD CHANNEL NUMBER

MOVE

ENDSEG

iee==e[0AD DACR INTO ACR2====e=ee==ee
:SET UP DATA FOR ERROR MESSAGE
*ERROR MANDLER

TRAP
CSERSOFT
LWORD
1108
.WORD
ES02
"WORD
ERRS01
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
C$CLPT
sSELECT CHANNEL 1
SLOAD CHANNEL NUMBER
*GET 1IR1 CONTENTS
‘B0 BIT SHOULD BE SET
‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP
MORD
"WORD

"WORD

CKLOOP
#77,31DRHX

011060

052777 000010

CSERSOFT
1109
ESO1

ERRSO1

:BRANCH BACK TO BGNSEG If ERRLOOP !S SET
TRAP
(SCLPT
;===L0AD UNL INTO DORl=cceccccee cemccces
10000$:

COPA11: BGNSEG

5028 ososga olgrsr 000001
004737

:BRANCH IF YES

MOV

move

104457
002125
005406

104406
112777

5030 036340

45%

#1,CHAN
a1SRX ,BAD
#170040,BAD

ERRSOFT 1107,6502,ERRSO1

036300 003702

5026 036314

;SELECT CHANNEL 1

CKLOOP

5023 036302
036302
5024 0363064
5025 036312

#10,3CSRX

MOV
MOV
CMP

BEQ

104457
002124
005447
003702

104406
062777

BIC

:BRANCH BACK TO BGNSEG If ERRLOOP IS SET

CKLOOP

112777 000201

013737

&&$:

1106

TRAP

CSESEG

TRAP

($BSEG

143754

BIC

#10,3CSRX

sSELECT CHANNEL 1

143736

MOVB

MLA2,alDRHWX

te===LOAD LISTENER ADDRESS OF CMANNEL 1=

BIS

#10,3CSRx

002374

143726

MOV

JSR

#1,CHAN
PC,L00P

SLOAD CHANNEL NUMBER
TWAIT A LITTLE

SSELECT CHANNEL 2

kK 10

SEQ 127

HARDWARE TESTS MACRO M1113 06-SEP-82 16:46 PAGE 53-3
TEST 11: SECONDARY ADDRESSING TEST OF CHANNEL 2 (LISTENER)

sosg 03635

01;7 7

036404
036406
036410
036412
5038 036414
036414
5039 036416

104457
002126
005406
003702

oogooz

002374

MOV

5033 03636 81 737 143666 00250
022737 000001 00250
036366
5034
5035 0363764 00141
50
0
76 01273
000001 002500
5037 036404

104609
062777

000010

5040 036454
5041 036432
so«g 036436

012737
013701
062701

5044 036446

113777

002420

5043 036442 010137 002420
004737

5047 036466

012737

011060

143654

002374

143622

308:

SOS§ 036524
5053 036526
5054 036534

112777
017737
017737
023737
001410
013737

012737

000020

002500

V36626

MSA1,31DRHX

BIS

#10,3CSRX

PC,LOOP

#2,CHAN

BEQ
469
CDAT4,GOOD
MOV
ERRSOFT 1111,E502,ERRS01

5061 036600

036626

MOvB

002500

14_566
002502
002502
002502

143524
002374
002502
002502

5065 036626

:STORE MSA1 TO LOCATION MSA1

002442

000001
14354
143542
002442

000010
000001
143462
000020

036606 104457
osoo1g oogtso
005406
036612
036614 003702
5063 036616
036616 104406
5064 036620 112777

R1.H§A1

MOV

104406
062777
012737
017737
022737

5062 036606

MOV

#1, CHAN
MLAZ,R1
#100.R1

oogsra

104457
002127
005447
003702

001410

#10,3CSRX

MOV
MOV
ADD

000002

036534
036536
036540
036542
5055 036544
036544
5056 036546
5057 036554
5058 036562

5059 036570
5060 036576

BIC

CSERSOFT
TRAP
WORD
1110
ESO1
"WORD
ERRS01
"WORD
:BRANCH TO BGNSEG WHEN ERRLOOP 1S SET
cSCLPY
TRAP
;SELECT CHANNEL 1

JSR

5046 036460 052777 000010 143612
S048 036474
5049 036502
5050 036510
5051 036516

:LOAD CHANNEL NUMBER

CKLOOP
000001
002412
000100

5045 036454

#2,CHAN

MOV
alirx,BAD
#1,BAD
CMP
BEQ
30§
MOV
" 8000
ERRSOFT 1110,E501,ERRSO1

MOovB
MOV
MOV
CMP

#1,31CRHX
alIRX,BAD
a1SRX .BAD
CDAT4 ,BAD

CKLOOP
46%:

BIC
MOV
MOV
CMP

#10,3CSRX
#1,CHAN
aliRx,BAD
#20,BAD

MOV

#20,600D

BEQ

50%

ERRSOFT 1112,E501,ERRS01
CKLOOP

000077

143450

104405

5S0%:

MOVB

ENDSEG

#77,31DRHX

SGET 1IR2 CONTENS SHOULD BE SET
‘MAC BIT IN 1IR2
*BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGES
*ERROR MANDLER

*LOAD CHANNEL NUMBER
TGET MLA2
*CREATE MSA1

DAD MSAT1 INTO DOR1==eec=- coce
j==eee=|
JWAIT A LITTLE

SSELECT CHANNELNUMBER
2
*LOAD CHANNEL

Jem—e- LOAD NOT DACR INTO ACR2===eece===
:READ IIR2 FOR CLEAR THE BITS
SGET ISR2 CONTENTS
:ATN,NDAC ,ATN,LPAS (ULPA) IS SET
;BRANCH IF YES
*SET UP DATA FOR ERROR MESSAGE
;ERROR HANDLER

CSERSOFT
TRAP
mm
WORD
ES02
.WORD
ERRSO1
"WORD
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
CSCLP
TRAP
;SELECT CHANNEL 1
*LOAD CHANNEL NUMBER
SGET IIR1 CONTENTS
‘B0 BIT SHOULD BE SET
‘BRANCH IF VES

SSET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER
TRAP

CSERSOF T
1112
JMORD
"WORD ESO1
.WORD ERRSO1
ERRLOOP 1S SET
If
BGNSEG
TO
:BRANCH BACK
CSCLPY
TRAP
:===LOAD UNL INTO DORl=====eccccccccccc=
10001$:

TRAP

5066 036630 005737 002234
5067 03663& 001054

TST
BNE

QvpP
EXQV11

;1S QUICK VERIFY PASS SELECTED
S1F YES EXIT TEST

002314

CLR

DPA2

‘CLEAR DPA2

S06R 036636 005737 002322
5069 036642 ooaogr
5070 036644 013737 002314 002406
5071 036652

005037

1ST
BNE
MOV

ITRCNT
1%
DPA2,SDPA

CSESEG

:1S THIS THE FIRST TIME THROUGH THE TEST
*BRANCH IF NO
:SAVE ENTERED DPA2

L 10

SEQ 128

HARDWARE
TESTS MACRO M1113 06=-SEP=82
16:46 PAGE 53=4
TEST 11: SECONDARY ADDRESSING TEST OF CHANNEL 2 (LISTENER)

so7§ 0
sg
5073 036662
5074 036666
5075 036674
2079 8 697
07
02
5078 036710
5079 036718

005237
005237
os
7
8 10 ;
os;
022737
0014 ;
04%7

80 22
002314
002314

002312

008314
000037

002314

5081 036726

004737

01107;

508

052777

5080 036720

soeg 0367 8
0%274

5084 036746

5085 036754
5086 036760
5087 036766
036766
036770
5089

gggg 036772
§092
5093 037064
037064
037064

112777

112777
113777

000137
013737

000019

143360

INC
INC
CMP
BNE
INC
CMP
BEQ
BIC

ITRCNT
OPA
DPAZ,DPA1
28
DPA2
#37,0PA2
$
#10,3CSRX

;SET FLAG TO SEE FIRST TIME PASS
*GET NEW DPA2
t1S DPA1 = DPA2
*BRANCH IF NO
* INCREMENT DPA1
*ALL DONE
‘BRANCH IF YES
SSELECT CMANNEL 1

JSR

PC,WAIT

TWAIT A LITTLE

000217

143342

000017

143330

MOVB

002314

143300

MOVEB

000010
035360
002406

143332

002314

104432
000074

045

1%:

123

062

MOVB
BIS

#17,31CRHX
#10 aCSRX

DPA2,alIRWX

JMP
A1
3$:
MOV
SDPA,DPA2
EXQv11: EXIT TST

LNLIST

TSHD11: .C§g%z
-EVEN_
ENDTS

104401

#217,31CRHX

s==e<l0AD SIC INTC ACR 1

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

*LOAD NEW DPA2 INTO ADR2

CREPEAT THE TEST WITH THE NEW DPA1
*RESTORE ENTERED DPA2
TRAP
LWORD

CSEXIT
L10040-.

BEX

éggzxasecouonav ADDRESSING TEST OF CHANNEL 2 (LISTENER)IN/

L10040:

TRAP

(SETST

mn10

SEQ 129

DWARE TE STS MACRO M1113 06-SEP-82 16:46 PAGE 54
T 12: SE CONDARY ADDRESSING TEST OF CHANNEL 2 (TALKER)
A

AR AR

Al Al Al

Rds])

IEX = TEST 12

sTHIS TEST CHECKS THE EXTENDED TALKER INTERFACE FUNCTION .

:PURPOSE OF THIS TEST IS TO CMECK THE SECONDARY ADDRESSiNG
sFEATURE OF

CHANNEL 2 BY MEANS OF RECEIVING A VALID AS WELL AS

sAN INVALID MY SECONDARY ADDRESS (MSA2).

S OOV

ALAAAA

002324

AR ARl

ARl

PNTF

#TSHD12

=i =d=l=l=l= =]

040652
000001

ITRCNT

PC,CULPA

PC.BGINT

#10,3CSRX
#22%
31 CRHX
#2031 SRHX

000001

#1,(DAT8
#1,CDAT?
#1,CDAT3
424
#1,CDAT8
#1,CDAT?

ARl

)

Te::

:1S THE PNT FLAG SET

:1F YES, PRINT THE TEST HEADER

MOV

#TSHD12,=(SP)

MOV
TRAP

SP,RO
CSPNTF

MOV

sCLEAR COUNTER

ADD

#1,-(SP)
#6,SP

sCLEAR ULPA IN ISR 1 AND 2
sSET _UP PARAMETER
sSELECT CHANNEL 2

s=====L0AD DAi INTO A(R2========
vy LOAD APT BIT INTO [SR2====-

sGET DPA2 ADDRESS
¢CREATE MY TALKER ADDRESS (MTA)
:STORE MTA
:1S DPA EVEN
+BRANCH IF

YES

sSET ULPA BIT IN COMPARE DATA FOR ISR

*BRANCH TO BGNSEG

SCLEAR ULPA BIT IN COMPARE DATA FOR ISR

#1,CDAT3

#10,3CSRX
#1,CHAN

gTAZ.ilDRHX

sSELECT CHANNEL 1

TRAP

($BSEG

sLOAD CHANNEL NUMBER

;====LOAD TALKER ADDRESS OF CHANNEL 1---

sWAIT A LITTLE

sSELECT CHANNEL 2

#100,R1
R1,MTA2
#1.DPA2

#400, RSAVE

OO0

- O b
SO

000001

®
o
O

Ooomomddom
~ LT
« TR
2000
VNVD

(=]
<

DPAZ,R1

NNWNNNNNNNNS

[=]elelelelelelelelelele
PP le]
SOOI
=00 =d b d \ N

NNN=NNNNNN
S @S NYNNNNNOANOOMOe

— et N
=b = \NO
= = I
N =N NN
S WINON
NN NNNNNNNN
W=NWWNWNWN

5132 037302
5133 037310
5134 037316
5135 037324
5136 037326
5137 037334
5138 037342
037342
037344
037346
037350
5139 037352
037352

TEST 12: SECONDARY ADDRESSING TEST OF CHANNEL 2 (TALKER)

[=lelelelelelelelodele

2130 037270
131 037274

+SBTTL

MAUAAAA LA AR AR A

OO0
—
OO0

5095
5096
5097
5098
5099
5100
5101
S10§
510
5104 037066
037066
5105 037066
5106 037072
5107 037074
037074
037100
037104
037106
037110
5108 037114
5109 037120
5110 037124
5111 037130
5112 037136
5113 037144
5114 037152
5115 037156
5116 037162
5117 037166
5118 037174
5119 037176
5120 037204
5121 037212
5122 037220
5123 037222
5124 037230
5125 037236
5126 037244
037244
5127 037246
5128 037254
5129 037262

#400,G00D
RSAVE ,BAD

al IRX,RSAVE
30%

MOV

ERRSOFT 1201,£501,ERRS01

:LOAD CHANNEL NUMBER

:GET 1IR2 CONTENTS
;IFC,BIT IN 1IR2 SHOULD BE SET

+BRANCH IF YES

sSET UP DATA FOR ERROR MESSAGES

*ERROR HANDLER

TRAP

CSERSOFY

TRAP

Cs$CLP

1201
WORD
ES501
.WORD
ERRSO1
.WOR
sBRANCH TO BGNSEG WHEN ERRLOOP IS SET

SEQ 130

TS MACRO M1113 06=SEP=82 16:46 PAGE S4=1
ONDARY ADDRESSING TEST OF CHANNEL 2 (TALKER)

037354

017737

142676

002402

8 ?gz §8¥Z17 oo%&se 005405
0037400
72 o1§7§;
002436 oogsoo
013737 002402 002502
037406

037406
037410
037412
037414
5146 037416
037416
147 037420
148 osraie
5149 037434
5150 037440
§151 037444
s1s§ 037450
5153 037456
5154 037462
5155 037470

104457
00226;
00544
003702

5157 037500
5158 037504
§159 037512
037512
037514
037516

005037
013737

5156 037476

037520
5160 037522
037522
5161 037524
5162 037532
5163 037540
5165 037554
5166 037556
5167 037564
5168 037572
037572

037574
037576
037600
5169 037602
037602
5170 037604

5171 037612
517§ 037620

MOV
ADD
MOV
MOVB
JSR
MOV
CMP

142620
002402
002402
002500
002402

BEQ

000010
000002
142504

010100

010100
002402

MTAZ,R1
#40,R1
R1,MSA1
MSA1,alDRHX
PC,L00P
al{RX,RSAVE
#0 ,RSAVE

002502

142546
002374
002402

41$:

002402

BIS
MOV
MOV

#10,3CSRX
#2,CHAN
aliRX,RSAVE

BEQ
MOV
MOV
ERRSOFT

42%
#10100, GOOD
RSAVE ,BAD
1204,E501,ERRS01

CMP

002500
002502

#10100,RSAVE

;GET ISR2 CONTENTS

:a;:fieLNI?DQESTPAS.(ULPA) BIT SET
SSET
UP DATA FOR ERROR MESSAGES
Eeas
*ERROR MANDLER

142446

5174 037630

013737

002402

037636
037640
037642
037644
037646
037646

104457
002265
005447
003702

002402

§17% 03 ege 013737 002452 002500
002502

42%:

MOV

CMP
BEQ

MOV

CSERSOr
T
1202
£502
"WORD
ERRS01
:BRANCH TO BGNSEG WHEN ERRLOOP IS SET
TRAP
CSCLP1
;SELECT CHANNEL 1
*LOAD CHANNEL NUMBER
SGET MTA2
*CREATE MSA1
*STORE MSA1 TO LOCATION MSA1
teeces ~LOAD MSAT INTO DOR1===== I
SWAIT A LITTLE
*GET IIRT CONTENTS
:1IR1
SHOULD BE ZERO

*BRANCH IF YES

SSET UP DATA FOR ERROR MESSAGE
g
*ERROR HANDLER
TRAP
.WORD
"WORD

CSERSOFT
1203
ESO1
"WORD
ERRS01
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
CS$CLP1
;SELECT CHANNEL 2
*LOAD CYANNEL NUMBER
SGET IIR2 CONTENTS

SAPT,INTT BIT IN 1IR2 SHOULD BE SET
‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER
TRAP

aISRX,RSAVE

CDATS8,GOOD

*SET UP DATA FOR ERROR MESSAGE

CDAT8.RSAVE
43%
RSAVE .BAD

ERRSOFT 1205,£502,ERRS01

CKLOOP

TRAP
LWORD

CSERSOFT
WORD
1204
"WORD
ESO1
"WORD
ERRSO1
:BRANCH BACK TO BGNSEG If ERRLOOP 1S SET
TRAP
CS$CLPY
:GET ISR2 CONTENTS

CKLOOP
002452

104406

#10,aCSRX
#1,CHAN

CLR
GOOD
MOV
RSAVE ,BAD
ERRSOFT 1203,£501,ERRS01

104457
002264
005406
003702

104406
017737

Eggtz.asave
CDAT2,GOOD
RSAVE gno

CKLOOP

023737
001413

5175 037636

BIC
MOV

104457
002263
005406
003702

001413
012737
013737

SISRX,RSAVE

ERRSOFT 1202,E502,ERRS01

142652
002374

013701
062701
010137
113777
004737
017737
022737

5164 037546 022737

ggz
MOV
MOV

CKLOOP

042777
012737

104406
052777
012737
017737

MOV

104406

001412

308:

*ATN,DAV,NDAC ,NRFD,ATN, TPAS(ULPA)
‘BRANCH IF YES

IS SET

*ERROR HANDLER

TRAP
CSERSOFT
MORD
1205
"WORD
ES02
"WORD
ERRSO1
:BRANCH BACK TO BGNSEG If ERRLOOP 1S SET
TRAP
CSCLPI

BN
TESTS

MACRO M1113

06-SEP-B2 16:46

PAGE

?Q:?"fgs sEanoAav ADDRESSING IESE OF CHANNEL 2 (fnuxs )

!;7
1
1

:
;222
?‘;;
;
53
258
885285
7664
0014
76?6 127 ; 883‘33 sgsggg

7702

‘i? ; -5 P
44

;;1

5183 § ;;}

104457

£02

10“99

:
}ng'
;;“
1
;
7
80
"1)
"6
232
pacs
1
77
17737 14 3 0240
13? 77
22737 17 45 0240
5133 3§;;22 81§;§; 170040 oogso
533? 833;2‘ PN SUPee. SUEIN
037762

st R
037730
083365
5192 835;; p———.
037775 0333
104457

?2;,
BEQ
MOV

3%2?3&223!‘
443
:s:a cggg

?2xsort 1306.6901.ennso1

282
5;2 e
0 0‘0095
828876 0?2;7;
81;7 7 88886?
1462146 53
002402
06 040106

040132

TRAP
TRAP
ss RSOF T
‘WORD €

iuo:g ooi"?§°‘u

565
21°t3£§"
MOV
a1$RX , RSAVE
CMP
zgzoolo.asave
353
:§132‘°A§°°°
?3§sorr 1207.égoz.eaaso1

;SELECT CHANNEL

CKLOOP

CKLOOP
:

022737 000020 002402

gzgg 823115 8?%?%% 800020 002500
040130

:ERROR MANDLER

:BRANCH BACK TO :suses 1'.5’ L

CMP
Eo:ts.asnve
253
cSAts.gggo
[
A
ERRSOFT 1308
£503,ERRSO1

104457
002270
005447
104406

:MSA1 ADDRESS SHOULD BE SET
:SET UP DATA FOR ERROR MESSAGE

‘BRANCH IF YES

=
"WORD i
ERRS01

:BRANCH BACK TO BGNSEG ';aifi“‘°°f;éfp?"
sSELECT CHANNEL 2

oy
*GET ISR2 CONTENTS

Ea;zfigaAng;ggtAos.tPhs (ULPA) IS SE
SSET UP DATA FOR ERROR MESSAGE
:-.o
{ZAROR MANDLER
o

#10,3CSRX

A
:SELECT
CHANNEL 1

g ‘.afiuve

533;3{§ §r09%g BE SE

#1, CHAN
al{RX,RSAVE

aov

czo.coog

TRAP

(SER

.33a3
.WORD

£502
ERRSO1

SSET UP DATA FOR ERROR MESSAGE

104457

MORD

o #137,31DRHX
ENDSEG

"
MOv3

:LOAD
CHANNEL
NUMBER 3
SGET IIR1
CONTENTS

002271

gty it
i12 8:8}28
104409 000137 142126 50%:
040142 112777
251§ 040150

120

:BRANCH BACK TO BGNSEG l;aigRLoog‘%EP?E!

535
MOV

cgz

cscmr?

‘LOAD
CHANNEL NUMBER
SGET ISR1 CONTENTS
'
gagxfigavi?oeggAtu.nnro SHOULD BE SE
§sEt UP DATA FOR ERROR MESSAGE
:ERROR HANDLER
R C’SRSO"
.

2197 o«ooga 023737 002440 oogaof
3133 828832 3?%?53 002440 002500
e B bt e F ot
5202 828323
b
040060

;GET ICR2 CONTENTS

CKLOOP

iR
0 ?23 gl o
W
an
5}32 8288}6 8135;%
532332
MOV
aISRX,RSAVE
040050
040052
040054

SEQ 131

Sé-

stomws
ts
;===L0A
T

UN‘

‘559

1206

o voses 1 Tihon Tk
10 DOR1 e L S

l“ 0

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

WARDWARE TESTS

MACRO M1113

06-SEP=82 16:46

PAGE

SEQ 132

S54=3

150
0401

5214
z 15

19
1

10000%:

104405

COPA12: BGNSEG

1044

198
1

12737
13277

0024

777

0401

777

4737

142116

BIC

MOV
MOVEB

" sunn
MTA2,31DRMX

°°8

1% gro

8IS

#10,3CSRx

00001

MOV

#1,G00D

01 o?

0
1
i

060210
8 16
0 sé

012737 00
017737
1420 ?
8¥Z1$ 0000

040

127

04025

820 sg
0252
040254
040256
5227 040260

040260
5228 040262

81 737
13701
062701
012137
113777
004737

236 060332

012737

000002

5237 040340

02374
8 aos
40

052777 000010
11;777

238 820;66 017737

000001

142010
002374

002374

141746 458:

141722

141676
002436

002402
002402

sz«g 040372
5243 040400

013737
013737

002436
002402

002500
002502

040406
040410
040412
040414
5245 040616
040416
5246 040420

104457
002273
005447
003702

104406
04%777

000010

141652

5250 040450
5251 oaonsg

001413
01§737

000020

002500

253 0460466

040466
040470
040472
040474

013737

1046457
002274
005406
003702

SWAIT A LITTLE

#2,CHAN
a¥lax RSAVE
go‘aslve

002402

002502

TRAP

C$BSEG

:LOAD CHANNEL NUMBER
teeee OAD TALKER ADDRESS OF CHANNEL 1===
SSELECT CHANNEL 2

SLOAD CHANNEL NUMBER
SGET 1IR2 CONTENTS
‘E:£~E£',é“,£§“2 SHOULD BE SET
SSET UP DATA FOR ERROR MESSAGES

‘ERROR WANDLER

TRAP
CSERSOFT
.WORD
1;10
.WORD
ESO1
.WORD
ERRS01
:BRANCH TO BGNSEG WHEN ERRLOOP 1S SET

TRAP
cscLPt
;SELECT CHANNEL 1
*LOAD CHANNEL NUMBER
SGET MTA2
SCREATE MSA1
:STORE MSA1 TO LOCATION MSA1
teceeae LOAD MSAT INTO DOR]=e=ececeee
SWAIT A LITTLE

MOV

#2,CHAN

SLOAD CHANNEL NUMBER

aliRX,BAD

‘READ IIR2 FOR CLEAR THE BITS

BIS

MOV

MOV
CMP

BEQ

MOV
MOV

#10,3CSRX

#1.31CRHX

21SRX,RSAVE
CDAT2 ,RSAVE

46%

CDAT2,GO0D
RSAVE guo

ERRSOFT 1211,£502,ERRSO1

46%:

CSESEG

#10,3CSRX
#1,CHAN
MTAZ,R1
#40,R1
R1,MSA1
MSA1,alDRHX
PC,LO0P

SSELECT CHANNEL 2

ieceee LOAD NOT DACR INTO ACR2===ee=e=
:GET ISR2 CONTENTS
*ATN,NDAC,ATN, TPAS (ULPA) 1S SET

*BRANCH If YES

SSET UP DATA FOR ERROR MESSAGE
ane

*ERROR HANDLER

BIC

#10,3CSRX

TRAP
CSERSOFT
.WORD
1;11
‘WORD
€ og
‘WORD
ERRSO01
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
CSCLPY
;SELECT CHANNEL 1

BEQ
MOV

50%
#20,600D

‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE

CKLOOP

5247 oaoago 012737 000001 002374
5248 040436 017737 141610 002402
5249 oaoacs 022737 000020 002402
gzsg 06826

PC,LOOP

TRAP

BIC
MOV
MOV
ADD
MOV
MOVB
JSR

MOVB

141676 002502

017737
023737

5241 040370 001413

308:

141756

539
03564
40 040362

§244 060406

MOV
MOV
gg:

sSELECT CHMANNEL 1

£XLOOP

§229 04027
<
oao;rg
§231 040302
szsg 0403
5233 040312
gsa 8:032

osga

JSR

#10,3CSRX

ERRSOFT 1210,£501,ERRS01

000010
000001
002416
000040
002420
002420
011060

go 374
42100

104457
002272
005406
003702

10“09
062777

—

TEST 12: sgcouonnv ADDRESSING TE 5 OF CHANNEL 2 (fnuxen)

MOV
MOV
CMP
MOV

#1,CHAN
aliRX,RSAVE
#20,RSAVE
RSAVE ,BAD

ERRSOFT 1212,€501,ERRS01

*LOAD CHANNEL NUMBER
SGET IIR1 CONTENTS
‘B0 BIT SHOULD BE SET
s

"ERROR HANDLER

TRAP
.WORD
"WORD
.WORD

CSERSOFT
1g12
ESO1
ERRS01

pNn

HARDWARE TESTS MACRO M1113 06-SEP-B2 16:46 PAG; S54=4
TESY 12: SECONDARY ADDRESSING TEST OF CHANNEL
2

5254 040476

zsgz

0476 0‘4??
1127

508

1044 ;

59 040 13
60 040
61
02 4
6§
8 2
6
S
2 64 82056
65
0460546
5 6? 820556

S737
19 7
12 7
88 037
5237
Ogg 7
8
7
010 ;

002322

5268 040562
5269 04057
5270 040572

022737
0014;3
042777

000037

002314

000010

141500

b) 7§ 040606

004737

5276 0406

000137

27
8

526

1
040514

055

5571 0460600

57
19 4

005;

112777

5273 040612 112777
§274 040620 052777
5275 0‘06;2 113777

000137

141570

0460646
040650

104432
000072

ggg} 040652

045

5279
5280

5283
5284 040742

040742
040742

50%:

002234

002314
002314
02322
002314
002314

002314

000217

01107;

000017
000010
002314

037130

002406

002312

123

1%:

2%:

141462

062

TRAP

CSESEG

1ST
BNE

QvP
Exavi2

;1S QUICK VERIFY PASS SELECTED
sIF YES EXIT TEST

INC

DPA2

.lNCREHENf DPA?2

1ST
BNE
MOV
CLR
INC
INC
cMP
BNE

CMP
BEQ
BIC

TRCNT
3
DPA%.SDPA
DPA
ITRCNT
DPAS
DPA2,DPA1
2%

#37,D0PA2
3%
#10,9CSRX

217, OICRNX

.NLIST

----- LOAD SlC INTO A(R lececcccccccaa

sREPEAT THE TEST WITH THE NEW DPA1

SDPA,DPA2

TSHD1Z2: .t§§%1

sALL DONE
*BRANCH IF YES
sSELECT CHANNEL 1

A12

MOV

EXQV12: EXIT TST

IS THIS THE FIRST TIME THROUGH THE TEST
sBRANCH IF NO
sSAVE ENTERED DPA2
sCLR DPA2
:SET FLAG TO SEE FIRST TIME PASS
:GET NEW DPA2
:1S DPA1 = DPA2
:BRANCH IF NO

SWAIT A LITTLE

#7,3ICRHX
#10 aCSRX
DPAé ol IRHX

JMP

coce

PC,WAIT

MOVB
BIS
MOVB

.EVEN
ENDTST

104401

CSCLP%

;===L0AD UNT INTO DOR1

10001$%:

SET

TRAP

#137,31DRHX

JSR

3%:

;BRANCH BACK TO BGNSEG l' ERRLOOP [S

ggggec

MOVB

141450
141452
141420

5277 040640 013737 002406 002314

5278 040646

(TALKER)

CKLOOP

§00

ieeee LOAD NOT SIC INTO A(R l1eecccces
SSELECT CHANNEL 2
.LOAD NEW DPA2 INTO ADR?2

RtS'OflE ENTERED DPA2

TRAP
LWORD

CSEX]T
L10041

BEX

6E§ZIASECONDQR1 ADDRESSING TEST OF CHANNEL 2 (TALKER)ZIN/
\

L10041:

TRAP

(SETST

Q133

EN
WARDWARE TESTS

MACRO M1113

06-SEP=B2 16:46

TEST 13: DEVICE CLEAR INTERFACE FUNCTION TEST

5 09
s

LSBTTL

SEQ 134

PAGE 55

TEST 13: DEVICE CLEAR INTERFACE FUNCTION TEST

:'Q"'Q"."Q""'.'Q"""';"'Q".Q""'Q"""."""'Q"QQQ"O".Q'.Q

2 89

;

= TEST 1
:PART 1 CHECKS THE1EX DEVICE
CLEAR INTERFACE FUNCTION OF CHANNEL 2 BY MEANS

;

g 90

? 9§

OF RECEIVING A UNIVERSAL COMMAND (DCL) AS WELL AS AN ADDRESS
COMMAND (SDC).

:PART 2 CHECKS THE DEVICE CLEAR INTERFACE FUNCTION OF CHANNEL 1 BY MEANS

5 39 0460744
0460744

;

COMMAND (SDC}.

BGNTST

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

5298 040744
§299 040750
$300
04075

005737
001410

002324

040756
040762
040764
040766
5301 040772
ssog 040776
§303 041002
§304 041006
5305 041014
5306 061016

01%766

012746
010600
104417
062706
005037
004737
004737
032737
001404
052737

043040

5308 0410%2
§309 0410
061036
$310 041036

04075

OF RECEIVING A UNIVERSAL -OMMAND (DCL) AS WELL AS AN ADDRESS

131
BEQ
PRINTF

PNTF
7%
#TSHD13

713::
;1S THE PNT FLAG SET
SIF YES, PRINT THE TEST WEADER
R

MOV

000001

000004
002322
010220
010534
000001

002314

000001

042737

#1,-(SP)
SP.RO
CSPNTF
#4,SP

002454

CLR
JSR
ITAC13: JSR
BIT
BEQ
BIS

ITRCNT
PC,CULPA
PC.BGIN
#1.DPA2
38
#1,CDAT9

;CLEAR [TERATION COUNTER
*CLEAR ULPA IN ISR 1 AND 2
:
SIS DPA EVEN
*BRANCH IF YES
SSET ULPA BIT IN COMPARE DATA FOR ISR

000001

002454

3%:

#1,CDAT9

JCLEAR ULPA BIT IN COMPARE DATA FOR ISR

104404
052777

BIC
BGNSEG

000010

141234

BIS

#10,3CSRX

;SELECT CHANNEL 2

5312 041052
5313 061060
5314 041066
5315 041074

112777
042777
112777
004737

000010
000010
000024
011060

141202
141212
141202

MOVB
BIC
MOVB
JSR

#10,31SRHX
#10,3CSRX
#24.31DRHX
PC,LOOP

i===LOAD DCAS BIT INTO ISR2 REGISTER
SSELECT CHANNEL 1
i==== 0OAD DCL INTO DOR l=eceeee R
SWAIT A LITTLE

5317 041106

012737

#2,CHAN

:LOAD CHANNEL NUMBER

§307 041026

§311 041046

5316 041100

5318 041114

5319 061122
§320 041130

§321 041132

sszg 061140
§323 041146
041146
041150
0641152
061154
5324 041156
0641156
5325 041160
5326 061166
5327 061174
5328 061176
ssgo 041204

§330 041212

000403

112777

052777

017737

000223

000010
000002

141216

141172

002402

004500

002500

004500

013737

002402

BIS
MOV

MOV

002402
-

CMP
BEQ

MOV

002502

104457

017737
122737
001413
012737
013737

#22%,31CRHX

#10,3CSRX

al [RX,RSAVE

#4500, RSAVE
10%

#4500, G0OOD

MOV
RSAVE ,BAD
ERRSOFT 1301,£501,ERRSO1

002425
005406
003702

104406

MOVB

002374

141130

022737
001413

o1§7§7

7%:

MOV
MOV
TRAP
ADD

#TSHD13,=(SP)

CKLOOP

141100
0000264

002402
002402

000024
002402

002500
002502

10$:

MOV
CMPR
BEQ
MOV
MOV

alCRX,RSAVE
nsa.asnve
208
#24 ,G00D
agav: BAD

ERRSOFT 1302,£901,ERRSO1

:BRANCH TO BGNSEG

TRAP

($BSEG

i=eee 0AD DAl INTO ACR 2==ccccccee

SSELECT CHANNEL 2

SGET IIR2 CONTENTS

*DCAS,INT1,IFC BIT SHOULD BE SET
*BRANCH IF "YES

SSET UP DATA FOR FRROR MESSAGE
g
*ERROR HANDLER

TRAP
LWORD
.WORD
.WORD
:BRANCH TO BGNSEG IF ERRLOOP IS
TRAP
:GET ICR2 CONTENTS
S1CR2 CONTENTS SHOULD BE 24
‘BRANCH IF YES
SSET UP DATA iOR ERROR MESSAGE
Peee

*ERROR HANDLER

CSERSOFT
1301
ESO1
ERRSO!
SET
CS$CLPI

MACRO M1113
TEST 13: DEVICE CLEAR INTER

HARDWARE

SEQ 135

PAGE 55-1

TESTS

mg—bfi

061212
061214

041 18

535 §E} s
1

00240

821 4
125

[=1V]]
NN

164101

(=
(=X

000001

A —
"

gt
i
4 Sek
5 061244

20%:

MOV

BAD

[= )
8883
S=ZSRSR
SQ N
22on=
WD
~R
=0~ B NP
O RO
gbbb
NgON

MOV

LESO1,ERRSO1

cococoo

sSET UP DATA FOR ERROR MESSAGE

sERROR HANDLER

TRAP

.WORD
.WORD
.WORD
sBRANCH TO BGNSEG IF Eflfl%ggg IS

DPA2,R1

sCREATE MLA2

#10,3CSRX

#1,CHAN

:STORE MLA2
sSELECT CHANNEL 1
+LOAD CHANNEL NUMBER

PC,LOOP

sWAIT A LITTLE

#40,R1
R1,MLA2

MLAZ2,31DRHX
al IRX,RSAVE
#20,RSAVE

22%

MOV

;====LOAD NOT DACR INTO A(R2====
sGET _IIR2 CONTENTS
:1IR2 CONTENTS SHCULD BE ZERO

sBRANCH IF YES

(xLOOP

21%:

;BRANCH TO BGNSEG IF ERRLOOP IS SET
TRAP
P

#20,G00D

RSAVE ,BAD

T 1304,£501 ,ERRS01
ERRSOF

;e=e=L0AD

MLA2

INTO

140670

22%:

sGET IIRT1 CONTENTS

sBRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE

sERROR HANDLER

TRAP

al [RX,RSAVE

;=====L0AD SDC INTO DOR l===ce==
sWAIT A LITTLE
sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
sGET IIR2 CONTENTS

23%

sBRANCH IF YES

#4,31DRHX

#2,CHAN

#6101 .RSAVE

TRAP

sBRANCH TO BGNSEG IF ERRLOOP IS

#10,3CSRX

006101
002402

lececcecee

.WORD
«WORD
.WORD

(xLOOP

000004

DOR

:B0 BIT SHOULD BE SET

#6101,G00D
RSAVE ,BAD

ERRSOFT 1305,£501 ,ERRSCY

sDCAS,MA MAC,INT1 BIT SHOULD BE SET
sSET UP DATA FOR ERROR MESSAGES

sERROR HANDLER

TRAP

.WORD
WORD

~WORD

(kLOOP
MOV

(MP

BEC

-0

23%:

HO e
Y

002605
00240

o lmd
*

-2 ND
WNNO

061376
5354 041400
5355 041406
5356 041412
5357 041420
5358 Oblbiz
5359 0414
5360 041442
5361 041444
S!bi 061452
5363 041460
061460
061462
041464
041466
5364 061470
061470
5365 061472
536? 041500
5367 041506

OO000O0—~=—=
v
~o
8883
=228
&
W=RINNN 2!\)2
OO WW
NN S
= NNNNNNS
W NW N
NON=N
NNWNNNNNYN 8

041276

5353 041376

OO0
ON =O

5349 04135

X,RSAVE

T
ERRSOF

061266

5350 041352
5351 041360
5352 041366
041366
041370
061372

1 CRHX

MOvVB
MOV
1ST

BEOQ
CLR

005200 002502

06126
041260
041262
061264

5339 041270
041270
5340 061272
5361 061276
SS‘; 041302
5363 041306
9346 061314
9345 041 g?
5346 041330
5347 041334
5348 061345

+WORD

(kLoOP

X,RSAVE

9.RSAVE

CSERSOFT
1305

£501
ERRSOY

;BRANCH BACK TO BGNSEG I:RigRLOO P IS SET
C(scLP

;GET ISR2 CONTENTS

*ATN,DAV NDAC ,NRFD,ATN,LADS

CBRANCH IF YES

IS S £l

1§oe.tgoz.£nasox

;SET UP DATA FOR ERROR MESSAGE

*ERROR WANDLER

CSERSOFT
1306
ESO;
WORD
ERRS501
xinignt 00P IS SET
CsCLPl
TRAP

ERRSOFT

I
NN

008203

000004
002402

002500
002502

24%:

o
NS WN

160460
1460462

25%:

002374
1604446

#4,600D

ERRSOFT

1307,£901,ERRSO1

*ERROR MANDLER

25¢

aguve BAD

#10,3CSRx

;LOAD CHANNEL NUMBE R
"""" LOAD UNL _INTO DOR 1 -

sGET IIR1 CONTENTS
;B0 BIT SHOULD BE SET

PC,LOOP

000020

002402
002402

MOV

ol 1RX,RSAVE

000020
002402

002500
002502

MOV
MOV

BEQ

6
#20,6G00D

522.R§AVE

(MP

RSAVE ,BAD

ERRSOFT 1308,£501 ,ERRS01

OOWWY

YES

sSET UP DATA

FOR ERROR MESSAGE

:ERROR HANDLER

TRAP

al IRX,RSAVE

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
sGET I1IR2 CONTENTS

27$

sBRANCH IF YES

#1_,RSAVE

27%:

sBRANCH IF

T
CSERSOF

1308
ES501
ERRS501

:BRANCH BACK TO BGNSEG 1§RggaLoop 1S SET
#10,3CSRX
#2,CHAN

#1,600D
RSAVE ,BAD

MOV

SWAIT A LITTLE

e @

.WORD
.WORD
WORD

CkLOOP

26%:

s====L0AD NOT DACR INTO ACR2
sSELECT CHANNEL 1

#77,31DRHX

#1,CHAN

JSR

T
CSERSOF
1307
E901
ERRY01
IS SET
l;aigRLOOP
BGNSEG
TO
;BRANCH BACK
cscLPt
TRAP

.WORD
«WORD
.WORD

#1,31CRHX

mMOovBe

BIC
MOV

MOvB

OWWV

W= WWWNO
NNWNNNYN "

MOV

;CONTENTS SHOULD BE &
sBRANCH IF YES
sSET UP DATA FOR ERROR MESSAGES

#4 & RSAV
vE

MOV

O'WVIN

104405

9l CRX , RSAVE

(kLooP

000001

:GET ICR2 CONTENTS

MOV
(MPB

BEQ

NNWNNNNNNY

NN = WNWWNWN
N

N =NoN

NN —

140522
000004

003702
104406

;BRANCH BACK TO BGNSEG

(xLOOP

- gse3

00O
-

NNNNNOMWNW
SOOI
NS
(¥
1V]

= = O
SNNY W& oog WA
88¢a SOOI SN

= = O
VAIWAVAWAW SN
oSO ON SNSO0ON

5399 041760

888
[ ]
WS

—— g — gp—p— g} PR
N
O
S
N
N
R
R
I

e e

D ol

D i

il e

i e

3
© 333 ® OGG§
W)
=
3

MOV

«WORD
.WORD

NNNNNNNNNNNNNNOoOO
Oo

NOWVISWIN

WA
NN
N NN
NNNNNSN

L ALV ALV LIV IV LV TV IV TV IV IV}
NN NN
NN v v

5390

MOV

R R R R R R R R RRRRRRRRRRRRRRRRRRRARKRRRR
&~
RRRRRRRRRERRKRRR R

537

18737 005402 80302

S
885
S28R2S33
IR
&
uN-‘NNNV\Dg
NS
S8
NN
NNNN H

TEST 13: D

SEQ 136

MACRO M1113 06-SEP=B2 16:46 PAGE 55-2
CLEAR INTERFACE FUNCTION TEST

salaal

HARDWARE

cscLPl

sMAC BIT SHOULD BE SET

*SET UP DATA FOR ERROR MESSAGE

ERRSOF1 1309,£501 ,ERRS01

*ERROR WANDLER

(KLOOP

1309
.WORD
ES01
.WORD
ERRS501
.WORD
;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET

ENDSEG

LT T T T
XX

*PART 2 (MECKS THE DEV

10000%:

TRAP

(SERSOFT

TRAP

csaet

TRAP

(SESEG

SEQ 137

MACRO M1113 06-SEP-82 16:46 PAGE 55-3
TEST 13: D EviC 3 CLEAR INTERFACE FUNCTION T EST

HARDWARE TESTS

004500
002402

WWN
= NWO
O NNWNNGO

140064

000024

W=
NNOUNN
OOV
O =Ny

OO000O0

ogoo -OO00O—

OO0 —=

002500
002402

YES

JSET ULPA BIT IN COMPARE DATA FOR ISR

N
oo

($BSEG

l“to

SRX
PC,LO0P
#10,9CSRX
#1,CHAN

aliRX,RSAVE
MOV

108:

RSAVE ,BAD

‘---o-o----

BIT INTO ISR1 REGISTER
s===L0AD D
sSELECT CHANNEL 2
:----LOAD

DCL

lN'O

Do“

2------- .....

sWAIT A LITTLE

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
sGET JIR1 CONTENTS
sDCAS,IFC,INTT BIT SHOULD BE SET
sBRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

CKLOOP

1310
.WORD
ESO1
.WORD
ERRS501
.WORD
;BRANCH TO BGNSEG IF ERLOOP IS SET

MOV
(MPB

a1 CRX,RSAVE
#24 ,RSAVE

MOV

#24,G00D

MOV

20%:

#4500,RSAVE
108
#4500,G00D

ACR

T 1310,€501 ,ERRSON
ERRSOF

BEQ

000024
002402

000001
137776
002402

;BRANCH [F

0452§4

56437 0462236
042236
5438 062240
5439 062566
5440 042256
5441 042260
5665 062262
5643 0462266
5644 062274
0462274
062276
042300
042302

:1S DPA EVEN

TRAP

OO
OO~
VINNO
BB Nt
OONWV
onSsSOr

1640114

004500

:CLEAR ULPA BIT IN ISR ' AND 2

;SET UP PARAMETER

SCLEAR ULPA BIT IN COMPARE DATA FOR ISR

4%:
PSEUT:

dedebedadd
88828002
OO0000
e s NONON
OANOON—=
coronvo
o

0001
0021

i
2
OO

002454

OO0
OO0
NN
VI
OO0
nNOo

WO
~NWw

000001

OOWWY
NOO'N

NN = WIWWWN NIW NN NN NN W NN
NINWNNNNNNNNNNNNNSN

002454

5614 8: 040
044
515
5616 04 058
5617 04206
5418 042066
5619 0462074
9620 042102
5621 06%110
5625 042114
562 06%1%2
5626 042130
9625 042136
5626 062144
9427 062146
5628 042154
5629 062162
062162
042164
0462166
042170
5430 062175
04%17
5631 062174
56432 062202
56433 062210
5636 062212
54635 062220
5636 062226
062226

000001

PC,CULPA

PC,BGIN2
#1,0PA1
[3)

8i
56 o
318
S

s 01050
002312
000001
[=lelelelelelele
el el it "ty g
N b b I
2-\nd—tb-0°-fl\no
LSLSTNTNTNTNY
LN SV I N8
~5>

5403
5604 0617
5605 061770
5606 061774
5607 042002
5608 042004
5609 062012
5610 0462014
5611 0420 s

20%

RSAVE ,BAD

TRAP

(SERSOFT

TRAP

(%1484

sGET ICRY CONTENTS
s1CR1 CONTENTS SHOULD BE 24

sBRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE

ERRSOF1 1312,€901 ,ERRS01

sERROR HANDLER

(KLOOP

.WORD
.WORD
.WORD
sBRANCH TO BGNSEG IF ERRLOOP IS
:----LOAD

BEQ
CLR

sBRANCH IF YES
sSET UP DATA FOR FRROR MESSAGE

MOv

ERRSOF1

DA(R

lN‘o

TRAP

MOovB
MOV

TST

No‘

TRAP

CSERSOFT

1312
E901
ERR501

SE'

cscLPl

‘c"‘----- .....

sGET TIR1 CONTENTS
s1IRT CONTENTS SHOULD BE ZERO
sERROR HANDLER

TRAP

WORD
.WORD
.WORD

T
CSERSOF

1313
ESO!
ERRS0!

TESTS MACRO M1113 06-SEP=-B2 16:46 PAGE 55-4
WARDWARE
TEST 13: DEVICE CLEAR INTERFACE FUNCTION TEST
0423064 1046406
2449 04 os 013701 002318

4467 06231
5448 04231
5449 04
5450 04
5651 04

0687 1 00004
81 157 002410
52777 000010
137750
01 7;7
113777

Soooo
00241

218:

023374
137732

0 141;

5457 0623764

013737

5456 062366

5458 04 aog

04240
062404
042406
043410
5459 04 61%
06%41
5460 062414

o1§7§

000020
002402

5465 04245 022737 006101
5466 062456 001413
5467 042460 01;737 006101

002402
002500

‘B0 BIT SHOULD BE SET

MOV

#20,600D

*SET UP DATA FOR ERROR MESSAGE

#4,3l1DRHX

CSERSOF T
TRAP
1314
.WORD
"WORD ESO1
.WORD ERRSO1
:BRANCH TO BGNSEG IF ERRLOOP IS SET
cscLP
TRAP
PrE— LOAD SDC INTO DOR 2==e=ee==== -—--

#6101 ,RSAVE
23%
#6101,G00D

MAC BIT SHOULD BE SET
:DCAS,INT1,MA
YES
IF
:BRANCH
:SET UP DATA FOR ERROR MESSAGES

20%

'§‘VE BAD

MOVB
JSR

PC,LOOP

#10,3CSRX
#1,CHAN
al IRX,RSAVE

002502

MOV

RSAVE . BAD

002492

062674
062476
042500
0462502
5470 042504
062504
5471 042506
SL?% 042514
5473 042522
5474 062S§6

104457
002443
005406
003702
104406
017737 137544 002402 23%:
023737 002454 002402
001413
013737 002454 002500

5469 042474

5475 062532

5476 062540

042540
062542
062544
0462546
5477 042550
oagsso
5478 042552
5479 o«gsoo
5480 062566
5481 042570

5482 042576

013737

002402

002502

104457
002444
005447
003702
104409
01773 137506 002402 24%:
122737 000006 002402
001413
01;7!7 000004 002500
013737

5483 062604
062606 104457
062606 002445

002402

002502

SSELECT CHANNEL 2

#20,RSAVE

BIC
MOV
MOV

013737

:STORE MLA1

CMP

PC,L00P
P S" RSAVE

5462 04 4;2 042777 000010 137644
012737 000001 002374
5463 062436
5464 062442 017737 137602 002402
5668 0626466

(s(LPl

*LOAD CHANNEL NUMBER
ieeee 0AD MLA1 INTO DOR 2===eccccccces

ERRSOFT 1314,£501,ERRSO1

22%:

TRAP

#2,CHAN
MLA1,31DRHX

CkLOOP

137654

011060

#10,3CSRX

R1,MLAY

;CREATE MLA1

MOV
MOVB

MOV

002502

104457
002442
005406
003702
004737

BIS

BEQ

002500

104406
112777 000004

5461 062622

#40,R1

JSR
MOV

gasa 062356 oszr 7 000020 00240

DPA1,R1

ADD

MOV

s«si 062344 004737 011090
5453 062350 017737 137674 °°5‘°$
455 042366

MOV

:BRANCH TO BGNSEG IF ERRLOOP IS SET

(KLOOP

5445 062304

cMP
BEQ
MOV

ERRSOFT 1315,E501 ,ERRS01

CkLOOP
MOV

CMP
BEQ
MOV
MOV

@ISRX,RSAVE

CDAT9,RSAVE
CDAT9,GO0D

24%

RSAVE , BAD

ERRSOFT 1316,£502,ERRSO1

CkLOOP
MOV
(MPB

alCRX ,RSAVE
#4 ,RSAVE

MOV

#4,6000D

BEQ

MOV

25§

agAvE BAD

ERRSOFT 1317,£901,ERRSO1

‘WAIT A LITTLE
SGET 1IR2 CONTENTS
‘BRANCH IF YES
R

:ERROR HANDLER

TWAIT A LITTLE

SSELECT CHANNEL 1
*LOAD CHANNEL NUMBER
SGET IIR1 CONTENTS
e

:ERROR HANDLER

CSERSOF T
TRAP
.MORD 1315
"WORD ES501
"WORD ERRSO1
ERRLOOP IS SET
IF
BGNSEG
TO
BACK
:BRANCH
cscLPl
TRAP
:GET ISR1 CONTENTS
AV IS SET
,NRFD ,ATN,LADS
N,D
,NDAC
:AT
:BRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE
B

*ERROR HANDLER

CSERSOFT
TRAP
<WORD 13'6
.WORD £502
.WORD ERRS01
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
CS$CLPI
TRAP
:GET ICR1 CONTENTS
*CONTENTS SHOULD BE 4
‘BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGES
e

*ERROR HANDLER

TRAP
MORD

CSERSOF T
1317

Jn
WARDWARE TESTS

TEST 13: DEVIC

MACRO M1113 06-SEP
CLEAR INTERFACE FUN

ON TEST

E901
.WORD
ERRS501
.WORD
sBRANCH BACK TO BGNSEG IF ERRLOOP IS SET

614
616
554

5487 0426 s
5488 04064
5439 82 64
5490
04265

=
=

04 e1g 005644
003702
82 61
062614
5484
zaas
4

#1,31CRHX

#10,3CSRX
o; CHAN
#7%,31DRHX
PC,LOOP

‘53“*-°‘°

491 8: 66
aog
666

¥ s.aAo
MOV

ERRSOFT

00000
-t ON)
= >

#1,BAD

000001

MOV

#1,600D

1319,E501,ERRSO1

sSELECT CHANNEL
sLOAD CHANNEL NUMBER
:----LOAO

JWAIT A

l“'o

oon

cscLP

2----------.-------

LITTLE

sGET IIR2 CONTENTS
;B0 BIT SHOULD BE SET

;BRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE
JERROR HANDLER
TRAP

CSERSOFT

.WORD
1318
ES501
.WORD
ERR501
«WORD
0
sBRANCH BACK TO BGNSEG l;REgRLOOP IS SET
cscLPt
sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER

sGET IIR1 CONTENTS
sMAC BIT SHOULD BE

SET

sBRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE
;ERROR HANDLER

b NN =2 NN

SO NNNONNNNS
WOWW
= NN NNO
NNINNONNNNW

10001$:

TRAP

T
CSERSOF

TRAP

cscLPt

TRAP

(SESEG

002234

5520 043114
063114
063114

104401

s1F _YES EXIT TEST

sITERATION COUNTER ¢ 1
sDEFAULT ITERATION EXECUTED
s1F YES EXIT TEST
sIF NO TEST ITERATION

002322
002322
041002

045

sSELECT CHANNEL 1
sLOAD SWRST INTO ACR2
sLOAD NOT SWRST INTO ACR?
s1S QUICK VERIFY PASS SELECTED

000010

OO0

O =t =t O =

ERRSOFT

27%

TRAP

1319
.WORD
ES501
.WORD
ERRS501
.WORD
IS SET
ERRLOOP
IF
BGNSEG
TO
BACK
;BRANCH

§517 043040
V518

1318,€6501,ERRSO1

alirx,BAD

5515
516

:go GOOD

#10,3CSRX
#1,CHAN

000010

oo
o &»H
oS

5493 042670
5494 042676
062676
042700
062702
042704
5495 042706
042706
5496 042710
5497 062716
5498 04 7;«
5499 042732
5500 042740
5501 042742
§502 042750
062750
062752
062754
062756
5$503 042760
oagroo
5504 042762
0462762
062762
5505 042764
5506 062772
§507 043000
5508 043006
5509 043012
5510 043014
5511 043020
ss1§ 043026
5513 043030
5514 043034
G 3034
043036

SEQ 139

PAGE 55-5

123

EXOV13:

TRAP

CSEXIT

WORD

L10042-.

TRAP

CSETST

BEX

6%321ADEVICE CLEAR INTERFACE FUNCTION TESTIN/

§519

L10042:

06-SEP-B2 16:46

SEQ 140

PAGE 56

«SBTTL

TEST 14: DEVICE TRIGGER INTERFACE FUNCTION TEST

:PART 1

CHECKS THE TRIGGER INTERFACE FUNCTION OF

CHANNEL 2 BY MEANS OF

:PART 2 CHECKS THE TRIGGER INTERFACE FUNCTION OF

CHANNEL 1 BY MEANS OF

MUAAA AL LA

;
;

AR MM

AR A

ARl

IEX = TEST 14

Rlld])

zgge;zg*c THE ADDRESS COMMAND GET AS WELL AS THE AUXILIARY COMMAND
§S$E§§é¥° THE ADDRESS COMMAND GET AS WELL AS THE AUXILIARY COMMAND

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

RS YNNNES
NNWNNNNN NNNN=

W= WWWNWNWNWOONNNND

002324
043742
000001

7%:

ITAC14:

~N W uun-fluu%?
NNWNN
NN

PNTF

T14::
;1S THE PNT FLAG SET

PRINTF

#TSHD14

CLR

JSR

ITRCNT

PC,BGIN

:CLEAR ITERATION COUNTER

BIS

#10,3CSRX

;SELECT CHANNEL 2

MOVB

#200.3]SRHX

teeee OAD GET BIT

BGNSEG

MOVB

137046

($BSEG

#4,SP

*SET UP PARAMETER

i====l0AD DAl INTO ACR 2==e=cccceccces

teee—- LOAD GET INTO DOR l==eecccccccecs

MLA2,alDRHX
PC,LOOP

JSR

PC,LO0P

MOV

#10,3CSRxX

#2,CHAN
al iRX ,RSAVE

#102501,RSAVE
108
#102501, 600D
RSAVE ,BAD

ERRSOFT 1401,E501,ERRSO1

SSELECT CHANNEL 1

INTO |SR2==e=cecccee

#10,31DRHX

DPA2,R1

MOVB
JSR

CMP

:CREATE MLA2

teceea LOAD MLA2 INTO DOR l===ceeececee
SWAIT A LITTLE
SWAIT A LITTLE

*SELECT CHANNEL 2

:LOAD CHANNEL NUMBER
SGET IIR 2 CONTENTS

SGET,MA,INTT,IFC,MAC BIT SHOULD BE SET
*BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE
..

*ERROR HANDLER

TRAP

CSERSOFT

TRAP

(SCLPY

1401
MORD
ESO1
"WORD
ERRSO1
.WORD
;BRANCH BACK TO BGNSEG If ERRLOOP IS SET

CKLOOP
108:

TRAP

ADD

:STORE MLA2

BEQ
MOV

002500
002502

#TSHD14,=(SP)
#,=-(SP)
SP.RO
CSPNTF

#40,R1
R1,MLA2

MOV
MOV

002402

MOV
MOV
MOV
TRAP

ADD
MOV

BIS

137024

#22%5,31CRHX

*1F YES, PRINT THE TEST HEADER

#10,3CSRX

Move

137034

BIC

MOV

~ SN

NNS

—
W
NN

OO0O0—=O—

o0
NS
WVASS

BEQ

o O NV
NN =N

O=0000—==0O=
TYCS =SS NO
WONIWNNNMNES
NN NNNNNNNNSSNNNNNNES

823
eegeseses
WWVINO
S
W=
SN

NNONOOOr

WHWO=O
NS

OO O=000
OO0 ===
SIS ONIN
NONSONNY

OO
OO

=W
N
=W

OWN

BGNTST

R
PR R R
2R PR R R

MACRO M1113

E TRIGGER INTERFACE FUNCTION TEST

‘“U““v““v“““““U“‘U““Ufi:8n=xficxncflficfi"uhnvh”“flhfl—h‘-hd—hfl—h‘—hfl—hfl—hfl—hfl
AN LN N U U AN N N N AN N N NN
NOINON)
= b =b
WANNININ)
= = 2
OW’ONnJMbngh;
YR
R
T S T
OSSNSO
S SNOONSS o

<wn

owm

]

W
WWWNINNONNNNN - =3
BB W00
DN Uflfis:
00N
::¥Ad =0V NYO VNN ‘T:
© R R WR NR UR N UNR RN AN NR NR RN N NN
R R NR NR RRRRRRRRRR
N NN N N NN N NN

NOWVSWN=O

VRNV

~ e,
LY LV TV IV IV IV TN IV TV IV IV IV LN LV IV IV IV IV [V ]
VIVWVAWMAWDVWAWVAWVAVAWIA - AW
VWAV

VIV
VIV

WWIVWAVWNNWNWNVAWN
AV AT AV

MOV

a1CRX,RSAVE

:GET ICR2 CONTENTS

MOV
MOV

#10,GOOD
RSAVE ,BAD

*SET UP DATA FOR ERROR MESSAGE
e

(MPB
BEQ

#10,RSAVE
208

ERRSOFT 1402,£901,ERRS01

*1CR2 CONTENTS SHOULD BE 10
‘BRANCH IF YES

*ERROR HANDLER

TRAP

JMORD

CSERSOFT

1402

L n

SEQ 141

HARDWARE TESTS
MACRO M1113
06=-SEP=B2 16:46
PAGE 56-1
TEST 14: DEVICE TRIGGER INTERFACE FUNCTION TEST

063364
043366
5565 82 3;8

005644
003702
St

5568 043406

042777

5566
°‘§§85 112777
000006 136670
20%:
§567 0434
112777 800001
136662
5569 043414
§570 o«%:gz
§571 043426
063426
063626
SS7§

112777
004737

000010

000077
011060

136664

136654

104405

3 B

§57

CKLOOP

MOVB
MOVB

#6,31CRHX
#1.3I1CRHX

MOVB
JSR
ENDSEG

#77,31DRHX
PC,LOOP

BIC

e Ll e KR SR

LWORD
E901
WORD
ERRSO1
:BRANCH BACK TO BGNSEG l;aigatoog’éfp§£t

jee—eLOAD NOT FGET INTO ACR 2==eeccee
ieeeee LOAD NOT DACR INTO ACR2==eecccce

#10,3CSRX

*SELECT CHANNEL 1

s=====L0AD UNL INTO DOR leccccccccccee
SWAIT A LITTLE

100008:
S

e e Ee e e D e

R D

§576 043430
§577 043434
063634
5578 043436

004737

010710

104404
042777

000010

5580 043452
5581 043460

112777
os§777

000200
000010

5583 043472
5584 043476
5585 043502
5586 043510
5587 043514
5588 043522

062701
010137
113777
004737
112777
004737

000040
002410
002410
011060
000010
011060

012737
017737

000001
136502

112777

013701

§589 043526

042777

§592 043550

022737

5590 043534
5591 043542

5593 043556
§594 043560
5595 043566
§596 043574
043574
043576
3600
043602
5597 043604
043604
5598 043606
5599 043614
5600 0643622
5601 043624
5602 043632
5603 043640
063640

063642
063644
043646
5604 043650
043650
5605 063652

(SESEG

;THIS PART CHECKS THE DEVICE TRIGGER INTERFACE FUNTION OF CHANNEL 2
:00. ..................... S

5582 043466

TRAP

ETECTCORCEE® @ ED® D@ P R Y

:PART 2 OF THE TEST

gg;g

5579 043446

OSSP

001413
012737
013737

000223
002312

000010
102501

102501
002402

)

D D

I @ W

T D I @ S D

W W D W W

e o W

;SET UP PARAMETER

136634

BIC

#10,3CSRX

sSELECT CHANNEL 1

136602
136612

MOVB
BIS

#200,a]SRHX
#10,3CSRX

s====L0AD GET BIT INTO [SRl1=cccccccces
sSELECT CHANNEL 2

ADD
MOV
MOVB
JSR
move
JSR

#40,R1
R1,MLA1
MLA1,3IDRHX
PC,LOOP
#10,31DRuX
C,LOOP

R
:STORE MLA1
s====L0AD MLA1 INTO DOR 2==ecccccccces
SWAIT A LITTLE
ieee=l0AD GET INTO DOR 2===ceccccccces
SWAIT A LITTLE

002374
002402

MOV
MOV

#1,CHAN
alIRX ,RSAVE

:LOAD CHANNEL NUMBER
<GET IIR 1 CONTENTS

002500
002502

BEQ
MOV
MOV
ERRSOFT

308
#102501,G00D
RSAVE ,BAD
1403,E501,ERRSO1

:BRANCH IF YES
*SET UP DATA FOR ERROR MESSAGE
g
:ERROR HANDLER
TRAP
CSERSOFT
WORD
1403
.WORD
ESO1
.WORD
ERRSO1
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
IRAP
CSCLP1
:GET ICR1 CONTENTS
:1CR1 CONTENTS SHOULD BE 10
:BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE
Teee
*ERROR HANDLER
TRAP
CSERSOFT

136616

MOVB
MOV

136566

136554

136544

BIC

002402

CMP

#22%5.31CRHX
oPAT,R1

#10,3CSRX

#102501,RSAVE

CKLOOP
136452
000010

002402
002402

000010
002402

002500
002502

30%:

MOV
CMPB
BEQ
MOV
MOV
ERRSOFT

a1 CRX,RSAVE
#10,RSAVE
40$
#10,G00D
RSAVE ,BAD
1404 ,E901,ERRS01

CKLOOP

000006

@ D

PC,BGIN2

104457
0025764
005644
003702

104406
112777

JSR
BGNSEG

104457
002573
005406
003702

104406
017737
122737
001413
012737
013737

136410

40$:

MOVB

#6,31CRHX

TRAP

($BSEG

ie===l0AD DAl INTO ACR l=cecccccccccs

‘CREATE MLA1

SSELECT CHANNEL 1

:GET,MA,INT1,IFC,MAC BIT SHUOLD BE SET

MORD
1404
.WORD
E901
.WORD
ERRSO1
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
CSCLP
jeme—— LOAD NOT FGET INTO ACR l==ecccccceeee

nn
HARDWARE TESTS

06-SEP-82 16:46

SEQ 142

PAGE 56-2

14: DEVICE TRIGGER INTERFACE FUNCTION TEST

Loalalal

(=] NI~

TEST

MACRO M1113

X=NN>= -o

O - o a a2 -

OO0« N NV N

O-—woNaoa5>V—M>OSN>EOD

WONASANANANANMNANANN —_—«O0~O0—0 OToNT3NIOOSTe—

x@O<- v-(s=] [gL~=

123

(3 >

ONI—ONM78“0

o w At

w >oe - ~

062

TSHD14:

XS2XADEVICE TRIGGER INTERFACE FUNCTION TESTAN/

L10043:

TRAP

CSETST

N
HARDWARE TESTS MACRO M1113 06-SEP=82 16:46
TEST 15: INCOMPLETE SOURCE WANDSHAKE TEST

5625

LSBTTL

56 g

SEQ 143

PAGE 57

TEST 15: INCOMPLETE SOURCE HANDSHAKE TEST

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

?658

:PART 1 CHECKS THE INCOMPLETE SOURCE HANDSHAKE OF CHANNEL 1. SOURCE MANDSMAKE

IEX = TEST 1

gggg

ggfgcgg; 2§‘E?s?gzé:° THE DATA TRANSFER, BECAUSE CHANNEL 2 IS NOT

§631

:PART 2 CHECKS THE INCOMPLETE SOURCE HANDSHAKE OF CHANNEL 2. SOURCE HANDSHAKE

5636

;t"t.Qt..t""'Qt"Q"""""""t't"'."'QQ'Q'"t"'.'t""""'."'.".

563
563

5635 o«aogs
0440
5636 044022
5637 044026
5638 044030
044030
044034
044040
044042
044044
5639 044050
5640 044056
5641 044060
5642 044064
044064
5643 044066
5644 044074

5645 044102
5646 044110

;
:

BGNTST

005737
001410

002324

012746
012746
010600
106417

044724
000001

062706
005037
004737
004737

000004
002322
010220
010534

104404
042777
012737

000010
000001

112777 000212
012703 000002
47 044116 020337 002314
5648 044120 001410
5649 064122

020337

002312

5651 044130
5652 044134

062703
010337

000040
002412

5650 044126

001405

5653 044140 000402

136160
118:

5656 044146
5657 044156

113777
004737

002412
011060

136122

108:

5664 064216

012737

040000

002500

20$:

5658 044160 112777 000013 136102
5659 044166 112777 000125 136102
5660 044176 004737 011060
5661 044200 017737 136044 002402
5662 044206 022737 040000 002402
5663 044214 001413
5666 044232
044232

044236
044236
044240
5667 0446242
046242
5668 044244
5669 044252

013737

002402

:CLEAR ITERATION COUNT
*CLEAR ULPA BIT IN ISR
SSET UP PARAMETER

BIC
MOV

#10,3CSRX
#1,CHAN

;SELECT CHANNEL 1
‘LOAD CHANNEL NUMBER

CMP

R3.DPA2

MOVB
MOV
BEQ

002502

#212,31CRHX
#2.R%

#40,R3
R3,MLA2

INC

B8R

208

118

MOVB
JSR

MLA2,3I1DRHX
PC,LO0P

MOV

#40000, GOOD

MOV

#1%,31CRHX
#125,31DRHX
PC,LO0P
al [RX,RSAVE
#40000, RSAVE
30
RSAVE
, BAD

ERRSOFT 1501,€501,ERRSO1

CKLOOP
136006
000002

002402
002402

308:

MOV
CMP

31SRX, RSAVE
#2RSAVE

#4,SP

AND 2

TRAP

C$BSEG

10$

ADD
MOV

ADD

#TSHD15,=(SP)
#1,-(SP)
SP,RO
CSPNTF

tee==lOAD TON INTO ACR 1==cecccccccces
SGET A NONE EXISTENTS MLA
e

R3,DPA1

MOV
MOV
MOV
TRAP

10$

CMP

MOVB
MOVB
JSR
MOV
CMP
BEQ

104457
002735
005406
003702

104406
017737
022737

ITRCNT
PC,CULPA
PC.BGINT

BEQ

005203

5655 044144 000763

PNTF
7%
#TSHD15

7%:
CLR
ITAC1S: JSR
JSR
BGNSEG

136204
002374

IS NOT

115::
;1S THE PNT FLAG SET
SIF YES, PRINT rnE TEST HEADER
i

ST
BEQ
PRINTF

5654 046142

5665 0442264

DOES NOT OCCUR DURING THE DATA TRANSFER, BECAUSE CHANNEL 1
SELECTED AS LISTENER.

:CREATE MLA
;

;

jem——— LOAD HLAZ I ——
SWAIT A LITTLE

teceee LOAD GTS INTOACR l==eececceces
te===| 0AD DATA PA!TERN INTO DOR 1=====
SWAIT A LITTLE
SGET IIRT CONTENTS
PERR BIT IN I1IR REGISTER SHOULD BE SET
‘BRANCH IF YES
iSET UP DATA FOR ERROR MESSAGE
‘ERROR HANDLER

TRAP
CSERSOFT
.MORD
1501
+WORD
E501
WORD
ERRSO1
:BRANCH BACK TO BGNSEG 1r ERRLOOP 1S szx
RAP
CsCLP
:GET ISR1 CONTENTS
STADS BIT SHOULD BE SET

812
HARDWARE TE
TEST 15: IN

670

044

B671

MACRO M1113 oo-ser-o; 1?:66
ETE SOURCE WANDSMAKE
TES

1&1;

0S4l

§?DN
7 oot e

4
4
4
4

104457
7
4
702

675
00444
676

g‘r
12737

5674

677

044

680

044

678
679
681

682

5683

17737

0024

044

13737

002402

044
044
044

104457
oogrsr
005447

044

824
044

oossoo

104406

044364

104405

BIS
MOV

#10,3CSRX
#2,CHAN

ST
BEQ

RSAVE
50%

MOV

set UP DATA FOR ERROR MESSAGE
‘ERROR HANDLER

TRAP
.WORD
.uoao

sssasovv

£50
ERRS01

:BRANCH BACK TO BGNZEG IFE:RLOO:’éf’SEV

sSELECT
CHANNEL 2
SLOAD CHANNEL NUMBER

2l SRX,RSAVE

*GET ISR2 CONTENTS

‘ISR REGISTER SHOULD BE ZERO
‘BRANCH IF YES

GOOD

MOV

508:

ser UP DATA FOR ERROR MESSAGE

RSAVE gno

ERRSOFT 1503,£502,ERRSO1

‘ERROR WANDLER

CKLOOP

"WORD
ERRSO1
:BRANCH BACK TO BGNSEG lr ERRLOOP IS SET
TRAP
CSCLPY

ENDSEG

100008
:

TRAP
LWORD
.uoao

CSERSOF Y
1503
£502

TRAP

CSESEG

(444ccccccccccccccccccccccccccccccccccccccce
e e e e e e e e s eecccccccccccasacan

SPART 2 OF THE TEST

STHIS PART CHECKS THE INCOMPLETE SOURCE MANDSHAKE OF CHANNEL 2
R

689 044366

690 064372

691 0464376

044376
064400

693 044406

004737

5695 044420
99
00

044434
044440

000010

020337

002314

112777 000212

5702
703

044bé
044450

044bbs

704 044452

Srg;
010337

00040

oos;o
00 9

113777

705 044460
706 0444
707 044472

0047;7
1157 7
112777

711 064520
712 044522

0 141;
ovgrs

PSEUS:

135672

135654

118:

000040
002410

01106
000013
000125

BIS

#10,3CSRX

:SELECT CHANNEL 2

(MNP

BGNSEG

MOV

BEQ
CMP
BEO
BR

PC.BGIN2

#212,3ICRHX

. RS

DPA2

o
R3,DPA1
10$

#40,R3
R3, MLAY

zg(

SSET UP PARAME TER

TRAP

C$BSEG

eeee LOAD TON INTO ACR 2=eeccccccccces

cev A NONE EXISTENTS MLA
;

i
Bas

SCREATE MLA
:

;

INC
BR

R
11%

;
;

135576
135576

JSR
MOVB
move

PC,LOOP
01% alcaux
#2§8 aloanx

SWAIT A LITTLE
PR LOAD GIS INTO ACR 2==ecececccceen
=== 0AD oAtA PATTERN INTO DOR 2=====

002500

BEQ
MOV

135616

708
044500
004737 011260
709
044504
3177
7 135540 8° 40
710 4515 527 7 040000 00240

040000

:CLEAR ULPA BIT IN ISR 1 AND 2

ADD
MOV

108:

PC,CULPA

MOVB

002312

002410

JSR

010710

104404
052777

5696 044424 801419
5697 044 g
20337
5698 044b
1405

010;20

94 044414 81 7g; 000002

701

CKLOOP

CLR

002502

sgga

692

:BRANCH IF YES

,8
GOOD
e,

ERRSOFT 1502,£502,ERRSO1

003702

044

408

MOV
B

g 002402

05737
oo1a1;

gog

BEO

o1g
13 792 408:
9
002374

044
044

5684 044
4
5685

haca

SEQ 144

PAGE 57-1

044530 013737 002402 002502

208:

MOVB
JSR
MOV
CMP

MOV

MLA1,alDRHX

LR'
nsnve
000, RSAVE
oaoooo GOOD

RSAVE ,BAD

pP—— LOAD HLA1 INTO DOR2====eececcaccccas
LITTLE
SGET
1IR2
CONTENTS
SERR BIT IN IIR REGISTER SHOULD BE SET
TWAIT A

‘BRANCH If YES
SSET UP DATA FOR ERROR MESSAGE

WA
1€

06-SEP-8

HAND SHAKE

1?:66
ES

NSNS

OOO? W)
338833
=N~
~N &> W\fl-fl\hmg W
NN
SESS SRENNNE SENS 3

cocooo

00000

808202

308:

802602 005302

ERRSOFT 1504 €501 ,ERRS01

;ERROR HANDLER

C(xLOOP

WORD
15
E501
+WORD
ERRS501
.WORD
sBRANCH BACK TO BGNSEG IF ERRLOOP [S SET

MOV
CMP

1SRX , RSAVE

8EQ

sTADS BIT SHOULD Bt SET
sBRANCH IF YES

ERRSOFT

??ogftgag.eaa501

sERROR HANDLER

OZ‘GOOD

0024

BIC

MOov
MOV
1ST

BEOQ
CLR

002500
002402

#10,3CSRX

#1,CHAN

a1SRX, RSAVE
RSAVE

50%

ckLOOP

123

104401

EXQv15:

062

TSHD15:

d”
X

W
=t =4 N

al Yalal

044054

TRAP

sSELECT CHANNEL 1
:LOAD CHANNEL NUMBER
sGET ISR1 CONTENTS
s ISR REGISTER SHOULD BE ZERO
sBRANCH IF

CSERSOFT

1505
ES502
ERR501

csCLP

YES

:SET UP DATA FOR ERROR MESSAGE

‘ERROR MANDLER

10001$:
e Ldaal
T la X =]
)
=t D =l =t I <
-“-PODOVOV

002320

cscePt

sSET UP DATA FOR ERROR MESSAGE

ENDSEG

&»H

333333

002322
002322

TRAP

(SERSOFT

TRAP

cscLPl

TRAP

CSESEG

.WORD
1506
.WORD
ESO2
ERRSO1
.WOR
IS SET
ERRLOOP
IF
BGNSEG
TO
:BRANCH BACK

Oddge 00544

002234

(35250'!

sBRANCH BACK TO BGNSEG I;RESRLOOP IS SET

600D
MOV
RSAVE ,BAD
T 1506,€502,ERRS01
ERRSOF

50%:

TRAP

.WORD
.WORD
.WORD
0

(kLOOP

40%:

;GET ISR2 CONTENTS

#2 ,RSAVE
408

MoV
MOV

o=
00

OO0
=00

13333

135505

SEQ 145

PAGE 57-2

—_p

8382
WD

PEN SRR —Y 3;

g’

TMM

m=R

—

own

HARDWARE 1
TEST 15: 1

¢ 1

;1S QUICK VERIFY PASS SELECTED
:I1F YES EXIT TEST

» I TRDEF

:ITERATION COUNTER +1
:DEFAULT ITERATION EXECUTED
s1F YES EXIT TEST
*1F NO TEST ITERATION

TRAP

CSEXIT

WORD

L10044~,

TRAP

CSETST

BEX

6:32!A1N(0HPL51£ SOURCE HANDSHAKE TESTIN/

L10044:

D12
MARDWARE TESTS

SEQ 146

06-SEP-8 2 1 6:46

PAGE S8
TEST 16: CHMANGING OF THE CONTROLLER CONF 1GURAT JON
MACRO M1113

LSBTTL

TEST 16: CHANGING OF THE CONTROLLER CONF IGURATION

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

;

:PART 1

1EX = TEST 16

CHECKS THE CHMANGING OF

THE CONTROLLER CONFIGURATION FROM 1

;

BY MEANS OF THE AUXILIARY COMMANDS RGC AND RLC.

:PART 2 CHECKS THE CHANGING OF

T0 2

THE CONTROLLER CONFIGURATION FROM 2 T0 1

&N
-

SRYUNR L8338 oo

ONs

Nbfl:b sbNg
NO~N Ng
N =N

PNTF

16::
;1S THE PNT FLAG SET

PRINTF

#TSHD16

CLR

1TAC16: BGNSEG

01080
000001

000001

38:

#40,31SRHX
#10.3CSRX

teceeeSET UCG BIT IN ISR 2=ccccccccces
SSELECT CHANNEL 1

#100,R1

OWVC ===
=0 ==
=2O0ONOCO—=O0CONHroO

PC.BGINT
#1.DPA2
$
#1,CDAT10

#1,CDAT10

#22%,31CRmx
DPAZ,R1

R1,MTA2

‘SET UP PARAMETER
‘1S DPA EVEN
:BRANCH
IF YES
:SET ULPA BIT IN COMPARE DATA FOR ISR

iecees LOAD DA] INTO ACR 2-==eecccccces

SCREATE MTA?2
:STORE MTA2

MOVB
JSR
MOVB
JSR

MTA2,alDRHX
PC,LOOP
01{.a|ogux
PC,LOOP

teeeeal 0AD MTA2 INTO DOR le=cccccccces
TWAIT A LITTLE
{eccee LOAD TCT INTO DOR l=eeeeee S——
SWAIT A LITTLE

MOV

#2,CHAN

SLOAD CHANNEL NUMBER

BIS

MOV
CMP
BEQ
MOV

MOV

002500

($BSEG

*BRANCH OVER NEXT INSTRUCTION
:CLEAR ULPA BIT IN COMPARE DATA FOR [SR
SSELECT CHANNEL 2

MOV

OO0
-y

002456

TRAP

CSPNTF
#6,5P

.+10
10, aCSRX

ADD

108:

;CLEAR ITERATION COUNTER

TRAP
ADD

#TSHD16,=(SP)
#1,-(SP)
SP,RO

B8R
BIC
8IS
MOV

002502

MOV
MOV
MOV

:CLEAR ULPA BIT IN ISR 1 AND 2

MOVB
BIC

002502

[TRCNT

PIF YES, PRINT THE TEST WEADER

PC,CULPA

MovB

o
O=O000
o
W OO —O
o
o
O=O
own
= WNOO
VWO OoOO o0 O

135012

002456

JSR

JSR
BIT
BEQ
BIS

O
oo
W

= = YNNNNW
NNWNNNNYN NNNN

O N =N &~
Nw=ro~NNn
SN WO MNIWNININININI
NNSNN SNNNNNN=NNNNNNNESNS NNNES
NN
= NN N NN NN NWO O NNNNWO

OO —==000000

——t4 b PN —d = NSO
WVO WS
22=
-t

ON) = = N

O00O0000O0—-O

7%:

OO o0
W&
&
O
-

O00=

—-ON=0O
W= NN

181

BEQ

NN
N

23222 88

BGNTST

COO00O=

& SRERRERSS FORBRNINERSERNSro gONNN

RRERRRIR\RR 2LAR R R R R R R R R R R R RRRRRRRRRRRRRRRRRRRR

5787

AWV ANV
S5
VYAV WA VT
AT VAV VWA VWAV
CONN~N
roronuNURUrORORONONY PNONONINUN) = =2 — e e e e e e e e e O O
owne
s
= O~
AP BN BN NN NN NN
oo
oconNON
NOO SO0
S
or0O0 o snooccoOnNON

& g?

NNNS

VAWMV
WA AWV
VAWM WVWAWAVWVWAWVIWAWWAL.
NNNNNNNNNNNNNN NNNNNNNNNNNN
oo
oo
0o 0o 0o
NNNNNNO
W=
W

oW
OV

OWN

:"'"'.'"'."""""""""'."."Q..'.."..OQ."Q'Q""'Q"QQ""""""

#10,3CSRX

al IRX,RSAVE
#22501,RSAVE
108
asavs BAD

#22501, Goop

SSELECT CHANNEL 2

SGET IIR2 CONTENTS
SUCG,MA,IFC,INT1,MAC BIT SHOULD BE SET
‘BRANCH IF YES
‘SET UP DATA FOR ERROR MESSAGE

ERRSOFT 1601,E501,ERRS01

*ERROR HANDLER

(KLOOP

1601
MORD
ESO1
.WORD
ERRSO1
.WORD
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET

MOV

31SRX ,BAD

:GET ISR2 CONTENTS

BEQ

208

‘BRANCH If YES

(MP

MOV

CDAT10,BAD

(DAT10,G0OOD

TRAP

CSERSOFT

TRAP

CS$CLPI

*ATN,NDAC ,DAV,NRFD,ATN,
TADS, (ULPA) IS SET

*SET UP DATA FOR ERROR MESSAGE

"
1

E 12
HARDWARE TESTS

TEST

16:

5792

MACRO M1113

CHANGING OF

065264
5064
0465266

7g
7

snsgék

06-SEP=B2 16:46

THE CONTROLLER CONF IGURATION

ERRSOFT 1602,E502,ERRSO1

104457
00310;

§798

065314

045

04532¢
045326
045
5799 045332
5800 045340

012737

000011

(KLOOP

ssoi 0653564
5803 045362
5804 045370

112777
055777
01 7;7

000022
000010
000002

134706
134710
002374

5806 045406
5807 065412
5808 045414

022737
001410
012737

000020

002502

065622
045426
o«scge
045430
5810 045432
0454
5811 045434
5812 045442
5813 045450
5814 065456
5815 045464
5816 065466

104457
003104
005406
003702

0456476
045476
045500
045502
5818 065504
045504
5819 045506

104457
003105
005406
003702

104406
052777

000010

5821 065522
5822 045526
045526
. 045526

004737

011060

5817 045474

5820 045514

042777

017737

104406
042777
012737
017737
022737
001410
012737

112777
104405

3352

5826 065530
0645530

BEQ
MOV

104404

000010

134646

000020

.WORD

308:

134724

31CRX,BAD
#11,BAD

SBRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE

*ERROR WANDLER

MOVB
MOVB

#21,31CRHX
#1,31CRHX

MOVB
8IS
MOV

#22.31CRHX
#10,3CSRX
#2,CHAN

;=== 0AD RLC INTO ACR lececccccccccccs R
SSELECT CHANNEL 2
*LOAD CHANNEL NUMBER

#10,3CSRx

alirx,BAD

CMP
BEQ
MOV

134636
002374

SGET IIR2 CONTENTS

ngo.auo
33¢
#20,600D

‘B0 BIT SHOULD BE SET
‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE

ERRSOFT 1604 ,E501,ERRSO1

000020

002500

338:

SERROR HANDLER

#10,3CSRX
#1,CHAN
alirx,BAD
#20,BAD
408
#20,600D

TRAP
CSERSOF
T
LWORD
1604
.WORD
ESO1
.WORD
ERRSO1
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
cscLPt
;SELECT CHANNEL 1
‘LOAD CHANNEL NUMBER
SGET IIR1 CONTENTS
:B0 BIT SHOULD BE SET
:BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE

BIS

#10,3CSRX

TRAP
CSERSOF
T
.MORD
1605
.WORD
ESO1
.WORD
ERRSO1
:BRANCH BACK TO BGNSEG IF ERRLOOP !S SET
TRAP
($CLPI
;SELECT CHANNEL 2

JSR
ENDSEG

PC,LOOP

TWAIT A LITTLE

BIC
MOV
MOV
CMP
BEO
MOV

002502
002502

ERRSOFT 1605,E501,ERRSO1

:ERROR MANDLER

(KLOOP

000137

134564

134554

40%:

.' (XX

MOVBE

TRAP

SSELECT CHANNEL 1

CKLOOP
000010
000001
134574
000020

ERRSO1

(CSERSOFT
.WORD
1603
.WORD
E901
.WORD
ERRSO1
;====L0AD RGC INTO A(R 2ecceccccces coccceee
teeee{ 0AD NOT DACR INTO ACR 2e===- coccea

MOV

002500

ESO

:GET ICR2 CONTENTS
S1CR CONTENTS SHMOULD BE 11

308
#11,600D

BIC

002502

CSERSOFT
120

wnmnnutoummlhguwagfin

ERRSOFT 160%,E901,ERRSO1

104457

134730
1§4722

5809 045422

MOV
CMPB

002500

000021
000001

5805 045376

TRAP
.WORD

.WORD

702

003103
005644
oosro;
112777
112777

5801 045346

:ERROR WANDLER

882“

5794
76 017789 134762 002502 20%:
§795
065304
1827 7 000011 305505
799 0465312
8 1427
797

SEQ 147

PAGE 58-1

#13%,31DRHX

100008:
T

mwe o ®> oo oSsooeoeoes e S

*PART 2 CHECKS THE

CHANGING OF

MEEEE

T LT T Ty D

PSEUT6: BGNSEG

teeeea LOAD UNT INTO DOR 2=e=eccecccccccs

THE

S B SEHE RS ED DO

TRAP

OE RS ®Ee DD ®

CSESEG
DWW

CONTROLLER CONFIGURATION FROM 2 10 1

TRAP

($BSEG

TEST

16:

CHANGING OF

THME CONTROLLER CONF JGURATION

827

8 g §E

064737

8
4
8
82 z
831
045

001

002312

58 i 045560

%7 7
4
087 7

0004 ;

000001

002456

saga 045570
S835 045576

062737

042777
112777

000001

002456

000040

134450

5833

045562

5836

045606

838

045616

062612

0N
737 §a§;i8

112777

8; 701
701

000010
000223

010137 002414
osir 7
ogovo
113777
02614
oocr;r 011060
112777 000011
ooar;r 011060
062777 000010

5847 0456764
SB4B 045702

017737 134350
022737 022501

5849 045710

01 7gr

001413

134502
134464

#1,CDAT10

MOVB

#40,8]SRHX

BIC
MOVB

#10 aCSRx
czsi,alcnux

oPAf R

#100 . R1

00240
00240

MOV
cMp

alirRxX ,RSAVE
lZZSOf.RSAVE

002402

002502

5856 065754
5857 045756

001410
013737

045764
045766
045770
045772
5859 045774
065774

104457
003107
005447
003702

5861 046006
sao; 046012
5863 046014

122737
001407
012737

046022
046024
046026
046030
5865 046032
5866 066040

104457
003110
005644
oosro;
112777
112777

000021
000001

134230
134222

5868 046054
5869 066062

115777
042777

000022
000010

134306
134210

MOV
BEQ
MOV

002500

#1,CHAN
10%

134312

002502

002456

002500

002502

000011

002500

5867 046046 052777 000010

134224

SCREATE MTA1
R

SSTORE MTA1
SSELECT CHANNEL 2
;je==e=|
0AD MTAT1 INTO DOR 2eccccccccccs
SWAIT A LJTTLE
tecees 0AD TCT INTO DOR 2ecccccccccces
SWAIT A LITTLE
SSELECT CHANNEL 1
SLOAD CHANNEL NUMBER

SGET IIR1 CONTENTS
:UCG,MA,IFC,INTT1
MAC BIT SHOULD BE SET

S1SRX . BAD

BEO
MOV

208
CDAT10,G0O0D

*BRANCH If YES
:SET UP DATA FOR ERROR MESSAGE

CMP

CDAT10,8AD

MOV

(MPB
BEQ
MOV

al1CRX,BAD
#11,BAD
308
#11,600D

ERRSOFT 1608,E901,ERRSCY

308:

teceeeSET UCG BIT IN ISR lecccccccccas

MOV

ERRSOFT 1607,£502,ERRSO1

134262 002502 20%8:

SSELECT CMANNEL 1
je==ee 0AD DA] INTO A(R leccccccccccea

TRAP
(SERSOFT
.WORD
1606
.WORD
ESO1
.WORD
ERRSO1
;BRANCH BACK TO BGNSEG IF ERRLOOP [S SET
TRAP
cscLP
:GET ISR1 CONTENTS

(xLOOP
000011

SCLEAR ULPA BIT IN COMPARE DATA FOR ISR

SBRANCH IF YES
JSET UP DATA FOR ERROR MESSAGE

MOV
#22501, GoOD
ERRSOFT 1606,E501,ERRSO1

108:

;s§$ UP PARAME TER

RSAVE ,BAD

(KLOOP

5855 045746 023737 002456 002502

5864 066022

*BRANCH OVER NEXT INSTRUCTION

BIC

134412

002374

104406
017737

5860 045776 017737

Lof

:1S DPA EVEN
SBRANCH IF YES
:SET ULPA BIT IN COMPARE DATA FOR ISR

MOV

134422

104457
003106
005496
003702

106629

3%:

134444
134434

045726
045730
065722
04573¢
5853 045736
045736
5854 0645740

5858 045764

#1,0PA1
3s
" 3”"0

R1, MTA1
#10,aCSRx
HTA' o IDRHX
PC,LOOP
#11,310Rux
PC,LOOP
#10,3CSRx

020001

022501

:CLEAR ULPA BIT IN ISR 1 AND 2

BIT
BEO
BIS

PC.BGIN2

MOV
8IS
[ [0]"]:]
JSR
move
JSR
BIC

013737

012737

PC,CULPA

ADD

5850 045712

5851 045720
$852 045726

JSR

00010

5839 045622
5840 065626
5841 0426
zaai 0465642
843 045646
5844 0656564
5845 045660

5846 045666

e
*ERROR MANDLER

*ATN,NDAC,DAV,NRFD,ATN,
TADS, (ULPA) IS SET
*ERROR HANDPLER

TRAP
CSERSOFT
LMORD
1607
.WORD
ES02
.WORD
ERRSO1
:BRANCH BACK TO BGNSEG IfF ERRLOOP IS SET
TRAP
cscLPt

:GET ICR1 CONTENTS

SI1CR CONTENTS SHOULD BE 11
‘BRANCH [F YES
:SET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

MOVB
MOVB

#21,31CRHX
#1,31CRHX

CSERSOFT
TRAP
.MORD
1608
£901
.WORD
.WORD
ERRSO!
;e===L0AD RGC INTO A(R loeecececccccccnen
teee={0AD NOT DACR INTO ACR l=eeeccccce-

MOVB
BIC

lzg.al(nnx
#10,3CSRX

teee= OAD RLC INTO A(R 2=eecccccccccccccnnn
SSELECT CHANNEL 1

8IS

#10,3CSRx

SSELECT CHANNEL 2

Q 148

WARDWARE TESTS MACRO M1113 06-SEP=B2 16:46 PAGE 58<2

—

F 12

612
WARDWARE TESTS
TEST

16:

5870

CHANGING OF

046070

06-SEP-B2 16:46

MACRO M1113

THE CONTROLLER CONF IGURATION

§1;7§7
17737

000001

1 6168

2737

00002

1273

000020

O
=W W=
WWNO N
Og
OMNIN
NONNNNOY

141

002500

5895 046256
046256
046260
5897
5898 046262
5899
5900
5901 046342
0463462
046342

cmp

#20,BAD

M oV

ERRSOFT

33%:

000010

BIS

000020

MOV
MOV
CMP

000020

MOV

WOWW=W
NNINNO NV

:ERROR MANDLER

002234
002322

002322

002320

045030

EXQGV16:

123

062

TSHD16:

TRAP

CSERSOFT

TRAP

cscLPl

1609
ESO1
ERRSO1
IS SET
ERRLOOP
IF
BGNSEG
:BRANCH BACK TO
#10,3CSRX

:SELECT CHANNEL 2

a3l IRX,BAD

:GET IIR2 CONTENTS

#2,CHAN
#20,BAD

16010,E501,ERRSO1

1ST
BNE
INC

:SET UP DATA FOR ERROR MESSAGE

LWORD
WORD
.WORD

T
ERRSOF

JSR
ENDSEG

B0 BIT SHOULD BE SET

1609,£501,ERRSO1

#20,G00D

40%

BIC

SGET IIR1 CONTENTS
:BRANCH IF YES

BEQ

mMove

:LOAD CHMANNEL NUMBER

338

#20,G00D

:LOAD CMANNEL NUMBER
:B0 BIT SHOULD BE

:BRANCH IF

YES

SET

:SET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP

CSERSOFT

LWORD
WORD
.WORD

16010
ESO1
ERRSO1

TRAP

cscLPl

:BRANCH BACK TO SGNSEG IF ERRLOOP IS SET

CKLOOP
40%:

104401

a &nx.aao

(kLOOP

O W
NN

589

#1,CHAN

BEQ

5891 046236

MOV

003702

5886
2
5887 046222
5888 046226
046226
066226
5889 046230
5890 046234

SEQ 149

PAGE 58-3

#10,aCSRX

.13’.al°a"'
PC,LOOP

:SELECT CHANNEL

Jemeee LOAa UN‘
SWAIT A LITTLE

INYO oon 1---—-- ..... coe
10001$:

QvP

EXQV16

[TRCNT
ITRCNT, I TRDEF
EXQV16
#;?(16

TRAP

;1S QUICK VERIFY PASS SELECTED

CSESEG

:1F YES EXIT TEST

:ITERATION COUNTER +1
SDEFAULT ITERATION EXECUTED
:1F YES EXIT TEST
:1F NO TEST ITERATION

TRAP

LWORD

CSEX]T

L10045~.

BEX

6gszzucnnnoluo OF THE CONTROLLER CONFIGURAT]IONIN/
X

L10045:

TRAP

($ETST

W12
ARE

TESTS

MACRO M1113

06=SEP=B2 16:46

?@2?“175 !E=OIEILO(AL INTERFACE FUNCTION TEST
~

TEST

2382
383

= TEST 17

SPART 1 CMECKS taslkiflogéllag?t.;BNCtlON OF CHANNEL 2 USING THE FOLLOWING
‘PART 2 ES??:§°§“? kflb%glLOCAL FUNCTION OF CHANNEL 1 USING THWE FOLLOWING
-

gg?g

012746
012746

523
;gt'
PRINTF #TSHD17

050644
000001

s el
09
822366
62‘§‘
000004
5915 o«ogrz oogogg 002322
7*; ey gt:SEG 1TRCNT
poes 8223;2 104404
it
3918 Ococ0e 00737 10530
3R
pebeing
2&3&&% 112777 000220 133652
MOVB p%agmx
sgz? 822253 8?3;3: 85%%:2
‘33
ogiz.a1
2952 046426 062701 000040
ADD
#40,R1
iz
010137
002412
MOV
R1,MLA2
2952 Suse
737 000001 002314
BIT
#1.0PA2
3958 Ocooes Sa%a1
BEQ
3’
gggg &fi:g 8?5?%? 000001 002460
BIS
#1,(0ATIN
5927 046456

052737

000001

002462

8IS

OI.CDAT1§

svsg 046506
§933 066514

042737
062737

000001
000001

002462
002464

BIC
BIC

c}.co:}li
#1.0D
;

R
poy gmn gl
3331 822?33 82%?%? 000001 002460 3$:464

BEahg
o el WgE
2339 822323 833;;; 8358?8 133530
gggg 8:2232 8};;§; ?22225 885253

046622

104457

017737

023737

go&? 8626%5 001410

nen
#1,C0ATI
i
1
#1.CDATY

N DSl
:iézagaax
alirx,BAD

fi?:
:S:OS.GAD
?235051 :;3??628??saa501

Jeoone o2
gigel 10“29
wsne
5944 8:2212
5945 046614

ft
gl(

8IS

é?g
:83

232?
822293 85%1?5 Do
282% 822253 WIET SN W
046602

BGNTST

308 Ded3eo OO?Z?S P
23}4 82233? w
046352
046356

E""."sm:?ee'?:&;'&%?:'?gzQEIE;'."".'..'.'Q."'."""...".""Q"'""

5911 822 22

946

SEQ 150

PAGE 59

133436

002502
002502

108:

MOV

(MP

BEQ

FLAG

SET

mov
mov

TRAP
tER‘DD
:CLEAR ITERATION COUN

g1sw017
.ot

CSPNTF
8 ,SP
.
'1::: ; ($83E6

o IN
L
A Tk
mnrfiyfinlmonnbunnunn
SCREATE MLA2
R
1STORE
*1S
DPAMLA2
EVEN
*BRANCH [F YES
sSET ULPA BIT IN COMPARE DATA FOR |SR

:CLEAR ULPA BIT

deese

=
SCLEAR
ULPA BIT IN COMPARE DATA FOR [SR
_—
e

:
oo

AR —
EESkgczugza??EL 2 ggitlgéaslgozliugf' Nosiigmgan. +

;

3225“‘2'62:i‘§oa
ERROR MEo
SSAGE i
*ERROR HANDLER

(SET

.WORD £501
330
;BRANCH BACK TO st BGNSEG 1fLERRLOOPTihont15
s

CKLOOP
002660

E{? 5?§.Pgax~% $u551551 HEADER
il
o
s

OISRI‘BAD

(DAT11,BAD

208

:GET 1307
ISR2 CONTRNTS
CONTENTS
IRRY
SATN,

AN,

‘BRANCH If YES

L es cmtmait 800

112
HARDWARE TESTS

MACRO M1113

06-SEP-B2

16:46

TEST 17: REMOTE/LOCAL INTERFACE FUN(Y%ON 1[2!
9948 066635
5949 04664

013737

002460

002500

-s

MOv

T
ERRSOF

1046457

CDAT11 8°°°

1702,6502,ERRSO1

003246

S28=®

- NONNO NOON NONNNNNNNN-‘—‘N& NO'NN NONNNNNYNY ~

133420
133410

208:

2 S
W
W= WNES

NEOENNE
W=
WO

NS
VIV

005447
003702
104406

#10,3CSRX
#1,3IDRHX
P; LOOP

SWAIT A LITTLE

PC,LOOP

sWAIT A LITTLE

#10,3CSRx
#2,CHAN

aiinx.auo

000003

MOV

ERRSOFY

30§

BAD

3 gooo

17036501, ERRSO1

ckLOooP

133314

30%:

BIC

133270

DPAZ,R1

#2,CHAN
#7.31CRHX
aliRX,BAD
0§oos.ano

002502

002003

#10,3CSRX

#10,3CSRx

133260

002500

MOV

ERRSOFT

sSELECT CHANNEL 1
:------LOAD

:------LOAD

GtL

UNL

338

#2003, GOOD

1704 ,€501,ERRSO1

Doa

1-------.------

l“to

DOR

10-------------

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
sGET 1IR2 CONTENTS
sRi.C,MAC BiT SHOULD BE SET
sBRANCH !F YES

sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER
TRAP

002462
002462

002500

33%:

1703
ES50!
ERR501

sSELECT CHANNEL 1
sCREATE MLA2

TRAP

cscLpPt

:STORE MLA2
:----LOAD

"LAZ

l"'o

DOR

' .......... -

JWAIT A LITTLE

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
;----LOAD

NOT

R'L

sGET IIR2 CONTENT
sMA_RLC,MAC BIT

lN'o

DOR

SHOULD BE

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

SET

sBRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER
TRAP

(SERSOFT

1704

ESO!

:BRANCH BACK TO BGNSEG I;REERLOOP 1S SET

CsCLP

MOV
(MP

21SRX .BAD

sGET ISR2 CONTENTS

BEQ

MOV

408

ERRSOFT

CDAT12,GOOD

1705,£502,ERRSO1

sBRANCH IF YE
sSET UP DATA FOR ERROR MESSAGE

(kLOOP

T
CSERSOF

.WORD
.WORD
.WORD

~WORD

(xLOOP

002502
002502

cscLP

l~ro

WORD
WORD

133160

C’SRSO'!

;BRANCH TO BGNSEG IF ERRLOOP IS SET

#40,R1
R1,MLA2
MLAZ ,3]1DRHX
PC,LOOP

NN
OOV

PO
= = SN
=
O — 5o
LS
NENT NN NP AV [« ] NIV N

NP NNNNNNNSSNNNS
W= WIWNWNWNWO
O N

O0O0O0=0O0O—=O000
-

O==
OO0O0O0-=
OOS
OO0
=O0ON=0
OO

5977 047060
04706
047062
047064
047066
5978 047070
047070
5979 047072
5980 047100
5981 047106
5982 047110
5983 047116
047116
067150
047122
047124
5984 047126
047126

TRAP

17
ES0
.WORD
ERR501
;BRANCH BACK TO BGNSEG l;.ERRLOOP IS SET

#7%,31DRNX

WWVHNES
NSNS
OOV

OCO0O—=
OO0

5955

000010

N =NONNON
NS NNNNNSN -~
W NWWNNW ~N\

15 s

sSET UP DATA FOR ERROR MESSAGE
sERROR MANDLER

LWORD
.WORD

(xLOOP

OO0O00O0O0O—
=ON===w

066646
5950 046650
046650
5951 066655
9952 04666

SEQ 151

9-1

CDAT12,BAD

sATN,NDAC ,REN,ATN,LPAS ,LADS(ULPA) IS SET

sERROR HANDLER

sBRAN(CH BACK

TRAP

WORD
.WORD
.WOR

(SERSOFT

170%
E502
ERRS0!

TO BGNSEG IF ERRLOOP IS SET
TRAP
($CLP

J 1

SEQ 152

HARDWARE TESTS MACRO M1113 06-SEP=-82 16:46 PAGE 59-2
TEST 17: REMOTE/LOCAL INTERFACE FUNCTION TEST

S985 047130

5939 o«71§6 042777
113777 000010
002418 133142
1%?135 408:

BIC

#10,3CSRX

5990 047164
§991 047172
soog 047176

0327 7
0 1419
012737

JSR
BIS
MOV

MLAZ,al1DRWX

;SELECT CHANNEL

5987 047144 oo«r;r 81 06
§988 047120 05;7 7 ggoao 13318
5989 047156 O1 7§7 133066 oogs

MOVEB
CMP
BEQ
MOV

PC,LOOP
#10,3CSRx
3l IRX,BAD

#2002 ,BAD
43$
#2002, GOOD

SWAIT A LITTLE
SSELECT CHMANNEL 2
SGET IIR2 CONTENTS

‘MA,RLC BIT SHOULD BE SET
‘BRANCH [F YES
SSET UP DATA FOR ERROR MESSAGE

04720
047204
047206
047210
5994 047 15
047212
5995 0472164

104457
003252
005406
003702

047240
047242
047246
047246
6000 047250
047250
6001 047252

104457
003253
005447
003702

6003 047266
6004 oargrz
6005 047300
6006 047306
6007 047312
6008 047314
6009 047320

004737
052777
017737
005737
001407
005037

599 04.7%05

104406
017737

002002

00250

002002

002500

133036

002502

6002 047260

112777

047320
047322
047324
047326
6010 047330
oar;so
6011 0647332

104457
003254
005406
003702

047356
047360
067362
047364
6016 047366
oargee
6717 067370
601R 047376
6019 047404

104457
003255
005447
003702

104406

017737

004737

000010

000021

011060
000010
132744
002502

133020

133010

004737

S508:

133000
002502

002500

BIC

#10,3CSRX

TRAP
CSERSOFT
LMORD
1707
.WORD
ES02
.WORD
ERRS01
:BRANCH TO BGNSEG IF ERRLOOP IS SET
TRAP
C$CLP1
sSELECT CHANNEL 1

JSR
BIS
MOV
ST
BEQ
CLR
ERRSOFT

PC,LOOP
#10,3CSRx
al IRX,BAD
BAD
53¢
GOOD
1708,E501 ,ERRS01

TWAIT A LITTLE
SSELECT CHANNEL 2
SGET IIR2 CONTENTS
SCONTENTS SHOULD BE ZERO

a1SRX,BAD

CSERSOFT
TRAP
.WORD
1708
ESO1
.WORD
ERRS01
.WORD
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
(SCLPY
TRAP
:GET ISR2 CONTENTS

*ATN,NDAC ,REN,REM,LLO,ATN,LADS(ULPA) SET
*BRANCH If YES
:SET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

JSR

#10,3CSRX
#1,31DRHX
PC ;LOOP

CSERSOFT
TRAP
1709
.MORD
.WORD
ES02
ERRSO01
"WORD
:BRANCH BACK TO BGNSEG If ERRLOOP 1S SET
CSCLPY
TRAP
:SELECT CHANNEL 1
tee=el0AD GIL INTO DOR l=eeeececcccas
SWAIT A LITTLE

JSR

PC,LOOP

TWAIT A LITTLE

CMP
CDAT”.BAD
BEQ
508
MOV
CDAT11,G0OD
ERRSOF Y 1707.5502.5“501

MOVB

#21,3]1DRHX

CKLOOP
132720

002502

53%:

MOV

CDAT1%,BAD
(MP
BEQ
60%
MOV
CDAT13,G00D
ERRSOFT 1709,£502,ERRS01
CKLOOP

000010
000001

011060

132702
132672

6020 0676410 112777 000077 132660
6021 0476416

31SRX.BAD

MOV

CKLOOP

6012 047340 023737 002466 002502
6012 047346 001410
6014 047350 013737 002464 002500
6015 047356

104403
042777
112777

43%$:

011060

60%:

*ERROR WANDLER

TRAP
CSERSOF
T
MWORD
1706
.WORD
ESO1
.WORD
ERRS01
:BRAMCH BACK TO BGNSEG IF ERRLOOP [S SET
TRAP
CS$CLPT
:GET ISR2 CONTENTS

CKLOOP

5996 047 iZ 023737 002460 002502
5997 047230 001419
§998 047232 013737
002460 002500
5999 047240

409
(042777

ERRSOFT 1706,E501,ERRSO1

ieccee 0AD MLAZ 1INTO DOR leccccccccceces

BIC
MOVB

MOVB

#77,31DRHX

sATN
_ NDAC ,REN,REM,ATN,LPAS,LADS(ULPA)SET
‘BRANCH If YES
SSET UP DATA FOR ERROR MESSAGE
JERROR HANDLER

e LOAD LLO INTO DOR leecccccccccccc=

‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE
:ERROR HANDLER

;====L0OAD UNL INTO DOR l===eescccccccs

K 12

WARDWARE TESTS MACRO M1113 06-SEP=82 16:46 PAGE 59-3

TEST 17: REMOTE/LOCAL INTERFACE FUNCTION TEST

eo%i 0474 5 §1 7;7 122622 ooggog

MOV

31SRX . BAD
#10,3CSRX

sSELECT

6026 047446

013737

MOV

cgn11t,ago
63

CDAT14,G0OOD

sATN,NDAC ,REN,LLO,ATN, (ULPA) IS SET
‘BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE

047456
047456
047460
047462
6028 047464
0474
6029 047466
6030 047476
6031 047502
047502
- 047502

104457
003256
005447
003702

6022

0474

6024 047436
6025 047444

6027 047454

52777

000010

13265

BIS

%37 7
0 1419

002466
|

00250

CMP
BEQ

104406
062777
112777

002406

002500

:GET ISR2 CONTENTS

ERRSOFT 1710,6502,ERRS01

132604
132550

104405

63%:

: R

ggg‘

BIC
MOVB
ENDSEG
e

e b eR-

sPART 2 CHECKS REMOTE/LOCAL

6035 047504
047506
6036 047506
6037 047512

104404
004737
004737

6039 o«rsga
6040 047530
6041 047536
6042 047540
6043 047546
6044 047554
6045 047562

004737
032737
00141
052737
052737
052737
052737

011072
000001

002312

000001
000001
000001
000001

002460
002462
002464
002466

6047 047572
6048 047600
6049 0467606
6050 047614
6051 047622
oosi 047626
6053 047632
6054 047636
6055 047646

042737
042737
04 7§
042737
01370
062701
0101
113777
004737

000001
000001
000001
000001
002312
000040
002410
002410
011060

002460
002462
002464
002466

0127

00001

002374

002403

002502

6046 047570

6056 047650
6057 047656

6058 047664

6059 047672
6060 047700
6061 047702
6062 047710
047710
047712
047714
047716
6063 047720
047720
6066 067722

6065 047730

112777

00041

0427

0177

022737
0014
012

TRAP
(SERSOFT
WORD
1710
WORD
ESO2
.WORD
ERRSO1
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
CS$CLPI
sSELECT CHANNEL 1
ieeee 0AD NOT SRE INTO ACR l=cccccccce

#10,3CSRX
#20.alIRLX

PSEU17: BGNSEG

010220
010710

000220

800010

132360

002403

132544

132432

1324;2

104

132330

oozsos

00250

108:

W @R

CHANNEL
e

TRAP
e

(SESEG

=S
e
=

0w S

W W

w T R

e A s e

JSR
BIT
BEQ
BIS
BIS
BIS
BIS

PC,WAIT
#1,0PA1
3
#1,0ATI
#1.CDAT12
#1,CDAT13
#1,CDAT14

_WATT 100 US
:1S DPA EVEN
*BRANCH [F YES
SSET ULPA BIT IN COMPARE DATA FOR ISR
b
Band

BIC
BIC
BIC
BIC
MOV
ADD
MOV
MOVB
JSR

#1,CDAT1N
#1,CDAT12
#1,CDAT13
#1,CDAT14
DPA1,R1
#40,R1
R1,MLA1
MLA1,3lDRHX
PC,LO00P

SCLEAR ULPA BIT IN COMPARE DATA FOR ISR
Bons
Teee
B
:CREATE MLA1
e
SSTORE MLA1
i=eeec 0AD MLA! INTO DOR 2=ceecccceee
SWAIT A LITTLE

MOV

#1,CHAN

:LOAD CHANNEL NUMBER

(MP
BEQ
MOV
ERRSOFT

#2403,BAD
108
#2403 ,G00D
1711,E501 ,ERRSO1

#220,3]CRHX

.+32

#10,3CSRx

alIRX,BAD

CKLOOP

002460

m e

TRAP
:CLEAR ULPA BIT IN ISR 1 AND 2
SSET UP PARAMETER

MOV

002500

100008:

PC,CULPA
PC,BGIN2

BIC

002502

JSR
JSR

MOVE

3%:

INTERFACE FUNCTION OF

:0.. ...................... B

6038 047516

*ERROR HANDLER

CKLOOP
000010
000020

CHANNEL 2

MOV

(MP

31SRX,BAD

(DAHLBAD

($BSEG

tece=e 0AD SRE INTO ACR 2e==ceeeee .

;

SSELECT CHANNEL 1

SGET IIR1 CONTENTS

:MA,IFC,RLC,MAC BIT SHOULD BE SET
:BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE
JERROR HANDLER
TRAP
CSERSOFT
MWORD
1711
.WORD
ESO1
.WORD
ERRSO!
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
(S$CLPI
:GET ISR1 CONTENTS

JATN NDAC ,REM,ATN,LAPS,LADS,
(ULPA)IS SET

a 153

SEQ 154

HARDWARE TESTS MACRO M1113 06=-SEP=B2 16:46 PAGE 59-4
TEST 17: REMOTE/LOCAL INTERFACE FUNCTION TEST

6066 047736
6067 067740

001410
013737

047746
047750
047752
047756
6069 047756
047756

104457
003260
005447
003702

6071 047766

112777

6068 047746

104406

002460

BEQ
MOV

002500

208
CDAT11,G0OD

ERRSOFT 1712,€502,ERRSO?
CKLOOP

6070 047760

052777

000010

6072

047774

004737

011060

6076 050020
6077 050026
6078 050034

012737
017737
022737

050052
050054
050056
050060
6082 050062
050062
6083 050064

104457
003261
005406
003702

6085 050076

062701

000001

132312

132302

208:

BIS

#10,3CSRX

JSR

PC .LOOP

MOVB

#1,31DRHX

#77,31DRHX
PC,LOOP
#10,3CSRX

6073 050000 112777 000077 132270
6074 050006 004737 011060
6075 050012 042777 000010 132260

MOVB
JSR
BIC

6079 050042 001410
6080 050044 012737 000003 002500
6081 050052

30§
BEQ
#3,G00D
MOV
ERRSOFT 1713,E501,ERRSO1

104406
052777

000001
132216
000003

#1, CHAN
alirx.BAD
#3,BAD

CKLOOP
000010

6084 050072 013701

002312

010137

002410

6088 050114

004737

011060

6090 050126

012737

2 050142
093 050150
6094 050156
6095 050160
6096 050166

017737
022737
001410
012737

6086 050102

MOV
MOV
CMP

002374
002502
002502

132206

308:

000040

BIS

MOV
ADD

MOV

#10,3CSRX

oPAT ,R1

#40,R1

:BRANCH IF YES
*SET UP DATA FOR ERROR MESSAGE

*ERROR MANDLER

CSERSOFT
TRAP
MORD
1712
ESO02
.WORD
ERRS01
.WORD
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
(SCLPT
TRAP
;SELECT CHANNEL 2

teeceee LOAD GTL INTO DOR 2=eeceeceee ‘WAIT A LITTLE

iecmcae LOAD UNL INTO DOR 2====== S TWAIT A LITTLE
*SELECT CHANNEL 1
1LOAD CHANNEL NUMBER
SGET IIR1 CONTENTS
*RLC,MAC BIT SHOULD BE SET

‘BRANCH IF YES
*SET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

CSERSOFT
TRAP
1713
LWORD
ESO1
"WORD
ERRSO1
"WORD
:BRANCH TO BGNSEG IF ERRLOOP IS SET
cscLP
TRAP
;SELECT CHANNEL 2
E

:CREATE MLA1
o

R1,MLA1

1STORE MLA1

PC,LOOP

SSELECT CHANNEL 1

;==== 0AD MLA1 INTO DOR 2=====ccccccccc=

MOVB

MLAT,3]1DRHX

6089 050120 042777 000010 132152

BIC

#10,3CSRX

132126

MOVB

#7,31CRHX

;====L0AD NOT RTL INTO DOR l==e=ccccccc=

MOV

alSRX,BAD

CSERSOFT
TRAP
1744
MORD
"WORD ESO1
"WORD ERRSO1
:BRANCH BACK TO BGNSEG If ERRLOOP [S SET
CSCLPY
TRAP
:GET ISR1 CONTENTS

BEQ

408

‘BRANCH IF YES

6087 050106

6091 050134

050166
050170
050172
050174
6097 050176
050176
6098 050200

113777

112777

002410

132162

000001

002374

132102
002003

002502
002502

002003

002500

000007

MOV

104406

017737

001410

CKLOOP
132052

002502

6101 050216 013737 002462 002500
6102 050224
050224 104457
osozio 003263

050230 005447
050232 003702
6103 050234

#1, CHAN

aliRx,BAD
MOV
#2003.BAD
CMP
33
BEQ
#2003, GOOD
MOV
ERRSOFT 1744 ,E501,ERRSO1

104457
003320
005406
003702

6099 050206 023737 002462 002502
6100 050214

JSR

33%:

CMP

MOV

CDAT12,BAD
CDAT12,G0OD

ERRSOFT 1715,E502,ERRS01
CKLOOP

SWAIT A LITTLE

‘LOAD CHANNEL NUMBER

*GET IIR1 CONTENTS
*MA,RLC,MAC BIT SHOULD BE SET
*BRANCH IF YES
*SET UP DATA FOR ERROR MESSAGE
;ERROR HANDLER

IS SET
*ATN,NDAC ,REN,ATN,LPAS,LADS(ULPA)
*SET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER
TRAP
MORD

CSERSOFT
1715
"WORD ES02
"WORD ERRS01
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET

m12

HARDWARE TESTS MACRO M1113 06-SEP-B2 16:46 PAGE 59-5
TEST 17: REMOTE/LOCAL

050
sw«pofi
&‘
6105 050244 1

6109 850 gg
6107
050
6108 050264

6109 050 35
6110 050
6111 050302

6112 oso§1o

050 13

050312
050314
050316
6113 050320
050320
6114 ososgz

6115 050330

6120 050360
6121 050366
612§ 050374

6123

wwg
qyu
408
7
002410
132024

004737
0462777
017737

022737
0
9
012737

811060
gogug
131760

132014
00 sog

002002

002500

002002

00250

003264
005406
003702
1044
017737

023737

131730

002460
002460

002502

131672

elgo 050440

017737

613% 050454
6133 050456

001410
013737

011060

131636
002502

050464
050466

104457
003267

050474

1044.09

050470
050472
6135 050474

*MA,RLC, BIT SHOULD BE SET
‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE

MOV

CMP

BIS
MOVB
JSR
MOV
ST
BEQ
CLR
ERRSOFT

PC,LO0P
#10,3CSRx
al IRX,BAD

aISRX,BAD

CDAT11,BAD

#10,3CSRX
#21.3IDRHX
PC,LOOP

#10,3CSRX

131612

002464

oozsog

00250

538:

002500

000010
000001

131574
131564

6139 050516

112777 000077

131552

011060

TRAP

CSERSOFT
MORD
1716
.WORD
E501
.WORD
ERRS501
;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
cscLP
:GET ISR1 CONTENTS

*ATN,NDAC,REN,REM,ATN,LPAS,LADS
(ULPA) SE T

‘BRANCH IFf YES
SSET UP DATA FOR ERROR MESSAGE
:ERROR HANDLER

TRAP
MORD
.WORD
.WORD
:BRANCH TO BGNSEG IF ERRLOOP IS
TRAP
SWAIT A LITTLE

SSELECT CHANNEL 1

a1SRX . BAD

:GET ISR1 CONTENTS

BEQ
MOV

608
CDAT13,G0OD

CMP

CDAT1%,BAD

(CSERSOIT
1717
ESO02
ERRSO1
SET
CSCLPY

;SELECT CHANNEL 2
PP LOAD LLO INTO DOR 2====ccccccccce

MOV

ERRSOFT 1719,E502,ERRSO1

60%:

*ERROR HANDLER

*GET IIRT CONTENTS
:CONTENTS SHOULD BE ZERO
‘BRANCH IF YES
*SET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER
TRAP

CSERSOFT
MORD
1718
.WORD
ESO1
-WORD
ERRS01
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
CSCLPY

*ATN,NDAC ,REN,REM,LLO,ATN,LADS(ULPA) SET
‘BRANCH IFf YES
SSET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP
MORD

CSERSOFT
1719

TRAP

CSCLPY

WORD
ESO2
.WORD
ERRS01
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET

CKLOOP

052777
112777

SWAIT A LITTLE
*SELECT CHANNEL 1
SGET IIRT CONTENTS

al IRX,BAD
BAD
53%
GOOD
1718,E501,ERRS01

CKLOOP

005447
003702

004737

#2002 ,BAD
43%
0;002 gooo

BIC

002502

6136 050476
6137 050504
6138 050512

508:

002500

6131 050446 023737 002466

6134 050464

CMP
BEO
MOV

JSR
BIC
MOV

BEQ
50%
MOV
CDAT11,G00D
ERRSOFT 1717,€502,ERR501

104457
003266
005406
003702

104406

TRAP
CSCLPY
;SELECT
CHANNEL
2
seceeal 0AD MLAT INTO DOR 2ececcccccccces

CKLOOP

050400 042777 000010

050430
050432
050434
6129 050436
050436

43%:

002500

131712
131702

017737
005737
001407
005037

#10,3CSRX
MLAT, 31DRHX

CKLOOP

104457
003265
005447
003702

104406
052777
112777
004737

BIS
MOVB

ERRSOFT 1716,E501,ERRSO1

104457

000010
000021

6124 050406
6125 050414
6126 050420
6127 050422
6128 050426
050426

INTERFACE FUNCTION TES

6116 050336 001410
6117 050340 013737
6118 050346
050346
050350
050352
05035¢
6119 050356
050356

SEQ 155

BIS
MOVB

#10,3CSRX
#1,31DRHX

:SELECT CHANNEL 2
i====|0AD GTL INTO DOR 2====== e

MOVB

#77,31DRHX

;====L0AD UNL INTO DOR 2====ecccccecenee

JSR

PC LOOP

TWAIT A LITTLE

N 12

HWARDWARE TESTS

MACRO M1113

06-S EP-82 16:45

TEST 17 : REMOTE/LOCAL INTERFACE FUNCTION TEST

M 7 ~ N VWA
© -—O0

o~ . N0N

wo-

*stara‘e*r*taasrstarararceare -OZwo>x2ga> -g—mNWO0 w2O-u+vwn

>o LEo)al

o-[

—

045

123

062

TSHD17:

6159
6160 050644

- WNO X~ 4 w

(OST3NUMeNVEM~ ANOWI-NMNN —O=M0 &w

SEQ 156

PAGE 59-6

2XAREMOTE=-LOCAL INTERFACE FUNCTION TESTIN/

L10046:

TRAP

CSETST

B 13

SEQ 157

WARDWARE TESTS MACRO M1113 06-SEP=B2 16:46 PAGE 60
TEST 18: SERVICE REQUEST INTERFACE FUNCTION TEST OF CHANNEL 1

6165

JSBTTL

TEST 18: SERVICE REQUEST INTERFACE FUNCTION TEST OF CHANNEL 1

616?

:t'Q""'.'.""""l""""""'Q"'."Q'.."."'Q"QQ'."Q""OQQ""'QO.QO

616

IEX = TEST 18

2}7?

AND CHMECKS THE SRQ BIT IN ISR2.

6168
6199

STHIS TEST CHMECKS THE SERIAL POLL REGISTER OF CHANNEL 1,
:PART 1 SETS AND CLEARS THE RSV BIT IN SPR REGISTER OF CMANNEL 1

g};;

SPART 2 CHECKS THE SERIAL POLL SEQUENCE OF CMANNEL 1.

6174
6175

:1F QUICK VERIFY PASS IS NOT SELECTED, THE SERIAL POLL SEQUENCE IS CARRIED
S0UT WITH DIFFERENT DATA.

6176

6177 0507
8507

6178

0507

6179 050726
6180 050730

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

BGNTST

005737

002324

01%766
012746
010600
104417
06 709
012737

051734
000001

001410

050730
05073¢
050740
050742
050744
6181 050750
6182 050756
osorsg
6183 85076
6184 050764
6185 050770
6186 050776
6187 051000
6188 051006
6189 051010

000403
042737

61N 0510;‘
6193

1044
004737
004737
032737
001404
052737

000004
000101

TST

BEQ
PRINTF

002402

010220
010710
000001

002312

000001

002470

000001

002470

112777

000100

131234

051040

015737

000002

002374

6195 051054
6196 051062
6197 051064

022737
001410
012737

001020

002502

001020

002500

051072
051074
051076
051100
6199 051105
051102
6200 051106
6201 051112

104457
003411
005406
003702

6190 051016 042777 000010

131254

7%:
MOV
ITAC18: BGNSEG

JSR
JSR
BIT
BEQ
BIS
3$:

mgoaozonnrowm01n4o
6194 051046 017737

6198 051072

6202 051120
6203 os11§z

6204 051130

051130
051132
051134
051136
6205 051140

104406
017737
032737

001010
012737

104457
00341;
00544
003702

BR
BIC

BIC

;1S THE PNT FLAG SET

#101 ,RSAVE

MOV
#TSHD18,=(SP)
MOV
#,=-(SP)
MOV
SP,RO
TRAP
CSPNTF
ADD
#4,SP
;:DATA STORE FOR SERIAL POLL SEQUENCE

PC,CULPA
PC.BGIN2
#1.0PA1
3s
#1,(DAT1S

TRAP
($BSEG
:CLEAR ULPA BIT IN ISR 1 AND 2
SSET UP PARAME TER
:1S DPA EVEN
‘BRANCH IF YES
SSET ULPA BIT IN COMPARE DATA FOR ISR

#10,3CSRX

78
#TSHD18

¢
#1,CDAT1S

002502
002502

SSELECT CHANNEL 1
ieeeeeSET RSV BIT IN SPR leccccccccees oo

MOV

#2,CHAN

‘LOAD CHANNEL NUMBER

MOV

CMP
BEO
MOV

#10,3CSRX

alIRX,BAD

#1020,BAD
10
#1020 gooo

ERRSOFT 1801,€501,ERRSO1

122040

002500

10$:

;
PCLEAR ULPA BIT IN COMPARE DATA FOR ISR

#100,91CRLX

CKLOOP
131146
002000

*1F YES, PRINT THE TEST WEADER
B

MOvB

BIS

131176 002502

T18::

PNTF

MOV
BIT
BNE
MOV

a1SRX,BAD
c;ooo.aao
13
0152040 GOOD

ERRSOFT 1802,6502,ERRS01
(KLOOP

SSELECT CHANNEL 2

SGET 1IR2 CONTENTS

*SRQ,B0 BIT SHOULD BE SET
‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP
(SERSOFT
.MORD
1801
‘WORD
ESO1
.WORD
ERRS01
:BRANCH BACK TO BGNSEG If ERRLOOP 1S SET
TRAP
CSCLPY
:GET ISR2 CONTENTS
SIS SRQ BIT SET ALSO ATN,NDAC,ATN(ULPA)
‘BRANCH [F YES
SSET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP
CSERSOFT
MORD
1802
~WORD
ssog
.WORD
ERRSO!
:BRANCH BACX 10 BGNSEG If ERRLOOP IS SET

HA
13

SEQ 158

MACRO M1113 06-SEP=B2 16:46 PAGE 60-1
8: SERvI] CE REQUEST INTERFACE FUNCTION TEST OF CMANNEL 1

002000

13%:

TRAP

#10,3CSRX
.o 6[('L'

:SELECT CMANNEL 1
:-----CLE‘“ SP. ' .EG]st‘.-..----.-.-.--.-.

BIT
BEQ

osooo.sno
20%

:SRQ BIT SHOULD BE CLEARED
:BRANCH IF YES

8IS
MOV

120040

MOV

#10,aCSRx
1SRX,BAD

SSELECT CHANNEL 2
SGET ISR2 CONTENTS

#120040 gooo

SSET UP DATA FOR COMPARE

ERRSOFT 1803,€502,ERRSO1

*ERROR WANDLER

.’ ........ R G en AR E e

- e ON b e O =2 NN O N =2 O =
OWO
NS ONOCO—-ONONO

C’CNN“\"N‘Q\‘\PNSE
NONNNNNNNN=
=S NNNNNNNN

NSNNNNNNN=NNNNNNNNNNS

W W We

a0 WP G S W A

000405

002502
002502

JSR

PC,LOOP

novs

‘

ieeeeel0AD LON INTO ACR 2ecceee= p——

JSR
MOV
ADD

PC,LOOP
DPAT,R1
#100,R1

SWAIT A LITTLE
:CREATE MTA1
s

MOvB
JSR

MTA1,31DRHX
¢,LOOP

;=== 0AD MTA1 INTO DOR 2e=ceccccee —
SWAIT A LITTLE

BIC

#10,3CSRX

sSELECT CHANNEL 1

BEQ

MOV

” 11,alcnux
o.alDR”x

R1,MTA1

01S.a|caux
#1,CHAN

aliRx,BAD

002470

002500

MoV

CMP

BEQ

MOV

SWAIT A LITTLE

:-----LOAD

SPE

lNIO DOR

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

:STORE MTA1

seee=l0AD GTS INTO A(R 2=c=cccccccccas
:LOAD CHANNEL NUMBER

SGET IIR1 CONTENTS

#405,BAD

s1FC,SPAS ,MAC SHOULD BE SET

#405,G00D

SSET UP DATA FOR ERROR MESSAGE

ERRSOFT 1804 ,E501,ERRSO1

30%:

($BSEG

:SELECT CHANNEL 2

*BRANCH If YES

:ERROR HANDLER

TRAP

CSERSOFT

LWORD
.WORD
WORD

1804
E501
ERRSO1

TRAP

CSCLPY

;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET

CKLOOP
130642
002470

TRAP

#10,3CSRX

CMP

002500

CSESEG

BIS

MOV

002502

TRAP

D P B TR WD @ G W TR e ae o D R
I
I

sSELECT CHANNEL 1

MOV

O
N
W=WO
NONNO
VIS

D e

#10,3CSRX

MOvB

130732

CsCLPl

BIC

MOV

130752

TRAP

CHECKS THE SERIAL POLL SEQUENCE OF CHANNEL 1

MOvVB

N = NN
NI NN NN

WWVIWWES
S

D G W SR O N D AD G PR W AR R

BGNSEG

S \N

OO0O00O0O— O =000

-t et O ek e O =S\ N PN O
on g Ehdiz WO
NN S PNON S POMNOWNN
&
=Ny

:000----

cssasorr

10000$:

‘
.

TRAP

12 3
.WORD
WORD
ESO2
ERRSO1
.WOR
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET

CKLOOP

104405

cscLPt

BIC
nova

WWUHNSES
NSO

N=N
NEONNNNNS

(===
OOOOO-'?-‘
OCO0O0O0
—=OW—=wn-

1
1
1

ENDSEG

oO0O0

6208
051156
11?&
6209
6210 051108
6211 051
6 1§ 051 08
6213 05121
05 13
851 1
51214
051216
6214 051220
051220
6215 051 Zg
05122
051222
6216
6217
6218
6219 051224
051224
6220 0515;6
6221 051234
622; 051268
6223 05125
6224 051256
6225 051 65
6226 05127
6227 051276
6228 051302
6229 051306
6230 051312
6231 051316
6232 0513;4
6233 051330
6234 051336
6235 051344
6236 051352
6237 051360
6238 051
6239 051%70
6240 051376
051376
051400
051402
051404
6241 051406
051406
626% 051410
6243 051416
6244 051424
6245 0516;2
6246 0514
051434
051436

COO0—=

oo 8? G118
112
6

=iV ] w-wwflzg
g (=Y
NNWSN
NONNNN

RE TESTS

S1SRX,BAD

%DAI1$.8AD

CDAT1S,G0OD

ERRSOFT 1805,E502,ERRSO1

:GET ISR1 CONTENTS

:NDAC,NRFD,TADS, (ULPA) SHOULD BE SET

‘BRANCH IF "YES

SSET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP

.WORD

CSERSOF1

1805

D13

SEQ 159

NN
NONNN

2 SOOO
= ONOO = —
AR WSROAINR
Gran N—'NM?
S NNNN

002500

MOV

ERRSOFT

N
OO =W
VOO'N
NP NWONNES

W=WWWWNO
NONNNNNOT

BIS

MOV
MOV

CMP
BEO

.WORD
ES0
ERR501
+WORD
sBRANCH BACK TO BGNSEG l;ngglLOOP IS SET
cscLP

a*&nx.aAo

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
sGET I1IR2 CONTENTS

1806,£501, ERRSO1

sERROR HANDLER

#10,3CSRX

#2,CHAN

#1060.BAD
408
#1060 gooo

sSRQ,BI1,B0 BIT SHOULD BE SET
sBRANCH IF YES

sSET UP DATA FOR ERROR MESSAGE
TRAP

.WORD
.WORD
.WORD

000015

4«08%:

00240

002502

002402

002500

CLRB
SWAB
CMP
BEQ

000020

002502
002502

000020

002500

#15,31CRHX
a1DRX ,BAD
BAD
BAD

[=l=l=l=l=l=l=]
OCO=O—=00
OO —=0O=00
OO =000
O =
WO W
OCOONO—-—

TRAP

cscLPl

sREAD DATA FROM DIR2 REGISTER

sCLEAR LOW BYTE OF BAD CONTENTS
:SWAB BAD

(xLOOP

1807
.WORD
EB801
.WORD
ERRS501
.WORD
;BRANCH BA(K TO BGNSEG I;RERRLOOP IS SET

RSAVE ,BAD

438

RSAVE ,GOOD

@l IRX,BAD

#20,BAD
MOV

T
ERRSOF

50%

#20,600D

1808,E501,ERRSO1

MOvB

TRAP

:GET IIR2 CONTENTS
;B0 BIT SHOULD BE SET

;BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE
:ERROR HANDLER
TRAP

CSERSOFT

cscLP

(SERSOFT

1808

.WORD
WORD
.WORD

ES501

TRAP

csaLP

ERR501

;BRANCH BACK TO BGNSEG IF _ERRLOOP IS SET

(kLOOP
#11,31 CRHX
#3131 DRHX
PC,LOOP

#1587, 31DRHX
PC,LOOP

#10,3CSRX

#0,31CRLX

:----LOAD
:----LOAD

No'
SPD

sWAIT A LITTLE
iee==l0AD

UNT

LON lNTo
lN‘O DOR

A(R 2 ..........
2 ..............

INTO

2=====ccccce=

DOR

SWAIT A LITTLE

sSELECT CHANNEL 1
:----(LEAR

SPR

REG!S'ER .............

10001$:

002234

QvP

002402
000176

RSAVE

ExQv18

002402

ERRS01

ERRSOFT 1807,£801,ERRS01

43%:

50%:

1806
ES501

;COMPARE TRANSMITTED WITH RECEIVED DATA
sBRANCH IF EQUAL
;SET UP DATA FOR ERROR MESSAGE
sERROR MANDLER

MOV

130450

MovBe
MOV

CSERSOF1

sBRANCH BACK TO BGNSEG IF ERRLUOP IS SET

(xLOOP

O—=—=W
NO NN
W= WWO
N ONNO'

[elelelelele)
—,ON)
= b
[=l=l=td

OO0O0O0—=O—=
OO0
—=

051510
051512
051216
6255 051516
051516
6256 051520
6257 0515%6
6258 051534
6259 051540
6260 051544
6261 051552
626% 051554
6263 051562
051562
051564
051566
051570
6264 051572
051572
6265 051574
6266 051602
6267 051610
6268 051612
6269 051620
051620
051622
0516264
0516%6
6270 051630
051630
6271 051632
627; 051640
6273 051646
6274 051652
6275 051660
6276 051664
6277 051672
6278 051700
051700
051700
6279 051702
6280 051706
6281 051710
6282 051714
6283 051722

=ON-=
=N
NEOENNE

g
oo

OO0O0O0-—=

6 Si 051476

33%:

O OO0
WWVIWES
NESES
oonw
NNOON

43 81
g5t trisg

(xLOoOP

49?

O00—=

1646

A PO DO
roro s SN
NNNNNNNS
NNWNWNNO
NNNNNNN o

144
1644

—_-OO=O=—tau

6 kg

447
702

§164g
144

[mlelele
e

6247

(==l

HARDWARE TESTS MACRO M1113 06-3EP-B2 16:46 PAGE 60-2
TEST 18: SERVICE REQUEST INTERFAC
FUNCTION TEST OF CHANNEL 1

#176 RSAVE

exovis

TRAP

;1S QUICK VERIFY PASS SELECTED
sIF YES EXIT TEST
sCREATE NEW DATA PATTERN
sALL DATA PATTERN DONE
JI1F YES EXIT TEST

(SESEG

SEQ 160

WARDWARE TESTS MACRO M1113 06-SEP-B2 16:46 PAGE 60-3
TEST 18: SERVICE REQUEST INTERFACE FUNCTION TEST OF CHANNEL 1

6284 051724

000137

051730

104432

6285 051730
051732

000076

g%gg 051734

045

6290

6291 052030
052030
052030

050756

JMP

ExQv18: ExIT

ITAC18

181

:1F NO 'ESY ITERATION

SEXIT TEST

TRAP

JWORD

123

NLIST

CSEXIT

L10047-,

BEX

062 TSHD18: fi.g%z t/!fi»znsmxce REQUEST INTERFACE FUNCTION TEST OF CHANNEL 1IN/
.EVEN

ENDTST
104401

L10047:

TRAP

(SETST

WARDWARE TESTS
TEST

19:

MACRO M1113

SERVICE REQUEST

06-SEP=82 16:46

INTERFACE FUNTION TEST OF

6293

LSBTTL

SEQ 161

PAGE 61

CHMANNEL 2

TEST 19: SERVICE REQUEST INTERFACE FUNTION TEST OF CHANNEL 2

6 9g

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

629
. 99
629
g gg

;
IEX = TEST 19
STHIS TEST CMECKS THE SERIAL POLL REGISTER OF CHANNEL 2.
SPART 1 SETS AND CLEARS THE RSV BIT IN SPR REGISTER OF CHMANNEL 2 AND

238?

SPART 2 CHECKS THE SERIAL POLL SEQUENCE OF

e3oi

S1F QUICK VERIFY PASS IS NOT SELECTED, THE SERIAL POLL SEQUENCE IS CARRIED

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

;

630

CHECKS THE SRQ BIT IN ISR1.

CHANNEL 2.

S0UT WITH DIFFERENT DATA.

0‘

6305 osgosg
05203

6306 052032
6307 052036

6308 052040

BGNTST

005737
001410

002324

181
BEQ

PRINTF

052040 012746 053044

052044
052050
052052
052054
6309 055060
6310 052066
052066
6311 osgoro
esti 052076
6313
052100
6314 052106
6315 052110

012746
010600
104417
oezrog
01273

004737
032737
001404
05273

010534
000001

002314

000091

002470

6317 052120

042737

000001

002470

6320 052142
6321 052150
esz; 052156
6323 0521664
6324 052172
6325 052174
6326 052202

042777
012737
017737
022737
00141
012737

000010
000001
130066
001020

130130
002374
002502
002502

001020

002500

6316 052116

6318 052 go
6319 052134

052202
oszgo«

052206
052210
6327 052212
052212

104404
004737

00040
052777
112777

6328 052214
6329 052222
6330 052230
6331 052232

017737
032737
001010
012737

052240
052242
052246
osggao
6333 052250

104457
003556
005447
003702

6332 052240

#TSHD19

000001

000006

000101

00c402

7%:

o1oz§o

000010
000100

MOV

ITAC19: BGNSEG

JSR

130144
130124

3$:

002502
002502

122040

002500

108:

.+10

;

#10,3CSRX
#100,31CRLX

SSELECT CHANNEL 2
R SET RSV BIT IN SPR 2=cecccccccccse

BIC

#1,CDAT1S

BIC
MOV
MOV
CMP
BEO
MOV
ERRSOFT

#10,3CSRX
#1,CHAN
alirx,BAD
#1020.BAD
10%
#1020,G00D
1901,£501,ERRSO1

MOV
BIT
BNE
MOV

31SRX,BAD
ngooo.sao
13¢
#122040,600D

ERRSOFT 1902,¢502
. ERRS01

(xkLOOP

#TSHD19,=(SP)

TRAP
:CLEAR ULPA BIT IN ISR 1 AND 2

CKLOOP
130036
002000

MOV

PC,CULPA

PC.BGINY
#1.DPA2
3
#1,C(DAT1S

BIS
Mov8

#1071 ,RSAVE

JSR
BIT
BEO
BIS

119::
;1S THE PNT FLAG SET
:1F YES, PRINT THE TEST HEADER

MOV
#1,-(SP)
MOV
SP,RO
TRAP
CSPNTF
ADD
#4,SP
;DATA STORE FOR SERIAL POLL SEQUENCE

;

104457
003555
005406
003702

106409

PNTF
7%

($BSEG

PSET UP PARAMETER
‘1S DPA EVEN
‘BRANCH IF YES
sSET ULPA BIT IN COMPARE DATA FOR ISR

*CLEAR ULPA BIT IN COMPARE DATA FOR ISR

SSELECT CHANNEL 1
SLOAD CHANNEL NUMBER
SGET IIR1 CONTENTS
*SRQ,B0 BIT SHOULD BE SET
‘BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER
TRAP
.WORD

CSERSOFT
1901

.WORD
ESO1
.WORD
ERRSO1
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
CSCLP
:GET ISR1 CONTENTS
SIS SRQ BIT SET ALSO ATN,NDAC,ATN(ULPA)
*BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

CSERSOF T
TRAP
.MORD
1902
.WORD
ESO
.WORD
ERRSO!
:BRANCH BACK TO BGNSEG IF ERRLOOP [S SET

F13

SEQ 162

MA RO M1113

06-SEP-B2 16:46
PAGE 611
INTERFACE FUNTION TEST OF CHANNEL 2

I} goo.aao

sSELECT CHANNEL 1
sGET ISRT CONTENTS
¢SRQ BIT SHOULD BE CLEARED
sBRANCH IF YES

&~
o

o
o

MOV

#120040,G00D
ERRSOFT 1903, £502,ERRS01

(KLOOP

&~
&~

sSELECT CHANNEL

sSET UP DATA FOR COMPARE
sERROR HANDLER

sBRANCH BACK

ENDSEG

100008:
e

CHECKS THE SERIAL POLL SEQUENCE OF

-O0000 -,OO
O — s (P s
- A ) b P
S NO
WO MNOW
LSLS Y L NT NIV Ny S

#10,3CSRX

sSELECT CHANNEL 2

BIC

#10,3CSRX

sSELECT CHANNEL 1

ogil.alcaux

:-----LOAD

MOVB
JSR

MOVB

OO0O00O0O0-—

#77.31DRHX
PC,LOOP

#30,31DRHX
PC,LOOP
DPA2,R1
#100,R1

MOVB
JSR

MTA2,31DRHX
PC,LOOP

MOvB
BIS

MOV

CMP
BEQ

000405

RSAVE,alCRLX

MOVB
JSR
MOV
ADD

MOV

R1,MTA2

#1%.31CRHX
#10,3CSRX

#2,CHAN

alirRX,BAD
#405,8AD
308

MOV
#405,G00D
ERRSOFT 1904 .E501,ERRSO!

o
W

OO
=

O000=-ON=O
W= WwWNES
NSNS
O=
OO
WS
NS

oaroaooooamog

BIS

MOVB

002470

002502
002502

002470

002500

7
1

MOV

CMP

BEQ

1903
ES502
ERR501

TRAP

CSESEC

TRAP

($BSEG

:----LOAD
:----LOAD

oAtA

UNL

sWAIT A LITTLE

Lo”

ieeeeel0AD SPE

JWAIT A LITTLE

l“'o

lN'o

SPR
DOR

lN.U

‘ca

2 ........... B
1-------- ......
1 ............

INTO DOR le=ccecceccecs

sCREATE MTA2

:STORE MTA2
:----LOAD

"'A‘

sWAIT A LITTLE
:----LOAD

G's

lN‘o
lNIo

DOR
‘(R

‘ .............
1 ..............

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
sGET I1IR2 CONTENTS

,MAC SHOULD BE SET
s1FC,SPAS
sBRANCH IF YES

sSET UP DATA FOR ERROR MESSAGE

sERROR HANDLER

TRAP

.WORD
.WORD
.WORD

CSERSOFT

1904
ESOV
ERR501

;BRANCH BACK TO BGNSEG l;aEgRLOOP IS _SET

(KLOOP

127532

CSERSOFT

.WORD
.WORD
.WORD

CHANNEL 2

BGNSEG

[«]=]
dONddmdg
&S NN

v.r
.
gynunnuun
RERFNESN onN s~FFE

BB NANIN)
b = st b
8

WA VAWV
AVAVAWAVA
A VA VAN WA VAV VAWVWDAWVAWVAWA WAV

VBNV
W =0 O
©
S ANN=-O

NN
NN N &
NNNNN

(130323

(elelelelelelelclelelelelelelolelelelelelelalelelalalelellolelolelalaTa]

AU LN N WA N NN NN
VAW
WA

* R

oooooococooocoocococoocrroror
Oo

:.00-- ............

TRAP

csce

TO BGNSEG IF ERRLOOP IS SET
TRAP
cscLPt

104405
R e
e kR R

ococooo

TRAP

#10,3CSRX

#0,31CRLX
#10,aCSRx
1SRX,BAD

NNNN

NONNNN

CE R QUEST

w
—O 0o

oocoococooo

Py v ivrivivivee!

[=lelelelelelelelalalalalelalalalalal

VIV
WMVWAWAVIWAIWUWWWA
NN
NN
AN N N W IR N N NN N N NN NN

19:

NNONOOO SNOONON
&~

TEST

N=
MM

HARDWARE

—N

G 13

31SRX . BAD

gourts.sno
{3

CDAT1S,GOOD

ERRSOFT 1905,£502,ERRSO1

:GET ISR2 CONTENTS

*NDAC,NRFD,TADS, (ULPA)

‘BRANCH IF YES

csCLPl

SHOULD BE

SET

*SET UP DATA FOR ERROR MESSAGE

JERROR HANDLER

TRAP

WORD

(3 ERSOFT

1 05

HWARDWARE TESTS MACRO M1113 06-SEP=-B2 16:46 PAGE 61-2
TEST

19:

SERVICE REQUEST

INTERFACE FUNTION TEST OF

02 S
6 79 052556

1064??
042777

6379 052600
6380 052606
e§g1 052610

022737
001‘19
012737

6377 052564
6378 052572

6382 052616

052616
0526 g
052622
052624
6383 052626
052626
6384 052630
6385 052636
6386 osso«a
6387 052650
6388 052654
6389 052662
052664
6391 05267

05267
052674
052676
052700
6392 052702
052702
6393 052706
6394 052712
6395 052720
6396 oszriz

6397 052730

012737
017737

000010

ocoog1
1274 8

00250

001060

002500

104403
11;77
017737
105037
oogssr
023737
001419
C1373

000015
127430
002502
002502
002402

127432
002502

002402

002500

104457
003563
005566
003792
104406
017737
022737
001410
012737

127340
000020

002502
002502

000020

002500

011060

6405 053002

112777

000000

105609
11577
112777

127320
127320

112777 000137

052777 000010
104405
005737

001019
005;3
022737

001402

(MP
BEO
MOV

#1060, BAD
408
21060 gooo

*SRQ,B1,80 BIT SHOULD BE SET
*BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE

MOV
MOV

#1,(HAN
alirx,Bap

MOVB
MOV
C(LRB
SWAB
cmp
BEO
MOV
ERRSOFT

MOV
CMP
BEQ
MOV

011060

al IRX,BAD
#20,BAD
50%
#20,600D

‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE

PC,LOOP

TWAIT A LITTLE

127306

move

#157,310RHX

127276

8IS

127256

002234
002402
000176

002402

MOVB

ENDSEG

1s1
BNE
INC
(MP

BEQ

*ERROR HANDLER

PC $oop

#11,31CRHX
#31.31DRHX

JSR

TRAP
CSERSOFT
<WORD
1907
.WORD
EB02
.WORD
ERRSO1
;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
TRAP
cscLPt
:GET TIR1 CONTENTS
‘B0 BIT SHOULD BE SET

TRAP
CSERSOFT
.WORD
1908
.WORD
ESO1
.WORD
ERRSO01
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
CsCLP
;====L0AD NOT LON INTO A(R l==ececcccee
tee=={0AD SPD INTO DOR le==ecccceccceee
TWAIT A LITTLE

MOVB
MOVB
JSR

*ERROR WANDLER

#15,31CRHX
a1DRX,BAD
BAD
BAD
RSAVE ,BAD
438
RSAVE ,GOOD
1907 ,E802,ERRSO1

ERRSOFT 1908,€501,ERRSO1

S0%:

SLOAD CHMANNEL NUMBER
SGET IIR1 CONTENTS

TRAP
CSERSOF
T
WORD
1906
"WORD
ESO1
.WORD
ERRS01
;BRANCH BACK TO BGNSEG If ERRLUOP IS SET
TRAP
CSCLPI
;e===l0AD T(CS INTO ACR lececcccccccccccee
*READ DATA FROM DIR1 REGISTER
*CLEAR LOW BYTE OF BAD CONTENTS
:SWAB BAD
:COMPARE TRANSMITTED WITH RECEIVED DATA
*BRANCH IF EQUAL
:SET UP DATA FOR ERROR MESSAGE
;ERROR HANDLER

CKLOOP
000011
000031

004737

43%:

cscLPt

;SELECT CHANNEL 1

C(xLOOP

004737

6611 053032

002502

TRAP

#10,3CSRX

ERRSOFT 1906,£501,ERRSO1

40%:

ES0

BIC

CKLOOP

052770

053010
053010
6407 053012
6408 053016
6409 053020
64610 0530i£

33%:

104457
003562
005406
003702

6403

6406 053010

oogsra
00 sog

001060

104457
003564
005406
003702

6404 052776

1275%'%

.WORD

‘YoRD EARS01
;BRANCH BACK TO BGNSEG If ERRLOOP IS SET

CKLOOP

052730
oszrgi
052734
052736
6398 052740
052740
6399 05 748
6400 052750
6401 osgrso

°‘°§ 05 ros

CMANNEL 2

005447

8§ §3 003563
6375 052554

Q 163

#10,3CSRx

#0.31CRLX

tee==l0AD UNT INTO DOR le=cceccccccees

SSELECT CHANNEL 2

teee=(LEAR SPR 2 REGISTER===eeceaccacen
10001$:

QvP
EXQV19
RSAVE
#176 ,RSAVE

exavi9

TRAP
;1S GUICK VERIFY PASS SELECTED
SIF YES EXIT TEST
sCREATE NEW DATA PATTERN
JALL DATA PATTERN DONE

S1F YES EXIT TEST

(SESEG

1 13

SEQ 164

HARDWARE TESTS MACRO M1113
06-SEP=B2 16:46
PAGE 61-3
TEST 19: SCSRVICE REQUEST INTERFACE FUNTION TEST OF CHANNEL 2

641§ 85 034
64135
053040
0% OCg
416 053042
6615
g:}g 053044
6418
6419 05;140
053140
053140

000137

052066

.
JMP
EXQVi9: EXIT

104432
000076
045

123

062

TSHD19:

NLIST
.:?g%l
LEVEN
ENDTST

104400

ITACT9
st

sIF NO TEST ITERATION
SEXIT TEST

TRAP
+WORD

CSEXIT
L10050~-.

BEX
6%32!‘SERVI(E REQUEST INTERFACE FUNCTION TEST OF CHANNEL 23N/

L10050:

TRAP

(SETST

J13

SEQ 165

HWARDWARE TESTS MACRO M1113
06-SF°-82 16:46
PAGE 62
TEST 20: PARALLEL POLL INTERFACE FUNCTION TEST OF CHANNEL 1

6421
6422
6423
6424
6425

.SBTTL

INTERFACE FUNCTION TEST OF CHANNEL 1

IEX = TEST 20

IPART 1 CHECKS PAR ALLEL POLL SEQUENCE (LOCAL CONFIGURED).
:PART 2 CHECKS PARALLEL POLL SEQUENCE (REMOTE CONF IGURED).

6426

IR N RN RN RN RN RN

R RN RN R RN RRROERRRRORRRERRRRRRROERRORROEROROECRROROROEROEROOROEPROEOEROETRNTETDS

OO
OO

=
N
=W
OWN

BGNTST

PRINTF

#TSHD20

NSNS ONIN
NNNNNNNNSOONN
NININWWWWO
= O
N
NNNNNNNOAoNwooOoOr

7%:

#1,MSA1
#140,RSAVE
PC,CULPA

ITAC20:

PC.BGIN2

#10,3CSRX
#22%,31CRHX
#40,31 SRHX

Move

BIC

MovB

BIS

MOV
MOvB
MOV

#10,3CSRX
#20,31DRLX
#10,aCSRX
#2,CHAN

. #216,31 CRHX

(MPB
BEQ

o
o

000020

o
o

000020

OO
b
oOonNONINN
OO
NNN
VIVINIWO OO
OONN=NW
NS ONON

BGNSEG

MOV

@l CRX ,BAD
#20,BAD
108
#20,G00D

T 2001 ,E901,ERRS01
ERRSOF

O=
OO0

=ON-=
=N

126716
104040

00250
00250

104040

002500

108:

MOV

#104040,BAD
T
ERRSOF

208

#104040,G00D

2002,€6502,ERRS01

126670

20%:

MovB

ENDSEG

sSET UP PARAMETER

sSELECT CHANNEL 1
;====LOAD DAl INTO ACR 1
s====SET UCG BIT IN ISR 1

sSELECT CHANNEL 1
----- LOAD PPS INTO PPR 1

TRAP

SSELECT CHANNEL 2

*LOAD CHANNEL NUMBER

----- LOAD RPP_INTO ACR 2

*GET ICR2 CONTENTS

:1CR CONTENTS SHOULD BE 20
sBRANCH IF

YES

sSET UP DATA FOR ERROR MESSAGE

sERROR HANDLER

TRAP

.WORD
.WORD
.WORD
ERRLOOP IS

sGET ISRZ CONTENTS

TRAP

sATN,EOI ,ATN SHOULD BE SET

‘BRANCH IF YES

sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER

TRAP

+WORD
«WORD
.WORD

:BRANCH TO BGNSEG IF ERR%gR; IS

(kLOOP

000016

ADD

sLOAD DATA FOR PPR
sLOAD FIRST PPE
sCLEAR ULPA BIT IN ISR 1 AND 2

;BRANCH TO BGNSEG IF
a1SRX . BAD

MOV

OCO0O0O
WWVIWES

OO00O0

sIF YES, PRINT THE TEST HEADER

MOV
TRAP

OO0~

104405

120::
;1S THE PNT FLAG SET

MOV

WS
N
WV
N

N=SNNNNNNNES
NS NNNNNNNES
W= W NWSNINING
NONNNNNNNS

PNTF

BEQ

—=au0O0000O0—=000
=Sk fOO==O
OO0O—=0=00~0=
=ON==aNa
O

1ST

(KLOOP

—

6427
6428 053142
053142
6429 053142
6430 053146
6431 053150
053150
053154
053160
053162
053164
6432 053170
6433 053176
6434 053204
6435 053210
6436 053214
6437 053222
6438 053230
6439 053236
053236
6440 053240
6441 053246
6442 053254
6443 053262
644 053270
6445 053276
6446 053304
6447 053312
6448 053314
6449 053322
053322
053324
053326
053330
6450 053332
053332
6451 053354
6452 053342
6455 053350
6454 053352
6455 053360
053360
053362
053364
053366
6456 053370
053370
6457 053372
6458 053400
053400
053400

TEST 20: PARALLEL POLL

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

#16,31CRAX

§ronn LOAD NOT RPP INTO ACR 2
10000%:

TRAP

075"0203-(SP)

SEQ 106

HARDWARE TESTS MACRO M1113 06-SEP-82 16:46 PAGE 62-1
TEST 20: PARALLEL POLL INTERFACE FUNCTION TEST OF CHANNEL 1
sPART 2 CHECKS THE PARALLEL POLL SEQUENCE

(REMOTE CONFIGURED)

OO0O—-000O0—0O—

BGNSEG

#10,aCSRX
#25,9 1DRHX
PC,LOOP

#10,3CSRX

OO0~

ERRSOFT

BIS

mMovB

JSR
ENDSEG

:----LOAD

PPU

l"'o

TRAP
DOR

sWAIT A LITTLE

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
sGET ICR1 CONTENTS
sICR CONTENTS SHOULD BE 25

;====(LEAR PPR REGISTER==cecccccccccaax

;====L0AD NOT DACR INTO A(R l1=cccccces
sCREATE MLA1

#10,3CSRX
MLAT,31DRHX
PC,LOOP

:STORE _MLA1
sSELECT CHANNEL 2
:----LOAD

HLA]

l~'o

DOR

#10,3CSRX

a1CRX,BAD
#5,BAD
MOV

T
ERRSOF

NNO
NN

ONfMMNUWVY
OSSN

WS
NONWN

PC,LOOP

052777

2004 ,E901,ERRS01

000024
000001

126424
126416

#24,31 CRHX

30%:
ENDSEG

sSELECT CHANNEL 2
:----LOAD

PPC

lNro

126414

BIS

CSESEG

TRAP

($BSEG

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

sWAIT A LITTLE

sSELECT CHANNEL 1
sGET ICR1 CONTENTS
:ICR CONTENTS SHOULD BE 5

sBRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE

sERROR HANDLER

#1,31CRHX

;====L0AD

PTS

INTO

TRAP

CSERSOFT

ACR

TRAP

CSCLPl

10002%:

#10,9CSRX

l=ececccccccca-

;====LOAD NOT DACR INTO A(R l======e=-

BGNSEG
000010

DOR

TRAP

2004
.WORD
E901
.WORD
ERRS01
.WORD
sBRANCH BACK TO BGNSEG IF ERRLOOP IS SET

(KLOOP

104405
104404

30§

#5,G00D

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

sWAIT A LITTLE

10001%:

#10,3CSRX
#5,31DRHX

000005

CSERSOF
T

2003
E901
ERR501

:BRANCH TO BGNSEG IF ERRLOOP IS SET
TRAP
cscLPt

BGNSEG

000005

($BSEG

2--------- .....

.WORD
.WORD
.WORD

CKLOOP
MOovB
MovB
MOV
ADD
MOV

sSELECT CHANNEL 2

sBRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER
TRAP

MOV

O=0000 =~

6459
6460
6461
6462 05 60%
05340
6463 053404
6466 05 418
6465 0534
6666 053426
6467 053432
6468 053440
6469 053446
6470 053454
6471 053456
6472 053464
053464
053466
053470
053472
6473 053474
053474
6474 053476
6475 053504
6476 053512
6477 053516
6478 053522
6479 053526
6480 053534
6481 053542
6482 053546
053546
053546
6483 053550
053550
6484 053552
6485 053560
6486 053566
6487 053572
6488 053600
6489 053606
6490 053614
6491 053616
6492 053624
053624
053626
053630
053632
6493 053634
053634
6494 053636
6495 053644
6496 053652
053652
053652
6497 053654
053654
6498 053656

sSELECT CHANNEL 2

TRAP

(SESEG

TRAP

($BSEG

NONSNNNSN

NENNNNSN
N WINWWN~NW

126404

002374
00250
00250

#10,3CSRX
#1,CHAN

*SELECT CHANNEL 1
*LOAD CHANNEL NUMBER

RSAVE ,BAD
40%
RSAVE , GOOD
MOV
ERRSOFT 2005,£901,ERRS01

40$:

MOovB
MOvVB
BIS
mMove

JSR

mMove
MOV

(MPB
BEQ

MOV

126212

50%:

002234
002402
002420

000157
053204

EXQV20:

NW
L)

"sA‘ 'alDRLx

SGET ICR1 CONTENTS

:1CR CONTENTS SHOULD BE PPE
‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

lN'o PPR

:---'LOAD DATA

CSERSOFT

TRAP

(CSCLP1

1---- ..... coee

te=ee 0AD NOT DACR INTO ACR 1===== caee

.77.al°RHx

;----LOAD UNL

PC,LOOP
lZib.alCRHX
aICRX,BAD
MSA1,BAD
50%

SWAIT A LITTLE
tee==OAD RPP INTQ A(R 2e=ee-ecccccces
SGET ICR2 CONTENTS
:COMPARE DATA
:BRANCH IF YES

#10,3CSRX

MSA1,G0OOD

SSELECT L. ANNEL 2

l”[O DOR 2 ....... ppp———

SSET UP DATA FOR ERROR MESSAGE

T 2006.E901,ERRS01
ERRSOF

:ERROR HANDLER

CKLOOP

.WORD
.WORD
.WORD
:BRANCH TO BGNSEG IF ERRLOOP IS

MovB

ENDSEG

#16,31CRHX

TRAP

10003$%:

062

TSHD20:

CSCLP1

TRAP

CSEXIT

EXQV20

SEXIT TEST IF YES

:CREATE NEW PPE
:CHANGE DATA
:ALL PPE DONE

:IF NO TEST ITERATION

SEXIT TEST

WORD

123

SET

CSESEG

;1S QUICK VERIFY PASS SELECTED
:IF YES EXiT TEST

1TAC20

2006
E901
ERRSO1

TRAP

QVP
EXQV20

(SERSOFT

;====L0AD NOT RPP INTO A(R 2=========-

L10051-.

BEX

6§§ZZAPARALLEL POLL INTERFACE FUNCTION TEST OF CHANNEL 1IN/
L10051:

104401

TRAP

#1,31CRHX

RSAVE
MSA1
#157 ,RSAVE

002402

SWAIT A LITTLE

2005
WORD
E901
LWORD
ERRSO1
.WORD
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET

CkLOOP

WOWIWNIWN
= WO
NNNNNNONWN

se===L0AD PPE INTO DOR 2====eccccccccs

alCRX,BAD

002500

NONNNNNNNNOY

045

RSAVE ,a IDRHX

PC,LOOP

126374

OSVIN

O8NV
W= WWWNWNNNNO

= = S
el ON) —_—
W= wiNnoN

OO0O—-000C

O OO
WWVHNES

O00—

=ON==O-=WN=a20
&

OO—=O=O=0O==as

OO0O0O0

—_—

-0

OO0
=

002402

000016

b ) O VN = N
ErDNKWOC"DE!
- NN
NO N S

E;OODN“’\an~

VIV
AW
oo

oo
OO0

6521 054050

[elelellelele

4046

SEQ 167

-SEP-82 16:46 PAGE 62-2
E FUNCTION TEST OF CHANNEL 1

o0
o~
or

4044

6520 054046

113777

NN N NN N NN NN
NNNNNNNNNNNNSNSN ~
VWSS
£ 85 55 WNNWNNON)
=
SO oo oo
£

OOONO
WV
NN =O

e
—

) ad

)

o
oo

o oo

6
6

672
5 676
53704
5
5

(=l=lelelalele]

WA WA

&
SEIRER2 8

6499 0%3664

oOro—-00O
NON=OON

HARDWARE TESTS MACRO M 1
TEST 20: PARALLEL POLL INTERF

L 13

TRAP

CSETST

SEQ 168

HARDWARE TESTS MACRO M1113 06-SEP-B2 16:46 PAGE 63
TEST 21: PARALLEL POLL INTERFACE FUNCTION TEST OF CHANNEL 2

.SBTTL

MUAAAA LA

:PART 1

TEST 21: PARALLEL POLL INTERFACE FUNCTION TEST OF CHANNEL 2

AL A

AR Al

ARl

IEX = TEST 21

CHECKS PARALLEL POLL SEQUENCE

dds])

(LOCAL CONFIGURED).

:PART 2 CHECKS PARALLEL POLL SEQUENCE (REMOTE CONFIGURED).
AR

AL AL AL AR A

AR AR

A ARl
dRdRtdtd])

TST
BEOQ
PRINTF

7%:

T
NNO
wVINO
SO0

000020

SONON

BIS

Movas

8IC

MOV
MovB
MOV

CMPB
BEQ

MoV

T
ERRSOF

4400

6567 054402

54450

054450

#40,3] SRHX

002500

MOV

NS
NS
N
NOT

104405

125620

MOovB

ENDSEG

TRAP

----- 0AD PP5 INTO PPR 2

SSELECT CHANNEL 1

*LOAD CHANNEL NUMBER

----- LOAD RPP INTO ACR 1

:1CR CONTENTS SHOULD BE 20
:BRANCH IF YES
3

sSET UP DATA FOR ERROR MESSAGE

sERROR HANDLER

TRAP

.WORD
.WORD
+WORD
;BRANCH TO BGNSEG IF ERRLOOP IS
als
£10

#10

20%

T 210
ERRSOF

20%:

:LOAD DATA FOR PPR
sLOAD FIRST PPE
:CLEAR ULPA BIT ISR 1 AND 2
sSET _UP PARAMETER
sSELECT CHANNEL 2
s====L0OAD DAl INTO ACR 2
s====SET UCG BIT IN ISR 2

*GET ICR1 CONTENTS

2101,€6901,ERRS01

#TSHD21,-(SP)
#1,-(SP)

TRAP
ADD

alCRX,BAD
#20,BAD
10%
#20,G00D

#216,31CRHX

sGET ISR1 CONTENTS

TRAP

sATN,EOI,ATN
SHOULD BE SET
+BRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER
TRAP
.WORD
.WORD
.WORD

:BRANCH TO BGNSEG IF ERRLOOP IS

CKLOOP

000016

MOV
MoV
MOV

:SELEET CHANNEL 2

104040

10$:

121::

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

#10,3CSRX
#20.,31DRLX
#10,3CSRX
#1,CHAN

NS
o
m s

=N
NN
W=
NOwN

002502
002502

WSS
NSO
OSSOV
ONOAN

OO0
=ON

125646
104040

O0O0=
O0O0O0
—_—
-

6572 054430
054430
054432
054434
054436
6573 054440
054440
6574 054442
6575 854650

#10,3CSRX
#22%,
31 CRHX

CkLooP

4402

6568 054404

PC,CILPA
PC .BGINT

MOvB

002500

7%
#TSHD21

#1,MSA1

BGNSEG

000020

PNTF

#140,RSAVE

ITAC21:

NI
WVIVINNWSNINNY
OONINESWVON

oW
\fi‘U“fl\“‘N‘PWg
VIS
NONNNNNNSN

NNNWWWWNO
=O N
NNNNNNNOANOOOr

002324

°°—l°—.-‘-‘
OOoONOMNINN

-0

=SPONNONNNNES
NN SN
SO
O NENNNNNNNE
NNNNNNNNSONNN

—=2=2000000—-000

- b Y o0prerurdo b

- ON)
= b ey
b §N Py(=4
~N

OO0=0=00—=0=

(=]=]
H~

=W
OWN

BGNTST

#16,3
1 CRHX

TRAP

;===== 0AD NOT RPP INTO ACR 1
10000%:

TRAP

(SESEG

N 13

SEQ 169

HARDWARE TESTS MACRO M1113
06-SEP-82 16:46 PAGE 63-1
TEST 21: PARALLEL POLL INTERFACE FUNCTION TEST OF CHANNEL 2

6576
6277

PART 2 CHECKS THE PARALLEL POLL SEOUENCE (REMOTE CONF IGURED)

6578
6579 054452
05445
6580 054456
6581 054462
6582 054470
6583 054474
6584 054502
6585 054510
6586 054516
6587 054524
6588 054526
6589 054534
054534
054536
054540
054542
6590 054544
054544
6591 054546
6592 054554
6593 054562
6596 054566
6595 054572
6596 054576
6597 054604
6598 054612
6599 054616
054616
054616
6600 054620
054620
6601 054622
6602 054630

e ek

O
O

DxITQOD
P
P>PMNO -

VOown
o

O=O0000C
(=GN =l=l=l=]
(===
=]
OWVOOOO0O
NVO =0\ —
VIONOOWO

BGNSEG

§,6901,ERRS01
.

T
ERRSOF

SWAIT A LITT

;SELECT CHANNEL 2

:LOAD CNANNEL NUHBER

sGET ICR2
NTS
C
;1CR CONTENTESSHOULD BE 25

:BRANCH IF
sSET UP DATA FOR ERROR MESSAGE
:ERROR HANDLER

sBRANCH TO BGNSEG IF ERR%gOP IS
#0,31DRLX
#1.31CRHX

DPA2,R1

#40,R1
R1,MLA2
#10,3CSRX
nLAé 3 1DRHX
PC,LOOP

s====CLEAR PPR REGISTER
""" LOAD NOT DACR INTO ACR 2
CREATE MLA2
STORE MLA2
:SELECT CHANNEL 1

----- LOAD MLAZ2 INTO DOR 1
SWAIT A LITTLE

10001$:

#10,2CSRX
#5,31DRHX
PC .LOOP

NN
WS
NONNN

#10,3CSRX

NOOSS
O8NV
NSON
NNES
NNO
NN

30%:

042777

MovB
Move

ENDSEG

104405
104404

:ERROR HANDLER

:SET UP DATA FOR ERROR MESSAGE
TRAP

:BRANCH TO BGNSEG IF

CKLOOP

000024
000001

----- LOAD PPC INTO DOR 1
SWAIT
A LITTLE

2104 ,€901,ERRSO1

#5,600D

#24 oal(RHl
"
#1,91CRHX

000010

BIC

.WORD
.WORD
.WORD
ERR%SR; IS

;====LOAD PTS INTO ACR 2
:====LOAD NOT DACR INTO ACR 2
100028%:

BGNSEG
125344

#10,3CSRX

CSESEG

($BSEG

sSELECT CHANNEL 1

o£

#5,BAD

T
ERRSOF

TRAP

sSELECT CHANNEL 2
:GET ICR2 CONTENTS
:ICR CONTENTS SHOULD BE 5
:BRANCH IF YES

31CRX.BAD
M

($BSEG

«WORD

CKLOOP

23%:

TRAP

sSELECT CHANNEL
1
LOAD PPUEINTO DOR l====

sSELECT CHANNEL 1

TRAP

CSESEG

TRAP

($BSEG

6649

125334

| b

:$6L29§lx

002500

MOV

O
N
o
NV
NS =N

TRAP

SQ RSOFT

-'OOOQO%

105
«WORD
E901
+WORD
ERRS501
.WORD
sBRANCH TO BGNSEG IF Eflfl%ggz IS SET
cscLP
;====_0AD DATA INTO PPR 2~

o
o NO =000

#77,31DRHX

sSELECT CHANNEL 1

Ps LOOP

SWAIT A LITTLE

alCRX ,BAD
MSA1,BAD

sGET ICR1 CONTENTS
;sCOMPARE DATA
sBRANCH IF YES

#216,31CRHX

MOV

1,600D

6,E901,ERR501

ERRSOF T

:----LOAD

RPP

l"to

Aca

1-----------.--

sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER
TRAP

+WORD
.WORD
__TWORD _
;BRANCH TO BGNSEG IF V'RRLOOP IS
000016

125142

TRAP

#16,3
1 CRHX

10003$:

002402
002420
000157

TRAP

;1S QUICK VERIFY PASS SELECTED

002234

cscLP

CSESEG

sCREATE NEW PPE

002402

054254

Exavel:

s CHANGE DATA
sALL PPE DONE
SEXIT TEST IF YES
:1F NO TEST ITERATION
SEXIT TEST

TRAP

.WORD

123

CSERSOF
T

2106
E901
ERRSO1
SET

sIF YES EXIT TEST

: ;0! ERROR MESSAGE

asngs 600D

ERRSOFT 2105,£901,ERRSO1

gARE

NS
NS
NO
NO

T
YES

Rg:VE.B‘D

O0O0=
OO0O00

S N=NNONS

E.,3IDRHX

WSS
NOOS
OfNWVY
NSNUN

OO0O—O—
=ON—==

S=R

W=nWNN
NOENNNNNNNNS
WS WIWNWNNN
NONNNNNNYNY

6640 055130
0551
6641
666i 551
05514
6643
6644 055146
6645 055154
6646 055156
6647 055162
055162
055164
6648

—_—
-0

SRRR

OoONN
ooonNSsONSOC OO

116

55116
120
055126
126
55126

ONO =0 O

NOENNNNNN
NS UINWNNWNSN
NONNNNNN

55114

QO =000 —
ONOOOOO
- NI O N =2 VN S

6638
6639

elelelolelelelelelelelelelelelalelelelolelololelelolalelolalalalalelalelelal=l=ll

-0

s M

SEEFEEEEE NI
%>

AIRRORIA)
= = s =4
S W=000

SESESIEIE gE &
FRRURIETRNSE &
6637

1
106
106
110
112

SEQ 170

3 06 -SEP-8 ; 16:46 PAGE 63-2
ERF ACE FUNC ION TEST OF CHANNEL 2

062

(35!;!

L10052-.

BEX

6%;21APAR!LLEL POLL INTERFACE FUNCTION TEST OF CHANNEL 2%IN/
L10052:

TRAP

CSETST

€14
HARDWARE TESTS MACRO M1113 06-SEP-82 16:46
TEST 22: END OF A MESSAGE BLOCK TEST

6655

JSBTTL

“g

SEQ 171

PAGE 64

TEST 22: END OF A MESSAGE BLOCK TEST

.""."0"Q"'"""C""55""'"Q"'Q"'.'.Q.Q".'""""'00""0"""'.

1EX = TEST

6658

pAnr 1 cuecxs THE END OF A MESSAGE BLOCK FROM CHANNEL 1. CHANNEL 2 SENDS THE

666%

.'QQ'Q'Q"'QQQ""""""'"'0""""0.'".QQ'."QO.'.""""Q'Q'..'Q'Q'Q"

6659
6660
6661

666

EO] MESSAGE VIA THE IEC/IEEE BUS
PART 2 CHECKS THE END OF A MESSAGE BLOCK FROM CHANNEL 2. CHANNEL 1 SENDS THE
:
EO] MESSAGE VIA THE IEC/IEEE BUS.

8?2 g

6664 85§ 6

6665

BGNTST

805737

01410

002324

815766

057202

055304
6667 055310

oogrgg
005037

000004
002322

104404
112777

000223

124734

:1;777

ooo§11

124676

187

PNTF

:1S THE PNT FLAG SET

PRINTF

#T1SHD22

3eee

BEQ

6666 055270
055270

*1F YES, PRINT THE TEST HEADER

055274
012746 000001
055300 010609
055302 10441

6668 055314
6669 055 go
6670 055324
055324
6671 055326

004737
004737

6676 055364

6677 055372 013701
6678 055376 oszrgt
6679 055402 010137
6680 055406 113777
6681 055414 004737

002314
000100
002416
002416
011060

7%:

CLR

JSR
ITAC22: JSR
BGNSEG

1%6736
124720
124722
124704

MOVB

#211.3ICRHX

MOVB

055426

ENDSEG

#10,3CSRX
#22%5,31CRHxX
#10,9CSRX
#20%8,31CRMX

DPA2.R1
#100.R1
R1,MTA2
nrnz 3 I DRHX
LOOP

013 AICRHX

SSELECT CHANNEL 2
t===={0AD DAI 1~ro T I L
—S
SELECT CHANNEL1
ieeea LOAD HDFA INTO ACR 1==escccccccs

ieeee LOAD LON INTO ACR l==eeeee ccccace

casare MTA2
$T0RE MTA2
t=e== 0AD nrnz INTO DOR 1===== ccccccce
UAI! ALITIL

ieeea LOAD crs INTO ACR 1==ccccceee ceee

055430
6685 055432

104404
052777

000010

124640

BIS

#10,3CSRX

;SELECT CHANNEL 2

6689 055462

017737

126562

002502

MOV

alirRx.BAD

*GET IIR1 CONTENTS

MOVB
BIC
MOV

6690 055470 022737 000060 002502
6691 055476 001410
6692 055500 012737 000060 002500
6693 055506

0185 3 1DRHX
SCSRX
#1,CHAN

CMP
#60,BAD
BEQ
108
MOV
#69,6GOOD
ERRSOFT 2201 ,E501,ERRSO1

104457
004231
005406
003702

017737

100008:

BGNSEG

112777 000125 124630
042777 000010 126?;4
012737 000001 002374

104406

CKLOOP
124532

#4,SP

TRAP
($BSEG
jee=ee LOAD DAI INTO ACR leeeeceee cceeee

104405

055506
055510
055512
055514
6696 055516
055516
6695 055520

ADD

002502

6696 055526 022737 0300064 002502

10$:

MOV

CMP

aisax BAD

0004 ,BAD

#,-(SP)
SP RO
CSPNTF

*CLEAR ULPA BIT IN ISR 1 AND 2
‘SET UP PARAMETER

055426
ossage

6686 055440
6687 055446
6688 055456

#TSHD22,=(SP)

:CLEAR ITERATION COUN s

PC,CULPA
PC.BGINI
#223,3ICRHX

MOV
ADD
MOV
MOVB
JSR

124662

ITRCNT

MOVB

BIS
MovB
BIC
-move

6682 055420 112777 000013 124642
055430

MoV

MOV
MOV
TRAP

o1og§o
010534

667; 055336
052777 ooootg
6673 055342 112777 000223
6674 055350 042777 000010
6675 055356 312777 000203

6683

N
1

TRAP

CSESEG

TRAP

($BSEG

teee=l 0AD DATA INTO DOR 2==ceeeceeees SSELECT CHANNEL 1
SLOAD CHANNEL NUMBER

81,80 BIT SHOULD BE SET
‘BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

TRAP
CSERSOFT
.WORD
2g01
"WORD
ESO1
"WORD
ERRSO1
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
CSCLPY
TRAP
:GET ISR1 CONTENTS

*NDAC,NRFD,LADS SHOULD BE SET

}

WARDWARE TESTS

TEST 22: END O

D 14

0 M1113

A MESSAGE BLOCK TEST

6698
85 gzz
6699 055544

6697

06-SEP-82 16:46

030004

BEQ

002500

298004, Go
Y
SOF
zzoz.ssgg?ena501
ERR

sBRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER

CKLOOP

«WORD
i
<WOR
£50
ERR501
.WORD
;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET

MOV

0225 g

0555
6700 855 2

053856
o701
6% §as3ct

002502

000125

MOV

CLRB
SWAB
(MPB
BEQ

aIDRX ,BAD
BAD
BAD
#125,BAD

23%

#125,G00D
T 2203,8222,ERRS01
ERRSOF

002500

MOV

NONNNNNNNNES

00000
00000
000204

BGNSEG

000010

002502

000126

002500

104406
104405

:----LOAD

R“D'

;----LOAD

No‘

:.---LOAD

HD'E

#10,3CSRX

;SELECT CHANNEL 2

#204,31 CRAX

INTO
“D"

:----LOAD

#10,3CSRX

sSELECT CHANNEL 1

30%

#126,600D

DAIA

Ac“
l"'o

l“to

#126,31DRHX

T 2204 ,£222 ,ERR501
ERRSOF

005675
003702

cscLPl

s COMPARE WITH LOADED DATA

#2,3]1CRHX
#3
31 CRHX

a1DRX,BAD
BAD
BAD
#126,BAD
MOV

TRAP

sBRANCH IF 0K
sSET UP DATA FOR ERROR MESSAGE
sERROR HANDLER
TRAP

10001$:

PC,LO0P

000126

S’SISO'!

sSWAB HIGM AND LOW BYTE

ENDSEG
Move
MOvB
MOovB

NS
WY
SN

=N OWVINMNSNNES

bbbt

=l
NN
S
NSNS
NNNO
NNNwn

23%:

;GET DIRT CONTENTS

TRAP

T
CSERSOF

2203
+WORD
.WORD
E222
ERRS01
.WOR
;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET

CkLOooP

OO0=0O=0O OO =D =
o=P O=NO
o0
= ONOO

6704 055574
6705 055602
6706 055604
6707 055615
05561
055614
055616
055620
6708 055622
055622
6709 055624
055624
055624
6710 0556%6
6711 055634
671% 055642
6713 055650
055650
6714 055652
6715 055660
6716 055666
6717 055672
6718 055700
6719 055706
6720 055712
6721 055716
672§ 055724
672 0557%2
6724 0557
055734
055736
055740
055742
6725 055744
055744
6726 055746
055746
055746
6727 055750
055750
6728 055752
67%9 055760
6730 055766
6731 055774
6732 056000

002502

20%:

SEQ 172

PAGE 64=1

IN‘O

Aca

TRAP

cscLP

TRAP

CSESEG

‘ ........ eseoeee

ACR

1--- .....Ed

1-------------

TRAP
DOR

($BSEG

2 ....... -ceeoeee

sWAIT A LITTLE

sREAD DATA FROM DIRY

sCLEAR LOW BYTE OF IDR REGISTER
:SWAB HIGH WITH LOW BYTE
;COMPARE DIR CONTENTS WITH LOADED DATA
sBRANCH IF EQUAL

sSET UP DATA FOR ERROR MESSAGE

sERROR HANDLER

CkLOOP

308:

ENDSEG

10002%:

BGNSEG
BIS

MOovB
Move

JSR
BIC

#10,3CSRX
#1031 CRHX

#12%,31DRHX
PC,LOOP
#10,3CSRx

(SESEG

1113 06-SEP-82 16:46
0
SS GE BLOCK TEST
>%

HARDWARE TESTS

036336 002305

MOV

a bax.aao

:GET TIR1 CONTENTS

000050

BEQ

MOV

33¢

‘BRANCH IF YES

CMP

002500

#50,8AD

‘BI,END BIT SHOULD BE SET

#50 Gogo

SSET UP DATA FOR ERROR MESSAGE

ERRSOFT 2205,E501,ERRSO1

*ERROR MANDLER

W=~

1246206
034004

002502
002502

034004

002500

33%:

MOV

CMP
BEQ

OO—=O—=0O-=
=ONOO-—
N=NOWVIN

00012

002502

000127

002500

MOV
CLRB
SWAB
CMPB
BEQ

40$%:

34004 , GOOD

SSET UP DATA FOR ERROR MESSAGE

:ERROR MANDLER

#127,600D

*ERROR HANDLER

NNNNNNNW

NNNNNNNS
NNWNNNNO

b e () s =D md 2 =D
O
e = O
NS RONONON B~

S8
NN
W
NN

oo
S
NNNNNES
NNNNNO
SNNNNNES

10003$:

MOVB

#2,3lCRHX

MOVB

#11.31CRHX

;====L0AD RHDF

#15,31CRHX

CSERSOFT

TRAP

CSCLPY

TRAP

CSESEG

INTO ACR lecececccccca-

MOvVB

013’,310RHX

move
MOVB

#200,a1CRHX
#0,aiCRHX

tee==L0AD SWRST INTO A(R =cecccccccee
te==el 0AD NOT SWRST INTO ACR le=eeceee-

PC boop

SWAIT A LITTLE

2 CHECKS THE “END OF A MESSAGE BLOCK'' OF CHANNEL 2
e

TRAP

teeeel0AD TCS INTO ACR leeeccccccccccete=== 0AD NOT LON INTO ACR le=ceccceee
s==== 0AD UNT INTO DOR l==eecccccccces

JSR

CSCLPY

2207
MORD
"WORD
E222
ERRSO1
‘WORD
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET

ENDSEG

P R

TRAP

SSET UP DATA FOR ERROR MESSAGE

CKLOOP

Move

CSERSOFT

:READ DATA FROM DIR1
:CLEAR LOW BYTE
SSWAB HIGH WITH LOW BYTE
:COMPARE LOADED DATA WITH DIR CONTENTS
*BRANCH IF EQUAL

ERRSOFT 2207.E222,ERRSO1

43%:

TRAP

2206
MORD
.WORD
ES502
ERRSO1
.WORD
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET
31DRX,BAD
BAD
BAD
#127,BAD
43$

MOV

CSCLPY

*NDAC ,NRFD,EOI,LADS, IS SET
:BRANCH IF “YES

ERRSOFT 2206,E502,ERRS01

OCO=
OO0
WVISS

002502

TRAP

:GET ISR1 CONTENTS

CKLOOP
124164

Sssnsort

a;sax BAD

#34004,BAD
40%

MOV

TRAP

i 5
.WORD
ESO1
.WORD
ERRS01
.WORD
;BRANCH BACK TO BGNSEG If ERRLOOP IS SET

CKLOOP

056068
05607
056070
056072
056074
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
056150
056150
6754 056152
6755 056160
6756 056166
6757 056174
6758 056202
6759 056206
6760 056214
6761
676
66
6764 056222
6765 0562;6
6766 0562 S
05623
6767 056234
6768 056242
6769 056250
6770 056256
6771 056264

674
6743

Vet Nt NO

6741 05606

O=O=0—=

6733 856006
56014
67
6735 0360 ¢
056024
6736
67357 0560 s
0560
0560
0560
056040
6738 05604
85606
6739 05604
6740 056058

2 8882 28833

TEST 22: END OF

SEQ 173

PAGE 64-2

T T

JSR

BGNSEG

BIS
MOVB

BIC
MOVB
BIS

T P T

PR P

FC,CULPA

PC.BGIN2

#10,3CSRX
028. a1 CRHX

#10,3CSRX
#22%,31CRHX
#10,3CSRX

L L R

L R

DD L DL

DL D

LIt

Ll bl

:CLEAR ULPA BIT IN ISR 1AND 2

SSET UP PARAMETER

TRAP

($BSEG

;SELECT CHANNEL 2
t====l0AD DAl INTO A(R 2====eeeeeccee=

SSELECT CHANNEL 1
t=e==LOAD DAl INTO A(R le=ececcccceccen
SSELECT CHANNEL 2

E 14

F 14

HARDWARE TESTS MACRD M1113 06-SEP=82 16:46 PAGE 64=3

TEST 22: END OF A MESSAGE BLOCK TEST

6775 056 OS 112777 80%11 15 76

MOVB
MOVB

677? 05631

MOV

6772

056272

112777

0203

6774 056 og
6775 056312

13701
062701

00 18
8 10

6777

113777

026414

056

6778 056
6779 056334

6780 05634
05634
ogegz
6781 056344
osegza

10137

0047;7
112777

414

011062
000013

12377

MOV
ADD

123746

MOvVB

JSR
Move

123726

ENDSEG

104405

ieeee 0AD LON INTO ACR 2=ccccccccccces

#203,31CRHX
,S11,a[(nu1

se=esl 0AD HDFA INTO ACR 2=cccccccccces

R1,MTA1

:STORE MTA1

DPA1.R1
#100,R1

MTA1,3]1DRHX

PC,L00P
#1%5,31CRuX

SCREATE MTA1
e

;====| 0AD MTA1

INTO DOR 2e==eccccccccccs

SWAIT A LITTLE
ieee=|0AD GTS INTO ACR 2-=
100048
:

BGN3EG

056346

104404
042777

000010

1%3724

BIC

#10,3CSRX

sSELECT CHANNEL 1

6784 056 65

052777

000010

123710

BIS

#10,3CSRX

SSELECT CHANNEL 2

6786 056376
6787 056406
6788 056412
6789 056414

017737
022737
001410
012737

6782

6783 056354
6785 056370

6790 056422

056422
056424
056426
056430
6791 056432
056432
6792 056434

6793 056442

112777

012737

104406
017737

022737

001410
012737

056460
056462
056464
056466
6797 056470
056470
6798 056472

104457
004241
005447
003702

00 056504
6801 056510
2 056516
6803 056520
056526

000337
122737
001410
012737

99 056500

056526
056530
056532
05653¢
6805 056536
056536
6806 056540

056540
056540
6807 056542
6808 056550

123714

000002

005374

000060

002500

123646
000060

MOv8
MOV

002502
002502

MOV
CMP
BEQ
MOV

104406
017737

105037

#2,CHAN

aliRx,BAD
#60,BAD
10%
#60,G00D

123616

030006
030004

002502

108:

002500

123574

002502

002502
000125

002502

000125

002500

23%:

ooooog
000003

153520
123512

($BSEG

t==e=l0AD DATA INTO DOR l=eeccccccccces
:LOAD CHANNEL NUMBER

SGET 1IR2 CONTENTS
‘80,81 BIT SHOULD BE SET
*BRANCH IF YES
*SET UP DATA FOR ERROR MESSAGE

*ERROR MANDLER

BEQ
MOV

20
#30004 ,GOOD

‘BRANCH IF YES
*SET UP DATA FOR ERROR MESSAGE

MOV

a1DRX,BAD

TRAP
CSERSOFT
WORD
2209
.WORD
ES02
.WORD
ERRS01
:BRANCH BACK TO BGNSEG If ERRLOOP 1S SET
TRAP
CSCLPY
:GET DIR2 CONTENTS

SWAB
(MPB
BEQ
MOV
ERRSOFT

BAD
#125,BAD
238
#125,G00D
2210,E222.ERRS0

‘SWAB HIGH AND LOW BYTE
*COMPARE WITH LOADED DATA
‘BRANCH IF OK
SSET UP DATA FOR ERROR MESSAGE
;ERROR HANDLER

#30004 ,BAD

CLRB

BAD

CKLOOP

104406

TRAP

a1SRX,BAD

CMP

ERRSCFT 2209,E502,ERRSQ1

208:

CSESEG

MOV

CKLOOP
002502

TRAP

TRAP
CSERSOFT
LMWORD
2208
.WORD
ESO1
.WORD
ERRS01
;BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
CSCLP
:GET ISR2 CONTENTS

CKLOOP

104457
004242
005675
003702

104405
112777
112777

#125,31DRHxX

ERRSOFT 2208,E501,ERRSO1

104457
004240
005406
003702

6794 056450
6795 056452

6796 056460

000125

ENDSEG

MOVB
MOVB

*NDAC,NRFD,LADS SHOULD BE SET

*ERROR HANDLER

;

TRAP
CSERSOFT
MORD
2210
‘WORD
E222
"WORD
ERRSO01
:BRANCH BACK TO BGNSEG If ERRLOOP IS SET
TRAP
CSCLP
10005$:

#2.31CRHX
#3.31CRHX

TRAP
CSESEG
;====L0AD RHDF INTO ACR 2====eeeceece=
tee=={OAD NOT HDFA INTO ACR 2=========

0 174

6 14
HARDWARE TESTS MACRO M1113
06-SEP=-B2 16:46
TEST 22: END OF A MESSAGE BLOCK TEST

6809 056556
6810 056564
056564
6811 0565?6
681§ 056574
6813 056602
6814 856606
6815 056614
6816 056622
6817 056626
6818 0566 8
6819 05664
6820 0566‘8
6821 05665
056650
056652
056654
056056
6822 056660
056660
6823 05666%
05666
056662
6824 056664
6825 056672
6826 056700
056700
6827 056702
6828 056710
68;9 056714
6830 056722
6831 056730
683§ 056736
6833 056740
6834 056746
056746
056750
056752
056754
6835 056756
056756
6836 056760
6837 056766
6838 056774
6839 056776
6840 057004
057004
057006
057010
057012
6841 057014
057014
686; 057016.
6841 0570;‘
6844 057030
6845 057034
6846 057042

112777

SEQ 175

PAGE 64=4

000204

123504

MOvVB
BGNSEG

#204
, 21 CRHX

;====LOAD HDFE INTO A(R 2=====cececeee

042777

000010

15;594

BIC

#10,3CSRX

sSELECT CHANNEL 1

0267 7
0 ;7 7
017737

011060
00201
18 452

123464
002502

JSR
BIS
MoV

106496

112777

105037

000337
1%27 7
001410
012737

000126

0 SSO

123474

00250
000126

002502

000126

002500

MOovB

CLRB

104457

308:

100068:

011060
000010
123322
000050

123356
002502
002502

000050

002500

CsCLP

TRAP

(SESEG

002502
002502

sBRANCH IF

034004

002500

104457
004244
005447
003702

123250

002502

00250;
000127

002502

40%:

DOR

TRAP

($BSEG

1 .............

YES

sSET UP DATA FOR ERROR MESSAGE

sERROR HANDLER

T
ERRSOF

33$%:

tho

sSELECT CHANNEL 2
sGET _I1IR2 CONTENTS
:B1,END BIT SHOULD BE SET
TRAP

CSERSOFT

WORD
.WORD
.WOR

2212
ES5O01
ERRS01

TRAP

CsCLPl

;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET

(kLOOP

123272
034004

DAIA

sWAIT A LITTLE

JSR
BIS
MoV
CMP
BEQ
MOV

004244
005406
003702

002502

TRAP

:----LOAD

104457

000337
122737
001410

ENDSEG

MovB

000127

105037

CSERSOFT

123366

104404
112777

017737

sBRANCH IF EQUAL
sSET UP DATA FOR ERROR MESSAGE
;ERROR HANDLER
TRAP

MOVB
BGNSEG

000010

104409

;CLEAR LOW BYTE OF iDR REGISTER
;SWAB HIGH WITH LOW BYTE
sCOMPARE DIR CONTENTS WITH LOADED DATA

123370

112777

017737
022737
001410
012737

sSELECT CHANNEL 2

sREAD DATA FROM DIR?

;SELECT CHANNEL 1
i====L0AD FEOI INTO ACR 1ee=eccccccce-

123406

104406

sWAIT A LITTLE

BIC

000010

004737
052777
017737
022737
001410
012737

($BSEG

221
.WORD
.WORD
E222
ESOT
.WORD
:BRANCH BACK TO BGNSEG IF ERRLOOP IS SET

(xLOOP

104406

042777

BAD

BAD
SWAB
#126,BAD
(MPB
308
BEQ
#126,600D
MoV
ERRSOFT 2211,E222,E501

004243
005675
0054

104405

#126,31DRHX
PC,LO0P
#10,3CSRx
31DRX,BAD

TRAP

MOV
CMP
BEQ
MoV
T
ERRSOF

X ,BAD

04 ,BAD
04, GOOD

L,E502,ERRSO1

sGET ISR2 CONTENTS
OI IS SET
,LADS
sNDAC,NRFD,E
sBRANCH IF YES

sSET UP DATA FOR ERROR MESSAGE

;ERROR HANDLER

TRAP

CSERSOFT

TRAP

CSCLPY

(kLOOP

2212
LWORD
ES502
LWORD
ERR501
.WORD
;BRANCH BACK TO BGNSEG IF ERRLOOP IS SET

MOV

sREAD DATA FROM DIRZ2

CLRB

SWAB
(MPB
BEO

alDRX ,BAD
BAD
BAD
#127 ,BAD

;CLEAR LOW BYTE

sSWAB HIGH WITH LOW BYTE

s COMPARE LOADED DATA WITH DIR CONTENTS
sBRANCH [F EQUAL

H 14
HWARDWARE TESTS
TEST

22: END OF

6847 8 70644
6848

057 ss
057052
057054
057056
057060
6849 osroes
057062
6850 057064
057064
057064
6851 057066

sasg 057074
6853

057102

6854 057110

6855 057116

6856 057122

6857 osr1§6
6858 057130
6859 05713¢
6860 057142
6861 057144

6862

6863

057152

MACRO M1113

A MESSAGE BLOCK TEST

012737

MOV

#127.,600D

ERRSOFT 2213.£222,ERRSOY

CKLOOP
43%:

ENDSEG

;SET UP DATA FOR ERROR MESSAGE
*ERROR WANDLER

TRAP
(SERSOFT
.WORD
2313
JWORD
E222
.WORD
ERRS01
;BRANCH BACK TO BGNSEG IF ERRLOOP [S SET
TRAP
(CSCLPI
10007$:

104405
112777

000002

123174

MOVB

#2,31CRHX

TRAP
(SESEG
;e=ee 0AD RHDF INTO A(R 2=ccccccccccce

112777

000011

123160

MOVB

#11.31CRHX

teeee 0AD NOT LON INTO ACR 2ececccccee

ooargr

011060

112777
112777

005737

oo1o§3
005237
023737
001415
042777

112777

6865 057172
6866 057176
057176

000137

112777

057200

104432
000046

6869 057202

045

057246
057246

1044601

6870
6871
6872 057246

002500

104406

004737

6867
6868

000127

SEQ 176

PAGE 64=5

104457
004245
005675
003702

057160

6864 057164

06-SEP=-B2 16:46

000015

000137

123166

MOvB

123160

MOVB
JSR

002234

002322
002322

002320

000010

123126

000217
011072

000017

055320

123

BNE
INC
CMP
BEQ
BIC

123110

123076

062

MOVB
JSR

MOVB

JMP
EXQv22: EXIT

TSHD22:

#15,31CRHX

#137,31DRHX
PC,LO0P

QvP

EXQV22
[TRCNT
ITRCNT, I TRDEF
EXQV22
#10,3CSRX

#217,3]1CRHX
PC,WALT

#17,31CRHX
1TAC22
187

NLIST

BEX

LIST
-EVEN
ENDTST

BEX

.ASC12

ieeee[0AD TCS INTO A(R 2=cecccccccccces
ieeee 0AD UNT INTO DOR 2=cececccccccee
SWAIT A LITTLE

SIS QUICK VERIFY PASS SELECTED
+1F YES EXIT TEST
: INCREMENT COUNTER
;ALL DONE
;1F YES, EXIT TEST
SSELECT CHANNEL 1

i=eee0AD SIC INTO ACR lecccccccee
SWAIT A LITTLE

ie=e= 0AD NOT SIC INTO ACR le=eeee
SIF NO TEST ITERATION
JEXIT TEST

TRAP
LWORD

CSEXIT
L10053-.

TRAP

(SETST

/%S2XAEND OF A MESSAGE BLOCK TESTEN/

L10053:

WARDWARE TESTS MACRO M1113 06-SEP=-82 16:46 PAGE 65
TEST 23: DMA DATA TRANSFER TEST FROM CMANNEL 1

6874

JSBTTL

TO 2

TEST 23: DMA DATA TRANSFER TEST FROM CHANNEL 1 TO 2

6875

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

6876
6877
6878
6879
6880

;
sPART
:
3
;
;
SPART
;
:
:PART
;
:PART
:

6881
688

688
6884
6885

6886

6887

6839

1EX = TEST 23
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
WHICH 1S SELECTED AS A LISTENER PERFORMS A DATOB
YCLE. THE MAX. SELECTABLE BYTE COUNT FOR THIS DATA TRANSFER IS

K BYTES AND THE WIGHEST BUS ADDRESS 1S BELOW 32K.
2 CHECKS THE NON EXISTENT MEMORY BIT OF CHANNEL 1
THIS 1S DONE BY A DMA FROM A NON EXISTING I/0 PAGE APDRESS SELECTED
IN THE BUS ADDRESS REGISTER OF CHAN. 1 (DATI CYCLE).
3 SAME PROCEDURE AS IN PART 1 EXCEPT THE DATA TRANSFER 1S EXECUTED
OVER 32K (IF MEMORY MANAGEMENT IS AVAILABLE).
& SAME PROCEDURE AS IN PART 1 EXCEPT THE DATA TRANSFER IS EXECUTED
OVER 64K (IF MEMORY MANAGEMENT S AVAILABLE).

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

6890

057250
057250
6891 057250
689% 057254
6893 057256

057256
057262
057266
057270
057272

BGNTST

005737
001410

002324

012746
012746
010600
104417
062706

063204
000001

6894 osrgre
6895 057302
6896 057306
057306
6897 057310
6898 057314

005037
004737

000004
002322
010534

104431
062700
010037

000002
002356

6900 057324
6901 057326
6902 057330
6903 057332
6904 05733¢

005003
110320
005203
005301
001374

6899 057320 012701

7%:

010000

000340

057352
057356
057362
057364
6907 057370
057370

013746
012746
104437
062706

002246
000003

012746

000340

057400
057404
057410
057412
6908 057416
6909 0574;‘

013746
012749
10443
06 709
11277
013701

002244
000003

CLR
MOvVB
INC
DEC
BNE

R3
R3,(RO)+
R3
Rl
1%

*R3 CONTAINS THE LOADED DATA
:LOAD DATA INTO BUFFER A
*CREATE NEW DATA
12K LOADED
SIF NO ,LOAD NEXT DATA BYTE

CLR
JSR

1TRCNT
PC,BGINY

MOV
1%:

012746

#2.R0
RO,BUF AB

PNTF
7%
#TSHD23

ITAC23: MEMORY

6905 057336 010037 002360
6906 057342
057342

ADD
MOV

123::
;1S THE PNT FLAG SET
J1F YES, PRINT THE TEST HEADER
Ri
MOV
#TSHD23,=(SP)
MOV
#1,-(SP)
MOV
SP,RO
TRAP
CSPNTF
AD
04, 5P
:CLEAR ITERATION COUNTER
SSET UP PARAME TER
:GET THE FIRST FREE MEMORY LOCATION
TRAP
(SMEM
;USE THE SEC.FREE LOCATION FOR BUFFER
SLOAD START ADDRESS OF BUFFER A

ST
BEQ
PRINTF

MOV

SETVEC

#10000,R1

RO,BUFBB

VECC2,#INTSC2,#PRIO7

057346 o1§n6 010152

SETVEC

VECCY,#INTSC1,#PRIO7

057374 01;746 010142

6910 057430
6911 057434

0627g1
010137

000040
002412

*LOAD START ADDRESS OF BUFFER B
:SET VECTOR FOR CHANNEL 2
MOV

MOV

000010

000010
ooo§1z
002314

:BUILD 2Kk BUFFER SIZE

MOV
MOV
TRAP
ADD
;SET VECTOR FOR CHANNEL 1
MOV

MOV

:
122644

MOVB
MOV
ADD
MOV

cz1g.alcanx
DPAZ,R1
#40,R1
R1,MLA2

#PR107,=(SP)

#INTSCS,=(SP)
VECC2,=(SP)
#3,-(SP)
C$SVEC
#10,5P

#PR107,=(SP)

#INTSCE
.= (SP)

MOV
VECCT,=(SP)
MOV
#3,-(SP)
TRAP
C$SVEC
ADD
#10,5P
;====L0AD TON INTQ ACR l=ececccccccca-:CREATE MLA?

iy
:STORE MLA?

Q177

J 14

SEQ 178

HARDWARE TESTS MACRO M1113 06-SEP=-B2 16:46 PAGE_65-1
TEST 23: DMA DATA TRANSFER TEST FROM CHANNEL 1 TO 2

113777

104404
0050%7
©05037
04;777
013700
01%701
105020
005;01
001375
01;777
0 7%7
005437
013777
012777
05;777
013777
013777
012777
012700
104441
042777
012737
112777
012701
005737
001015
005301
001373
017737
012737

002618

00%400
002376
000210
002360
010000

002356
002240
002402
00240;
000107
000010
002360
002402
000101

JSR

122630

mMove
BGNSEG

122606
2%:
122564
002402
122546
122534
122526
122522
122516
122504

000000
000010
000001
000013
077777

122470
002374
122444

002376

122432
100006

138:

002502
002500

104457
004375
006072
003500
104406
052777
012737
005737

001013
017737
012737

BIC
MoV
MOVB
MoV

TST
BNE
DEC
BNE
MOV
MOV
ERRSOFT

PC,LO0P

000010
000002
002400

122402
002374

122362
100010

002502
002500

108:

BIS
MoV
1ST
BNE
MoV
MoV
ERRSOFT

sWAIT A LITTLE
TRAP

sCLEAR INTERRUPT FLAG
sCLEAR INTERRUPT FLAG
sSELECT CHANNEL 1

AB,aBARX

NP ,RSAVE

,aBCRX
CSRX
#10,3CSRX
BUFBB, 3BARX
RSAVE ,aBCRX
#101,3CSRX
VE

#PrR100

sBUILD 2K BUFFER SIZE
sFILL BUFFER B WITH ZERO
;2K LOADED
:IF NO, CLEAR NEXT BUFFER LOCATION
;===LOAD START ADDRESS OF TABLE A ====
sSTORE BYTE COUNT INPUT
:BILD 2°COMPL FOR BCR
----- LOAD INPUT INTO B(R lecececc vcecces
s====DMA ENB,DMA DIR,INT ENB,SYS CON.

sSELECT CHANNEL 2

s====L0AD START ADDRESS OF

TABLE B===-;====LOAD INPUT INTO B(R 2==;====SET DMA ENB,INT ENB IN (SR2======
sSET PRIORITY TO ZERO

Mov
TRAP

INTFC1

*HAS INTERRUPT IN CHANNEL 1 OCCERRED
:BRANCH IF YES

#13,31CRHX
87777781
108
R1
138
3CSRX . BAD

#100006,Go0OD

2301,€25%2,ERR201

:----LOAD

G's

lu'o

A(R

1 ..............

:LOAD LOOP COUNTER

*DECREMENT COUNTER
+1F MORE,TEST AGAIN

SGET CSRT CONTENTS

:BC OF ,DMA DIR,SYS CONT SHOULD BE SET
*ERROR 'HANDLER

TRAP

.WORD
.WORD
.WORD
;BRANCH TO BGNSEG IF ERRL02P IS
#
’

1
)
#

CKLOOP
000340

118:

SETPRI

#PR100,RO
($SPRI

;SELECT CHANNEL 1
:LOAD CHANNEL NUMBER

sSELECT CHANNEL 2

TRAP

C$CLP

sGET CSRZ2 CONTENTS
:BC OF ,MUX SHOULD BE SET
;ERROR HANDLER

TRAP

RSOFT

.WORD
0
+WORD

201

;BRANCH TO BGNSEG IF ERR%SR: IS
#PR107

CSERSOFT

2301
E232
ERR201
SET

sLOAD CHANNEL NUMBER
sHAS INTERRUPT IN CHANNEL 2 OCCURRED
sBRANCH
IF YES

.WORD

104406

($BSEG

#10,3CSRX
#1,CHAN

CKLOOP

104457
004376
006072
003500

012700
104441

CLR
CLR
BIC
Mov
MOV
CLRB
DEC
BNE
MoV
MOV
NEG
MOV
MOV
BIS
MoV
MoV
MoV
SETPRI

MLAZ ,3IDRHX

mMm

6914 05745
057652
6915 057454
6919 0576460
6917 057464
6918 057472
6919 057476
6920 057502
6951 857506
69 g 57506
6923 057510
6956 057516
6925 0575264
6926 057530
6927 057536
6928 057544
6929 057552
6930 057560
6931 057566
6932 057576
057574
057600
6933 057602
6934 057610
6935 057616
6936 057624
6937 057530
6938 057634
6939 057636
6940 057640
6941 057642
6942 057650
6943 057656
057656
057660
057662
057664
6944 057666
057666
6945 057670
6946 057676
6947 057704
6948 057710
6949 057712
6950 057720
6951 057726
0577;6
057730
057732
0577
6952 057736
057736
6953 057740
057740
057746

004737 01106

(=]

57440

-«

691§ 057446

AN =2 ) b BN =

691

sNO FURTHER INTERRUPT ALkgsED
TRAP

K 14

SEQ 179

EP-82 16:46

NN~

~NOor

NNNN

OWWWWWSN
INININNNYN

PAGE_65-2
FROM C HANNEL 1 T0 2

6960

0601
060 1
060 1
060

6977 0601
0601
6978 0601
6979 0601
6980 0601
6981 0601
6982 0601
06016
0601 66
060166
060170
6983 060172
060172
6984 060174
6985 060200
6986 060204
6987 060210
6988 060214
6989 060216
6990 060220

122300

002502

010 ACSRX

1,CHAN

“«

qua GOOD

002500
002509

BC INP . GOOD

00 508

3BARX BAD

00250

BEQ

ERRSOFT

BAD,GOOD

sSELECT CHANNEL
1

.LOAD CHANNEL NUMBER

SEY UP COMPARE VALUE

GET BAR?! CONTENTS

:HAS BAR1 THE CORRECT ADDRESS

:BRANCH IF YES
:ERROR MANDLER

122252
002500
002502

002502

23%:

002500

;BRANCH TO BGNSEG IF ERRLOOP IS
OBCRX.BAD
600D
BAD,GOOD

NSNS

122164
002500

122210
002374
002500
002500

308:
33%:

002502

8IS

MOV
MOV
ADD
MOV
CMP

BEQ

#10,3CSRX
#2,CHAN
BUFBB,GO0D
BCINP,GOOD
aBARX ,BAD
EOOD.BAD

T 2305,E234 ,ERRSQ1
ERRSOF

122136

005037

002502

40%:

MOV
TST

104457

@BCRX ,BAD

BAD

002500

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER

TRAP

SET UP COMPARE VALUE

.uET BAR2 CONTENTS

;HAS BAR2 THE CORRECT ADDRESS
:BRANCH IF YES
:ERROR HANDLER
TRAP

:GET_BCR2 CONTENTS

:BCR2 CONTENTS SHOULD BE ZERO
:BRANCH IF YES

:SET UP DATA FOR ERROR MESSAGE
ap
:ERROR HANDLER

:BRANCH TO BGNSEG IF ERR%OOP IS
:PROVIDE FIRST BYTE OF BUFFER A

43%:
44%:

TRAP

.WORD
.WORD
.WORD

CKLOOP

002356
002360
002404
002404

:BRANCH IF YES
sERROR HANDLER

;BRANCH TO BGNSEG IF ERR%OOP IS

43%
BEQ
GOO0D
CLR
T 2306 ,E235,ERR501
ERRSOF

002500

‘1S BCR1 ZERO

.WORD
«WORD
«WORD

CKLOOP

002502

;GET BCR1 CONTENTS

.WORD
.WORD
«WORD
;BRANCH TO BGNSEG IF ERRLOOP IS

CKLOOP

000010
000002
002360
002240

TRAP

.WORD
+WORD
“WORD

0%
BEQ
T 2304 ,E235,ERRS01
ERRSOF

OWOW
N=SON

NONES

OWWWO
MWWNNNOT

NNVOW

5303 £234,ERRS01

CkLoOP

WV
N

prt

(= j=l=l=l=lele]
o N =0 = =2 N0

8883

6965 060040

H» NNNNNNES

6963
0600;2

[=l=l=l=
T
OoONO=O

§z

OWWWWWNDG
O WVINNNNNNGO

060016

6962 060024

002356
02 §60

OONWVT
NONN

6961 060012

000010

000?21

:PROVIDE FIRST BYTE OF BUFFER B
C

CLEAR BUFFER COUNTER

2R1)0.(R2)0

BUFFER A EQUAL BUFFER B

600D

:CLEAR GOOD

J1Ff VES CONT INUE

L 1%

SEQ 180

HARDWARE TESTS MACRO M1113 06-SEP=-82 16:46 PAGE_65-3
TEST 23: DMA DATA TRANSFER TEST FROM CHANNEL 1 TO 2

6991 060 g
6992 060230
6993 060234
6
060240
6995 060244
6996 060250
7 060254

6998 060260
060266
7000 060274

005037
005037
010137
005337
005037
010% 7

005337

116127
116237

060274
060276
060300
060302

104457
004403
006010
003744

0603

104406

7001 060304

7002 0603
7003 060314
7004 060316

060316
060316
7005 060320

7006 060324
7007 060332
7008 060340

7009

023737
001335

104405
005077

112777
017737
005077

002502
00 4;6
002430
00 433
0024
002424

002424

177777
177777

CLR
CLR
MOV
DEC
CLR
MOV
002500
002502

MOVB
MOVB

ERRSOFT

TXADRH
R1, TXADRL
TXADRL
RXADRH

002404

121754

000014
121734
121734

002240

46%:

121736
002502

:CLEAR BAD

:SET UP DATA FOR ERROR MESSAGE
-

R2,RXADRL

2307,5231 ERR231

*ERROR HANDLER

RXADRL
-}{:1)
GOOD

.
$ove

7013 060344

060350
060356
060360
060362

060362
060366
060372
060376
060402
060404

7018 060410
7019 060414
7020 060420
7021 060422
7022 060426
7023 060432
7024 060434

060434
060440
7025 060442
7026 060446
060446
7027 060450
7028 060454
7029 060460
7030 060466
7031 060472

012701

012737
005021
005011

012746
012746
012746
012746
104437
062706
005037
012701
005711

002624
000001

CLR

aCSRX

JCLEAR CSR2, SELECT CHANNEL 1

9IDRX,BAD
acsax

READ DIR1 FOR CLEAR BO BIT IN IIR
;CLEAR csn1

(4ttecccccccccas

CNT1,BCINP

sALL BYTES COMPARED ?
sIF NO, GET NEXT ONE

10000%:
'1(,‘31(:[1"!

..... LOAD

TCA

000004

104404
005037
005037
042777
010177
012737

002374

MOV
(LR
CLR
SETVEC

1%:

000002
002376
002400
000010
121610
000002

ACR

CSESEG

lecccccccccccna

(THE 1/0 PAGE

IS USED

#TABE ,R1

;CLEAR TWO WORD IN TABEL E

2:1;0

feee

#1,CHAN

#4,INXM,#PR107

:LOAD CHANNEL NUMBER

SSET UP VECTOR FOR TRAP TO 4
MOV
MOV
MOV

MOV

002326
160000

012700
104436
162701

INTO

TRAP

(4ttecccccccccan

PSEUZS MOV

000010

002326
000002

cscLPt

448

MOVB
MOV
CLR

000340
010132
000004
000003

005737
062701
001772

T
CSERSOF

2307
EZ231
ERR231
SET

(MP
BNE
ENDSEG

PART 2 CHECK THE NON EXISTENT MEMORY BIT OF CHAN. 1
;
FOR NON EXISTENT MEMORY

7012

TRAP

WORD
.WORD
WOR
BRANCH TO BGNSEG IF ERRLOOP IS

CKLOOP

7010
7011

7014
7015
7016
7017

DEC

BAD

121612

002402

TRAP
ADD

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

#3.-(5P)
CSSVEC
#10,5P

CLR
MOV
1ST
TST
ADD
BEOQ
CLRVEC

NXMFL
c1ooooo R1
fisanc

:CLEAR FLAG
*LOAD FIRST ADDRESS OF

{%.a1

SNEXT 1/0 PAGE ADD.(NO AUTO INCR.11/44')

PSET VECTOR & TO NORMAL STATE

SuB
BGNSEG

‘2.“1

CLR
CLR
BIC
MOV
MOV

INTFC1
INTFC2

#10,3CSRX
R1,3BARX
#2 . RSAVE

1/0 PAGE

SFIND A NON EXISTEND LOCATION

:CLEAR INTERRUPT FLAG
:CLEAR INTERRUPT FLAG

MOV
TRAP

#4 RO
CSCVEC

TRAP

($BSEG

SSELECT CHANNEL 1
:LOAD BAR1 WITH A NON EXISTS 1/0 ADRR.
SLOAD NUMBER OF BYTE COUNTS

LI [

SEQ 181

:BILD 2°COMPLEMENT
sLOAD BCR1
sOMA ENB,DMA DIR,INT ENB,BA16-21,SYS

NPNOWESS
S NVONN
S NONONNVON

PN = d cd o cd e
Wi
AW

[ O P
p——y
OnrRrRNINNN

NINNNNNNNTYN
NNWNIWNINN=O

[elelelolelelelele]

O000O0O0O0O0O
b S ad e cd \ )
o O
OCOO0O0O0O0=—=0O
S OOOO R ad Ot

703

SFRFENRFSRR

HARDWARE TESTS MACRO M1113 06-SEP- 82 16:46 PAGE 65-4
TEST 23: DMA DATA TRANSFER TEST FROM C MANNEL 1 T0 2

$SELECT CHANNEL 2

sLOAD BARS WITH STAR ADDRESS OF TABE

JLOAD BCR
:-.-SE'

:---LOAD

3%:

6%:

\ Vb
N &S b
-t

MOV

108:

sBRANCH IF

ACR

#PR107,RO
C$SPRI

1 ..............

060734

TRAP

ENDSEG

10001$:

MOV
CLR

sREAD DIR1

sCLEAR CSR1

———

‘PART 3 DMA OVER 32k
Pl

CLR
CLR
CMP

.WORD
.WORD
.WORD
AP

cscLPl

TRAP

(SESEG

sCLEAR CSR2 ,SELECT CHANNEL 1

CLR

002502

CSERSOF
T

2309
E4O1
ERR501

sBRANCH TO BGNSEG IF ERRLOOP IS SET

CKLOOP
12%:

YES

:SET UP DATA FOR ERROR MESSAGE
;ERROR HANDLER

T
ERRSOF

000001

l"ro

csCLP

sLOAD CHANNEL NUMBER
sGET CSR2 CONTENTS
: IGNORE BIT 9-12
s INT ENB,MUX,DMA ENB SHOULD BE SET

000111

TCA

TRAP

CSERSOFT

2308
E233
ERR201
SET

sSELECT CHANNEL 2

000111

TRAP

TRAP
sNO FURTHER INTERRUPT ALLOWED
:----LOAD

[

YES

.WORD
.WORD
WORD
;BRANCH TO BGNS:G IF ERRLOOP IS

SETPRI]

7062 060736

060736
7063 060740
060740
060740
7064 060742
7065 060746
7066 060754
7067
7068
7069
7070 060760
7071 060764
7072 060770

#PR100,RO
C$SPRI

1 ......... oD
@

sERROR HANDLER

CKLOOP

7061 060726
060726

ACR

Mov
TRAP

sNXM,BA 16+417,DMA DIR,SYS CONT

T
ERRSOF

060640

7054 060660
7055 060666
7056 060674
7057 060702
7058 060710
7059 060716
7060 060720

lNro

CSRZ-- ...... o e

sDECREMENT COUNTER
sIF NO,TEST AGIN
sGET CSR1 CONTENTS

BAD

MOV

000014

Grs

sBRANCH IF

121456
040066

000340

sLOAD LOOP COUNTER
:1S INTERRUPT IN CHANNEL 1 OCCER

7051 060642

060642
7052 060644
060644
060650
7053 060652

Em'lnt

sSELECT CHANNEL 1
;LOAD CHANNEL NUMBER
sSET PRIORITY TO ZERO

121470

002376

D"A

eoe®D @D

INTFC
INTFC

PHHS
|

S w

e ® oo Do

FOR CLEAR BO BIT

CCEDeEE EE DB E DD D@D E

D@D T E DS

sCLEAR INTERRUPT FLAG
sCLEAR INTERRUPT FLAG
;1S THERE MORE THAN 32k

D W

IN IIR

DD © WD

N 14

SEQ 182

HARDWARE TESTS MACRO M1113 06-SEP-82 16:46 PAGE_65-5
TEST 23: DMA DATA TRANSFER TEST FROM CHANNEL 1 TO 2

sIF NO SKIP TEST

002404

NONO'N

oW S

~ W O8NS
~ ONOW

Ll
o

pd —

SJUMP TO TEST END

ELOAD INPUT FOR CONVERSION ROUTINE

002334

sCREATE VIRTUAL ADDRESS

RO,BUf
AB

:gbooo.a1

177572

#1,SR0

gS.(nO)o

16%:

R
#10000,
RO,BUFBB

(rRG)+

20%:

121136

PC,LOOP
aBARX

b cd
D

BCINP,RSAVE

RSAYE
RSAVE
, @BCRX

OCOO0O =
VIO NINO NSO

D
D

b
—

—

SIS
NI N TN [N ]

D =D =D

002402

#127,3CSRX
#10,3CSRX

#10000, aBARX
RSAVE
, aBCRX
#121 ,3CSRX

#PR100

- N

MOV

T
ERRSOF

120752

s**ENABLE MEMORY MANAGEMENT*+
:LOAD BUFFER WITH DATA
sCREAT NEXT DATA

SLOAD 2K

sLOAD START ADDRESS OF BUFFER B

:CLEAR BUFFER B

;2K CLEARED
sIF YES,DO THE TEST
s**DISABLE MEMORY MANAGEMENT»+

{CREATE MLA2
:STORE MLA2
----- LOAD MLA2 INTO DOR 1
TWAIT A LITTLE

s===LOAD START ADDRESS OF BUFFER A===:STORE_BYTE COUNT INPUT
;BILD 2'COMPL FOR BCR
""" LOAD INPUT INTO BCR 1

:=-DMA ENB,DMA DIR,INT ENB,BIT 16,SYS €

sSELECT CHANNEL 2

s====L0OAD START ADDRESS OF BUFFER B=--

;====LOAD INPUT INTO BCR ===
SET DMA ENB,INT ENB,BIT16 IN (SR2
:
sSET PRIORITY TO ZERO
MOV

sSELECT CHANNEL 1
:LOAD CHANNEL NUMBER
s====L0AD GTS INTO ACR 1
:LOAD LOOP COUNTER
;1S INTERRUPT IN CHANNEL 1 OCCER
sBRANCH IF YES
sDECREMENT COUNTER
s1F NO,TEST AGIN
sGET CSR1 CONTENTS
:BC _OF ,DMA DIR,BA 16,SYS CONT
;ERROR HANDLER

23%:

000010

;kgAD COUNTER FOR 2K
CONTAINS

TRAP

LS
E e

—)
—

[=]V =]

000000
000010

sGET START ADDRESS COF BUFFER A
sLOAD START ADDRESS OF BUFFER A

""" LOAD TON INTO ACR 1

121152

—_-D
-t
nNON

OO0COOOO=OO=0
==OOO0O==ufO=

NNW-— S N=NNN=O

NIN=WV=2NMNININI
SN
NNWWONNNNNESN
WSO
= WO NWNSNO

NNNNNNNNNNNN=
@D YN = O N = 8 = NO NW = NO NNNNN

NIWNININWWNIWW S O N W
W = VN O N = WO NI WVIN O WS OO = W
NNNNNNSNONN=NNNOWWO
O NWWNIWNO NO NNNO -O
NNNNNYNUWWNWNWO
O NWNON WO NO ONWO OWOWWWWO

O0000O0O0O00O~-O00O0—-000—-0000O0~0000000000 o
—=wad\N=ubQO=00=-Sr==0000=2=000==0=2=240~-000 o

003137 002344

OO0 —=
WO OO0

OooNNIONNONO
SO

CCONCOSTONONNNOO
SN
OO
SNOONON 2NN°U‘V‘&&WN-‘-‘°°
&O‘\fl\flb\NWNNN-‘

OO NOON
NGO

o e
D o
D e
d D e e
— e e

sk e O NYNN

o
o
ee
B

N AN N AN NN NN N N NUNINLNLINININININININONY

) b e e

7123

[=lelelelelelelelelelelelelelod=d

Zo38I8S
N = OOV~
SN

s
b
b e
-

—

-l

SNNNNNNNNNNSN

PONIND
b d e e e o e e

NNNNSN

-—=00000

OCOO0O0O0O0C OO

mbbwwv\a—o-g

7073 060776
7074 061003
7075 06100
707

24%:

BIS

TRAP

#10,3CSRX

sSELECT CHANNEL 2

.WORD
«WORD
.WORD

#PR100,RO

C$SPRI

B 15
ARE E TESTS
TE

MACRO M1113

T 23: DMA DATA

061326

n ?
n
n

1
1
1

}

ERRSOFT

821574
71564
061576
7155 061604
7156 061610
7157 061612
7158 061616
061616

061620
061622
061624

O
NN NNWNNNO W =N
SNNNNNNNN=
N OWWOS
SNNNNNOON

BNONNNSS

NN
- LN

- O00O

002502

30%:

002500

CLR

CMP

31%:

*BRANCH 55 YES

CONTENTS
16,MUX SHOULD BE SET

:ERROR HANDLER

TRAP

#10,aCSRX

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
s====LOAD TCA INTO ACR 1
:SET UP COMPARE VALUE

ng.Géoo

212.5234.ERR501
$

@BCRX,BAD
600D

2?2.6000

313,€235,ERRS01

#10,3CSRX

#2,CHAN

#160000, 600D
BCINP,GOOD
3BARX BAD

T
ERRSOF

12050

00250

002502

40%:

MOV
TST
Q

CLR
T
ERRSOF

~WORD

:NO FURTHER INTERRUPT Atheeo

BB , GOOD
BUF

002500

003702

MoV

BEQ
T
ERRSOF

NNNVONN

061566
061570
061572

ERRSOFT

S NNNNNNN

7146 061520
7147 0615;2
7148 0615
7149 061545
7150 06155
7151 061556
715; 061564
7152 061566

°°°2°°°°

i
s S1E8

:1S AN INTERRUPT IN CHANNEL 2 OCCURED

#PR107

8CINP.GOOD
3BARX _BAD

=N NWNWNINW

06150
061504

SETPR]

#1,CHAN
14,31 CRHX
PHLOW, GOOD

&
NN
WWNO
O =W

7140 061460
7141 061663
716; 06147
7143 061500
7144 06150%

038 )
.Ezig?gRRZOI

‘GET CSR2
:BC OF,BA

X,BAD

MoV

25%:

061450
061452
061454
061456

sLOAD CHANNEL NUMBE R

.WORD
-WORD

}

137
7131
061374
n g
1605
7133
06141
n
821616
7135
1656
0614 g
7136
7137 06144
7138 061446
7139 061450

7130

}

i FROM

PAGE_65-6
HANNEL 1 10 2

0023
it
802403
1
7
12737 166038 802306

061 i‘

—

7125

7124

RANSFER TE

SEQ 183

-SEP-8 g 16:46

600D ,BAD

2214.!234.ERR501

40%

@#BCRX,BAD
BAD
438

gg12.5235.£hk501

TRAP

sGET BAR1 CONTENTS

sHAS BAR1 THE CORRECT ADDRESS
sBRANCH IF YES
sERROR HANDLER
TRAP
.WORD
«WORD
.WORD

;GET BCR1 CONTENTS

;1S BCR1 ZERO

sBRANCH IF YES
sERROR HANDLER

:SELECT CHANNEL 2
:LOAD CHANNEL NUMBER
:SET UP COMPARE VALUE
sCLEAR BIT 1341441

TRAP

«WORD
«WORD
.WORD

;GET BAR2 CONTENTS
sHAS BAR2 THE CORRECT ADDRESS
sBRANCH IF YES
sERROR HANDLER
TRAP

.WORD
.WORD
«WORD

;GET_BCR2 CONTENTS
sBCR2 CONTENTS SHOULD BE ZERO
:BRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE
caep
sERROR HANDLER
+WORD
+WORD
.WORD

71% 003036
A
as 8
7198

7199 062074
7200 062100
7201 062104
7%0;
110
720
114
7204
116

;205 062} z

84 s

7208

i
N

NONONNO
WVINNO
SO
MO0
NNNOWOWWO
O

805453
024

BufAB,R1

INC

CNTY

MOV
CLR

600D
BAD

MOV

R1.TXADRL

80 424

BIS

02426

025 g

17757

002240

468:

MOV

:RX ADRRES IS TX ADDRESS +2k

=1(R1).GOOD

PSEU33: CLR
000002

002344

aCSRX

:CLEAR CSR1

11$:

138:

INTFCY

PHLOW

#2.PHHIGH

MOV
MOV

RO,BUF
AB
R
#10000,

CLR
MOV
MOVB
INC

R3
#1,5R0
ag.(aO)o
R

R1
16%

#10000,R1

CLRB

(RO)+

RO,BUFBB

2316
E231
ERR231

R INTERRUPT FLAG
R_INTERRUPT FLAG
HERE MORE THAN 64K
0 SKIP TEST

T END
FOR CONVERSION ROUTINE

UAL ADDRESS
DDRESS OF BUFFER A
DDRESS OF BUFFER A

PC.PVCON
v&noo RO

MOV

13$
EXav23

MOV

T
CSERSOF

:READ DIR1 FOR CLEAR BO BIT IN IIR

INTFC2
PHHSIZ ,#2
11%
138

CLR

DEC
BNE

208 :

PHLS1Z

JSR
MOV

168:

BNE
JMP

TRAP

$aeDISABLE MEMORY MANAGEMENT®+
*CLEAR CSR2,SELECT CHANNEL 1

8 1DRX ,BAD

CLR
CMP
BLT
BGT

JERROR HANDLER

aCSRX

SRO

e
$eeDISABLE MEMORY MANAGEMENT
.WORD
LWORD
w0
.WORD
e
;**ENABLE MEMORY MANAGEMENT
:ALL BYTES COMPARED ?
:1F NO, GET NEXT ONE

#1,SR0

MoV

32«

sCLEAR PAR INFORMATION
sGENERATE RX ADDRESS FROM TX ADDRESS

2211.sc1np

CMP

177572

:GET ADDRESS OVER 32K

#10000, RXADRL

SPART & DMA OVER 64K

002334

sRX ADDRESS IS OVER

MOVE
=1(R2).BAD
CLR
SRO
ERRSOFT 2316,E231,ERR231

002502

sTX ADDRESS IS OVER §SK

TXADRL , RXADRL

CLR

002376
002400
002342

IF YES CONTINUE
;CLEAR GOOD
sCLEAR BAD

TM D.b
#160000, TXADRL

MOVB

00250

sBUFFER A EQUAL BUFFER B

#1, TXADRM
#1.RXADRM

MOV

OF BUFFER A

;PROVIDE FIRST BYTE OF BUFFER B
TE
JCLEAR BUFFER C

(R1)+,(R2)+
46%

CLR
CLR

DEC
BIC

.PROV!DE FIRST BYTE

BUFBB,R2
CNT

(mPB
BEQ

80 430

T
«+ENABLE MEMORY MANAGEMENe«

#1,5R0

MOV

MOV
MOV

0621

7209 0621
7210 062140
7211 062144

MoV

> —

7194 06%050

43%:

7179 061796
7180 061774
7181 062002
718% 062004
7183 062010
7184 062014
7185 062022
7186
7187
7188
7189 0620§6
7190 062032
7191 062036
719§ 062044
7193 062046

177572

061728
0617
061762
061764

82888828

7171 061710
717§ 061714
77 8217
71764
0617
7175 0617
7179 061744
7177 061752
7178 061756

- d et OO =2 O

1650

ON=NNNW=YNOO
N =NONNN
WWIN N NN N NN N NN S NN O OW
NNNNNNNNNNNNOTNNNN-SN

716

7164
1654
7165 061656
7169 061660
716
16?6
7168
061670
7199
1976
7170
061704

ONOOWNNNOS S
NWWNWWNININ
S = =W
NNNNNVNNSO NN

061640
716;
1644

»0

SAOVWHANNN

061626

SEG 184

PAGE 65-7

FER 152? FROM CHANNEL 1 T0 2

NV SNV
= i)

7159

— e

7160 8216§‘
7161

TEST 23:

~SEP=82 16:46

1113

HARDWARE

=0
DD

"'ENABLE

*LOAD BU

:CREAT N E

TLOAD 2K

OR 2K

RY MANAGEMENT*+
%;H DATA

*LOAD START ADDRESS OF BUFFER B
*CLEAR BUFFER B

D15

DWARE TESTS MACRO M1113 06-SEP=-B2 16:46 PAGE 65-8
T 235: DMA

Q 185

DATA TRANSFER TEST FROM CHMANNEL 1 TO 2

721

7214
7215

0621
1

170

7 1§ 82 1
7 19

194

7218
7219

§81 9;

0 ;
112777

17757
000212

701

8 04

13701

062174
00

010137
113777

12
16
&

00 9 7
013737
005437

7225 062
7226 06 544

012777
052777

7228 062260
7253 062266

013777
012777

7220 83

7221
7 § 33
7

7224 062230

7227 062252

047;7
013777

00231
41
002412

iee=lOAD START ADDRESS OF BUFFER A====
:STORE_BYTE COUNT INPUT
‘BILD 2°COMPL FOR BCR

000147
000010

120034
1%0026

MOV
BIS

#147,3CSRX
#19,3CSRX

:=DMA ENB,DMA DIR,INT ENB,BA 17,SYS (
*SELECT CHANNEL 2

002402
000141

1%0016
120004

MOV
MOV

RSAVE , 8BCRX
#141,3CSRX

ieees0AD INPUT INTO BCR 1===
i====SET DMA ENB,INT ENB,BIT17 IN CSR2

00240

104457
004415
006072
003500
052777
012757

7245 062406
7246 0626410

00101;
017737

7247 0626416
7248 062424

012737

0624624
062426
062430
062432
7249 062434
0624364
062440
7250 062442

104457
004416
006072
003500

7254 062472
7255 062500
7256 062506

063737
017737
023737

7251 062450
725{ 062456
7251 06549&

012700
104441
042777

012737
112777
01 7;7

002402

062356
062360
062362
062364
062366
062374

005737

:CREATE MLA2

aBARX
BCINP,RSAVE
RSAVE

005737
001014
005301
001373
017737

7244 062402

CLR
MOV
NEG

062330
oezgs«
062336
062340
062342

012737

DPAZ

#40,R1

180366
8
40
00240

000000

062350
062356

ADD

ieeDISABLE MEMORY MANAGEMENT
e
iecea 0AD TON INTO ACR J=ceccccccccces

120070

1106

012700
104441
042777
012737

112777
o1 721

MOV

SRO
”1 ,a%canx

:STORE MLA2
seeee 0AD MLA2 INTO DOR lecccccccccces

06 gra
062300
06 gog
062310

062316
oozsia

120104

:IF YES,DO THE TEST

;2K CLEARED

R1,MLA2
MLA2,3
1 DRHX

010000

062274

CLR
MOVB

208

MOV
MOVB

012777

7230

DEC
BNE

5301

000010
000001

000013
077777

1%0066

100046

000010
000002

002400
117664

100050

000010

002240
117576
002502

MOV

SETPRI

117770
005374

117744

238:

002502

002500

117704
002374

PC,LO0P

SWAIT A LITTLE

RSAVE , aBCRX

se===l0AD INPUT INTO B(R 1=cccccccces

#10000, aBARX

i===={ 0AD START ADDRESS OF BUFFER B==-

#PR100

*SET PRIORITY TO ZERO

248:

#10,3CSRX
#1,CHAN

;SELECT CHANNEL 1
*LOAD CHANNEL NUMBER

ST
BNE
DEC
BNE
MOV

INTFC1
248
R1
238
aCSRX,BAD

:15 INTERRUPT IN CHANNEL 1 OCCER
:BRANCH IF YES
:DECREMENT COUNTER
SIF NO,TEST AGIN
SGET CSR1 CONTENTS

Mmove
MOV

#1%5,31CRuX
07787781

:BC OF ,DMA DIR,BA 17,SYS CONT
*ERROR 'HANDLER

#10,3CSRX
#2,CHAN

;SELECT CHANNEL 2
‘LOAD CHANNEL NUMBER

BNE
MOV

258
aCSRX,BAD

*BRANCH IF YES
:GET CSR2 CONTENTS

INTFC2

MOV
#100050,G0oOD
ERRSOFT 2318,E2%2,ERR201

TRAP
MORD
WORD
.WORD

#PRIO7

117330

BIC

#10,3CSRX

002500
002502
002500

ADD
MOV
CMP

8C INP . GOOD
aBARX . BAD
BAD,GOOD

e
:GET BAR1 CONTENTS
*HAS BAR1 THE CORRECT ADDRESS

MOV
Move
MOV

#1,CHAN
#14,31CRHX
PHLOW, GOOD

:BC OF ,BA 17,MUX SHOULD BE SET
*ERROR 'HANDLER

SETPRI

oo; 74
117604
002500

CSERSOF
T
2317
E232
ERR201

:IS AN INTERRUPT IN CHANNEL 2 OCCURED

TRAP
.MORD
.WORD
.WORD
:NO FURTHER INTERRUPT ALLOWED
MOV
TRAP
sSELECT CHANNEL 1

25%:

#PR100,RO
C$SPRI

ie=eel0AD GTS INTO ACR leecccccccccccs
:LOAD LOOP COUNTER

BIS
MOV

002500

MOV
TRAP

BIC
MOV

MOV
#100046 ,600D
ERRSOFT 2317,E2%2.ERR201

002502

000340

000001
000014
00 38

MOV

120022

002376

117732

JSR

CSERSOFT
2318
E232
ERR201
#PR107,RO
($SPRI

SLOAD CHANNEL NUMBER
ieeee0AD TCA INTO ACR lececcccccccces
*SET UP COMPARE VALUE

E 15

SEQ 186

HWARDWARE TESTS MACRO M1113 06-SEP-82 16:46 PAGE_65-9
TEST 23: DMA DATA TRANSFER TEST FROM CHANNEL 1 T0 2
7257

164

001404

062516
0625 g
06
062526

104457
004417
;0
00

7258 82 16

7259 062526

7260 0625

0177

029 [4

BEQ

117552

002502

002500

805500

7261 062540
7 6§ 062546
726 82 gsg

08
7
001404

7264 062560
7265 062566
7266 0625764

0527
012737
01 7%7

000010
000005
002360

117512
002374
002500

063737

00;240

002500

50
062552
062554
062556

104457
0046;0
00?; 1
00 g;

7267 065605

06%7 7

7268 062610

7269 062616
7270 06 656
7271 062632
7272 062634

017737
023737
001404

7274 062652
7275 062656
7276 062660
7277 06%664

005737
001406
005037

062636
062636
062640
062642
3 062644

104457
004421
006200
00370;
0177§

062664
062666
062670
062672

104457
004422
006231
00370;

7279 062702
7280 062706
7281 062712
7282 062716
7283 06 752
7284 062726
7285 062726
7286 062732
7287 062736

013701
013702
0050;7
005237
122122
001446
005037
005037
012737

7278 062674

7288 062744
7289 062752

7290 062756
7291 062765

7292 062770
7%9

06;776

7296 063004
7295 063012
72966 063020
06
7297 063024

01%73

0127%7
010137

005337
04;737

160000

117460
002500

117434
002592

116137
116237
005037

31%:

002356
002360
002404
002404

177572

408%:

002502
000002

000005
0024§

43%:

44$:

002500

002426
002422

sGET BCR1 CONTENTS
:1S BCR1 ZERO
sBRANCH IF YES
;ERROR HANDLER

ADD

BCINP,GOOD

Pess

MoV
TST
BEQ
CLR
ERRSOFT

Mov

#160000, 600D
a@BARX ,BAD
GOOD,BAD
40%
2321,E234 ,ERRS01

aBCRX,BAD
BAD
43%
600D
2322,E235,ERRS5Q1

TRAP
LWORD
.WORD
.WORD

CSERSOFT
2319
E234
ERRS501

TRAP
.WORD
.WORD
.WORD

CSERSOFT
23%0
E235
ERR501

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER
sSET UP COMPARE VALUE

;CLEAR BIT 13414415

:GET BAR2 CONTENTS
;HAS BAR2 THE CORRECT ADDRESS
;BRANCH IF YES
sERROR HANDLER

TRAP
WORD
.WORD
.WORD

CSERSOFT
2321
E234
ERR501

WORD
.WORD
.WORD

CSERSOFT
2322
EZ235
ERR501

;GET_BCR2 CONTENTS
:BCR2 CONTENTS SHOULD BE ZERO
:BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE
;ERROR HANDLER
TRAP

MOV
MOV
CLR
INC
CMPB
BEQ
CLR
CLR
MOV

#1,SRO
BUFAB,R1
BUFBB,R2
CNT1
CNT
(R1)+,(R2)+
46%
GO0D
BAD
#2,TXADRH

s**ENABLE MEMORY MANAGEMENT++

TXADRL
#160000, TXADRL

Sees
:CLEAR PAR INFORMATION

MoV
MOV

002430

DEC
BIC

010099

00%424

8IS

002500
002502

600D

#10,3CSRX
#2,CHAN
8UFBB8, 600D

002430
160020

1777
177777
177572

@BCRX ,BAD

;ERROR WANDLER

BIS
MOV
MOV

Mov
CMP
BEQ
ERRSOFT

002500

000001

MOV

BIC

00250%
00250

002502

;BRANCH IF YES

CLR

CMP
gAD.GOOD
BEQ
1%
ERRSOFT 2320,E235,ERR501

002500

013737 002430 002424
052/§7

30%:

ERRSOF T 3219.5234.ERR501

MOV
MOovB
Move

#2 ,RXADRH
R1,TXADRL

TXADRL , RXADRL

#10000,RXADRL

=1(R1),G00D
=1(R2) ,BAD
SRO
CLR
ERRSOFT 2323,E231,ERR231

sPROVIDE FIRST BYTE CF BUFFER A
sPROVIDE FIRST BYTE OF BUFFER B
sCLEAR BUFFER COUNTER
:
;BUFFER A EQUAL BUFFER B
sIF_YES CONTINUE
:CLEAR GOOD
sCLEAR BAD
:TX ADDRESS IS OVER 64K

:RX_ADDRESS IS OVER 64K
;GET ADDRESS OVER 64K

sGENERATE RX ADDRESS FROM TX ADDRESS
sRX_ADRRES IS TX ADDRESS +2K

:SET UP DATA FOR ERROR MESSAGE
Sees
;**DISAE.E MEMORY MANAGEMENT++
:ERROR H,NDLER

F15

SEQ 187

HARDWARE TESTS MACRO M1113 06-SEP-82 16:46 PAGE_65-10
TEST 23: DMA DATA TRANSFER TEST FROM CHANNEL 1 TO 2

0264 104457
deat
e
0630 g
0
7298 13 8
1 ;‘# 000001 17757
7299 82 o«s
737 002404 002245 468:

7300 06305
7301 063052
7 og 063056

13 ;
005037
0457 7

17757
00001

117%14

hol
Gelte et Sl Mol
7305 83 875 1 7;7 800308 117164
7306 063106
7307 063112

7308 063116
7309 063120
7310 0631264
7311 063132
731§ 06313¢
7313
063142

7314 063146

7315 0631564
7316 063162
7317 063166

7318 063174

7319 063200

112777
005737

001030
oos; 7
023737
oo14;;
112777
004737

112777

012777
005077
017737

000137

063200
063202

104432
000064

321
732§ 063204

045

7320

7324
7325 063266

063266
063266

oooogo
002234

002322
002322

000010
117112
117100

117116

000017

057306

BNE
CLR
BIC

MOVEB
ST

BNE
INC
CMP
BEQ
MOVB
JSR

002320
117126

MOV
CMP

hge
MOVB

117156

000217
01107;

TRAP

117114

MOVB
MOV
CLR
MOV

002502

JMP

EXQV23: EXIT

443
SRO
#10,3CSRX

ggie
o§65 a1 CRHX
#0,aiCRHX
avP

EXQv23
ITRCNT
ITRCNT, ITRDEF
EXQV23
#217,31CRHX
PC WALT

#17,31CRHX
#10,3CSRX
aCSRX
21DRX ,BAD

1TAC2%

TST

123

062

T1SHD23:

NLIST
'f?§¥’

SSERSOFT

3;3

EZ231]
ERR231

sIF NO, GET NEXT ONE

s**DISABLE MEMORY MANAGEMENT*+
sSELECT CHANNEL 1
s====LOAD UNL_INTO DOR 1~
sWAIT A LITTLE
iee=l 0AD

SWRST

INTO

ACR

l=cecccccccces

;===LOAD NOT SWRST INTO A(R l==ecccccs
s1S QUICK VERIFY PASS SELECTED
sIF YES EXIT TEST
s INCREMENT COUNTER
sALL DONE
sBRANCH IF YES
;====LOAD SIC INTO A(R 1===cecccc-sWAIT A LITTLE

°°°° LOAD NOT SIC INTO ACR l=====-

sCLEAR CSR1,SELECT CHANNEL 2
sCLEAR CSR2,SELECT CHANNEL )
sREAD DIR1 FOR CLEAR BO BIT In IIR
sIF NO TEST ITERATION
SEXIT TEST

TRAP

LWORD

-EVEN
ENDTST

104401

#1,5R0
cnfl,BcIne

«WORD
+WORD
WORD
s**ENABLE MEMORY MANAGEMENT«e
sALL BYTES_COMPARED ?

BEX
6%;21Aonn DATA TRANSFER TEST FROM CHANNEL 1

CSEXIT

L10054~.

TO 2N/

L10054:

TRAP

CSETST

615

WARDWARE TESTS MACRO M1113 06=-SEP-82 16:46 PAGE 66

TEST 24: DMA DATA TRANSFER TEST FROM CHANNEL 2 T0 1

7327

LSBTTL

; 28

IEX = TEST
;PART 1 SENDS DATA
VIA THE IEC/IEEE BUS FROM CHAN, 2 TO 1 BY MEANS OF A DMA

7 io

;

7 i‘
7

TEST 24: DMA DATA TRANSFER TEST FROM CHANNEL 2 T0 1

:Q""t't"""""""""i"'Q"Q'"..'Q"Q"QQ"tt.t""""'.""t"""'

7;3
7334
7§§s
7336
7;37

1.E. CHANNEL 2 WHICH IS SELECTED AS TALKER PERFORMS A DATI CYCLE,

;

WHEREAS CHANNEL 1 WHICH IS SELECTED AS A LISTENER PERFORMS A DATOB

OVER 32Kk (IF MEMORY MANAGEMENT IS AVAILABLE).

OVER 64K (IF MEMORY MANAGEMENT IS AVAILABLE).

7338

;
CYCLE.
THE MAX. SELECTABLE BYTE COUNT FOR THIS DATA TRANSFER IS
:
IS 2k BYTES AND THE WIGHEST BUS ADDRESS IS BELOW 32K.
SPART 2 CHECKS THE NON EXISTENT MEMORY BIT OF CHANNEL 1.
;
THIS 1S DONE BY A DMA FROM A NON EXISTING 1/0 PAGE ADDRESS 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

7340

:PART & SAME PROCEDURE AS IN PART 1 EXCEPT THE DATA TRANSFER IS EXECUTED

73‘%

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

7339

73461
7343

063270
063270
7364 063270
7345 063274
7366 063276
063276
063302
063306
063310
063312
7347 063316
7348 063322
7349 063326
063326
7350 063330
7351 063334

7352 063340

7353 063344
7354 063346
7355 063350
7350 063352
7357 063354

7358 063356

BGNTST

005737
001410

002324

012746
012746
010600
104417
062706
005037
004737

067204
000001

104431
062700

010037

012701

005003
110320
005203
005301
001374

000004

;1S THE PNT FLAG SET
SIF YES, PRINT THE TEST HEADER
Pees

:CLEAR ITERATION COUNTER
:SET UP PARAMETER

000002
002356

ADD
MOV

#2,R0
RO,BUF AB

:GET THE FIRST FREE MEMORY LOCATION
TRAP
CSMEM
;USE THE SEC.FREE LOCATION FOR BUFFER
:LOAD START ADDRESS OF BUFFER A

CLR
MOVB
INC
DEC
BNE

R3
R3,(RO)+
R3
Rl
1%

*R3 CONTAINS THE LOADED DATA
:LOAD DATA INTO BUFFER A
:CREATE NEW DATA
:2K LOADED
*IF NO ,LOAD NEXT DATA BYTE

VECC2.#INTSC2,#PRIO7

:SET VECTOR FOR CHANNEL 2
MOV

#PR107,=(SP)

MOV
MOV
TRAP
ADD

vgccz,-m)
#3,-(SP)
CS$SVEC
#10,5P

MEMORY

010000

MOV
1$:

000340

063372
063376
063402
063406

013746
012746
104437
062706

002246
000003

063410

012746

000340

063420
oosag«
063430
063432
7361 063436

013746
012746
104437
062709
11;77

002244
000003

MOV

SETVEC

#10000,R1

RO,BUFBB

063366 012746 010152

000010

000010
ooo§12

002312
000040
002410

:BUILD 2K BUFFER SIZE

*LOAD START ADDR:SS OF BUFFER B

MOV

SETVEC

VECCY,#INTSCY1,#PRIO7

063414 o1§m 010142

013701
062701
010137

#TSHD24 ,=(SP)
#1,-(SP)
SP,RO
CSPNTF
#4,SP

ITRCNT
PC,BGIN2

012746

7362 063446
7363 063450
7364 0636564

MOV
MOV
MOV
TRAP
ADD

7%:
CLR
ITAC24: JSR

002360

7360 063410

124::

PNTF
7%
#TSHD24

002322
010710

010037

7359 063362
063362

ST
BEQ
PRINTF

;SET VECTOR FOR CHANNEL 1

MOV

116624

MOVB
MOV
ADD
MOV

#212,alCRHX
DPAT.R1
#40,R1
R1,MLA1

#INTSCZ,=(SP)

#PRI07,=(SP)

#INTSCE
. = (5P)

MOV
VECCT,=(SP)
MOV
#3,-(SP)
TRAP
C$SVEC
ADD
#10,5P
;====L0AD TON INTO A(R 2==ecececcceces
SCREATE MLA1
e
SSTORE MLAY

o 188

H15
HARDWARE TESTS

MACRO M1113

06-SEP-82 16:46

SEQ 189

PAGE 661

TEST 24: DMA DATA TRANSFER TEST FROM CHANNEL 2 T0 1

7365 063460

7;69 063466
7367

063472

113777

004737

002410

011060

063474
063500
063504
06 51%
063520
063526
7;74 0635 5

oosogr
oosg 7
85
77
13777
013737
005437

7375 063540

7 79 063546

012777

114566
116565
00240

013777

oagrrr

000010

000107

013700
01;701

7
7381
7382
7383
7384

oegsee
063570
063572
063600
063606

005301
001375
013777
013777
012777

063614
063620

012700
104441

000000

7387 063630

012737

000002

7386 oosogz

7388 063636

105020

7398 063710
7399 823715

042777
o1§7§7

76401 063730
740 063735

001013
017737

7400

3754

005737

76403 063740
012737
7604 063746
063746
063750
063752
063754
7405 063756
063756
7606
7407

063760
063766

7408 063774

SSELECT CHANNEL 1

(RO)+

SFILL BUFFER B WITH ZERO

MOV

2%:

116502
116476
116464

116412 002502
100016 002500

104409

05577
012737

CLRB

DEC
BNE
MOV
MOV
MOV

SETPRI

BUFBB,RO
#10000, R1

R1
2
BUFBB,aBARX
RSAVE ,aBCRX
#101,3CSRX

#PR1GO

002376
116342

:LOAD START ADDRESS OF BUFFER B
:BUILD 2K BUFFER SIZE
+2K LOADED
SIF NO, CLEAR NEXT BUFFER LOCATION
teee=lOAD START ADDRESS OF TABLE B====
ie=ee 0AD INPUT INTO BCR 1==teeeeSET DMA ENB,INT ENB IN (SR1=e==e -

*SET PRIORITY TO ZERO
S

MOV
TRAP

#PR100,RO
(C$SPRI

BIS

#10,aCSRX

;SELECT CHANNEL 2

116424

MOVB

#15,31CRHxX

teeeelOAD GTS INTO ACR 2===ccccccccces

MOV

138:

MOV
ST

BNE
DEC
BNE

#2,CHAN

2077877 .81
INTFC2

108
R1
138

MOV
SCSRX .BAD
MOV
#100016,600D
ERRSOFT 2401,E252,ERR201

116362
002374

108:

002502

:BRANCH IF YES
:DECREMENT COUNTER
*1F MORE,TEST AGAIN

SGET CSR2 CONTENTS
*BC OF ,MUX,DMA DTR,SYS CONT SHOULD SET
*ERROR HANDLER

#10,3CSRX
#1,CHAN

;SELECT CHANNEL 2
SLOAD CHANNEL NUMBER

BNE
MOV

1%
aCSRX,BAD

*BRANCH IF YES
SGET CSR1 CONTENTS

INFFCA

MOV
#100000,GooD
ERRSOFT 2402,E2%2,ERR201

11%:

:LOAD LOOP COUNTER

:IS INTERRUPT IN CHANNEL 2 OCCER

BIS
MOV

SETPRI

TRAP
MWORD
.WORD
.WORD

CSERSOFT
2401
E232
ERR201

TRAP

CSCLPY

:BRANCH TO BGNSEG IF ERRLOOP IS SET

CKLOOP
116312
002374

SLOAD CHANNEL NUMBER

BIC
MGV

100000 002500

000010
000002

;====DMA ENB,DMA DIR,INT ENB,SYS CON.

116450

002374

104457
004545
00607
003500

1oa409

MOV
MOV

#107,3CSRX

CKLOOP

000010
000901

($BSEG

#10,3CSRX

017737
012737

063706

TRAP

BIC

002400

104457
004541
006072
003500

INTO DOR 2==ccccccccces

116524

116532

005737

063676
063700
063702
0637064

SWAIT A LITTLE

116544

000013

077777

;e===0AD MLA1

:CLEAR INTERRUPT FLAG
*CLEAR INTERRUPT FLAG
SSELECT CHANNEL 2
t==< 0OAD START ADDRESS OF TABLE A ====
*STORE BYTE COUNT [NPUT
*BILD 2°COMPL FOR BCR
teeee 0AD INPUT INTQ B(R 2==eccccceee

112777

001015
005301
001373

7397 063706

002360
002402
000101

PC,LO00P

lNTFc%
INTFC
#10,3CSRX
BUF AB, aBARX
BCINP,RSAVE
RSAVE
RSAVE ,@BCRX

000010

7391 063654
7392 063656
7393 063660

739, 063662
7395 063670
7396 063676

002360
010000

MLA1,alDRHX

CLR
CLR
BIS
MOV
MOV
NEG
MOV

052777

7389 063644 012701

7390 063650

JSR

BGNSEG

oo%ago
002376
ooog1o
002356
002240
00240
002402

7377 063554
7378 063560

7385 063614

MOVE

104404

7368
7369
7370
7371
7 7;
7373

7379 063564

116610

#10,3CSRX
#2,CHAN

#PRIO7

tIS AN INTERRUPT IN CHANNEL 1 OCCURED

:BC OF SHUOLD BE SET
$ERROR HANDLER

TRAP
CSERSOFT
MORD
2402
.MORD
[232
.WORD
ERR201
:BRANCH TO BGNSEG IF ERRLOOP IS SET
TRAP
CSCLPY
sSELECT CHANNEL 2
:LOAD CHANNEL NUMBER

*NO FURTHER INTERRUPT ALLOWED

115

WARDWARE TESTS MACRO M1113 06-SEP-82 16:46 PAGE 66-2

atc” Q1

TEST 24: DMA DATA TRANSFER TEST FROM CHANNEL 2 T0 1

0637764
064000
7409 06400

76410 064010
7611 064016
7«1; oeaoia

7413

0640 8

7614 066040
7615 oeao«g

066042
064046
064046
064050

7616 064052

064052

7617 064056
7618 064062
7619 064066

012700
104441
112777

000340

837 7

002502

013737
063737
81 737

001405

000014

303 56
002240
116252

104409

104457
004544
006231
003702

064106
7623 064110
7624 064116
76425 066124
7426 066132
76427 0646140
76428 064146

104406
042777
o1§737
013737
063737
017737
023737

0646156
066160
064162
0641664
76431 064166
0646166

104457
004545
ooo;oo
003702

066210
064212
064214
064216
76437 064220
0646220
7438 064222
76439 064226
7440 064232
7661 066236
7442 064242
7643 064246

104457
004546
006231
003702

7429 064154
76430 064156

743§ 066170
76433 064176
7434 oengoz
76435 064204
7436 064210

MOV
ADD
MOV

00250

CMP

001405

002502

013701
01370;
00503
005237

1221%;

0014

BAD,GOOD

*HAS BAR2

BEQ
Sss
ERRSOFT
2403,E234,ERRS01

23$:

002500

MOV
CLR
CMP

BEQ

aBCRX,BAD
GOOD
BAD , GOOD

308

CKLOOP

000010
000001
002360
002240
116136
002500

116162
002374
002500
002500
002502
002502

308:

BIC
MOV
MOV
ADD
MOV
CMP

#10,3CSRX
#1,CHAN
BUFBB,GOOD
BC INP.GOOD
aBARX ,BAD
600D ,BAD

BEQ
40%
ERRSOFT 2405,E234.ERRS01

40%:

MOV
aBCRX,BAD
TST
BAD
BEQ
438
CLR
GOO0D
ERRSOFT 2406,E235,ERRS01

CKLOOP
002356
002360
002404
002404

43%:
4s:

MOV
MOV
CLR
INC

BUFAB,R1
BUFBB,R2
(NT1
CNT1

BEO

46%

CMPB

THE CORRECT ADDRESS

*BRANCH IF YES
*ERROR WANDLER

TRAP
.WORD
~WORD
-WORD

SOFT

;GET BCR2 CONTENTS
;
11S BCR2 ZERO

TRAP

‘BRANCH
IF YES
;ERROR HANDLER

TRAP
-WORD
.WORD
.WORD

(S$E
240
E23
ERR

:BRANCH TO BGNSEG IF ERRLOOP IS SET

CKLOOP
002502

SSET UP COMPARE VALUE
i
:GET BAR2
CONTENTS

;BRANCH TO BGNSEG IF ERRLOOP IS

ERRSOFT 2404 ,E235,ERRSO1

104406
017737
005737
001407
005037

104406

#14,91CRHX

BUF AB, GOOD
8C INP . GOOD
3BARX .BAD

CKLOOP

01773
005037
023737

064076
064100
064102
064106

7422 064106

MOVB

104457
004543
oog;oo
003702

7620 064074 001405
76421 064076

116260

3°
00
00250
00250

MOV
#PRI07,RO
TRAP
CS$SPRI
;=== 0AD TCA INTO A(R 2====== ceccssece

(R1)+,(R2)+

TRAP
;SELECT CHANNEL 1
*LOAD CHANNEL NUMBER
sSET UP COMPARE VALUE
s
:GET BAR1 CONTENTS
:HAS BAR1 THE CORRECT ADDRESS
;BRANCH IF YES
;ERROR HANDLER

TRAP
.WORD
~WORD
~WORD
;BRANCH TO RGNSEG IF ERRLOOP IS
TRAP
:GET BCR1 COMTENTS
;BCR1 CONTENTS SHOULD BE ZERO
‘BRANCH IF YES
sSET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

CSCLP1

RSOFT

TRAP
C(SE
.WORD
240
‘WORD
E23
.WORD
ERR
;BRANCH TO BGNSEG IF ERRLOOP IS SETY
TRAP
CsCLP
:PROVIDE FIRST BYTE OF BUFFER A
;PROVIDE FIRST BYTE OF BUFFER B
sCLEAR BUFFER COUNTER
:
:
;BUFFER A EQUAL BUFFER B
*IF YES CONTINUE

J 15

SEQ 191

WARDWARE TESTS MACRO M1113 06-SEP=-82 16:46 paee 66=3
TEST 24: DMA DATA TRANSFER TEST FROM CHANNEL 2 TQ
7644 064246

7645 066252
76446 06425
7647

7648
7649
7450
7451

7652
7653

064262

064266
066272
064276
064302

066306
0663164

7654 064 55

005037

002500

CLR

010137

002430
80 430
002422
002424
002424
177777
177777

MOV
DEC
CLR
MOV
DEC
MOVB
MOVB

005037
05037

005337
005037
010; 7
005337

116137
116237

064
066326
osasgo
ooag 0

104457
004547
005726
003744

066332

104406

7455 064332
76456 064334

7457 064342
7458 064344

064344
064344

7459 064346
76460 064352
7461 064360

;zgg 064366

023737

001335

104405

005077
017737
052777

005077

002502
02426

002404

(LR
CLR

oogsoo
002502

002240

46%:

115706

002502
115712
:

7464
;222

R1, TXADRL
TXADRL
RXADRH
R2.RXADRL
RXADRL
=1(R1),GOOD
=-1(R2) .BAD

ot
Seee
....
e
:SET UP DATA FOR ERROR MESSAGE

*CLEAR BAD
SET UP DATA FOR ERROR MESSAGE

ERROR WANDLER

CKLOOP

:BRANCH TO BGNSEG IF ERRLOOP IS SET

CMP

CNT1,BCINP

BNE

CLR
MOV
BIS
X

CLEAR 600D

ERRSOFT 2407,E250,ERR231

ENDSEG

115726
115714
000010

GOOD

BAD
TXADRH

CLR

T T TR

;ALL BYTES COMPARED ?

4498

aCSRX
oIDRX,BAD
#10,3CSRX

aCSRX

R R P P Y PR R L R

CSERSOFT
2407
E250
ERR231

TRAP

CSCLP?

TRAP

CSESEG

:l NO, GET NEXT ONE

100008:

T T T T P

TRAP
MORD
.WORD
"WORD

:CLEAR CSR1,
sREAD DIR1 FOR CLEAR BO BIT IN IIR
SSELECT CHANNEL 2
L

L L L L L

SCLEAR CSR2,SELECT CHANNEL 1

L L

L L L

DL LD L

Ll Dl Lol bl

:PART 2 CHECK THE NON EXISTENT MEMORY BIT OF CHAN. 1 (THE 1/0 PAGE IS USED
FOR NON EXISTENT MEMORY)
H

7467 064372

012701

002624

064402
064406
064412

012746
012746
012746

000340
010132
000004

064422
064426

104437
062706

000010

7474 064442

005737

7468 064376
7469 064400

7470 064402

005021
005011

00. ..........................................................................

PSEU24: MOV
CLR
CLR

SETVEC

#TABE ,R1

;CLEAR TWO WORD IN TABEL E

#4,#NXM, #PRIO7

sSET UP VECTOR FOR TRAP TO 4

(R1)+
(R1)

fee
e

005037
012701
005711

002326
160000

76475 064446 062701

000002

7476 064452

001772

0644564
066460

012700
104436

7477 064454

7478 064462 162701

7479 064466

064466

7480 064470
7481 064474

7482 064500
7483 064506
76484 064512

104404

005037
005037
042777

010177
012737

1%:

002326

000002

115570
000002

TRAP
ADD

C$SVEC
#10,SP

NXMFLG
0160000 R1

ADD

anr6

IZ.Rl

:NEXI 1/0 PAGE ADD.(NO AUTO INCR.11/44!)

CLRVEC

#¢4

:SET VECTOR & TO NORMAL STATE

SUB

#2,R1

CLR
CLR
BIC

INTFCY
INTFC2
#10,3CSRX

:CLEAR INTERRUPT FLAG
*CLEAR INTERRUPT FLAG
SSELECT CHANNEL 1

BGNSEG

115572

002402

MOV
MOV

R1,3BARX
#2 .RSAVE

:CLEAR FLAG
.LOAD FIRST ADDRESS OF 1/0 PAGE
FIND A NON EXISTEND LOCATION

#3.-(5P)

CLR
MOV
1ST
BEQ

000004

002376
002400
000010

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

MOV

064416 012746 000003

7471 064430
7472 064434
7473 064440

MOV
MOV
MOV

;

MOV
TRAP

#4 RO
CSCVEC

TRAP

C$BSEG

:LOAD BAR1 WITH A NON EXISTS 1/0 ADRR.
:LOAD NUMBER OF BYTE COUNTS

K 15

SEQ 192

HARDWARE TESTS MACRO M1113
06=-SEP=-82 16:46
PAGE 66-4
TEST 24: DMA DATA TRANSFER TEST FROM CHANNEL 2 10 1

7485 064520

437

00240

§2777
012777
12777

000010
000117
00 686

7491 064568
76492 064570
76493 064576
76494 064606
7495 064615

042777
012777
052777
012737

000010
017161
000010
000002

7497 064626

o1zro;

oeasia

7687 0645 8
488
0646540
7489 064546
76490 064556

1 7;7 gogao

013777

0024 8

NEG

RSAVE

:BILD 2°'COMPLEMENT

11554
11553
1155%

BIS
MOV
MOV

#10,a(SRX
#11%,3CSRX
OIABE.OBARX

*SELECT CHANNEL 2
;DMA ENB,DMA DIR,INT ENB,SYS
JLOAD BAfis WITH §YAR ADDRESS OF TABE

11551
11550
115474
002374

BIC
MOV
BIS
MOV
SETPRI

#10,a(SRX
#17161,aCSRx
#10,3CSRX
#2,CHAN
#PRI00

SSELECT CHANNEL 1
i==<SET DMA ENB,BA 16=21,INT ENB CSR1*SELECT CHANNEL 2
*LOAD CHANNEL NUMBER
:SET PRIORITY TO ZERO

11255

MOV

1155

MOV

RSAVE ,aBCRX

*LOAD BCR1

RSAVE ,aBCRX

*LOAD BCR

064612
064616
7496 064620

012700
104441
112777

000000
000013

MOVB

#13,31CRHX

MOV
#PRI100,RO
TRAP
C$SPRI
;===L0AD GTS INTO ACR 2===cecceee c—ceee

76498 064632
499 064636
7500 064640
7501 064642
7502 064644

00573
001015
oossog
00137
017737

002400

T1ST
BNE
DEC
BNE
MOV

INTFC2
6$
R2
3$
aCSRX ,BAD

;IS INTERRUPT IN CHANNEL 2 OCCER
:BRANCH IF YES
:DECREMENT COUNTER
:1F NO,TEST AGIN
sGET CSR2 CONTENTS

064660
064662
064664
064666
7505 064670
064670
7506 064672
064672
064676
7507 064700
7508 064706
7509 064714
7510 064722

104457
004550
006072
003500

012700
104441
112777
042777
012737
017737

000014
000010
000001
115352

7512 064736

022737

040060

7503 064652
7504 064660

7511 064730

7513 064744
7514 064746

7515 064754

064754
064756
064760
064762
7516 064764
064764
7517 064766
064766
064766
7518 064770
7519 064776
7520 065002
;gg; 065010

012737

077777

115430

100016

MOV

002502

002500

001410
012737

MOV
01000{6 GOO0D
ERRSOFT 2408,E252,ERR201

#PRIO7

115362
115364
002374
002502

MOVB
BIC
MOV
MOV

#14,31CRHX
#10,3CSRX
#1,CHAN
aCSRX ,BAD

002502

CMP

#40060 .BAD

INXM,BA 16417 SHOULD BE SET

68:

000340

017000

040060

002502

BIC

BEQ
MOV

002500

052777
005077

#17000,BAD

12%
#40060,G00D

ERRSOFT 2409,E401,ERRS01

128:
115304
115272

000010
115264

;252

002502

115270

;
ENDSEG
CLR
MOV

BIS
CLR

:BRANCH IF YES
:SET UP DATA FOR ERROR MESSAGE

*ERROR HANDLER

TRAP
MORD
.WORD
"WORD
:BRANCH TO BGNSEG IF ERRLOOP IS
TRAP
10001$:

aCSRX
aIDRX,BAD

SSELECT CHANNEL
:CLEAR CSR2,SELECT CHANNEL1

;‘00 ..................................... P E NS E®DE D DD D DD DD

ED DO DD ® D DD

‘PART 3 DMA OVER 32K

005037

002376

CLR

INTFCI

TRAP

:CLEAR CSR1
*READ DIR1 FOR CLEAR BO BIT

#10,3C SRX
aCSRX

:00' ------------- cococee D

7525 065014

:IGNORE BIT 9-12

CKLOOP

104406

005077
017737

;BC OF ,MUX,DMA DIR,SYS CONT SHOULD SET
:ERRORHANDLER

SETPRI

CKLOOP

104457
004551
005265
003702

104405

*LOAD LOOP COUNTER

TRAP
CSERSOFT
MORD
2408
.WORD
E232
.WORD
ERR201
JBRANCH TO BGNSEG IF ERRLOOP IS SET
TRAP
CSCLP1
:NO FURTHER INTERRUPT ALLOWED
MOV
#PRI07,RO
TRAP
C$SPRI
;====L0AD TCA INTO ACR 2====ccccccccaSSELECT CHANNEL 1
:LOAD CHANNEL NUMBER
SGET CSR1 CONTENTS

104406

042737

#77977.R2

e e e

R T

:CLEAR INTERRUPT FLAG

CSERSOFT
2409
E4O01
ERRS01
SET

CSCLP1

CSESEG
IN IIR
DD @@ DB

L 15
HARDWARE TESTS

MACRO M1113

06-SEP-B2 16:46

SEQ 193

PAGE 66-5

TEST 24: DMA DATA TRANSFER TEST FROM CHANNEL 2 T0O 1

7540 065104
7561 065112
754% 065114
7543 065116
7544 065120
7545 065122
7546 065126
7547 065132
7548 065134
7549 065136
7550 065140
7551 065146
7552 065152
7553 065160
7556 065164
7555 065170
7556 065176
7557 065202

7558 065206
065206
7559 065210
7560 065216
7561 065222
7562 065230
7563 065234
7564 065242

7565 065250
7566 065256

567 065264
7568 065272
7569 065300
065300
065304
7570 065306

7571 065314
757 0653;2
7573 065330

7574
7575
7576
7577
7578

0653364
065340
065342
065344
065346

7579 065354

012737
110320
005203
005301
001374
012701
010037
105020
005301
001375
052777
005037
112777
013701
062701
010137
113777
004737

104404
052777
005077
013737
005437
013777
012777

042777
012777
013777
012777

012700
104441

052777
012737
112777
012701
005737
001015
005301
001373
017737
012737

00%409
002342

000001

002344
067200
002336
000001
007724
005;60
002356
010000
000001

002334

177572

010000
002360

000010
177572
000212
002312
000040
002410
002410
011060

000010
115060
002240
002402
002402
000127
000010
010000
002402
000121

118:
13%:

16%:

208:
115132

115110

115074

114726
100036

MoV
MovB
INC
DEC
BNE
MoV
MOV
CLRB
DEC
BNE
BIS
CLR
Mmove
MoV
ADD
MoV
Mova
JSR

BGNSEG
115062

BIS
CLR
MOV
NEG
MoV
MOV
BIC
MoV
MoV
MoV
SETPRI

002402
115042
115030
115022
115016
115012
115000

000000
000010
000002
000013
077777
002400

CLR
CMP
BLTY
BGT
TST
BNE
JMP
CLR
MoV
JSR
MoV
MoV
MoV
CLR

114764
002374
114740

23%:

002502
002500

BIS
MOV
MOvB
MoV
TST
BNE
DEC
BNE
MOV
MOV

-nr-

0020 7
023727
80;4 )
0 025
005737
00100;
0001
005037
012737
004737
013709
010937
012701
005003

g
e €

7526 065020
7527 065024
7528 065032
7529 0650
7530 065032
7531 06504
75 § 065044
7533 065050
7536 065054
7535 065062
7536 065066
7537 065072
7538 065076
7539 065102

AR _INTERRUPT FLAg
THERE MORE THAN
32k

NO SKIP TEST

;JUMP TO TEST END
;LOAD INPUT FOR CONVERSION ROUTINE

¢ REATE VIRTUAL ADDRESS

sGET START ADDRESS OF BUFFER A
sLOAD START ADDRESS OF BUFFER A
:LOAD COUNTER FOR 2K

sR3_CONTAINS

s **ENABLE MEMORY MANAGEMENTw+
sLOAD BUFFER WITH DATA
:CREAT NEXT DATA

:LOAD 2K

sLOAD START ADDRESS OF BUFFER B
sCLEAR BUFFER B

;2K CLEARED

;IF YES,DO THE TEST
sSELECT CHANNEL 2
L4

i====LOAD TON INTQ A(R Q======eeceecee

:CREATE MLA1
R1,MLAY
MLA1,3IDRHX
PC,LOOP

:STORE MLA1
;====LOAD MLA1 INTQ DOR 2-=======eeeeee
SWAIT A LITTLE

#10,3CSRX
aBARX

;SELECT CHANNEL 2
:===LOAD START ADDRESS OF BUFFER A==-:STORE BYTE COUNT INPUT
:BILD 2°COMPL FOR BCR
i====L0AD INPUT INTO BCR 2======ee===
:=DMA ENB,DMA DIR,INT ENB,.BIT 16,5YS
SSELECT CHANNEL 1
;====LOAD START ADDRESS OF BUFFER B--i====L0AD INPUT INTO BCR 1==i====SET DMA ENB,INT ENB,BIT16 IN CSR1

BCINP,RSAVE

RSAVE
RSAVE ,aBCRX
#127 ,3CSRX
#10,3CSRX

#10000, aBARX
RSAVE ,aBCRX
#121,3CSRX

#PR100

#10,3CSRX
#2,CHAN

#15,31CRHX
#77077.,R1
INT FC2
24$

23%

CSRX,B ,BAD
aC$s
#10
1000%6,GooD

*SET PRIORITY TO ZERO

;SELECT CHANNEL 2

TRAP

C$BSEG

MOV
TRAP

#PR100,R0
C$SPRI

$LOAD CHANNEL NUMBER

;e===L0AD GTS INTO ACR 2===esceccccces

*LOAD LOOP COUNTER
;IS INTERRUPT IN CHANNEL 2 OCCER
*BRANCH IF YES
*DECREMENT COUNTER
*1F NO,TEST AGIN

SGET CSR2 CONTENTS

:BC OF ,MUX,DMA DIR,BA 16,SYS CONT

m15

HARDWARE TESTS MACRO M1113 06-SEP-B2 16:46 PAGE 66-6

TEST 24: DMA DATA TRANSFER TEST FROM CHANNEL 2 TO 1

065 63 104457

7580 06536

ERRSOFT 2410,E232,ERR201

065364
065366
065370
7581 065 7%
065372
7582 065374
7583 065402
7584 065410
7585 065414
7586 065416

004555
00607
003500

065432
065434
065436
65440
7589 065442
065442
7590 065444
065444
065450
7591 065452
7592 065460

104457
004553
006072
003500

012737

000010
000002

7594 065474
7595 065502

013737
063737

002336
002240

7597 065516
7598 065524

023737
001404

002502

7587 065426
7588 065432

7593 065466
96 065510

7599 065526

104406
04%777
01 7;7
005737
001913
017737

012737

002502

100020

017737

04§737

017737
005037
023737
001404

012737
013737

06 7;7

017737
023737
001404

104457
004556
006200

248:

002500

BIC

#10,3CSRX

BNE
MOV

3CSRX . BAD

MOV
ST

#1,CHAN
INTFC1

25%

MOV
#100020,G0OD
ERRSOFT 2411,E252,ERR201

114566

000010

002374

BIS
MOV

#10,3CSRX
#2.CHAN

002500
002500

MOV
ADD

PHLOW , GOOD
BCINP.GOOD

PSET UP COMPARE VALUE
Sase

CMP
BEQ

BAD, GOOD
30$

*HAS BAR2 THE CORRECT ADDRESS
‘BRANCH IF YES

114574

MOVB

002502

MOV

002500

002502
002500

114502

000001
002360

002374
002500

002240

002500

160000 002500

114450
002500

:BC OF ,BA 16 SHOULD BE SET
:ERROR HANDLER

#PRIO7

114620

#14,31CRHX

aBARX . BAD

002502
002502

308:

31$:

*ERROR HANDLER

:GET BCR2 CONTENTS
;
*1S BCR2 ZERO
*BRANCH IF YES
*ERROR HANDLER

BIC

#10,3CSRX

:SELECT CHANNEL 1

BIC

#160000, 600D

TCLEAR BIT 13¢14415

ADD

8CINP, GOOD

MOV
aBARX . BAD
CMP
GOOD , BAD
BEQ
408
ERRSOFT 2414 ,E234,ERRSO1

#PR107,RO
C$SPRI

:GET BAR2 CONTENTS

aBCRX,BAD
GOOD
BAD, GOOD
3¢
2413,E235,ERRS01

#1, CHAN
a*raa GOOD

CSERSOFT
2411
E232
ERR201
SET
CSCLP1

tee==lOAD TCA INTO ACR 2====cccccccces

MOV
CLR
CMP
BEQ
ERRSOFT

MOV
MOV

(CSERSOFT

MORD
2410
.WORD
E232
.WORD
ERR201
:BRANCH TO BGNSEG IF ERRLOOP IS SET
TRAP
CSCLP1
sSELECT CHANNEL 1
*LOAD CHANNEL NUMBER
:IS AN INTERRUPT IN CHANNEL 1 OCCURED
:BRANCH IF YES
SGET CSR1 CONTENTS

SETPRI

258:

<ERRSOFT 2412,E234,ERRS01

114542
002500
002502

TRAP

TRAP
MORD
.WORD
.WORD
:BRANCH TO BGNSEG IF ERRLOOP IS
TRAP
:NO FURTHER INTERRUPT ALLOWED
MOV
TRAP
sSELECT CHANNEL 2
$LOAD CHANNEL NUMBER

CKLOOP

000014

7608 065612

065644
065646
065650

114656

11§777

104457
004555
006231
003702
042777

7610 065626
7611 065634
7612 063642
761% 065644

002374

000340

065560
82556
5564
065566
7605 065570

7609 065620

114676

000001
002376

012700
104441
052777

104457
004554
006200
003702

7606 065576
7607 065606

000010

104406

065526
065530
065532
065534

7600 065536
7601 065544
7602 065550
7603 065556
7604 065560

CKLOOP

:ERROR HANDLER

TRAP
MORD
WORD
.WORD

CSERSOFT
2412
E234
ERR501

TRAP
MORD
‘WORD
.WORD

CSERSOFT
2413
E235
ERR501

1LOAD CHANNEL NUMBER
SSET UP COMPARE VALUE
W

SGET BAR1 CONTENTS
*HAS BAR1 THE CORRECT ADDRESS
‘BRANCH IF YES
*ERROR HANDLER

TRAP
MORD
"WORD

CSERSOFT
2414
E234

0 194

HARDWARE TESTS MACRO M1113 06-SEP-82 16:46 PAGE 66-7

TEST 24: DMA DATA TRANSFER TEST FROM CHANNEL 2 TO 1
7614
7615
7616
7617
7618

065652

065656
065662
065666
065670
065674

0037 ;
017737
005737
001409
005037

114424
002502

104457
004557
006;31
003 o;
01573

7621 065716
7622 065722
7623 065726
7624 065732
7625 065734
7626 065736
7627 065742
7628 065746
7629 065754
7630 065762
7631 065766
7632 065772

01370;
005037
005237
122122
001446
005037
005037
012737
012737
010137
005337
062737

002500
002502
000001
000001
002430
002430
160000

7634 066006
7635 066014
7636 066022
7637 066030
7638 066034
066034
066036
066040
066062
7639 066044
7640 066052
7641 066060

052737
116137
116237
005037

010000
177777
177777
177572

7633 066000

7642 066062
7643 066066

066066
066066
7644 066070
7645 066074
764€ 066102
;g:g 066110

013701

013737

104457
004560
005726
003744
012737
023737
001322
005037

104405
005077
017737
052777
005077

40%:

002500

065674
065676
065700
065702
7619 065704

7620 065712

002502

000001

002356

177572

002360
002404
002404

002430

000001
0024064

43%:

44$:

002426
002422
002430

002424

177572
002240

468:

177572

114204
114172
000010

114164

IBCRX,BAD
BAD
43%
GOOD
2415,E235,ERRS01

MOV

#1,5R0

TRAP
MWORD
.WORD
.WORD
;**ENABLE MEMORY MANAGEMENT*+

MOV
CLR
INC
CMPB
BEQ
CLR
CLR
MOV
MOV
MOV
DEC
BIC

BUFBB.R2
CNT1
CNTY
(R1)+,(R2)+
46%
GOOD
BAD
#1, TXADRH
#1.RXADRH
R1. TXADRL
TXADRL
#160000, TXADRL

*PROVIDE FIRST BYTE OF BUFFER B
SCLEAR BUFFER COUNTER
:
:BUFFER A EQUAL BUFFER B
:IF YES CONTINUE
:CLEAR GOOD
:CLEAR BAD
:TX ADDRESS IS OVER 32k
*RX ADDRESS IS OVER 32k
*GET ADDRESS OVER 32K
Rs
:CLEAR PAR INFORMATION

MOV

002424
002500
002502

BUF AB,R1

TXADRL , RXADRL

BIS
MOVB
MOVB
CLR
ERRSOFT

#10000 . RXADRL
=1(R1).GOOD
=1(R2).BAD
SRO
2416,E250,ERR231

MOV
CMP
BNE

#1,5R0
CNT1,BCINP
44$

CLR
ENDSEG

002502
114170

MOV
BIS

CLR

SRO

:GET BCR1 CONTENTS
:BCR1 CONTENTS SHOULD BE ZERO
*BRANCH IF YES
*SET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

CSERSOFT
2415
E235
ERRS501

*GENERATE RX ADDRESS FROM TX ADDRESS

*RX ADRRES IS TX ADDRESS +2K
*SET UP DATA FOR ERROR MESSAGE
g
i*+DISABLE MEMORY MANAGEMENT*+
*ERROR HANDLER
TRAP
MWORD
.WORD
.WORD
;**ENABLE MEMORY MANAGEMENT*+
*ALL BYTES COMPARED ?
:IF NO, GET NEXT ONE

CSERSOFT
2416
E250
ERR231

:*+DISABLE MEMORY MANAGEMENT++

aCSRX
aIDRX,BAD
#10,a(SRX

aCSRX

ERRSO01

:PROVIDE FIRST BYTE OF BUFFER A

100028
:

:000 ..................... D

;238

.WORD

MOV
ST
BEQ
CLR
ERRSOFT

TRAP

:CLEAR CSR1
*READ DIR1 FOR CLEAR BO BIT
SSELECT CHANNE
Tl

CSESEG
IN IIR

:CLEAR CHANNEL 2,SELECT CHANNEL 1

SPART & DMA OVER 64K
;000 ..........................................................................

7651
7652
7653
7654
7655
7656

056114
066120
066124
066132
066134
066136

7657 066142
7658 066144
7659 066150

005037
005037
023727
002404
003005
005737

00100;
000137
005037

002376
002400
002342

PSEU34:
000002

002344
067200
002336

11$:
13$:

CLR
CLR
CMP
BLT
BGT
ST

BNE
JMP
CLR

INTFCI
INTFC2
PHHSIZ ,#2
11%
13
PHLS1Z

13$
EXQV24
PHL OW

:CLEAR INTERRUPT FLAG
:CLEAR INTERRUPT FLAG
*IS THERE MORE THAN 64K
S1F NOD SKIP TEST
:
:

:
SJUMP TO TEST END
*LOAD INPUT FOR CONVERSION ROUTINE

B 16
HARDWARE TESTS

MACRO M1113

06-SEP-82 16:46

SEQ 196

_PAGE 66-8

TEST 24: DMA DATA TRANSFER TEST FROM CHANNEL 2 TO 1

7683
S}e re 11 ; ; 93%
766§
i?e
;224 176 012701 010000
Tete §§ 3
;
reet oesls Liddse
158 i R

7660

066156

0127

0¢

000001

002334

177572

434
1 } 852228
;2; 066
105020
fé7a
7675 088
066 §§ 001374
0012

533
C‘&S&‘SS
MOV
a&
fAB
?o;
:}6830.a1
5
s Kol RGO
i,
MOV

MOV

208:

R
EE B
g vem
763: 822 52 11 9;7 000212 114010
;279 066

7680 066264

o1§701 00231
062701

:83
3%@8

7685
988 ;2 ?}9;3;7 §8%2}8
113774
7688 052
011060

#1,5R0

:30889631
;gb)o

BNE 20%
B}
Haon
MOVE #212,31CRHX
288

00004

#2,PHHIGH

2231fi?1
.

:833
HLA1E&IDRNX
JSR
PC,LO0P
R1,MLA1

7o8% 002308 0045;7 ?13990
0893 0937 7 002240 002402

To88 82235 8054%7 00240

CLR
MOV
NEG

ABARX
BCINP,RSAVE

7830 0883
058
012777 010000 113726
11
7%2
0 13777 002402
20¢
1137¢e
;23 822%9 e

BIC
MOV
MOV
oy
SETPRI

#10,3CSRX
#10000,
aBARX
RSAVE
,
3BCRYX
¥141 5CSRX
#PR100

RO
:838
1ST
OrE
oK
o

4 ¢4 °°°§
3 013;;; 88%?2% 133;25
06634 84 777 000010 113732

:33

7691 066354

reds decios G167ty 0an%ad aodtit
0% o“omuz 5701 0999;7
;235 oeoaig 83 ;2; 302400
238:
P00 Seeeis 00121‘
e
444 8222§§ 805
03¢i

7708 05%e

°’7i§§ 100036 005300

;;84 oooag‘ e

°°°‘5$ L epiid

066454

777

3?2¥55223§x

gi
:;779%:'1“
éntfcz
?‘
Rs
§22

#100046,000D

ERRSOFT 2417,E2%2,ERR201

;«sENABLE MEMORY MANAG

:tgAg gTART ADDRESS OF BUFFER B
: k‘éf;%%é;‘“ 8
SIF
THE TEST
: YES,DO
DO THE
JLOAD

L
—
teeeel0AD TON INTO A(R Q====cecccccccs
:CREATE MLAT
Y

iee=e
OAD MLA1 INTO DOR 2==cecccccces
SWAIT A LITTLE
:STORE MLA1

00191;
017

000010

113610

113570

00250

;;?3 8322?2 8127?7 100040 005505

24%:

BIC

BNE

MOV

#10,3CSRX

aCSRX ,BAD

#100040,GOOD

te=={ OAD START ADDRESS OF BUFFER A====
*STORE BYTE COUNT INPUT

‘°“°L5£S°7§%u§°?~?8“aca G el

:=DMA ENB,DMA DIR,INT ENB,BA 17,SYS C

SSELECT CHANNEL 1
$id.
t====L0AD
START
ADDRESS
OF
BUFFER
B
tee=={0AD INPUT INTO BCR 1==2
te===SET DMA ENB,INT ENB,BIT17 IN CS
*SET PRIORITY TO ZERO et
el
;SELECT CHANNEL

LOAD CHANNEL NUMBER
*LOAD LOOP COUNTER
;égAagas?gusgsxn CHANNEL 2 OCCER
*DECREMENT COUNTER
:IF
AGIN
SGET NO,TEST
CSR2 CONTENTS

8¢ OF JMOXDMA DIR,BA 17,5YS CONT
$ERROR 'HANDLER

004591

7705 06646

7708 066502

MoV

RSAVE

Egeg
START
ADDRESS
OFOF BUFFER
AA
:LOAD
START
Aoonesg
BUFFER
it Ag°£?27;§R FOR 2K
$«*ENABLE MEMORY MANAGEMENT®e
FL0A0 alfeER T
B S’ e

ftmaannd

"WORD

E232

MWORD 2417

CHANNEL B
:sSELECT g
:BRA
IBRANCHIF
YES

‘BC OF,BA 17 SHOULD BE SE

16
HARDWARE TESTS

MACRO M1113

o?-sev-az 16:46

TEST 24: DMA DATA TRANSFER TEST

7713

0665

sge

1244«1
777

000010

1414

oo; 6

7713 8222 4

81 737

7750 066610
7721 066615

001404

066614
066616
066620

004563
ooe;oo
003 g;

06661

7725 066622
7723
066630
7724 0666364

7725 066642

7726 066644
066644
066646

066650
066652

7727 066656
7728 066662
7753 066670

7730

258:

066676

7731 066706

7732 066712
733 066720
7734 0667%6
7735 066730

066730
066732
066734
066736

7736
066740
7737
066746
7738 066752
7739 066756
7740 066760

066760
066762
066764
0667

7741 06677

002374
11 18
00250

113502

00 sos

001404

104457
ooasgt
ooe; 1
003 o;
062777
01 7§7

02500

113456
oogsoo
002502

002502

063737

oogzao

002500

104457
004566
0 ;31
g;

;SELECT CHANNEL 2

ADD

8C INP, GOOD

#2,CHAN
#14,31CRHX
PHLOW, GOOD
3BARX .BAD

AD,GOOD

BEQ
0$
ERRSOFT 2419,E234,ERRSO1

308:

MOV
CLR
CMP
BEQ

160000

113364
002500

318:

002500

-WORD

ezsg

TRAP

C$SPRI

2BCRX,BAD
6LAD
gAt.GOOD
1

002502
002502

002502

oooog1

01370;
00503
005237

002360
805404
002404

177572

THE CORRECT ADDRESS

:BRANCH IF YES
*ERROR HANDLER

:GET BCR2 CONTENTS
;
11S BCR2 ZERO
‘BRANCH IF

TRAP

2419
E234
ERRS501

TRAP
.WORD
WORD
.WORD

CSERSOFT
zago
E235
ERR501

YES

;ERROR HANDLER

8CINP,GOOD

SCLEAR BIT 13414415

SGET BAR1 CONTENTS
*HAS BAR1 THE CORRECT ADDRESS
:BRANCH IF YES
*ERROR MANDLER

TRAP
MORD
WORD
.WORD

CSERSOFT
2421
E234
ERRSO01

TRAP
.WORD
"WORD
.WORD

CSERSOFT
24;5
[2
ERR501

:GET BCR1 CONTENTS
*BCR1 CONTENTS SHOULD BE ZERO
*BRANCH IF YES
SSET UP DATA FOR ERROR MESSAGE
*ERROR HANDLER

43%:

MOV

#1,SR0

;**ENABLE MEMORY MANAGEMENT
s+

44$:

MOV
CLR
INC

BUFBB.R2
CNTY
(N1

*PROVIDE FIRST BYTE OF BUFFER B
‘CLEAR BUFFER COUNTER
:

MOV

BUF AB,R1

CSERSOF T

MORD
WORD
.WORD

MOV
aBCRX,BAD
ST
BAD
BEO
438
CLR
600D
ERRSOFT 2422,E235,ERRSCY

002500

1;7

CONTENTS

ADD

MOV
aBARX . BAD
CMP
GOOD , BAD
BEQ
408
ERRSOFT 2421,E234,ERRSOY

40%$:

:HAS BAR2

;SELECT CHANNEL 1
*LOAD CHANNEL NUMBER
SSET UP COMPARE VALUE

113340
002502

:GET BAR2

#10,3CSRX
#1, CHAN
BUF BB, GOOD

#160000, 600D

418

SLOAD CHANNEL NUMBER
teeeal0AD TCA INTO ACR 2e=cccccccccces
*SET UP COMPARE VALUE

BIC
MOV
MOV

BIC

104457
004565

8177
005737
001609
005037

#10,3CSRX

ERRSOFT 2420,5235.,ERRSO1

013737

ooo;oo
003 ;

BIS

CMP

002500

113416
002374
002500

017737
023737
001404

;

MOV

00250

000010
ooog01
002360

oagrgr

gssasorr

0!
NO FURTHER INTERRUPT ALLOVED
MOV
#PR107,RO

SETPRI #PR1O7
MOV
MOVB
MOV

104457

7742 066776 013701 002356
7743 067002
7744 067006
7745 067012

113 ;4

00002
00014
002336

837 7 002502

017737
005037
023737

TRAP

.WORD

01 7;7
10777
8; 737

;ERROR HANDLER

066544
sss
56

144

ERRSOFT 2418,E232,ERR201

§ 012700 000340

me
7714
7715
7719

FROM CMANNEL 2 TO 1

822 § 104457
066

SEQ 197

PAGE 66=9

*PROVIDE FIRST BYTE OF BUFFER A

D16
HWARDWARE TESTS

MACRO M1113

06-SEP-82 16:46

SEQ 198

_PAGE 66-10

TEST 24: DMA DATA TRANSFER TEST FROM CHMANNEL 2 TO 1

774

7750

0670

821 B

00144 9

7748 0670
7749
0670

7751 067040

77 g 067
7753

067052

050
0 9 7

8 50
50

012737

0000

12737

7754 837 56
7755
067

(MPB

10137

00 ; 7

00000
0024

0024

463

MOV

'5L, TXADRM

MOV

a1 TlADRL

CLR
CLR

805453
024

(R1)+,(R2)+

BEO
MOV
DEC

sooo

RXADRH
5

:BUFFER A EQUAL BUFFER B

*IF YES CONTINUE
:CLEAR GOOD
*CLEAR BAD

STX ADDRESS IS OVER 64K

*RX ADDRESS IS OVER 64K

cer ADDRESS OVER 64K

062737
13727

16 ogg
0024

80 430
02424

BIC
MOV

c1eoo 0, TXADRL
TXADRL , RXADRL

ELEAR PAR INFORMATION
*GENERATE RX ADDRESS FROM TX ADDRESS

7100

116137

025 g

MOVB

=1(R1).GOOD

sev UP DATA FOR ERROR MESSAGE

7759 067114

7760 067120

005037

omso
067122
067124
067126
7761 067130

7762

104457
004567
005726
003744
012737

7763

023737
00132

7729 8270 8

7758 067106

067136

067144

7764 067146

§2757

116237

005037

01 999

177777

177572

000001

002406

80 404
00250

177572

002240

177572

7767 067160
7768 067164
7769 067172
7770 067176
7771 067200

067200
- 067202

7773

;;;g 067204

001010

005237
023737
001402
000137

045

002320

063322

123

CLR

062

468:

-1(a2) BAD

MOV

#1,5R0

BNE

443

avpP

CMP

INC
CMP
BEO
JMP
EXQV24: EXIT

NLIST

TSHDZ24: .C?ggl

éfigggt
104401

#10000 . RXADRL

ERRSOF T 2623.E250.ERR231

BNE

104432
000064

;;;9 067266

067266
067266

002322
002322

MOVB

CLR

7765 067152 005737 002234
66 067156

BIS

CNil,BCINP

*RX ADRRES IS TX ADDRESS +2K

SeiDISABLE MEMORY MANAGEMENT
s

:ERROR HANDLER

TRAP
MORD
.WORD
.WORD
;+9ENABLE MEMORY MANAGEMENT+*

SALL BYTES COMPARED?
SIF NO, GET NEXT ONE

SRO

teeDISABLE MEMORY MANAGEMENT
s+

EXQV24

SIF YES EXIT TEST

[TRCHT
ITRCNT, ITRDEF
EXQV24
1TAC24
TST

CSERSOFT
2423
E250
ERR231

SIS QUIcK veanrv PASS SELECTED
: INCREMENT COUNTER
:ALL DONE
:BRANCH IF YES
SIF NO TEST ITERATION
CEXIT TEST

TRAP
.MORD

CSEXIT
L10055-.

BEX

ég;ZZADHA DATA TRANSFER TEST FROM CHANNEL 2 TO 12ZN/

L10055:

TRAP

CSETST

E 16

WARDWARE TESTS MACROM1113 0&-SEP=82 16:46 PAGE 67

TEST 25: MCR FUNCTION TEST OF

. Sy

CMANNEL 1

7779

LSBTTL

TEST 25: MCR FUNCTION TEST OF CHANNEL 1

;;g?

""'0'0""""0'"""""""t'.""'""'t"'Q"Q"Q"'""Q'Qttt""""

778

TEST 2
pAnt 1 CHANNEL 5TRANSMITS
O DATA BYTES (SO)AND THAN

7786

SPART 2 SAME AS PART 1 EXCEPT THAT A WRONG QUANTITY OF SUCCESSIVE eos

7789

778
7784
7785

:
:

7787
7788

:
;

7790

CHARACTERS ARE TRANSMITTED esroae THE CORRECT QUANTITY OF SUCCESSIVE
EOS CHARACTERS ARE
TRANSMITTED

I.E 2 EOS CHAR.(25),1 DATA BYTE (S0)THAN THE PREDEFINED EOS CHAR.(25)

.0'"0"."'0'C""Q""t'""t"tt't.'t"t't't't"t"'tt'."'t'Q.Q'.'Q'Q"t"

7791 067%70
7792
7793

A PREDEFINED QUANTITY (MC INPUT)OF SUCCESSIVE EOS CHMARACTERS (177)
VIA THE 15(/15:5 BUS TO CHANNEL
2.
AFTER RECEIVING THESE CHARACIERS
THE DMA DATA TRANSFER IS TERMINATED BY CHANNEL 2 (COMP E

067270

BGNTST

067270
067274

005737
001410

002324
-

067276
067302
067306
067310
067312
7795 067316

012746
012746
010600
104417
062706
005037

070742
000001

oe73§e

012746

000340

067336

013746

002246

7796 067322
7797 067326

067332
067342

067346
067350

004737

012746

000004
002322

;1S THE PNT FLAG SET
SIF YES, PRINT THE TEST MEADER

[ TRCNT
PC,BGIN2
VECC2,#INTSC2,#PRIO7?

012746

000340

067364

013746

002244

MOV

SETVEC

VECCY,#INTSC1,#PRIO7

010142

067374
06737
7799 067402
7800 067410

104437
062709
11;77
013701

000010
ooogsz
002312

7802 067420
7803 067424

010137
113777

002410
002410

04 067432

062701

004737

MOV

112660

000040

011060

7806 067444
7807 067450

005077
113777

112636
002236

7809
067464
7810 067472
7811 067500
731; 067506
7813 067514

052777
012777
013737
oagr 7
005437

800910
002736
002236
000011
oogaoz

7815 oors;o

005437

00240

7816 067532

7817 067540

012777

MOVB
MOV
ADD

#212,3ICRHX
DPAT .R1
#40,R1

#TSHD25,=(SP)
#1,-(SP)
SP,RO
CSPNTF
#4,SP

#PR107,=(SP)

#INTSC2,=(SP)
VECC2,=(SP)

#3,-(5P)

CS$SVEC
#10,5P

#PR107,=(SP)

#INTSCT,=(5P)
VECCT,=(SP)

#3,-(SP)

TRAP
CSSVEC
ADD
#10,5P
jeee== LOAD TON INTO ACR 2===ecccccccces
CREA!E MLA1

112644

MOV
MOVB

JSR

R1,MLA1
HLA\ IDRHX
LOOP

sroae MLA1
ieeee LOAD MLA1 INTQ DOR 2===ceccccccece=

112632

CLR
MOVB

aMCRX
MCINP,aMCRHX

:CLEAR THE MATCH CHARACTER REGISTER
t===LOAD CNT INPUT INTO MCR HIGH BYTE=-

7808 067456 052777 100177 112622

013777

TRAP
ADD
;SET VECTOR FOR CHANNEL 1
MOV

MOV

7805 067436 042777 000010 112634

7814 067520

;CLEAR xveaAtxon COUNTER
SSET
UP PARAME TER
:SET
VECTOR FOR CHANNEL 2

MOV

067370 012746 000003

7801 067414

MOV
MOV
MOV
TRAP
AD

nov

000003

067354

01%766

CLR
JSR
ITAC2S: SETVEC

125::

PNTF
7%

010152

000010

067360

78:

010710

104437
062706

7798 067354

TST
BEQ

112606
112602
ooz«og
00240

002402

112556

000107

112540

BIC

BIS

BIS
MOV
MOV
ADD
NEG
MOV

NEG
MOV

BGNSEG

SWAIT A LITTLE

016 acsax

.SELECT CHANNEL 1

#100177,aMCRX
#10,3CSRX
#TABF,3BARX
MCINP. RSAVE
#11,RSAVE
RSAVE
asavs @BRX

AVE

0107 aCSRX

i=== ENB MATCH BIT +EOS (177)IN MCR1--

*SELECT CHANNEL
i==<LOAD START ADDRESS OF TABLEF ====
*STORE MATCH CHARACTER COUNT INPUT
*ADD 11(0CTAL) DATA BYTES TO INPUT
‘BILD 2°'COMPL FOR BCR
ieeee LOAD INPUT+DATA BYTES INTO BCR 2-

*REBUILD INPUT + DATA FOR COUNTER

ie===DMA ENB,DMA DIR,INT ENB IN CSR2=--

F 16

HARDWARE TESTS MACRO M1113 06-SEP=B2 16:46 PAGE 67-1
TEST 25: MCR FUNCTION TEST OF
067540

CHANNEL 1

104404

7818
067 43 005037
ogego
7819 067546
005037
002376
7820 06755

12701

002624

#72.,R0

sCLEAR BUFFER TABE

#TABE ,R1

;g 2 82;232 8?1 ;7 002624 112476
7827 067604 81%777 177667 11%«7

285
MOV

3?Aas ABARX
#177667,3BCRX

7829 0676%

SETPRI

#PR100

780

10 51
105
g

0011

7828 067618

12777

000101

067620
067624

012700
104441

000000

7832 067642
7833 067650

112777
012701

7830 067626
7831 067636

7834 0676564

7835 067660
7836 067662
7837 067664
7838 067666

7839 067674
7840 067702

052777
012737

000010
000002

005737

002400

012737

100016

oo1g1s
005301
001373
017737

067702
067704
067706
067710

104457
004705
006072
003500

067712

104406

7841 067712
7842 067714
7843 067722

042777
012737

7845 067734

001013

7844 067730
7846 067736

7847 067744
7848 067752

067752
067754
067756
067760
7849 067762

017737

012737

104406

067764
067770

012700
104441

7851 067772
7as§ 067776
7853 070002
7854 orooog
7855 070012
7856 870014

112406

7859 070026

28:

11246

(R1)+
RO

MOV

112444
002374

BIS
MOV

112420
138:

002502

002500

Mov8
MOV

#101,aCSRX

TST

000010
000001

002376
112336

020000

112356
002374

002502

002500

BNE

002734
002624
002404
002404

005037

002502

002426

308:

:----

ie=e=SET DMA ENB,INT ENB IN CSR1

*SET PRIORITY TO ZERO

MOV
TRAP

*BRANCH IF YES
*DECREMENT COUNTER
:1F COUNTER NO ZERO,TEST AGIN
:GET CSR2 CONTENTS

:BC OF ,DMA DIR,MUX,SYS CONT SHOULD SET
*ERROR HANDLER
TRAP
MORD
.WORD
.WORD

CSERSOFT
2501
E232
ERR201

:SELECT CHANNEL 1
:LOAD CHANNEL NUMBER

TRAP

CSCLPY

aCSRX,BAD

SGET CSR1 CONTENTS

*BRANCH IF YES

:COMP END SHOULD BE SET
‘ERROR HANDLER

TRAP
CSERSOFT
LMORD
2502
WORD
E232
.WORD
ERR201
:BRANCH TO BGNSEG IF ERRLOOP IS SET

TRAP

cscLP

MOV
TRAP

#PR107,R0
C$SPRI

#PRI107

:NO FURTHER INTERRUPT ALLOWED

MOV
MOV
CLR
INC
(MPB
BEQ

#TABF ,R1
#TABE ,R2
CNTY
CNTY
(R1)+,(R2)+
33¢

:PROVIDE FIRST BYTE OF BUFFER F
‘PROVIDE FIRST BYTE OF BUFFER E
*CLEAR BUFFER COUNTER
‘BYTE COUNT
‘BUFFER F EQUAL TO BUFFER E
SIF YES, CONTINUE

CLR

BAD

*CLEAR BAD

CLR

#PRI00,RO
(S$SPRI

teeeel0AD GTS INTO ACR 2===ceccccccces
*LOAD LOOP COUNTER

SETPRI

CLR

[Ep—

tIS AN INTERRUPT IN CHANNEL 1 OCCURED

CKLOOP

000340

ZII.L0AD START ADDRESS OF TABLE E
se=e=[ 0AD
INTO BCR 1===

INTFCY

MOV
#20000, GooD
ERRSOFT 2502,E232,ERR201

11$:

b
Rand

;BRANCH TO BGNSEG IF ERRLOOP IS SET
#10,3CSRX
#1,CHAN

MOV

*IS INTERRUPT IN CHANNEL 2 OCCER

BIC
MOV

*SELECT CHANNEL 1

INTFC2

108
R1
138
aCSRX,BAD

MOV
#100016,600D
ERRSOFT 2501,E2%2,ERR201

108:

C$BSEG

:SELECT CHANNEL 2
:LOAD CHANNEL NUMBER

#1%,31CRHX
#77077.R1

BNE
DEC
BNE
MOV

TRAP

#10,3CSRX
#2, CHAN

012701
01270;
oosog
ogsz 7
1 21;2
001431

005037

CLRB
DECB

CKLOOP

070016 005037 002500

7858 070022

MOV

104457
004706
006072
003500

067762

7850 067764

7857

005737

000013
077777

112520

;CLEAR
INTERRUPT FLAG
:CLEAR INTERRUPT FLAG

MOV

78
oe7g g
7824 067572

00018

1ntrc¥
INTFC

#10,3CSRX

78 § 067 9‘

777

CLR
CLR

BIC

7821 067

e 4200

GOOD

TXADRH

:CLEAR GOOD

*SET UP DATA FOR ERROR MESSAGE

G 16

WARDWARE TESTS MACRO M1113 06-SEP=-82 16:46 PAGE 67-2
TEST 25: MCR FUNCTION TEST OF CHANNEL 1
7860

070032

010137

7862
786

070042
87004

005037
o1g§ 7

7861 7oo§g 80 3 7 80 430

002430

MOV

R1,

002422
002424

DEC

3553
MOVB

RXADRH
R2,RXADRL

Baad

;ggg 0;882 ??«1 ; 8 g ¢
7866 070063 114237 00 sog

CLR
MOV

TXADRL

Rf:??Lcooo
-<a§)'aAo

‘3T UP DATA FOR ERROR MESSAGE
oy

7867 070066

070066
070070
070072
070074

104457
004707
005726
003744

07
7869 070100
7870 070106
7871 070110
070110
070110

104406
023737
001337

7868 070076

7872 070112
7873 070120
73;2 070126

104405

012777
112777
017737

TXADRL

s
|

ERRSOFT 2503,£250,ERR231

*ERROR HANDLER

(CSERSOFT
2503
E250
ERR231
:BRANCH TO BGNSEG IF ERRLOOP IS SET
TRAP
cscLP
;ALL BYTES COMPARED ?
*IF NOT, GET NEXT ONE

CKLOOP
002404

000010
000014
112140

002402

33%:

112160
112142
002502

CMP
BNE
ENDSEG

CNT1,RSAVE
Ing

MOV
MOVB
MOV

#10,aCSRX
#14.31CRHX
a1DRX,BAD

;3;9

TRAP
WORD
.WORD
.WORD

10000$:

DL L

D e DL

:PART 2 CHECK THE FALSE NUMBER OF EOS CHARACTERS

:0“ ............................................. - S
@
e

7878 070134
7879 070142
7880 070146

7881 070154

070162
7883 070170
7884 070176
7885 0702064
7886 070212
7887 070216
070226
7889 070230
7890 070236
070236
7891 070240
7892 070244
7893 070250
7894 070256
7895 070262
7896
070266
7897 070270
7898 070272
7899 070274

012777
005077
113777

000002
112140
002236

0%2777
012777
013737
062737
005437
013777
005437
012777

000010
003250
002236
000003
002402
002402
002402
000107

052777

104404

100025

112136
112134

112124

112060

112042

:CLEAR INTERRUPT FLAG
:CLEAR INTERRUPT FLAG
SSELECT CHANNEL 1
*CLEAR BUFFER TABH
e
T
o
i==<LOAD START ADDRESS OF BUFFER H===

#101,3CSRX
#10,3CSRX
#2,CHAN

i===SET DMA ENB,INT ENB IN CSR1SSELECT CHANNEL 2
*LOAD CHANNEL NUMBER

012777
052777
012737

000101
000010
000002

111762
111754
002374

MOV
BIS
MOV

070332
070;36

012700
1044461

000000

7906 070346

012701

007777

7904 0703 s

7905 070340

112777

000013

111722

INTFC2
INTFC1
#10,3CSRX
#66. ,R0
#TABH,R1
(R1)+
RO
348
#TABH, 3BARX

112000

111:74

SSELECT CHANNEL 2
i==<_0AD START ADDRESS OF BUFFER K====
SSTORE MATCH CHARACTER CNT INPUT
SADD 3 DATA BYTES TO CNT INPUT
:BILD 2'COMPL FOR BCR
te=<LOAD BYTE COUNT REGISTER====ececeee*REBUILD INPUT+ DATA FOR COUNTER CNT1
:===DMA ENB,DMA DIR,INT ENB,SYS CON

003146

7901 070310
7902 070316
790 orosga

#10,aCSRX
#TABK , 3BARX
MC INP,RSAVE
#3,RSAVE
RSAVE
RSAVE ,@BCRX
RSAVE
#107,3CSRX

112022

177675

BIS
MOV
MOV
ADD
NEG
MOV
NEG
MOV
BGNSEG
CLR
CLR
BIC
MOV
MOV
CLRB
DECB
BNE
MOV

012777

sSELECT CHANNEL 1,SET SYS CON.IN CHA.2
:CLEAR MCR1 REGISTER
i====l0AD CNT INPUT INTO MCR l==ce=eee

002400
002376
000010
000102
003146

7900 070302

#2,3CSRX
aMCRX
MCINP,aMCRHX

005037
005037
042777
012700
012701
105021
105300
001375
012777

348:

CSESEG

MOV
CLR
MOVB

BIS

112110
112104
002402
002402

TRAP

;SELECT CHA. 2 ,CLR ALL BIT IN CHA.1
teeee 0AD TCA INTO ACR 2==eccecccccccees
*READ DIR2 REG. FOR CLEAR ACCRQ SIGNAL

MOV

SETPR!

MOVB

MOV

#100025, aMCRX

#177675,3BCRX

#PRI0O

#13,31CRHX

07787 .81

i====ENB MATCH + EOS CHARACTER (25))

TRAP

($BSEG

i=== 0AD MAX. TRANSFER INTO BCR 1===

SSET PRI. TO 2ERO (ALLOW INTERRUPT)
MOV
TRAP

#PR100,RO
C$SPRI

;===L0AD GTS INTO ACR 2===ceccccccce-

:LOAD COUNTER

201

1113 06°SEP-82116:66
EST OF CHANNEL

7919 070420
7917
0704 g
7918 0704
7919 070434
7950 070663
7921 07045

070450
070452
070454
0456

.WORD

f ]1
3 CSRX
81
?N
I N FC

MOV

T
ERRSOF

00 9 GOOD
2 5 ¥ 232, ERR201

sERROR HANDLER

-WORD

41%:

003250

60$:

NNS SO OOMNO

002404

sDISABLE INTERRUPTS

#TABK ,R1
#TABH,R2

;PROVIDE FIRST BYTE OF BUFFER K

(NTT
CNT1
(R1)+,(R2)+
63%

R107,RO
SPRI

:PROVIDE FIRST BYTE OF BUFFER H
:CLEAR COUNTER
sBYTE COUNT
:BUFFER K EQUAL BUFFER H
sIF YES,CONTINUE
:CLEAR GOOD
:CLEAR BAD
:SET UP DATA FOR ERROR MESSAGE

R2 ,RXADRL

RXADRL
=1(R1) ,GOOD

*SET UP DATA FOR ERROR MESSAGE

2506 ,E250,ERR231

;ERROR HANDLER

-1(R2) 'BAD

SOMNUN

WVISNION

WINO

833 8883

TRAP

#PR107

600D
BAD
TXADRH
R1, TXADRL
TXADRL
RXADRH

NNNONONNNWNN

—-—_O0000000
NNOOOO0O0OO0O0O

OW—=O000N=MNO 3

NININNNNNNNNWNONSN

WIWWW

gegsossesies

O
-t
OO0000000O0 O
-t
O =00 =00
VO
WVIVO
WA
=
NN
o

& 33333
w
=
SRISFHR W)
(= 1"

P C RX BAD

T
CSERSOF
2504
E232
ERR201

:BRANCH TO BGNSEG IF ERRLOOP IS SET
TRAP
cscLP
sSELECT CHANNEL1
sLOAD CHANNEL NUMBE R
;1S THERE AN _INTERR. IN CHANNEL
sBRANCH IF YES
sGET CSR1 CONTENTS
sCOMP END SHOULD BE SET

;BRANCH TO BGNSEG IF ERRLOOP IS

000340

2504 €252 ,ERR201

070404
070408
7914 07041
070410
7915 070412

T
ERRSOF

aCSRX .BAD

#100016 gooo

oMM
MDDV

070400
870400
70402

MOV

O
PV

7913

791; 070372

INTFC
439
x
R1

000000~

070

7910 87

40$:

002400

SEQ 202

PAGE 67-3

OOoOWVP—s

o
8388

7911

7907

OO o=

7308 07033
7909 78

DWARE TESTS
T 25: M(R ¥ UN

-x

Laad
TM

H 16

.WORD

:BRANCH TO BCGNSEG IF ERR%gg: IS
002404

002402

63%:

CNT1,RSAVE
60%

sALL BYTES COMPARED ?
:IF NO,GET NEXT ONE
10001$%:

TRAP

(SESEG

116
HARDWARE TESTS MACRO M1113 06-SEP=82 16:46
TEST 25: MCR FUNCTION TEST OF CHANNEL 1

SEQ 203

PAGE 67-4

7945 870614

052777

000010

111456

BIS

#10,3CSRX

;SELECT CHANNEL 2

7947 070630
7948 0706

112777
0047;7

00877
011060

111440

MOVB
JSR

#77.31DRHX
PC boop

teee=l 0AD UNL INTO DOR 2e=e=~ceee R
SWAIT A LITTLE

001025
oos; ;
023737

oogsgs
002322

002320

111374
000010

111366

794

706 8

7949 070642
7950 070650
7951 070653
7952 070662
7953 070664
7954 070670

07097
7956 070700
0707

7958 070712

112777

112777
112777
005737

001417
005977
015777

000217

112777

000017

004737

7961 070732
7962 070736
070736
e 070740

000137

070724

7964
7965 070742
7966
7967
7968 071010

071010
071010

000200
ooggo
002234

112777

7959 070720

7960

00014

01107;

067326

111440

111azg
11141

111336

104401

123

062

#200,alCRHxX
#0,afCRHX
avP

BEQ
CLR
MOV

EXQV2S
aCSRX
#10,3CSRX

MOVB
JSR

MOVB

JMP
EXQV2S5: EXIT

TSHD25:

#14,9]1 CRHX

move
MOVB
ST
BNE
INC
CMP

111350

104432
000050
045

MOVB

NLIST
.ASCIZ
SLIST
-EVEN
ENDTST

s===L0AD TCA INTO A(R 2==ceccccccccas

tee=l 0AD SWRST INTO ACR 2===== R tee=0AD NOT SWRST INTO ACR 2=ree=ccee
t1S QUICK VERIFY PASS SELECTED ?

EXQV25
TTRCNT
ITRCNT, ITRDEF

#217,3ICRHX
PC WALT

#17,31CRHX
1TAC25
TST

*IF YES EXIT TEST
:ITERATION COUNTER +1
*DEFAULT ITERATION EXECUTED

SIF YES EXIT TEST
*SELECT CHAN.1,CLR ALL BITS IN CHAN.2
:CLEAR CSR1,SELECT CHANNEL 2

eee= LOAD SiC INTO ACR 2====ececee

TWAIT A LITTLE

s===e 0AD NOT SIC INTO ACR 2====e=
*IF NO TEST ITERATION

TRAP
.WORD

CSEXIT
L10056~.

TRAP

(SETST

BEX
/XS2%AMCR FUNCTION TEST OF CHANNEL 13N/
BEX

L10056:

J 16
HARDWARE TESTS MACRO M1113 06-SEP-82 16:46
TEST 26: MCR FUNCTICN TEST OF CHANNEL 2
7970

LSBTTL

;9;1

SEQ 204

PAGE 68
TEST 26: MCR FUNCTION TEST OF CHANNEL 2

""""Q't"""""""""'""""'.'Q'.Q'Q."'Q""."'Q"'QQQ'Q""""

9
797
7974
7975

EX = TEST 26
‘PART 1 CHANNEL
TRANSMITS 9 DATA BYTES (S0)AND THAN
;
PREDEF INED QUANTITY (MC INPUT)OF SUCCESSIVE eos CHARACTERS (177)
:
va THE 1EC/IEEE BUS TO CHANNEL 2.
AFTER RECEIVING THESE
gflARACVERS

7976

THE DMA DATA TRANSFER IS TERMINATED BY CHANNEL 2 (COMP END).

7977

SPART 2 SAME AS PART 1 EXCEPT THAT A WRONG QUANTITY OF SUCCESSIVE EOS

7978
7979

:
;

7981

3t'."""t"'"""Q'Q"'"""'..'ttt'tt"'t""'t'."t.t.t't""'t""""'

7980

7982 071015

07101

7983 071012
7984 071016
7985 071020

BGNTST
005737
001410

002324

071020
071024
071030
071032
071034

012746
012746
010600
104417
062706

072474
000001

071050

012746

000340

7986 071040
7987 071044
7988 071050

CHARACTERS ARE TRANSMITTED BEFORE THE CORRECT QUANTITY OF SUCCESSIVE
sos CHARACTERS ARE
TRANSMITTED.
1.E 2 EOS CHAR.(25),1 DATA BYTE (50)THAN THE PREDEF INED EOS CHAR.(25)

ST
BEQ
PRINTF

000004
005037 002322
004737- 010534

78:

CLR
JSR
1TAC26: servec

126::

PNTF
7$
#TSHD26

;1S THE PNT FLAG SET
*IF YES, PRINT THE TEST HEADER
tp

ITRCNT
PC,BGINI
VECC2,#INTSC2,#PRI0O7

;CLEAR lTERATlCM COUNTER
PSET UP PARAME TER
:SET VECTOR FOR CHANNEL 2

071054 012746 010152
071060 013746 002246
071064 012746 000003

071070
071072
7989 071076

104437
062706

000010

071076

012746

000340

071106
071112
071116
071120
7990 071126
7991 071132

013746
012746
104437
062706
112777
013701

002244
000003

SETVEC

VECC1,#INISC1,#PRIO7

071102 012746 010142

000010
000212
002314

111136

111122

7999 071200 052777

111100

8000 071206

071206

8001 071%10
aoo§ 071214

8003 071220
8004 071226
8005 071234
8006 071242
8007 071250

113777

104404

005037
005037

042777
015777
013737
062737
005437

002236

100125

oosaoo
002376

000010
002514
002236
000011
002402

nov
MOV
MOV

111112
111110

111052
111046
002402
002402

MOVB
MOV

ADD
MOV
MOVB
JSR
BIS
CLR

MOVB

BIS

BGNSEG

CLR
CLR

BIC
MOV
MOV
ADD
NEG

#212,3ICRHX
DPA2
.R1

#40,R1
R1,MLA2
MLA2,3IDRHX
PC,LOOP
#10,3CSRX
aMCRX

MCINP,aMCRHX

#100125,aMCRX
INTFC2
INTFC1

#10,3CSRX
#TABD, aBARX
MCINP,RSAVE
#11,RSAVE
RSAVE

#TSHD26,=(SP)
#1,-(SP)
SP.RO
CSPNTF
#4,5P

#PR107,=(SP)

#INTSC2,=(SP)
VECC2,-(SP)
#3,-(5P)

TRAP
ADD

CSSVEC
#10,5P

MOV

#PR107,=(SP)

:SET VECTOR FOR CHANNEL 1

MOV

7992 071136 062701 000040
7993 071142 010137 002412
799 071146 113777 002412
7995 071154 004737 011060
7996 071160 052777 000010
7997 071166 005077 111114
7998 071172

MOV
MOV
MOV
TRAP
ADD

#INTSCT,=(SP)

MOV
VECCT,-(SP)
MOV
#3,-(5P)
TRAP
CSSVEC
ADD
#10,5P
je==e== LOAD TON INTO ACR l==eeccccccecce
CREATE MLA2

‘$T0RE MLA2
eee- LOAD MLA2 INTO DOR le=eecccccceeee
SWAIT A LITTLE
SSELECT CHANNEL 2
:CLEAR MCR2 REGISTER

t===LOAD CNT INPUT INTO MCR HIGH BYTE=-

te== ENB MATCH BIT +EO0S (125)IN MCR2-:CLEAR INTERRUPT FLAG
*CLEAR INTERRUPT FLAG

TRAP

($BSEG

SSELECT CHANNEL 1
i==<L0AD START ADDRESS OF TABLE D ====
*STORE MATCH CHARACTER COUNT INPUT
TADD 11(OCTAL) DATA BYTES T0 INPUT
‘BILD 2'COMPL FOR BCR

NNNVO==ONNNN

111022

MOV
NEG
MOV
BIS
MOV
MOV

00%‘0
00240
000107
000010
000110
002624

111004
110776
2%:

0026264

110754

000101

110736

177667

110750

110664
100006

110722
002374
110676

13%:

VOOSH

MOV

#101,aCSRX

BNE
DEC
BNE

000010
000002
002400

110634
002374

110614

002502

020010

10%:

#177667 ,aBCRX
#Pr100

#1531 CRHX
#77077.R1

= ROV

000340

002514
002624
002404
002404

002500
002502
002426

.....

;====SET DMA ENB,INT ENB IN (SRZ

:----LOAD

GTS

INTO ACR

MoV

TRAP

1 ............. =l

sBRANCH IF YES

138

sDECREMENT COUNTER
:1F NO,TEST AGIN
sGET CSR1 CONTENTS

:BC OF ,DMA DIR,SYS CONT SHOULD BE SET
sERROR HANDLER

TRAP

T
CSERSOF

.WORD

ERR201

sBRANCH TO BGNSEG IF ERR%ggg IS SET

csCLP

sSELECT CHANNEL 2
sLOAD CHANNEL NUMBER

;1S AN INTERRUPT [N CHANNEL 2 OCCURED

.ERR201

#PR107

sBRANCH IF YES

sGET CSR2 CONTENTS

;COMP END ,MUX SHOULD BE SET
;ERROR HANDLER

TRAP

MOV
MOV
CLR
INC

#TABD,R1
#TABE ,R2
CNT1

CLR
CLR
CLR

600D
A
BAD
TXADRH

CNT1
(R1)+,(R2)+
33%

T
CSERSOF

WORD
WORD
.WORD

2602
E232
ERR201

MOV

#PR107,RO

;BRANCH TO BGNSEG IF ERRLOOP IS SET
CSCLP
TRAP
ED
;NO FURTHER INTERRUPT ALLOW
TRAP

CMPB
BEQ

CS$SPRI

;1S INTERRUPT IN CHANNEL 1 OCCER

INTFCI

108
R1

ERRSOFT

30%:

#PR100,RO

sLOAD LOOP COUNTER

BIS
MOV
;zg

SETPRI

TABLE E===AD START ADDRESS OFINTO
;====L0OAD
BCR ===

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER

#1,CHAN

MOV

11%:

:REBUILD INPUT+DATA FOR COUNTER CNT1
;====DMA ENB,DMA DIR,INT ENB,SYS CONT
sSELECT CHANNEL 2

;SET PRIORITY TO ZERO

#10,3CSRX

MOV

002500

;====_0AD INPUT+DATA BYTES INTO BCR 1~

(R1)+
RO

#TABE ,3BARX

BIC
MOV
mMove
MoV
1ST

SEQ 205

sCLEAR BUFFER TABE

#TABE
R

CKLOOP

NNWNNN ON

NN = WWNO

NNONNN S

#107,3CSRX
#10,3CSRX
#72.,R0

aCSRX ,BAD
MoV
#100006 , 600D
MOV
T 2601,E2%2,ERR201
ERRSOF

002502
002500

VWY

RSAVE ,aBCRX
RS AVE

MOV

SETPRI

000000

000010
000001
000013
077777
002376

CLRB

DECB
BNE

MOV

ONVWY
ON=N

NNW=WN N=NNN=O

PAGE 68-1

WO
>
NO O
o

-2

M-

Z20

=>
=

==2=000=2=WN=0=
NN =NV
NNYNWWONSNNNSSN
NNNNONOONNWN

O000=-2000000

==0000===f0O=
MNN=SWV=SUVINNNNSN
NNWWONNNNNESSN
NN O =2NONWNSO

O00000O=OO=0

OCOO0OO0
WOWME

OCOONM=NO NS
WIWNWWNIWWO
O &~
NNNWNINNN)
= =2

8049 071544
8050 071550

113 06-SEP=-82 16:46
ST OF CHANNEL 2

CKLOOP

8046 071534
8047 071536
8048 071540

O0O0—

071430
143
071432
4
07143
8032
071434
8033 071436
8034 071444
8035 071452
8036 071456
8037 071460
8038 071466
8039 071474
071474
071476
071500
071502
8040 071504
071504
8041 071506
071506
071512
8042 071514
8043 071520
8044 0715264
8045 071530

-t OO =N O
NN=VNN &

071426

OO0
—=

71424

O—
oo
W&

8008 071%54
8009 071262
8010 071266
8011 071274
801§ 071302
80135 071306
8014 071312
8015 071314
8016 071316
8017 071320
8018 071%%6
8019 071334
8020 071342
071342
071346
8021 071350
8022 071356
8023 071364
8024 071372
8025 071376
8026 071402
8027 071404
8028 071406
8029 071410
8030 071416
8031 071424

OO —=0000
CODONOO
=

HARDWARE TESTS
TEST 26: M(R F

K 16

;PROVIDE FIRST BYTE OF BUFFER D
;PROVIDE FIRST BYTE OF BUFFER E
sCLEAR BUFFER COUNTER
;BYTE _COUNT

;BUFFER D EQUAL TO BUFFER E
+1F YES, CONTINUE
sCLEAR GOOD
:CLEAR BAD

:SET UP DATA FOR ERROR MESSAGE

($SPRI

L 16

HARDWARE TESTS MACRO M1113 06=-SEP=-82 16:46
TEST 26: MCR FUNCTION TEST OF CHANNEL 2

aosg 071560 010137
005337 002430
ooga%o

DEC

8051 071554

8053 071566
8054 071570
8055 071574
8056 071600
8057 071606

005037
8105 7
005337
116127
116237

071614
071616
0716%0
071622
8059 071624
071624
8060 071626
8061 071634

104457
005053
006010
003744

8058 071614

8062 071636

071636
071636
8063 071640
8064 071644
8065 071652
3829 071660

104406
023737
001335
104405
005077
112777
017737
005077

002422
00 454
002404
177777
177777

002500
002502

TXADRL

110434
000014
110414

110414

002402

R1, TXADRL

Peee

CLR
MOV
DEC
MOVB
MOVB

RXADRH
R2,RXADRL
RXADRL
=1(R1),G0OD
=-1(R2).BAD

e
-~
e
*SET UP DATA FOR ERROR MESSAGE
R

ERRSOFT 2603,E231,ERR231

33%:

110416
002502

-y

MOV

CKLOOP
002404

SEQ 206

PAGE 68-2

CMP
BNE
ENDSEG

CNT1,RSAVE
308

CLR
MOVB
MOV

ACSRX
#14,31CRHX
a1DRX,BAD

CLR

*ERROR MANDLER

TRAP
CSERSOFT
MORD
2603
"WORD
E231
"WORD
ERR231
:BRANCH TO BGNSEG IF ERRLOOP IS SET
TRAP
csCLP1
:ALL BYTES COMPARED ?
‘IF NOT, GET NEXT ONE
100008:

aCSRX

TRAP
CSESEG
;SELECT CHAN. 1 ,CLR ALL BIT IN CHA.2
teee=l0AD TCA INTO ACR 1=ee=cececcccae
*READ DIR1 TO CLEAR ACCRQ SIGNAL
*CLEAR CSR1

:QQ’ ..........................................................................

gggg

*PART 2 CHECK THE FALSE NUMBER OF EOS CHARACTERS

;000 ..........................................................................

8070 071664

8071 071672
8072 071676

052777

110410
002236

042777
012737
012777
013737
062737
005437

000010
000001
003044
002236
000003
002402

8073 071704 052777

8074 071712
8075 071720
8076 071726
8077 071734
8078 071742
8079 071750

8080 071754
8081 071762
8082 071766
8083 071774

071774

000012

005077
113777

013777
005437
012777

104404

100012

002402
002402
000107

8084 071776
8085 072002

005037
005037

002400
002376

8087 072014
8088 072020

012700
012701

000102
003146

808 072006

8089 072024
8090 072026
8091 072030

8092 072032

052777

105021
105300
001375

000010

110360
002374
110346
002402
002402

BIC
MOV
MOV
MOV
ADD
NEG

#10,3CSRX
#1, CHAN
#TABG,aBARX
MCINP,RSAVE
#3,RSAVE
RSAVE

SSELECT CHANNEL 1
1LOAD CHANNEL NUMBER
:===L0AD START ADDRESS OF BUFFER G====:STORE MATCH CHARACTER CNT INPUT
SADD 3 DATA BYTES TO CNT INPUT
‘BILD 2'COMPL FOR BCR

INTFC2
INTFCA

:CLEAR INTERRUPT FLAG
*CLEAR INTERRUPT FLAG

#66. RO
#TABH,R1

*CLEAR BUFFER TABH
e

110374

000000

BGNSEG

CLR
CLR

110264
348:

110224
110216

012700
104441

MOV
NEG
MOV

110304

000101
000010

072070
072074

BIS

110322

012777
042777

000001

sSET SYS CON IN CHA 1,SELECT CHANNEL 2

110404

110242

012737

8097 072070

#12,3CSRX

AMCRX
MCINP,aMCRHX

003146

8096 072062

BIS

CLR
MCVB

012777

8093 072040 012777 177675
8094 072046
8095 072054

110406

110236

002374

#100012,aMCRX

RSAVE ,@BCRX
RSAVE
#107,3CSRX

BIS

#10,3CSRX

CLRB
DECB
BNE

(R1)+
RO
348

MOV
MOV

MOV

#TABH ,aBARX

MOV
BIC

#101,3CSRX
#10,3CSRX

MOV

SETPR]

#1776%5,3BCRX
#1, CHAN

#PRI00

*CLEAR MCR2 REGISTER
;====L0AD CNT INPUT INTO M(R 2========

te=== ENB MATCH + EOS CHARACTER (12)

1e==LOAD BYTE COUNT REGISTER l=e=eeee=
*REBUILD INPUT+DATA FOR COUNTER CNT1
‘=== DMA ENB,DMA DIR,INT ENB,SYS CONT

TRAP

($BSEG

*SELECT CHANNEL 2
FR
e
o

:===L0AD START ADDRESS OF BUFFER H==-

‘e==LOAD MAX. TRANSFER INTO BCR 2==-

te==SET DMA ENB,INT ENB IN (SR2======
*SELECT CHANNEL 1
*LOAD CHANNEL NUMBER
‘SET PRI. TO ZERO (ALLOW INTERRUPT)

MOV
TRAP

#PR100,RO
($SPRI

ERRSOFT

e rsh

sLOAD COUNTER
s 1S INTERRUPT IN CHANNEL 1 OCCUR

INTFC1
' 3%

sBRANCH IF YES

:1S TIME OVER
sIF NO,

3CSRX . BAD

#100006 gooo

2604 €252, ERR201

BNE

JBRANCH IF

ERRSOFT

RR201

(kLOOP

NNNNNNNNNN=NNNN

NWO

sDISABLE

ERRSOF1 2606,E231 ,ERRZ

002402

63%:

(MP
BNE
ENDSEG

CSE
260
E232

INTERRUPTS

MOV

#PRI07,RO
C($SPRI

NTINUE

)

:SET UP DATA FOR ERROR MESSAGE

sERROR HANDLER

TRAP

CSE

.WORD
.WORD
.WORD

260
[23

ERR

TRAP

($C

;BRANCH TO BGNSEG IF ERRLOOP IS SET

(xLooP

002406

+WORD
.WORD

TRAP

(R1)+,(R2)+

TXADRL
RXADRH
R2,RXADRL
RXADRL
=(R1),600D

samp

ERR
.WORD
:BRANCH TO BGNSEG IF ERRLOOP IS SET
TRAP
(s

CNT1
CNT1

MOV

& =N

;ERROR HANDLER

600D
BAD
TXADRH
Ri,TXADRL

S OONN

NN
NN NN N NNW

#PR107

;COMP END,MUX SHOULD BE SET

63%

002502

cscLP

YES

#TABG,R1
#TABH,R2

60%:

535“50'7

sGET CSR2 CONTENTS

MOV
MOV

003044
003146
002404
002404

TRAP

MOV
TST

SETPRI

sBC OF ,DMA DIR,SYS CONT,SHOULD BE SET

sERROR HANDLER

sSELECT CHANNEL 2
;LOAD CHANNEL NUMBER
;IS THERE AN INTERRUPT IN CHANNEL 2 =

BIS

(1%:

TEST AGAIN

:GET CSR1 CONTENTS

E232
ERR201
.WORD
;BRANCH TO BGNSEG IF ERRLOOP IS SET

CKLI0P

000340

T
-4

MOove

MOV

NNW=SNN
-

SEQ 207

PAGE 68-3

R
408

NNWNNN

NNONNNES
O

e
s
002376
408:

WVIN

SNNWWONYN
VOO

O0O0O0OC
O00

008

OO0~

—-=OO —=w

O0000O0-=
-

072144
8107 072146
072146
8108 072150
8109 072156
8110 07216
8111 072170
8112 072172
8113
072200
8114 072206
072206
072210
072212
072214
8115 072216
072216
8116 072220
072220
072224
8117 072226
8118 072232
8119 07223
8120 07224
8121 072246
8122 072250
8123 072252
8124 07:256
8125 072262
8126 072266
8127 072272
8128 072276
8129 072302
8130
072306
8131 072312
8132 072316
8133 072322
072322
072324
072326
072330
8134 072332
072332
8135 072334
8136 072342
8137 072344

072149
7214

8098 072076
8099 072104
8100 072110
072114
8101
8102 072116
8103 0721
8104 072122
8105 072130
8106 0721
0721

822

HARDWARE TESTS MACRO M1113 06-SEP-82_16:46
TEST 26: MCR FUNCTIUN TEST OF CHANNEL 2

CNT1,RSAVE
60%

sALL BYTES C(OMPARED ?
sIF NO,GET NEXT ONE

8 072474
59
60
161 07 2542
07 2542
07 2542

10001$:
WOOON
N — =
S O00ONSO

#10,aCSRxX

sSELECT CHANNEL 1

#77 ,31DRHX

:----LOAD

814,91 CRHX
PC

LOOP

#200,31 CRHX
#0,31CRWX

:---LOAD

'(‘

lnto

U“L

A(.

xN'o

TRAP

(SESEG

1--------------

Doa

1--------0----¢

SWAIT A LITTLE

avP

EXQV26
ITRCNT
ITRCNT, ITRDEF
EXxQv2é
#10,aCSRX
a(SRX

#217,31 CRHX
PC WAIT

EXQv26:

ON EXECUTED

-----

#1791 CRHX

T CHANNEL 2
5 CHANNEL 1

ACR leeeeccacen

-—

R +1

ITAC26

——

NNNNNNNNNVINNNNNNNW

NI VIND =2 (NN =

- NYNNONS NNONNNNNNNS

W NN N NN = WWNN W NI NW NI NN O

—

—g

§~M’g

-=OO00000O——
O =ONOOO
=
p—

z\fl

00O [elelelelelelelelelelelelelelelele] o

i Vol

= O 0 00

agoaaa

VAL
~No

—

VS AN

D i

)

D el

O 000 NN

)

(W IV IV IV IV IV oV o ol of af af 22 2% 2

) el

[« Jo Jo To To Jo To To To To To To To 08 To To -To Jo ]

8-.
orn

NSNS ~ NNNNNSNSNNNSN NSNSNSNSNSNSN
NNINONININININOND
NN NN NN
R
ok o H » BSOS
w
»
W
S
WNWN)
=
=
2O ~N
NN
OO
o ~N » ONONO
S ONSONSON S

HARDWARE TEST
TEST 26: M(R

SEQ 208

NTO ACR l==eee==
CN
TRAP

(s ExIT

TRAP

(SETST

LWORD

BEX
/XS2XAMCR FUNCTION TEST OF
BEX

L1 0057=-.

CHANNEL 23N/

L10057:

00 0o 00 0o OO 00 0o OO 00 g On 0O N>
-‘g
w
Nfi
PLA
A S

1S MACRO M1113 gsp-az 16:46
ENDED ADDRESS BIT (Q =BUS) TEST

.SBTTL

TEST 27: EXTENDED ADDRESS BIT

(022-BUS)TEST

IEX = TEST 27

VNlS TEST IS ONLY BE CARRIED OUT IF A 22-BIT Q-BuS (11/238)1S USED

D e

AND

THE AVAILABLE MEMORY

[S GREATER THAN 128k,

PARI 1 FINDS OUT IF AVAILABLE MEMORY IS GREATER THAN 12BK.IF YES, THEN

:
:

A DMA |S CARRIED o T BY SENDING 2K DATA VIA rue
FROM CHANNEL
1
.THE DMA CROSS THE BOUNDERY

1EC/1EEE BUS

THE SEQUENCE oescaxaso ABOVE IS ALSO Executfo WITH 296K (BA 19 SET),
512k (BA 20 SET) AND 1024K (BA 21 SET

—

SPART 2 SAME AS PART 1 EXCEPT THE CHANNELS rue DMA DATA TRANSFER

IS CARRIED OUT FROM CHANNEL 2 T0
1

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

BGNTST
104407
103415

005737
001410

002324

012746

076502
000001

o -0
o ~NO

S rownron zbONN
s

purd

OO
OCO—===

O=000

002350

3$:

075406
000001

000004

7%:

000340

READBUS

127::
;DETERMINE BUS TYPE

BCOMPLETE 3%

:BRANCH IF Q=-BUS

ST
BEQ
PRINTF

;1S THE PNT FLAG SET
SIF YES, PRINT MESSAGE
Eada

EXIT

PNTF
2%
#INFO3

1s1

SEXIT TEST

O =
N
NS~

OO0 tatcdcd
oo
S RowrnNN.
ONONSNNNN
WAWNWWNO WSS 8 8
NNNOoONOoO
O O

CO0O0O=O0000D

N=O

OO0
O

—

Oo
0o 0o

8189

TRAP

.WORD

#4 MASK

;

BEQ
PRINTF

7%
#TSHD27

:1F YES, PRINT THE TEST HEADER
R

SETVEC

VECCY,#INTSC1,#PRIO7

1S1

PNTF

MOV
MOV
MOV

;SET VECTOR FOR CHANNEL ;ov
MOV
MOV
MOV

000010

SETVEC

000340

VECC2,#INTSC2,#PRIO7

;SET VECTOR FOR CHANNEL gov
MOV

MOV
MOV
TRAP
ADD

000003

002366

(LR
MOV

1TAC27: CLR

CSRMS1
#1000, CSRMS?2

INTEC]

(SRDBU
3%

#INFO3,-(SP)
#1,-(SP)

SP,RO
CSPNTF

#,SP

CSEXIT
L10060-.

t1S THE PNT FLAG SET

000003

000010
002364
001900
002376

MOV

MOV
MOV
TRAP
ADD

MOV

b b

O—=0000

000004
002324

2%:

f
—

000004

8188

SEQ 209

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

~ NNNNVNOO
O
w

8176
8177 072544
072544
8178 072544
072544
8179 072546
072546
8180 072550
8181 072554
8182 072556
072556

PAGE

#TSHD27 ,-(SP)

#PR107,=(SP)

#INTSCT,.-(sP)

VECCT,=(SP)

#3,-(5P)
CSSVEC

#PR107,=(SP)

RINTSCZ,=(SP)

VECC2,-(SP)
#3,-(SP)
CSSVEC

#10,SP

;LOAD MASK FOR CSR1
*LOAD EXTENDED ADDR BIT FOR RX CHANNEL

SCLEAR INTERRUPT FLAG

WARDWARE
TESTS MACRO M1113 06-SEP=B2 16:46 PAGE 69-1
TEST 27: EXTENDED ADDRESS BIT (022-BUS)TEST

8194
07 7§l. 0g39§7 00%363 002350
8195 072742 002406

8193 072730

005037

00240

8196 072744
8197 07 743
8198 072752
8199 075754
0727564
072756
8200 072760
8201 072764
B oi 072766
820 o7§774
8204 073000
8205 073002
8206 073006
8207 073012
208 073016

00 og
005737
001002

002344

8210 073026
8211 073030

005003
012737

104432
002476
004737
000;49
012737
013704
005304
010437
004737
013700
010037

8209 073022 012701
3215 073036

821

orgoa&

8214 073046

8215 073052
8216 073056
8217 073060

012737

110310

012700

005237
005203
110320

8218 073062
8219 073064
8220 073066

005301
001374
005300

8223 073100
8224 073102
8225 073104
8226 073106

000240
105020

8221 073070
8222 073074

8227 073110
8228 073114
8229 073122
8230 0731§6
8231 073132
8232 073136
8233 073144

8234 073150

8235 073156
8236 073164
8237 073170

8238 073176
8239 073204
8240 073212

8241 073220
8242 073226
8243 073234
824 073242

8245 073250

073250
073254

012701
010037

005301
001374
005037

(MP
BLT
(LR

11%:

010534

PHHS
I Z ,MASK
11%

:CLEAR INTERRUPT FLAG

138
PHLSIZ
13§
151

:
:
:
SEXIT TEST

002334
0077264
002340
002356

MOV
MoV
DEC
MOV
JSR
MOV
MOV

MOV

#177777 ,PHLOW
MASK ,Ré
R&
R& ,PHHIGH
PC,PVCON
vIADD,RO
RO,BUF AB

000020

CLR
MOV

#16000, R

:LOAD INPUT FOR CONVERSION ROUTINE
| a
Seios
e
SCREATE VIRTUAL ADDRESS
SGET START ADDRESS OF BUFFER A
:LOAD START ADDRESS OF BUFFER A

R3
#20,5R3

*R3 CONTAINS DATA
i«eENABLE 22-BIT MEMORY MANAGEMENT
s+

002336

010000
000001

172516
177572

MOV

MOVB

120000
172352

16%:

010000
002360

208 :

#1,SR0

R3.(RO)

MOV

#120000,R0

DEC
BNE
DEC

R1
10%
RO

In‘
INC
MOVE

MOV
MOV

NOP
CLRB

KPARS
R3
R3, (RO)+

#10000,R1
RO,BUFBB

DEC
BNE
CLR

(RO)+
R1
208
SRO

ADD

#40,R1

010137
113777

002412
002412

107132

MOV
MOVB

177777

107124

MOV

#177777,3BARX

MOV
BIS
BIS

#167,3CSRX
CSRMS1,aCSRX
#10,3CSRX

012777

107146

000040

011060

MOVB
MOV
JSR

013737
005437
013777

002240
002402
002402

002402

107106

MOV
NEG
MOV

012777
013777
012777
053777

007777
002402
000111
002366

107054
107050
107036
107030

MOV
MOV
MOV
BIS

012777
053777
052777

012700
104441

CSEXIT
L10060-.

177572
000212
002314

004737

TRAP
.WORD

PC,BGINT

115777
013701
062701

:1S
THERE MORE THAN 128k
“1F NO SKIP TEST

INTFC2

JSR
NOP

177777
002350

138:

867
ST
BNE
EXIT

SEQ

000167
002364
000010

000000

107074
107066
107060

SETPRI

*LOAD COUNTER FOR 2K

S««ENABLE MEMORY MANAGEMENT
«+

SLOAD FIRST DATA BYTE

SSET UP ADDRESS FOR NEXT DATA BYTE

*LOAD NEXT PAGE
SCREATE NEXT DATA
SLOAD BUFFER WITH DATA
:
:
;
:LOAD 2K
SLOAD START ADDRESS OF BUFFER B
:CLEAR BUFFER B
:2K CLEARED
:IF YES,DO THE TEST

PC $oop

seeDISABLE MEMORY MANAGEMENT®+
ieee=l0AD TON INTO ACR j=eeerecccccce:CREATE MLAZ
R
:STORE MLA2
ie=ee 0AD MLA2 INTO DOR leececccccccenSWAIT A LITTLE

BCINP,RSAVE
RSAVE
RSAVE ,aBCRX

*STORE BYTE COUNT INPUT
:BUILD 2°'COMPL FOR BCR
tee=<LOAD INPUT INTO B(R le=eceeccec--

#212,31 CRHX
DPAZ,R1
R1,MLA2
MLA2,3IDRHX

#7797, 3BARX
RSAVE ,aBC(RX
#111,3CSRX
CSRMS2, CSRX
#PR100

ie==LOAD START ADDRESS OF BUFFER A====-

:=DMA ENB,DMA DIR,INT ENB,SYS C0,BA16+17
i==LOAD ADDITIONAL EXTENDET ADDRESS BIT
SSELECT CHANNEL 2

i====OAD START ADDRESS OF BUFFER B--=i==== 0AD INPUT INTQ B(R 2--iee==SET DMA ENB,INT ENB IN CSR2
tee= OAD EXTENDED ADDRESS BlT1S=====e=
SSET PRIORITY 1O ZERO

MOV
TRAP

#PR100,RO
($SPR]

210

W —

O
OO0

P-82 16:46
=BUS) TEST

107014

002374

106770

8273
073476
8274 073504
8275 073506
073506
073510
073512
073514
8276 073516
8277 073524
8278 073530
8279 073536
8280 073540
073540
073542
073544
073546
8281 073550
8282 073556
8283 073564
8284 073572

BIC

ov
rove
MoV
1ST

MOV
MOV

#10,3CSRX

#1,CHAN
c1§ 31 CRHX
877077 .1
INTFC1
26$

000010
000002
002400

MOV

106702
100010

MOV
MOV

BIS
TST
BNE

002366

000010

#10,3CSRX
#2,CHAN

INTFC2

25%

SCSRX ,BAD

#100010,G00D

BIC

#10,3CSRX
#1,CHAN

#1431 CRHX

PHLOW,GOOD

BCINP,GOOD
@BARX ,BAD
BAD,GOOD

30%
BEQ
ERRSOFT 2703,E234 ,ERRS01

002502
002500

aBCRX ,BAD
CLR
(MP
31
BEQ
T 2704 ,E235,ERRS501
ERRSOF

MOV

BIS
MOV
MOV

BIC

‘BRANCH [F YES

IN CHANNEL

*BC OF ,DMA DIR,SYS CONT

SCSRX .BAD

#PR107

CMP

*HAS INTERRUPT

#1000
, 600D
66

SETPRI

MOV
MovB
MOV
ADD
MOV

*LOAD LOOP COUNTER

*DECREMENT
S1F NO,TEST

BIS
CSRMS2, GOOD
ERRSOFT 2702 €232 ,ERR201

000340

sSELECT CHANNEL 1
‘LOAD CHANNEL NUMBER

238

BIS
CSRMS1 gooo
ERRSOFT 2701,E232,ERR201

OO0 —=O—
OO0O0O0O00O
LT
T NT 5
VAWM OMNNON
OO =N
OoONOO NSO

073422
8266 073424
073424
073430
8267 073432

SEQ 211

PAGE 69-2

BNE
DEC
BNE

N
=S

NNNONNNVON
S
WNWW = WWNO
N =WV

NN“IWWOSNSNSNSNSN
WWWNO
= WONWSN

o=
OOOgOOOOOO-‘
Qg
O=VNOO0OO0OO [=l&]elelelelelellele]
WVW——=OO0OO0OO—==i
>
WVIES
WGNON
= TININIWON WSS WWIN) N = N = NN

M-

NNNNNNNNNNNNNNNNNSN

(elolelelelelelelelelelelelelelel-]

NO WS NN =2 OO0~ o

00
00 00 00 00 NN
0O 0o 00 NN
0o 00 Oo 00 O
-‘2
RN
VIVVAVIWVWAWNES S S8

3 06BIT (0

:GET CSR1 CO

*SET EXTENDED ADDRESS BIT TO CSR CONT.

*ERROR MANDLER

sSELCT CHANNEL 2
sLOAD CHANNEL NUMBER

TRAP

+WORD
.WORD
.WORD

T
CSERSOF
2701
£232
ERR201

sHAS AN INTERRUPT IN CHANNEL 2 OCCURED
:BRANCH
E

:GET CSR CONTENTS
:BC _OF ,MUX SHOULD BE SET
sSET EXTENDED ADDRESS BIT TO CSR (ONT.
sERROR HANDLER

TRAP

T
CSERSOF
2702
E232
ERR201

MOV
TRAP

#PR107,R0

.WORD
.WORD
.WORD
sNO FURTHER INTERRUPT ALLOWED

sSELECT CHANNEL 1
sLOAD CHANNEL NUMBER
LOAD TCA INTO ACR 1
;
sSET UP COMPARE VALUE

sGET BAR1 CONTENTS

:HAS BAR1 THE CORRECT ADDRESS
sBRANCH IF VES
sERROR HANDLER

TRAP
.WORD

sGET BCR1 CONTENTS

.WORD
.WORD

‘1S BCR1 ZERO

‘BRANCH IF YES
*ERROR HANDLER

#10,3CSRX
#2,CHAN

;SELECT CHANNEL 2
*LOAD CHANNEL NUMBER

#160000,G00D

TCLEAR BIT 13+14415

BUf BB, GOOD

1 OCCURED

*SET UP COMPARE VALUE

TRAP

.WORD
.WORD
.WORD

C$SPRI

00250
00250
002502

OO0

SEQ 212

PAGE 69-3
ADD
MOV

8CINP,GOOD

3BARX _BAD
(MP
Gggo.éuo
4
BEQ
T 2705,6234 ,ERRS01
ERRSOF

sGET BARZ

sHAS BARZ

CONTENTS
THE

sBRANCH IF YES
sERROR HANDLER

CORRECT ADDRESS

TRAP

.WORD
.WORD

177572

43%:

#1,5R0

KPARS
BUF AB,R1
(R1) ,R3

002404

#120000,R1

sPOINT

133
600D
BAD
R3,G00D

JBRANCH IF EQUAL TO NEXT COMPARE
sCLEAR HIGH BYTE OF GOOD
sCLEAR HIGH BYTE OF BAD
JLOAD FIRST TX DATA FOR ERROR MESSAGES
;FIRST TX ADDRESS
sGET ADDRESS OVER 128k

45%

sBRANCH TO ERROR REPORT

(R1)+,(R2)+
L6%
GOOD
BAD
R1,ViADD
PC.VPCON
PHHIGH, TXADRK

sBUFFER A EQUAL BUFFER B
s1F YES CONTINUE
:CLEAR GOOD
:CLEAR BAD

PHLOW, TXADRL
-1(R1J,G00D

R2,VIADD

PC.VPCON

002422
002424

PHHIGH, RXADRH
PHLOW, RXADRL
TXADRL
RXADRL

002502

TO PHYSICAL CONVERSION ROUTINE

TO NEXT LOCATION

;CROSS THE BOUNDERY FOR NEXT DATA BYTE'S
sPROVIDE FIRST BYTE OF BUFFER B
JSET UP COUNTER FOR DATA COMPARE
;COMPARE THE FIRST DATA BYTE

CNT1

45%:

JVIRTUAL

KPARS
BUFBB,R2
#1,CNTT

PHHIGH, TXADRH
PHLOW, TXADRL

002426
002430
002500

-1(R2),BAD
SRO
CLR
T 2706,E231 ,ERR23
ERRSOF

sVIRTUAL TO PHYSICAL CONVERSION ROUTINE
TX ADDRESS IS OVER 128k

LOAD TX DATA FOR ERROR MASSAGE
:SET _UP DATA FOR CONVERSION ROUTINE

sVIRTUAL TO PHYSICAL CONVERSION ROUTINE
sRX _ADDRESS

IS OVER_128K

;GET ADDRESS OVER 128k

*LOAD RX DATA FOR ERROR MESSAGE

teaD]SABLE MEMORY MANAGEMENT®+
*ERROR HANDLER
TRAP

.WORD
LWORD

177572
002240

002502

468:

MOov
CMP
BNE

(LR

MOV

ERR501

R1,viADD

R3,(R2)+

YA
¥

WORD
s**ENABLE MEMORY MANAGEMENT
e«

CSERSOF
T

2705
E234

;CROSS THE BOUNDERY FOR FIRST BYTE
sPROVIDE FIRST BYTE OF BUFFER A
:GET THE FIRST DATA BYTE
sSET UP DATA FOR CONVERSION ROUTINE

PC,VPCON

-t OO0 O00O0O—=O0O00000
NNOOOO=ONOO
=000
NN
ON NN O NN
WIS S WWWWO W NWW O W
N NNIANWAN
S NWWNO
SO O
NNSOOSSONOSSONO

[=lelelelelelldelelelelalele it ot 4
x>l il Tl QO =000
00—=
CO=mtO=
== O -2 O00ONOO - = =0000N ==
=0 ===0=0000

4074

[elelelelelelelele
dlh

LS
P

oo
-

o
W
o
W

NN
&~

NNNNNNNNN
PR R P P ¥

NN O BB IS
N
R N N S OV
N

(eleleleleleleleleleleleleleloleleleloleleleleleleleleleleleleleleleTe]

0o 0o Oo 0o 0o O

LN N W N LN N NN N NN N N NN
N WU N N NN NN NN
MPONININIRINININD
= = cd e o e e
e
(==}
(=l=J=]
VIS NN

[0 Yo e To To To To Yo -To Yo To -To To To Lo To To -To To To To To To To -To .Jo To ]

8285 073600
8286 073606
8287 073614
8288 073622
8289 07 656
073624
07;6%6
073630
073632
8290 073634
8291 07;662
829% 073646
8293 073652

06~ gsp-az 16:46
=BUS) TEST

ARE TEST S
MACRO M1113
T 27: EXTEN DED ADDRES

#1,SRO

cnil,BCINP

448
SRO
a(SRX
alDRX ,BAD

.WORD

CSERSOFT

2706
E231
LRR231

s**ENABLE MEMORY MANAGEMENT®*+
;ALL BYTES COMPARED ?
sIF NO, GET NEXT ONE
s**DISABLE _MEMORY MANAGEMENT++
sCLEAR CSR2,SELECT CHANNEL 1
;READ DIR1 FOR CLEAR BO BIT IN IIR

HARDWARE
TESTS MACRO M1113 06-SEP=-B2 16:46 PAGE 69-4
TEST 27: EXTENDED ADDRESS BIT (Q22-BUS)TEST
g§§g 074132

005077

106142

g?g?

8338 074136

8339 074142
8340 074146
8341 074152
8342 074154
8343 074162
8364 074166
8345 074170
B34b 074176
8347 074200
8348 074206

8349 074210

8350 074214
8351 074216
835% 0764224
8353 074232

8354 074234

8355 074240

8356 074244

8357 074246
8358 074250
8359 074252
8360 07425¢
8361 074256
8362 074262
8363 074266
8364 074270
8365 074272
8366 074274
8367 074276

.
.

ACSRX

005037

005037
004737
000240
01%737
013704
oossga
010437
004737
013700
010037

012701

oosogs
012737
012737
110310

012700

005237

005203

110320
005301
001374
005300
012701
010037
000240
105020
005301
001374
005037

XXXT T T
Tmesresese
s sCcemer
oo
Beme oo oo e e e

002376

fiSEUZ?: CLR

002400
010710
177777
002350

002336

002334
007724
002340
002356

010000

000020
000001

120000

168 :

010000
002360

20%:

*R3 CONTAINS DATA
Se*ENABLE 22-BIT MEMORY MANAGEMENT®+
;**ENABLE MEMORY MANAGEMENT®«
*LOAD FIRST DATA BYTE

INC

MOVB
DEC
BNE
DEC
MOV
MOV
NOP
CLRB
DEC
BNE
CLR

012777

000101

105650

074436
074442
8386 074444

012700
104441
052777

8388 074460

112777 000013

8387 074452

012737

000000
000010
00000

MOV

MOV
MOV

MOV

BIS

SETPR]

105626

BIS

105602

MOVB

002374

:SET UP ADDRESS FOR NEXT DATA BYTE

KPARS

:LOAD NEXT PAGE

R3,(RO)+
R1
16%
RO
#10000,R1
RO,BUFBB

:CREATE NEXT DATA
i

e Lf

:LOAD BUFFER WITH DATA
;
'
;
SLOAD 2K
:LOAD START ADDRESS OF BUFFER B

CSRMS1,aCSRX
#10,3CSRX

BIS
BIC

8384 074430 053777 002366 105642

l120000.R0

*STORE BYTE COUNT INPUT
SBUILD 2°COMPL FOR BCR
iee==|0AD INPUT INTO B(R l=eeeceeece-

105700
105672

105666
105662

*LOAD COUNTER FOR 2K

BCINP,RSAVE
RSAVE
RSAVE ,@BCRX

002364
000010

8381 074406 012777 007777
8382 074414 013777 002402

#16000,R1

MOVB
MOV
ADD
MOV
MOVB
JSR

053777
042777

105706

SCLEAR INTERRUPT FLAG FOR CHANNEL 2
SSET UP PARAMETER

;CLEAR BUFFER B
: 2K CLEARED
:1F YES,DO THE TEST
teeDISABLE MEMORY MANAGEMENT#+

8379 074372
8380 074400

000177

INTFC2
PC,BGIN2

(RO)+
R1
208
SRO
#212,31CRHX
DPAT.R1
#40,R1
R1,MLA1
MLA1,alDRHX
PC,LOOP

105720

012777

R3
#20,5R3
#1,SR0
R3.(R0)

MOV
NEG
MOV

105736

W W

CLR
MOV
MOV
MOVB

002402

1777¢7

105744

:LOAD INPUT FOR CONVERSION ROUTINE
Peee
it
b
:CREATE VIRTUAL ADDRESS
SGET START ADDRESS OF BUFFER A
$LOAD START ADDRESS OF BUFFER A

002240
002402
002402

105760

#177777 ,PHLOW
MASK , R4
R4
R4, PHHIGH
PC.PVCON
VIADD,RO
RO,BUF AB

MOV

172352

D S5 e S aw Se e @ WS

:CLEAR INTERRUPT FLAG FOR CHANNEL 1

MOV

172516
177572

e R D E

e MR ot TR WD W AR P SR S X

INTFCI

013737
005437
013777

8385 074436

@ @ W @B S -

CLR
JSR
NOP
MOV
MOV
DEC
MOV
JSR
MOV
MOV

8375 074344
8376 0764352
8377 074356

8374 074336 012777

8383 074422

:CLEAR CSR1

P G W WS P I W 68

:PART 2 DMA DATA TRANSFER FROM CHANNEL 2 TO 1

177572
000212
002312
000040
002410
002410
011060

8378 074364

021

.......................... m om Wh P T A

112777
013701
062701
010137
113777
004737

8368 074302
8369 074310
8370 074314
8371 074320
8372 074324
8373 074332

MOV

#177777,3BARX
#177,3CSRX

#7797, 3BARX
RSAVE ,aBCRX
#101,3CSRX

CSRMS$2, ACSRX

#PRIO0O

teeee=lOAD TON INTO ACR Q====cceccccces
*CREATE MLA1
e
:STORE MLA1
i=e=e| 0AD MLA1 INTO DOR 2==cececcccceSWAIT A LITTLE

i===0OAD START ADDRESS OF BUFFER A====

:=DMA ENB,DMA DIR,INT ENB,SYS C0,BA16+17
t==LOAD ADDITIONAL EXTENDET ADDRESS BIT
*SELECT CHANNEL 1

t====OAD START ADDRESS OF BUFFER B==-te==={0AD INPUT INTQ BCR 1===
te===SET DMA ENB,INT ENB IN CSR1

‘===l OAD EXTENDED ADDRESS BlTSewve==*SET PRIORITY TO ZERO

MOV
TRAP

#PR100,RO
($SPRI

#10,aCSRX

sSELECT CHANNEL 2

#15,31CRHX

tee==lOAD GIS INTO ACR 2e=s=eceeceeees

#2,CHAN

:LOAD CHANNEL NUMBER

HARDWARE TESTS MACRO M1113 06-SEP-B82 16:46 PAGE 69-°
TEST 27: EXTENDED ADDRESS BIT

8389 074466
8390 074472
8391 074476
8392 074500
8393 074502

01§721
005737
001017
005301
001 7;

077777
002400

8396 074520

053737

002364

8294 074504
8395 074512

8397 07452€

0177§
01§7 7

074526
074530
074532
074534
8398 074536
8399 074544

104457
005223
006972
003500
042777
0127§7

8401 074556
8402 074560

001015
017737

8407 074552

8403 074566
8404 0745764

8405 074602

005737

012737
053737

074602
074604
074606
074610
8406 0746102
074612
074616
8407 074620
8408 074626

012700
104441
052777
012737

8410
8411
8412
8413
8414

074642
074650
074656
074664
074672

013737
063737
017737
023737
001404

074674
074676
074700
074702
8416 074706
8417 074712
8418 074716
8419 074724
8420 074726
074726
074730

104457
005225
006200
003702
017737
ooso;r
023737
001404

8409 074636

B415 074674

112777

8422 074744

8425 074766
8426 074774
8427 075002

063737
017737
023737

8423 074752
8424 074760

000010
000001

002376

23%:

oogsoz
002500

013737
042737

#77777.R1
£~1rc2
4%
R1
238

:LOAD LOOP COUNTER
*HAS INTERRUPT IN CHANNEL 2 OCCURED
‘BRANCH IF YES
*DECREMENT COUNTER
*1F NO,TEST AGIN

BIS

CSRMS 1 gooo

SSET EXTENDED APDRESS BIT TO CSR CONT.

MOV
MOV

002500

105534
002374

MOV
1ST
BNE
DEC
BNE

248:

‘BRANCH IF YES
SGET CSR1 CONTENTS

CSRMS2, GOOD

SSET EXTENDED ADDRESS BIT TO CSR CONT.

002500

BIS

105452
002374

002336
002240
105420
002502

002500
002500
002502
002500

000014

MOV

leF(l

#100000, Goop

ERRSOFT 2708,E232,ERR201

105426

000010

002502
002500

105334

000001

002374

002240
105302
002500

002500
002502
002502

002360
160000

002500
002500

31%:

:BC OF SHOULD BE SET

*ERROR HANDLER

SETPR]

#PRIO7

BIS
MOV

#10,3CSRX
#2 . CHAN

MOV
ADD
MOV
CMP
BEQ

PHLOW,GOOD
BCINP . GOOD
3BARX . BAD
BAD,GOOD
30

:SET UP COMPARE VALUE
i
*GET BAR1 CONTENTS
*HAS BAR1 THE CORRECT ADDRESS
*BRANCH IF YES

MOVB

30%:

:HAS AN INTERRUPT [N CHANNEL 1 OCCURED

TRAP
.WORD
JWORD
.WORD
JNO FURTHER INTERRUPT ALLOWED
MOV
TRAP
;SELECT CHANNEL 2
*LOAD CHANNEL NUMBER

#14,3]1CRHX

ERRSOFT 2709,E234 ,ERRSO1

105374
002500
002502

(SERSOFT
2707
E232
ERR201

25%
SCSRX ,BAD

002366

000010
000002

TRAP
WORD
.WORD
.WORD

;SELECT CHANNEL 1
*LOAD CHANNEL NUMBER

002502

25%:

*ERROR HANDLER

#10,3CSRX
#1,CHAN

TST

002500

*GET CSR2 CONTENTS
*BC OF ,DMA DIR,SYS CONT

BIC
MOV

105514

000340

aCSRX gno
#100016,Goop

ERRSOFT 2707,E232,ERR201

BNE
MOV

100000

(Q22-BUS)TEST

104457
005224
006072
003500

104457
005226
006231
003702
042777
01%737

074732
074734
8421 074736

105570
100016

MOV
CLR
CMP
BEQ
ERRSOFT

aBCRX,BAD
600D
BAD , GOOD
31g
2710,E235.ERRSO

sERROR HANDLER

:GET BCR1 CONTENTS
:
11S BCR! ZERO
*BRANCH IF YES
;ERROR HANDLER

#10,3CSRX

;SELECT CHANNEL 2

MOV
BIC

BUF
BB, GOOD
#160000, GooD

*SET UP COMPARE VALUE
SCLEAR BIT 13414415

ADD
MOV
CMP

#1,CHAN

8C INP,GOOD
3BARX .BAD
GOOD , BAD

#PR107,RO
($SPRI

teeeel0AD TCA INTO A(R 2===ccccccccces

BIC

MOV

CSERSOFT
2708
E232
ERR201

TRAP
.WORD
WORD
.WORD

CSERSOFT
2709
E234
ERRSO01

TRAP
LWORD

CSERSOFT
2710
E235
ERRSO01

WORD
.WORD

;LOAD CHANNEL NUMBER

B
‘GET BAR2 CONTENTS
‘HAS BAR2 THE CORRECT ADDRESS

214

WARDWARE TESTS

MACRO M1113

TEST 27: EXTENDED ADDRESS BIT

8428 075010
8429 07501%
075012

104457
005227
006200
oosro;
012737
005337
013701
111103

8435 0750646

004737

8436 075052

8437 075056
8438 075062

8439 075066

012701

1;0000

012737

120322
000240
001415
005037
005037

46 075176

013737

8447 0751264
8448 075132
8449 075136

B4SO
8451
8452
8453
8454

075140
075142
075144
075150
0751564

000001
172352
002356

002340

005237
013702

110337

013737
000425
005237
122122
001453
005037
005037
010137

177572

43%:

172352
002360

000001

002500
002502

002500
002334

002336

8458 075200
8459 075206
8460 075212
8461 075216
8462 075224

116137
010237
004737
013737
013737

177777
002340
010024
002334
002336

8466 075250
8467 075254

005037

177572

002430
002424
177777

075254
075256
075260
075262
8468 075264

104457
005230
005726
003744
012737

000001

8471 075302
8472 075306

005037
005077

177572
104766

8474 075320
8475 0753264
8476 075330

005077
006337
022737

104754
002350
001000

8469 075272 023737 002404
8470 075300 001315

847% 075312 017737

PC . VPCON

SVIRTUAL TO PHYSICAL CONVERSION ROUTINE

CMFB
NOP
BEQ
CLR
CLR

MOVB
MOV

002430
44s:

002426

8457 075172 013737 002236 002430

005337
005337
116237

JSR

MOV

002500
002592
002340

010024
002334

#1,5R0
KPARS
BUF AB,R1
(R1),R3

INC
MOV

002426

002404

004737
013737

MOV
DEC
MOV
MOVE

MOV
002404

002500
002422
002424
002502

177572

002240 46%:

104754 002502
002364

MOV
BR
INC

R1,viADD

#120000,R1
KPARS
BUFBB,R2

#1,CN Y

R3,(R2)+

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

:BRANCH IF EQUAL TO NEXT COMPARE
SCLEAR HIGH BYTE OF GOOD
*CLEAR HIGH BYTE OF BAD

PHHIGH, TXADRH

SFIRST TX ADDRESS

R3,GO0OD

PHLOW, TXADRL
45%
CNT1

(R1)+,(R2)+
463
GOOD
BAD
R1,VIADD
PC,VPCON
PHHIGH, TXADRH

MOVB
MOV
JSR
MOV
MOV

=-1(R1),G00D
R2,VIADD
PC.VPCON
PHHIGH ,RXADRH
PHLOW, RXADRL

DEC
DEC
MOVB

SSET UP DATA FOR CONVERSION ROUTINE

448
GOOD
BAD

CMPB
BEQ
CLR
CLR
MOV
JSR
MOV

MOV

45%:

:BRANCH IF YES
*ERROR HANDLER

TRAP
(CSERSOFT
WORD
2711
.WORD
E234
.WORD
ERRSO1
;**ENABLE MEM.
'Y MANAGEMENT*+
*CROSS THE BOUNDERY FOR FIRST BYTE
*PROVIDE FIRST BYTE OF BUFFER A
SGET THE FIRST DATA BYTE

MOV

010024

8455 075160
8456 0751664

8463 075232
8464 075236
B4L6S 075242

SEQ 215

PAGE 69-6

BEQ
43%
ERRSOFT 2711,E234,ERRSO1

010127

B44L0 075074
8441 075076
8442 075100
8443 075102
8444 075105

8445 075112

(Q22-BUS)TEST

001404

075014
075016
075020
8430 orsogz
8431 075030
aA3§ 07503¢
8433 075040

8434 075042

06-SEP-82 16:46

PHLOW, T XADRL

TXADRL
RXADRL
=1(R2) ,BAD

CLR
SRO
ERRSOFT 2712,E250,ERR231

:LOAD FIRST TX DATA FOR ERROR MESSAGES
SGET ADDRESS OVER 128K
:BRANCH TO ERROR REPORT
:

;BUFFER A EQUAL BUFFER B
SIF YES CONTINUE
:CLEAR GOOD
*CLEAR BAD
:

:VIRTUAL TO PHYSICAL CONVERSION ROUTINE
STX ADDRESS IS OVER 128K

S oni

:LOAD TX DATA FOR ERROR MASSAGE
:
*SET UP DATA FOR CONVERSION ROUTINE
*VIRTUAL TC PHYSICAL CONVERSION ROUTINE
:RX ADDRESS IS OVER 128K
:GET ADDRESS OVER 128K
e
:
:LOAD RX DATA FOR ERROR MESSAGE

teeDISABLE MEMORY MANAGEMENT®+
;ERROR HANDLER

MOV

#1,SR0

TRAP
MORD
.WORD
.WORD
:**ENABLE MEMORY MANAGEMENT
s+

CLR
CLR

SRO
aCSRX

teeD]SABLE MEMORY MANAGEMENT®+
SCLEAR CSR2,SELECT CHANNEL 1

CMP
BNE

MOV

CLR
ASL
CMP

CNTl,BCINP
44$

aIDRX,BAD

aCSRX
MASK
#1000, CSRMS1

CSERSOFT
2712
E250
ERR231

SALL BYTES COMPARED ?
S1F NO, GET NEXT ONE

*READ DIR1 FOR CLEAR BO BIT IN IIR
*CLEAR CSR1
*NEXT MEMORY RANGE
‘WAS BA 18 SET

HARDWARE TESTS
MACRO M1113
(06-SEP-82 16:46
TEST 27: EXTENDED ADDRESS
BIT (022-BUS)TEST

8477 075336
8478 075340
8479 675346
8480 075352
8481 075360
s«sg 075364
8483 075366
8484 075374

8485 075376
8486 075402
87

075402
0754064

8488 075406
8489
8490
8491 075454
075454
075454

00340
012737
oogs 7
053737
006337
ooo;ao
022737
001402

000137

000400
002362
002362
002306
020000

002362
002364

072724

104401

123

508 :

002366

69-7

BLE
MOV
ASL
BIS
ASL
NOP
CMP
BEQ

JMP
EXQV27: EXIT

104432
000950
045

PAGE

062

TSHD27:

NLIST

JASCIZ
LIST
.EVEN
ENDTST

SEQ 216

508
#400, CSRMSK
CSRMSK
CSRMSK , CSRMS 1
CSRMS2
#20000,CSRMS?
EXQV27
ITAC27
ST

BEX

;BRANCH IF EQUAL OR GREATER
:SET BA 18
;
;SET EXTENDED ADDRESS BIT FOR
RX CHANNEL

¢ALL EXTENDET ADDRESS BIT TES
TED
:1F YES, EXIT TEST
:

/%S2%AQ-22 EXTENDED ADDRESS BIT
TESTAN/
BEX

L10060:

TRAP
.WORD

CSEXIT
L10060~-.

TRAP

CSETST

HARDWARE TESTS MACRO M1113
06-SEP-B2 16:46
TEST 28: ADDITIONAL STANDBY TEST

8493

LSBTTL

SEQ 217

PAGE 70

TEST 28: ADDITIONAL STANDBY TEST

8‘9‘

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

8495
8496
2497

:
1EX - TEST 28
STHIS TEST MOVES A SLIDING ONE'S BIT PATTERN ACROSS THE
*ADDRESS LINE 16,17,18,19,20,21 IGNORING NXM ERRORS BUT CHECKING

8500

*THE PATTERN SHOULD BE CHECKED ON A LOGIC ANALYSER .

gggg

*THE TRIGGER HWAS TO BE CONNECET TO THE SIGNAL ADREN L (E9,PING).

g:gg

*THE ADDRESS REGISTER LINES O THE BUS.

8501

*THE LOGIC ANALYSER WAS TO BE CONNECT TO ADDRESS LINES 16-21,

8504
8505

TTHIS TEST IS ONLY CARRIED GUT IF A G-BUS IS USED AND IF YOU ANSWER
*THE SOF TWARE QUESTION.

8506

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

8507 075456
075456
8508 075456
8509 075462
8510 075464
8511 075470
8512 075472
075472
075476
075502
075504
075506
8513 075512
075512
075514
8514 075516

075516

85:5 075520
075520
8516 075522
8517 075526
8518 075530

BGNTST
005737
001015
005737
001410

012746
012746
010600
104417
062706

075552

104432
001146
005737
001410

8519 075550
075550

8520 075554
8521 075560
8522 075562

075562
075566
075572
075574
075576
8523 075602
075602
075606
075612
075614

2%:

EXIT

TST

3%:

READBUS

128::
;1S THIS TEST SELECTED
SEXIT IF NO
*IS THE PNT FLAG SET
“IF YES ,PRINT INFGRMATION
‘PRINT MESSAGE FOR USER
MOV
MOV
MOV
TRAP
ADD
SEXIT TEST
TRAP
LWORD
:ARE YOU ON A Q-BUS

BCOMPLETE 5%

;BRANCH IF Q-BUS

076374
000001
000004

1048407

075530
075536
075540
075542
075544

MAINB
3%
PNTF
2%
NINFO2

002324

104432
001204

103415
005737
001410

ST
BNE
ST
BEQ
PRINTF

002242

TS1
BEQ
PRINTF

PNTF
1%
#INFO3

BCS
:1S THE PNT FLAG SET
*1F YES.PRINT INFORMATION
*PRINT MESSAGE FOR USER

11$:

EXIT

TSI

;1F UNI-BUS EXIT TEST

5%:

ST
BEQ
PRINTF

PNTF
7%
#TSHD28

;1S THE PNT FLAG SET
*1F YES, PRINT THE TEST HEADER
..

PRINTF

#INFO1

:PRINT MESSAGE FOR USER

002324

076502
000001
000004

002324

012746
012746
010600
104417
062706

076220
000001

012746
012746
010600
104417

076244
000001

000004

TRAP

#INFO2,=(SP)
#1,-(SP)
SP.RO
CSPNTF
#4,5P
CSEXIT
L10061-.

(SRDBU
5%

MOV
MOV
MOV
TRAP
ADD

#INFO3,=(SP)
#1,-(5P)
SP.RO
CSPNTF
#4,SP

TRAP
.WORD

CSEXIT
L10061=-.

MOV
MOV
MOV
TRAP
ADD

#TSHD28,=(SP)
#1,-(SP)
SP.RO
CSPNTF
4 ,SP

MOV
MOV
MOV
TRAP

#INFO1,=(SP)
#1,-(SP)
SP.RO
CSPNTF

HARDWARE YEST%
MACRC M1113 06-SEP-B2 16:46
TEST 28: ADDITIONAL STANDBY TEST

07561
8524 07562
0756
07
0
8525 075650

062706

000004

012746
012746
012746
012746

000340
010132
000004
000003

062706

000010

012746
01%766
013746
012746

000340
010142
002244
000003

062706
004737

000010
010534

013701
062701
010137

002314
000040
002412

004737
000240
005037

011060

10443

0o 00 0o 0o 00 0O O 0o 00 0O

VIV VN

104437

112777

113777

SEqQ 218

PAGE 70-1

SETVEC

#6 ,ONXM 2340

SETVEC

VECCT1,#INTSC1,#PRIO7

104360

MOVB

002412

104344

MOVB

002370

;SET UP INTERRUPT VECTOR

JSR
ITAC28: NOP
CLR

013777
052777

002350
000107

104244
104236

104441
112777

012701
005737
001013
005301
001373
104457

000000

#10,5P

MOV

#PRI07,=(SP)

MOV
MOV
TRAP
ADD

VECCT,=(SP)
#3,-(SP)

002402

002350

ST
BEQ

MOV
NEXTBA: CLR

NOP

CLR
MOV
NEG

104256

MOV

MOV
BIS

SETPR]

000000
000013

077777
002376

104212

Mov8

13%:

MOV
ST
BNE
DEC
BNE
ERRSOFT

#INTSCT,=(5P)
CSSVEC
#10,5P

PC,LOOP

sSTORE MLA2
;==== 0AD MLA2 INTO DOR lececccccccccs
JWAIT A LITTLE

ANS
TRIMSG,ANS,=1,NO

sCLEAR ANSWER LOCATION
sASK ,READY FOR TRIGGER

ANS

I1TAC28

#20,MASK

INTFCI

aBARX

#1,RSAVE
RSAVE
RSAVE ,@BCRX
MASK
, 3C SRX
#107 ,@CSRX

#Pr100
COW—=OZ ~—
OTM
P~ ~NW

002402

S —a

76062

002370

CS$SVEC

ADD

TRAP

CSGMAN

WORD

ANS

104274
000001
002402

012700

#3.-(5P)

sCREATE MLA2

MOV
ADD
MOV

GMANIL

005077
012737
005437
013777

MOV

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

;SET UP PARAMETER
s==SELECT CHANNEL 1 AS TALKER===== -

JSR

000212

000020
002376

oo
~NO
ow
oW
WO

854
8544 07602V
8545 076026
8546 076034
8547 076042
076042

#340,-(SP)

MOV

012737
005037

000240

MOV

TRAP

000404
002370
000120
076563
177777

005737
001764

#4,5P

MOV
MOV

104443

8536 0
8537 075764
8538 075766
8539 075774
8540 076000

ADD

:SET UP NON-EXISTENT MEMORY TRAP VECTOR

#13,31 CRHX

077077 .R1
INTFCI

1.62N

sTEST ANSWER

10000%:

.WORD
.WORD
LWORD

10000%

T$CODE
TRIMSG
=1

:1F ANSWER WAS YES, DO THE TEST
:SET UP MASK FOR LOADING BA BIT IN CSR
JCLEAR INTERRUPT FLAG

;LOAD BAR READ LOCATION
sGET BYTE COUNT
sBILD 2°'COMPL FOR B”R
sLOAD READ ADDRESS
sLOAD EXTENDED ADDRESS BIT INTO (SR
sSET DMA ENB, INT ENB, DMA DIR INTO (SR
sALLOW INTERRUPT
MOV

TRAP

#PRI00,RO
C$SPRI

:==LOAD GTS INTO ACR 1, START DMA====sLOAD LOOP COUNTER
sHAS INTERRUPT OCCURRED

sBRANCH IF YES
sDECREMENT COUNTER
sTEST AGAIN

TRAP

.WORD
.WORD
WCRD

CSERSOFT

2801
E271
0

HWARDWAPE TESTS MACRO M1113 06-SEP-B2 16:46
TEST 28: ADDITIONAL STANDBY TEST

012700
1044461

SETPR]

000340

EXIT

#PRI07

:DISABLE

INTERRUPT

TRAP

002350
002350

000400
002350

002350

20%:

000014

;1S BA 19 SET

ASL

MASK

;

NEXTBA

*BRANCH [F

208

MASK ,#100
#4600 ,MASK

MOV
ASL

MASK

NOP
NOP
NOP

INTERRUPT

:BRANCH IF

MOV
TRAP

#PR107,RO
($SPR]

YES

‘WAS BA 17 SET
NO

:LOAD BA 19 INTO MASK

*GENERATE NEXT EXTENDED ADDRESS BIT

#20000,MASK

SALL EXTENDED ADDRESS BIT SHIFTED

*READ DIR FOR CLEAR iHE BO BIT
;BRANCH

TRAP
e By =y
e N

CSEXIT

L10061-.

BEX
/XS2XASTANDBY TESTIN/
JANXACONNECT YOUR LOCIG ANALYSER TO BDAL 16=21%IN/
/%XAAND THE TRIGGER TO ADREN L (E9,PING)IN/
/XS2%AFOR SELECT THIS TEST PLEASE ANSWERXIN/
/XSOXATHE SOF TWARE QUESTIONIN/
/XS2XATHIS TEST IS ONLY FOR THE Q=BUS INTERFACEIN/
/1S THE LOCIG ANALYSER READY FOR TRIGGER?/

é?O INTERRRUPT WHEN EXPECTED, RUN TEST 0=26 AT FIRST/
X

—

NN N N

CSEXIT

L10061-.

;===L0AD TCA INTO A(CR leccccccce=

?E#TBA

N
2 =t 5t bt et bt Bt et et Gt )

TMMe

E271:

INFO3:

TRIMSG:

INFO2:

NIANNNWN
= O

b
ad abd
b
b
b
i
-

INFO1:

($SPRI

LWORD

TSHDZ28:

#PR107,R0

#1491 CRHX

31DRX,EAD

cMP
BNE

EXIT

=PI
O =N

1M
116

#1000, MASK

mMovB
MOV

104070

104422
000502
045
045
045
045
045
045

(MP

(MP
BNE

020000

076220
076244
076323
076374
076445
076502
1 076563
076634

:DISABLE

BLE

000100

002350

#PR107

S B NN = NN =W
NSNS

001000

SETPR]

O =NV
AN
e lalalnlnlninlalnl
)

) b e

—

108:

000340

MOV

TRAP

O\.fl\flbbrw
gNO‘OOO
NS RON SO S

b O

8555 076104
761

SEQ 219

PAGE 70-2

104401

ENDMOD

L10061:

TRAP

(SETST

HARDWARE TESTS

MACRO M1113

06-SEP-B2 16:46

TEST 28: ADDITIONAL STANDBY TEST

SEQ 220

PAGE 71

TITLE PARAMETER CODING

8608
86

.SBTTL
076722

HARDWARE PARAMETER CODING SECTION
BGNMOD

THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS
THAT ARE USED BY THE SUPERVISOR TO BUILD P=TABLES.
THE
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE

INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS
WITH THE OPERATOR.

649

8650 076722
076722
076724
1
865
8661 076724
076724

000032

000031
077010
160090
177776

001031
000770

002032

000006

003032

BGNHRD

LSHARD:
GPRMA HPM1,0,0,160000,177776,YES

GPRMA HPM2,2,0,200,770,YES

GPRMD HPM3,4,0,340,4,6,YES

GPRMD HWPM4&,6,0,-1,0,36,YES

000000

000036
004032

GPRMD HPM5,10,0,-1,0,36,YES

GPRML HPM6,12,-1,NO

8666

077006

.WORD L10062-LSHARD/2

.WORD
.WORD
.WORD
.WORD

T$CODE
HPM1
TSLOLIM
TSHILIM

.WORD
.WORD
.WORD
.WORD

HPM?
TSLOLIM
TSHILIM

.WORD
.WORD
.WORD
.WORD
.WORD

T$CODE
HPM3
340
TSLOLIM
TSHILIM

.WORD
.WORD
JRD
.~ JRD
. “D

.WORD
.WORD
.WORD
.WORD
.WORD

.WORD
.WORD
.WORD

T$CODE

H?H&

IM
TSLOL
TSHILIM

T$CODE
H?HS
IM
TSLOL
TSHILIM

T$CODE

N:Hb

PARAMETER CODING

MACRO M1113

HARDWARE PARAMETER CODING SECTION

06-SEP=-B2 16:46

SEQ 221

PAGE 71-1

8667

8668
8669 077010

ENDHRD

077010
867

8678 077010
8679 077046
8680 077104
8681 077164
8682 077226
8683 077271
8684
8685
8686

L10062:
104
126
120
104
104
m

105
105
122
105
105
123

126
103
111
126
126
0640

HWPM1:
wWPM2:
WPM3:
HWPM4&:
HWPM5:
HWPM6:

NLIST BEX

_ASCIZ
_ASCIZ
_ASCIZ
_ASCIZ
_ASCIZ
LASCIZ

.EVEN

/DEVICE ADDRESS
/
/VECTOR ADDRESS
/
/PRIORITY LEVEL (FOR LSI WITH FIXED PRI. TYPE &)/
/DEVICE PRIMARY ADDRESS (H.1
/
/DEVICE PRIMARY ADDRESS (H.?2
/
/IS TESTCABLE IN ?
/

.EVEN
LLIST BEX

PARAMETER CODING
MACRO M1113
SOF TWARE PARAMETER CODING SE TION

06-SEP-82 16:46

gggg

.SBTTL

8691

SEQ 222

PAGE 73

SOFTWARE PARAMETER CODING SECTION

Jee

869§

: THE SOFTWARE PARAMETER CODING SECTION CONTAINS MACROS

8694
8695
8696
8697

:
:
:
:

869

8698
8699

THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES.

8700 077334

07733&
077336

000115

07733
077340
077342
8712 077344
077344
077346
077350
077352
(77354
8713 077356
077356
077360
077362

000130
077400
177777

8701
8710
8711 077336

077364
077366

077370
077372
077374

003130
077520
177777

077376

075004

8720 077520

121
116
116
104

8714 077370

8715 077376
8716
8717 077400
8718 077427
8719 077471
8721
8722
8723
8724 077570

BGNSFT

LSSOFT::

001052
077427
177777
000003
000077
002052
077471
177777
000001
003777

125
125
125
117

111
115
115
040

PMOVP:
SPRM2:
SPRM&:
SPRMS:

GPRML

PMQVP,0,=1,YES

GPRMD

SPRM2,2.D,-1,3,77,YES

GPRMD

SPRM&,4,D,=1,1,3777,YES

GPRML

SPRMS,6,=1,YES

EXIT

SFT

NLIST BEX
LASCIZ /QUICK VERIFY TEST
,ASCIZ /NUMBER OF MATCH cuAnacrea COUNTS /
LASCIZ /NUMBER OF BYTE COUNTS
/

.ASCIZ

8735 077570
g;gg 077710

.WORD
.WORD
LWORD

TSCODE
PMQVP
=1

.WORD
.WORD
LMWORD
LWORD
LWORD

TSCODE
SPRM?
=1
TSLOLIM
TSHILIM

.WORD
.WORD
MORD
LWORD
JMORD

TSCODE
SPRM4
=1

.WORD
.WORD
MORD

TS$CODE
SPRMS
=1

.WORD

T$CODE

/DO YOU WANT THE ADDITIONAL STANDBY TEST/

ENDSFT

L10063:
SPAT(H::

.WORD L10063-L8$SOFT/2

LLIST BEX
.EVEN

077570

8725
8726
8733
8734 077570

8738

THE

MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE
INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.
THE
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS
WITH THE OPERATOR,

.BLKkW
.BLKB

S0
400-<.R377>

: PATCH AREA
: LASTAD SHIFT FOR LS! BUG

.EVEN

TSLOLIM
TSHILIM

g
PARAMETER CODING
MACRO M1113
SOF TWARE PARAMETER CODING SECTION

06-SEP-B2 16:46

B745
8746 100000

LASTAD

188882 0(0)88%0
100004

8747 100004

SEQ 223

PAGE 73-1

EVEN

"WORD TSFREE
LSLAST::

"WORD T$SIZE

ENDMOD

‘

MACRO M1113
SOF TWARE PARAMETER CODING SECTION
PARAMETER CODING

8764 100004
8765 100004
100006

06-SEP-B2 16:46

BGNSE TUP
BGNPTAB

000009
000006
160140

.WORD
+WORD
.WORD
.WORD
.WORD
.WORD

000000

ENDPTAB

000001

SEQ 224

PAGE 74

.END

ENDSETUP

:1ST
s1ST

(OF
(OF

L10064:

8) REGISTER ADDRESZ
2) VECTOR ADDRESS

s INTERRUPT PRIORITY
:DEVICE PRIMARY ADDRESS FOR (H.1

:DEVICE PRIMARY ADDRESS FOR (HM.?

sDEFAULT VALUE FOR TESTCABLE

L10066:

LWORD
.WORD

O
L10066~./2=1

SYMBOL TABLE

MACRO M1113

06-SEP=-82 16:46

SEQ 225

PAGE 74-1

VLVLVLVLLVLVLLY VLY QOVOVOLVLVLVLYL

PARAMETER CODING

ad a < o (=]
oL

Wo N o

SEQ 226

PAGE 74=2
06-SEP=-82 16:46
MACRO M1113
PARAMETER CODING

SYMBOL TABLE

ODOMAOM> —IT I
INMdUUUUU LD DIEEO~
— g S St2 L L M A A WM W WO A — OVVLVLVLEEXASCAANE

——e e d dCOVOOW I JE V E—W UX XZOA A A RA AI II IEZTIa xax

TR I L O O U T O T T

OT T I TN O OO0 rmrmreMON O r—MANIN MO~ Me= =N ON = TM I N NN T OO T O ONNI— NI ONIND

llNNNNNNNNSSSSS“"“"7"1““7““"“"“““ “"““"“

06-SEP=-82 16:46

SWONeoIIIIIUIM N=-eMTO~SA S4B6UoRL50DWXPU

ERRORS DETECTED:

( 106 PAGES)
VIRTUAL MEMORY USED:
26992 WORDS
( 79 PAGES)
DYNAMIC MEMORY:
20774 WORDS
ELAPSED TIME:
00:19:50
Z1EABO.BIN,ZIEABO.SEQ LIBA/ML,Z1EABO.SRC

SEQ 227

PAGE 74-3

P e e B e B e eB e e D D S > > > B X X X X WA

O N NOSYTN O ITN ONONONNT

SYMBOL TABLE

MACRO M1113

3w1) L woaxLU

PARAMETER CODING