Digital PDFs

XX-0D81B-2B

May 1983

72 pages

Original

3.6MB

view download

OCR Version

3.1MB

view download

Document:	CNKMAA0 MSV11-D MOS-CORE 0-124K EXR AH-T472A-MC MAY bw
Order Number:	XX-0D81B-2B
Revision:	0
Pages:	72
Original Filename:	CNKMAA0__MSV11-D__MOS-CORE_0-124K_EXR__AH-T472A-MC__MAY_1983_bw.pdf

OCR Text

NVIL-D

MOS/CORE Rene - EXR

BHLTETERLMC, Eiliew HIHTIEIN

IDENTIFICATION

PRODUCT NAME:

CNKMAAO MOS/CORE 0-124K EXER

PRODUCT CODE:

AC-T&71A-MC

"~ODUCT DATE:

DECEMBER,1982

MALNTAINER:

DIAGNOSTICS SERVICES/ISS

AUTHOR:

DIAG/ISS

DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.
THE

INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT NOTICE AND

SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT CORPORATION.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR ANY ERRORS
THAT MAY APPEAR IN THIS DOCUMENT.

THE SOF TWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED UNDER A LICENSE AND
MAY ONLY BE USED OR COPIED IN ACCORDANCE WITH TERMS OF SUCH LICENSE.

DIGITAL EQUIPMENT CORPORATICN ASSUMES NO RESPONSIBILITY FOR THE USE OR
RELIABILITY OF

ITS SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL.

SEQ 0001

(NKMA

MACY11 30(1046)

27-DEC-82

ERR # 0

[BUSER] BUS ERROR TRAP TO LOC. 4 OCCURRED

(NKMAA F11
6101
6105

6106

WA=
O 000 NN
NN = O 000 OSSN
—

e
b o

b cad

D
b

JERR # 3

JERR # &

JERR # 5

ERR # 6

sLTSTO]

TEST SEQUENCE ERROR

:TSTO HAS BEEN ENTERED OUT OF SEQUENCE

;LTSTO) DUAL ADDRESSING ERROR

sFOR THIS ERROR THE GOOD DATA PRINTED IS AN
;ADDRESS.
THIS IS THE ADDRESS SELECTED WHEN

sLOCATION.
ERR ¥ 7

CHECK BANK SELECT CIRCUITRY

;LTSTO] ADDRESS AND DATA ERROR
s IDENTICAL TO PREVIOUS ERROR EXCEPT THE DATA
WRITTEN INTO THE FAILING LOCATION WAS IN

;ERROR ALSO.

6149
6150

ERR # 10

6153

ERR # 1

g}g}

;CTSTO] DATA ERROR
:1IF BAD DATA = 0000 COULD BE AN ADDRESSING

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

g}gg

6159

:LOWEST SELECTED TEST LIMIT IS HIGHER THAN ,
:HIGHEST TEST LIMIT.
SET LOCATIONS ''LOWTWO''[322]
:TO 'HIGHADD'' [330] CORRECTLY AND RESTART

:THE SAME DATA WAS WRITTEN INTQO THE FAILING

6146

6158

OPERATOR FATAL ERRCR

c[TSTSIZ]

;BANK 0 AND RERUN THE TEST ON THE FAILING MEMORY.

g}zg

6157

;[TSTSIZ) OPERATOR FATAL ERROR
:SELECTED MEMORY SIZE GREATER THAN 28K

:TESTN SHOULD
= 00
:THE DIAGNOSTIC HAS BEEN CORRUPTED.
:1F POSSIBLE SELECT ANOTHER 4K BANK

g}zg

6154

;LAPTSIZ] APT FATAL ERROR

:APT MEMORY TABLES NOT SETUP CORRECTLY.

;AT 200.

6141

6144
6145

;[TSTTRPIFATAL DATA ERROR

LOCATIONS 0000~430 FAILED 1'S + 0'S 7TEST.

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

g}gg
6139
6140

THIS ERROR IS NOT FRINTED AND IS FOR '‘APT'‘ USE.

;CHECK LOCATIONS $MAMS1 [430] TO $MADR4[446]
;. FOR CORRECT MEMORY SIZE DATA.

b b

b e o

;ERR # 2

6134
6135

6138

PAGE 60

;RO = GOOD DATA
:R1 = ADDRESS OF FAILING LOCATION.

kb b

s o

.ERR # 1

b d
b

d d e

d o

b o

WA NIRRT N NPV PN NINININD =

oD ad

O OOV OO OO
OO OO

618;

13:16

27-DEC-82 13:15

sLTSTO] ADDRESSING ERROR

¢ THE FAILING ADDRESS RFSPONDED BUT IS NON-

JEXISTENT.
ERR # 12

MAY BE A DUAL ADDRESSING PROBLEM.

cCTST1) TEST_SEQUENCE ERROR

SSTESTN [404] SHOULD = 01
:

THE DIAGNOSTIC HAS BEEN CORRUPTED.

SEQ 0002

{NKMA
MACY11 30(1046)
2 7-DEC~82
(NKMAA
. FT11
27-DEC-82 13:15

6160
6161
6162
6163
6164
6165
6166
6167
6168
6169
6170
6171
6172
6173
6174
6175
6176
6177
6178
6179
6180
6181
6182
6183
6184
6185
6186

13:16

PAGE 60-1

JERR # 13

;[7ST1] DATA ERROR
:COMPARE GOOD AND BAD PRINTED DATA, FAILING
:DATA BITS MAY SHORTED OR SWAPPED.

JERR 14

sLTST2] TEST SEQUENCE ERROR
;STESTN [404] SHOULD
= 02

THE DIAGNOSTIC HAS BEEN CORRUPTED.

JERR # 15

;LTST2) ADDRESS OR DATA ERROR
;1F "'ADR ERR'‘ NOT PRINTED THEN THE BYTE SELECT
:CIRCUITRY PROBABLY FAILED.

JERR #

;LTST3] TEST_SEQUENCE ERROR
:STESTN [404) SHOULD = 03
THE DIAGNOSTIC HAS BEEN CORRUPTED.
H

;ERR 4 17

JERR # 20

:[TST3] DUAL ADDRESSING ERROR

;DUAL ADDRESSING PROBLEM FOR BITS THAT DIFFER
:IN GOOD AND BAD DATA PRINTOUT.

;CTST3] DUAL ADDRESSING ERROR

sFOR THIS ERROR THE DATA PRINTED IS AN ADDRESS.

:THIS IS THE ADDRESS THAT WAS SELECTED WHEN THE

;SAME DATA WAS WRITTEN INTO THE FAILING LOCATION.
;ERR 4 2

;LTST3] DUAL ADDRESSING ERROR
;SAME_AS ERROR #20 EXCEPT DIFFERENT DATA

; (SWAPPED BAKPAT) WAS WRITTEN,
ERR # 22

sLTST4] TEST SEQUENCE ERROR
SSTESTN [404] SHOULD = 04.
:
THE DIAGNOSTIC HAS BEEN CORRUPTED.

;ERR ¥ 23

sCTST4] DUAL ADDRESSING ERROR

sIF PASFLG = 0 THEN THE FAILING LOCATION
sAND FAILING DATA ARE DUAL ADDRESSES.

;ERR 4 24

sCTST5]) TEST_SEQUENCE ERROR
$STESTN [404] SHOULD
= 05
: THE DIAGNOSTIC HAS BEEN CORRUPTED.

sERR ¥ 25

;LTST5] DATA ERROR
;DATA WRITE OR READ ERROR.

:ERR # 26

sLTST5] MARCHING 1°'S AND 0'S DATA ERROR

;IF PASFLG=0
:
;1F PASFLG=1
:
:IF PASFLG=3
:

<ERR » 27

FAILED MARCHING 1°'S + 0'S IN

MAX TO MIN DIRECTIGN.
FAILED MARCHING 1°'S + 0°'S IN
MIN TO MAX DIRECTION
FAILED MARCHING 0°'S + 1'S IN
MAX TO MIN DIRECTION.

cLTSTS3 MARCHING 1°'S AND 0°'S DATA ERROR

sIDENTICAL TO PREVIOUS ERROR EXCEPT THE DATA IS
;CHECKED IMMEDIATELY AFTER BEING WRITTEN.

>€Q 0003

MACY11 30(1046)
27-DEC~-82
P11
AA
.
(NKM
27-DEC~-82 13:15
"NKMA

6216
6217
6218

JERR # 30

13:16

PAGE 60-2

;[TST6] TEST SECUENCE ERROR
JSTESTN SHOULD = 06

:THE DIAGNOSTIC HAS BEEN CORRUPTED.

;ERR L)

,LTST6] VOLATILITY/REFRESH TEST ERROR
;1F PASFLG=0 BAKPAT WRITE OR READ ERROR.
‘IF PASFLG=1
THE FAILING LOCATION CHANGED WHILE
ANOTHER LOCATIONS WAS WRITTEN FOR

IF PASFLG=2

.XF PASFLG=3
;

THE OTHER LOCATION IS SAVED
2 MS.
IN SAVLOC [352]

SWAPPED BAKPAT (77400 OR 77000)

WRITE OR READ ERROR.

SAME AS I[F PASFLG=2 EXCEPT

THE DATA IS SWAPFED BAKPAT.

;ERR

sLTST7) TEST SEQUENCE ERROR

JERR

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

;STESTN SHOULD = 07
:THE DIAGNOSTIC HAS BEEN CORRUPTED.

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.

:
JERR

;CTST10] TEST SEQUENCE ERROR
$STESTN SHOULD = 10

;

JERR

THE DIAGNOSTIC HAS BEEN CORRUPTED.

:[TST10] BAKPAT DATA ERROR

;BAKPAT WRITE OR READ ERROR INTO THE FAILING LOCATION.

[TSTlOJ READ RECOVERY DATA ERROR

THIS ERROR CAN BE REPORTED BY TST10 AND TST11.
;(THEY SHARE CODE). SEE STESTN [404] FOR WHICH TEST FAI LED.

:FOR BOTH TESTS COMPARE THE GOOD AND BAD DATA AT THE FA ILING

SLOCATION TO SEE WHICH BITS FAILED.
JERR
6259
6260

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

sERR

sCTST11] TEST SEQUENCE ERROR
:STESTN SHOULD = 11
H
THE DIAGNOSTIC HAS BEEN CORRUPTED.

ERR

sLTST12] TEST SEQUENCE ERROR
;STESTN SHOULD = 12
:

JERR

627

THE DIAGNOSTIC HAS BEEN CORRUPTED.

s[TST12] WORST CASE CORE TEST DATA ERROR
s1F PASFLG=1

sIF PASFLG=2

COMPARE GOOD AND BAD DATA FOR FAILING BITS.

THE FAILING LOCATION WAS WRITTEN AND READ

SEQ@ 0004

MACY11 30(1046 )y
(NKMA
2 7-DEC~82
CNKMAA L1
27-DEC-8 ¢ 13:15

6272
6273
6274
6275
6276
6277
6278
6279
6280
6281
6282
6283
6284
6285
6286
6287
6288
6289
6290
6291
6292
6293
6294
6295
6296
6297
6298
6299

6300
6301
6302

6303

6304
6305
6306

IF PASFLG=3
JERR # 43

NS WD

ol amed

i
Nb b
o OV ~NO

o OOOONOOONO

PAGE 60-3

SEQ@ 0005

WITH GOOD DATA,BUT FAILED READ CHECK
READING IN THE MIN. TO MAX DIRECTION.

SAME CONDITIONS AS PASFLG=2 EXCEPT FAILED

DOING THE READ CHECK FROM MAX TO MIN DIRECTION.

[TST12] WORST CASE CORE TEST DATA ERROR
IDENTICAL TO PREVIOUS ERROR EXCEPT THE DATA WRITTEN
AND READ IS COMPLEMENTED.

JERR # 44

;LTST13] TEST SEQUENCE ERROR
;$TESTN SHOULD = 13
THE DIAGNOSTIC HAS BEEN CORRUPTED.
H

;ERR # 45

;LTST13] WRITE RECOVERY TEST DATA ERROR
; 1F 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
SMALL TEST PROGRAM RUN IN FAILING BANK.

JERR # 46

;[TST13] WRITE RECOVERY TEST DATA ERROR

DATA ERROR FOUND JUST BEFORE THE SMALL TEST

“wAS T BE RUN IN THE FAILING BANK. TO AVOID “BLOWING''
:WHEN THE SMALL TEST IS RUN TST13 IS ABORTED.

:ERR ¥ 47

[TST13J WRITE RECOVERY TEST DATA ERROR

IDENTICAL TO ERROR_#XXX EXCEPT THE DATA WRITTEN
AND READ IS DIFFERENT.(177667).

1177667 1S THE COMPLEMENT OF ‘'JMP (R0)'* (110) WHICH IS
azgsssgegg FROM THE SMALL TEST PROGRAM RUN IN THE BANK
JERR # 50

;[PARERR] PARITY TRAP ERROR
: PARITY TRAP TO 114 OCCURRED.
;FOR THIS ERROR PRINTOUT THE °“'GOOD DATA'' IS ACTUALLY
sTHE FAILING PARITY MODULE UNIBUS ADDRESS.

: SAVLOC C[352] CONTAINS THE PC WHERE THE TRAP OCCURRED.
:ERR # 51

W NN
N N NN

13:16

s[PARITY] PARITY TRAP FATAL ERROR
: A _PARITY TRAP TO 114 OCCURRED, BUT NO PARITY MODULES COULD BE FOUND
:WITH AN ERROR BIT (BIT15) SET.

JERR # 52

[NOMHJ OPEXATOR FATAL ERROR

TESTING ABOVE 28K WAS SELECTED, BUT NO MEMORY MANAGEMENT

OPTION WAS FOUND. (30K SYSTEM DOES NOT NEED KT)

:
;ERR # 53

RESET SWITCH OPTIONS AND RESTART AT 200.

[PARITYJ OPERATOR FATAL ERROR

PARITY TESTING WAS SELECTED BUT NO PARITY MODULES
UERE FOUND.

;
LREPT

[6.3]

ERROR HISTORY

RESET SWITCH OPTIONS AND START AT 200.

(NKMA

MACY11 _30(1046)
27-DEC~82
27-DEC~B2 13:15

UNKMAA P11

6335
6336
6337
6338
6339
6340
6341
6342
6343
6344
6345
6346
6347
6348
6349
6350
6351
6352
6353
6354
6355
6356
6357
6358
6359
6360
6361
636
636
6364
6365
6366
6367
6368
6369
6370
6371
6372
6373
6374
6375
6376
6377
6378
6379
6380
6381

6382
6383
6384
6385
6386
6387
6388
6389
6390

13:16

PAGE 60-4

LOCATIONS IN MEMORY ARE SET ASIDE TO COLLECT A HISTORY
OF THE FAILING BITS IN A PARTICULAR MEMORY BANK.
THIS
ge¥?lagSC0LLECTED FOR EVERY ERROR REGARDLESS OF SWITCH
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.

THE ERROR HISTORY IS INTENDED TO HIGHLIGHT IF THE ERRORS
ARE DUE TO 1 BIT FAILING OR ONLY ADDRESS ERRORS.

ERROR HISTORY FORMAT:
ERROR

BANK

COUNT

BIT THAT FAILED [NUMBER OF THE FAILING BIT IN DECIMAL J].E.
0-15 WILL BE TYPED OUT OR THE WORDS '‘ADR ERR'' OR ‘PAR ERR'’ WILL

WHERE

ERROR

£6.4]

BANK

COUNT

ERROR RECOVERY

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 1S MAXIMUM FAILURE COUNT RECORDED.)

IF THE PROGRAM IS HALTED AFTER REPORTING AN ERROR IT CAN EITHER

BE CONTINUED OR RESTARTED AT 200 OR 250 (SEE SEC 4.2). HOWEVER FOR
CPU'S THAT DESTROY CONTENTS OF REGISTERS AFTER COMING TO A HALT
THE PROGRAM SHOULD ONLY BE RESTARTED.

[7.0]

RESTRICTIONS

MEMORY UNDER TEST SHOULD BE CONTIGUOUS. FOR SYSTEMS HAVING NONCONTIGUOUS MEMORY THE MEMORY BOUNDARIES SHOULD BE DEFINED BY THE
OPERATOR. (CONTIGUOUS MEMORY IS DEFINED AS A MEMORY THAT CAN BE
BOTH READ AND WRITTEN IN CONSECUTIVE LOCATIONS.)

(8.0

MISCELLANEOUS

(8.1]

ADDRESS/BANK RANGES IN OCTAL AND DECIMAL
THIS REFERENCE TABLE CROSS REFERENCES THE MEMORY BANK NO.S,
THE RANGE AND THE PAR USED WHEN MEMORY MANAGEMENT IS ENABLED.

SEQ 0006

CNKMA

MACY11 30(1046)

CNKMAA P11

13:16

PAGE 60-5

SEQ 0007

TICULAR 4K BANK.

6394
g%gg

BANK NO.

DECIMAL
RANGE

OCTAL
RANGE

[PAGE ADDRESS REGISTER]
USED/CONTENT
UNIBUS ADDRESS

6397
6398
6399
228?

0
1
2
3

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

000000-017776
020000-037776
040000-057776
060000-077776

NOT USED
NOT USED
NOT USED

6402
6403
6404
6405

4
5
)
7

16K=20K
20K=24K
24K=28K
28k~32K

100000-117776
120000-137776
140000-157776
160000-177776

NOT USED
NOT USED
NOT USED

6408
6409
6410
22}5

8
9
10

32K~36K
36K=40K
40K~44K

200000-217776
220000-237776
240000-257776

IT IS ALSO USEFUL TO SHOW STARTING ADDRESSES IN A PAR-

g%g%

2000
2200
2400
2600

772344
772346
772350
772352

6413

48K=-52K

300000~317776

6391

27-DEC-82

27-De -82 13:15

3000

772354

6418

64K-68K

400000-417776

6420
6421

18
19

72K=76K
76K-80K

440000-457776
460000-477776

420000-437776

80K~-84K

6424

88Kk-92K

520000537776
540000-557776

96K=-100K

600000-617776

6423

6425

2259

84K~88K
92K=96K

500000-517776
560000~577776

6428

100K-104K

620000-637776

6430
gz%;

27
28

108K=112K
112K=116K

660000-677776
700000-717776

6429

6433
6434
6435
6436
6437

6438
6439
6440
6441
6442
6443
6444
6445
6446

29
30
3

104K=-108K

116K=120K
120K=124K
124K-128K

640000-657776

720000-737776
740000-757776
760000~777776

o
o
o

6422

68K=~72K

320000-337776
340000-357776
360000-377776

52K=56K
56K~60K
60K-64K

OOV

6419

13
14
15

260000-277776

BN
—=

6414
6415
22}9

44K~48K

772340

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

NOWVT

6406
6407

0 _ 0000

7600

772354

NOTES:
THE PAR (PAGE ADDRESS REGISTER) CONTENTS ARE SHOWN IN A TEST THAT SELF SIZES.
1.
IF THE LIMITS OF TESTING ARE SET BY THE OPERATOR AND
IF THE BANK IS ABOVE 28K PAR NO. 1 WILL BE SET TO THE
FOR EXAMPLE IF THE TESTING WAS TO
BEGINNING PAGE.
BEGIN WITH BANK 8 PAR NO. 1 WOULD EQUAL 2000, PAR 2

WOULD EQUAL 2200 ETC.

UNKMA

MACY11

. P11
CNKMAA

6447
6448
6449
6450
641

6452
6453
6454
6455
6456
6457
6458

(8.2]

30(1046)

27-DEC-82

27-DEC-82 13:15

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

(8.2]

6500
6501
6502

100 SECS.
5 MINUTES.

PASS COUNT AND TEST NO. LOCATIONS

$PASS [406] = PASS COUNT - CLEARED BY START AT 200.
STESTN [404] = CURRENT TEST NO. AND RELOCATION, PARITY FLAGS.
WHERE:

LOW BYTE = TEST NO.

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

[8.4]

STACK POINYER

THE STACK STARTS AT 500 WHEN THE PROGRAM IS NOT RELOCATED.
SAVR6L350] CONTAINS THE STACK STARTING VALUE WHEN THE DIAGNOSTIC
IS RELOCATED.
SAVR6 ALSO CONTAINS THE STARTING ADDRESS OF THE PROGRAM WHEN
IT IS RELOCATED.

[8.5]

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

6478
6479
6480
6481
6482
6483

6484
6485
6486
6487
6488
6489
6490
6491
6492
6493
6494
6495
6496
6497
6498
6499

SEQ 0008

EXECUTION TIME

6465

6472
6473
6474
6475
6476
6477

PAGE 60-6

HERE ARE SOM:S TYPICAL EXECUTION TIMES.

6459
6460
6461
6462
6463
6464

6466
6467
6468
6469
6470
6471

13:16

IN THE SAME STATE [:.E. STATE OF RELOCATION] AS IT WAS BEFORE

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 FROM POWER FAIL AND ON POWER-UP
OPERATION IS UNDEFINED.

(9.0

PROGRAM DESCRIPTION

[9.11

NARRATIVE FLOW CHART

THE TEST IS 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 NARPATIVE 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.

JGNORED AND EVERYTHING IS

(NKMA

27-DEC-82
MACY11 30(1046)
27-DEC~82 13:15

CNKMAA F11

SEQ 0009

[(START]

PRINT "‘CNKMAA'* TITLE

[TSTRP)

SAVE DATA FROM LOCATIONS 0-376

(TSTRP]

TEST LOCATIONS 0-376 BY WRITING AND

INTO 7744-10314.

NOTE THIS IS THE ONLY
READING 1'S AND 0°'S.
EXPLICIT TESTING OF THESE LOCATIONS.

[=2Ve]eRNTo JV, FXV
],V

[SLFSIZ]

MEMORY
OR 30K
ENABLE
28K.
NOTE:

SIZE MEMORY BY WRITING INTO SUCCEEDING

LOCATIONS UNTIL TIMEOUT TRAP TO & OCCURS,
BOUNDARY REACHED.
MEMORY MANAGEMENT AND SIZE MEMORY ABOVE

[F UNDER XXDP CHAIN MODE IN 30K SYSTEM, SYSTEM IS SIZED

10 28K.

[TYPSIZ]

TYPE MEMORY TEST LIMITS.

[SETSTK]
SPACE IS SAVED AT THE END OF THE TEST
FOR AN ERROR HISTORY.
FOR EACH 4K BANK 18 BYTES ARE SAVED
IN THE FOLLOWING FORMAT:
HON0OON

Do
g Qg P

o
— =

!ADR ERR!PAR ERR!

Al aloals
alsalealoa
[

PAGE 50-7

(W LV, W, RO RV, IV IV, ] w
P ad emd ced b d e
D —d

6503

13:16

BIT02
'8I1T00

'8IT15
'8IT13
81111

'8IT09
81107
817105
!BITO3
!8ITO1

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

AND UNDER XXDP CHAIN MODE 5376 (OCTAL) ADORESSES

ARE APPENDED TO THE TEST.
THIS SAVES THE XXDP
?8Nég0¥és?gg ALLOWS THE LOCATIONS OCCUPIED BY XXDP

[CLRMEM]
CALL ''PARITY'* ROUTINE AND
IF SELECTED.
ENABLE ALL PARITY MODULES.
‘‘PARMAP'' [LOC. 352]
CONTAINS A MAP OF PARITY MODULES FOUND.

Tgbgkg g;€336 BIT 15 IS SET, IF #172334 FOUND BIT 14
[(CLRMEM]

10.
1.

CLEAR MEMORY CURRENTLY UNDER TEST

[CONT]

DISPATCH TO TSTO

(TSTOJ

EXECUTE TEST O.

DESCRIPTIONS.

[TSTSCP]
CNTRL=C

SEE SECTION 10 FOR TEST

COMES HERE AFTER EACH TEST AND IF

TYPED THEN GO TO ERROR HISTORY PRINTOUT.

CNYCMA

MACY11

CNKMAA _F11

13:16

PAGE 60-8

If SR=2000 THEN HALT

6559
6560
6561
6562
6563

if SR=40000 THEN LOOP ON TEST DEFINED BY <3:0>

ELSE CONTINUE TO NEXT TEST.
12.

6564

6565
6566
6567
6568
6569
6570
6571
6572

13.

6573

6574
6575
6576
6577
6578

14.

CTST1-TST12])

EXECUTE TST1-TST12 ¢ACH TIME

GOING TO STEP 9.

CTST13]

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
gi?ngAN THEN AT LEAST TELL WHICH BANK OF MEMORY

THE PROGRAM RELOCATES TO HIGH MEMORY
CRELOC]
TO TEST THE LOCATIONS IT OCCUPIES. (430-ENDPRG).

WHERE '‘ENDPRG’' IS THE CONTENTS OF ENDSTKL3061.
I1.E THE LAST PROGRAM ADDRESS.
NOTE 'REL'’
IS
PRINTED JUST PRIOR TO THE ACTUAL RELOCATION.

6579
6580

15.

6581
6582
6583
6584
6585
6586
6587
6588
6589
6590
6591
6592
6593
6594

16.

17.

TESTS 0-13 ARE RUN AS DESCRIBED ABOVE EXCEPT

ONLY BANK O LOCATIONS 430-ENDPRG ARE TESTED.
[RELOER]

RELOCATE THE PROGRAM BACK TO LOWER

CLOWER]

IF CONTROL=-C TYPED GO PRINT ERRCR

MEMORY.

HISTORY.

18.CTSTMM]

IF MEMORY MANAGEMENT SELECTED AND AVAILABLE,

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

19.

6595
6596
6597

CCONTMM]
CALL ''UPMM’' TO UJPDATE MEMORY MANAGEMENT
PAR REGISTERS TO POINT TO THE NEXT 24K SLICE OF
UPPER MEMORY.

REPEAT STEPS 18 + 19 UNTIL ALL
20. [MAXADR]
MEMORY ABOVE 28K IS TESTED.

6598

6599
6600

21. CENDPAS]

22. ($EOP]

6601
6602

6603
6604
6605
6606
6607
6608
6609
6610
6611
6612
6613
6614

30(1046)
27-DEC-82
27-DEC-82 13:15

PRINT ERROR HISTORY OF FAILING BITS
DISABLE PARITY MODULES.

PRINT '‘PASSAXX''

(9.2]

TEST TITLES

SEE

THE TEST HEADINGS IN THE LISTING FOR DETAILS ON EACH TEST.
TEST 0:

TEST
TEST
TEST
TEST

TEST FOR _PROPER BANK SELECTION

1: CHECK DATI/DATO LINES
2: TEST MEMORY FOR HOLDING DATA AND BYTE SELECTION
3: DUAL ADDRESS TEST A
&: DUAL ADDRESS TEST B

SEQ 0010

CNKMA

MACY11 30(1046)

CNKMAA P11

6615
6616
6617

13:16

PAGE 60-9

TEST 5: MARCHING 1°S AND 0'S
TEST 6: CELLS' VOLATILITY TEST
TEST 7: SHIFTING DIAGONAL

6618
6619

6620
6621
6622
6623
66.

27-DEC-82

27-DEC-82 13:15

TEST 10: READ RECOVERY GALLOPING TEST THROUGH EVERY 64TH CELL
TEST 11: READ RECOVERY LONG GmLLOPING/FAST GALLOPING TEST

TEST 12: WORST CASE TESTING FOR CORE MEMORY
TEST 13: WRITE RECOVERY TEST
[10.01

RXDP & ACTI1

E APT OPERATION

6626

RXDP CHAIN MODE

6629

OPERATION IS IDENTICAL TO STAND ALONE EXCEPT:

6627
6628

mmeememmememeaa

6631

6632

NO "'CNKMAA'' TITLE IS PRINTED.

3.
4.

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 XXDOP CHAIN MODE

6633
6634

6635
6636

NO TEST 13 PRINTOUTS SUCH AS '‘TST13 BNK 00''.

6638
6639

ACT11
==me-

6641

OPERATION IS IDENTICAL TO STAND ALONE EXCEPT:

6643
6644
6645
6646

1.
2.
3.

6648
6649
6650
6651

APT
--

6640

NO PRINTOUTS EXCEPT ERROR PRINTOUTS.
THE PROGRAM ALWAYS HALTS ON ERROR.
AT THE END OF TEST (SENDAD) CONTROL IS RETURNED TO
THE ACTT1 MONITOR VIA LOCATION 42.

OPERATION IS SIMILAR TO STAND ALONE EYCEPT:

6653
6654
6655
6656
6657

1.
2.

6658
6659
6660
6661

6663

NOTE: THE ENVIRONMENTAL

6664

LOCATION 421 (SENVM).
ALL PRINTOUTS CAN BE INMIBITED BY SETTING BIT 5 OF
BYTE LOCATION 421 (SENVM).

ALL ERRORS CAUSE LOCATION 400 (SMSGTY) TO BE SET =
0001 AND THE PROGRAM HALTS AT LOCATION 6240 (FATHLT).
LOCATION 402 (SFATAL) CONTAINS THE ERROR NO. IN THE
LOW BYTE AND THE FAILING MEMORY BANK NO. IN'THE WIGH

MODE BYTE SHOULD BE SET TO 240 WHILE THE SOF TWARE

ENVIRONMENTAL BYTE SHOULD BE SET TO 001.

6666

6667
6668

THE SOFTWARE SWITCH REGISTER BECOMES LOCATION 422 ($SWREG).
AUTO SIZING CAN BE INHIBITED BY SETTING BIT 7 OF BYTE

.ENDR

SEQ 0OMNM

MACY11_30(1046)
CNKMA
27-DEC-82
CNKMAA P11
27-DEC-8¢ 13:15
.ENABL
.NLIST

ABS
, CNC
MD.MC

.LIST

CTITLE

SEQ 0012

ME.BIN,SEQ,LOC
CNKMA

:«COPYRIGHT (C) MARCH 1982

NN A~
DO N D D e D d d i
b
o)
s " o " o o

