Digital PDFs

AH-8623E-MC

January 1979

67 pages

Original

34MB

view download

OCR Version

46MB

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

OCR Text

MISC & BCC TESTS

AH-8623E-MC

JAN 1

CZDQEEO

!fluflflflfl

FIiCHE 1 OF 1

MADE
IN USA

(ZDQE
MACY11 SOA(‘IOS?)
CZDQEE.P11
25=JuL-78

28-Ju.-78
5:28

13:43

PAGE 2

SEQ 0001

IDENTIFICATION

PRODUCT CODE:

AC=8622E
-MC

PRODUCT NAME
:

CZDQEEO MISC &

DATE:

TST

JUNE 1978

MAINTAINER:
THE

BCC

DIAGNOSTIC GROUP

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 ITS

AFFILIATED COMPANIES.

(C)

1974,

THE FOLLOWING ARE

DIGITAL
DEC

1978 BY DIGITAL EQUIPMENT CORPORATION

TRADEMARKS OF

PDP
DECUS

DIGITAL EQUIPMENT CORPORATION:

UNIBUS
DECTAPE

MASSBUS

CZDQE
MACYN 30A(1052)
28-JUL-78
CZDQEE.P11
25=JUL-78 15:28
| I8

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

TO INSURE

THAT IF AN

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 FUTURE.
THE SEVEN DIAGNOSTICS ARE:

\‘OV‘J\WN—‘

. CZDQA [REV]
. CZDQB [REV]
. CZDQC [REV]
CZDQD [REV]
CZDQE [REV]
. CZDQF [REV]
. CZDQH [REV]

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

THERE IS ALSO AN ONLINE TEST TO BE DISCUSED LATER.
1. CZDQO [REV]
ONLINE TEST. (ITEP OVERLAY)

AND A PARAMETER INPUT PROGRAM IS AVAILABLE
1. CZDQG [REV]
DQ11 TRIAL PROGRAM (PARAMETER INPUT)

REQUIREMENTS

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

8351?133 (OR CQUILIVALENT)

SYNC MODEM (ONLY REQUIRED FOR ONLINE

2.2

TEST)

STORAGE
PROGRAM WILL LOAD AND RUN

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

BE NOTED AND TO BE UNTOUCHED BY CPERATOR
AFTER DQ11

TRIAL PROGRAM HAS BEEN EXECUTED.

OR AFTER THE

"AUTO SIZING'' HAS SEEN DONE.

LOADING PROCEEDURE

3.1

ME THOD
ALL

PROGRAMS ARE

IN ABSOLUTE FORMAT AND

CZDQE
MACYN 30A(1052)15235JUL-78
CZDQEE.P11
25=JuL~78
ARE

LOADED USING THE

13:43

PAGE
4

ABSOLUTE LOADER.

ABSOLUTE LOADER STARTING ADDRESS
MEMORY
SIZE
K

SEQ 0003

*500

=
17

16K

12K

117
137
157

20K
264K
28K
3.1,1

LOAD THE ADDRESS OF ABS. LOADER (LOC.XxXx500)

3.1.2

THEN START

STARTING PROCEEDURE
A. LOAD LOC.

200

SET SWR T0 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 SOFTWARE SWITCH REGISTER OPERATION
AND OPTIONS. %%x*
X
NOTE:THE SOF TWARE SWITCH REGISTER IS LOCATED AT LOC.176
SOF TWARE DISPLAY REGISTER iS LOCATED AT LOC.174

C.THEN START

THE PROGRAM WILL

TYPE MAINDEC NAME AND PROGRAM NAME

THIS WAS THE FIRST START UP OF

THE FOLLOWING:

THE PROGRAM) AND ALSO

‘MAP OF DQi1 STATUS''
1400
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 THE
USER IF AUTO SIZING IS DONE.
FOR INFORMATION OF STATUS
TABLE SEE SECTION 8.4 FOR HELP.

sxvx|F THE SOF TWARE SWITCH REGISTER IS SELECTED THEN THE FOLLOWING
WILL BE TYPED AFTER THE PROGRAM IDENTIFIES ITSELF:
SWR=XXXXXX NEW=
(REFER TO SECTION 4.1 FOR OPERATOR'S OPTION) *»#=+
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.P11
25=JUL-78 15:28

13:43

PAGE 5

SEQ 0004

THE PROGRAM WILL TYPE 'R'’
ANC PROCEED TO RUN THE DIAGNOSTIC
CONTROL SWITCH SETTINGS

IF THE DIAGNOSTIC IS RUN ON A CPU WITHOUT A SWITCH
REGISTER THEN A SOF TWARE SWITCH REGISTER IS USED WHICH ALLOWS

THE USER THE SAME SWITCH OPTIONS AS THE HARDWARE SWITCH REGISTER.

IF THE HARDWARE SWITCH REGISTER DOES NOT EXIST OR IF ONE DOES
AND IT CONTAINS ALL ONES (177777) THEN THE SOF TWARE SWITCH
REGISTER (LOC. 176) IS USED.
:
CONTROL
THIS PROGRAM ALSO SUPPORTS THE DYNAMIC LOADING OF

TYPE CONTROL G <*G>;

THE

SOF TWARE SWITCH

THIS CAN BE ACCOMPLISHED BY

THIS WILL ALLOW THE TTY TO ENTER DATA INTO

LOC. 176 AT SELECTED POINTS WITHIN THE PROGRAM.

THE MACHINE WILL THEN TYPE: SWR=XXXXXXNEW= (XXXXXX IS THE OCTAL CONTENTS

THE SOF TWARE SWITCH REGISTER.)

3) AFTER THE
OF

°"°'NEW=""' HAS BEEN TYPED THEN THE OPERATOR CAN DO ONE

THE FOLLOWING AT THE TTY:

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

IF A CONTROL U <*U> IS DEPRESSED THEN THE PROGRAM WILI. SEND YOU
BACK TO STEP 2.

6.1

Sw 15

SET: HALT ON ERROR

SW 13
SW 12

SET: INMIBIT ERROR PRINT OUT
SET: INHIBIT TYPE OUT/BELL ON ERROR.

SW 14

SWw 11

SET: LOOP ON CURRENT TEST

SET:

INHIBIT ITERATIONS

SW 10

SET: ESCAPE TO NEXT TEST

SW OB
SW 07
SW 06
Sw 05
Sw 04
SWw 03
SW 02
SW 01
SW 00

SET:
SET:
SET:
SET:
SET:
SET:
SET:
SET:
SET:

SW 09

SET: LOOP WITH CURRENT DATA

CATCH ERROR AND LOOP ON IT
USE PREVIOUS STATUS TABLE. CLR-DO AUTO SIZE.

LOCK ON SELECTED TEST
RESTART PROGRAM AT SELECTED TEST
RESELECT DQ11°'S DESIRED ACTI.E.

CZDQE

MACY11_30A(1052)
28-JuL-78
CZDQEE.P11
25=JuL-78 15:28
4.1.2

13:43

PAGE 6

SEQ 0005

SWITCH REGISTER RESTRICTIONS

SWw 00

RESELECT DQ11'S DESIRED ACTIVE.
PLEASE NOTE THAT A MESSAGE IS 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'"

NG THIS

SWITCH ALTERS THAT Loomou THEREF ORE
IF FOUR DQ11S ARE IN THE SYSTEM
*x+D0 NOT*+* SET SWITCHS GREATER THAN

SW 03 IN THE UP POSITION. THIS WOULD BE

A FATAL ERROR. DO NOT SELECT MORE ACTIVE

DQ11S THAN HAS BEEN GIVEN INFORMATION
ABOUT IN TRIAL PROGRAM.

O~D>

LOAD ADDRESS 200
START WITH SW 00=1

PROGRAM WILL TYPE MESSAGE

--m

CONTINUE THE BINARY NUMBER OF DQ11S DESIRED ACTIVE
EXAMPLE: 1=1 DQ11; 3=2 DQ11; 7=3 DQ11; 17=4 D@11 37=5
DQ11 ETC.
NUMBER (IF VALID) WILL BE IN DATA LIGHTS (EXCLUDING 11/05 11704, 11/34)
CONTINUE WITH ANY OTHER SWITCH SETTINGS DESIRED.

SW 01

IT IS STRONGLY SUGGESTED THAT

AT LEAST ONE PASS HAS BEEN MADE

BEFORE TRYING TO SELECT A TEST

THAT IS NOT IN THE ORDER OF SEQUENCE
THE REASON BEING IS THAT 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.

SWw 09

LOOP ON CURRENT DATA:

THIS SWITCH WILL ONLY WORK IF

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 BE

4&.1.3

SINGLED OUT.

SWITCH REGISTER PRIORITYS

ERROR SWITCHES

SwW

SW 15

HALT ON THE ERROR.

SW 10

GOTO NEXT TEST ON ERROR.

Sw 1

SW 08

wessHLT
SCOPE

DELETE PRINT OUT/BELL ON ERROR.

DELETE ERROR PRINTOUT.
GOTO BEGINNING OF

THE TEST,

(ERROR) ROUTINE SUPPORTS <“G> OPERATION®*#+

SWITCHES

CZDQE
MACY11_30A(1052)
28-JuL-78
CZDQEE.P1
25=JUL-7815:28
1.

13:43

PAGE 7

SEQ 0006

SW 09 (IF ENABLED BY ''SCOP1'")

2.
3.

Sw 14
Sw 11

«*x+SCOPE ROUTINE WILL SUPPORT <*G> OPERATION###+

4.2

STARTING ADDRESS

STARTING ADDRESS IS AT 000200

THERE ARE NO OTHER STARTING ADDRESSES
FOR THE DQ11 DIAGNOSTICS PREVIOUSLY MENTIONED

NOTE:

IF ADDRESS 000042 IS NON-ZERO

THE PROGRAM ASSUMES

IS UNDER

ACT11 OR DDP CONTROL AND WILL ACT ACCORDINGLY
AFTER *ALL* AVAILABLE DQ11'S ARE TESTED
THE PROGRAM WILL RETURN TO ‘DDP2'' OR "‘ACT=11"",

OPERATING PROCEDURE
WHEN PROGRAM IS INITIALLY STARTED MESSAGES AS DESCRIBED IN SECTION
FOUR WILL BE PRINTED.

AND PROGRAM WILL BEGIN RUNNING THE
DIAGNOSTIC

5.2

PROGRAM AND/OR OPERATOR ACTION
THE TYPICAL APPROACH SHOULD BE
HALT ON ERROR (VIA SW 15=1)
WHEN EVER AN ERROR OCCURS

Q3.

CLEAR SW 15
SET SW 14: (LOOP ON THIS TEST)

THE

SET SW 13:

(INHIBIT ERROR PRINT OUT)

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 INFORMATION

CONCERNING THE ERROR REPORT; LOOK IN THE LISTING

FOR THAT TEST NUMBER WHICH WAS TYPED OUT

AND THEN NOTE THE PC OF THE ERROR REPORT
THIS WAY THE EXACT FUNCTIONING OF THE TEST
CAN BE INTERPEDITED
6.

ERRORS

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

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

IN MOST CASES ADDITIONAL

INORMATION WILL BE SUPPLIED THE THE ERROR MESSAGE

?gé&j IS TO GIVE THE OPERATOR AN INDICATION OF

6.2

ERROR RECOVERY

THE

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

13:43

PAGE 8

SEQ 0007

IF FOR_SOME REASON THE DQ11 SHOULD

"HANG THE BUS'' (GAIN CONTROL OF BUS SO
T
CONSOLE MANUAL FUNCTIONS ARE INHIBITED) AN INIT
OR POWER DOWN/UP IS NECESSARY FOR OPERATOR
TO REGAIN CONTROL OF CPU.

THIS SHOULD HAPPEN; LOOK IN LOCATION

“TSTNO'* (ADDRESS 1226JFOR THE NUMBER OF THE TEST THAT

hElARngLMING AT THE TIME OF THE CATASTROPHIC

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

*+x*HALT RECOVERY WHEN USING SOF TWARE SWITCH REGISTER*s %=
IF

THE SOF TWARE SWITCH REGISTER IS TO BE CHANGED AFTER A HALT

THE THE OPERATOR IS REQUIRED TO TYPE A <*G> BEFORE DEPRESSING CONTINUE.
THE FOLLOWING WILL BE TYPED:

SWR=XXXXXX

NEW=

(REFER TO SECTION 4.1 FOR OPERATOR OPTION)

RESTRICTIONS

7.1

STARTING RESTRICTIONS

SEE SECTION 4.

Vol

(PLEASE)

OPERATING RESTRICTIONS

DQ11

TRIAL PROGRAM MUST BE RUN PRIOR TO THE

FIRST AND ONLY THE FIRST RUNNING OF ANY DQ11

DIAGNOSTIC

NOTE:
IF NO PROGRAM OTHER THAN
DQ11 DIAGNOSTIC WAS LOADED AFTER 0011 TRIAL OR
If CORE MEMORY HAS NOT BEEN CHANGED;OR IF THERE

IS NO DQ11 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 IS ATTEMPTING
THE "AUTO SIZING'' WHEN PROGRAM IS INITIALLY STARTED
WITH SWO7=0.

MISCELLANEOUS

8.1

EXECUTION TIME

8.2

PASS COMPLETE
WHEN THE DIAGNOSTIC HAS COMPLETED

A PASS THE FOLLOWING IS AN EXAMPLE

THE PRINT OUT TO BE EXPECTED.

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

160000 VEC:

300 PASSES: 0000C1 ERRORS: 000000

THE NUMBERS FOR (SR AND VEC ARE
NOT NECESSARILY THE VALUES FOR THE DEVICE

CZDQE

MACY11_30A(1052)
28-JUL-78
25=JUL-78 15:28

CZDQEE.P11

13:43

PAGE 9

SEQ 0008

THEY ARE ONLY FOR THIS EXAMPLE.

8.3

(MINI 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.

KEY LOCATIONS

RETURN (1214)

(1216)

TSTNO

(1226)

RUN

(1304)

CONTAINS THE ADDRESS WHERE PROGRAM WILL
RETURN WHEN ITERATION 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.05 IS THE DQ11 NOW
RUNNING.

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

THESE LOCATIONS CONTAIN THE INFORMATION
NEEDED TO TEST UP TO 16 (DECIMAL) DQ11S
SEQUENTIALY. THEY CONTAIN THE CSR,VECTOR
AND STATUS CONCERNING THE CONFIGURATION
OF EACH DQ11.
EACH BIT SET IN THIS LOCATION INDICATES

DQACTV (1500)

}#{J&f ASSOCIATED DQ11 WILL BE

TESTED

:
EXAMPLE
(DQACTV) 1500/0000000000011111
MEANS THAT DQ11 NO. 00,01,02,03,04
WILL BE TESTED.
EXAMPLE
:

(DQACTV) 1500/00000000000 0001

MEANS THAT DQ11 NO. 00,04

DACSR

WILL BE TESTED.
CONTAINS THE RECEIVER CSR OF

(1506)

DQSTAT (1510)
D
) -2~

8.4

IN THE

3
2
1

0
09

THE

CURRENT DQ11 UNDER TEST.
CONTAINS THE STAYUS OF THE CURRENT
DQ11 UNDER TEST

SET:

SET:
SET:
SET:
SET:
SET:
SET:

TWO SYNC CHARS/ONE SYNC CHAR

TEST JUMPER INSTALLED/NOT INSTALLED
B8 OPTION INSTALLED/NOT INSTALLED
BA OPTION Ir'STALLED/NOT INSTALLED
ACTIVE ON FIRST NON-SYNC/ACTIVE AFTER NO. OF
AB OPTION ANSTALLL"/M)T INSTALLED
ODD VRC/EVEN VRC

SYNC

CZDQE

MACY11_30A(1052)

CZDQEE .P1

25-JuL-78

28-JuL-78

15:28

13:43

8IT 00-08

PAGE 10

SEQ 0009

VECTOR "A"" OF DEVICE

8.5

*exe METHOD OF AUTO SIZING ww=

8.5.7

FINDING THE CONTROL STATUS REGISTER.
WHEN LOOKING FOR THE CSR IT IS NECESSARY TO TAKE CARE
THAT WHEN A CSR IS FOUND THAT IT

IS THE METHOD
AN ATTEMPT TO
IF A TIME-QUT
AND ATTEMPTED

IS INDEED A DQ11.

OF My MADNESS FOR THIS ROUTINE.
CLEAR THE MISC. REGISTER IS TRIED
TRAP OCCURES POINTERS ARE UPDATED
AGAIN. IF NO TIME-OUT; THE RECEIVER

THAT

.
“ACTIVE BIT'' (BIT 12)

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

AT THE MISC. REGISTER.

A DQ11.

8.5.2

THEY ARE

THERE

THE INFORMATION IS STORED AWAY.

THIS IS

ONE SYNC BIT OR TwWO?
SINCE TOD MUCH HARDWARE MUST BE TURNED ON TO SENSE THE

PRESENTS OF

ONE

SYNC OR TWO.

THE PROGRAM ASSUMES TWO SYNC

CHARS. NOTE: THIS ASSUMPTION MAY BE ALTERED AFTER AUTO SIZING
BY ALTERING BIT 15 IN APPRIOATE DQSTXX: LOCATION.

8.5.3

"BB'" OPTION INSTALLED?
TO SENSE FOR THE 'BB'' OPTION THE PROGRAM SELECTS THE
CHARACTER DET. REGISTER AND THE LOADS IN ALL 1°S; IF
ANY ONE OR COMBINATION OF BITS ARE SET THE B8 OPTION
IS ASSUMED TO EXIST.

8.5.4

"AB'" OPTION INSTALLED?
TO SENSE FOR THE ''AB'" OPTION THE PROGRM SELECTS THE
POLYNOMIAL REGISTER AND WRITES ALL 1°S INTO IT; IF ANY
%EE?;S?MIMHM 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 THE BA OPTION EXISTES

8.5.6

JUMPER ON END OF CABLE? +*»+NOTE:CZDQE ONLY#*#*+
THE PROGRAM CHECKS TO SEE

SEND

AND CARRIER ARE SET:

TEST JUMPER IS ON THE END OF

8.5.7

EITHER OR BOTH CLEAR TO

SO THE PROGRAM ASSUMES THE

THE CABLE.

ACTIVE ON FIRST NON-SYNC?
SINCE TOO MUCH HARDWARE MUST BE TURNED ON TO SENSE FOR
WHEN THE DQ11 GOES ACTIVE THE PROGRAM ASSUMES "‘ACTIVE
ON FIRST NON-SYNC''. NOTE: THIS CAN BE CHANGED BY ALTERING

BIT 11

IN THE APPRIOATE DCSTXX: AFTER AUTC SIZING

CZDQE

MACY11_30A(1052)

CZDQEE .P11

8.5.8

25=JuL-78

28-JuL-78
15 :28

13:43

PAGE 11

SET FOR ODD OUR EVEN PARITY?
AS ABOVE TOO MUCH HARDWARE IS NEED TO SENSE WHICH PARITY
WAS SELECTED.SO THE PROGRAM ASSEMES ODD PARITY.
NOTE: THIS CAN BE CHANGED BY ALTERING BIT 9 IN APPRIOATE DQSTXX: LOCATION. AFTER AUTO SIZING

8.5.9

FINDING THE 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.

L ISTING
FOLLOWING

SEQ 0010

CZDQE

MACY11 220“10;5)15?35&1-78

| CZDQEE.P11

13:43

PAGE 12

SEQ 0011

.ENABLE AMA

; CZDQEEQ/<377>/ MISC & BCC TST
CG"YRIGHT 1975, DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 01754
REVISED 16-DEC-76 BY R. BLACK

;
;

)SUPPORTS SOF TWARE SWITCH REGISTER
B)gms THE DYNAMIC LOADING OF THE SOF TWARE SWITCH REGISTER
:STARTING PROCEDURE
i OAD PROGRAM

:LOAD ADDRESS 000200
:PRESS START
.
:PROGRAM WILL TYPE ‘'CZDQEEQ/<377>/ MISC & BCC TST’

:PROGRAM WILL TYPE 'R'* TO INDICATE THAT TESTING HAS STARTED

:AT THE END OF A PASS, PROGRAM WILL

:AND THEN RESUME TESTING

TYPE PASS COMPLETE MESSAGE

;SWITCH REGISTER OPTIONS

SW15=100000
SW14=40000
SW13=20000
SW12=10000
SW11=4000
SW10=2000
Sw09=1000
Sw08=400

;=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
:=1,L00P WITH CURRENT DATA
:=1,LO0P ON ERROR

SW02=4
SW01=
SW00=1

sLOCK ON TEST SELECT
;RESTART PROGRAM AT SELECTED TEST
sRESELECT DQ11 DESIRED ACTIVE

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

sNOTE:

THIS MUST NOT EXCEED ORIGINAL COUNT

| CZDQE

MACY11 30A(1052) ZggJULJS

CZDQEE.P11

559
560
561
562
563
564
3565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584

585

|
|

|
|
I

586
587
588
589
5%
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606

25-JuL-78
1

612
613

614

PAGE 13

GENERAL DEF INATIONS AND EQUIVALENCIES

sREGISTER DEFINITIONS
000000
000001
000002
000003
000004
000005
000006
000007

sGENERAL REGISTER
sGENERAL REGISTER
sGENERAL REGISTER
sGENERAL REGISTER
sGENERAL REGISTER
:GENERAL REGISTER
sPROCESSOR STACK POINTER
PROGRAM COUNTER

RO=%0
R1=%1
R2=%2

R3=%3
R4=%4
R5=%5
SP=%6
PC=X7

;LOCATION EQUIVALENCIES
177570
177570
177776
001200

DSWR=_

177570
DLIGHTS=177570

PS=177776

STACK=1200

sHARDWARE SWITCH REGISTER LOC.
sHARDWARE DISPLAY REGISTER LOC.
sPROCESSOR STATUS WORD

:START OF PROCESSOR STACK

s INSTRUCTION DEFINITIONS
005746
005726
010046
012600
022626

PUSH1SP=5746
POP1SP=5726
PUSHR0=10046
POPR0=12600
PUSH2SP=24646
POP2SP=22626

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

BIT2=4
BIT1=2
BITO=1

024646

607

608
609
610
611

13:43

.EQUIV

sDECREMENT PROCESSOR STACK 1 WORD
s INCREMENT PROCESSOR STACK 7 WORD
:SAVE RO ON STACK
sRESTORE RO FROM STACK
;DECREMENT STACK TWICE
s INCREMENT STACK TWICE
EMT,_HLT sBASIC DEFINITION OF ERROR CALL

;DQ11 OPTIONAL DEFINITIONS
002000
000

ACTBIT= 4000

0000

JUMBI 7‘40000

010000
020000

