Digital PDFs

AH-8851F-MC

September 1979

79 pages

Original

4.0MB

view download

OCR Version

3.6MB

view download

Document:	CZKMAF0 PDP11 MOS-CORE 0-124K EXER. SEP 1979 bw
Order Number:	AH-8851F-MC
Revision:	000
Pages:	79
Original Filename:	CZKMAF0__PDP11__MOS-CORE_0-124K_EXER.__AH-8851F-MC__SEP_1979_bw.pdf

OCR Text

MOS/CORE 0-124K EXER.

AH-8851F-MC

SEP 1979

CZKMAFO

copvrigHT 75-79

[SEAREN

FICHE
1 OF
1

MADE
IN USA

TIKMA -

MACYIY

TIxWmAF P11

30A(1052)

05-MAR~79

05-MAR-79 09:02

09:02

PAGE

SEQ 0001

LREPT

IDENTIFILATION

PRODUCT

(OCDE::

AC-8850F
-M(C

PRODUCT NAME:

(ZKMAFO MOS/CORE

DATE

MAR.,

CREATED:

MAINTAINER:

0-124K

EXER

1979

DIAGNOSTIC

GROUP

THE INFORMATION
IN
THIS
DOCUMENT
IS
SUBJECT
TO
CHANGE
WITHOUT
NOTICE
AND SHOULD NOT BE CONSTRUED AS A COMM] TMENT
8Y
DIGITAL
EQUIPMENT
CORPORATION.
LIGITAL
EQUIPMENT
CORPORATION
ASSUMES
NO
RESPONSIBILITY FOR ANY ERRORS THAT
MAY APPEAR [N THIS MANUAL.

THE SOF TWARE DESCRIBED IN THIS DOCUMENT
PURCHASER
UNDER
A
LICENSE
FOR
USE

IS FURNISHED TO
THE
ON A SINGLE COMPUTER

SYSTEM
AND
(AN
BE
(OPIED
(WITH
INCLUSION
OF
DIGITALS
COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY
OTHERWISE BE PROVIDEC IN WRITING BY DIGITAL.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY
FOR
THE
USE OR RELIABILITY CF ITS SOFTWARE ON EQUIPMENT THAT S
NOT SUPPLIED BY DIGITAL.

(()

1975,1979 DIGITAL

EQUIPMENT

(ORPORATION

“J«MA
MACY11 30A(1052)
05-MAR-79
. JXMAf P11
0S=MAR-79 09:02
3

09:02

PAGE 2

SEQ 0002

CONTENTS

LOADING PROCEDURE

BRSSO

W20

STARTING PROCEDURE
SWITCH SETTINGS
CONTROL-C OPTION
STARTING ADDRESS =200
RESTART ADDRESS -250

PROGRAM HALTS

FAUWN=O

ERRORS
ERROR MESSAGE FGRMAT.
ERROR DICTIONARY
ERROR HISTORY
ERROR RECOVERY

RESTRICTIONS

o000

NP WN—=O

MISCELLANEOUS
ADDRESS/BANK RANGES

=20

[]

ruruno

—O
=IO

REQUIREMENTS

VOO0

ABSTRA(CT
GETTING STARTED

PSWEGERE
A S dvih ¢

EQUIPMENT
STORAGE

PROGRAM AND/OR OPERATOR ACTION
LONG GALLOP OPTION

EXECUTION TIME

PASS

COUNT AND

STACK POINTER
POWER FAIL

(NORMA_

ERRNR)

IN OCTAL AND DEC(IMAL

TeST NO.

LOCATIONS

PROGRAM DESCRIPTION
NARRATIVE FLOW CHART
TEST TITLES

TEST O:
TEST 1:
TEST 2:

TEST FOR PROPER BANK SELECTION
CHECK DAT1/DATO LINES
TEST MEMORY FOR HOLDING DATA AND BYTE

TEST 3: DUAL ADDRESS TEST A

TEST
TEST
TEST
TEST
TEST
TEST

&4: DUAL ADDRESS TEST B
5: MARCHING 1'S AND 0°'S
6: CELLS' VOLATILITY TEST
7: SHIFTING DIAGONAL
10: READ RECOVERY GALLOPING TEST THROUGH EVERY 64TH CELL
11: READ RECOVERY LONG GALLOPING/FAST GALLOPING TEST

TEST 12: WORST CASE TESTING FOR CORE MEMORY
TEST 13: WRITE RECCVERY TEST

10.0

SELECTION

RXDP 4 ACT11

& APT OPERATION

(ZKMA
MACY11 30A(1052)
O05-MAR-79
CZKMAF P11
05-MAR-79 09:02
106
105
106

[1.0]

}}}

Jry
- bNN
b N.n—a..a'-\-l)
£ N AN N NN
NN
N N
}

1
1

}25
143

144
145

OO0
NN N SN

S VALV, VAV, IV.]V,|

L N
N

146
147
148
149
150
151
152

ABSTRA(CT

ON PROCESSORS WITH NO HARDWARE

}}2

1
1

SEQ 0003

THIS PROGRAM CAN BE RUN UNDER XXDP, APT AND ACT MONITORS.

114

121
122
123
124

EXISTS, HOWEVER, THE ABSOLUTE LOADER IS NOT SAVED.

113

119
120

PAGE

THIS DIAGNOSTIC WILL TEST O = 124Kk OF MOS OR (CORE MEMORY
ON ANY PDP-11 FAMILY COMPUTER.,
SOME TESTS ARE WORST CASE
FOR MOS AND STWME FOR CORE, BUIT ALL TESTS ARE ALWAYS RUN,
THE TESTS OC.UPLES LESS THAN 2K OF MEMORY SO IT (AN BE
USED TO TES: A SYSIEM WITH ONLLY 4K OF MEMORY.
[F ONLY 4K

107
108
109
110

}}g

09:02

SWITCH REGISTER = LOCATION 176.

1.1)

SWITCH REGISTER,

SOF TWARE

GETTING STARTED
IF NO HARDWARE SWITCH REGISTER SFT LCCATION 176 TO ORTAIN SWIT(CH
OPTIONS.

TO START:
eeemeeeeA.

B.
C.

SET SWITCH REGISTER = 00000

START AT 200.
THE MEMORY LIMITS WILL BE PRINTED.

SEE SECTION 4.4 FOR REST OF PRINTOUTS EXPECTED.

;22?2591” WILL BE TYPED LAST, AND THE TEST WILL

TO HALT THE TEST, TYPE CONTROL-C, THIS WILL
PROGRAM IS RELOCATED BACK 70 LOWER MEMORY,

BE PATIENT,

SEE SECTION 6.0.

ERROR # IS TYPED SEE SECTION 6.2.

BIT13(020000)
BIT12(010000)
BIT11(004000)
BIT10(002000)
BIT09(001000)
BIT08(000400)
BIT07(000200)
BIT06(000100)

BITO5(000040)
BIT04(000020)
BIT03-81T00

BEFORE 'DIGGING'' INTO THE LISTING READ
SECTION 9.

SWITCH SETTING SUMMARY
BIT15(100000)
BIT14(040000)

THE

THE CONTROL=-C IS ONLY RECOGNIZED AT THE END

OF THE CURRENT SUBTEST.
AN UNEXPECTED HALT OCCURS

!CAUTION!

INSURE

(SEE SECTION 4.1

FOR DETAILS)

HALT ON ERROR
LOOP IN SUBTEST DEFINED BY BITS <3:0>

INHIBIT ERROR PRINTOUTS
ENABLE TESTING ABOVE 28K (WITH MEMORY MANAGEMENT)
ENABLE PARITY TESTING
HALT AFTER EACH SUBTEST
INHIBIT PROGRAM RELOCATION
TYPE FIRST FAILING BIT ERROR PER 4K.
ENABLE LONG GALLOPING TEST
INHIRIT MEMORY SIZING

INHIBIT 'PASSAXX'' PRINTOUTS
INHIBIT PRINTOUTS
BEGINNING TEST NUMBER.

(ZKMA
MACYT1 30A(1052)
O05-MAR-79
CZKMAF P11
05-MAR=-79 09:02
16V
161
162
163
164
165
166
167
168
169

[2.0]

REQUIREMENTS

[2.13

EQUIPMENT

£2.2]

(SEE

£3.0]

<ECTION 9.

b
b
b ek

7744.

FOR DETAILS)

[4.0]

STARTING PROCEDURE

[4.1]

SWITCH SETTINGS

PROGRAM EXPANDS

FOR

ERROR

LOADER OR XXDP CHAIN MONITOR.

FOR PDP-11

ABSOLUTE BINARY FORMATTED

TAPES.

SWITCH REGISTER - LOCATION 176

BIT15(100000)

HALT ON ERROR

BIT14(040000)

LOOP ON TEST DEFINED BY SwiTCH REGISTER BITS <3:0>

BIT13(020000)

INHIBIT ERROR PRINTOUTS

BIT12(010000)

0000 -

STANDARD PROCEDURE

SOF TWARE

TQ SAVE ABSOLUTE

LOADING PROCEDURE

USE

VAN 2O

SEQ 0004

STORAGE
HISTORY AND

[AS AN 1, N1,V 1,81,
¥

PAGE 4

STANDARD 11 FAMILY COMPUTER WITH A CONSOLE OUTPUT DEVICE
AND FROM 4K TO_"24K OF MEMORY.
PROGRAM WILL ALSO RUN ON THE
PDT=11 AND ON 30K LSI SYSTEMS,

PROGRAM STORAGE

209

09:02

ENABLE MEMORY MANAGEMENT

NEED KT

SUPPORT)

(TESTING ABOVE 28K,

BIT11(004000)

ENABLE PARITY MODULES.
""PAR'* WILL BE TYPED

BIT10(002000)

HALT AFTER EACH SUBTEST

BIT09(001000)

INHIBIT PROGRAM RELOCATION

BIT08(000400)

TYPE FIRST FAILING BIT IN EACH 4K BANK ONLY.

BiTU/(000200)

ENABLE LONG GALLOPING TEST.
""'GLP*" WILL BE TYPED.

!PRESS CONTINUE

30K SYSTEM DOES NOT

TO DO NEXT SUBTEST

:%ES¥Eg LGCATIONS 4320-7776 WILL NOT BE

.THE TOTAL ERROR COUNT (UP TO 377) WILL
!BE SAVED IN THE ERROR HISTORY.

:CAUTION!

INCREASES TEST

TIME BY FACTOR OF

25.

(ZKMA
MACY11 30A(1052)
O05-MAR-79
CZKMAF P11
05-MaR-79 09:02

BIT06(000100)

09:02

PAGE 5

SEQ 0005

INHIBIT MEMORY SIZING.
'THE MEMORY LIMITS MUST BE

SETUP
SHOWN)

(VALUES TO TEST 0-8k ARE
(LOWTWO=LOCATION 324)

LOWTWO:
LOWADD:

0
O

[N THE FOLLOWING LOCATIONS:

;STORE BITS 17:16 OF LOW TEST ADDRESS
;STORE REST OF LOW TEST ADDRESS
;DO NOT ATTEMPT TO SET THE LOWER LIMIT

;AT OR ABOVE 160000 ON A 30K LSI SYSTEM,
: THE PROGRAM WILL

HIGHTWO:
HIGHADD:

04(000020)

INHIBIT ERROR HISTORY PRINTQUTS.

THE

ERROR HISTORY CAN STILL BE OBTAINED
BY TYPING CONTROL-C.
INHIBIT PRINTOUTS 'PAR'',"'GLP'',"'TST13 BNK XX''.

NUMBER OF TEST (0-13) TO RUN FIRST.
.NORMAI
LY USED WITH BIT14

(LOOP ON TEST)

CONTROL-C OPTION

CONTROL C

[(*C]

AFTER COMPLETION OF

THE CURRENT TEST.

THE ERROR HISTORY (SEE SEC. 6.3) WILL BE
TYPED. THE PROGRAM WILL HALT IN LOWER MEMORY.
PRESSING CONTINUE WILL RESTART THE DIAGNOSTIC.

STARTING ADDRESS= 200
RESTART ADDRESS - 250 OR 200
RESTART AT 200 CLEARS PASS COUNT

[4.4]

ASSUME MEMORY MANAGEMICNT

;STORE BITS 17:16 OF HIGH TEST ADDRESS
;STORE REST OF HIGH TEST ADDRESS

INHIBIT “PASS#XX'' PRINTOUTS

BITO3-BI1T00

[&4.3]

Q
37776

BI705(000040)

(4.2]

sMUST BE USED.

($PASS)

AND PRINTS "'CZKMAF'' TITLE.

PROGRAM AND/OR OPERATOR ACTION

2)
3

LOAD PROGRAM INTO MEMORY USING ABSOLUTE

SET OPTIONS (SEE SEC. 4.1)
START THE PROGRAM AT 200
THE

LOADER.

FOLLOWING IS AN EXAMPLE WITH EXPLANATIONS

THE PRINTOUTS EXPECTED.

"XXXXX=YYYYY''

;ADDRESSES OF TEST BOUNDARIES.

'PAR"’

;IF PARITY OPTION SELECTED

"'GLP"’

;IF LONG GALLGPING OPTION SELECTED.

(7KMA
MACY11 30A(1052)
05-MAR-79
(ZKMAF P11
05-MAR-75 (09:(02

09:02

g;g

PAGE 6

SEQ 0006

:PRINTED AS TST11

IS ENTERED.

274
275
g;g

"TST13 BNK 00
*TST13 8Nk 01'°
ETC...

;ENTERING BANK 00 IN TEST 13.
;AND BANK 1...
JUNTIL ALL BANKS (UP TO 7) HAVE BEEN TESTED.

278

"REL"’

;THE DIAGNCSTIC RELOCATES TO HIGHEST

281
Sg%

*TST13 BNK 00°°

;TESTING BANK 00 IN TEST 13 (RELOCATED STATE.)
INOTE-ONLY BANK 00 IS TESTED IN THE RELOCATED STATE.

Sgé

"PASSAXX'

;WHFRE “XX''
IS THE PASS NO.

Sgg

286
287

sLOCATIONS UNDER TEST AND RUNS TSTO-TST13 AGAIN.

ADDITIONAL PRINTOUTS

Sgg

"NG PAR''

;PRINTED

290
291
262
293
294

"NO KT''

JPRINTED IF SWR BIT 12 IS SFT AND NO MEMORY
:MANAGEMENT AVAILABLE.

Sgg

4.5

297
258
299

PARITY SELECTED BUT NOT AVAILABLE.

LONG GALLOP OPTION

NORMAL WORST CASE SR SETTING = 0000.
FOR LONG GALLOP
SR = 200.
LONG GALLOP OPTION SHOULD ONLY BE USED IF AN
MOS MEMORY PROBLEM IS SUSPECTED AND NO OTHER SUBJTESTS

gg?

wlLL

FAIL.

THE

TEST TIME

IS INCREASED 25 TIMES.

)

3Cc

303
282

PROGRAM HALT> (NORMAL+ ERROR)

THIS IS A LIST OF EXPECTED HALTS.
IF THE TEST HALTS
IN A LOCATION NOT IN THIS LIST AND IT IS LESS THAN 776,

306
30

£5.0]

MAY BE DUE

310
2
31

MAY BE RELOCATED. THE ACTUAL LOCATIONS THEY ARE IN CAN BE FOUND
BY SUBTRACTING 500 FROM THE HALT PC AND ADDING THIS DIFFERENCE TO THE
CONTENTS OF SAVR6 [LOC. 3501.

314

315

316

217
318

TO A DEVICE

NOTE

INTERRUPTING.

THE HALT AT END OF

SUBTEST AND HALT ON ERROR HALT LOCATIONS

REASON

emmeeee

112

TRAP TO LOC. 4

g;g

RECOVERY

lllllll

EXAMINE R6, IT CONTAINS
THE POINTER TO THE PC

WHERE THE TRAP OCCURRED.

321
322
ggz

325
ggg

1714

POWER FAIL

HALT AT END OF
TEST SWITCH SET.

POWER UP WILL RECOVER
IF IN CORE MEMORY. IF
NOT CORE OPERATION IS UNDEF INED.
PRESS CONTINUE TO GG 10
NEXT SUBTEST.,

(ZKMA
MACY11 30A(1052)
O05-MAR-79
CZKMAF P11
05-MAR-79 09:02

(09:02

PAGE

SEQ 0007

6156

HALT ON ERROR

PRESS (ONTINUE.

6240

CONTROL~C

PRESS CONTINUE TO RE-

SWITCH SET.

TYPED

OR FATAL ERROR
OCCURRED

(6.0]

ERRORS

£6.1]

ERROR MESSAGE

START

TEST.

FORMAT

THE ERROR PRINTOUT

CONSISTS OF

"LOCATION

BAD

F ORMAT
:

GOOD

6 OCTAL WORDS

ERROR

THE

FOLLOWING

PASTLG"'

"ADR ERR'' WILL BE PRINTED PRIOR IF AN ADDRESSING ERROR IS SUSPECTED.
"PAR ERR'' WILL BE PRINTED PRIOR IF A PARITY ERROR TRAP GCCURRED
‘CAUTION. IF PARITY ERROR THE GOOD DATA PRINTOUT IS THE
PARITY MODULE

UNIBUS ADDRESS

THAT FAILED.

:
WHERE

LOCATION=
GOOD
=
BAD
=
PC
ERROR

FAILING MEMORY LOCATION
GOOD DATA [DATA THAT WAS EXPECTEDJ]
BAD DATA [DATA THAT WAS FOUND]
PROGRAM COUNTER AT ERROR CALL.
FAILING ERROR NO. (SEE SEC 6.2 = ERRUR DICT]ONARY)

PASFLG

CONTENTS OF

(SEE

.THE

TEST WILL

LOCATION PASFLG.THIS MAY NOT BE

6.2-ERROR DICTIONARY)

CONTINUE AFTER THE

'NO KT'' WILL BE
"MANAGEMENT

SEC.

TYPED_IF

RELEVANT.

ERROR PRINTOUT.

TESTING ABOVE 28K SELECTED AND NO MEMORY

[S FOUND. (30K SYSTEM DOES NOT NEED KT SUPPORT)

."NO PAR'' WILL BE TYPED If PARI1Y OPTION SELECTED

.AND NO PARITY MODULES WERE

(FATAL

FOUND.

ERRURS)

"ERR _AXXXXXX'' WILL BE TYPED WHERE 'XXXXXX'' IS
THE

ERROR NUMBER.

gRgogéRggf
H

(APT MODE
ALL

SEC.

THE

DIAGNOSTIC

USUALLY HALT

ERRORS)

ERRORS ARE

TREATED AS

FATAL

ERROR OCCURS UNDER APT A '1'" IS

$MSGTY

WILL

OGN

THIS

6.2 -ERROR DICTIONARY - FOR DESCRiPTJONS

UNDER APT.

STORED

WHhEN AN

IN LOCATION

AND THE PROGRAM HALTS AT FATHLT.

TYPE

(ZKMA

MACY1T1

CZKMAF P11

3 DA(1052)
05-MAR-79
05 =MAR-79 09:02

384
385

391

THE

[6.2]

$FATAL

(9:02

PAGE 8

SEQ 0008

(ONTAINS THE ERROR NO.

FAILING BANK NO.

UNDER

TEST

IN THE LOW BYTE AND

IN THE HIGH BYTE.

ERROR DICTIONARY
THIS

IS A LIST OF

CAUSES FOR THE

BRAC

ETSTHE

ACKETS.

ERROR.

ROUTINE

NAME

ERROR NUMBERS PRINTED AND POSSIBLE
WHERE

THE

ERROR

CALL

ORIGINATED

IS GIVEN

NOTE- 'BAKPAT'' REFERS TO THE BACKGROUND PATTERN WRITTEN INTO MEMORY
FOR

VARIOUS

TESTS.

PARITY

SeLECTED

HAS A VALUE
= 376

"'SWAPPED BAKPAT''
= 77000 IF PARITY SELECTED, ELSE-77400
«01

_ENDR

404

;ERR 2 0

407

CERR # 1

. [BUSER] BUS ERROR TRAP TO LOC. 4 CCCURRED

THIS ERROR

IS NOT PRINTED AND

;[TSTTRPIFATAL DATA ERROR
;LOCATIONS 0000-430 FAILED 1'S + 0'S

:RO = GOOD DATA

FOR "'APT'' USL.

(EST.

:R1 = ADDRESS OF FAILING LOCATION.
412

;ERKk # 2

;[APTSIZ] APT FATAL ERROR
;APT MEMORY TABLES NOT SETUP CORRECTLY.
;CHECK LOCATIONS $MAMST

417

ERR # 3

[430] TO SMADR4[446]

FOR CORPF(CT MEMURY SIZE

;LTSTSIZ]

DATA.

OPERATOR FATAL ERROR

JSELECTED MEMORY SIZE GREATER

THAN 28K

: (30K SYSTEM DOES NOT NEED KT SUPPORT), BUT
ISR BIT12 (10000) NOT SET.
SSET BIT12 AND RESTART AT 200.
423

ERR # &

;[TSTSIZ]

OPERATOR FATAL ERROR

JLOWEST SELECTED TEST LIMIT IS HIGHER THAN
JHIGHEST TEST LIMIT.
SET LOCATIONS ‘1LOWTWO'‘[322]

:L? ggéGHADD” [330] CORRECTLY AND RESTART
429

ERR # S

;LTSTO]
TEST SEQUENCE ERRCR
;TSTO HAS BEEN ENTERED OUT OF SEQUENCE

;TESTN SHOULD = 00
;THE DIAGNOSTIC HAS BEEN (ORRUPTED.

;1F POSSIBLE SELECT ANOTHER 4K BANK

:BANK O AND RERUN THE TEST ON THE FAILING MEMORY.
436

ERR # 6

;LTSTOJ DUAL ADDRESSING ERROR

,ELSE=377

;FOR THIS ERROR THE GOOD DATA PRINTED IS AN
SAPDRESS.
THIS IS THE ADDRESS SELECTED WHEN
;THE SAME DATA WAS WRITTEN INTO THE FAILING

(ZKMA

MACYT

(ZKMAF P11
440
44

642
443

30A(1052)
05-MAR~79
05-MAR-79 09:02

;ERR h7

463

464
465
466

467
468
469
470
47
472
673

474
475
476

;IDENTICAL

TO PREVIOUS ERROR EXCEPT THE DATA
FAILING LOCATION wAS

;[TSTOJ DATA ERROR
;IF BAD DATA = 0000 COULD BE AN ADDRESSING

;ERROR , ELSE COMPARE GOOD AND BAD DATA FOR FAILING BITS.
;LTSTO] ADDRESSING ERROR

;THE

FAILING ADDRESS RESPONDED BUT

SEXISTENT.

;ERR

<ERR

JERR

SSTESTN [404]

JERR

;CTST1] DATA ERROR
- COMPARE GOOD AND BAD PRINTED DATA,
;DATA BITS MAY SHORTED OR SWAPPED.

FAILING

;CTST2] TEST SEWUENCE ERROR

SSTESTN [404] SHOULD - 02

THE DIAGNOSTIC HAS BEEN CORRUPTED.

;LTST2] ADDRESS OR DATA ERROR
;IF "'ADR ERR'® NOT PRINTED THEN THE BYTE SELECT
;CII-"UITRY PROBABLY FAILED.
;LTST3] TEST SEQUENCE ERROR

$TESTN (4041 SHOULD
= 03
THL

JERR

SHOULD
= 01

THE DIAGNOSTIC HAS BEEN CORRUPTED.

;

;ERR

IS NON-

MAY BE A DUAL ADDRESSING PROBLEM.

sCTST1] TEST_SEQUENCE ERROR
:

DIAGNOSTJC

HAS BEEN CORRUPTED.

;[TST3] DUAL ADDRESSING ERROR

sDUAL ADDRESSING PROBLEM FOR BITS THAT DIFFCR
:IN GOOD AND BAD DATA PRINTOUT.

477

478
479
480
481
482
483
484
485
486
487
458
489
4990
491
492
493
494
495

;LTSTO] ADDRESS AND DATA ERROR
sERROR ALSO.

449

460
461
462

(HECK BANK SELECT CIRCUITRY

;WRITTEN INTO THE

445
446
447
448

PAGE 9
SEQ 0009

;LOCATION.

444

450
451
452
453
454
455
456
457
458
459

09:02

JERR

;LTST3] DUAL ADDRESSING ERROR

;FOR THIS ERROR THE DATA PRINTED IS AN ADDRESS.

sTHIS

THE ADDRESS

THAT WAS

SELECTED WHEN THE

;SAME DATA WAS WRITTEN INTO THE FAILING LOCATION.

JERR

;[TST3] DUAL ADDRESSING ERROR

;SAME AS ERROR #20 EXCEPT DIFFERENT DATA

. (SWAPPED BAKPAT)

JERR

;LTST4] TEST SEQUENCE ERROR

SSTESTN [404] SHOULD
= O4.

:
ERR # 23

WAS WRITTEN.

THE DIAGNOSTIC HAS BEEN CORRUPTED.

;LTST4] DUAL ADDRESSING ERROR

;IF PASFLG = O THEN THE

JAND FAILING DATA ARE

FAJLING LOCATION

DUAL

ADDRESSES.

(ZKMA
MACY11 30A(1052)
O05-MAR-79
(ZXMAF P11
05-MAR~79 09:02

PAGE

SEQ 0010

496
497
zgg

ERR # 24

:[TSTS] TEST SEQUENCE ERROR
JSTESTN [404] SHOULD = 05
; THE DIAGNOSTIC HAS BEEN CORRUPTED.

500
501
502
503
504
505
506
507
ggg

:ERR # 2§

:[TSTS] DATA ERROR
:DATA WRITE OR READ ERROR.
;[TSTS] MARCHING 1°'S AND 0°'S DATA ERROR
J1F PASFLG=0
FAILED MARCHING 1'S + 0°'S IN
:
MAX TO MIN DIRECTION
;IF PASFLG=1
FAILED MARCHING
1°'S + 0°'S IN
;
MIN TO MAX DIRECTION
;IF PASFLG=3
FAILED MARCHING 0°'S + 1°'S IN
:
MAX TO MIN DIRECTION.

510

:ERR # 27

511

:ERR # 26

g}%

514
515

:ERR # 30

S18

:ERR # 31

519
520
521
522
523
524
525
526

TO PREVIOUS ERROR EXCEPT

THE DATA IS

;[TST6] TEST SEQUENCE ERROR
JSTESTN SHOULD
= 06

:ERR # 32

DIAGNOSTIC HAS BEEN CORRUPTED.

:[TST6) VOLATILITY/REFRESH TEST ERROR

;1F
;IF
;
;
;
;IF
:
:IF

;

ggg
b}

;IDENTICAL

;THE

ggg
529
530

;LTSTS] MARCHING 1°'S AND 0'S DATA ERROR

;CHECKED IMMEDIATELY AFTER BEING WR]ITTEN.

2}9

..”.

(09:02

PASFLG=0
PASFLG=1

PASFLG=2
PASFLG=3

BAKPAT WRITE OR READ ERROR.
THE FAILING LOCATION CHANGED WHILE
ANOTHER LOCATIONS WAS WRITTEN FOR
2 MS.
THE OTHER LOCATION IS SAVFD
IN SAVLOC [352]
SWAPPED BAKPAT (77400 OR 77000)
WRITE OR READ ERROR.
SAME AS IF PASFLG 2 EXCEPT

THE DATA IS SWAPPED B/XPAT.

;OTST7] TEST SEQUENCE ERROR
JSTESTN SHOULD - 07

;THE DIAGNOSTIC HAS BEEN CORRUPTED.

- 533
s S34
535
536
537
538
539

-ERR # 33

542
543
gzg

ERR # 34

;LTST10] TEST SEQUENCE ERROR
JSTESTN SHOULD
10
:
THE DIAGNOSTIC HAS BEEN CORRUPTED.

546
gzg

ERR # 35

:[TST10] BAKPAT DATA ERROR
;BAKPAT WRITE OR READ ERROR INTO THE FAILING LOCATION.

549
550
551

:ERR # 36

[157103 PEAD RECOVERY DATA ERROR
THIS ERROR CAN BE REPORTED B8Y TST10 AND TST11.
S (THEY SHARt CODE). SEE STESTN [404] FOR WHICH TEST FAILED.

?2?

;LTST7] SHIFTING DIAGONAL DATA ERROR
;IF PASFLG (0 BAKPAT WRITE OR READ ERROR.
;IF PASFLG=1
BAKPAT READ CHECK ERROR
IF PASFLG GREATER THAN 1 BUT EVEN VALUE THEN:
THE FAILING LOCATION COULD NOT BE WRITTEN INTO.
IF PASFLG GREATER THAN 1 BUT ODD VALUE THEN:
;
THE FAILING LOCATION WAS WRITTEN CORRECTLY

;

BUT LOST THE DATA.

(ZKMA
MA(CY1? KOA(1052)
05-MAR-79
(ZKMAF P11
05-MAR-79 09:02

552
553
554
555
556
557
558
559
560
561
562
563
564
565

;FOR BOTH

(09:02

PAGE

M
SEQ 0011

TESTS COMPARE

THE

GOOD AND BAD

;LOCATION TO SEE WHICH BITS FAILED.
JERR 8 37

DATA AT

THE

FAILING

;LTST10] READ RECOVERY DATA ERROR
s IDENTICAL TO THE PREVIOUS ERROR EXCEPT SWAPPED BAKPAT S
;USED AS WRITE AND READ DATA.

JERR

;LTST11] TEST SEQUENCE ERROR
SSTESTN SHOULD - 11

JERR

:IF

THE

PASFLG=2

IF PASFLG=3
:

DIAGNOSTIC

WITh GOOD

READING

FAILED READ

(HE(CK

TO MAX DIRECTION.

DOING THE READ CHECK FROM MAX

TEST DATA ERROR

TO PREVIOUS ERROR EXCEPT

IS COMPLEMENTED.

TO MIN DIRECTION.

THE DATA WRITTEN

sLTST13] TEST SEQUENCE ERROR
;S$TESTN SHOULD = 13

THE DIAGNOSTIC HAS BEEN CORRUPTED.

;LTST13]) WRITE RECOVERY TEST DATA ERROR

;[F PASFLG=0_
COMPARE GOOD AND BAD DATA FOR FAILING BITS.
;IF PASFLG=77400
DATA ERROR FOUND WHILE DOING A SECOND READ CHECK.
;IF PASFLG=77402
DATA ERROR FOUND IN FAILING LOCATION AFTER
:

cERR

DATA,BUT

IN THE MIN.

SAME CONDITIONS AS PASFLG=2 EXCEPT FAILED

[fST12J WORST CASE CORE
AND READ

;JERR

HAS BEEN CORRUPTED.

THE FAILING LOCATION WAS WRITTEN AND READ

IDENTICAL

JERR

HAS BEEN CORRUPTED.

;[TS112] WORST CASE CORE TEST DATA ERROR
;IF PASFLG=1
(OMPARE GOOD AND BAD DATA FOR FAILING BITS.
;

cERR

DIAGNOSTIC

2CTST12] TEST SEQUENCE ERROR
SSTESTN SHOULD
= 12

.ERR

THE

SMALL

TEST PROGRAM RUN

IN FAILING BANK,

[TST13J WRITE RECOVERY TEST DATA ERROR

DATA ERROR FOUND JUST BEFORE THE SMALL TEST
UAS TO BE RUN IN THE FAILING BANK. TO AVOID "BLOWING'' uP
JWHEN THE SMALL TEST IS RUN T3T13 IS ABORTED.
-ERR

[TST13J WRITE RECOVERY TEST DATA ERROR
IDENTICAL

AND READ

TO ERROR_#XXX EXCEPT

IS DIFFERENT.(177667).

THE DATA WRITTEN

;177667 1S THE COMPLEMENT OF ''JMP (RO)'* (110) WHICH IS

:LfigfgS%é@? FROM THE SMALL TEST PROGRAM RUN IN THE BANK

JERR

;[PARERR] PARITY TRAP ERROR

; PARITY TRAP TO 114 OCCURRED.
sFOR THIS ERROR PRINTOUT THE '‘GOOD DATA'* IS ACTUALLY
;THE FAILING PARITY MODULE UNIBUS ADDRESS.

; SAVLOC [352] CONTAIN

JERR

THE PC WHERE THE TRAP OCCURRLD.

;[PARITY] PARIFY TRAP FATAL ERROR

(ZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 09:02
608

;

2?8

09:02

PAGE

SEQ 0012

A PARITY TRAP TO 114 OCCURRED, BUT NO PARITY MODULES COULD BE FOUND

;WITH AN ERROR BIT (BIT15) SET.

611
612
613

ERR # 52

616
617
618

ERR # 53

621
622
623
252

.REPT

(6.3

ERROR HISTORY

g}é

[NUWHJ OPERATOR FATAL ERROR
TESTING ABOVE 28K WAS SELECTED, BUT NO MEMCRY MANAGEMENT
OPTION WAS FOUND. (30K SYSTEM DOES NOT NEED KT)
:

glg

RESET

SWITCH OPTIONS AND RESTART AT 200.

[PARITYJ OPERATOR FATAL ERROR
PARITY TESTING WAS SELECTED BUT NO PARITY MODULES
UERE FOUND.

;

RESET SWITCH OFPTIONS AND START AT 200.

626
627
628
g%g

LOCATIONS IN MEMORY ARE SET ASIDE TOD COL! ECT A HISTORY
OF THE FAILING BITS IN A PARTICULAR MEMURY BANK.
THIS
DATA IS COLLECTED FOR EVERY ERROR REGARDLESS OF SWITCH
SETTINGS.

631
632
2%2

NORMALLY THE DATA IS OUTPUT AT THE END OF TESTING, BUT
IF CONTROL=C IS TYPED IT IS OUTPUT AT THE END OF THE
CURRENT TEST.

635

THE ERROR HISTORY IS INTENDED TO HIGHLIGHT IF

g%g

638
639
640
641
642
643
646

645
646
gzg

ARE DUE

ERROR HISTORY FORMAT:

000

659
660
661
662

BANK

COUNT

——--

==---

ERROR

BIT THAT FAILED [NUMBER OF

BANK

COUNT

WHERE

649

650
651
652
653
654
655
656
gg;

ERROR

THE ERRORS

TO 1 BIT FAILING OR ONLY ADDRESS ERRORS.

[6.4]

ERROR RECOVERY

THE FAILING BIT

IN DECIMAL

I.E.

0-15 WILL BE TYPED OUT OR THE WORDS '‘ADR ERR'' OR ‘'PAR ERR'' WILL
BE TYPED OUT IF ADDRESS ERROR OR PARITY ERROR WAS SEEN
IN THE SPECIFIC BANK OF MEMORY
4K MEMORY BANK IN WHICH THIS FAILURE WAS SEEN
A O FOR O TO 4K, A 1 FOR 4 TO 8K AND SO ON
NUMBER OF TIMES THIS MEMORY BANK FAILED.
(377 IS MAXIMUM FAILURE COUNT RECORDED.)

[F THE PROGRAM IS HALTED AFTER REPORTING AN ERRUR IT CAN EITHER
BE CONTINUED OR RESTARTED AT 200 OR 250 (SEE SEC 4.2). HOWEVER FOR
CPU'S THAT DESTROY C(ONTENTS OF REGISTERS AFTER COMING TO A HALT
THE PROGRAM SHOUULD ONLY BE RESTARTED.

(IKMA
MACY11 30A(1052)
05-MAR-79
(ZKMAF P11
05-MAR-79 09:02
664

222

7.0

067
668
669

(09:02

PAGE

SEQ 0013

PRESTRICTIONS
MEMORY UNDER TEST SHOULD BE CONTIGUOUS. FOR SYSTEMS HAVING NONCONTIGUOUS MEMORY THE MEMORY BOUNDARIES SidOULD BE DEF INED BY THE
OPERATOR. (CONTIGUOUS MEMORY IS DEFINED AS A MEMORY THAT (AN BE

g;?

BOTH READ AND WRITTEN IN CONSECUTIVE LOCATIONS.)

€72
673
674
675

[8.0]

MISCELLANEOUS

g;g

[8.1]

ADDRESS/BANK RANGES IN OCTAL AND DECIMAL

677
680
681
682

THIS REFERENCE TABLE CROSS REFERENCES THE MEMORY BANK NO.S,
THE RANGE AND THE PAR USED WHEN MEMORY MANAGEMENT [S ENABLED.
IT IS ALSO USEFUL TO SHOW STARTING ADDRESSES IN A PAR-

ggz

TICULAR 4K BANK,

685
ggg

BANK NO.

DECIMAL
RANGE

OCTAL
RANGE

CPAGE ADDRESS REGISTER]
USED/CONTENT
UNIBUS ADDRESS

688
689
690

0
1
2

0 - 4k
4k - 8K
8K=12K

000000-017776
020000-037776
040000-057776

0
0000
NOT USED
NOT USED

693

16K=-20K

100000-117776

NOT USED

695

24K=-28K

140000-157776

699

23;
694

696
ggg

12K=-16K

2UK=24K

28K=32K

32K=-36K

700
701
;8%

9
10
1

36K-40K
40K=-44K
44K=-48K

704

48K-52K

705
7

52K=-56K

56K-60K

060000-077776
120000-137776

NOT USED

160000-177776

NOT USED ON 30K (LSI=11)
1
1600
772342

200000-217776

220000-237776
240000-257776
2§9000-277776

3
&
5

300000-317776

320000-337776

2000

772346
772350
772352

3000

772354

3200

60K-64K

360000-377776

340000-357776

3400

709
710

16
17

64K-68K
68K=-72K

400000-417776
420000-437776

&
S

4000
4200

18
19
20
21
22
23

;}g

719

72K=76K
76K-80K
80K-84K
84K~-88k
88k ~92K
92K -96K

772344

2200
2400
2600

;8;

71
712
713
714
715
716

772340

3600

96k -100K

440000-457776
460000-477776
500000-517776
520000-537776
540000~557776
560000-577776

600000-617776

6
1
2
3
&
5

6000

100k -104K

620000-637776

6200

4400
4600
5000
5200
5400
5600

SYSTEMS

C(ZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 09:02

09:02

104Kk~108K

PAGE

SEQ 0014

640000-657776

6400

700000=-717776

7000

108k=112K

660000-677776

116K~120K

720000~-737776

112Kk=116K

30
3

120K=124K
124K=128K

7640000-757776
760000-777776

6
7

6600
7200

7400
7600

772354

NOTES:
1.
THE PAR (PAGE ADDRESS REGISTER) CONTENTS ARE SHOWN IN A TEST
[F THE LIMITS OF TESTING ARE SET BY THE OPERATOR AND

THAT SELF

SIZES.

IF THE BANK IS ABOVE 28K PAR NO. 1 WILL BE SET TO THE
BEGINNING PAGE.
FOR EXAMPLE [F THE TESTING WAS TO
BEGIN WITH BANK 8 PAR NO. 1 WOULD EQUAL 2000, PAR ?
WOULD EQUAL 2200 ETC.

EXECUTION TIME
SOME

TYPICAL

LSI-11 AND 4K:=
LSI-11 AND 8K:=

£8.2]

PASS COUNT AND

HERE ARE

(8.2]

EXECUTION

TIMES.

100 SECS.
5 MINUTES.

TEST NO.

LOCATIONS

$PASS [406] = PASS COUNT - CLEARED BY START AT 200.
S$TESTN [404] = CURRENT TEST NO. AND RELOCATION,
:
WHERE
LOW BYTE = TEST NO.

PARITY FLAGS.

IF BIT15 = 1 TEST IS RELOCATED
IF BIT13 - 1 PARITY UNDER TEST.

[8.4]

STACK POINTER
THE

STACK

STARTS AT

500 WHEN

THE

PROGRAM

IS NOT

RELOCATED.

SAVR6[350] CONTAINS THE STACK STARTING VALUE WHEN THE DIAGNOSTIC
IS RELOCATED.
SAVRG ALSO CONTAINS THE STARTING ADDRESS OF THE PROGRAM WHEN
IT IS RELOCATED.

(8.53

POWER FAIL
THE DIAGNOSTIC

CAN BE POWER FAILED WITH NO ERRORS.

TO USE,

START THE TEST AS USUAL AND POWER DOWN THEN UP AT ANY TIME.
THE _PROGRAM SHOULD TYPE 'P'' AND CONTINUE TO RUN FROM TEST 0

IN THE SAME STATE []1.E.

STATE OF RELOCATION] AS

IT WAS BEFCRE

THE POWER WAS INTERRUPTED, HOWEVER IF THE DIAGNOSTIC WAS IN
A MEMORY THAT CAN NOT HOLD DATA WITH THE POWER DOWN THEN THE
PROGRAM WILL

NOT RECOVER

OPERATION IS UNDEF INED.

FROM POWER

FAIL

AND ON POWER-UP

C(ZKMA
MACY11 30A(1052)
O05-MAR-79
. P11
CZKMAF
05-MAR~-79 09:02

(09:02

PAGE

SEQ 0015

776
777

778
779

780
781
782
783
784
785
786
787
788
789
790

791
792
793
794
795
796
797

(9.0

PROGRAM DESCRIPTION

[9.1]

NARRATIVE FLOW (HART
THE

TEST

LOADED

INTO LOCATIONS

0000 -

7744 BUT

EXPANDS DEPENDING ON HOW MUCH MEMORY IS UNDER TEST.
SEE STEP 6. BELOW FOR A DETAILED EXPLANATION.

THE FOLLOWING NARRATIVE FLOW CHART DESCRIBES MAJOR
PROGRAM OPERATION.
FOR THE PERSON WHO NEEDS DETAIL THE
TAG ASSOCIATED WITH THE OPERATION IS GIVEN IN BRACKETS.
FOR THIS DISCUSSION SWITCH SETTINGS ARE
ASSUMED ENABLED.

IGNORED

[START]

[TSTRP]
SAVE DATA FRCM LOCATIONS 0-376
INTO 7744-10314.

AND EVERYTHING

PRINT '‘CZKMAF'' TIT_E

(TSTRP]

TEST LOCATIONS 0-376 BY WRITING AND

EXPLICIT

TESTING OF

[SLFSIZ]

SIZE MEMORY BY WRITING INTO SUCCEEDING

READING 1°'S AND O0'S.

NOTE

THESE

MEMORY LOCATIONS UNTIL

THIS

THE

LOCATIONS.

ONLY

TIMEQUT TRAP TO 4 OCCURS,

OR 30K BOUNDARY REACHED.

SgABLE MEMORY MANAGEMENT AND SIZE MEMORY ABOVE
K.

NOTE :

%g ggDER XXDP CHAIN MODE

ety Quir usiry
Gt P
i

O~NONN
S W

IN 30K SYSTEM,

(TYPSIZ]

TYPE MEMORY TEST LIMITS.

[SETSTK]

SPACE

IS SAVED AT THE END OF

FOR AN ERROR HISTORY.

FOR EACH 4K BANK

IN THE FOLLOWING FORMAT:

THE

SYSTEM

!'BIT1S
!BIT13
!BIT11
!BITO9
!'BITQ7
!BITOS
!'BITO3
!BITO1

IF GREATER THAN 4K UNDER TEST THE ABSOLUTE LOADER
(300 ADDRESSES) 1S APPENDED.
IF GREATER THAN 4K

AND (WDER XXDP CHAIN MODE
ARE AFPENDED TO THE TEST.

SIZED

TEST

18 BYTES ARE

!ADR ERR!PAR ERR!

!BIT14
'8IT12
!8IT10
!81T08
!B8IT06
!BIT04
!BITO2
!BITO0

5376 (OCTAL) ADDRESSES
THIS SAVES THE XXDP

SAVED

(ZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF .P11
05-MAR-79 09:02

832
ggz

09:02

PAGE

SEQ 0016

MONITOR, AND ALLOWS THE LOCATIONS OCCUPIED BY XXDP
TO BE TESTED.

835
836
837
838
328

[CLRMEM]
CALL 'PARITY'' ROUTINE AND IF SELECTED,
ENABLE ALL PARITY MODULES.
‘'PARMAP'' [LOC. 352]
CONTAINS A MAP OF PARITY MODULES FOUND.
IF
MODULE 172336 BIT 15 IS SET, IF #172334 FOUND BIT 14
IS SET ETC..

gz;

[CLRMEM]

gzz

(CONT]

845
329

10.

[TSTO]
EXECUTE
DESCRIPTIONS.

848
849
850
851

11.

[TSTSCP]
(OMES HERE AFTER EACH TEST AND IF
CNTRL=C TYPED THEN GO TO ERROR HISTORY FRINTOUT.
IF SR=2000 THEN HALT
IF SR=40000 THEN LOOP ON TEST DEFINED BY <3:0>

854
ggg

12.

[TST1-TST12]
EXECUTE TST1-TST12 EACH TIME
GOING TG STEP 9.

857
858
859
86(
861
862
ggz

15.

[TST13]
TEST 13 IS DIFFERENT FROM TESTS 0~12,
BECAUSE IT IS A SMALL PROGRAM ACTUALLY RUNNING
IN THE MEMORY UNDER TEST.
BEFORE THIS SMALL
PROGRAM IS STARTED ''TST13 BNK XX'* IS TYPED.
THIS IS DONE IN CASE THE PROGRAM FAILS . THE
USER CAN THEN AT LEAST TELL WHICH BANK OF MEMORY
“AILED.

865

14.

[RELOC]

gg%

866

(LEAR MEMORY (URRENTLY UNDER TEST
DISPATCH TO TSTO

TEST

SEE SECTION 10 FOR TEST

ELSE CONTINUE TO NEXT TEST.

867
868

TO TEST

THE PROGRAM RELOCATES TO HIGH MEMORY

THE LOCATIONS

IT OCCUPIES.

(430-ENDPRG).

WHERE "ENDPRG'' IS THE CONTENTS OF ENDSTK[306].
1.6 THE LAST PROGRAM ADDRESS.
NOTE 'REL''
IS

ggg

PRINTED JUST PRIOR

TO THE

ACTUAL RELGCATION.

&71
g;g

1S.

87«

16.

17.

880

18.[TSTMM]

IF MEMORY MANAGEMENT SELECTED AND AVAILABLE,

883

19. [CONTMM]

CALL “UPMM'* TO UPDATE MEMORY MANAGEMENT

887

20.

REPEAT STEPS 18 + 19 UNTIL ALL

g;g
g;g

gg;

884
ggz

TESTS 0-13 ARE RUN AS DESCRIBED ABOVE EXCEPT
ONLY BANK O LCCATIONS 430-ENDPRG ARE TESTED.
[PELOER]

RELOCATE

[LOWER]

MEMORY .

HISTORY.

THE PROGRAM BACK

CONTROL-C

TYPED GO PRIN

TU LOWER

ERROR

RUN TESTS 0-13 ON THE FIRST 24K SLICE ABOVE 28K.

PAR REGISTERS TO POINT TO THE NEXT 24K SLJCE OF
UPPER MEMORY.

[MAXADR]

(ZKMA
MACY11 30A(1052)
OS-MAR-79
CZKMAF P11
05-MAR-79 09:02

ggg

09:02

PAGE

SEQ 0017

MEMORY ABOVE 28K IS TESTED.

gg?

21.

[ENDPAS]

892
893
894
895
896
ggg

22.

[$EOP]
DISABLE PARITY MODULES.
PRINT *PASS#XX''

(9.23

ggg

PRINT ERROR HISTORY OF FAILING BITS

TEST TITLES
SEE

THE

TEST HEADINGS

IN THE LISTING FOR DETAILS ON FACH TEST.

901
902
903
904
5
906

TEST
TEST
TEST
TEST
TEST
TEST

908
909

TEST 7: SHIFTING DIAGONAL
TEST 10: READ RECOVERY GALLOPING TEST THRGUGH EVERY 64TH CELL

907

TEST 6:

910
91
31%

914

g}g

10.0]

939

940
941

942

VOLATILITY TEST

RxXDP & ACT11 & APT OPERATION
RXDP CHAIN MODE
-

OPERATION IS IDENTICAL TO STAND ALONE EXCEPT:

922
923
924
925
926
3%;

934
935
936
g§g

CELLS®

TEST 11: READ RECOVERY LONG GALL.OPING/FAST GALLOPING TEST
TEST 12: WORST CASE TESTING FOR CORE MEMORY
TEST 13: WRITE RECOVERY TEST

917
918
919
35?

929
930
931
g%%

O: TEST FOR PROPER BANK SELECTION
1: CHECK DATI/DATO LINES
2: TEST MEMORY FOR HOLDING DATA AND BYTE SELECTION
3: DUAL ADDRESS TEST A
4: DUAL ADDRESS TEST B
5: MARCHING 1°S AND 0'S

1.
2.
3.
4.
5.
@@

NO ''CZKMAF'' TITLE IS PRINTED.
NO TEST 13 PRINTOUTS SUCH AS '‘TST13 BNk 00''.
THE PROGRAM ALWAYS HALTS ON ERROR.
AT THE END OF TEST (SENDAD) CONTROL IS RETURNED TO
THE _RXDP CHAIN MONITOR VIA LOCATION &42.
IF 30k SYSTEM ONLY 28K WILL BE TESTED IN XXDP CHAIN MODE

ACT11
-=---

OPERATION IS
1.
2.
3.

IDENTICAL

TO STAND ALONE EXCEPT:

NO PRINTOUTS EXCEPT ERROR PRINTOUTS.
THE PROGRAM ALWAYS HALTS ON ERROR.
AT THE END OF TEST (SENDAD) CONTRGL IS RETURNED TO
THE ACT11 MONITOR VIA LOCATION &2.

APT

-—-

OPERATION IS SIMILAR TO STAAD ALONE EXCEPT:

(ZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 09:02

944
945
946
L7
548
949
950
95

1.
2.
3.
4.

gg%

PAGE

SEQ 0018

THE SOFTWARE SWIT(CH REGISTER BECOMES LOCATION 422 ($SWREG).
AUTO SIZING CAN BE INHIBITED BY SETTING BIT 7 OF BYTE
LOCATION 421 (SENVM).
ALL PRINTOUTS CAN BE INHIBIFED BY SETTING BIT S OF
BYTE LOCATION 421 (SENVM),
ALL ERRORS CAUSE LOCATION 400 (SMSGTY) TQO 8F SET =
000" AND THE PROGRAM HALTS AT LOCATION 6240 (FATHLT).
LOCATION 402 ($FATAL) CONTAINS THE ERROR NO. IN THE

éO#chTE AND THE FAILING MEMORY BANK NO.

954

NOTE:

322
957
958
959

(9:02

.ENDR

YTE.

THE ENVIRONMENTAL MODE BYTE

SHOULD BE

ENVIRONMENTAL BYTE SHOULD BE SET

IN THE HIGH

SET

TO 001.

TO 240 WHILE

THE

SOF TWARE

(ZKMA
MACYT 30A(1052)
05-MAR-79
(ZKMAF P11
05-MAR-79 09:02

360

.ENABL
NLIST

(9:0 2

PAGE 19

SEQ 0019

ABS

MD ,MC,CND

LLIST
LTITLE

ME,BIN,SEQ,LOC
(ZKMA

;*COPYRIGHT ((C) MAR(H 1979

;*DIGITAL EQUIPMENT (ORP.
*MAYNARD MASS. 01754
tPROGRAM BY

DIAGNOSTIC

ENGINEERING

*THIS PROGRAM WAS ASSEMRBLED USING THE PPP-11 MAINDE(C
tPACKAGE (MAINDEC~11-DZQAC-C3), JAN 19, 1977.

160000

S SNR 160000

;sHALT ON ERROR,

;. TRAP CATCHER OF

000240
000042

S COPE

000042
000000

.+2 AND HALT

INHIBIT ERROR TYPOU~

FOR 0-776 LOCATIONS

-NOP

.=42
.SBTTL

LOOP ON TEST,

SYSMA(

.WORD

ACT11

HOOKS

;FOR ACT/XXDP

- t*i1*tt*t*!i***it*l’tl’tt"t'ttttti"ttfittttitttttt'tttt'ttk*l’titt

000046

000052

000C70
000C76

:HOOKS

000044
000046
tNO156
000052
040000
000044
900070
012737
000000

REQUIRED BY ACT11

sszbc-

:SAVE PC

iE»;gAD

::1)SET LCC.46 "O ADDRESS OF SENDAD IN .S$EOP

"WORD

T=$SVPC

000136

000024

P WRDN:

.-70

MOV
HALT

40000
#PWRUP
. 2424

;32)SET LOC.52 TO 4C000
**“RESTORE PC

(ZKMA
MACY11 30A(1052)
O05-MAR-79
C(ZKMAF P11
05~MAR~79 09:02

09:02

PAGE 20

ACT11

HOOKS

St« 0020

1003

1004

838

O 0O NONNE
AN = CV00 N

000104
000112

.=104

013727

000001

000000

GET HERE

BUSER:

MOV

AN [LLEGAL

TRAP TO LOC.

¥l ,HABMSGTY

HALT

4 OCZURRED.

sTELL APT FATAL ERROR#000
:*ERROR*

;114 AND 116 ARE RESERVED FOR PARITY

ROUT:NE "BEGIN''.

000120

TRAP TO LOC.

TRAP VECTORS.

& OCCURRED.

SETUP IN

.=120

D ad

000400

;* WRITE MEMORY BACKGROUND
CH

e o
————

pard b

—

d e

(] elololololololole]

d o

000104

THIS

ROUTINE

THAT

IS USED

TO WRITE

THE

MEMORY BACKGROUND

THE VALUE STORED AT LOCATION BAKPAT.
IS POINTING

THE

LOWEST

LOCATION AND RS

HIGHEST LOCATION TO BE WRITTEN. THE PROGRAM LEAVES THE
SUBROUTINE WITH RO CONTAINING THE CONTENTS OF BAKPAT.

MOV
MOV
MOV
CMP

R4 ,R1
a#BAKPAT RO
RO, (R1) +
R1,RS

;SET R1 TO LOWEST LOCATION UNDER TEST
JLOAD RO WITH THE CONTENTS OF LOCATION BAKPAT
cSTARTING FROM THE LOWEST LOCATION WRITE THE
sMEMORY TO BACK GROUND PATTERN

JRETURN FROM THE SUBROUTINE

000207

000136
000142
000146

013706
012700
060600

000150
000152

004710
000120

000154

000411

000156
000160
000162
000166

004710
000240
000240
000240
000430

;* SERVICE XXDP/ACT11
$ENDAD: JSR
PC. (RO
NOP
NOP
NOP
BR
RESTRT

000176

000176
000000

SWREG:

.=176
.WORD

MR
A SRS

SRS 22202282
2R SRR R TR TR R2222
R T TR R R R ERWRRE R R R R 2
TR TR

00031¢

WRTMEM:
2%:

103775

PWRUP:

013706

MOV
MOV
ADD
JSR
LASCIZ

a#SAVR6, SP
JRESTORE STACK POINTER
#PIITMES-BEGIN,RO
SP,RO
cGET THE INDIRECT ADDRESS OF LOCATION TPCRLF
JRELATIVE TO LOCATION OF DIAGNOSTIC IN THE CORE
PC, (RO
;GO TO THE TYPE ROUTINE AND TYPE (R, LF AND A 'P'
/P/

START

EVEN

"SBTTL

000200

BLO

RTS

000350
006112

000350
7

TO THE

M
o*

000120
000122
000126
000130
000132
000134

010401
013700
010021
020105

THE ROUTINE ASSUMES

JRETURN TO ACT11/XXDP MONITOR
JIF QUICK VERIFY=RESET ELSE NOP
;IF QUICK VERIFY=CLR #-1 ELSE INC #0
s1F QUICK VERIFY=BR .-4 ELSE NOP
JREPEAT TEST UNDER ACT11/xXDP

START AND RESTART ROUTINES

RESTART AT 200 TO CLEAR APT TABLES

START:

MOV

"'tttt"*tt**tfit*fitttttttttfifittfififlttttttit‘llttt'llfilttttttit.lt.

a#SAVRS, SP

JSETUP STACK POINTER

(ZKMA
MACYT1 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 09:02
1059
1060

012703
005043
022703
001374
105737
001011
105737

(09:02

000412

PAGE 21

START

AND RESTART ROUTINES
MOV

1%:

000400

CLR
CMP
BNE

000042

TSTB

H#SUNIT ,R3

-{R3)

#SMA]_ R3
1%
k42
RESTRT

000405

AVSTESTN]

004767
055103

006344
046513

PC,TPCRLF

012704
012703
012305
012306

007744
000346

100406

000060

010600
012746
010046
000002

RESTRT

043101

/ CZKMAF
0/

RESTRT:

#ENDPRG
R4

#SAVRS ,R3
(R3)+,R5
(R3)+,SP
SP.,RO
#340,-(SP)
RO,=(SP)

000340

SEQ 0021
;CLEAR THE APT MAILBOX FROM SMAIL
;CLEAR A MAILBOX LOCATION
:DONE?
JBRANCH [F NO

TO S$DEVC(T

JACT11 MODE?

JBRANCH [F YES
;ARE WE RELOCATED?
;BR IF YES~ SINCE TPCRLF IS RELOCATED ALSOJPRINT TITLE

;LOAD R4 WITH THE ADDRESS OF THE END OF THE PROGRAM
;CAUSE R3 TO POINT TO THE LOCATION SAVRS
JRESTORE RS
JAND RESTORE R6 JUST IN CASE IT IS A RESTART

;PLACE

THE

STARTING ADDRESS OF

;SET HIGH PRIORITY FOR RTI

THE

TEST

IN RO

;GO TO ''START''-MAY BE REL OCATED.

;IF RELOCATED SEE LOCATION SAVR6 FOR START.

.SBTTL

APT PARAMETER BLOCK

SRR AR R A A AN AR AR AN AN R AR AN AAAARAANRAARRANARAARNRARANRNANNNNRNARARORN
NS

:SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT
CBX=.

.=24
200

WNY
=

lelela]
ek o
b o

NN
O ole aNTo RN,

—

—
D rd aed i cond D
d cd md b d )
)
T W W W WS W
P
O WY

1100

000276
000024
000200
000044
000276
000276

::****t*tt*tttttt***ti\k*fittttti*Qt*ttfifi.*'fitfit"'fifii'.'t.."'t'fi

; SAVE CURRENT LOCATION
::SET POWER FAIL TO POINT TO START OF PROGRAM
$:FOR APT START UP
::POINT TO APT INDJRECT ADDRESS PNTR.

.T44
$APTHDR . :POINT TG APT HEADER BLOCK
.= 86X
:*RESET LOCATION COUNTER

AR AR AR AN A AR AR AR R AR A RN RARR R I ANRRNRAARR N AN N AR A ANANNRARRN NN

;SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11
s INTERFACE SPEC.
000000
000400
001440
002260
000000
000024

000405

$SAPTHD:
$HIRTS:
$MBADR:
$TSTM:
$PACTM:
SUNITM:

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

REL-STESTN+1

0
MATL
800.

1200.

DIAGNOSTIC

;. TWO HIGH BITS OF 18 BIT MAILBOX ADDR.
::ADDRESS OF APT MAILBOX (BITS 0-15)
;;RUN TIM OF LONGEST TEST

J;RUN TIME

IN SECS.

. ;ADDITIONAL RUN TIME

1ST PASS ON 1

UNIT

(QUICK VERIFY)

(SECS) OF A PASS FOR EACH ADDITIONAL UNIT

$ETEND-SMAIL/2 ;:LENGTH MA]LSOX-ETABLE (WORDS)

JIT WILL BE_O IF THE PROGRAM IS IN THE (OWER
JCORE. BIT 7 OF THE BYTE WILL BE SET IF THE

L olo RNTe JV, F RPN ET &2V, 1. - ENT, XV,
NN
=

000275

000277

omwo\hbww—aoomwmmbwmaoog NI
WA
=

S
S
QD QT e
QI W
QRO (S
RS Y
QT
O
W
AN
I
B

o R I

) e md ) D b ) ) d e e

OO)V&

) de

R
T

— de

000276

000277

09:02
PAGE 22
APT PARAMETER BLOCK

SEQ 0027

;PROGRAM IS IN A RELOCATED STATE AND BiT 5

;WILL BE SET IF PARITY BITS ARE BEING TESTED

$APTHD
MMAVA:

TYP_.NB.

JTHIS BYTE IS USED TO DETERMINE
JMANAGEMENT IS AVAILABLE OR NOT

.=MMAVA+1

000300

0C9301

000300

000301

$PRERR:

$ADERR:

.=TYPENRB+1

JTHIS BYTE [S USED TO DETERMINE IF
;TYPE

OUT

THE

ERROR HAS BEEN ENABLED OR NOT

cTHIS BYTE DETERMINES
;A PARITY ERROR

$PRERR+1

MEMORY

THE

PROGRAM HAS

;THIS BYTE

IS USED TO DETERMINE

;LOWER BYTE

FOUND

THE

;PROGRAM HAS ENCOUNTERED ADDRESS ERROR

WU S

d ) ) ) ) D D ) D D ) e ) ) d =D - e d b D ) o D D D o D i ) ed D d D —

SR G

MACY1T 30A(1052)
05-MAR-79
CZKMA
P11
CZKMAF
0S-MAR-79 09:02

000302
000304
000306

000302

000304

000306

STRIDI:
:
L OWBNK
PASFLG:

$ADERR+1

.=STRTDI+2
. “LOWBNK
+?2

THIS WORD GiVES

THE

PASS NUMBER FOR

sTHE SPECIFIC TEST WHEREAS THE UPPER BYTE
sHAS BEEN USED BY DIFFERENT TEST FOR DIFFFRENT PURPOSES
000310
000312
00031¢

000314

000315

000310

000312
000314
000

ENDSTK:

PBNK :

DECWRD:
TYPCNT:

.=PASFLG+?2

.SENDSTK+?2

JHOLDS BANK UNDER TEST FOR °'TST BNK XX'' PRINTOUT.

.=DECWRD+2

.RYTE

;THIS BYTE

DETERMINES

;T0 BE TYPED

THE NUMBER OF

WORDS

000

SAVKRB:
EVE
.EVEN

_BYTE

cTHIS LOCATION IS USED
;HIT BY THE OPERATOR

177560

177560
177562
177564
177566
177572
.WORD

377

;BACKGROUND PATTERN WRITTEN TO MEMORY.

,WORD
BEGIN-50

000316

000377

TKS=
$KBB=
$TPS=
$1PB=
SRO=
BAKPAT:

000320
000322

000000
000430

SWAPAT:
RELBOT:

177562
177564

177566
177572

)

JHOLDS LOWEST

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

TO SAVE

THE

CHARACTER

TEST ADDRESS WHEN RELOCATED.

R A NANNANRN AR AR R R RRRNNN

JLOCATIONS TO BE MODIFIED IF LIMITS SET BY OPERATOR

000324
0U0326

000000
000000

LOWTWO:
LOWADD:

000330

000000

HIGHTWO:

0
0

JHOLDS BITS 17:16 OF LOW TEST ADDRESS
;HOLDS BITS 15:0 OF LOW TEST ADDRESS

JHOLDS BITS

17:16 OF

HIGH

TEST ADDRESS

—

— e d d e d D e
d e
D ed D e d d D D d e
d =D d b
—I-‘—l—‘—l—l—‘—l-—l-—l—l_‘—‘—l—l—l—l—l-—‘_‘_‘—‘—l—l —

O O O 0 0000
00 (O 00 00 00 00 00 00 ~ ~J ~J ~J ~J N ~J~J ~

(ZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF .P11
05-MAR-79 09:02

000332

037776

(09:02

APT

PAGE

PARAMETER BLOCK

HIGHADD :

SEQ 0023

37776

JHOLDS BITS

15:0 OF

HIGH

TEST ADDRESS

B R
R N
R
I

000334
000336

000000
017776

$HIMAX:
SMAXM:

O
17776

000340

000000

MAXMEM:

_WORD

000342
000344
000346

000000
000000
000000

SAVMAX:
SAVR4:

_WORD
,WORD

000350
000352
000354
000356
000360

000500
000000
000000
000000
000000

SAVR6:

SAVRS:

JHOLDS BITS
JHOLDS BITS
JMAXIMUM CURRENT

VIRTUAL

17:16 OF MAXIMUM AVAILABLE MEMORY
15:0 OF MAXIMUM AVAILABLE MEMORY

MEMORY UNDER

TEST

_WORD

;* SAVRG POINTS TO WHERE THE PROGRAM STARTS EVEN WHEN RELOCATED.

PARMAP:

SAVLOC:
PARSP:

PARPS:

.WORD

0
0

BEGIN
;SAVE

;MAP OF

. CONTAINS START ADDRESS WHEN RELOCATED ALSO.

PARITY MODULES UNDER

TEST.

;TEST 6 STORES ERROR INFO HERE
SP DURING PARITY ERROR TRAP.

:SAVE PSW DURING PARITY ERROR TRAP,
;NOTE-PARSP +PARPS ARE NEEDED SINCE

THERE

;1S NOT ENOUGH ROOM ON THE STACK (500-452) AND
;S0 THE STACK MUST BE RESET IN THE PARERR ROUTINE.
;IN THIS CRUDE FASHION.

;*364-400 IS USED AS A STACK AREA BY ERRCHK ROUTINE FOR ERROR HISTORY PRINTOUT

(ZKMA
MACY11 30A(1052)
O05-MAR-79
CZKMAF P11
05-MAR-79 09:02
1196

00040C

09:02

PAGE 24

APT PARAMETER BLOCK

.SBTTL

SEQ 0024

400

APT MAILBOX-ETABLE

.'"tttttfifitt.tttttttttfitt'ttttttt'.ttt.ttt"tttt'ttt.'t‘.Q..'Q.ttt

000416
000420
000420
000421
000422
000424
000426

000000
000000
000000
000000
000000
000000
000000

000000
000
n00
000000
00C000
000000

AENV
AENVM
ASWREG
AUSWR
ACPUOP

*
2

’

AMSGTY
AFATAL
ATESTN
APASS
ADEV(CT
AUNIT
AMSGAD
AMSGL
G

B
%

000430
000431

000
000

$MAMS1: .BYTE

$SMTYP1:

.BYTE

AMAMS1
AMTYP1

. %

®
b1

COUNT

;.DEVICE COUNT
;:1/0 UNIT NUMBER
; sMESSAGE ADDRESS
; MESSAGE LENGTH
;.APT ENVIRONMENT TASBLE
. ;ENVIRONMENT BYTE
. ENVIRONMENT MODE BITS

;.APT

SWITCH REGISTER

JsUSER SWITCHES
;. CPU TYPE ,OPTIONS

BITS 15-11=CPU TYPE
11/04=01,11/05=02,11/20=03,11/40=04,11/45 05
BIT 1 10=REAL TIME CLOCK
BIT
O9=FLOATING POINT PROCESSOK
BIT
8=MEMORY MANAGEMENT

;.HIGH ADDRESS.,M.S. BYTE
;;MEM. TYPE ,BLKA
MEM_ TYPE BYTE
~-=(HIGH BYTE)

500 NSEC MOS=003

AMADR1

;sHIGH ADDRESS.BLKA

SMAMS?: _BYTE
$MTYP2: .BYTE
$MADRZ: .WORD
sMAMS3: .BYTE
$MTYP3: .BYTE
$MADR3: _WORD
$MAMSS: BYTE
SMTYPS: .BYTE
$MADRS: . WORD
$ETEND:

AMAMS
2
AMTYP?2
AMADR?2
AMAMS
3
AMTYP3
AMADR3
AMAMS4
AMTYP4
AMADR4

;;HIGH ADDRES
. M.S.
S

. W

000
000000

;. TEST NUMBER

;. PASS

.WORD

DR1:

000446

;;MESSAGE TYPE CODE

;;FATAL ERROR NUMBER

900 NSEC CORE=001
300 NSEC BIPOLAR=002

]

1238

;s APT MAJLBOX

11/70-06,PDQ=07,Q=10

1209
1210
1211
1212
1213
1214
1215
1216
1217
1218
1219
1220
1221
1222
1223

000400
000402
000404
000406
000410
000412
000414

1202
1203
1204
1205
1206
1207
1208

.EVEN
SMAIL:
tMSGTY: .WORD
$FATAL: .WORD
$TESTN: .WORD
$PASS:
.WORD
$DEVCT: .WORD
SUNIT:
_WORD
$MSGAD: .WORD
$MSGLG: .WORD
:
$ETABLE
$ENV:
.BYTE
$ENVM:
_BYTE
$SWREG: .WORD
$USWR:
.WORD
$CPUCP. .WORD

MEM_LAST ADDR.=3 BYTES,THIS WORD AND LOW OF

;;MEM.TYPE ,BLK#?

BYTE

;cMEM.LAST ADDRESS.,BLK#?

;;HIGH ADDRESS ,M.S.BYTE

;s MEM. TYPE ,BLKA3

;sMEM.LAST ADDRESS.BLK#3

;;HIGH ADDRESS.M.S.BYTE

,BLK#4
EM.
TYPE
J;M
;:MEM.LAST ADDRESS.BLK#4

MEXIT

'.'Qt'tfi'tfi"fittlttttitttttfl!tttttltt.tQt."t'..t".fitt.tt."'t.t'

"SBTTL

BEGIN OF AREA TESTED (+20) WHEN PROGRAM RELOCATES.

‘‘TYPE'' ABOVE

(ZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR=79 09:02

1264
1245
1266
1247
1248

m 2
(09:02
PAGE 25
BEGIN OF AREA TESTED (+20) WHEN PROGRAM RELOCATES.

SEQ 0025

'.'tttttfi*itttltttt't*ttttt'tttttttttt'fitfit'tt'tttittitttt*'ttt*t.

000450

177570

éUR:

177570

000500

000500
010706

BEGIN:

MOV

PC,SP

137
MOV
MOV

-(SP)

000502
000504

005746
010637
012737
005037
005037
012700
012710
060720
012710
105737
100002

000350
000070
000300
000314
000114
005504

CLR
CLR

MOV
MOV
ADD

000340
000405

000167

000614

005737
001402
000167
012704
012700
010037
005001
012124
020127

000406

103774

000024

MOV
1ST8
BPL
JMP

:
ONEPAS

000430
007744
000377
000316

TSTRP:

2%:

000400

005741
01001

3%:

4%:

020011
001403

004767
000001
000300
001370
005701
001365
012701
014441
005701
001375
012700
012710
012740

005777
000404
022626
012737
105737

.=500

005334
6%:

;CHANGES TO SWREG IF NO HARDWARE SWITCH REGISTER
sSET UP STACK POINTER TO EQUAL BEGIN ADDRESS

SP ,a#SAVR6

#PWRDN,
a# 24

a#SPRERR
M TYPCNT
#114 RO

8%:

000006
000340
000700
177552
000176

000420

000450

4%:

5%:

¢PREPARE

TO SETUP PARITY

POWER DOWN

#340, (RO)

a#REL
ONEPAS

TRAP VECTOR

;AND PSW OF 340
;1S THIS CODE RELOCATED?
JBRANCH [F NO

TSTREL

;THIS CODE

BHSPASS

;1S THIS THE FIRST PASS?
JBRANCH IF YES (TEST TRAP CATCHER ADDRESSES)
; GET THE TEST SIZE
;LOAD R4 WITH THE ADDRESS OF TKE END OF THE PROGRAM

IS RELOCATED SO GET

TEST

SIZE.

TST
BEQ
JMP
MOV
MOV
MOV
CLR
MOV
CMP
BLO
TST
MOV

RO, (R1)

CMP
BEQ

RO, (R1)
6%

sCHECK THE TRAP VECTORS FOR THE CAPABILITY
;OF HOLDING 0'S & 1°'S
. 1S THE DATA 0K?
JBRANCH IF YES

JSR

PC,FATERR

;*ERROR* RFPORT

TSTRP

SETSTK
#ENDPRG

#377.,R0
g?,a#anPAr

(R1)+,(R4)+
R1,ASMAIL

2%
=(R1)

;SAVE FROM 0000 TO BEGIN-30 AT END OF PROGRAM FOR NOW
JPREPARE

TO TEST

;xxxwxxERROR

THE

TRAP VECTORS

ERROR MESSAGE AND HALT AT

NUMBER

Txawnnnx

FATHLT

SWAB

BNE

MOV
MOV
TST

SETSWR: MoV

2%:

FOR ANY FUTURE

H#PARERR-.-6
(RO)
,
PC,(RO)+
;TO PARERR

TST

000400

;SAVE SP FOR FUTURE LUSE

;PREPARE

MOV
MoV
TST

BR
CMP
MOv
TSTB

;IF WE HAVE NOT REACHED THE LOWEST MEMORY LOCATION
;THEN REPEAT FROM 3%

R1
8%
#6,R0
#340, (RO)
#4%,-(RO)
dSWR

JRFSTORE

TRAP CATCHER ETC.

;SET UP TIME OUT TRAP PSW

JAND THE RETURN ADDRESS

(SP)+,{SP)+

;DOES THE SWITCH REGISTER POINTED BY SWR EXIST ?
;BRANCH [F YES
JRESTORE THE STACK POINTER

ANSENV

;DESIGNED FOR THE COMPUTERS NOT HAVING HARDWARE
;SWITCH REGISTER AND RUNNING STAND ALONE
sRUNNING UNDER APT?

#SWREG,
3 SWR

JAND PLACE

THE ADDRESS OF

THE

SWITCH REGISTER

CZKMA
MACY11 30A(1052)
05-MAR=79
CZKMAF P11
05-MAR=-79 09:02

000714
000716

001403
012737

000422

=0V NOWNBWN=O

D
d
b

(N
G

d
b

S
U

S (N

012703
013737
013737
105737
10C021

000340
000330
000332
000421

012701

000451
000004

162701
105711

~N WN

T QI

WININWWWWIWWIWN
N ANIONNY b e o nd

NN =

DANAAARRERRPRRRRER

cad
e

VSN

= OO0 NN

e
d wd =
)
d
b
b e ek
b

BEGIN OF AREA TESTED
BEQ

MOV

(+20) WHEN PROGRAM RELOCATES.

APTS1Z

#SSWREG,3¥#SWR

;BRANCH IF

;SET SWR ‘EQUAL

SEQ 0026

TO APT SWITCH REGISTER.

;APTSIZ= THIS ROUTINE WILL SEARCH THE APT MEMORY ETABLE AND WHEN
A NON ZEKO TYPE 15 FOUND WILL SETUP TO TEST TO GIVEN HIGH ADDRESS.

001006
020127
101371

1340

PAGE 26

000450

1301
1302
1303
1304
1305
1306

09:02

005166

004767
004767
000464

006324
006320

032777
001C60

000100

010401
012710
011111
062701
022701
101372

001046
001052
001054
001062
001064
001070

005737
001410
023737
001404
162701
000401

IF APT DEFINES SIZE

;
;

IF BLOCK 4 (OR 3,2,1) TYPE NON ZERO THEN GET APT HIGH ADDRESS AND EXIT.
ELSE
SEND ¢RROR #3

APTSIZ:

MOV
MOV

#MAXMEM, RS
:POINT R3 TO MAXMEM.
SMHIGHTWO, a#$HIMAX
;IN CASE NO SELF

TSTB
8PL

S4SENVM
TRYSR

:DOES APT ALLOW SELF
*BRANCH IF YES

MOV
SUB
TSTB

BNE
cMP
BHI

ASMTYP4+4 R
#4 R1
(R1)
2$
R1,4SMTYP]
1%

:POINT R1 TO BLOCK TYPE 4(+4)
:POINT R1 TO NEXT BLOCK TYPE.
:1S THE BLUCK TYPE NON ZERO?
:BRANCH IF YES (MEMORY EXISTS)
SAIL APT BLOCK TYPES BEEN CHECKED?
SBRANCH IF NO

JSR

PC,FATERR

2s:

JSR

PC.GETADR

:GO SET MAXIMUM APT ADDRESS INTO SMAXM + $HIMAX

BRTPSZ:

TYPSIZ

TRYSR:

BIT

#100,3SWR

SLFSIZ:

MOV
MOV

R4 ,R1
#4$, (RO)

ADD

#2 R1

MOV

001072

2s:

000002
170000

000042
010000

JSR

BNE

MOV

000046

TST

5%
L2, N46
5%
glOOOO.R1

SIZING DONE.

SIZING?

ERROR MESSAGE AND HALT AT FATHLT
2tannax

:GO SET MAXIMUM APT ADDRESS
TYPE

THE

BRANCH IF

INTO HIGHADD+HIGHTWO

SIZE OF MEMURY UNDER

;USER DEF INED MEMORY

TYPE.

$IN CASE NO SELF SIZING DONE.

:*ERROR* REPORT

TYPSiZ

(R1). (RD)

TESTS ARE RUN REGARDLESS OF MEMORY

JexxxsxERROR NUMBER

PC.GETADR

n1?oooo R1

BEQ
(MP
BEQ
ggB

IGNORED SINCE ALL

@4HIGHADD . 3#SMAXM

CMP

BHI

000042

TO ETABLE FORMAT)

THE MEMORY TYPF

1%:

177426

THE LOW TEST ADDRESS MUST=00000.(DUE

;NOTE;

000431

004767
000002

001024
001026
001032
001034
001040
001044

000334
000336

YES

TEST

TEST BOUNDARIES??

(DON'T SIZE MEMORY)

;SETUP R1 AND R4 TO THE LOWEST ADDRESS OF MEMORY
$SET UP RETURN ADDRESS FROM TIME OUT TRAP TO 4%

;WRITE A MEMORY LOCATION INTG ITSELF AND TRAP [F NXM

:ADD 2 TO THE ADDRESS POINTER

:CHECK IF BEYOND 30K MEMORY BOUNDARY

:KEEP ON SIZING UP THE MEMORY UNTIL NXM TRAP
s (TIME OUT TRAP) IS ENCOUNTERED

;OR 30K BOUNDARY REACHED
;IF NOT XXDP

:
.
:
;

THEN CONTINUE
ELSE IF NOT XXDP CHAINING
THEN CONT INUE
ELSE SET MAX. MEM. AT 28K

(ZKMA
MACYT 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 09: 02

022626
004767
001100

gw
28 Vel
ERES
REELEE
~

NWNWN

—J—l—l—)-—l—l—l_._‘_.l_.—l

J\bgwm

004767

024343
004767

004767
004767
004767
000055

004767
0127C3
004767

) o
d

d
-

—

8%:

160000

001144

012701

6%:

001120
020000

005730

005743
005043
005043
012720
010403

5%:

000276

nNOSOON

OO
NN—l—lg

b
d e

Shar har
g

b
—

383883

105737
001416
012710
012701
000745
022626
022701

Y
A

005764

001005
013702
004767
000762
024341

33 888

SI3TEELER 55

1361

001104

B 3
(09:02
PAGE 27
BEGIN OF AREA TESTED (+20) WHEN PROGRAM RELOCATES.

005302
002374
022737
001002
062704
010437
005021
020104
101775
012737
005723
001005
021327

TST8B

asMMAVA

BEQ

MOV

MOV
BR
cMp
cMP

MoV

JRESTORE STACK PCINTER

12%
172352
,R2

JSR

PC,PUTADR

006064

MP
JSR

PC,PUTADR

TST

000104

TYPSIZ:

-(R3)
-(R3)
-(R3)

MoV

#LCWTWO
,R1
PC,PCRLF
PC,OCTTYP
PC.STYPE
/=/

005524
000330
006116

SETSTK: MOV
JSR

4%:

-(R3) ,~(R3)

#BUSER, (RO) +

TYPMEM:

000022

PC,MMREG

MOV
MOV

000324
005370
005536
005272

JSR
JSR
JSR
LASCIZ
.EVEN
JSR

PC,OCTTYP

#HiGHTWO,R3

PC.$GTSIZ

MoV

R4 ,R1

ADD

#18. R4

;BEGIN CHECKING MEMORY ABOVE 28K

;IF R1

;PREPARE

157776
170000

5%:
6%:

000340

#18. R4
R4, QHENDSTK
(R1)+
R1.R4
6%

THE LOCATIONS POINTED BY

~0 UPDATE EMORY MANAGEMENT REGISTERS

;OTHERWISE GO TO UPDATE MEM.

MANG.

REGISTERS

;CAUSE R3 TO POINT TO LOCATION SMAXM AND R1
;7O

THE MAXIMUM AVAILABLE MEMORY

2GO TO THE SUBROUTINE TC PLACE THE ADDRESS IN R1
;AT LOCATIONS $MAXM AND $HIMAX

;MAKE R3 POINT TO HIGHADD

;PLACE THE ADDRESS IN R1 AT LOCATIONS HIGHADD
JAND HIGHTWO
;CLEAR THE LOCATION LOWADD
AND LOWTWO
sSET UP VECTOR FOR ANY FUTURE TRAP

;SET R3 TO POINT TO THE (LOWEST AVAILABLE MEMORY
;LOCATION

;TYPE CR/LF
;T¥$EELQN“TEST ADDRESSE

;TYPE

HIGHEST

(LOWTWO+LOWADD)

TEST ADDRESS

(HIGHTWO+HIGHADD)

;MAKE R3 POINT TO THE HIGH ORDER BITS OF TOP ADDRESS
; GET TME BITS 13-17 OF THE TOP ADDRESS

;PLACED

:SET R1

IN BITS 0-4 OF

TO LOWEST TEST ADDRESS

;APPEND THE ERROR STACK FOR THE MEMORY UNDER
TO THE

END OF

R2
3
g167776.a#$MAXM JCHECK IF THIS
;BRANCH IF NOT

000336

000022
000310

DID NOT READ ALL

;PAGE ADDRESS REGISTER 6 THEN IT HAS REACHED THE
sMAXIMUM AVAILABLE MEMORY
;IN WHICH CASE GO TO 12%

sTEST

167776

STACK POINTER

(SP)+,(SP)+
#160000,R1

006072

CLR
CLR

THE

; SERVICE MEMORY MANAGEMENT IF [T IS AVAII ABLE
JAND IF IT HAS TO BE TESTED
;SEE IF MEMORY MANAGEMENT HAS TO BE TESTED
o IF NO MEM, MANG. THEN GO TO 12%

sSET UP THE RETURN ADDRESS FROM TRAP TO 8%

6%
=(R3),=(R1)

12%:

JRESTORE

12%
#8%, (RO)
420000,R1

JSR
BR
CMP

010401

062704

PC.MEMING

BNE

172352

(SP)+,(SP)+

CMP
JSR

SEQ 0027

THE

PROGRAM

IS A 30K SYSTEM

s SAVE ANOTHER BANKS WORTH OF ERROR STACK
;SAVE THE ADDRESS OF THE END OF THE ERROR STA(K
;CLEAR THE ERROR STACK

#157776, J4MAXMEM
;SET MAXMEM TO MAXIMUM VIRTUAL ADDRESS
(R3
UoR
;TESTING MEMORY MANAGEMENT?
:BRANCH IF YES (GO SAVE LOADERS AT TOP OF VIRTUAL MEMORY
(RS),#T?OOOO
:1S THE VIRTUAL ADDRESS ABOVE 1677762

CZKMA
MACY11 30A(1052)
O5-MAR-79
CZKMAF .P11
05-MAR-79 09:02
16412
16413
1414

001306
021310

16417
1418
12;8

001314
001320
001322

103002
071363

19:02
PAGE 28
BEGIN OF AREA TESTED
BHIS
MOV

000002

(+20) WHEN PROGRAM RELOCATES.

SAVLDR
(R3),2(R3)

}2}2

004767
005723
011305

006100

001324
001330

020527
103416

017776

1426
1427
1428
1429
1430

001332
001336
001342
001344
001352

162705
005737
(01406
023737
001402

000276
000042

001354
001360

162705
012524

1433
1434
1435
}2;;

001362
001364
001366
001370

020513
101775
012323
010423

1438
1439
1440
1641
1442
1443
1444
1445
1446
1447
1448
1449
1450

001372
001376
001402
001404
001471C

010537
004767
005745
012703
005723

001412
001414

001003
021327

001420
001422
001430
001432

103411
032777
001003
004767

001436

000003

1453
1454

001440
0014446

000167
020423

1457
1458
1459
16460
1461
1462
1463
1464
1465
1466
1467

001446
001450
001454
001456
001460
_
001462
001464
001466
001472
001474

103002
016304
005723
001003
021305
.
101001
011305
105737
100014
013704

}222

JBRANCH IF YES (GO SAVE LOADERS)
JOTHERWISE MAKE THE CONTENTS OF LOCATION MAXMEM
;EQUAL TO THE MAXIMUM AVAILABLE MEMORY

SAVLDR:

JSR
TST
MOV

PC,CLRMM
(R3)+
(R3) ,RS

; DISABLE THE MEMORY MANAGEMENT UNIT
JMAKE R3 TO POINT TO THE LOCATION MAXMEM

;RS CONTAINS THE ADDRESS OF MAXIMUM AVAILABLE MEM.

:IF ONLY 4K BEING TESTED DON'T SAVE LOADERS

1423
12%2

gzg;

SEQ 0028

JAND FALL INTO SAVE LOADERS.

}23;

1431
16432

000042

3%:
000046

005376

2%:
4%

000246
006016

000405
00032¢

SuB
TST
BEQ
CMP
BEQ

#276,RS
a2
2%
G2, 46
2%

JPREPARE TO SAVE 300 BYTES OF THE LOADERS
;IF RUNNING UNDER XXDP
;
THEN CONTINUE
;
ELSE IF NOT UNDER XXDP CHAIN MODE
.
THEN CONTINUE

R5, (R3)
2%
(R3)+, (R3)+
R4, (R3)+

;SAVE THE CONTENTS OF LOCATION MAXMEM [N SAVMAX
AND THE CONTENTS OF R4 AT SAVR4

SUB
MOV

CMP
BLOS
MOV
MOV

17702C

#<1502.%2>-276 ,R5
:
(RS5)+, (R&) +
;SAVE LOADER

RS, a#SAVRS
PC,CLRMM
~(RS)
#LOWTWO,R3
(R3)+
2$
(R3) 4157776

8LO
BIT
BNE
JSR
3

48
410000, aSWR
3s
PC,FATERR

3%:
($:

JMP
CMP

TSTMM
R4, (R3)+

6%:

BHIS
MOV
TST
BNE
(MP

63
-2(R3) ,Ré
(R3)+
8s
(R3),RS

BHI
MoV
TSTR

8%
(R3),RS
MREL

7%:

(004530

177776

;ONLY TESTING 4K MAX?
JBRANCH IF YFS (DON'T SAVE LOADERS)

BNE
cMp

°57776

003512

RS, 417776
48

TSTREL: MOV
TSTSIZ: JSR
TST
1%:
MOV
TST

000324

(010000

CMP
BLO

§$:

BPL
MoV

108
A#RELBOT R4

ELSE SAVE 1500. WORDS FOR XXDP CHAIN MODE

;SAVE HIGHEST VIRTUAL ADDRESS+2
;GO TO DISABLE MEMORY MANAGEMENT UNIT
;SET RS BACK TO HIGHEST VIRTUAL ADDRESS
;PREPARE TO LOAD R4 AND RS WITH THE MEMORY BOUNDRIES
JIF THE BITS 16,17 OF THE LOWEST LOCATION UNDER
;TEST ARE NON ZERO
:THEN GO TO 2%
;IF THE LOWEST LOCATION UNDER TEST IS HIGHER THAN
;157776 THEN GO TO TEST MEMURY MANAGEMEN]

;1S MEMORY MANAGEMENT SELECTFD?
JYES ALL IS WELL
;*ERROR* REPORT
ERROR MESSAGE AND HALT AT FATHLT

;xxxxxxERROR NUMBER 3xxxexs

;GO TO TEST MEMORY MANAGEMENT
;COMPARE TOP OF PROGRAM (WITH SAVED LOADERS)

JLOWEST LOCATION UNDER TEST

;JADJUST R4 TO POINT TO THE LOWEST LOCATION UNDER TEST
JIF BITS 16=17 OF HIGHEST LOCATION TO BE TESTED
JARE NON ZERO THEN GO TO 8%
;OTHERWISE SEE IF THE HIGHEST LOCATION TO BE
JTESTED IS HIGHER THAN HIGHEST VIRTUAL ADDRESS
;1F SO THEN GO TO 8%
:MODIFY RS
JARE WE RELOCATED.?
;BRANCH IF NO
;SET BOTTOM TEST ADDRESS WHEN RELOCATED,

(ZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 09:02
1468
1469
1470
1471
1472
1473
1474

1475
1476

1477

1478
1479
1480
1481
1482
1483
1484
1485
1486
1487
1488
1489
1490
149
1492
1493
1494
1495
1496

001500
001504
001506

020527
103402
012705

001512
001514
001516
001522

020405
103403
004767
000004

001524
001530
001532

012703
011343
062713

001536

017776

9% :

004444

0C0002

CMP

RS, 417776

BLO

017776

00042

09:02
PAGE 29
BEGIN OF AREA TESTED (+20) WJHEN PROGRAM RELOCATES.
JARE WE RELOCATED IN BANK 0?

MOV

#17776,R5

;BRANCH IF YES

<
BLO

R4 RS
108
PC,FATERR

1S LOW LIMIT LOWER THAN HIGH LIMIT?
;BRANCH ]F YES

JSR

10%:

MOV
MOV
MEMTST: ADC

#SAVMAX ,R3
(R3) ,-(R3)
¥2,(R3)

JELSE SET HIGH MEMORY UNDER TEST=4K

;s *ERROR* REPORT
JennxnxFRROR

TST

(RS)+

ERROR MESSAGE AND HALT AT FATHLT

NUMBER

4aanxan

;RESTORE THE CONTENTS OF MAXMEM
;néfiSR;HEQCONTENTS OF MAXMEM - MAXIMUM AVAILABLE
;

005725

SEQ 0029

JAND SET R5=MAX MEMORY+Z2

;CLEAR MEMORY UNDER TEST
001540
001542
001544
001546
001550
001554
001560
001564
001566

001570
001574

010500
05040
020004
101375
012702
004767
012702
n; 2212
U6C312
012702
D4 l732

CLRMEM: MOV
2%:
CLR

RS.RO
-(RO)

Bg.Ré

JUNTIL THE B0TTOM IS REACHED

MOV

;1,R2

;SET R2 TO ENABLE PARITY MODULE CODE.

527

000001
005740
000316

JSR
MOV
QOXB

PC,PARITY
#BAKPAT
,R2
ggg;*.(RZ)

MOV

aSWR ,R?

176654
177760

BIC

#177760,R2

1497

JMOVE HIGH ADDRESS TO RO
sBEGIN CLEARING THE MEMORY FROM THE

JENABLE PARITY

TOP

IF WANTED AND AVAILABLE.

;WRITE SWAPPED BAKPAT [N LOCATION SWAPAT
JLOAD R2 WITH THE OPTIONS STORED AT $SWREG

JONLY LEAVE THE LOWER 4 BITS OF $SWREG IN R2 TO GO TO

sTHE

TEST # SPECIFIED

[DEFAULT

TEST#0]

1498
1499

W= OV

WN—=OD

PORNONON)
= o e b =D ed ek d b
(=

)
b ed
)
D
md
D
el md ad
D
cd
) e
—

IV IV IV LV TV AT IV AV IV, IV, IV, 1V

JENTER HERE FROM TSTSCP ROUTINE AT END OF SUBTEST
001600
001604

005037

001610
001612

010401
010400

001614
001616
001620
001622

010403
006302
060702
066207

001626
001630

110237

000102
000340
000440
000550
001016
001126
001274
001430
001654

000306
000404

CONT:

C(CLR
MOVB

A¥PASFLG
R2,Q¥STESTN

JINIT SUBTEST PASS FLAG.
JSET UP STESTN WITH THE TEST NUMBER GOING

LOOP:

MOV
MOV

R4 R1
R4 RO

sLOAD R1 WITH THE LOWEST LOCATION UNDER TEST
sPLACE THE ADDRESS OF THE LOWEST LOCATION UNDER

MOV
ASL
ADD

R4 ,R3
R2
PC,R2

000004

ADD

TBL:

TBL=-. (R2) ,PC

TSTO-TBL
TST1-1BL

TST2-TBL
TST3-TRL
TST4-TBL
TSTS-TBL

TST6-TBL
TST7-TBL
TST10-TBL

;TO BE EXECUTED

JTEST IN RO

JAND [N R3

;GO TO THE TEST #

;STORED IN BITS 0-3 OF SWITCH REGISTER
JRELATIVE ADDRESS OF
;RELATIVE ADDRESS OF

sRELATIVE
JRELATIVE
;RELATIVE
sRELATIVE

ADDRESS
ADDRESS
ADDRESS
ADDRESS

OF
OF
OF
OF

;RELATIVE ADDRESS OF
JRELATIVE ADDRESS OF
JRELATIVE ADDRESS Of

TEST # 0
TEST # 1

TEST
TEST
TEST
TEST

#
#
#
#

2
3
&
S

TEST # 6
TEST # 7

TFST # 1C

(ZKMA
MACY11 30A(1052)
O05-MAR-79
CZKMAF P11
05-MAR-79 09:02
1524
1525
1526
}ggg

001650
001652
001654
001656

002204
002256
002530
003156

09:02
PAGE
BEGIN OF

30
AREA TESTED
TST11=-18L
TST12-18L
TST13-18L
RELOC-TRL

(+20) WHEN PROGRAM RELOCATES.
JRELATIVE
JRELATIVE
JRELATIVE
JRELATIVE

ADDRESS
ADDRESS
APDRESS
ADDRESS

SEQ 0030
OF

TEST # 11

OF TEST # 12
OF TEST # 13
OF ROUTINE 'RELOC'

1529

1530
1531
1532

;RS IS POINTING TO THE TOP GF THE MEMORY TO BE TESTID+?2
;R4 € RO ARE POINTING TO THE LOWES1 ADDRFSS OF MEMORY TO BE

TESTED

(09:02

PAGE 31

SCOPE ROUTINE

SFQ 0031

SCOPE ROUT INE

X%
¥
¥

SR
S

¥
*

TO THIS RGUTINE AFTER (OMPLETION OF

EACH

TEST AND

IF CNTRL=C TYPED GOTO ERROR HISTORY TVPE ROUTINE.
IF SR- 2000 (BIT10) THEN HALT
IF SR= 40000 (BIT14) THEN LOOP ON TEST DEFINED BY SR BITS<3:0>
ELSE CONTINUE TO NEXT TEST.

PROGRAM COMES

(ZKMA
MACYT1 30A(1052)
05-MAR-79
C7KMAF P11
05-MAR-79 09:02

1545

1546

1547

1549

001660
001664

001666

001672

105737
001002

004767

113702

000420

006002
000404

552
553
p) 56
55

001676
001702
001710
001712

005237
032777
001401
000000

00041C
002000

557
558
559
560

001714
001722
001724
001726

032777
001332
105202
000724

040000

TSTSCP:

TSTB
SNE
JSR

CNTSCP: MovBs
INC

176540

BIT

SWHALT:

176526

TSTGO:

BEQ

HALT

BIT
BNE
INCB
BR

IYSENYV
CNTSCP

PC,CHECKC

S¥STESTN,R2
SMSDEVCT
#2000,3SwR
TSTGO

JARE WE RUNNING UNDER APT?

;IF SO THEN GO TO CNTS(P
;TEST FOR CONTROL-C AND IF

sSINCE THERE ARE LESS THAN 377 TESTS UPPER BYTE

;OF R2 WILL BE O
sTELL APT WE ARE STILL RUNNING OKAY

;IS Tht PROGRAM GOING TQ HALT AFTER EACH TEST?
;IF NOT

THEN GO TO 2%

JHALT AT END OF

#40000,aSwR
LOOP
R2
CONT

TYPED GO

JPRINT ERROR HISTORY AND HALT AT FATHLT.
JPLACE THE TEST NUMBER IN THE LOWER BYTE

TEST

SWITCH SET.

;1S THE PROGRAM GOING TO LOOP ON TEST
;iF SO THEN GO TO THE STARTING OF THE SAME
;GO TO CONT AND CONTINUE EXECUTING THE NEXT

TEST
TEST

(ZKMA

MACYT11 30A(1052)
05-MAR-79
CZKMAF , P11
05-MAR-79 09:02

TEST FOR PROPER BANK SELECTION

SEQ 003¢

M t*.ttttt'ifittii*tttttfi!’ititfit"Qtttttittfitt'ti*'!ttt.t*ttti'tfli

s (D)
{

* %

0 (2)
<
®x

1+ (3)
t

001730
001734
001736
001742

001403
004767
000005

001744
001750
001752
001754
001756
001760
001762
001764

012703
010401
010310
020001
001417
005711
001430
020311

001766
001770

001004
012767

105737

7570

004224

TSTB

BEQ
JSR

177777

1%:

2%:

MOV
MOV
MOV

(MP
BEQ

TST
BEQ

000006

TEST

THIS

FOR PROPER BANK SELECTION
TEST ASSUMES

THAT

THE MEMORY

012767

000042

002006
002010
002014
002016
002020
002022

010046
105237
000407
020311
001411
012767

002030
002032
002034
002040
002042

010046
010300
004767
000000
012600

003570

002044
002050

013706
062701

000350
020000

002054

0004032

000007

000032

CI.E.
THIS

LOCATIONS LIKE 7766 AND 27766 ETC.]

TEST ALSO CHECKS

TO SEF

THAT NONE OF

THE NON EXIST~

ING BANK RESPOND WHEN THEY ARE ADDREtSSED

IHSTESTN

;CHECK FOR PROPER TEST SEQUENCE

PC,SEQERR

;*ERROR* REPORT ERROR MESSAGE AND HA'T AT FATHLT

.+10

;xxaxx*ERROR

#177777
,R3
R4 ,R1

R3, (RO)
RO,R1

3%:

BNE

46,12%

000010

108

MOV

47,12%

INCB

cMP

BEQ

Sawwnnx

;R1 = ADDRESS OF LOWEST LOCATION OF MEMORY UNDER TEST
sSET ALL THE BITS AT (RO)

. 1S RO POINTING TO THE SAME MEMORY LOCATION AS R1
;IN WHICH CASE CHECK FOR ALL 1°'S AT

R3,(R1)

MOV

NUMBER

sOTHERWISE CHECK

cMP

MOV

10 $:

000301

002010

IN A STATE

1'S IN A LOCATION AND CHECKING FOR 0°'5 IN THE SAME
LOCATIONS OF OTHER 4K_BANKS OF THE MEMORY

RO,-(SP)

a#$ADERR
11%
R3,(RD)
5%

MOV

#10,12%

MOV
MOV

RO,-(SP)
R3.R0

(R1)

FOR ALL 0'S

(R1)

s1F R1 IS NOT EQUAL TO RO AND (R1)
;DOES NOT CONTAIN ALL 0'S THEN

;CHECK TO SEE

(RO) = (R1)

;*ERROR* SETUP ERROR NO.
;axxk«*ERROR

001776
002200
002000

OF ALL 0'S AND RO HAS THE ADDRESS OF THE LOWEST
LOCATION UNDER TEST
IT CHECKS FOR PROPER BANK SELECTION BY WRITING

* ttt"*tl’ttttttttitttttttttt**tttttt*tttfi**ttt*t!‘l‘ttitfifit**fitttfl

000404

—

1589
1590
1591
1592
1593
1594
1595
1596
1597
1598
1599
1600
1601

PAGE 32

STEST O

NUMBER

IN 12%

#O0%xwnx

;*ERROR* SETUP ERROR NO. IN 12%
;xnnxxaxfERROR NUMBER #7xvtaxs
;SAVE RO ON STACK
;AN ADDRESSING ERROR IS SUSPECTED
sCHECK (R1) FOR ALL 1'S
;*ERROR* SETUP ERROR NCO. IN 12%
sxxxex*ERROR NUMBER #10%s%wnx

;SAVE RO ON STACK

JSR
. WORD

PC.ERROR

MOV

(SP)~,RO

JRESTORE RO

MOV
ADD

,
a#SAVR6SP
#20000,R1

JRESTORE

THE

020105

CMP

R1.R5

002056

103736

BLO

;CAUSE R1 TO POINT TO THE SAME (HIP
sLOCATION IN THE NEXT 4K BANK OF MEMORY
;BY ADDING 1 TO THE 14TH BIT OF ADDRESS IN R1
;COMPARE R1 WITH THE HIGHEST MEMORY
JLOCATION WHICH IS STORED IN RS
;IF R1 LESS THAN RS THEN REPEAT THE TEST FROM 2%

00206C

105737

TSTB

AN SENVM

JHAS APT

INHIBITED SIZING?

1586
1587
1588

Ny —
AN

1561
1562
1563
1564
1565
1566
1567
1568
1569
1570
1571
1572
1573
1574
1575
1576
1577
1578
1579
1580
1581
1582
1583
1584
1585

09:02

000421

;GO TO THE ERROR SUBROUTINE
JERROR NUMBER TO BE REPORTED WILL BE PLACED HERE
STACK POINTER

(ZKMA
MACY11 30A(1052)
O5-MAR-79
CZKMAF . P11
05-MAR-79 09:02

1617
1618
}g;g

002064
002066
002074

100432
(32777
001026

1621
1622

002076
002102

020127
101016

002104
002110
002112

1623
}ggg

1626
1627

{me
BHI

R1,#157776
6%

;SEE IF R1 HAS CROSSED 28K BOUNDRY OF
;IN WHICH CASE GO TO 6%

020137

000340

CMP

R1,3MMAXMEM

103755
012702
012712
012742

000006
000340
177714

BLO
MoV
Mov
MOV

5%
#6,R2
#340, (R2)
#58-.-6,~(R2)

1635
1636
1637

002140
002144

012702
012722

002150

000011

005012

}gzg

002152

005010

1641

002154

062700

1642
1643

SFG 0033

157776

060712
011111
004767

1638

sBRANCH IF YES (DON'T TEST NON-EXISTENT MEMORY)
sHAS USER INHIBITED SIZING?
;BRANCH [F YES (DON'T TEST NON-EXISTENT MEMORY)

000100

)
175356

33
TEST FOR PROFER BANK SELECTION

8%
#100,aSWR
8%

002116
002122
002126
002130
002132

002136

PAGE

BM]
BIT
BNE

1628
1629
1630
1631
1632

}ggz

09:02
10

004030

000004
000006

8%:
020000

sSHOULD BE LEFT AS IS FOR 30K SYSTEMS (WHICH USE
;AEMSAYngER THAN THE MAXIMUM AVAILABLE
;1F SO THEN GO TO 5%
;JMAKE R2 POINT TO TRAP VECTOR+2 FOR NXM

JSET PSW TO 340
,SET UP RETURN ADDRESS FROM TRAP T0 5%

PC,(R2)
(R1),(R1)
PC,FATERR

sTRY TO WRITE TO NON-EXISTENT MEMORY (SHOULD TRAP)
;*ERROR* REPORT
ERROR MESSAGE AND HALT AT FATHLT

MoV
MOV
CLR

#4 R
#6, (R2)+

JRESTORE

TRAP VECTOR

ADD

#c0000,R0

;CAUSE RO

TO POINT

CLR

(R2)

;anexx*«ERROR NUMBER 17wwxwnx

(RJ)

TO THE

SAME

(HIP

JLOCATION IN THE NEXT 4K MEMORY BANK
;BY ADDING 1 TO THE 14TH BIT OF ADDRESS IN RO

1644

002160

020005

(MP

RO,R5

;COMPARE RO WITH THE HIGHEST MEMORY

1646

002162

103672

BLO

;IF

1645

qug

002164

000635

ENDO:

16K (HI]

ADD
MCV
JSR

6%:

VIRTUAL ADDRESS

TSTSCP

;LOCATION WHICH IS STORED
RO LESS

THEN REPEAT

[N RS.

THE

TEST

(ZKMA
MACY11 30A(1052)
05-MAR-7Y
CZKMAF P11
05-MAR-79 09:02

09:0%
T

PAGE

1650

1651
1652
1653

J*TEST 1

1654

}2?2

002166

122737

000001

1657
1658
1659
}gg?

002174
002176
002202

001403
004767
000012

003764

1662
1663
1664
1665
1666
1667
1668

002204
002210
002212
002214
002216
002220
002224

012700
010002
010011
020011
001403
004767
000013

1671
1672
1673
1674
1675
1676
1677
1678

002226
002230
002232

005702
001406
006300

002234

103366

002236
002240

005002
012700

}2;3

002244

000762

1681
1682

002246
002250

000261
006100

002254

062701

002260
002262
002264

020705
102750
000737

1683
1684
1685
1686

1687
1688
1689

002252

000001

000404

TST1:

18:
2%:
3%:

003404

4%:

177776

34 CHECK Di/D0O LINES
A AR AN R R AR RN A AN AN R RN A AN

Jx(1)
o*

AN AR R R

CMPB

103757
020000

END1:

R R AR RN

AR R RN N RN A

RARRNANR

NN R R

CHECK DI/DO LINMES
THIS TEST CHECKS THE DATI/DATO LINES BY SHiFTING
A 1 IN THE WORD DIRECTION

AN R AR R AR AN

AN N AN RARN N R R

#1,a78TESTN

BEQ
JSR
12

.+10
PC,SEQERR

MoV
mMov
MOV
(MP
BEQ
JSR
13

#1,R0
RO,R2
RO, (R1)
RO, (R1)
4%
PC,ERROR

TST
BEQ
ASL

R2
5%
RO

BCC

CLR
MOV

R2
#177776
,RO

SEC
ROL
BCS

RO
2%

apD

#20000,R1

CMP
BLO
BR

R1.RS
1%
ENDO

BR
5%:

SEQ 0034

R RN E R AN R AR R I RARARANRA R AR NN

;CHECK FOR PROPER TEST SEQUENCE

;*ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLT
Jexexx*ERROR NUMBER 12%wwwen

JSE1 R2-1
;MOV 1 AT LOCATION (R1)
;COMPARE R1 WITH THE CONTENTS OF LOCATION (R1)
s *ERROR* REPORT ERROR MESSAGE
saxxx*+ERROR NUMBER 13#awwx«
JARE WE SHIFTING A O IN DATA DIRECTION?
;IF SO THEN GO TO 5%
sSHIFT THE 1 BROUGHT IN AT 1% IN
;DATA DIRECTION
21F THE 1 HAS NOT BEEN SHIFTED THRU
;THE 16 DATA BITS THEN REPEAT FROM 2%
JINITIATE SHIFTING OF O IN DATA DIRECTION

JSET C BIT
JSHIFT A O 16 TIMES IN DATA DIRECTION
;IF _THE O HAS NOT BEEN SHIFTED THRU
;THE 16 DATA BITS THEN REPEAT FROM 2%
;OTHERWISE GO TO THE NEXT BANK OF
;4K MEMORY AND REPEAT THE TEST

CZKMA
MACYT1 30A(1052)
05-MAR-79
CZKMAF PN
05-MAR-79 0 9:02

NAWNE WO oo~
= OV

PAGE 35
TEST MEMORY FOR HOLDING DATA AND BYTE SELECTION

SEQ 0035

B I
IY

P*TEST

s+ (1)

i
o

;*(2)

;*(3)

TEST MEMORY FOR HOLDING DATA AND BYTE SELECTION
THIS TEST CHECKS THE MEMORY FOR THE CAPABILITY

OF HOLDING 1°'S AND 0°'S BY WRITING A BACKGROUND

OF BAKPAT AND READING IT

MEMORY IS WRITTEN USING A BYTE AT A TLME
STEPS 1

€ 2 ARE REPEATED WITH A SWAPPED BACKGROUND PATTERN

ttttt'*tfi'*ttt*i.tttt*i'ttttttt*tt.ttfi**tttttfitttttfittttt*'tt*i

002266

122737

000002

002274
002276
002302

001403
004767
000014

003664

002304

013700

000316

113721
020105
103771

000317

002322
002324
002526
002332
002336
002340
002342
002344
002350
002354
002360

110021

020041
001416
062701
123741

001402
120041
001002
105237
042701
004767
000015

002372

020104
101356
000337
001744

002374

000733

) —_—
T
N
S S
R
R
Y
SW
I

n
N ~ WN

W
Rt W
JOUN W
e T

NNNNNNNNNNNNNNNYNY NN
olole]

1691
1692
1693
1694
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704
1705
1706

09:02
T2

000404

t§12:

1$:

000002
000317

003250

A2, aHSTESIN

BEQ
JSR
14

.+10
PC,SEQERR

MOV
MOVB

SABAKPAT
, RO
RO, (R1)+

CMP

RO,-(R1®

8EQ
ADD

8%
#2 ,R1

gmga

22.-(R1)

sAGAIN CHECK FOR BYTE SELECTION PROBLEM

mMovB
CMP
BLO
2%:

000301
000001

CMPB

g?gB

;CHECK FOR PROPER TEST SEQUENCE

;*ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLT
;xxxx*xERROR NUMBER 14xaxxxw

WMBAKPAT+1, (R1)+;WRITE THE MEMORY WITH THE WORD STORED IN BAKPAT
R1.R
1%
;TEST THE MEMORY TO SEE
;THE WORD

STORED

2;8AKPAT+1.°(R1).CHECK FOR BYTE

[N BAKPAT

IT CONTAINS

SELECTION PROBLEM

6%:

BIC
JSR
15

INCB

a#$ADERR

sPREPARE

8%:

CMP
8HI

R1,R4
2%

JKEEP ON TESTING THE MEMORY UNTIL
;R1 EQUALS THE LOWEST ADDRESS

END1

000316

SWAR
BEQ

END2:

#1.R1
PC.ERROR

ANBAKPAT
1%

TO INFORM THAT

IS ADDRESSING ERROR

JMAKe THE ADDRESS IN R1 EVEN
; *ERROR* REPORT ERROR MESSAGE
sxxxxxxFRROR NUMBER 15%wnax2

s CHANGE THE DATA PATTERN
;IF THE DATA PATTERN DOES NOT HAVE LOW

. BYTE =0 THEN FALL THRU

sTHE TEST LEAVES BAKPAT LOCATION THE SAME AS IT WAS IN THE BEGINNING

(ZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 09:02

09: 02

PAGE 36
CUAL ADDRESS TEST A

1733

%;?g

'TEST 3

1736
1737
1738
1739
1740
1741
1742

};2;

1749

1750

1751
1752
1753
1754
1755
1756
1757
1758
1759
1760
1761
1762
1763
1764
1765
1766
1767
1768
1769
1770

1771
1772
1773
1774
1775
1776
1777
1778
1779
1780
1781
1782
1783
1784
1785
1786
1787
1788

Q02376
002404
002406

002412

002414

002416

122737
001403
004767

000016

005003

004727

002422
002424
002426
002430
(002432
Q02434
002436

005002
050302
020204
103465
020205
103077
000312

002440
002442
002444
002446
002450
002452
002454
(002456
002460

005001
050301
020104
103445
020105
103053
020102
001431
020011

002462

001437

000003

7%:

002472
002474
002476

010046
000316
022611

002500

001003

002502

012767

000020

002510
002514
002516

105237
010046
010200

000301

004767
000000
012600

2%:

4%:
6%:

012767

000017

AN AR R AN R R RN RR

AR RN RN

;*(2)
M
;% (3)
Jx(4)
;*(5)

CMPRB
B8EQ
JSR

#3,I48TESTN
L+
PC,SEQERR

CLR

JSR

000014
0% :

22%:

PC,a#WRTMEM

CLR
BIS
CMP
BLO
(MP
BHIS
SWAB

R2
R3,R2
R2 R4
16%
R2,RS
20%
(R2)

CLR
BIS
CMP
8L0
CMP
BHIS
Mo
BEQ
tme

R1
R3,.R1
R1.R4
12%
R1,RS
15%
R1,R2
10%
RO, (RT)

BEQ

000032
8%:

003104

AR AN AR AR R RN

THIS TEST CHECKS FOR DUAL ADDRESSING PROBLEMS BY WRITING A
BACK GROUND OF BAKPAT,
STARTING FROM THE LOWEST LOCATION IN THE BANK THE TEST WRITES A
LOCATION WITH SWAPPED BAKPAT
READS THE MEMORY FOR PROPER CONTENTS
SHIFTS A 1 ALONG THE ADDRESS DIRECTION AND REPEATS STEPS 1-3
REPEATS STEP 1-4 FOR EACH 4K BANK

000120

SEQ 0036

1ttttittttttltfitt*tttttt kttttttttttttttttttttttttttttt.tfittttt*t

TST3:

003554

002464

002520
002524
002526

000404

DUAL ADDRESS TEST A
Jx(1)
o

1743

17644
1745
1746

R AN AR R AN AR R AR AR PR AN AR

12%

MOV

#17,22%

MOV
SWAR
(MP

RO -(5P)
{SP)
(SP)* (R1)

BNE

MOV

#20,22%

INCB
MoV
MOV

a#$ADERR
RO,-{SP)
RZ,R0O

JSR
.WORD
MOV

PC,ERROR

(SP)+,R0O

;CHECK FOR PROPER TEST SEQUENCE
;*ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLT

sxxxxx*ERROR NUMBER 16%%xn.«
;

WRITE MEMORY WITH THE BACKGNOUND STORED

;AT LOCATION BAKPAT

JMAKE R2 POINT TO YHE MEMORY BANK POINTED BY R3
;IF R2 IS LESS THAN R4
;s THEN DO NOTHING
JIF R2 IS HIGHCR THAN THE HIGHEST LUCATION TO BF
JTESTED THEN EXIT THE TEST
;OTHERWISE WRITE THE COMFLEMENT OF BAKPAT [N

o THE LOCATION POINTED BY R2

JIF R1 IS POINTING TO A LOCATION LOWER THAN R&
JTHEN GO TO 12%
y
;CHECK THE MEMORY FOR CORRECT DATA
JIF RT IS NOT = TO Re THEN (R1) SHOULD HAVE
s THE SAME WORD AS BAKFAT
JIN WHICH CASE GO BACK TO 12%
;*ERROR* SETUP ERROR NO. IN 22%
;araraxERROR NUMBER #17%nwnws
JPLACE RO ON THE STACK

JIF (R1) IS NOT = RO THEN SEE IF IT IS SAME
;AS A SWAPPED RO
JIF NOT THEN A SUSPECTED DUAL ADDRESSING PROBLEM
;FOR THE BITS THAT ARE DIFFERENT IN RO AND (R1)
sOTHERWISE THERE [S DUAL ADDRESSING FOR THE
ENT]IRE WORD
;s *ERROR* SETUP ERROR NO. IN 22%
sanaxaxERROR NUIBER #20%xznns
;ADDRESSING +~ROBLEM IS DETECTED
;SAVE RO
;SET RO-GOOD ADDRESS FOR ERKOR REPORT
;G0 TO THE ERROR SUBROUTINE
sERROR NUMBEK TO BE RFPORTED WILL BE PLACED HERE
JRESI1ORE RO

CZKMA
MACY1T 30A(1052)
05-MAR-79
CZKMAF
. P11
05-MAR-79 09:02

G- G
Qi

D ed
D

)
)
b
-

putr Q- Qi S

NN
NS W)=

00 00 00 Oc 00 00 00 0o 0o

001411

000316

000407
000300
020011
001404
012767

10%:

000021

00074¢
000300
C40301

005701

001001
005201
006101
020127
103720
000312
040302

005702
001001
005202
006102
020227

PAGE 37

17774¢

020000

[
X}

010011
020037

——

1789
1790
1791
1792
1793
1794
1795
1796
1797
1798
1799
1800
1801
1802
1803

(9:02

13%:
15%:

16%:

020000

18%:

103700

060203
020237
103673

000337
001656

000654

20%:

END3:

SEQ 0037

MOV
CMP

RO, (R1)
RO . R4BAKPAT

;IF THE CONTNOL CAME HERE FROM 15%-2 THEN

Swas

(MP

118
RO
RO, (R7)

JRETURN TO 118
;MAKE RO SAME AS SWAPPED BAKPAT
;IF R1 = R2 THEN (R1) SHOULD CONTAIN A WORD

BEQ

118

;IN WHICH CASE GO BACK TO 11$%
;*ERROR* SETUP ERROR NO. IN 22%

BEQ
BR

12$

MoV

#21,22%

8k
SWAB
BIC
TST
BNE
INC
ROL
CMP
8LO

SWAB

RZ,R1
R1
13%
R1

R1
R1,#2000C
7$
(R2)

BIC

R3,R2

TST

R2
18%
R2
R2
'
R2,#2C000

8NE
INC
ROL

CMP

8LO
ADD
CMP

000340
000316

DUAL ADDRESS TEST A

BLC

SWAB

BEQ

R2,R3

R3,a4#MAXM-M

4%
QHBAKPAT
TST3

END2

JRESTORE

;EQUAL

(R1)

TO SWAPPED RO

srwsxa*ERROR NUMBER #271xxnanx

;AND GO TO 8S$

JRESTORE RO

TO BAKPAT

;TAKE OUT THE BANK ADDRESS FROM THE ADDRESS IN R1

;1F R1

IS O THEN PLACE A 1

JIF R1

IS LESS THAN A 4K BOUNDRY

;OTHERWISE GO TO 13%

IN R1

: THEN REPEAT FROM /%

JRESTORE

(R2)

TO BAKPAT

;TAKE OUT THE BANK ADDRESS FROM THE ADDRESS

;STORED IN R2
;IF R2 = 0 THEN MOVE A 1 "0 R2
;OTHERWISE GO TO 18%

sSHIFT A ONE IN THE ADDRESS WORD
:é? ZEE ADDRESS IN R2 MORE THAN THE BOUNDRY

;IF NGI THEN GO TO 68
;OTHERWISE MAKE R3 POINT TO THE NEXT 4K BANK
;1IF R3 IS POINTING TO A BANK THAT IS LOWER
: THAN MAXMEM

;THEN REPEAT FROM 4$
JREPEAT

THE

TEST WITH SWAPPED BAKPAT

;THE LOWER BYTE OF BAKPAT IS O
3.

ONLY

(ZKMA
MACY11 30A€1052)
05-MAR-79
CZKMAF .P11
05~-MAR-79 09:02

09:02
T4

PAGE

1826

1827
1328
1829
1830

J*TEST 4

RN AN

002644
002652
002654
002660

122737
001403
004767
000022

1837
1838
1839
1840
1841
1842
1843

002662
002664
002666
002670
002672
002674
002676

005003
010100
005703
001401

1846
1847

002702
002704

020041
001405

105237

000301

1850
}gg;

002712
002716

004767
000023

002712

1853
1854
1855
1856
1857
1858
1859
1860
1861
1862
1863
1864

002720
002722
002726
002730
002732
002734
002736
002740
002746
002750

010100
162700
005703
001401
005100
020104
101361
112737
005103
001345

002752

000733

002700

002706

;*(1)
i

1832
1833
1834
}g%g

1%2%

AR AR

]

1831

;gzg

38
DUAL ADDRESS TEST 8

000004

000404

TST4:

003306

1%:

005100
010021
020105

2%:

103771

R AR R

4%:

000002

5%:
000001

000306

END4:

AR AR

R NNN AR RN AR ANR R R RN AR RN RN R RN RS

AR AN R R AR AR AR NR RN

CLR
MOV
TST
BEQ

R3
Ri.RO
R3
2%
RO
RO, (R1)+
R1,R5

CMP
BEQ
INCB

SEQ 0038

DUAL ADDRESS TEST B
THIS TEST CHECKS FOR DUAL ADDRESSING BY WRITING
AND READING THE ADDRESS IN THE LOCATION AND THEN
WRITING AND READING ADDRESS COMPLEMENT

#4 ,QNSTESTN
.+10
PC,SEQERR

CoM
MOV
cMP

AN AR RN AR RA R AR

CMPS
BEQ
JSR
22

BLO

3$:

AN AR

RO.-(R1)
48

a#SADERR

JSR
23

PC,ERROR

MOV
sus
TST
BEQ
coM
CMP
BHI
MOVB
com
BNE

R1.RO
#2,R0
R3
5%
RO
R1,R4
.38
#1,Q4PASFLG
R3
1%

END3

A NN AR

A AR ANAARRA R NN NN R AN RN

sCHECK FOR PROPER TEST SEQUENCE

;*ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLT
sx%xxxxERROR NUMBER 22%swxnx

;IF R3 IS NOT O THEN STORE THE ADDRESS
;IN THE LOCATION
;OTHERWISE STORE COMPLEMENT
;OF THE ADDRESS
JUNTIL THE HIGHEST MEMORY LOCATION IS REACHED
;CHECK THE LOCATION FOR THE CORRECT CONTENTS

;é?{spégepggBABLY ADDRESS PROBLEM RATHER THAN
L
;
;*ERROR* REPORT ERROR MESSAGE
saxnaxxERROR NUMBER 23xwwwus

’

;CHECK THAT THE ADDRESS IS STOREC AT

;LOCATION IF R3 IS NOT O
;OTHERWISE CHECK FOR
;ADDRESS COMPLEMENT
¢SET PASFLG FOR ERROR REPORT.
;COMPLEMENT THE CONTENTS OF R3
;REPEAT TST3 IF R3, IS NON O, ENABLING ADDRESS
;COMPLEMENT TO BE WRITTEN AND READ, OTHERWISE FALL

THRU

(ZKMA

MACY11

CZKMAF P17

30A(1052)

O05-MAR-79

05-MAR=-79 09:02

09:02
15

PAGE 39

MARCHING 1°'S AND 0'S

SEQ 0039

1866

":'fittt"'.'.Q*Qfifi.tfit.t"'t*'fittfl***tfi.i*..fi"t'tt"i..t.fittt'tti

1867
1868
1869
1870
1871
1872
1873
1874
1875
1876
}g;g

TRTEST §

1879

.'"'ttttttfittt**tt**ttt'titt.fittt.ttt*l‘lifi*'t*tttfi'ti*'tt*t'filittt

}gg?

002754

122737

000005

1882
1883

002762
002764

001403
004767

003176

1886

002772

004737

000120

1888

002776

}ggg

1887

002770

000024

020041

1889
1890
133}

003000
003002
003006

001403
004767
000025

1893

003010

000300

1896
1897
1898

003016
003020
003024

001403
004767
000026

1901

003026

000300

1903
1904
}382

003030

001023

1894
1895

133
1902

003012
003014

000404

TSTS:

THE WORD STORED

AT BAKPAT.

READS EVERY LOCATION FOR CORRECT DATA, SWAPS BYTES
AT THE LOCATION AND PROCEEDS IN MAX. TO MIN
DIRECTION OF MEMORY LOCATIONS.
READS EVERY LOCATION FOR SWAPPED BAKPAT PATTERN
WRITES BAKPAT BACKGROUND IN THE LOCATION AND PROCEEDS
IN
MIN. TO MAX. DIRECTION
REPEATS STEP 2 GOING IN MIN. TO MAX. DIRECTION
REPEATS STEP 3 GOING IN MAX. TO MIN. DIRECTION

#5.a#STESTN

;CHECK FOR PROPER TEST SEQUENCE

BEQ
JSR

.+10
PC,SEQERR

:*ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLT

JSR

PC ., a#WRTMEM

2%:

cMP

RO,~-(R1)

3s:

002604

MARCHING 1°'S AND 0'S
THIS TEST WRITES A BACK GROUND OF

CMPB

002622

010011
021100

;#(1)
‘e
‘x(2)
t
‘e
:x(3)
‘e
ix
ix(4)
ix(5)

BEQ
JSR
25

SWAB

MOV
cMP

3$
PC.ERROR

RO. (R1)
(R1).,RY

BEQ
JSR
26

4$:

SWAB

BNE

4$
PC, ERROR

‘xaxaxaERROR NUMBER 24w awxw

:GO TO WRITE THE MEMORY WITH A BACKGROUND OF THE
*READ THE CONTENTS OF LOCATION POINTED BY R1

*WORD STORCD IN BAKPAT

“TO SEE IF IT HAS THE SAME VALUE AS RO
*ERROR* REPORT ERROR MESSAGE
‘xaxaxaERROR NUMBER 25%%x#ux

;SWAP THE BYTES AT (R1)
*READ (R1) FOR CORRECT VALUE
;: *ERROR* REPORT ERROR MESSAGE
txaxaxsERROR NUMBER 26%*xexx

:SWAP THE BYTES OF

THE REGISTER

. CONTAINING BACKGROUND PATTERN
*IF

THE LOWER BYTE OF

THE REGISTER

1S NOT O THEN THE PROGRAM IS READING
*THE MEMORY TO CONTAIN A BACK GROUND OF

%998;

;BAKPAT AND WRITING THE SWAPPED WORD

13?3

;IN WHICH CASE GO TO 9%

1911

1912

19013

1914
1915

1916
1917

003032
.

003034
003036

}g}g

003042

1920

003044

1921

003046

005703

:R3 WAS O WHEN THE PROGRAM ENTERED

*THIS TEST, AND IT IS NOT ALTERED UNTIL PASFLG=3

“IF R3 EQUAL O THEN T4E PROGRAM IS

001023
062701

020105

103006

020011

0000C?

6%:

BNE
ADD

0%
#2.R1

*READING/WRITING MIN. TO MAX. OTHERWISE
“IT IS GOING IN MAX. TO MIN. DIRECTION
*IF R3 IS NOT CLEAR THEN GO TO 108
*OTHERWISF ADD 2 TO THE CONTEN"S OF R1

CMP

R1.RS

‘é?"¢§§§ES1 WITH THE MAX. MEMORY LOCATION O

BHIS

*1F R1>RS THEN GO TO 8% OTHERWISE

CMP

RO, (R1)

"READ

(R1)

FOR THE CORRECT DATA

CZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 09:02

1922
1923
1924
1925
1926
1927
1928
1929
1930
1931
1932
1933
1934
1935
1936
1937
1938
1936
1940
1641
1942

1942
1944

1945
1946
1947
1948
1649
1950
194

003050

001757

003052
003056

004767
000027

003060
003062
003066
003070

000753
001742

003072
003074
003076

005103
010401
000763

003100
003102

005703
001353

105237
000300

003104

020104

003106
003110
003114
003116

101333
105237
000300
00173

003120

006714

(09:02
TS

B
PAGE 40
MARCHING 1°'S AND 0°'S

002552

000306
*

BEQ

JSR

PC,ERROR

BR
INCB

SWAB
BEQ

3s
Q#PASFLG
RO
2%

COM

27
8%:

MOV

9%:

10%:

000306

END5:

TST

BNE

R4 R

cMp

R1.R4

BHI
INCB
SWAB
BEQ

2%
@#PASFLG
RO
7%

END4

4
SEQ 0040

; WRITE COMPLEMENT OF

THE DATA FOUND AT (R1)

;AND REPEAT UNTIL R1 > RS
s *ERROR* REPORT ERROR MESSAGE
;eanxxafERROR

NUMBER

27%xtnxn

;1F THE LOWER BYTE OF RO IS ALL 0'S
;THEN BEGIN READING BAKPAT SWAPPED WRITING BAKPAT
;JAND READING BAKPAT GOING FROM MAX. TO MIN.[PASFLG=4]
;OTHERWISE CLEAR RO

;PUT THE LOWEST TESTING ADDRESS IN R1

JAND BEGIN READING 0°'S, WRITING 1°S AND

JREADING 1°'S IN MIN. TO MAX. DIRECTION [PASFLG=3]

;IF R3 IS NON O, I.E. PASFLG=3

;THEN READ BAKPAT,

WRITE

; SWAPPED BAKPAT AND READ SWAPPED BAKPAT
sIN MIN. TO MAX. DIRECTION
;OTHERWISE TEST IS PROCEEDING IN MAX. TO

¢MIN.

DIRECTION.

;KEEP ON LOOPING UNTIL R1=R4

;IF RO SWAPPED HAS LOWER BYTE-0
;THEN READ BAKPAT

SWAPPED,

WRITE

JAND READ BAKPAT GOING FROM MIN.

BAKPAT,

TC MAX.

(ZKMA

MACY11 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-7G 09:02

09:02

1952
1953
1954
1655
1956
1957
1958

16
PCRANRA NAR

Jx(2)
o

;x(3)
L
T
Y

. %

;v (4)

(% (5)

LI}

* W

1964

1971
1972
1973
1974
1975
1976
1977
1978
1979
1980
1981

CELLS"
:*(1)

1962
1963

J*(6)

003122

122737

000006

003130
003132
003136

001403
004767
000030

003140

000404

—4
.

SRR

376:

SEQ 0041

AR AR AN AR AAR AN RN RARANRAN AR

S*TEST 6

1959
1960
1961

1965
1966
1967
1968
1969
1970

PAGE 41
CELLS" VOLATILITY TEST

THIS

AN RN AN AN

N AR

AR AR

RN KR

VOLATILITY TEST

TEST WRITES

WITH PASFLG=0 THE

THE MEMORY WITH A BACK GROUND OF

TEST READS THE MEMORY FOR BAKPAT

AND THEN INCREMENTS PASFLG

IT THEN READS/SWAPS BYTES/WRITES A LOCATION X FOR
OVER 2 MSEC AND THEN READS THE MEMORY FOR BAKPAT
REPEATS STEP 3 WITH X=X+4K UNTIL END OF MEMORY IS ENCOUNTERED
IT THEN INCREMENTS PASFLG AND WRITES THE MEMORY TO

BAKPAT AND WITH PASFLG=2 IT READS MEMORY FOR ALL
SWAPPED BAKPAT AFTER WHICH PASFLG IS INCREMENTED 10 3
REPEATS STEPS 3 AND 4 READING THE MEMORY FOR SWAPPED
BAKPAT INSTEAD OF BAKPAT.

RRAAN A AN AN

RARNNAN

AN AN NRANRAN AN RAN

ARNNANANRANAARNNNRNR NN RN

(MP8

#6,NSTESTN

003030

BEQ
JSR
30

PC,SEQERR

004737

000120

JSR

PC,#WRTMEM

003144
003150
003152
003154

005037
010403
010401
020011

000306

CLR
MOV
MOV

R4 ,R3

;SET R3

003164

004767
000031

002444

PC,ERROR

;*ERROR* REPORT ERROR MESSAGE
;arxxxexFRROR

NUMBER

062701
020105

000002

#2,R1

JINCREMENT R1

BY 2

BITB
BNE
INCB

g;,afiPASFLG

JCHECK TO SEE IF PASFLG=0 OR 2

a#PASFLG

;IN WHICH CASE

CMP
BHIS

g%,RS

;JSEE

?3%?76.R2

JWRITE

003156
003160
023166
003172
003174

001403

103767
132737
001002
105237

N00001

012702
000313
005302
001375
010357
062703

000744

105237

000337
001732
000721

4%:

000306

020305

103012

(MP
BEQ
JSR

5%:

937776

6%:

000354
020000

000306
000316

ADD
CMP
BLO

MOV
SWAB

DEC
BNE

MOV
ADD

7%:

END6:

B8R
INCB
SWAB
BEQ
BR

BAKPAT

.+10

cCHECK FOR PROPER

;*ERROR*

REPORT

;annxxxERROR

Q#PASFLG
R4 ,R1
2g,(R1)

g;.RS

R3,a#SAVLOC

#20000,R3
28

a#FASFLG
A#BAKPAT
RPT6

ENDS

TEST

SEQUENCE

ERROR MESSAGE

NUMBER

AND HALT

FATHLT

30xnraxwn

;GO TO WRITE THE MEMORY WITH A BACKGROUND Of
JWORD STORED AT LOCATION BAKPAT

THE

JAND R1 TO THE STARTING ADDRESS OF MEMORY UNDER TEST
;CHECK (R1) FOR CORRECT DATA
31wxtanax

;SEE IF R1 HAS REACHED THE MAX. OF MEMORY

INCREMENT PASFLG COUNTER BY

IF R3 HAS REACHED THE MAX. OF
INTO 1

LOC FOR >2MS

(ABOUT

THE MEMORY
100MS)

;SAVE LOCATION WRITTEN FOR 2MS FOR ERROR REPORT.

JBY ADDING 1 TO THE 14TH ADDRESS BIT CAUSE
JR3 TO POINT TO A LOCATION IN THE NEXT
4K BANK OF

MEMORY

JMAKE PASFLG=?
s JF BAKPAT IS NOT BEING SWAPPED FOR THE
s THEN GO BACK TO THE LQCATION RPT6

ZND

(ZKMA
MA(Y11 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 09:02

2007
2008
2009
2010
201
2012
2013
2014
2015
2016
2017

<018
2019
2020
2021
2022

2023

2024
2025
2026
2027
2028
2029

2030
2031
2032
2033
2034
2035

2036

2037
2038
2039
2040

(9: 02

PAGE 42

SHIFTING DIAGONAL

SEQ 0042

* QQ*ttttt*'tt'tt*t.t*itQttt'fittfitt**ttttttttfifit"*ttttttt*tt"tt

S+TEST

SHIFTING DIAGONAL
Jx(1)

THIS

1x(3)
,~(4)

READS THE MEMORY FOR CORRECT DATA
SHIFTS THE DIAGONAL AND REPEATS STEP 3 UNTIL THE
DIAGONAL HAS BEEN SHIFTED 64 TIMES
WRITES A BACKGROUND OF SWAPPED BAKPAT, A DIAGONAL OF
BAKPAT AND REPEATS FROM STEP 3

1x(2)
- %

:*(S)
122737

000007

003264
003266
003272

001402
004767
000032

002674

003274
003300

005037
010337

000306
000304

003304
003306
003312
003314
003316
003320
003322

010302
052702
005202
001402
020502
103001
010502

003324

010337

000302

003330

013701

000304

013700
020103
001010
062703
032703
001402
062703
000300

000316

132737

003372
003374

001001
01001

003376

0206011

000404

1877:

CMPB

H7,QHSTESTN

BEQ
JSR

PC,SEQERR

2%:

CLR

MoV
MoV

017777

3%:
(%:

81S
INC
BEQ
CMP
BHIS

QWPASFLG
R3. a#L OWBNK

R3,R2
#17777 ,R2

BAKPAT

SWAPPED BAKPAT THROUGH EACH MEMORY BANK

MOV

6%:

000306

R3,#STRTDI

#1,a4PASFLG

12%
RC, (RT)
12%:

001403
004767
000033

003410
003414
003416
003420

062701
020102

000002

005237

000410

RO, (R1)
BEQ

002222

ADD

16%:

CMP
BLO
INC

;LOWBNK CONTAINS ADDRESS OF

THE LOWEST LOCATION

sIN THE 4K BANK THAT CAN BE TESTED

:igDC?NTAINS THE ADDRESS OF THE TOP OF THE BANK
IT

TO NEXT BANK

;IF R2 IS GREATER THAN RS THEN GO TO 4%
;NOW R2 CONTAINS THE ADDRESS OF THE HIGHEST LOCATION

8%
#200,R3
RO

10%:

;*ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLT
;*#xax«ERROR NUMBER 32+wxwxw

TO POINT

AMBAKPAT
,RO
R1,R3
108
#2,R3
#4176 ,R3

8%:

sCHECK FOR PROPER TEST SEQUENCE

*BRANCH IF ZERO (IT MUST BE A 30K SYSTEM)

a#L OWBNK ,R1

000200
000001

.+10

MOV

000002
000176

003400
003402
003406

103746

THE MEMORY WITH A BACKGROUND OF

. tttitfittttitttttt*t**tt‘it*tttt*fikttttttt*tt*ttt*tttttttitttttt

003256

003364

TEST WRITES

IT WRITES A DIAGONAL OF

s THAT

CAN BE

TESTED

;LOAD STRTDI WITH THE STARTING ADDRESS OF
s DIAGONAL

THE

;R1 IS NOW POINTING TO THE LOWEST LOCATION IN THE 4K
:BANK

;STORE THE CONTENTS OF BAKPAT IN RO

2IS R1 POINTING TO A LOCATION IN THE DIAGONAL ?
;IF _NOT THEN GO TO 10%

;THE

FOLLOWING CODE

IS USED

TO PLACE

THE

:?nggSS OF THE NEXT LOCATION IN THE DIAGONAL

sDIAGONAL WILL CONTAIN SWAPPED BACKGROUND PATTERN
JCONTENTS OF LOCATION PASFLG WILL BE EVEN IF THE
;MEMORY ]S BEING WRITTEN AND IT WILL BE 0ODD
JIF IT IS ONLY BEING READ
JIF IT IS BEING READ ONLY THEN GO TO 12%

;S;HESUISE WRITE

THE MEMORY WITH THE

sCHECK THE LOCATION POINTED BY R1

.PROPER DATA

CONTENTS

TO CONTAIN

14%
PC,ERROR

JIF

#2,R1
R1,RZ

; CAUSE R1 TO POINT TO THE NEXT MEMORY LOCATION
;IS IT THE END OF THE BANK ?
;IF NOT THEN GO TO 6%

6%
QNSDEV(T

IT IS OK THEN GO TO 14%

;*ERROR* REPORT ERROR MESSAGE
;exxexw*FRROR

sTELL

NUMBER

APT

33xtwxann

ARE

STIL

RUNNING OKAY

(7kMA

MACY11

(ZKMAF .F11

2063

2044
2065
2066
2067
2068

003424
003430
003434
003442
003444

2069

2070

2071
2072
2073

2C74
2075
2076
2077
078
2079
2080
2081
2082

003460
003464
003470

30A(1052)
0S-MAR-79
05-MAR-79 09:02

10523°

013703

132737

001330
005723

006306
000302
000007

(09:02
T7

PAGE 43
SHIFTING DIAGONAL
INCB

MOV

000306

3118
BNE
TST
cMp

020302

103003
105737
100322

BHIS

000306

013703

000304

000337
001715

C0C316

18%:

AHPASFLG
@#STRTD]
,R3
zl,fl#PASFLG

;.0AD R3 WITH THE STARTING ADDRESS OF

(R3)+
R3,R2
18%

JAND UNLESS THE END OF

JHAS

THE READ OF

;MAKE R3 POINT

SWAB
BEQ

Q#BAKPAT
4%

JAND IF

010203

MOV

R2.R3

003474

020205

CMP

RZ,R5

003476
003500

103676
000665

BLO
BR

2%
END6

THE DIAGONAL

;ADD 2 TO THE STARTING ADDRESS OF THE DIAGONAL

4%
4. OWBNK ,R3

a#PASFLG

THE MEMORY BEEN DONE

sIF NOT THEN GO TO 4%

TSTR
B8PL
MOV

003472

END?:

SEQ 0043

;OR

THE

Di~GONAL

JREPEAT FROM 4%

THE BANK [S REACHED

HAS BEEN ROTATED 64

TIMES

TO THE LOWEST LOCATION IN THE

;IN THE BANK UNDER TEST

THE TEST HAS NOT BEEN PERFORMED WITH THE

; SWAPPED BACK GROUND PATTERN THEN GO TO 4%
;MAKE THE PRESENT HIGH BOUNDRY AS THE NEXT

;LOW BOUNDRY

s JNLESS THE PRESENT HIGH BOUNDRY [S ALSO THE
JHIGH BOUNDRY

FOR

THE

MEMORY UNDER

TEST

CZKMA
MACYT1 30A(1052)
05-MAR=79
CZKMAF P11
05-MAR-79 09:02

09:02

2083

710

IR AN NI AR RN A AN AR AN AN AR AR AN RN N RARNANNANANNAN AR

S*TEST 10

(+(2)
:t

;2 (3)

Jx(4)

2% (5)

;v {6)
:‘

Jx(7)
;Q

;% (8)
:*(9)
Jx(10)
.t

(1)
;t

:x(12)
L
. %

003502

122737

000010

003510
003512
003516

001403
004767
000034

002450

003520
003522

010402
052702

003526

062702
001402
02020%

000404

LEAA

TST10:

RAN RN AN RN AN AN RN AN

THIS

TEST WRITES

THE MEMORY WITH A BACK GROUND PATTERN

STORED AT LOCATION BAKPAT

TEST BEGINS AT LQWEST LOCATION BEING TESTED
(LETS NAME [T ‘*A")

LETS NAME THE 1ST LOCATION IN THE ROW/COLUMN UNDER TEST AS

SWAPS BYTES FOR LOCATION
READS ‘'A', READS ‘B’

'R°'.

‘A’.

'B' = 'B'+200 (MAKES °'B'=64TH CELL I.E. 200TH OCTAL
LOCATION FROM THE PRESENT LOCATION OF 'B')

REPEATS STEPS 5 AND 6 UNTIL °'B' IS GREATER THAN THE
END 2F2THE 4K BANK OF THE MEMORY IN WHICH 'A' IS RESIDING
=

REFEAIS
STEPS 3-8 UNTILL 'A' REACHES THE END OF THE BANK
GOES TO THE NEXT 4K BANK OF MEMORY AND REPEATS STEPS

3-9 UNTIL THE END OF THE MEMORY

AFTER EXECUTING THE

TEST BYTES ARE

SWAPPED AT

LOCATION BAKPAT AND STEPS 1-10 ARE REPEATED
IN THIS TEST RO IS POINTING TO LOCATION ‘A', R1 TO
LOCATION °'B', R2 TO THE END OF THE 4K BANK IN WHICH THE

TEST IS TAKING PLACE AND R3 TO THE LOWEST LOCATION IN THE
COLUMN/ROW CONTAINING ‘A’ AND ‘B’
MOST OF THE CGDE USED BY THIS TEST IS ALSO USED BY TEST 11

RSt sttt
222222 222
22222220
z

(MPB

#10,a48TESIN

;sHECK FOR PROPER

TEST

SEQUENCE

o S

NI WNEWN
2OV
YR NN
WN =20V

S-Sl Sl

G- Far i

ASLSHNIES L SLNT NI NS S 1, NT,N 1,0 1S T,8 1,8 1S N LN TN

v iy G

s S

iy S

;x(13)
A

SEQ 0044

READ RECOVERY GALLOPING TEST/EVERY 64TH CELL

Jx(1)

Y, N1, N1, N1, ST, N LN VI, N

PAGE 44

003536
0035490
003542
003544
003546

BEQ
JSR

017776

RPT10:

000002

GALLOP:

101401

010502
005046
010200
013740

003552
003554
003556

010301

003560

023710

1%:
:

00031¢

020003
101374

001410
010001
013700
004767
000035

000316

000316
002030

.+10

PC,SEQERR

;*ERROR* REPORT ERROR MESSAGE AND HALT AT
;xxnxwxERROR

NUMBER

34xrnnnn

FATHLT

MOV
BIS

R4 ,R2
#17776 ,R2

;SET R2 TO THE LOWEST MEMORY UNDER TEST
JMAKE R2 POINT TO THE HIGHEST LOCATION IN THE 4K

ADD
BEQ
rmp
BLOS
MOV
CLR
MOV

#2,R2

; INCREMENT R?2 BY 2

BE.RS

;1F THE HIGH BOUNDRY OF THE TEST IS HIGHER THAN

JBANK FOR WHICH GALLOPING WILL BE PERFOMED

LBR IF

IT WENT

TO O

R%§g§

;s THE MAXIMUM ALLOWED ADDRESS THEN ADJUST R2

MOV

R2,RO
A#BAKPAT ,-(R0O)

cMP
BH]
MOV

R3,R1

cmp

AHBAKPAT , (RO)

MOV

BEQ

8%
RO,R1

sOTHERWISE PREPARE

JSR

PC ,ERROR

. *ERROR*

MOV

(IT MUST BE A 30K SYSTEM)

a#BAKPAT
,R0

;WRITE THE MEMORY UNDER
;BAKPAT

TEST WITH A BACKGROUND OF

JR3 AND R1 ARE POINTING TO ThE LOWEST LOCATION THAT
;CAN BE TESTED IN THIS BLOCK
JBEFORE STARTING THE GALLOPING TEST FOR LOCATION
JROY CHECK IT
JCONTINUE IF OK
REPCRT

TO REPORT

ERROR MESSAGE

seansxeFRROR NUMBER 35ennenn

THE ERROR

(ZKMA
MACY11 3CA(1052)
0S-MAR-79
CZKMAF P11
05-MAR-79 09:02

2139

2140
S}zg

003602
003604

010011
010100

2143
2144
2145

003606
003610

000310
0310M

3129

003612

020001

2148
2149
2150
2151
2152
2153
S;gé

003614
003616
003622
003624
003626
003632
003636

001412
021137
001407
010046
013700
004767
000036

2156
2157
2158
2159
2160
2161
2162
S}gz

003640
003642
003646
003650
003652
003654
003660
003664

012600
021037
001412
010146
010001
013700
004767
000037

2165
2166
¢ 27

003666
003670
003672

010011
010100
012601

2168
2169
2170
2171
2172
2173
2174
2175
2176
2177
2178
2179
2180
2181
2182
2183
2184
2185

2186
2187
2188
2189
2190
2191
2192
2193
2194

003674
003702
003704
003710
003714
003716
003720

122737
001402
062701
062701
020102
103734
000320

003722
003730
003732
003734
003740
003742
003744
003746
003750
003754
003756
003752
003764
003766
005770
003774
004000
004002

122737
001407
005723
062716
105716
100002
161603
005016
032700
001002
005237
020002
103674
162603
000337
000337
001660
010203

G &
09:0%
PAGE 45
710
READ RECOVERY GALLOPING TEST/EVERY 64TH CELL

8%:
108:

000316
000316
001772

000320

12%:

000320
001744

000071

000404

000176
000002

000011

14$:
1€%:

000404

000002

000177

000410

000320
000316

17%:

18%:

MOV
Mov

RO, (R1)
R1,RO

SWAR
BIT

(RQ)
(RO), (R1)

(MP

RO,R1

BEQ
(MP
BEQ
MOV
MoV
JSR
36

128
(R1) ,@#BAKPAT
12%
RO,-(SP)
QMBAKPAT ,RC
PC,ERROR

MOV
CMP
BEQ
MOV
MOV
MOV
JSR
37

(SP)+,R0
(RO) ,@#SWAPAT
14%
R1,-(SP)
RO,R1
@A SWAPAT RO
PC,ERROR

MOV
MoV
MoV

RO, (R
R1,RO
(SP)+,R1

P
BEQ
ADD
ADD
CMP
BLO
SWAB

411 ,a#8$TESTN
16$
#176 ,R1
42 ,R1
R1,R2
108
(RO) +

CMP8
BEQ
TST
ADD
TSTB
BPL
Su8
(LR
BIT
BNE
INC
(MP
BLO
Sus
SWASB
SWAR
BEQ
MoV

#1171 ,a4S$TESTN
178
(R3)+
42, (SP)
(SP)
17%
(SP) .R3
(SF)
#177.RO
18%
SMSDEVCT
RO,R¢
6$
(SP)+ ,R3
¥ SWAPAT
SHBAKPAT
2%
R2.R3

JRESTORE THE
;RESTORE RO

CONTENTS OF

5EQ 0045
(R1)

;CHECK TO SEE THAT NONE OF THE BITS SET
:IN (RO) ARE SET IN (R1) AND VICE VERSA
;THE ONLY EXCEPTION TO THIS WILL BE WHEN RO R1

;CHECK THAT

(R1) HAS BAKPAT [N IT

;SAVE RO ON STACK
sPLACE THE PATTERN WORD IN RO
:*ERROR~ REPORT ERROR MESSAGE
sxxxxx*ERROR NUMBER 36*wwxxn
JRESTORE RO
CHECK THAT (RO) HAS SWAPPED BAKPAT

IN [T

;SAVE R1 ON THE STACK
sMAKE R1 POINT TO THE FAILING LOCATION
JLOAD RO WITH THE EXPECTED RESULT IN (R1)
;*ERROR* REPORT ERROR MESSAGE
srxnxxx*ERRCR NUMBER 37x%xws«
JRECOVER (R1) FROM THE ERROR
JRESTORE RO
JAND RESTORE R1

;1S THE PROGRAM EXECUTING TEST # 11
;IF SO THEN GO TO 16%

sMAKE R1 POINT TO THE NEXT ADJACENT CELL
JAND IF R1 HAS NOT REACHED THE END OF THE BOUNDRY
;THEN REPEAT FROM 103
JRESTORE THE LOCATION FOR WHICH THE GALLOPING TEST
;WAS BEING PERFORMED
SIS IT TEST 11 2
;1F SO THEN GO TO 17%
;OTHERWISE INCREMENT R3 BY ¢
;FOR EVERY ROW/COLU'W TESTED ADD 2
JUNTIL (SP) IS 200
;SUBTRACT 200 FROM R3
sAT A 64TH CALL BOUNDRY?
;BRANCH [F NO
sTELL APT WE ARE STILL RUNNING
;IF RO HAS NOT PEACHED THE END OF
; THEN REPEAT FROM 6%
JRESTORE SP AND R3

THE BOUNDRY

;1F THE LOWER BYTE OF BAKPAT S 0 THEN REPEAT FROM 2%
;OTHCRWISE MAKE THE PRESENT HIGH BOUNDRY AS THE
JNEXT LOW BOUNDRY

CZKMA
MACY11 30A(1052)
S=MAR-79
CZKMAF P11
05-MAR-7° 09:02

2195
2196
2197
2198
2199
2200
220
2202
2203
2204
2205
2206
2207

004004
004006

020205
001410

004010
004014

032702
001025

004016
004024
004026
004030

122737

001421
000635
0006¢3

09:0{

719

C 7776
000011

PAGE 46

READ RECOVERY GALLOPING TEST/EVFRY 64TH CELL

R2,RS

END10

;1F PREVIOUS HIGH BOUNDRY WA

B!T

#7776 ,R2
RPT11

JWAS IT A 4K BOUNDRY 2
;IF NOT THEN WE WERE PERFORMING TEST

(MPS

END10:

SEQ 0046

(MP
BEQ
BNE

000404

BEOQ
B8R
B8R

#17 ,34STESTN
RPT11

RPT10

END7

;TEST BOUNDRY THEN EXIT THE

THE END OF

TEST

sGALLOPING TEST DISABLED
JIF IT IS TEST # 11 THEN GO TO REPEAT

;OTHERWISE REPEAT TEST 10

THE
WITH LONG

TEST M1

(ZxkMA
MACYT1 30A(7052)
05-MAR-73
CZKMAF P11
05-MAR-79 09:02

09:02

PAGE 47

READ RECOVERY LONG GALLOPING/FAST

GALLOPING

TEST

SEQ 0047

‘;t"t'tt"t'ttt"ttttfifittitttt*fifi*t*ttttt*tlfiflttfitltittttfitlQttt

TRTEST 11

READ RECOVFRY LONG GALLOPING/FAST

(1)
;2 (2)

;2 (3)

B
%
¥
B
B
%
A4
¥
B

%e
A

w.w.e,
e,

v (4)
J*(5)
;e (6)
;e (7)

(1)
SRR

2236

004032

122737

000011

2238
2239
2240

004040
004042
004046

001403
004767
000040

002120

2242

004050

010402

2244
2245
2246
2247
2248
2249

004052
004056
004060
004064
004070
004074

105777
100004
004767
046107
105777
100612

2251

004076

052702

2254

004102

000611

000404

174372
002526
000720
174354

000176

RPT11:

TEST

THIS TEST WRITES MEMORY WITH BAKPA~
THE TEST BEGINS AT THE LOWEST LOCATION BEING TESTED
(LETS NAME |7 'B')
'A'_'B' [MOVE THE ADDRESS OF 'B*' TO THE POINTER FOR LOCATION

SWAPS BYTES FOR LOCATION ‘A’

READS

'A',

READS

'BI:IB'#Z

GALLOPING OPTION BIT AT $SWREG

IS HIGH THEN STEPS 4 AND 5

'B'

REPEATED UNTIL

IS POINTING TO A CELL

REACHES

THE

HIGHEST MEMORY LOCATION

OF THE 4K BANK IN WHICH °'A* IS RESIDING, THEN 'A' IS
DECREMENTED BY 2 AND AFTER MAKING 'B' TO POINT TO THE LOWEST
LOCATION OF THE 4K MEMORY BANK CONTAINING ‘'A* STEPS 3,4,5 AND
6 ARE REPEATED UNTIL 'A' EQUALS THE END OF THE ENTIRE MEMORY
If GALLOPING OPTION SIT [S NCT HIGH THEN STEPS 4 AND S5 ARE
IF
IF

SEQUENTIAL
SEQUENTIAL

'B'

STEPS 2,3,4,5 AND 7 ARE REPEATED UNTIL
TEST

IN THE NEXT COLUMN

CELLS LIE ALONG THE ROW, OR THE NEXT ROW
CELLS LIE ALONG THE COLUMN, AT WHICH TIME

IS REPEATED FOR

THE END OF

THE OPPOSITE BACKGROUND DATA

THE MEMORY

IN THIS TEST RO POINTS TO LOCATION 'A', R1 TO LOCATION
'B', R2 TO THE hHIGHEST LOCATION AND R3 TO THE LOWEST
LOCATION IN A 64/4K CELL BOUNDRY

MOST OF

THE

AN RN

CODE

USED BY

A AN AR

TEST

IS ALSO USED BY

THIS

#4171 ,48TESTN

BEQ
JSR
40

PC,SEQERR

MOV

R4 ,R2

TSTB

8MI

aSWR
RPT11
PC,PNTMES
/GLP/
aSWR
RPT10

BIS

#176,R2

;LONG GALLOPING ENABLED?
;BRANCH IF YES
;TO RPTI0
cOTHERWISE SET THE LUW ORDER BITS OF

GALLOP

;

TSTB

.+10

TEST

N RN AN AN N ARAN N AN AN RARRAANRAN I AR,

(MPS

8PL
JSR
.ASCIZ

'A']

‘B’

ARE REPEATED UNTIL

R AR A I AN AN AR A AR

15711

GALLOPING

;CHECK FOR PROPER TEST SEQUENCE
;*ERRCR* REPORT ERROR MESSAGE
;exxsxxaERROR

NUMBER

40vtwnnn

AND HALT

FATHLT

JMAKE R2 TO POINT TO THE LOWEST LOCATINN

;UNDER TEST

JLONG GALLOP ENABLED?
;BRANCH IF NO
JTYPE 'GLP''

;TO GET THE HIGH BOUNDRY
PERFORM GALLOPING

TEST

THE

ADDRESS

(ZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 09:02

(9:02

2255
2256
2257
2258
2259
2260
2261
2262
2263
2264
2265

112
P

PAGE 48

WORST CASE

AR AR AR AR

SRTEST 12

AN A AR

;v (2)

;% (3)
;*(4)

2266
2267
2268
2269

;% (5)
.'t

J*(6)
:i

;x(7)
"t

:*(8)
"t

004104
004112
004114
004120
004122

004760
004162

88%28;

000012

C00404

TESTING FOR CORF MEMORY

SEQ 0048

AR AN RN TR AR AN R RN AN AR AN RAANANR AR

WORST

CASE

TESTING FOR

RN AR

AN RN

CORE MEMORY

STARTING FROM THE LOWEST LOCATION UNDER TEST THE MEMORY
IS WRITTEN WITH A BACKGROUND OF BAKPAT, HOWEVER LOCATIONS
HAVING ADDRESS SUCH THAT EXCLUSIVE OR OF ADDRESS BITS 1 &

8 = 1 ARE WRITTEN TO A YVALUE OF SWAPPLD BAKPAT

STARTING FROM THE LOWEST LOCATION THE MEMORY IS CHECKED
TO CONTAIN THE CORRECT DATA AS EXPLAINED IN STEPS 3 § &,
UNTILL THE HIGHEST LOCATION UNDER TEST IS REACHED
READ EACH LOCATION FOR THE CORRECT CONTENT
COMPLEMENT THE LOCATION AND READ 1T, COMPLEMENT THE LOCATION
BACK TO ITS ORIGINAL VALUF AND READ [T AGAIN
STARTING FROM THE HIGHEST LOCATION UNDER TEST REPEAT STEPS

3 & 4 UNTIL THE LOWEST LOCATION UNDER TEST IS REACHED

REPEAT STEPS 1-5, HOWEVER THIS TIME LOCATIONS WITH XOR
OF ADDRESS BITS 8 £ 13 =1 ARE WRITTEN TO SWAPPED BAKPAT
REPEAT STEPS 1-5,
HOWEVER THIS TIME LOCATIONS WITH XOR

OF ADDRESS BITS $ & 9 =1 ARE WRITTEN TO SWAPPED BAKPAT

REPEAT STEPS 1-7 WITH A BACKGROUND OF
THE

LOCATIONS

BAKPAT.

gggB

#1%63#$TESTN

SWAPPED BAKPAT AND

TO BE WRITTEN TO SWAPPED BAKPAT WRITTEN TO

:;tt*t*itttttttttttttt*tttt*tfitttttttt**tt*ttttttttttfittttitttttt

TST12:

;CHECK FOR PROPER TEST SEQUENCE

004767
000041

002046

JSR
41

PC,SEQERR

;*ERROR* REPORT ERROR MESSAGE AND HA T AT FATHLT
JennaexfERROR NUMBER 41nsannx

012702
012703
112737
010401

000002
000400
000001

MOV
MOV
MOVB
MOv

#2 ,R2
#400,R3
#1,a#PASFLG
R4 ,R1

;PREPARE TO TAKE THE EXCLUSIVE OR OF ADDRESS BITS 1
JAND 8
JINITIALIZE THE COUNTER FOR THE SUBTEST
:¢%g$EITH51STARTING ADDRESS OF MEMORY UNDER

013700
030201
001004
030301
001404
005100

000316

MOV
BIT
BNE
BIT
BEQ
COM

ANRAKPAT
RO
R2.R1
8%
R3,R1
12%
RO

000402
030301

000306

1%:
2%:

4%:

6%:

8%:

B8R
BIT

12%

R3,R7

sCHECK TO SEE IF ADDRESS BIT STORED IN R2 IS SET
JIF IT IS SET THEN GO TO 8%
sCHECK TO SEE IF ADDRESS BIT POINTED BY R3 IS SET
JIF IT IS NOT SET THEM GO TO 12%
;COME HERE ONLY IF EXCLUSIVE QR OF ADDRESS BITS
JPOINTED BY R2 & POINTED BY R3 = 1 [N WHICH
;CASE PREPARE

TO WRITE

;COME HERE

ADDRESS BIT POINTED BY R2

;WITH A COMPLEMENT OF
JTHIS CONDITION

THE LOCATION

LOCATIONS NOT MEETING

[S '

AND

(ZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR~79 09:02

2300
2301

004164

001774

09:02
PAGE 49
112
WORST

BEQ

K
CASE

TESTING FOR CORE MEMORY

;CHECK ADDRESS BIT POINTED By R3

. IF ADDRESS BIT POINTED BY R3 IS O THEN GO TO 6%

SEQ 0049

CZKMA
MACY11 30A(1052)
O05-MAR-79
CZKMAF P11
05-MAR=79 09:02

2302
2303

004166
004174

132737
001001

00000¢

09:02
PAGE 50
T12
WORST CASE

000306

12%:

BITB
BNE

TESTING FOR CORE MEMORY

N2, dMPASFLG
14$

;1S IT 2ND OR 3RD PASS OF THE SUBTEST
;IF SO THEN READ THE MEMORY

SEG 0050

CZKMA
MACYN 30A(1052)
0S-MAR-79
CZKMAF P11
0S-MAR-79 09 :02

2304
2305
2306
2307
2308
2309

004176

010011
020011
001403
004767
000042
012746
005100
005111
020011
001404
004767
000043

010011
005316
0013566
005726
122737
001412
062701
020105
103727
105237
122737
001720
162701

09: 02 PAGE 51
112
WORST CASE TESTING FOR CORE MEMORY
14%:

001420

000002

19%:

000306

012702

020000

105237
123727
103701
101004
012702

000307
000307

006303
000674
005137

105737

001654
000625

18%
(SP)+
#3,a4PASFLG
20%
#2.R1

SEXECUTE THE CODE FROM 18% TWwICE
JRESTORE THE STACK POINTER
;1S IT THE 3RD PASS OF THE SUBTEST ?
;IF SO THEN GO TO 20%
;IN FIRST 2 PASSES THE PROGRAM PROCEEDS IN

#2.R1

BHIS

INCB
8LO
BHI
MOV
ASL

000010
000316
000316

JRESTORE THE LOCATION (R1)

20%:

22%:
END12:

oM
TSTB
BEQ
BR

;JREAD THE MEMORY AGAIN

RO, (R1)

a#PASFLG
#2 ,a¥PASFLG

000306

000002

;*ERROR* REPORT ERROR MESSAGE
JaenaexERROR NUMBER 420%wxxxx

;*ERROR* REPORT ERROR MESSAGE
;xxanxxERROR NUMBER 43xtwxnx

R1,R5
4%

000002

;OTHERWISE WRITE THE MEMORY BFORE READING IT
JREAD THE MEMORY FOR CORRECT (ONTENTS

PC,ERROR

(SP)

000002

000306
000002

PC.ERROR

RO
(R1)
RO, (R1)
19%

001376

000003

RO, (R1)
RO, (R1)
16%

#2,-(SP)

16%:
18%:

020104

103315

MOV
cMP
BEQ
JSR

SEQ 0051

R1.R4
4%
#20000,R2

SHPASFLG+1
?gPASFLG*1.#2

22%
R3

1%
SHBAKPAT

QMBAKPAT

TST12

END10

¢MIN.

TO MAX.

DIRECTION

JHAVE WE REACHED THE MAX. ADDRESS UNDER TEST ?
;IF NOT THEN REPEAT FROM 4%

;IF IT IS THE 2ND PASS OF THE SUBTEST
:THEN REPEAT FROM 2%
;OTHERWISE EXECUTE THE TEST IN MAX. TO MIN.
;DIRECTION
sHAVE WE REACHED THE MIN. ADDRESS UNDER TEST ?
;1F NOT THEN REPEAT FROM 4%
;PREPARE TO CHECK THE _MEMORY WITH THE XOR Of
sADDRESS BITS 8 AND 13
sTHE SUB TEST HAS CHECKED THE XOR ONE KIND
sHAS TWO XOR COMBINATIONS BEEN CHECKED ?
sIF NOT THEN GO TO 1%
;IF ALL THREE HAVE BEEN CHECKED THEN GO TO 22%
JIF IT IS THE 2ND XOR COMBINATION THEN CHECK

;FOR ADDRESS BITS 3 ¢ 8

;IF THE TEST WAS NOT PERFORMED WITH THE SWAPPED
;BAKPAT THEN RE-EXECUTE THE

TEST

CZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF .P11
05~-MAR-79 09:02

09:023 PAGE 52

2348

WRITE RECOVERY TEST

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

*TEST 13
X
e
N
S
S
YR
IR
LI
08,
0,08,
v,

A R AR AN AR RN AR NN

000013

001403
004767
000044

001574

012702

010247

012700

177667

000404

NN ANINARANS

IS TY?E?LEEHIS WILL ALLOW THE USER TO AT LEAST SEE WHICH MEMORY

THE

TEST

CONSISTS OF

1/2 OF

THE BANK STORED WITH ‘MOV R2,-(P(C)'’

AND THE OTHER 1/2 CONTAINING ‘"177667''. "177667'" 1S THE COMPLEMENT
OF "'JMP (RO)'' INSTRUCTION.
R2 CONTAINS “'COM -(R1)‘* INSTRUCTION ON ENTRY TO THE BANK AND R1 CONTAINS

THE HIGHEST TEST ADDRESS IN THAT BANK. THE HIGHEST TEST ADDRESS IS
USUALLY ON 4K BOUNDARIES. WHEN TESTING BANK O RELOCATED,HOWEVER
R1 CONTAINS THE FIRST FREE TEST ADDRESS BELOW THE DIAGNOSTIC.
IF YOU UNDERSTAND THIS SO FAR THE REST IS EASY.
THE

_TEST EXECUTION IS AS FOLLOWS:

THE MOV R2,-(PC)'* INSTRUCTION EXECUTES STORING

THE

CONTENTS OF

RZ2

IN THE ADDRESS

THE HIGHEST ADDRESS UNDER TEST.

TO =-(PC),

THIS ADDRESS CONTAINED

THIS SEQUENCE CONTINUES UNTIL THE 'MOV R2,-(PC)

REACH THE MIDDLE OF

1%:

(DUE

*177667°' SO AFTER THE COM =-(R1) IT EQUALS 110
CLEVERLY THIS IS THE "UMP (R0O)'’ INSTRUCTION.
?SDTE§$C?§ED.

7 §T13:

IT VACATED

SINCE RZ CONTAINS A *'COM =-(R1)"" INSTRUCTION IT COMPLEMENTS

THESE

THE

TEST BANK.

THEN THE ‘‘JMP

INSTRUCTIONS
(R0O) ' INSTRUCTION

RO CONTAINED THE RETURN ADDRESS BACK

RAANRRRARAAN RN RN AR

AN R Aok

(MPB

#13 aNSTESTN

PC,
gEO‘RR

5:EB&?BERSSSOSLME23024?EffefE AND HALT AT FATHLT

MoV

#10247 ,R2

;PLACE THE OP CODE OF

§§g
MoV

#177667,R0O

;CHECK FOR PROPER TEST SEQUENCE

INSTRUCTION MOV R2,-(PC)

éfiA?g THE COMPLEMENT OF THE INSTRUCTION

;JMP (RO) IN RO
s INSURE LOUEST TEST ADDRESS TO END OF 4K SEGMENT IS MULTIPLE OF 2

:SINCE

010546

2%:

208

THE

MOV

?Og
L

ROR

TEST STORES 'MOV RZ2,-(PC)

R5.,-(SP)
R4 .= (SP)

IN 1/2 AND 177667 IN THE OTHER 1/2

;SAVE RS

;STORE LOWEST ADDRESS ON STA(CK

sJMAKE POSITIVE BYTE COUNT OF HIGH ADDRESS

;DO SAME FOR LOWEST ADDRESS

SUB
ROR

R4 ,R5
RS

sGET DIFFEREMCE OF LOWEST ADDRESS AND HIGHEST
sIF DIFFERENCE IS ODD THEN R4 IS AT LOWEST ADDRESS

ADD

#2,(SP)

; INCREASE LOWEST TEST ADDRESS BY 2

010403

MOV
MOV

(SP) + RS
R4 ,R3

JRESTORE HIGHEST TEST ADDRESS
:?hAg% THE LOWEST LOCATION UNDER TEST

000406

ob¢

JLEAVE LOW BITS OF R3 ALONE FIRST

000002

8CC
30%:

MOV

30%

(SP)+ R4

STEPS ARE REPEATED FOR EACH BANK UNDER TEST.

AR AR AN RN AN R AN AR AR RN RN RRRARR A AN RN

122737

AN N AN RRAN AR

WRITE RECGVERY TFST

THIS TEST DIFFERS FROM G-12 IN THAT IT CONSISTS OF A SMALL TEST PROGRAM
ACTUALLY RUNNING IN THE 4K BANK UNDER TEST.
THE PROGRAM IS SELF MODIFYING AND MAY BE DIFFICULT TO DEBUG.
TO AID IN THE DEBUG, BEFORE A BANK IS ENTERED ''TST13 BNK XX''

l!&!l'*’#lltll’lollll"lll'

Sev,

SEQ 0052

JBRANCH IF R4 IS AT LOWEST TEST ADDRCSS.

JRESTORE R4

(POSSIBLY INCREASED BY 2 FROM ENTRY)

TIME

IN CASE BANK O

(ZKMA

MACY11 20A(1052)
05-MAR-79
CZKMAF PN
05-MAR-79 09:02

2604
2405
2406
2407
2408
2409
2410
2411
2412
2613
2414
2415
2416
2417
2418
2419
2420
2421
2422
2423
2424
2425
24626
2427
2428
2429
2430
2431
2632

2433

2434
2435
2436
2437
2438
2439
2440
2441
2442
2443
2444
2445
2446
2447

2448
2449
2450
2451
2452
2453
2454
2455
2456
2457
2458
2459

004440

042703

004444
004446
004452
004454
004456

001507
105737
100504

004472
004474
004500

010301
052701
005201

004502

001402

020527
103002

101401
010501

004512
004520

132737
001101

004534

BIC

#17776,R3

BEQ

14%

113

000405

28%:
020000

020304
“03430

105737
001002

012713
020213
001421
010046
010146
010301
010200
004767
000045

012601
012600

105737

WRITE RECOVERY TEST

31%:

IT MUST BE A 30Kk SYSTEM

(MP

R3,RS

;1F R3 IS HIGHER THAN 1HE HIGHEST LOCATION

(MP

RS5,#20000

MOV

R5,R1

;SET R1

MOV
BIS
INC

R3,R1
817777 ,R1
R1

;SET R1 TO LOWEST CURRENT TEST ADDRESS
JSET LOW ORDER ADDRESS BITS
;CAUSE R1 TO POINT TO THE HIGHEST LOCATION+?2

BEQ

32%

JBRANCH IF R1

BM]

14%

000306

31%

32%

32%:

R1,R5
33%
R5.R1

33%:

BITR

#1,HPASFLG

000307

000306

;IN THE 4K BANK UNDER TEST

;1F ADDRESS WENT TO O,

;ARE WE RELOCATED?

CMP
BLOS
MOV

4%:

001050

;CAUSE R3 TO POINT TO THE LOWEST LOCATION

a#REL

BHIS

017777

010247

SEQ 0053

TSTR

B8R

000001

JBRANCH IF

YES-TEST BANKO ONLY-

BHIS
14%
;UNDER TEST THEN EXIT
;1F RS LESS THAN 20000 THEN WE ARE TESTING BANKO RELOCATED IN BANKO

020105

004510

004522
004524
004526
004532

3$:

017776

103102

010501
000407

004504
004506

PAGE 53

020305

004460
004464
004466
004470

09:0%

BNE

(MP
8LO

T1STB

BNE

6%:

16%

R3.R4
B$

Q#PASFLG+1
6%

MOv

#10247,(R3)

MOV

RO,=-(SP)

g?g

gg.(R3)

MOV
MOV
MOV
JSR
45

R1,-(SP)
R3.R1
R2,RO
PC,ERROR

MOV
MOV
1ST8

(SP)+,R1
(SP)+,R0
A#PASFLG

;1S HIGHEST TEST ADDRESS BELOW 4K?

;BRANCH IF NO

;0F

TO HIGHEST TEST ADDRESS

IN BANKO

THE 4K BANK BEING POINTED BY R3

JHAVE

HAPPENED

WENT TO O (WHICH MIGHT
IF

TESTING A 30K LSI

SYSTEM)

;COMPARE R1 TO HIGHEST ADDRESS UNDER TEST
JBRANCH [F WITHIN RANGE
;SET R1 TO THE MAXIMUM AVAILABLE MEMORY

;1S THE LOWEST BIT OF LOCATION PASFLG

;SET?

IN WHICH CASE BACK GROUND HAS

;TEST

IS BEING PERFORMED

sALREADY BEEN WRITTEN AND WRITE RECOVERY

;OTHERWISE WRITE THE BACKGROUND
sDEFINED AT STEP 3,
;1S THE TEST JUST DOING READ, I.E.
;IS THE PASFLG+1 LOCATION NON ZERO?

JWRITE

FOR MOV R2,-(P(C)

;THEN GO TO 6%

THE LOCATION WITH

JREAD (R3)
;SAVE RO

sAND R1

THE OP CODE

TO CONTAIN CORRECT DATA

ON THE

STACK

;SET RO= GOOD DATA FOR ERROR PRINTOUT
;*ERROR* REPORT ERROR MESSAGE

sxxxxxxERROR NUMBER 45arawnns

JRESTORE R1
;AND RO
;IF PASFLG IS O AND THE MEMORY DOES NOT HAVE
;THE PROPER DATA THEN WE DON'T WANT TO GO AND

:gég%UTE THE INSTRUCTIONS STORED IN MEMORY UNDER

004572

01005

004574
004576
004602

010200
004767
000046

004604

000663

001026

BNE

MOV
JSR
46

RZ,RO
;SAVE FOR ERRJR REPORT
PC.ERROR
;*ERROR* REPORT ERROR MESSAGE
saxxxxxERROR NUMBER 46 rwnnn

END1?

sBRANCH IF PASFLG NOT -0

JABORT TST 13.

(ZKMA
MACY11 30A(1052)
05=MAR-79
CZKMAF P11
05-MAR-79 09:02

2460
246]
2662
2463
2464
2465

2466
2467
2468
2469

2470
2671
2472
2473
2474
2475
2476
2477
2478
2479
2480
2481
2482
2483

2484
2485
2486
2487
2488

2489

2490
2491
2492

2493
2494
2495
2496
2497
2498
2499
2500
2501
2502
2503
2504
2505
2506
2507
2508

2509
2510
2511
2512
2513
2514
2515

004606
004612
004616
004620
004622
004624
004626
004632
004634

062703
162701

020105

09:0?

000002
000002

PAGE

WRITE

8%:

004640
004642
004644
004650

020011
0014C3
004767
000047

004652
004654

020301

000307
177667

#177667,(R1)
10%-

RO, (R1)
12%

000760

PC,ERROR

12%:

103722

CMP
BLO

TEST

12%
R1,R3
108
QFPASFLG+1
108

020103
091002
01271

RECOVERY
#2,R3
#2,R1
R1,RS

103014

103405
105737

R3,R1
4%

SEQ 0054

s INCREMENT R3 BY 2
;DECREMENT R1 BY ?

;WRITE

THE BACKGROUND DEFINED AT

;HAS STORING

THE

STEP 4.

177667 REACHED WHERE

'MOV R2,-(PC)

;BRANCH IF YES DON'T DESTROY THE MOV R2,-(PC)
;1S THE THE READ ONLY CHECK PASS?

;BRANCH IF YES
JWRITE THE LOCATION WITH THE

COMPLEMENT OF

;0P CODE JMP (RO)
JREAD R1 TO CONTAIN CORRECT DATA

IS.

THE

;*ERROR* REPORT ERROR MESSAGE
saexxx«ERROR NUMBER 47w#anns

;IF WE HAVE NOT REACHED THE MIDDLE OF 4K BANK

;THEN REPEAT

FRMTM 4%

JRETURN HERE AFTER PROGRAM RUN IN BANK UNDER TE.004656
004662

062703
000666

020000

004664

122737

200001

004672

103627

004676

105137

004702
004704

001240
012702

004710
004714

012700
060700

004724
004732
004734
004740
004742
004746
004754

ADD
BR

#20000,R3

14%:

(MP8

#1,d¥PASFLG

001437

004674

004716
004722

000306

13%:

105237

000630

032777
001016

105737

001013
004767
051524
047102

8EQ

24%

BLO

END1?2

000307

coms

DHPASFLG+1

005141

BNE
MOV

#5141 ,R2

177740

MOV
ADD

000306
000020

173516

030524
000113

020063

413%-.-6,R0
PC.RO

15%:

a#PASFLG

16%:

#20,3SWR

000042

001644

JSR

LASCIZ

.EVEN

18%
a4l
18%

PC ,PNTMES

/TST13 BNK/

JOTHERWISE GO TO THE NEXT 4K BANK
; THE

PROGRAM CONTROL

; 1-PASFLG=0,

COMES HERE AS

FOLLOWS

PROGRAM HAS JUST COMPLETED A

;
;_

WRITE/READ CYCLE FOR THE BACK GROUND
AND WANTS TO BEGIN THE WRITE RECOVERY

;

THE WRITE

;2=PASFLG=1, PROGRAM HAS JUST COMPLETED

TEST

RECOVERY TEST AND WANTS TO

;_
READ MEMORY FOR CORRECT DATA
;3~PASFLG=2, PROGRAM HAS CORRECTLY READ THE
;
MEMORY AND WANTS TO GO THE NEXT TEST.

JENTER HERE WITH PASFLG=0, ON THE FIRST ENTRY
;ENABLE READ ONLY FOR THE MEMORY AND ON THE SECOND
SENTRY DISABLE READ ONLY
:?kAgs THE OP CODE FOR INSTRUCTION COM -(R1)
sPLACE THE RETURN ADDRESS IN RO AS 13%

s THUS WHEN THE READ RECOVERY TEST REACHES
;THE MIDDLE OF THE 4K MEMORY THEN THE

s INSTRUCTION EXECUTED WILL BE JMP (RO)
;BRANCHINGING THE PROGRAM TO 13%
s INCREMENT PASFLG BY 1.

JHAS THE PRINTOUTS BEEN SUPRESSED
;JF SO THEN GO TO 18%

;1S THE PROGRAM RUNNING UNDER ACT?

JBRANCH [F
;

TYPE

THE

YES

BANK UNDER

TEST

IS?

(ZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF .P1
05-MAR-79 09:02

2516
2517
2518
2519
2520
2521
2522
2523
2524
2525
2526
2527
2528

004760
004764

004767
004767

004770

000113

004772
004776
005002

012700
000745

105137

09:02_

113

002454
001650
18%:

000307
000110

24$:

PAGE 55

WRITE RECOVERY

TEST

SEQ 0055

JSR
JSR

PC,
GE TBNK
PC,$TPDEC

;TYPE

JMP

(R%)

;BEGIN EXECUTING MOV R2,-(P(C)

COMB

MOV
BR

S#PASFLG+!

#110,R0
158

sTST13 EXITS VIA END12.

cGET BANK NO. UNDER TEST
BANK NG.

UNDER

TEST

INTO DECWRD FOR PRINT,
,(OM =(R1)

;PLACE THE OP (CODE FOR JMP (RO) IN RO
; READ THE MEMORY FOR CORRECT DATA AFTER
s INCREMEMT
ING PASFLG TO 2

SEQUENCE

IN TES

(ZKMA

MACY11

CZKMAF P11

2529
2530
2531
2532
2533
2534
2535
2536
Sggg

30A(1052)

O05-MAR-79

05-MAR~79 09:0°2

09:02

005004
005012
005016

012737
105737
001065

000377
000276

000316

005020
005026
005030
005034
005036

032777
001046
105737
100420
112737

001000

173422

2545
2546
2547
2548
2549
Sgg?

000200

2554

2556
ggg;

2559
2560
2561
2562
2563
2564
2565
2566
gggg

000405

005044
005050

004767
042522

001542
047514

005056

013705

000340

005062
075064
005070
005072

014445
C20427
101374
000165

000430

000103

2%:

000050

#377
. a4BAKPAT
IFMMAVA
CONTMM

BIT
BNE
TSTR
BM]
MovB

#1000, aSWR
CKDONE
SFREL
RELOER
#200,34REL

;1S THE MEMORY MANAGEMENT BEING TESTED ?
J1F SO THEN GO TO CONTMM AND C(ONTINUE TESTING
;MEMORY MANAGEMENT
JRELOCATION WANTED?
;JBRANCH [F NO
;IF THE PROGRAM HAS ALREADY BEEN RELOCATED THEN ALSO
; PLACE THE PROGRAM BA(CK IN LOWER CORE
;OTHERW]SE PREPARE TO RELOQCATE

THE DIAGNOSTIC

TO HIGHEST AVAILABLE MEMORY

JSR
PC.PNTMES
.ésgéz /RELOC/

;TYPE "REL"

MOV

IHMAXMEM RS

MOV
cMP
BHI
JMP

-(R4) ,-(RS)
Ré ,#BEGIN~50
2
S0(RS)

;PREPARE TO LOAD THF FROGRAM IN THE HIGHEST
JAVAILABLE MEMCORY
;RELOCATE THE PROGRAM
JNEITHER RELOCATE NOR TEST LOCATIONS LOWER THAN BEGIN-=S0O

;*RELOCATE THE DIAGNOSTIC BACK TO LOWER MEMORY
005076

Q005102
005106

005110
005114
005116
005122
005124
005130
005134
005140
J05144

013705

000346

RE.OCR: MOV

a#S4VRS RS

MREL
CKDONE

21S DIAGNOSTIC IN RELOCATED STATE?
;BRANCH IF NO

#BEGIN-50,R4
(RS)+,(R4)+
RS, /MAXMEM
2%
SHREL
RS.,a#SAVRS
#MBEGIN,SP
SP,a#SAVR6
a#L OWER

;PREPARE TO RELOCATE THE PROGRAM TO LOWER CORE

000405
000346
000500
000350
005150

MOV
MOV
(MP
8LO
CLRRB
MOV
MOV
MOV
CKDONE: JMP

:SAVE RS
JRESET STACK TO LOWER MEMLRY
J'BEGIN'' USES THIS TO RESET THE STACK.
;TRANSFER THE PROGRAM (ONTRO! TO THE LOWER CORE

000315

LOWER:

a4 SAVKARR

JHERE DUE TO ~C TYPED?

001702

TSTMM:

000276

TSTB
BEQ
BR
CONTMM: JSR
SCNTMM: MOV

105737
100016

000405

012704
012524
020537
103774
105037
010537
012706
010637
000137

000430

105737

000340

TSTR
BPL

2%:

2569
2570
2571
2572
2573
2574
2575
2576
2577
2578
2579
2580
2581
2582
2583
2584

SEQ 0056

MOV
TSTR
BNE

JRELOCATE

%gg%
gsss

RELOC:

000405

%gzg

2541
2542
5222

PAGE

PARITY OR RELOCATE?

005150

005154
005156

001073
004767

005162
005166
005170
005172
005176
005202

105737
001462
000402
004767
012703
004767

002036
000324
002142

005206

012704

005212

020237

TSTR

BNE
JSR

$TPSTK
PC ,MEMMNG

JSR

S¥MMAVA
ENDPAS
SCNTMM
PC,UPMM
#LOWTWO,R3
PC,GETSIZ

020000

MOV

#20000,R4

172342

(MP

R2,

172342

JRESTORE RS

JBRANCH IF YES (TYPE ERROR STA(CK)
; SET THE REGISTERS IF THE MEMORY MANAGEMENT
;1S AVAILABLE
;IS MEM. MANAG. AVAILABLE ?
JBRANCH IF NO
JBEGIN TESTING ABOVE 28K
;GO TO UPDATE MEM. MANAG. REGISTERS
JMAKE R3 POINT TO THE LOCATION LOWTWO
;

LOAD BITS 6-10 OF R2 WITH THE BITS 13=17

.OF THE LOWEST ADDRESS UNDER TEST
JMAKE R4 POINT TO THE LOWEST LOCATION !N THE BANK
JPOINTED BY PAGE ADDRESS REGISTER 1 (PAR1)
;IS THE CONTENT OF RZ LOWER THAN THE CONTENT OF

CZKMA

MACYN

r ZKMAF P11

2585
2586
2587
2588
2589
2590
25N
2592
2593
2594
2595

2596
2597
2598
2599
2600
2601
2602
2603
2604
2605
260¢
2607
2608
2609
2610
2611
2612
2613
2614
2615
2616
2617
2618
2619
2620
2621
2622
2623
2624
2625
262€
2627

005216

30A(|052) OgsnAR-79
05-MAR-79 09

050104

005222
005226
005232

162702

005250
005254
005256

PAGE 57

PARITY OR RELOCATE?

103405

005220

005236
005242
005244

09:02

004767
004767

004767
010005
004767
004767
010013

000167

8BLO
BIS

000200
001636
002112

2%:

000020

R1,R4

#200,R2

JSR

PC,MMREG
PC,GETSIZ

JSR

PC ,MAXADR

JSR

PC,GETSIZ
P(C ,MAXADR

MoV

1746256

;PART

SUB
JSR

MOV
JSR

002100
000006

SEQ 0057

JMP

RO, (R3)
CLRMEM

;MAXADR - SUBROUTINE
;REGISTERS.

TO GET

;1F SO THEN GO 2%
sSUBROUTINE GETSIZ LOADED R1 WITH BITS 0-12
;OF LOWADD WHICH HAVE NOW BEEN LOADED IN R4
; SET MEM. MANAG. REGISTERS

;PLACE BITS 13-17 OF
;IN BITS 6-10 OF R2,
;OF LOCATION HIGHADD
; GET THE ADDRESS OF
;

;

PREPARE

GET

HIGHEST LOCATION TO BE TESTED
#160000 IN RO AND BITS 0-12
IN R1
MAX. MEM., UNDER TEST

TO SET UP LOCATION MAXMEM

THE MAXIMUM ADDRESS OF

JAND STORE INTO 'MAXMEM''

;GO TEST A 24K SLICE ABOVE 28K.
CURRENT 24K

SLICE OF

MEMORY ADDRESSES ABOVE

:RO= ON ENTRY= #160000 AND ON EXIT=HIGHEST VIRTUAL ADDR.
:R1= LOW ORDER 12 BITS OF VIRTUAL TEST ADDRESS
;R2= PAR BLOCK NO. CURRENTLY UNDER TEST.

005262
005264

0100456
012700

005270
005274
005276
005300
005302
005306

162716
050116
020240

001410
020027
101370

005310
005312
005314
005316
005322
005324
005330

005720
021002
003006
012716
012600
062700

005332

022626

000207

172356

020000

MAXADR:

MOV
MOV

;**BEGIN LOOP

Sus

BIS

cMP

17234C

157776

000002

UNDER TEST

JBRANCH IF YES

RTS

JAND EXIT MAXADR ROUT INE

(MP

(SPY+,(SP)+

JFIXUP STA(CK
JAND FALL THRU TO ENDPAS.

CMP
22.4172340
JARE WE AT PARO?
B8H!
:NO KEEP TRYING
J**END LOOP TO FIND PAR ADDRESS UNDER TEST
+
TST
(RO)
:SET TO PAR CURRENT
(RO) ,R2 ;
CMP
PAR BLOCK UNDER TEST GTR THAN ALLOWED?
A 3
BGT
¢BRANCH 1F YES (FALL INTO ENDPAS)
#157776, (SP)
MOV
JEXIT WITH MAXADR= 28K SEGMENT TEST SIZE
3%:
MOv
(SP)+ ,R0O
;SET RO TO MAXIMUM VIRTUAL TEST ADDRESS
#2 ,RO
ADD
;MAKE MAXIMUM MEMORY
+2
4%:

28K.

RO, =(SP)
;PUT MAXIMUM AVAILABLE ADDRESS ON STA(K
#172356,R0
.RO=PAR7 UNIBUS ADDRESS
TO FIND PAR ADDRESS UNDER TEST
#20000, (SP)
;DECREMENT VIRTUAL ADDRESS BY 4K
R1, (SP)
;SET BITS 11:0 TO MAXJMUM VIRTUAL TEST ADDRESS
Rg.-(RO)
:DOES CURRENT PAR= TEST BLOCK NO.?

BEQ

AVAILABLE MEMORY

(ZKMA

MACY11

(ZxKMAF P11

304(1052)

O05-MAR-79

05-MAR=79 09:02

(09:07

PAGE

Sg%g

2640
2641
2642
2643
2644
2645
2646
2647
648
2h49

2650
2651
2652
2653
2654
2655
2656
2657
2558
2659

005334
005342
005344

(032777
CT1055
012746

000020

005350

177777

012701

007744

MOV

#ENDPRG ,R1

005354
005260
005362
005366
005370
005374
005376

012703
005216
020137
103043
112702
105302
002766

000376

005400
005402
005404

105721
001774
020227

005410
005412

103404
101026

005414
005420

004767
000404

000022

TYPSTK:

MOV
INC
CMP
BHIS
MOVB
RETSTK: DECB
6LT

001000

004767
011637
004767
005043
114113

001202
000312
001176

JSR
FAJLNM: MOV

005446
005450
005452
005456

105021
005043
105237
004767

00037¢
000750

PARFL:

THE ERROR STACK

RP.,a4DECWRD

005426
005432
005436
005442
005444

012703
000742
004767
000756

cPLACE THE STARTING ADDRESS OF
JFOR O TO 4K MEMORY IN R1

MOV

2662
2663

005462
005466
005470
005474

JARE WE GOING TO TYPE THE ERROR STACK AND END OF PASS?
;IF NOT THEN GO TO $EOP
;. THE PROGRAM HAS REACHED THE END AND ERROR
JSTACK AND END OF PASS WILL BE TYPED QuT

PC,TPADER
FAILMNM

2%:

2673
2574
2675
2676

THE ERROR STA(CK

JSR
B8R

000312

000314
(001316

TYPE OUT OF

BLO
BHI

T1STR
BEQ
CMP

000020

IS REQUIRED OR NOT

#376,R3
(SP)
;1F WE HAVE GONE THRU THE ENTIRE
R1,a4#ENDSTK
JHAS THE END OF THE ERROR STACK BEEN REACHED 7
$EOP
;THEN GO TO TYPE EMD OF PASS
#18..R2
R2
JIF ALL 16 BITS OF THIS BANK HAVE BEEN CHECKED.
TYPSTK
JBEEN CHECKED FOR ERROR THEN SEt IF THERE
;IS ANY MORE 4K MEMORY BANK
(R1)+
JOTHERWISE CHECK THE BYTE STORED AT (R1)
RETSTK
JIF 1T IS O WE WILL NOT TYPE IT
RZ,#16.
;1S THE POINTER POINTING TO ERROR STACK BYTE
JMEANT FOR COLLECTING ADDRESS FAILURES FOR
;JTHE SPECIFIC MEMORY BANK
2%
;IF NOT THEN GO TO TYPE BIT NUMSER
PARFL
JIF IT IS POINTING TO THE STACK LOCATION INTENDED

010237

2672

THE FAILING BITS

#20,3SWR
$EOP
#-1,-(SP)

005422

2667
2668
2669
2670
2671

FOR ONLY

ENDPAS: BIT
BNE
$TFSTK: MOV

000310

173106

322?

2664
2665
2666

SEQ GOS8

;* TYPE ROUTINE FOR ERROR STA(CK
¥ meeseectecccccccccccccccc—eo
o
THIS ROUTINE IS USFD TO DETERMINE

2630
2631

235

TYPE ROUTINE FOR ERROR STACK

2628
2629

2636
2637
2638
2639

JSR
CLR
MOVB

PC.TYPDEC
(SP) ,a#DECWRD
PC.$TPDEC
-(R3)
-(R1),(R3)

CLRR
CLR
INCR
JSR

(R1)+
-(R3)
a#TYPCNT
PC.RPTOCT

MOv
BR
JSR
BR

#376,R3
RETSTK
P(,TPPRER
FATLNM

2TO COLLECT PARITY FAILURES THEN GO TQO PARFL
;OTHERWISE TYPE '‘ADDRESS ERROR''

:TRESQ??MLO TYPE THE NUMBER OF THE FAILING BI7T
. IN
L
;GO TO TYPE THE 3IT NUMBER IN DECIMAL

;PREPARE TO TYPE THE PAGE NUMBER
JIN DECIMAL

JPREPARE TO PRINTOUT THE NUMBER OF
sFAILURE OCCURED
JCLEAR THE ERROR STACK

TIMES THIS

JENABLE THE TYPE OUT OF 1 WORDS
. TYPE THE 4K BANK AND THE NUMKER OF
;THIS FAJILURE WAS SEEN

TIMES

JRESET SCRATCH STACK FOR EACH B]T PRINTED.
:

TYPE 'PAR ERR''

(ZKMA
MACY11 30A(1052)
O05-MAR-79
CZKMAF (P11
05-MAR-79 N9:(C?

09:02
PAGE 59
END OF PASS

Se w04

2677
2678
2679

2680
2681
2682
2683

SEQ 0059

+ END OF PASS
wmomeo

TYPE "PASS#'' AND DISABLF PARITY,
ALSO SERVICE A(CT11,
AND EVERY CONSECUTIVE PASSES UNLESS BIT 4

$SWREG

IS HIGH

2658
2689
2690
2691
2692
2693
2694
2695
2696

005476
005500
005504
005510
005512
0055145
005524
005526
005532

005002
004767
105737
001043
005237
032777
001012
004767
040520

2698
2699
2700
2701
2702
2703

005540
005546
005552
005556
005560
005564

013737
004767
013700
001405
004767
000005

000406
001066
000042

2707

005566

000137

000156

2709

005572

000137

000250

2711
2712
2713
2714
2715

0055765
005602
005606
005€10
005614

004767
013704
014445
020437
101374

001616
000344

2716

005616

$EOP:

002014
000315
000406
000040
001052
051523

TYPEOP:

000372

;SET RZ= PARITY MODULE DISABLE

TSTR

a¥SAVKBA
crec

sCONTROL~C TYPED?
JBRAMCH IF YES~RESTORE

ACT11:

P(,PARITY

A¥SPASS

2GO DISABLE

PARITY MODULES

s INCREMENT PASS COURNT

#4C ,aSWR

;" PASSAXX'' PRINTOUT WANTED?

JSR

PC,TPCRLF

;

ACT1

LASCIZ
.EVEN

/PASS#/

JSR
MOV
BEQ
JSR
RESET

JBRANCH [F NO
TYPE

CR,

QMSPASS , d#DE CWRD
PC,$TPDEC

a#42 RO
$DOAGN

PC,RLODER

LF,

AND 'PASS#"

;GET PASS COUNT
JTYPE

;GET THE MONiITOR ADDRESS
s IF NONE
;RESTORE

XXDP MONITOR

JMP

a4 $ENDAD

;JUMP TO ACT SERVICE

$D0AGN:

JUMP

a¥RESTRT

JREPEAT

R! ODER:

JSR
MOV

PC,CLRMM
a#SAVRS R4
-(R4) ,-{R5)

:STOP MEMORY MANAGEMENT
JRESTCRE R4 WITH SAVRS
;RESTORE LOADERS

JRETURN FROM RLODER CALL

000207

MOV
(MP
BHI
R7S

zg.a4£~057x

TEST

NOT ULNDER ACT11/XXDP
SO (AN RESTORE

;CONTROL C HANDLER

2729
2721

005620
005624

004767
000167

177752
000400

CTLC:

JSR

JMP

CODE

SELECTED.

;RETURN TO ACT11 MONITOR.

;% SERVICE XXDP/A(CT11

4%:

LOADERS AND HALT-

BIT

BNE

MOV

060012

(000310

BNE
INC

172724

000043

(LR

JSR

PC ,RLODER
AFTHLT

JRESTORE ABS LOADER
JIF NOT APT HALT AT FATHLT

LOADERS

(ZKMA
MA(CY11 30A(1052)
05-MAR-79
CZKMAF PN
05-MAR-79 (09:02

2724
2725
2726
2727
2728
2729
2730
2731
2732
2737
2734

2735
2736
2737
2738
2739

2740
2741
2742
5743
2744
2745
2746
2747
2748
2749
2750
2751
2752

2753
2754
2755
2756

2757
2758
2759
2760
2761
2762
2763
2764
2765
2766
2767
2768
2769
2770

2771
2772
2773
2774
2775
2776
2777
2/78
2779

(09:02

PAGE 60

ERROR HANDL ING ROUT INE

SEQ 0060

;* ERROR HANDLING ROUTINE
R

womomw

e oo

e o

. w

- W

005630
005636
005640

017637
010346
C10046

000000

000402

ERROR:
1%:

MOV
MOV
MOV

;SETUP BANK NO.

0050642
005644
005650
005654

010703
004767
013703

001570

005660
005662
005666
005672
005674
005700
005704
005706
005710
005712
005716
005720
005724
05726
005732
005734
0N5740
005742
005744

010346
0127v3
013743
005043

005746
005752
005756
005760
005762
005766
005770
005772
005774
005776
000002
006004
006006
006012
006014
006022

110337

113713

016643
011143
010043
005043
016313
040013
046300
050013
012700
060700
062700
005316
002374
005720
105037
105737
001007
105720
105737

003003
105720
005713
100015
122710
001401
105210
122710
001404
032777
001002

PROGRAM COMES HERE EACH TIME AN ERROR IS ENCOUNTERED THIS
ROUTINE TYPES OUT THE ERROR MESSAGE I[N THE FORMAT GIVeN EARLIER

a(SP) ,I#SFATAL
R3,-(SP)
RO.-(SP)
IN FATAL

;LOAD THE LOCATION $FATAL WITH THE ERROR NUMBER
;SAVE R3
JAND RO ON THE STACK

FOR APT

1,R3

;GET VIRTUAL ADDRESS UNDER TEST FOR GETBNK

000312
000403

MoV
JSR
MOV
MOvB

S¥PBNK ,R3

;GET BANK UNDER

000376
00r 306

MOV
MOV
MOV

R3.-~(SP)

2%:

000402
000006

CLR

mMovB
MOV
MOV
MOV

CLR

0C0004

MOV

BiC
BIC
BIS

0000C4
001766

000022

6%:

FioV
ADD
ADD
DEC

ERRTYP:
1%:

000301

2%:

000377

3¢:

000001

5%:

000400

172426

R3,INSFATAL +1

#376 ,R3
AHPASFLG,-(R3)

-(R3)
S¥SFATAL, (R3)
6(SP) ,~(R3)

(R1),=(R3)
RO,=(R3)
-(R3)
4(R3),(R3)
RO, (R3)
4 (R3) RO
RO, (R3)

TST

CLRB
TSTB

a#TYPENB
a#3$PRERR

1STB
TSTR

(RO)+
a#SADERR
3
(RQ)+
(R3)
4%
#4377, (RC)
5%
(RO)

1ST8B
TST
BPL

BEQ
INCB
BEQ
BIT
BNE

;GET BANK NO.

UNDER

TEST

;STORE FAILING BANK NOU.

INTO PBNK

FOR APT

; TEMPORARILY STORE R3

;MAKE R3 AS THE STACK POINTER

;OUTPUT "HE WORD STORED AT

;PUT ERROR NO. ON ERROR STA(K

JPLACE THE RETURN PC AT

;PLACE BAD DATA,

(R3)

AND GOOD DATA ON THE STA(CK
;s TAKE

THE

cEXCLUSIVE OR OF GOOD AND BAD DATA
cTO FIND THE BITS THAT FAILED
JAND PLACE IT ON THE STACK

H#ENDPRG=.=24.
,RO; THIS CODE BRINGS THE RFLATIVE ADDRESS
;OF THE STARTING OF THE ERROR STA(K

PC,RO
#18. R0
(SP)
6%
(SP)+

BGE

000277
000200

PC, GE TBNK

#1.,(R0)

#400,aSWR

;FOR THE SPECIFIC 4K BANK

JRESTORE

THE

STACK POINTER

;DISABLE ANY TYPE OUT

sIF THIS IS PARITY PROBLEM
;THEN GO TO 3%

sOTHERWISE INCREMENT THE ERROR STACK POINTER BY 1
sIF THIS IS ADDRESSiING PROBLEM

;THEN GO TO 3%

s INCREMENT THE POINTER RO BY 1
;IS BIT 15 OF (R3) SET?
;IF NOT

THEN GO TO 4%

cOTHERWISE SEE IF THIS ERROR HAS OCCURED 377 TIMES
;If SO DON'T BUMP ERRCR COUNT
s INCREMENT THE ERROR C(OUNTER BY 1

;MORE THAN 1 ERROR OCCURRED ON ThIS BIT?
;BRANCH [F NO

;STOP ERROR PRINTOUT AFTER 1

;BRANCH IF

WANTED?

YES (DON'T TYPE ERROR)

(ZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 C9:02

2780
2781
2782
2783
2784
2785
2786
2787
2788
2789
2790
27N
2792
2793
2794
2795
2796
27397
2798
2799
2800
2801
2802

2303
2804
2805
2806
2807
2808
2809
2810
281

2812

2813
2814
2815
2816
2817
2818

006024
006030
006034

105237
105737
0014053

006064
006066

000411
105737
001403
004767
000403
105720
006313
001342
112737

000006

006074

004767

006100
006104
006110
006112
006114
006120
0061¢2
006130

001494
012737
000442

006132
006134

019246
005777

006140

100405

006142

004767

001526

006146
006152

105737
001401

000042

006154

006036
006042
206044
006050
006052
006056
006060
006062

004767

(09:02 PAGE 61
ERROR HANDL ING ROUTINE

000277
000300

7%:
‘%:

000402

N0C301

9%:

000342
6%:

INCB
TSTB
BEQ
JSR
BR
T1STB
BEG
JSR
BR

TSTB

a/TYPENS
a#$PRERR
9%

PC,TPPRER

8%
A#$ADERR
6%

PC, TPADERR

8%
+
(RO)
(R3)
2$

JENABLE THE TYPE QUT ROUTINE
sPARITY ERROR?
BRANCH [F NO
JELSE TYPE 'PAR ERR'’
JAND DON'T TEST INDIVIDUAL BIT FAILURES.
;ADDRESS ERROR?
JBRANCH IF NO
JPRINT “'ADR ERR''

mMOvB

#6,HTYPCNT

;POINT TO NEXT ENTRY [N ERROR STA(K
;1S THERE STILL AN ERROR BIT SET IN ERROR.
;BR IF YES = KEEP FILLING ERROR STA(CK
;TELL TYPOCT TO TYPE 6 WORDS OF ERROR STA(K.

001142

JSR

PC,PUTADR

;GO TO THE SUBROUTINE TO PLACE THE ADDRESS IN R1

004767

000€16

JSR

PC,TYPERR

002037
012600
012603

000300

10%:

CLR

000420

FNDERR:

a#SPRERR
(SP) +,R0Q
(SP)+,R3
AVSENV
2%

105737

000007

000314

8%:

BNE

MOV
MOV
TSTB

BEQ

000400
2%:

172310

ASL

.IF

NOT

THEN TEST

FOR HALT

R2,=(SP)

;SAVE R2 TEMP

TST

aSWR

7$:

T1STB
BEQ

k6?2

000000

4%:

HALT

006156
006160
006164

012602
062716
000207

000002

6%:

MOV

006166
006166
006172

004767
051105

000412
020122

017637

010000
000314
000376
000402

012703
013743
005743

;ARE WE RUNNING UNDER APT?

MOV

PC,CHECKC

000402

;CLEAR ADDRESS/PARITY ERROR FLAGS

;RESTORE RO
;AND R3

JSR

105237

;AT LOCATIONS (R3) AND (R3-2)
;TYPE ERROR STACK (7 WORDS)

;OTHERWISE INFORM THE APT
;GOTO FATHLT AND WAIT FOR APT.

000043

STACK POINTED BY R3

41, HMSGTY
FATHLT

;CHECK FOR CONTROL-C KEY

FATERR:
SFQGERR:

;THE

MOV

BMI

006200
006206

SEQ 0061

ADD
RTS

;DOES THE OPERATOR REQUIRE THE PROGRAM TO HALT
;ON ERROR
;IF SO THEN HALT ON FRROR
cIF CONTROL-C TYPED THEN PRINT ERROR HISTORY
JAND HALT AT FATHLT.
JARE WE RUNNING UNDER ACT?
;BRANCH IF NO
;PROGRAM HAS HALTED ON ERROR. R1 IS POINTING
;TO A LOCATION WHICH SHOULD HAVE CONTAINED

(SP)+ ,R2
#2,(SP)

s THE WORD

STORED

JRESTORE R2
JRESTORE

IN RO

THE RETURN ADDRESS

JRETURN FROM THE

JSR

PC,TPCRLF
/ERR #/

JTYPE "ERR #''

MOV

d(SP) ,dNSFATAL
S#TYPCNT
#376 ,R3
Q¥SFATAL ,-(R3)
-(R3)

sLCAD THE LOCATION $FATAL WITH THE ERROR NUMBER

LASCiZ
.EVEN

INCB

MOV
MoV
TST

SUBROUTINE

JTELL $TPNUM TQ TYPE 1 WORD
;$TPNUM UUSES R3 AS STA(K
sPUT ERROR NO. ON STA(K
;$TPNUM REQUIRES TKIS

(ZKMA
MACYIT 30A(1”52)
05-MAR-79
CZKMAF P11
05-MAR-79 09:0¢

2836
2837
2838
2839
2840

2841
2842
2843
2844
2845
2846
2847
2848
2849

006224
006230
006234
006236
006240

004767
105737
001327
000000
000137

000560
000420
000250

09:0Z
PAGE 62
ERROR HANDL ING ROUT INL

JSR
TSTB
BNE
FATHLT: HALT
JMP

APTHLT:

SEQ 0062

PC,FATYP
s TYPE ERROR NO.
A¥SENV
RUNNING UNDER APT?
FNDERR
;BRANCH IF YES
;rATAL ERROR OR “C HALT,
a#RESTRT
JRESTART TST BUT DON'T CLEAF PASS COUNT
;IN CASE “C RESTART.

PARERR

PARITY TRAP HANDLER
COME HERE FROM A TRAP TO 114,
THIS ROUTINE SEARCHES THE AVAILABLE PARITY MODULES AND IF ONE
HAS A PARITY ERROR BIT SET THE GET THE PARITY ERROR ADDRESS
;AND CALL THE 'ERROR'' ROUTINE TO PRINT ERROR MESSAGE.

Sgg?

:1F NO PARITY ERROR BITS CAN BE FOUND A FATAL ERROR IS DONE.

2852
2853

;REGISTER US AGE.
;RO= HOLDS PARITY MODULE ADDRESSES

Sggé

2856

;R1= GETS ERROR ADDRESS FOR 'ERROR'‘ CALL.

006244

012637

000356

PARERR: MOV

MoV
MoV

(SP) ,8#PARPS
A#SAVR6, SP

006260
006264
006270
006274

010067
010167
013701
012700

000130
000126
000352
172100

MOV
MoV
MOV
MoV

RO, SAVRO
R1,SAVR1
Q#PARMAP R1
#172100,R0

2865
2866
2867
2868
2869
2870
2871
2872
2873
2874
2875
2876
2877
2878
2879
2880
2881
2882
2883
gggg

006300
006302
006304
006306
006310
006312
006314
006320
006322
006326
006330
006334
006336
006340
006342
006344
006346
006352
006356
006362

005701
001441
006001
103005
005710
100406
020027
002032
062700
000766
042710
011001
006101
006101
006101
006101
042701
105237
0047567
000050

TST
BEQ
ROR
8CC
TST
8MI]
cMP
BGE
ADD
BR
BIC
MoV

R1
;ANY PARITY MODULES AVAILABLE?
4%
:BR IF NO -FATAL ERRORR1
;SHIFT PARITY MAP BIT INTO C BIT.
2%
JBRANCH IF THIS PARITY MODULE NOT AVAILABLE.
(RO)
;PARITY MODULE ERROR BIT SET?
3$
;BRANCH IF YES -CALL 'ERROR'’ ROUTINE
RO,#172136
;DONE ALL PARITY MODULES?
4%
:BR IF YES~ GO TO FATAL ERROR CALL#2,R0
;POINT TO NEXT PARITY ADDRESS
1%
;AND KEEP TRYING
#100000, (RO)
:CLEAR PARITY ERROR BIT.
(RO),R1
sGET PARITY MODULE CSR
R1
;SHIFT ERROR ADDRESS BITS 11-5 INTO 15-9
R1
R1
R]
#4777 ,R1 ;SAVE ERROR ADDRESS ONLY
¥ $PRERR
;TELL "ERROR’' PARITY ERROR CALL.
PC,ERROR
;*ERROR* REPORT ERROR MESSAGE
sxxxx+*ERROR NUMBER 50%xwxx»

2886
2887
2888
2889
2890

006364
006370
006374
006400
(06404

016700
016701
013746
013746
000002

2857
2858
2859
2860
2861
2862
Sggz

006250
006254

011637
013706

000360
000350

1%:

172136
000002

2%:

100000

3$:

ROL
ROL
ROL

000777
000300
177246

000024
000022
000360
000356

ROL
8IC
INCB
JSR
50

MoV
MOV
MOV
MOV
RT]

(SP)
+ ,@#PARSP

SAVRO,R0O
SAVR1,R1
SHPARPS , = (SP)
@4¥PARSP, - (SP)

;SET PARSP TO RETURN ADDRESS

;SAVE PSW FOR RETURN
JAND RESET THE SP SINCE NOT ENGUGH STACK ROOM
;TO COMPLETE THE ERROR SERVICE ROUTINE.
sSAVE RO DURING PARITY SERVICE
sSAVE R1 DURING PARITY SERVICE
;GET PARITY AVAILABLE MAP
;RO= FIRST PARITY ADDRESS.

;RESTORE RO
JRESTORE R1
sSET RETURN PSW ON STA(CK
JAND SET RETURN ADDRESS ON STA(K
JRETURN TO TEST WHERE PARITMY TRAP QCCURKED.

CZKMA
MACYT 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 09:02

2892
2893
2894
2895
2896
2897

2898
2899
2900
588;
2903
2904
2905
2906
2907
2908
2909
Sg}?
2912
2913
2914
2915
2916
2917
2918

006406
006406
006412

004767
000051

09:02
PAGE 63
ERROR HANDL ING ROUT INE

SEQ 0063

;COME HERE IF NO PARITY ERROR FLAG FOUND SET
0%
JSR
PC,FATER?
;*ERROR* REPORT
ERROR MESSAGE AND HALT AT FATHLT
51
;awvxaxFRROR NUMBER S1exwans

177554

;RO+R1 ARE SAVED HERE FOR PARITY TRAP DUE 7O INSUFFICIENT
s STACK SPACE BETWEEN 500-450.
SAVRO:
0
;SAVE RO DURING PARITY TRAP SERVICE
SAVR1:
0
;SAVE R1 DURING PARITY TRAP SERVICE

006414
006416

000000
000000

006420
006424
006426
006432
006440

105737
001406
004767
042101
000122

006442

000207

006444
006450
006452
006456
J06464

105737
001406

000277

004767

040520
000122

020122

006466

(00207

000277

000160
020122

TPADER:
051105
1%:

000134

TPPRER:

TSTB
BEQ
JSR
.ASCIZ

a4 TYPENB
1%
PC,PNTMES
/ADR ERR/

.EVEN
RTS

TSTB
8EQ

.ASCIZ

a4 TYPENB
1$
PC,PNTMES
/PAR ERR/

.EVEN
RTS

JSR

051105
1%:

: TYPE ERROR?
JBRANCH [F NO
; TYPE CR, LF AND ''ADR ER'’

;ERROR PRINTOUTS ALLOWED?
sBRANCH IF NO
;GO TO

TYPE

CR,

LF AND ‘PAR ERR"'

(ZKMA
MACY11 30A(1052)
O05-MAR-79
CZXMAF .P11
05-MAR-79 09:02

09:02
PAGE 64
TYPE OUT ROUTINE

2919
2920
2921
292¢
2923

SEQ 0064

;* TYPE OUT ROUTINE
D
M

%g%g

I *

THIS ROUTINE

IS USED BY THE PROGRAM TO TYPE QUT ANY CHARACTER

* &

2926
2927
2928
2929
2930
2931
2932
2933
2934
2935
2936
2937
2938
2939
2940
2941
2942
2943

006470
006472
006476
006500
006502
006504
006506
006510
006514
006516
006520
006524
006526
006530
006532
006536
006542

ngg

006544

2946
2947

006546
006554

2949
2950
ggg;

006562
006564
006570

2953
29564
2955
Sggg

006572
006576

010146
016601
105721
001376
000412
010146
010046
016601
112100
001403
004767
000773
012600
005201
0427017
010166
012601

NOTYP:

000002

000004

000022

000001
000002

000416

B8R

132737
001005
105737
100375
110037
000404

000040

177706
000

006602

004767
005015
006602
000207

2958
5323

006604
006610

004767
000735

177762

2961
2962
2963
2964
2965

006612
006620
006622
006630

032777
001323
123737
001717
000764

000020

171630

000042

000046

2948

2966

006556

006632

000421

177564

S$TPCHR: B]TB
BNE

2%:

177566

PCRLF:
EXTYP:

TSTB

R1,~(SP)
2(SP) ,R1
(R1)+
A
RETTYP
R1,-(SP)
RO,-(SP)
4(SP) ,R1
(R1)+,R0
4%
PC,$TPCHR
2 3
(SP)+,R0
R1
#1.,R1
R1,2(SP)
(SP) + ,R1

;IF THIS TYPE OUT HAS BEEN SUPRESSED THEN
JPREPARE TO RETURN
;SAVE R1
;AND RO ON THE STACK
;PLACE THE ADDRESS OF MESSAGE TO BE TYPED IN R1
;PLACE THE BYTE TO BE TYPED IN RO
JIF 1T IS END OF MESSAGE THEN GO TQ 4%
;OTHERWISE GO TO TYPE THE CONTENTS OF RO

JRESTORE RO
;CAUSE R1 TO
JPOINT TO EVEN ADDRESS
JMODIFY THE RETURN ADDRESS
;RESTORE R1

EXTYP

;AND RETURN VIA RTS PC

#4640, HSENVM
4%

JHAVE TYPE OUTS BEEN DISABLED?
JIF SO THEN RETURN FROM THE SUBROUTINE

a#sTPS

:WAIT HERE

8PL
MOVR
BR

pd 3
RO,a#$TPB
EXTYP

JUNTIL THE PRINTER IS READY
;LOAD DATA TO BE TYPED INTO DATA REG.
:RETURN

JSR
JASCIZ
.EVEN
RITS

PC,$TYPE
<15><12>

;CR/LF

;s RETURN

TPCRLF: JSR
B8R

PC,PCRLF
$TYPE

JTYPE CR/LF
JNOW GO TO TYPE THE REST OF

PNTMES: BIT
BNE
CMPR
BEQ

#20,3SWR
NOTYP
aNLl, H66
NOTYP
TPCRLF

;PRINTOUTS ALLOWED?
JBRANCH IF NO
JRUNNING UNDER ACT 11?2
;BRANCH IF YES =NOT PRINTOUT;SEND CR/LF AND TYPE MESSAGE.

THE MESSAGE

C(ZKMA

MACY11

CZKMAF P11

30A(1052)

095-MAR-79

05-MAR=-79 09:02

09:02

PAGE 65

ROUTINE

2967

TO TYPE QUT A DECIMAL NUMBER

2968

;% ROUTINE TO TYPE OUT A DECIMAL NUMBER

2970
2971

;¥
o*

2969

SEQ 0065

B e
e

53;%

THIS ROUTINE IS USED TO CONVERT THE CONTENTS OF LOCATION

DECWRD TO DECIMAL NUMBERS AND TYPE THEN FOLLOWING 3 SPACES

2974
%g;z

2977
2978
2979
2980

006634

004767

177732

006640
006642

005046
013746

000312

%9;%12

006652

006646

002403

162716

000012

2983
2984
2985
2986
2987
2988
2989
533(1)

006654
006660
006662
006666
006672
006676
006702
006706

005266
000772
062716
052716
112667
052716
112667
004767

000002
000012
000060
000020
000060
000007
177572

2992
2993
2996

006712

020040

030040

006720

000207

TYPDEC:

JUSR

PC,PCRLF

$TPDEC:

(LR
MOV

~(SP)
o#DECWRD ,-(SP)

SUR

#10.,(SP)
4%

(I;(F) }gigU‘BER IN (SP)

INC
BR
ADD
BIS
MOVB
8IS
MOVB
JSR

2(SP)
2%
#10.,(SP)
#60, (SP)
(SP) +,6%=2
#60, (SP)
(SP)+,6%-3
PC,STYPE

JOTHERWISE ADD 1 TO THE LOCATION STORING 10°'S DIGIT
JAND RETURN TO 2%

LASCIZ
.EVEN
RTS

2%:

4%:

000060
6%:

BLT

;TYPE CR/LF
;GET THE WORD THAT HAS TO BE CONVERTED TO A
.DeCIMAL NUMBER
WAS LESS THAN 10.

THEN

<MAKE THE CONTENTS OF (SP) A DECIMAL NUMBER
JPLACE THE 1'S DIGIT TO BE TYPED
;MAKE THE CONTENTS OF (SP) A DECIMAL NUMBER
JPLACE THE 10°'S DIGIT TO BE TYPED
:(B;OSIEECEEPE THE NUMBER [N DECIMAL FOLLOWED BY

00/
JRETURN FROM THE SUBROUTINE

(ZKMA
MACY11 30A(1052)
O0%-MAR-79
CZKMAF P11
05-MAR-7S 09:02

(09:02
PAGE 66
OCTAL TYPE OUT ROUTINE

2995
2996
2997
2998
2999

;v OCTAL

;

006722
006730
006732
006736
006742

032777
001054
004767
004767
000447

3017
3018
3019
3020
3021
3022
3023
3026
3025
3026
3027
3028
3029
3030
3031
3032
3033
3034
3035
3036
3037
3038
3039
3040
3041
3042
3043
3044
3045
3046
3047

THE

LOW ORDER BITS

BITS

006746
006750
006754
006760
006762
006764
006766
006770
006772
006774
006776
007000
007004

012113
105237
052743
106113
103376
005000
106113
006100
106113
006100
000405
004747
020040

(R1)+,(R3)
a#TYPCNT
#4,-(R3)
(R3%)
’3$
RO
(R3)
RO
(R3)
RO
$TPNUM
PC,$TYPE
/7
/

007010
007012
007016
007020
007022
007024
007030
007034
007036
007040
007042
007044
007046
007052
007056
(007060
007062

005000
012723
000241
006113
006100
052700
004767

MOV
INCR
TYPOCT: BIS
2%:
ROLRB
BCC
(LR
ROLB
ROL
ROLB
ROL
BR
RPTOCT: JSR
LASCIZ
.EVEN
FATYP:
(LR
$TPNUM: MOV
4%:
cLc
ROL
ROL
BIS
JSR
CLR
ROL
ROL
ROL
ROL
DECR
B8NE
DECB
B8NE
OCTXT:
RTS

005000
006113
006100
006113
006100
105363
001361
105337
001347
000207

177500
000040

000006

000060
177512

177776
000314

TYPE

QUT

THE OCTAL

VALUES

(I.E.

BITS 0-15)

THE

ADDRESS

16 8 17).

CONTENTS OF

LOCATION R3-1

AND RO ARE

DESTROYED BY THIS SUBROUTINE
BYTE TYPCNT SHOULD BE SET TO THE NUMBER OF WORDS THAT HAVE
T0 BE TYPED.

OCTTYP:

000314
000004

TO THIS ROUTINE WITH R3 POINTING

TYPED WHERE AS R3-2 SHOULD CONTAIN THE HIGH ORDER BITS

(J.E.

012123

MOV

IS USED

SHOULD COME

#20000, aSwk
oCcTXT
PC,PCRLF
PC,TYPOCT
OCTXT

177634
000012

171520

CONTROL

TYPERR: BIT
BNE
JSR
JSR
BR

006744

020000

LR BE BE NN

THIS ROUTINE
AV AN A

ér\) g g

;

3010
3011
3012
3013
3014

%8}2

TYPE QUT ROUTINE

A e
———

3005
3006
3007

3009

SEQ 0066

(R1)+,(R3)+

RO
#6,(R3)+
(R3)
RO
#60,R0
PC,$TPCHR
RO
(R3
RO
(R3)
RO
=2(R3)
4%
A#TYPCNT
RPTOCT
PC

JERROR PRINTOUT WANTED?
;BRANCH ]F NO
cTYPE CR/LF
;TYPE OCTAL NO.
JRETURN VIA RTS P(

;gLAgg THE HIGH ORDER BITS AT LOCATION POINTED
;BY

;AND NOW PLACE THE LOW ORDER BITS
JENABLE THE TYPE OUT OF ONE OCTAL WORD

JGET BITS 17 & 16 INTO RO

;

TYPE 3 SPACES

JENARLE

THE TYPE OUT OF 6 OCTAL DIGITS

JPLACE THE CARRY FROM (R3) IN RO
cOR THE CONTENTS OF RO WITH AN ASCII O
; TYPE THE OCTAL NUMBER STORED IN RO
sPLACE THE CARRY FROM (R3)

IN RO

;PLACE THE CARRY FROM (R3) IN RO
JIF WE HAVEN'T TYPED THE 6 OCTAL DIGITS
. THEN REPEAT FROM 4%
JIF ALL THE WORDS REQUIRED HAVE NOT BEEN
;TYPED THEN REPEAT FROM RPTOCT

CZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 09:02

(09:02

PAGE 67

SUBROUTINE

3048
3049
3050
3051
3052

FOR MEMORY MANAGEMENT
ROUTINE

SEQ 0067

TO SFT UF MEMORY MANAGEMENT REGISTERS

3053

3054
3055
3056
3057

PROGRAM

CONTROL

IS AVAILABLE

THE MEMORY

COMES

OR NOT,

ABOVE

28K

HERE

AND

TO DETERMINE

THE MEMORY MANAGEMENT

IS AVAILABLE

IS REQUIRED

TO BE

THEN WHETHER

TESTED OR NOT.

007064
007070
007074
007102
007104
007110
007114
007120
007124

012702

105037

032777

001441
012700
012720
012710

005037

105237

007130
007134
007136
007142
007144
007150
007152
007156
007162
007166
007172
007174
007200
007202
007206

005237
005010
012740
000207

007210
007212
007216

022626
004767
047516

007224
007230

004767
000052

007232

000762

00723«
007240

013702
000713

012701
005021
062702
010221
020127
103772
012711
012701
012721

020127
101773

001400
000276

MEMMAG: MOV
MMREG:
CLRB

#1400,R2
WMMAVA

;CLEAR THE BYTE

; THAT MEM,

THAT

MANAG.

]S SUPPOSED

IS AVAILABLE

BIT

#10000,aSwWR

000004
007210
000340

MOV
MOv

ANOMM, (RO) +
#340,(R0O)

;RETURN ADDRESS TO NOMM

000276

INCB

Q¥MMAVA

;éFTéT

010000

171346

BEQ
MOV

177572

(LR

172340

00020C

2%:

172355

007600
172300
077406
172316

CMP

BLOS
INC
$RETMM: CLR

177572

000104

177366
045440

RETMM:

NOMM:

000124

cIF NOT THEN RETURN FROM THE SUBROUTINE
;JPREPARE TO SETUP TIME OUT VECTOR

JAND WITH A PSW OF 340

JTRY TO REACH MEM. MANAG.
IS AVAILABLE

SRO

THEN SET MEM.

MANAG.

#172340,R1
(R1)+
#200,R2
R2.(R1)+
R1,#172356
2%
#7600, (R1)
#172300,R1
#77406,(R1)+

;SETUP PDRO-PDR7

4%
a#SRO
(RO)

JENABLE MEM. MANAG.
JRESTORE TIME OQUT TRAP VECTOR FOR ANY FUTURE

R1,#172316

;R1 IS POINTING TO PARQ
;PARO WILL POINT TO BANK O
;SETUP PAR1-PAR6

JPAR7 IS POINTING TO THE

[/0 PAGE

CMP
JSR
.?SELZ

(SP)+,(SP)+
PC,TPCRLF
/NO KT/

JRESTORE STACK POINTER
;TYPE 'NO MEMORY MANAGEMENT MESSAGE

JSR

PC,FATERR

;*ERROR* REPORT

$RETMM

;

a#172354 ,R2

JPREPARE

MOV

B8R

AVAILABLE

;BY

#BUSER,~(RO)
PC

UPMM:

#SRO

TESTING

cHAS THE OPERATOR ASKED TO CHECK MEMORY MANAG. ?

MOV
RTS

176736

172354

MOV
CLR
ADD
MOV
CMP
8LO
MOV
MOV
MOV

RETMM
#4 ,RO

TO INDICATE

FOR

MMREG

ERROR MESSAGE AND HALT AT FATHLT

suxxxxsERROR NUMBER 52%#wwxx
RESTORE

TRAP

TIME OUT

TRAP VECTOR

TO UPDATE MEMORY MANAG.

REGISTERS

(ZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 09:02

(09:02

PAGE 68

18 BIT APDRESS GENERATOR

3095
3096
3097
3098
3099

005063
010113
105737
001425
010146
042701
040113
052701
006001
103376
062701
01110
052701
06101

017777
004000

2%:

172340

01000C

»
2
¥
%
»
%

CLR

MOV
T1ST8

000276

103376
006101
006143
0061901

007330

PUTADR:

BEQ
MOV
BIC
BIC
BIS
ROR

8CC
ADD

MOV

(%:

BIS

ROL
BCC
ROL
ROL

ROL

006123
050113
012601
000207

ROL
BIS

6%:

MoV
RTS

SUBROUTINE

1S USED

TO PLACE

R1, (R3)
SHMMAVA

;PLACE

THE ADDRESS

THE ADDRESS STORED

IN R1

IN THE LOCATION POINTED BY R3. THE ADDRESS IN R1 S CONVERTED
TO AN 18 BIT ADDRESS ONLY IF MEM. MANAG. IS AVILABLE IN WHICH
CASE THE HIGH ORDER BITS OF THE ADDRESS ARE PLACED IN LOCATION

POINTED BY R3-2

-2(R3)
6%

,=(SP)

8i7777.R1
R1, (R3)

#4009.R1
R1

#172340,R1
(R1).R1
#10000,R1
R1
4
R1
-(R3)
R1
(R3)+
R1. (R3)
(SP)+.R1

STORED

IN R1

IN LOCATION

;1S THE MEM. MANAG. AVAILABLE ?
:é; QO;1THEN RETURN FROM THE SUBROUTINE

(R3)

SAV

;CLEAR BITS 0-12 OF THE ADDRESS IN R1
;LEAVE BITS 0-12 OF THE ADDRESS IN (R3)

JPREPARE

TO SHIFT R7

BY 12 PLACES

;GET THE NUMBER OF PAR IN R1
;GET THE ADDRESS OF PAR IN R1
;LOAD R1 WITH THE CONTENTS OF PAR
;PLACE

THE ADDRESS BITS 13-17 IN BITS

11-15 OF

;PLACE BIT 16_OF THE ADDRESS
;PLACE BITS 13-15 OF

THE ADDRESS

;RESTORE R1
cRETURN FROM THE SUBROUTINE

IN LOCATION

»
n
8,

2
S,
I

NP 2

B
B

000001

007340
007344

177777

GETADR: MOV
CLR

2%:

THIS SUBROUTINE IS USED TO GET ADDRESS FROM APT MAILBOX AND
PLACE IT IN THE LOCATION USED BY THE PROGRAM TO
DEFINE THF
MEMORY BOUNDRIES.
PROGRAM CONTROL SHOULD COME TO THIS SUBROUTINE WITH R1 POINT=~

ING TO THE MEMORY TYPE IN THE APT MAILBOX AND R3 POINTING TO
}gfetogf;égg*Z WHERE THE LOW ORDER BITS OF THE ADDRESS HAVE

007332
007336

MOvVB
RTS

1(R1),=(R3)
-(R3)

=1(R1),(R3)

;PLACE BIT 17 IN LOCATION POINTED BY R3-2

;* GET ADDRESS FROM THE APT MAILBOX

LRI

) e
D
e}
nd o
b cd
b e
—

NN = Do

=2 OVONOWVNEB
NN —=O

3109

177776

THIS

Setev
v, 8,000, 0

;* 18 BIT ADDRESS GENERATOR

3100
3101

AN N NN N NN NN N NN

SEQ 0068

;PLACE THE LOW ORDER BITS QOF THE ADDRESS
;CLEAR THL LOCATION WHERE THE HIGH ORDER BITS

JHAVE

TC BE PLACED

;PLACE BITS 16 & 17

JRETURN FROM THE

SUBROUTINE

(R3)

CZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF .P1?
05-MAR-79 09:02

3146
3147
3148
3149
3150
3151
3152
3153
3154
3155
3156
3157
3158
3159
3160
3161
3162
3163
3164
3165
3166
3167
3168

3169
3170
3171
3172
3173
3174
3175
3176
3177

(09:02
PAGE 69
CONVERT 18 Bi1

ADPRFSC

;* CONVERT

TO "HE PAR FORM

SEQ 0069

18 BIT ADDRESS TG THE PAR FORM

* %

THIS SUBROUTINE

IN A PAR.

$GTSIZ:

CLR

-(SP)

007350
007352
007354
007360

012301
011302
042702

RETSIZ:

MOV
MOV

(R3)+,R1
(R3) ,R2

2$:

4$:

160000

ROR

gg@

MOV

105737
001404
005037
105037

000207

000276

CLRMM:

177572

000276

1%:

IS LOADED WITH BITS

;LOAD R2 WITH THE LOW ORDER BITS OF

(SP)

;IF

RETURN PC

IS ZERO

THEN

SFLAG THAT WAS SET AT $GTSIZ
:POP THE FLAG OFF STACK
*KEEP ROTATING

(R3)+,R1

;PLACF

RO.R1

;LEAVE BITS 0-12 OF

SUBROUTINE

THE LOW ORDER ADDRESS BITS

*RETURN FROM THE

THE ADDRESS

Lfi{? SUBROUTINE

IS CALLED TO DISABLE

TSIR

S#MMAVA

;WAS

CLRB
RTS

a#MMAVA
PC

;AND DO NOT ATTEMPT TO TEST MEM.
;RETURN FROM THE SUBROUTINE

1%
a#SR0O

REGISTERS

—

010046

042703
052703

GETBNK:

017777
070000

MOV
MOV

BIC

BIS

IN R1

THE MEMORY MANAGEMENT

THE MEMORY MANAGEMENT ENABLED

;IF NOT THEN GO TO 1%
;DISABLE THE MEMORY MANAGEMENT

TST13

TO GET BANK NO.

UNDER TEST

;RO=POINTER TO PAR UNDER TEST
:R3=VIRTUAL ADDRESS ON ENTRY
;RO+R3 ARE RESTORED ON EXIT.
010346

IN R1

TO DISABLE MEMORY MANAGEMENT

.* GET BANK NO. UNDER TEST
CALLED BY ERRTYP AND

007440
007442
007444
007450

THE

SURRORNE

B8EQ
CLR

THE ADDRESS

IT MUST BE

6$
(SP) +
z;oo.nz

RTS

007420
007424
007426
007432
007436

;ROTATE R1 AND R2 7 TIMES

#160000,R0

3179
3180
3181

IN R2.

MOV

BIC

IS LEFT

:CLEAR ADDRESS BITS 0-12

#40,R2

BNE
ST
S&S

6$:

;PREPARE TO PLACE ADDRESS BITS 13-17 IN BITS
;0-4 OF R2

817777 .R2

8IS

THE RESULT

THE ADDRESS AND RO WITH 160000

BIC

TST

000100

STORED

0~12 OF

005046

052702
106001
006002
103375
005716
001004
005726
052702
000767
012301
012700
040001
000207

18 BIT ADDRESS

i
007346

007364
007366
007370
007372
007374
007376
007400
007404
007406
007410
007414
007416

TO CONVERT

LOCATIONS POINTED BY R3 AND R3+2 TO THE FORM IT WILL BE STORED

- %

017777
000040

IS USED

3178

W e N NNIN
N N NN
NN = = d e b b ) e

RO,=(SP)
R3.-(SP)

#17777.R3

#10000.R3

:SAVE RO
:SAVE R3

$SAVE ONLY VIRTUAL BANK 8115
;SETUP RT SHIFT B]T

MANAG.

INTO PBNK.

CZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF, P11
05~MAR-79 09:02

3202
3203
3204
3205
3206
3207
3208
3209
3210
3211
3212
3213
3214
3215
3216

007454
007456
007460
007462
007466

000241
006003

007470
007472
007476

006303
062703
011300
J06300
000309

103376
105737
001407

110003

010337
012603
012600
000207

09:02

PAGE 70

18:

CLC
ROR

BEQ

SUBRQUTINE

000276

TO DISABLE MEMORY MANAGEMENT

B((C
TST8B

SEQ 0070

JSHIFT A BANK BIT

1%
Q¥MMAVA

JUNTIL IN BITS <2:0> OF R3
;MEMORY MANAGEMENT UNDER TEST?
;NO EXIT

;GET PAR ADDRESS AND PHYSICAL BANK NO.

ASL

172340

000312

2%:

ADD
MOV
ASL
SWAB
MOVB
MOV
MOV
MOV
RTS

;MAKE R3 PAR ADDRESS OFFSET.

#172340,R3
(R3) ,RO
RO
RO
RO,R3
R3, a4PRNK
(SP)+,R3
(SP)+,R0O

sJMAKE FULL PAR ADDRESS.
;GET PAR CONTENTS

JSHIFT BANK BITS TO BITS <7:0>
;SET R3 TO PHYSICAL BANK NO.
;STORE PHYSICAL BANK NO.
JRESTORE R3

JRESTORE RO

PARITY ENABLE/DISABLE

THIS ROUTiNE

JRETURN TO CALLER

ROUTINE

ENABLES OR DISABLES PARITY MCDULES AND PRINTS ASSOCIATED MEASSAGES.

IF PARITY AVAILABLE

ALSO

THEN BIT13 OF 'REL'*
IS SET AND 'PAR''ITY IS PRINTED.

THE BACKGROUND

TEST PATTERN

(LOC.

RFGISTER USAGE.
;RO- POINTS TO BUS TIMEQUT TRAP VECTOR (LOC.
;R1= HOLDS PARITY MODULE UNIBUS ADDRESS.

:R2= ON ENTRY HOLDS ENABLE/DISABLE CODE

;

IF R2=0 THEN DISABLE
IF R2=1 THEN ENABLE

R3 SCRATCH TO SETUP LOC.

sCALL IS

;
;

007520
007526

032777
00145¢

004000

007530
007534
007540
007542
007546
007552
007556
007560
007564
007566
007570
007572
007576
007600

012700
012710
06071y
005037
012701
012703
010241
050337
000241
006003
103372
012710
005702
001431

000004
000116

000352

172140
100000

000352

170722

PARITY:

1%:

2%:
3%:

000104

BAKPAT)

SET-376

PARMAP WITH A MAP OF

PARITY MODULES PRESENT.

MOV
JSR

#1,R2
;ENABLE
PC,PARITY

CODE

BIT

#4000 ,3SWR

JPARITY

MOV
MOV
ADD

#4 ,RO
#5%- .<6, (RO)
PC, (RO)

JPOINT RO TO BUS TIMEOUT ADDRESS.
;SET RETURN FROM TIMEOUT TRAP TO 5%
JIN THE CURRENT BANK.

BEQ

TEST WANTED?

;BRANCH IF NO

CLR

a#PARMAP

;CLEAR PARITY MAP HOLDER.

MoV

RZ2,=(R1)

SJENABLE A PARITY MODULE+TRAP IF NOT AVAILABLE.

MOV
MOV
%Eg

ROR

B8CC
MoV
TST

BEQ

#172140,R1
#100000,R3
R3, a#PARMAP

2%
#BUSER, (RO)
R

;SET R1 TO LAST PARITY MODULE ADDRESS+2
;SET R3 TO PARMAP AVAILABLE CODE BEGIN.

;NO TRAP TO 5%,

SO SET PARITY AVAILABLE.

;SETUP NEXT PARMAP BIT

;BRANCH IF NOT DONE ALL PARITY ADDRESSES.
;RESET BUS TIMEQUT TRAP VECTOR

:1S

THIS A DISABLE

JBRANCH IF

YES

CALL?

(EXIT)

(ZxMA
MACYT1 30A(1052)
05-MAR-79
(ZKMAF P11
05-MAR-79 0 9:02

1258
3259
3260
5261
3262
3263
3264
3265
3266
3267
3268
3269
3270
3271
3272
3273
3274
3275
3276
3277

007602
007606
007610
007614
007622

005737

000352

047516

050040

001011
004767

176779

007624
007630

000
007624
006767
000053

007632
007640

012737

152737

0000490
000376

007646
007€52

004767
040520

176732

007656

0C0405

(9: 02

SUBROUTINE

051101

TST

A#PARMAP

JSR

PC,TPCRLF

LASCIZ

4%:

JPRINT

/NO PAR/

PC,FATERR

81358
MOV

#40,34REL
#376,4BAKPAT

JSR
ASCIZ
.EVEN

PC,TPCRLF
/PAR/

B8R
JGET HERE

EXITC

PARITY ADDRESS

SEQ 0071

ANY PARITY MODULES

JBRANCH IF

JSR

000316

JWERE

.EVEN

000405

TO DISABLE MEMORY MANAGFMENT

BNE

17633¢

00012¢

PAGE 71

YES

FOUND?

'NC PAR"'

;*ERROR* REPORT

ERROR MESSAGE

srexnxafIROR NUMBER S3wveennr
;SET PARITY UNDER TEST FLAG
:SET BACKGROUND PATTERN TO

sWORST

CASE

PARITY

JPRINT "TST PARITY"’

CODE.

JAND EXIT VIA RT3 PC
TIMED QUT

TO LOC.

AND HALT

FATHLT

(ZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 09:02

3278
gggg

007660
007662

022626
000741

3281
3282
3283
3284
3285
3286
3287
3288
3289
3290
3291
3292

00766«
007672
007672

142737

00004C

000207

3308
3309
3310
3N
3312
3213
3514

000405

5%:

(MP
BR

(SP)+,(SP,+
3%

JRESET STACK FROM TRAP
JKEEP TRYING PARITY ADDRESES.

¢%:
EXITC:
7%:

BI(B

#40,4REL

;CLEAR PARITY TESTING FLAG

RTS

JRETURN TO CALLER

SEQ 0072

s CHECKC
;
THIS ROUTINE CHECKS IF CUNTROL-C WAS TYPED AT THE END OF EACH
;TEST OR IN THE ERROR TYPE RUUTINE.
s 1F CONTROL-C TYPED THE PRUGRAM IS RETURNED TO LOWER MEMORY [F |T WAS
JRELOCATED AND THE ERROR HISTORY IS PRINTED OUT.
JEINALLY IT HALTS AT FATHLT.

%232

3295
3296
3297
3298
3299
3300
3301
3302
3303
3304
3505
%%8?

H
6
(09:02
PAGE 72
SUBROUTINE TO DISABLE MEMORY MANAGEMENT

007674
007700
007704
007706
007712
007716
007722
007724
007730
007734

007740

105037
105737
100372
113702
042702
122702
001363
110237
004767
041536
007740
000167

007744

007744
000000

000001

000315
177560

177562
000200
000003
000315
176650
000

175132

(HECKC:

CLRB
TSTB
8PL
MOVB
BI1C
CMPB
BNE
MovB
JSR
ASCIZ
.EVEN
JMP

.~7744
ENDPRG: 0

.END

a# SAVKRE
JINIT CONTROL-C FLAG.
a4 TKS
JANY CHAR. TYPED?
EXITC
;BR IF NO-EXIT VIA RTS P(¥ KRB, R2
JGET THE CHAR TYPED.
#200,R2 ;CLEAR THE PARITY BIT.
#3,R2
;1S IT CONTROL-C?
EXITC
JBRANCH IF NO <EXIT VIA RTS P(CRZ,a4SAVKBB
JELSE STORE THE (HAR. FOR USE AS A FLAG.
PC,TPCRLF
JPRINT "'C'*
/20

RELOER

;GO RETURN PROGRAM TO . OWER CORE

IF RELCCATED.

;THIS BEGINS THE STORAGE FOR THE ERROR HISTORY
sSTACK,.FOR EACH 4K BANK 18. BYTES ARE SAVED.
;ALSO THE ABSOLUTE LOADER AND XXDP (CODE IS SAVED
SJAFTER THE ERROR STA(K.
;FOR 4K MEMORY SIZE THEN PROGRAM=77444+22=7776

(ZKMA
MACYi1 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 0 9:02
LI

000000
ABASE
ACDW
000000
ACDW? =
ACPUOP=

ACT1
ADDWO =
ADDW1

09: 02

PAGE 74

CROSS REFERENCE

TABLE =-- USER SYMBOLS

SEQ 0C73

1200
1200
1200
1200
2694
1200
1200
1200
1200

1200

1200
1200

APASS =
APRIOR=
APTHLT
APTSI2
ASWREG=
ATESTN=

2721

AUNIT
AUSWR
AVECT1
AVE(CT?2=
BAKPAT
600316

BEGIN
BRTFSZ
|BUSER

000500
001012
000104

1300
1200
1200
1200

1200

1200
1200
1026

o
o

S
U
S
QU QU S
U
N N
G

AMTYP3=
=
AMTYP4

1200
1200
1200
1200
1200
1200
120C
1200

S =
AMAMS
AMSGAD=
AMSGL G=
AMSGTY=
AMTYP1=
AMTYP2=

1200

NUNUNDNLNINDNLNINUTLNDNVPLNDND
PO DAY
OWNWNWNOOOWINWMNIWWWNIO
=

AMAMS 2=
AMAMS 3~

Sy
N Y S

1200

1202
1200
1200
1200
1200
1200
1200

PONUNUMNLINGD
2O
=N

1200
1200
1200
1200
1200
1200

-—

1200
1200
1200
1200
1200
1200
1209
1200

1491

2149
12484

5255

1705

2152
258

1707

2191~
2559

1715

2288
2565

1726«

2364

1790

2345

1822+

2579+

2004+
3269+

2039

2074+

(ZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF P11
05-MAR-79 09:02

004030
004354

ENDZ2

002374

END3
END&
ENDS
END6

002642
002752
003120
003254

END?7

003500

ERROR

005630

ERRTYP
EXITC
EXTYP
FAILNM

005746
007672
006602
005432
006166

FATHLT
FATYP

006236
007010

GALLOP
GETADR
GETBNK
GE'SIZ

003526
007332
007440
007350

LOOP
LOWADD
LOWBNK
LOWER

LOWTWO

MAXADR

MAXMEM
MEMMNG
MEMTST
MAAVA
MMREG

— —

°a
®

=PI

— OV =N

1439
15494
1560

31844

1147

2663~

2698+

1266

2757
2644

33094
2714

2578#
27204
263564
1144
1689
1729

TABLE ~-- USER SYMBOLS

SEQ 0074

2978

2204w
2459
1825
1864

1786

2456

1850

2473

27314

2883

1897

1924

1982

1890

1632

28264

2894

3088

3264

2056

2162

3301
1474

006114

000332
000330

001610
000326
030304
005150

000324

= 020200

31594

2037

2072

2579

005262

000340
007064
001532
000275
007070

000054

1624

1819

2530
3094
1327

2575

3184

3187«

13304
1632
17734

14774
1667
17994
1972

157S
16704
1834
19754

16024
1771
18934

2113
23104

—l§\o~

HIGHAD
HIGHTW

14854
1417
5646

2812
2557
2599

CROSS REFERENCE

(9 |

FNDERR

2534

PAGE 75

PN
—
W
— 00

FATERR

002264

1547

B N\

END1

ENDIO
END12

007674
005144
001540
007420
001672
001600
005172
005620
000312
005334
007744
000310
002164

— ed

CHECKC
CKDONE
CLRMEM
CLRMM
CNTSCP
CONT
CONTMM
CTLC
DECWRDL
ENDPAS
ENDPRG
ENDSTK
ENDO

(09:02

21564
2444

2162
2447N

1591#
1721
1853

2021
22424
2473

(ZKMA
MACY1Y 30A(1052)
05-MAR-79
CZnMAF P11
05-MAR-79 09:02

SAVR6
SCOPE =
SEQERR
SETSTK
SETSWR

SLFSIZ
SRO
=
START
STRIDI
SWAPAT
SWHALT
SWR
SWREG

3306

1066

2647H

(001314
000354
000342
006414
006416
000344
000346

001024
177572
000200
000302
000320
001712
000450
000176

1945+

1977«

1988

32674

2328+

2329

3012
2906

2914

29624

2535

2537«

2556

2709

2840

2337«

2338

1990«

2003~

2563+

3268

3281«

2021

2113

2024+
2434

2047
2449

2063+
2467

2239

2279

2380

28274

1618

2244

2248

2508

2427

2674

2720

003140

000350
000240
006166
001220
000656

3264

3046
2249
2245

22484

2690

3295+«

16174

3302«

2900#
29014
-\
N

000315

SAVLDR
SAVLOC
SAVMAX
SAVRO
SAVRT1
SAVR4G
SAVRS

1465

2564
1608

2566+

2858

1834

1883

1972

1334
2807

2962

1448

1494

1438~
11844

1702

3079+

3186«

2035+
2161

2064
2190«

SAVKBB

RPT6

30914

007000
003522
00407y

11134
11634

1928+

2322
2746

— M)
hown

RPTOCT
RPTIC
RPT11

3088

RLODER

005374
006530
005576

28974

SEQ 0075

RETSTK
RETTYP

005076
000250
007206

10004

—d b

RELOER
RESTRT
RETMM

TABLE == USER SYMBOLS

2285+
2505«
3215«
2958
2512
2794

REL
= 000405
RELBOT
000322
RELOC
005004

3258

000070
000136

007242

2893

PWRDN
PWRUP

PUTADR

25864

1502«

000312

006572
006612

CROSS REFERENCE

32414
3247
2868
2889

b =D

PBNK

006244
005470
007520
000352
000360
00035¢
000306

PCRLF
PNTMES

PAGE 76

2965
30154
30474

006744
007062
Q00556

PARERR
PARFL
PARITY
PARMAP
FARPS
PARSP
PASFLG

Q06470

NOTYP

OCTTYP
OCTXT
ONEPAS

2883

007210

OWVNNLIWN
=
O -2 (N

NOMM

09:02

414

59#

1296+

2693

1301+

2778

3010

CZKMA
MACY11 30AC1052)
O05-MAR-79
CZKMAF P11
05-MAR-79 09:02

SW11

= 004000

TKS
=
TPADER
TPCRLF
TPPRER
TRYSR
ISTGO
TSTMM
TSTREL
TSTRP
TSTSCP
IS1SIZ
1ST0
TST1
TST10
TST11
TST12
TST13
TST2
TST3
1ST4
TSTS
TST6
1ST7
TYPCNT

TYPDEC
TYPENB
TYPEOP
TYPERR
TYPMEM
TYPOCT

TYPSIZ
TYPSTK

UPMM

TABLE == USER SYMBOLS

SEQ 0076

001626

}g%;

15154

1516

1517

1518

1519

1520

1521

1522

177560
006420
006604
006444
001014

11554
2658
1067
2675
1318

3296
2787
2695
2783
13344

29044
2827
29124

2958%

2966

3085

3260

3271

3303

005156
001372
000570
0C1660
001376

1453
1261
1264
15454
14294

25734
14384
12664
1647

2670«

2792+

2832+«

3018+

3045+

2764

2780%

2904

2912

4084
447
4724
500

412
L4BH
475
5014

417
4524
479
5034
546

4184
455
4804
510
5474

001714

1554

1515
1516
1523
1524
1525
1526
1517
1518

15734
16554
21104
22364
22778
23784
16994
17444

002754

1520

18804

002644

003122
003256
000314
006634
000277
005526
006722
001206
006754
001164
005354

007234

000301
000276
005176
00042¢
000410
005572
000156
000420
000421
005476
000420
000450

1519

18324

13824

10254
4024

1750
404

1886
4054

559
S90#

11304
1098
2577
12154
12064
2701
994
12114
1212
2637
12104
1110

1525

152¢

1968#
20184

423
4564
484
5114
549

624n
459
L4854
514
5504

429
4604
488
S15#
555

4304
463
489
518
S564

1823

1335
2648

436
464n
492
S194

1524

2346

1521
1522
11484
2662
11224
6954
2796
13884
3013
1332
2642H

2578

1523

15574

001730
002166
003502
004032
004104
004356
002266
002376

WRTMEM
000120
$A
= 000001

$ADERR
$APTHD
$CNTMM
$CPUOP
$DEVCT
$DJAGY
$ENDAD
$ENV
$SENVM
$EOP
$ETABL
$ETEND

9824

(09:02
PAGE 77
CROSS REFERENCE

1254+

29754
1125
30104

30194

30934

4374
467
4934
529

5604
394

442
4684
496
5304

563
5954

1975
4«07

4434
471
L4974
533

5644
601

1133
11044
25794

1596«
1117

1719«

1552+
27094
10440
1299
1317
2645

2062+

2186+

2707
1545
1616
26884

2801
2946

12394

S3in
567
6024
1783«

2837

542
S68#4
607

1848+

4134
451
4764
502
5434

575
608#
2768

S764
611
2785

579
6124

5804
616

583
6174

584
6204

589

(ZKMA
MACY11 30A(1052)
05-MAR-79
CZKMAF .P11
05-MAR-79 09:02
$FATAL

$GTSIZ
$HD
=
$HIBTS
$HIMAX
BB
=
$MADR1
$MADRZ
$MADR3
$MADRG
$MAIL
MAMST1
MAMS?
MAMS3

000402

007346
000002
000276
000334
177562

12034

09:02
PAGE 78
CROSS REFERENCE

2731«

2831+

2834

1106

1110

1204

1271

1286

1316+

1401

12024
1324

2803«

16504
2009
2692%

1652
2083#
2698

16914
2085

1693
22084

17334

1735

18264

1828

18664

2210

22554

2257

23484

2350

1253«

2765

2781

2798+

2882«

1574

1656

1700

1745

1833

1881

1969

2019

1655

1699

1744

1691
21114

17004
2208

9974

9994

1005#

11334

11354

31564

1061

12284
12324
12354
12384

000430
000434
000440
SMAMSS
000444
MAXM
000336
$MBADR
000300
$MSGAD
000414
BMSGLG
000416
MSGTY
000400
$MTYP1
000431
MTYP2
000435
SMTYP3
000441
BMTYPSL
000445
SNWTST= 000001

1129
3091
997
9824

1301
1113

$PASS
$PASTM
$PRERR
$RETMM
$SVPC =
$SWR
=

000406
000304
000300
007200
000044
000000

SSWREG
$TESTN

000422
000404

12134
1065

$TN

= 000014

$TPB
= 177566
$TPCHR
006546

$TPDEC

$TPNUM
$TPS
=
$TPSTK
$TSTM
$TYPE
SUNIT
SUNITM

SUSWR
$Z
$27
$$M
.

006640

007012
1775€4
005344
000302
006504
000412
000306

000424
= 000362
= 007744
- 000200

- 007746

2110

9634
18814
1158¢
2937

2517

3027
11574
2572
11074
1388
1059
11094

12144
11934
33084
24734
9804
10994
124784

2238

SEQ 0077

2748

1315«
3298

12224
12304
12334
12364
11754
11064
12084
12094
1007+«
12234
12314
1234#
1237
15614
1956
12054
11084
11264
3080#
9924
2%;3#

TABLE == USER SYMBOLS

2740«

1393
973
11054
117640
11564

000432
000436
000442
000446

000400

1320
1563

20074
1263

2168

973
1952
2950+
29464

12044

2176

1561
19694

1503«

2201

15748
2007

2699

29774

29324
12074

2953

2959

9854

11174

1256
2278

1650
20194

1573

2277

16564
2083

2378

19524

2237

2278

1832

1880

1968

2018

1733
22378

17454
2255

1826
22784

18334
2348

1866
23794

10114

10504

1094

10954

10974

1144

11474

3037

2664

30324
2948
26384

1549

2236

1868

962

11214

1511
2379

9934

11254

1574
2500

2990

9954

11294

1629
2757

3028

1658
29554

1701
3245

11374

1745
32534

1142

1833
33054

1882
3308«

197

1193

2020

11964

2112

(ZKMA
MACY11 30A(1052}
O05-MAR-79
CZKMAF P11
05-MAR-79 09:02

L8X

. ABS.

= 000276

007746

ERRORS DETECTED:

10944

(09:02
PAGE 79
CROSS REFERENCE

“099

000
O

DSKW: CZKMAF , (ZKMAF /SOL /CRF /NL : TOC=(ZKMAF .P11
RUN-TIME: 10 10 .6 SECONDS
RUN=-TIME

RATIO:

CORE USED:

11k

111/21=5.1

PAGES)

TABLE == USER SYMBGLS

SEQ 0078