Digital PDFs

AH-F000C-MC

September 1985

32 pages

Original

12MB

view download

OCR Version

14MB

view download

Document:	Micro Fiche Scan Name of device(s) tested: DEC/X11,DL11-E,DLV11-E Test description: DL11-E, DLV11-E MOD MAINDEC Number or Package Identifier (after SEP 1977): CXDLBCO Fiche Document
Order Number:	AH-F000C-MC
Revision:	000
Pages:	32
Original Filename:	CXDLBC0__DEC-X11,DL11-E,DLV11-E__DL11-E,_DLV11-E_MOD__AH-F000C-MC__1985_gray.pdf

OCR Text

Micro

Fiche

Scan

Name of device(s)

tested:

DEC/¥11,DL11-E,DLV11-E

Test description:
DL11-E,

DLV11-E

MAINDEC Number

MOD

Package

Identifier

(after

SEP

1977):

CXDLBCO

Fiche

Document Part Number:

AH-F000C-MC

Fiche preparation date

unknown,

using copyright year:

1985

Image

resolution:

8-bit gray levels,
COPYRIGHT

(C)

max.

quality

for

1976-85 by dlilgliltlall

archiving

TM
5K

SEQ 000

1
DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Mondey 15-Jul-85 14:23 Page 2

DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MOCULE
.REM

IDENTIFICATION

PRODUCT CODE:

AC-E998C-MC

PRODUCT NAME:

CXDLBCO OL11-E,DLV11-E MODULE

PRODUCT DATE:

JULY 1985

MAINTAINER:

DEC/X11 SUPPORT GROUP

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

THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO THE
PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER
SYSTEM AND CAN BE COPIED (WITH INCLUSION OF DIGITALS
COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY
OTHERWISE BE PROVIDED IN WRITING BY DIGITAL.

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

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Monday 15-Jul-85 14:23 Page 3
DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MOOULE
1.0

ABSTRACT
.........

CXDLB IS An IOMOD THAT EXERCISES ONE DL11-E (OR DLV11-E)

ASYNCHRONOUS COMMUNICATIONS INTERFACE (M7800). THE PROZRAM
CONSISTS OF TWO MAJOR SECTIONS AS DESCRIBED BELOM:
SECTION ONE:

THE FIRST SECTION CONSISTS OF A LOGICALLY SEQUENCED

SET OF STATIC REGISTER TESTS TO VERIFY THE DL11-E HARDCORE
REQUIRED TO PERFORM INPUT/QUTPUT DATA TRANSFERS IN INTERRUPT
MODE. ERRORS DETECTED IN THIS SECTION THAT ARE DETERMINED TO
BE FATAL ARE REPORTED VIA THE STANDARD DEC/X11 ERROR PRINTOUT
AND THEN THE MODULE IS DROPPED FROM THE EXERCISE. NON-FATAL

snogéml’élschHPLY REPORTED AND THEN THE PROGRAM CONTINUES IN NORL

SECTION TWO:

THE SECOND SECTION TRANSFERS 256. BYTE BLOCKS OF DATA
USING THE MAINTENANCE MODE TO TURN THE DATA AROUND. THE 256.
BYTES OUTPUT ARE COMPARED WITH THE 256. BYTES INPUT FOR DATA
COMPARISON ERRORS. ALL DATA COMPARISON ERRORS ARE REPORTED
ON THE CONSOLE DEVICE. THE 256. BYTE TRANSFER IS REPEATED
FOR FOUR DIFFERENT DATA BIT PATTERNS AS DESCRIBED BELOM:

A. NULL-DEL-NULL SEQUENCE
B. BINARY UP-COUNT SEQUENCE
C. BINARY DOMN COUNT SEQUENCE
D. WORST CASE PATTERN
2.0

(000,377,000..... ,000,377)
(000,001,002..... .376,377)
(377,376,37S..... .001,000)
(376,377,001,000.,000,200)

REQUIREMENTS

HARDWARE :

A UNIBUS PDP-11 COMPUTER WITH A DL11-E INTERFACE
OR A Q-BUS PDP-11 COMPUTER WITH A DLV11-E INTERFACE

STORAGE:: DLB REQUIRES:

1. DECIMAL WORDS: 1356
2. OCTAL WORDS: 2514
3. OCTAL BYTES: 5230

3.0

PASS DEFINITION

ONE PASS OF CXDLB CONSISTS OF TWO ITERATIONS OF SECTION
TWO OF THE MODULE CODE WHICH RESULTS IN 2048(10) BYTES
TRANSFERRED.

4.0

EXECUTION TIME

Pzt
SEQ 0002

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Monday 15-Jul-85 14:23

Page 3-1

DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE
AT 300 BAUD RUNNING ALONE ON A PDP11/40 A SINGLE ERROR FREE
PASS TAKES APPROXIMATELY 40. SECONDS THIS TIME WILL VARY
DEPENDING UPON THE BAUD RATE AND CPU TYPE.
5.0

CONFIGURATION PARAMETERS
........................

DEFAULT PARAMETERS:

vCT: 300
SR1: 0

DVA: 175610
DvC: 1

BR1: 4
SR2: 0

BR2: O

REQUIRED PRRAMETERS:

SR1:

TO EXERCISE THOSE STATIC TESTS REQUIRING THE USE
OF THE H315 MODEM TEST CONNECTOR (MODEM CONTROL LOGIC)

BIT 15 OF SR1 MUST BE SET TO A "1, IE SR1=100000.

#s NOTE: IF SR1 BIT 15=1 AND THE MODEM TEST CONNECTOR

IS NOT INSTALLED, FALSE ERRORS WILL BE REPORTED.

SR2:

THIS LOCATION CAN BE LOADED WITH A VALUE TO SET THE BAUD
RATE FOR A DLV11E THAT IS WIRED FOR A PROGRAMMABLE BAUD RATE
THESE VALUES ARE SHOWN IN THE PERIPHERAL HANDBOOK.
SOME EXAMPLES ARE:

004000 = 0050 BAUD
00000 = 9600 BAUD
044000 = 0300 BAUD
02400 = 0110 BAUD
124000 = 2400 BAUD
07400 = 1200 BAUD
174000 = 19200 BAUD
BAUD
4800
=
14400
16400 = ALSO GIVES 9600 BAUD
6.0

DEVICE/OPTION SETUP

IF THE MODEM CONTROL LOGIC IS TO BE TESTED, THE USER MUST
DISCONNECT THE MODEM AND CONNECT THE H315 TEST CONNECTOR TO
THE DL11-E DEVICE CABLE. SR1 MUST BE SETUP AS DESCRIBED IN
(5.0) OR THE TESTS WILL BE SKIPPED.

7.0

MODULE OPERATION

A. STATIC REGISTER TESTS

DLTO1:
DLTO2:

DLTO3:

TEST THAT ALL BITS IN THE RCSR ARE CLEAR WHEN

THE MODULE IS INITIALIZED TO RUN.

TEST THAT ONLY THE “READY” BIT IS SET
IN THE XCSR WHEN THE MODULE IS INITIALIZED TO RUN.

TEST THAT THE “MAINT” BIT IN THE XCSR CAN BE

SET AND CLEARED.

SEQ 0003

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Mondey 15-Jul-85 14:23 Page 3-2
DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE
DLTO4:
DLTOS:

TEST THAT THE "INTR ENAB" BIT IN THE XCSR CAN

CAUSE AN INTERRUPT TO THE PROPER VECTOR WHEN
SET AND ALSO THAT “INTR ENAB“ CLEARS PROPERLY.

TEST THAT A RECEIVER INTERRUPT OCCURS TO THE

PROPER VECTOR WHEN "DONE” GETS SET WITH THE
“INTR ENAB” BIT IN THE RCSR SET TO A ONE.
ALSO TEST THAT THE CORRECT DATA IS RECEIVED.

TESTS DLTO6 THRU DLT13 ASSUME THAT THE H315 MODEM
TEST CONNECTOR IS INSTALLED. THE USER INDICATES
THIS BY SETTING BIT1S IN SR1. THE MODULE LOOKS AT
SR1 AND WILL SKIP AROUND DLTO6 THRU DLT13 IF BIT15=0.

DLTO6:

TEST THAT "REQ TO SEND” CAN ASSERT “RING”
WHEN SET AND THAT BOTH "REQ TO SEND” AND “RING”
CAN BE CLEARED PROPERLY.

DLTO7:

TEST THAT “SEC XMIT” WHEN SET ASSERTS
“SEC REC” WHICH SETS "DATA SET INT” AND THAT
READING THE RXSR CLEARS "DATA SET INT”.
ALSO TESTS THAT CLEARING “SEC XMIT" NEGATES
;gc REC” WHICH ALSO CAUSES "DATA SET INT” TO

DLT10:

TEST THAT “DTR* ASSERTS "CLR TO SEND” AND
"CAR DET” WHICH IN TURN SET “DATA SET INT".
ALSO TESTS THAT “CLR TO SEND” AND “CAR DET"
CLEAR WHEN “DTR” IS CLEARED.

DLT11:

TEST THAT "DATA SET INTR ENABLE” CAN BE SET

DLT12:
DLT13:

AND CLEARED.

TEST THAT “DATA SET INTR ENABLE” IN THE XCSR

CAUSES AN INTR. WHEN ENABLED.

TEST THAT THE BREAK BIT IN THE XCSR CAN BE SET
AND CLEARED.

NOTE: BASIC TESTS DLTO1 THRU DLT13 ARE EXECUTED
ONLY ONCE WHEN THE MODULE IS FIRST INITIALIZED.
IF ANY FATAL ERRORS ARE DETECTED THE MODULE IS DROPPED
PRIOR TO THE DATA TRANSFER TESTS. AFTER PASS 1 THE
MODULE IS RESTARTED AT THE ENTRY POINT TO THE DATA
TRANSFER TESTS.

B. DATA TRANSFER TESTS

AFTER THE BASIC TESTS ARE RUN, FOUR 256(10)
BYTE DATA TRANSFERS ARE EXECUTED IN THE MAINTENANCE

MODE. EACH 256(10) BYTE BLOCK TRANSFER IS DIFFERRENT
IN THAT FOUR DIFFERENT DATA PATTERNS ARE XMITTED AND
RECEIVED AS DESCRIBED IN PARA. 1.0.

THE TEST SEQUENCE FOR THE DATA TRANSFER TESTS IS AS

FOLLOWS:

SEQ 0004

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Monday 15-Jul-85 14:23

Page 3-3

DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE
1.)
2.)

CLEAR BOTH THE INPUT AND OUTPUT BUFFERS IN CORE
(256(10) BYTES EACH).

LOAD THE OUTPUT BUFFER WITH THE APPROPRIATE DATA

PATTERN.

3.)

ENABLE BOTH THE XMIT AND RCVR INTERRUPTS AND

4.)

AFTER 256(10) BYTES HAVE BEEN OUTPUT AND INPUT
COMPARE THE OUTPUT AND INPUT BUFFERS, BYTE BY BYTE

INITIATE THE DATA TRANSFERS.

FOR DATA COMPARE ERRORS. REPORT ALL DATA ERRORS
ON THE CONSOLE DEVICE.

S.)

IF ALL FOUR DATA PATTERNS HAVE BEEN TRANSFERRED,
GO TO (6) BELOW - IF NOT REPEAT (1) THRU (4) FOR
THE NEXT PATTERN.

6.)

DECREMENT A PASS COUNTER (INITIALIAZED TO 2.)
AND TEST FOR ZERO. IF ZERO GO TO (7) - IF NOT
REPEAT (1) THRU (5) AGAIN.

7.)

REPORT END OF PASS TO THE MONITOR AND RESTART
AT (1) WITH THE FIRST DATA PATTERN.

NOTES:

ON EACH “XMIT” INTERRUPT THE "READY” FLAG IS TESTED
AND IF NOT SET, THE ERROR IS REPORTED AND THE MODULE
IS DROPPED. (FALSE INTERRUPTS ARE CLASSIFIED AS
FATAL ERRORS).

(2)

ON EACH “RCVR” INTERRUPT THE “DONE” FLAG IS TESTED
AND IF NOT SET THE MODULE IS UROPPED THE SAME AS
FOR A “XMIT FALSE INTERRUPT”.

(3)

1.8