6670

PAGE 61

13:16

*«DIGITAL EQUIPMENT CORP.
S«MAYNARD, MASS. 01754
TM

:tPROGRAM BY DIAGNOSTIC ENGINEERING
*THIS PROGRAM WAS ASSEMBLED USING THE PDP=-11 MAINDEC SYSMAC

tPACKAGE (MAINDEC=-11~DZQAC~C3), JAN 19, 1977.

160000

isua=160000

s:HALT ON ERROR, LOOP ON TEST, INHIBIT ERROR TYPOUT

::TRAP CATCHER OF .+2 AND HALT FOR 0-776 LOCATIONS

SCOPE

000240

oo
~N N P e e e e N X e T ) ~
oo — et nd b et b —d ) O~ Nt N N N Nt Nt Nt

000042

6769
6770
6771

=NOP

=42

000042
000000

JWORD

.SBTTL

;FOR ACT/XXDP

ACT11 HOOKS

t**ttttttttttttttttt*'tittttttt*itttttttttttttt**tttttttttttttt

HOOKS REQUIRED BY ACT11
$SVPC=.
.=46
sggng

000044

000046

000046
888523

000052

049000

000070
000076

000044

000070
012737
000000

'WORD

40000

.=70
MOV

#PWRUP, a#24

.=$SVPC

000144

000024

PWRDN:

HALT

;SAVE PC

::1)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP

;:2)SET LOC.52 TO 40000
*: RESTORE PC

MACY11 30(1046)
(NKMA
27-DEC-82
UNKMAA F1
27-DEC-82 13:15

000102

000104

000112

.=102

000104

.=104
: GET HERE IF AN ILLEGAL TRAP TO LOL. & OCCURRED.

013727
000000

.WORD

000001

000400

BUSER:

N1, H#SMSGTY
sTELL APT FATAL ERROR#000
MOV
HALT
:*ERROR* TRAP TO LOC. 4 OCCURRED.
;114 AND 116 ARE RESERVED FOR PARITY TRAP VECTORS.
SETUP IN

6784
6788
6789
6790
6791
6792

6799
6800
6801
6802

6883
6804
6805
6806
6807
6808
6809
6810
6811
6812
6813
6814
6815
6816
6817
6818
6819

%+
¥
»

6795
6796

[ YETE
PR TR PR ¥Y )

;* WRITE MEMORY BACKGROUND

6793
6794

6797
6798

;DISMISS BEVNT;VER:1

;ROUTINE '? EGIN''.
20

000120

6783

SEQ 0013

000102
000002

6773
6774
6775
6776
6777
6778
6779
6780
6781
6782

PAGE 61-1
ACT11 HOOKS

13:16

000120

000122
000126
000130
000132
000134

010401
013700
010021
020105
103775
000207

000316

WRTMEM: MoV
MOV
MoV
2%:

CMP
8LO
RTS

THIS ROUTINE IS USED TO WRITE THE MEMORY BACKGROUND TO
THE VALUE STORED AT LOCATION BAKPAT. THE ROUTINE ASSUMES
THAT R4 IS POINTING TO THE LOWEST LOCATION AND RS TO THE
HIGHEST LOCATION TO BE WRITTEN, THE PROGRAM LEAVES THE

SUBROUTINE WITH RO CONTAINING THE CONTENTS OF BAKPAT.

R4 ,R1
@NBAKPAT RO
RO, (Ri)+

;SET R1 TO LOWEST LOCATION UNDER TEST
sLOAD RO WITH THE CONTENTS OF LOCATION BAKPAT
sSTARTING FROM THE LOWEST LOCATION WRITE THE

sRETURN FROM THE SUBROUTINE

gl.RS

sMEMORY TO BACK GROUND PATTERN

;PWRUP IS LOADED AT LOC.144 AND VECTOR 140 INITIALIZED TO BE SPECIFIC

000140
000142

;70 11/21 PROCESSOR.
.=140
.WORD
.WORD

000140
170000

000300

170000
300

000144
000150
000154

013706
012700
060600

000156
000160

004710
000120

JSR

000162

000406

000164
000166
000170
000172
000174

004710
000240
000240
000240
000425

$ENDAD: JSR
NOP
NOP
NOP
BR

000176

000176
000000

SWREG:

000350
006112

PWRUP:

MOV
MOV
ADD
LASCIZ2
.EVEN

;VER:1 START ADDRESS OF ODT
;VER:1 PRIORITY 6
a#SAVR6, SP
sRESTORE STACK POINTER
#PNTMES-BEGIN,RO
SP,RO
sGET THE INDIRECT ADDRESS OF LOCATION TPCRLF
¢sRELATIVE TO LOCATION OF DIAGNOSTIC IN THE CORE

PC, (RO)
/P/

START

;* SERVICE XXDP/ACT11

=176
.WORD

;GO TO THE TYPE ROUTINE AND TYPE CR, LF AND A 'P'’

PC, (RD)

RESTRT
0

SRETURN TG ACT11/XXDP _MON]TOR
sIF QUICK VERIFY=RESET ELSE NOP
:1F QUICK VERIFY=CLR #-1 ELSE INC #0
:IF QUICK VERIFY=BR ,-4 ELSE NOP
;REPEAT TEST UNDER ACT11/XXDP

(NKMA

MACY11_30(1046)

CNKMAA P11

27~ EC-82

27-DEC-82 13:1

13:16

6832

6833

SEERRARNEAAAARAARNCACLCERCOCRANIRRAANRRRAR
A AR AARREN SRR AR RN AR
RNY

6834

.SBTTL

6835

6836

000200

013706

6839
6840
6841
6842
6843
6844
6845
6846
6847

000210
000212
000216
000220
000224
000226
000232
000234
000240

005043
022703
001374
105737
001011
105737
100406
004767
047103

6838 000204

000246

012703

000060

6850

000250

012704

6852

000260

012305

6854

000264

010600

6856
6857
gggg

000272
000274

6851

000254

6853 000262
6855

START AND RESTART ROUTINES
RESTART AT 200 TO CLEAR APT TABLES

START:

MoV

18:

CLR
CMP
BNE
1ST8
BNE
1ST8
8M!
JSR
+ASCIZ

tt.tttt*t'ttttttt"tii't'ttt't'it."'tit'ti'tttt'itttttti'ttiti

6837

2328

PAGE 61-2

WRITE MEMORY BACKGROUND

012703

000350

000412

000400
000042
000405
006344

046513

040501

MOV

#SAVRG, SP

sSETUP STACK POINTER.

-(R3)
#SMAIL ,R3
1%
L2
RESTRT
ANSTESTNH
RESTRT
PC,TPCRLF
/CNKMAAO/

;CLEAR A MAILBOX LOCATION
sDONE?
;BRANCH IF NO
¢ACT11 MODE?
:BRANCH IF YES
;ARE WE RELOCATED?
sBR IF YES=~ SINCE TPCRLF IS RELOCATED ALSOsPRINT TITLE

#SUNIT,R3

:CLEAR THE APT MAILBOX FROM SMAIL TO $DEVCT

.EVEN

007744

000346

RESTRT: MOV

MoV

Mov

000266 012746 000300

MOV

(R3)+,RS

:RESTORE RS

;CAUSE R3 TO POINT TO THE LOCATION SAVRS

(R3)+.SP

MoV

010046
000002

;LOAD R4 WITH THE ADDRESS OF THE END OF THE PROGRAM

#SAVRS ,R3

Mov

012306

#ENDPRG, R4

;AND RESTORE R6 JUST IN CASE IT IS A RESTART

SP,RO

:PLACE THE STARTING ADDRESS OF THE TEST IN RO

#300,-(sP)

Mov
RTI

:SET HIGH PRIORITY FOR RTI;VER:1

RO,=-(SP)

;GO TO °*'START''-MAY BE RELOCATED.
;IF RELOCATED SEE LOCATION SAVR6 FOR START.

6860
6861
6862

6863
6864

6865
6866
6??;

.SBTTL

(2)

(1)

000024
000044

(2)

000276
000024
000200
000044
000276
000276

(1)

SX=.
.=24
200
=44
$APTHDR
.=.8X

e T
T

;;SAVE CURRENT LOCATION
::SET POWER FAIL TO POINT TO START OF PROGRAM
;:FOR APT START UP
sPOINT TO APT INDIRECT ADDRESS PNTR.
,,POINT TO APT HEADER BLOCK
;;RESET LOCATION COUNTER

R T

SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT~PDP11 DIAGNOSTIC

g};

s INTERFACE SPEC.

(1)
(1)

000276
000276

C00000

SAPTHD:
$HIBTS:

.WORD

(1)
(1)

000302
000304

001440
002260

$TSTM:
$PASTM:

.WORD
.WORD

800.
1200.

(1)

T L

SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT

(1)
(1
(1)
(1)
(1)
(1

APT PARAMETER BLOCK

,00300

000400

$MBADR: .WORD

SMAIL

;TWO HIGH BITS OF 18 BIT MAILBOX ADDR.

..ADDRESS OF APT MAILBOX (BITS 0-15)

::RUN TIM OF LONGEST TEST
;;RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY)

(NKMA
MACY11 20(1066) 27-DEC-82
TNKMAA . P11
27-DEC-82 13:15
(1)

(1)

6868
6869

000306

000310

6870

6871
6872

6873
6874
6875
6876
6877
6878
6879
6880
6881
6882
6883
6884
6885

6886
6887
6888

000276

000277

000300

000301

6889

6890
6891
6892
6893
6894
6895
6896
6897
6898
6899
6900
6901

000302
000304
000306

000310

000000

SUNITM:

000405

REL=STESTN+1

000024

000276

000277

000300

000301

000302

000304
000306

000310

000312

6902

000312

6904
6905

000314

000314
000

000315

000

6903
6906

6907
6908

000312

6909
6910
6911

13:16 PAGE 61-3
APT PARAMETER BLOCK

MMAVA :

TYPENB:

$PRERR:

$ADERR:

STRTDI:
LOWBNK:
PASFLG:

ENDSTK:

PENK :

DECWRD:

.WORD

sIT WILL BE_O IF THE PROGRAM IS IN THE LOWER

sCORE. BIT 7 OF THE BYTE WILL BE SET IF THE
sPROGRAM IS IN A RELOCATED STATE AND BIT 5

sWILL BE SET IF PARITY BITS ARE BEING TESTED

.=$SAPTHD

sTHIS BYTE IS USED TO DETERMINE IF MEMORY
sMANAGEMENT IS AVAILABLE OR NOT

+=MMAVA+1

+=TYPENB+1

.=$PRERR+1

177560
177562

.=LOWBNK+2

:THIS BYTE IS USED TO DETERMINE IF THE
:PROGRAM HAS ENCOUNTERED ADDRESS ERROR

sLOWER BYTE OF THIS WORD GIVES THE PASS NUMBER FOR
sTHE SPECIFIC TEST WHEREAS THE UPPER BYTE
sHAS BEEN USED BY DIFFERENT TEST FOR DIFFERENT PURPOSES

.=PASFLG+2

.<ENDSTK+2

TYPCNT:

.=DECWRD+2
(BYTE
0

SAVKBB:

.BYTE

000316

177572
000377

6919
6920

000320
000322

000000
000430

SWAPAT: .WORD
RELBOT: BEGIN-50

177564
177566

sTHIS BYTE DETERMINES IF THE PROGRAM HAS FOUND
sA PARITY ERROR

.=STRTDI+2

6916
6917

6914
6915

sTHIS BYTE IS USED TO DETERMINE IF THE
;TYPE OUT OF ERROR HAS BEEN ENABLED OR NOT

.=$ADERR+1

TkS=
$KBB=
$TPS=
$TPB=
SRO=
BAKPAT:

6921

;.ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT

SETEND-SMAIL/2 ;;LENGTH MAILBOX~-ETABLE (WORDS)

-EVEN

6912
6913

SEQ 0015

;HOLDS BANK UNDER TEST FOR

"'TST BNK XX'* PRINTOUT.

:THIS BYTE DETERMINES THE NUMBER OF WORDS
370 BE TYPED

:THIS LOCATION IS USED TO SAVE THE CHARACTER
:HIT BY THE OPERATOR

177560
177362

177364
177566

177572
.WORD

377

;BACKGROUND PATTERN WRITTEN TO MEMORY.

;HOLDS LOWEST TEST ADDRESS WHEN RELOCATED.

MaCY
1 30(1046)
(NKMA
27-DEC-82
CNKMAA PN
27-DEC~-82 13:15

6922
€923

6924

6925
6926
6927
6928
6929
6930
6931
6932

6933

6934
6935
6936
6937
6938
6939
6940
6941
6942

6943

6944
6945
6946
6947
6948
6949
6956
6957
6958

13:16
PAGE 61-4
APT PARAMETER BLOCK
IS4

SEQ@ 0016

3322322222033 323000

03003002

002200

R0ttt

:LOCATIONS TO BE MODIFIED IF LIMITS SET BY OPERATOR

000324
000326

000000
000000

LOWIWO: 0
LOWADD: 0

000330
000332

000000
037776

HIGHTWO:
HIGHADD :

000334
000336

000000

017776

$SHIMAX: O
SMAXM:
17776

000340

000000

MAXMEM:

000342
000344
000346

000000
000000
000000

SAVR4:
SAVRS:

000350
000352
000354
000356
000360

000500
000000
000000
000000
000000

SAVMAX:

RREL

]

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

.WORD

0
37776
AN

P R

E R

JHOLDS BITS 17:16 OF HIGH TEST ADDRESS
sHOLDS BITS 15:0 OF HIGH TEST ADDRESS

AR AN AR RN

R AN

AR AN TN R NR

R AR RO ER

JHOLDS BITS 17:16 OF MAXIMUM AVAILABLE MEMORY
sHOLDS BITS 15:0 OF MAXIMUM AVAILABLE MFMORY
;MAXIMUM CURRENT VIRTUAL MEMORY UNDER TEST

.WORD

.WORD
.WORD

:* SAVR6 POINTS TO WHERE THE PROGRAM STARTS EVEN WHEN RELOCATED.

SAVR6:

.WORD

PARMAP: 0

SAVLOC: 0

PARSP:
PARPS:

0
0

BEGIN

:CONTAINS START ADDRESS WHEN RELOCATED ALSO.

:MAP OF PARITY MODULES UNDER TEST.

sTJEST 6 STORES ERROR INFO HERE

sSAVE SP DURING PARITY ERROR TRAP.
:SAVE PSW DURING PARITY ERROR TRAP.
sNOTE=-PARSP +PARPS ARE NEEDED SINCE THERE

21S NOT ENOUGH ROOM ON THE STACK (500-452) AND
2SO THE STACK MUST BE RESET IN THE PARERR ROUTINE.
s IN THIS CRUDE FASHION.

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

MACY"1 30(1046)
{NKMA
27-DEC-82
F11
CNKMAA
27-DEC-82 13:15

6960
6961

000400

A Nt

s
ot "t
s
P N
Nkt
A N

000400
000400
000402
000404
000406
000410
000412
000414
000416
000420
000420
000621

N
Nl N

000422
000424
000426

EVEN
$MAIL:
$MSGTY:
$FATAL:
$TESTN:
$PASS:
$DEVCT:

.WORD
.WORD
.WORD
.WORD
.WORD

SUNIT:
$MSGAD:
$MSGLG:

000
000

SENVM:

.BYTE

$SWREG:
$USWR:
$CPUOP:

.WORD
.WORD
.WORD

000000
000000
000000

.WORD
.WORD
.WORD

SETABLE:
SENV:
.BYTE

2 :ENVIRONMENT

AMSGTY
AFATAL
ATESTN
APASS
ADEVCT

AUNIT

AMSGAD
AMSGLG

AENV
AENVH
MODE BITS
ASWREG
AUSWR
ACPUOP

* %

:t
:t

0004
0004

000

$SMAMS1:

$MTYP1:
LR 1

.BYTE

AMANS1
AMTYP1

N
P il N
P
P St
Nt Nt N N NP it N N
N

.=600
APT MAILBOX-ETABLE

000000
000000
000000
000000
000000
000000
000000
000000

) S N
il Nl il Nt
T

d e ol e e el il e
) D e cd ) il i

N NN PN TN PN PN PN TN NN TN
N TN

ad ) e wd ) i e wnd
b

PN TN PN

.SBTTL

SEQ 0017

2333323233332 22332223200000000d2i0dd0222000
R
st
RRRRRRRRRRR

) N

Dk d e e il i

NP, P, BN TN PN PN PN PPN PN

d D D D d D D e

PN P

kN )

(1)

13:16 PAGE 61-5
APT PARAMETER 8LOCK

000432

000000

3"ADR1:

WORD

AMADR1

000434
000435
000436
000440
000441
000442
000444
000445
000446
000450

000
200
000900
000
000
000009
000
000
060000

SHAHS?: .BYTE

AMAMS2
AMTYP2
AMADR?2
AMAMS3
AMTYP3
AMADR3
AMAMSS
AMTYP4
AMADRS

SMTYP2: .BYTE
$MADR2:
SMAMS3:
SMTYP3:
$MADR3:
$MAMSS:
$SMTYP4:
$MADRSG:
$SETEND:
LMEXIT

.WORD
.BYTE
.BYTE
.WORD
.BYTE
.BYTE
.WORD

;:APT MAILBOX

,.HESSAGE TYPE CODE
F.\

JsDCVITE COUNT

::1/0 UNIT NUMBER

..HESSAGE ADDRESS
:sMESSAGE LENGTH

JsAPT ENVIRONMENT TABLE

: sENVIRONMENT BYTE

:sAPT SWITCH REGISTER

:ZUSER_SWITCHES
::CPU_TYPE,OPTIONS

BiTs 15-11=CPU TYPE
11/04=01,11/05=02,11/20=03,11/40=04,11/45=05
11/70=06,PD0=07,0=10
BIT 10=REAL_TIME'CLOCK
BIT 9=FLOATING POINT PROCESSOR
BIT 8=MEMORY MANAGEMENT
: sHIGH ADDRESS.M.S. BYTE

:SMEM. TYPE BLKA
MEM.TYPE BYTE
-~
(HIGH BYTE)
900 NSEC CORE=001
300 NSEC BIPOLAR=002
500 NSEC MOS=003

: sHIGH ADDRESS,BLK#]

MEM.LAST ADDR.=3 BYTES,THIS WORD AND LOW OF
::HIGH_ADDRESS,M.5. BYTE

: sMEM. TYPE ,BLKN2

:ZMEM.LAS: ADDRESS,BLK#2
::HIGH ADDRESS,M.S.BYTE

: MEM. TYPE ,BLKA3

:ZMEM.LAST ADDRESS,BLK#3
: tHIGH ADDRESS,M.S.BYTE

:EMEM. TYPE BLKH4

3 IMEMLAST ADDRESS ,BLK#4

ttttfifittttt'*t*ttti'itttttttttttt*tittiittittt!tttt'titt"tittt

SBTTL

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

“‘TYPE'* ABOVE

CNKMA

MACY11 30(1046)

CNKMAA P11

27-DEC-82

27-DEC-82 13:15

13:16

gggg

2823
6970

000450

177570
000500

000500

6973
6974

000502
000504

005746
010637

000350

6976

000516

005037

000300

6977

010706

000510 012737

000522

005037

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

000070

177570

BEGIN:

MOV

PC,SP

:SET UP STACK POINTER TO EQUAL BEGIN ADDRESS

TST
MOV

-(SP)
SP,a¥SAVRG

:SAVE SP FOR FUTURE USE

000024

.=500

#PWURDN ,3#24

CLR

SNFTYPCNT

CLR

000314

012700
012710
060720

000114
005504

6982

000544

105737

000405

gggg

000552

000167

000614

6986
6987

000556
000562

005737
001402

000406

6989
6990
6991

000570
000574
000600

012704
012700
010037

007744
000377
000316

6993
6994

000606
000610

6996
6997
6998
6999

000616
000620

005741
010011

000622

020011

7002
H;

000626
000632

004767
000001

7003
7004
7005

000634
000636

000300
001370

000642
000644

001365
012701

000400

001375
012700

000006

BNE
SETSWR: MOV

012740

000700

MoV

6988

6992

6995

;889

7006
7007

7008
7009

7010
7011

7012

7013

7014
7015

7016

7017
7018
7019

MOV
MOV
ADD

000540 012710 000300
000550

000564

000604

000614

000624

000640
000650
000652

000654
000656

000662

000666

100002

000167

005001

012124
020127
103774

1STB

8PL

JMP

000400

012710

005777
000404

000702

012737

022626

;IS THIS CODE RELOCATED?

TSTREL

:THIS CODE IS RELOCATED SO GET TEST SIZE.

ONEPAS

;BRANCH IF NO

#ENDPRG ,R4
#377.R0
RO,a#BAKPAT

;LOAD R4 WITH THE ADDRESS OF THE END OF THE PROGRAM

2s:

MOV
CMP

(R1)+,(R4)+
R1,#SMAIL

:SAVE FROM 0000 TO BEGIN=-30 AT END OF PROGRAM FOR NOW

-(R1)
RO, (R1)

:PREPARE TO TEST THE TRAP VECTORS
:CHECK THE TRAP VECTORS FOR THE CAPABILITY
;OF HOLDING 0°S & 1°'S
:1S THE DATA 0K?

6$:

8$:

JMP

CLR

8LO

TST
MOV

2s:

SETSTK

: GET THE TEST SIZE

cMP

RO, (R1)

JSR
1

PC,FATERR

SWAB
BNE
ST

RO
48
R1

;1F WE HAVE NOT REACHED THE LOWEST MEMORY LOCATION

MOV
ST

=(R4),=(R1)
]

:RESTORE TRAP CATCHER ETC.

#300, (RO)

:SET UP TIME OUT TRAP PSW;VER:1

P
5%

:DOES THE SWITCH REGISTER POINTED BY SWR EXIST ?
:BRANCH IF YES

#SWREG,a#SWR

:AND PLACE THE ADDRESS OF THE SWITCH REGISTER
:DESIGNED FOR THE COMPUTERS NOT HAVING HARDWARE
:SWITCH REGISTER AND RUNNING STAND ALONE

BNE
MOV

MOV

000450

:AND PSW OF 300;VER:1

SNREL

MOV
MOV
MOV

005334

000176

#3060, (RO)

TSTRP:

BEQ

177552

#114 RO
:PREPARE TO SETUP PARITY TRAP VECTOR
#PARERR-.-6,
(RO)
PC, (RO)+
:TO PARERR

:1S THIS THE FIRST PASS?
:BRANCH IF YES (TEST TRAP CATCHER ADDRESSES)

38:
48:

000300

:PREPARE FOR ANY FUTURE POWER DOWN

SNSPASS
TSTRP

005701

014441
005701

SNSPRERR

ONEPAS: TST
BEQ

001403

000672
000676

000700

MOV

000430

;CHANGES TO SWREG IF NO HARDWARE SWITCH REGISTER

MOV

ooosgb
000532
000536

6983

SEQ 0018

SWR:

6978
6979
6980

6981

.-:ttttttttttttttttttttttt'tttt'ttttttt"t'tttt'ttt'tt'ttttt't't't

23;1

6975

PAGE 62

TST
8R

cmP

MOV

3s
#SMAIL ,R1
8%
#6,R0

#4$,-(R0O)

(SP)¢+,(SP)+

:BRANCH IF YES

;*ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLT
saveassERROR NUMBER Trennen

:THEN REPEAT FROM 3$

:AND THE RETURN ADDRESS

;RESTORE THE STACK POINTER