ABBI T=2000

SEQ 0012

CZDQE
MACY11 220“10
)
2
CZDQEE.P11

Jll-78

13:43

PAGE 14

GENERAL DEF INATIONS AND EQUIVALENCIES

oDDBIT=1000
SYNBIT=100000

:DQ11 SECONDARY REGISTER DEF INATIONS
RXBA.P=0
RXWC.P=1
TXBA.P=§
TXWC.P=

RXBA. S=4
TXWC.S=7

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

POLY.=17

sRECEIVER BUS ADDRESS PRIMARY.
sRECEIVER WORD COUNT PRIMARY.

s TRANSMITTER BUS ADDRESS PRIMARY.

s TRANSMITTER BUS ADDRESS PRIMARY.
sRECEIVER BUS ADDRESS SECONDARY.
sRECEIVER WORD COUNT SECONDARY.
sTRANSMITTER BUS ADDRESS SECONDARY.
s TRANSMITTER WORD COUNT SECONDARY.
sCHARACTER DETECT REGISTER.
:SYNC REGISTER.

sMISCELLANEOUS REGISTER.
s TRANSMITTER MUX REGISTER.
s SEQUENCE REGISTER.
;RECEIVER BCC REGISTER.

s TRANSMITTER BCC REGISTER.

;POLYNOMIAL REGISTER.

SEQ 0013

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

640
641
?,4."

644

645
646
647

0000264
000026
000030

649

000034

648

650

651

000032

000036

652

000046

654
655

000052

653

000000

.=0

000024

.=24

014300
000340
013750

013716
000340

000046

.=4b

000052

=52

012476

000000

000056

000072

010120
012721

001000

000074
000102
000110

012737
013737
006037

000146
001500
001244

101771

103023
005037
005722

676

000132

105200

682

683
684

685
%

688
689
690
691

000126

000134

000136
000142

012772

001376

112712
005722

000144

000761

000150

042712

000146

000154
000156

000162
000164

000174
000176

051612

022626
012716

000002
000207

000174
007000

1$:

000004

022021
020127

000114
000116
000122

620

VECMAP:

000064
000066

672
673
674

681

LOGI CAL

:ACT HOOKS

340

*SERVICE AT LEVEL 7

:TO TAKE THE PC FROM THE STACK AND US IT AS THE VECTOR ADDRESS
-=56

000056

668

678
679

*GENERAL HANDLER DISPATCH SERVICE

;EXECUTED, TRAPPING TO LOCATION 20 WHERE A ROUTINE IS EXECUTED

000056
000060

677

*SERVICE AT LEVEL 7

. TRPSRV

;TO ITS VECTOR WHERE IT WILL PICK UP THE STATUS LOCATION

664
665

675

:POWER FAIL HANDLER
*SERVICE AT LEVEL 7
*ERROR HAWDLER

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

659

PFAIL
340

;FOR ITS NEW PC; AND PICK UP AN 10T INSTRUCTION FOR ITS
:NEW PS. WHEN THE NEW PC IS FETCHED AN IOT INSTRUCTION IS

660
gg}

669
670
671

SEQ 0014

:STANDARD INTERRUPT VECTORS

340

657
658

666
667

:TRAPCATCAER FOR ILLEGAL INTERRUPTS

HLT

000340

656

663

13:43 PAGE 15
TRAPCATCHER FOR UNEXPECTED INTERUPTS

000020
001244

000300

000007

R1, (RO)+
#4. (R1)+
(ROY+, (R1)+
R1,#1000

MOV
MOV
ROR

#4820
DQACTV, TEMP1
TEMP1

BLOS

2s:

177776

000340

MOV
MOV
CMP
cMP

177776

BCC
CLR
ST

MOV

IN(B

BNE
3$:
4$:

MOVB
TST

B8R

BIS

BIC

cMP
MOV

000142
5%:

RTI
RTS

PS
(R2)+

#340,8-2(R2)
RO

;START FILLING THE VECTOR AREA
WITH .+2; 10T (4)
:UPDATE THE POINTERS
:IS ALL FLOATING VECTOR AREA DONE

*BR IF NOT ALL DONE

*SET FOR 10T TRAP BY DQ11
*GET THE ACTIVE D@11
S
*ARE YOU ACTIVE.. ocm

:IF CARRY CLEAR.. NO MORE DQ11S
*CLEAR PS
*PUT POINTER TO STATUS TABLE

:TRY AND SET PRI/SEC DONE AND IE

:DELAY........

e ana s DELAY

#300, (R2)
(R2)+

~o INTERUPT ASSUME 300 FIX IN TEST C
*UPDATE POINTERS

GO DO IT AGAIN

7.(R2)

*CLEAR UNWANTED BITS

(sm (R2)

<sp>¢ (SP)+
#3s, (5P)
PC

*ENTERD

:POP ]OT JUNK OFF STACK
*SET RETURN PC ON STACK

*GG HOME
.
:ALL SIZING IS DONE

sev*xSOF TWARE SWITCH REGISTER*##+
=174

DISPREG:
SWREG :

:PROGRAM START

0
0

BY IOT TRAP BY DQ11

:SOF TWARE DISPLAY REGISTER
*SOF TWARE SWITCH REGISTER

CZDQE
MACY11 3omosz> 23-JL1-78
CZDQEE.P11
25-JuL-78

c 2
13:43 PAGE 16
ROUTINES USED FOR AUTO SIZING.

ggg 000200 000137 001512

JMP

698
000220
699 000220 012702 001400

.=220
CSRMAP: MOV

700
701

000224
000226

005022
022702

001512

702
703
706
705
706

000232
000234
000240
000244
000250

708

000264

005061

000006

713
714
715

000306
000312
000314

052712
005011
112761

100000
000010

005761

000006

052712

020000

707

709
710
711
712
716

717

718

000256

000270
000274
000302
000304
000322

000330

000334

001374
005037 001504
012702 001400
012701 160000
012737 000614 000004
112761

012711
022761
001071
010122
012761

001402

719

000336

721

000350 012761

720

722

000342

112761

000012

177777

000017

177777

005761

000006

724

000364

052712

002000

726

000376

032761

001400

728
729

000406
000412

052712
032761

010000
030000

731
732

000422
000426

052712
052712

040000
004000

73
735
736
737
738

000436
000440
000442
000446
000452

005722
005011
005061
005061
005061

725

001402

000370 012761

727 000404

001402

730 000420 001402
733

000432

052712

739 000456 005

740 000462 005237
741
062701
742
000472 022701
743
000476 001267
744 000500 005037
745 000504 005737
746

000510

749

000522

751

530

747 000512
748 000516

000524

001434

013701
010137
000241

18%:

010000
030000 000006

000356

723 000362

000005

001400

000006

001504
000010
164000

001504
001276

006137 001500

005237 001500

*WRITE INTO CHAR DET REG

MOV

#-1.6(R1)

*SET FOR B8 OPTION
*SEL POLYNO. REGISTER

#17.5(R

6(R1)

*APPERENTLY NO B8 OPTION.

*WRITE POLYNO.REGISTER
*WAS REG WRITTEN??

*BR IF NO AB OPTION

#1400,2(R1)

*TRY TO SET .DTR. .RS.

*BR IF NO BA OPTION

BIS

#ABBIT, (R2)

BIT

#14600.2(R1)

*SET FOR AB OPTION

*DID ANY OF THEM SET

BIS
BIT

#BABIT, (R2)
csoooo 2(R1)

*SET FOR BA OPTION
:DID .CS. .CO. SET

BIS
BIS

mmn (R2)
#ACTBIT.(R2)

:SET FOR JUMPER
-SET FOR ACTIVE ON FIRST NON-SYNC

ST
CLR
CLR
CLR
CLR

(R2) +
(R1)
2(R1)
2(R1)
4(R1)

*POP POINTER
*CLEAR RCSR
*CLEAR TCSR
*CLEAR AGAIN
*CLEAR ERROR REG

INC
ADD
CMP
BNE
CLR
ST

DQNUM
#10 R
#164000,R1
1$
DQACTV
DONUM

*UPDATE NUMBER OF DQ11S
*UFDATE CSR POINTER BY 10 (8)
*HAVE ALL FLOATING ADDRESSES BEEN CHECKED??
*BR
IF NOT ALL DONE
*ZERO ACTIVE DQ11S
*WERE ANY DQ11S FOUND

MOV
MOV

DQNUM,R1
R1, SAVNUM

*SAVE NUMBER OF DQ11S
*SAVE NUMBER FOR ACT11

BEQ
3s:

-SET FOR TWO SYNC CHARS
*CLEAR DQ ACTIVE BIT
*SEL CHAR DET REGISTER

aeesnxm

CLR

001500
001504

*TRY AND SET RX ACTIVE
:LOOK FOR SYNC 1 AND SYNC 2
*THIS IS NOT A DQ11 IF I BRANCH
*NOW THIS IS A D@11 =-STORE CSR

BIS

2%:

“TRY AND SEL MISC REGISTER

*WAS THE REGISTER WRITTEN?

BEQ

000006

#SYNBIT,(R2)
(R1)
#10.5(R1)

DO CLEAR
*ALL TABLE oous

wfi)

BEQ

000002
000002
000004

sTRY AND CLEAR MISC REG

#-1.6(R1)

MOV

001000

6(R1)

MOV

BEQ

000002

*BR IF MORETO GO
*SET NUMBER OF DQ11S TO 0
*SET TABLE POINTER
*GET FIRST FLOATING ADDRESS
*SET FOR TIME OUT TRAP--NO DEVICE--

#10000, (R1)
#30000.6(R1)
2
R1,(R2)+

000002

.6
DANUM
#1400 ,R2
#160000,R1
45, N

MOV
cTMP
BNE
MOV

MOVB

000002

;CLEAR ALL STATUS TABLE

#12.5(R1)

CLR

BEQ

000006

#14600,R2

MOVB

000005

;GO TO START OF PROGRAM

(R2) +
#1512,R2

BIS
CLR
MOVB

000005

.START

CLR
MP

BNE
CLR
MOV
MOV
MOV

SEQ 0015

cLC

ROL

INC

#ODDBIT.(R2)

6(R1)

[ 3

DACTV

DOACTV

*BR IF NO JUMPER

:SET FOR ODD VRC.......

*CLEAR SEC REG

.’*EY BUDDY. NO DQ11S FOUND IN SYSTEM
*CLEAR CARRY

ACTIVE ADDRESS

‘SETTBIT 0

CZDQE_
MACY11_30A(1052)
28-JUL-78
CZDQEE.P11
25=JUL=7. 15:28

752

13:43

PAGE

SEQ 0016

ROUTINES USED FOR AUTO SIZING.

000534
36
000540
546
000554

DEC

BNE
MOV
MOV

33
6, aNé
DQAC TV,SAVACT

;DEC NUMBER OF DQ11S
:BR_IF MORE TO GO

JRESET TIME OUT VECTOR
:SAVE ACTIVE

:SET 10T TRAP PRIO: TO 7
sSET TABLE POINTER
sSET VECTOR START

sSET _VECTOR+Z START
;GO FIND THE VECTORS

A ¥

s TYPE MESSAGE

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

*HOW CAN I TEST NO DQ11S
000466

RTI

050504
046440
020046
051524

001200

.=1200

177570
177570
177560

SWR:
LIGHTS:
TKCSR:
TKDBR:
TPCSR:
TPDBR:

HOME

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

s INDIRECT POINTERS
177570
177570
177560
177562
177564
177566

;SWITCH REGISTER POINTER
;DISPLAY REGISTER POINTER
;TELETYPE KEYBOARD CONTROL REGISTER
sTELETYPE KEYBOARD DATA BUFFER
sTELEPRINTER CONTROL REGISTER

;TELEPRINTER DATA BUFFER

;PROGRAM CONTROL PARAMETERS
RETURN:

NEXT:
LOCK:
ICOUNT:
LPCNT:

TSTNO:
:
PASCNT
ERRCNT:

LSTERR:

OOOOOWOOO

177562
177564
177566

JASCIZ

:SCOPE ADDRESS FOR LOOP ON TEST

sADDRESS OF NEXT TEST TO BE EXECUTED
sADDRESS FOR LOCK ON CURRENT DATA
sNUMBER OF ITERATIONS THAT CURRENT TEST WILL BE EXECUTED
sNUMBER OF ITEREATIONS COMPLETED
sNUMBER OF TEST IN PROGRESS
:NUMBER OF PASSES COMPLETED
:TOTAL NUMBER OF ERRORS
sPC OF LAST ERROR CALL

;PROGRAM VARIABLES
(elelelelelels)

SR
PR PR AR P L ERESEE LR R

2
177524

055103
177460
020103
020103
000

*DON'T LET OPR HIT CONT. SW
;ENTERED BY TIME OUT TRAP

: TEMPORARY STORAGE
: TEMPORARY STORAGE
: TEMPORARY STORAGE

: TEMPORARY STORAGE

PAGE 18

PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS.
TEMPS:
SAVRO:
SAVR1:

SAVR?:
SAVR3:

SAVR4:

SAVRS:

SAVSP:
SAVPC:
SAVNUM:
CREAM:

RUNFLG:
RUN:
RUNCNT
:

[eolelelelelelelele
)

001254
001256
001260
001262
001264
001266

13:43

.BLKW

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

; TEMPORARY STORAGE

:RO STORAGE

:R1 STORAGE

:R2 STORAGE
:R3 STORAGE
R4 STORAGE

;RS STORAGE

:STACK POINTER STORAGE
;PROGRAM COUNTER STORAGE

SEQ 0017

MACY!N 30A(1052)
CZDQE
28-JUL-78
CZDQEE.P1?
25=JuL~78 1 :28

13:43

PAGE 19

SEQ 0018

PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS.

000
000

§§§

—=O

S ccalh
-

i
e
e
b

WWWW

8888

;PROGRAM CONTROL FLAGS

INIFLG:
STFLG:
ERRFLG:
LOKFLG:

$v=0

.BYTE
.BYTE
.BYTE
.BYTE

0
O
0
O

sPROGRAM INITIALIZATION FLAG
sTEST START FLAG
sERROR OCCURED FLAG
;LOCK ON CURRENT TEST FLAG

;DEFINITIONS FOR TRAP SUBROUTINE CALLS
sPOINTERS TO SUBROUTINES CAN BE FOUND
:IN THE TABLE IMMEDIATLY FOLLOWING THE DEFINITIONS
AR

837
838
839

001314

841

001316

843

001320

845

001322

847

001324

849

001326

851

001330

853
854
855

001332

001334

857

001336

859
860
861
862
863
864
865

001340

AR AR R AR AR AR AR AR R

AL A

el ittt

.TRPTAB:

001314

AR AR AR R AR AR AA R AR AR AR

ittt

AR AR ARk

ittt

stiassty

SCOPE=TRAP+0

sCALL TO SCOPE LOOP AND ITERATION HANDLER

TYPE=TRN.’;$PE

;CALL TO TELETYPE OUTPUT ROUTINE

INSTR=TR{VI’;‘3TR

sCALL TO ASCII STRING INPUT ROUTINE

INSTER:T%;?ER

;CALL TO INPUT ERROR HANDLER

PMTR?I;;’SQM

sCALL

SAVOS:TR??;SOS

sCALL TC REGISTER SAVE ROUTINE

RESO5=TRAP+7

;CALL TO REGISTER RESTORE ROUTINE

CNVRT=TRAP+11

;CALL TO DATA OUTPUT ROUNTINE WITHOUT CR/LF.

SCOP1=TRA§E$:

CMVRT=TI:!SP§3§T

;CALL TO LOOP ON CURRENT DATA HANDLER

TO NUMERICAL DATA INPUT ROUTINE

;CALL TO DATA OUTPUT ROUTINE

HSTCLR=TF:!£§¥E%R

sCALL TO ISSUE MASTER CLEAR

*HCLR=T?&PAEER

sCALL TO CLEAR ALL SCRATCH PAD MEMORIES

104414

CKSW=TR?€2;:R

;CALL

104415

CNTLU:IR??;I}EU

sCALL TO ALLOW LOADING OF SWREG FROM TTY

001342

012222

001344

014376

001346

014452

TO ALLOW SWREG TO BE LOADED FROM TTY

A A A AR AR AR R A AR AR R

SRR A

AR A AR AN R AR AR AR AN R AR AR R AR A A AR R

R R AR A AR AR R AR

RN R AN RA AR

AR AR AR AR

AR AR AN

R AR AR A AR AR AR RN AR AR AR AR AR AR RS

;D@11 VECTOR AND REGISTER INDIRECT POINTERS
DQRVEC:
DORLVL:
DQTVEC:
DQTLVL:
DCGRCSR:
DOR(CSH:

0
0

0
0
0
0

;POINTER TO DQ11 RECEIVER INTERRUPT VECTOR
;POINTER TO DQ11 RECEIVER INTERRUPT SERVICE PS

;POINTER
;POINTER
;POINTER
;POINTER

TO DQ11 TRANSMITTER INTERRUPT VECTOR
TO DQ11 TRANSMITTER INTERRUPT SERVICE PS
TO DQ11 RECEIVER CONTROL REGISTER
TO HIGH BYTE OF DQ11 RECEIVER CONTROL REGISTER

SEQ 0019

PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS.

DQTCSR:
DQERR:
DQREG:
DQSEC:
DQSECH:

0
0
0
0
0

;POINTER
sPOINTER
;POINTER
;POINTER
sPOINTER

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

:
:

.BLKW
.BLKW
BLKW

.BLKW

:
:

BLKW
BLKW

.BLKW
.BLKW
BLKW

:
:

.BLKW
.BLKW

.BLKW
BLKW
BLKW
BLKW

:
:
:
:

BLKW

T: BLKW
DOCSR
DQSTAT:

.BLKW

e —d

BLKW
.BLKW

—d ——d

:
:

:
:
:

D —d

.BLKW

)

BLKW

.BLKW

BLKW

.BLKW
.BLKW

BLKW
.BLKW

:
:

BLKW
.BLKW

:
:

.BLKW

BLKW

D —d =D e

BLKW
.BLKW

.BLKW

:
:

D —d —d

D ——d —d

;DQ11 STATUS TABLE AND ADDRESS ASSIGNMENTS

000000
000000

PAGE 20

d e

001364

13:43

— —d

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

;CONTROL STATUS REGISTER FOR DEVICE NO: 00
;VECTOR AND CONFIGURATION STATUS FOR DEVICE NO:
sCONTROL STATUS REGISTER FOR DEVICE NO: 01
;VECTOR AND CONFIGURATION STATUS FOR DEVICE NO:
;CONTROL STATUS REGISTER FOR DEVICE NO: 02
sVECTOR AND CONFIGURATION STATUS FOR DEVICE NO:
;CONTROL STATUS REGISTER FOR DEVICE NO: 03
sVECTOR AND CONFIGURATION STATUS FOR DEVICE NO:
;CONTROL STATUS REGISTER FOR DEVICE NO:
sVECTOR AND CONFIGURATION STATUS FOR DEVICE NO:
;CONTROL STATUS REGISTER FOR DEVICE NO: 05
sVECTOR AND CONFIGURATION STATUS FOR DEVICE NO:
;CONTROL STATUS REGISTER FOR DEVICE NO: 06
;VECTOR AND CONFIGURATION STATUS FOR DEVICE NO:
;CONTROL STATUS REGISTER FOR DEVICE NO: 07
sVECTOR AND CONFIGURATION STATUS FOR DEVICE NO:
;CONTROL STATUS REGISTER FOR DEVICE NO: 10
:VECTOR AND CONFIGURATION STATUS FOR DEVICE NO:
sCONTROL STATUS REGISTER FOR DEVICE NO: 11

01
02
03
04

05
06
07
10

sVECTOR AND CONFIGURATION STATUS FOR DEVICE NO: 11
sCONTROL 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
sCONTROL STATUS REGISTER FOR DEVICE NO: 15
sVECTOR AND CONFIGURATION STATUS FOR DEVICE NO:
sCONTROL STATUS REGISTER FOR DEVICE
16
:VECTOR AND CONFIGURATION STATUS FOR DEVICE NO:
sCONTROL STATUS REGISTER FOR DEVICE NO: 17
:VECTOR AND CONFIGURATION STATUS FOR DEVICE NO:

HOLD ACTIVE BITS FOR TESTING
:SAVE NUMBER OF ACTIVE DQ11S
;OCTAL NUMBER OF TCTAL NUMBER OD DQ11S

;CSR OF DQ11 UNDER TEST
sVECTOR AND CONFIGURATION STATUS OF DQ11 UNDER TEST

sPROGRAM INITIALIZATION

sLOCK OUT INTERRUPTS
sSET UP PROCESSOR STACK

;SET UP POWER FAIL VECTOR

;CLEAR PROGRAM CONTROL FLAGS AND COUNTS
sTYPE TITLE MESSAGE

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

000340
001200
014
001504
001311
001230

12
001302
001400
001232
001234
000001
001512

177776

000024
001276

012737

13:43

012737
012737
012737
013746
013746

177570
177570
000006
000004
001656
177777

000176
000174
000004
000006
000042

001300

.START: MOV
MOV
MOV
MOV
CLRB
CLR
CLRB
CLR
MOV
CLR

gLt

DQNUM, SAVNUM
STFLG

;CLEAR START FLAG
sCLEAR PASS COUNT
;CLEAR ERROR FLAG

PASCNT

ERRFLG
RUNFLG
a1400 CREAM

RRCNT

:CLEAR ERROR COUNT
;CLEAR LAST ERROR POINTER
:SET UP FOR TEST 1
;SET _UP FOR POWER FAIL BEFORE
;TESTING STARTS
sMOV HARDWARE SWR TO SWR
sMOV DISPLAY LIGHTS TO LIGHTS
:SAVE VECTORS

LSTERR

a6, ~(

000004

:SET UP FOR TIMEOUT

177326

:REFERENCE HARDWARE SWITCH REGISTER

66$

64%:
65%:

(SP)+, (SP)+

#DISPREG,LIGHTS

(SP)+, a8

66%:

(SP) +.a#é

w62
67

t""'THEBNEXT & LINES OF

INIFLG
12%

JMTITLE

INIFLG

001200

#SWREG, SWR

67%
67%:

001244
001246

000002

001244

000001

177160

aSWR
PC, CSRMAP

, XHEAD
#1400, TEMP1

arggpi TEMP2
lZéTEHP1

12%:

#5w00,aSwR
3 3

001502

sADJUST STACK
sPOINT TO SOF TWARE SWITCH REG
;POINT TO SOFT DISPLAY REG
sRESTORE VECTORS

#SWREG, SWR

BNE

000220
015126
14
001400
177252

177140

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

#DSWR, SWR
lDLIGHTS LIGHTS

000000
104414

#340,PS

#STACK,SP
#.PFAIL ,a#24

001200
001202

SEQ@ 0020

PROGRAM INITIALIZATION AND START UP.

#1,TSTNO
#.START
,RE TURN

177232

027737

001226
001214

001310
001000
001310
000176

PAGE 21

CKSWR

aSwWR,SAVACT

sUNDER MONITOR
CODE MOVED

TO SOLVE PR#2757 (JUNE

78)xsanw=

JHAS INITIALIZATION BEEN PERFORMED?

:IF YES, BR

:TYPE TITLE MESSAGE

sIF NOT SET FLAG AND INIT
;IS SWREG USED

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

13:43

BLOS
TYPE

3700

177120

001500

000300
000302

118%:

1$:

@SWR,DQACTV

HALT
CKSWR
MOV

#300,R0

MOV

CMP
P
BNE

001000

DQACTV,RO

#302.R1
R1, (RO)+

(R1)+

(RO)+, (R1)+
#1000.R0
28

:TEST START AND RESTART

NS
Nore SIIRRLEBHRENG

2888883888s2080sss

012737
012706
005737
001040

000340
001200
000042

177776

.BEGIN: MOV

032777
001411

000004

177032

014746
000240
000240

BIT
BEQ

#BIT2,aSWR
1%

012562
012564

MOV

#NOP, TTST

B8R

104414

012660
012662
000002

012562
012564
176764

MOV
gzg

CKSWR
TYPE

MOV

1%:

:CHECK FOR <*G>

*CHECK FOR LOCK ON TEST

ANOP_ TTST+2

BIT

#5w01,aswR

INSTR

:SET UP STACK
*1S PROGRAM UNDER MONITOR CONTROL

,MLOCK

BRW, TTST

BEQ

:LOCK OUT INTERRUPTS

#STAZK, SP
§:42

MOV

2%:

#340,PS

;SET UP TO LOCK

BRX. TTST+2

:LOCK NOT SELECTED, SET UP FOR NORMAL SCOPE LOOP

“IF SW01=1, GET STARTING PC

MTSTPC
PARAM

002224

TST1

BYTE
BYTE

888

4s:

TLAST
#RE TURN

1
1

B8R

MOV

TYPE
i {np

#TST1,RETURN

:START AT TEST 1

MR
SRE TURN

STYPE R
*START TESTING

.’.'..'.t"...'Q't..t.t..".'..'.'"ltt'.t.t....Q..'.t....."'t."."'

fst1:

mov
MOV

MOV

TSTB

VNN RN
W=

—_—

0
0

NNNONNNN

001214

8-‘000
2NN-ASNNN

WN=O
VNV

118

MOV

CLR

)
)

B8R

MOV
MOV

28:

SRR
R F AR &

HAL
T

D i

b o

d
b

b
b

b o
i
s

SEQ 0021

MERR3

)
il =D