IF A SOFT ERROR (PARITY-FRAMING-OVERRUN) IS DETECTED IN RCVR INTR. SERVICE, THE OFFENDING BLOCK
TRANSFER IS RESTARTED FROM THE BEGINNING OF THE
BLOCK. IF AFTER THREE RETRIES THE ERROR PERSISTS,
TRANSFER OF THE OFFENDING DATA PATTERN IS ABORTED
AND THE PROGRAM GOES ON TO THE NEXT DATA PATTERN.
ALL SOFT ERRORS ARE REPORTED ON THE CONSOLE DEVICE.

SUBROUTINE ABSTRACTS
e

E e

e -

THIS SUBROUTINE SERVES AS A MINI-MONOTOR THAT CONTROLS
THE SEQUENCING OF THE FOUR DIFFERENT 256(10) BYTE
BLOCK TRANSFERS. IT IS CALLED AFTER THE BASIC TESTS
AND PERFORMS THE FOLLOWING FUNCTIONS:

1. CALLS A SUBROUTINE TO CLEAR THE DATA BUFFERS
2. CALLS THE APPROPRIATE SUBROUTINE TO SET UP THE

SEQ 0005

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Mondey 15-Jul-85 14:23 Page 3-4

Ve
w

DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE
QUTPUT BUFFER WITH THE REQUIRED DATA PATTERN.
CALLS A SUBROUTINE TO ENABLE INTERRUPTS AND INITIATE
THE DATA TRANSFER.

SERVICES RETRIES REQUESTED BY SOFT ERRORS.
PERFORMS "BREAK" CALLS TO THE MONITOR TO PREVENT
TIMEQUTS FROM HANGING THE MODULE.

CALLS THE SUBROUTINE TO CHECK THE DATA BUFFERS
WHEN THE BLOCK TRANSFER IS COMPLETE.

KICKOF: THIS SUBROUTINE IS CALLED FROM "SEGX"” AND CONTAINS THE
THE CODE TO ENABLE INTERRUPTS AND INITIATE THE BLOCK
TRANSFER FOR EACH 256(10) BYTE BLOCK TRANSFER.

CHKDAT: THIS SUBROUTINE IS CALLED FROM "SEGX” AND CHECKS FOR
DATA COMPARISON ERRORS AFTER EACH BLOCK TRANSFER.
STATR:

THIS SUBROUTINE IS CALLED FROM THE BASIC TESTS
AND SETS UP THE ERROR INFORMATION FOR ALL ERRORS

RELATING TO THE RECEIVER CSR.

STATX:

THIS ROUTINE IS CALLED FROM THE BASIC TESTS AND SETS
UP THE ERROR INFORMATION FOR ALL ERRORS RELATING TO
THE TRANSMITTER CSR.

CLDLBF: THIS ROUTINE IS CALLED FROM “SEGX” AND CLEARS

BOTH THE OUTPUT AND INPUT DATA BUFFERS IN CORE.

LDOUT1: THIS ROUTINE IS CALLED FROM "SEGX" AND IS USED TO
LOAD THE OUTPUT BUFFER WITH THE NULL-DEL-NULL PATTERN.

LDOUT2: THIS ROUTINE IS CALLED FROM "SEGX” AND IS USED TO LOAD
THE OUTPUT BUFFER WITH A BINARY UP-COUNT PATTERN.

LDOUT3: THIS ROUTINE IS CALLED FROM “SEGX* AND IS USED TO LOAD
THE OUTPUT BUFFER WITH A BINARY DOWN-COUNT PATTERN.

LDOUT4: THIS ROUTINE IS CALLED FROM "SEGX" AND IS USED TO LOAD
THE OUTPUT BUFFER WITH THE MONOTOR'S WORST CASE PATTERN.
8.0

OPERATOR OPTIONS

A. USE THE MOD COMMAND TO MODIFY LOCATION “DLB 16" TO
CHANGE SR1. REFER TO PARA. 5.0.

8. MODIFYING THE CONTENTS OF MODULE LOCATION "RESTRT +2"
ALLOWS THE USER TO VARY THE TOTAL NO. OF BYTES TRANSFERRED PER PASS. THIS IS DEFAULTED AT LOAD TIME TO
2 WHICH RESULTS IN 2048. BYTES TRANSFERRED.

9.0

NON-STANDARD ERROR PRINTOUTS

A. IF ANY ONE OF THE FOUR DATA PATTERNS OUTPUT CANNOT BE SUCCESSFULLY COMPLETED DUE TO SOFT ERRORS (3 RETRIES ATTEMPTED)

SEQ 0006

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Mondey 15-Jul-85 14:23 Pege 3-5
DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE
OR A MONITOR "BREAK” TIMEOUT ONE OF THE FOLLOWING APPROP-

RIATE PRINTOUTS WILL OCCUR:

MSG1:
MSG2:
MSG3:
MSG4:

“NULL-DEL-NULL SEQUENCE ABORTED"
“BINARY UP-COUNT SEQUENCE ABORTED"
“BINARY DOWN-COUNT SEQUENCE ABORTED
“WORST CASE SEQUENCE ABORTED”

B. IF ANY FATAL ERROR DETECTED IN SECTION ONE RESULTS IN A
gsg'l‘?égfl TO DROP THE MODULE THE FOLLOWING MESSAGE IS
“FATAL ERROR DETECTED IN THE STATIC REGISTER TESTS”
AND THE "END” CALL IS EXECUTED TO DROP THE MODULE.
10.0

CHANGE HISTORY

NOTE: HISTORY STARTS WITH REV.CO

Co:

CORRECT FAILURE OF MODULE WITH HIGH BUS ACTIVITY.

‘tttt‘tttt‘t“tt“tt‘t.t“‘.t.t“‘t“ttttt““‘....‘.‘t‘ttt"t““‘.““‘t‘t‘.t
A

=
-

=
*
%

P-

*
%

EDIT

BY:

DATE:

REASON:

001

R. GAUDIN

15-APR-80

ADD CODE FOR THE DLV11E WHICH
CAN HAVE A PROGRAMMABLE BAUD
RATE. SR2 WILL HOLD RATE.

002

R. GAUDET

13-JUN-85

ADD A DELAY IN DLTO6: FOR THE
DL11 LINE FILTER

“t““..““t‘.“ttt“...‘.“““‘.“.‘...".t“..“‘l.“‘.‘t“t‘“.“‘..“‘..

SEQ 0007

OLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Monday 15-Jul-85 14:23 Page 4

SEQ 0008

DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE
;DL11-E DEC/X11 EXERCISER MODULE

I0MOD
MODULE

000000
000000

.TITLE

DDXCOM

i
000000

104

000005
000006
000010
000012
000013
000014
000016
000020
000022
000024

000
175610
000300
200
000
000001
000000
000000
000000
000000

000026
0C0030
000032
000034
000036
000040

140000
000226’
000224’
000000
000002
000000

000062
000064
000066
000070
000072
000074
000076
000100

000000
000000
000000
000000
000000
000000
000000
000000
000000
000000

000042
000044
000046
000050
000052
000054
000056
000056
000060

103

000000
000000
000000
000000
000000
000000

000102
000102 000000
000104
000104 000000
000106

000106 000000
000110 000000

000112
000114
000116
000120
000122

DOLBC DEC/X11 SYSTEM EXERCISER MODULE

VERSION

6.4

000000

000003

<DLBC »>,175610,300,4,,.2.,161
140000,DLBC ,175610,300.4,,,2.,161,,,..

002406’
000000
000000
000000
000161

114

040

28-JAN-82
.LIST

BEGIN:

102 MODNAM: .ASCII

BIN
Y L

/DLBC / ;MODULE NAME.

XFLAG: .BYTE OPEN
175610+0
ADDR:
VECTOR: 30040
.BYTE PRTY4+0
BR1:
.BYTE PRTY+0
BR2:
DVID1: 1
OPEN
SR1:
OPEN
SR2:
OPEN
SR3:
OPEN
SR4:

;USED TO KEEP TRACK OF WBUFF USAGE
+1ST DEVICE ADDR.
+1ST DEVICE VECTOR.
+1ST BR LEVEL.
:2ND BR LEVEL.
;DEVICE INDICATOR 1.
;SWITCH REGISTER 1
;SWITCH REGISTER 2
;SWITCH REGISTER 3
;SWITCH REGISTER 4

140000
STAT:
START
INIT:
SPOINT: MODSP
PASCNT: 0
ICONT: 2.
ICOUNT: O
SOFCNT: 0
HRDCNT: 0O
SOFPAS: 0
HRDPAS: 0
SYSCNT: 0
RANNUM: O
CONFIG:
O
RES1:
O
RES2:
OPEN
SVRO:
OPEN
SVR1i:
OPEN
SVR2:
OPEN
SVR3:
OPEN
SVR4:
OPEN
SVRS:
OPEN
SVR6:
CSRA: OPEN
SBADR:
OPEN
ACSR:
WASADR :
ASTAT: OPEN
ERRTYP:
OPEN
ASB:
OPEN
AWAS:

1STATUS WORD.
sMODULE START ADDR.
sMODULE STACK POINTER.
;PASS COUNTER.
3@ OF ITERATIONS PER PASS=2.
;LOC TO COUNT ITERATIONS
;LOC TO SAVE TOTAL SOFT ERRORS
;LOC TO SAVE TOTAL HARD ERRORS
;LOC TO SAVE SOFT ERRORS PER PASS
;LOC TO SAVE HARD ERRORS PER PASS
;@ OF SYS ERRORS ACCUMULATED
;HOLDS RANDOM & WHEN RAND MACRO IS CALLED
;RESERVED FOR MONITOR USE
;RESERVED FOR MONITOR USE
;RESERVED FOR MONITOR USE
;LOC TO SAVE RO,
;LOC TO SAVE R1.
;LOC TO SAVE R2.
;LOC TO SAVE RS.
;LOC TO SAVE R4.
;LOC TO SAVE RS.
;LOC TO SAVE Ré6.
;ADDR OF CURRENT CSR.
;ADDR OF GOOD DATA, OR
;CONTENTS OF CSR.
;ADDR OF BAD DATA, OR
:STATUS REG CONTENTS.
;TYPE OF ERROR
;EXPECTED DATA.
;ACTUAL DATA.
;RESTART ADDRESS AFTER END OF PASS
;WORDS TO MEMORY PER ITERATION
;WORDS FROM MEMORY PER ITERATION
;@ OF INTERRUPTS PER ITERATION
;MODULE IDENTIFICATION NUMBER=161

(AR AEAAREAAREASARA SRR ERARREEAEE 0000004000000 000000 RE0A0EE0 044

RSTRT: RESTRT
WDTO: OPEN
OPEN
WDFR:
INTR: OPEN
IDNUM: 161

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Mondey 15-Jul-85 14:23 Page 4-1

SEQ 0009

DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE
.REPT

000040

MODSP:

000224

;MODULE STACK STARTS HERE.

®e

L L
P

THE NEXT LOCATION CONTAINS A NUMBER THAT CAN BE EXAMINED IN CORE TO BE
SURE THAT THE LISTING AND ACTUAL CODE ARE THE SAME. THIS LOCATION IS
TO BE UPDATED EACH TIME THE SOURCE CODE IS UPDATED. LOCATION ‘MODREV'
IS NOT USED BY THE PROGRAM.

368
369
370
371
372
373
374
375
376
377 000224
378
379

.NLIST
.MORD
.LIST
.ENDR

SPSIZ

000020

MODREV: 1+1+l¢lelelelelelolololelelelo]l
H PP

T TTITTTTTTTTYTTTrrrryryrrryrr e

r e R R R S AR R R R R 2 22 2 S 2 22 22 2 L2 Dttt

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Mondey 15-Jul-85 14:23 Pege 5
DEC/X11

SYSTEM EXERSIZER MACRO DEFINITION MODULE

381
382
383
384 000236
385
386 000244
387 000246
388 000252
389
390
391
392
393
394
395
396
397
398 000270
399 000274
400 000300
401
402
403
404
405
406
407
408
409
410

START:

000226 016700 177554
000232 010067 003402
005720
000240 010067 003376
005720
010067 003372

MOV

RO,DLXDBR

;SET UP XMITTR DBR ADDRESS

DLINIT: CLR
CLR
CLR
TST

S8DLRCSR
S8DLRCSR

003336

(RO)«

shbddddtdbdbdibbbbbsdidibinis

005777

(RO)+

SECTION ONE
T

LT TR PR AL R R T L

S8DLXCSR

SDLRDBR
S8DLRDBR

;CLEAR OUT BOTH CSR'S
sMAKE SURE ALL DATA COMM BITS CLEARED
;FLUSH RCVR DONE BIT