(NKMA
MACY11_30(1C46)
27-DEC-82
(NKMAA P11
27-DEC-82 13:15
7020
7021

;85%

000710

000714

000716

105737

000420

012737

000422

001403

6 2
13:16 PAGE 62-1
BEGIN OF AREA TESTED (+20) WHEN PROGRAM RELOCATES.
5%:

000450

1578

SASENV

sRUNNING UNDER APT?

mov

#SSWREG,I#SWR

;SET SWR EQUAL TO APT SWITCH REGISTER.

BEQ

APTS12

SEQ 0019

sBRANCH IF NO

7024

7027
7028

sAPTSIZ= THIS ROUTINE WILL SEARCH THE APT MEMORY ETABLE AND WHEN
A NON ZERO TYPE IS FOUND WILL SETUP TO TEST TO GIVEN HIGH ADDRESS.

7031

;8%2

NOTE THE MEMCRY TYPE IS IGNORED SINCE ALL TESTS ARE RUN REGARDLESS OF MEMORY TYPE.

;8%8

FLOU

7032

7035

000724

012703

000340

7038
;823

0Q0u744
000750

105737
100021

000421

012701
162701

000451
000004

7036
7037

7041
7042

7043
7044
7045
;829

()0730
000736
000752
000756
000762
000764
000766
000772

013737
013737

105711
001006
020127
101371

000330
000332

(00774
001009

004767
000002

005166

7049
7050
;825

001002
001006
001012

004767
004767
000464

006324
006320

7053

001014

032777

000100

001024
001026
001032
001034

010401
012710
011111
062701

001022

001060

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

ELSE

APTSIZ: MOV

sPOINT R3 TO MAXMEM.

SNSENVM
TRYSR

sDOES APT ALLOW SELF SIZING?
;BRANCH IF YES

MoV
sus

#SMTYPL+4 R
#4 R

sPOINT R1 TO BLOCK TYPE 4(+4)
:POINT R1 TO NEXT BLOCK TYPE.

JSR
2

PC,FATERR

:*ERROR* REPORT ERROR MESSAGE AND HALT AT FATH.T
;exxaasERROR NUMBER 2xtvrre

JSR
JSR
BRTPSZ: BR

PC,GETADR
PC,GETADR
TYPSIZ

:GO SET MAXIMUM APT ADDRESS INTO SMAXM ¢+ $HIMAX
:GO SET MAXIMUM APT ADDRESS IN10 HIGHADD+HIGHTWO
: TYPE THE SIZE OF MEMORY UNDER TEST

TRYSR:

BIT

#100,3SWR

sUSER DEFINED MEMORY TEST BOUNDARIES??

SLFSIZ: MOV
MOV
2%:
MoV
ADD

R4 R1
#43, (RO)
(R1),(R1)
#2,.R

;SETUP R1 AND R4 TO THE LCWEST ADDRESS OF MEMORY
sSET UP RETURN ADDRESS FROM TIME QUT TRAP TO 4$
:WRITE A MEMORY LOCATION INTO ITSELF AND TRAP IF NxM
:ADD 2 TO THE ADDRESS POINTER

1ST8
BPL
1$:

1S18
BNE
CMP
BHI

2s:

177426

SEND ERROR #3

#MAXMEM, RS

MoV
Mov

000431

7048
5};

;8§§

000334
000336

IF APT DEFINES SIZE THE LOW TEST ADDRESS MUST=00000.(DUE TO ETABLE FORMAT)

BNE

SNHIGHTWO, a#SHIMAX
S#HIGHADD, @#SMAXM

(R1)
2%
R1,#SMTYP1
18

TYPS1Z

sIN CASE NO SELF SIZING DONE.
:IN CASE NO SELF SIZING DONE.

s1S THE BLOCK TYPE NON ZERO?
sBRANCH IF YES (MEMORY EXISTS)
sALL APT BLOCK TYPES BEEN CHECKED?
;BRANCH IF NO

sBRANCH IF YES (DON'T SIZE MEMORY)

7056
7057

7060
7061
7062
7063

7064
7065

7066
7067
7068
7069
7070
7071
7072
7073

001040
001044

001046
001052
001054
001062
001064
001070

022701
101372
005737
001410
023737
001404
162701
000401

001072
000002

170000

cMp
BHI

000042
000042

010000

000046

TST
BEQ
CMP
8tQ
suB
BR

#170000,R1
2%
ane2
5%
ana2,aneb
5%
#10000,R1
5%

sCHECK IF BEYOND 30K MEMORY BOUNDARY
;KEEP ON SIZING UP THE MEMORY UNTIL NXM TRAP
:(TIME OUT TRAP) IS ENCOUNTERED
:0R 30K BOUNDARY REACHED
s IF NOT XXDP
:
THEN CONTINUE
;
ELSE_IF NOT XXDP CHAINING
:
THEN CONTINUE
:
ELSE SET MAX. MEM. AT 28k

CNKMA

MACY11 30(1046)

CNKMAA.P11
7074
707S
7076
7077
7078

001072
001074
001100

27-DEC-82 13:15
022626
004767

005764

105737

000276

7079
7080
7081

001104
001106
001112

001416
012710
012701

7083

001120

022626

7082

001116

7084 001122
7085

000745

022701

7086
7087
7088

001126
001130

001005
013702

7091

7089
7090

7092
7093
7094

7095

001136
001140

cMP

(SP)+,(SP)+

SMAXIMUM AVAILABLE MEMORY
*IN WHICH CASE GO TO 128
*PREPARE TO UPDATE MEMORY MANAGEMENT REGISTERS

(MP

<(R3),~(R1)

;CAUSE R3 TO POINT TO LOCATION SMAXM AND R1

000324

MOV

#LOWTWO,
R

005536

JSR

PC.OCTTYP

001202

012701

JSR
8k

cMP

MOV

001176

004767

005370

001206
001212

004767
000055

005272

TYPMEM: JSR
.eegfiz

005524
000330
006116

JSR
SETSTK: MOV
JSR

004767

001214
001220
001224

004767
012703
004767

001230

(310401

7116
7117
7118
7119

001232

062704

001236
001240

005302
002374

7121

001250

001002

0. J42

7122
7123
7124

001252
001256
001267

7126
7127
7128

001266
001270
001276

001264

001300

JSR

000022

022737

167776

062704
010437
005021

000022
000310

4$:

000336

020104

101775
012737
005723
001005

157776

000340

PC . MMREG
6$

PC,PUTADR

-(R3),=(R3)

PC,PUTADR

-(R3)
<(R3)
-(R3)
#BUSER,(RO)+

R4 ,R3

*PAGE ADDRESS REGISTER 6 THEN IT HAS REACHED THE

;OTHERWISE GO TO UPDATE MEM. MANG. REGISTERS

:TO THE MAXIMUM AVAILABLE MEMORY
360 TO THE SUBROUTINE TO PLACE THE ADDRESS IN R1
SAT LOCATIONS SMAXM AND SHIMAX

*MAKE R3 POINT TO HIGHADD
:PLACE THE ADDRESS IN R1

SAND HIGHTWO

ESZA??OLO POINT TO THE LOWEST AVAILABLE MEMORY

PC.STYPE
/=1

t TYPE'

PC,OCTTYP
#HIGHTWO,R3
PC,$GTSIZ

ADD

#18..R4

DEC
BGE

R2
4

AT LOCATIONS HIGHADD

;CLEAR THE LOCATION LOWADD
*AND LOWTWO
:SET UP VECTOR FOR ANY FUTURE TRAP

sTYPE CR/LF

R4 ,R1

CMP

*IF R1 DID NOT READ ALL THE LOCATIONS POINTED BY

PC,PCRLF

MOV

BNE

5¢:
6$:

:RESTORE STACK POINTER

12%
a#172352,R2

000104

010403

‘IF NO MEM, MANG. THEN GO T0 128
SSET UP THE RETURN ADDRESS FROM TRAP TO 8%
‘BEGIN CHECKING MEMORY ABOVE 28K

BNE
MOV

ST
(LR
CLR
TYPSIZ: MOV

001170

JRESTORE THE STACK POINTER
* SERVICE MEMORY MANAGEMENT IF IT IS AVAILABLE
SAND IF IT HAS TO BE TESTED
:SEE IF MEMORY MANAGEMENT HAS TO BE TESTED

#160000, R1

JSR

024343

128:

SEQ 0020

(MP

006064

001150

7106

7129

172352

12$
#8$, (RO)
#20000, R1

JSR

001172

7125

a#MMAVA

006072

7104

7120

TST8

68:

BEQ
MOV
MOV

004767

005743
005043
005043
012720

7113
;}}g

(SP)+ ,(SP)+
PC . MEMMNG

001144

001156
001160
001162
001164

7110
7111
7112

CMP
JSR

024341

7098
7099
7100
7101

7107
;}83

A ¥
5$:

8s:

160000

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

001142

004767

7105

001120
020000

PAGE 62=2

005730

001152

;}85

13:16

004767
000762

7096

7097

27-DEC-82

STYPE LOW, TEST ADDRESSE (LOWTWO+LOWADD)
sTYPE HIGHEST TEST ADDRESS (HIGHTWO*HIGHADD)
HAKE R3 POINT TO THE HIGH ORDER BITS OF TOP ADDRESS
: GET THE BITS 13-17 OF THE TOP ADDRESS

*PLACED IN BITS 0-4 OF R2
*SET R1 TO LOWEST TEST ADDRESS

:APPEND THE ERROR STACK FOR THE MEMORY UNDER
STEST TO THE END OF THE PROGRAM

#167776,3#SMAXM;CHECK IF THIS IS A 30K SYSTEM
s

*BRANCH IF NOT

ADD
MOV
CLR

#18. R4
R4, 8#ENDSTK
(R1)+

BLOS
MOV
ST

6%
#157776, 34MAXMEM
:SET MAXMEM TO MAXIMUM VIRTUAL ADDRESS
(R3)+
sTESTING MEMORY MANAGEMENT?

CMP

BNE

R1,R4

SAVLDR

*SAVE ANOTHER BANKS WORTH OF ERROR STACK
*SAVE THE ADDRESS OF THE END OF THE ERROR STACK
*CLEAR THE ERROR STACK

*BRANCH IF

YES (GO SAVE LOADERS AT TOP OF VIRTUAL MEMORY

(NKMA
MACY11 30(1046) 27-DEC~-B2
CNKMAA.P11
27-DEC-82 13:15
7130

001302

021327

170000

7132
713
;}gg

001310

0113635

000002

7136

001316

004767

006100

;}gg

001322

011305

7131

7137

001306

001320

10300

005723

I 2
13:16 PAGE 62-3
BEGIN OF AREA TESTED (+20) WHEN PROGRAM RELOCATES.
P

BHIS

MOV

SAVLDR: JSP

MOV

;}29
001326

020527

017776

7145
7146
7147
7148
7149

001332
001336
001342
001344
001352

162705
005737
001406
023737
001402

000276
000042

7151

001360

012524

7150

7152

001330

001354

001362

103416

162705

001364
001366

.01775
012323

7157

001372

010537

7158
7159
7160
7161
7162

000042

001370 010423
001376
001402
001406
001410

004767
005745
012703
005723

032777
001003
004767

010000

7170

001440

000167

003512

;};g

001436

001444

103411

000003
020423

7174
7175
7176
7177
7178

001446
001450
001454
001456
001460

103002
016304
005723
001003
021305

7181
7182
7183

001462
001464
001466
001472

101001
011305
105737
100014

7179
7180

PC,CLRMM

: DISABLE THE MEMORY MANAGEMENT UNIT

(R3),RS

*RS CONTAINS THE ADDRESS OF MAXIMUM AVAILABLE MEM.

(RS)+

*MAKE R3 TO POINT TO THE LOCATION MAXMEM

*BRANCH IF YES (DON'T SAVE LOADERS)

38:

SUB
TST
BEQ
CMP
BEQ

#276.RS
aré?
28
ane2,anub
2

;PREPARE TO SAVE 300 BYTES OF THE LOADERS
:IF RUNNING UNDER XXDP
*
THEN CONTINUE
i
ELSE IF NOT UNDER XXDP CHAIN MODE
.
THEN CONTINUE

28:

MOV

(R5)+, (R4)+

sSAVE LOADER

4%:

BLOS
MOV

2%
(R3)+, (R3)+

;SAVE THE CONTENTS OF LOCATION MAXMEM IN SAVMAX

RS, 3#SAVRS

sSAVE HIGHEST VIRTUAL ADDRESS+2

BNE
CMP

28
(R3).#157776

8LO

:THEN GO TO 2%
:1F THE LOWEST LOCATION UNDER TEST IS HIGHER THAN
2157776 THEN GO TO TEST MEMORY MANAGEMENT

157776
177020

28%:

004530

177776

000405

SUB

RS, (R%)

MOV

R4, (RS)+

BIT
BNE
JSR

3s:

4$:

6$:

8s:

JMP

;ONLY TESTING 4K MAX?

#<1502.¢2>=276 RS

CMP

TSTSIZ: JSR
ST
1$:
MOV
ST

000324

001422
001430
001432

7171

SOTHERWISE MAKE THE CONTENTS OF LOCATION MAXMEM
SEQUAL T) THE MAXIMUM AVAILABLE MEMORY
“AND FALL INTO SAVE LOADERS.

‘BRANCH IF YES (GO SAVE LOADERS)

TSTREL: MOV

006016

7167
7168
7169

001420

001003
021327

000346

001412
001414

5;;

(R3),2(R3)

RS, #17776

000046

005376

7163
7164
7165

7166

;IS THE VIRTUAL ADDRESS ABOVE 1677762

CMP

BLO

020513

7153
7154

;}gg

(R3).#170000

SAVLOR

;1F ONLY 4K BEING TESTED DON'T SAVE LOADERS

7142

;}22

SEQ 0021

PC.CLRMM
-(RS)
#LOWTWO,R3
(R3)+

ELSE SAVE 1500. WORDS FOR XXDP CHAIN MODE

SAND THE CONTENTS OF R4 AT SAVR&

*GO TO DISABLE MEMORY MANAGEMENT UNIT
*SET RS BACK TO HIGHEST VIRTUAL ADDRESS
*PREPARE TO LOAD R4 AND RS WITH THE MEMORY BOUNDRIES
S1F THE BITS 16,17 OF THE LOWEST LOCATION UNDER
:TEST ARE NON ZERO

#10000,aSwR
3s
PC,FATERR

;1S MEMORY MANAGEMENT SELECTED?
SYES ALL IS WELL
:+ERROR* REPORT
ERROR MESSAGE AND HALT AT FATHLT

TSTMM

:G0 TO TEST MEMORY MANAGEMENT

tesaaseERROR NUMBER 3vsvwxe

CMP

R4, (R3)+

*COMPARE TOP OF PROGRAM (WITH SAVED LOADERS)

BHIS
MOV
ST
BNE
CMP

6%
=2(R3),R4
(R3)+
8s
(R3),RS

;ADJUST R4 TO POINT TO THE LOWEST LOCATION UNDER TEST
“IF BITS 16=17 OF HIGHEST LOCATION TO BE TESTED
*ARE NON ZERO THEN GO TO 8%
‘OTHERWISE SEE IF THE HIGHEST LOCATION TO BE

BHI
MOV
TSTB
8PL

8s
(R3).RS
@#REL
108

‘MODIFY RS
*ARE WE RELOCATED.?
*BRANCH IF NO

SLOWEST LOCATION UNDER TEST

STESTED IS HIGHER THAN HIGHEST VIRTUAL ADDRESS
*IF SO THEN GO TO 8%

CNKMA

MACY11

UNKMAA F 11
7184
7185
7186

001474
001500
001504

30(1046)

27-DEC-82 13:75
013704
020527
103402

;}g;

001506

012705

7189
7190
7191
(})

001512
001514
001516
001522

020405
103403
004767
000004

7192
7193

001524
001530

012703
011343

;}gg

001536

005725

(1)

;}gg

001532

27-DEC-82

062713

7213
;S};

001540
001542
001544
001546
001550
001554
001560
001564
001566
001570

001574

010500
005040
020004
101375
012702
004767
012702
012212
000312
017702

042702

005037
110237

7220
7221
7222

001610
001612

010401
010400

7224
7225
7226

001616
001620
001622

006302
060702
066207

7230
7231
7232
7233

001626
001630
001632
001634

000102
000340
000440
000550

7235
7236
7237

001640
001642
001644

001126
001274
001430

7234

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

SEQ 0022

S#RELBOT R4
RS.M17776
9s

;SET BOTTOM TEST ADDRESS WHEN RELOCATED.
¢ARE WE RELOCATED IN BANK 0?
sBRANCH IF YES

9s:

CMP
BLO
JSR
4

R4 RS
10%
PC,FATERR

;IS LOW LiMIT LOWER THAN HIGH L TMMIT?
<BRANCH IF YES
;*ERRORt REPORT
ERROR MESSAGE AND HALT AT FATHLT
suwtetsFRROR NUMBER 4ewrene

000342

108:

000002

Mov
MoV

MEMTST: ADD

#SAVMAX ,R3
(R3) ,=(R3)

(RS)+

017776

MoV

004444

#7776 ,RS

#2,(R3)

sELSE SET HIGH MEMORY UNDER TEST=4K

cRESTORE THE CONTENTS OF MAXMEM

:=e§SR;HE2co~TE~TS OF MAXMEM = MAXIMUM AVAILABLE
;

sAND SET R5=MAX MEMORY+2

000001
005740
000316
176654

177760

CLRMEM: MOV
28:
CLR
CMP
BHI
Mov
JSR
MoV
MoV
SWAB
MOV

8IC

RS,RO
=(RO)
RO,R4
2s
#1,R2
PC,PARITY
#BAKPAT ,R2
(R2)+,(R2)
(R2)
aSWR R2

#177760,R2

:MOVE HIGH ADDRESS TO RO
sBEGIN CLEARING THE MEMORY FROM THE TOP
sUNTIL THE BOTTOM IS REACHED

;SET R2 TO ENABLE PARITY MODULE CODE.
;ENABLE PARITY IF WANTED AND AVAILABLE.
;WRITE SWAPPED BAKPAT IN LOCATION SWAPAT

sLOAD R2 WITH THE OPTIONS STORED AT $SWREG

sONLY LEAVE THE LOWER 4 BITS OF $SWREG IN R2 TO GO TO
sTHE TEST # SPECIFIED CDEFAULT IS TEST#0)

SENTER HERE FROM TSTSCP ROUTINE AT END OF SUBTEST
001600
0016064

7227

:CLEAR MEMORY UNDER TEST

7217
7218

7223

62-4

MOV
CMP
8LO

;S}g

7219

PAGE

000322
017776

;}gg
7200
7201
7202
7203
72064
7205
7206
7207
7208
7209

13:16

001614

001636

000306
000404

CONT:

(LR
Move

ANPASFLG
R2,Q¥STESTN

sINIT SUBTEST PASS FLAG.
sSET UP STESTN WITH THE TEST NUMBER GOING

LOOP:

MOV
MoV

R4 ,R1
R4 .RO

:LOAD R1 WITH THE LOWEST LOCATION UNDER TEST
:PLACE THE ADDRESS OF THE LOWEST LOCATION UNDER
;TEST IN RO

010403

001016

MOV
ASL
ADD
ADD

000004

T8L:

TS10-T8L
TST1-TBL

TST2-18BL

TST3-T8L
TST4-TBL
TST5-1BL
TST6-TBL
TST7-T8BL

R4 ,R3

R2
PC,R2
T8L~.(R2) ,PC

:TO BE EXECUTED

;AND IN R3

;G0 TO THE _TEST #

;STORED IN BITS 0-3 OF SWITCH REGISTER
;RELATIVE
sRELATIVE
sRELATIVE
sRELATIVE

ADDRESS
ADDRESS
ADDRESS
ADDRESS

OF
OF
OF
OF

TEST
TEST
TEST
TEST

# O
# 1
# 2
# 3

sRELATIVE ADDRESS OF TEST # &

;RELATIVE ADDRESS OF TEST # 5
sRELATIVE ADDRESS OF TEST # 6
;RELATIVE ADDRESS OF TEST # 7

NKMA

MACY11

7238
7239
72640
7241

001646
001650
001652
001654

(NKMAA P11

;gz%

7545

7246
7247

001656

30(1046)

27-DEC-82

27-DEC-82 13:15
001654
002204
002256
002530

003156

13:16

PAGE 62-5

BEGIN OF AREA TESTED (+20) WHEN PROGRAM RELOCATES.
TST10-18L
TST11-TBL
TST12-TBL
TST13-TBL

RELOC-TBL

;RELATIVE
;RELATIVE
;RELATIVE
sRELATIVE

ADDRESS
ADDRESS
ADDRESS
ADDRESS

SEQ 0023
OF
OF
OF
OF

TEST
TEST
TEST
TEST

#
#
#
#

10
11
12
13

sRELATIVE ADDRESS OF ROUTINE °‘RELOC’

;RS IS POINTING TO THE TOP OF THE MEMORY TO BE TESTED+2
;R4 £ RO ARE POINTING TO THE LOWEST ADDRESS OF MEMORY TO BE

TESTED

7263

7264

7265

7266
7267
7268
7269

7270
727
7272
7273
7274
7275

7276
7277
7278
7279

)

PROGRAM COMES TO THIS ROUTINE AFTER COMPLETION OF

IF CNTRL=-C TYPED GOTO ERROR HISTORY TYPE ROUTINE.
IF SR= 2000 (BIT10) THEN HALT

AR
B

N PR

B
L

L T

000420

006002

BNE
JSR

021672

113702

000404

CNTSCP: MOVB

001676
001702
001710
001712

005237
032777
001401

000410
002000

032777
001332

040000

001714
001722
001724
001726

105202

176526

TSTGO:

SNSENV
CNTSCP

sARE WE RUNNING UNDER APT?
sIF SO THEN GO TO CNTSCP

INSTESTN,R2

sPLACE THE TEST NUMBER IN THE LOWER BYTE OF R2
;SINCE THERE ARE LESS THAN 377 TESTS UPPLR BYTE
;OF R2 WILL BE 0
sTELL APT WE ARE STILL RUNNING OKAY
s 1S THE PROGRAM GOING TO HALT AFTER EACH TEST?
:IF NOT THEN GO TO 2%
sHALT AT END OF TEST SWITCH SET.

PC,CHECKC

SNSDEVCT

BIT
BEQ

#2000,aSWR
TSTGO

8IT
BNE
INCB
BR

#40000,aSWR
LOOP
R2
CONT

SWHALT: HALT

000000

000724

TST8B

INC

176540

EACH TEST AND

IF SR= 40000 (BIT14) THEN LOOP ON TEST DEFINED BY SR BI175<3:0>
ELSE CONTINUE TO NEXT TEST.

105737
001660
001664 - 001002
001666
004767

TSTSCP:

SEQ@ 0024

SCOPE ROUTINE

7252
7253
7254
7255
7256
7257
7258
7259
7260
7261
7262

BN BN BN

13:16 PAGE 62-6
SCOPE ROUTINE
T I RN WL S

MACY11 30(1046)
(NKMA
27-DEC-~82
CNKMAA 1N
27-DEC-82 13:15

sTEST FOR CONTROL=-C AND IF TYPED GO
cPRINT ERROR HISTORY AND HALT AT FATHLT.

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

MACY11 30(1 046 )
27
EC -82
CNKMAA P11
27-DE c-8 21 3:1
CMHKMA

7292

SEQ@ 0025

t.'ttttt'.'t't't.t"'t'itt""tiit't"ttttttttt.tt'ttiitt'tttt.

tTEST 0

(3)

(4)

~N =~
AN
A A
-~ -~
= b D NOPNINI N IS S S
8 0»
~
ot wt BN N
o W " o " o o o

13:16 PAGE 62-7
10
TEST FOR PROPER BANK SELECTION

1(1)

.'(2)

001730

105737

000404

001734
001736
001742

001403
004767
000005

004224

001744
001750
001752
001754
001756
001760
001762
001764

012703
010401
010310
020001
001417

*(3)

THIS TEST ALSO CHECKS TO SEE THAT NONE OF THE MjuM EXIST-

020311

001766

001004

18:

2%:

005711
001430

1818

012767

001776
002000
002000

000403

012767

002006
002010
002014

010046
105237
000407

002020
002022

001411
012767

002030
002032
002034
002040
002042

010046
010300
004767
000000
012600

003570

002044
002050

013706
062701

000350
020000

002054

02015

002056

103736

000006

000042
3

000007

000032
108:

000301

020311

48:
000010

000010

118%:

128:

5¢:

CI.E. LOCATIONS LIKE 7766 AND 27766 ETC.]
ING BANK RESPOND WHEN THEY ARE ADDRESSED
R

ANSTESTN

;CHECK FOR PROPER TEST SEQUENCE

.+10

JSR
5

PC,SEQERR

MOV
MOV

77777 ,R3
R4 ,R1

sR1
= ADDRESS OF LOWEST LOCATION OF MEMORY UNDER TEST

CMP
BEQ

RO,R1
48

:IS RO POINTING TO THE SAME HEHORY LOCATION AS R1
IN WHICH CASE CHECK FOR ALL 1'S AT (RD)

MOV
;Eg

001770

002016

BEQ

177777

IT CHECKS FOR PROPER BANK SELECTION BY WRITING

TS7T0:

OF ALL 0°'S AND RO HAS THE ADDRESS OF THE LOWEST
LOCATION UNDER TEST
1'S IN A LOCATION AND CHECKING FOR 0'S IN THE SAME
LOCATIONS OF OTHER 4K _BANKS OF THE MEMORY

TEST FOR _PROPER BANK SELECTION
THIS TEST ASSUMES THAT THE MEMORY IS IN A STATE

;*ERROR* REPORT ERROR MESSAGE AND Hni: mT FATHLT
;wexwe«ERROR NUMBER >ttwews

R3 (RO)
;21)

SET ALL THE BITS AT (RO)

'OTHERUISE CHECK (R1) FOR ALL 0°'S

CMP

R3, (R1)

BNE

Mov

#6,12%

108

MOV

87,128

;*ERROR* SETUP ERROR NO. IN 128

MoV

RO,-(SP)

SAVE RO ON STACK

328

g;.(RT)

:CHECK (R1) FOR ALL 1'S

MOV

#10,12%

;*ERROR* SETUP ERROR NO. IN 128

MOV
MOV

RO,-(SP)
R3,.R0

égCB

?géADERR

:IF RT 1S NOT EQUAL TO RO AND (R1)
DOES NOT CONTAIN ALL 0°'S THEN
;CHECK TO SEE IF (RO) = (R1)
;*ERROR* SETUP ERROR NO. IN 12%
sxnxxx*ERROR NUMBER #6ttrwsy

ttttttERROR NUMBER #7%xnxxxe

AN ADDRESSING ERROR IS SUSPECTED

*tttt*ERROR NUMBER #10wtsxxn
SAVE RO ON STACK

JSR

PC.,ERROR

MOV

(SP)+ RO

MOV

S#SAVRG, SP

JRESTORE THE STACK POINTER

cMp

R1.RS

LOCATION IN THE NEXT 4K BANK OF MEMORY
BY ADDING 1 TO THE 14TH BIT OF ADDRESS IN R1
:COMPARE R1 WITH THE HIGHEST MEMORY

8L0

.WORD

ADD

#20000,R1

;G0 TO THE ERROR SUBROUTINE

ERROR NUMBER TO BE REPORTED WILL BE PLACED HERE

RESTORE RO

CAUSE R1 TO POINT TQO THE SAME CHIP

LOCATION WHICH IS STORED IN RS
:IF R1 LESS THAN R5 THEN REPEAT THE TEST FROM 2%

MACY11 30(1046)
27-DEC-82
CNKMAA P
27-DEC-B2 13:15
CNKMA

7329
7330
73

733

733
7334
7335
7336
7337
7338
7339
7340
7341
7342
7343
7344
7345
(1)
(1)
7346
7347
7348
7349
7350
7351
7352

7353
7354
7355

7356
7357
7358
7359
7360

002060
002064
(92066
002074

105737
100432
032777
001026

000421

002076
002102

02n127

157776

002104

020137

000340

002110
002112
002116
002122
002126
002130
002132
002136

103755

012702
012712
012742
060712
011111
004767

000006
000300
177714

000011

002140
002144
002150
002152

012702
012722
005012
005010

000004
000006

002154

062700

020000

002160

002162
002164

101016

000100

13:16
PAGE 62-8
10
TEST FOR PROPER BANK SELECTION

TSTB

SNSENVM

;HAS APT INHIBITED SIZING?

BIT

#100,aSWR

‘HAS USER INWIBITED SIZING?

BM]

176354

BNE
CMP

6$:
8$:

R1,#157776

BHI

CMP

R1,30MAXMEM

B8LO

004030