(elelelelelelelelele)

1026

PROGRAM INITIALIZATION AND START UP.

990
991
99
5
994

PAGE 22

BNE

MOV
MOV

(OMB

#1,TSTNO

#1572,
RE TURN
#TST2 NEXT
RUNFLG

;1S THIS MY FIRST

#8]T0,RUN
#74, RUNCNT

*SET
“SET

RUNFLG

:BR IF FLAG IS SET
SSET

TIME HERE?

RUN POINTER,
FOR MAX OF 16 DQ11°'S PER SYSTEM
RUN FLAG

CZDQE
MACYN gomo
)
28-Ju.-78
CZDQEE.P11
2

1
0023;3 033737
1047
002
0010
1048 002334 005737
1049 002340 oow.gs

001304

1051
1os§
1053
1054
1055

002344
002350
002356
002362
002364

006137
062737
005337
001360
012737

001304
000004
001306

001300

000020

001306

1057
1058
1059
1060
1061
ws%

002400
002406
002410
002412
002414
002416

012737
000746
104402
014641

000001

001304

1050

002342

000257

001500

002420

RUN.DQACTV
3
DQACTV
2%

ROL
ADD
DEC
BNE
MOV

RUN
#4, CREAM
RUNCNT
1s
#16. [RUNCNT

MOV
8R
TYPE
MERR2
HALT
B8R

#1,RUN
1$

MOV

2s:

000776

000257

BIT
BNE
ST
BEQ
cCC

1056 002372 012737 001400 001300

1063

cce

1064 002422 006137
1065 002426
017737
1066 0024
737
1067 002442 017737
1068 002450
737
1069 002456 013737
1070 0024i% 013737
1071 002472 042737
1072
002500 013737
1073
002506 062737
1074 0025'%
013737

001304
176646
2
176632
000002
001506
001510

001506
001300
001510
001300
001360
001350
001350
001350 001352
001352
001352 001354

ROL
MOV
ADD
MOV
ADD
MOV
MOV
BIC
MOV
ADD
MOV

1076

002530

013737

001354

MOV

1079

002552

005237

001362

1081
1082

002564
002572

062737
013737

000002
001364

1084
1085
1086

002606
002614
002620

013737
237
013737

001366
001370
001370

001370

1088
1089
1090
1091
1092
1093
1094,
1095

002632
002640
002644

013737
005237
000240

001372
001374

001374

1075

002522 062737

1077 002536 062737
1078 002
013737
1080

1083

1087

002556

013737

001354

001356

:CLEAR CPU COND. CODES

DQRC SH

:GENERATE ADDRESS OF HIGHM BYTE

ADD
MOV

#2,DATCSR
oorcsa DQERR

;GENERATE ADDRESS OF ERROR REGISTER

ADD

#2 ,DQTVEC

#2.DOTLVL
DQRCSR, DARC SH
DOQRCSR,DQTCSR

#2 DOERR

;GENERATE ADDRESS OF RECEIVER INTERRUPT SERVICE PS

;GENERATE ADDRESS OF TRANSMITTER INTERRUPT VECTOR
OF TRANSMITTER INTERRUPT SERVICE PS

sGENERATE ADDRESS OF TRANSMITTER CONTROL REGISTER

MOV
INC
MOV

DOERR, DQREG
DOREG
DQREG, DQSEC

;GENERATE ADDRESS OF HIGH BYTE OF ERROR REGISTER

MOV
INC

DOSEC,DOSECH
DQSE CH

JGENERATE ADDRESS OF HIGH BYTE

INC

NOP

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

INC

737 000002 001366
001372

*UPDATE RUN POINTER
*UPDATE ADDRESS POINTER.
*DEC NUMBER OF TIMES [ LOOKED AT ACTIVE.
:BR
AND KEEP LOOKING.
:START RESTORING MY POINTERS.

;GENERATE ADDRESS

MOV

005237 001372

“CLEAR ALL THE CONDITION CODES OF CPU

DOTVEC,DQTLVL

001364

001364
001366

-nw AN ACTIVE DQ11 TO TEST.
:BRIF 1 FOUND ONE TO TEST.
mo OUT IF THERE ARE NO D@11 ACTIVE.
“BR TO FATAL ERROR. WHY AM | HERE IF NO ACTIVE DQ11°S???

*UPDATE RUN. ACTIVE DQ11 FOUND.
:PLACE ADDRESSS OF DQ11 AT DQCSR
“UPDATE ADDRESS POINTER
:PLACE STATUS OF DQ11 AT DQSTAT
:UPDATE ADDRESS POINTER

ADD
MOV

mob
CREAM

SEQ 0022

RUN
SCREAM,DQCSR
#2,CREAM
SCREAM,DQSTAT
#2,CREAM
DOCSR, DORCSR
oosmi DQRVEC
7007, DQRVEC
ocnvsc DORLVL
#2 ,DORLVL
DQRLVL ,DATVEC

ADD

001356
001360 0071362

001360

13:43 PAGE 23
PROGRAM INITIALIZATION AND START UP.

DQSEC

:GENERATE ADDRESS OF SECONDARY REGISTER

13:43

D—
D
D
e
D e

D d e

D e

)

TST2:

032737
001004
112737
000403
112737
000240

100000

001510

CKSYN1: BIT

000377

015374

000026

015374

040000

001510

001216
176260

001214

D
e e
e
D e

1%:

CKDN:

176346

SNEN

—=OVooN

VIV
S BN

177376

11
015372
176312

001244
176256
176256
176254

#2,TSTNO
ner NEXT
4‘377 SYNC

SST gwg&lro MARK

MOVB

#Zé.stc

JRESET FIRST SYNC TO 26

BIT

#JUMBIT ,DQSTAT

;DOES THE TEST JUMPER EXIST.

aRE TURN

;GOTO NEXT TEST

NOP

.+14
NEXT ,RETURN

JFILL TX BUFFER WITH BINARY COUNT PATTERN
JUPDATE CHAR.

+ZERO COUNTER POINTER

“UPDATE

BNE
MEMCLR

3%:

MOV
CLRB

INCB

INCB
MOV
INCB

MCVB
MOV
INCB

1 GDOREG
.SYNC aDOSEC
aDGCR

MOV
INCB
MOV

176334

MOV

176324
176320

#RXBUFF R4
(R4)+
3s
aDQREG
#RXBUF F ,aDQSEC
aDQREG
#-400,3DQSEC
aDQREG
csmc aDOSEC
aDQR

CLRB

0—402 aDQSEC

176306

MOV

MOO0.0DOSEF

001246

MOV

#20,TEMP?2

BPL

CLR

4%:

INC
INC
TST

BR IF YES
JPREPARE TO DO NEXT TEST.

RO, (R4)+
RO

2%:

CLR

sCONTINUE TEST.

:ZERO DATA POINTER.

#TXBUFF R4

MOVB
INCB

BR IF TWO SYNC CHARS SELECTED.

MOV

D
D
D
D
e
D

015374
176340

3222322233323 3333233233333 3133332333233 3223223222232222222¢%3

BMgVB

JMP

176360

THIS TEST IS NOT

;ADJUST POINTER FOR NUMBER OF SYNC CHARS.

BNE
MOV

1%:

176372

CABLE

#SYNBIT DQSTAT

CLR

016000
176364
177600
176352

MOV
MOV
BNE

D
d e

176376

DONE

TEST 2

001226
001216

016000

IF JUMPER IS NOT INSTALLED

AT END OF

Adiii i3

000002
003230

015376

012737
012737

032737
005
013737

SEQ 0023

;CABLE TEST.
sTEST OF DATA REALIBILITY THROUGH
sCABLE AND LEVEL CONVERTERS.
:

D
D
e
D e
e

MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

JNOTE:

e
e
D
— e

PAGE 24

3
3333

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

TEMP]

aDQRCSR
aDQTCSR
ac2ERR

;SET BUFFER POINTER

BR IF MORE TO DO.
;CLEAR DQ11 MEMORIES.

PREPARE TO ZERO ALL RX BUFFER.
;START CLEARING.

BR IF NOT ALL CLEARED

JSELECT RX BA PRI.

LOAD IT.
JSELECT RX WC PR
*LOAD IT FOR 400(8) CHARS.
SEL TX BA PRI.

;1.LOAD IT.

SEL TX WC PR.
*SET 400(8) CHARS AND TWO SYNC.
SEL SYNC REGISTER

LOAD IT.
GEY MISC REGISTER

SET FOR EIGHTBITS.

SSET DELAY......
wocicgpenen

“SET RX GO'!
:SET TX GO!'!
;ANY ERRORS

;BR IF NO ERRORS

003
3

13:43

017700

MOV

aDQERR, R2

HLT
TSTB

853

:ZERO COUNTER.

CLR

TEMPS

SAME.
.

#TXBUFF ,R4
#RXBUFF ,RS

CMP

TEMPS . TEMP4

HLT

BNE
SCOPE

MOVB

D
D
D
D
D e
D D
D D
D D

DONE FAILED TO SET.

:CLEAR STORAGE
:GET TX BUFFER AREA
:GET RX BUFFER AREA

LOAD FOR ERROR CALL

:DOES DATA CHECK ouT 0K?

:BR_IF GOOD DATA

:UPDATE COUNTER

:DATA COMPARISON ERROR.

:BR IF MORE DATA TO CHECK.
:SCOPE THE TEST.

D
D
D
D
D
D

FOLLOWING (026).

D D e
D D D

sTHE TRANSMITTER AND RECEIVER BUFFERS ARE BOTH

sCLEARED BEFORE THE TEST IS EXECUTED.
;A TOTAL
OF 400 CHARS. WILL BE TRANSMITTER INTO

: THE RECE!VER WHEN RX PRI. DONE SETS;
:THE RECEIVER BUFFER IS CHECKED FOR ANY SYNC

D D
d D

:CHARACTERS (026).

IF NONE ARE FOUND THEN THE

:RECEIVER DID INDEED STRIP SYNC.

;

TEST 3

016000

—_—

000003
003522

ron

12737
12737
000

tttttttttttttttttttttttttt'tttt’tttfitfittttttttttttttttttttttttt'tttt

800

) D
e D e
)
D d d D

(R4)+, TEMPS

:RX PRI.

;WITH A TRAIL OF SYNC CHARS.

TST3

MOV
MOV
CLR

1%:

MOV

CLRB
INCB

BNE

—

e —d —d —d

TEMP4

:BR IF YES
:DELAY.....
TwEs
oy
3

sRECEIVER STRIP SYNC TEST.
sTEST THAT THE RECEIVER CAN STRIP SYNC.
;CHARACTERS FROM 000-025 WILL BE TRANSFERED

)
)

5%
TEMPT
48
TEMP2
43

MOV
MOV

D i
D d

Hros

CLR

0%:

-l
e
b

CLR

D
D

rnorRON

8882288

:THE DQ11 ERROR FLAG IS SET.
:1S RX PRI DONE SET?

HLT

5%:

aDQTCSR,R1
7
aDQRCSR

BMI]
INC
BNE
DEC
BNE

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

@DQRCSR,RO

MOV
7$:

D
D

MOV

INCB

015376

d d

)

MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

BEQ

CLR

8%:

015376

#3,TSTNO

#TSTI..NEXT
RO

JCLEAR POINTER

(R4)+
RO

BEGIN TO CLEAR THE RX BUFFER
;ALL DONE?

:RESET RO TO ZERO

#RXBUFF R4

MOV
CLRB
INCB

#TXBUFF ,R4
(R4)+
RO

CLR
MOV

RC
#TXBUFF R4

BNE

D e
—

PAGE 25

)
D

D ) D i
—
D e
D ) e

¥ g&n%&nflragg BB LRR RGN 28 BRIERRRB 2B IS IF A NANIITEIEERAR
LS SR IRRRUK

CZDQE
MACY11_30A(1052)
28-JuL-78
CZDQEE.P1
25=JuL~78 15:2 8

;SET THE RX BUFFER

‘BR IF NO

JGET TX BUFFER
;BEGIN TO CLEAR THE TX BUFFER
;DONE YET?

;BR IF NO
JRESET RO

JGET TX BUFFER

SEQ 0024

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

I
|

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

1208 003302 110024
1209 003304 105200

7%:

1210
003
022700 000026
1211 003312 001373
121_% 003314 012702 000026
121
1214

3320
003322

110024
105202

1217 003326

104413

1219 003334

012777 016000

}%}2 003324
1218

003330

1220

003342

122§

003354

1221

1223

1224

1225

1226

100375

8PL

105077

176034

105277

176022

105277

176010

MEMCLR
CLRB

RO, (R4)+
R2

SFILL TX BUFFER WITH SYNC CHARS.
*MORE TO GO?

*SYNC YET?
‘BR IF NO
*SET FOR SYNC CHAR.

‘BR IF YES

@DOREG

;CLEAR ALL D@11
*SEL RX BA PRI.

177400

176016

MOV

#-400,aDQSEC ~ :256. CHARS

003

012777 015374

176004

MOV

#SYNC,@DQSEC

003372

012777

177400

175772

MOV

#-400,3DQSEC

015372

175756

MOV

175744
175724

MOV
MOV
INC

#4010, aDQSEC ~ -EIGHT BITS AND TEST LOOP
#00005,3DQRCSR GO AND STRIP SYNC.
aDQTCSR
*SET TX GO.

BMI
ADD
BNE
INCB
8PL

98
#1,R0
2

003346 012777
003

003400

1232
1233
1234

003440
003442
003444

105277

175776

112777

000011

105277

175750

013777

1229 003420 012777 004010
1230 003426 012777 000003
1231 003434 005277 175724
005000
005001
105777

1235 003450 100406
1236 003452 062700
1237 003456 001372
1238

003460

1241

003464

1244

003476

}513.3 003462

003466
003472

175710

INCB

175762

MOVB
INCB

2%:

100370
104000

003500 012704

016000

005000

122724

001001

HLT

3$:

*TX BA PRI.

aDOREG

*TX WC PRI.

#11,3DOREG

.SYNC,aDQSEC

@DQREG

RO
R1
@DQRCSR

aDQRCSR
aDQATCSR

MOV

#RXBUFF ,Ré

BNE

CMPB

*"RX WC PRI.

@DQREG

CLR
CLR

CLR

+SET BUFFER.

-SET TO XMIT SYNC CHARS.
:256. CHARS

*SYNC REGISTER

:LOAD SYNC REGISTER
*MISC. REGISTER.

*PREPARE TO DELAY.
* SAME
*RX DONE?

‘BR IF YES
D
‘E
Pl
:
AY

*RX PRI DONE NOT SET.

*DISABLE RX
*DISABLE TX

*SET COUNTER

#26,(R4)+

*ANY SYNC CHARS?

*GET RX BUFFER

‘BR IF NONE

]'%gg

:DQ11

MEMORY TRANSFER TESTS

1259

*IF THE PROCESSOR HAS AT LEAST 8K OF MEMORY

1262
1263

STHE FIRST PART EXERCISES THE TRANSMITTER ALONE
*TRANSMITTING FROM ADD.20000 TO LAST MEMORY ADD.

1253
1254
1255
1256

}zzgc’)

003516
003520

104000
105200

000026

CLR
CLR
TSTB

@DQREG

HLT
INCB

1250
}ggg

003512
003514

INCB

105201

175666
175666

003506

INCB

000001

005077
005077

1247 003510
1248
1249

MOVB
INCB

78
#26 ,R2

#RXBUFF ,@DQSEC

003414

1246

68:

;START FILLING WITH CHARS.
*UPDATE POINTER

MOV

1228

1245

CMP
BNE
MOV

RO, (R&4)+
RO
#26 RO

176030

1227 003406

1242
1243

MOVB
INBB

001372
104400

BNE
SCOPE

*RECEIVER DID NOT STRIP SYNC.
*UPDATE COUNTER

*BR IF MORE TO GO.
“SCOPE THIS TEST.

:THIS TEST WILL BE EXECUTED.

SEQ 0025

I-C-ZDQ MACY11_30A(1052) 28-JuL-78 13:43 PAGE 27
CZDQEE .P1

25=JUL=-78

15:28

1524.
1265

;UNDER 28K MINUS 400 (SAVE ABL). THE DATA IS
*VERIFIED ONE CHAR AT A TIME. TWO EIGHT BIT

}222(7:

* CHARS ARE TRANSFERED AT ONE TIME.

| 1268

*ARE EXERCISED TOGETHER IN THE SAME

}5;9

*MANNER AS DESCRIBED ABOVE.

127§
127
1274

;

1275

1276

003522

1278

003536

012737

001226

004460

001216

1279
1280
1281
1282
1283
1284
1285

013705
012737
005737
000240
012737
012700
062700

000004
004434
020000

000004

003610

000004

003540
003544
003552
003556
003560
003566
003572
003576

104413

005710

1287 003600 000240
1288 003602 022700
1289 003606 001371
1290

003610

012706

1295

003636

005002

1297

003644

1291 003614
129§ 003622
1293
003626
129 003632

003640

012737
010537
162700
010037
012700

110220

1298
1299

003646
003650

005202
122702

1301

003656

005202

1303

003664

1302

003654

1306

003666

1308

003710

1310

003724

1305
1306
1307
1309

000004

012737

1300

1311

1319

001220

2%:

3$:

000026

000002

175452

4$:

112777

000002

175436

S8%:

003750

013777

003762

012777

003776

012777

000002

175446

104412
112777

175434

001252

000002

175420

105277

175406

001252

#TSTS NEXT

#200¢ RO
#20000,°0

NOP
CMP
BNE

#160000,R0
1%

:
228K HIT YET.
*BR IF NO

MOV
MOV
SuB
MOV

#4$,L0CK
RSl
#5000 ,R0
RO,LIMIT.H1

*SET FOR LOCK (SW09=1)
*RESET TRAP VECTOR.
*ALLOW ROOM FOR DDP2 MONITOR.
:SAVE LAST MEMORY ADDRESS

MOV

#20000, RO

MOV