;IN CASE IT'S PROGRAMMABLE, LOAD DLXCSR WITH DCSIRED BAUD RATE FROM SR2.
RATE OF 9600
;IF SR2 IS ZERO THEN LOAD BAUD..........
...........................
‘ ..............................

MOV

032767
001404
016700
042700
010077

004000 177502
177474
003777
003310

1s:

BIT
BEQ
MOV
BIC
MOV

#BIT11,5R2
13
SR2,R0
#3777.RO
RO, 8DLXCSR

:SETUP BAUD RATE

:BAUD RATE LOADED?
:BRANCH IF NOT
;GET RATE
;CLR UNWANTED BITS
iLOAD IT

;RGO1

;RGO1
;RGO1
;RGO1
:RGO1
;RGO1

;:THIS TEST VERIFIES THAT RCVR CSR GOT CLEARED UPON ENTRY-

000334
000340
000342
000346

005777 003300
001415
004767 003072
012767 000025

DLTO1:

177532

000370

104410

TST
BEQ
JSR
MOV

SDOLRCSR
DLTO2
PC,STATR
#25,ERRTYP

+IS RCVR CSR ALL ZEROES ?2?
:BR IF YES
;GO SET UP ERROR INFO
:

4
kR0 000002
000080
00
R 000400000
00
A4S0 ARER
RAR 04
;450

;CANT'T CLEAR OUT RCVR CSR
HRDER$ ,BEGIN,NULL
0040000000000 000000 000000000404
040040
8448440
;8884888458448
CALL WITH COMMON HEADER
MESSAGE
;ASCII
MSGN#$ ,BEGIN, DRPMS

000354 104405 000000’ 000000
104403 000000‘ 003712’
423 000362
425

RO,DLXCSR

TST

005720

000304 012700 164000

424

MOV

:GET BASE DEVICE ADDRESS
:SET UP RCVR CSR ADDRESS
;SET UP RCVR DBR ADDRESS
;SET UP XMITTR CSR ADDRESS

TST

000260 005077 003354
000264 005077 003350
005077 003350
005777 003342

000310
000316
000320
411 000324
412 000330

MOV

ADDR,RO
RO,DLRCSR
(RO)+
RO,DLRDBR

MOV
MOV

TST

000254 010067 003366

413
414
415
416
417
418
419
420
421
422

SEQ 0010

END$ ,BEGIN

000000°

CSR
;TEST THAT READY BIT IS ONLY BIT SET IN XMITTR....

426

‘ .............................................

427
428

9200, 80LXCSR
DLTO3
PC,STATX
#25,ERRTYP

000374 022777 000200 003242 DLTO2:
001415
430 000402
004767 003C46
431 000404

CMP
BEQ
JSR
MOV

433

HRDERS$ ,BEGIN,NULL

000410

012767

000025

177470

000416 104405 000000* 000000

;READY SET ??
:BR IF YES
;GO SET UP ERROR INFO

(S0 ASAREREAREEAI AR RARERRARERER RN REARRRARRR AR RN RERERASASS

CLEAR IN XMIT CSR
;READY NOT SET OR OTHER BITS DIDN'T tdng

FETTI TR T EE R LA 22 0 2] shsdsddbddiddtdbbiibdtsddtdtdtbibidistbb

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Monday 15-Jul-85 14:23 Page 5-1

SEQ 0011

DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE
434 000424

435 000432

436

104403
104410

000000°
000000

MSGN$ ,BEGIN, DRPMS
END$ ,BEGIN

003712°

;ASCII MESSAGE CALL WITH COMMON HEADER
.

;TEST THAT MAINT. BIT CAN BE SET AND CLEARED IN XMIT CSR

437
438
439

#4 ,80LXCSR
;SET THE MAINT. BIT
;DID IT SET ??
30‘ +8DLXCSR
CMP
:BR IF YES
BEQ
;GO SET UP ERROR INFO
ATX
PC,ST
JSR
P
#33,ERRTY
MOV
;““‘t‘.“““‘tt.‘“t‘.“.‘..t.‘..“““.“‘“‘.‘.‘.“‘.““.‘
BIS

440 000436
441 000444
442 000452
443 000454
444 000460

052777
022777
001415
004767
012767

003172

000466

104405

000000

HRDER$ ,BEGIN,NULL

sMAINT BIT WON'T SET OR IT CLEARED READY

446 000474
447 000502

003712’

MSGN$ ,BEGIN, DRPMS

;ASCII MESSAGE CALL WITH COMMON HEADER

000506
000514
000522
000524
000530

104403
104410
042777
022777
001415
004767
012767

177350

MOV

000536

104405

000000

HRDER$ ,BEGIN,NULL

;MAINT. BIT WON’'T CLEAR OR READY CLEARED

454 000544
455 000552

104403
104410

003712’

En'sg:oiggx‘n.mms

;ASCII MESSAGE CALL WITH COMMON HEADER

445

448
449
450
451
452
453

456
457
458
459

177420

003130

003122

Y T T Ty

1$:

END$ ,BEGIN

#4 ,80LXCSR
9200, 80LXCSR
DLTO4
PC,STATX

BIC
CHMP
BEQ
JSR

#25,ERRTYP

L bttt

;

;NOW CLR THE MAINT BIT
;:DID IT CLEAR 77
:BR IF YES
;GO SET UP ERROR INFO

1‘.‘.‘t“‘.‘.“.‘.““.O“..t“‘...“..“....‘t“‘..“t..“‘t‘.‘

"‘.““‘.““.‘..“““‘.““‘...““.““...“.‘..“.“.“‘.“
B

;TEST THAT BIT 06 IN XCSR CAN CAUSE AN INTERRUPT
003100
177222
000004
000666 '
177210

CLR
MOV
ADD

INTFLG
VECTOR,RO
4 ,RO

BIS

BR1,(RO)
R1

000100

MOVB
CLR

;INIT THE SOFTWARE INTR. FLAG
;GET BASE VECTOR ADDRESS

460 000556
461 000562
462 000566
463 000572
464 000576
465 000602
466 000604
467 000612
000612
000616
468 000622
469 000626
470 000630
471 000632
472 000634
473 000640

005067
016700
062700
012720
116710
005001
052777

104407
104407
005767
001025
005301
001367
004767
012767

177240

BNE
DEC
BNE
JSR
MOV

000646

104405

000009

HROER$ ,BEGIN,NULL

sXMITTER FAILED TO GENERATE INTERRUPT

000654
000662
000666
000674
000700

104403
104410
042777
005167

003712*

MSGN$ ,BEGIN, DRPMS

;ASCII MESSAGE CALL WITH COMMON HEADER

A74

475
476
477
478
479

480 000702
481 000710
482 000712

000002
022777
001415
004767

MOV

003032

1$:

@2%,(RO)+

€100,80LXCSR

BREAKS ,BEGIN
BREAK$ ,BEGIN
TST
INTFLG

34
R1
14
PC,STATX
923 ,ERRTYP

;GENERATE ADDR OF XMIT VECTOR
;GO TO 2% ON XMIT INTERRUPT
+PRIORTY LEVEL = BR1
:INIT BREAK TZER
+SET INTR. ENAB

; TEMPORARY RETURN TO MONITOR....

s THEN CONTINUE AT NEXT INSTRUCTION.
;DID XMIT INTR OCCUR YET 27
i8R IF IT DID
;COUNT BREAK TIMER
;B8R IF NO TIMEOUT
;GO SET UP ERROR INFO

3t.‘.“.t‘.‘.“.t‘.‘.‘.‘.‘i‘....“..““.O.....‘..‘.0‘.‘.“.“.‘

;6888688808888 408448008888880004888088480000000000000000000000

002750

2%:

002734

3%:

END$ ,BEGIN

BIC
COM
RTI

CHP

BEQ
JSR

#100,8DLXCSR
INTFLG

#200,80LXCSR

DLTOS
PC,STATX

;DISABLE XMITTR INTR ENABLE
:SET THE INTR. FLAG
;RETURN CONTROL TO OTHER GUY

;0I0 I.E. GET CLEARED IN INTR. SERVICE
:BR IF YES
;GO SET UP ERROR INFO

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Mondey 15-Jul-85 14:23 Pege 5-2
DEC/X11 SYS$ .t EXERSIZER MACRO DEFINITION MODULE

483 000716

484

012767 000027

MOV

177162

104410 000000’

END$ ,BEGIN

;

;TEST THAT A RCVR INTR CAN OCCUR WHEN “"DONE” GETS SET

:::

......

‘ .............................................

490

491 000744
492 000750
493 000754
494 000760
495 000764
496 000772
497 001000
498 001002
499 001006

500

L L

;"DONE” OR RCVR INTR. ENAB FAILED TO CLEAR
HRDER$ ,BEGIN,NULL
8844
00040080400
004
008800008000
004042
;8044 ASAA0SS 440000
HEADER
COMMON
WITH
CALL
MESSAGE
;ASC:I
DRPMS
MSGN$ ,BEGIN,

000724 104405 000000’ 000000
485 000732 104403 000000’ 003712

m 000740

#27,ERRTYP

SEQ 0012

005067
016700
012720
116710
052777
032777
001015
004767
012767

DLTOS:
002712
177034
001214’
177026
000100 002646
000100 002640

002432

000033

177072

001014 104405 000000 000000

S01 001022 104403 000000' 003712‘

S02 0C1030
S03 001034
S04 001042
505 001050
506 001052

104410 000000°
042777 000100 002576 1%:
032777 000100 002570
001415
004767 002362
177022

507 001056 012767

000023

001064 104405
505 001072 104403
510 001100 104410
S11 001104 052777
S12 001112 052777
S13 001120 005001
gi; ggiigg 112777

000000 000000
000000 003712’
000000'
000100 002526 2%:
000004 002524
000252 002516 -

508

001130
001134
516 001140
S17 001144
518 001146
S19 001150
520 001152
S21 001156

522 001162
523 001166
524

104407
104407
005767
001036
005301
001367
004767
005077

005077
012767

000000'
000000°
002516
002262
002456

002456
000023

176712

001174 104405 000000‘ 000000

525 001202 104403 000000’ 003712’
S26 001210

104410

000000'

527 001214 117767 002422 176666 44:
S28 001222 042777 000100 002410
S$29 001230 005077 002410

CLR
MOV
MOV
MOVe
BIS
BIT
BNE
JSR
MOV

INTFLG
VECTOR,RO
#44,(RO)+
BR1,(RO)
9100,80LRCSR
#100,80LRCSR
14
PC.STATR
#33,ERRTYP

T L
T

HRDER$ ,BEGIN,NULL
;SR

T L

sCAN'T SET BIT 06 IN RCSR I.E.

88
0
0800888048
000
004 8040804000
880
0 8548588888
RES4 480040

MSGN$ ,BEGIN, DRPMS

END$ ,BEGIN
€100,80LRCSR
BIC
€100, 80LRCSR
BIT
24
BEQ
PC,STATR
JSR
MOV

;INIT SOFTWARE INTR. FLAG
;GET THE BASE VECTOR ADDRESS
:GO TO 44 ON RCVR INTERRUPT
+SET PRIORITY
sSET I.E. IN RCVR CSR
;0ID IT SET
;B8R IF IT DID
160 SET UP ERROR INFO

923 ,ERRTYP

;ASCII MESSAGE CALL WITH COMMON HEADER
:
sNOW CLEAR THE I.E. BIT
;DID I.E. BIT GET CLEARED 77
:BR IF YES
;G0 SET UP ERROR INFO

0
388088888
808
08 88888845080
004
08808804848
;5888588888848 488388880