*BRANCH IF YES (DON'T TEST NON-EXISTENT MEMORY)

‘BRANCH IF YES (DON'T TEST NON-EXISTENT MEMORY)
;SEE IF R1 HAS CROSSED 28K BOUNDRY OF VIRTUAL ADDRESS

*IN WHICH CASE GO TO 68

1SHOULD BE LEFT AS IS FOR 30K SYSTEMS (WHICH USE 16K CHI
;ag"gnggusa THAN THE MAXIMUM AVAILABLE

MOV
MOV
zgg

#6,R2
#300, (R2)
ggszfisg.-(az>

SIF SO THEN GO TO 5%

MOV
JSR
11

(R1), (R
PC,FATERR

:TRY TO WRITE TO NON-EXISTENT MEMORY (SHOULD TRAP)
**ERROR* REPORT
ERROR MESSAGE AND HALT AT FATHLTY
senxxwsERROR NUMBER 11wtwwee

MOV

#4 ,R2

MOV

26, (R2)+

CLR

(RO)

CLR

(R2)

‘MAKE R2 POINT TO TRAP VECTOR+2 FOR NXM
SSET PSW TO 300;VER:1
*SET UP RETURN ADDRESS FROM TRAP TO 5%

;RESTORE TRAP VECTOR

ADD

#20000,R0

020005

cMP

RO,RS

:LOCATION IN THE NEXT 4K MEMORY BANK
‘8Y ADDING 1 TO THE 14TH BIT OF ADDRESS IN RO
*COMPARE RO WITH THE HIGHEST MEMORY

103672

8LO

‘IF RO LESS THEN REPEAT THE TEST

000635

ENDO:

TSTSCP

SEQ 0026

;CAUSE RO TO POINT TO THE SAME CHIP

*LOCATION WHICH IS STORED IN RS.

MACY11 301046 )
27-D EC~-82
CNKMA
CNKMAA L1
27-DEC-8 2 13:15

13:1?1 PAGE 62-9

7366

TETEST 1

;x(1)
*

002166

122737

000001

002174
002176
002202

001403
004767
000012

003764

002204
002210
002212
002214
002216
002220
002224

012700
010002
010011
020011
001403
004767
000013

002226
002230
002232

005702
001406
006300

002234
002236
002240
002244

012700
000762

002246
002250
002252

000261
006100
103757

002254

062701

002260
002262
002264

020105
103750
000737

000001

000404

SEQ@ 0027

CHECK DI/DO LINES
RN

RN E

AT TN E R

A NI R RN R R AR R RN

PO N

CERRORRORRRTORNE

CHECK DI/DO LINES

THIS TEST CHECKS THE DATI/DATO LINES BY SHIFTING

A 1

IN THE WORD DIRECTION

2323222232223 22020000A00020080080200
20002 2330200222 f233 2323023222323 2]]

Ts11:

1$:

2$:
3%:

Lv3604

cMPB

#1,#8TESTN

BEQ
JSR
12

PC,SEQERR

MOV
MoV
MOV
CMP
8EQ
JSR

#1,R0
RO,R2
RC, (R1)
RO, (R1)
49
PC.ERROR

TST

R2
5%

BEQ

.+10

ASL

103366

8CC

005002

CLR
MoV
BR

R2
#177776,R0
2%

177776
5%:

020000

END1:

SEC

ROL

8CS

RO
2%

ADD

#20000,R1

CMP
8LO
BR

R1,R5
1$

ENDO

sCHECK FOR PROPER TEST SEQUENCE

;*ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLTY

;eeeet«ERROR NUMBER 12%wewws

:SET R2=1

;MOV 1 AT LOCATION (R1)
;COMPARE R1 WITH THE CONTENTS OF LOCATION (R1)

:*ERROR* REPORT ERROR_MESSAGE
swaxax*ERROR NUMBER 13#snven
sARE WE SHIFTING A O IN DATA DIRECTION?

;IF SO THEN GO TO 5%
sSHIFT THE 1 BROUGHT IN AT 1% IN

+DATA DIRECTION

¢IF _THE 1 HAS NOT BEEN SHIFTED THRU

sTHE 16 DATA BITS THEN REPEAT FROM 2%

sINITIATE SHIFTING OF O IN DATA DIRECTION

sSET C BIT

sSHIFT A O 16 TIMES IN DATA DIRECTION
;IF_THE O HAS NOT BEEN SHIFTED THRU
sTHE 16 DATA BITS THEN REPEAT FROM 2%
sOTHERWISE GO TO THE NEXT BANK OF
;4K MEMORY AND REPEAT THE TEST

CNKMA
MACY11_30(1046)
CNKMAA P11
27-DEC~82

27-DEC-82
13:15

7406
[ele] NIPNONES
IS S 0
oo~ Nt N Nt o Nt N

~N N
£ NN~
—~

(gD

(1)
7410
7411
7412
7413
7414

7415
76416
7417
7418
7419
7420
7421
742
742
7424
2425
7426
(N
(1)
7427
7428
7429
7430

76431
7432
7433
74634
7435

3
SEQ 0028

TEST MEMORY FOR HOLDING DATA AND BYTE SELECTION

AAAAL AL AL LA RALALAALMAAAAAAAAAR
LA
AAAALARAAA
AR ARAAAAAAddAd]

LRTEST 2

7409

13:1?2 PAGE 62-10

:+(1)
*

° %

1e(2)

:x(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 TIME

STEPS 1 & 2 ARE REPEATED WITH A SWAPPED BACKGROUND PATTERN

SR 222322240000 dlaRidliRAlAdiiRdRdi
ittt iiidisdtliddtiiisdld]

002266

122737

000002

002274
002276
002302

001403
004767
000014

003664

002304
002310
002312
002316
002320

013700

000316

002322

020041

002324
02326
0L2332
002336
002340
002342
002344
002350
002354
002360

001416
062701
123741
001402
120041
001002

002362
002364
002366
002372

020104

002374

000733

110021
113721

020105

000404

7512:

000317

101356

000337
001744

003250

PC,SEQERR

MOV
MOVB
MovBs

RO, (R1)+
gq83§PAT*1,(R1)*;URITE THE MEMORY WITH THE WORD STORED IN BAKPATY

cMp
BEQ

000002
000317

000001

BEQ
JSR

CMP
BLO

2$:

000301

#2,0STESTN

103771

105237
042701
004767
000015

CMPB

ADD

4S:
6%:

cMP8
BEQ
CMPB
BNE
INCB
8IC
JSR
15

.+10

;*ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLT

Jeexxe*ERROR

NUMBER

14wanwns

SN#BAKPAT
RO

1$’
RO,=(R1)

JTEST THE MEMORY TO SEE IF

;THE WORD STORED IN BAKPAT

IT CONTAINS

#2,R1

2:BAKPAT*1,-(R1):CHECK FOR BYTE SELECTION PROBLEM
gg,-(R1)

JAGAIN CHECK FOR BYTE SELECTION PROBLEM

a#SADERR

;PREPARE TO INFORM THAT IT IS ADDRESSING ERROR

PC.,ERROR

;*ERROR* REPORT ERROR MESSAGE

#1,R1

8s:

CMP
BHI
SWAB
BEQ

R1,R4
28
a#BAKPAT
1%

END2:

B8R

END1

000316

sCHECK FOR PROPER TEST SEQUENCE

;JMAKE THE ADDRESS IN R1
;axetxsERROR NUMBER

EVEN

15¢twenxn

sKEEP ON TESTING THE MEMORY UNTIL
:R1 EQUALS THE LOWEST ADDRESS
;CHANGE THE DATA PATTERN
JIF ThEe DATA PATTERN DOES NOT HAVE LOW

; BYTE =0 THEN FALL THRU

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

(NKMA
MACY11 30(1046)
27-DEC-82
CNKMAA.F11
27-DEC-82 13:15

13:16_ PAGE 62-11
T3
DUAL ADDRESS TEST A

76447

ff;

NR R NN RN

TeTEST 3

3
SEQ 0029

RO RO AN C R T E R AR R AN

O NN RE AN C NG RRTRCCERNRONIRRLEY

DUAL ADDRESS TEST A

(4)

;+(1)

(4)

.(2>

(4)
(4)
4)

-(3>
‘e(4)
1e(5)

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

(MFB

#3,3#STESTN

;CHECK FOR PROPER TEST SEQUENCE

BEQ
JSR

.+10
PC,SEQERR

;*ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLT

CLR
JSR

R3
PC,afWRTMEM

48:
6$:

CLR
BIS
CMP
BLO
cMP
BHIS
SWAB

R2
R3,R2
R2 R4
16$
R2,RS
208
(R2)

78:

8IS

CLR

CMP

R (R4

(4L)

(&)

(3)

002376

122737

007003

7448
7449

002404
002406

001403
004767

003554

7450
76451
7452
7453
7454
7455
7456
7457
7458
7459
7460
7461

002414
002416

005003
004737

000120

002422
002424
002426
0026430
002432
002436
002436

005002
050302
020204
103465
020205
103077
000312

002412

002440

000016

000404

TST3:

28:

005001

7462

002442

050301

7464

002446

103445

8LO

103053

BHIS

020011

CMP

7463

7465

STARTING FROM THE LOWEST LOCATION IN THE BANK THE TEST WRITES A

LOCATION WITH SWAPPED BAKPAT

;.'ttttttttttt'tttttttttittt'ttttittt'ttttttttlittttttttttttttttt'

gg;

§}§

THIS TEST CHECKS FOR DUAL ADDRESSING PROBLEMS BY WRITING A

BACK GROUND OF BAKPAT,

002444

020104

002450

020105

002454
002456

020102
001431

002462
002464

001437
012767

002472

010046

7475
7476
7477
7478
7479

002476

R3,R1

126

CMP

R1,RS

CMP
BEQ

R1,R2
10§

BEQ
MOV

12
#17.228

MOV

RO,-(SP)

022611

CMP

(SP)+, (R1)

002500

001003

BNE

7481

002502

012767

000020

MOV

420,228

7482

002510

105237

000301

INCB

@#SADERR

7484
7485

002516
002520

MOV
JSR

R2.RO
PC . ERROR

76466

002452

7469

002460

7467
7468
7470
7471
7472

(1)
7473

7474

7480
1)

7483
7486

002474

002514
002526

000017

000032

3s:

000316

010046

010200
004767
000000

003104

000014
9$:

228:

SWAB

MOV

.WORD

15§

RO, (R1)

(SP)

RO,=(SP)

SexneavERROR NUMBER 16#sxevn

; WRITE MEMORY WITH THE BACKGROUND STORED
AT LOCATION BAKPAT
:MAKE R2 POINT TO THE MEMORY BANK POINTED BY R3
“IF R2 IS LESS THAN Ré4
:THEN DO NOTHING
“IF R2 IS HIGHER THAN THE HIGHEST LOCATION TO BE
STESTED THEN EXIT THE TEST
SOTHERWISE WRITE THE COMPLEMENT OF BAKPAT IN
*THE LOCATION POINTED BY R2
:IF R1

IS POINTING TO A LOCATION LOWER THAN R4

<THEN GO TO 123

:CHECK THE MEMORY FOR CORRECT DATA

;1F R1 IS NOT = TO R2 THEN (R1) SHOULD HAVE
‘THE SAME WORD AS BAKPAT
*IN WHICH CASE GO BACK TO 12%
:*ERROR* SETUP ERROR NO. IN 22%

"*"tERROR NUMBER #17vtanen
*PLACE RO ON THE STACK

;1F (R1) IS NOT = RO THEN SEE IF IT IS SAME
*AS A SWAPPED RO
*IF NOT THEN A SUSPECTED DUAL ADDRESSING PROBLEM
*FOR THE BITS THAT ARE DIFFERENT IN RO AND (R1)
‘OTHERWISE THERE IS DUAL ADDRESSING FOR THE

*ENTIRE WORD

{«ERROR* SETUP ERROR NO. IN 22%

tesxaswtERROR NUMBER #20svvss

*ADDRESSING PROBLEM IS DETECTED

*SAVE RO

*SET RO=GOOD ADDRESS FOR ERROR REPORT
‘GO TO THE ERROR SUBROUTINE

:ERROR NUMBER TO BE REPORTED WILL BE PLACED HERE

(NKMA

MACY11

(NKMAA P11

7487
7488
76489
7490
76491
76492
7493
76494
7495
7496
(1)

7697
7498
7499
7500

7501

7502

7503

7504
7505
7506
7507
7508
7509
7510

7511
7512
7513
7514
7515
7516
7517
7518
7519
7520
7521
7522
7523

27-DEC-82
27-DEC-82 13:15
30(1046)

012600
010011
020037

001411
000407
000300
020011
002546
002550

001404
012767

002556
002560
002562
002564
002566
002570
002572
002574
002600
002602
002604

000745
000300
04030
005701
001001
005201
006101
020127
103720
000312
040302

002606
002610
002612
002614
002616

005702
001001
005202
006102
020227

002622
002624

002626

103700
060203
020337

002632
002634
002640

103673
000337
001656

002642

000654

13:16_

000716
:
108

000021

177746

138:
15%:
16%:

020000

188:

(SP)+ RO
RO, (R1)
RO,3#BAKPAT

;RESTORE RO
;RESTORE (R1)
;IF THE CONTROL CAME HERE FROM 158-2 THEN

11$
RO

:RETURN TO 118
JMAKE RO SAME AS SWAPPED BAKPAT

8EQ

118
#21,22%

:EQUAL TO SWAPPED RO
JIN WHICH CASE GO BACK TO 118
;*ERROR* SETUP ERROR NO. IN 22%

BR
SWAB
8IC
TST
BNE
INC

MOV
MCV
CMP
BEQ
B8R
SWAB
CMP

000316

12§

RO, (R1)

CMP
8LO
SWAB
8IC

RO
R3,R1
R1
13%
R1
R1
R1,#20000
78
(R2)
R3,R2

TST
BNE
INC
ROL
CMP

R2
18%
R2
R2
RZ,#20000

ROL

BLO

ADD

CMP

R2,R3
R3,34MAXMEM

208:

8LO
SWAB
8EQ

43
aNBAKPAT
TS13

END3:

END2

000340

SEQ@ 0030

DUAL ADDRESS TEST A

MOV

11$:
12%:

020000

PAGE 62-12

:1F R1 = R2 THEN (R1) SHOULD CONTAIN A WORD

serea
e *ERROR NUMBER #21twwwnnvw

;AND GO TO 8%
;RESTORE RO TO BAKPAT

;TAKE OUT THE BANK ADDRESS FROM THE ADDRESS

JIF R1 IS O THEN PLACE A 1 IN R1
JOTHERWISE GO TO 13$

:IF R1 IS LESS THAN A 4K BOUNDRY
;THEN REPEAT FROM 7$

;RESTORE (R2) TO BAKPAT
s TAKE OUT THE BANK ADDRESS FROM THE ADDRESS
sSTORED IN R2
sIF R2 = 0 THEN MOVE A 1 TO R2
;OTHERWISE GO TO 18$%
¢SHIFT A ONE IN THE ADDRESS WORD
;1S THE ADDRESS IN R2 MORE THAN THE BOUNDRY
sOF &K

;IF NOT THEN GO TC 6%
;OTHERWISE MAKE R3 POINT TO THE NEXT 4K BANK
;IF R3 IS POINTING TO A BANK THAT IS LOWER
: THAN MAXMEM

:THEN REPEAT FROM 4%
sREPEAT THE TEST WITH SWAPPED BAKPAT ONLY

;THE LOWER BYTE OF BAKPAT IS 0

IN R1

(NKMA
MACY11 30(1046) 27-DEC-82
CNKMAA P11
27-DE(~82 13:15

13:16 PAGE 62-13
T4
CUAL ADDRESS TEST B

7530

(3)
(4)
(4)
(4)
3

:g;
7531

122737

002652

001403

002660

000022

002654

7533
7536

002662
002664

005003
010100

7536
7537
7538
7539

002670
002672
002674
002676

001401
005100
010021
020105

7535

;gz?

002666

002700

004767

000004

103771

000301

7546

002712

004767

002712

7547
7548
7549
755C
7551
7552
7553
7554
7555
7556

002720
002722
002726
002730
002732
002734
002736
002740
002746
002750

010100
162700
005703
001401
005100
020104
101361
112737
005103
001345

002752

000733

002716

000023

3s:

5§:
000001

000306

END4:

A A

(MPB

#6 ,NSTESTN
.+10

JSR

PC,SEQERR

CLR
MOV

TST

R3
R1,.RO
R3

BLO

BEQ
COM
MOV
CMP

RNC RN RN RATRNONR RO CAROCCATRROELE

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

seextetERROR NUMBER 22¢steve

:IF R3 IS NOT O THEN STORE THE ADDRESS

2$
RO
RO, (R1)+
R1,R5

sIN THE LOCATION
:OTHERWISE STORE COMPLEMENT
;OF THE ADDRESS
SUNTIL THME HIGHEST MEMORY LOCATION IS REACHED

cMP
BEQ

RO,-(R1)
48

sCHECK THE LOCATION FOR THE CORRECT CONTENTS

SFSADERR

:;?%SPAgBEEgBABLY ADDRESS PROBLEM RATHER THAN

JSR

PC.ERROR

; *ERROR* REPORT ERROR_MESSAGE

Mov
sus
TST
BEQ
COM
CMP
BHI
Move
COM
BNE

R1,RO
#2,R0
R3
5$
RO
R1,R4
3
#1,3#PASFLG
R3
1%

END3

23
4%:

s*(1)
o
;v

INCB

000002

SEQ 0031

CUAL 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

2%:

105237

7557
7558

BEQ

005703

020041
001405

5};

TST4:

1%:

002702
002704

002706

000404

003306

75642
7543

;gzg

JINRPRRR RN AAN AR AN N TR RO RO N E TR

002644

7532

:};

S*TEST @

sevaas*ERROR NUMBER 23%wvxer

sCHECK THAT THE ADDRESS IS STORED 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

CNKMA

MACY!1 30€1046)

CNKMAA . P11

27-DEC-82

27-DEC~82 13:15

13:16

7574
%)

(%)

:«(4)
;*(S)

(4)

002754

122737

7576

002762

001403

(};

002770

000024

7575

7577
(

7578
7579

7580
7581
7582

g};

7583
7584
7585
7586
7587
g};
7588
7589
7590
7591
7592
;232

MARCHING 1°'S AND 0°S

(1)
i
:%(2)
I
B
:*(3)
i

(4)
(2)

5%;

SEQ 0032

A A A A A A A R
A A A A A
R A A
A AR
JeTEST S
MARCHING 1'S AND C°'S

(4)
%)
(4)
(4)
(%)
(4)
(%)

(3)

PAGE 62-14

002764

000005

004767

003176

002772

004737

000120

002776

020041

003000
003002

003006

001403
004767

000025

003010
003012
003014
003016
003020
003024

000300
010011
021100
001403
004767
000026

003026

000300

003030

001023

000404

AR R AR

THIS TEST WRITES A BACK GROUND OF
AT BAKPAT.

AR AR

ARl

THE WORD STORED

READS EVERY LOCATION FOR CORRECT DATA, SWAPS BYTES
AT THE LOCATION AND PROCEEDS IN MAX.
DIRECTION OF MEMORY LOCATIONS.

TO MIN

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

;;'tt'ttttttttOtttt"t"'t'ttttttttttttt'ttttttttt'tttt'ttt't't't

TSTS:

(MPB

BEQ

2s:
002622

PC,SEQERR

:*ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLT

JSR

PC.3#WRTMEM

cmP

RO,=-(R1)

:GO TO WRITE THE MEMORY WITH A BACKGROUND OF
:WORD STORED IN BAKPAT

BEQ
JSR

3s:

002604

4%:

.+10

:CHECK FOR PROPER TEST SEQUENCE

JSR

26
1$:

#5,a0S8TESTN

3s
PC,ERROR

SWAB
MOV
cMp
BEQ
JSR
26

RO
RO, (R1)
(R1),RO
4
PC,ERROR

SWAB

BNE

caxnsnsERROR NUMBER 24t trnee

JREAD THE CONTENTS OF LOCATION POINTED BY R1
;70 SEE IF IT HAS THE SAME VALUE AS RO
;*ERROR* REPORT ERROR MESSAGE

dtERROR NUMBER 25vwwaen

:SWAP THE BYTES AT (R1)
sREAD (R1) FOR CORRECT VALUE
:*ERROR* REPORT ERROR MESSAGE
seeeaetERROR NUMBER 26tvenen
;SWAP THE BYTES OF THE REGISTER
;CONTAINING BACKGROUND PATTERN
:1F THE LOWER BYTE OF THE REGISTER
;1S NOT O THEN THE PROGRAM IS READING
:THE MEMORY TO CONTAIN A BACK GROUND Of

;ggg

:BAKPAT AND WRITING THE SWAPPED WORD

;ggg

:IN WHICH CASE GO T0 9%

7599
7600

003032

005703

7602
7603
7604
7605
;289

003034
003036
003042

001023
062701
020105

7608

003044

103006

5¢:

TST

6$:

BNE
ADD
cMP

108
#2,R1
R1,RS

BHIS

7601

000002

THE

:R3 WAS 0 WHEN THE PROGRAM ENTERED
sTHIS TEST, AND IT IS NOT ALTERED UNTIL PASFLG=3
;IF RS EQUAL 0 THEN THE PROGRAM IS
JREADING/WRITING MIN. TO MAX. OTHERWISE
;1T IS GOING IN MAX. TO MIN. DIRECTION
:1F RS IS NOT CLEAR THEN GO TO 10%
:OTHERWISE ADD 2 TO THE CONTENTS OF R1

;ggngegges1 WITH THE MAX. MEMORY LOCATION TO
:1F R1>RS THEN GO TO 8% OTHERWISE

NEMA
mMACYYY 3G(1046
TNKMAA P11
27-DEC-8

7610

003046

003050

020011
001757

003052

003056

004767
000027

3
g
7616

003060
003062
003066
003070

000753
105237
000300
001742

7619
7620
7621

003072
)03074
003076

005103
010401

7609

;

7-DEC-82
:15

H
13:16_
PAGE 62-15
TS
MARCHING 1°'S AND 0°S
It ¥

002552

000306

PC,ERROR

8s:

INCB
SWAB

9%:

108:

000306

JREAD (R1) FOR THE CORREC.

DATA

: WRITE COMPLEMENT OF THE DATA FOUND AT (R1)
;AND REPEAT UNTIL R! > RS
;*ERROR* REPORT ERROR MESSAGE
;eveeeeERROR

NUMBER

27ttteen

izPASFLG
R

:IF THE LOWER BYTE OF RO IS ALL 0'S

COM

sAND READING BAKPAT GOING FROM MAX. TO MIN.[PASFLG=4]
sOTHERWISE CLEAR RO

B8R

TST
BNE

R4 ,R1

R3
5%

cmpP

R1,R4

BHI

SWAB
BEQ

RO
7%

INCB

ENDS:

SEQ 0033

MOV

020104

000714

JSR

8tQ

005703
001353

000300
001753

RO, (R1)
3s

000763

101333
105237

cmp
8ta

B8R

a#PASFLG

END&

;THEN BEGIN READING BAKPAT SWAPPED WRITING BAKPAT
sPUT THE LOWEST TESTING ADDRESS IN R1

¢AND BEGIN READING 0°'S, WRITING 1°'S AND
SREADING 1°'S IN MIN. TO MAX. DIRECTION [PASFLG=3)

:IF R3 IS NON O, I.E. PASFLG=3
s THEN READ BAKPAT, WRITE

;SWAPPED BAKPAT AND READ SWAPPED BAKPAT

¢IN MIN. TO MAX. DIRECTION
sOTHERWISE TEST IS PROCEEDING IN MAX. TO
¢MIN. DIRECTION.

;KEEP ON LOOPING UNTIL R1=R4

:1F RO SWAPPED HAS LOWER BYTE=0

s THEN READ BAKPAT SWAPPED, WRITE BAKPAT,
¢AND READ BAKPA7 GOING FROM MIN. TO MAX.

CNKMA
MACYT11 30(1046)
%7-05(-82
CNKMAA . P11
27-DEC-82 13:15

I
3
13:16 PAGE 62-16
16
CELLS® VOLATILITY TEST

7654

(3)

JeTEST 6

;%(1)

'(2)

(4)

'(3)

(4)
(4)
(4)

'(4)
:¢(5)
i

(4)

(4)
(4)
:2;

i
;*(6)
it

gg;
7655
7656
7657

7658
g};

7659
7660

7661
7662

7663

7664

003122

12c737

000006

003130
003132

003136

001403
004767
000030

003030

003140

004737

000120

003144
003150

005037
010403

000306

003154

020011

003152

7665
7666

003156
003160

7667

003166

7670

003176

g};

7668
7669
7671

003164

003172
003174

062701

000002

132737

000001

105237

000306

020105
103767

;g;%

003206

001002

7674
7675
7676
7677
7678
7679
7680

003212
003214
003216
003222
003224
003226
003230

(020305
103012
012702
000313
005302
001375
010337

7683
7684
7685
7686
7687
7688

003240
003242
003246
003252
003254

000744
105237
000337
001732
000721

003234

062703

SWAPPED BAKPAT AFTER WHICH PASFLG IS INCREMENTED TO 3
REPEATS STEPS 3 AND & READING THE MEMORY FOR SWAPPED
BAKPAT INSTEAD OF BAKPAT.
T

18:

CLR
Mov

a#PASFLG
R4 R3

CMP

RO (R1)

020000

END6:

e T

sCHECK FOR PROPER TEST SEQUENCE

;*ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLT
;ewsvesERROR NUMBER 30vssves
:GO TO WRITE THE MEMORY WITH A BACKGROUND OF
sWORD STORED AT LOCATION BAKPAT

cAND R1 TO THE STARTING ADDRESS OF MEMORY UNDER TEST

:CHECK (R1) FOR CORRECT DATA

§2,R1

: INCREMENT R1 BY 2

8l18

#1,3MPASFLG

sCHECK TO SEE IF PASFLG=0 OR ¢

INCB

a#PASFLG

sIN WHICH CASE INCREMENT PASFLG COUNTER BY 1

-MP
Brls

:SEE IF R3 HAS REACHED THE MAX. OF THE MEMORY

DEC
BNE
Mov

R3,R5
7%
#37776,R2
(R3)
R2
63
R3,a#SAVLOC

BR
INCB
SWAB
8EQ
BR

2%
ANPASFLG
a#BAKPAT
RPT6
END5

CMP
8LO

mMov
SWAB

R1.RS
38’
58

#20000,R3

THE

;SET R3

ADD

7$:

s *ERROR* REPORT ERROR MESSAGE

BNE

6$:

R4,R1

PC.ERROR

000354

000306
000316

REPEATS STEP 3 WITH X=X+4K UNTIL END OF MEMORY IS ENCOUNTERED
1T THEN INCREMENTS PASFLG AND WRITES THE MEMORY TO
BAKPAT AND WITH PASFLG=2 IT READS MEMORY FOR ALL

PC,a#WRTMEM

58:

037776

IT THEN READS/SWAPS BYTES/WRITES A LOCATION X FOR

JSR

000306

Y T

OVER 2 MSEC AND THEN READS THE MEMORY FOR BAKPAT

RPT6:

4$:

AND THEN INCREMENTS PASFLG

.+10
PC,SEQERR

8EQ
JSR

L T

THIS TEST WRITES THE MEMORY WITH A BACK GROUND OF BAKPAT

BEQ
JSR

MOV

WITH PASFLGSO THE TEST READS THE MEMORY FOR BAKPAT

#6,I#STESTN

3s:

0026444

CELLS' VOLATILITY TESTY

CMPB

2%:

001403
004767

000031

TST6:

010401

003204

7681
7682

000404

SEQ 0034

;axeas+ERROR NUMBER 31vveane

:SEE IF R1 HAS REACHED THE MAX. OF MEMORY

SWRITE INTO 1 LOC FOR >2MS (ABOUT 100MS)

: SAVE LOCATION WRITTEN FOR 2MS FOR ERROR REPORT.

;BY ADDING1 TO THE 14TH ADDRESS BIT CAUSE
:R3 TO POINT TO A LOCATION IN THE NEXT
;4K BANK OF MEMORY

sMAKE PASFLG=?
;IF BAKPAT [S NOT BEING SWAPPED FOR THE 2ND
:THEN GO BACK TO THE LOCATION RPT6

CNKMA
MACY11 _30(1046)
27-DEC-82
CNKMAA. P11
13:15
27-DEC-82

13: 16

~ e
N
Y e Y Y
Y
V. N
(=] ONNWER SN
n D N N N Nl N N P " " P

7700
(3)

(SA 1222322000000 00

SeTEST 7

ix(2)
.(3)
-(4)

t(S)

003264
003266
003272

001403
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

00C304

003334
003340
003342
003344
003350
003354
003356
003362
003364

013700
020103
001010
062703
032703
001402
062703
000300

000316

003372
003374

001001
010011

003376

020011

2735
7736

003400
003402
003406

001403
004767
000033

7737
7738
7739

003410
003414
003416

062701
020102

~ ~

000007

(1)
7704
7705
7706
7707
7708
7709
7710
7711

7712
7713
7714
7715
7716
717
7718
7719
7720
7721
7722
7723
7724
7725
7726
7727
7728
7729

7730
7731
7732
7733
7734
(1)
(1)

0 0d0RRRRRRRRRRRR

SRRl

)]

THIS TEST WRITES THE MEMORY WITH A BACKGROUND OF BAKPAT

IT WRITES A DIAGONAL OF SWAPPED BAKPAT THROUGH EACH MEMORY BANK

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

.ttttfiitittttttttQttttttttttiitit't*tt'tttQtittfittt'ttii.t"ttt'

122737

SEQ 0035

SHIFTING DIAGONAL

;e (1)

003256

7703

PAGE 62-17
SHIFTING DIAGONAL

132737

103746

000404

T$17:

CMPB

#7,348TESTN

BEQ
JSR

PC,SEQERR

CLR

ANPASFLG

Mov
8IS
INC

#17777.R2

2%:

017777

3s:
4s:

MOV

R3,a#LOWBNK
R3,R2

8EQ
CMP
BHIS

MOV

R2
3s
RS,R2
4$
RS,R2

MOV

R3,3#STRTDI

6%:

MOV

000306

8s:

108:

SWAB

8iT8

tMP

002222

000002

ADD

BLO

:R2 CONTAINS THE ADDRESS OF THE TOP OF THE BANK
:ADD 1 TO POINT IT TO NEXT BANK

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

:IF R2_IS GREATER THAN R5 THEN GO TO 4%
:NOW R2 CONTAINS THE ADDRESS OF THE HWIGHEST LOCA!ION

:THAT CAN BE TESTED

:k?:goaxftox WITH THE STARTING ADDRESS OF THE

STHE FOLLOWING CODE IS USED TO PLACE THE

#200,R3
RO
#1,3#PASFLG

*1S R1 POINTING TO A LOCATION IN THE DIAGONAL ?
‘IF NOT THEN GO TO 108
:?aosgss OF THE NEXT LOCATION IN THE DIAGONAL

;DIAGONAL WILL CONTAIN SWAPPED BACKGROUND PATTERN
sCONTENTS OF LOCATION PASFLG WILL BE EVEN IF THE
sMEMORY IS BEING WRITTEN AND IT WILL BE ODD
¢IF IT IS ONLY BEING READ
JIF 1T IS BEING READ ONLY THEN GO TO 12%
8;HESHISE WRITE THE MEMORY WITH THE CONTENTS

RO, (R1)

CHECK THE LOCATION POINTED BY R1 TO CONTAIN

148

J1F IT IS OK THEN GO TO 14$

PC,ERROR

148:

sLOWBNK CONTAINS ADDRESS OF THE LOWEST LOCATION
:IN THE 4K BANK THAT CAN BE TESTED

#2.R3

106

12%
RO, (R1)
128:

;aeaaesERROR NUMBER 32twenee

ilBAKPAT.RO

3176 R3

000200

s *ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLT

ESAN{S NOW POINTING TO THE LOWEST LOCATION IN THE 4K
‘STORE THE CONTENTS OF BAKPAT IN RO

K
,R1
#LOWBN

000002
000176

000001

.+10

:CHECK FOR PROPER TEST SEQUENCE

#2 ,R1

R1,R2
6%

PROPER DATA

'ERROR' REPORT ERROR MESSAGE
ttttttERROR NUMBER 33awxrasne

sCAUSE R1 _TO POINT TO THE NEXT MEMORY LOCATION

;IS IT THE END OF THE BANK?
:IF NOT THEN GO TO 6%

7745
7746
7747
7748
7749
7750
7751

7752
7753
7754
7755
7756
7757
7758

7759

7760

©O

003420
003424
003430
003434
003442
003444
003446
003450
003452
003456
003460

003464
003470

000337
001715

003472

010203

003474
003476
003500

OVIHANOWN
= NIWWVIWN

77461
7742
7743
77464

ek
B OOO O =O

7740

30¢(
27-

MACY1Y

OOONOOW—0O0O

(NKMA

INKMAA P11

)

27-DEC-82

13:1 5

000410
000306
000302
000001

13:16_

PAGE 62-18

16$:

SHIFTING DIAGONAL

INC

S#SDEVCT

MOV

a#STRTDI
,R3

INCB

BI1B

000306

BNE
ST

cMpP

BHIS

1ST8

000306

000304

18%:

BPL
MOV

SWAB

000316

S#PASFLG

#1,8#PASFLG

48
¢+
(R3)

R3,R2
18$

a¥PASFLG

1)
3#LOWBNK
,R3
a#BAKPAT

SEQ 0036
sTELL APT WE ARE

;LOAD R3 WITH THE STARTING ADDRESS OF ThE DIAGONAL
¢HAS THE READ OF THE MEMORY BEEN DONE ?
sIF NOT THEN GO TO 4$
¢ADD 2 TO THE STARTING ADDRESS OF THE DIAGONAL
sAND UNLESS THE END OF THE BANK [S REACHED
;OR THE DIAGONAL HAS BEEN ROTATED 64 TIMES
sREPEAT _FROM 4%

sMAKE R3 POINT TO THE LOWEST LOCATION IN THE
sIN THE BANK UNDER TEST

JAND IF

MOV

R2,R3

sMAKE

020205

CMP

R2,R5

103676

BLO
BR

2%
END6

00064¢

BEQ

END7:

STIL RUNNING OKAY

THE TEST HAS NOT BEEN PERFORMED wiTH THE

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

;LOW _BOUNDRY
sUNLESS THE PRESENT HIGH BOUNDRY [S ALSO THE
sHIGH BOUNDRY FOR THE MEMORY UNDER TEST

(NKMA

MACY11_30(1046)

CNKMAA P11

27
EC-BZ

27-DEC-82 13:1

13:16

7788

Y.Y,

tTEST 10

ot
o o

;*(2)

o "t o "
P "
b o "

VYV

P N

P
P

P N

e L

N
o " "
o "

7792

003520

010402

052702

0.:7776

RPT10:

003526
003532
003534
003536
003540
003542
003544
003546

062702
001402
020205
101401
010502
005046
010200
013740

000002

GALLOP: ADD
8EQ
cMP
8LOS
1$:
MoV
2%:
CLR
MoV
4$:
MoV

003552
003554
003556

020003
101374
0310301

003560

023710

003564
003566
003570
003574

001410
010001
013700
004767

Nt "

000316

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 CODE USED BY THIS TEST IS ALSO USED BY TEST 11
ARAR

AN A AN EAANRANEARRARNENG

CMPB

#10,a#8TESTN

8EQ
JSR
34

.+10
PC,SEQERR

MoV

BIS

R4, R2

776,82
#2,R2
1%
R2,R5
2%
R5,R2
=(SP)
R2,RO
a#BAKPAT ,~(RO)

CMP
BHI
Mov

RO,R3
43
R3,R1

000316

cMp

GNBAKPAT ,(RO)

000316
002030

8EQ
MoV
MoV
JSR

8s
RO,R1
A#BAKPAT
RO
PC,ERROR

6$:

IS RESIDING

A+

3-9 UNTIL THE END OF THE MEMORY

CHRRNAAARARNRA AR

002450

7804
7805
7806
7807
7808
7809
7810
7811
7812
7813

END 2F2THE 4K BANK OF THE MEMORY IN WHICH 'A*

AFTER EXECUTING THE TEST BYTES ARE SWAPPED AT

M
A
Hd
;%(13)

003522

°'B8°')

*(11)

001403
004767
000034

;gg%

LOCATION FROM THE PRESENT LOCATION OF

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

003510
003512
003516

7801

(LETS NAME IT °A*)

t(9)
*(10)
t(12)

P
ASASIV PR SR S W R

7790
7791
g};

7799
7800

TEST BEGINS AT LOWEST LOCATION BEING TESTED

REPEATS STEPS 5 AND 6 UNTIL 'B' IS GREATER THAN THE

000010

7794
7795
7796
7797
7798

THIS TESY WRITES THE MEMORY WITH A BACK GROUND PATTERN
STORED AT LOCATION BAKPATY

t(?)

122737

7793

RA RN R ORI E RN OANRRANCERORNNCEY

LETS NAME THE 1ST LOCATION IN THE ROW/COLUMN UNDER TEST AS 'B°'.
SWAPS BYTES FOR LOCATION ‘A°.
READS °A’', READS ‘B’
'8' = 'B'+200 (MAKES °B'=64TH CELL 1.E. 200TH OCTAL

003502

7789

E AN

t(3)
ix (&)
t(S)
t(6)
t

ST10

E R E AN

SEQ 0037

READ RECOVERY GALLOPING TEST/EVERY 64TH CELL

:e(1)
%

000404

READ RECOVERY GALLOPING TEST/EVERY 64TH CELL

JENNEAR AR AN RN NN R N E R

(3)

LALY

PAGE 62-19

RN OO

RO NOY

;CHECK FOR PROPER TEST SEQUENCE

;*ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLT
sveaat*ERROR NUMBER 34tnwnwe
sSET R2 TO THE LOWEST MEMORY UNDER TEST

;MAKE R2 POINT TO THE HIGHEST LOCATION IN THE 4K
:BANK_FOR WHICH GALLOPING WILL BE PERFOMED
; INCREMENT R2 BY 2
;BR IF IT WENT TO O (IT MUST BE A 30K SYSTEM)
;1F THE HIGH BOUNDRY OF THE TEST IS HIGHER THAN

s THE MAXIMUM ALLOWED ADDRESS THEN ADJUST R?2
:gzégiTTHE MEMORY UNDER TEST WITH A BACKGROUND Of

sR3 AND R1 ARE POINTING TO THE LOWEST LOCATION THAT
sCAN BE TESTED IN _THIS BLOCK
;BEFORE STARTING THE GALLOPING TEST FOR LOCATION
;(RO) CHECK IT
;CONTINUE IF OK
;OTHERWISE PREPARE TO REPORT THE ERROR

;*ERROR* REPORT ERROR MESSAGE

MACY11 30(1046)
(NKMA
A
P11
.
CNKMA
27-DEC-82

SEQ 0038

READ RECOVERY GALLOPING TEST/EVERY 64TH CELL

;eteteatERROR NUMBER 3S5eeenee

000035

003602
003604

010011
010100

MOV
MOV

RO, (R1)
R1,RO

sRESTORE THE CONTENTS OF
sRESTORE RO

003606
003610

000310
031011

8IT

SWAB

(RO)
(RO), (RT)

sCHECK TO SEE THAT NONE OF

003612

020001

CMP

RO,R1

:THE ONLY EXCEPTION TO THIS WILL BE WHEN RO=R?

003614
003616
003622
003624
003626

001412
021137
001407
010046
013700
004767
000036

BEQ
CMP
BEQ

12%
(R1) ,a#BAKPAT
12%
RO,=(SP)
a#BAKPAT
RO

003636

003640
003642
003646
003650
003652

003654
003660
003664

003666
003670
003672
003674
003702
003704
003710

003714
003716
003720

7863

110

PAGE 62-20

003600

003632

7860
7861

27-DEC-82

13:15

13: 16

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

012600
021037
001412
010146
010001
013700
004767
000037
010011
010100
012601
122737
001402

062701
062701
020102

8%:
10%:

000316

MOV
MOV
JSR

000316
001772

000320

12$:

000320
001744

000011

000404

000176
000002

148:
16%:

103734

000320
122737
001407
005723
062716
105716
100002
161603
005016
032700
001002
005237
020002
103674
162603

000337
000337
001660
010203

000011

000404

000410

000320
000316

MoV
MOV
MoV
CMPB
BEQ
ADD
ADD
cMP
8LO
SWAB

CMPB
BEQ
TST

000002

000177

MOV
cMP
BEQ
Mov
MoV
MOV
JSR

ADD
1ST8
BPL

17%:
18%:

sus
CLR
BIT
BNE
INC
cMp
BLO
sus
SWAB
SWAB
BEQ
MOV

PC,ERROR

(SP)+,RO
(RO) ,3#SWAPAT

148
R1,<(SP)
RO,R1
AN SWAPAT
RO
PC,ERROR

RO, (R1)

R1,R0

(SP)+,R1

#11,a#STESTN

16%

A 76, .R1

#2 R1

R1.R2
10$
(RO)+

#11,a08TESTN
17¢

+
(R3)

#2,(SP)
(SP)
17%
(SP).R3
(SP)

(R1)

THE BITS SET

sIN _(RO) ARE SET IN (R1) AND VICE VERSA

;CHECK THAT (R1) HAS BAKPAT N IT

;SAVE RO ON STACK
:PLACE

THE PATTERN WORD IN RO

:«ERROR* REPORT ERROR MESSAGE
;nsesveERROR NUMBER 36%teeve

sRESTORE RO
sCHECK THAT (RO) HAS SWAPPED BAKPAT IN [T
:SAVE R1 ON THE STACK

sMAKE R1 POINT TO THE FAILING LOCATION

sLOAD RO WITH THE EXPECTED RESULT IN (R1)
s *ERROR* REPORT ERROR MESSAGE

;eeaxeAERROR NUMBER 37+sxess

sRECOVER (R1) FROM THE ERROR
sRESTORE RO
;AND RESTORE R1
:1S THE _PROGRAM EXECUTING TEST # 11 ?
:IF SO THEN GO TO 16$%

sMAKE R1 POINT TO THE NEXT ADJACENT CELL
sAND IF R1 HAS NOT REACHED THE END OF THE BOUNDRY
:THEN REPEAT FROM 10%

SRESTORE THE LOCATION FOR WHICH THE GALLOPING TEST
;WAS BEING PERFORMED
IS IT TEST 11 ?
:IF SO THEN GO TO 17%

;OTHERWISE INCREMENT R3 BY 2
;FOR EVERY ROW/COLUMN TESTED ADD 2
SUNTIL (SP) 1S 200
;SUBTRACT 200 FROM R3

#177.R0
18%
a#SDEVCT
RO,R2
6%
(SP)+,R3

;AT A 64TH CALL BOUNDRY?

2%
R2.R3

;1F THE LOWER BYTE OF BAKPAT IS O THEN REPEAT FROM 2%
;OTHERWISE MAKE THE PRESENT HIGH BOUNDRY AS THE

AV SWAPAT
a#BAKPAT

:BRANCH IF NO
sTELL APT WE ARE STILL RUNNING

sIF RO HAS NOT REACHED THE END OF THE BOUNDRY
:THEN REPEAT FROM_6$

:RESTORE SP AND R3

CNKMA
MACY1T 30(1046)
imec-sz
CNKMAA . F11
27~-DEC-82 15:15
7864
7865

7866

7867

7868

004004

004006

020205

001410

BEQ

7869

004014

001025

032702

017776

7871
7872
7873

004016
004024
004026

122737
001421
000635

000011

7870

;g;g

7876
7877

004010

004030

N 3
13:16 PAGE 62-21
T10
READ RECOVERY GALLOPING TEST/EVERY 64TH CELL

000623

END10:

JNEXT LOW BOUNDRY

END10

JIF PREVIOUS HIGH BOUNDRY WAS THE END OF

BIT

m7776 R

:WAS IT A &K BOUNDRY ?

CMPB
BEQ
BR

#11, Q#STESTN
RPT11
RPT10

BNE
000404

R2,RS

SEQ 0039

B8R

RPTT

END7

JTEST BOUNDRY THEN EXIT THE TEST

TME

;IF NOT THEN WE WERE PERFORMING TEST 11 WITH LONG
JGALLOPING TEST DISABLED

JIF

IT IS TEST # 11

THEN GO TO REPEAT TEST 11

;OTHERWISE REPEAT TEST 10

CNKMA

MACY11 30(10«6)

CNKMAA P11

27-DE(-82

27-DEC-82 13:15

?906

READ RECOVERY LONG GALLOPING/FAST GALLOPING TEST

SATEST N

(4)
(4)
(%)
(4)

;#(1)
*%(2)
ie
*¢(3)

(4)
(4)
(4)
()
(4)
(4)
%)
(4)
(4)
(4)
(4)
(4)
(4)
(4)
(4)
(4)

*+(5)
ie(6)
:x(7)
i
i
i
P
i
«(8)
i
P
i
i
ix(9)
:x(10)
P

(4)

i«(4)

(4)
()

i
*x(11)

(3)

004032

122737

000011

7907
7908
7909
(1)

004040
004042
004046

001403
004767
000040

002120

7910

004050

010402

7912

004052

105777

174372

7914

004060

004767

002526

7915
7916

7917

004056
004064
004070

00407

100004

046107
105777

100612

7919

(004076

052702

7922

004102

000611

;359

READ RECOVERY LONG GALLOPING/FAST GALLOPING TEST

THIS TEST WRITES MEMORY WITH BAKPAT
THE TEST BEGINS AT THE LOWEST LOCATION BEING TESTED
(LETS NAME IT °B')
‘A’ _'B' [MOVE THE ADDRESS OF 'B' TO THE POINTER FOR LOCATION *A'3

SWAPS BYTES FOR LOCATION ‘A’

READS 'A', READS 'B'
'B'='B'+2
IF GALLOPING OPTION BIT AT $SWREG IS HIGH THEN STEPS & AND 5
ARE REPEATED UNTIL 'B' 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 BIT IS NOT HIGH THEN STEPS 4 AND 5 ARE
REPEATED UNTIL °*B' IS POINTING TO A CELL IN THE NEXT COLUMN
If SEQUENTIAL CELLS LIE ALONG THE ROW, OR THE NEXT ROW
IF _SEQUENTIAL CELLS LIE ALONG THE COLUMN, AT WHICH TIME
STEPS 2,3,4,5 AND 7 ARE REPEATED UNTIL THE END OF THE MEMORY
TEST IS REPEATED FOR THE OPPOSITE BACKGROUND DATA
IN THIS TEST RO POINTS TO LOCATION 'A*, R1 TO LOCATION
'B*, R2 TO THE HIGHEST LOCATION AND R3'TO THE LOWEST
LOCATION IN A 64/4K CELL BOUNDRY
MOST OF THE CODE USED BY TEST 10 IS ALSO USED BY THIS TEST

::**'l’tttttttttt't"ti'i't'i'ttt'fitttt"t*titifittt*t'tttttitttt't

(2)

7913

.';tt'ttt..ttt"tti"'Q"Q"t.t'i....""..."..'."....'Q..".."

7911

13:1?11PAGE 62-22

000120
174354

000176

000404

TST11:

CMPB

#11,a#STESTN

BEQ
JSR
40

.+10
PC,SEQERR

MOV

R4,R2

:MAKE R2 TO POINT TO THE LOWEST LOCATION

ISTB

asuR

:LONG GALLOP ENABLED?

JSR

PC,PNTMES

:TYPE ''6LP"’

BPL

RPT11:

LASCIZ
1STB

BMI

RPT11

/GLP/
aSWR

RPT10

;CHECK FOR PROPER TEST SEQUENCE

; *ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLI
;axeax*ERROR NUMBER 40%sexee
:UNDER TEST

:BRANCH IF NO

:LONG GALLOPING ENABLED?

BRANCH_[F YES

BIS

#176,R2

OTHERWISE SET THE LOW ORDER BITS OF THE ADDRESS

GALLOP

;

:TO GET THE HIGH BOUNDRY
PERFORM GALLOPING TEST

SEQ (04N

CNKMA
MACY11_30(1046)
27-DEC-82
. P11
CNKMAA
27-DEC-82 13:15

13:16

7945

W o o

TN
Y

;t
*
4

;%(2)

*s
&

N N W o

X
*

:x(3)
;*(4)

P N N
W

P W

:x(7)
i

W W W W

BN N NN PP P P P P P\ P

s P

DDDD

v (1)

;*(6)

o vt NJON WP W W

BB NONWES

2322482323200

:%(5)

~N -~

ND D A

¢4

WORST CASE TESTING FOR CORE MEMORY

SeTEST 12

(3)

112

PAGE 62-23

:+(8)
;*
b 4

SEQ 004

R800000000200d302 02 3322230022222

032022

23222

2R]

WORST CASE TESTING FOR 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 VALUE OF SWAPPED BAKPAT
STARTING FROM THE LOWEST LOCATION THE MEMORY IS CHECKED

TO CONTAIN THE CORRECT DATA AS EXPLAINED IN STEPS 3 § 4,
UNTILL THE HIGHEST LOCATION UNDER TEST IS REACHED
READ EACH LOCATION FOR THE CORRECT CONTENT
COMPLEMENY THE LOCATION AND READ IT; COMPLEMENT THE LOCATION
BACK TO ITS ORIGINAL VALUE AND READ IT 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 S € 9 =1 ARE WRITTEN TO SWAPPED BAKPAT

REPEAT STEPS 1-7 WITH A _BACKGROUND OF SWAPPED BAKPAT AND
g:ipk?CATIONS TO BE WRITTEN TO SWAPPED BAKPAT WRITTEN TO

A2 2822822

TsT12:

iRl

iiiitiiedi

ittt

isdlsdd]

CMPB

#12,48TESTN

002046

BEQ
JSR
41

PC,SEQERR

:*ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLT

004122
004126
004132

000002
000400
000001

MoV
Mov
Move

#2,R2
#400.R3

:PREPARE TO TAKE THE EXCLUSIVE OR OF ADDRESS BITS 1
SAND 8

R4 ,R1

*PLACE THE STARTING ADDRESS OF MEMORY UNDER

004142
004146
004150
004152
004154
004156

000316

A#BAKPAT
RO
R2.R1
8s

005100

MoV
8IT
BNE
BIT
BEQ
COM

004160

000402

004104

122737

004112
004114
004120

001403

004140

000012

00045

000306

MoV

4%:

6%:

.+10

#1,3#PASFLG

sCHECK FOR PROPER TEST SEQUENCE

suevne*ERROR NUMBER 41%xwwsnxn

SINITIALIZE THE COUNTER FOR THE SUBTEST

STEST IN R1

R3,R1

sCHECK TO SEE IF ADDRESS BIT STORED IN R2 IS SET
:IF IT 1S SET THEN GO TO 8%
SCHECK TO SEE IF ADDRESS BIT POINTED BY R3 IS SET

*COME HERE ONLY IF EXCLUSIVE OR OF ADDRESS BITS

12§

128

SIF IT IS NOT SET THEN GO TO 128

*POINTED BY R2 & POINTED BY R3 = 1 IN WHICH
*CASE PREPARE TO WRITE THE LOCATION
‘WITH A COMPLEMENT OF LOCATIONS NOT MEETING
STHIS CONDITION

MACY11 30(1046)
27-DEC-82
CNKMAAF11
27-DEC-82 13:15
{NKMA

7966
7967
7968
7969
7970
797
7972
7973
7974

7975
7976

7977
7978

13:1?12PAGE 63

WORST CASE

TESTING FOR CORE MEMORY

004162

030301

BIT

R3.R1

;COME HERE IF ADDRESS BIT POINTED BY R2 IS 1 AND

004164

001774

BEQ

sCHECK ADDRESS BIT POINTED BY R3

8lT8

#2,7MPASFLG

;1S 1 1T 2ND OR 3RD PASS OF THE SUBTEST?
1S

004166
004174

132737

001001

000002

000306

BNE

148

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

sIF SO THEN READ THE MEMORY

SEQ 0042

(NKMA
MACY11 30(1068 )
CNKMAA F11
27-DEC~ 2

(1)
7985
7986
7987
7988
7989
7990
(1
(1)
7991
7992
7993
7994
7995
7996
7997
7998
7999

8000
8001
8002

8003
8004
8005

8006

8007
8008
8009
8010
801
8012
8013
8014
8015
8016
8017
8018
8019
8020

004212
004216
004220
004222
004224
004226
004232

012746
005100
005111
020011
001404
0064767
000043

004234
004236
004240
004242
004244
004252
004254

010011
005316
001366
005726
122737
001412
062701

004260
004262
004264
004270
004276
004300

020105
103727

004304

004306
004310

004314
004320
004326
004330
004332
004336
004340
004342
004346
004352
004354

O
OONO

(1)

01001
020011
001403
004767
000042

Dt
D
=0

7983
7984

004176
004200
004202
004206
004210

13:15

13:16

T12

_PAGE 64

WNRST CASE TESTING FOR CORE MEMORY
MOV
ggg

RO, (R1)
gg‘(k1)

;OTHERWISE WRITE THE MEMORY BFORE READING [T
¢READ THE MEMORY FOR CORRECT CONTENTS

001420

JSR
&2

PC,"RROR

s *ERROR* REPORT ERROR MESSAGE
swnxeavERROR NUMBER 42vvewte

000002

MOV
COM
COM
ggg

#2,-(SP)
RO
(R1)
$8§(R1)

JSR
43

PC.ERROR

;*ERROR* REPORT ERROR_MESSAGE
sext*¢«ERROR NUMBER 43%ewnen

MoV
DEC

RO, (R1)
(SP)

sRESTORE THE LOCATION (R1)

TST

(SP)+

sRESTORE THE STACK POINTER

14$:

001376

19%:

000003

sEXECUTE THE CODE FROM 188 TWICE

CMPB
BEQ
ADD

#3,2#PASFLG
208
#2,R1

CMP
8LO
INCB
CMPB
BEQ
sus

R1,RS
4$
IMPASFLG
#2 ,8#PASFLG
2%
#2,R1

;1S IT THE 3RD PASS OF THE SUBTEST ?
;1F SO THEN GO 1O 20%
sIN FIRST 2 PASSES THE PROGRAM PROCEEDS IN
sMIN. TO MAX. DIRECTION
sHAVE WE REACHFD THE MAX. ADDRESS UNDER TEST ?
sIF NOT THEN REPEAT FROM 4$

CMP
BHIS
Mov

R1,Ré
43
#20000,R2

INCB

ANPASFLG*1

SNPASFLG+1,#2
1%
22%
#10,R2
?2

;HAS TWO XOR COMBINATIONS BEEN CHECKED ?
:IF NOT THEN GO TO 1$
sIF ALL THREE HAVE BEEN CHECKED THEN GO TO 22%
;IF IT IS THE 2ND XOR COMBINATION THEN CHECK
;FOR ADDRESS BITS 3¢ 8

22%:

COM

GNBAKPAY

:IF THE TEST WAS NOT PERFORMED WITH THE SWAPPED

END12:

8EQ
BR

TST12
END1IO

;BAKPAT THEN RE~EXECUTE THE TEST

000306

L 00306
000002

000306
20$:

000002

020000

000307
000307

012702
006303
000674
005137
105737
001654
000625

000010
000316
000316

BNE

¢READ THE MEMORY AGAIN

18$

000002

dededed
OONO

7980

7681
7982

27D EC-82

CMPB
8LO
BHI
Mov
SSL

000002

1ST8

SNBAKPAT

sIF _IT IS THE 2ND PASS OF THE SUBTEST
:THEN REPEAT FROM 2%
:g}ggggfgs EXECUTE THE TEST IN MAX. TO MIN.
+HAVE WE REACHED THE MIN. ADDRESS UNDER TEST ?
sIF _NOT THEN REPEAT FROM 4$
sPREPARE TO CHECK THE_MEMORY WITH THE XOR Of

sADDRESS BITS 8 AND 13

;THE SUB TEST HAS CHECKED THE XOR ONE KIND

SEQ 0043

8051
(3)

THIS TEST DIFFERS FROM 0~12 IN THAT IT CONSISTS OF A SMALL

004364
004366
004372

001403
004767
000044

001574

004374

012702

010247

004400

012700

177667

004404
004406
004410

010546
010446
000241
006005
006004

004412

004414
004416
004420
006422
006424

004430
004432
004434

160405
006005
103002
062716

012604
012605
010403

000404

Is TYPED. THIS WILL'ALLOV 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"° IS 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:

1._THE

'MOV R2,=(PC)TM

INSTRUCTION EXECUTES STORING

THE CONTENTS OF R2 IN THE ADDRESS IT VACATED (DUE TO -(PC).
2. SINCE R2 CONTAINS
A *'COM =(R1)** INSTRUCTION IT COMPLEMENTS
THE_HIGHEST ADDRESS UNDER TEST.

"177667'° SO AFTER THE COM ~(R1)

THIS ADDRESS CONTAINED

IT EQUALS 110

CLEVERLY THIS IS THE '‘JMP (R0)"* INSTRUCTION.
3. THIS SEQUENCE CONTINUES UNTIL THE 'MOV R2.=(PC)

INSTRUCTIONS
REACH THE MIDDLE OF THE TEST BANK. THEN THE ''JMP (RO)'* INSTRUCTION IS
AND EXECUTED. RO CONTAINED THE RETURN ADDRESS BACK

THESE STEPS ARE REPEATED FOR EACH BANK UNDER TEST.

2224220202203000d0dRRRRRRRRdddRR
iR
Rt 02
R
R
02 dRR ]

T13

CMPB
BEQ

1%:

#13,QH8TESTN
.+10

sCHECK FOR PROPER TEST SEQUENCE

JSR

PC,SEQERR

;*ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLT

MoV

#10247,R2

?hASS THE OP CODE OF INSTRUCTION MOV R2.-(PC)

(1)

¥177667,R0

Mov

RS,=(5P)

;SAVE RS

ROR
ROR

RS
R4

sMAKE POSITIVE BYTE COUNT OF HIGH ADDRESS
;D0 _SAME FOR LOWEST ADDRESS

ROR

:IF DIFFERENCE IS ODD THEN R4 IS AT LOWEST ADDRESS

;exsax*ERROR NUMBER 44rxaxees

PLACE THE COMPLEMENT OF THE INSTRUCTION
:JMP (RO) IN RO
;INSURE LOWEST TEST ADDRESS TO END OF 4K SEGMENT IS MULTIPLE OF 2
:SINCE THE TEST STORES ‘MOV R2,-(PC) IN 172 AND 17767 IN THE OTHER 1/2

2s:
29%:

?Eg

suB

000002

TEST PROGRAM

THE PROGRAM [S SELF MODIFYING AND MAY BE DIFFICULT TO DEBUG.
TO AID IN THE DEBUG, BEFORE A BANK IS ENTERED "TST13 BNK Xx''

000013

WRITE RECOVERY TEST

ACTUALLY RUNNING IN THE 4K BANK UNDER TEST.

IR TE PR PR PR TEFETE IR TR IR IR

122737

e AR

(4)
(&)
(6)
(%)
4)
(4)
(4)
(4)

©o 0o
MO
O A A
A —~~
-tk VAN N N BN O BN W
o
~
o e U
S N " i s

snRttttARAeRR RO R OORCOORRARQRORRREROARROCQRARCRRGOQRUQARGERQARRNOEOTROTNTSE

s
"
P "

~ "

-~ o~ P

Y [T SR X

P oF

N -~

(4)

SEQ 0044

ettt

TA TR PR TR FRETE TR PR TN PN TR PN ¥

(4)
(L)

WRITE RECOVERY TEST

tTEST 13

004356

13:16
3PAGE 64-1

llll.ll'l..l.!..ll.‘......l

MACY11 30(1046)
(NKMA
27-DEC-82
A
. F1)
CNKMA
27-DEC-82 13:15

30$:

8CC
ADD
MOV
MOV
MOV

Ré4 ,=(SP)

R4 .RS
30%
#2,(SP)
(SP)+,R4
(SP)¢,R5
R4 ,R3

:STORE LOWEST ADDRESS ON STACK

sGET DIFFERENCE OF LOWEST ADDRESS AND HIGHESY

:BRANCH IF R4 1S AT LOWEST TEST ADDRESS.
; INCREASE LOWEST TEST ADDRESS BY 2
:RESTORE R4 (POSSIBLY INCREASED BY 2 FROM ENTRY)
:RESTORE HIGHEST TEST ADDRESS
;?hAg% THE LOWEST LOCATION UNDER TEST

TNKMA
MACYIT 2001046)
27-DEC-82
TNKMAA P11
27-DEC-82 13:15

8076
8075

004436
004440

000406
042703

8077
8078
8079

004444
004446
004452

001507
105737
100504

8081
8082
8083

004456

8G76

8080

004454

020305

8084
8085
ggg?

004460
004464
004466
004470

020527
103002
010501
000407

8088

(04472

010301

8090
8091
8092
8093
8094

004500

005201

004502

001402

004504

020105

gggg

004510

010501

8098

004512

8089

8095

8099
8100

004474

004506

004520

13:16
PAGE 64~2
T13
WRITE RECOVERY TEST

017776

3s:

000405

28%:

103102

052701

132737

020000

318:

017777

328:
020001

288
217776 ,R3

;LEAVE LOW BITS OF R3 ALONE FIRST TIME IN CASE BANK O
;CAUSE R3 TO POINT TO THE LOWEST LOCATION

8EQ
1ST8
8M]

149
SAREL
148

:1F_ADDRESS WENT TO 0, IT MUST BE A 30K SYSTEM
:ARE WE RELOCATED?
;BRANCH IF YES=-TEST BANKO ONLY-

CMP

R3,RS

004522
004524

020304
103430

g}gg

004532

001002

105737

000307

004534

012713

010247

004526

8109
8110
8111
8112
8113
8114
8115
z};

004540
004542
004544
004546
004550
004552
004554
004560

020213
001421
010046
010146
010301
010200
004767
000045

8116

004562

012601

8117
8118
8119

g}%?

004564
004566

012600
105737

g}g%

004572

001005

8126
8125

004574
004576

010200
004767

(};
(

;IN THE 4K BANK UNDER TEST

;IF R3 IS HIGHER THAN THE HIGHEST LOCATION

000306

33%:

BHIS
MOV
BR

31%
RS,R1
32¢

:BRANCH IF NO
:SET R1 TO HIGHEST TEST ADDRESS IN BANKO

MOV

R3,R1

;SET R1 TO LOWEST CURRENT TEST ADDRESS

INC

8IS

#7777,R1

sSET LOW ORDER ADDRESS BITS

BEQ

328

CMP

R1,RS

sCAUSE R1 TO POINT TO THE HIGHEST LOCATJON+¢2
;OF THE 4K BANK BEING POINTED BY R3
;BRANCH IF R1 WENT TO O (WHICH MIGHT
sHAVE HAPPENED IF TESTING A 30K LS] SYSTEM)
- COMPARE R1 TO HIGHEST ADDRESS UNDER TEST

MoV

RS.R1

sSET R1 TO THE MAXIMUM AVAILABLE MEMORY

8118

#1,3#PASFLG

BLOS
BNE

33§

168

:BRANCH IF WITHIN RANGE

:1S_THE LOWESY BIT OF LOCATION PASFLG

sSET? IN WHICH CASE BACK GROUND HAS

¢ALREADY BEEN WRITTEN AND WRITE RECOVERY
;TEST IS BEING PERFORMED

8103
8106

8108

SEQ 0045

BR
8IC

g}g;

8105

¢4

BHIS
148
:UNDER TEST THEN EXIT
;IF R5 LESS THAN 20000 THEN WE ARE TESTING BANKO RELOCATED IN BANKO
CMP
R5,#20000
sIS HIGHEST TEST ADDRESS BELOW 4Kk?

101401

001101

004602

000046

48:

001050

cMP
8LO

R3,R4
8s

;OTHERWISE WRITE THE BACKGROUND
;DEFINED AT STEP 3,

BNE

'¥SELH£0P?3F5201 LOCATION NON ZERO? IF SO

1ST8

6$:

MOV

CMp
BEQ
MOV
MOV
MOV
Mov
JSR
45

MOV
000306

001026

SN#PASFLG*1
#10247, (R3)
R2,(R3)
8$
RO,=(SP)
R1,=(SP)
R3,R1
R2,RO
PC,ERROR

(SP) ¢+ ,R1

:1S THE TEST JUST DOING READ, I.E.

sWRITE THE LOCATION WITH THE OP CODE FOR MOV RZ2,-(P()
;READ (R3) TO CONTAIN CORRECT DATA

:SAVE RO
sAND R1 ON THE STACK
;SET RO= GOOD DATA FOR ERROR PRINTOUT
: *ERROR* REPORT ERROR MESSAGE
;#etvesERROR NUMBER 4Sexvess

sRESTORE R1

MOV
TSTB

(SP)+,RO
S#PASFLG

BNE

MOV
JSR

R2,RO0
;SAVE FOR ERROR REPORY
PC,ERROR
;*ERROR* REPORT ERROR MESSAGE

sAND RO
sIF PASFLG IS O AND THE MEMORY DOES NOT HAVE
:THE PROPER DATA THEN WE DON'T WANT TO GO AND

:;éggUTE THE INSTRUCTIONS STORED IN MEMORY UNDER
:BRANCH IF PASFLG NOT =0

;eenve«ERROR NUMBER 46revers

CNKMA
MACYTT 30(1046)
27-DEC~82
TNKMAA FV)
27-DEC-82 13:15

g}gg

004604

000663

8128
8129
8130

004606
004612
004616

062703
162701
020105

8132
8133

0064622
004624

020103
103405

2136

004636

012711

8138
8139

004640
004642

02001
001403

8131

B134
8135

8137

004620

004626
004632

000002
000002

8%:

103014

105737
001002

814643
s})

004644
004650

004767
000047

8144
g}:g

004652
006654

020301
103722

)

13:16 PAGE 64-3
113
wR]ITE RECOVERY TEST

108:
000760

g}fig

ADD
SuB
CMpP

#2,R3
#2.R1
R1,RS

: INCREMENT R3 BY 2
;DECREMENT R1 BY 2
JWRITE THE BACKGROUND DEFINED AT STEP &,

CMP
8LO

R1,R3
108

;HAS STORING THE 177667 REACHED WHERE MOV R2,-(PC) ]1S°
;BRANCH JF YES DON'T DESTROY THE MOV R2.-(PC) IS.

MoV

8177667, (R1)

JWRITE THE LOCATION WITH THE COMPLEMENT OF THE

cMpP
BEG

RO, (R1)
12%

PC.ERROR

;*ERRORY REPORT ERROR MESSAGE
;axneesERROR NUMBER 47¢vnnen

CMP
BLO

R3,R1
43

;IF WE HAVE NOT REACHED THE MIDDLE OF 4K BANK
;THEN REPEAT FROM 4$

12§

SVPASFLG+?
108

;1S THE THE READ ONLY CHECK PASS?
;BRANCH IF YES

;0P CODE JMP (RO)

:READ R1 TO CONTAIN CORRECT DATA

;RETURN HERE AFTER PROGRAM RUN IN BANK UNDER TEST

8149
g}g?

004656
004662

062703
000666

020000

8152

004664

122737

000001

8156

8153
8154
8155

:ABORT TST 13,

JSR
47

12%:

SEQ 0046

END1?2

7818
BNE

177667

B8R

BHIS
000307

000306

12%:

ADD
BR

#20000,R3
3s

;OTHERWISE GO TO THE NEXT 4K BANK

14$:

CMP8

#1,3#PASFLG

;THE PROGRAM CONTROL COMES HERE AS FOLLOWS

:2~PASFLG=1, PROGRAM HAS JUST COMPLETED

:1=PASFLG=0, PROGRAM HAS JUST COMPLETED A
;
WRITE/READ CYCLE FOR THE BACK GROUND
2
AND WANTS TO BEGIN THE WRITE RECOVERY TEST

8157
8158
R159

004672

001437

BEQ

248

004674

103627

BLO

END12

:
THE WRITE RECOVERY TEST AND WANTS TO
:
READ MEMORY FOR CORRECT DATA
:3=-PASFLG=2, PROGRAM HAS CORRECTLY READ THE

8162

004676

105137

comM8

S#PASFLG+1

JENTER HERE WITH PASFLG=0, ON THE FIRST ENTRY

g}g?

000307

8163
8164
8165
g}gg

004704

004702

001240

012702

005141

8168
8169

004710
0047146

012700
060700

177740

8172
8173
g};g