MOVB
INC
(MPB

an RS
#108, ans
a#20000

428, ¥,
(RO)

#STACK,SP

*EXIST?

JADJUST STACK

*ZERO DATA CHAR POINTER

R2,(ROj+

*START FILL

. +4

*BR IF NO

R2
#26,R2

*PREPARE TO FILL MEMORY WITH BINARY COUNT
*UPDATE CHAR.
*DOES IT EQUAL THE SYNC CHAR?

INC

BNE

*BR IF NO.

#20000,3DQSEC
#20000.RO
58

:SET TX BA TO FIRST ADD IN 8K
*SET SOFTWARE POINTER.
*CONTINUE TEST

CMP

175470

#4,TSTNO

;SAVE THE TIME OUT VECTOR
:LOAD TRAP VECTOR
*CHECK FOR 8K OF MEMORY.
:
*CPU DOES HAVE AT LEAST 8K.
;PREPARE TO SIZE MEMORY TO 28K
*CHECK MEMCRY.

BNE

112777

020000
020000

MOV
MOV
ST
NOP
MOV
MOV
ADD

CLR

020000

175474

017737

003770

003710
000004
005000
004456

000002

003732

1317

1$:

160000
001200

MOV

MEMCLR

112777

162777

003756

1318

001367

003716

1315

020000
020000

TST4:

020037 004456
012777
012700
000409

003740
003742

1316

001001

003674
003702
003706

1312
1313

1314

TEST &

;QttttQttttttttttttttt't't'ttttttttttttttittt.ttttttttttt.ttttttttttt

1277 003530

1296

*AFTER THE TX ALONE THEN THE TRANSMITTER AND RECEIVER

1269

1286

SEQ 0026

MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

RO,LIMIT.HI

‘BUMP ONE HIGHER

+1S ALL OF MEMORY FULL?

MOVB

#2,aDQREG

MOVB

#2,aDOREG

*SEL TX BA PRI.

MOVB

#2.aDQREG

*SEL TX BA PRI.

MSTCLR
MOVB

#2,aDQREG

‘DO INIT D@11
*SEL TX BA PRI.

INCB

@DOREG

*SEL TX WC PRI.

MOV
MOV
BR

SUB

MOV

#2.aDQSEC

aDASEC,TEMP4

*GG BACKWARDS FOR SCOPE ROUTINE
:SAVE THE TX BA PRI. ADDRESS

175414

MOV

177776

175402

MOV

#-2,aDQSEC

“SET FOR A TWO EIGHT BIT XFER

004012

175366

MOV

#:012.3DQSEC

-SET 8 BITS TEST LOOP AND AUTO/STEP

112777

000012

005277

175354

175372

MOVB

INC

TEMP4,aDQSEC

“SEL TX BA PRI.

#MISC.,aDOREG

aDATCSR

:RELOAD TX BA PRI.
:SEL MISC REGISTER

“SET TX GO.

[czoos MACY11 30A(1052) 28-JUL-78 13:43 PAGE 28
CZDQEE.P11

25-JUL=78 15:28

1320 004010 005777
1321 004014 100001
|

132;
1323

004016
004020

1327
}3353

004044
046

1326 004026
1325 004034
1326 004040

104000
112777

017737
011037
023710
001401
104005

175340
001254
001252

TST
BPL

HLT
MOVB

175342

001252

MOV
MOV
CMP
BEQ
HLT

aDQERR
.+

:ANY ERRORS?
“BR IF NO ERRORS

#13,3DOREG

*DQ11 ERROR FLAG SET.
*SEL TX MUX REG

.+
5

*BR IF GOOD
*DATA COMPARISON ERROR.

(RO)+
RO,LIMIT.HI
5%

:LOCK ON CHARACTER (SW09=1)
*UPDATE SOF TWARE POINTER.
*ALL DONE?
*BR IF NO

aDQSEC,TEMP4
(RO) , TEMPS
TEMPS, (RO)

:READ TX MUX
*READ SOF TWARE POINTER
*IS THE DATA CORRECT

1330 004050 104401
1331 004052 005720
1332 004054 020037 004456
1333 004060 001321

SCOP1
TST
CMP
BNE

;_%9

:THE ABOVE WAS FOR THE TX ONLY

1334
1335

1338

*THE BELOW ROUTINE EXECISES BOTH THE

}.;23

*TX AND RX TOGETHER.

1341

JNOTE THAT THE RX CA SHOULD BE

]'fig

;6400 (8) LOCATIONS HIGHER THAN THE TX CA.

| 3%
1346 004

004070

012737
012700

004102
004106

010077
000413

1352

004116

162777

1354

004130

162777

000002

004144

017737

175222

004154

105077

1347

1348

1349
1350
1351

1353
1355

1356

1357

1358

1359
1360

004074

004110

004124

004136

004152

000006

175252

105077

175240

112777

104412

000002

000006

175210

175246
175234

175224

001252

RO.aDQSEC
78

*LOAD TX BA SEC
“CONT TEST.

SUB

#2.3DQSEC

*KILL LAST XFER

MOVB

6%:

MOVB
CLRB

7%:

aDASEC,TEMP4

*SEL RX BA PRI

INCB

@DQREG

*SEL RX WC PRI

INCB

@DOREG

*SEL TX BA PRI

175152

MOV

0046226

012777

177776

175140

MOV

004240

013777

17512

MOV

004252

012777

177776

175112

MOV

0046266

013777

015372

175076

MOV

1369

004246

1371

004

1373

004274

1375

004306

112777 000006

105277

001252

175116

112777

000011

105277

175070

012

005277

004010
175046

175130

175102

175064

*KILL LAST XFER

@DQREG

015374

175144

*SEL RX BA PRI.

CLRB

MSTCLR

012

105277

*SEL TX BA SEC.

“SEL TX BA SEC

006212

175156

*SEL TX BA SEC

#6.aDQREG

MOV

105277

@DOREG

MOV

MOVB

175164

175170

#6.aDQREG

#2,aDQSEC

177776

105277

#6,aDQREG

SUB

012772

1367

1374,

112777

MOV
BR

004200

004220

1372

175266

175264

:SET FOR LOCK ON CHAR(SW09=1)
*SET FIRT ADD IN 8K

MOV
ADD

1365

1370

000006

#6$,L0CK
#20000, RO

175204
175176

004206

1368

112777

MOV
MOV

001252
000400

1363

1366

001220

013777
062777

004174

1364

004110
020000

004160
004166

1361

1362

MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

175352
000013

INCB

TEMP4,@DQSEC
#400, DQSE

#-2,aDQSEC
#SYNC,aDQSEC

-SAVE IT

*INIT Da11

:LOAD IT
*UPDATE IT

*SET FOR TWO CHARS.
:TX SYNC
ON PRI.

@DQREG

*SEL TX WC PRI.

#6,3DQREG

*LOAD TX BA SEC.

INCB

aDOREG

“SEL TX WC SEC

MOVB

#11.aDOREG

*SEL THE SYNC REG

MOVB

INCB

MOV
INC

#-2,aDQSEC
TEMP4,@DQSEC

#-2,3DQSEC

.SYNC,aDQSEC

QIDOREG

#:710,aDQSEC

aDQARC SR

*SET FOR TWO SYNC.

:LOAD IT

*SET FOR TWO CHAR XFER
:LOAD IT

*SEL MISC REG.

:EIGHT BITS TEST LOOP
*SET RX GO..

SEQ 0027

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

1376 004312

1377
1378
1379
1380
1381
1382
1383
1384
1385
1386
1387
1388
1389

1390
1391
1392
1393
139%
1395
139%
1397
1398
1399
1400
1401
1402
1403
1404
1405
1406
1407
1408
1409

1410
1411

004316
004322
004330
004334
004336
004342
004344
004350
004352
004354
004360
004362
004364

004370
004374
004400
004404
004410
004414
004416

004420
004422
004424

004430
004432

175046
001244
000005
175024

13:43

004456
004456

MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

INC
CLR

001246

MOV
T1STB

001244

‘BR IF YES
*DELAY

BNE

DEC

175006

9%:

001254

174774
174772

BNE
HLT

TST

aDQERR
+4

MOV

(RO) , TEMPS

BPL
HLT

CLRB
MOV

000002
001252
001252

SUB
MOV
CMP

BEQ
HLT

SCOP1
TST

004456

CMP

108:

174540

;SET TX GO..

:DELAY COUNTER

*RX PRI DONE?

INC

001246

001216

aDQTCSR

BMI

004434

004436
004442
004450
0044

PAGE 29

001214

BNE
BR
POP2SP
MOV

MOV

118:

JMP
SCOPE

. H]:
LIMIT
0

(R1), TEMP4

(RO) TEMP4
{

(RO)+
RO,LIMIT.HI
7%
118
RS ,a#%
NEXT ,RE TURN
aRETURN

sRX PRI DONE NOT SET.
;ANY ERRORS

:BR IF NO.

:DQ11 _ERROR FLAG SET.
sSET EXPECTED

:SELECT RX BA PRI.

:GET RX BA
sGET LAST XFER

:GET ACTUAL DATA
;1S DATA OF?
:BR _IF GOOD
;DATA COMPARISON ERROR
;LOCK ON DATA (SW09=1)
;UPDATE SOF TWARE POINTER

:ALL DGE"

:BR IF NO
SEND TEST
:ADJUST STACK POINTER

:RESET TRAP VECTOR
;DO NEXT TEST

*SCOPE THIS TEST

SEQ 0028

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

13:43

*TRANSMITTER TRIGGERED

1417

sTEST TO TRANSMITT ONE CHARACTER ENTERING T
sCHECKING THE BCC_THEN OVERFLOWING
sCAUSING AN EXIT T THEN MAKING SURE
:THAT THE BCC WENT TO ZERO.

1418

1419
1420
1421
1422

1443

1444
1445
1446
1447
1448
1449
1450
1451
1452
1453
1454
1455

1456
1457

1458

1459
1460
1461
1462
1463
1464
1465
1466
1467

001226
001216
001510

012364
174476

001214

AR AR AR RN R AR

TSTS:

MOV
MOV

#5,TSTNO
HTST6 ,NEXT

MOV
JMP

#.EOP,RETURN
aRE TURN

MOV
MOVB
MOV

#3517, WORD
#17,3DQREG
#200, aDQSEC

MOV

#MJORD,aDQSEC

BIT
BNE

MSTCLR
MSTCLR

MOV
MOVB

INN
SN

ey
e
e
i
|
N

004530
004536
004544
004552
004560
004566
004574
004602
004610
004614
004622
004630
004634
004642
004650
004656
004662
004666
004672
004676
004702
004704
004712
004716
004722
004724
004726
004734
004742
004746
004752
004756
004760

000005
005002
002000

TEST S

N SN
AN LS LSS TV

004520
004522

O=O=OO—=O——

0044 7%
004502
004504
004512
004516

33
JISIINS

004460

—_ [

1441
1442

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

1431
1432
1433
1434
1435
1436
1437
1438
1439
1440

SEQ 0029

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

1415
1416

1430

MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

1412
1413
1414

1423
1424
1425
1426
1427
1428
1429

PAGE 30

MOVB
MOV
MOVB
CLR
MOVB

MOV

1$:

174456

INC
cMP
cMP
cMP
INC
DEC
INC
DEC
DEC

2%:

015352

112777

000016

174402

#11, COUNT
#2,3DQREG

#123,3DQREG
#-1,3DQSEC
#67.3DOREG

AR AR AR AR

;ISSUE A MASTER CLEAR

*SET CHAR
*SELECT POLY REGISTER
*SET POLY FOR LRC 8
*SET COUNT TO 11
*SET TX BA PRI
-LOAD TX BA

*SEL TX CC-WRITE EN ENTER T
*SEL TX CC TO -1
*SEL TX CC SEC-WRITE EN EXIT T

*SET TX CC TO ZERO
;SEL MISC REG

aDQTCSR
aDQTCSR,aDATCSR
aDQTCSR,aDATCSR
aDATCSR,aDQTCSR
aDQSEC
aDQSEC
aDQSEC
aDQSEC
COUNT

sSET TX GO
;WAIST TIME.
;WAIST TIME
;WAIST TIME
*CLOCK UP
*CLOCK DOWN
*START THE CHAR UP
:
DOWN
:DONE YET?

#351,RS

:DID CHAR GET INTO BCC

#4012,aDQSEC

BEQ

MOVB

#MISC..aDQREG

DEC
DEC
BNE
MOVB

aDQSEC
COUNT
3
Ze
#16,3DQREG

MOV
INC

A RRR AR R AR RARR

aDQSEC
#MISC. ,@DQREG

18
#16,3DOREG
aDQSEC RS

HLT

RRR R

'A?QIT.DOSTAT
L+

BNE
MOVB
MOV

cMP

000012
000010
174424
174420

#10, COUNT
aDQSEC

cEIGHT BITS TEST LOOP AUTO SET

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

‘BR IF YES

*TX BCC FAILED

-SEL MISC REG

*SET COUNT TO 10
*START CLOCKING BCC OUT UP
:
:DONE YET
3‘BR [F NO
sSEL TX BCC

DOWN

CZDQE
MACY11_30A(1052)
28-JuL-78
CZDQEE.P11
25=JuL-78
115:28
004766

005777
001401

174400

104000
104400

13:43

MISC. RECEIVER AND TRANSMITTER TESIS PLUS BCC TESTS.

TST
BEQ

HLT
(S)C(PE

000000

PAGE 31

aDQSEC

SEQ 0030

;DID BCC GET SHIFTED OUT?

:BR IF YES

:TX BCC_NOT ZERO
:SCOPE TEST

*TEST TO FORCE

*RECEIVER BCC ERROR
:THE TRANSMITTER CHARACTER COUNT

UILL BE SET TO
-300

AND THE RECEIVER CHARACTER COUNT

UILL BE SET TO =400

:THUS THE RECEIVER WILL RECEIVE
:MORE CHARACTERS THAN THE TRANSMITER
TRANSHITTED
*B(C ERROR*

TEST 6
:'""'t.Q..'.Q.Q.Q'Q.Q.'.".QQ‘fi"'t'....'....'...'.."'.Q..Q'.'.".

NNNB
W)
—
VNN SWN=O S 2
— e

d e

Vi wviviwwnunainw

Rt
R e G Y R
R
T S
- —

012737
012737
012737
104413
005000
012704

000006
005042
005130

015376

120007

010570
174300

000100

MOV

MOV
MOV

MEMCLR

CLR RO

#6,TSTNO

#2% _RETURN
#TST7 NEXT

:CLEAR THE DEVICE

*SET RO TO ZERO

;SET POINTER FOR BUFFER
sSTART FILLING THE BUFFER

MOV

#TXBUFF
R4

%CLR

;HAS THE SUFFER BEEN FILLED

#120001,xPOLY
R5,SYNB(C

;SELECT CRC 16 FOR POLYNOMIAL
:GO PRIM THE DQ11
sTHIS IS THE CHARACTER COUNT FOR THE RECEIVER

MOVB
INCB

MOV
JSR
=400

RO, (R4)+
RO

sUPDATE THE DATA

-300
MOV

aDQERR RS

;THIS IS THE CHARACTER COUNT FOR THE TRANSMITTER
;SAVE THE DQ ERROR REGISTER

BMI]

;BR IF THE ERROR DID OCCUR

TST

HLT

;DID AN ERROR OCCUR??

sHALT THE DQ ERROR BIT IS NOT SET

BIT
BNE

#B]1T6,aDQERR
.+

JMAKE SURE IT WAS A R)
:BR IF THE RX BCC BIT IS SET

BIC
BIT
BEQ

#3176,3DQERR
#3176,aDQERR
3%

;CLEAR RX BCC BIT.
sMAKE SURE RX BCC BIT IS CLEAR
:IF CLEAR, BR

HLT

SCOPE

sRX BCC ERROR BIT NOT SET

;SCOPE THIS TEST

“TEST OF TRANSMITTER BCC

‘WITH POLYNOMIAL EQUAL TOQ 177777

‘A FOUR HUNDRED BINARY COUNT

Ja++E

¥ ia,F¥3e,
J:++E

CZDQE
MACY11 30A(1052)
28-JUL=78
J CZDQEE.P11
25-JuUL=78 15:28

;.
3
13:43 PAGE 32
MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

1524
1525

:DATA PATTERN IS RUN THROUGH
*THE BCC WITH A SHIFT BY SHIFT

1527
1528

‘AT THE END THE TRANSMITTER IS ALSO
*CHECKED TO SEE IF THE BCC WAS SHIFTED

1526

SCHECK OF THE HARDWARE BY THE SOF TWARE.

12233

:OUT AND THAT THE BCC WENT TO ZERO.

1531

*NOTE:

1533

1532

1534

1535

;

1536

005130

012737

1540

005154

005000

1542
1543

005162
005164

1537 005136
1538 005144
1539 005152

000007

001226

012737
012737
104413

005176
005636

012704

015376

005166
005170

001375
012737

177777

015350

1548 005202
1549 005206

005037
012737

015344
000016

1552

012777

1541

1544
1545

1546
1547

005156

005176
005200

1550
1551

005214
005220

1553

005234

1555

005250

1554

005226

110024
105200

104412
104412

005037
112777
112777

015354
000022

015376

000123

005242

012777

005256

005077

174110

1558

005270

013777

015350

1560
1561
1562
1563

005304
005312
005316
005324

012777
005277
027777
027777

004012
174046
174042
174034

1556

1557
1559

1564

1565
1566
1567
1568

1569
15720
1571
15;;
1573
1574
1575
1576

1577

1578
1579

005276

005332

112777

112777
112777

027777

177400

005
005372
005400

013737
013737
004537

015354
015344
012064

005420

005424
005430

005037 015352
000001
000001
009001
112777

005277
005377
112777

000012

173746

173742
000016

MOV

#7,TSTNO

CLR

MOVB
INCB

RO, (R4)+
RO

MOV
MOV
MEMCLR
MOV

#2%
,RE TURN
#TST10,NEXT
#TXBUFF R4

;CLEAR ALL THE DQ11

*SET POINTER TO ZERO

*GET TX BUFFER

*START FILLING TX BUFFER
*WITH A BINARY

001254

CLR
MOV

CALBCC
#16, TEMPS

;SET CALCULATED BCC TO ZERO
*SET TYPE OUT ERROR REG TO 16

174136

MOV

#TXBUFF ,aDQSEC

:SET TX BUFFER

174122

MOV

28:

)
174142
174126

174112

MSTCLR
MSTCLR
CLR
MOVB

DATA
#22,aDQREG

MOVB

#123,aDAREG

MOVB

*COUNT PATTERN
-SET POLYNOMIAL TO 177777
*I1SSUE MASTER CLEAR

*SET DATA OF BCC SIMULATOR TO ZERO
*WRITE EN TX BA PRI
*ENTER T WRITE EN ,TX CC PRI

#-400,aDQSEC ~ :SET FOR 400 CHARS
#67,3DQREG

SEXIT “T*",WRITE EN,TX CC SEC

CLR

aDQSEC

*SET FOR 2ERO CHARS ON SEC

174074

MOV

XPOLY,aDQSEC

:LOAD IT

174060

MOV
INC
cTMP
cMP

174064

174026
174022
174016
174012

TST7:

1%
#177777 ,XPOLY

000012

174026

TEST 7

BNE
MOV

174100

005277
005377
005277
005377

:BEFORE THE TX BCC STARTS.

2332222322322 323 323232323323 23232333 2333332233323 333 3233322332223 223223233222222222¢%3

1$:

005340
005344
005350
005354

005404
005406
005410
005412

001214
001216

THERE IS A TWO SHIFT DELAY

MOVB
MOVB

174040
174032

174024

005406
005410

173750

173732

4$:
5%:
6$:
7%:

#MISC.,aDQREG

*SEL POLYNOMIAL REGISTER
:SEL MISC REGISTER

INC
DEC
INC
DEC

#4012.3DQSEC
-EIGHT BITS,TEST LOOP,AUTO STEP
aDATCSR
*SET TX GO
aDQTCSR,aDATCSR -WAIST TIME.
aDATCSR.aDATCSR -WAIST TIME
aDQTCSR.@DATCSR -WAIST TIME
aDQSEC
*CLOCK UP--aDQSEC
*CLOCK DOWN==aDQSEC
*CLOCK UP--aDQSEC
*CLOCK DOWN==~-

MOV
MOV
JSR

DATA, 6$
CALBCC,7$
RS, SIMBCC

3$:

#17.aDQREG

CLR

1
BLKW
BLKW
MOVB

INC

DEC
MOVB

COUNT

“SET COUNT TO 0

1
1
#MISC..aDOREG

*THIS IS THE NUMBER OF SHIFTS FOR ROUTINE TO DO
*THIS IS WHERE THE CHAR IS PLACED
*THIS IS THE PREVIOUS BCC CALCULATED
:RESELECT THE MISC REG

aDQSE ¢

@ 1SEC
#16.aDQREG

*SET DATA FOR SUBROUT INE
“SET CALCULATED BCC FOR SUB ROUTINE
*GO TO BCC SIMULATOR ROUTINE

*CLOCK UP==-

*CLOCK DOWN===
*SEL THE TX BCC REGISTER

SEQ 0031

CZDQE_
MACY11_30A(1052)
28-JuL-78 *13:43 PAGE 33
CZDQEE.P11
25=JuL-78 15:28
MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

01 7737

173730
015344

001252

aDQSEC, TEMP4
CALBCC, TEMPS
+4

001252

D e

2RSRERERES $BERIRICELRRERARRLEE

-—

D—

SEQ 0032

6%
COUNT
COUNT ,48.
4%

) e

000010

D D e

DATA

) D

#MISC. .aDQREG

) D

CALBCC
aDQSEC
aDQSEC
#16,aDQREG
aDQSEC, TEMP4
CALBCC, TEMPS

173624

.+
3

)

0000
173622
015344

D e

D D

015352
000020

WN=O

#16.,COUNT

173562

#MISC. ,aDQREG
aDQSEC
aDQSEC
#16,3DQREG
aDQSEC

)

COUNT

015352

173544

:UPDATE MY DATA LOCATION
sUPDATE THE COUNT OF BITS PER CHAR
IS THIS CHARACTER DONE YET??

BR_IF CHAR NOT DONE
GET NEW C

sINIT COUNT
sRESELECT THE MISC REG
;CLEAR CARRY

sSHIFT OUT CALCULATED BCC
:CLOCK UP==:CLOCK DOWN=-:SEL_TX BCC REGISTER
:SAVE IT IN TEMP4
:ARE THEY THE SAME??
IF SAME (GOOD)
:BR
:BCC DIFFERENT
sUPDATE COUNT

:HAS ALL THE BCC BEEN SHIFED QUT

:BR IF MORE TO DO
sSELECT THE MISC REGISTER
:GIVE ONE LAST CLOCK UP--

:AND CLOCK DOWN~-sSEL THE TX BCC REGISTER
:DID THE TX BCC GO TO ZERO
:BR
IF GOOD

)

:TX BCC NOT ZERO

)

:SCOPE

TEST

)

*TEST OF RECEIVER BCC

*WITH POLYNOMIAL EQUAL TO 177777

)
—

—

)

D i e

(o Yo Yo Yo Yo Yo Ne No N oo

) i

000012
173560
173554
000016
173542

:ARE THE CALCLLATED AND RECEIVED RESULTS THE SAME??

:BR IF GOOD (SAME)
:BCC(S) ARE DIFFERNT..
;CLEAR THE CARRY BIT OF PSW

:HAVE ALL CHARACTERS BEEN DONE

COUNT

8%:

) D

)

173650

sSAVE IT IN TEMP4

1621

;A FOUR HUNDRED BINARY COUNT
;DATA PATTERN IS RUN THROUGH
sTHE BCC WITH A SHIFT BY SHIFT
sCHECK OF THE HARDWARE COMPARE
;WITH THE SOF TWARE.
:
sNOTE

TEsT 10

005636
005644
005652

012737
012737
012737

000010
005676
006662

001226
00

THERE

IS ONE CHARACTER TIME DELAY

;FOR THE BCC TO START.
;ALSO THE IS ONE PAD CHAR
sNEEDED AT THE END OF THE DATA.