;CAN'T CLEAR RCSR INTR. ENAB. BIT
HRDER$ ,BEGIN,NULL
0s
08088042
44 888808888884008880000000
8004085585
2008
008
;58882408
HEADER
COMMON
WITH
CALL
sASCII MESSAGE
MSGN$ , BEGIN, DRPMS
i
END$ ,BEGIN
sNOW TURN IT ON FOR REAL
#100,8DLRCSR
BIS
sTURN ON MAINT. MODE
84 ,80LXCSR
BIS
sINIT BREAK TIMER
R1
CLR
:LOAD THE XMITTR OUTPUT DATA BUFFER
9252, 80LXDBR
HOVB
s TEMPORARY RETURN TO MONITOR....
BREAKS ,BEGIN
s THEN CONTINUE AT NEXT INSTRUCTION.
BREAK$ ,BEGIN
;:DID RCVR INTR. YET 77
INTFLG
TST
IF IT DID
:BR
S
BNE
BREAK TIMER
1COUNT
R1
DEC
NO TIMEOUT
IF
;BR
34
BNE
;GO SET UP ERROR INFO
PC,STATR
JSR
:CLEAR BOTH CSR'S
SDLRCSR
CLR
CLR
MOV
(808848080

SOLXCSR
#23,ERRTYP
4088 0008044804 04000880808808040080800000000008040

HRDER$ ,BEGIN,NULL

sRCVR FAILED TO INTR ON TIME

126808405888 880480 800084088000 04 084000000040 00 000000000000 000004

MSGN$ , BEGIN, DRPMS
END$ ,BEGIN

MOVB
BIC
CLR

SDLRDBR, AWAS
#100,80LRCSR
S8DLXCSR

;ASCII MESSAGE CALL WITH COMMON HEADER
i

;GET THE RECEIVED DATA
;TURN OFF I.E.
;TURN OFF MAINTENANCE MODE

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Mondey 15-Jul-85 14:23 Fege 5-3
DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE

S30 001234
S31 001240
$32 001242
S33 001246
534 001250
535 001254

005167
000002
005777
001421
004767
005077

002422
002372
002164
002360

536 001260 005077 002360
S37 001264 012767 000025

538

5¢:

CLR
MOV

176614

001272
$S39 001300
5S40 001306
S41 001312

104405
104403
104410
122767

000000' 000000
000000‘ 003712’
000000'
000252 176570 64%:

S44 001330
S45 001336
546 001344
S47 00:352

017767
012767
016767
016767

002304
000252
002272
002270

542 001320 001421
543 001322 016767 002312 176550

S48

INTFLG
SOLRCSR
64
PC,.STATR
SOLRCSR

SOLXCSR
#25,ERRTYP

;SET SOFTWARE INTR. FLAG
sRETURN TO OTHER GUY
;DID INTR SERVICE CLEAR THE RCVR CSR 77
:BR IF IT DID
;GO SET UP ERROR INFO
;CLEAR BOTH CSR'S

000805040004080 044008888404 88884804880800040048

sRCVR INTR SERVICE FAILED TN CLEAR I.E. AND DONE
HRDER$ ,BEGIN,NULL
(4808888848888 04 8844800080806 080488040844884848444008800080000000
sASCII MESSAGE CALL WITH COMMON HEADER
MSGN$ ,BEGIN, DRPMS
i
END$ ,BEGIN
+WAS DATA CORRECT 727
9252 ,AWAS
CcHP8
BEQ
MOV

MODEM
DLRCSR,CSRA

S@DLRCSR,ACSR
#252,AS8
BR
, WASADR
OLRD
BR
, SBADR
DLXD

1BR _IF YES
+SET UP ERROR INFO

1888888548 804880484808888800844888888888848848400808888008000048

DATER$ ,BEGIN

001360 104404 000000’

sDATA ERROR!!!

1884888558058 80084808088408008000888880448488888800808888000404

T;THE FOLLOWING GROUP OF BASIC TESTS ASSUME THAT THE MODEM IS DISCONNEC
ITS
IN
CCNNECTED
IS
CONNECTOR
TEST
MODEM
:ED FROM THE DL11-E AND AN HW31S

550
551

;PLACE. ALL OF THESE TESTS ARE SKIPPED IF SR1(15) IS CLEARED.
+IS SR1 BIT 15 = 1 77
SR1
MODEM: TST
;00 MODEM TESTS IF SET
DLTO06
BMI

ggg

554 001364 005767 176426
555 001370 100402
ggg 001372 000167 001010

RESTRT

1SKIP MODEM TESTS IF SR1(15)=0

;TEST THAT “REQ TO SEND“ CAN ASSERT "RING"

ggg

S61 001376
S62 001404
563 001412
564 001414

(64850008

MOV
MOV
MOV
MOV

176544
176542
176532
176522

549

560

COM
RTI
157
BEQ
JSR
CLR

SEQ 0013

' ........................................

052777 000004 002234 DLTO6: BIS
BIT
032777 000004 002:26
BNE
001010
JSR
004767 002020

565 001420 012767 000025

566

MOV

176460

#4 ,8DLRCSR
4 ,80LRCSR
14 .
PC,STATR

025, ,ERRTYP

1SET REQ TO SEND
:DID IT SET 77
1BR IF YES
;G0 SET UP ERROR INFO

(86888804 04040688048480088880888008888808800000008000000400

001426 104405 000000’ 000000
567 001434 032777 040000 002176 1%:
568 001442 001010
569 001444 004767 001770

sCAN'T SET REQ TO SEND
HRDERS ,BEGIN,.NULL
1880844848088888044480008384088488840000488800000000008000080044
#40000,80LRCSR ;NID "RING* GET ASSERTED 77
BIT
iBR IF YES
24
BNE
1G0 SET UP ERROR INFO
PC.STATR
JSR

001456 104405 000000' 000000
g;g 001464 042777 000004 002146 24:

1*REQ TO SEND” DIDN'T ASSERT “RING"
HRDERS ,BEGIN ML
6088880488004008480808000000000000
0:300848
06008888
1888000806884888
"REQ TO SEND"
OFF
:TURN
#4 . COLRCSR
8IC

S$70 001450 012767
s

000025

SS;;
576 001472 012705 000005

S$77 001476 005305

S$78 001500 001376

176430

i
:

34:

#25,ERRTYP
MOV
16608806868800800600060680886388808408888048888000408800888000808

s+ REQUEST FROM RO FOR DL11 LINE FILTER DELAY se
+SET UP A COUNTER FOR LINE FILTER DELAY ;RGO02
#5.R5
MOV
1RGO02

DEC

BNE

RS
34

sCOUNT IT DOMN...

1BRANCH IF NOT DONE

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y0S5.02 Mondey 15-Jul-85 14:23 Page 5-4

SEQ 0014

DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE
579

S80 001502
581 001506
582 001510
583 001514

005777
001410
004767
012767

001724
000025

001522

104405

000000

584

585
586
587
588

001556

104405

595 001564
596 001572
597 001574
598 0C1600
599
001606

600 001614
601
602
603

022777
001410
004767
012767

000010
002076

001670
000025

002010

001640

000025

PC,STATR

;GO SET UP ERROR INFO

MOV

176364

25,ERRTYP

;BR IF BOTH "RING” AND "REQ TO SEND " CLEARED

168800008000 00RE0REARRARRRERRARRERRALERAAAAEAREEIARAAELANIEISAS

HRDER$ ,BEGIN,NULL

1 "RING* OR “REQ TO SEND” FAILED TO CLEAR

1600808000 0000000R0000ERRARRRRAR0RERRAAALEEAELALALINIEININS

002102

DLTO7:

042777

MOV

176330

000010

608 001632
609 001636
610 001640
611 001644

005777
100410
004767
012767

002002

001652

104405

613 001660
614 001664
615 001666
616 001672

005777
001410
004767
012767

001700

104405

622 001706
623 001712
624 001720
625 001724

€10, 80LRCSR
QOLRCSR
13
PC,STATR
925,ERRTYP

002046

1s:

001574
000020

CHP

BEQ
JSR

92010,80LRCSR

2%
PC,STATR

925,ERRTYP

001546
000020

RRS0R0444440444884044844048

;SEC XMIT AND REC SET - DATA SET INT CLEAR
iBR IF YES
+GO SET UP ERROR INFO

160000000080 40800000480800408808888800880004400880848080000008044

;SEC XMIT OR SEC REC FAILED TO SET - DATA SET INT FAILED TO

1680080800 808000080008084808888888848808085400048088080000088804s

#10,80LRCSR

;TURN OFF SEC XMIT

2s:

8IC

«+ REQUEST FROM MRO FOR DL11 LINE FILTER DELAY ss

38:

MOV
DEC
BNE

#5.R5
RS
38

;SET UP A COUNTER FOR | TNE FILTER DELAY ;RG002
:RG002
;COUNT IT DOMN...
:RG0O02
:BRANCH IF NOT DONE

TST
BMI
JSR

SOLRCSR
43
PC,STATR

;:DID SEC XMIT GOING OFF SET DATA SET INT ?
:BR IF YES
;GO SET UP ERROR INFO

#20,ERRTYP

176234

MOV

000000

HRDER$ ,BEGIN,NULL

;4808000848000 0000404000088080400808000880880044804008008000000

4s:

001754

;DATA SET INT FAILED TO SET

100000480008 00 0000000000000

MOV

176300

002016

:SET SEC XMIT
;:DID DATA SET INT GET SET 27
sBR IF YES
;GO SET UP ERROR INFO

(AR SEEREASREEAERERRERSEAERASEEEEEEEA004EREA0000000000008

607

BIS
TST
BMI
JSR

HRDERS ,BEGIN,NULL

000005

618
619
620
621

JSR

BEQ

104405

12705
005305
001376

617

JARE ALL BITS NOW CLEAR 77

DLTO?

HRDERS ,BEGIN,NULL

604 001622
605 001626
606 001630

612

SOLRCSR

INT”
;TEST THAT “SEC XMIT” ASSERTS “SEC REC“ WHICH SETS "DATA SET ---

052777
005777
100410
004767
012767

CLEAR

TST

' ------------------------------------------------------------

589 001530
590 001536
591 001542
592 001544
593 001550
594

002132

;CLEARING SEC XMIT FAILED TO SET DATA SET INT

;4606080808000880088880488088084800808000800000000000000000000000

TST
BEQ
JSR

SDLRCSR
DLT10
PC,STATR

#20,ERRTYP

176206

MOV

000000

HRDERS$ ,BEGIN,NULL

;ALL BITS NOM CLEAR
:BR IF YES
;GO SET UP ERROR INFO

;6888400044400 084404000000 00000000 00000000 000000000000 00000000

;SEC XMIT,SEC REC, OR DATA SET INT FAILED TO CLEAR

jhsddddtdddsbdisbidisitdddis FYYTITITITT

TR IS IR ISR LA RS2 2 12 2t

;TEST THAT “DTR* ASSERTS “CAR DET*, “CLR TO SEND”, AND "DATA SET INT"
005077
052777
005777
100407

001726
001714

001720

DLT10:

CLR
BIS
TST

BMI

8DLRCSR
@2 ,80LRCSR
S8DLRCSR
1$

;CLR THE RCVR CSR
;SET DATA TERM READY
;0ID DATA SET INT SET 2?
;BR IF YES

DLBC DEC/X11 SYSTEM EXERCISER M MACRU Y05.02 Mondey 15-Jul-85 14:23 Page 5-5

SEQ 0015

DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE
JSR

004767
005067

001506

176150

CLR

001736

104405

000000

HRDERS ,BEGIN,NULL

629 001744
630 001752

022777
001407
004767
005067

030002

628

631 001754
632 001760
633
001764
AILED TO CLR
634 001772
635 002000
636 002004
637 002006
638 002012
639
002016

640
641
642
643
644

104405

042777
005777
100407
004767
005067
104405

001634

000000

005777
001407
004767
005067

001610

002042

104405

000000

;B8R IF YES

BEQ

;GO SET UP ERROR INFO

JSR

PC,STATR

T Y

ERRTYP

HRDER$ ,BEGIN,NULL

000000

2%:

BIC
TST
BMI
JSR

92 ,80LRCSR
SDLRCSR
33
PC,STATR

ERRTYP

HRDERS ,BEGIN,NULL
3%:

001402
176044

;DTR,CAR DET, OR CLR TO SEND FAILED TO SET OR DATA SET INT F

(A0 ASEASAARERRARAAAERARRERINAEARANAEEEIEESEEA0E00E0000000004s

CLR

000000

bbb

:TURN OFF DTR
;DATA SET INT SHOULD HAVE SET
;B8R IF IT DID
;GO SET UP ERROR INFO
L

L L L L LT

;DATA SET INT FAILED TO SET ON CLEARING DTR

10000000000 EEEE0RE00R00000808080448480444084040080088000044

TST

SOLRCSR

JSR

PC,STATR

BEQ

CLR

DLT11

ERRTYP

;ALL BITS NOW CLEAR 27

;BR IF YES

;GO SET UP ERROR INFO

;A0 00ASR 0SS0 RR0080080000408880000840484488888800088800048

HROERS ,BEGIN,NULL

000000

;CLEARING DTR FAILED TO CLEAR OTHER BITS

H 2884888888840 080880885888848880888884084048888888884880008088848
--

---------------------------------------------

001562
001554

052777
032777
001010
004767
012767

001346
000027

104405

000000’

042777
005777
001411
004767
012767

661 002142
662

000463

104405

001520
001312
000027

DLT11:

BIS
BIT
BNE
JSR
MOV

176006

€40, 80LRCSR
€40, 80LRCSR
1$
PC,.STATR
#27,ERRTYP

001524

:SET DATA SET I.E.
;:0ID IT SET 22
:BR IF YES
;GO SET UP ERROR INFO

0000kR
;804008 SS0ERSA000400400408040000000000000R000000000000000

HRDER$ ,BEGIN,NULL

1%:

;CAN'T SET DATA SET INTR.

;6868804600808804880400800888888800800800000000800000000000000000

8IC

TST
BEQ

JSR

MOV

175752

€40, BDLRCSR

;:CLEAR DATA SET I.E.

PC,STATR

;GO SET UP ERROR INFG

SOLRCSR
DLTi2

#27,.ERRTYP

;DID IT CLEAR 2?
:BR IF YES

;8080884084000 ARARA0AAS0LS0EE0RRRR

HRDERS ,BEGIN.NULL

000000

RSN

;CAN'T CLEAR DATA SET I.E.

DLT13

;SKIP NEXT TEST

;TEST THAT DATA SET INT CAN CAUSE A RCVR INTERRUPT WHEN ENABLED
005067
016700
012720
005001
052777

DLT12:

001512

175634

002246°
000040

ARRESS

;4806000000000 0A0RRRAERRR00RRRR0R 00000000000 00000000

663

668 002154
669 002160
670 002162

930002,80LRCSR;DTR,CLR TO SEND, CAR DET, SET AND DATA SET INT CLEAR ?

CMP

CLR

001640

1 "DTR” FAILED TO SET “DATA SET INT”

1060808000 000000000000000000R0RRRRR00RRRRRRREANAESAERRRRIISINISS

;TEST THAT DATA SET INTR ENAB CAN SET AND CLEAR

655 002106
656 002114
657 002120
658 002122
659 002126
660
002134

664
665
666 002144
667 002150

18:

001426
176070

002024
002030
0C2032
002036

645
646
647
648
649 002050
650 002056
651 002064
652 002066
653 002072
654
002100

001666

176122

000002

ERRTYP

10000000000000000000RERRttttttttittitttttitttiiititittitittitit

00146y

000000

;GO SET UP ERROR INFO

PC,STATR

626 001726
627 001732

001450

CLR
MOV
MOV
CLR
BIS

INTFLG
VECTOR,RO
2%,(RO)+
R1
#40,8DLRCSR

;INIT SOFTWARE INTR. FLAG
;GET BAS VECTOR ADDR.
;GO TO 2% ON DATA SET INTERRUPT

+INIT BREAK TIMER
:ENABLE DATA SET INTR.

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Mondey 15-Jul-85 14:23
DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE

:;l 351;2
1
2
002176
002202
673 002206
674 002212
675 002214
676 002216
677 002220
678 002224

052777
104407
104407
005767

000010 001442 :
000000°
000000’
001450

001023
005301
001367
004767 001214
005077 001410
679 002230 012767 000023

680

000422
042777
005167
000002
032777
001410
004767

688 002276 012767

689

0C2304

000040 001350 3%:
001142
175602

693

694 002312
695 002320
696 002326
697 002330
698 002334

002342

700 002350
701 002356
702 002364
703 002366

704 002372

705

sBR IF YES
;COUNT THE BREAK TIMER
;BR IF NO TIMEOUT
;GO SET UP ERROR INFO
;TURN OFF THE I.E. BIT

MOV

923 ,ERRTYP

HRDER$ ,BEGIN,NULL
P

T Ty T

;INTR SERVICE FAILED TO CLR DATA SET I.E.

;TEST THAT “BREAK” BIT CAN SET AND CLEAR

691

699

1SET SEC XMIT
; TEMPORARY RETURN TO MONITOR....
sTHEN CONTINUE AT NEXT INSTRUCTION.
;DID INTR OCCUR YET 7?7

sDATA SET INTR. FAILED TO OCCUR
HRDERS ,BEGIN,NULL
P R
L L PP
T
T
:GO TO NEXT TEST
DLT13
BR
;TURN OFF DATA SET I.E.
940, 80LRCSR
BIC
+SET SOFTWARE INTR. FLAG
INTFLG
COoM
sRETURN CONTROL TO OTHER GUY
RTI
;DID INTR SERVICE TURN OFF I.E. ?
940, 8DLRCSR
BIT
IF YES
:BR
DLT13
BEQ
;GC SET UP ERROR INFO
PC,STATR
JSR
T

104405 000000' 000000

690

SEQ 0016

T DL LT L L ettt shbbbbbbbbtbbbtbbtig
T TE TT
LI TTTY

20040 001364 2%:
001402

000023

923,ERRTYP

MOV

175650

002236 104405 000000‘ 000000

681 002244
682 002246
683 002254
684 002260
685 002262
686 002270
687 002272

€10,80LRCSR
BIS
BREAKS ,BEGIN
BREAKS ,BEGIN
INTFLG
TST
33
BNE
R1
DEC
1$
BNE
PC,STATR
JSR
SOLRCSR
CLR

Page 5-6

e RS
R
:SET BREAK BIT
SR

052777 000001 001324 DLT13: BIS
BIT
032777 000001 001316
BNE
001010
JSR
004767 001122
MOV
012767 000025 175544

104405 000000 000000
042777 000001 001266 1%:
032777 000001 001260
001410
004767 001064
012767

000025

175506

002400 104405 000000‘ 000000

#1,8DLXC
@1 ,80LXCSR
1s
PC,STATX
#25,ERRTYP

;:DID IT SET ?2?
;:BR IF YES
;GO SET UP ERROR INFO
L

e b L LI L L LSS Sl

;CAN'T SET BREAK BIT
b
T T T
T
;CLEAR THE BREAK BIT
#1,80LXCSR
BIC
:0ID IT CLEAR ?
#1,8DLXCSR
BIT
;BR IF YES
RESTRT
BEQ
;GO SET UP ERROR INFO
PC,.STATX
JSR

HRDER$ ,BEGIN,NULL

MOV

R L L L L LD

#25,ERRTYP

;804440808000 44E 44000000400 RRRR R R0 RERERRRR AR RRRERRRR AN

HRDERS$ ,BEGIN,NULL

;BREAK BIT WON'T CLEAR

E SR
SIS IRISR
LI TTTIR TR AR LA RS R L L L e 2t L FYITITTTT

S 222 S 2 2 2 22

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02

Mondey 15-Jul-85 14:23

Page 6

DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE
707

stsbdbdddbbbbbbbibiits

shdbdbdbbbibdibibinis

708

711 002406

RESTRT:

709
710

001242
001226
001216
175362
002674

CLR
CLR
CLR

SECTION TWO

XEND
8DLXCSR
SOLRCSR

716
717
718
719
720
721
722
723
724

002426
002432
002436
002440
002444
002450
002454
002460
002464

726
727
728
729
730
731
732
733
734
735
736

002474
002500
002504
002510
0C2514

005067
005077
005077
016700
012720
116710
005720
012720
116710
012703
012704
005067
005777
005777
012367
012467
004767
022703
001361

737 002516

104413

ENDITS ,BEGIN

738 002522

000752

712 002406

713 002412
714 002416
715 002422

725 002470

739
740
741

175354

002524
175342

003664 '

003674

001174

001152
001146
001204
001202
000436
003674

MOV
MOV
Move
TST

VECTOR,RO
ORINT, (RO«
BR1, (RO)
(RO)+

MOV
Move
DOAGIN: MOV
MOV
CLR
1%:

OXINT, (RO)+
BR1,(RO)
OLDTAB,R3
OMTAB, R4
RTRY

MOV

(R3)+,LDOUT

TST
TST

MOV

SDLRDBR
SDLRDBR

(R4)+,AMESS

JSR

PC,SEGX

BNE

CHP

;CLEAR END FLAGS
;CLEAR THE DL11 CONTROL REGS
+JUST IN CASE
;GET START VECTOR ADDRESS
:SET UP THE RCVR AND XMIT VECTORS

OMTAB,R3

DOAGIN

;POINT TO TABLE OF LOAD SUBR. POINTERS
;POINT TO TABLE OF MESSAGE POINTERS
;CLEAR RETRY FLAGS
;FLUSH RCVR INPUT BUFFER REG

;SET UP CORRECT LOAD BUF ADDRESS POINTER
:SET UP MESSAGE POINTER
;GO DO A SEGMENT
;:DONE ALL FOUR SEGMENTS 2?7
:BR IF NOT

;SIGNAL END OF ITERATION.
;MONITOR SHALL TEST END OF PASS

SEQ 0017

Page 7

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Monday 15-Jul-85 14:23

SEQ 0018

DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE

XFERS
FOR ALL 256. BYTE
ALL XMITTR INTRPTS. ------;THIS ROUTINE SERVICES ---------------------------------

;:z

‘ ---------------------

745

746 002524
;:;l 002530

105777
100403

XINT:

001114

002532 000004 000000' 002570°
749 002540 022767 004574’ 001104 1$:
750 002546 001405
751 002550 117777 001076 001070 2%:
752 002556 005267 001070

3s$:

753 002562

105767
001025
016767
017767
042777
105167

43 :
001061
001042 175274
001034 175270
000104 001024
00103C

762 002624

012767

000011

175254

768 002650 042777 000100 000766 5$:

;;S

ODLBUFI,OPTR
34
S0PTR, 8DLXDBR
OPTR

;OUTPUT 256. BYTES YET 77
;BR IF YES
;OUTPUT A CHARACTER
;POINT TO NEXT CHAR. IN BUFFER

-esssccco-

feeeemsemmemeececeesescessssssssssscessssscsssc-ssecese

; QUEUE UP TO CONTINUE AT 6% AND RTI

----------

1ST8
BNE
MOV
MOV
BIC
comMs

XEND+1
S$
DLXCSR,CSRA
SDLXCSR,ACSR
€104 ,8DLXCSR
XEND

MOV

011,.ERRTYP

;ANY FATAL RCVR. ERRORS PENDING ??
;BR IF YES - STOP XMITTING
:SAVE THE CSR ADDRESS
;SAVE THE CONTENTS OF THE CSR
;DISABLE XMTTR INTERRUPTS
;SET XMIT END FLAG

AEAR AR RS RS AR

6%:

bttt

SRR

444 040800400400 0004 00000444

;XMITTER FALSE INTERRUPT - FATAL ERROR
RE

CLR

SOLRCSR

;TURN OFF RCVR INTR.

BIC

#100,8DLXCSR

;DISABLE XMITTR. INTERRUPTS

EXIT$,BEGIN
XEND+1
1518
S$
BNE
EXIT$,BEGIN

;EXIT TO MONITOR. MODULE WAIT FOR INTERRUPT.
sANY FATAL RCVR. ERRORS PENDING ?7
;B8R IF YES
;EXIT TO MONITOR. MODULE WAIT FOR INTERRUPT.

BYTE XFERS
;THIS ROUTINE SERVICES RECEIVER INTERRUPTS FOR ALL 256. ssesassn
s oo
jereecccnssensassanesssceRseRrsesrasetseRsasRess

777

778 002674 105777 000740
;;9 002700 100403
0

CMP
BEQ
MOVB
INC

END$ ,BEGIN

000000°

104400 000000’
105767 000767
001370
104400 000000’

---------

‘ -------------------------------------------------------

;S48

765 002640 005077 000774

;.6’3 002656
771 002662
772 002666
gz 002670

PIRQ$,BEGIN,4$

HRDER$ ,BEGIN,NULL

764

104410

; QUEUE UP TO CONTINUE AT 4% AND RTI

002632 104405 000000' 000000

;:_6, 002644

----------

‘ ------------------------------------------------------

755 002570
756 002574
757 002576
758 002604
759 002612
;:g 002620
763

+XMIT READY SET 77
1BR IF YES

SDLXCSR
14

PIRQS$,BEGIN,6$

002562 000004 000000' 002662'
754

TST8
BMI

002702 000004 000000' 002754’

781 002710 005777 000726
?’:g 002714 100003

RINT:

1578
BMI

SDLRCSR
14

;RCVR DONE SET 27
;BR IF YES

oo nsans
sass
maos oo oS
escs
ssemammoe
cscs
e ssaens et
jeeeeeeeccescccc

PIRQS ,BEGIN, 3¢

1¢:

002716 000004 000000 003046'
784 002724 022767 005174’ 000716 2%:
785 002732 001405
786 002734 117777 000702 000706
”
;:Z gg‘;g 005267 000702

i’ST

BPL

S0LRDBR
2%

; QUEUE UP TO CONTINUE AT 3% AND RTI

;OVERRUN/PARITY/FRAMING ERRORS 2?
:BR IF NONE

----------------

' ------------------------------------------------

PIRQ$,BEGIN,S$

; QUEUE UP TO CONTINUE AT S$ AND RTI

.........
‘ ......................................................

cMpP
BEQ

MOVB
INC

#BUFEND, IPTR
74

SDLRDBR,BIPTR
IPTR

;INPUT BUFFER FULL ??
1BR IF YES

;READ THE DL INPUT BUFFER REG.
;POINT TO NEXT CHAR. POSITION

Page 7-1

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Monday 15-Jul-85 14:23

SEQ 0019

DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE
esesesemsssesesescsccecccesscssssssessssssssscsssseceessssscscos

789

790 002754 105767
791 002760 001025
792 002762 016767
793 002770 017767
794 002776 042777
m 003004 105167
797 003010
798

012767

000652 175110
000644 175104
000100 000634
000645
000011

..............

' ..................................................

3s:

000674

; QUEVE UP TO CONTINUE AT 6% AND RTI

PIRQ$,BEGIN, 6

002746 000004 000000’ 003134°

4%
DLRCSR,CSRA
S0OLRCSR,ACSR
©100,80LRCSR

XEND+1

coms

MOV

175070

#11,ERRTYP

HRDER$ ,BEGIN,NULL

800 003024 005077 000614
:g“l’ 003030 104410 000000’
803 003034 042777 000100 000576 4%:

799

SDLXCSR
CLR
END$ ,BEGIN

3; 003042 104400 000000°

EXIT$,BEGIN

5s:

1578

105767 000602
001370
016767 000560
017767 000552
017767 000546
042777 000100

175016
175012
175006
000534

BNE
MOV
MOV
MOV
BIC

813 003104 012767 000017

174774

MOV

806 003046
807 0C3052
808 003054
809 003062
810 003070
:ig 003076
814

815

816 003120 005077 000520
817 003124 105267 000530

820 003134 105767 000514
821 003140 001335

822 003142 104400 000000°

XEND

43
DLRCSR,CSRA
S8DLRCSR, ACSR
SOLRDBR,ASTAT
100, 8DLRCSR
@17, ,ERRTYP

;RECEIVER FALSE INTERRUPT - FATAL ERROR
T

T P

R R

;DISABLE XMITTR TOO
;
;:DISABLE RCVR INTERRUPTS

;EXIT TO MONITOR. MODULE WAIT FOR INTERRUPT.

;ANY FATAL XMITTR ERRORS PENDING 2?
:BR IF YES
;SAVE CSR ADDRESS
;SAVE CONTENTS OF CSR
;SAVE THE ERROR FLAGS
;:DISABLE RCVR INTR.
L

;AR

ARAR AR SRR RAARRRE44 4000808000440 R00000 0000000000804

;OVERRUN - PARITY - FRAMING ERROR

CLR
INCB

SDLXCSR
RTRY

;:DISABLE XMITTR TOO
:SET RETRY FLAG

TST8
BNE

XEND
&3

;ANY FATAL XMITTR ERRORS PENDING 2?
;:BR IF YES

EXIT$,BEGIN

6%:

#100,80LRCSR

HRDER$ ,BEGIN,NULL

003112 104405 000000' 000000

:{g 003130 104400 000000’

T L

T bt

T L

003016 104405 000000‘ 000000

BIC

sANY FATAL XMITTR ERROR PENDING
:BR IF YES
;SAVE THE RCVR. CSR ADDRESS
;SAVE CONTENTS OF CSR
sTURN OFF THE RCVR.
:SET FATAL RCVR ERROR FLAG

XEND

TSTB

BNE
MOV
MOV
BIC

EXIT$,BEGIN

;EXIT TO MONITOR. MODULE WAIT FOR INTERRUPT.

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02

Monday 15-Jul-85 14:23

Page 8

SEQ 0020

DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE

g;
826 003146
827 003150
828 003154
829 003160
830 003164

000240
004767
004777

003166
003172
832 003176
833 003202

104407
104407
005767
001402

835 003210
836 003214
837 003216
838 003222
839 003226
840 003234
841 003236
842 003240
843 003246
844 003250
845 003252

105767
001411
105067
105267
122767
001345

003254
847 003262
848 003264
:;3 003270

104403
000207
004767
000207

831 003166

004767
005002

834 003204 104400

846 003254

000406
022767
001406
005302
001345

;THIS ROUTINE CONTROLS THE EXECUTION OF EACH OF THE FOUR DATA PATTERNS
;D0 NOTHING FOR NOW
NOP
SEGX:
;GO CLEAR BUFFERS
PC,CLDLBF
JSR
14:
000320
SET UP PATTERN
;GO
T
PC,8LDOU
JSR
000524
OFF XMITTR AND RCVR
KICK
;G0
PC.KICKOF
JSR
000106
;INITIALIZE BREAK TIMER
R2
CLR
2%:
s TEMPORARY RETURN TO MONITOR....
BREAKS ,BEGIN
000000’
CONTINUE AT NEXT INSTRUCTION.
;THEN
BREAK$ ,BEGIN
000000°
ERRORS PENDING 2?7
FATAL
;ANY
XEND
TST
000452
:BR IF NOT
3
BEQ
;EXIT TO MONITOR. MODULE WAIT FOR INTERRUPT.
EXIT$,BEGIN
000000°
;RETRY FLAG SET 7?7
RTRY
TST8
38:
000444
:BR_IF NOT
43
BEQ
;:CLEAR THE FLAG
RTRY
CLRB
000436
ONE RETRY
;COUNT
RTRY+1
INCB
000433
THREE TIMES 27
;TRIED
#3,RTRY+1
CMPB
000003 000425
;BR IF NOT - TRY IT AGAIN
1s
BNE
;REPORT IT AND GO TO NEXT SEGMENT
S5
BR
;RECEIVED 256. CHARS. 2?7
®BUFEND, IPTR
CMP
005174' 000402 4%:
:BR IF YES
7%
BEQ
;DECREMENT BREAK COUNTER
R2
DEC
;BR IF NO TIMEOUT
2
BNE
:
5%:
CALL WITH COMMON HEADER
MESSAGE
sASCII
AMESS
,BEGIN,
MSGN$
000000’ 003706’
;GO TO NEXT SEGMENT
PC
RTS
6$:
;GO COMPARE IN/OUT DATA
PC,CHKDAT
JSR
7%:
000034
;GO TO NEXT SEGMENT
PC
RTS
;THIS ROUTINE KICKS OFF ALL 256. BYTE TRANSFERS

g;
853

854 003272
855 003300
856 003306
857 003314
:.'sbg 003322
:2

' ..............................................

012767
012767
052777
052777
000207

;POINT TO BEGINNING OF OUTPUT BUFFER
#DLBUFO,OPTR
004174’ 000352 KICKOF: MOV
;POINT TO BEGINNING OF INPUT BUFFER
PTR
®DLBUFI,I
MOV
004574' 000342
ON XMITTER
;TURN
,80LXCSR
104
BIS
000104 000330
ON RCVR.
:TURN
RCSR
#100,8DL
BIS
000316
000100
:RETURN TO CALLING SEGMENT
PC
RTS
:THIS ROUTINE CHECKS FOR AND REPORTS DATA COMPARE ERRORS
.......

z ..................................................

863 003324
864 003332
365 003340
866 003344
867 003350
868 003352
869 003354
870 003360
:;é 003362

042777
042777
012700
012701
122021
001004
022701
001373
000207

000100 000312 CHKDAT: BIC
B8IC
000100 000300
MOV
004174'
MOV
004574'
CMPB
1s:
BNE
CMP
34:
005174’
BNE
RTS

#100,8DLXCSR
100,8DLRCSR
9DLBUFO,RO
#0LBUFI,R1
(RO)+,(R1).
2%
9BUFEND,R1
14
PC

;DISABLE XMITTR INTR.
;DISABLE RCVR INTR.
;RO POINTS TO OUTPUT BUFFER
;R1 POINTS TO INPUT BUFFER
:COMPARE INPUT WITH OUTPUT
;BR IF NOT EQUAL
;END OF THE BUFFERS ??
:BR IF NOT
;RETURN TO CALLER

873 003364
874 003372
875 003376
876 003404

016767
114067
042767
010067

000250 174506 2%:
174510
177400 174502
174472

MOV
Move
BIC
MOV
Move

DLRCSR,CSRA
-(RO),ASB
©177400,ASB
RO, SBADR

:SAVE THE CSR ADDRESS
:SAVE THE SHOULD BE DATA
+ZERO HI BYTE
;SAVE THE SHOULD BE ADDRESS
;SAVE THE WAS DATA

862

877 003410

114167

174474

-(R1), AWAS

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Mondey 15-Jul-85 14:23 Pege 8-1
DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE

BIC
MOV

878 003414 042767 177400 174466
:;(9) 003422 010167 174456
881

003426

882

889

890 003440 016767 000174
891 003446 017767 000166
gg 003454 000207
894 003456 016767 000162
895 003464 017767 000154
::_6, 003472 000207
::g
900

909

012700 004174'
105020
112720 000377
022700 004574’
001372
000207

932

;POINT TO NEXT BYTE IN THE BUFFERS
;GO CHECK NEXT BYTE
;THESE ROUTINES SET UP THE ERROR INFORMATION FOR THE BASIC TESTS
TSTB

TSTB
BR

(RO)+

(R1)+
3

---------------

' ------------------------------------------------

:SAVE THE CSR ADDRESS
;SAVE THE CONTENTS OF THE CSR
{RETURN TO BASIC TESTS
;SAVE THE CSR ADDRESS
DLXCSR,CSRA
174414 STATX: MOV
:SAVE THE CONTENTS OF THE CSR
SDLXCSR,ACSR
MOV
174410
;RETURN TO THE BASIC TESTS
PC
RTS
;THIS ROUTINE IS USED TO CLEAR THE INPU1/OUTPUT BUFFERS

174432 STATR:
174426

MOV
MOV
RTS

DLRCSR,CSRA
S8DLRCSR,ACSR
PC

sPOINT RO TO BEGINNING OF BUFFERS
#DLBUFO,RO
CLDLBF: MOV
;CLEAR ONE WORD - UPDATE POINTER
(RO)«
CLR
1s:
;:DONE 256. BYTES ?7
OBUFEND, RO
CHMP
_IF NOT
1BR
1
BNE
TO CALLING SEGMENT
sRETURN
PC
RTS
;THIS ROUTINE LOADS THE OUTPUT BUFFER WITH A NULL-DEL-NULL PATTERN
...........

LDOUT1: MOV
CLRB
1$:
MOVB
CHMP
BNE
RTS

#0OLBUFO,RO
(RO)+
#377,(RO)+
#DLBUFI,RO
1$
PC

:SET UP POINTER
sMOV A NULL CHAR
:MOV A DELETE CHAR.
;BUFFER FULL 727
:BR _IF NOT

;RETURN TO CALLING SEGMENT

;THIS ROUTINE IS USED TO LOAD AN ASCENDING BINARY COUNT PATTERN

917

:gg

00 44
RAAA
RS EEAA00000000
AR REAS

‘ ......................................................

:ig
921 003534
922 003540
923 003542
924 003544
925 003550
926 003552
927 003554
:gg 003556

;DATA ERROR!!!

AAAS
ARER
AR RARRAARRRRRE
(RAEAAAARS

------

012700 004174'
005020
022700 005174’
001374
000207

920

DATERS$ ,BEGIN

' ------------------------------------------------

901 003474
902 003500
903 003502
904 003506
gz 003510
:;
910 003512
911 003516
912 003520
913 003524
914 003530
:{2 003532

;CLEAR OUT HI BYTE
;SAVE THE WAS ADDRESS

(SARARAREARAERESAERARAEARAARRRARREREREREEERRENENNRNE0E000000

104404 000000°

883 003432 105720
884 003434 105721
32 003436 000746
g;

9177400, AWAS
R1,WASADR

SEQ 0021

.......

' ......................................................

012700 004174’
005001
110120
022700 004574'
001402
105201
000772
000207

;SET UP POINTER
;USE R1 TO GENERATE THE PATTERN
;LOAD ONE CHAR.
R1,(RO)+
;BUFFER FULL 77?
#DLBUFI,RO
;BR IF YES
2%
:GENERATE NEXT CHAR.
R1
;GO MOVE IT
13
;RETURN TO CALLING SEGMENT
PC
;THIS ROUTINE IS USED TO LOAD THE DESCENDING BINARY COUNT PATTERN

LDOUT2: MOV
CLR
MovB
1%:
CMP
BEQ
INCB
BR
RTS
2¢:

#DLBUFO,RO
R1

ssmsessccccsaansasaanaann

jeccscseesesscassemsccssccscecssessesaamam

—

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Monday 15-Jul-85 14:23 Page 8-2
DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE

933 003560
934 003564
935 003570
936 003572
937 003576
938 003600
939 003602
:2 003604

012700 004174°
012701 000377
110120
022700 004574°
001402
105301
000772
000207

:g
944

945 003606
946 003612
947 003616
948 003620
949 003624
950 003626
951 003632
952 003634

;SET UP POINTER
9DLBUFO,RO
;START R1 AT 377
9377.R1
;LOAD ONE CHAR.
R1,(RO)+
;AT END OF THE BUFFER 77
#DLBUFI,RO
iBR IF YES
2%
;GENERATE NEXT CHAR.
R1
;GO MOVE IT
1$
;RETURN TO CALLING SEGMENT
PC
;THIS ROUTINE LOADS THE WORST CASE PATTERN

LDOUT3: MOV
MOV
MOVB
1%:
CMP
BEQ
DECB
BR
RTS
2%:

jeeeeeememessssssececcsssssssssssesessescsssssssssssssesoss

012700
012701
012120
022700
001404
022701
001767

000770

953 003636 000207

004174'
005176’

004574'

005276

LDOUT4: MOV
MOV
1%:
MOV
2%:
CMP
BEQ
CMP
BEQ

3$:

RTS

#DLBUFO, RO
QWCASE ,R1
(R1)+,(RO)+
9DLBUFI,RO
34
QMCASEE,R1
1

;SET UP POINTERS
;POINT TO MONITOR'S WORST CASE PATTERN
;LOAD ONE WORD
;BUFFER FULL 777
:BR IF YES
;END OF WORST CASE PATTERN 27
;GO RESET R1

;RETURN TO CALLING SEGMENT

2¢

SEQ 0022

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02

Mondey 15-Jul-85 14:23

DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE

Page 9

S BUFFERS
S,AND
BLE
,FLAGS ,MESSAGE
;VARIA

3552

' -------------------------------------

957

958 003640
959 003642
960 003644
gé 003646

000000
000000
000000
000000

DLRCSR: OPEN
DLRDBR: OPEN
DLXCSR: OPEN
DLXDBR: OPEN

963 003650
::; 003652
966 003654
967 003656
968 003660
:g: 003662
971 003664
972 003666
973 003670
974 003672

000000
000000

IPTR: OPEN
OPTR: OPEN
OPEN
XEND:
EPCTR: OPEN
OPEN
RTRY:
INTFLG: OPEN
LDTAB: LDOUT1
LoouT2
LDOUT3
LDOUT4

975 003674
976 003676
977 003700
::I’g 0C3702

000000
000000
000000

000000

003512’
003534’
003560’
003606°
003716'
003757'
004022°
004067’

MTAB:

LDOUT:

980 003704 000000

AMESS:

981 003706 003716'
982 003710 177777
983 003712 004125'
984 003714 177777
045
985 003716

116

104

105

123
125
103
101

105
105
105
102

DRPMS:
125 MSG1l:

114

055

116
114

125
040

122
104

124
045

105
000

003765
003770
003773
003776
004001
004004
004007

116
131
120
117
124
105
105
105

101
040
040
125
040
121
116
040

004015

124

105

003721

114

003727
003732

055
114

003751

003724

003735
003740
003743
003746
003754

986 003757

003762

004012

045

102

117

004020

045

000

004025
004030
004033

116
131
117

101
040

987 004022

045

102

127

MSG1
MSG2
MSG3
MSG4

OPEN

;CONTAINS ADDRESS OF RCVR CSR
;CONTAINS ADDRESS OF RCVR DBR
;CONTAINS ADDRESS OF XMITTR CSR
;:CONTAINS ADDRESS OF XMITTR DBR

;CONTAINS POINTER TO INPUT BUFFER
:CONTAINS POINTER TO OUTPUT BUFFER
;FATAL ERROR END FLAGS
;END OF PASS COUNTER
;RETRY FLAG AND COUNIER
;SOFTWARE INTR. FLAG USED BY BASIC TESTS
;POINTER TO 1ST LOAD BUFFER SUBR.
;POINTER TO 2ND LOAD BUFFER ROUTINE
;POINTER TO 3RD LOAD BUFFER ROUTINE
;POINTER TO 4TH LOAD BUFFER ROUTINE
;POINTER TO MESSAGE 1
:POINTER TO MESSAGE 2
;POINTER TO MESSAGE 3
;POINTER TO MESSAGE 4

;CONTAINS POINTER TO LOAD BUFFER SUBR.

;MESSAGE POINTERS
MSG1
s TERMINATOR
-3
;MESSAGE POINTER
MSGS
s TERMINATOR
-1
.ASCIZ /#NULL-DEL-NULL SEQUENCE ABORTEDs/

114

121
116
040
117

111 MSG2:
122

.ASCIZ /#BINARY UP COUNT SEQUENCE ABORTEDs/

125
103
116
123
125
103
101
122

104

111 MSG3:
122
104
116

.ASCIZ

/#BINARY DOWN COUNT SEQUENCE ABORTEDs/

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02

Monday 15-Jul-85 14:23

Page 9-1

SEQ 0024

DEC/X11 SYSTEM EXERSIZER MACRO DEFINITION MODULE
004036
004041
004044
004047
004052
004055
004060
004063

040
125
040
121
116
040
117
105

103
116
123
125
103
101
122
104

117
124
105
105
105
102
124
045

938 004067

045

127

117 MSGA:

004100
004103
004106
004111
004114
004117
004122

123
123
125
103
101
122
104

105
105
105
105
102
124
045

040
121
116
040
117
105
000

101

114

111

122
116
124

004066

004072
004075

000

122
040

123
103

106

989 004125

045

004133
004136

040
122

105
117

101
103
105
123
122
105
123

123
124
040
107
124
040
123
045

004130

0C4141
004144

004147
004152
004155
004160
004163
004166
004171

124

040
040

124
101

101 MSGS:

.ASCIZ /#MWORST CASE SEQUENCE ABORTEDs/

.ASCIZ /#FATAL ERROR IN STATIC REGISTER TESTSs/

122

111
122
111
105
124
124
000

.EVEN

;512 WORDS RESERVED FOR TWO 256. BYTE BUFFERS

....

’ ........................................

994

DLBUFO: .BLKB
DLBUFI: .BLKB
BUFEND: 0

995 004174
996 004574
:; 005174 000000
999

256.
256.

sRSVD FOR OUTPUT BUFFER
sRSVD FOR INPUT BUFFER
sMARK END OF BUFFER AREA

1000 005176 177776 000001 177775 WCASE:

.WORD

177776,1,177775,2,177773.4,177767.10

1001 005216 177757 000020 177737

.MORD

177757,20,177737,40,177677,100,177577,200

1002 005236 177377 000400 176777

.MORD

177377,400,176777,1000,175777,2000,173777,4000

1003 005256 167777 010000 157777

LMORD

167777,10000,157777,20000,137777,40000,77777,100000

005204
005212

000002
177767

177773
000010

000004

005224
005232

000040
177577

177677
000200

000100

005244
005252

001000
173777

175777
004000

002000

005264

020000

137777

040000

005272

1004 005276
1005

1006

077777

000001

100000

WCASEE :
.END

DLBC DEC/X11 SYSTEM EXERCISER M MACRO Y05.02 Monday 15-Jul-85 14:23 Pege 9-2
Sysbol teble

SEQ 0025

000102R
ACSR
ADDR 000006R
ADDR22= 001000
AMESS 003706R

CLKSP$= 104422
CONFIG O0000S6R
000100R
CSRA
DATCKS= 104411

ICONT 000036R
ICOUNT O0O00040R
IDNUM 000122R
INDPAR= 000040

OTOA$ = 104420
PARPRE= 002000
PASCNT 000034R
POPF1i= 000002

=%000006
R6
=%000007
R7
SBADR 000102R
003146R
SEGX

BEGIN 0O00000R
BITO = 000001
BIT1L = 000002
BIT10 = 002000
BIT11 = 004000
B8IT12 = 010000

DLRDBR
OLTO1
DLTO2
DLTO3
DLTO4
DLTOS

003642R
000334R
000374R
O000436R
O00SS6R
000744R

KTPRES= 000400
KTXTND= 040000
LDOUT 003704R
LDOUTL O003512R
LDOUTZ O003534R
LDOUT3 O003560R

POPSP = 005726
POPSP2= 022626
PRHMS$= 000002
PRTY = 000000
PRTYO = 000000
PRTY1 = 000040

SR1
SR2
SR3
SR4
START
STAT

DLT10 001706R
DLT11 002050R
DLT12 002144R
DLT1i3 002312R
DLXCSR 003644R
DLXDBR 003646R
DOAGIN O002450R
DRPMS 003712R
DVID1I O0O00014R
ECCMEM= 000100
ENDITS= 104413
END$ = 104410
EPCTR 003656R
ERRTYP 000106R
EXITS = 104400
GETPAS= 104415
GWBUF$= 104414
HRDCNT 000044R

MAP224= 104416
MODEM O001364R
MODNAM OO0O00OR
MODREV 000224R
MODSP 000224R
MSGN$ = 104403
MSGS$ = 104402
MSG$ = 104401
003716R
MSG1
003757R
MSG2
004022R
MSG3
004067R
MSGA
004125R
MSGS
003674R
MTAB
NCPUOP= 000020
NOAPTY= 000002
NULL = 000000
OPEN = 000000

DATERS= 104404
DLBUFI 004574R
DLBUFO 004174R
DLINIT 000260R
DLRCSR 003640R

APTPRE= 000200
000106R
ASB
ASTAT 000104R
AUTO = 000010
000110R
AWAS

DLTO6
DLTO7

BIT13 = 020000
BIT14 = 040000

BIT1S = 100000
8IT2 = 000004
BIT3 = 000010
BIT4 = 000020
BITS = 000040
BIT6 = 000100
BIT7 = 000200
BIT8 = 000400
BIT9 = 001000
BREAKS$= 104407
000012R
BR1
000013R
BR2
| BT0DS = 104421
BUFEND 005174R
CAPRES= 000004
CDATAS= 104412
CHKDAT 003324R
CKHNGS= 000001

HRDER$= 104405

| CLDLBF 003474R

HRDPAS

CLKPRE= 000001

. ABS.

000000

005276

Errors detected:

O001376R
O001S530R

000

001
O

O0000SOR

(PW,I,GBL,ABS,OVR)

(RW,I,LCL.REL,CON)

ss¢ Assembler statistics

Work
Work

file reads: 0
file writes: O

Size of work file: 13285 Words ( 52 Pages)
Size of core pool: 19402 Words ( 74 Pages)
Operating system: RSX-11M/PLUS (Under VAX/VMS)

Elapeed time: 00:01:36.98

‘OLB.08BJ,0LB.LST/CR/-SP=DDXCOM,DLB

INIT
INTFLG
INTR
IPTR
KICKOF

000030R
003662R
000120R
003650R
003272R

LDOUT4 003606R
LDTAB 003664R

OPTR

003652R

POPLSI= 020000
PDOP44 = 100000
PDP60 = 004000
PDP70 = 010000
PIRQS$ = 000004

PRTY2 = 000100
PRTY3 = 000140

PRTY4 = 000200
PRTYS = 000240
PRTY6 = 000300
PRTY7 = 000340
= 177776
PS
PSH = 177776
PUSH = 005746
PUSH2 = 024646
PHRFLG= 000002
QMON22= 000010
RANDS = 104417
RANNUM O000S4R
RESTRT 002406R
000056R
RES1
RES2 000060R
RN70 = 001000
RINT 002674R
RSTRT 000112R

RTRY

003660R

SOFCNT 000042R
SOFERS= 104406
SOFPAS 000046R
SPOINT 000032R
SPSIZ = 000040

STATR
STATX

000016R
000020R
000022R
000024R
000226R
000026R
O003440R
003456R

000062R
000064R
000066R
000070R
000072R
000074R
000076R
SYSCNT O000S2R
TRPOFD= 000023
USTACK= 000001
VECTOR OO00010R
WASADR O000104R
WCASE O00S176R
WCASEE 005276R
WOFR 000116R
WDTO 000114R
XEND 003654R
XFLAG OOO000SR

SVRO
SVR1
SVR2
SVR3
SVR4
SVRS
SVR6

XINT

002524R

CREATED BY

DLB

MACRO

ON 15-JUL-85 AT 14:23

PAGE 1

SEQ 0026

CREF

SYMBOL CROSS REFERENCE
SYMBOL

VALUE

REFERENCES

ACSR
ADDR
ADDR22
AMESS
APTPRE
ASB
ASTAT
AUTO
AWAS
BEGIN

000102 R
000006 R
= 001000
003706 R
= 000200
000106 R
000104 R
= 000010
000110 R
000000 R

04 -367

#4-367
#4-367
+6-727
04 -367
94-367
04-367
04 -367
#4-367
#4-367
5-447
5-484
5-515
5-566
5-839
5-705
7-783

000001
000002
002000
004000
010000
020000
040000
100000
000004
000010
000020
000040

8170
8IT1
B8IT10
8ITi1
B8IT12
BIT13
BITi4
BIT1S
BIT2
BITS
BITA
BITS

=
=
=
=
=
=
=
=
=
=
=
=

BIT8
BITY

= 000400
= 001000

8ITé
e1v?

BREAKS
BR1
BR2
BT0D¢

BUFEND

CAPRES
COATAS
CHKDAT
CKHNGS
CLOLBF
CLKPRE
CLKSP$
CONFIG
CSRA

DATCKS
CATERS
OLBUFI
OLBUFO

= 000100
= 000200

= 104407
000012 R
000013 R
= 104421

005174 R

= 000004
= 104412
003324 R
= 000001
003474 R
= 000001
= 104422
000056 R
000100 R

= 104411
= 104404
004574 R
004174 R

8-831
94-367
#4-367
94 -367
#4-367
#4-367
04-367
94-367
#4-367
#4-367
#4-367
#4-367
#4-367
94-367
#4-367
#4-367
04-367
#4-367
#4-367
#4-367
#4-367
7-784
#4-367
#4-367
8-848
#4-367
8-827
#4-367
04 -367
#4-367
04-367
#4-367
#4-367

7-749

8-854

vo02

47-793

«5-544
5-382

+7-809

+8-891

+8-895

+8-878
5-433
5-467
5-501
5-526
5-599
5-672
7-763

5-434
5-467
5-502
5-538
5-612
5-672

5-435
5-474
5-508
5-539
5-617
5-680

7-814

7-818

8-846

+5-545

+7-810

+5-527
5-422
5-453
5-485
5-515
5-571
5-644
6-737

7-804

7-788
8-834

7-766

5-446
5-476
5-510

5-633
5-699

7-780
8-831

7-769

5-408

5-467
5-494

5-515
6-717

5-515

5-672

+5-543

&7-757

27-792

»7-808

+8-873

+3-890

5-548
8-855
8-865

8-881

8-913
8-910

8-924
8-921

8-936
8-933

8-943
8-945

5-467
5-464

6-720

#8-863
#8-901

8-866
8-901

8-831

8-331

oLe

CREATED BY

MACRO

ON 15-JUL-85 AT 14:23

PAGE 2

SEQ 0027

CREF

SYMBOL CROSS REFERENCE

7-792

8-873
+5-385

DLT13

DLXCSR

003712

OvID1
ECCMEM
ENDITS
END$

000014
000100

EPCTR
ERRTYP

003656
000106

VDD

003646

8
>
8

DLXDBR
DOAGIN

104413
104410

EXITS
GETPAS
§
GWBUF
HRDCNT
HRDER#

104400
104415
104414

HRDPAS
ICONT
ICOUNT

000050 R
000036 R

INDPAR

7-810
05-418

5-419
S-430
S-450
S-481
5-555
S-581
S-614
5-641
5-657
S-661

+5-387

5-477
S-701
8-856

oLTO1
DLTO2
DLTO3
DLTO4
DLTOS
DLTO6
DLTO?
DLT10
DLTi1
DLT12

DVDVDDVDDDVDDDD

DLRDBR

104405

000122 R

+5-389

6-721
5-423
5-539
84 -367
04 -367
#4-367
04-367
S5-526
99-967
94-367
+5-523
+5-627
+«5-704
04-367
94-367

#4-367
#4-367
94-367
5-524
5-628
5-705
94-367
84 -367
84 -367
04-367
94 -367

5-397

5-532

5-589
5-629
5-671

7-794
8-891
5-400

5-418

5-535
5-590
5-634
5-678

7-803
09-958
5-527

5-495
5-543
5-595
5-635
5-682
7-808

5-546

5-503
5-561
5-608
5-649
6-714
7-811

5-511
5-567
5-622
5-655
7-778
8-864

6-725

7-786

5-441
5-536
7-759

5-448
5-694
7-768

5-396
5-528
5-580
5-624
5-670
7-793
8-890
5-399
99-959

1331 £3

#5-39%
+5-383
5-521
S-572
5-623
5-656

n
£~

000260 R
003640 R

DLINIT
DLRCSR

REFERENCES

VALVE

SYMBOL

vo02

05-429
95-440
95-460
05-491
5-561
95-589
#5-622

95-649

95-666
5-681
5-398
5-480
6-713

8-863

5-514
6-738
5-434
99-983

5-686
5-412
5-512
7-746
8-89%4
5-547

5-485

5-446

6-737
5-424
5-540

5-447

5-486

5-502

5-510

+5-421
+5-537
+5-632

45-570

+5-444

+5-483
+5-598
+5-679

+5-499
#5-611
+5-688

+5-507
25-616
+5-698

+7-762
7-769

5-422
5-538
5-633
7-763

7-801

+5-643
+7-813

5-445
5-571
5-644
7-814

8-834

oLe

CREATED BY

MACRO

ON 15-JUL-85 AT 14:23

PAGE 3
SEQ 0028

CREF

SYMBOL CROSS REFERENCE
SYMBOL

VALUVE

INTFLG

INIT

000030
003662

INTR
IPTR

000120
003650

KICKOF
KTPRES
KTXTND

LOOUT
LOOUT1

LDOUT2
LDOUT3
LDOUTS
LDTAB

MAP22$
MODEM
MODNAM

MODREV
MODSP
MSGN$

NOAPTY

003272
000400
040000
003704

003512
003534
003560
003606
003664
104416
001364
000000
000224
000224
104403

104402
104401
003716
003757
004022
004067
004125
003674
000020
000002
000000

000000

OPTR
OTOAS

PARPRE
PASCNT

PDPF11
PDPLSI
PDP44

00352
104420
002000
000034
020000
100000

PDP70

010000

POPSP2

005726
022626
000002

PIRQS

PRHMS$

voO2

REFERENCES
4-367
+5-460
99-969
04-367
7-784
8-829
04-367
04 -367
+6-726
938-910
#8-921

+5-666

5-673

+5-683

5-485

5-501

5-509

5-453
S5-584
5-654

5-484

5-599

5-680

5-612
5-689

5-508
5-617
5-699

4-367
4-367

4-367
4-367
9-961

4-367
4-367
-963

4-367
4-367
9-964

+5-478

+5-491

5-516

+5-530

+7-787

8-842

+8-855

09-963

5-446

5-454

5-475

99-980

8-933

#8-945
6-721
#4-367
5-542
94-367
#4-377
4-367
94-367

5-434
8-846

5-525
04-367
04-367
9-975

99-985

9-976
9-977
9-978
9-983
6-722
#4-367

#4-367
84 -367
5-524
5-628
5-705
4-367
4-367
4-367

9-959
9-980
99-964

9-966
7-749
#4-367
#4-367
#4-367
#4-367
24-367
84-367

04-367
#4-367
04-367
94-367
#4-367
04-367

7-748

7-753

7-780

7-783

7-788

oLB

CREATED BY

MACRO

ON 15-JUL-85 AT 14:23

PAGE 4

SEQ 0029

CREF

SYMBOL CR0OSS REFERENCE
SYMBOL
PRTY
PRTYOQ
PRTY1
PRTY2
PRTY3
PRTY4
PRTYS
PRTY6
PRTY?
PS

PSW
PUSH
PUSH2
PURFLG
QMON22
RAND$

RANNUM

RESTRT
RES1
RES2
RH70
RINT

RSTRT

RTRY
R6
R7

SBADR
SEGX
SOFCNT
SOFER$
SOFPAS

SPOINT
SPSIZ
SR1
SR2
SR3
SR4
START
STAT
STATR

STATX
SVRO
SVR1
SVR2
SVR3
SVR4
SVRS
SVR6
SYSCNT

TRPDFD

VALUE

vO02

REFERENCES
4-367
04-367
94-367
04-367
04-367
4-367
04-367
94-367
04-367
04-367
04-367
#4-367
04-367
84-367
#4-367
#4-367
04-367
4-367
94-367
#4-367
#4-367
6-716
04 -367
+6-723
#4-367
#4-367
#4-367
6-728
#4-367
#4-367
94-367
#4-367
#1-29
94-367
#4-367
#4-367
04-367
4-367
#4-367
5-420
5-597
5-677
5-431
4-367
#4-367
#4-367
#4-367
4 -367
94-367
#4-367
#4-367
#4-367

94-367

04-367

5-702

96-711

+7-817

8-835

+8-837

+5-547

+8-876

4-367
5-554
5-408

5-410

5-556

87-778

8-839

28-826

#5-382

5-498
5-610
5-687
5-443

4-367

5-520
5-626

5-534
5-631

5-564
5-637

5-569
5-542

5-582
5-652

5-472

5-482

5-697

5-703

€8-894

#4-367

4-367

#4-367

4-367

5-592
5-658

4-367

oL8

CREATED BY

MACRO

ON 15-JUL-85 AT 14:23

PAGE 5

SEQ 0030

CREF

SYMBOL CROSS REFERENCE
SYMBOL

USTACK
VECTOR

WASADR

WCASE
WDFR
WDTO
XEND

XFLAG

XINT

VALUE

= 000001
000010
000104
005176
005276
000116
000114

003654

002524

vo2

REFERENCES
4-367
4-367
4-367
4-367
4-367

4-367
4-367
4-367
4-367
4-367

94-367
#4-367
94-367
24-367
04-367
#4-367

4-367
4-367
4-367
4-367
4-367

5-461
+5-546

5-492
+«8-879

5-667

6-715

*6-712

7-755

+7-760

7-171

7-790

6-719

#7-746

04-367
94-367
94-367
04-367
04-367
94 -367
04-367
94-367
@4-367
8-946
8-950
84-367
04-367
99-966
24-367

4-367

99-1000
99-1004

4-367

4-367
4-367
4-367
4-367
4-367

04-367
4 -367
94-367
94 -367
#4-367

*7-795

7-806

7-820

8-832

oLB

CREATED BY

MACRO

ON 15-JUL-85 AT 14:23

PAGE 6

SEQ 0C31

CREF

MACRO CROSS REFERENCE

01-125
@1-223
01-247
91-283
€1-150
01-292
01-176
91-315
4-367
#1-325
1-213
5-540
21-204
#1-209
91-331
#1-158
91-274
#1-262
91-228
21-166

<87

5-515

5-548
4-367
4-367
4-367
5-424
7-766

8-881
4-367
4-367
4-367

6-737
4-367
7-769

5-538
5-639

7-814
#1-121
#1-145
#1-141
01-137
#1-278
#1-30
#1-192
€1-196
5-539
£1-200
#1-133
1-233
#1-217
#1-162
#1-129

#1-182

5-435
7-801

5-672

8-831

4-367

4-367
5-447

4-367
5-455

4-367
5-476

4-367
5-486

4-367
5-502

5-510

5-526

7-773

7-818

8-834

5-433
5-5711

5-453
5-594

5-484
5-612
5-699

5-485

5-501

5-654

328

BKMOD
BREAK
BTOD
CKDATA
CLKSP
DATACK
DATERR
DFSEVN

Ul:lfl

REFERENCES

-~ O©

MACRO NAME

voz2

4-367

5-423
8-846

5-434

5-446

5-454

5-475

7-748

7-753

7-780

7-783

7-788

5-509