004716

004722

105237

000630

000306

8176

004724

032777

000020

8178
8179

0047234
004740

105737
001013

000042

8170
ARA

8177

8180
8181

004732

004742
004746
004754

001016

004767
051524
047102

001644
030524
000113

BNE

15%:

173516

020063

16%:

MEMORY AND WANTS TO GO THE NEXT TEST.

JENABLE READ ONLY FOR THE MEMORY AND ON THE SECOND
;ENTRY DISABLE READ ONLY

Mov

#5141 ,R2

:7&A£S THE OP CODE FOR INSTRUCTION COM -(R1)

Mov
ADD

#138-.-6,R0
PC,RO

:PLACE THE RETURN ADDRESS IN RO AS 138
;THUS WHEN THE READ NECOVERY TEST REACHES

INCB

a#PASFLG

:BRANCHINGING THE PROGRAM TO 13%
; INCREMENT PASFLG BY 1.

BIT

#20,3S5WR

:HAS THE PRINTOUTS BEEN SUPRESSED ?

TST8
BNE

anL?2
18$%

: 1S THE PROGRAM RUNNING UNDER A(CT?
;BRANCH [F YES

B8R

BNE

JSR
JASCIZ

18%

PC.PNTMES
/TST13 BNK/

;THE MIDDLE OF THE 4K MEMORY THEN THE
SINSTRUCTION EXECUTED WILL BE JMP (RO)

:1F SO THEN GO TO 18%

: TYPF THE BANK UNDER TEST

(NKMA

MACY11

8182
8183

004760

004767

g}gg

004770

000113

004772
004776

105137
012700
000745

THURMAA P11

g}gg

8188

8189
8190

8191

g}g%

