Digital PDFs

AH-8623E-MC

January 1979

67 pages

Original

3.7MB

view download

OCR Version

3.1MB

view download

Document:	CZDQEE0 DQ11 MISC BCC TESTS JAN 1979 bw
Order Number:	AH-8623E-MC
Revision:	000
Pages:	67
Original Filename:	CZDQEE0__DQ11__MISC__BCC_TESTS__AH-8623E-MC__JAN_1979_bw.pdf

OCR Text

MISC & BCC TESTS

AH-8623E-MC

JAN 1

CZDQEEO

!fluflflflfl

FIiCHE 1 OF 1

MADE
IN USA

(ZDQE
MACY11 30A(1052)
28-JuL-78
C2DQEE.PN
25-JU.-78 15:28

13:43

PAGE 2

SEQ 0001

IDENTIFICATION

PRODUCTM

CODE
:

AC-8622E
-MC

PRODUCT

NAME
:

CZDQEEQ MISC

DATE:

JUNE

MAINTAINER:

BCC

TST

1978

DIAGNOSTIC GROUP

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 THE USE OR RELIABILITY OF
SOF TWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL OR TS
AFFILIATED COMPANIES.

(()

1974,

FOLLOWING ARE

DIGITAL
DEC

1978 BY DIGITAL EQUIPMENT

TRADEMARKS

PDP
DECUS

DIGITAL

UNIBUS
DECTAPE

CORPORATION

EQUIPMENT

CORPORATION:

MASSBUS

CZDQE
MACY11_30A(1052)
28-JuL-78
CZDQEE.P11
25-JUL-78 15:28
1.

13:43

PAGE 3

SEQ 0002

ABSTRACT
THE FUNCTION OF THE DQ11 DIAGNOSTICS ARE TO
VERIFY THAT THE OPTION OPERATES ACCORDiNG
TO SPECIFICATIONS.

CURRENTLY THERE ARE SEVEN OFF LINE DIAGNOSTICS THAT ARE
TO BE

RUN

IN SEQUENCE

INSURE

THAT

ERROR SHOULD OCCUR IT WILL BE DETECTED
AT

AN EARLY

STAGE AND

INSURING

THAT

DIAGNOSIS OF ERROR WILL BE IMMEDIATE TO PROBLEM
NOTE:
ADDITIONAL DIAGNOSTICS MAY BE ADDED IN THE
THE

1.
2.

4 .

5.
6.
4.

SEVEN DJAGNOSTICS ARE:

CZDQA [REV]
CZDQB [REV]

€ZDQC
€ZDQD
CZDQE
CZDQF
CZDQH

[REV]
[REV]
[REV]
[REV]
[REV]

BASIS R/W TEST #1
BASIC R/W TEST #2
BASIC NPR AND INTERUPT TEST
RECEIVER TRANSMITTER EXERCISER TEST
MISC. RX AND TX TESTS. PLUS BCC TESTS.
C(HARACTER DETECT TESTS,
(CHARACTER LENGTH AND INTERRUPT TESTS.

T HERE IS ALSO AN ONLINE TEST
1 . CZDQO [REV]
ONLINE TEST.

AND A PARAMETER

CZ2D0QG [REV]

REQUIREMENTS

2.1

FUTURE.

TO BE

DISCUSED LATER.

(ITEP OVERLAY)

INPUT PROGRAM IS AVAILABLE

DQ11

TRIAL PROGRAM

(PARAMETER

INPUT)

EQUIPMENT
ANY PDP11 FAMILY CPU (WITH MINIMUM 4K MEMORY)-W]TH
OR WITHOUT A HARDWARE SWIT(H REGISTER (LOC. 177570)

38?133 (OR TQUILIVALENT)
SYNC MODEM

2.c

(ONLY REQUIRED FOR ONLINE

TEST)

STORAGE
PROGRAM WILL

LOAD AND RUN

IN 4K OF MEMORY.
LOCATION 1400 THRU 1600 ARE ESPECJALLY TO

BE NOTED AND TO BE UNTOUCHED BY CPERATOR
AFTER DPQ11 TRIAL PROGRAM HAS BEEN EXECUTED.

OR AFTER THE ''AUTO SIZING'' HAS BEEN DONE.

LOADING PROCEEDURE

3.°

ME THOD
ALL

PROGRAMS ARE

[N ABSOLUTE

FORMAT

AND

({OQE
MACY1T 30A(1052) 2g§JUL‘78
JDQEE P
25-JuL-78
1
At

LOADED USING

13:43

THE

PAGE 4

ABSOLUTE

LOADER.

P
NV, [V
WVIWN
= NININ N
NNN

ABSOLUTE LOADER STARTING ADDRESS
MEMORY

SIZE

8k
12K
16K

20K

24K

28k
3.7

LOAD THE ADDRESS OF

3.1.2

THEN START

ABS.

SEQ 0003

| OADER

+500

(LOC.XxXX500)

STARTING PROCEEDURE

A.
8.

LOAD LOC. 200
SET SWR 70 ZERQ FOR '‘AUTO SIZING'' OR LEAVE

LEAVE SWR BIT 7=1 TO USE EXISTING PARAMETERS SET UP
BY DQ11 TRIAL PROGRAM OR A PREVIOUSLY RUN DQ11 DIAGNOSTIC

THAT USED THE "'AUTO SIZING''.
«x«*REFER TO SECTION 4.1 FOR SOF TWARE SWITCH REGISTER OPERATION
AND OPTIONS. #+x%
)
NOTE
: THE SOF TWARE SWITCH REGISTER IS LOCATED AT LOC.176
SOF TWARE DISPLAY REGISTER 1S LOCATED AT LOC.174
C.THEN START
THE

PROGRAM WILL

THIS WAS THE FIRST START UP OF

THE

TYPE

MAINDEC

FOLLOWING:

NAME

AND PROGRAM NAME

THE PROGRAM)

AND ALSC

1MAP OF DQi1 STATUS"'
400
160010
1402
152300
1404
160020
1406
150310

THE ABOVE IS ONLY AN EXAMPLE
'
THIS WOULD INDICATE THE STATUS

TABLE

STARTING

AT ADD.

1400 IN THE PROGRAM. THE STATUS TABLE MUST BE VERIFIED BY
USER IF AUTO SIZING IS DONE.
FOR INFGRMATION OF STATUS
TABLE SEE SECTION 8.4 FOR HELP.

THE

eeex[f THE SOFTWARE SWITCH REGISTER IS SEL ECTED THEN THE FOLLOWING
WILL BE TYPED AFTER THE PROGRAM IDENT] FIES TTSELF:
SWR=XXXXXX NEW=
(REFER TO SECTION 4.1 1F FOR OPERATOR'S OPTION)»e=«
NOTE:IF USING THE SOF TWARE SWITCH REGISTER WHEN A HARDWARE
SWITCH REGISTER IS AVAILABLE THE PROGRAM WILL NOT
TYPE

OUT

THE

TITLE.

CZDQE
MACY11 30A(1052)
28-JUL-78
CZDQEE.PN
25-JUL-78 15:28

13:43

PAGE 5

SEQ 0004

THE PROGRAM WILL TYPE 'R
ANC PROCEED TO RUN THE DIAGNOSTIC
1

CONTROL

SWITCH SETTINGS

THE DIAGNOSTIC

IS RUN ON A CPU WITHOUT A SWITCH

USER

THE

SAME

SWITCH REGISTER

SWITCH OPTIONS AS

THE

IS USED WHICH ALLOWS

HARDWARE

SWITCH REGISTER.

IF THE HARDWARE SWITCH REGISTER DOES NOT EXIST OR IF ONE DOES
AND IT CONTAINS ALL ONES (177777) THEN THE SOFTWARE SWITCH
REGISTER

(LOC.

176)

1S USED.

:
CONTROL
THIS PROGRAM ALSO SUPPORTMS THE DYNAMIC LOADING OF THE SOF TWARE
REGISTER (LOC. 176) FROM THE TTY. THIS CAN BE ACCOMPLISHED BY
DOING THE FOLLOWING:

1D)

TYPE

LOC.

CONTROL

G <*G>;

THIS WILL

ALLOW THE

THE

WILL

SOFTWARE

THEN TYPE:

SWR=XXXXXXNEW=

SWIT(H REGISTER.)

3 AFTER THE
OF

THE

'°'NEW='"' HAS BEEN TYPED
FOLLOWING AT THE TTY:

(XXXXXX

INTO

THE OCTAL

CONTENTS

THEN THE OPERATOR CAN DO ONE

IF A CONTROL U <*u>
BACK TO STEP 2.
SET:
SET:
SET:
SET:
SET:
SET:
SET:
SET:
EE}:

CHANGED.

IS DEPRESSED THEN

THE PROGRAM WILI

HALT ON ERROR
LOOP ON CURRENT TEST
INKIBIT ERROR PRINT 0OUT
INMIBIT TYPE OUT/BELL ON ERROR.
INHIBIT ITERATIONS
ESCAPE TO NEXT TEST
LOOP WITH CURRENT DATA
CATCH ERROR AND LOOP ON IT
USE PREVIOUS STATUS TABLE. CLR-DO AUTO SIZE.

SET:
SET:

03
02

SET:
SET: LOCK ON SELECTED TEST

SET: RESELECT DQ'1°'S DESIRED ACT].ct.

03]

T0D ENTER DATA

SWITCH

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

TTY

176 AT SELECTED POINTS WITHIN THE PROGRAM.

THE MACHINE

NOOVO=NWHWN

SET: RESTART PROGRAM AT SELECTED TEST

SEND YOU

CZOQE
MACY11_30A(1052)
28-JuL-78
CZDQEE.PN
25-JUL-78 15:28
4.1.2

13:43

PAGE 6

SEQ 0005

SWITCH REGISTER RESTRICTIONS

Sw 00

RESELECT DQ11°'S DESIRED ACTIVE.
PLEASE NOTE

THAT A MESSAGE

TYPED

OUT FOR SWITCH REGISTER BEING EQUAL TO DQ11°'S
ACTIVE. THIS MEANS IF THE SYSTEM HAS
FOUR DQ11S; BITS 00,01,02,03 WILL

BE SET IN LOC 'DQACTV''. USING THIS

SWITCH ALTERS THAT LOCATION; THEREFORE
IF FOUR DQ11S ARE IN THE SYSTEM
*«xDQ NOTx=x+ SET SWITCHS GREATER THAN

Sw 03 IN THE UP POSITION.

A FATAL ERROR.

THIS WOULD BE

DO NOT SELECT MORE ACTIVE

DQ11S THAN HAS BEEN GIVEN INFORMATION

ME THOD :

B:
C:
D:

ABOUT IN TRIAL PROGRAM,
LOAD ADDRESS 200

START WITH SWw 00=1
PROGRAM WILL TYPE MESSAGE
CONTINUE THE BINARY
NUMBER OF DQ1'S DESIRED ACTIVE

EXAMPLE:

1=1 DQ11;

3=2 DQ11;

7-3 DQ11;

17=4 DQ11

37=5 DQ11 ETC.

NUMBER (IF VALID) WwILL BE IN DATA LIGHTS (EXCLUDING 11/05,
CONTINUE WITH ANY OTHER SWITCH SETTINGS DESIRED.

Sw 01

IT IS STRONGLY SUGGESTED THAT

LEAST ONE PASS HAS BEEN MADE

BEFORE
THAT

THE

TRYING TO SELECT A TEST

IS NOT

IN THE ORDER OF

REASON BEING

THAT

SEQUENCE

THE

PROGRAM HAS TO CLEAR AREAS AND SET
UP PARAMETERS. ALSO WHEN A TEST IS
SELECTED ALWAYS START AT THE VERY
BEGINNING OF THAT TEST.

Sw 09

LOOP ON CURRENT DATA:

THIS SWITCH WILL ONLY WORK

[Ff

CALL ''SCOP1'’ IS IN THAT TEST.

THE REASON BEING THAT MOST TESTS
DEAL WITH BLOCKS OF DIFFERENT DATA

TO BE SENT OR RECEIVED ALL AT ONCE
THUS IN BLOCK DATA; ONE PATTERN CANN'T

SINGLED OUT.

SWITCH REGISTER PRIORITYS

L[]

[]

—

ERROR SWITCHES

4.1.%

SWw

SW
SW
SW
Sw

13
15
08
10

weevH
T (ERROR)

SCOPE

SWITCHES

DELETE PRINT OUT/BELL ON ERROR.

DELETE ERROR PRINTOUT.
HALT ON THE ERROR.
GOTO BEGINNING OF THE TEST.
GOTO NEXT TEST ON ERROR.
ROUTINE

SUPPORTS

<“G> OPERAT](ONw*2+

11/04,

11/34)

CZDQE
MACY11_30A(1052)
28-JuL-78
CZDQEE.P1
25-JUL-78 15:28

1.
2.
3.

13:43

SEQ 0006

Sw 09 (IF ENABLED BY '‘'SCOP1'")
SW 14
Sw 11

*++«SCOPE ROUTINE WILL
6.2

PAGE 7

SUPPORT <*G> OPERATION##ww

STARTING ADDRESS

STARTING ADDRESS IS AT 000200
THERE

FOR

ARE

THE

NOTE :

NO OTHER STARTING ADDRESSES

DQ11

DIAGNOSTICS PREVIOUSLY MENTIONED

_ADDRESS 000042 IS NON-ZERO

THE PROGRAM ASSUMES IT IS UNDER
ACT11 OR DDP CONTROL AND WILL ACT ACCORDINGLY

AFTER «ALL* AVAILABLE DQ11'S ARE TESTED
THE PROGRAM WILL RETURN TO 'DDPZ2’' OR "‘ACT-11"",

OPERATING PROCEDURE
WHEN PROGRAM IS INITIALLY
FOUR WILL BE PRINTED.

STARTED MESSAGES AS DESCRIBED

AND PROGRAM WILL BEGIN RUNNING

DIAGNOSTIC

5.2

IN SECTION

THE

PROGRAM AND/OR OPERATOR ACTION
THE

TYPICAL

2.
3.
4.

APPROACH SHOULD BE

HALT ON ERROR (VIA Sw 15-1)
WHEN EVER AN ERROR OCCURS

CLEAR SW 15
SET SW 14: (LOOP ON THIS TEST)
SET SW 13: (INHIBIT ERROR PRINT QUT)

THE TEST NUMBER AND PC WILL BE TYPED OUT AND
POSSIBILY AN ERROR MESSAGE (THIS DEPENDS ON THE TEST)
TO GIVE THE OPERATOR AN IDEA AS TO THE SOURCE OF THE
PROBLEM. IF IT IS NECESSARY TO KNOW MORE INFORMAT]ION

CONCERNING THE ERROR REPORT,;

LOOK IN THE LISTING

FOR THAT TEST NUMBER WHICH WAS TYPED QUT
AND THEN NOTE THE PC OF THE ERROR REPORT
THIS WAY THE EXACT FUNCTIONING OF THE TEST

CAN BE

INTERPEDITED

ERRORS
AS DESCRIBED PREVIOUSLY THERE WILL ALWAY B
A TEST NUMBER AND PC TYPED OUT AT THE TIME OF

ERROR (PROVIDING SW 13-0 AND Sw 12=0).

IN MOST CASES ADDIT!OMAL

INFORMATION WILL BE SUPPLIED THE THE ERROR MESSAGE
?gégg IS TO GIVE THE OPERATOR AN INDICATION OF T"HE

t.c

ERROR RECOVERY

CZDQE
MACY11_30A(1052)
28-JuL-78
CZDQEE.P1N
25-JUL-78 15:28

13:43

PAGE 8

SEQ 0007

[F FOR _SOME REASON THE DQ11 SHOULD
"HANG THE BUS'' (GAIN CONTROL OF BUS SO THAT
CONSOLE MANUAL FUNCTIONS ARE INHIBITED) AN INIT
OR POWER DOWN/UP IS NECESSARY FOR OPERATOR
TO REGAIN CONTROL OF

CPU.

[F THIS SHOULD HAPPEN. LOOK IN LOCATION
"TSTNO'' (ADDRESS 1226)FOR THE NUMBER OF THE

MEJQEOQLMING AT

THE TIME OF

THE

TEST

CATASTROPHIC

THAT

IN THIS WAY THE OPERATOR WILL HAVE AN IDEA AS T0O
WHAT THE DQ11 WAS DOING AT THE TIME OF THE ERROR.

€.3

+«x*HALT RECOVERY WHEN USING SOF TWARE
IF

THE
THE

THE

SOFTWARE

SWI!TCH REGISTER IS

NEW-

(REFFR

RESTRICTIONS

7.1

STARTING RESTRICTIONS

SEE
7.2

TO BE

CHANGED AFTER A HALT

TO SECTION 4.1

FOR OPERATOR OPTION)

THE OPERATOR IS REQU.RED
FOLLOWING WILL BE TYPED:

SWR=XXXXXX

SECTION &.

SWITCH REGISTER®*:
#«

TYPE

A <~G> BEFORE

DEPRESSING CONTINUE.

(PLEASE)

OPERATING RESTRICTIONS

DQ11

TRIAL PROGRAM MUST BE RUN PRIOR TO THE

FIRST AND ONLY

NOTE :

THE

FIRST

RUNNING OF

IF NO PROGRAM OTHER THAN

ANY DQ11

DIAGNOSTIC

DQ11 DIAGNOSTIC WAS LOADED AFTER DQ11 TRIAL OR
[f CORE MEMORY HAS NOT BEEN CHANGED;OR IF THERE
IS NO DQ171 CONFIGURATION CHANGES; THE
DQ11 TRIAL PROGRAM NEED NEVER BE RUN AGAIN.

HOWEVER IF ANY OF THE ABOVE HAVE BEEN VIOLATED
THE DQ11 TRIAL PROGRAM MUST BE RUN AGAIN
BEFORE RUNNING THE DIAGNOSTICS

NOTE: AN ALTERNATIVE TO THE ABOVE
THE "'AUTO SIZING'' WHEN PROGRAM IS
WITH SW07=0.

MISCELLANEOUS

8.1

EXECUTION TIME

8.2

PASS COMPLETE

IS ATTEMPTING
INITIALLY STARTED

WHEN THE DIAGNOSTIC HAS COMPLETED
A PASS THE FOLLOWING |S AN EXAMPLE
OF THE PRINT OUT TO BE EXPECTED.

END PASS A(-8622E-MC (SR:
NOTE :

160000 VEC:

300 PASSES: 0000C1 ERROKS: 000000

THE NUMBERS FOR (SR AND VE( ARE
NOT NECESSARILY THE VALUES FOR THE

DEVICE

CZDQE
MACY11 _30A(1052)
28-JUL-78
CZDQEE.P1
25-JuUL~78 15:28

13:43

PAGE 9

SEQ 0008

THEY ARE ONLY FOR THIS EXAMPLE.

8.3

TST1

(MIN]I MONITOR)

THE VERY FIRST "TEST'' (TST1)
IS *NOT+ A TEST OF THE DQ11 HARDWARE
IT IS A MINI-MONITOR USED TO CYCLE DQ11
SYSTEM THROUGH THE DIAGNOSTIC.
REMEMBER:

IS NOT A TEST OF

DQ11

HARDWARE..!!'!!!

KEY LOCATIONS

RETURN

(1214)

(1216)

TSTNO

(1226)

RUN

(1304)

CONTAINS THE ADDRESS WHERE PROGRAM WILL

RETURN WHEN

JTERATION COUNT

IS REACHED

OR IF LOOP ON TEST IS ASSERTED.
CONTAINS THE ADDRESS OF THE NEXT TEST
TO BE PEFORMED.

CONTAINS THE NUMBER OF THE TEST NOW
BEING PEFORMED.
THE BIT IN ‘RUN'' ALWAYS POINTS ONE
PAST

THE DQ11

CURRENTLY BEING

TESTED.

:
EXAMPLE
(RUN) 1304/0000000001000000
MEANS THAT DQ11 NO.0OS IS THE DQ11

DQCROO-DQCR17
DGSTGO-DQST17
(1400)=-(1476)

THESE LOCATIONS CONTAIN
NEEDED TO TEST UP TO 16

SEQUENTJALY.

EACH BIT SET
THAT

THE

THE INFORMATION
(DECIMAL) DQ11S

THEY CONTAIN THE

CONCERNING

OF EACH DQ11.

DOACTV (1500)

NOW

RUNNING.

AND STATUS

THE

CSR,VECTOR

CONFJGURATION

IN THIS LOCATION INDICATES

ASSOCIATED

DQ11

WILL

TESTED

IN TURN.
:
EXAMPLE
(DQACTV) 1500/0000000000011111
MEANS THAT DQ11 NO. 00,01,02.03,04
WwILL BE TESTED.
:
EXAMPLE

DQSTAT

(1510)

CONTAINS THE STATUS OF

D
R
[ I

e
4
—

OODODDOD®

——¢

8IT

CURRENT DQ11 UNDER TEST.

)

(150€)

(DQACTV) 1500/0000000000010001
MEANS THAT DQ11 NO. 00,04
WILL BE TESTED.
(ONTAINS THE RECEIVER CSR OF THE

OO —=NOWSHWN

DACSR

[SEUYNIDY
SHY
Yy -

8.4

TST1

IN THE

DQ11 UNDER TEST.
SET:
SET:
SET:
SET:
SET:
SET:
SET:

THE CURRENT

TWO SYNC CHARS/ONE SYNC CHAR
TEST JUMPER INSTALLED/NOT INSTALLED
88 OPTION INSTALLED/NOT INSTALLED
BA OPTION I1'STALLED/NOT [NSTALLED
ACTIVE ON FIRST NON-SYNC/ACTIVE AFTER NO.
AB OPTJON iNSTALLCZN/NOT INSTALLED
0DD VRC/EVEN VRC

SYNC

CZ0QE

MACY11

CZDQEE.PIN

30A(1052)

28-JUL-78

13:43

2S~JUL-78 15:28

BIT 00-08

PAGE 10

SEQ 0009

VECTOR "A’" OF DEVICE

8.5

vee METHDD OF AUTO SIZING wee

8.5.7

FINDING THE CONTROL STATUS REGISTER.
WHEN LOOKING FOR THE
THAY

WHEN A

(SR

IS FOUND

IS NECESSARY TO TAKE

THAT

CARE

INDEED A DQ11.

THAT

[S THE METHOD OF MY MADNESS FOR THIS ROUTINE.

AN ATTEMPT TO (LEAR THE MISC. REGISTER IS TRIED
IF A TIME-OUT TRAP OCCURES POINTERS ARE UPDATED
AND ATTEMPTED AGAIN. IF NO TIME-QUT. THE RECEIVER "'ACTIVE BITM'' (BIT 12)

IS SET AND A «(COMPARE+* FOR BOTH SYNC1 AND SYNC 2 IS DONE

AT THE MISC. REGISTER. IF THEY ARE THERE
A DQ11. THE INFORMATION IS STORED AWAY.

8.5.2

ONE

SINCE

TOO MUCH HARDWARE MUST BE

CHARS.

NOTE:

ONE

SYNC

TWO.

THE

TURNED ON TO SENSE THE
PROGRAM ASSUMES

THIS ASSUMPTION MAY BE

BY AL TERING BIT 15

ALTERED

IN APPRIOATE DQSTXX:

TWO

SYNC

AFTER AUTO SIZING

LOCATION.

"BB'' OPTION INSTALLED?
TO SENSE FOR

THE 'BB'' OPTION THE PROGRAM SELECTS

(HARACTER DET.

ANY ONE OR COMBINATION OF

IS ASSUMED TO EXIST.

8.5.4

SYNC BIT OR TWO?

PRESENTS OF

8.5.3

THIS

LOADS

BITS ARE

SET

IN ALL

1°S;

THE

THE BB OPTION

"AB"° OPTION INSTALLED?
TO SENSE FOR THE '‘AB"' OPTION THE PROGRAM SELECTS THE
POLYNOMIAL REGISTER AND WRITES ALL 1°'S INTO IT; IF ANY
%E%S$OBINATIW OF BITS ARE SET THE AB OPTION IS ASSUMED

8.5.5

'BA"" OPTION INSTALLED?
TO SENSE FOR "BA'" OPTION REQUEST TO SEND AND DATA TERMINAL
READY ARE SET. IF EITHER ONE OR BOTH ARE SET THE PROGRAM

ASSUMES

€.5.6

THE

JUMPER ON END OF
THE

SEND

(ABLE?

PROGRAM (HECKS

«**NOTE:(ZDOE ONLY®#w

TO SEE

AND CARRIER ARE

TEST JUMPER

8.5.7

BA OPTION EXISTES

IS ON THE

SET;

END OF

EITHER OR BOTH CLEAR

SO THE FROGRAM ASSUMES

THE

(ABLE.

ACTIVE ON FIRST NON-SYN(?
SINCE TOO MUCH HARDWARE MUST BE TURNED ON TO SENSE FOR
WHEN THE DQ11 GUES ACTIVE THE PROGRAM ASSUMES ‘‘ACTIVE

ON FIRST NON=SYNC''. NOTE: THIS CAN BE CHANGED BY ALTERING
BIT 11 IN THE APPRIOATE DGSTXX: AFTER AUTC SIZING

CZDQE
MACY11 30A(1052)
28-JuL-78
CZDQEE.PNN
25-JUL-78 15:28

8.5.8

13:43

PAGE

SET FOR ODD UR EVEN PARITY?
AS ABOVE TOO MUCH HARDWARE IS NEED TO SENSE WHICH PARITY
WAS SELECTED.SO THE PROGRAM ASSEMES ODD PARITY.

NOTE:
ATE

8.5.9

THIS CAN BE

DQSTXX:

FINDING

THE

CHANGED BY ALTERING BIT 9 IN APPRIO-

LOCATION.

AFTER AUTO SIZING

VECTOR.

THE PROGRAM SETS 'PRIMARY DONE'',’‘SECONDAY DONE'‘, AND '‘INTERUPT ENABLE''
AND LOOKS FOR AN INTERUPT. IF IT INTERUPTS IT IS PICKED

UP AND STORED AWAY. IF NO INTERUPT OCCURES THE PROGRAM
ASSUMES VECTOR =300. THIS PROBLEM WILL BE FIXED IN ONE
OF THE DIAGNOSTICS AND ~AUTO SIZING* SHOULD BE REDONE 70
GET THE CORRECT VECTOR.

PROGRAM DESCRIPTION

CONTAINED WITHIN LISTING

10.

LISTING
FOLLOWING

SEQ 0010

CZDQE
MACY11_30A(1052)
28-JuL-78
CZDQEE.P11
25-JuL=-7 8 15:28

13:43

PAGE 12

SEQ 001

.ENABLE AMA

;CZDQEE0/<377>/ MISC & BCC TST
:COPYRIGHT 1975, DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 01754
;REVISED 16-DEC~-76 BY
R. BLACK
.
A) SUPPORTS SOFTUARE SWITCH REGISTER
;
B)ggPPOZIS THE DYNAMIC LOADING OF THE SOFTWARE SWITCH REGISTER
:
<G>,
;STARTING PROCEDURE
;LOAD PROGRAM
;LOAD ADDRESS 000200
;PRESS START
;PROGRAM WILL TYPE ‘''CZDQEEQ/<377>/ MISC & BCC TST"’
sPROGRAM WILL TYPE ‘R’ TO INDICATE THAT TESTING HAS STARTED
;AT THE END OF A PASS, PROGRAM WILL TYPE PASS COMPLETE MESSAGE

JAND THEN RESUME TESTING

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

:=1,HALT ON ERROR
;=1,LO0P ON CURRENT TEST
;=1,INHIBIT ERROR TYPEOUT
;=1,DELETE TYPEOUT/BELL ON ERROR.
;=1,INHIBIT ITERATIONS
;=1.,ESCAPE TO NEXT TEST ON ERROR

SW08=400
SW06=100
SW05=40
SW04=20
Sw03=10

;-1,L00P ON ERROR

SwW09=1000

SwW02=¢4

Sw01=2
SW00=1

;=1,L00P WITH CURRENT DATA

sLOCK ON TEST SELECT

;RESTART PROGRAM AT SELECTED TEST
SJRESELECT DQ11 DESIRED ACTIVE
sNOTE:

THIS MUST NOT EXCEED ORIGINAL

COUNT

CZDQE
MACY11_30A(1052)
28-JuL~78
CZDQEE.PN
25-JuL-78
115:28

M1
13:43 PAGE 13
GENERAL DEF INATIONS AND EQUIVALENCIES

SEQ 0012

;REGISTER DEFINITIONS
RO=20
R1=%1
R2=%2

s GENERAL REGISTER
sGENERAL REGISTER
sGENERAL REGISTER

R3=23

¢GENERAL REGISTER

R5=X5
SP=%6

¢GENERAL REGISTER
:PROCESSOR STACK POINTER

R4=24

sGENERAL REGISTER

PC=%7

;PROGRAM COUNTER

sLOCATION EQUIVALENCIES
177570
177570
177776
001200

DSWR=_
177570
DLIGHTS=177570

.HARDWARE SWITCH REGISTER LOC.
;HARDWARE DISPLAY REGISTER LOC.

STACK=1200

;START OF PROCESSOR STACK

PS=177776

;PROCESSOR STATUS WORD

s INSTRUCTION DEFINITIONS
PUSH1SP=5746

sDECREMENT PROCESSOR STACK

PUSHR0=10046
POPRO=12600
PUSH2SP=24646
POP2SP=22626
.EQUIV
EMT_HLT

;SAVE RO ON STACK
JRESTORE RO FROM STACK
;DECREMENT STACK TWICE
; INCREMENT STACK TWICE
;BASIC DEFINITION OF ERROR CALL

—
el ——
—

ODD®

———

POP1SP=5726

Sy
B P

005746
005726
010046
012600
024646
022626

100000
40000

20000
10000

O =MW
vennn
—S ) &N 2D

BIT11=4000
81710=2000
8179=1000

;DQ11 OPTIONAL DEFINITIONS
002000
004000
010000
020000
040000

ABB]T=2000

ACTBIT-4000

BABIT=10000
88811=20000
JUMBIT=40000

1 WORD

s INCREMENT PROCESSOR STACK 1

WORD

CZDQE
MACY11_30A(1052)
2B8-JuL-78
CZDQEE.PN
25-JUL~78 15:28
615
616

001000
100000

2}8

N1
13:43 PAGE 14
GENERAL DEFINATIONS AND EQUIVALENCIES
obDBIT=1000
SYNBIT=100000
;DQ171

SECONDARY REGISTER DEF INATIONS

621
622
623
624
625
626
627
gsg

000000
000001
000002
000003
000004
000005
000006
000007

RXBA.P=0
RXWC.P=1
TXBA.P=2
TXWC.P=3
RXBA.S=4
RXWC.S=5
TXBA. §5=6
TXWC.S=7

sRECEIVER BUS ADDRESS PRIMARY.
;RECEIVER WORD COUNT PRIMARY.
sTRANSMITTER BUS ADDRESS PRIMARY.
:TRANSMITTER BUS ADDRESS PRIMARY.
sRECEIVER BUS ADDRESS SECONDARY.
;RECEIVER WORD COUNT SECONDARY,
:TRANSMITTER BUS ADDRESS SECONDARY.
;TRANSMITTER WORD COUNT SECONDARY.

630
631
632
633
634
635
636
g%g

000017
0000
000012
000013
000014
000015
000016
000017

CHARDT=10
SYNC.=11
MISC.=12
TX.MUX=13
SEQ.=14
RX.BCC=15
TX.BCC=16
POLY.=17

sCHARACTER DETECT REGISTER.
:SYNC REGISTER.
sMISCELLANEOUS REGISTER.
s TRANSMITTER MUX REGISTER.
s SEQUENCE REGISTER.
sRECEIVER BCC REGISTER.
;TRANSMITTER BCC REGISTER.
sPOLYNOMIAL REGISTER.

SEQ 0013

CZDQE
MACY11_30A(1052)
28-JuL-78
CZDQEE.P11
25-JUL-78 15:28

13:43

PAGE 15

SEQ 0014

TRAPCATCHER FOR UNEXPECTED INTERUPTS

s TRAPCATCAER FOR ILLEGAL INTERRUPTS

.=0

;STAOARD INTERRUPT VECTORS
.=24

PFAIL

;POWER FAIL HANDLER

JHLT
340
. TRPSRV
340

;ERROR HAWDLER
sSERVICE AT LEVEL 7
;GENERAL HANDLER D]ISPAT(CH SERVICE
;SERVICE AT LEVEL 7

LOGICAL

sACT HOOKS

340

;SERVICE AT LEVEL 7

.WORD 0
:THIS ROUTINE TRIES TO FORCE THE RECEIVER TO INTERUPT
TO

ITS

VECTOR WHERE

IT WILL

PICK UP

THE

STATUS LOCATION

;FOR ITS NEW PC; AND PICK UP AN 10T INSTRUCTION FOR TS
NEW PS.

WHEN THE NEW PC

IS FETCHED AN 10T INSTRUCTION IS

IngAKE

THE

STACK AND US

JEXECUTED,
000056
010120
012721
022021
020127
101771

012737

013737

TMMP

001000

tTMMP
B8LOS

000020

001244

’%:

177776

000340
000300

000007

VECMAP:
1%:
MOV
MOV

000004

000146
001500
001244

TRAPPING TO LOCATION 20 WHERE A ROUTINE IS EXECUTED

ROR

TEMP

B(C(

MOVB
TST
BR

BIS

5%:

DQACTV, /EMP1

PS
(R2)+

#340,a-2(R2)
RO
P

#300, (R2)
(R2)+
2%

(SP) . (R2)

BIC

#7,(R2)

MOV

#3%,(SP)

RTS

(MP

000142

(RO)+,(R1)+

R1.#1000
18

#.S a0

MOV
INCB
8NE

3%:

R1,(RO)+
#6,(R1)+

MOV

MOV
(LR
TST

177776

FROM THE

RTI

(SP)+,(SP)+

IT AS

THE

VECTOR ADDRESS

JSTART FILLING THE VECTOR AREA
UITH .42 10T (&)

UPDATE THE POINTERS

:IS ALL FLOATING VECTOR AREA DONE
;BR IF NOT ALL DONE
;SET FOR IOT TRAP BY DQ11

;GET THE ACTIVE DQ11

;ARE YOU ACTIVE..

;IF CARRY CLEAR.. NO MORE DQ11S

;CLEAR PS
JPUT POINTER TO STATUS TABLE

;TRY AND SET PRI/SEC DOME AND IE
DELAV ........
DELAY

~0 INTERUPT ASSUME 300 FIX IN TEST C
JUPDATE POINTERS
:GO DO IT AGAIN

JENTERD

]0OT TRAP BY DQ11

. CLEAR UNMANTED BITS

;POP I0T JUNK OFF

STACK

JSET RETURN PC ON STACK

;GG HOME
.

JALL SIZING IS DONE

:';;ZSOFTUARE SWITCH REGISTERx*««
DISPREG:
SWREG:
;PROGRAM START

000200

.~200

0
0

;SOF TWARE DISPLAY REGISTER
;SOFTWARE SWITCH REGISTER

CZDQE
MACY11 30A(1052)
28-JuUL-78
25-JuL~-78 15:28
CZDQEE. P11

696
697
698
699

000200

000137
000220
012792
005022
022702

00151¢

JMP

.=220

001400

CSRMAP:

;GO TO START OF PROGRAM

#14600,R2

sCLEAR ALL STATUS TABLE
;DO CLEAR
;ALL TABLE DONE
;BR_IF MORE TO GO

(R2)+

#1212.R2

001504

DONUM
#1400 ,R2

#160000,R1

258, N6
#12.5(R1)
6(R1)
#10000, (R1)

0000G4
000005

ggoooo.e(n1>

000006

R1,(R2)+

100000

000010

177777
000006

020000
000017
177777
000006

#SYNBIT, (R2)
(R1)
#10,5(R1)
#-1,6(R1)

000005
000006

6(R1)

#BBBIT*§?>
#17.5(R

000005
000006

#-1.6(R1)

6(21)

#ABBIT,

(R2)

#1400.2(R1)

000002
000002

c1goo“2(R1)

#BABIT, (R2)
#32000.2(R1)

000002

#JUMBIT, (R2)
#ACTBIT, (R2)

#ODDBIT.(RZ)
(R2)+
(R1)

2(R1)
2(R1)

4((RY)

2%:

6(R1)
DONLM

#10.R
l164000 R1

DONUM,R1

3%:

SEQ 0015

.START

001512

010000
030000

13:43
PAGE 16
ROUTINES USED FOR AUTO SIZING.

R1,SAVNUM

DeA(TY
DQA(TV

;SET NUMBER OF DQ11S TO O
sSET TABLE POINTER
;GET FIRST FLOATING ADDRESS
;SET FOR TIME OUT TRAP--NO DEVICE-sTRY AND SEL MISC REGISTER

sTRY AND CLEAR MISC REG

sTRY AND SET RX ACTIVE

;LOOK FOR SYNC 1 AND SYNC 2
;THIS IS NOT A DQ11 IF I BRANCH
cNOW THIS IS A DQ11 ~-STORE CSR
;SET FOR TWO SYNC (CHARS
.CLEAR DQ ACTIVE BIT
sSEL _CHAR DET REGISTER

sWRITE INTO CHAR DET REG

;WAS THE REGISTER WRITTEN?
cAPPERENTLY NO B8 OPTION.
;SET FOR B8 OPTION
;SEL POLYNO. REGISTER

;JWRITE POLYNO.REGISTER
;WAS REG WRITTEN??
:BR_IF NO AB OPTION
;SET FOR AB OPTION
:TRY TO SET .DTR. .RS.

:DID ANY OF THEM SET
;BR IF NO BA OPTION
;SET FOR BA OPTION
;DID .CS. .CO.

:BR_IF NO JUMPER
;SET FOR JUMPER

:SET FOR ACTIVE ON FIRST NON-SYNC

:SET FOR ODD VRC.......
;POP POINTER
;CLEAR RCSR
;CLEAR TCSR
;CLEAR AGAIN
;CLEAR ERROR REG
;CLEAR SEC REG
;UPDATE NUMBER OF DQ11S

;UFDATE CSR POINTER BY 10 (8)

JHAVE ALL FLOATING ADDRESSES BEEN C(HECKED??

:BR IF NOT ALL DONE
s ZERO ACTIVE DQ11S
*WERE ANY DQ11S FOUND

SHEY BUDDY. NO DQ11S FOUND IN SYSTEM
;SAVE NUMBER OF DQ11S
:SAVE NUMBER FOR ACTT

:CLEAR CARRY
g,

ACTIVE ADDRESS

’FT BIT

CZDQE
MACY11 30A(1052)
28-JuUL-78
p
CZDQEE.P1T
25-JuL-7 8 15:28

005301
001371

000006

13:43

BNE

020103

000

5%:

.~1000

MTITLE:

001200

.=1200

177570
177570
177560

SWR:
LIGHTS:

177562

177564
177566

SEQ 0016

TKCSR:
TKDBR:
TPCSR:
TPDRR:

HALT
BR
MOV
RT1

LASCIZ

LOCK:
ICOUNT:
LPCNT:

TSTNO:
:
PASCNT
ERRCNT:

LSTERR:

;1 DIDN'T FIND ANY DQ11S. DON'T USE AUTO SIZE.

JHOW CAN I TEST NO DQ11S

JDON'T LET OPR HIT CONT. SW
ENTERED BY TIME OUT TRAP

.=2

#2%, (SP)

.GO HOME.

<377><12>/C2DQEE0/<377>/ MISC & BCC TST/<377>

INDIRECT POINTERS
177570
177570
177560
177562
177564
177566
;PROGRAM CONTRCOL

RETURN:
NEXT:

;DEC NUMBER OF DQ11S
sBR IF MORE TO GO
JRESET TIME OUT VECTOR
s SAVE ACTIVE
2SET 10T TRAP PRIO: TO 7
;SET TABLE POINTER
;SET VECTOR START
JSET VECTOR+2 START
;GO FIND THE VECTORS

; TYPE MESSAGE

;SWITCH REGISTER POINTER
;DISPLAY REGISTER POINTER
sTELETYPE KEYBOARD CONTROL REGISTER
JTELETYPE KEYBOARD DATA BUFFER
;TELEPRINTER CONTROL REGISTER
;TELEPRINTER DATA BUFFER
PARAMETERS

OQOOOOOWOOO

177524

177460
020103

26,344
DQACTV, SAVACT

#300.R0
#302.R1
VECMAP

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

;PC OF

LAST ERROR CALL

;PROGRWM VARIABLES
CHAR1:

(HAR?:
CHAR3:
TEMPT:

elelolelelele)

042505
051511
041502

#340, an22

CLR

050504
046440
020046
051524

#1400,
R2

4%:

055103

ROUTINES USED FOR AUTO SIZING.

000004
001502
000022

000466

PAGE 17

s TEMPORARY STORAGE
s TEMPORARY STORAGE
; TEMPORARY STORAGE

. "TEMPORARY STORAGE

808
809
810
811
812
813
814
815
816
817
818
819
820
821

001254
001256
001260
001262
001264
001266
001270
001272
001274
001276
001300
001302
001304
001306

000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000001
000000
000000
000000

E
2
13:43 PAGE 18
PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS.
TEMPS:
SAVRO:
SAVR1:
SAVRZ:
SAVR3:
SAVR4:
SAVRS:
SAVSP:
SAVPC:
SAVNUM:
CREAM:
RUNFLG:
RUN:
RUNCNT:

0
0
0
0
0
0
0
0
O
0
.BLkW
OO

CZDQE
MACY11_30A(1052)
28-JuL-78
CZDQEE.P1
25-JUL-78 15:28

; TEMPORARY STORAGE
2RO STORAGE
sR1 STORAGE
:R2 STORAGE
;R3 STORAGE
;R4 STORAGE
;RS STORAGE
s STACK POINTER STORAGE
:PROGRAM COUNTER STORAGE
1

SEQ 0017

CZDQE
MA“Y11 30A(1052)
28-JuUL-78
CZDQEE.P1"
25-JUL-78 15:28

829
830
831
832
833
834
835
836
837
838
839
840
841
842
843

844

845
846
847
848
849
850

851
852
853

854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877

PAGE 19

PROGRAM PARAMETERS,

VARIABLES,

AND

SEQ 0018

TRAP CALLS.

sPROGRAM CONTROL FLAGS

001310
001311
001312
001313

000
000
000
000
000000

INIFLG:
STFLG:
ERRFLG:
LOKFLG:
$v=0

.BYTE
.BYTE
.BYTE
.BYTE

PROGRAM INITIALIZATION FLAG
TEST START FLAG

ERROR OCCURED FLAG
LOCK ON CURRENT TEST FLAG

sDEFINITIONS FOR TRAP SUBROUTINE CALLS
;POINTERS

TO SUBROUTINES CAN BE

FOUND

;IN THE TABLE IMMEDIATLY FOLLOWING THE DEFINITIONS
:tit*Qttt*Qtfitttttttttt?'tfittt1 L2222
AN AR AR RA AR AR A AR RN AR RN AR

001314

001314
001316
001320
001322

001324
001326

001330
001332
001334
001336
001340

001342
001344

001346

.TRPTAR:

2SR

20RR0RdR2dR

AR A AN A AN AR AN A

22002022222

AN AR R AN NRNRARRRRANRRARARN R

104400
(12552
104401
012664
104402
012704

SCOPE=TRAP+0
.SCOPE
SCOP1=TRAP+1
.SCOP

;CALL TO SCOPE LOOP AND ITERATION HANDLER

013012
104404
013130
104405
013162
104406

INSTR=TRAP+3

.INSTR
INSTER=TRAP+4
.INSTER

;CALL

104403

PARAM=TRAP+5S

.PARAM
SAVOS5=TRAP+6

TO ASCII

STRING

INPUT ROUTINE

;CALL TO INPUT ERROR HANDLER
sCALL TO NUMERICAL DATA INPUT ROUTINE
;CALL TC REGISTER SAVE ROUTINE

RESOS5=TRAP+7

104411

.CONVRT
CNVRT=TRAP+11
.CNVRT

013474
104412
012346
104413
012222
104414
014376
104415
014452

;CALL TO TELETYPE OUTPUT ROUTINE

013376
104407
013436
104410
013470

;CALL TO LOOP ON CURRENT DATA HANDLER

TYPE=TRAP+?
.TYPE

.RESOS
CONVRT=TRAP+10

MSTCLR=TRAP+1?2
MSTCLR

MEMCLR=TRAP+13
.MEMCLR
CKSWR=TRAP+14
.CKSWR
CNTLU=TRAP+15
.CNTLU

;CALL

TO REGISTER RESTORE ROUTINE

.CALL

TO DATA OUTPUT ROUTINE

;CALL TO DATA OUTPUT ROUNTINE WITHOUT CR/LF.
;CALL

TO ISSUF MASTER CLEAR

;CALL TO CLEAR ALL SCRAT(CH PAD MEMORIES
;CALL 70 ALLOW SWREG TO BE LOADED FROM TTY
<CALL

TO ALLOW LOADING OF

SWREG FROM TTY

.'ltttifi*fit't"ttt.tt!fi"""fi.fi'fit"t.'tfitttt'tttittt'tttfiQ'tt'ttltfit
"'ttttitttttttifittltttt't"'ttttttttt'titttltlilfittt'!ttitttttt'ttfitt

;DQ11

001350
001352
001354
001356
001360
001362

000000
002000
000000
000000
000000
000000

DQRVEC(:
:
DORLVL
DQTVEC:
DQTLVL:
DCRCSR:
DQR(SH:

OOOOO0OO

822
823
824
825
826
827
828

13:43

VECTOR AND REGISTER INDIRECT POINTERS

;POINTER
sPOINTER
sPOINTER
JPOINTER

;POINTER

TO DQ11 RECEIVER INTERRUPT VECTOR
TO DQ11 RECEIVER INTERRUPT SERVICE PS

TO DQ11
TO DQ11
TO DQ11

TRANSMITTER INTERRUPT VECTOR
TRANSMITTER INTERRUPT SERVICE PS

RECEIVER CONTROL REGISTER

;POINTER "0 HIGH BYTE OF DQ11 RECEIVER CONTROL REGISTER

001364
001366
001370
001372
001374

000000
000000
000000
000000
000000

13:43

PAGE 20

PROGRAM PARAMETERS,

DQTCSR:
DQERR:
DQREG:
DQSEC:
DQSECH:

lelelelele)

CZDQE
MACY1 30A(1052)
28-JuL-78
CZDQEE.PI
25-JuUL-78 15:28

VARIABLES, AND TRAP CALLS.

;POINTER
;POINTER
;POINTER
;POINTER
;POINTER

TO DQ11 TRANSMITTER CONTROL REGISTER
TO DQ11 ERROR REGISTER
TO HIGH BYTE OF ERROR REGISTER
TO DQ11 SECONDARY REGISTER
TO HIGH BYTE OF DQ11 SECONDARY REGISTER

;DQ11 STATUS TABLE AND ADDRESS ASSIGNMENTS
001400

001410
001412
001414

.=1400
DQCROOD:
DQSTOO:
DQCRO1:
DQSTO1:
DQCROZ2:

DQSTO2:
DQCRO3:
DQSTO3:

DQCRO4:
DUSTO4:
DQCROS:
DQSTOS:
DOCRO6:

DQSTO6:
DQCRO7:
DQSTO7:
DQCR10:
DQST10:
DQCR11:
DQST11:
DQCR12:
DQST12:
DQCR13:
DOST13:
DQACR14:
CQST14:
DACR1S:
DQST1S:
DQCR16:
DQST16:
DQCR17:
DasST1?7:

DQACTV:
SAVA(CT:
DQONUM:
DQCSR:
DQSTAT:

BLKW
BLKW
.BLKW
BLKW
BLKW
BLKW
.BLKW

BLKW
BLKW
.BLKW
BLKW
BLKW
.BLKW
BLKW
BLKW
.BLKw
BLKW
BLKW
BLKW
BLKW
BLKW
BLKW
BLKW
BLKW
BLKW
BLkW
BLKW
.BLKW
BLKW
BLkW

BLKW
BLKW
BLKW
BLKW
BLKW
BLKW
BLKW

1
1
1
1
1
1
1

1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1
1

;CONTROL STATUS REGISTER FOR DEVICE NO: 00
;VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 00
;CONTROL STATUS REGISTER FOR DEVICE NO: 01
;VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 01
;CONTROL STATUS REGISTER FOR DEVICE NO: 02
:VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 02
;CONTROL STATUS REGISTER FOR DEVICE NO: 03

;VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 03
;CONTROL STATUS REGISTER FOR DEVICE NO: 04
sVECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 04
;CONTROL STATUS REGISTER FOR DEVICE NO: 05
sVECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 05
;CONTROL STATUS REGISTER FOR DEVICE NO: 06
;VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 06
;CONTROL STATUS REGISTER FOR DEVICE NO: 07
;VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 07
;CONTROL STATUS REGISTER FOR DEVICE NO: 10
;VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 10
;CONTROL STATUS REGISTER FOR DEVICE NO: 11
sVECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 11
;CONTROL STATUS REGISTER FOR DEVICE NO: 12
:VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 12
;CONTROL STATUS REGISTER FOR DEVICE NO: 13
:VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 13
;CONTROL STATUS REGISTER FOR DEVICE NO: 14
;VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 14
;CONTROL STATUS REGISTER FOR DEVICE NO: 15
;VECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 15
;CONTROL STATUS REGISTER FOR DEVICE NO: 16
JVECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 16
;CONTROL STATUS REGISTER FOR DEVICE NO: 17
sVECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 17
JHOLD ACTIVE BITS FOR TESTING
s SAVE NUMBER OF ACTIVE DQ11S
;OCTAL NUMBER OF TCTAL NUMBER OD DQilS
;CSR OF DQ11 UNDER TEST
sVECTOR AND CONFIGURATION STATUS OF DQ11 UNDER TEST

;PROGRAM INITIALIZATION

;LOCK OUT INTERRUPTS
sSET UP PROCESSOR STACK

JSET UP POWER FAIL VECTOR

;CLEAR PROGRAM (ONTROL FLAGS AND (OUNTS
sTYPE TITLS MESSAGE

SEQ 0019

MACY11 _30A(1052)
28-JuL-78
CZDQEE.P1T
25-JuL~-78 15:28

CZDQE

934

012737
012706

13:43

177776

PAGE 21

.START: MOV

000024
001276

#340,PS

#STACK,SP
#.PFAIL ,a#24

;LOCK OUT INTERRUPTS
sSET UP STACK
;SET UP POWER FAIL VECTOR

PASCNT

cCLEAR START FLAG
:CLEAR PASS COUNT
;CLEAR ERROR FLAG

DONUM, SAVNUM
STFLG

ERRFLG

012737
012737

012737
012737
013746
013746
012737
022777
001402
000407
022626
012737
012737
012637
012637
005737
001014
105737
001035

001200

RUNFLG
#1400, CREAM

001226
001214

#1,TSTNO
#.START ,RETURN

177570
177570
000006
000004
001656
177777

001200
001202

#DSWR, SWR
#DLIGHTS,LIGHTS

000004

#6468, an6

000176
000174
000004
000006
000042

001200
001202

001232
001234
000001
001512

001000
001310
000176

104414

ans.-(SP)

64%:
65%:
:
668

65%
663

(SP)+, (SP)+

#SWREG, SWR
#DISPREG,LIGHTS

(SP)+ a#é

(SP)+.a#6

INIFLG

001200

#SWREG, SWR

67%
67%:

000220
015126
001400
177252

001244
001246

000002

001244

000001

177160

aSwR
. +6

PC.CSRMAP

. XHEAD
#1400, TEMP]

ITEMPT, TEMP?
.+16

#2_ TEMPI
12%:

=22

#Sw00,aSWR
18

177140

0015¢C2

aSWR,SAVA(CT

;CLEAR LAST ERROR POINTER
cSET UP FOR TEST 1
;SET UP FOR POWER FAIL BEFORE
sTESTING STARTS
MOV HARDWARE SWR TO SWR
sMOV DISPLAY LIGHTS TO LIGHTS
;SAVE VECTORS
.SET UP FOR TIMEOUT
JREFERENCE HARDWARE SWITCH REGISTER

#-1,3SWR

MTITLE

000000

027737

a6, ~(SP)

G2
BNE
67
JoewnnnwTHE NEXT & LINES OF
TSTR
INIFLG
128

177232

:CLEAR ERROR COUNT

ERRCNT
LSTERR

177326

001310

SEQ 0020

PROGRAM INITIAL! ZATION AND START UP.

;sADJUST STACK
cPOINT TO SOF TWARE SWITCH REG
sPOINT TO SOFT DISPLAY REG
JRESTORE VECTORS

JUNDER MONITOR
rODE MOVED TO SOLVE PRA2757

(JUNE

78)wsawes

JHAS INITIALIZATION BEEN PERFORMED?
;IF YES, BR

;TYPE

TITLE MESSAGE

;IF NOT SET FLAG AND INIT
;1S SWREG USED

CZDQE
MACY11 30A(1052)
28-JuL~78
CZDQEE P11
25-JUL-78 15:28

13:43

BLOS
TYPE

014710
177120
001500

012700
012701
010120
005021
022021
022700
001372

000300
000302

001500

HALT
BR
MOV
MOV
HALT
CKSWR

11%:

2%:

MOV

001000

.-2

aSWR,DQACTV

DQACTV,RO

#300,R0
#302 ,R1
R1,(RO)+
(R1)+
(RO)+,(R1)+

#1000,R0

sTEST START AND RESTART

012737
012706
005737
001040
104414
032777
001411
104402
012737
012737
000406

013737
013737
032777
001410

000340
001200
000042

177776

000004

177032

014746
000240
000240

012562
012564

012660
012662
000002

.BEGIN: MOV
MOV
TST

012562
012564
176764

8NE
CkSWR
BI1
8EQ
TYPE

1%:

014734

1S PROGRAM UNDER MONITOR CONTROL

;CHECK FOR <*G>

:?lrz.asun

*CHECK FOR LOCK ON TEST

,MLOCK

BRW,TTST

5§op.rrsr¢2

;SET UP TO LOCK

BRX.TTST+2

;LOCK NOT SELECTED,

48
#TST1,RETURN
MR
SRETURN

SSTART AT TEST 1
;TYPE R
{START TESTING

§§u61.asun

SET UP FOR NORMAL SCOPE LOOP

“IF Sw01=1, GET STARTING PC

MTSTPC
PARAM

104405

TST1

TLAST
#RE TURN

1
1
BR
MOV

BYTE
BYTE

002254
014636

001214

176740

:
3%

'A
¥

TYPE

TEST
oo

—d el ——d

norONY

333

—a008—‘000
Q—t—d
2

INTERRUPTS

*SET UP STACK

§§‘2

MOV
MOV

BEQ
INSTR

;LOCK OUT

#STAZK, SP

MNOP,TTST

BIT

2%:

#340,PS

MOV
e 017

104403

QO—s—

203033353353

WONO
NS WN—=O

S
U S G S G SN

(olelololelolololel

118

MERR3

017737
013700
000000
104414

SEQ 0021

PROGRAM INITIALIZATION AND START UP,

101404
104402

000000
000776

PAGE 22

222

TST1:

JMP
1

232

MOV
MOV
MOV

1518

001304
001306

BNE
MOV

MOV
(OM8

#1,TSTNO
#1812,
RE TURN
#TST2 NEXT
RUNFL G
1%

#81T0,RUN

¥4 RUNCNT
KUNF LG

;1S

X2R222XX222X22Xx2X2XXXXYS

THIS MY FIRST

‘BR IF

FLAG IS SET

*SET RUN POINTER.
“SET FOR MAX OF
“SET RUN FLAG

TIME

HERE?

16 CQ11°S PER SYSTEM

CZDQE
MACY11 30A(1052)
28-JUL-78
C2DQEE.P11
25-JUL-78 15:28
1046

002324

1048

00233¢

1047
1049
1050
1051
1052

1053
10564

002332

033737

001306

005737

001500

001032

002340
00232
002344
002350

001423
000257
006137
062737

002362

001360

002356

001304

005337

001306

001300

012737

000020

001306

000007

001304

002364

1057
1058
1059
1060
1061
1062
1063

002400
002406
002410
002412
002414
002416
002420

012737
000746
104402
016641
000000
000776
000257

1065
1066
1067
1068
1069
1070

002426
002434
002442
002450
002456
00246

017737
062737
017737
062737
013737
013737

176646
000002
176632
000002
001506
001510

013737
062737
013737
062737
012737
062737
013737
005237
013737
062737
013737
062737
013737
005237

001350
2
001352
001356
000002
(01360
001262
001366
000002
001364
000002
001366
001370

005237

001372

005237
000240

001374

1056

1064

1071

1072
1073
1074
1075
1076
1077
1078
1079
1080
1081
1082
1083
1084,
1085

002372

002422

002472

002500
00206
0025'4
002522
002530
002536
002544
002552
002556
002564
002572
002600
002606
002614

1086

002620

1088

002632

1087

1089
1090
1091
1092

1093
1094

002626

002640
002644

001500

0000064

1055

012737

006137

042737

013737

001400

18$:

177007

001364
001364
001366
001366
001370

RUN

#4, CREAM

RUNCNT
18

#1400, CREAM

RUN

@CREAM.DQCSR
#2,CREAM
aCREAM_DQSTAT
#2,CREAM
DOCSR, DQRCSR
DQSTAT ,DQRVEC

#17700% ,DQRVEC

MOV
ADD
MOV
ADD
MOV
ADD
MOV
INC
MOV
ADD
MOV
ADD
MOV
INC

#2 .DOERR
DQERR, DOREG
DOREG

INC

DQSEC

MOv
INC

NOP

*BR TO FATAL ERROR. WHY AM | HERE IF NO ACTIVE D011°$?72?
*CLEAR ALL THE CONDITION CODES OF CPU

#1,RUN
1

MOV

TO TEST.

MOV
8R
TYPE
MERR?
HAL T
8R
cce

BIC

001352
001352
001354
001354
001356
001356
001362

;FIND AN ACTIVE DQ11

‘BR IF I FOUND ONE TO TEST.

#16. RUNCNT

ROL

SEQ 0022

MOV

MOV
ADD
MOV
ADD
MOV
MOV

001350

00137¢

DQACTV

MOV

001506
001300
001510
001300
001360
NO1350

001372

BNE

3%:

001372

RUN, DOACTV

DEC

001300

001370

BIT

BNE

BEQ
ccc
ROL
ADD

001304

13:43
PAGE 23
PROGRAM INITIALIZATION AND START UP.

DQRVEC,DORLVL
#2.DAR(
VL
DORLVL ,DQTVEC
#2,DATVEC
DQTVEC.DQTLVL
#2.DQTL
VL

DQRCSR, DORC SH
DORCSH
DORCSR,DATCSR
#2 .DQT(SR
DOTCSR,DQERR

*FIND OUT IF THERE ARE NO DQ11 ACTIVE.

*UPDATE RUN POINTER

*UPDATE ADDRESS POINTER.

*DEC NUMBER OF TIMES | LOOKED AT ACTIVE.
:BR AND KEEP LOOKING.

*START RESTORING MY POINTERS.

*RESTORE

ADDRESS POINTER

*RESTORE RUN POINTER.
‘KEEP ON TESTING.
*ALLERT OPERATOR OF FATAL ERROR
*NO DQ11 ACTIVE. WHY AM | HERE???
*YOU MUST RELOAD DQ11 DIAGNOSTIC!!
'STICK HERE ON CONT.
*CLEAR CPU COND. CODES

*UPDATE RUN. ACTIVE DQ11 FOUND.

-PLACE ADDRESSS OF DQ11 AT DQCSR
*UPDATE ADDRESS POINTER
:PLACE STATUS OF DQ11 AT DQSTAT
*UPDATE ADDESS POINTER

:GENERATE ADDRESS OF

RECEIVER INTERRUPT SERVICE PS

;GENERATE ADDRESS OF

TRANSMITTER INTERRUPT VECTOR

;GENERATE ADDRESS

TRANSMITTER INTERRUPT SERVICE PS

:GENERATE ADDRESS OF
-GENERATE ADDRESS OF

HIGH BYTE
TRANSMITTER CONTROL REGISTER

;GENERATE ADDRESS OF

ERROR REGISTER

:GENERATE ADDRESS OF

HIGH BYTE OF

ERROR REGISTER

DQREG ., DASEC

:GENERATE ADDRESS OF SECONDARY REGISTER

NQSEC, QSECH

JGENERATE ADDRESS OF

DQSE Cr

HIGH BYTE

CZDQE
MACY11 30A(1052)
28-JuL-78
CZDQEE.P1N
25-JUL-78 15:28

13:43

MISC.

NO
W
WA
=
&#flgfifl*fiflbflflzfix
ONOWVNEWN=O SR IrAran—oIRIRARIN2S 383

JNOTE:

PNONOANDNIMNONININ
= DD D=

T U
(I N

W
N

U U
e S

WIS S WU G
S W
TN
i
S

SO QU
N
S

R
QU
i

U S
s o B

QU SO S S
e

Gy S G
WP
Y

sTEST OF DATA REALIBILITY THROUGH
;CABLE AND LEVEL CONVERTERS.

VIVNE LSS NEENRNEW
= OVONONEWN=2OO

IF JUMPER IS NOT INSTALLED
AT END OF CABLE THIS TEST IS NOT
DONE

TEST 2
AR

RSS2t

ddd

MOV
MOV

#2,TSTNO

000002
003230

001226
001216

1sT2:

100000

001510

000377

015374

000026

015374

CKSYN1: BIT
BNE
MOVB
BR
1%:
MOVB
NOP
CkDN:

040000

001510

001216

001214

176260

015376

2%:
016000

176376
016000
176364
177400
176352
015374

3¢:

:gYNBIT.DQSTAT

176360
176346

001246
4%:

222222223228 X

JADJUST POINTER FOR NUMBER OF SYNC CHARS.
JBR Ir TWO SYNC CHARS SELECTED.
JRESET FIRST SYNC

#JUMBIT,DQSTAT

;DOES THE TEST JUMPER EXIST.

#TXBUFF
R4

RO, (R4) +
RO
1%
RO

#RXBUFF
R4

(RG)
+

#SYNC ,@DQSE(C

176306

2220222

#377,SYNC
CKDN
#26,SYNC

176372

#TST3 NEXT

aDQREG
#RXBUFF ,3DQSEC
aDQREG
#-400,3DQSEC
aDQREG

176334
176324
176320

176256
176254

+14
NEXT ,RETURN
aRE TURN
RO

W
W
U

SEQ 0023

TESTS.

CABLE TEST.

W
U
YT Y

RECEIVER AND TRANSMITTER TESTS PLUS B(C

1096

N\
U\
U\
U
W
U
S W
D
e
e
e i 0 R I
RO SIS
WY WP

PAGE 24

aDQREG
#-402,aDQSEC
#11,8D0REG
.SYNC ,aDQSEC
aDCREG
#4000,8DQSET
TEMP]
#20,TEMP?
aDOR(SR
aDQT(CSR
ac2ERR
7%

JSET SYNC TO MARK

;BR TO CONT.

sCONTINUE TEST.

TO 26

;BR IF YES

;PREPARE

TO DO NEXT

;PREPARE

TO ZERO ALL RX BUFFER.

TEST.

;GOTO NEXT TEST
;ZERO DATA POINTER.
JSET BUFFER POINTER
JFILL TX BUFFER WITH BINARY COUNT PATTERN
JUPDATE CHAR.
;BR IF MORE TO DO.
;CLEAR DQ11 MEMORIES.
;ZERO COUNTER POINTER

;START CLEARING.
JUPDATE
:BR IF NOT ALL CLEARED.
;SELECT RX BA PRI.
JLOAD |T.
JSELECT RX WC PRI,
JLOAD IT FOR 400(8) CHARS.
;SELL TX BA PRI.
J10AD IT.
JSEL TX WC PR.

JSET 400(8) CHARS AND TwO SYNC.
JSEL SYNC REGISTER
sLOAD IT.
JGET MISC REGISTER
JSET FOR EIGHTBITS.

:SET, DELAY......
JSET RX GO.!

:SET TX GO!'!
;ANY ERRORS

;BR ]f NO ERRORS

s.++E

CZ DQE
CZ0QE

d o

RUGK JUEs I S

b ed

I WO

IS G

b e

N YR

T U R YR DI I

) e

S R R

)

I G

I SR G

VN AN

LB IIVFANANIIDEIERRARLE Nole RNTo SV, P YU T N}

P11

003114
003120
003124
003130
003132
003136
003140
003144
003146
003152

003154
003156

003160
003164
003170
003174
003200
003204
003210
003216
003220
003222
003224
003226

28-JUL~78

25-JUL-78 15:28

017700
017701
017702
104007
105777
100407
005237
001360
005337
001355
104000
5000

005037
005037
012704
012705
112437
112537
023737
001401
104004
105200
001365
104400

13:43

MISC.

MOV
MOV
MOV
HLY
TSTB
BM]
INC
BNE
DEC
BNE

7%:

001244
001246

001252
001254
015376
016000
001254
001252
001254

RECEIVER AND TRANSMITTER TESTS PLUS BCC

176240
176240
176236

176222

PAGE 25

HLT
CLR

5%:

CLR
CLR
MOv
MOV
MOVB
MOVB
CMP
BEQ
HLT
INCB
BNE
SCOPE

0%:
001252

aDQRCSR
RO
@DQTCSR,R1
aDQERR,R2
7
aDQRCSR
5%
TEMP1
48
TEMP?
43
RO
TEMP4
TEMPS
#TXBUFF ,R4
ARXBUF F ,RS
(R4)+,TEMPS
(R5)+,TEMP4
TEMPS, TEMP4
.+
4
RO
6%

SEQ 0024

TESTS.

;THE DQ11 ERROR FLAG IS SET.
;1S RX PRI DONE SET?
JBR IF YES
JDELAY.....
:
S
:
JRX PRI. DONE FAILED TO SET.
: ZERO COUNTER.

s CLEAR STORAGE
JSAME..
;GET TX BUFFER AREA
:GET RX BUFFER AREA
;LOAD FOR ERROR CALL
g
:DOES DATA CHECK OUT OK?
:BR_IF GOOD DATA.
:DATA COMPARISON ERROR.
$UPDATE COUNTER
:BR IF MORE DATA TO CHE(K.
;SCOPE THE TEST.

JRECEIVER STRIP SYNC TEST.

;TEST

b e

KIRGIS o SERLX
0o~
QRN S8 BB IR

L
b

purd

SYNC CHARS.

FOLLOWING

(0¢6).

sTHE TRANSMITTER AND RECEIVER BUFFERS ARE BOTH
sCLEARED BEFORE THE TEST IS EXECUTED.
;A TOTAL OF 400 CHARS. WILL BE TRANSMITTER INTO
;THE RECEIVER. WHEN RX PRI. DONE SETS.
sTHE RECEIVER BUFFER

R
D

THE RECEIVER CAN STRIP SYNC.

;WITH A TRAIL OF

IS CHECKED FOR ANY SYNC

;CHARACTERS (026). IF NONE ARE FOUND THEN THE
JRECEIVER DID INDEED STRIP SYNC.

D e
b e ek
b e

e R

R
R

cd ad
b

b e

NENONLND[ ] 8 R R

1207

THAT

;CHARACTERS FROM 000-025 WILL BE TRANSFERED

v YUE W YRR N W T

D ed

MACY11_30A(1052)

003230
003236
003244
003246
003252
003254
003256
003260
003262
003266
003270
003272

012737
012737
005000
012704
105024
105200
001375
005000
012704
105024
105200
001375

003274
003276

005000
012704

000003
003522
016000

015376

001226
001216

TEST 3

ASSEe

TST3:

1%:

8%:

RSttt

tdlidsliiinidts

MOV
MOV
CLR
MoV
CLRB
INCB
BNE
CLR
MOV
CLRB
INCB
BNE

#3,TSTNO
#TST4 NEXT
RO
#RXBUF £ ,R&

;CLEAR POINTER
;SET THE RX BUFFER

RO
1%
RO
#TXBUFF R4
(R4) +

JALL DONE?
:BR IF NO
JRESET RO TO ZERO
JGET TX BUFFER
:BEGIN TO CLEAR THE

CLR
MOV

Re
#TXBUFF ,R&

JRESET RO
JGET TX BUFFER

(R4) +

RO
8s

222

222322322220

JBEGIN TO CLEAR THE RX BUFFER

;DONE YET?
JBR IF NO

TX BUFFER

[)

13:43

P11

28-JuL-78
25-JuL~7 8 15:28

NWN=O VNN
WWN SO

000026
000026

6%:

RECEIVER AND

MOVB
INCB
cMP
BNE
MOV

MOVS8
INCB
BPL

176034

016000

176022
1727400
176010
015374
175776
1774600

175724
175710

MEMCLR
CLRB
MOV
INCB

176030

176016

MOV
INCB
MOV
INCB
MOV
MOVB

176004

175772
175762
175756

000001

016000
000026

NNNN&NNNN

lo oo
W
—

b w—d —d e
)
b
ed
b e
—t

55
56
57
58

104400

#-400,aDQSEC

#000035,30QRCSR
aDQRCSR

BNE

9%
#1,RO

sSTART FILLING WITH CHARS.
;UPDATE POINTER
sSYNC YET?
;BR_IF NO
sSET FOR SYNC CHAR.

JFILL TX BUFFER WITH SYNC CHARS.
;MORE TO GO?
;BR IF

YES

;CLEAR ALL DQ11
sSEL RX BA PRI.
;SET BUFFER.
; _RX WC PRI.

:256. CHARS
:TX BA PRI.
sSET TO XMIT SYNC CHARS.
cTX WC PRI,
:256. CHARS
sSYNC REGISTER
;LOAD SYNC REGISTER
sMISC. REGISTER.

EIGHT BITS AND TEST LOOP

-GO AND STRIP SYNC.
;SET TX GO.
;PREPARE TO DELAY.
; SAME

sRX DONE?

;BR IF
:D

. E

HLT
CLR
CLR

aDQRCSR
aDQTCSR

JRX PRI DONE NOT SET.
;DISABLE RX
;DISABLE TX

MOV

HRXBUF F R4

;

YES

;SET COUNTER

CMPB
BNE

#26,(R4)+
Lt

sANY SYNC CHARS?
¢BR IF NONE

INCB
BNE

RO
3%

;UPDATE COUNTER
:BR IF MORE TO GO.
;SCOPE THIS TEST.

;DQ11

MEMORY TRANSFER TESTS

HLT

003520

aDQREG
#RXBUFF ,aDQSEC
aDQREG
#-400,3DQSEC
aDQREG
#SYNC ,aDQSEC
aDQREG

TSTB

BM]
ADD

CLR

3%:

aDQTCSR
RO
R1

8PL
9%
:

RO, (R4) +

INC
CLR
CLR

INCB

175666
1756566

20.(R4)+
0
#26,R0
7$
#26 ,R2

MOV

MOV
2%:

TRANSMITTER TESTS PLUS BCC TESTS.

#11,3DAREG
.SYNC,aDQSEC
aDQREG
#,010,aDQSEC ~

MoV
INCB

175744
175724

PAGE 26

MISC.

7%:

NPV

d
D
D
D
D
)
D
D
D
d
b e
b ed cd
b e
d
md cd
d e
—h

MACY11_30A(10G52)

[ASTAS NS SIS IS IS TN S LS IaSIAS [a [aC gV [y 1 ¥}NIPNNININININD
a2
NININIPNINININININ)
= = = 3 s —a—

CZDQE
CZDQE

SCOPE

;GET RX BUFFER

JRECEIVER DID NOT STRIP SYNC.

“IF THE PROCESSOR HAS AT LEAST 8K OF MEMORY
*THIS TEST WILL BE EXECUTED.

PTHE FIRST PART EXERCISES THE TRANSMITTER ALONE

;TRANSMITTING FROM ADD.20000

TO LAST MEMORY ADD.

SEQ 0025

CZDQE
MACY11 30A(1052)
28-JuL-78
CZDQEE.P1
25-JuL=78 15:28

13:43

PAGE 27

MISC.

1264

RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

;UNDER 2BK MINUS 400 (SAVE ABL). THE DATA IS
;VERIFIED ONE CHAR AT A TIME. TWO EIGHT BIT
; CHARS ARE TRANSFERED AT ONE TIME.

IAFTER THE TX ALONE THEN THE TRANSMITTER AND RECEIVER
sARE EXERCISED TOGETHER IN THE SAME
JMANNER AS DESCRIBED ABOVE.

s
TR

012737
012737

0060004
004460

001226
001216

013705
012737
005737
000240

000004
004434
020000

000004

104413

NN
WA —=O

SHESIS
S
P PR

D
b
]
b e
e
D d e
b
b ek
d
D e
b
)
D e
b
d

o2
b
b

d e
b

D
b
b

b wd
D

b
b

d md

b
d

—

NN NININ
NN N
N

020000

2%:

3%:

000002
020000
020000

175474

000002
000002
000002

175452
175446
175436
001252

#200.

#20000,
>0
(RO)

#160000,RO
1%
#STACK,
SP

#4%,L0CK

R2
#20000,R0
R2.(RO)+
R2

#2,dDQREG

175470

175420
175414

175354

a¥6 RS

2108, a4

#26 ,R2
. o
R2
RO,LIMIT.HI]

004456

175402
175372
175366

#20000,aDQSEC
#20000,RO
4%:

5%:

ARAN AN AR RRAARARRANNRANNAANNA
AR AANA AN
N

#4,TSTNO
#TSTS5 NEXT

228~

000026

175434

AN NN

a#20000

1%:

001220

MOV
MOV

MEMCLR
MOV

160000

001200
003710
000004
005000
004456

N AR AN AR AR AAR AN AR AANNR

TST4:

000004

020000

TEST &

#2,aDQSEC
#2,aDQREG

aDQSEC, TEMPS

#2,aDQREG
TEMP4 ,aDQSEC
aDQREG
#-2,aDQSEC
MISC. ,aDAREG
#5212,aDASEC
aDQTCSR

sSAVE THE TIME OUT VECTOR
.LOAD TRAP VECTOR

;CHECK FOR 8K OF MEMORY.

;CPU DOES HAVE AT LEAST 8K.
JPREPARE TO SIZE MEMORY TO 28K
;CHECK MEMCRY.
JEXIST?

;28K HIT YET.
:BR IF NO

;ADJUST STACK
JSET FOR LOCK (SW09=1)

JRESET TRAP VECTOR.

JALLOW ROOM FOR DDP2 MONITOR.
;SAVE LAST MEMORY ADDRESS
;ZERO DATA CHAR POINTER
JPREPARE

TO FILL MEMORY WITH BINARY COUNT

JSTART FILL
JUPDATE CHAR.
;DOES IT EQUAL THE SYNC (CHAR?
;BR IF NO

;BUMP ONE HIGHER
;IS ALL OF MEMORY FULL?
;BR IF NO.
JSEL TX BA PRI.
JSET TX BA TO FIRST ADD IN 8K
;SET SOF TWARE POINTER.
;CONTINUE TEST
sSEL TX BA PRI.
+GGC BACKWARDS FOR SCOPE ROUTINE
;SEL TX BA PRI].
sSAVE THE TX BA PR]. ADDRESS
;DO INIT D11
;SEL TX BA PR].
JRELOAD TX BA PRJ.
JSEL TX WC PRI,
cSET FOR A TWO EIGHT BIT XFER
;JSEL MISC REGISTER

JSET 8 BITS TEST LOOP AND AUTO/STEP
JSET TX GO.

SEQ 0026

CZDQE
MACY11_30A(1052)
28-JUL-78
CZDQEE.P11
25-JUL~78 15:28
1320
1321
1322
1323
1324
1325
1326
1327
}gsg

004010
004014
004016
004020
004026
004034
004040
004044
004046

005777
1
1
104000
112777
017737
011037
023710
001401
104005

1330
1331
1332
1333

004050
004052
004054
004060

104401
005720
020037
001321

1334
1335
}%%g

175352
000013
175340
001254
001252

13:43 PAGE 28
MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.
TST
BPL
HLT
MOvB
MOV
MOV
cMP
BEQ
HLY

175342
001252

SCOP1
TST
CMP
BNE

004456

aDQERR
R
#13,aDQREG
aDQSEC, TEMP4
(RO), TEMPS
TEMP4, (RO)
. +4
5

;ANY ERRORS?
:BR IF NO ERRORS
;DQ11 ERROR FLAG SET.
sSEL_TX MUX REG
sREAD TX MUX
sREAD SOF TWARE POINTER
;1S THE DATA CORRECT
;BR _IF GOOD
;DATA COMPARISON ERROR.

(RO)+
RO,LIMIT.HI
5%

;LOCK ON CHARACTER (SW09=1)
JUPDATE SOF TWARE POINTER.
;ALL DONE?
;BR IF NO

;THE ABOVE WAS FOR THE

TX ONLY

1338

;THE BELOW ROUTINE EXECISES BOTH THE

1341
}%2%

;NOTE THAT THE RX CA SHOULD BE
;400 (8) LOCATIONS HIGHER THAN THE TX CA.

}%28

1345

sTX AND RX TOGETHER.

1346
1347
1348

004062
004070
004074

012737
012700
112777

1350
1351
1352
1353
1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
1364
1365
1366
1367
1368
1369
1370
1371
1372
1373
1374
1375

004106
004110
004116
004124
004130
004136
004144
004152
004154
004160
004166
004174
004200
004206
004212
004220
004224
004232
004240
004246
004252
004260
004266
004274
004300
004306

000413
112777
162777
105077
162777
112777
017737
104412
105077
013777
062777
105277
012777
105277
012777
105277
012777
112777
013777
105277
012777
112777
013777
105277
012777
005277

1349

004102

010077

004110
020000
000006

175264

000006
000002
175240
000002
000006
175222

175210
001252
000400
175170
177776
175156
015374
175144
177776
000006
001252
175116
177776
000011
015372
175070
004010
175046

001220
175266
175252
175246

175234
175224
001252
175204
175176
175164

175152
175140
175130
175124
175112
175102
175076

175064

MOV
MOV
MOVB

#6$,L0CK
#20000,R0
#6,aDQREG

;SET FOR LOCK ON CHAR(SW09=1)
JSET FIRT ADD IN 8K
;SEL TX BA SEC

BR
MOVB
SuB
CLRB
sSuB
MOvVB
MOV
MSTCLR
CLRB
MOV
ADD
INCB
MOV
INCB
MOV
INCB
MOV
Mov8
MOV
INCB
MOV
MOVB
MOV
INCB
MOV
INC

73
#6,3DQREG
#2,3DQSEC
aDQREG
#2,aDQSEC
#6,aDQREG
aDQSEC, TEMPS

s CONT TEST.
;SEL TX BA SEC.
;KILL LAST XFER
;SEL RX BA PRI.
sKILL LAST XFER
;SEL TX BA SEC
JSAVE [T
SINIT DQ1
;SEL RX BA PRI
sLOAD IT
JUPDATE [T
;SEL RX WC PR]
;SET FOR TWO (HARS.
sSEL TX BA PRI
sTX SYNC ON PR].
;SEL TX WC PRI.
;SET FOR TWO SYNC.
;LOAD TX BA SEC.
;LOAD IT
JSEL TX WC SEC
;SET FOR TWO CHAR XFER
;SEL THE SYNC REG
sLOAD IT
;SEL MISC REG.
SEIGHT BITS TEST LOOP
;SET RX GO..

MOV

6%:

7%:

RO.3DQSEC

@DQREG
TEMP4 ,aDQSEC
#6400, aDQSEC
aDQREG
#-2,aDQSEC
aDQREG

#SYNC,aDQSEC
aDQREG
#-2,aDQSEC
#6,aDQREG
TEIMPS ,3DQSEC
aDQREG
#-2,8DQSEC
#11,aDQREG

. SYNC,aDQSEC
aDQREG

#-210,aDQSEC
aDQR(SR

;LOAD TX BA SEC

SEQ 0027

MACY11

CZDQEE.P1

12
16
22
30
34
36
342
344
004350

005277
005037
012737
105777
100407
005237
001372
005337
001367

175046
001244
00000

004354
004360
004362
004364

005777
100001
104000
011037

175006

004374

017701

SEsRu
23R8I

FREERPELES
W)
—

)
d
d
d nd
d
wd ad
wd e
d e

NN
NN NN

1376
1377
1378
1379

_30A(1052)
28-JuL-78
25-JuL=7 8 15:28

104000

105077

004420
004422
004424
004430
004432
004434
004436
004442
004450
004454

104401
005720
020037
001242
000410
022626
010537
013737
000177
104400

1410

004456

000000

— e

1398
1399
1600
1401
1402
16403
1404
1405
16406
16407

d ed

004416

162701
011137
021037
001401
104006

004404
004410

CZDQE

175024

13:43

MISC.

INC

001246

TEMP2
8%

001254

TST

aDQERR
.t4

(RO), TEMPS

174774
174772
000002
001252
001252

aDQREG

aDQSEC ,R1

#2 ,R1
(R1)
, TEMP4

, TEMPS
(RO)
.+
6

(RO)+
RO,LIMIT
HI
7%
118

004456

174540

aDQTCSR
TEMP1
#5,TEMP2
aDQRCSR
9%
TEMP1

001246
9%:

00124

RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

001244

000004
001216

PAGE 29

RS ,a#4
NEXT ,RETURN
aRE TURN

JSET TX GO..

iDELAY, CONTER
*RX PRI DONE?

;BR IF YES
:DELAY

JRX PRI DONE NOT SET.

;ANY ERRORS

:BR IF NO.

;DQ11 ERROR FLAG SET.
sSET EXPECTED
;SELECT RX BA PRI.
;GET RX BA
;GET LAST XFER
;GET ACTUAL DATA
;1S DATA OF?
:BR IF GOOD
;DATA COMPARISON ERROR
;LOCK ON DATA (SwW09=1)
;UPDATE SOF TWARE POINTER
;ALL DONE?
;BR IF NO

JEND TEST
;ADJUST STACK POINTER
RESET TRAP VECTOR
;DO NEXT TEST

'SCOPE THIS TEST

SEQ 0028

13:43

PAGE 30

MISC.

RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

AN AP
3 A 2T A 2
T
n NN
=
b D
W S NN =O 000 NOMN
NN

CZDQE
MACY11 30A(1052)
28=JuL-78
CZDQEE.P1T
25-JuL~-78 15:28

“TEST OF "ENTER T'' AND 'EXIT T*'

' TRANSMITTER TRIGGERED

;TEST TO TRANSMITT ONE CHARACTER ENTERING T
sCHECKING THE BCC THEN OVERFLOWING
sCAUSING AN EXIT T THEN MAKING SURE

QU W

;THAT THE BCC WENT

:NOTE: IF THE BCC DOES NOT EXIST THESE TESTS WILL NOT BE DONE
;

TEST S

A4S

012737
012737
032737
001005
012737
000177
104412
104412

000005
005002
0C2000

001226
001216
001510

012364
174476

001214

012737

TSTS:

012777
012737
112777
012777
012777
112777
005077

1457
1458
1461

174434
015352

1464
1465

1467

015352
112777

000016

#123,3DQREG
#-1,aDQSEC
#67,3DQREG

#4012,8DQSEC

:SET CHAR

*SELECT POLY REGISTER

*SET POLY FOR LRC 8

*SET COUNT TO 11
*SET TX BA PRI
-LOAD TX BA

sSEL TX CC-WRITE EN ENTER T
;SEL TX CC TO -1
SSEL TX CC SEC-WRITE EN EXIT T

sSET TX CC TO ZERO
;SEL MISC REG

SEIGHT BITS TEST LOOP AUTO SET

aDQTCSR
JSET TX GO
aDQTCSR,IDQTCSR ;WAIST TIME.

a@DQTCSR,aDATCSR ;WAIST TIME

aDQTCSR,aDQTCSR
aDQSEC
aDQSEC
aDQSEC
aDQSEC
COUNT

;WAIST
SCLOCK
*CLOCK
*START

CMP

#351,RS

:DID CHAR GET INTO BCC

ALT

1$
#16.aDAREG
aDQSEC RS
.+

MOVB
MOV

MMISC. ,aDQREG
#10,COUNT

DE(

aDQSE

INC

DEC

174402

#2,3DOREG

;ISSUE A MASTER CLEAR

P
INC
DEC
INC
DEC
DEC

BNE
MOVB
MOV

2%:

#11, COUNT

aDQSEC
MMISC. ,aDQREG

BEQ

1662
1463

#17,3DQREG

CLR
MOVB

cMP

174456

aRETURN

MJORD ,8DQSEC

INC
MP

1$:

MOV

202222 2222222222222
228221

#.E0P,RETURN

#200,3DQSEC

MOvB
MOV
MOVB

#TST6 NEXT
#A??IT,DQSTAT

MOV

MOVB

174522
174514
174506

#5,TSTNO

#3571 ,WORD

MOV

174546
174542

sdsldiadlatisl

MOV

MOVB

174560

012777
005277
027777
027777
027777

MOV
BIT

JMP

174570

112777

MoV

MSTCLR
MSTCLR

174610
174604
174574

112777

MOV

005000
174632
174626
015352

112777

1466

TG ZERO.

BNE

MOVB

:DONE

TIME
UP
DOWN
THE CHAR UP
;
DOWN
YET?

*BR IF NO
*SET TX BCC REG
:STORE IT

‘BR IF

YES

STX BCC FAILED

;SEL MISC REG
2SET COUNT TO 10

aDQSEC

*START CLOCKING BCC OUT

COUNT

;DONE

#16.aDQREG

T3EL TX BCC

YET

:BR IF NO

SEQ 0029

CZDQE
MACY11 30A(1052)
28-JuL~78
CZDQEE.P1T
25-JuUL-78 15:28

1468
1469
1470
1471
1472
1473
1474
1475
1676
1477
1478
1479

004766
004772
004774
004776
005000

005777
001401

13:43

PAGE 31

MISC.

174400

RECEIVER AND TRANSMITTER TES:S PLUS BCC
TST

@DQSEC

BEQ

104000
104400

HLT

000000

WORD :

SCOPE
0

;TEST

SEQ 0030

TESTS.

;DID BCC GET SHIFTED oUuT?

:BR [F

YES

;SCOPE

TEST

JTX BCC NOT Z2ERO

TO FORCE

JRECEIVER BCC ERROR

;THE

1480
1481

TRANSMITTER CHARACTER COUNT

;WILL BE SET TO =300

;AND THE RECEIVER CHARACTER COUNT

JWILL BE SET TO =400

;JTHUS THE RECEIVER WILL RECEIVE
:MORE CHARACTERS THAN THE TRANSMITER
s TRANSMITTED,
*BCC ERROR*

;

TEST 6

.-tttttttttttttttttttttt"ttttttt'ttttttttttittt"ttt"t.tt't.‘tt'i.t'

012737
012737
012737
104413
005000
012704
110C24

000006
005042
005130

001226
001214
00121¢

010570

38
WRO—=O VOO N WN—=O

NNNN—A—;d_a_n_a_a—a-d_n

md —d =D
) —d e
D
D e
)
D e

SN AL IV, IV, TV, TV, LV, LV, [V, LV, IV, ]

e
e
e
—

MOV
MoV

MEMCLR

1%:

G15350

2%:

MOV
MOVR
INCB
BNE

MSTCLR
MOV
JSR
=400

=300
MOV

174300

MOV

CLR RO

015376

12000°

TST6:

000100

174264

000100
000100

174244

TST
8M]
HLT
817
8NE
HLT
8IC

174252

eIr
7%

BEQ
HLT
SCOPE

#6,TSTNO

#2% ,RETURN
#TST7 NEXT

;CLEAR

THE DEVICE

:SET RO TO 2ERO

#TXBUFF R4
RO, (R4)+
RO
1%

JSET POINTER FOR BUFFER
JSTART FILLING THE BUFFER
JUPDATE THE DATA
<HAS THE SUFFER BEEN FILLED

#120001,xPOLY
R5,SYNB((

SSELECT CRC 16
FOR POLYNOMIAL
;GO PRIM THE DQ11

aDQERR,RS

;THIS IS THE CHARACTER COUNT *0OR THE
;SAVE THE DQ ERROR REGISTER

RS
A

1
#3]76,aDQERR
.+4
1
#]76,3DQERR

#]176,3DQERR
3%
10

cTHIS

IS THE

CHARACTER COUNT FOR THE RECEIVER

TRANSMITTER

.DID AN ERROR OCCUR??
;BR IF THE ERROR DID OCCUR

JHALT THE DQ ERROR BIT IS NOT SET
JMAKE SURE IT WAS A RX BCC THAT CAUSED THE ERROR

;BR IF THE RX BCC BIT IS SET
;RX BCC ERROR BIT NOT SET
;CLEAR RX BCC BIT.

;MAKE SURE RX B(C BIT
J1F

CLEAR, BR.

;SCOPE

“TEST OF TRANSM]TTER B((

THIS TEST

‘WITH POLYNOMIAL EQUAL TO '77777

*A FOUR HUNDRED BINARY (OUN'

]S CLFAR,

Joe+E

s 1o+

s ook
soeok

(ZDQE
MACY11 30A(1052)
28-JuL-78
CZDQEE.P
25-JuL-78 15:28

13:43

MISC.

d
d
d
D
ed
D e
D
e
b

b
b
e
D
e

SEQ 0031

TESTS.

sCHECK OF THE HARDWARE BY THE SOF TWARE.
;AT

THE END THE

TRANSMITTER

IS ALSO

;CHECKED TO SEE IF THE BCC WAS SHIFTED

;OUT AND THAT THE BCC WENT TO ZERO.

INOTE: THERE IS A TWO SHIFT DELAY

:BEFORE THE TX BCC STARTS.

012737
012737
012737

000007
005176
005636

005000
012704

015376

104413

177777

001226
001214
001216

015350

e
ed e

015344
000016
015354

TsT7:

2%:

e
e

CLR
MOV
MOvVB
INCB
BNE

RO
#TXBUFF R4
RO, (R4) +
RO
1%

MOV
MSTCLR
MSTCLR

CLR

177777 ,XPOLY

DQ11

;SET POINTER TO ZERO
;GET TX BUFFER
;START FILLING TX BUFFER
;WITH A BINARY
;COUNT PATTERN
;SET POLYNOMIAL TO 177777
. ISSUE MASTER CLEAR

DATA

;SET DATA OF BCC SIMULATOR TO ZERO

174142
174136

MOvVB

#22,3DQREG

174122
174112

MOVR

MOV

#123, aDQREG

MOV

THE

sSET CALCULATED BCC TO ZERO

#16,TEMPS

CLR

;CLEAR ALL

CALBCC

MOV

NTXBUFF ,@DQSEC

#-400, 3DQSEC

sSET TYPE OUT ERROR REG TO 16

JWRITE EN TX BA PRI
-SET TX BUFFER

SENTER T WRITE EN .TX CC PRI

*SET FOR 400 CHARS

MOvVB

#67 ,8DQREG

SEXIT "T'',WRITE EN,TX CC SEC

174100
174074
174064
174060

MOVB

#17 ,aDQREG

;SEL POLYNOMIAL REGISTER

MOV

#4012,aDQSEC

174040
174032
174024

CMP

CLR

MOV
MOVB

INC

D
b

005496
005410

3%:
4%:

5%:

6%:
173750

7$:

173732

aDQSEC

XPOLY ,aDQSEC
#MMISC. ,@0QREG

aDQTCSR

aDQTCSR,aDQTCSR
aDQTCSR,aDATCSR
aDQSE(
aDQSEC
aDQSEC
aDQSEC

MOV

DATA, 6%

JSR
1
BLKW

R5,SIMBCC

CLR

MOV

;SET FOR ZERO CHARS ON SEC
cLOAD IT
;SEL MISC REGISTER

cEIGHT BITS,TEST LOOP,AUTO STEP
;SET TX GO

aDQTCSR,aDATCSR ;WAIST TIME.

(MP
cMP
INC
DEC
INC
DEC

;WAIST
;WAIST
:CLOCK
;CLOCK
;CLOCK
s CLOCK

TIME
TIME
UP=--DOWN~-UP=-~-~
DOMWN==~

COUNT

JSET COUNT TO O

CALBCC,7$

sSET _CALCULATED BCC FOR SUB ROUTINE

;SET DATA FOR SUBROUT INE

;GO TO BCC SIMULATOR ROUTINE
JTHIS IS THE NUMBER OF SHIFTS FOR ROUTINE
sTHIS IS WHERE THE CHAR IS PLACED

BLKW
MOVB

1
MISC. ,aDQREG

;THIS IS THE PREVIOUS BCC CALCULATED
;RESELECT THE MISC REG

DE(

ac1SE(

;CLOCK DOWN=<-

INC

112777

#7,TSTNO

#2$ _RETURN
#TST10,NEXT

001254

e
e
e
b
e
e
h

mov

MOV
MOV

MEMCLR

1746126

TEST 7

:tttEftt*ttttQiQttfi*tfi't"ttttittt'*'ttttt*ttt.i.tfitttt'tit.ttttttttt

1%:

VTN NN NN

RECEIVER AND TRANSMITTER TESTS PLUS BCC
;THE BCC WITH A SHIFT BY SHIFT

(9,1,]

;DATA PATTERN IS RUN THROUGH

T VHA NN LW

e VAV, IV IV, IV IV IV TV u\\nmmmmmmmmmmmgx
3o gogogooogmmmmmmmmmmbbb
BB DDWNW
NOWVNBWN
=200V
NOWVEBWNI—=OVONOWNESWN
=00 gWgwgwwwwr\)NN
NOWNB
WO V00~

1524
1525
1526

—

PAGE 32

MOVB

aDQSEC

#16,3DQREG

s CLOCK UP=-~
JSEL

THE

TX BCC REGISTER

TO DO

CZDQE
MACY11_30A(1052)
28-JuL-78
CZDQEE.P11
25-JUL-78 15:28
1580
1581
1582
1583
1584
1585
1586
1587
1588
1589
}gg?

005436
005444
005452
005454
005456
005460
005464
005470
005476
005500
005504

017737
023737
9001401
104003
000241
006037
005237
023727
001335
105237
001325

173730
015344

1592
1593
1594
1595
1596
1597
1598
1599
1600

005506
005512
005520
005522
005526
005532
005536
005544
005552

005037
112777
000241
006037
005277
005377
112777
017737
023737

015352
000012

1602
1603
1604
1605
1606
1607

005562
005564
005570
005576
005600
005606

104003
005237
022737
001345
112777
005277

1609

005616

1601

1608

1610
1611
1612

}@}2

005560

005612

005624
005630
005632

005634

001401

005377

112777

005777
001401
104000

005406
015352
015352

001252
001252

000010

015354

015344
173640
173634
000016
173622
015344
015352
000020

173650

000016

173544

MOV
cMP
BEQ
HLT
CLC
ROR
INC
(MP
BNE
INCB
BNE

aDQSEC, TEMPS
CALBCC, TEMPS
.t
3

CLR
MOVB
CLC
ROR
INC
DEC
MOVB
MOV
CMP

COUNT
#MISC. ,aDQREG

BEQ

HLT
INC
CMP
BNE
MOvVB
INC

015352

173562

173542

8%:

173624
001252
001252

000012
173560
173554

13:43
PAGE 33
MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

DE(

MOVR
TST
BEQ
HLT

104400

6%
COUNT
COUNT ,48.
48
DATA

CALBC(
aDQSE(
aDQSEC
#156,aDQREG
aDQSEC, TEMPS
CALBCC, TEMPS
L+
3
COUNT
#16.,COUNT
8%
MMISC. ,aDQREG
aDQSE(
aDQSEC
#16,aDQREG
aDQSEC
L+

SCOPE

JSAVE IT IN TEMP4
JARE THE CALCULATED AND RECEIVED RESULTS THE SAME??
;BR IF GOOD (SAME)
;BCC(S) ARE DIFFERNT..
;CLEAR THE CARRY BIT OF PSW
;UPDATE MY DATA LOCATION
;UPDATE THE COUNT OF BITS PER (HAR
;1S THIS CHARACTER DONE YET??
;BR IF CHAR NOT DONE
;GET NEW CHAR
JHAVE ALL CHARACTERS BEEN DONE
JINIT COUNT
;RESELECT THE MISC REG
;CLEAR CARRY
JSHIFT OUT CALCULATED B(CC
;CLOCK UP==s CLOCK DOWN=--sSEL _TX BCC REGISTER
;SAVE IT IN TEMP4
JARE THEY THE SAME??

;BR IF

SAME (GOOD)

:BCC DIFFERENT
sUPDATE COUNT
JHAS ALL THE BCC BEEN SHIFED JuT
;BR IF MORE TO DO
;SELECT THE MISC REGISTER
;GIVE ONE LAST CLOCK UP-JAND CLOCK DOWN--

sSEL

THE TX BCC REGISTER

;DID THE TX BCC GO TO ZERO
;BR IF GOOD
;TX B8CC NOT ZERO

;SCOPE

TEST

1615
1616
1617
1618

}g}g

;
JTEST OF RECEIVER BCC
;WITH POLYNOMIAL EQUAL

1621

;A FOUR HUNDRED BINARY COUNT

1623

JTHE BCC WITH A SHIFT BY SHIFT

;CHECK OF THE HARDWARE (OMPARE

e B

;WITH THE

sNOTE

e
b
i

1633

1634
1635

TO 177777

;DATA PATTERN IS RUN THROUGH

SEaRRReRe
'\)—‘8
00 ~NON N S

1622

SOF TWARE.

THERE IS ONE CHARACTER TIME DELAY
JFOR THE BCC TO START.
JALSO THE IS ONE PAD (HAR
NEEDED AT THE END OF THE DATA.

;

005636

005644
005652

012737

012737
012737

000010

005676
006662

0C1226

001214
001216

TEST %
:‘..'Eé..'9.."."...'."'.'.'...'...."....".'."'."."...".'..."
TST10:

MOV

MOv
MOV

#10,TSTNO

#.% RETURN
#TST11 NEXT

SEQ 0032

CZDQE
PHACY‘H 30A€1052)
ZggJUL-78
CZDQEE.P1
25-JuL-78 15

1636
1637

005660
005662

104413
012737

177777

015350

1638
1639
1640
1641
1642
1643
1644
1645

005670
005676
005700
005702
005706
005712
005720
005726

012737
1046412
104412
005037
005037
112777
012777
112777

015344
015354

1647
1648
1649
1650
1651
1652

005742
005750
005756
005764
005772

112777
012777
112777
012777
112777
013777

000024
016000
000065
177777
000017
015350

173420
173414
173404
173400
173370
173364

006014
006022
006030
006036
006044
006050
006054

012777
012777
012737
013737
005137
005037
006037

004012
010001
000010
015354
015340
001250
015340

173350
173330
015352
015340

1646

1653

1654
1655
1656
1657
1658
1659
1660
1661
1662

1663

005734

006060
006064

006072

012777

112777

106037
042777

053777

1664
1665
1666
1667
1668
1669
1670

006100
006104
006110
006114
006116
006122
006126

005277
005377
005337
001355
105237
005037
013737

1672
1673
1674
1675
1676
1677
1678
1679
1680
1681
1682
1683
1684
1685
1686
1687
1688
1689
1690

006140
006146
006152
006160
006164
006166
006170
006172
006200
0062
006210
006214
006222
006230
006234
006240
006246
006254
006262

013737
005137
013737
004537
000001
000001
000001
112777
005037
37
106037
042777
053777
005277
005377
112777
017737
023737
001401

1671

1691

006134

006264

005337

104003

000015

H 3
13:43 PAGE 34
MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

001254

000020
016000

173450
173444

177400

173430

000121

000012

001250
000200

001250
173266
173262
015352
015354
015352
015354

006166

015354
015340
015344
012064

000012

001250

015340
001250
200
001250
173136
173132
000015
173120
015344

1%:
2%:

173434

MEMCLR
MOV

4%:

#24 ,3DQREG
#RXBUFF ,@DQSEC
#65,3DQREG
#-1,3DQSEC
#17 ,8DQREG
XPOLY,@DQSEC

sSEL THE RX BA SEC
;SET FOR THE PAD CHAR.
SEXIT T, WRITE EN,RX CC SEC
sSEL RX CC SEC FOR ONE PAD (HAR.
sSEL THE POLYNO REGISTER
sLOAD IT WITH THE POLY

#4012 ,8DQSEC
#10001,3DQRCSR
#8., COUNT
DATA, TMPDAT
TMPDAT
TEMP3
TMPDAT

sEIGHT BITS TEST LOOP AND AUTO STEP
;SET RX ACTIVE AND GO!!
;SET FOR ONE CHAR TIME DELAY

TEMP3,aD0SEC

;PLACE DATA ON BIT WINDOW

MOV
MOV
MOV
MOV
coM
CLR
ROR

173170

173150
173142

173122
(001252
001252

7%:
8%:
9% :

JENTER 'T'",WRITE EN,RX (C PRI

;SET FOR FOUR HUNDRED CHARS

;SEL THE MISC REGISTER

aDQSEC
aDQSEC
COUNT
43
DATA
COUNT
DATA,8$

;CLOCK UP=--;CLOCK DN=--s CHAR DONE??
sBR IF NOT DONE
;UPDATE DATA
JINIT COUNT
cMOV DATA TO SUB ROUTINE USE AREA

MOV
coM
MOV
JSR
1
BLkw
BLKW
MOvVB
(LR
ROR
RORR
BIC
BIS
INC
DEC
MO /B
MOV
(MP
BEQ

DATA, TMPDAT
TMPDAT
CALBCC,9%
RS,SIMBCC

;SAVE DATA
;COMPLIMENT DATA FOR BIT WINDOW USE
;MOV CALCULATED BCC TO SUB ROUTINE USE
2GO AND CALCULATE BCC (SOF TWARE)
sTHIS IS NUMBER OF SHIFTS TO BE DONE
;THIS IS WHERE THE DATA IS PLACED
sTHIS IS WHERE THE PREVIOUS BCC IS PLACED
;RESELECT THE MISC REGISTER
JINIT LOC
sSHIFT OUT DATA BIT
sCATCH IT IN TEMP3
sCLEAR THE BIT WINDOW
;LOAD THE DATA

DEC

6$%:

MISC. ,30QREG

JWRITE EN,RX BA PRI
;LOAD THE RX BA

INC
DEC
DEC
BNE
INCB
(LR
MOV

006166

006170

#-400,3DQSEC

;SET TYPE OUT REG TO 15
s ISSUE A MASTER CLEAR

TEMP3
#3117 ,aDQSE(

BIS

015340

#15,TEMPS

;SAVE THE DATA
cCOMPLIMENT IT FOR BIT WINDOW USE.
JINIT LOC
sSHIFT OUT ONE BIT OF DATA
JBRING IT IN FROM CARRY
;CLEAR THE BIT WINDOW

RORB
BIC

5%:

sSET CALBCC TO ZERO
;SET DATA TO ZERO

MOvVB
MOV
mMOvB
MOv
mMov8
MOV

173300

173272

CALBCC
DATA

#20,aDQREG
#RXBUFF ,@DQSEC
#121,3DQAREG

MOVB

3%:

;CLEAR THE DEVICE
;SELXPOLY 10 177777

MOV
MSTCLR
MSTCLR
CLR
CLR
MOvB
MOV
MOVB

MOV

173354

#177777 ,XPOLY

SEQ 0033

o T

1
1
MMISC. ,aDQREG
TEMP3
TMPDAT
TEMP3
#8177,aDQ5¢ «
TEIMP3,aDQSEC
aDQSEC
aDQSEC
#15,@DQREG
a@DQSE(, TEMP4
CALBCC, TEMPS
!

;SET

_SUBROUTINE

TO ONE

;CLOCK UP~~~
;CLOCK DN==JSEL _RX BCC REGISTER
sSAVE THE B(C(
;1S 1T CORRECT??
JBR [F GOOD

SBCC NOT WHAT EXPECTED

LESS

THAT RX GETS

CZDQE
MACY11_30A(1052)
28-JuL-78
CZDQEE PN
25-JuL-78 15:28
1692
1693
1694
1695

000003
015344
015344
012064

PAGE 35

MISC.

RECEIVER AND TRANSMITTER TESTS PLUS BC(C

COUNT
#8.,COUNT

015352

015370
006350
015366

10%:

21s:

015344
015366
000377
015356
015340

DATA
5$
#3,L0C1

CALB(CC,21%
CALBCC,STORE1
RS,SIMBCC
1

CALBCC, SAVB(C

STORET,CALBCC

#377 ,DATA
SAVB(C, TMPDAT
TMPDAT

12%

015356
015357
015340

1°%:

015357

16%:

12%
SAVB((+1,DATA
#377,TMPDAT

12%:

COUNT

15%:

13%:

172656

14%:

172636
172630

172610

001252
001252

sCLEAR THE CARRY BIT
JUPDATE THE COUNT

;1S THE CHARACTER DONE?~
*BR IF CHAR NOT DONE
;UPDATA DATA
:BR IF NOT ALL CHARS DONE.
JPOINTER«wax
s SAVE CALBCC

;GO FINISH THE BC(CC

;SHIFTS REQUIRED
;DATA (CHARAC(CTER

JPREVIOS B(C

;SAVE THE B(C
;RESTORE THE BCC
;DATA =377
;PUSH IN THE LOW BYTE OF
JINTO THE RX

THE BCC

THE CALBCC TO DATA FOR SUBROUTINE
THE HIGH BYTE OF CALBCC TO PLACED INTO THE RECEIVE

TMPDAT

PREPARE

IT FOR

TMPDAT

JPREPARE

IT FOR THE BIT WINDOW

DATA,13$%

CALBCC,14%
R5,SIMBC(C
1

1
#MMISC. ,aDAREG

TEMP3

#3117,aDQSEC

TEMP3,RDQSEC
aDQSE(
aDQSEC(
#15,8DQREG

aDOSE(C, TEMPS
CALBCC, TEMPS

015370
000002

SEQ 0034

TESTS.

;SHIFT THE DATA

SAVB((,DATA
;MOVE
SAVB(C(C+1, TMPDAT sMOVE

TMPDAT

022737
001665
02273%7

015354

N b ed d e ed b ek =D D D
SEIRRRUR
LT O NONEB WOV
VIS
NN
=
VR T B WN=0O IBIX O?OOO

d ed
d
d
d
e
D
b
D
d
)
d —d e
d e
ad
) e
e
D
D
d e
D e
e
D
ed
e
b e
b

006166
015352
000010

NN NNNNNNNNNNNNVNNNNNNNNNNNNNNNY NN NN NV

—

1697
1698
1699
1700

006266
006270
006274
006300
006306
006310
006314

13:43

13%
COUNT

015352

#8.,COUNT

015372¢

#2,1 001

015370

#0007 ;

5%
L0

1-¢

THE BIT WINDOW

;GO TO MAIN PART OF TEST
;JMOVE THE HIGH BYTE OF THE CALBCC TO DATA
;PAD CHAR FOR RX

JINIT COUNT (THIS IS FOR NUMBER OF BITS PER (HAR)
;LOAD THE CHAR FOR SUBROUTINE
;LOAD THE CALBCC FOR THE SUBROUT INE
;GO TO THE SUBROUTINE

STHIS IS THE NUMBER OF SHIFTS TO BE DONE
sTHIS IS THE CHAR FOR THE SUBROUTINE
sTHIS IS THE PREVIOUS BCC

;SEL THE MISC REGISTER
SINIT LOC
ISHIFT QUT A BIT OF DATA
:BRING IT FROM CARRY INTO TEMP3

:CLEAR THE BIT WINDOW
;PLACE DATA ON THE BIT WINDOW
JCLOCK UP==;CLOCK DN=~-=JSEL THE RX BC( REGISTER
;SAVE IT IN TEMPS
;1S THE BCC CORRECT??
:BR IF GOOD
sBCC ERROR IN RX

:CLEAR THE CARRY BIT
SSHIFT THE CHARACTER TO THE RIGHT
JUPDATE THE COUNT
;IS THIS CHARACTER DONE
;BR _IF NOT DONE

JALTER

THE RETURN POINTER

JWHERE SHOULD | GO??
J1F LOC1-2 GOTO 11%

13:43

CZ0Qt
MACY11 30A(1052)
28-JuL-78
CZDQEE P
25-JuUL=-78 15:28

1748
1749
1750
1751
1752
1753
1754
1755

006644
006646
006652
006654
006656
006660

001672
017705

PAGE

MISC.

TST
8PL
HLT
SCOPE

;IF LOC1=1 GOTO 16%
;SAVE THE ERROR REGISTER
;DID AN ERROR OCCUR??
;BR IF NO ERROR

;DQ11

ERROR FLAG SET

;SCOPE THIS TEST

JCRC 16: X164X15¢x2+1
JNOTE: IN THIS TEST IT
THE

HARDWARE

IS UP TO

TO DISCOVER

AN ERROR IF ONE OCCURS.
TEST
CEA

00001
006726

001226
001216

1768

120001

015350

1770
177
1772
1773
1774

SEQ 0035

TESTS.

sTEST OF TRANSMITTER AND RECEIVER
:BCC WITH A POLYNOMIAL OF

1765

1769

16$
aDQERR,RS
RS

BEQ
MOV

172514

1758
1759
1760
1761
1762
1763
1766
1767

RECEIVER AND TRANSMITTER TESTS PLUS BCC

1756
1757

1764

010202

AN AN AR RAAN RN RN AN AN AR

TST11:

172450

MOV
MOV
MSTCLR
MOV
JSR
MoV
TST
BPL
HLT

SCOFE

RN AR RN RN AN NRANRN RN AN ANARARANNAN NN

#11,TSTNO
#TST12,NEXT

CLEAR DQ11 WITH A MASTER CLEAR

#120001,xPOLY

;LOAD SELECTED POLYNOMIAL

PC,STBCC

s TRANSFER CHARACTERS.

;DID AN ERROR OCCUR??

aDQERR,RS

;SAVE

INTO XPOLY.

THE ERROR REGISTER

;BR IF NO ERROR

;AN ERROR OCCURED

STEST OF TRANSMITTER AND RECE]VER
:BCC WITH A POLYNOMIAL OF
SCRC

12:

JNOTE:

X12¢XT1+X3¢X2+X+1
IN THIS TEST IT IS UP TO

;THE

HARDWARE

TO DISCOVER

00 Q0
lele)
WY
—

b —d

D ed

TEST

172404

(ole]

007401
010202

000012
006772

o
et
oo

CRANARNARAN AT RARANNANRNAANN

[

d ok

)

33X

e —b

;AN ERROR [F ONE OCCURS

TST12:

MOV

NN RN R AR

AP AN AN RAANNRANAANANRANR

NAARRAANNATRANR

#12,TSTNO

#TST13,NEXT

#7401,%XPOLY
PC,STRC(

aDQERR,RS

RS
L)
1

sCLEAR DQ11 WITH A MASTER (LEAR

¢cLOAD SELECTED POLYNOMIAL
; TRANSFER CHARACTERS.

:SAVE

THE ERROR REGISTER

:DID AN ERROR OCCUR??
JBR IF NO ERROR
AN ERROR OCCURED

INTO XPOLY.

SERERESR RRRESSR B R S E SR OB R

CZDQE
MACY11 _30A(1052)
28-JuUL~78
CZDQEE P11
25-JUL~78 15:28

13:43

MISC.

RECEIVER AND
;TEST OF

SEQ 0036

TESTS.

TRANSMITTER AND RECEIVER

IN THIS TEST IT IS UP TO

s THE HARDWARE

TO DISCOVER

b
b

TEST 13

Pusir

b
D
d
b md

TRANSMITTER TESTS PLUS BCC

AN ERROR IF ONE OCCURES
M

oty Qi

JNOTE:

012737
012737

et Duatr Gotr Dot Puiir Gt

;BCC WITH A POLYNOMIAL OF
JCRC/CCITT: X16+X12+4X2+X+1

00 00 00 0o 0o 00 0o 00 00 OO

PAGE 37

000013
007036

001226
001216

102010

015350

010202

AASASALS

1ST13:

SRSttt

MOV

dlR

#13,7STNO
#TST14 NEXT

2222228232222

222

;CLEAR DQ11 WITH A MASTER CLEAR

#102010,XPOLY

172340

2222222222822

;LOAD SELECTED POLYNOMIAL

PC,STBCC

s TRANSFER

;DID AN ERROR OCCUR??

aDQERR RS

INTO XPOLY.

CHARACTERS.

;SAVE THE ERROR REGISTER

.+
1

¢BR IF NO ERROR
;AN ERROR OCCURED

;TEST OF TRANSMITTER AND RECEIVER

*BCC WITH A POLYNOMIAL OF
;LRC 8: X8+1

sNOTE:

IN THIS TEST

. THE HARDWARE

IS UP TO

T( DISCOVER

JAN ERROR IF ONE OCCURES.
TEST

007036
007044
007052
007054
007062
007066
007072
007074
007076
007100

012737
012737

000014
007102

001226

000200
010202

015350

001216

TST14:

SRS 2222222022222
222
X2 R
RN

MOV

#14,TSTNC
#TST1S NEXT

;CLEAR DQ11 WITH A MASTER (LEAR

#200,XPOLY

sLOAD SELECTED POLYNOMIAL

PC,STBCC

172274

s TRANSFER CHARACTERS.

a8DQERR,R5

sSAVE THE ERROR REGISTER

RS
.+

;DID AN ERROR OCCUR??
;BR IF NO ERROR

;AN ERROR OCCURED

;TEST OF TRANSMITTER AND RECEIVER
SBCC WITH A POLYNOMIAL OF

SLRC 16:

:
<NOTE

X16+1
IN THIS TEST

s THE

_HARDWARE

IS UP TO

TO DISCOVER

JAN ERROR [F ONE OCCURES
TEST

INTO XPOLY.

CZDQE
MACY11 30A(1052)
28-JuL-78
C2DQEE.P11
25-JUL-78 15:28
‘]&,0

1861
1862

1863
1864
1865
1866

1867
1868
1869
1870
1871
1872
1873
1874
1875
1876

13:43 PAGE 38
MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.
.-tttttttt*tt'ttttttttttt"ttittttttttttttttttfitfifitttttttttttttttttttt

007102
007110

007116
007120
007126
007132

007136
007140
007142
007144

012737
012737

104412
012737
004737
017705
005705
100001
104001
104400

000015
007146

001226
001216

100000
010202
172230

015350

TST1S5:

MOV
MOV

MSTCLR
MOV
JSR
MOV
TST
8PL
HLT
SCOPE

#15,TSTNO
#TST16 NEXT

#100000,xPOLY
PC,STBCC
aDQERR,RS
RS
. +4
1

:CLEAR DO11 WITH A MASTER CLEAR
;LOAD SELECTED POLYNOMIAL INTO XPOLY.
:TRANSFER CHARACTERS.
:SAVE THE ERROR REGISTER
:DID AN ERROR OCCUR??
:BR IF NO ERROR
;AN ERROR OCCURED

:
;TEST OF RECEIVER AND TRANSMITTER

}ggg

:BCC USING CRC 16 FOR POLYNOMIAL.

1879
1880

;THIS TEST USES IDLE MODE TO
:GET INTO TRANSPARENCY

}ggg

;1T MUST BE REPORTED BY THE HARDWARE.

1881

;AND IF AN ERROR SHOULD OCCUR

1884

1885

;

1886

007146
007154
007162
007170
007172
007174
007200
007202
007204
007206
007210
007216
007222
007224
007226
007232

012737
012737
012737
104413
005000
012704
110024
105200
001375
104412
012737
004537
177400
177400
017705
005705

1904
}ggg

007236
007240

104001
104400

1907
1908

TEST 16

‘-tttttttttttttttttttittt'ttttt'ttttttl'ttfitttittttttttttttttitttttttt

1887
1888
1889
1890
1891
1892
1893
1894
1895
1896
1897
1898
1899
1900
1901
1902
1903

007234

100001

000016
007206
007242

001226
001214
001216

015376

1200017
010570
172134

TST16:

1%:

015350

2%:

MOV
MOV
MOV
MEMCLR
CLR RO
MOV
MOVB
INCB
BNE
MSTCLR
MOV
JSR
-400
=400
MOV
TST
BPL

HLT
SCOPE

#16.TSTNO
#2% ,RETURN
HTST17 NEXT
HTXBUFF ,R4
RO, (R4)+
RO
18
#120001,XPOLY
R5,SYNB(C
aDQERR,RS
RS
YA
1

:CLEAR THE DEVICE
:SET RO TO ZERO
:SET POINTER FOR BUFFER
;START FILLING THE BUFFER
;UPDATE THE DATA
JHAS THE BUFFER BEEN FILLED
JSELECT CRC 16
FOR POLYNOMIAL
;GO PRIM THE DQ11
:THIS IS THE CHARACTER COUNT FOR THE RECEIVER
JTHIS IS THE CHARACTER COUNT FOR THE TRANSMITTER
;SAVE THE DQ ERROR REGISTER
;DID AN ERROR OCCUR??
:BR

}g};

JBCC WITH A POLYNOMIAL GF

1913
1914
1915

TEST OF

THE

ERROR DID NOT OCCUR

:HALT THE DQ ERROR BIT
:SCOPE THIS TEST

1909
1910

SEQ 0037

TRANSMITTER AND RECEIVER

177777

;THIS TEST USES IDLE MODE 10
JGET INTG TRANSPARENCY. [F AN
;ERROR SHOULD HAPPEN, THE HARDWARE

IS SET

30A(1052)
28-JUL-78
25-JUL~78 15:28

mn3
13:43 PAGE 39
MISC. RECEIVER AMND TRANSMITTER TESTS PLUS BCC TESTS.

SEQ 0038

:MUST FLAG IT.

;

TEST 17

"tttttttttttttttttttttttttttttttt*tfitttttttttttttttttttttttttttttfittt

012737
012737
012737
104413
005000
012704

110026
105200

000017
007302
007336

001226
001214
001216

015376

012737
004537
177400

177400
017705

005705
100001

177777
010570

015350

MOV
MOV
MOV

#17.TSTNO
#23 ,RETURN
#TST20, NEXT

MOV

#TXBUFF ,R4

BNE

MEMCLR
CLR RO
1%:

001375

104412

TST17:

MOVB
INBB

2% :

MSTCLR

MOV
JSR
-400

-400
MOV

172040

TST
BPL

104001
104400

HLT
SCOPE

RO, (R&)+
RO

#177777 ,XPOLY
RS, SYNBCC
ADOERR RS
RS
. +4
1

:CLEAR THE DEVICE
*SET RO TO ZERO

*SET POINTER FOR BUFFER

:START FILLING THE BUFFER
SUPDATE THE DATA
:HAS THE BUFFER BEEN FILLED
:ISSUE MASTER CLEAR
:-SELECT 177777 FOR POLYNOMIAL

:GO PRIM THE DQ11

:THIS IS THE CHARACTER COUNT FOR THE RECEIVER
:THIS IS THE CHARACTER COUNT FOR THE TRANSMITTER
:SAVE THE DQ ERROR REGISTER
:DID AN ERROR OCCUR??
:BR IF THE ERROR DID NOT OCCUR
*HALT THE DQ ERROR BIT IS SET
:SCOPE THIS TEST

*TEST OF TRANSMITTER AND RECEIVER
:BCC WITH ALL POLYNOMIALS
*BETWEEN 000000 AND 177777
:SENDING ONE CHARACTER (351)
;AND CALCULATING wHAT THE BCC
:SHOULD BE AND COMPARING IT
*WITH THE TRANSMITTER BCC AND RECEIVER BCC

INOTE:

SW 09=1 WILL FREEZE THE POLYNOMIAL
:WHEN SW 09 IS ASSERTED.

TEST 20

FRREXRLRE
—-O0

d
cmd
d e
e
) ed e
e
—d
—

008
NN

:tttttitkttttfitttttttttttt*tit*tttttttt*ttttttttttttfittt*ttt*tttttttt

012737
012737
012737
012737
005037

000020
000003
007472
007372
015350

004737
004537
000010
000351
000000
112777
012705
017701
023701
001401

011110
012064

012705

000016

104412

1046002

000015

000015
171742
015344

001226
001222
001216
001220

TST20:

1%:

171750

MOV
MOV
MOV
MOV
CLR

#20,TSTNO
#3, 1COUNT
#TST21
. NEXT
#18,L0CK
XPOL Y

JSR
JSR
8.
351
0
MOVB
MOV
MOV
(MP
BEQ

PC,TYBCC
RS,SIMBCC

MSTCLR

HLT

MOV

#15.3DOREG

#15.RS
aDASEC.R1
CALBCC,R?
4

#16,RS

SINIT SET XPOLY TO ZERO
;GO AND PRIM THE DQ11
GG AND CALCULATE WHAT THE BCC SHOULD BE
STHIS IS FOR EIGHT BITS PER CHAR (NUMBER OF SHIFTS)
:THIS IS THE DATA CHARACTER
STHIS IS THE PREVIOUS BCC
*SEL TYE RX BCC REGISTER
:SAVE THE REGISTER
*SAVE THE BCC
*IS THE BCC RIGHT??
‘BR IF YES

:BCC ERROR

SSEL THE TX BCC REGISTER

CZDQE
MACY11_30A(1052)
28-JuL-78
CZDQEE.PY
25-JuL-78 15 : 28
1

007444
007450

013701
023701
104401

005237
007341

13:43

MISC.

015362
015344

015350

RECEIVER AND TRANSMITTER TESTS PLUS BCC

MOV
CMP
BEQ
HLT
SCOP1

SEC16,R1
CALBCC,R1
R
2

BNE
SCOPE

INC

104400

TESTS.

sTHIS IS WHERE THE TX BCC WAS STORED
21S IT RIGHT??
:BR IF GOOD
:TX B8CC ERROR
:DOES THE USER HAVE SW09=17?

XPOLY

:UPDATE THE POLYNO

;BE IF NOT ALL POLYNO HAVE BEEN DONE
;SCOPE THIS TEST

*TEST OF BIT 06 OF MISC REGISTER
*POLYNOMIAL 16~24
sTEST WILL

SEND ONE

CHARACTER AT

;A TIME CHECKING THAT THE BCC
;OF RECEIVER AND TRANSMITTER

:ARE CORRECT.

CHARACTER SENT: 000-377
;s

012737
012737

000021
012364

001226
001216

TEST 21

RN AR AR R RAN R

AR R IR

TSr21:

#21,TSTNO

MoV

MOV
JPART

RA R IR

AR RRRRRARRA

#.EOP _NEXT
READ/WRITE

TEST OF

AR NAARRRRAARREANRRRNRRRA

POLY 16-24

sTEST OF ALL READ WRITE BITS IN POLY 16-24
;BY RUNNING A BINARY COUNT PATTERN TROUGH
;THE REGISTER.

012737
005037

007520
001254

001220
1%:

MOV
CLR
MSICLR

#MISC. ,aDQREG
#81T6,aDQSEC

MOV

aDQSEC, TEMP4

CMP
BEQ
RLT

SCoP1
INCB
BNE

001254

#18,L0CK
TEMPS

MOVB
MOV

MOVB
8IS

#17,aDQREG
TEMPS ,aDQSEC
TEMPS , TEMP4
L +4

TEMPS
1%

:PART 2
NNNNNHNO

007472
007500

—_, e

SRt SEEFENEREREEL
TR r::

PAGE 40

015344
007614

001220

015350

000015
171524

171526

28:

(LR
MOV

MSTCLR
MOV
JSR

;SEL MISC REG
;SEL POLY 16-24

;SEL POLY REGISTER
sLOAD WITH CHAR.
sREAD CHAR BA(CK.

;IS IT CORRECT?
:BR IF YES.
:POLY READ/WRITE ERROR.
:LOCK ON CHAR (SW09=1)
:UPDATE CHAR.
:BR IF MORE TO GO

RX AND TX BCC TESTS

CALBCC
#2%,L0CK

;ZERO_EXPECTED BCC
:SET FOR_SWO09=1

#200,XPOLY
PC, TXBCC

:GOTO SUBROUT INE

Mov

#15,RS

MOV

aDQSEC R

MOVB

JSET FOR LOCK ON TEST(SW09=1)
;ZERQO POINTER
JINIT DA

#° S ,aDQREG

ZINIT DQ1]
:SEL ‘LRC 24"

:SEL BCC REG
;

JREAD BCC REG.

SEQ 0039

CZDQE
MACY11 _30A(1052)
28-JuUL~78
CZDQEE.P11
25-JuL-78 1 5:28

2028
2029

007646
007652

023701
001401

13:43 PAGE 41
MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

015344

cMP
BEQ

000016

015362
015344

CALBCC,R1
. +h

;1S BCC CORRECT?
.BR IF GOOD.

#16,R5

;SEL BCC REG.

CALBCC R
. 4

;DID IT COMPARE?
:BR IF GOOD.

;BCC ERROR.

SEC16,R1

sGET SAVED BCC

015344
015344

;8CC_ERROR

CALBCC R4
CALBCC

#MMISC.,30QREG

;SAVE GOOD BCC
:ZEROC SOF TWARE B((
-SEL MISC REGISTER

#15 RS

*SET FOR ERROR

:BCC NOT O

#BIT6 3DASEC
RS, 3DOREG
aDASEC,R1
R1
.+4

171434

#16 RS

015344
000012
171372
171366
000016
171354
171352

R4, CALBCC
#MISC. ,aDQREG
aDQSEC
aDQSEC
#16,R5
R5,aDQREG
aDQSEC ,R1
R1
CALBCC.R1
.+

SEC16X,R1

R1
. +h

171374

838
W
N

¢
o
G
S
G
G

NONONINY
= — —
AN OSHMNLO

———aaaaaaaaa

jelalelelelelelele

Juur i

lelelelelelolelolel

015344

:SEL BCC REG
*READ BCC
SIS IT 0
:BR IF YES.

000016
015364

000007
000012
171320
171314
015352

#7,COUNT
MMISC. ,a8DOREG
aDQSEC
aDQSEC
COUNT

000015
171274
171272

RS,aDQREG
aDQSEC,R1

015344

:SEL POLY 0~15

BEQ
HLT

SCoP1
INCB
BNE

MEMCLR
MEMCLR

CALBCC,R1
.6

CALBCC

SCOPE

*USERS BCC RECEIVER TRANSMITTER TEST

STHIS

TEST ALLOWS

THE USER

SEQ 0040

MACY 11 30A(10 52)
28-JuUL-78
)
78
CZDQEE.PN
15:28
25-JuUL-78

CZDQt

13:43

2084
2085
2086
2087

PAGE 42

MISC.

RECEIVER AND TRANSMITTER TESTS PLUS BCC

TESTS.

;USE ANY POSSIBLE POLYNOMIAL
;OF HIS CHOICE.
sTHE TEST USES THAT POLYNOMIAL
;ON A FOUR HUNDRED, EIGHT BIT,BINARY COUNT
;DATA PATTERN
sNOTE: THE BCC OF THE TRANSMITTER AND RECEIVER
;ARE NOT CHECKED FOR CORRECT CONTENT
sONLY THAT THE HARDWARE DID NOT
;FLAG AN ERROR.

010130
010136
010144
010146
010150
010152
010154
010162
010166
010172
010174
010176
010200

012737
012737
104402

010130
010130

001216
001214

016470
000000
104414

017737
004737
017705
005705
100001
104001

000770

015350

USEBCC: MOV

MOV
TYPE
MPOLY
HALT
CKSWR
MoV
JSR
MOV
TST
BPL
HLT
B8R

#USEBCC NEXT
#USEBCC,RETURN

, XPOL Y
ASWR

PC,STRCC

aDOERR,
RS
RS
44
3

;CHECK FOR <G>

SEQ 0041

CZDQE
MACY11_30A(1052)
28-JuL-78
CZDQEE.P11
25-JUL-78 15:28

2110
2111
2112
2113
2114
2115
2116
2117
2118
2119

010202
010206
010210
010212
010216
010220
010222
010226
010230
010236

011637
104413
005000
012704
110024
105200
001375
105077
012777
112777

2121
2122
2123
2126
2125
2126
2127
2128
2129
2130
2131
2132
2133
2134
2135
2136
2137
2138
2139

010252
010260
010266
010274
010302
010310
010314
010322
010330
010336
010344
010352
010360
010366
010374
010402
010410
010416
010424

112777
012777
112777
012777
112777
005077
112777
012777
112777
012777
112777
012777
112777
013777
112777
013777
112777
012777
005037

2120

2140
2141
2142
2143
2144
2145
2146
2147
21648
2149
2150
2151
2152

2153
2154
2155
2156
2157
2158
2159
2160
2161
2162
2163
2164
2165

010244

010430
010434
010442
010446
010454
010462
010466
010472
010474
010500
010502
010504
010506

010514
010522
010526
010530
010534
010540
010546
010550
010554
010556
010562
010564
010566

012777

005037
012777
005077
012777
012777
005037
105237
001375
105237
001372
104000
022626
042777

112777
005077
000240
005037
005037
032777
001007
105237
001371
105237
001366
104000
000207

D 4
13:43
PAGE 43
MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

015360

STBCC:

015376

171140
016000
000121

177400

000022
015374
000023
177776
000024
171056
177777
015376
000127
1776400
000011
015372
000017
015350
000012
004010
001244
001246
0105064
170710
0000017
000041
177776
001244

1%:

171134
171124

171120

MOV

171110
171104
171074
171070
171060
171046
171042
171032
171026
171016
171012
171002
170776
170766
170762
170752
170746
170712

170704
170702
’$:

001244
001246
000100
001244
001246

170650
170646

170612

(SP) ,SAVEP(

sSAVE PC OF ENTERING ROUTINE

RO
#TXBUFF
R4
RO, (R4)+
RO
1%
aDQREG
#RXBUFF ,@DQSEC
#121,3DQREG

;SELECT THE RX BA PRI.
;LOAD THE RX BA
s*ENTER T,WRITE ENABLE ,RX CC,PRI.

#-400,aDQSEC

MOv8B
#22 ,aDQREG
MOV
#SYNC ,aDQSEC
Mov8
#23,3DQREG
MOV
#-2,aDQSEC
MOovB
#24 ,3DQREG
CLR
aDQSEC
MOovB
#65,3DQREG
MOVA-1,3DQSEC
MOVB
#26,3DQREG
MOV
#TXBUF
F ,aDQSEC
MOVB
#127 ,3DQREG
MOV
#-400,aDQSEC
MOVB
#11,3DQREG
MOV
. SYNC,@8DQSEC
Mov8
#17,aDQREG
MOV
XPOLY ,@DQSEC
MOVB
#MISC. ,@DQAREG
MOV
#4010,@8DQSEC
CLR
TEMPI

001246

000040
000063
170644

MOV
MEMCLR
CLR
MOV
MOvV8
INCB
BNE
CLRB
MOV
MOvVB

4.7
8.2
7.6
6.1
1.5
3.7
3.7
7.7
2.6
3.7
2.6
3.7
2.6
9.3
3.5

CLR
MOV
CLR
MOV
MOV
CLR
INCB
BNE
INCB
BNE
HLT
TXISR1:

sSET RX CC FOR A TRANSFER OF 400 CHARS.
SWRITE ENABLE, TX BA PRI.
;LOAD THE TX BA PRI.
SENTER T,WRITE ENABLE,TX CC PRI.
JSET TX CC FOR A TRANSFER OF 2 CHARS.
SWRITE ENABLE ,RX BA SEC.
sCLEAR THE RX BA SEC
SEXIT T,WRITE ENABLE ,RX CC SEC.
sSET THE RX CC SEC FOR ONE PAD CHAR.
JWRITE ENABLE,TX BA SEC.
JEXIT T,WRITE ENABLE,TX CC SEC.

TEMP2
#TXISR1 ,8DQTVE"
aDQTLVL
#1,3DQRCSR
#41,3DQTCSR
PS
TEMP1
2%
TEMP?
2%

(MP
BIC
MOvVB
CLR
NOP
CLR
CLR
1%:
BI”
BNE
INCB
BNE
INCB
BNE
HCT
ENDBCC: RTS

(SP)+,(SP)+
#BIT5,aDQTCSR
#63,a3DQREG
aDQSEC
TEMP1
TEMP2
#8116,3aDCGR(SR
ENDBC(
TEMP1
1%
TEMP2
%
PC

;RXx SECONDARY DONE NOT SET.

SEQ 0042

N
o~

n
~ NN
~N NN
~ NN

777
777

170566

170540
170534
170524

000024
016000
S
177777
000026

170512
170506
170476
170472
170462

000067

170450

170522

170460

KRN FRARRG
OO
NO
wgmm—SO &
PORY
= — —
OO
O

b
ek

G
—d

P
P

b md

i
Phaar

b
b
b

ey Gusr P

b ad

hnr
G

d
d
e
b e
b
b
b

Jhur Qe Guer Gar Gy Gt

QOO0
O
b —d ek —b
—

eolelolelelololelololololelolololole]

—h
d
b

cd ed
e

—d
—

MISC.

#121,3DQREG
(R5)+,a0QSEC
#22,aDQREG

#TXBUFF ,aDQSEC

170436
170432
170422
170416
170406
170402

2%:

TX BA PRI.

TX BA PR].

SENTER T,WRITE ENABLE.TX CC PRI.
SSET TX CC
JWRITE ENABLE ,RX BA SEC.

#65 ,aDQREG
#-1,aDQSEC
#26,3DQREG
aDQSEC
#67 ,aDQREG
aDQSE(
#11,aDQREG
.SYNC,aDQSEC
#17 ,3DQREG
XPOLY,aDQSEC

JEXIT T,WRITE ENABLE ,RX CC SEC.
;SET FOR ONE PAD CHARACTER.
;JWRITE ENABLE,TX BA SEC.
;CLEAR THE TX r Sci
SEXIT T,WRITE ENABLE,TX CC SEC.
:CLEAR THE TX CC SEC

;LOAD

THE RX BA SEC.

#4010,aDQSEC
TEMP]
TEMP?2
#3,aDQRCSR
#2,aDQTCSR

§?1T13.SDQSEC

TEMP?

1703°6

001246
170272

015360

000240
000351

;LOAD THE

TEMP1

000205

104412

JSET RX CC
JWRITE ENABLE,

001246

012737

sSELECT THE RX BA PRI.
;LOAD THE RX BA
s*ENTER T,WRITE ENABLE ,RX CC,PRI.

#MISC. ,aDAREG

001244

104412

;SAVE PC OF ENTERING ROUTINE

.CLEAR THE DQ11

#123,3DQREG
(R5)+,3DQSEC
#24 ,aDQREG

#RXBUFF ,aDQSEC

001246

011637

RS, SAVEPC
aDQREG
#RXBUFF ,aDQSEC

001244

000001
001244
000005
000100

¢4

RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

170562
170552

170352
170350
170350

PAGE 44

SYNBC(CC: MOV

016000
000121
170550
000022
015376
000123

015372
000017
015350
000012
004010
001244
001246
000003
2
020000

011000

13:43

015360

170446
000011

—

2198

777
777

005077

eolelolele]

~
QERBRE2EBEIRRRERTREY oo

b e

D ah

D e

[ASIANTAN AN TN 1 N1, 1N ST ST VT N1,V TN 1,8 1 N1,V I N1,V [o)

D —

010570
010574

~
~

P11

30A(1052)
28
=JUL-78
25-JuUL~78
1 5:28

Ro
NNNNN%NNNNNM ~on

MACY11

—A—._‘—‘—l—l—‘—‘-—l-fl—l—lo

CZDQE
C2DQt

015376

2%
#8170,3DQTCSR

TEMP1
#5,TEMP2
#8176,3DARCSR
ENDSYN
TEMPI
4%
TEMP?2
4%

ENDSYN:

TYR(CC(C:

(SP) ,SAVEPC

JRECEIVER DONE SECONDARY NOT SET.

;SAVE PC OF

;CLEAR THE DQ11

#3511, TXBUFF

ENTERING ROUTINE

SEQ 0043

CZDQE
PHACY11 30A(1052)
ZSEJUL-78
CZDQEE.P1
25-JuUL-78 15

F
&4
13:43
PAGE 45
MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

2222
2223
2224
2225

011130
011136
011142
011150

012737
105077
012777
112777

000011
170226
016000
000121

015352

2227
2228
2229

011164
011172
011200

112777
012777
112777

000022
015376
000123

170176
170172
170162

mMOov8
MOV
MOov8e

011214
011222
011226
011234
011240
011246
011252
011260
011264
011272
011300
011306
011314

112777
005077
112777
005077
112777
005077
112777
005077
112777
013777
112777
012777
052777

000024
170144
000065
170132
000026
170120
000067
170106
000017
015350
000012
004012
000001

170146

2226
2230

2231
2232
2233
2234
2235
2236
2237
2238
2239
2240
2241
2242
2243
2244
2245
2266
2247
2248
2249
2250

2251

011156

011206

011322
011330
011336
011344
011350
011356
011362

011370

012777
012777

027777
027777
027777
005277
005377
042777
052777

005277

2252
2253
2254
2255
2256
2257
2258
2259
2260
2261
2262
2263
2264
2265
2266

0113764
011400
011404
011406
011414
011422
011430
011436
011442
011446
011452
011454

005377
005337
001371
112777
017737
112777
012737
005277
005377
005337
001371
000207

2269
2270
2271
2272
2273
2274
2275
2276
2277

011456
011462
011464
011472
011500
011504
011512
011520
011526

011637
104412
013737
012737
105077
012777
112777
012777
112777

177600
177600

170036
170030
170022
170022
170016
000200
0710001

167776

170222
170212

170206
170156

170134
170122
170110
170076
170072
170062
170056
170042
170034
170026
170020
170010
167770

167772
015352

000016
167752
000012
000007
167730
167724
015352

18:

167754
015362
167740
015352

2%:

3$:

ENDTY:

015360
015344
000011
167664
016000
000121
177777
000022

TXBCC:
015376
015352
167660
167650
167644
16763%

1¢:

MOV
CLRB
MOV
MOovB

#9.,COUNT
aDQREG
WRXBUFF ,@DQSEC
#121,3DQREG

sSELECT THE RX BA PRI.
;LOAD THE RX BA
s*ENTER T,WRITE ENABLE ,RX CC,PRI.

#22 ,3DQREG
N#TXBUFF ,8DQSEC
#123 @DQREG

SJWRITE ENABLE, TX BA PRI.
;LOAD THE TX BA PRI.
SENTER T,WRITE ENABLE,TX CC PRI.

MOovB
CLR
MOvVB
CLR
MOVB
(LR
MOVB
CLR
MOvB
MOV
Movs
MOV
BIS

#24 ,8DQREG
aDQSEC
#65,3DQREG
@DQSEC
#26,8DQREG
aDQSEC
#67 ,8DQREG
aDQSEC
#17 ,3DQREG
XPOLY ,aDQSEC
#MMISC. ,aDAREG
#6012 ,3DQSEC
#BIT0,3DQTCSR

JWRITE ENABLE ,RX BA SEC.
sCLEAR THE RX BA SEC
JEXIT T, WRITE ENABLE ,RX CC SEC.
sCLEAR THE RX (CC SEC.
JWRITE ENABLE,TX BA SEC.
sCLEAR THE TX CC SEC
JEXIT T,WRITE ENABLE,TX CC SEC.
sCLEAR THE TX CC SEC

INC

aDQSE(C

MOV

#-200, 8DQSE

MOV

#-200,3DaSEC

M
P
cMP
INC
DEC
BIC
BIS

aDATCSR,ADQATCSR
a@DQTCSR,aDQATCSR
a@DATCSR,IDQATCSR
aDQSEC
aDQSEC
#8177 ,aDQSEC
#10001 ,3DQRCSR

DEC
DEC
BNE
MOVB
MOV
MOvVB
MOV
INC
DEC
DEC
BNE
RIS

aDQSEC
COUNT
2%
#16,aDQREG
aDQSEC,SECT16
#MISC. ,aDAREG
#7.,COUNT
aDQSEC
aDQSEC
COUNT
3
PC

MOV
MSTCLR
MOV
MOV
CLRB
MOV
MOVB
MOv
MOVR

(SP) ,SAVEP(
CALB(CC
., TXBUFF
#9.,COUNT
aDQREG
#RXBUFF ,aDAQSEC
#121,aDQREG
#-*,aDQSE(
#22 .aDQREG

sSET RX CC FOR A TRANSFER OF 1 CHARACTER.

sSET TX CC FOR A TRANSFER OF 1 CHARACTER.

;SET TRANSMITTER GO
WAIST TIME.
;WAIST TIME
;WAIST TIME
;PRIM THE
;_
TRANSMITTER.
;CLEAR THE BIT WINDOW.

.SAVE PC OF ENTERING ROUTINE
JCLEAR THE DQ11
JSELECT THE RX BA PR].
;LOAD THE RX BA
J*ENTER T ,WRITE ENABLE ,RX ((C,PR].
sSET RX CC FOR A TRANSFER OF 1 (HARA{TER.
JWRITE ENABLE, Tx BA PRI.

SEQ 0044

MACY11_30A(1052)

22ooRoRRICS
&S
O‘ON%O‘NI‘ON ASXFSSR

000024

000065

167572

000026
167556
000067

167560

167570

1€7544
000012

167546

167534
167530
167520
167514
167504
167472
167464
167656
167450
167440
167420

015352

000100

167406

167376

015364

167362
167356
167346

015362
167332

015352
0153¢2
000207

13:43
PAGE 46
MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC

167630
167620
167614
167604

167602

015376
000123

177777

VAN
IS NNON) —
o S OHONSO
S

b
d
h
b

012777

~ NN NN NNNNNNVO

il
e

e e
D
D

b
b
o

d nd

)
D e

b e
b
b cnd o
nd

d e

b
b
d ek

—ed ed md cnd wd

wd cod e

D ad

d wd

b oD

25-JUL-78 15:28

jelololelolololalolololololalolelololelalalelolalolololelolals

P11

28-JuL-78

#TXBUFF ,aDQSEC

#123,38DQREG
#-1,aDQSEC
#24 ,3DQREG
aDQSEC
#65 ,a8DQAREG
aDQSEC
#26 ,8DQREG
aDQSEC
#67 ,3DQREG
aDQSEC

#MM]SC. ,aDQREG

TESTS.

;LOAD THE TX BA PRI].

JENTER T,WRITE ENABLE,TX CC PRI.

sSET TX CC FOR A TRANSFER OF 1 CHARACTER.
JWRITE ENABLE,RX BA SEC.
;CLEAR THE RX BA SEC
JEXIT T,WRITE ENABLE ,RX CC SEC.
;CLEAR THE RX CC SEC.
JWRITE ENABLE,TX BA SEC.
sCLEAR THE TX CC SEC
JEXIT T,WRITE ENABLE,TX CC SEC.
;CLEAR THE TX CC SEC

#6112 ,aDQSEC
#17 ,a8DQREG
XPOLY ,aDQSEC

#MMISC. ,aDQREG

#8170,a8DQTCSR

aDQTCSR,aADATCSR
a@DQTCSR,aDATCSR
a@DQTCSR,aDATCSR
aDQSEC
aDQSEC

#8117 ,aDQSEC

#10001 ,aDQRCSR
aDQSEC
aDOQSEC
COUNT

2%
#31T6,aDQASEC

#16,3DQREG
aDQSEC, SEC16X
#MISC. ,a3DQREG

#81T6,aDQSEC

#16,aDQREG

a@DQSEC,SEC16

#MISC. ,8DAREG
#7.,COUNT
aDQSEC

SWAIST

;SET TRANSMITTER GO

TIME.

JWAIST TIME
SWAIST TIME

;PRIM THE

TRANSMITTER.
.
.CLEAR THE BIT WINDOW.

SEQ 0045

CZDQE
MACY11 30A(1052)
28-JuUL-78
CZDQEE.P1
25-JuL-78 15:28

2320
2321
2322
2323
2324
2325
2326
2327
2328
2329
2330
2331
2332
2333
2334
2335
2336
2337
2338
2339
2340
2341
2342
2343
2344
2345
2346
2347
2348
2349
2350
2351
2352
2353
2354
2355
2356
2357
2358
2359
2360
2361
2362
2363
2364
2365
2366
2367
2368
2369
2370
2371
2372
2373
2374
2375

13:43

PAGE 47

MISC.

RECEIVER AND TRANSMITTER TESTS PLUS B(CC

TESTS.

*BLOCK CHECK CHARACTER GENERATOR SIMULATOR.
012064
012070
012074
012100
012104
012110
012114
012116
012122
012124
012130
012134
012136
012142
012144
012150
012154
012160
012162
012164
012170
012172
012200
012204
012210
012212
012220
012222
012222
012226
012232
012236
012242
012250
012256
012262
012266
012270
012272
012276
012302
012306
012314
012320
012326
012332
012336
012340
012342
012346
012346
012354

SIMBCC: MOV

001244
001246
001250
015346
001250
001246

1%:

000007

015346
015350

c%:

015346

015346
001250

001250

015344

000020
000020
000140
167110
167102

167120

1671°¢

BCCFBK

ROR
AD(
BIT
BEQ

TEMP2
RO
#8170,RO
2%

COM

MOV
(oM
BIC

B8NE

MOV

MEM(LR:

167132
167132
167130

1%:

2%:

167042

105077

167014

112777

000012
000040

012777

162014

16701(

TEMP3
BCCFBK,RO
TEMP3,R1
R1.R2

R1,R0O
BCCFBK ,R2
R2,R0O
XPOLY, TEMP3
RO, TEMP3
TEMP1

TEMP3, CALBCC

aDQRCSR
aDQT(SR
aDQERR

81S8

#3174 ,3DQREG

CLR
INCB

aDQSEC
aDOREG

BNE
CLRB

1%
aDOREG
aDOR(
SH
#16. RS

MOV

BICB

MOV

MOovB

#16. RS

#140,3DQREG

#10,aDQREG

(LR

aDQSE(

CLR
INCB

aDGSE(
SH
aDOR(C

(LRB

aDAR(
SH

DEC
BNE
MSTC_R:

XPOLY,RO
RO
RO,BCCFBK

CLR
CLR
CLR

MOvVB

167024

BCCFBK

(LRB

167054

TEMP3 RO

RTS

DEC(

1672072

(RS)+, TEMP1

(RS)
+ . TEMP?
(RS)+. TEMP3

CLR

MOV

CLC
ROR
MOV
MoV
MOV
BIC
BIC
BIS
BIC
BIS
DEC

001250
015346
001250

015350
001250
001244

MOV
MOV

MOVR
MOv

#14 ,aDQREG
RS
2%

&°'SC, ,aDAREG
#]T5,aDASEC

SEQ 0046

(ZDQE
MACY11 30A(1052)
28-JuUL-78
CZDQtE PN
25-JuL-78 15:28

012362

S
288 gigsEaes

PAGE 48

MISC.

RECEIVER AND

000C0°

TRANSMITTER

TESTS PLUS BCC

TESTS.

RTI

JEND OF PASS
sTYPE

NAME

TEST

;UPDATE PASS COUNT

sCHECK FOR EXIT TO ACT=11

sRESTART

364
0
&

005037
005037
005237

001234
001312
001230

LEOP:

CLR
CLR
INC

TEST

LSTERR
ERRFLG

PASCNT

;CLEAR LAST ERROR PC
;CLEAR ERROR FLAG
JUPDATE PASS COUNT

PASCNT
,alL IGHT 5>

sDISPLAY PASS (OUNT

TYPE

MEPASS

012414
012416
012420
012422
012424
012426
012430
012632
012434

TYPE
MC SRX
CNVRT
XCSR

104402
015003
104411
012530
104402
015011
104411
012536
104402

TYPE

MVE CX
(NVRT
XVE(
TYPE
MPASSX

CNVRT
XPASS
TYPE

MERRX
CNVRT
XERR

106530

MOV
DEC(
BNE
MOV
MOV
BEQ

001276

:
¥

. vt(o X21,V

VIWAWIWALA VAW

-—t el md

)

d wd

ad wd

—d

jolalelelolelelelolelolels)

LOGICAL:

NORLALNLNLNLALNL ALY

2376
2377
2378
2379
2380

13:43

002254
002254

002

001214

RESET

JSR
NOP
NOP
NOP
RESTRT: (KSWR
MOV
{HP
XCSR:
BYTE
?ORCSR
XVEC:

XPASS:

;CHECK FOR ACT=-11 OR DDP
JIF NOT, CONTINUE TESTING
PC.(R1)

#TST7,RETURN
sm

6.c

LBYTE

3.2

BYTE

6.’

?ORVE(
PAS(NT

SEQ 0047

C<DQE
MACY11 30A(1052)
28-JuL-78
CZDQEE PN
25-JuL-~-78 15:28

000001
006
001232

XERR:

002

BYTE
ERR(NT

6,2

;SCOPE LOOP AND INTERATION HANDLER

012552
012554

104414
032777

40000

166416

1€6412

.SCOPE: CKSWR
8IT
TTIST:
8EQ
BR

004000

166370

001224
001224

001222

001312
001224
000011
001216
001214

1%:

aTKCSR

MOV
BR
BI~
BNE

oTKDBR
RO
2%
#SW11,aSWR
23

INC
(MP

2%:
001222
001214

8NE

(LRB
TLR

MOV

3%:
BRW:
BRX:

MIT14,aSWR
1%
33

1STB

8PL

166406

MOV
MOV
RT]

« PCNT
LPCNT
, ICOUNT

ERRFLG
LPCNT

#9.,ICOUNT

NEXT ,RETURN
RETURN, (SP)

1407

432

;CHECK FOR FREEZE ON (URIENT DATA

001000

166304

.SCOP1:

001220

CKSWR

BIT
8EQ
MOV

RT]

#5W09,aSWR
1$
LOCK, (SP)

NS
(%,

~N
~N -

W
~

O=Q0O—=

SIS ANS N

d e

cnd

ed ad

b e

b md ad =D

sTELETYPE

b ad

2434
2635
2436
2637
2438
2439
2640
2641
2642
2443
2444
2445
2446
2647
2648
2449
2450
2451
2452
2453
2454
2455
2456
2457
2458
2459
2460
2461

012544
012546
012550

2432
24633

13:43
PAGE 49
END OF PASS ROUTINE

CTYPE:

000002
000002
014374

000002

010000

166244

1¢:

300%:
166242

000015

166234

000012
166212

166220

166226

166206

MOV
MOV
ADD

R5,-(SP)
a2(SP) ,RS
#2,2(SP)

TST

a#RDSW

TSTR

aTP(SR

BNE
817
BNE
TSTR
8PL
BPL

3008
#5W12,aSwR
33
(RS)
2%
;

MOV

#15.3TPDBR

MOV

.4
#12,31PDBR

1STB

’%:

OUTPUT ROUTINE

TSTB

MOVBR

@TPESR

@IP(SR
les

(R5)+,aTPDBR

SEQ 0048

CZDQE
MACY11_30A(1052)
28-JuL-78
CZDQEE PN
25-JuL~78 15:28

013012
013014
013016

3%:

BNE
MOV

001345
012605
000002

010346
010446
017637

000004
000002

013034
000004

015166
000007
166132

GENERAL UTILITIES

RTI

. INSTR: MOV
MOV
MOV
ADD
.INST1: 6yp£
.MSG:
MOV
1¢:

166126

000200
000025

(TYPE OUT,ERROR,SCOPE ,ETC.)

1%
(SP)+.RS

H
o

purd

NOONSNO
N

usi Shatt Sttt
s

QOO

BPL
MOVB

# INBUF ,R4

#7.R3

QTKCSR

18
QTKDRR, (R4)

#200, (R4)
(R4) 425
2008

200%:
166076

2%:

B8R

JINST1

BEQ

INSTR?

CMPB

MOVB

(R4)+, #15

aTKDBR,aTPDBR

TSTB

alPCSR

DEC

BPL

BNE
BR
.INSTE: MOV
MOV
.INSTG: TYPE

st St
Gt
-t
R

Pourd
S
Giar Shanr GurPier Goeer Gy G
e P
Gt

N N NN AN AN N NN NN NN N N NN NN

TSTB

R3,-(SP)

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

TYPE ,MCRLF

000015
166074
166070

MOV

BICB
CMPB
BNE

014554
eolelelalelelelelelelolalelololololelo]

13
.INSTG
R3,~(SP)
R .= (SP)

014374

MQM
ST

014554

TYPE ,MCRLF

BEQ
400%:

BR
INSTR?: MOV
MOV
RT]

SRDSW

4008

JINST1

(SP) +.R4

(SP)+.R3

Yo
(WaTe
~

VIV

end
—

N —

d and

d cd e

—‘OSO—'—'OOOOOO
NINLWNOIVNNNINY
ER3
W
eI

s CONVERT ASCII STRING TO OCTAL

—

2496

2497
2498
2499
2500
2501
2502
2503
2504
2505
2506
2507
2508
2509

PAGE 50

;ASCII STRING INPUT ROUTINE

JrurQtar Guar Guar Gur e

26490

24N
2492
2493
2494
2495

013004
013006
013010

eoloelelelelelelelololel
o]

2488
2483

13:43

000004
013366
013370
013372

013374
013375
000004

015166
000015

.PARAM: MOV
MOV
MOV
MOV
MOV
MOV

MOVSB
MOVS

PARAM1
:

MoV

CLR
MOV
(MPB

RS,-(SP)

R4 ,-(SP)

4(SP) RS
(RS)+,LOLIM
(R3)+,HILIM
(R5)+,DEVADR
(R5)+,L0BITS
(R5)+ ,ADRCNT
RS,4(SP)
RS

¥ “BUF ,R4

#15,(R4)

SIS IT <*G>

SEQ 0049

CZDQE
MACY11_30A(1052)
28-JuL-78
CZDQEE.PN
25-JUL-78 15:28

2544
2545
25646
2547
2548
2549
2550
2551
2552
2553
2554
2555
2556
2557
2558
2559

2560

2561
%ggg

013234
013236
013242
013244
013250
013252
013256
013260
013264
013266
013270

001420
121427
002415
121427
003012
142714
152405
122714
001414
006305
006305

013276
013302
013304

122714
001003
005737

013272
013274

013310

013312
013314

006305
000760

001023

13:43 PAGE 51
GENERAL UTILITIES

000060

1%:

000067
000060
000015

ASL
BR
PARERR: (MPB
v
BNE
TST

000015
014374

104404
000742

120%:

Sggg
2566
2567
2568
2569
2570
52;}

52;2

2575
2576
2577
2578
2579
2580
2581

2582
2583
2584
2585
2586

Sggg

5232

2595
2596
2597
2598
2599

BNE

INSTER
BR

(TYPE OUT,ERROR,SCOPE ,ETC.)

PARERR
(R4) ,#60
PARERR
(RG) 467
PARERR
#60, (R4)
(R4)
+ RS
#15,(R4)
LIMITS
RS
RS
RS
1%

#15, (R4)
1208
ANRDSW

PART]

;IS FIRST CHARACTER A <CR>
;1S CKSWR ROUTINE BEING USED

PARAM1

;TEST TO SEE IF NUMBER IS WITHIN LIMITS
013316
013322
013324
013330
013332
013336

020537
101365
020537
103762
133705
001357

013340
013344
013346
013352
013356
013360
013362

013704
010524
062705
105337
001372
012604
012605

013364
013366
013370
013372
013374

013370

LIMITS:

013366
013374

CMP
BHI
CMP
8LO
BITB
BNE

RS.HILIM
PARERR
RS,LOLIM
PARERR
LOBITS
kS
PARERR

MOV
MOV
ADD
DECB
B8NE
MOV
MOV

DEVADR ,R4
RS, (R4)+
#2 RS
ADRCNT
1%
(SP)+ ,R4
(SP)+,RS

:STORE NUMBER AT SPECIFIED ADDRESS

013372

1%:

000002
013375

PART]:

000002
000000
000000
000000
000000

LOLIM:
HILIM:
DEVADR:
LOBITS:

013375

RT]
O
O
0
O

ADRCNT=LOB]I TS+1

Sggg
ggg}

BEQ
(MP8
BLT
(MPB
BGT
8ICB
BISB
(MPB
BEQ
ASL
ASL

:SAVE P OF TEST THAT FAJLED AND RO-RS
013376

016637

000004

013404
013410
013414
013420
013424

019537
010437
010337
010237
010137

001270
001266
001264
001262
001260

001274

.SAVOS5: MOV

4 (SP),SAVP(

Sv05:

R5,SAVRS
R4, SAVR4
R3,SAVR3
Rc.,SAVR?
R1,SAVR1

:SAVE RO-RS

MOV
MOV
MOV
MOV
MOV

SEQ 0050

CZDQE
MACY11_30A(1052)
28-JUL-78
CZDQEE P11
25-JUL~-78 15:28

013430
013434

010037
000002

13:43 PAGE 52
GENERAL UTILITIES

001256

MOV
RTI

M4
(TYPE OUT,ERROR,SCOPE,ETC.)

RO, SAVRO

;RESTORE RO-RS
013436
013442
013446
013452
013456
013462
013466

.RESOS:

001256
001260
001262
001264
001266
001270

SAVRO,R0O
SAVR1,R1
SAVRZ ,R?

SAVR3,R3
SAVR4 R4
SAVRS RS

;CONVERT OCTAL NUMBER ~0 ASCI1 AND OUTPUT TO TELEPRINTER
.CONVR:

TYPE

MCRLF
.CNVRT: MOV
MOV
MOV

TEMP, TEMP3

2%:
3%:

NN
NN

000040
013713

(R1)+,WRDCNT
(R1)+. CHRCNT
(R1) +.SPACNT
a(R1)+,BINWRD
BINWRD R4
CHRCNT RS

R4 ,R3

#177770.R3
#060,R3
R3, (RO) +

4%:

013713

A vivil
2NN

N~ NN =2\ A= N

013712

L
NO

YA O b (O

—h

200352838 QO—

015272

R .={SP)
RS . =(SP)

#2,12(SP)

1%:

177770
000060

R3.-(SP)

212(SP)
,R1

001250
000012

015230

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

#MDATA
R3

-(R0),(R3)+
CHRCNT
4%
SPACNT

5%:

#040, (R3) +

6%:

$
(R3)

gPACNT

SEQ 0051

CZDQE
MACY11 30A(1052)
28-JUL-78
CZ DQEE.P1T
25-JUL~78 15:28

013660
013664
3666

013712
013714

005337
001322
013737
01260
012604
012603
012601
012600
000002
000000
000000
013713
000000

N 4
13:43 PAGE 53
GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE.ETC.)

013710

001250

015230

DEC
WRDCNT
BNE
1%
MOV
TEMP3, TEMP
MOV
(SP)+.RS
MOV
(SP)
+ R4
MOV
(SP)+.R3
MOV
(SP)+ ,R1
MOV
(SP) +.RO
RTI
WRDCNT: 0
CHRCNT: 0
SPACNT=CHRCNT
+1
BINWRD: 0

;TRAP DISPATCH SERVICE

<ARGUMENT OF TRAP IS EXTRACTED
<AND USED AS OFFSET TO OBTAIN POINTER
$TO SELECTED SUBROUTINE
013716
013720
013724
013730
013732
013736
013742
013746

011646
162716

017616
006316
042716
062716
017616
000136

.TRPSR: MOV
SuUB

000002

000000

TRPOK:

177001
001314
000000

MOV
ASL
BIC
ADD
MOV
JMP

(SP) ,=(SP)
#2,(SP)

a(SP), (SP)
(SP)
#177001, (SP)
#.TRPTAB, (SP)
a(SP), (SP)
a(SP)+

JERROR HANDLER

013750

104414
032777
001406

010000

105777

165222

112777

000207

032777

020000

001074
021637

001234

011637
105037

001234
001312

1404

104406

011605

162705

011504

0062
061504
006304
042704
0627
012437
012437
017437
105737
001403
005737

000002

177001
016402
014146
014160
014172

001312

014172

165220

165214

165174

JHLT:

xB8X:

1$:

CKSWR
BIT
BEQ
ST
8PL
MOVB

#SW12,aSWR
XBX

aTPCSR
XBX
#207,aTPDBR

BIT

#5W15,aSWR

BEQ

BNE
(MP

MOV
CLRB

SAVOS

MOV

HALTS
(SP) ,LSTERR

(SP) ,LSTERR
ERRFLG
(SP) ,RS

SUB

#2 RS

ASL
ADD
ASL
BIC
ADD
MOV
MOV
MOV
TSTB
8EQ
ST

R4
(R5) ,R4
R4
#177001,R4
#.ERRTAB,R4
(R4) +,ERRMSG
(R4 ) +.DATAHD
(R4) ,DATABP
ERRFLG
T/PMSG
DATARP

MOV

(RS) R4

:GET PC OF RETURN
;=PC OF TRAP

*GET TRP
JMULTIPLY TRAP ARG BY 2
*CLEAR UNWANTED BITS
JPOINTER TO SUBROUTINE ADDRESS
: SUBROUTINE ADDRESS
GO TO SUBROUTINE

SEQ 0052

CZDQE_
MACY11 30A(1052)
2B=JUL-78
CZDQEE.P1T
25-JUL-78 15:28

2712
2713
2714
2715
2716
2717
2718
2719
2720
2721
2722
2723
2724
2725
2726
2727

014102
014104
014106
014110
014112
014114
014116
014120
014122
014124
014126
014130
014136
014142
014144
014146

001027
104402
015033
104411
014272
104402
015121
104411
014264
104402
014554
112737
005737
001402
104402
000000

177777
014146

014150
014150
014154
014156
014160
014162
014166
014170
014172
014174
014176
016202
014204
014206
014212
014214
014216
014220
014224
014232
014234
014242
014244

005737
001402
104402
000000
005737
001402
104410
000000
104407
005777
100005
010046
016600
000000
012600
104414
005237
032777
001007
032777
001407
013737

2752
2753
2754
2755
2756
2757
2758
2759

014256
014262
014264
014966
014270
014972
014974
014276

000177
000002
000001
006
001274
000001
003
001226

164732

2762
2763

014300

014312

2766

014310

012737
000000

S780

2764
2765

000777

001312

(TYPE OUT,ERROR,SCOPE,ETC.)

BNE
TYPDAT
TYPE
MTSTN
CNVRT
XTSTN
TYPE
MERRP(
CNVRT
ERTAB0
TYPE
MCRLF
MOVB
#-1 ERRFLG
TST
ERRMSG
BEQ
WRKO.FM
TYPE
ERRMSG: 0

WRKO. FM:

014160

014172

DATAHD:
TYPDAT:

164776

DATABP:
RESREG:
HALTS:

000002
EXITER:

001232
000400

164746

002000

164736

001216

001214

014252 012706 001200

014300
014306

TYPMSC:

2728
2729
2730
2731
2732
2733
2734
2735
2736
2737
2738
2739
2740
2741
2742
2743
2744
2745
2746
2747
2748
2749
2750

2751

13:43 PAGE 54
GENERAL UTILITIES

1$:

TST
DATAHD
BEQ
TYPDAT
TYPE
0
TST
DATABP
BEQ _ RESREG
CONVRT
0
RES0S
TST
@SwR
BPL
EXITER
PUSHRO
MOV
2(SP),RO
HALT
POPRO
(KSWR
INC
ERRCNT
BIT
#SWO08,aswR
BNE
13
BIT
#SW10,aSwR
BEQ
2%
MOV
NEXT,RETURN

MOV

JMP
28:
RTI
ERTAB0: 1
BYTE
SAVP(
XTSTN:
1
BYTE
TSTNO

002
002

#STACK,SP
GRETURN
6,2
3,2

;ENTER HERC ON POWER FAILURE

000024

PFAIL:

MOV
HAL T

#RESTART,24

;SET UP FOR POWER UP TRAP
HALT ON POWER DOWN NORMAL

SEQ 0053

CZDQE
MACY11 30A(1052)
28-JuL-78
CZDQEE.P11
25~JUL-78 15:28

5
c
13:43 PAGE 55
GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE.ETC.)

%;gg

;:PROCESSOR WILL

2770
2771

014312
014312

012737

014300

2773
2776
2775
2776
2777
2778

014326
01433C
014334
014336
014340
014342

005037
005237
001375
104402
014556
104411

015230
015230

2780
2781
2782
2783
278,
2785

014346
014352
014356
014360
014362
014366

005037
005037
104412
104413
000177
000001

2772

0164320 012706

2779 014344 014366

2786
2787

5789

2790
2791
2792
2793
279,
2795
2796

014370
014372

003
001226

001200

000024

164626

PFTAB:
BYTE

062

000042

2798
2799
2800
2801
2802

005737
001042
022737
001036
105777
100033
017737

164560

013034

2804
2805
2806
2807
2808
2809
2810
2811
2812
2813
2814
2815
2816
2817
2818
2819

014436
014444
014446
014452
014456
014462
014466
014472
014474
014476
014500
014502
014504
014510
014514
014516

122737
001021
106402
005137
104402
104411
104403
104405
000000
177777
000176

000007

013034

104402
005037
000002
000001

2821
2822
2823

014522
014524
014530

000176
057377
051777

2820 014520

042737

006

CLR
INC
BNE
TYPE
MPFAIL
CNVRT

TEMP
TEMP
=4

CLR
CLR
MSTCLR
MEMCLR
P
1

000176

LCKSWR:
001200

ERRFLG
LSTERR
ARE TURN

3.2
TSTNO

177600

013034

014524
014374
014530
014516
014537

001
014554
014374

002
000107
051127

BIC

G2
ouT
#SWREG, SWR
ouT
QTKCSR
ouT
aTKDBR, .MSG

#177600..MSG

CMP8
#7..MSG
BNE
ouf
TYPE ,$CNTG
LCNTLU: COM
NRDSW
TYPE
, SMSWR
CNVRT, SWREGC
INSTR. SMNEW
PARAM
0
177777
SWREG
.BYTE
0,1
TYPE ,MCRLF
ouT:
(LR
SHRDSW
RTI
SWREGC: 1

BYTE

020075

TST
BNE

cMP
BNE
TSTB
BPL
MOV

164564

SCNTG:
SMSWR:

IS RESTORED

;SET UP FOR POWER FAILURE

NSTACK,
SP

;CHECK SWITCH REGISTER ROUTINE.
*OF LOC.176.
*LOCATIONS USED:
RDSW:
.WORD
O

014376
014402
014404
014412
014414
014420
014422

014430

#.PFAIL,24

PFTAB

000000

2803

MOV

001312
001234

014374

2797

RESTAR:

TRAP HERE WHEN POWER

SEQ 0054

6.2

SWREG
.ASCIZ
.ASCIZ

<277>/G/
<377>/SwR- /

CHECKS FOR “G TO ALLOW CHANGING

;SOFTWARE SWITCH REGISTER PRESENT
*NO, GET OUT
“YES.WAIT FOR
JREADY, GET CHARACTER
“AND STRIP OFF

:THE GARBAGE

YIS IT A <G>

CZDQE
MACY11 _30A(1052)
28-JuL-78
CZDQEE.P1T
25-JuL-78 15:28

014536
014537
014544
014550

000

047040
000

053505

SMNEW:

LASCIZ

MQM:
:
MCRLF
MPFAIL:

.ASCIZ
LASCIZ
LASCIZ

/2
<377>
<377>/PWR FAILED.

MEPASS:

LASCIZ

<377>/END PASS (CZDQE

043517
047111
042524
042040
051505
042523

MERR2:

LASCIZ
LASCIZ

<377>/R/
<377>/PROGRAM INDICATES NO DEVICES PRESENT./

043125
047105
040524

MERR3:

LASCIZ

<377>/INSUFF ICIENT DATA!/

051505
000055
041517
051440
042524
052123
051123

020124

MTSTPC:

LASCIZ

<377>/TEST P(=/

020113
046105

MLOCK:

LASCIZ

<377>/L0CK ON SE_ECTED TEST/

020104
000
020072

MCSRX:

LASCIZ

041505

020072

MVECX:

LASCIZ

/VEC:

051501
000040
047522
000
052377
047516

042523

MPASSX:

LASCIZ

/PASSES:

051522

MERRX
:

LASCIZ

/ERRORS: /

051505
020072

MTSTN:

LASCI?

<377><377> /TEST NO:

042523
052111
043505

MNEW:

LASCIZ

<377>/SET

TO DQ11'S DESIRED ACTIVE./

053111

020124
044103
052040
030461
051505
040440
027105

035103
050101
050504
040524

000040
047640
030461
052524

MERRP(
:
XHEAD:

LASTIZ
LASLIZ

<377>/HAP OF

.EVEN

000077
051127

043040
027104
040524
020124
000040
050040

055103

000040

—ed

) —d —h

076
NN
—

3
e

RV, LV, LV, LV, AV, LV, IV

— e

eolelelolelolelelele]

0000
051516
044503
040504

(AL

13:43
PAGE 56
GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE,ETC.)

000

NEW=

RESTART AT TEST /

/CSR:

/PC:

/
/

SWITCH REG

DQ1Y

STATUS/<377>

SEQ 0055

CZDQE
MACY11_30A(1052)
28-JuL~78
CZDQEE P11
25-JUL-78 15:28

015154
000002
006
001244
006
001246

13:43 PAGE 57
GENERAL UTILITIES
.EVEN

003

XSTATQ:

6,3

BYTE

6,2

.EVEN

TEMP2

(TYPE OUT,ERROR,SCOPE,ETC.)

2
BYTE
TEMPI

002

;BUFFERS FOR INPUT-OULTPUT
015166

015230
015272

000000
015230
000000
015272
000000
015334

000010
006351
000000

:
INBUF

.*40

«*40

TEMP:

MDATA:

R YA

(HRLNG:
DATAIN:

TMPDAT
:

BCCPRV:
CALBC(CC:
BCCFBK:
XPOLY:
COUNT:
DATA:
SAVB(C(:
:
SAVEPC(

SEC16:
SEC16X:
STORE1:
LOCY:
JSYNC:
SYNC:
:
TXBUFF

351
0
0
0
0
0
0
0
0
0
0
0
0
0
BYTE
6BYTE

.=.+400
0
.=.+400
.ERRTA: 0
0
0
0
DHO
DTO
¢
DH1
DT1
EMO
DHZ
DT?
EM2
DH4
DT4
EmMI

26,26
26,26

RXBUFF
:

TXXRR TRXRRRERR
FREER
FROER NNSERRaK

—

—d

)

b wad

olelalelelelolelalolelelelelsl

016402
016404

DH3

SHALT
JHALT

JHALT 2

SHALT 3
JHALT &
JHALT

5§

SEQ 0056

CZDQE_
MACY11 30A(1052)
28-JuL-78
C2DQEE.P11
25-JuL-7815:28

2936
2937
2938
2939

016444
016446
016450
016452

2%3

016462

2940
2941
2942

2964
2945
296

2947
298

2950
2951
2952

2953

2954
2955
2956
2957
2958
2959
2960
2961
2962
2963
2964
2965
2966
2967
2968
2969
2970
2971
2972

2973
2974
2975

13:43 PAGE 58
GENERAL UTILITIES

017470
016664
017310
017520

016454
016456
016460

016745
017352
017542

016464
016466
016470
016555
016635
016664
016730
016745
016772
017026
017052
Q7122
017201
017234
017263
017310
017352

000000
000000
050377
377
377
046777
041777
377
051377
050377
050377
050377
377
042377
377
052377
042377

017402
017404
017406
017410
017412
017414
017416
017420
017422
017426
017426
017430
017432
017434
017436
017440
017442
017444
017646
017450
017452
017454
017456
017460
017462
017464
017666
017470
017472
017474

000002
006
015350
G606
001270
000004
006
015350
006
015344
006
001260
002
001270
000006
006
015350
003
015354
002
015352
006
015344
006
001252
002
001254
000003
006
001256

DT3
EM
DHS
DT5

016772

042514
047526
040503
046505
041101
050504
041130
046117
046117
046117
042101
052101
0564105
020130
051121

051501
041040
041514
051117
042514
030461
041503
047131
047131
Q47131
051104
020101
042520
042101
051503

MPOLY:
EMO:
EMI:
EM2:
EM3:
EM&:
DHO:
DHI:
DHE:
DH3:
DH&:

DH5:
DHé:

VEN

007

pro:
BYTE

001

BYTE

GO3

Lr1:
BYTE

005

BYTE

005

BYTE

001

BYTE

002

DI2:
YTE

003

BYTE

006

BYTE

004

BYTE

004

BYTE

002

BYTE

003

Dr3:

(TYPE OUT,ERROR,SCOPE.ETC.)

SHALT 6

EM3
DH6
CHALT
7
DT6
EM4
0
SHALT 10
0
.ASCII
<377>/PLEASE SET SWITCH REGISTER TO POLYNOMIAL YOU DESIRE /
ASCIZ
<377>/10 BE PLACED INTO POLYNOMIAL REGISTER OF DQ11./
.ASCIZ
<377>/CALCULATED BCC ERROR./
.ASCIZ
<377>/MEMORY TRANSFER TEST
*DATA ERROR#/
.ASCIZ
<377>/CABLE TEST /
.ASCIZ
<377>/DQ11 ERROR FLAG SET/
.ASCIZ
<377>/RXBCC ERROR BIT6 NOT CLEAR/
.ASCIZ <377>/POLYNOMIAL
DQERR/
.ASCIZ <377>/POLYNO
EXPECTED
RECEIVED
SEC REG/
CASCIZ
<3T7>/POLYND
CHAR SHIFTS EXPECTED
RECEIVED REG/
.ASCIZ
<377>/ADDRESS
EXPECTED
FOUND
/
.ASCII
<377>/DATA COMPARISON ERROR /
"ASCIZ
<377>/EXPECTED
RECEIVED/
.ASCIZ
<377>/TX ADD RX ADD
EXPECTED
FOUND /
[ASCIZ
<377>/DGRCSR DATCSR DOERR /

2
6.7
XPOLY

6,1

SAVRS
4
6.3
XPOLY
6,5
CALBCC
6,5
SAVR1
2,1
SAVRS
6
6,2
XPOL¥
3.3
DATA
2,6
COUNT
6.4
CALBCC
6,4
TEMP4
2,2
TEMPS
3
BYTE
SAVRO

SEQ 0057

6,7

;i 4oE

;ieoE

2976
2977

017476
017500
017502

006
001254
006

017504
017506
017510
017512
017514
017516
017520
017522
017524

001252
000002
006
001254
006
001252
000004
006
001256

017530
017532
017534
017536
017540
017542
017544
017546
017550
017552
017554
017556

001260
006
001254
006
001252
000003
006
001256
006
001260
006
001262

0172526

006

13:43
PAGE 59
GENERAL UTILITIES

004
002
004

DT4:
.BYTE

002

BYTE

002

DTS:

004
002
DT6:

002
002
.END

(TYPE OUT,ERROR,SCOPE,ETC.)

6.4

6.2

6,4
TEMPS

6,2

TEMPS

.BYTE

6.2

BYTE
SAVR1
BYTE
TEMPS
.BYTE
;EMPI.

6.2

BYTE
SAVRO
.BYTE
SAVR1
.BYTE
SAVR?

6.2

SAVRO

002

.BYTE
TEMPS
.BYTE
TEMPS

¥4 DQE
PHACY11 30A (105 2)
28-JuL-78
CZDQE E.P11
25-JuL-78 15:28

6.4

5.2

6.2

SEQ 0058

6100

611a
2539

BABIT =
8BBIT =
BCCFBK
BCCPRV

010000
020000
015346
015342

el
013
2326
2901#

BIT1
BITI0
BITIY
BIT12

=
=
=
=

000002
002000
004000
010000

6044
5954
5944
5930

B8IT14 =
BITIS =
BIT2"
=
BIT3
=
BIT4
=
BITS
=
BIT6
=
BIT? BIT8
=
BIT9
=
BRW
BRX
CALBCC

040000
100000
000004
000010
000020
000040
000100
000200
000400
001000
012660
012662
015344

BINWRD 013714
BITO = 00000

BIT13 = 020000

(HARDT- 000010
CHART
001236
(HAR2
001240

(HARS

CHRCNT
CHRLNG
CkDN
CKSWR =
CKSYNT
CNTLU CNVRT CONVRTCOUNT

CREAM
CSRMAP
DATA

DATABP
DATAMD
DATAIN
DEVADR
DHO
DHT

DHY
DH3

001242

013712
015334
002710
104414
002662
104415
104411
104410
015352

001300
000220
015354

)
(014772
(014160
015336
(13372
017026
017052
017122
017207

724

732
2578s

728
719
2332s

2628+
605#

2629
1043

5928

2197

5914
5904
603
602#
60TH
600#
5994
5084
5974
596
1020
1021
1548+«
1736

2348+

6304
8014
8024

863

2626+
28984
1115
8624
12
8644
8564
854¢
1437«
1696+

2314e

818¢
699¢
1550+
29060
2708«
2707»
2899#
2537e
2923
2926

2929
2935

SEQ 0059

TABLE == USER SYMBOLS

1428

2587#

2335+

2338

2342

29034

26684
2203

2243

2294

2330

200~
2249

2039
2300

2439

1014
2356
2152
1509
1662
24574
24584
1571
1968

2375

1512
1683

1581
1973

-—

ABEIT = 002000

ACTIBIT=
000
ADRCNT= 013375

13:43 PAGE 61
CROSS REFERENCE

(ZDQE_
MACY11 30A(1052)
28-JuL-78
CZDQEE.P11
25-JuL-78"15:28

1595+

1600

1641+

2158

1674

2206

1689

2306

1700

29024

2955

2020+
2968

2630

2646+

26664

2657

1174
988

998

1013

2099

2420

2438

2662

2685

2398
2735

24602

2406

2715

2719

2778

2809

1465+
1741«

1569+
1762

2062+

2066+

2222+

970
2394
978
14564+
1695

2317+

O42»
973
1570
2964
2711
2729

2575
29uem
2946w
2946
29464

1462+
1719+

2028

1701

2033

2036

2037«

2051~

2059

2744

1586+

1587

1592+«

2905#
1052+

2966

1056+

1065

1066+

1067

1068+

1589+

1642+

1657

1668+

1670

1672

2733
2732%

27364

25854

2310

1603+

1604

1706

2072

1656+

1707+

1721

2076+

227

1666+

1669+

2253+

2258+

2261+

2272+

2304+

1697«

1708«

1712+

1716e

1720

(ZDQE
MACY11 30A(1052)
28-JuL-78
CZDQEE.PN
25-JUL-78 15:28
DH4

017234

2932

017352

29461

DHS

017310

DISPRE
DLIGHT=
DQACTV
DQCROO
DQCRO1
DQCRO2
DAQCRO3
DQCRO4
DAQCROS
DQCRO6
DQCRO7
JQCR10
DACR11
DQCRI2
DACR13
DQCR14
DQCRTS
DQCR16
DQCR17
DQCSR
DQERR

000174
177570
001500
001400
001404
001410
001414
001420
001424
001430
001434
001440
001444
001450
001454
001460
001464
001470
001474
001506
001366

DQNUM
DQRCSH
DQRCSR

001504
001362
001360

DQREG

001370

DH6

DQSE(H

001374

SEQ 0060

29464

6904
5754
670
8895«
891#
8934
8954
8974
8994
9014
9034
905#
074
9094
9114
9134
9154
9174
9194
9244
8794
1770
703+
87274
8764

958
949
744>

750+

751«

755

9214

995«

996

1046

1048

1065+
1082+«
1794
740*
1078+
1069«

1069
1uB3*
1818
745
1079
1078

1084
1842
747
2363%
1080

1150
1866
9234
2369+«
1148+

1154
190
937
2372+
1152

1320
1934
241

1386
2102

1505
2354~

1509

1512«

1513

1749

1230«

1234

1242«

1375«

1379

1655+

1085+«
1228+

1086
1304+

1136«
1308+

1136+
1310«

1138+
1313«

1140%
1315«

1142+
1317«

7144+
1323«

1218«
1348+

1220
1351+

1222+
1353«

1555+

1557+

1579+

1593«

2143+

8804
12264
1355+

29464

2158

2195«

1358+

1361+

1084+
1226*

1444

1456%

2206

1363+

1461+

1598+
1965«

1606+
2006+

1609+
2008+

1643+
2026+

2179+
2235+
2287+
2367+

2181«
2237«
2289+
2374+

2183+
2239
2291«

2185+«
2241x
2293«

2123+«

001352
(01350
001372

2938

1442«

DQRLVL
DQRVEC
DQSEC

13:43
PAGE 62
(CROSS REFERENCE TABLE == USER SYMBOLS

8734
8724
8814

1225+«
1356
1641«
1556+
1607«

1683+
2010
2124
2180«
2234%
2276+
2302+
8824

2125+

1072+«
1070«
1086+

1227+«
1359«
1443+
1558+
1608+

1684+
2027
2126+
2182+
2236+
2276+
2303«
1088+

2127«

1073+
1071+
1087«

1229«
1360+
1645+
1560+
1610

1685+
2039«
2128+
2184+
2238+
22/8%
2306+
1089+

2129«

1074
1072
1088

1305+«
1362+
1450
1565+«
16446+

1686+
2042
2130+
2186+
2240+
2280%
23(8

2250%

1365«
1467+

1156

2301~

2352«

2425

1367+

1369+

1371«

1551+

1553«

1373«

1390+

1435«

1438+

1559+

1576+

1440+

1645+
2038+

1647+
2041+

1669+
2052+

1651+«
2056

1653«
2063+

1679+
2069+

1687+
2117«

1726*
2119+

1734+
2121«

2187+
2255%
2307«

2189+
2257%
2309+

2191«
2273x
2311+

2223«
2275«
2313x

2225x
2277«
2356%

2227«
2279+
2357«

2229+
2281+
2359+

2231x
Q2283x
2362+

2233«
2285w
2365+

1137«

1139+

1141«

1143+«

1145+

1219+

1221«

1223«

1733«
2065+
2154+
2226*
2251%
2290w
2358+

1735
2070
2172«
2226
2252+
2292+
2366+

2131+

2428
1135«
1309+«
1364
1451+
1566+
1666

1088
2053«
2132+
2188+
2242«
2282+
cr10e

2133«

1311
1366+
1452«
1567+«
1648+

1730«
2054«
2134
2190+
2247+
2284+
2372

2135«

1316
1368+
1453«
1568+«
1650%

1731«
2057
2136
2192«
2268+
2286+
2315+

2137«

1316
1370+
1457
1577«
1652+«

1732«
2064
2138e
2197
2249+
2288+
2316%

2153«

1318«
1372+
1463«
1578+
1654+

2171«

1324
1374+
1464
1580
1662+

2173+«

1369«
1391
1468
1596
1663+

1967
2118+
2174
2228+
2250
2298+
2368+

2175+

1352«
1436
1552«
1597+«
1664+

2007+
2120
2176+
2230+
2259
2299+
2375+

2177+

1354«
1439+
1554+
1599
1665+

2009+
2122+
2178+
2232+
2260+
2300

CZDQE_
MACY11 _30A(1092)
28-JuL-78
CZDQEE.PI
25-JuL-78 15:28

DQSTAT
DQSTOO
DQSTOY1
DASTOZ2
DQSTO3
DQSTO4
DQSTOS
DQSTO6
DQSTO07
DAST10
DAST11
DAST1Z2
DAST13
DQST14
DQST1S
DAST16
DQST17
DQTCSR

001510
001402
001406
001412
001416
001422
001425
001432
001436
001442

9254
8904
8924
8944
89¢#
8984
9004
9024
904#
9064

001452
001456
001462
001466

9104
9124
914n
164

001446

001472

001476
001364

DATLVL
001356
DATVEC
001354
DSWR
= 177570

13:43
PAGE 63
CROSS REFERENCE

1112

1119

1428

1080+

1081«

1082

1149+
1966

1153
214kv

1231«
2152+

1243«
2196»

2709

2723

2780~

9084

984

9204
8784

1449

229
8754

1561«

2295
1076+

017462

D12
D13
DT4
DTS
DT6
EMO

017436
017470
017506
017520
017542
016635

2930
2936
2933
2939
2942
2928

29604
29734
2980#
29854
2994a
294N

EM2
EM3
EM4
ENDBCC
ENDSYN
ENDTX
ENDTY
ERRCNT
ERRFLG
ERRMSC
ERTABO
EXITER

016730
016745
016772
010566
011106
012062
011454
001232
001312
014146
014264
014216

2931
2940
2943
2159
2207
23154
22634
7964
8274
2706
2720
2739

29464
29464
29464
21654
2213

EM1

HALTS
HILIM

ICOUNT
INBUF
INIFLG
INSTER=
INSTR =
INSTRZ
JUMBIT=
LIGHTS
LIMITS
LIMIT,

016664

014176
013370

001222
015166
001310
104404
104403
013754
040000
001202
013316
00445¢

SEQ 0061

TABLE =~- USER SYMBOLS

1070

DTO

0174614

1067+

B744
S74a
2924

2927

2934

2692
2536

7924
2500
8254
8464
844
25N
614a
7814
2552
1294

1074«
948
29464

1562

2296
1d77+«
1075+«

1563

2297
2142+
1076

2141+

2745+
2451e

2696+

2353+

29514

2937

29L64

943«
940+
2724
2754Lm
2744m

2434
2388+
27274

27384
2566

1955«
2542
964
2561
1024
25264
731
949+
<5664
1302

2584

2449
28504
967+

2453

2810
1119
958+

2408+

1332

1400

1319«

2203+

1376+

2243

1446

2244

1447

2245

1448

2246

LOC1

LOGICA
LOKFLG

LOLIM
LPCNT

013374
001220
015370
012476
001313

LSTERR

26154

2568
2448

2524
28564
2655
1128

MEMCLR=
MEPASS
MERRPC
MERRX
MERRZ2
MISC.

1291+
1744

944«

MCRLF
MCSRX
MDATA

MERR3

2570

28354
2875#
28624

M_OCK

MNEW
MPASSX
MPFAIL
MPOLY
MM
MR
MSTCLR=

014746
015047
01501
014556
016470
014550
014636
104412
001000

MTITLE
MTSTN
MTSTPC
MVECX
NEXT

015033

014734
015003
001216

POPRO =
POP1SP=
POP2SP=
PS

PUSHRO=

28644
28504
2858%#

PUSH1S=

RESOS = 104407

RE TURN

001214

2137

1461

2191

2003+
29124

2021+

2695+
2816

2781+
2825

1494

1539

1636

1890

1576

1593

1606

2465

2257

2289

2293

1923

1653

2309

2078

1679

2313

1357
1896

2005

1500

1546
2022

2170

1110#
1862+

1277~
1956+

1405
1996+

2094«

2454

2750

2569

2571

1122

1405+

1547

1427+

1640

1493+

2079

2783

1726

2006

2038

1791

1815

2374

1767

2220

2270

2782

1538+

1635+

1766~

1406

1430~

2801
2811

013276
013360
001230
014366
000017
012600
005726
022626
177776
010046
005746

PUSH2S= 024646
RDSW
014374
RESREG
014174
RESTAR
014312
RESTRT
012506

1217

1444

1312
1863
966

1957+
1747

2894n

1317

2063
2852#
28674
28604
28304
29464
2828#
2838#

2587

25834
2449
2387+
2616

28394

ooDBIT- 001000
out
014510
PARAM = 104405
PARAM1
013222
PARERR
PART]
PASCNT
PF TAB
POLY. =

13467
1745

1060

2BLEN

25864

SEQ 0062

-0

LOBITS
LOCK

K 5
13:43 PAGE 64
CROSS REFERENCE TABLE =-- USER SYMBOLS

nY)—
NV,

CZDQE
MACY11 30A(1052’
28-JuL-78
CZDQEE P
25-JuL-78 15:28

2548
2389+

2522
27374
27704
2413
2737
946+

934«

1009+

2145+

2559

279%#

2807+

2817+

1033~

1035

1039+

24204
1029

1121

1492+

CZDQE
MACY11 30A(1052)
CZDQEE.P1
25~JUL-78
RUN
RUNCNT
RUNFLG
RXBA.P=
RXBA.S=
RXBUFF

001304
001306
001302
000000
000004
016000

RXWC .P= 000001
RXWC.S= 000005
RX.BCC= 000015

SAVACT
SAVBCC
SAVEPC
SAVNUM
SAVPC

SAVRO

001502
015356
015360
001276
001274

001256

SAVR1
001260
SAVRZ
001262
SAVR3
001264
SAVR4G
001266
SAVRS
001270
SAVSP
001272
SAVO5 = 104406
SCOPE = 104400
SCOP1 =
SEC16
SEC16X
SEQ.
=
SIMBCC
SPACNT=
STACK =
STBCC
STFLG.
STORET
Sv05
SWR
SWREG
SWREGC
SwO0
SwO1
=
SWO2
=
Sw03
=
SWO4
-~
SWO05
=
Swo6 =
SWO8
=
Sw09 =
Sw10
=
SW11
=
swi2
=
Sw13
=
Swi4
Sw15

104401
015362
015364
000014
012064
013713
001200
010202
001311
015366
013404
001200
000176
014516
000001
000002
000004
000010
000020
000040
000100
000400
001000
002000
004000
010000
020000
040000
100000

28-JuL-78
5:28
1537«

820#
821a

3
6214
6254

1130

29174
622#
6264
6354

755+
1706+«

2110«
748«

8164
8094
810#
8114

8124
8134

L
5
13:43 PAGE 65
CROSS REFERENCE TABLE =-- USER SYMBOLS

SEQ 0063

104 3w
1044+
91+

1634+

1921%
1051+
1055+
1045+

2095~

242 Te

2454%

2455

2750

2752

2784

1135

1196

1219

1245

1644

1648

2118

2172

2180

2224

2274

1716
29084
2411#

29074

2987
2989

2996
2998

1613

1753

1774

1798

1822

1846

1870

995

1014

1022

2100

2439

1057«

1064+

2959
1471

1516

2014
29094

2075

1961

23234

2751

2772
2101

1865

968

2691
2814

971

2738
2821

21104

982

2746

989

2748

2798

CZDQE
MACY11_30A(1052)
28-JUL-78
CZDQEE.PIN
25-JUL-78 15:28

SYNBCC
SYNBIT=
SYNC
SYNC. =
TEMP
TEMP1

010570
100000
015374
000011
015230
001244

TEMP?

001246

TEMP3

001250

TEMPSL

001252

13:43

PAGE 66

1502

1898

1931

21694

1114

6314
2623
670%
2160
8054
2210
8064
2339
8074

1116«

1139

1223

1364

2122

2631
671
2193x
976«
2324«
1659+
2344
1164

2658+
804H
2199«
1147«
2328+
1661+
2345+
1169+

2773«
975+
2204+
1160+
2885
1663
2348
1170

2774

28924
980+
2323«

2993
808#
2977

1165«
2982

1168«
2991

6164

1580+

713

1581

SEQ 0064

CROSS REFERENCE TABLE =-- USER SYMBOLS

1112

1599«

976

29144

2346+
2140+

1377+

1381+

2139~

2146+

2156+

2157+

2162+

2194+

2201+

2205+

1680«

1684

1729+

1731

2325+

2327

2337+

1600

1311»
1688+

1324+
1735+«

1356+
2010+

20N

2970

1368

1393«
2979

1394
2984

1170

1325+

1549=

2004»

2009

201

2015+

2972

1710+

1713«

1714

1717«

1718+

1728«

2208+
1378«

1383«

2623%

1146%

1359

TEMPS

001254

TKCSR
TKDBR
TLAST =
TMPDAT

001204
001206
007472
(015340

7828
7834
1028
1657«

2442
2444
23814
1658+«

2502
2504

2800
2512

2802

1660

1672+

1673+

1681«

TPCSR
TPDBR
TRPOK
TSTNO

001210
001212
013730
001226

784
7854

2479
24B1x

2482
2484

2485
2487«

2513
2512«

2688
2690+

1038~
1887+
10384

1109«
1920+
2421

1193«
1954+

2759

2787

1633«

1765+«

1789«

1813«

2422

1276+
1995+

1536«

002254
005636
006662
006726
006772
007036
007102
007146
007242
002646
007336
007472

945«
1861*
1033
16334
17654

1491»

TST1
TST10
TST11
IST12
TST13
TST14
TST1S
TST16
TST17
TST2
TST20
TST21

794K
1837«
1027
1538
1635

1790
1814
1838
1862
1889
1039
1922
1956
1996
1110
1194
1277
1427
1493
1017«

18134
18374
18614
18874
19204
1040
1954#
19954

2381

11934
12764
14264
14914
15364
1018«

1020«

1021+

24404

1207

1496

1541

1552

1892

1925

2113

2130

2176

2221+

TST22

newnxx

TST3
TST4
TSTS
1ST6
1S17
TTST

003230
003522
004460
005002
005130
012562

TXBUFF

015376

TXISRT
TXWC.P=
TXWC.S=
TX.8CC=
TX.MUXTY8CC

010504
000003
000007
000016
000013
011110

TXBA.P= 000002
TXBA.S=
TXBCC
011456

29004

26774

1766

6234
6274
2024
1124

2228
2141
624N
6334

1426*

17894

22694
1166

2271«
2151

6284
6364

1960

1709+

22174

11094

1201

2278

29154

CZDQE
MACY11_30A(1052)
CZDQEE.P11
25~JuL-78
TYPDAT
014162
TYPE
= 104402

TYPMSG
USEBCC
VECMAP
WORD
WRDCNT

28-JuUL-78
5:28

N S
13:43 PAGE 67
CROSS REFERENCE TABLE =-- USER SYMBOLS

2730
842N
2604
2806
27134
2095

27334
966
2498
2808

974

2508
2816

984

2520

991

2524

1016

2615

XPASS
XPOLY

1652

XSTATQ

1768«

1792«

2190

2240

2292

11114
1766
19234

1194
17674
1956

11954
1790
19584

9124
9254
1395
1690
1969

9134
972
1429
17054
1974

9144
977
1459
1724m
2012

XTSTN
XVEC

$CNTG
$&

014537

014530
000021

= 000016

NN
—

2775

~nN

(@ LVF

Yol

ASEN

g
e
s Ganr G
Ginr Guner Gunr
G
G
G
GG
Qo

eolelelelolelolelalololololole]

-MEMCL
-MSG
MSTCL
.PARAM

Jhur G

< INST1

WNW'\)%WWWW
QRWRY
SN
—

017560

.ERRTA
CHLT
. INSTE
. INSTG
. INSTR

2390
2721

2392
2726

2396
2731

26914

X8X
XCSR
XERR
XHEAD

.BEGIN
. CKSWR
.CNTLU
.CNVRT
. CONVR

1034

2654

14724
26654

WRKO.F

SMNEW
SMSWR

SEQ 0065

23874

2525
2802+

2803+

2804

28274

28804

1958+
2962

(ZDQE
MACY11 30A(1052)
28-JuL-78
CZDQEE
.P11
25-JuL-78 15:28

PFAIL

014300

LRESOS
.SAVOS
.SCOPE
.SCOP1

013436
013376
012552
012664

.SYNC
.TRPSR
.TRPTA
JTYPE

015372
013716
001314
012704

START

. ABS.

645
853
851

001512

017560

ERRORS DETECTED:

13:43 PAGE 68
CROSS REFERENCE

936

839
841

26054
25914
24384
26624

1143
649
8378
863

1227
WY
(¢79
24704

696

9344

27634

946

1372

TABLE -- USER SYMBOLS

2771

2134

2188

Y00
O

DSKZ:(CZDQEE ,DSKZ: CZDQEE . SEQ=LSKZ : (ZDQXX .MAC ,DSKZ : (ZDQEE.P11
RUN-TIME: 6 10 1 SECONDS

RUN-TIME RATIO: 59/18=3.2
CORE USED:
18k
(35 PAGES)
DOCUMENT PAGES:

29134

SEQ 0066