.Q.!it.."."fi..t.i.""""fi..'.."Qt'.'t.'t'..'t.t.'t."t'fit'..."

TST10:

MOV
MOV
MOV

#10,TSTNO
#2%
. RE TURN

#TST1T NEXT

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

NSEREE o

SO
o

006166

5%:

6%:
7%:

(=lele
V]

VidSs

N —

2383388828
_am_og
RIPIS KN

\lfls
W
~

N
~N
~N
~N

(V]
80
\B\QN
N
o
\#

CALBCC

sSET CALBCC TO ZERO

#20,aDQREG

SWRITE EN,RX BA PRI

:SET DATA TO ZERO

#RXBUFF F,aDQSEC
,
#121,3DQREG

;LOAD THE RX BA
SENTER 'T'',WRITE EN,RX CC PRI

#RXBUFF ,@DQSEC

:SET FOR THE PAD CHAR.

#4012,80QSEC

8%:
173170

;SELXPOLY TO 177777
sSET TYPE OUT REG TO 15
:ISSUE A MASTER CLEAR

XPOLY,@DQSEC
#MISC. ,aDQREG

015340
006170

#15,TEMPS

#65 ,8DQREG
#-1.3DQSEC
#17 ,@DQREG

3%:

;CLEAR THE DEV;C;

#177777 XPOLY

#-400,aDQSEC
#26 ,aDQREG

A ¥

DATA

&3 SRRSERRE

ruwww
vilkwwnwn

Wi
W
w

~
3V

1%:

2%:

onNOOoO
N~

b
i

015344
015354
000020
016000

005037
005037
112777
012777

01535
00125

FRRRRRRR

177777
000015

PAGE 34

MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

OO —=— — 23
3 32 2 b
= = NNNNNNNNNNNNN
VWV
N WWNWWNWN

012737
012737

33333333

1636
1637
1638
1639
1640

13:43

#10001,3DQRCSR
#8.,COUNT
DATA, TMPDAT
TMPDAT

sSET FOR FOUR HUNDRED CHARS
:SEL THE RX BA SEC

SEXIT "T"',WRITE EN,RX CC SEC
:SEL RX CC SEC FOR ONE PAD CHAR.
:SEL_THE POLYNO REGISTER

:LOAD IT WITH THE POLY
-SEL THE MISC REGISTER
:EIGHT BITS TEST LOOP AND AUTO STEP

:SET RX ACTIVE AND GO'!

:SET FOR ONE CHAR TIME DELAY
sSAVE THE DATA

sCOMPLIMENT IT FOR BIT WINDOW USE.

TEMP3

SINIT LOC

TEMP3
#8117 ,3DQSEC
TEMP3 ,aDQSEC
aDQSEC
aDQSEC
COUNT

sBRING IT IN FROM CARRY
;CLEAR THE BIT WINDOW
sPLACE DATA ON BIT WINDOW
;CLOCK UP===
:CLOCK DN==;CHAR DONE??

TMPDAT

¢SHIFT OUT ONE BIT OF DATA

43
DATA

:BR IF NOT DONE
;UPDATE DATA

DATA,8$
8%
DATA, TMPDAT
TMPDAT

:SAVE DATA
;COMPLIMENT DATA FOR BIT WINDOW USE

1
1
#MISC. ,aDQREG

sTHIS IS NUMBER OF
sTHIS IS WHERE THE
sTHIS IS WHERE THE
;RESELECT THE MISC

COUNT

CALBCC,9%
RS.SIMBCC

< INIT COUNT
sMOV DATA TO SUB ROUTINE USE AREA
sSET_SUBROUTINE TO ONE LESS THAT RX GETS

sMOV CALCULATED BCC TO SUB ROUTINE USE
:GO AND CALCULATE BCC (SOF TWARE)

SHIFTS TO BE DONE
DATA IS PLACED
PREVIOUS BCC IS PLACED
REGISTER

TEMP3

SINIT LOC

TEMP3

sCATCH IT IN TEMP

TEMP3,aDQSEC
aDQSEC
aDQSEC
#15 ,aDOREG
aDQ3EC, TEMPS
CALBCC, TEMP4

:LOAD THE DATA
s CLOCK UP==~
;CLOCK DN===
sSEL RX BCC REGISTER
sSAVE THE BCC
21S IT CORRECT??
‘BR IF GOOD

TMPDAT

#8177,aDQSt .

‘

sSKIFT OUT DATA BIT

;CLEAR THE BIT WINDOW

“BCC NOT WHAT EXPECTED

SEQ 0033

CZDQE

28-JuL-78

13:43

CZDQEE .P11

25-JuL-78

15:28

1692
1693
1696
1695
1696

006266
006270
006274
006300
006306

000241
006037
005237
022737
001321

006166
015352
000010

1698

006314

001302

006324
006332
006340

013737
013737
004537

015344
015344
012064

1706 006352
1707 006360
1708 006366
17209 006376
1710 006402
1711 006406

013737
013737
012737
013737
005137
000421

015344
015366
000377
015356
015340

015356
015344
015354
015340
015354

1697
1699

1700
1701
1702

1703
1704
1705

006310
006316

006344
006346
006350

los§o7

012737

000010
000377
000001

000003

006410

013737

015356

1714
1715

006424
006430

005137
000410

015340

006440
006446

012737
005137

1716

1717
1718

1719
1720
1721

1722

1723
1724
1725

1726

1727
1728
1729
1730
1731

006416
006432

006452
006456
006464

006472

006476

006500
006502

006504

006512
006516
006522
006526
006534

113737

015354

005037
113737
013737

015352
015354
015344

006500
006502

004537

000001

000001
000001

112777

005037
006037
106037
oagm
053777

005277
005377

1735
1736
1737
1738

006560
006566
006574
006576

017737
023737
001401
104003

1740
1741

006602

006037
805;;7

1739

006600

m§ 00661
174

1764

006622

1746

006634

1745
1747

015340

015357

006542
006546
006552

015357

006350
015366

112777

000241

052

337

000377
015340
012064

015340

000012

172656

001250
000200
001250

172636
172630

001250
015340

172624
172620

000015

172606
015344
006500
015352

000010
015370

172610

001252
001252

ooaeig

022737

000002

015370

006636

022737

000001

015370

001665

83
COUNT
#8.,COUNT
68

;CLEAR THE CARRY BIT
*SHIFT THE DATA
*UPDATE THE COUNT
:1S THE CHARACTER DONE??
*BR IF CHAR NOT DONE

BNE

:BR IF NOT ALL CHARS DONE.

10$:

CALBCC,21%
CALBCC.STORE1
RS,SIMBCC

:SAVE CALBCC
:
*GO FINISH THE BCC

21%:

.
1i$:
168:

128:
15%:
13$:
14$:

MOV

MOV
MOV
JSR

8.
377
BLKW

DATA

#3,L0C1

SEQ 0034

*UPDATA DATA
*POINTER**%%

*SHIFTS REQUIRED
:DATA CHARACTER
*PREVIOS BCC

MOV
MOV
MOV
MOV
COM
BR

CALBCC,SAVBCC
STORE1,CALBCC
#377.DATA
SAVBCC,TMPDAT
TMPDAT
12%

MOVB

SAVBCC+1,TMPDAT :MOVE THE HIGH BYTE OF CALBCC TO PLACED INTO THE RECEIVE

MOV

COM
BR

SAVBCC,DATA

:SAVE THE BCC
;RESTORE THE BCC
‘DATA =377
:PUSH IN THE LOW BYTE OF THE BCC
“INTO THE RX
:

:MOVE THE CALBCC TO DATA FOR SUBROUTINE

TMPDAT
128

*PREPARE IT FOR THE BIT WINDOW
*GO TO MAIN PART OF TEST

MOV
CoM

#377 . TMPDAT
TMPDAT

:PAD CHAR FOR RX
:PREPARE IT FOR THE BIT WINDOW

JSR

RS.SIMBCC

BLKW
BLKW

1
1

“THIS IS THE CHAR FOR THE SUBROUTINE
STHIS IS THE PREVIOUS BCC

TEMP3
TMPDAT

SINIT LOC
:
*SHIFT OUT A BIT OF DATA

INC
DEC

aDQSEC
aDQSEC

:CLOCK UP===
*CLOCK DN===

MOV
CMP
BEQ
HLT

@DOSEC,TEMP4
CALBCC,TEMP4
.+
3

:SAVE IT IN TEMP4
:IS THE BCC CORRECT??
*BR IF GOOD
:BCC ERROR IN RX

MOVB

CLR
MOVB
MOV
1

SAVBCC+1,DATA

COUNT
DATA,13%
CALBCC,14%

MOVB

#MISC..3DQREG

RORB
BIC
BIS

TEMP3
#BIT7,aDQSEC
TEMP3.3DQSEC

CLR
ROR

MOVB

cLC

015352

cLc
ROR
INC
M
BNE

INCB

113737

1732
1733
173

015352
015370

PAGE 35

MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

015354

1712

1713

MACY11 30A(1052)

ROR
INC

CMP

BNE

#15,3DOREG

133
COUNT

og..coum

:MOVE THE HIGH BYTE OF THE CALBCC TO DATA

SINIT COUNT (THIS IS FOR NUMBER OF BITS PER CHAR)
:LOAD THE CHAR FOR SUBROUT INE
:LOAD THE CALBCC FOR THE SUBROUTINE

:GO TO THE SUBROUTINE

:THIS IS THE NUMBER OF SHIFTS TO BE DONE

:SEL

THE MISC REGISTER

:BRING IT FROM CARRY INTO TEMP3
:CLEAR THE BIT WINDOW
:PLACE DATA ON THE BIT WINDOW

:SEL THE RX BCC REGISTER

:CLEAR THE CARRY BIT

SSHIFT THE CHARACTER TO THE RIGHT
“UPDATE THE COUNT

*1S THIS CHARACTER DONE

*BR IF NOT DONE

(MP

#2,10C1

*WHERE

CMP

#1,L0C1 ;

DEC

BEQ

LOC?

1:¢

SALTER THE RETURN POINTER

“IF LOC1=2

D I GO??

GOTO 11%

CZDQE

MACY11

CZDQEE.P1

30A(1052)

25=JUL=78 15:28

1748

006644

00167%

1750

006652

005705

1749

006646

1751

006654

006660

006656

28-JUL-78

017705

13:43

BEQ

172514

:DID AN ERROR OCCUR??

BPL

104400

SCOPE

104001

HLT

:SAVE THE ERROR REGISTER
:BR IF NO ERROR

:DQ17 ERROR FLAG SET

:SCOPE THIS TEST

:TEST OF TRANSMITTER AND RECEIVER
:BCC WITH A POLYNOMIAL OF
SCRC 16: X16+X15+X2+1
:NOTE: IN THIS TEST IT IS UP TO
:
THE HARDWARE TO DISCOVER
:

AN ERROR IF ONE OCCURS.

TEST N

.-ttttt'!lttttt.fiQt...t'tttt"..tQilt.t.tttttitt'.tt".Qtt..tt't't'tt.

012737

1766

006670

012737

1768
1769
1770

006700
006706
006712

012737
004737
017705

006720

100001

1773
1774
1775
1776
1777

100001

TST

176‘

1771

:IF LOC1=1 GOTO 16$

@aDQERR,RS

1761
1762
1763

1772

16$

MOV

1755

1767

MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

1756
1757
1758
1759
1760

1765

PAGE 36

006676

006716

006722
006724

104412

005705

000011

001226

120001
010202
172450

015350

006726

001216

TST11:

MOV

#TST12 NEXT

MOV
JSR
MOV

#120001,XPOLY
PC,STBCC
aDQERR, RS

BPL

L+

MSTCLR

104001
104400

HLT
SCOPE

1778

#11,TSTNO

MOV

:CLEAR DQ11 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

1779

1782

JCRC 12: X12+4X11+X34X2+¢X+1

1780
1781

:TEST OF TRANSMITTER AND RECEIVER
:BCC WITH A POLYNOMIAL OF

1783
1784

NOTE:

}7732

;AN ERROR IF ONE OCCURS

1787

1788

1789

006726

012737

000012

006734

012737

006772

1792

006744

012737

007401

006756

017705

172404

1793

1794

1795

006742

006752
006762

1796

006764

1798
1799
1800

006770

1797

TEST 12

:'Qtt.ttt'tttQtt'tttttt't't'tttt"tttt'..tttttt!t.t.lttttttt..tttt"'

1790
1791

006766

10441

001226

001216

MOV

MSTCLR

1803

#12,TSTNO

#1713, NEXT

MOV

#7401 ,XPOLY

MOV

aDQERR RS

100001

BPL

104400

SCOPE

004737
005705

104001

010202

015350

T1ST12:

JSR
TST

HLT

1801

1802

IN THIS TEST IT IS UP TO
:THE HARDWARE TO DISCOVER

PC,STRCC

:CLEAR DQ11 WITH A MASTER CLEAR

;LOAD SELECTED POLYNOMIAL INTO XPOLY.
:TRANSFER CHARACTERS.

:SAVE THE ERROR REGISTER

:DID AN ERROR OCCUR??

;AN ERROR OCCURED

:BR IF NO ERROR

SEQ 0035

CZDQE

MACY11_30A(1052)

CZDQEE .P1N

28-JuL-78

25-JUL-78 15:28

13:43

;

181%

1813
1814
1815
1816
1817
1818
1819

006772
007000
007006
007010
007016
007022
007026

012737
012737
104412
012737
004737
017705
005705

1821
;lggg

007032
007034

104001
104400

001226
001216

102010
010202
172340

015350

1842

1843
1844

1845
1846

1847

TEST 13

A A AR

TST13:

MOV
MOV
MSTCLR
MOV
JSR
MOv
TST

100001

A AR

BPL

HLT
SCOPE

FEREREERRERRR

7030

000013
007036

#102010,XPOLY
PC,STBCC
aDQERR RS
RS

. +4

AR R AR

AR AR AR AR AR AR R AR

AR RN

;CLEAR DQ11 WITH A MASTER CLEAR

;LOAD SELECTED POLYNOMIAL INTO XPOLY.
s TRANSFER CHARACTERS.
sSAVE THE ERROR REGISTER
;DID AN ERROR OCCUR??

;BR IF NO ERROR

;AN ERROR OCCURED

TRANSMITTER AND RECEIVER

;BCC WITH A POLYNOMIAL OF

JLRC 8: Xx8+1
JNOTE:
IN THIS TEST IT IS UP TO
;THE HARDWARE

TC DISCOVER

;AN ERROR IF ONE OCCURES.
;s

TEST

:'tti...Q'.t.."Qt'.'""Q""'..'........Q'..!Q.'Q..t"t"'.."."'.

007036

007044

007052
007054
007062

007072
007074

007076
007100

012737

104412
012737
004737

017705
005705
100001

000014

001226

007102

001216

000200
010202

015350

TST14:

172274

MOV

#14,TSTNO

MSTCLR
MOV
JSR

#200,XPOLY
PC,STBCC

JCLEAR DQ11 WITH A MASTER CLEAR
sLOAD SELECTED POLYNOMIAL INTO XPOLY.
;s TRANSFER CHARACTERS.

RS
.+

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

MOV

MOV
TST
BPL

104001
104400

HLT
SCOPE

#TSTI1S NEXT

aDQERR,RS
1

JTEST OF

1854

JLRC 16: X16+1

1853

;SAVE THE ERROR REGISTER
;AN ERROR OCCURED

1848
1849
1850
1851
1852

TRANSMITTER AND RECEIVER

;BCC WITH A POLYNOMIAL OF

1855

JNOTE:

1856
;ggg

1859

R R

#13,TSTNO
#TST14 NEXT

JTEST OF

1839
1840
1841

SEQ 0036

;TEST OF TRANSMITTER AND RECEIVER
;BCC WITH A POLYNOMIAL
OF
sCRC/CCITT: X16+X124X2+X+1
sNOTE:
IN THIS TEST IT IS UP TO
s THE_HARDWARE TO DISCOVER
cAN ERROR IF ONE OCCURES

1811

1837

MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

1804
1805
1806
1807
1808
]'3(1)8

1820

PAGE 37

;

TEST 15

IN THIS TEST IT IS UP TO

;THE HARDWARE TO DISCOVER
JAN ERROR IF ONE OCCURES

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

1861
132%

1
1864
1865
1866

1867

1868
1869
1870
1871
1872
1873
1874
1875
1876

007102
007110
007116
007120
007126
007132

007136

007140
007142
007144

012737
012737
104412
012737
004737
017705

005705

000015
007146

001226
001216

100000
010202
172230

015350

iiiii

TST15:

BPL
HLT
SCOPE

#100000,XPOLY
PC,STBCC
aDQERR RS

:CLEAR DQ11 WITH A MASTER CLEAR
;LOAD SELECTED POLYNOMIAL INTO XPOLY.
;TRANSFER CHARACTERS.
:SAVE THE ERROR REGISTER

. +4
1

:BR IF NO ERROR
:AN ERROR OCCURED

:DID AN ERROR OCCUR??

:THIS TEST USES IDLE MODE TO
:GET INTO TRANSPARENCY
*AND IF AN ERROR SHOULD OCCUR

;1T MUST BE REPORTED BY THE HARDWARE.

1884

;

18“

TEST 16

:tttttttttttttttttttttttttt'ttttttt'tttt'*tttttttttttt.tttttittt'tttt

1887
1888

007146
007154

012737
012737

1890
1891
1892
1893
189
1895
1896
1897
1898
1899
1900
1901
1902
1903
1904
}ggg

007170
007172
007174
007200
007202
007204
007206
007210
007216
007222
007224
007226
007232
007234
007236
007240

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

007162

012737

000016
007206

007242

001226
001214

001216

015376

120001

010570
172134

TST16:

MOV

1$:

015350

MOV
MOV

2%:

MEMCLR
CLR RO
MOV
MOVB
INCB
BNE
MSTCLR
MOV
JSR
=400
=400
MOV
TST
8PL
HLT
SCOPE

#16,TSTNO
#2%,RE TURN

#TST17 NEXT
#TXBUFF ,R4
RO, (R4)+
RO
18

:CLEAR THE DEVICE
:SET RO TO Z2ERO
:SET POINTER FOR BUFFER
;START FILLING THE BUFFER
:UPDATE THE DATA
:HAS THE BUFFER BEEN FILLED

#120001,XPOLY

;SELECT CRC 16

RS,SYNBCC

aDQERR,RS
RS
.+
1

: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

}g};

;BCC WITH A POLYNOMIAL OF 177777

1913
1914
1915

STEST OF

FOR POLYNOMIAL

:GO PRIM THE DQ11

1909
1910

:BCC USING CRC 16 FOR POLYNOMIAL
.

1885

SEQ 0037

2323 2333333333333 2233322333233 3323333332222223223233

#15,TSTNO
#15716, NEXT

H
:TEST OF RECEIVER AND TRANSMITTER

}ggg

1907
1908

MOV
MOV

TST

100001
104001
104400

1879
1880
1881

1889

2222323222222

MSTCLR
MOV
JSR
MOV

}g;g

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

TRANSMITTER AND RECEIVER

;THIS TEST USES IDLE MODE TO
:GET INTO TRANSPARENCY. IF AN
:ERROR SHOULD HAPPEN, THE HARDWARE

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

SEQ 0038

:MUST FLAG IT.

;
012737

38 888N8

001226

177777
010570

015350

MOV

MOV
MOV

MEMCLR

CLR RO
MOV
MOVB

INB
BNE
MSTCLR
MOV
JSR

—

N
~
W
~

TST17:

W
~

TEST 7

2222222323333
3333232323333 2333333332323 2232323232333232222223222222%22%3%

1%:

000017

007302 001214
007336 001216
015376

BIBIR
3 oo~ VIS NN = Som~ o

—

d e

D e

d o

OO 00000000000 0

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

2%:

=400

=400
MOV
TST
8PL
HLT
SCOPE

172040

#17,TSTNO

#2% ,RE TURN
#1720, NEXT
#TXBUFF ,R4
RO, (R&)+

RO
18

#177777 ,XPOLY
RS, SYNBCC
aDOERR RS
RS
.+
i

:CLEAR THE DEVICE

*SET RO TO ZERO
*SET POINTER FOR BUFFER

*START FILLING THE BUFFER

UPDATE THE DATA
rue aurren eeeu FILLED
HA; ;
SELECT 7777 roa POL YNOMIAL
GO PRIM THE D@11

nus 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 DO 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

vxru THE TRANSMITTER BCC AND RECEIVER BCC

:~ore:
;

000020

001226

007472
007372

001216
001220

000003

015350

g
8

015344
W

X
o

—_

O—

S
%
o

001222

000016

171750

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

TEST 20

tttttttttttttttttttttttttttttttl'ttttttttttttt'tt'tttttttttttittttttt

TST20:

MOV

#20, rsruo

MOV

#3,1

CLR

XPOL Y

;INIT SET XPOLY TO ZERO

PC,TYBCC
RS.SIMBCC

MOV
MOV
18:

011110
012064

000015
000015
171742

—

3% 8 SA SIS PN N

1950

MSTCLR

arer1 nexr
#18,L0CK

JSR
JSR
3
351
0
MOVB
MOV
MOV

#15,3DOREG
#15.RS
aDOSEC,R1

;GO AND PRIM THE DQ11
*GG AND CALCULATE WHAT THE BCC SHOULD BE
“THIS IS FOR EIGHT BITS PER CHAR (NUMBER OF SHIFTS)
STHIS IS rzs DATA CHARACTER
*THIS IS THE
PREVIOUS BCC
“SEL THE RX BCC REGISTER
*SAVE THE REGISTER
“SAVE THE BCC

BEQ

*BR IF YES

CMP

HLT

MOV

CALBCC.R?

#16,RS

:1S THE BCC RIGHT??

*BCC ERROR

*SEL THE TX BCC REGISTER

CZDQEE.P11

007444
007450
007454
007456
007460
007462
007466

28-JuL-78

25=JUL-78 15:28

g
3

SEERENEREREERF
SR RS3

1972
7§
1973
1974
1975
1976
1977
1978

(1052)

013701
023701
001401
104002
104401
005237
001341

13:43

015362
015344

015350

;

007472

007500

012737

000021

012364

001226

001216

171640
171634
171624

2010
2011

007552
007560

017737
023737

171614
001254

001252
001252

2013
2014
2015

007570
007572
007574

007544

007566
007600

053777

001401

104006
104401
105237

001347

001254

TST21:

MOV

#21,TSTNO

MOV

#.EOP,NEXT

:PART 1
READ/WRITE TEST OF POLY 1624
“TEST OF ALL READ WRITE BITS IN POLY 1624

001220

2024

007624

012737

004737

000200

007642

012705
112777

011456

015350

017701

000015
000015

#MISC.,aDQREG
#B1T6,aDQSEC
#17,aDOREG

;SET FOR LOCK ON TEST(SW09=1)
*ZERO POINTER
SINIT pall
:SEL MISC REG
:SEL POLY 16=24
*SEL POLY REGISTER

MOV
CMP

aDASEC,TEMP4
TEMPS, TEMP4,

:READ CHAR BACK.
:IS IT CORRECT?

HLT
SCOP1
INCB

TEMPS,aDQSEC

BEQ

171526

2%:

CLR
MOV
MSTCLR

CALBCC
#2$,L0CK

JSR

PC rxacc

#200, XPOLY

MOV
MOVB

#15 RS
#5 aDOREG

] s

*BR IF YES.

*BR IF MORE TO GO

RX AND TX BCC TESTS

MOV
MOV

:LOAD WITH CHAR.

*POLY READ/WRITE ERROR.
“LOCK ON CHAR (SW09=1)
*UPDATE CHAR.

TEMPS

;PART 2

015344
007614

171524

#1$,L0CK
TEMPS

BNE

005037
012737
10441

007630
007634

MOV
CLR
MSTCLR
MOVB
MOV
MOVB

BIS

001254

007602
007606
007614

007616

1%:

171620

2020
2021
2022

2027

TEST 21

tt'tttQtttt'ttttttttti'tttttttttttfitttittttttttttfitttttttttttttl'.'t

*THE REGISTER.

000012
000100
000017

2025
2026

;DOES THE USER HAVE SW09=1??
sUPDATE THE POLYNO
:BE IF NOT ALL POLYNO HAVE BEEN DONE
;SCOPE THIS TEST

XPOLY
1%

*BY RUNNING A BINARY COUNT PATTERN TROUGH

001220

2023

:TX BCC ERROR

*CHARACTER SENT: 000-377

007520
001254

58}3

;1S IT RIGHT?
:BR IF GOOD

.TEST WILL SEND ONE CHARACTER AT
;A TIME CHECKING THAT THE BCC
;OF RECEIVER AND TRANSMITTER
“ARE CORRECT.

012737
005037
104412
112777
012777
112777

228}9

sTHIS IS \HERE THE TX BCC WAS STORED

CALBCC,R1
. +4
2

TEST OF BIT 262‘C.JF MISC REGISTER
POL YNOMIAL
1

007506
007514
007520
007522
007530
007536

2012

SEC16,R1

MoV
CMP
BEQ
HLT
SCoP1
INC
BNE
SCOPE

2003
2004
2005
2006
2007
2008

2009

MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

2000

PAGE 40

MACYN

CZDQE

aDQSEC,R1

:2ERO EXPECTED BCC
“SET FOR SWO09=1
INIT D@11

*SEL 'LRC 24''

*GOTO SUBROUT INE

:SEL BCC REG
st

*READ BCC REG.

SEQ 0039

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

|
|

2028 007646 023701

|
!

007652
007656
007656

001401
104002
012705

2033

007666
007672
007674

023701
001401
104002

015344

005037

015344

2035
2037

007662

013701

112777

000012

2041

007726

007722

042777

000015

2042 007732 017701

171434

110577

007736

005701

2045

007742

104002

54
007756
007760

005701
001401
104002

007766
007776
010000

112777
005277
005377

000012
171372
171366

2056

010010

110577

171354

2058
2059

010020
010022

2061

010030

2063

010040

2065
2066
2067
2068
2069

010052
010056
010062
010064
010070

2071
2072
2073
2074

010100
010102
010106
010110

2076
2077
2078
2079

010114
010120
010122
010124

2049
2050

2051

2052
2053
2054

007762 010437 015344

012705

2057 010014

017701

2060 010026

001401

2062 010032

000301
023701

2070 010074

010112

2283? 010126

2082
2083

104400

#15,.RS

171320

000015
171274

171272

015344

RS,aDOREG

BEQ

. +4

MOV

z7$:

#BIT6,3DQSEC

aDASEC,R1
R1
2

#16 RS
SECT6X,R

MOVB

RS,aDOREG

HLT

#7, COUNT

INC

aDQSE¢

SCOP1

INCB
BNE
MEMCLR
MEMCLR

*READ BCC
IS IT O

‘BR IF YES.
*BCC NOT 0

.+4

MOV

SWAB
TMP
BEQ
HLT

*SEL BCC REG

aDASEC,R1

R1
CALBCC ,R1

MOV

*SET FOR ERROR

#16,RS

SWAB
TMP

DEC
DEC
BNE
MOV
MOVB

:SEL POLY 0-15

Ré4, CALBCC

AMISC.,aDQREG
aDQSEC
aDQSEC

MOVB

*ZERO SOF TWARE BCC

R1
.+
2

MOVB
INC
DEC

BEQ
171322

CALBCC

MOV

171314
015352

105237
001235
104413
104413

MOV

171352

005377
005337
001371
012705
110577

104401

:SEL MISC REGISTER

MOV

000012

000301
023701
001401
104002

#MISC.,aDQREG

000016

112777

017701

MOVB

TST
BEQ
HLT

012737 000007 015352

2064 010046 005277

*SAVE GOOD BC(

MOV
MOV

104002

*DID IT COMPARE?
*BR IF GOOD.
*BCC ERROR

CALBCC ,R4

HLT

015344

*BR IF GOOD.
*BCC ERROR.
*SEL BCC REG.

MOV

171374

:GET SAVED BCC

CALBCC ,R1
. +4
2

MOVB

000016
015364

SECi6,R1

P
BEQ
HLT

BIC

007740 001401

2055 010006

2075

171450

;1S BCC CORRECT?

.44
2
#16,RS

CLR

171454

CALBCC,R1

BEQ
HLT
MOV

MOV

171436

2043

2046 007744 012705
2047 007750 013701

000100

012705

2044

015362

015344

007714

TMP

000016

007676 013704

2039

2040

015344

2029
2030
2031

2032

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

#MIiSC.,aDOREG
aDQSEC
COUNT
74
#15.RS
RS.aDOREG

aDASEC ,R1
R1
CALBCC,R1
.+4
2

CALBCC
2$

SCOPE

“USERS BCC RECEIVER TRANSMITTER TEST
*THIS TEST ALLOWS THE USER TO

SEQ 0040

| CZDGE_

MACY11_30A(1052)

| CZDQEE.P11

MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.
;USE ANY POSSIBLE POLYNOMIAL
:OF HIS CHOICE.
*THE TEST USES THAT POLYNOMIAL

583%

;FLAG AN ERROR.

“DATA PATTERN

2089
2090
2091

2094
2095
2096
2097
2098
2099

2100

2101
b

2102
2103
2104
d

:ON_ A FOUR HUNDRED, EIGHT BIT,BINARY COUNT

PAGE 42

088

b e

13:43

25-JUL-78 15:28

2084
2085
2086
2087

SIS
TS TN 1,8

28-JuL-78

*NOTE: THE BCC OF THE TRANSMITTER AND RECEIVER
*ARE NOT CHECKED FOR CORRECT CONTENT
*ONLY THAT THE HARDWARE DID NOT

010130
010136
010146
010146
010150
010152

010154

012737
012737
104402
016470
000000
104414

010130
010130

001216
001214

017737

171020

015350

017705
005705
100001
104001
000770

171174

010162 004737 010202

010166
010172
010174
010176
010200

USEBCC: MOV
MOV
TYPE
MPOLY
HALT
CKSWR

#USEBCC ,NEXT
#USEBCC
,RE TURN

2%:

PC,STRCC

MOV

ASWR , XPOL Y

MOV
TST
BPL
HLT
BR

aDAERR,
RS
RS
.+
j
2%

JSR

;CHECK FOR <*G>

SEQ 0041

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

2110

010202

011637

015360

010212 012704

015376

2111
211§

010206
010210

104413
005000

2114
2115

010216
010220

110024
105200

2117

010224

105077

171140

2119

010236

112777

000121

112777

oooo;z

112777

2113

2116 010222 001375

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

STBCC:

MOV

MOVB
INB

RO, (R&)+
RO

MOV

1%:

(SP) ,SAVEPC

MEMCLR
CLR

BNE

CLRB

;SAVE PC OF ENTERING ROUTINE

#TXBUFF ,R&
18

aDQREG

;SELECT THE RX BA PRI.

2118 010230

012777 016000

171134

MOV

#RXBUFF ,aDQSEC

2120 010244

012777

171120

MOV

#-600,3DQSEC

:SET RX CC FOR A TRANSFER OF 400 CHARS.

2122

010

012777 015374

171104

MOV

#SYNC,aDQSEC

;LOAD THE TX BA PRI.

2126

010274

012777

MOV

#-2.aDQSEC

2126

010310

005077

CLR

aDQSEC

2128

010322

012777

2121

2123
2125

2127

2129

010252

010266
010

010314

010330

177400
177776

010

2133

010

2135

010374

2136

2137

2138

2139
2140

MOVB

171032

MOVB

~ #26,aDQREG

MOVB

#127.aDQREG

MOVB

#11,3DOREG

177777

000026

112777

000127

171016

112777

000011

171002

112777

2145
2146

2147
2148

2149

177400

012777 004010

112777

015372

015350
000012

010500

105237

001246

104
022626
042777
112777
005077
000240
005037
005037
032777

001244
001246
000100

2160

010550

105237

001244

105237

001246

2161

2162

2163
2164
2165

010554

001371

010562

001366

010556
010564
010566

104000
000207

MOVB

#17,3DQREG

170752

MOVB

#MISC..aDQREG

CLR
CLR

TEMP]
TEMP?

170762

MOV

000040
000063
170644

CLR

CLR
INCB

28:

BNE

INCB

BNE
170650
170646

170612

:ENTER T,WRITE ENABLE,TX CC PRI.

“SET TX CC FOR A TRANSFER OF 2 CHARS.
:WRITE ENABLE,RX
BA SEC.

*CLEAR THE RX BA SEC

:EXIT T,WRITE ENABLE.RX CC SEC.

:SET THE RX CC SEC FOR ONE PAD CHAR.

*WRITE ENABLE,TX
BA SEC.

;EXIT T,WRITE ENABLE,TX CC SEC.

aDaTLVL

PS
TEMPI

TEMP2

3.7

INCB

BNE

2.6

BNE

2.6

BNE

9.3
3.5

:WRITE ENABLE, TX BA PRI.

#4010,3DQSEC

HLT
TXISR1: CMP
BIC
MOVB
CLR
NOP
CLR
CLR
1%:
BIT

3.7

s*ENTER T,WRITE ENABLE,RX CC.PRI.

XPOLY ,@DQSEC

4.7
8.2
7.6
6.1
1.5
3.7
3.7
7.7

2.6

:LOAD THE RX BA

.SYNC,@DQSEC

170766

#1,3DQRCSR
#41,3DQTCSR

177776
001244

001007

MOV

MOV
MOV

010502
010504
010506
010514
010522
010526
010530
010534
010540

010546

170776

#-400,3DQSEC

170704
170702

2150
2151
2152
2153
2154
2155
2156
2157
2158

2159

MOV

000001
000041

005037
105237

001372

171012

ATXBUFF ,@DQSEC

#TXISR1,aDQTVE"

170710

001375

MOV

005077

010474

171026

170712

010442

010472

MOVA-1,aDQSEC

010504

001244
001246

010462
010666

#65,aDQREG

MOV

005037
005037

012777
012777

#24.aDQREG

170746

010426
010430

012777

MOVB

171042

112777

010416

010446
010454

171070

#23,3DQREG

171046

013777

2143
2144

MOVB

010402

010434

2142

171074

#22,3DQREG

112777

171056

013777

2141

MOVB

171060

010366
010610

171110

#121,aDQREG

000024

2132 010352 012777

2134

MOVB

112777

2130 010336 012777 015376

2131

171124

INCB

M T
ENDBCC: RTS

(SP)+, (SP)+
#81T5.aDQTCSR
#63,aDQREG
aDQSEC

TEMP1
TEMP2
#8176,3DGRCSR

ENDBC(
TEMPI

TEMP?

1%
PC

:RX SECONDARY DONE NOT SET.

SEQ 0042

| CZDQE

MACY11 30A(1052)

CZDQEE .P11

28-JUL-78

25=JUL-78 15:28

13:43

PAGE 44

MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

2166

2169
2170

010570
010574

010537
10441

015360

21;%
21

010602
010610

01%777
112777

01
000121

170562
170552

MOV
MOVB

#RXBUFF ,aDQSEC
#121,3DAREG

112777 0000;2

170540

MOVB

#22 ,aDQREG

2171

2176

010576

010616

2175 010622

105077

012577

170566

170550

SYNBCC: MOV
MSTCLR

2176
2177

010630
010636

012777
112777

015376
000123

170534
170524

2179
2180

010650
010656

112777
012777

000024
016000

170512
170506

2182
2183

010672
010700

012777
112777

177777
000026

170472
170462

2178
2181

2184
2185
2186

010644

010664

012577

112777

010706
010712
010720

005077
112777
005077

011000
011006
011014

052777
052777
032777

00006S

170460
000067
170446

2187
2188
2189
2190
2191
2192
2193
2194

010724
010732
010740
010746
010754
010762
010770
010774

2198
2199
2200
2201
2202
2203
2204
2205
2206
2207
2208

011022
011024
011030
011032
011036
011040
011046
011052
011060
011066
011070

001006
005237
001371
005237
001366
012777
005037
012737
032777
001007
005237

2210
2211
2212
2213
2214

011076
011102
011104
011106

005337
001366
104000
000205

001246

015360

2195
2196
2197

2209

516

011074

112777
013777
112777
013777
112777
012777
005037
005037

170522

001371

2217

011110

011637

2219
2220
2221

011116
011120
011122

40
104412
012737

228

011114

104412

000011
015372
000017
015350
000012
004010
001244

001246
000003
000002
020000

CLRB

MOV

170436
170432
170422
170416
170406
170402

2%:

170316

3%:

001246
170272

4%:

001244
001246

000001
001244
000005
000100
001244

000351

#TXBUFF ,@DQSEC
#123,3DQREG

:LOAD THE TX BA PRI.
ENTER T.WRITE ENABLE,TX CC PRI.

MOVB
MOV

#24 ,aDQREG
#RXBUFF ,aDQSEC

MOV
MOVB

#-1,aDQSEC
#26 ,3DQREG

MS.&)OREG
aDQSEC
#67 ,aDQREG
aDQSEC

CLR
BIS
BIS
BIT

TEfiPZ
#3,3DQRCSR
#2,aDQTCSR
#81T13,aDQSEC

BNE
INC
BNE
INC
BNE
MOV
CLR
MOV
BIT
BNE
INC

DEC
BNE
HLT
ENDSYN: RTS

015376

(RS)+,aDQSEC

CLR
mMOovB
CLR

BNE

TYBCC:

:LOAD THE
RX BA
-ENTER T,WRITE ENABLE,RX CC,PRI.

MOV
MOVB

MOVB
MOV
MOVB
MOV
MOVB
MOV
CLR

170352
170350
170350

*SELECT rHE RX BA PRI.

“SET
RX CC

MOVB

170450

aDQREG

;SAVE PC OF ENTERING ROUTINE
*CLEAR THE D@11

(RS)+,aDQASEC

MOV

170476

RS5,SAVEPC

#11,3DQREG
.SYNC,aDQSEC
#17 ,aDQREG
XPOLY ,aDQSEC
#MISC. ,aDAREG
#4010 aDQSEC
TEMP

*SET TX CC

\mTE EMBLE RX BA SEC.
-LOAD THE RX BA SEC.

:EXIT T,WRITE ENABLE ,RX CC SEC.
;SET FOR ONE PAD CHARACTER.
JWRITE ENABLE,.TX BA SEC.

sCLEAR THE TX CC SEC
EXIT T.WRITE ENABLE,TX CC SEC.
*CLEAR THE TX CC SEC

3s
TEMP1
2%
TEMP2
2%
#81T0,aDQTCSR
TEMP1
#S,TEMP2
#81T76,aDARCSR
ENDSYN
TEMP1

TEMP?2
A 3

JRECEIVER DONE SECONDARY NOT SET.

MOV

(SP) ,SAVEPC

NOP
MSTCLR
MOV

#351, TXBUFF

MSTCLR

*WRITE ENABLE, TX BA PRI.

+SAVE PC OF ENTERING ROUTINE

;CLEAR THE DQ11

SEQ 0043

RN FLREE

105077

012777

112777
012777
112777
012777

015352
170222
170212

1%:

sSELECT THE RX BA PRI.
:LOAD THE
RX BA
:*ENTER T,WRITE ENABLE,RX CC,.PRI.
:SET RX CC FOR A TRANSFER OF 1 CHARACTER.
JWRITE ENABLE, TX BA PRI.
:LOAD THE TX BA PRI.
:ENTER T,WRITE ENABLE,TX CC PRI
:SET_TX CC FOR A TRANSFER OF 1 CHARACTER.

170206
170176

170172
170162
170156

:WRITE ENABLE,RX BA SEC.

:CLEAR THE RX BA SEC
:EXIT T,WRITE ENABLE,RX CC SEC.
:CLEAR THE RX CC SEC.

170122

:WRITE ENABLE,TX BA SEC.

170110

#17
,aDQREG
XPOL
Y,@DQSE
MISC..NOREG
#6012,aDQSEC

#8170,aDQTCSR

aDQTCSR,aDATCSR
aDQTCSR,aDATCSR
aDQTCSR,aDQTCSR
aDQSEC
aDQSEC

170022

L LY, |

170016
000200
070001
167776
167772

#8177 ,aDQSEC

2%:

015352

000016
167752
000012
000007
167730
167724

—=O=0O=200=0
——d
d e O 2 nONLNLNL
N N
~SON
~N
W
~N

iy
G
G

XSLRENEKR

i
wnd cnd
b
b

ad anbd cuid =

slelelelelelelels)

MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

777

#10001 ,aDQRCSR
aDQSEC
aDQSEC
COUNT

:CLEAR THE TX CC SEC
SEXIT T,WRITE ENABLE,TX CC SEC.
;CLEAR THE TX CC SEC

:SET TRANSMITTER GO
SWAIST TIME.
SWAIST TIME
sWAIST TIME

:PRIM THE
;

TRANSMITTER.

:CLEAR THE BIT WINDOW.

#16,aDQREG
aDQSEC,SEC16
#MISC. ,aDAREG

3%:

aDQSEC
aDQSE(
COUNT

ENDTY:

TXBCC:

(SP) ,SAVEPC

1%:

CALBCC, TXBUFF
#9. , COUNT
aDOREG

015352

N
N

PAGE 45

170134

2
N

000011
170226
6000

13:43

170146

012737

v
N
N~ gRSISKRSLHANTRE N 33 B
NEBRR
N
SFEN

e
s

il
D
S

D il

b i
i
i
i
i

il
b i

b
b

il el

il
il

-d
b
bJourd ——

AY)

N =

N
NN

) i

i clD

sl
-d
b
b- b
—

D il

(elele) oo eleleleleleleleleleleloalelolelelelelololelelelelelolelels]
o lolele)

CZDQE
MACY11_30A(1052)
28§JL1-78
CZDQEE.P11
25=JuL~78 15:2

#RXBUF F ,aDQSE
C

#121,aDAREG
#- 1 ,aDQSEC
#22 .aDOREG

:SAVE PC OF ENTERING ROUTINE
;CLEAR THE DQ11
sSELECT THE RX BA PRI.

;LOAD THE RX BA

J*ENTER T ,WRITE ENABLE ,RX (C PRI,

sSET RX CC FOR A TRANSFER OF 1 (HARACTER.

JWRITE ENABLE,

TX BA PRI,

SEQ 0044

CZDQE
MACY! 30A<1osg)
28-JUL-78
CZDQEE.P11
25-JUL-78
15:28

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

2278
2279
2280
2281

011534
011562
011550
011556

012777
112777
012777
112777

015376
0001;;
177777
000024

167630
167620
167614
167604

MOV
MOVB
MOV
MOVB

#TXBUFF
,@DQSEC
#123,3DAREG
#-1,3DQSEC
#24.aDQREG

:LOAD THE TX BA PRI.
*ENTER T,WRITE ENABLE,TX CC PRI.
*SET TX CC FOR A TRANSFER OF 1 CHARACTER.
“WRITE ENABLE,RX BA SEC.

2283

011570

112777

000065

167572

MOVB

#65,aDOREG

*EXIT T,WRITE ENABLE,RX CC SEC.

167560

MOVB
CLR
MOVB
CLR
MOVB

#26,3DOREG
aDQSEC
#67,aDOREG
aDQSEC
#MISC.,aDQREG

MOVB
MOV
MOVB
BIS
CMP
(MP
CMP
INC
DEC
BIC

#17,3DQREG
XPOLY ,aDQSEC
#MISC.,aDQREG
#81T0,3DQTCSR
aDATCSR,aDATCSR
aDATCSR.aDATCSR
aDQTCSR,aDQATCSR
aDQSEC
aDQSEC
#BIT7,aDQSEC

INC
DEC
DEC
BNE
BIC
MOVB
MOV
MOVB
BIS
MOVB

aDQSEC
aDOSEC
COUNT
2s
#B]T6,aDQSEC
#16.3DQREG
aDQSEC, SEC16X
#MISC..aDOREG
#81T6,aDASEC
#16.aDQREG

MOVB
MOV
INC
DEC
DEC
BNE
RTS

#MISC..aDOREG
#7.
., COUNT
aDOSEC
aDQSEC
COUNT
3s
PC

2282
2284

011564

011576

005077

16760

167570

2285
2286
2287
2288
2289

011602
011610
011614
011622
011626

112777
005077
112777
005077
112777

oooog
167556
000067
167544
000012

2291
2292
2293
229
2295
2296
2297
2298
2299
2300

011642
011650
011656
011664
011672
011700
011706
011714
011720
011724

112777
013777
112777
052777
027777
027777
027777
005277
005377
042777

000017
015350
000012
000001
167456
167460
167452
167452
167446
000200

2302
2303
2304
2305
2306
2307
2308
2309
2310
2311

011740
011744
011750
011754
011756
011764
011772
012000
012006
012014

005277
005377
005337
001371
042777
112777
017737
112777
052777
112777

167426
167422
015352

2313
2314
2315
2316
2317
2318
2319

012030
012036
012044
212050
012054
012060
012062

2290 011634

2301

2312

011732

012022

012777 004112

052777

017737

112777
012737
005277
005377
005337
001371
000207

010001

CLR

167546
167534

167530

MOV

167520
167514
167504
167472
167464
167456
167450
167440

167420

000100
16
167374
12
000100
000016

167406
167376
015364
167362
167356
167346

000012
000007
167322
167316
015352

167332
015352

167344

CLR

28:

015362

BIS

MOV
3s:

ENDTX:

aDQSEC

*CLEAR THE RX BA SEC

*CLEAR THE RX CC SEC.

:WRITE ENABLE,TX BA SEC.
*CLEAR THE TX CC SEC
*EXIT T,WRITE ENABLE,TX CC SEC.
*CLEAR THE TX CC SEC

#4112 ,8DQSEC

#10007
, aDQRC SR

aDQSEC,SEC16

:SET TRANSMITTER GO
;WAIST TIME.
-WAIST TIME
;WAIST TIME
;PRIM THE
;
TRANSMITTER.
JCLEAR THE BIT WINDOW.

SEQ 0045

CZDQE

MACY11 30A(1052)

CZDQEE .P11

28-JuL=78

25=JuUL=-78 15:28

13:43

:
sBLOCK CHECK CHARACTER GENERATOR SIMULATOR.

232% 012064 012537 001244
012070
012074
012100
012104
012110
012114
012116
012122
012126
012130

012537
012537
005037
013700
37
005500
032700
001402
005137
013700

2335
2336
2337
2338
2339
230
231
2342
233
2344
2345
2346
237
2348
gggg

012136
012142
012144
012150
012154
012160
012162
012164
012170
012172
012200
012204
012210
012212
012220

040037 015346
000241
006037 001250
013700 015346
013701
001250
010102
040100
043702 015346
050200
043737 015350
050037 001250
005337 ' 001244
001333
013737 001250
000205

2351
2352
2353
2354
2355
2356
2357
2358
2359
2360
2361
2362
2363
2364
2365
2366
237
2368
2369
2370

012222
012222
012226
012232
012236
012242
012250
012256
012262
012266
012270
012272
012276
012302
012306
012314
012320
012326
012332
012336

2334

2371

2372
2373
2374
2375

012134

012340

012342
012346
0123%6
012356

005100

005077
005077
005077
012705
152777
142777
005077
105277
005305
001364
105077
105077
012705
112777
005077

112777
005077
105277
005305

00136;

SIMBCC: MOV

001246
001250
015346
001250
001246

1%:

000001
015346
015350

167132
167132
167130
000020
000020
000140
167110
167102
167072
167060
000020
000010
167052

000014
167040
167024

10507

167014

112777
012777

000012
000040

MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.

2320

%33%1

2326
2325
2326
2327
2328
2329
2330
2331
2332
2333

PAGE 47

2%:

001250

015344
.MEM(CLR:

167120
167172

1%:

167054

2%:

167042

(R5) +,TEMP?2
(RS)+,TEMP3
BCCFBK
TEMP3,RO
TEMP?2
RO
#81T0,RO
2%
BCCFBK
XPOLY RO

BIC
cLC
ROR
MOV
MOV
MOV
BIC
BIC
BIS
BIC
BIS
DEC
BNE
MOV
RTS

RO ,BCCFBK
TEMP3
BCCFBK,RO
TEMP3,R1
R1.R2
R1,RO
BCCFBK,R2
R2.R0
XPOLY,TEMP3
RO, TEMP3
TEMP1
1%
TEMP3, CALBCC
RS

CLR
CLR
CLR
MOV
BISB
BICB
CLR
INCB
DEC
BNE
CLRB
CLRB
MOV
MOVB
CLR

aDORCSR
aDQTCSR
aDQERR
#16. RS
#8174 ,aDQREG
#140,aDQREG
aDQSEC
aDQREG
RS
1%
aDQREG
aDQR(
SH
#16. RS
#10,aDQREG
aDQSEC

COoM

MOVR
CLR
INCB
DEC

BNE

167014
167010

MSTCLR:

(R5)+,TEMP1

MOV
MOV
CLR
MOV
ROR
ADC
BIT
BEQ
com
MOV

#14 ,aDQREG
aDGSEC
aDQRCSH
=4
2%

(LRB

aDQR(SH

MOVR
MOV

#°'SC, ,aDAREG
#B]75,aDASEC

SEQ 0046

CZDQE

MACY11_30A(1052)

CZDQEE .P11

25=JuL-78

2376
2377
2378
2379
2380
2381

000002

012362

28-JuL-78

15:28

13:43

MISC. RECEIVER AND TRANSMITTER TESTS PLUS BCC TESTS.
RTI

JEND OF PASS

2382
2383
2384

;TYPE NAME OF TEST
JUPDATE PASS COUNT
JCHECK FOR EXIT TO ACT=11

53332

2387
2388
2389
2390
2391
2392
2393
2394
2395
2396
2397
2398
2399
2400
2401
26402
2403
26404
2405
2606
2407
2408
2409
2410
2611
2612
2613
2614
2415
2616
2617
26418
2619
2620
2421
2622
2423
2424
2425
26426
2427
2428
24
24
26431

PAGE 48

JRESTART TEST

012364
012370
012374
012400
012402
012404
012406
012410
012412
012414
012416
012420
012422
012424
012426
012430
012432
012434
012436
012440
012442
012444
012452
012456
012460
012466
012472
012474
012476
012476
012500
012502
012504
012506
012510
012516
012522
012524
012526
012530
012532
012534
01253
012540
012542

005037
005037
005237
104402
014614
104402
014775
104411
012522
104402
015003
104411
012530
104402
015011
104411
012536
104402
015022
104411
012544
013777
005337
001013
013737
013701
001405
000005
004711
000240
000240
000240
104414
012737
000137

000001
006
001360
000001
003
001350
000001
006
00123%0

001234
001312
001230

»
001230
001276
001504
000042

.EOP:

166530
001276

LOGICAL:

002254
002254
002
002
002

001214

CLR
CLR
INC
TYPE
MEPASS
TYPE
MCSRX
CNVRT
XCSR
TYPE
MVE CX
CNVRT
XVEC
TYPE
MPASSX
CNVRT
XPASS
TYPE
MERRX
CNVRT
XERR
MOV
DEC
BNE
MOV
MOV
BEQ
RESET

JSR
NOP
NOP
NOP
RESTRT: (KSWR
MOV
JMP
XCSR:
1
BYTE
DQRCSR
XVEC:
1
BYTE
DORVE(
XPASS:
1
BYTE
PAS(NT

LSTERR
ERRFLG
PASCNT

JCLEAR LAST ERROR PC
;CLEAR ERROR FLAG
;UPDATE PASS COUNT

PASCNT ,aL IGHTS
SAVNUM
RESTRT
DQNUM, SAVNUM
a6l R1
RESTRT

;DISPLAY PASS COUNT

PC,(R1)

#TST7,RETURN
ST
6,0
3,2
6,0

;CHECK FOR ACT=11 OR DDP

JIF NOT, CONTINUE TESTING

SEQ 0047

CZDQE_
MACY11_30A(105 )1 28-JUL-78
CZDQEE .P11
25=JuL=7
5:28

43;

:.g‘

000001

012550

001232

012552
012554
012562
012564
012566
012572
012574

104414
032777
001407
000432
105777
100027
017700

2646
2647
26448
2649
2650
2451
26452

012602
012610
012612
012616
0126264
012626
012632

032777
001006
005237
023737
001012
105037
005037

2445

2460
2461
2662
2663
2664
2665

2468
2669
2470
2671
2472

2473
2674
2475
2476
2477
2478
2479
2480
2481
2482
2483
2484
2485
2486
2487

PAGE 49

END OF PASS ROUTINE
XERR:

oge

2635
2636
2637
2638
2639
2640
2641
2662
2643
264h

2453
2454
26455

012544

012546

13:43

BYTE
ERRCNT

6,2

;SCOPE LOOP AND INTERATION HANDLER
C40000

166416

.SCOPE: CKSWR
BIT
TTST:
BEQ

012636
012644
012652

aTKCSR

8"2\/

a@TKDBR,RO

BIT

#SW11,3SWR

BNE
INC
cMP

2%:

012737
013737
013716

TSTB

8PL

012600 000412

1%1714.35UR

BNE

3%:

CLRB
(LR
MOV
MOV
MOV

BRW:
BRX:

632

2%
.PCNT
LPCNT, ICOUNT

ERRFLG
LPCNT
#9., 1COUNT
NEXT
,RE TURN
RETURN, (SP)

sCHECK FOR FREEZE ON CURRENT DATA
012664
012666
012674
012676

104414
032777
001402
013716

001000

166304

.SCOP1: CKSWR
BIT
BEQ
1%:

MOV

RTI

#5W09,aswR
1%
LOCK, (SP)

sTELETYPE OUTPUT ROUTINE

012704
012706
012712

012720
012724
012726
012734
012736
012740
012742
012746
012750
012756
012762
012764
012772
012776
01

010546
017605
766

005737
1
032777
001024
105715
100014
105777
100375
012777
105777
100375
012777
105777
100375
112577

.TYPE:

014374
010000

000002

1%:

166244
300%:

166242

000015

166234

000012

166220

166226

166212
166206

BNE
BIT
BNE

$
#5W12,aSWR
3%

BPL

TSTB

aTP(SR

MOV

#15.aTPDBR

MOV

<4
#12,3TPDBR

BPL

TSTB

2%:

(RS)

TSTB

MOVB

ITPLSR

QIPLSR

ls
(RS)+,aTPDBR

SEQ 0048

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

K &
13:43 PAGE S0
GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE,ETC.)

2488 013004 001345
2489 013006 012605
5239

013010

3$:

000002

323

RTI

2494

013012

010346

.INSTR: MOV

2498
2499

013032
013034

104402
000000

JINST1: TYPE
MSG:
0

2502

013046

105777

166132

2504
2505
2506

0130564
013060
013064

117714
142714
121427

166126
000200
000025

2508

013072

104402

014554

2510

013100

122427

000015

2512
2513

013106
013114

117777
105777

166074
166070

2500 013036 012704 015166
2501 013042 012703 000007
2503 013052

100375

2507 013070 001003

2509 013076 000755
2511

2514
2515

1$
(SP)+,RS

;ASCII STRING INPUT ROUTINE

26495 013014 010446
26496 013016 017637 000004 013034
2497 013026 062766 000002 000004

013104

013120

001423

100375

1%:

R3,=(SP)

MOV
MOV
ADD

R&.=(SP)
a4 (SP), .MSG
#2.4(SP)

MOV
MOV

# INBUF ,Ré
#7.R3

TSTB

BPL

MOVB
BICB
CMPB

BNE

aTKCSR

QTKDBR, (R&4)
#200, (R4)
(R4) .#25

2008

TYPE ,MCRLF

2008:
166076

2%:

LINST1

BEQ

INSTR2

CMPB

(R&)+,#15

MOVB
TSTB

QTKDBR,aTPDBR
@TPCSR

DEC

BPL

013122

005303

2518

013130

010346

.INSTE: MOV

R3,~(SP)

2520
2521
2522

013134
013136
013140

104402
014550
005737

.INSTG: TYPE
MaM
TST

HRDSW

2524
2525

013146
(13152

104402
000727

2516 013124 001350
2517 013126 000402

BNE
B8R

2519 013132 010446
2523

BNE
MOV

013144

001402

MOV

014374
014554

2526 013154 012604

%?3,(1)
2532

2533
2534
2535
2536
2537

013160

000002

013162

010546

MOV
RTI

.PARAM: MOV

000004
013366
013370
013372

2540 013216 010566

000004

013206
013212

112537
112537

2541

013222

005005

2543

013230

122714

2542 013224

012704

4008

(SP)+,Rd

(SP)+.R3

sCONVERT ASCII STRING TO OCTAL

010446
016605
012537
012537
012537

2538
2539

013164
013166
013172
013176
013202

4008:

R&.=(SP)

TYPE ,MCRLF
BR
INST1

INSTR2: MOV

2527 013156 012603

gggg

BEQ

1%
.INSTG

013374
013375

015166
000015

MOV
MOV
MOV
MOV
MOV

MOVB
MOVB

MOV

PARAM1: (LR

MOV

(MPB

RS,=(SP)

Ré . =(SP)
4($P) RS
(R5)+,LOLIM
(R3)+.HILIM
(R5) +.DEVADR

(R5)+.LOBITS
(R5)+.ADRCNT

RS.4($P)

#:BUF
R4

#15. (R&)

(1S IT <*6>

SEQ 0049

WV SsnsnoNnN

J\\Jl\\lgb S8

IS738S% —‘—‘o—‘—'f\)—'f\)g

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

000060

000067

BEQ

PARERR

BLT

PARERR

BGT

PARERR

ASL

ASL
BR

RS
1%

CMPB

000060

(R&) ,#60

(R4) 467

000015
ASL

000015

PARERR:

014374

104404
000742

1208:

(MPB

#15, (R4)

;IS FIRST CHARACTER A <CR>

TST

a#RDSW

;IS CKSWR ROUTINE BEING USED

BNE
BNE

INSTER

1208

PARTI

PARAM1

;TEST TO SEE IF NUMBER IS WITHIN LIMITS
013370

LIMITS:

013366
013374

CMP

RS, HILIM

BLO
BITB

PARERR
LOBITS ,R5

BHI
CMP
BNE

PARERR
R5,LOLIM

PARERR

;STORE NUMBER AT SPECIFIED ADDRESS
013372

1$:

000002
013375

MOV

LOLIM:

HILIM:

DEVADR R4

MOV
ADD

R5,(R4)+
#2,R5

BNE

DECB

PARTI:

MOV

MOV
RTI

ADRCNT

(SP)+ R4

(SP)+,RS5

DEVADR: 0
LOBITS: O
ADRCNT=LOB]TS+1

;SAVE PC OF TEST THAT FAILED AND RO-R5S
001274

.SAV05: MoV

4(SP) ,SAVPC

;SAVE RO-RS

88888

013234

NS
& SRrrdnS
AN
—_\)
b

CZDQE
MACY11_30A(1052)
?8—JLL-78
CZDQEE.P1
25=JUL=7 15:28

270

266
264
260

Sv05:

MoV
MoV

MOV
MOV
MOV

R5,SAVRS
R4, SAVR4

R3,SAVR3
R, SAVRZ
R1,SAVR1

SEQ 0050

C ZDQE
MACY11 30A(10;2)1 2 BEJUL-78
CZDQEE .P11
25=JuL-78 15:2

013430

013434

010037

000002

PAGE 52

GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE,ETC.)

001256

MOV

RTI

RO, SAVRO

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

013700
013701
013702
013703
013704
013705
2

001256
001260
001262
001264
001266
001270

.RESOS: MOV
MOV
MOV
MOV
MOV
MOV

SAVRO,RO
SAVR1,R1
SAVRZ,R2

SAVR3 R3
SAVR4 R4
SAVRS5 RS

s CONVERT OCTAL NUMBER TO ASCII AND OUTPUT TO TELEPRINTER
013470
013472
013474

104402
014554
010046

2%:

015230

3%:

3
015272

05337

013712

013713

05337

R1.=(SP)
R3.=(SP)
R&,=(SP)
RS .=(SP)

MOVB
MOVB
MOV
MOV
MOVB
MOV
MOV

(R1)+.CHRCNT
(R1)+.SPACNT
a(R1)+,BINWRD
BINWRD
. R4
CHRCNT.RS
#TEMP,RO
R4 R3

ADD
MOvB

#060,R3
R3,(R0O)+

MOV
MOV
ADD
MOV

BIC

DEC

01270;

013713

@12(SP) ,R1
TEMP, TEMP3
#2,12(SP)
(R1)+,WRDCNT

#177770.R3
R4
R4
R4

MOV
MOVB

RS
33
#MDATA ,R3
-(RO),(R3)+

BNE

A ¥

RO,=(SP)

MOV
MOV
MOV
MOV

cLC
ROR
e
ROR
CLC
ROR

006004
000241
006004

b =
b
e
e
i
i
d
D
i
e
il
e
b

ERRS
g
SRS

013606

177770
000060

FEEEE B

042703
0627

TYPE

MCRLF
: MOV

1%:

jelelelelelelelelelelelelelsls]

2600
2601
2602
2603

13:43

DECB

1STB

CHRCNT

S:ACNT

5%:

MOvVB

#040, (R3)+

6%:

BNE
CLRB

5%
(R3)

DECB

SPACNT

SEQ 0051

| CZDQE
MACY11_30A(105 )
28-JUL-78
CZDQEE .P11
25=JuL=~7
5:28

2656
2657
2638
2659

013660
013664
013666

005337

13:43

SEQ 0052

GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE,ETC.)

013710
001250

PAGE 53
DEC

015230

MOV
MOV
MOV

MOV

WRDCNT
1%

TEMP3,TEMP
(SP)+ RS
(SP)+, R4

(SP)+.R3
(SP)+.R1

(SP)*.RO

WRDCNT:
:
CHRCNT
SPACNT=CHRCNT+1

BINWRD: 0

:TRAP DISPATCH SERVICE

sARGUMENT OF TRAP IS EXTRACTED
sAND USED AS OFFSET TO OBTAIN POINTER
sTO SELECTED SUBROUTINE

000002
000000
177001
001314
000000

.TRPSR: MOV
TRPOK :

SuB
MOV

(SP) ,=(SP)
#2,(SP)
a<sp) (SP)

BIC

#177001, (SP)

ASL

ADD
MOV
JMP

(SP)

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

;ERROR HANDLER
013752

010000

LHLT:

165222
XBX:

1%:

CKSWR

BIT
BEQ

TST
BPL
MOVB

0207 aTPDBR

BNE
CMP
BEQ
MOV
CLRB

HALTS
(SP) ,LSTERR
1%
(SP) ,LSTERR
ERRFLG

BIT

SAVOS

MOV

OTPCSR

#5W1%, aSWR

(SP) ,RS

SUB
MOV

#2 RS
(RS) R4

ADD
ASL

(RS) ,Ré4
Ré4

ADD
MOV
MOV
MOV

# .ERRTAB,R4
(R4) +,ERRMSG
(R4)+ ,DATAHD
(R4) ,DATABP

ASL

BIC

014076

#SW12,aSWR
XBX

#177001,R4

TSTB

ERRFLG

TST

DATABP

BEQ

T /PMSG

;GET PC OF RETURN
;=PC OF

:GET _TRP

TRAP

sMULTIPLY TRAP ARG BY 2
:CLEAR UNWANTED BITS
:POINTER TO SUBROUT INE ADDRESS
s SUBROUTINE ADDRESS
;GO TO SUBROUTINE

CZDQE

MACYN

CZDQEE.P1

2712

014102

001027

014106
014110

01503
104411

15:28

13:43

2716
2717
2718
2719
2720
2721
2722
2723
724

014112
014114
014116
014120
014122
014124
014126
014130
014136

2727
2728
2729
2730
2731
2732
2733

014146
014150
014150
014154
014156
014160
014162

005737
001402
104402

014160

005737

014172

ERRMSG: 0
WRKO. FM:
TST
BEQ
TYPE
DATAHD: 0
TYPDAT: TST

2735
2736
2737
2738

014170
014172
014174
014176

104410
000000
104407
005777

164776

CONVRT
DATABP: 0
RESREG: RESO5
HALTS:
TST

2725
2726

2739
27640

27641

2742

2763
2764
27645
2746

2747

2748
2749
2750
2751
2752

2753
2754
2755
2756
2757

2758

2759
5;2(1)
2762

2763
2764

2765
2766

014142
014144

014166

014202

014272
104402
015121
104411
014264
104402
014554
112737
005737

001402
104402

001402

100005

014204

010046

014212

000000

014206

016600

014214
014216
014220
014226

012600
104414
005237
032777

014234
014242
014244
014252
014256

032777
001407
013737
012706
000177

014232

014262

001007

TYPMSG: TYPE

177777
014146

001312

BEQ
TYPE

BEQ

BPL

PUSHRO

MOV

HALT

001232
000400

164746

002000

164736

001216
001200
164732

001214

014276

001226

003

002

014300
014300

012737

014312

000000
000777

XTSTN
TYPE
MERRP(
CNVRT
ERTABO
TYPE
MCRLF
MOVB
TST

000002

000002
000001
006
001274
000001

014306
014310

TYPDAT

MTSTN
CNVRT

014264
014266
014270
014272

014274

GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE,ETC.)

BNE

10440

PAGE 54

014104

2734

25=JUL-78

28-JuL-78

2713

%714
715

(1052)

POPRO
EXITER: CKSWR
INC
BIT

BNE

18:

BIT
BEQ
MOV
MOV
JMP

28:
RTI
ERTABO:
1
BYTE
SAVP(
XTSTN:
1

002

#-1,ERRFLG
ERRMSG

WRKO. FM
DATAHD
TYPDAT
DATABP

RESREG
ASWR

EXITER
2(SP) ,RO
ERRCNT
#SW08, aSWR

#SW10,aSWR
28
NEXT,RETURN
#STACK,SP
FRETURN

6,2

.BYTE

3,2

MOV

WRESTART,24

TSTNO
;ENTER HERL ON POWER FAILURE

000024

.PFAIL:

HALT
BR

;SET_UP FOR POWER UP TRAP

;HALT ON POWER DOWN NORMAL

SEQ 0053

CZDQE

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

13:43

PAGE 55

GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE,ETC.)
;PROCESSOR WILL TRAP HERE WHEN POWER IS RESTORED

012737

014300
001200
015230
015230

000024

RESTAR:

MOV
MOV
CLR
INC
BNE

#.PFAIL 24
#STACK
, SP
TEMP
TEMP
.~

CLR
CLR

ERRFLG
LSTERR

JMP

aRE TURN

TYPE
MPFAIL
CNVRT
PFTAB

001312
001234

MSTCLR
MEMCLR

164626

PFTAB:

002

.BYTE

:SET UP FOR POWER FAILURE

3,2

TSTNO

:S?EESCS¥;ECH REGISTER ROUTINE. CHECKS FOR “G TO ALLOW CHANGING

*LOCATIONS USED:

014374

RDSW:

000042

014376

000176

.CKSWR: ;ng
001200

CMP

BNE

164564

05 0 03
&R :530505.03.05.05.03
UL

164560

177600

000007

d
b
b
d

013034

013034
013034

b e
b

VNV

2821

014502

176

057377
051777

%‘;2
#SWREG, SWR

*NO, GET ouT

ouT
aTKDBR, .MSG

*READY, GET CHARACTER
*AND STRIP OFF

@TKCSR

#177600..MSG

BNE

out

#7,.MSG

TYPE ,$CNTG
.CNTLU: COM
SFRDSW
TYPE
, SMSWR
CNVRT, SWREGC
INSTR, SMNEW

001
014554
014374

.BYTE

o177777

ouT :

SWREG

0,1
TYPE ,MCRLF
5%?
SHRDSW

1
SWREGC:
BYTE
6.2
SWREG

002

020075

$CNTG:
S$MSWR:

.ASCIZ
.ASCIZ

:SOFTWARE SWITCH REGISTER PRESENT

ouT

014524
014374
014530
014516
014537

000107
051127

BIC

CMPB

WN=O

2807

TSTB

BPL
MOV

.WORD

<277>/%G/
<377>/SWR= /

*YES.WAIT FOR

:THE GARBAGE

IS IT A <*G>

SEQ 0054

CZDQE_
MACY11_30A(1052)
ZBEJUL-78
CZDQEE.P11
25=JUL~78
15:2

MEPASS :

LASCIZ

<377>/END PASS CZDQE

MERRZ2:

MR:

.ASCIZ
.ASCIZ

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

043125
047105
040524

MERR3:

LASCIZ

<377>/INSUFF ICIENT DATA!/

020124

MTSTPC:

LASCIZ

<377>/TEST PC~/

020113

MLOCK:

LASCIZ

<377>/L0CK ON SE_ECTED

MCSRX :

LASCIZ

MVECX:

LASCIZ

/VEC:

042523

MPASSX :

LASCIZ

/PASSES:

051522

MERRX :

LASCIZ

/ERRORS:

051505
020072

MTSTN:

LASCIZ

<377><377> /TEST NO:

020124

MNEW:

LASCIZ

<377>/SET SWITCH REG TO DQ11°'S DESIRED ACTIVE./

—

HO—=N
Viss~N

<377>

<377>/PWR FAILED. RESTART AT TEST /

—

S35

TEST/

/CSR:
/

N
&~

—_—

&H
H
o

b
=

000040
047440
030461
052524

035103

RETIORSA 3

8511

027105

.EVEN

MQM:

NEW= /

ARG

N
No S

2SR QAR 80
-

GaRs ggbbbbb
mfimmv‘
NEFR
2 £o

:
MPFAIL

LASCIZ
.ASCIZ
.ASCIZ

053111

SMNEW:

MCRLF:

052103
000

b
b
i
b
b e
ch e
b e

SEQ 0055

GENERAL UTILITIES (TYPE OUT,ERROR,SCOPE
ETC.)
/

043505

177523

LASCIZ

051040

wvivvuoaoauoawnaanawwnawg N

<
H

v
on

015062
elelelelelelelelels]

2869

053505

014641

047040
000

[o]e]

—>

o2 _—

2828

000
0

W
~N

014536
—b

&%RRRRRAERRRE

2824
2825

13:43 PAGE 56

MERRPC(: LASCIZ
:
XHEAD
LASCIZ

/PC:

<377>/MAP OF DQ11

STATUS/<377>

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

2880
2881

015154
000002

006
001244
006
001246

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

003

" .BYTE

6.3

002

BYTE
TEMP2

6,2

O©

_..

jelelelelelelelelels
sl laVIES

.SYNC:

.BYTE

9
&~

o
n
o

—_

b
b
D e
D
-

NOWNSWN=O

.BYTE

TXBUFF: 0

b
b
i

[ )

D o

—

n)
o

JHALT O

DHO
870

JHALT 1

DH1
DT1
EMO
DH2
D12
EM?

JHALT 2

DH4

26,26

.=.+400

0
0
0

—d

26,26

.=.+400
.ERRTA: 0

RRRRXRRXRRRR
FE2
TN RREX RS ruo&

2922992292292
_

leolele]

SYNC:

RXBUFF:

016402
016404

2923

026
026

—_

.m.

:BUFFERS FOR INPUT-OQUTPUT

DTS
EM1

HALT 3

JHALT &

SEQ 0056

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

TRRREX FR
v
RE&R nNO SN

~ >
gOOOOOOOOOOO

CZDQE_
MACY11_30A(1052)
2 8-JuL-78
CZDQEE.P11
25=JuL-78 1
28

SEQ 0057

JHALT 6

JHALT

b
B
b
bt bt bt bt Bt b

(7. 17,.17,] wuhnnunhnn

NININ = PINN NN N NN N N -

o YD alalalalalels)

bt b
b
b
e

>>
> >>>>>>>
7
>

b \ )
d e e
) =

) e

oOoNO
W=O
-

FRROBIRRRR

=PNINO
= NN
=

N =

22822

\.h—l\ll?
= — =
o
R WWWOON
-t ed ed N2 NN
O -

v
80
wWw

533

JHALT 10
<377>/PLEASE SET SWITCH REGISTER TO POLYNOMIAL YOU DESIRE /
<377>/T0 BE PLACED INTO POLYNOMIAL REGISTER OF DQ11./
<377>/CALCULATED BCC ERROR./

<377>/MEMORY TRANSFER TEST
<377>/CABLE TEST /
<377>/DQ11 ERROR FLAG SET/

<377>/RXBCC ERROR BIT6 NOT CLEAR/

<377>/POLYNOMIAL
DQERR/
<377>/POLYNO
EXPECTED
RECEIVED
SEC REG/
<377>/POLYNO CHAR SHIFTS EXPECTED RECEIVED
<377>/ADDRESS
EXPECTED
FOUND /
<377>/DATA COMPARISON ERROR /
<377>/EXPECTED
RECEIVED/
<377>/TX ADD
RX ADD
EXPECTED
FOUND /
<377>/DQRCSR
DQTCSR
DQERR /

003
005
005
001

002

003
006

004

002

003

+*DATA ERROR*/

REG/

017476

006
001254
006
001252
000002
006
001254
006
001252
000004
006
001256
006
001260
006
001254
006
001252
000003
006
001256
006
001260
006
001262
000001

004

002
004

DT4:
BYTE

002

BYTE
DTS:

002
002

BYTE
TEMPS
BYTE
TEMPS

DT6:

002
002
.END

6.4

6,2

6,4
TEMPS
6,2
TEMPS

4
.BYTE
SAVRO
BYTE

SAVR1

002
002

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

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

6,2
6,2

BYTE
TEMPS
BYTE
;EMP4

6.4

BYTE
SAVRO
BYTE
SAVR1
BYTE
SAVR2

6,2

5,2

6,2
6,2

SEQ 0058

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

ABBIT =
ACTBIT=
ADRCNT=
BABIT =
B88BIT =
BCCFBK
BCCPRV

002000
004000
013375
010000
020000
015346
015342

BINWRD 013714
BITO = 000001
BIT1

= 000002

BIT10 = 002000
BIT11 = 004000
BIT12 = 010000
BIT13 = 020000

BIT14 = 040000
BIT15 = 100000
BITZ2 = 000004

BIT3

= 000010

BITS

= 000040

BIT7
BIT8

= 000200
= 000400

BIT4

BIT6é

= 000020

= 000100

BIT9 =
BRW
BRX
CALBCC

CHARDT=
CHAR1
CHARZ
C(HAR3
CHRCNT
CHRLNG
CKDN
CKSWR =
CKSYNT
CNTLU =

001000
012660
012662
015344

000010
001236
001240
001242
013712
015334
002710
104414
(002662
104415

CNVRT = 104411
CONVRT= 104410
COUNT
015352

6104

H S
13:43 PAGE 61
CROSS REFERENCE TABLE == USER SYMBOLS

7;4
732

2587#

2332«

2335«

2629
1043

2342

2903#

2243

229

2330

2007

2939
2300

1014

2356
2152

2375

1662

1683

2249

1581
1973

2028

1509

24574
24584
1571
1968

1512

1600

1641+

2158

1674

2206

1689

2306

1700

2037+

2051«

2059

2744

2630

2646+

26664

2657

1M17%
988

998

1013

2099

2420

2438

2462

2685

2398

2602

2406

2715

2719

2778

2809

1465+
1741+

1569+
1742

2062+

2066+

2222+

970

978
1454
1695

2735
1462+
1719«

1586

1587

1592+

29054

2966

1056+

1065

1066+

1067

1068+

1589+

1642+

1657

1668+

1670

1672

27N
2729

2733
27324

27364

2575
29464
29464
29464
29464

25854

1052+

1701

2036

2955

2394

2310

2033

2902#

942+
973
1579
2964

014160
015336
013372
017026
017052
017122
017201

26684

2203

2338

2197
2439

2317«

DATAHD
DATAIN
DEVADR
DHO
DH1
DHZ
DH3

1428

2578+
728
719

SEQ 0059

1603+

1604

1706

2072

1656+

1707+
2076+

2271

1666+

1669+

1721

2253«

2258+

2261x

2272+

2304+

1697«

1708+

1712+

1716+

1720

SEQ 0060

996

1046

1048

NN
=8O

N
=
S OW

A
I
B

SUINSE
N B AR B ANGRS
L
» »
LA

b cd d d b
=
POPININININ)

»»
»
»

MOND
= —

2EEY
R
2 VNP

PONININININ
= b b b d e b

%2>

RSy
ot
v
WOoo
O

W
= N0
NN
=W=UNNVOWOWDNON

PNOMNOMNOMNUN)
== e B N =
WA= —=O
W—=N—
N —

VI NN

B
BN 2B B

2N B

NOW=N=NO

EEEEERER]

RISRRE CONMNON
Omg—au
=~

LR 2

—

995«

PUPONINIAIN)
— = 3 3 —3 —s s

AINS
A
3RRAR RN E!gps—'Nf;)\[-ib

PONOPONIN)
==
s
A N =)

2\03\ N —
b

001374

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

DQSE(H

1683+
2010
2124
2180«
2234+
2274
2302«
882#

1359«

1443~
1558«
1608+

PONININININD
— b e b d ed

1441 »
1556
1607~

1227+

1225«

1356

2125«
2181«
2237«
2289+
2374+
1072«
1070«
1086+

2123«
2179+
2235«
2287«
2367«
8734
8724
8814

1226+
1358«
1444%
1606«
2006+

1224%
1355«
1442*
1598+
1965«

1078~
1069%
2158
1084+

877#
8764
2143«
880#

1082+

9214

1794
740*

755

1770
703«

751«

-N'\J'\J-‘-'OC~$V|J~ N— N

1065

750

P
IPOPIAINAIN
= =3 =
s 3 a3\

9114
9134
9154
917#
919#
9244

8794

DQRL VL
DQRVE
(
DQSEC

29464
29464
29464
958
949
744>

CROSS REFERENCE TABLE == USER SYMBOLS

?\h@&:‘@

001440

2932
2938
2941
6904
575#
670
8894
891#
8934
8954
8974
8994
901#
9034
9054
9074

PAGE 62

DD
D
_—

HEBBBNNS

888833838 3 g

DISPRE
DLIGHT=
DQACTV
DQCROO

® BRSRSRSSIN

DH4

DH5
DH6

13:43

NGO
N

CZDQE
MACY11_30A(105 2)
28-JuL-78
CZDQEE.P11
25=JuL-788 1 5:28

CZDQE_
MACY11_30A(105 )1 28-JUL-78
CZDQEE .P1
25=JuL=7
5:28

S
T
i

(001476

DQTCSR

89504
8924
8944

1067+

PAGE 63

SEQ 0061

CROSS REFERENCE TABLE == USER SYMBOLS
1070

1112

1119

1428

NS 3 PN
RO FRFN IR

U YR Wy
SR
S
I

DQST17

EEBENNNRNED

88383333333338

9254

13:43

001364

1149+«

1081+
1562

1564

2353«

1077«

1153

1231«

214br

2152¢

1243
2196+

2709

2723+

2780+

2141~

1075+

B
=y

eleoleolelele)

UK Y
*RR 828
D S e S N N N N
:OO
S B W=NOW—=N
S
&
& =N
23 Ra&NIa ooN 34

o
b}
"

le TP Y

)

I
TM

—

';!
TMm
=233

—

2964

2434
2388+
27274

2584m
2449

004456

2696+

2453

967+
2810
1119

LIMIT,

2745+
2451+

958+

2408+

1332

1400

14054

1319+

2203+

1376+

2243+

1446+

2244

1447

2245

1448

2246

652
828#
2535«
7934
7978
2508
2393
2644
8604
2391
2718
2405

24154

2568

25834

2524
28564
2655
1128
2835#
28754
28624

2616

632
2052

1317
2063

882822 8

2570

762
992

MISC.

MPASSX
MPFAIL
MPOLY
MM
MR
MSTCLR

014746
015047
015011
014556

2714

28644

7714

i
-

966

1025

28504

1814+

1838+

2397

014312
012506
104407
001214

1060
28464

858¢
1839

2401
2777
2097
2521

28584
1060«

6154
2797
848¢
25414
2544
2560

733
2799
1026
2562
2546
25804

2779
6374
5844
5824
5864
5764
5834
5814
585#
2473
2734
2764
2410
852#

27854

795#

RESTAR
RESTRT
RESO5 =
RETURN

2448«
Q44x

28524
28674
28604
28304
29464
28284
28384
1312
1863

1016
985

1034

MTITLE
MTSTN
MTSTPC
MVECX
NEXT

1291+
1744~

789#

939+

SEQ 0062

CROSS REFERENCE TABLE == USER SYMBOLS

2538+«

7914
1699

PAGE 64

013374

366
224
34

MLOCK
MNEW

13:43

WS
|
WO

CZDQE
MACY11_30A(105 )1 28-JUL=78
CZDQEE .P1
25=JuL=7
5:28

25864
1342174

2587

1957
1747

2449
2387+«

2452+
2693

28944
1217

1278

2722

2003+
29124

2021+

2695+
2816

2781+
28254
1539

2465

1636

1890

1593
2289

2293

1923

2078

2079

2783

28394

1444
2137

1461
2191

1357
1896

1432
1929

1433
1959

2005

1500

1546
2022

2170

2220

2270

2782

1110«
1862«

1121
1889+

1194+
1922+

1277~
1956+

1405
996

1427+
2094+

2750

1538+

1635+

1766+

2801
2811

2805

28174

2548

25574

2567

2569

2571

2389«

2408

2431

934+

1009+

2145+

2559

27934

2807+

2817+

1033«

1035

1039+

1406

1430+

143

1606

1653

1726

2309

1547

2038

2374

1640

1767

1791

1815

2743
1403
673

2740

2522
27374
27704
2413
2737
946+

24204
1029

1121+

1122

1405+

1492+

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

001304
001306
001302

RXBA.P= 000000
RXBA.S= 000004
RXBUFF
016000

—

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

SAVACT
SAVBCC
SAVEPC
SAVNUM
SAVPC
SAVRO
SAVR1
SAVR2
SAVR3
SAVRG
SAVRS
SAVSP
SAVO5 =
SCOPE =

001502
015356
015
001276
001274
001256
001260
001262
001264
001266
001270
001272
104406
104400

SCOP1 = 104401
SEC16
015362
SEC16X 015364
SEQ.
= 000014
SIMBCC 012064
SPACNT= 013713
STACK = 0012
STBCC
010202
STFLG
001311
STORE1
015366

SVO05

013404

SWR

001200

SWREG
SWREGC
SW00 =
Sw01
=
Sw02 =
Sw03 =
SWO4
=
SWw05 =

SWwo6
SWw08
Sw09
Sw10
SWwil
w12
Swi3
SW14
SWw15

000176
014516
000001
000002
000004
000010
000020
000040

= 000100
= 000400
= 001000
= 002000
=
000
= 010000
= 020000
= 040000
= 100000

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

SEQ 0063

1537«

1634+
1043«
1044«
941

1888«
1046
1053«
1041

2095+

2421%

2454%

2455

2750

2752

2784

1130

1135

1167

1219

1245

1644

1648

2118

2172

2180

2224

2274

755+
1706

9224
1709

1613

1753

1774

1798

1822

1846

1870

995

1014

1022

2100

2439

8204
8214
815#
6214
625#

29174
622#
6264
6354

2110«

2169«

8164
8094
8104
8114
8124
8134
8144
815#
8504
8384
1905
8404

2591«
2600«
2599«
2598«
2597«
2596«
2595+

748%

1972

2047
6344
1572

29074

996

2998

2697
1175
1938
1330

1471

1516

2032

2014
29054

2075

1675

1961

23234

2751

1865

2772
2101

968
2691
2814

2738
2821

2308+
2648
935

8264

938+

1793

1701 =

1707

7804
2446
6914
2809
5574
5564
5554
5544
5534
5524
5514
550
5494
5488
S47#8
S468
5454
5444

948+
2463
957
28194
982
1022

25954

1064+

817#

2627*
S77#
1769

1057«

2746
2463
2748
2446
2475

2691

2686

971

21104

982

2746

989

2748

2798

CZDQE
MACY11_30A(1052)
28=JUL-78
CZDQEE.P11
25=JuL=7 15:28
SYNBCC 010570
SYNBIT= 100000
SYNC
015374
. = 000011
T
TEMP1

015230
001244

TEMP2

001246

TEMP3

001250

TEMP4L

001252

TEMP5

001254

TKCSR
001204
TKDBR
001
TLAST = 007472

TMPDAT

015340

TPCSR
TPDBR
TRPOK
TSTNO

001210
001212
013730
001226

TST1
TST1I0
TST1
TIST12

002254
005636

TST13
T1ST14

TST17
TST2
TST20

006726

006772
007036

007242
002646
007336

1502

6164
114
6314
2623
670%
2160
8054
2210~
g
2339
807#
1580«
2993
8084
2977

13:43

1898

713
1116

PAGE 66

SEQ 0064

CROSS REFERENCE TABLE == USER SYMBOLS
1931

1112
1139

21654
1223

1364

2122

2914k

2774

28924
98%'
2323*
1383+

1146+
2346+

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

2658+
8044
2199«
1147+
2328«
1661
2345+
1169+
1599«

2773=
975+
2204+
1160+
2885
1663
2348
1170
1600

1165
2982

1168+«
2991

976

2208+
1378+
1680+

1377«

1381+

2139+

2146+

2156+

2140+

2157+

2162+

2194+

2201+

2205+

1682«

1684

1729+

173

2325+

2327

2337+

1359
2011

1368
2970

2623+

2658

1314
1689

1324
1735+

1356+
2010+

1170

1325+

1389+

1549«

2004~

1709«

1710+

1713+

1311~
1688+

1394
2984

201

2015+

2972

1714+

1717+

1718+

1728+

7828
7834
1028
1657«

2442
2444
23814
1658+

2502
2504

2800
2512

2802

1660*

1672%

1673+

1681

784k
7854

2479
2481«

2482
2484

2485
2487

2513
2512«

2688
2690+

7944
1837«
1027
1538
1635
1766
1790

965+
1861
1033
16334
17654
178%#
18134

1038+«
1887
10384

1109+
1920*
2421

1193«
1954+

1426~
2759

1491+

2787

1536+

1633+

1765+

1789«

1813+

2422

1276
1995+«

1020+«

1021«

24404

1201

1207

1496

1541

1552

1892

1925

2113

2130

2176

2221+

29004

26774

1814
1838

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

6234
6274
2024
1124

2228
2141
624H
6284
6364
6334
1960

18374
18614

18874
19204
1040
19544
19954

11094
2381

11934

12764

14264

14914
15364
1018+

22694
1166

2271«
21514

22174

2278

29154

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

TYPDAT
014162
TYPE
= 104402

2712
761

2730

27334

TYPMSG

2710

2404
2806

27134

2498
2808

2095
760
1439
2656

14724
26654

014104

USEBCC
VECMAP
WORD
WRDCNT

010130
000056
005000
013710

XBX
XCSR

013776
012522

WRKO.F
XERR
XHEAD
XPASS
XPOLY

XSTATQ

XTSTN
XVEC

014150
012544
015126
012536
015350

015154

014272
012530

SCNTG
014524
$€
= 000023

SMNEW
014537
SMSWR
014530
SN
= 000021
$Y

= 000016

= 017560

2600
2776

2094#
6634
1436+
2625+
2725

2687
2395

.CONVR
EOP
"ERRTA
SHLT
-INSTE
.INSTG
INSTR
-INST1
MEMCL
MSG
MSTCL
"PARAM

002116
014376
014452
013474

013470
012364
016402
013750
013130
013134
013012
013032
012222
013034
012346
013162

8428

27284

966

974

2508
2816

2520

991

2524

1016

2615

SEQ 0065

1034

265

1059

2713

2096

2717

2390

2721

2392

2726

239

2731

2689
2423m

26914

2023«

2100«

2136

2190

2240

2292

2333

2344

2904k

2948

2953

2962

1w
1040
1538
1539
1863#
1889
2810
28254
2808
28234
w1036
1534
1539
1863
1885
1w
B9
B6ON
B6H
641H
642
727
730
8954
B8O64
9084
9214
9k
1300
1321

10414
1635
18904

1110
16364
1922

11114
1766
19234

119%
17674
1956

1195¢
1790
1958%

1277
17914
1996

1278#
1814
19974

1427
18154

1428#
1838

1493
1839

149
1862

10414
1631
18504
838
BG4N

1107
16364
1918
840N
866N

11114
1763
1923
B4o#

1191
17674
1952
B44W

11954
1787
19584
BLoW

1274
17914
1993
84BN

12784
1811
19974
B85S0

1426
18154
23814
BSH

14284
1835

1489
1839

14944
1859

8544

8S6H

8584

7774
B9
912¢
958
1395
1690
1969

6614

677

6BM

GOSH

698

2483

770
898K
9114
9m
1387
16784
1936

653H

21064
10094
863
865
857
855
1430
2705
647
847
2517
B4S
24984
861
2496+
859
849

765
BO7H
9104
Q3m
1327
16774
1903

2407
974
2403
1501%
1977«
979
2716
2399
2806

1601
1844

.BEGIN
CKSWR
JONTLU
CNVRT

13:43 PAGE 67
CROSS REFERENCE TABLE == USER SYMBOLS

24324
Q876M
24294
1545+

28814

27574
24264
28224

1611
1868

2480
279¢6#
28074
26174
26154
199
29194
2685H
25184
25204
2494H
2509
23514
24994
2373
25324

1558

44N

1637%

6514

1652

2766

2775

2803+

2804

23874

2525
2802+

1768+

818¢

9134
972
1429

17054
1974

2827

1792*

8884
9014
914k
977
1459
1724w
2012

28808

1816+

BBON
9024
9ISH
981
1469
1725¢
2029

28914

1840%

BOOK
9034
916w

1507

1737
2034

28934

1864

8914
#
9174
1062
1510
1751
2044

28954

1897+

702

B89N
905K
9184
11
15744
1772
2049

29164

1930%

718

893

919w
171
1575#
1796
2060

29184

1958+

723

8OLN
907#
1247
1582
1820
2073

MACYT

CME P

PFA

014300

.SAVOS
.SCOPE
SC0P1

81 376
012552
0

SYNC
JRPSR
.TRPTA
LTYPE

01537
013716
001314
012704

. ABS.

017560

(10

.KS&% 01;‘36

.START

845.3

13:43

114
649
837»
843

PAGE 68

27638

5227

1372

27"

2134

2188

ct79
24708

000
O

DSKZ: CZDQEE, DSKZ CZDQEE. SEQ=DSKZ: CZDQXX .MA( ,DSKZ: CZDQEE.P11
RUN-TIME: 6 10 1_SECONDS
RUN-TIME RATIO: 59/18=3.2
CORE USED:
18k
(35 PAGES)
DOCUMENT PAGES:

CROSS REFERENCE TABLE -- USER SYMBOLS

936

851
839
841

oomg

ERRORS DETECTED:

) e-.u-n

29134

SEQ 0066