8194

8195

004764

005002

30(1046)

27-DEC-82

27-DE(-82 13:15

004767

13:16

113

WRITE RECOVERY TESTY

‘€0 0047

.EVEN
JSR

PC.GE TBNK

sGET BANK NO. UNDER TEST

18%:

JMP

(R3)

;BEGIN EXECUTING MOV R2,~(P(C) ,COM -(R1) SEQUENCE IN TES

248:

COm8
MOV
B8R

SNPASFLG+1
#110,R0

002456

001650

000307
000110

_PAGE 64-4

JSR

PC.S$TPDEC

158

;TST13 EXITS VIA END12.

sTYPE BANK NO. UNDER TEST

INTO DE(WRD FOR PRINT,

sPLACE THE OP CODE FOR JMP (RO) IN RO
¢ READ THE MEMCRY FOR CORRECT DATA AFTER
s INCREMEMTING PASFLG TO 2

8221
8222

8223
8224
8225
8226

8227
8228
8229
8230
8231

8232
8233
8234
8235
8236
8237
8238
8239
8240
8241
8242
8243

O-0
OO0
=N
O NN
O Wi
W ~N~

001000

173422

737

PAGE 64-5

RELOC:

MOV
1ST8
BNE

#377 ,84BAKPAT
SAMMAVA

8I7Y
BNE

#1000,3SwWR

1S18
BMI
Move

000405
000200

SEQ 0048

PARITY OR RELOCATE?

000405

CONTRY,

CKDONE
@/REL
RELOER

#200,34REL

:1S THE MEMORY MANAGEMENT BEING TESTED ?

s1F SO THEN GO TO CONTMM AND CONTINUE TESTING
sMEMORY MANAGEMENT
sRELOCATION WANTED?

sBRANCH IF NO
cIF THE PROGRAM HAS ALREADY BEEN RELOCATED THEN ALSO
s PLACE THE PROGRAM BACK

IN LOWER CORE

;OTHERWISE PREPARE TO RELOCATE

;RELOCATE THE DIAGNOSTIC TO HIGHEST AVAILABLE MEMORY
005044

005050

004767
042522

001542
047514

005056

013705

000340

005062
005064
005070
005072

014445
020427

000430

000165

000050

101374

PC,PNTMES
JSR
.ASCIZ /RELOC/
.EVEN
MOV
FMMAXMEM RS

000103

2s:

MOV

cMP
BHI
JMP

=(R4) ,=-(RS5)
g:.'BEGIN-SO

sTYPE 'REL'’

sPREPARE TO LOAD THE PROGRAM IN THE HIGHEST

sAVAILABLE MEMORY

sRELOCATE THE PROGRAM
¢NEITHER RELOCATE NOR TEST LOCATIONS LOWER THAN BEGIN-50

50(RS)

;*RELOCATE THE DIAGNOSTIC BACK TO LOWER MEMORY
005076
005102
005106

000346
000405

000430

8208
8209
8210
8211
8212
8213
8214
8215
8216
8217
8218
8219
8220

000316

OO
OVl

8206
8207

005020
005026
005030
005034
005036

005016

13:16

855%

O
= B OON——m
OONOWVIWONN

8205

005004
005012

005110
005114
005116
005122
005124
005130
005134
005140
005144

OOOO==O0O00

8200
8201
8202
8203
8204

27-DEC-82

13 :15

—==2a00
—SOOOW
NNOWN—N)
YO~V
NN
ONON

MO
U

MACYT! 30
(NKMA
UNKMAA P11
27-

005150
005154
005156

001073
004767

005162
005166
005170
005172
005176
005202

105737

001462

000340

RELOER: MOV
IST8
8PL

2%:

000405
000346

Mov
MOV

CMP
8LO
CLRB

MOV
MOV
MOV

000500
000350
005150

: JMP
CKDONE

000315

LOWER:

001702

TSTMM:

000276

1ST8

BNE
JSR

1578

ANSAVRS
RS

:1S DIAGNOSTIC IN RELOCATED STATE?

#BEGIN-50,R4
(R5)+,(R4)+

sPREPARE TO RELOCATE THE PROGRAM TO LOWER CORE

CKDONE

+BRANCH IF NO

gg.aonAann
SNREL
RS ,a#SAVRS
#BEGIN,SP

SP,@#SAVRE
afLOWER

a#SAVKBB
$STPSTK

PC,MEMMNG

afMMAVA
ENDPAS
SCNTMM
PC,UPHM
#LOWTWO,R3
PC,GETSIZ

004767
012703
004767

002036
009324
002142

8EQ
BR
CONTMM: JSR
SCNTMM: MOV
JSR

005206

012704

020000

Mov

#20000,R4

005212

020237

172342

(MP

R2,a#172342

000402

sRESTORE RS

IFREL

:SAVE RS

RESET STACK TO LOWER MEMORY
:*BEGINTM* USES THIS TO RESET THE STACK.

:TRANSFER THE PROGRAM CONTROL TO THE LOWER CORE

+HERE DUE TO “C TYPED?
;BRANCH IF YES (TYPE ERROR STACK)
s SET THE REGISTERS IF THE MEMORY MANAGEMENT
;1S AVAILABLE
:1S MEM. MANAG. AVAILABLE ?
:BRANCH IF NO
sBEGIN TESTING ABOVE 28K
;G0 TO UPDATE MEM. MANAG. REGISTERS

sMAKE R3 POINT TO THE LOCATION LOWTWO
: LOAD BITS 6=10 OF R2 WITH THE BITS 13-17
sOF THE LOWEST ADDRESS UNDER TEST
+MAKE R4 POINT TO THE LOWEST LOCATION IN THE BANK
sPOINTED BY PAGE ADDRESS REGISTER 1 (PAR1)
;1S THE CONTENT OF R2 LOWER THAN THE CONTENT OF

MACY11 30(1046)
(NKMA
27-DEC-82
CNKMAA P11
27-DEC-82 13:15

8256
8257
8258
8259
8260
8261
8262
8263
8264
8265
8266
8267
2268
8269
8270
8271
8272

103405

BLO
8Is

050104
162702

004767
004767
004767
010005

005256

004767
004767
010013
000167

000200
001636
002112

8285

8286
8287
8288
8289
8290
8291
8292
8293
829
8295
8296
8297

8298

2%:

000020

002100
000006

R1,R&

sus
JSR
JSR

#200.R2

JSR
MOV
JSR
JSR
MOV

PC,MAXADR

JMP

174256

PC,MMREG
PC,GETSIZ

RO,RS

PC,GETSIZ
PC,MAXADR

RO, (R3)
CLRMEM

SEQ 0049
sPAR1

:1F SO THEN GO 2%
:SUBROUTINE GETSIZ LOADED R1 WITH BITS 0-12
;OF LOWADD WHICH HAVE NOW BEEN LOADED IN R4

;s SET MEM. MANAG. REGISTERS

sPLACE BITS 13-17 OF HIGHEST LOCATION TO BE TESTED
sIN BITS 6-10 OF R2, #160000 IN RO AND BITS 0-12
:OF LOCATION HIGHADD IN R1
: GET THE ADDRESS OF MAX. MEM. UNDER TEST
;

PREPARE

TO SET UP LOCATION MAXMEM

¢ GET THE MAXIMUM ADDRESS OF AVAILABLE MEMORY

sAND STORE INTO 'MAXMEM'
;GO TEST A 24K SLICE ABOVE 28K.

sMAXADR - SUBROUTINE TO GET CURRENT 24K SLICE OF MEMORY ADDRESSES ABOVE 28K.

8273

8274
8275
8276
8277
8278
8279
8280
8281
8282
8283
8284

13:16
PAGE 64-6
PARITY OR RELOCATE?

tREGISTERS;

:RO= ON ENTRY= #160000 AND ON EXIT=HIGHEST VIRTUAL ADDR. UNDER TEST
:R1= LOW ORDER 12 BITS OF VIRTUAL TEST ADDRESS

{R2= PAR BLOCK NO. CURRENTLY UNDER TEST.
005262
005264

172356

020000

005270
005274
005276
005300
005302
005306

172340

005310
005312
005314
005316
005322
005324
005330
005332

157776

000002
022626

MAXADR: MOV

RO,=(SP)

sPUT MAXIMUM AVAILABLE ADDRESS ON STACK

CMP

R2.=(RO)

:DOES CURRENT PAR= TEST BLOCK NO.?

MOV

#172356,R0

:RO=PAR7 UNIBUS ADDRESS
:v*BEGIN LOOP TO FIND PAR ADDRESS UNDER TEST
#20000, (SP)
SUB
28:
sDECREMENT VIRTUAL ADDRESS BY 4K
R1, (SP)
8IS
:SET BITS 11:0 TO MAXIMUM VIRTUAL TEST ADDRESS

8EQ
CMP

3s
RO,#172340

sBRANCH IF YES

sARE WE AT PAR(Q?
sNO KEEP TRYING
T0
F{gg)PAR
ADDRESS
UNDER
TEST
LOOP
D
;*++EN
ST
:SET _TO PAR CURRENT
PAR BLOCK UNDER TEST GTR THAN ALLOWED?
CMP
(RO).R2 :
BGT
4
sBRANCH IF YES (FALL INTO ENDPAS)

BH]J

3s:

MOV

0157??6 (SP)

ADD

oz RO

CMP

(SP)+, (SP)+

MOV
RTS

o$:

(sP)+,RO

EXIT WITH MAXADR= 28K SEGMENT TEST SIZE
;SET RO TO MAXIMUM VIRTUAL TEST ADDRESS
IMAKE MAXIMUM MEMORY
+2
sAND EXIT MAXADR ROUTINE

sFIXUP STACK
sAND FALL THRU TO ENDPAS.

(NKMA
MACYT1 30(1046)
%7-%5(*82
CNKMAA F11
27-DEC~82 13:1

L
13:16 PAGE 64-7
TYPE ROUTINE FOR ERROR STACK

8303

8305

8310
€313

8314
8315
8316
8317

8318
8319

Sy
TR
esemsmeees
it
THIS ROUTINE IS USED TO DETERMINE IF TYPE OUT OF THE ERROR STACK
I

005334
005342

032777
001055

000020

012746

177777

005350

012701

007744

MOV

012703

000376

TYPSTK: MOV

005344

005354

005360
005362

8320
8321
8322

005366
005370
005374

8325

005400

8323
8324

8326
8327

005376

005216
020137

103043
112702
105302

005410
005412

103404
101026

8333
8334
gggg

005414
005420
005422

004767
000404
010237

8337
8338
8339
8340
8341
8342
8343
8344
8345
8346
8347
8348
8349
8350
8351

005426
005432
005436
005442
005444

004767
011637
004767
005043
114113

005446
005450
005452
005456

105021
005043
105237
004767

005462

005470
005474

000022

173106

ENDPAS: BIT
BNE

$TPSTK: MOV

INC
CMP

BHIS
MOVB
RETSTK: DECB
8LT

105721

001774
020227

005466

000310

002766

005402
005404

8328
8329
8230
8331
8332

SEQ 0050

;* TYPE ROUTINE FOR ERROR STACK

8306
gggg

8311
8312

TST18

000020

001000

FOR ONLY THE FAILING BITS

#20,3SWR
$EOP

:ARE WE GOING TO TYPE THE ERROR STALK AND END OF PASS?
:1F NOT THEN GO TO SEOP

#ENDPRG,R1

:STACK AND END OF PASS WILL BE TYPED OUT
:PLACE THE STARTING ADDRESS OF THE ERROR STACK
:FOR 0 TO 4K MEMORY IN R1

#=-1,-(SP)
#376,R3

:1F WE HAVE GONE THRU THE ENTIRE
;HAS THE END OF THE ERROR STACK BEEN REACHED ?

TYPSTK

:BEEN CHECKED FOR ERROR THEN SEE IF
:1S ANY MORE 4K MEMORY BANK

(R1)+

8LO
BHI

2$
PARFL

JSR
BR
MOV

PC,TPADER
FAILNM
R2,3#DECWRD

001202
000312
001176

JSR
FAILNM: MOV
JSR

CLR
MOVB

PC.TYPDEC
(SP) ,@#DECWRD
PC,STPDEC
~(R3)
-(R1), (R3)

000314
001316

CLRB
CLR
INCB
JSR

(R1)+
~(R3)
SNTYPCNT
PC,RPTOCT

012703

000376

MOV

#376,R3

004767

000750

JSR

PC,TPPRER

000742
000756

PARFL:

RETSTK

FAILNM

:THEN GO TO TYPE END OF PASS

:1F ALL 16 BITS OF THIS BANK HAVE BEEN CHECKED.

RETSTK
R2,#16.

2s:

:THE PROGRAM HAS REACHED THE END AND ERROR

(SP)
R1,@#ENDSTK
$EOP
#18.,R2

BEQ
CMP

000312

IS REQUIRED OR NOT

THERE

SOTHERWISE CHECK THE BYTE STORED AT (R1)

sIF IT IS O WE WILL NOT TYPE IT
*1S THE POINTER POINTING TO ERROR STACK BYTE

*MEANT FOR COLLECTING ADDRESS FAILURES FOR
sTHE SPECIFIC MEMORY BANK
:1F NOT THEN GO TO TYPE BIT NUMBER
:1F IT IS POINTING TO THE STACK LOCATION INTENDED
2T0 COLLECT PARITY FAILURES THEN GO TO PARFL

*OTHERWISE TYPE '‘ADDRESS ERROR'

;?zsgegfnxf TYPE THE NUMBER OF THE FAILING BIT
;GO TO TYPE THE BIT NUMBER IN DECIMAL
;PREPARE TO TYPE THE PAGE NUMBER
:IN DECIMAL
:PREPARE TO PRINTOUT THE NUMBER OF TIMES THIS
:FAILURE OCCURED
:CLEAR THE ERROR STACK
:ENABLE THE TYPE OUT OF 1 WORDS
; TYPE THE 4K BANK AND THE NUMBER OF TIMES
:THIS FAILURE WAS SEEN
:RESET SCRATCH STACK FOR EACH BIT PRINTED.
.
.
: TYPE 'PAR ERR

(NKMA

MACYY]

(NKMAA FN

8389
8390

839
8392
8393
8394
8395
8396
8397
8398
8399
8400
8401
8402

13:16

PAGE 64-8

SEQ 0051

END OF PASS

* END OF PASS

8356
8357
8358
8359
8360
8361
8362
8363
8364
8365
8366
8367
8368
8369
8370
8371
8372
8373
8374
8375
8376
8377
8378
8379
8380
8381
8382
8383
8384
8385
8386
8387
8388

27-LE (-82
30(1066 )
27-DEC-8 2 13-15

i*
e

TYPE ''PASS# AND DISABLE PARITY.

ALSO SERVICE ACT11.

AND EVERY CONSECUTIVE PASSES UNLESS BIT 4 OF $SWREG IS HIGH

- %

005476
005500
005504
005510
005512
005516
005524
005526
005532

005002
004767
105737

004767
040520

001052
051523

005540
005546
005552
005556
005560
005564

013737
004767
013700
001405
004767
000005

000406
001066
000042

005566

000137

000164

005572

000137

005576
005602
005606
005610
005614
005616

004767
013704
014445
020437

001043
005237
032777
001012

101374
000207

$EOP:

002014
000315
000406
000040

CLR

JSR
TSTB

BNE

000043

ACT11:

000012

CTiLC

;SET R2= PARITY MODULE DISABLE CODE
1GO DISABLE PARITY MODULES
:CONTROL=C TYPED?

*INCREMENT PASS COUNT

BNE

ACTi1

:BRANCH IF NO

#40,aSWR
PC,TPCRLF
/PASS#/

MOV

aN#SPASS,a#DE CWRD

MOV

an#é2,RO

JSR

BEQ
JSR
RESET

PC,$TPOEC

004767
000167

SELECTED.

SPASSHXX'* PRINTOUT WANTED?
S TYPE CR, LF, AND ‘'PASS#

:GET PASS COUNT
STYPE

;GET THE MONITOR ADDRSSS

$DOAGN
*1F NONE
PC.RLODER
*RESTORE XXDP MONITOR
;RETURN TO ACT11 MONITOR.

:* SERVICE XXDP/ACT11
JMP

aNSENDAD

;JUMP TO ACT SERVICE

000250

$DOAGN: JMP

S#RESTRT

;REPEAT TEST IF NOT UNDER ACT11/XXDP

001616
000344

RLODER: JSR
MOV
4:
MOV
CMP
BHI
RTS

PC,CLRMM
a#SAVRS ,RG
<(R4),=(RS)
R4 ,a#ENDSTK
4$
PC

:STOP MEMORY MANAGEMENT SO CAN RESTORE LOADERS
*RESTORE R4 WITH SAVRé
:RESTORE LOADERS

000310

;RETURN FROM RLODER CALL

;CONTROL C HANDLER
005620
005624

*BRANCH IF YES=RESTORE LOADERS AND HALT-

ANSPASS

TYPEOP: JSR
'235*2

000312

PC,PARITY
a#SAVKBB

INC

8IT

172724

177752

000400

CTLF:

JSR
JMP

PC.RLODER
APTHLT

;RESTORE ABS LOADER
S1F NOT APT HALT AT FATHLT

MACY11_30(1046)
27-DEC-82
UNKMAA P11
27-DEC-82 13:15
(NKMA

13:16

8446

8447
8448

8449

8450
8451
8452

8453

8454
8455
8456
84>7
8458
8459
8460
8461
8462

PROGRAM COMES HERE EACH TIME AN ERROR IS ENCOUNTERED THIS
ROUTINE TYPES OUT THE ERROR MESSAGE IN THE FORMAT GIVEN EARLIER

005630
005636
005640

7637

000000

000402

gggon:

MOV
MoV
MOV

0046

a(SP),aFSFATAL
R3,-(SP)
RO,=(SP)

;LOAD THE LOCATION SFATAL WITH THE ERROR NUMBER
*SAVE R3
*AND RO ON THE STACK

:SETUP BANK NO. IN FATAL FOR APT
005642
005644
005650
005654

010103
004767
013703

005669
005662
005666
005672
005674
005700
005704

005716
005720
005724
005726
005732
005734
005740
005742
005744

005746
005752
005756
005760
005762
005766
005770
005772
005774
005776
006002
005004

006006
006012
006014
006022

b emd PSP
SO
N AN NN N NN N NN O

005706
005710
005712

110337

MOV
JSR
MoV

001570
000312
000403

MovB

000376
000306

MOV
MoV
MOV
CLR
Movse
Mov
MOV
MoV
CLR
Mov

2$:

000402
000006

000004

8IC
BIC
8IS
MOV
ADD
ADD
DEC
BGE
TST

000004
001766
6%:

000022

000277

000300

1578

000377

3s:

000001

5%:

000400

CLRB
1ST8

BNE
1ST8

000301

NS OO-2OW

8434
8435
8436
8437
8438
8439
8440
8441
8442
8443
8444
8445

SE@ 005¢

* ERROR HANDLING ROUTINE

elelelelelJolelels)
ur? S pur Pur P GEN'Y - Prar G Ghury
OO WNO =N WNWNO

8433

ERROR HANDLING ROUTINE

8407
8408
8409
8410
8411
8412

8413
8414
8415
8416
84617
8418
8419
8420
8421
8422
8423
8424
8425
8426
8427
8428
8429
8430
843
8432

PAGE 64-9

172426

BNE
1ST8
TST
BPL
CMPB
BEQ
INCB
CMPB
8EQ
BIT

BNE

R1,R3

:GET VIRTUAL ADDRESS UNDER TEST FOR GETBNK

aN#PBNK,R3

‘GET BANK UNDER TEST

PC . GE TBNK

R3,aFSFATAL+1

SGET BANK NO. UNDER TEST

INTO PBNK

:STORE FAILING BANK NO. FOR APT

R3,~(SP)

;TEMPORARILY STORE R3

a€:§§rLG,-(R3>

:OUTPUT THE WORD STORED AT

#376,R3

*MAKE R3 AS THE STACK POINTER

aN#SFATAL.(R3)
6(SP),=(R3)

:PUT ERROR NO. ON ERROR STACK
‘PLACE THE RETURN PC AT (R3)

4(R3),

sTAKE THE

(R1),=(R3)
“?§§§“3’
(R3)

RO, (R%)

4(R3) RO

RO, (R$)

*PLACE BAD DATA,
*AND GOOD DATA ON THE STACK

*EXCLUSIVE OR OF GOOD AND BAD DATA
*TO FIND THE BITS THAT FAILED

*AND PLACE IT ON THE STACK

#ENDPRG~.-24.,R0O;THIS CODE BRINGS THE RELATIVE ADDRESS
PC,RO
‘0f THE STARTING OF THE ERROR STACK

#18. R0

*FOR THE SPECIFIC 4K BANK

(SP)+

;RESTORE THE STACK POINTER

aNTYPENS

:DISABLE ANY TYPE OUT

gip’

aN¥SPRERR
3s

*IF THIS IS PARITY PROBLEM
;THEN GO TO 3$

(RO) +

;OTHERWISE INCREMENT THE ERROR STACK POINTER B8Y 1

(RO) +
(R3)
4%
#377,(RO)
5%

s INCREMENT THE POINTER RO BY 1
;15 BIT 15 OF (R3) SET?
;IF NOT THEN GO TO 4$
;OTHERWISE SEE IF THIS ERROR HAS OCCURED 377 TIMES
;1F SO DON'T BUMP ERROR COUNT

;BRANCH IF YES (DON'T TYPE ERROR)

aN#SADERR
3%

(RO)
#1,(RO)
7%
#400,aSWR

:IF THIS IS ADDRESSING PROBLEM
:THEN GO TO 3%

; INCREMENT THE ERROR COUNTER BY 1
sMORE THAN 1 ERROR OCCURRED ON THIS BIT?
;BRANCH IF NO
;STOP ERROR PRINTOUT AFTER 1 WANTED?

NE WA

MAZY11

{NKMAA N

8463
8464
8465
8466

8467
8468
8469
8470
8471
8472
847%
8474
8475
8476
8477
8478
8479
8480
8481
8482
8483
8484
8485
8486

o
e
d
ek ord
e
b

WNOWVNSWN
O

(U QW TV TW AV, IV, [V IV IV, ]

8487
8488
8489
8490
8491
8492
8493
8494
8495
8496
8497
8498
8499
8500
8501
850
850

006024

006030

30(1046)
27-DEC~82
27-DEC~82 13:15

105237
105737

000277
000300

006034
006036
006042
006044
006050
006052
006056
006060
006062
006064
006066

001403
004767
000411
105737
001403
004767
000403
105720
006313
001342
112737

000006

006074

004767

006100

006104
006110
006112
006114
006120
006122

006130

000301

9%:

000342

INCB
TST18
B8EQ
JSR
B8R
ISTB
BEQ
JSR
BR

a# TYPENB

afSPRERR

PC.,TPPRER

8$
a#SADERR
63

PC,TPADERR

SEQ 0053
sENABLE THE TYPE OUT ROUTINE
¢PARITY ERROR?

:BRANCH IF NO

:ELSE TYPE ''PAR ERR'
SAND DON'T TEST IN"IVIDUAL BIT FAILURES.
sADDRESS ERROR?
sBRANCH IF NO
;PRINT ''ADR ERR"'

8SNE

8s
+
(RO)
(R3)
2%

001142

JSR

PC,PUTADR

sPOINT TO NEXT ENVRY IN ERROR STACK
;1S THERE STILL AN ERROR BIT SET IN ERROR.
¢BR IF YES = KEEP FILLING ERROR STACK
sTELL TYPOCT TO TYPE 6 WORDS OF ERROR STAC(K.
sTHE STACK POINTED BY R3
;GO TO THE SUBROUTINE TO PLACE THE ADDRESS IN R1

004767

000616

JSR

PC,TYPERR

;TYPE ERROR STACK

005037

000300

108:
fNDERR:

MOV

S#SPRERR
(SP)+,R0
(SP)+,R3
ANSENV
2%
#1,a¥SMSGTY

;CLEAR ADDRESS/PARITY ERROR FLAGS

000420

CLR
MoV
MOV

MOV

R2,=(SP)

8MI

;SAVE R2 TEMP
sDOES THE OPERATOR REQUIRE THE PROGRAM TO HALT
:ON ERROR
;:IF SO THEN HALT ON ERROR

JSR

PC,CHECKC

sIF CONTROL=C TYPED THEN PRINT ERRUR HISTORY

7$:

1ST8
BEQ

anL2
6%

¢ARE WE RUNNING UNDER ACT?

4%:

HALT

012600

012603

105737
001406

012737
000442

6$%:

000001

010246

006140

100405

006142

004767

001526

006146
006152

105737
001401

000042

006154

000000

005777

012602
062716
000207

000314

8s:

000400

TST8

ASL

Movs

TSTB

BEQ

2%:

172310

TST

#6,3#TYPCNT

FATHLY

aSuwR

;CHECK FOR CONTROL-C KEY

6%:

000002

006166
006166
006172
006200
006206
006212
006216
006222

7%:
48:

000402

006132
006134

006156
006160
006166

13:16
PAGE 64-10
ERROR HANDLING ROUTINE

MOV

ADD
RTS

FATERR:

000043
000402

000402

SEQERR: JSR
.ASCIZ
.EVEN
Mov
INCB
MoV
MoV
TST

sAT LOCATIONS (R3) AND (R3-2)
(7 WORDS)

;RESTORE RO

;AND R3

sARE WE RUNNING UNDER
sIF NOT THEN TEST FOR
sOTHERWISE INFORM THE
:GOTO FATHLT AND WAIT

APT?
HALT
APT
FOR APT.

sAND HALT AT FATHLT.

;BRANCH IF NO

;PROGRAM HAS HALTED ON ERROR, R1

IS POINTING

sTO A LOCATION WHICH SHOULD HAVE CONTAINED
(SP)+,R2
#2,(SP)

s THE WORD STORED IN RO

sRESTORE R2
sRESTORE THE RETURN ADDRESS
sRETURN FROM THE SUBROUTINE

PC,TPCRLF
/ERR #/

;TYPE "ERR #"

3(SP) ,a¥SFATAL

;LOAD THE LOCATION SFATAL WITH THE ERROR NUMBER
;TELL STPNUM TO TYPE 1 WORD
;$STPNUM USES R3 AS STA(K
sPUT ERROR NO. ON_STACK
;$TPNUM REQUIRES THIS

a#TYPCNT
#376,R3

(R3)
TAL
INSFA.-(R3)

(NKMA
MACY1T 30(1046)
27-DEC-82
(NKMAA -1
27-DEC-82 13:15
8519

8520

8521
8522
8523
8524
8525
8526
8527
8528
8529
8530
853

006226

004767

006234
006236
006240

001327
000000
000137

006230

105737

000560

000420
000250

13:16 PAGE 64-11
ERROR HANDLING ROUTINE
JSR

APTHLT: TSTB
BNE
FATHLT: HALT
JMP

'PARERR

PC FATYP

$ENV
FNDERR

SEQ 0054
s TYPE ERROR NO.

;RUNKING UNDER APT?

SARESTRY

sBRANCH IF YES
sFATAL ERROR OR “C HALT,
sRESTART TST BUT DON'T CLEAR PASS COUNT
:IN CASE “C RESTART.

PARITY TRAP HANDLER

gggz

COHE HERE FROM A TRAP TO 114,
THIS ROUTINE SEARCHES THE AVAILABLE PARITY MODULES AND IF ONE
HAS A PARITY ERROR BIT SEV THE GET THE PARITY ERROR ADDRESS
:AND CALL THE “ERRORTM ROUTINE TO PRINT ERROR MESSAGE.
;IF NO PARITY ERROR BITS CAN BE FOUND A FATAL ERROR IS DONE.

8535
8536
gg%g

:REGISTER US AGE.
:R0= HOLDS PARITY MODULE ADDRESSES
:P1= GETS ERROR ADDRESS FOR ‘‘ERROR'‘ CALL.

8532

8539
8540
8541
8542
8543
8544
8545
3229

006244
006250
006254

012637
011637
013706

000356
000360
000350

PARERR: MOV
MoV
MoV

006260
006264
006270
006274

010067
010167
013701
012700

000130
000126
000352
172100

MOV
MOV
MOV
Mov

RO,SAVRO
R1,SAVR1
ANPARMAP, R1
#172100,R0

8548
8549

006300
006302

005701
001441

020027
002032
062700
Q00766
042710

(RO) R1

sGET PARITY MODULE CSR
sSHIFT ERROR ADDRESS BITS 11-5 INTO 15-9

8564

006314
006320
006322
006326
006330
006334
006336
006340
006342
006344
006346

R1
43
R1
2%
(RO)
3$
RO #172136

sANY PARITY MODULES AVAILABLE?
:BR IF NO =FATAL ERROR-

8554
8555
8556
8557
8558

042701

000777

TST
BEQ
ROR
BCC
TST
8MI
CMP
BGE
ADD
BR
8IC
Mov
ROL
ROL
ROL
ROL
BIC

8566
g;;

006356
006362

004767
000050

177246

JSR
50

006364
004370
006374
006400

016700
016701
013745
013746

000024
000022
000360
000356

MOV
MoV
MoV
Mov

8550
8551
8552
8553

8559
8560
8561
8562
8563

8565

8567
8568
8569
8570
8571

006304
006306
006310
006312

006352

006404

006001
103005
005710
100406

011001
006101
006101
006101
006101

105237

000002

1$:

172136
000002

2%:

100000

3s:

000300

INCB

RTI

(SP)+ ,Q#PARSP
(SP) ,a#PARPS
I SAVRE, SP

;SET PARSP TO RETURN ADDRESS
:SAVE PSW FOR RETURN
sAND RESET THE SP SINCE NOT ENOUGH STACK ROOM
270 COMPLETE THE ERROR SERVICE ROUTINE.
:SAVE RO DURING PARITY SERVICE
+SAVE R1 DURING PARITY SERVICE
sGET PARITY AVAILABLE MAP
;RO= FIRST PARITY ADDRESS.

sSHIFT PARITY MAP BIT INTO C BIT.
sBRANCH IF THIS PARITY MODULE NOT AVAILABLE.
sPARITY MODULE ERROR BIT SET?
sBRANCH IF YES =CALL '‘ERROR'® ROUTINE

sDONE ALL PARITY MODULES?
;BR IF YES- GO TO FATAL ERROR CALL02 RO
;POINT TO NEXT PARITY ADDRESS
sAND KEEP TRYING
3100000 (RO)
;CLEAR PARITY ERROR BIT.
R1
R1
R1

#777,R1 ;SAVE ERROR ADDRESS ONLY

ANSPRERR’

;TELL "ERROR’' PARITY ERROR CALL.

PC,ERROR

;*ERROR* REPORT ERROR MESSAGE
;esavtxERROR NUMBER 50*vvevs

SAVRO,RO
SAVR1,R1
a#PARPS ,-(SP)
a#PARSP,=(SP)

;RESTORE RO
;RESTORE R1
;SET RETURN PSW ON STA(CK
;AND SET RETURN ADDRESS ON STACK

;RETURN TO TEST WHERE PARITY TRAP OCCURRED.

(NKMA

MACYN

(NKMAA. P

8573
8574

006406
0064
00641

30(10685 1%? -DEC~-82
15
27-DEC~

13:16 PAGE 64-12
ERROR HANDL ING ROUTINE

SEQ 0055

igOHE HERE IFf NO PARITY ERROR FLAG FOUND SET

004767
000051

JSR

177554

PC.FATERR

;*ERROR* REPORT

ERROR MESSAGE AND HALT AT FATHLT

teavaeesERROR NUMBER Slvesene

sRO+R1 ARE SAVED HERE FOR PARITY TRAP DUE TO INSUFFICIENT

006414
00641~

000000
000000

006420
006424
006426
006440

105737
001406
004767
042101
000122

006442

000207

006444
006450
006452
006456
006464

105737
001406
004767
040520
000122

006466

000207

006432

:STACK SPACE BETWEEN 500-450.

SAVRO:
SAVR1:
000277
000160
020122

TPADER:

051105
1$:

000277

000134
020122

TPPRER:

051105

0
0

;SAVE RO DURING PARITY TRAP SERVICE
sSAVE R1 DURING PARITY TRAP SERVICE

TSTB

a# TYPENB

8EQ
JSR
LASCIZ

.EVEN

s TYPE ERROR?

;BRANCH If NO
: TYPE CR, LF AND ''ADR ER'’

RTS

TST8B

a#TYPENB

;ERROR PRINTOUTS ALLOWED?

JSR

PC,PNTHMES

;GO TO TYPE CR, LF AND '‘PAR ERR'’

.EVEN
RTS

BEQ

.ASCIZ

18:

18
PC,PNTMES
/ADR ERR/

/PAR ERR/

:BRANCH IF NO

(NKMA
MACY11_30(1046)
27-DEC-82
(NYMAA F1
27-DEC-82 *3:15

SEQ 0056

oeee

THIS ROUTINE

IS USED BY THE PROGRAM TO TYPE OUT ANY CHARACTER

006472

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

~NN o
N O = -0

006470

NO‘OO?—'U\O‘O
W~ O —»

8613
8614
8615
8616
8617
8618
8619
8620
8621
8622
8623
8624
8625
8626
8627
8628
8629
8630
8631
8632
8633
8634
8635
8636
8637
8638
8639
8640
8641
8642
8643
8644
8645
8646

PAGE 64-13

TYPE OUT ROUTINE

;* TYPE OUT ROUTINE

ollolelelelel
lele]
Oodedad
d DO
=

8599
8600
8601
8602
8603
8604
8605
8606
8607
8608
8609
8610
8611
8612

13:16

046

NOTYP:

000002

A ¥

BNE
BR
STYPE:
MOV
MoV
MOV
Move
2%:
8EQ
JSR
BR
48:
MOV
RETTYP: INC
8l1C
MOV
MOV
BR

000004

000022

000001
000002
000416

000421

132737
001005
105737
100375
110037
000404

000040

177706
000

006602

004767
005015
006602
000207

006604
606610

004767
000735

177762

006612

032777
001323
123737
001717
000764

000020

171630

000042

000046

006546
006556

006556

006562
006564
006570

006572
006576

006632

MOV
MOV
TST8

177566

;1F THIS TYPE OUT HAS BEEN SUPRESSED THEN
:PREPARE TO RETURN

;SAVE R1
SAND RO ON THE STACK
*PLACE THE ADDRESS OF MESSAGE TO BE TYPED IN R1
‘PLACE THE BYTE TO BE TYPED IN RO
SIF IT IS END OF MESSAGE THEN GO TO 4$
*OTHERWISE GO TO TYPE THE CONTENTS OF RO

(SP)+,R0
R1
#1,R1
R1.2(SP)
(SP)+,R1
EXTYP

;RESTORE RO
*CAUSE R1 TO
:POINT TO EVEN ADDRESS
:MODIFY THE RETURN ADDRESS
*RESTORE R1
*AND RETURN VIA RTS PC

;HAVE TYPE OUTS BEEN DISABLED?
*IF SO THEN RETURN FROM THE SUBROUTINE
*WAIT HERE

#40,a#SENVM
4$
aNsTPS
2
RO.3#$TPB
EXTYP

PCRLF:

JSR

PC,STYPE

EXTYP:

RTS

$TPCHR: 8lTB
BNE

28:

177564

R1,=(SP)
2($P) R
(R1)+
48
RETTYP
R1,-(SP)
RO,=(SP)
4($P) R1
(R1)+.R0
48
sg,srpcna

1ST8
8PL
Move

.ASCIZ

<18><12>

SUNTIL THE PRINTER IS READY
:LOAD DATA TO BE TYPED INTO DATA REG.
*RETURN

:CR/LF
:RETURN

TPCRLF: JSR

PC.PCRLF

$TYPE

*NOW GO TO TYPE THE REST OF THE MESSAGE

PNTMES: 8IT

#20,aSWR
NOTYP

;PRINTOUTS ALLOWED?
:BRANCH IF NO

NOTYP
TPCRLF

*BRANCH IF YES =NOT PRINTOUTSSEND CR/LF AND TYPE MESSAGE.

BNE
cMPB
8EQ
BR

G2, anué

;TYPE CR/LF

*RUNNING UNDER ACT 112

MACY11 30(1046)
(NKMA
27-DEC-82
UNKMAA AN
27-DEC-82 13:15

13:16

8651

8678

SEQ CC¢

®SeSsts 000

006634

004767

177732

006640

005046
013746

000312

006646
006652

162716

002403

000012

006654
006660
006662
006666

005266
000772
062716
052716

000002

006642

112667

000012
000060
000020
000060
000007

006712

020040

030040

006720

000207

006672
006676
006702
006706

112667

052716

004767

TYPDEC:

STPDEC:

2%:

4%:

177572

000060
6%:

LN
R BN J »

;* ROUTINE TO TYPE OUT A DECIMAL NUMBER

8654
8655
8656

8677

ROUTINE TO TYPE OUT A DECIMAL NUMBER

865¢
8653

8657
8658
8659
8660
8661
8662
8663
8664
8665
8666
8667
8668
866Y
8670
8671
8672
8673
8674
8675
8676

PAGE 64-14

THIS ROUTINE

IS USED TO CONVERT

THE

DECWRD TO DECIMAL NUMBERS AND TYPt
sTYPE

CONTENTS OF

LOCATION

THEN FOLLOWING 3 SPACES

CR/LF

JSR

PC,PCRLF

CLR

=(SP)

@#DECWRD,=(SP)

;GET THE WORD THAT HAS TO BE CONVERTED TO A

sus
eLT

#10.,(SP)
43

:és }SE&WER IN (SP) WAS LESS THAN 10. THEN

INC
BR
ADD
81§
Mmove
8IS
Movs
JSR

2(SP)
2s

MOV

.ASCIZ
.EVEN

RTS

#10.,(SP)
#60, (SP)

(SP)+,68-2
#60, (SP)
(SP)+,6%-3
PC,$TYPE

/
PC

sDECIMAL NUMBER

EOTHERUISE ADD 1 TO THE LOCATION STORING 10°'S DIGIT
;AND RETURN TO 2%

sMAKE THE CONTENTS OF

(SP) A DECIMAL NUMBER

sPLACE THE 1°'S DIGIT TO BE TYPED
sMAKE THE CONTENTS OF (SP) A DECIMAL NUMBER
sPLACE THE 10°'S DIGIT TO BE TYPED

:gosggcg;PE THF NUMBER IN DECIMAL FOLLOWED B8Y

00/
sRETURN

.OM THE SUBROUTINE

MACY11 30(1046)
(NKMA
27-DEC-82
UNKMAA 1
27-DEC-82 13:15

13:16 PAGE 64-15
OCTAL TYPE OUT ROUTINE

8683
8684
8685

L g

OCTTYP: MOV

000314
000004

020040
005000
012723
000241

006113
006100
052700
004767
005000
006113
006100
006113
006100
105363
001361
105337

001347

000207

177500
000040

000006

MOV
INCB
TYPOCT: 8IS
ROLB
2$:
8cc
CLR
ROLB
ROL
ROLB
ROL
BR
RPTOCT: JSR
FATYP:

.ASCIZ
.EVEN
CLR

STPNUM: MOV
48:
CLC
ROL
ROL

81S
JSR
CLR
ROL
ROL
ROL
ROL

177776

000314
OCTXT:

J
BN B
B
BN BN B

TYPERR:

BN B

R
I

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

171520

177634
000012

006746

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

020000

* -] o.M
P NNZ
e
DM
—

032777

THIS ROUTINE

IS USED TO TYPE OUT THE OCTAL VALUES

CONTROL SHOULD COME TO THIS ROUTINE WITH R3 POINTING TO
THE LOW ORDER BITS (I.E. BITS 0=15) OF

THE ADDRESS 10

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

(I.E. BITS 16 & 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
TO BE

TYPED.

R TR IR TR TR

;+ OCTAL TYPE OUT ROUTINE

006722
006730
006732
006736
006742
006744

8726
8727
8728
8729
8730
8731
8732
8733
8734
8735

SEQ 0058

DECB
BNE
DECB
BNE
RTS

#20000,3SwR
oCcTXT

;ERROR PRINTOUT WANTED?
;BRANCH IF NO

oCcTXTY

*RETURN VIA RTS PC
:S$A£§ THE HIGH ORDER BITS AT LOCATION POINTED

PC,PCRLF
PC,TYPOCT

(R1)+,(R3)+

(R1)+,(R3)
a#TYPNT
#4,~(R3)

:TYPE CR/LF
“TYPE OCTAL NO.

*AND NOW PLACE THE LOW ORDER BITS

‘ENABLE THE TYPE OUT OF ONE OCTAL WORD

(R%)

(R3)

;GET BITS 17 & 16 INTO RO

PC,$TYPE
/7

;

RO
(R3)
RO
$TPNUM

RO
#6,(R3)+

(R3)
RO
#60,R0

PC.STPCHR
RO
(R3)
RO

(R3)

~2(R3)

4
asTYPCNT
RPTOCT

TYPE 3 SPACES

sENABLE THE TYPE OUT OF 6 OCTAL DIGITS

;PLACE THE CARRY FROM (R3) IN RO
sPLACE THE CARRY FROM (R3) IN RO
;IF WE HAVEN'T TYPED THE 6 OCTAL DIGITS
:THEN REPEAT FROM 4%

s1F ALL THE WORDS REQUIRED HAVE NOT BEEN
;TYPED THFN REPEAT FROM RPTOCT

(1
(1)

8781
8782
8783
8784

PAGE 64-16

SUBROUTINE FOR MEMORY MANAGEMENT

TR PR

* ROUTINE
X

5¢Q 005y

TO SET UP MEMORY MANAGEMENT REGISTERS

L
L
T L X T RS
g
Y

MOV
CLRB

#1400,R2
a/MMAVA

;CLEAR THE BYTE THAT IS SUPPOSED TO IND]CATE

8IT
BEQ

#10000,aSwR

TO DETERMINE

THE

MEMORY MANAGEMENT

IS AVAILABLE OR NOT, AND IF T IS AVAILABLE THEN WHE THER
THE MEMORY ABOVE 28K IS REQUIRED TO BE TESTED OR NOT.

COMES HERE

(PR TR

PROGRAM CONTROL

007144
007150
007152
007156
007162

037166
007172

WO
~NN

010000

000004
007210
000300
177572

MOV
MOV
MOV
CLR

172340

MOV

—

~N VO~ §l\\l o~
W=
~~
NNOOO—~N

MEMMNG:
MMREG:

001400
000276

007130
007134
007136
007142

=O0OO0OO0OLOO

8756
8757
8758
8759
8760
8761
8762
8763
8764
8765
8766
8767
8768
8769
8770
8771
8772
8773
8774
8775
8776
8777
8778
8779
8780

007074
007102
007104
007110
007114
007120
007124

S 23822288
a2
~n
VAN
- N
[V, 1,¥)

8753
8754
8755

007064
007070

8740
8741
8742
8743
8744
8745
8746
8747
8748
8749
8750
8751
8752

13:16

MACY11 30(1046)
(NKMA
27-DE(-82
UNKMAA 1N
27-DEC-B2 13:15

005021
062702
010221
020127
103772

012711
012701
21
0

000276

2%:

172356

oM27

007174
007200
007202
007206

005237

177572

012740
000207

000104

007210
007212
007216

022626
004767
047516

007224
007230

004767
000052

007232

000762

007234
007240

013702
000713

005010

INCB

000200

007600
172300
077406
172316

101773

171346

177366
045440

ADD
MOV
CMP

BLO
KOV
MOV
MOV

CMP
BLOS
INC
SRETMM: CLR
MOV
RETMM:
RTS
NOMM:

000124

176736

172354

CLR

UPMM:

RETMM
#4,RO
#NOMM, (RO) +

#300, (RO)
a#SRO
SAMMAVA

s THAT MEM. MANAG. IS AVAILABLE FOR TESTING
sHAS THE OPERATOR ASKED TO CHECK MEMORY MANAG.

¢IF NOT THEN RETURN FROM THE SUBROUTINE
sPREPARE

TO SETUP TIME OUT VECTOR

sRETURN ADDRESS TO NOMM

SAND WITH A PSW OF 300;VER:1
sTRY TO REACH MEM. MANAG. SRO

:é;réf IS AVAILABLE THEN SET MEM. MANAG. AVAILABLE

#172340,R1
(R1)+
#200,R2
R2,.(R1)+

sR1

#7600, (R1)

;PAR7 1S POINTING TO THE 1/0 PAGE

#77406,(R1)+

;SETUP PDRO-PDR?7

R1.0172356
2

#172300.R1

R1.#172316

S#SRO
(RO)

#BUSER,-(RO)
PC

IS POINTING TO FARO

:PARO WILL POINT TO BANK 0
:SETUP PAR1-PAR6

SENABLE MEM. MANAG.
csRESTORE TIME OUT TRAP VECTOR FOR ANY FUTURE TRAP

sRESTORE STACK POINTER

CMP
JSR
LASCIZ

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

JSR
52

PC,FATERR

;*ERROR* REPORT ERROR MESSAGE AND HALT AT FATHLT
;eveaesERROR NUMBER S52eveves

SRETMM

; RESTORE TIME OUT TRAP VECTOR

aN17235¢4,R2

;PREPARE

MOV

MMREG

:TYPE 'NO MEMORY MANAGEMENT MESSAGE

TO UPDATE MEMORY MANAG.

REGISTERS

MACY11 30(1046)
(NKMA
27-DEC-82
CNKMAA F1N
27-DEC-82 13:15

13:16

PAGE 64-17

18 BIT ADDRESS GENERATOR

8789
8790
8791
8792

;« 18 BIT ADDRESS GENERATOR

BF
B
LN BN B

001425
010146
042701
040113
052701
006001
103376

062701
011101
052701
006101
103376
006101
006143
006101
006123
050113
012601
000207

PUTADR:

000276

TST8
(aTaY
& =]

105737

177776

017777
004000

2s:

172340

010000

x0
or
<D

005063
010113

ODOED
TMM

007242
007246
007250
007256
007256
007260
007264
007266
007272
007274
007276
007302
007304
007310
007312
007314
007316
007320
007322
007324
007326
007330

4%:

8IS
ROR
8CC
ADD
MoV
8IS
ROL
8C(C
ROL
ROL
ROL
ROL

8IS

6%:

MOV
RTS

THIS SUBROUTINE

IS USED TO PLACE THE ADDRESS STORED IN R1

IN THE LOCATION POINTED BY R3. THE ADDRESS IN R1 1S CONVERTED

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

<2(R3)
R1, (R3)

ANMMAVA
6$
R1,~(SP)

;PLACZ THE ADDRESS STORED IN R1 IN LOCATION (R3)
$1S THE MEM, MANAG. AVAILABLE ?
“IF NOT THEN RETURN FROM THE SUBROUT INE
:SAVE R1

2s
#172340,R1
(R1),R1

:GET THE NUMBER OF PAR IN R}
*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 R1

;gns)

:PLACE BIT 17 IN LOCATION POINTED BY R3-2

(R3) +
R1, (R3)

;PLACE BIT 16 OF THE ADDRESS
*PLACE BITS 13-15 OF THE ADDRESS IN LOCATION (RZ)

*RETURN FROM THE SUBROUTINE

#P777.81
R1, (R3)
:4600 R1

g}oobo R1

(SP)¢+.R1

*CLEAR BITS 0~12 OF THE ADDRESS IN R1
TLEAVE BITS 0-12 OF THE ADDRESS IN (R3)
*PPEPARE TO SHIFT R1 BY 12 PLACES

*RESTORE R1

PN
TN
TN
PN
TR PR

2%:

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

POINT-

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

(LR

1(R1),~(R3)
=(R3)

;PLACE THE LOW ORDER BITS OF THE ADDRESS
sCLEAR THE LOCATION WHERE THE HIGH ORDER BITS

Move

=1(R1), (R3)

:PLACE BITS 16 & 17

1772777

BN BN BY 3N BE J

007340
007344

GETADR:

000001

LN B

007332
007336

;* GET ADDRESS FROH THE APT MAILBOX

8818
8819
8820
8821
8825
8826
8827
8828
8829
8830
8831
8832
8833
8834
8835
8836
8837
8838
8839
8840
8841
8342

8793

8794
8795
8796
8797
8798
8799
8800
8801
8802
8803
8804
8805
8806
8807
8808
8809
8810
8811
8812
8813
8814
8815
8816
8817

SEQ Q06U

RTS

:HAVE TO BE PLACED

:RETURN FROM THE SUBROUTINE

(NKMA
MACY11 30(1046)
27-DEC-82
(NKMAA.F11
27-DEC-82 13:15

J
5
13:16 PAGE 64-18
CONVERT 18 BIT ADDRESS TO THE FAR FORM

8847

8848

SEQ 0061

:* CONVERT 18 BIT ADDRESS TO THE PAR FORM

8850

fy TTTTTTTTTTTTTTTT
s mmaseasesees

gggg

8851
8852
8853
8856

e
te
‘e
bl

THIS SUBROUTINE IS USED TO CONVERT 18 BIT ADDRESS STORED IN
LOCATIONS POINTED BY R3 AND R3¢2 TO THE FORM IT WILL BE STORED
IN A PAR. THE RESULT IS LEFT IN R2. R1 IS LOADED WITH BITS

0-12 OF THE ADDRESS AND RO WITH 160000

8857

007346

005046

$GTSIZ: CLR

-(SP)

;PREPARE TO PLACE ADDRESS BITS 13-17 [N BITS

8860
8861

007350
007352

012301
011302

GETSIZ: MOV
MOV

(R3)+,R1
(R3) ,R2

:LOAD R2 WITH THE LOW ORDER BITS OF THE ADDRESS

8863

007360

052702

gggg

8862

007354

042702

8864

007366

006001

8866
8867
8868
8869
8870

007370
007372
007374
007376
007400

103375
005716
001004
005726
052702

8865

8871

007366

007404 000767

007406

012301

8874
gg;g

007414
007416

0460001
000207

007410

000040

006002

8872

8873

017777

012700

2s:
48:

81§

ROR

BCC
ST
BNE
TST
BIS

000100

160000

BIC

68:

B8R

MOV

8Ic
RTS

N7797.R2
040 R2

48
(SP)
6$
(SP)+
#100,R2

10-4 OF R2

*CLEAR ADDRESS BITS 0-12

;ROTATE R1 AND R2 7 TIMES
;1F RETURN PC IS ZERQ THEN IT MUST BE THE
SFLAG THAT WAS SET AT $GTSIZ
‘POP THE FLAG OFF STACK
*KEEP ROTATING

(R3)+,R1

:PLACE THE LOW ORDER ADDRESS BITS IN R1

ao R1

;LEAVE BITS 0-12 OF THE ADDRESS IN R1
*RETURN FROM THE SUBRORNE

#160000,RC

8877
8881
8882

;% SUBROUTINE TO DISABLE MEMORY MANAGEMENT

8885

gggg
8888
8889
8890
8891
gggg

007420
007424
007426
007432
007436

105737
001404
005037
105037
000207

000276
177572
000276

8894
8895

8898
8899

TSTB
8EQ
(LR
CLRB
RTS

@#MMAVA
18
aNSRO
@#MMAVA
PC

;WAS THE MEMORY MANAGEMENT ENABLED ?
*1F NOT THEN GO T0 1%
‘DISABLE THE MEMORY MANAGEMENT
TAND DO NOT ATTEMPT TO TEST MEM. MANAG.
*RETURN FROM THE SUBROUTINE

*RO=POINTER TO PAR UNDER TEST
*R3=VIRTUAL ADDRESS ON ENTRY

*RO+R3 ARE RESTORED ON EXIT.

333?
8902 007440 010046
8905

18:

UNIT

;* GET BANK NO. UNDER TEST
CALLED BY ERRTYP AND TST13 TO GET BANK NO. UNDER TEST INTO PBNK.
*REGISTERS

8896
8897

8903
8904

CLRMM:

THIS SUBROUTINE IS CALLED TO DISABLE THE MEMORY MANAGEMENT

)

007442
007444

007450

010346
042703

052703

GETBNK: MOV

017777

010000

MOV
BIC
8IS

RO,=($P)

R3’=(SP)
M i777.R3

#10000.R3

;SAVE RO

*SAVE R3
*SAVE ONLY VIRTUAL BANK BITS
;SETUP R3 SHIFT BIT

L NKMA

1
MACY

(NKMAA P11

8906
8907
8908
8909
8910
8911
8912
8913
8914
8915
8916

8917
8918
8919
8920
8921
8922
8923
8924
8925
8926
8927
8928
8929
8930
8931
8932
8933
8934

007454
007456
007460
007462
007466
007470

007472
007476
007500
007502

007504
007506
007512
007514
007516

27-DE(C-82
30(104 )
27-DEC~ 2 13:15

13:16

00024

001407
006303
062703
011300
006300
000300
110003
010337
012603
012600
000207

8955
8956
8957
8958
8959
8960
8961

SUBROUTINE TO DISABLE MEMORY MANAGEMENT
CLC
ROR
BCC
1578
8EQ

18:
000276

R3
1%
SAMMAVA
2%

172340

000312

sSHIFT A BANK BIT
SUNTIL IN BITS <2:0> OF R3
sMEMORY MANAGEMENT UNDER TEST?
¢NO EXIT

2%:

ADD
ggx

#172340,R3
583).R0

¢MAKE FULL PAR ADDRESS.
:GET PAR CONTENTS

SWAB
MovB

RO
RO,R3

:SRIFT BANK BITS TO BITS <7:0>
;SET R3 TO PHYSICAL BANK NO.

(SP)+,RO

sRESTORE RO

MoV
MoV
MoV
RTS

R3,3#PBNK
(SP)+,R3
PC

sSTORE PHYSICAL BANK NO.
;RESTORE R3
sRETURN TO CALLER

PARITY ENABLE/DISABLE ROUTINE

:
:
:

THIS ROUTINE ENABLES OR DISABLES PARITY MODULES AND PRINTS ASSOCIATED MEASSAGES.
IF PARITY AVAILABLE THEN BIT13 OF ‘REL'' IS SET AND '‘PAR'’ITY IS PRINTED.
ALSO THE BACKGROUND TEST PATTERN (LOC. BAKPAT) IS SET=376

sREGISTER USAGE.

;R0=
sR1=
;R2=
:
:
sR3=

POINTS TO BUS TIMEQUT TRAP VECTOR (LOC. 4)
HOLDS PARITY MODULE UNIBUS ADDRESS.
ON ENTRY HOLDS ENABLE/DISABLE CODE .
IF R2=0 THEN DISABLE
IF R2=1 THEN ENABLE
SCRATCH TO SETUP LOC. PARMAP WITH A MAP OF PARITY MODULES PRESENT.

sCALL IS
:

H
007520
007526

032777
001456

004000

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

012700
012710
060710
005037
012701

000004

170722

172140
100000

000352
000104

MOV

JSR

PARITY: BIT
BEQ
MoV

000116
000352

SEQ 0062

;GET PAR ADDRESS AND PHYSICAL BANK NO.
ASL
R3
JMAKE R3 PAR ADDRESS OFFSET.

8935
8936

8937
8938
8939
8940
8941
8942
8943
8944
8945
8946
8947
8948
8949
8950
8951
8952
8953
8954

PAGE 64-19

MOV
1$:
2%:
3s:

ADD
CLR
Mov
MoV
MOV
%Eg

ROR
BCC

#1,82

.ENABLE CODE

PC,PARITY

#6000,aSWR
6$

sPARITY TEST WANTED?
:BRANCH IF NO

#4 RO

;POINT RO TO BUS TIMEOUT ADDRESS.

PC, (RO)
a#PARMAP
#172140,R1
#100000,R3
R2,~(R1)
R3,a#PARMAP

:IN_THE CURRENT BANK.
sCLEAR PARITY MAP HOLDER.

R3
2%

;SETUP NEXT PARMAP BIT
sBRANCH IF NOT DONE ALL PARITY ADDRESSES.

s1S THIS A DISABLE CALL?

#5%-.-6, (RO)

MOV

#BUSER, (RO)

BEQ

IST

sSET _RETURN FROM TIMEOUT TRAP TO 5%

sSET R1 TO LAST PARITY MODULE ADDRESS+2
sSET R3 TO PARMAP AVAILABLE CODE BEGIN.
sENABLE A PARITY MODULE+TRAP IF NOT AVAILABLE.
sNO TRAP TO 5%, SO SET PARITY AVAILABLE.

sRESET BUS TIMEQUT TRAP VECTOR

;BRANCH IF YES (EXIT)

(NKMA
MACY11 30(1046)
(NKMAA F13i
27-DEC-82

8962
8963

8964

8965

8966
8947
(1)
(1)

8968
969
8970
8971
8972
8973
8974
8975
8976
8977
8978

007602
007606
007610
007614
007622

005737

27-DEC-82
13:15

000352

007624
007630

001011
004767
047516
000
007624
004767
000053

007632
007640

152737
012737

000040
000376

007646
007652

0046767
040520

176732
000122

007656

000405

176770
050040

13:16
PAGE 64-20
SUBROUTINE TO DISABLE MEMORY MANAGEMENT
1ST

SNPARMAP

sWERE ANY PARITY MODULES FOUND?

.EVEN
JSR

PC,FATERR

s *ERROR* REPORT

B1SB

#40,3#REL

sSET PARITY UNDER TEST FLAG

JSR

PC,TPCRLF

;SET BACKGROUND PA:TERN TO
sWORST CASE PARITY CODE.
;PRINT "'TST PARITY"'

EXITC

sAND EXIT VIA RTS PC

BNE
JSR
.ASCIZ

051101

176336

000405
000316

4s:

SEQ 0063

MOV

LASCIZ
.EVEN
BR

43
PC,TPCRLF
/NO PAR/

#376,3#BAKPAT
/PAR/

JBRANCH IF YES
;PRINT 'NO PAR'’

ERROR MESSAGE AND HALT AT FATHLT

seveawsERROR NUMBER 53t#enee

sGET HERE IF PARITY ADDRESS TIMED OUT TO LOC. 4

CNKMA
MACY11_30(1066)
27-CEC-B2
(NKMAA P11
27-DEr-82 13:15
8980

8981

007660

022626

8984

007664

142737

ggg%
8985
ggg?

007662
007672
007672

13:16 PAGE 65
SUBROUTINE TO DISABLE MEMORY MANAGEMENT
5¢:

000741

000040

000207

000405

6$:

EXITC:
78:

CMP

(SP)+,(SP)+

JRESET STACK FROM TRAP

BI(8

#40,3#REL

;CLEAR PARITY TESTING FLAG

RTS

SRETURN TO CALLER

8988
8989
8990
8991

s CHECKC

ggg?

SFINALLY IT HALTS AT FATHLT.

8992
8993
8994
8995

007674

105037

9000

007704

100372

9002

007712

042702

007722

001363

007730
007734

004767
041536
007740

9001

9003
9004

9005

9006
9007
9008

3898
9017
9018
9019
9020
9021

9022

9023

¢KEEP TRYING PARITY ADDRESES.

:
THIS ROUTINE CHECKS IF CONTROL~C WAS TYPED AT THE END OF EACH
sTEST OR IN THE ERROR TYPE ROUTINE.
s1F CONTROL=-C YYPED THE PROGRAM IS RETURNED TO LOWER MEMORY IF IT WAS
JRELOCATED AND THE ERROR HISTORY IS PRINTED OUT.

8998

8999

SEQ 0064

007700

007706

007716
007724

105737
113702

122702

000315

177560
177562

000200
000003

110237

000315

007740

000167

175132

007744

007744
000000

000001

176650
000

CHECKC: CLRB
TST8

8PL

MOov8

aNSAvVKBB

sINIT CONTROL=C FLAG.

EXITC

sBR _IF NO-EXIT VIA RTS PC-

+ANY CHAR. TYPED?

IN#$KBB R2

sGET THE CHAR TYPED.

BIC

#200,RS ;CLEAR THE PARITY BIT.

BNE

EXITC

CMPB

mMove

JSR
LASCIZ
.EVEN

JMP
.=0744
ENDPRG: 0

.END

#3 RS

sI1S IT CONTROL~-C?

R2,3#SAVKBB

;ELSE STORE THE CHAR. FOR USE AS A FLAG.

PC,TPCRLF
/2C/

RELOER

sBRANCH IF NO -EXIT VIA RTS P(CsPRINT

'*C

;GO RETURN PROGRAM TO LOWER CORE IF RELOCATED.
sTHIS 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
sAFTER THE ERROR STACK.

;FOR 4K MEMORY SIZE THEN PROGRAM=7744+22=7776

CNKMA
MACY11_30(1046)
27-DEC-82
CNKMAA P11
27-DEC-82 13:15

000000
000000
000000
A(PUOP= 000000
ACTIM
005552
ADOWO
000000
ADDW1
000000
ADDW1
000000
ADDW
000000
ADDW1
000500
ADDW1
000000
ADDW1
000000
ABASE

Hun

AT
T
Y I T IO T A
Y
T
O
L
T

ADEVCT
ADEVM
AENV
AENVM

ADOW
ADDW?2
ADDW3
ADDW4
ADDWS
ADDW6
ADDW?7
ADDWS
ADDW9

VISR
= O

ACDW!
*(DW2

000000

000000
000000
000000

000000
90000

000000
000000
000000
000000
000000
000000
0000900
000000
000000
000000
000000
000000
000000
000000

000000
000000
000000
000000
000000
000000
000000
000000
000000
= 000000
000000
006230
000724
000000

000000
000000
000000
000000
000000

6961
€961
6%¢€1
6961
8373
6961
6961
6961
6961
6961
6961
6961
6961
6961
6961
6961
6961
6961
6961
6961
6961
6961
6961
6961
6961
6961
6961
6961
6961
6961

13:16

PAGE 66

CROSS REFERENCE TABLE == USER SYMBOLS

5EQ@ 0005

83794

85204
70354

6920

7812

6941

7206
7823

7101

8773

8959

000316

69174

6991+

000500
001012
000104

7808

69714

7410
7826

8219

7412
7861+

8230

7420
7954

8236

74629+

8017+

7489

8018

7520+

8200+

7686+

8970+

7719

7752+

MACY11 30(10<6)
27-DE(-&C
(NKMAA P11
27-DEC-82 13:15
(NKMA

(HECKC
CKDONE
CLRMEM
CLRMM
CNTSCP
CONT
CONTMM
CTLC
DECWRD
ENDPAS
ENDPRG
ENDSTK

ENDO
END1
END10

004030
004354
002374
002642
002752
003120
003254
003500

END12

FND2
END3
END4
ENDS
END6
ENC?

005630

ERROR

005746
007672
006602
0056432
006166
006236
007010
006114
003526

ERRTYP
EXITC
EXTYP
FAILNM
FATERR
FATHLT
FATYP
FNDERR

GALLOP
GETADR
GE TBNK
GETSIZ

LOOP
LOWADD

MAXADR
MAXMEM
MEMMNG
MEMIST
MMAVA

MMREG
N

NOMM
NOTYP

7266

8205

7200#
7136
7265
7217#

8202
8370
69034
8247
6850
69004
7358#
73964
7866

80204
76324
75234
75584
76364
76884
77604
7317
7984

8495
8228
8270

7158
7268#
7279

82494
8399#
6904
8311

69879

0901

7396
7432
78744

SEQ 006é

89984
8238#

8390

88884

8338+

8377+

8440

9018#

8319

8662

8393

8126

7523
7558
7636
7688
7760
7874

7485

8125

BL47n
8975
8624

7582
8414

7587
8566

7612

7666

85094

8574

8780

8967

7736

7813

7827

7834

73764
76584

74094
76664

9004
7191

7345

007332

HIGHAD
HIGHTW

L OWBNK
LOWER
LOWTWO

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

B 6
13:16
PAGE 66-1
CROSS REFERENCE TABLE =-- USER SYMBOLS

007440
007350
000332
000330
001610
000326
000304
005150
000324
000200

005262
000340
007064
001532
000276
007070
000054

007210
006470

88604

717

7750

8250

74494
77364

85664
87764
8643

7337

7517

8216

8232

8201
8784

8246

8750+

8758+

8802

8888

8891«

8909

71914
76964
78274

72944
75324
78340

73064
75464
7909#

7308#
75774
79474

73144
75824

73454
15874

7370#
76124

71694
74817
78134

87804

8967#

79844

79904

8053#

81154

8125~

MACYT? 30(1046)
(NKMA
27-DEC-82
P11
CNKM.AA
27~DEC~82 13:15
oCcTTYP
ocTX?Y
ONEPAS

PARERR
PARFL
PARITY
PARMAP
PARPS
PARSP
PASFLG

PBNK
PCRLF
PNTMES
PUTADR
PWRDN
PWRUP
REL
=
RELBOT
RELOC
RELOER
RESTRT
RE TMM
RETSTK
RETTYP
RLODER
RPTOCT

006744
007062
000556
006244
005670
007520
000352
000360
000356
000306

000312
006572
006612
007242
000070

000144
000405
000322
005004
005076
000250
007206

005374
006530
005576
007000
RPTI0
003522
RPTI
004070
RPT6
003140
SAVKBB
000315
SAVLDR
001314
SAVLOC
000354
SAVMAX
000342
SAVRO
006414
SAVR1
006416
SAVRG
000344
SAVRS
000346
000350
SAVRG
SCOPE = 000240
SEQERR
006166
001220
SETSTK
000656
SETSWR
001024
SLFSIZ
= 177572
SRO
000200
START
STRTD]
000302
SWAPAT
000320
001712
SWHALT
000450
SWR
SWREG

Wil
8L

000176
= 004000
001626

7106

8699
6983
6979
8331
7205
69424
69454
69440

68954
7743

8152
69024
7105

c
6
13:16 PAGE 66-2
CROSS REFERENCE TABLE == USER SYMBOLS

7110

8702
69864
85394
83504
8368
8545
8540+
8539+
6899
7748
8162+

SEQ

87034
87354

89454
8951+
8569
8570
7217+
7951+

8955+

8962

7554+
7975
8189+

7614«
7995

7631+
8001+

8002

8429

7661+

8173«
8919+
8638
8180
8477

8659
8213
88004

8700
8584

8591

86424

7182

8078

8206

8208+

8227

68504

8388

8523

9009

6845

7670
8010+

8011

7672+

7685+
8098

8234+

8969+

8984+

7703

7791

8105

7704+

7727
8118

8134

7741

7909

7947

8053

85104

8349
8399
8734
7917
7913

79164

8998+

9005+

69414

7157%

8226
6974+

8235+
7321

8237+

8541

7409

7449

7532

7577

7658

8771+

8890+

7715+
7833

7860+

8369
71364
85784
8579#

7742

8372

7017+

7022+
8461

7053
8490

7167

8642

7209
8698

7276

7331

7912

7916

8176

7231

7232

7233

7234

7235

7237

7238

7239

7240

7261

8945

NNAv

{NKMA
MACY11 30(1046)
27-DEC-82
(NKMAA F11
27-DEC-~82 13:15
IKS
=
TPADER
TPCRLF
TPPRER
TRYSR
TSTIGO

177560
006420
006604
006444
001014
001714

69124
8333
6846
8350
7039
7273

TSTREL

001372

6984

TSTMM

TSTRP
TSTSCP
TSTSIZ
1ST0

15T
TST10
TST11
TST12
TST13
TST2
7ST3

TST4
1575
1ST6
1817
TYPCNT

005156

000570
001660
001376
001730

002166
003502
004032
004104
004356
002266
002376
002644
002754
003122
003256

D
¢
13:16 PAGE 66-3
CROSS REFERENCE TABLE -~ USER SYMBOLS

8999
8470
8374
8466
70534
72764

7170

BoLun

6987
72644
71584
7230

69894
7358

85824
8510
85894

7231
7238
7239
7240
7241
7232
7233
7234
7235
7236
7237

73664
77884
79064
79454

80514
74064
76474

8337

86594

8345+«

8475+«

8515+

8706+

8447«

B463+

8582

8589

61194
61814
624BH
63134

61254
61864
62514
63184

68794
8374
8479
71074
8701
7051
83174

6882

87074
7054
8323

71014

WRTMEM

000120

6799

7451

7578

= 000001

8249

60934
61654
62208
62914

87834

61094
61734
62354
63034

61144
61774
6244N
63094

7740+

7856+

68874
68674
8248
69614
09614
8380

7271+
83884

$ENV
SENVM

000420
000421

69614
69614

7020
7038

$EOP
S$ETABL
SETEND
SFATAL
$GTSIZ
$HD
=
$HIBTS
SHIMAX
$kBB =

005476
000420
000450
000402
007346
000002
000276
000334
177562

6766

8312
69614
6867
69614
7112
6678
68674
69314
69:34

7659

61064
61694
62314
62964

000301
000276
005176
000426
000410
005572

000164

9006

61384
61944
62614

61444
61984
6265#

86984

$ADEKR
$APTHD
SCNTMM
$CPUOP
$DEVCT
$DOAGN

SENDAD

8733«

8972

7521

75304
75744
76544
77004
6977«

000277
005526
006722
001206
006754
001164
005354

007234

8964

3019

TYPENB
TYPEOP
TYPERR
TYPMEM
TYPOCT
TYPSIZ
TYPSTK

UPMM

8777

72924

69054

006634

8646

71574

000314

TYPDEC

86384

SEQ 0068

6890
6874
82504

7310

68234

8386

7424+

7482+

83674

8484
8626

8520

8320

7264
7329

69614
BL14v
88574

B4L23+

8431

8514+

7036+
9001

7544+

8517

61314
61904
62574
63234
8451

8468

61494
62024
62694

61534
6204#
62774

61574
62124
62814

61614
62164
62854

CNKMA
MACY11 30(1046)
%7;2EC°82
CNKMAA P11
27-DEC-82 1
$MADRY
S$MADR?

000432
000436

000442
000446

69614
6961#

SMAMS1
SMAMS?
SMANS3

000430
000434
000440

69614
€9614
69614

SMAXM

000336

SMANSS

SMBADR
SMSGAD
$MSGLG
$MSGTY
SMTYP1
SMTYP2
SMTYP3
SMTYP4

SNWTST=
$PASS
SPASTM
SPRERR
SRETMM

000400

000444

000300
000414
000416
000400
000431
000435
000441
000445

$SWR

6840

69614

69324

68674
69614
69614
6778+
69614
69614
69614
69614

6867

69614

7037«

7120

69614
7045

B84B6+

7041
T366K
6986

6994

7007

74064
8371«

7447
8377

75304

75744

76544

000001
000406
000304
000300
007200

72924
69614
68674
6883»
87724

6886
8781

6976+

B448B

8464

8481¢

8565+

= 000000

ggg?l

67584

7292

7366

7406

7447

$SVPC = 000044

SSWREG

000422

STESTN

67664

69614

7022

6844

6870

69614

7218+

7268

gg;?:

6678

72920

7366

7L06X

177566
006546
006640
007012
177564
005344
000302
006504
000412
000306

69154
8617
8184
8715
69144
8243
68674
7107
6838
68674

8630+
86264
8339
87204
8628
83134

$27
$$SM

= 007744
= 000200

90124
81414

. Sx

000276

$TN

000404
= 000014

$TPB =
$STPCHR
S$TPDEC
$TPNUM
$TPS =
$TPSIK
$75TM
STYPE
SUNIT
SUNITM

SUSWR
000424
$7
= 000362

= 007746

SEQ 0069

69614
69614

SMADR3
SMADRG

[SMAIL

E
6
13:16 PAGE 66-4
CROSS REFERENCE TABLE -~ USER SYMBOLS

7788

69614
69514

67464
68824
7293
8168

68674

7838

86124
69614

7846

7871

7292

7906

7945

T44TH

8725
8378

86614

8633

8639

8674

8716

67634
68904
7369
86354

6766K
68924
76408
8949

67688
6894k
7448
8966#

677384
68994
7531
9008¢

77004

77884

79064

79454

80514

7530

7574

7654

7700

7788

7906

7945

7366

7406

7447

7530

7574

7654

7700

7530

7574k

76544

77004

77884

79064

79454

67764
69014
7576
9012

67824
6904¥
7657
90174

6BOBM
6951
7702

68294
69604
7790

68674
69704
7908

68744
6979
7946

(B78#
7226
8052

8051

6952
9013

6750
68864
7342
8440

6712#
2153
2145#

SETPRI
SETUP
SKIP
SLASH
STARS

1279«
1337#
17334
1517#

REPORT

SWRSU

TYPBIN
TYPDEC
TYPNAM

TYPNUM
TYPOCS
TYPOCT
TYPIXT

S$ERRNM

14854
7530
1453

2025#
19784
19414
18944

67194

JINDT
LSETUP
.SwWRH]
LSACTY
.SAPTB
.SAPTH
SAPTY
.SASTA
.SCAT(

S6S55#
1213«
1044
S064#4
S109#
S370#
5547#
54174
932¢

LSCMTA
.$DB2D
.$0820
.801v
.SEOP

7530

7560#

7574

7638%

7654

7685#

7530
7496

7574

7654

7700

7788

7906

7945

8051

6867

6922

6929
8051

6961

6963

6967

7292

7366

7406

7447

7582

7587

7612

7736

7813

7827

7834

7984

7990

8115

6119
6190
6265

6125
6194
6269
7345

6131
6198
6277
8574

6144
6204

6149
6212
6291

6153
6216
6296

6157
6220
6303

6161
6231

6165
6235
6313

6169
6244
6318

7703

7791

7909

7947

8053

7647

7530

7654

7700

7788

7906

7945

73614

7366
7878«

7906

73984

7406
7923#

746364
7945

66764

7292
7308

7366
7314

7406
74672

7447
7481

66764
7574

6766

6833

6836

76426

7546

6114

7306

7447

6285

75244

O CD
—
=Y.
Y o

8051

N
—b =

VIO
~N =0

8021#

7788

61464
6204

7654

7700

7788

7906

7945

2088#
20584
18264

SFTERR
$SQERR
SSESCA
SONEWT
$8SK [P
.EQUAT
.HEADE

€169
0244
6318

6138
6202
6281

S4L63#

8125
61024
6173
6248
6727#
67354
17'1#
16624
172464
1894

SFATAL

[o Yo o]
Ry
—
-t WO

PLCERR
POP
PUSH

oo
WA
—
[&1V
1. )
O
b b

LLB4a
16264

6153
6216
6296

6125
6194
6269

77614

7292

SEQ 007(

oOoON
WY
—
(=1, V1V, ]
WO~

mULT
NEWTST

72804
7700

6251

oo
NN
—
O
— &
O

MSG

6248
1698%#
1312«
1771#

610
617

oo
M~
—
~NOW
~ 0o —

ESCAPE
GETPR]I
GETSWR

15664
1578«
6095¢
6173

M)
b =t

COMMEN
ENDCOM
ERRLST

13:16 PAGE 67
CROSS REFERENCE TABLE ==~ MACRO NAMES

27-DEC-82
13:15

MACY11_30(1046)
CNKMA
F1
INKMAA
27~DEC-82

614

10674
46864
4812«
45872
2214

7376

8143

6106
6177
6251
7002
7294

8566
6109
6181
6257
7048
7370

66764

7292

66764

6678

66764
66764

6766
6961
6867

66764

6186
6261
7169
7409

7366

7191
7449

7406

7532

7577

6285
8967

6309

8051

CNKMA

MACY1Y

.SERRD
.SERRT
SMULT
.SPOWE

2700#
28964
(523
4229

FNKMAA F1Y

.SRAND
.SRDDE
.SRDOC
.SREAD
.SR2A?
.$SAVE
.$5820
.$5820
.$SCOP

.$SI12¢E
.SSUPR
.STRAP

.$TYPB
L$TYPD
.SIYPE
LSTYPO

.$340CA
.

ABS.

30(1046)

27-DE(-B2

27-DEC~-82 13:15

13:16

PAGE 67-1

CROSS REFERENCE

4307#
31891#
37974
3395«
4958«
39694
W77
L8740
24654n

‘361
49134
L0723

3287«
3209#
2985#
3112#

9724

007746

ERRORS DETECTED:

000

CNKMAA, CNKMAA/CRF /NL : TOC=CNMAC2. SML , CNKMAA . P11

RUN=TIME: 10 12 1_SECONDS
RUN-TIME RATIO: 87/24=3.5

CORE USED:

35k

(70 PAGES)

TABLE

== MACRO NAMES

SEQ 0071