Digital PDFs

AC-9045F-MC

February 1978

144 pages

Original

12MB

Document:	CZQMCFO 0-124K MEM EXER 16K
Order Number:	AC-9045F-MC
Revision:	0
Pages:	144
Original Filename:

OCR Text

IDENTIFICATION
...............
PRODUCT CODE:

AC-9045F-MC

PRODUCT NAME:

CZQMCFO 0-124K MElli EXER 16K

PRODUCT DATE:
MAINTAINER:

DIAGNOSTIC ENGINEERING

The Info~mation in this document is subject to change without notice
and Should not be const~ued as a commitment by Digital Eq~ipment
Co~po~atlon.
Digital Equipment Corporation assumes no responsibility
fo" any e~ro~s that may appe ... · in this document.
No responsi~ility Is assumed for the use or reliability of software on
equipment that is not supplied by Digital or Its affiliated companies.
Copyright (c) 1975, 1978 by Digital Equipment Corpordtion
The fOllowing are trademarks of Digital Equipment Co~poratlon:
DIGTAL

PDP

UNIBUS

DEC

DECUS

DECTAPE

MASS£!JS

~ZQMCFO

Page 2

0-124K MEM EXER 16K
REVISION HISTORY

Revision A:

May 1975

Revision B:

October 1975

Revision C:

October 1976

Revision 0:

.June 1977

Revision E:

December 1977

Revision F:

February 1978

Paoe 3

CZQMCFO 0-124K MEM EXER 16K
TABLE OF CONTENTS
1.0
1.1
1.2
1.3
1.4
1.5

'-,:NERAL PROGRAM INFORMATION.

2.0
2.1
2.2
2.3
2.4

OPERATING INSTRUCTIONS
Loading and Sta~ting Procedure
Special Environments
Program Options
Execution Times

3.0
3.1
3.2

ERROR INFORMATION
Error Reporting
Er~or Halts

P~og~am Pu~pose

(Abst~act)

System Requi~ements
Related Documents and Standards
Diagnostic Hierarchy PrerequiF'tes
Assumptions

4.0

PERFORMANCE AND PROGRESS REPORTS

5.0
5.1
5.2
5.3

DEVICE INFORMATION TABLES
CORE PARITY REGISTER
MOS PARITY REGIS,ER
MSII-K CSR

6.0
6.1
6.2
6.3
6.4
6.5

SUB-TEST SUMMARIES
Section 1: Add~ess Tests
Section 2: worst Case Noise Tests
Section 3: Instruc:ion Execution Tests
Section 4: MOS Tests
Special Toggle in Tests

7.0

PROGRAM FUNCTIONAL FLOW CHARTS

8.0

PROGRAM LISTING

CZQMCFO 0-124K MEM EXER 16K
1.0
1.1

Page 4

GENERAL PROGRAM INFORMATION.
Program Purpose (Abstract)
ThiS program has the ability to test memory
000000 to address 757777.
It does so usingr
A.
B.
C.

from

address

Unique addressing techniques
Worse case noise Patterns, and
Instruction execution thruout memory.

There is also a special
routine to type out all
unibus
address ranges which do not timeout, as well as two(2) toggle
in address tests pre 'ided in section 6.1 of this document.
The intent of this program is to test as comprehensively as
possible all memcry systems manufactured by DEC without
concentrating on anyone system. Although the tests relate
to general designs they may be complete fc·· certain systems.
E.G. Any core memory from the BK MM11-L on up need not have
any other addressing or worst case patterns run but in order
to completely test the MSll-K MOS memory another diagnostic
is required.
This test
is also not intended to be ~ 100%
test of the me~ory. Other tests that do I/O may find memory
problems that this test is unable to.

1.2

System Requirements
A.

H'ardware Requirements
PDPll family processor with a minimum of 16K
optional ..•
Any parity memory control mOdule.
KT11 memory management.

memory.

Software ReqUirements
The smallest unit of memory this program will recognize
is 4K.
If any address In a 4K bank causes a time out
trap, that entire bank of memory is ignored by the
program
The program is designed to exercise the vector portion of
memory (locations 0-776)
;n exactly the same manner as
the rest of memory.
To make thi'. possible, without
requiring memory management, no software traps are used
in the program.
rhis means that if memory management is
not available or is disabled (~~12.1), if the program is
relocated out of bank 0, if location 0-776 are selected
for test. and if an une~pected hardware trap occurs, the
results will be unpredictable.

CZQMCFO 0-124K M5Y EXER 16K

Page 5

The program has the proper
interface code to allow
runn,ng under the automated manufacturing test line
system - ACTII and APT.
1.3

Related Documents and Star1ards
A.

B.
C.
D.
1.4

Pr~gramming Practices - Document No.
175-003-009-01
PDP-I I MAINDEC SYSMAC Package - MAINDEC-ll-DZQAC-C2-D
The appl icable Memory System Maintenance Manual
The applicable Circuit ~chematics

Diagnostic Hierarchy Prerequisites
Before running this program, a CPU diagnostic should be run
to verify the functional ity of the processor and PDP-II
instruction set.
If memory management is to be used, then the KT11
snoulj also be run before this program.
P~P-ll/20 PDP-l1/34 PDo-l1/~J DR
PDP-l1/45 PDP-l1/60 KTll-C
KT11-D
-

1.5

Assumpti

diagnostic

MAINDEC-l1-DZQKC
MAINDEC-l1-DFKTH
MAINDEC-II-DBQEA
MAINDEC-II-DCQKC
MAINDEC-II-DCQKC
MAINDEC-II-DQKDA
MAINDEC-Il-DCKTA THRU DChiF
MAINDEC-II-DBKTA THRU DBKTF

This program assumes the correct operation of the CPU and, if
USed,

the memory management option.

2.0

OPERATING INSTRUCTIONS

2.1

Loading and Starting Procedures

2.1.1

Load the program using any standard absolute loader.

2. I .2

5tarti~g

2.1.3

Starting address 204:

address 200:

Normal program execution.

Al lowS the operator to input, via teletype conversation,
flrst and last addresses to re exercised, ar,~ a data pattern
to be used in tests 6 and 7.
:2 .1.4

Starting Address 210:
Restart program using previously selected parameters.

CZQMCFO 0-124K MEM EXER 16K
2.1.5

Page 6

Starting Address 214:
Restore
loaders and halt.
This routine is capable of
relocating the program back to banks 0 and 1 if the program
was halted whi Ie running the top two banks of memory.
There
are special procedures required for this situation.
A.

If memory addresses 0-1000 have r't been exercised,
either through parameter selection (SA=204) or by running
with SW05=I, then,
Load Address 214,
Press START.

If running without memory management, then:
Load Address <214+relocation factor>
(Relocation factor
is typed when the
relocated) ,
Press START.

program

If running with mem~'y management and the unibus has not
been
initialized (via reset instruction, start·switch,
etc.), then:
Load Address 777707 (PC)
Deposit 214
Press CONTinue

If running with memory management and thr unibus has been
in it i a I i zed:
Load Address
Deposit
( Example:
Load Addre~s
Deposit
Load Address
Deposit
Press

2.1.6

772340
(KI PARO)
«relocation factor)/100>
Relocation factor=540000, then
deposit 005400)
777572 (SRO)
000001
777707 (PC)
214
Continue

Starting address 220:
Byte address memory ma~
typeout routine.
This I'out i ne
performs DATI,
DATIP,
DATO, and DATOB on all possible
addresses, and types the ranges of addresse.s which do not
cause a timeout trap.

2.2

Special Environments
If the program is run in quick verify mode under
APTll
the program is done after the first pass.

ACTll
or
Also, the

CZQMCFO 0-124K MEM EXER 16K

Page 7

program does not relocate to test the lower 8K of memory.
2.3

Program Options
SW15

OR UP •••.

HALT ON ERROR

SW14

OR UP .•..

LOOP ON TEST

SW13

OR UP .•••

INHIBIT ERROR TYPEOUT

OR UP ••.•

INH.8IT MEMORY MANAGEMENT (INITIAL
START ONLY)

SW12

SW11

= 1 OR UP ••••

INHIBIT SUBTEST ITERATION

SW10 =

OR UP .•••

RING BELL ON ERROR

SW9

OR UP •.••

LOOP ON ERROR

SW8

= 1 OR UP ••.•

LOOP ON TEST IN SWR<4:0>

SW7

: 1 OR UP ..••

INHIBIT PROGRAM ~ELOCATION

SW6

OR UP ••••

INHIBIT PARITY ERROR DETECTION

NOTE: With parity error detection enabled. a memory failure
whi le running the worse case noise tests (non-parity)
can cause a parity error.
The error printout on a
parity error does not type the good data. ThuS a bit
drop or pickup will not be typed as such. It is best
to run the program for 1 pass with parity disabled,
then, restart thr program with parit~ enabled.
SW5

2.4

= 1 OR UP ••••

INHIBIT EXERCISING VECTOR AREA
(LOCATIONS 0-1000).

EXECUTION TIMES
Execution time is dependent on type of memory, and amount
memory. Worse case run times with 900ns memorys are:
a.

For Non-Parity Memory
First P~ss:
65 seconds
seconds for each additional 16k.

for

first

13k

Full Pass:
3 minutes 40 seconds for first 16k +
3 minutes for eaCh additional 16k.
Iteration Inhibited: same as first pass
b.

For Parity Memory
First Pass:

1 minute 40 seconds per 16k.

•

CZQMCFO 0-124K MEM EXER 16K
Full Pass:

Page 8
8 minutes pe~ 16K

Iteration Inhibited: same as first pass
3.0

ERROR INFORMATION

3.1

Error Reporting
There are a total of 31(8) 'ypes of error reports generated
by the program. Some"
the key column hC·l:.Jing mnemonics are
described below for clarity:
PC =

Program
Counter
(V/PC=P/PC)

V/PC

Virtual Program Counter. This i·; where the error
detection code can be found in the program listing.

PI PC =

Physical Program Counter. This is whe~e the
detection code is actually located in memory.

e~ror

detection

code.

error

TRP/PC = Ph~$ical Program Counter of the code whiCh caused
trap.

3.2

MA =

Memory Address

REG =

Parity REGister address.

PS =

Processor Status word.

IUT

Instruction Under Test.

SIB

What contents Should Be.

WAS

What conteflts WAS.

Error Halts
With the 'HALT ON ~RROR' switch (SWI5) not
several programmed 'HALTS' in the program:

set

there

are

In the error trap service routine for unexpected traps to
vector 4. This one will occur if a 2nd trap to 4 occurs
before the error report for the first has had a chance to
be pI' i nted out.

In the relocation rout:ne if the prvgram is being
relocated back to the first 8K of memory and the program
code was not able to be transferred properly.

In the case of error reporting and there is
to allow the information transfer.

terminal

CZQMCFO 0-124K MEM EXER 16K

4.0

Page 9

In the power fail routine if the power up sequence was
started before the power down sequence had a chance to
comp I ete itse If.

In the Memory mapping routine or any of the address
control routines, failures to find a meaningful map.

PERFORMANCE AND PROGRESS REPORTS
Not appl'cable

5.0

DEVICE INFORMATION TABLES
The following is a picture view of a parity control status
registers,
which will show bit aSSignments and definitions,
to provide a handy reference:

5.1

CORE PARITY REGISTER
I

!PEI
I

ADDRESS
I

twP!

!AEt

15 14 13 12 11 10 09 08 07 06 05 04 03 02 O. 00
Bit assignments are defined as follows:

5.2

BIT15

PARITY ERROR

BITS 11-5

ERROR :")DRESS

HIGH
ORDER
ADDRESS
BITS
OF ADDRESS OF
PARITY
ERROR
(BITS
17-11 OF ADDRESS)

BlT02

WRITE WRONG PARITY

NORf.:.\L PARITY
(ODD)
WHEN
CLEAR;
OTHER
PARITY (EVEN) WHEN SET

BITOO

ACTION ENABLE

NO ACTION
TRAP
TO
WHEN SET

WHEN CLEAR
VECTOR 114

MOS PARITY REGISTER
I

!PEI
I

!WP'
I I

tAEt
I I

15 14 13 12 11 10 09 as 07 06 05 04 03 02 01 00

CZQMCFO 0-124K MEM EXER 16K

Page

BIT ASSIGNMENTS ARE DEFINED AS FOLLOWS:

5.3

BIT15

PARITY ERROR

BIT02

WRITE WRONG PARITY

NORMAL PARITY
(ODD)
WHEN' CLEAR;
OTHER
PARITY (EVE~) WHEN SET

BITOO

ACTION ENABLE

NO ACTION
TRAP
TO
WHEN SET

WHEN CLEAR
VECTOR 114

MS11-K CSR
I
! DE!
I
I

15 14 13

ADDRESS
I I I

! 51 I
I
I
12 11

I I I I I I
!SE!IPIDC!EC!EEI
I I I 1 I I

10 09 DB 07 06 05 04 03 02 01 00

BIT ASSIGNMENTS ARE DEFINED AS FOLLOWS:
BIT1S

DOUBLE ERROR

BIT 13

SET INHIBIT ~uOE

WHEN THIS BIT IS SET
TO A I, IT ENABLES THE
INH MODE POINTER TO
INHIBIT
EITHER
THE
FIRST OR SECO~D 16K
FRr~
EVER GOING INTO
TH@ DIAG.
CHECK OR
ECC DISABLE MODE.

BITS 11-5

ERROR ADDRESS

WHE~
BIT02
CLEARED
CONTAINS
HIGH ORDER
BITS OF ADDRESS
OF
PARITY
ERROR(BITS
17-11); . WHEN
BIT02
SET
CONTAINS
CHECK
BITS FOR ECC.

BIT04

SINGLE ERROR

SET WHENEvn
ERROR OCCURS

BIT03

INHIBIT MODE POINTEk

THE

SINGLE

INHIBIT
MODE
WORKS
IN
CONJUNCTION WITH THE
SET INHIBIT MODE BIT.
WHEN BIT 13 IS SET TO
A I, A 16K PORTION OF
MEMORY IS INHIBITTED
FROM OPERATING IN iHE
ECC DISABLE MODE OR
P~!NTER

CZQMCFO 0-124K MEM EXER 16K

Page 11
DIAGNOSTIC CHECK MODE.
THE
INHIBIT
MODE
POINTER
INDICATES
WHICH 16K IS
BEING
INHIBITED",BIT 3 =1
THE SECOND
16K
OF
MEMORV IS INHIBITTED.
WHEN BIT 13 IS SET TO
A 0, BIT 3 BECOMES
INOPERATIVE.

BIT02

DIAGNOSTIC CHECK A

WHEN
SET
ENABLES
READ-WRITE
OF CHECK
BITC(SEE BITS 11-5)

BITO'

DISABLE ERROR CORRECTION

WHEN

SET

CC~RECTION

BITOO

DOUBLE ERROR ENABLE

6.0

SUB-TEST SUMMARIES

6.1

Section 1:

Add~ess

NO
ERROR
TAKES PLACE

WHEN SET ENABLES TRAP
TO
VECTOR
114
ON
DOUBLE ERROR.

Tests.

Tnese tests verify the uniqueness of

eve~y

memory add~ess.

TEST 1

Writes and reads the value of each memory Word
into that Memory location. After all memo~y has bpen
written, all locations are checked again.
Add~ess

TEST 2 Writes the byte value of each add~ess into that
location and checks it.

byte

TEST 3 W~ites the complement of each word add~ess into
location and Checks it.

that

TEST 4 Writes the 4K bank number into each byte Of that bank
and checks it.
TEST 5 Writes the complement of the bank
byte of that bank and cheeks it.
6.2

Section 2:

number

into

each

Worst Case Noise Tests.

These are intended to apply maximum
types of PDF-II core memories.

stress

the

various

TEST 6 and TEST 7 Are suppl ied to allow the operator to
select a Single word data pattern (SA=204) and SCOPE on

CZQMCFO 0-124K MEM EXER 16K

Page 12

either the writing (DATD) in TEST 6 or the reading (DATI)
reST 7 of that data.

TEST 10 WI" :es and then checks a series of s;:'lgle
patterns whiCh are designed to stress parity memory.

word

TEST 11
IIRipples li

TEST 12
"Ripples u

Writes all memory w;th ,'s in
a "011 through it.

every

bi t

and

then

Writes all memory with O's in
a 111111 through it.

every

bit

and

then

TEST 13,14,15, AND 16 Write a pattern which complements when
address SIT 3 XDR BIT 9 complements.
TEST 17 Writes wrong parity in eaCh byte of memory and
checks that the parity detection logic works. This test is
skipped for non-parity memory.
TeST 20 Write
checks it.
6.3

Section 3:

"random"

Instruction

program

code

Exe~ution

Tests.

through

memory

and

This group of tests place instructions in the memory under
test, then executes the instructions, and finally, Checks
that they executed correctly.
TEST 21 Executes an instruction which does L DATI and II DATO
on the memory under test.
TEST 22 Executes an instruction which does
DATOS on the low by~ ~ of memory under test.

DATI

and

TEST 23 Executes an instruction which
DATOS on the high byte.

DATI

and

TEST 24
DATC.

6.4

does

Executes an instruction which doe ..

DATIP

and

TEST 25 Executes an instruction wllieh does
DATOS on the low byte.

DATIP

and

TEST 26 EXECUTES AN INSTR~CTION WHICH DOES
DATOS on tile high byte.

A DATIP

and

Section 4:

Mos Tests

TEST 27 -Writes a pattern of 000377 through memory, then
compliments it addre~sing downward, co~~iiments the new
pattern addressing upward, compliments the third pattern
addressing
upward and finally compliments this new AS
patterns addressing downward.

CZOMCFO 0-124K MEM EXER 16K

Page 13

TEST 30-31 Write a chec~erboard through memory then
for 2 seconds and [hen verifies no data has changed.
6.5
6.5.1

1al

stalls

Toggle In Tests

Toggle-In-program #1
The fol lowing is a toggle in ~emory address t~st. This test
is useful
when an address se)ection failure is suspected
involving the first BK of memory. This program writes the
valU0 of each address into itself starting with the lower
limit and continuin~ to the upper I imlt. After all addresses
nave been written each address Is checked for the correct
contents starting with the upper limit and continuing to the
lOwer"'

1 i mi t.

LOCA r ION CONTENTS
10
12

012700
000050

010001

16
20
22
24
26
30
32
34
36
40
42
44
46

02003';

177570
001403
010010
005720
000772
010004
020001
001767
024000
001774
000000
000772

MNEMONIC
MOV "SO,RO

COMMENT
;GET FIRST ADDRESS
;TO TEST
;(EXAMPLE START ADDR~SS)
MOV RO, Rl
;SAVE IN Rl
1$: CMP RO,@>#SWR ;CHECK UPPER LIMIT
;(IN SWITCH REGISTER)
BEC' 2$
;BRANCH IF AT UPPEP. LIMIT
MOV RO, (ROJ
; LOAD VALUE INTO ADDRESS
TST (RO)+
;STEP TO NEXT ADDRESS
BR 1 $
;LOOP UNTIL DONE
2$: MOV RO,R4
;SAVE UPPER LIMIT
3$: CMP ~O.Rl
;CHECK IF AT LOWER LIMIT
1EQ 1$
; BRANC": IF DONE
CMP -(RO) ,RO ;CHECK OATA WRITTEN
BEQ 3$
; BRANCH IF OK
HALT
;ERROR
BR 3$
;LOOP BACK

After toggling the program LA-IOo'set
ES: The upper
limit
register may be

address
Changed

up~~r

limit •• , start

obtained from the switch
during program operation.

However occaSionally the program may

halt

because

'$ifJ ITCH
BOUNCE'.
i Imitc is to stop

(The best procedure when changl ng
the program make the c~ange and
continue.) The lower limit address (12) may be patched
to any desired address.
6.5.2

Toggle-In-Program #2
The following is also a toggle in program to be used with
toggle-I -program #1 for more compl~te address testing. This
program writes the complement value of each address into
itself starting with the upper limit and continuing to the
lower limit. After all addresses h~ve been written each
is checked for the correct contents starting with the

CZQMCFO 0-124K MEM EXER 16K

Page 14

lower limit address and continuing to the upper
Toggle in the fol lowing patches to the program above.

limit.

These are the ~dtches to toggle-In-program #1:
LOCATION CONTENTS
12
100
36
001404

BEQ 4$

COMMENT
;CHANGE LOWER LIMIT
;BRANCH TO PROGRAM #2

These are the additions to toggle-In-program 1/1 :
LOCATION
50
52
54
56
60
62
64
66
70
72

74
76

CONTENTS
010402
005142
020201
001375
020204
001755
010203
005103
020322
001772
000000
00..: 770

MNEMONIC
4$: MDV R4,R2
5$: COM -(1'12)
CMP R2,Rl
BNE 5$
6$: CMP R2,R4
BEQ 1$
MOV R2,R3
COM 1'13
CMP R3, (R2)+
BEQ 6$
HALT
BIl 6$

7.0

PROGRAM FUNCTIONAl FLOW CHARTS
Attached

B.O

PROGRAM ISTING
AttaChed

COMME"T
; GET UPPER LIMIT
;COMPLEMENT ADDRESS
;CHECK IF AT LOWER LIMIT
; LOOP lJ,H 1 L DONE
;CHECK IF AT UPPER LIMIT
;GO TO PROGRAM 1 IF DONE
;GET VALUE OF ADDRESS
;COMPLEMENT VALUE
;CHECK ADDRESS
;BRANCH IF OK
;ERROR
;GO CHECK NEXT ADDRESS

CZQMCFO

0-124K MEM EXER 16K

DECFLO VER

FLOW CHART
.******.*******.

CZQMC,O

0-124K MEM EXER 16K

$;. ** .. .'. *. *' ** ...
$

00.07 20-FEB~7B 07:58

PAGE A

CZQMCFO

OECFLD VER

0-124K MEM EXER 16K
TABLE OF CONTENTS
•••• 4.* ••••••••••••
PAGE 01

DEFINITIONS, TRAP CATCHER,

PAGE 02

RESTART ANO RESTORE ROUTINES

PAGE 04

POWER FAIL ROUTINES

PAGE 05

COMMON TAGS

ST~RTING

PAGE 06

SETUP

PAGE OB

MAP MEMORY

PAGE 09

MEMORf BYTE MAP ROUTINE

PAGE 12

MAP PARITY REGISTERS

PAGE 13

MAP PARITY MEMORY

PAGE 14

TEST PARITY REGISTERS

PAGE 15

USER PARAMETER SELECTION SECTION

PAGE 16

STARn:

PAGE 17

SECTION 1: ADORESS TESTS.

PAGE 18

TEST 2

PAGE 19

TEST 3

PAGE 20

TEST 4

PAGE 21

TEST 5

PAGE 22

SECTION 2: WORSE CASE NOISE TESTS.

PAGE 23

·TEST 7·

PAGE 24

TEST 10

PAGE 25

TEST 11

PAGE 26

TEST 12

PAGE 27

TEST 13: 3 XOR 9

PAGE 29

TEST 14: 3 XOR 9

PAGE 31

TEST 15: 3 XOR 9 (FOR PARITY)

AOORESSES.

STAKT OF PASS
TEST 1

TEST 6

00.07 20-FEB-7B 07:5B

PAGE B

CZQMCFO

0-124K MEM EXER 16K

~ECFLO

TABLE OF CONTENTS

•• *.* ••• **********.
PAGE 33

TEST 16: 3 XOR 9 (FOR PARITy)

PAGE 35

TEST 17: PARITY BYTE TEST

PAGE 39

TEST 20

PAGE 40

TEST 21 : EXIC"TE DATI , DATO

PAGE 41

TEST 22: EXICUTE DATI, DATOB ( LO BYTE)

PAGE 42

TEST 23: EXICUTE DATI, DATOB (HI BYTE)

PAGE 43

TEST 24: EXICUTE DATIP, DATO

PAGE 44

TEST 25: EXICUTE DATIP, DATOB ( LO BYTE)

PAGE 45

TEST 26: EXICUTE DATIP, DATOB (HI BYTE)

PAGE 46

TEST 27: MARCHING 1'S AND O'S

PAGE 49

TEST 30: MDS REFRESH TEST

PAGE 51

TEST 31 : MOS REFRESH TEST

PAGE 53

DONE

PAGE 54

END OF PASS

PAGE 55

MEMORY MANAGEMENT AND ADDRESSING SUBROUTINES

PAGE 57

SUBROUTINES FOR ADDRESS AND WORSE CASE NOIS':' TESTS

PAGE 59

RELOCATION SUBROUTINES

PAGE 60

PARITY ROUTINES

PAGE 62

SPECIAL PP.INTOUT ROUTINES

PAGE 63

SYSMAC AND STANDARD UTILITY ROUTINES

VER

00.07 20-FEB-7B 07:5B

PAGE C

CZQMCF.O 0-124K MEr.! EXER 16K
DEFINITIONS, TRAP CATCHER, STARTING ADDRESSES.

DECFLO VER

• •••••••••••• * •••• ** •••
.. SWITCH SETTINGS AND ..
.. BASIC DEFINITIONS ..

• " :** •••• *.*.**.* ... * •••

•••••••••••••••••••••••

• -0

.. TRAP CATCHER AND
• STARTING ADDRESSES

..
..

.................. . - ..

...

00.01 20-FEB-78 01:58

PAGE 01

DECFlO VER

D-124K MEM EXER 16K
RESTART AND RESTORE ROUTINES

SA=210

00.07 20-FEB-78 07:58

***********
**RESTAR
***********
RESTAR

.=300

.~**.*.*$.**$****

SET RESTART
~LAG (R5=0)

•

*----------•
I
*

I
I
I
I
I
I
I
I
I
I
I
I
I
I

**~.**.*.*******.

***********
"RESTOR ••
***********

SA=214

*****************
SET RESTORE
• FLAG (R5=PC)

**************...
I<----~------------REST1
V
*.********~******

•

SETUP STACK

•

*****************
V
I

\------------------> *STARTA
\

REST2

••••• ** •••••
•

HAS MEMORY BEEN \NO
MAPPED?

************

YES

/MEMORY MANAGEMENT\NO
AVAILABLE?
\------------------\

----------------------V
I YES
***********************
V
'RESET SP AND JUMP TO •
•••••••••••••••••••••••
• RELOCATED PROGRAM $
• seT UP MEMORY MGMT. • •
*
* MAP PROGRAM INTO *
•• *************.*******
* VIRTUAL BANKS 0 & 1 •
I

***********************

1<---------------------------I
I

PAGE 02

VER

~ECFLO

CZQMCFO 0-124K MEM EXER 16K
RESTARt AND RESTORE ROUTINES

00.07 20-FEB-7B 07:58

/
PROGRAM MAP
\YES
/POINTING TO BANKS 0\--------/
& 1?
\
I
----------------------I NO

****.........

••• ~~ ..• *••••• *...........

I
I

RELO(S9)

•••••••• * •••
•• RELOCATE PROGRAM TO ••
••
BANKS 0 & 1
••
**
••

I
I
I

1<------------------

RESTART FLAG
(RS-O)?

/
I NO

\YES
••••••••••••
\---------->*START1(16)*
\

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

RESLOR(S9)

•••••••••••••••••••••••••
••
••
••
RESTORE ~OADERS
••
•*

••

•••••••••••••••••••••••••
I

•••••••••••
• ·HALT
••
•••••••••••

PAGE 03

CZQMCFO 0-124K MEM EXER 16K
POWER FAIL ROUTINES

OECFlO VER

*.*.*.*.***

.*****.**.*

*.SPWRON .*
•• ** •••••••

• * •••• ** •••

I
V

•••••••••••
• ••••••••••

**SPWRUP *.

**SlllUP ..

I
V

************ •• ****.*.*.

••• ** •••••••• *** •••••••

*
..
..

..
..
..

SillUP -> VECTOR
SAVE REGISTERS
SPWRON -> VECTOR

..
•
..

•••••••••••••••••••••••

WAIT lOOP FOR TTY
RESTORE REGISTERS
SPWRON -> VECTOR
I
V

SPRINT(63)

.*.**.* ••••••• *** •••

•••••••••••

.-HAlT

•
..
•

.*.*********.* •• *.*****

I
V

...

••••• * •••••

00.07 20-FEB-7B 07:5B

/ TYPE POWER FAll /
MESSAGE
/

•••••••••••••••••••
I
V

••• * •••••••
• ·RETURN ..

• *.** ••• ***

• •• * ••• ****

."HAlT

••

*****.atI·=*.*

PAGE 04

CZOMCFO 0-1~4K MEM EXER 16K
COMMON TAGS

D.ECFLO VER

•••••••••••••••••• * ••••
• 1'1100

..
..

STANDARD 'SYSMAC'
COMMON TAGS

..
..

•••••••••••••••••••••••
•••••••••••••••••••••••

..
..

...

APT MAILBOX AND
ETABLE

....

•••••••••••••••••••••••

..... ................. .
;

_COMMON TAGS FOR THIS ..
..
PROGRAM
..

•••••••••••••••••••••••
•••••••••••••••••••••••

.. RELATIVE ADDRESSING ..
.. TABLE. ERROR DATA ..
POINTER
..
..

•••••••••••••••••••••••

.. MEMORY PARITY WORSE ..
.. CASE PATTERNS TABLE ..

•••••••••••••••••••••••
•••••••••••••••••••••••

..
MEMORY PARITY
..
• REGISTER ADDRESS AND ..
..
MAP TABLE
-

•••••••••••••••••••••••
•••••••••••••••••••••••

*f.1ROR MESSAGE POINTER.
•
TABLE
..

•••••••••••••••••••••••

00.07 ~0-FEB-78 07:58

PAGE 05

CZQMCFO
SETUP

0-124K MEM EXER 16K

~ECFLO

*""*"'*******

SA=204

VER

00.07 20-FEB-78 07:58

***********

"-SELECT **

*.START

*********"'.

.**********

*****************

• SET FLAG FOR
"
S~LECTING
PARAMETERS

"''''*'''''''''*'''''''''''''''

"'*"'''''''

"
"

.CLEAR FLAG FOR "
•
SELECTING
"
"
" PARAMETERS

*****.*.********.

*****************
I

STARTA
.. >It.' ..

"
"
"

"'* ** *'" "'''''''* *'" ** ** ****
CLEAR COMMON TAGS
INIT SP INIT PF
VECTOR

***********************
I
V

***********************

"
SET UP SOFTWARE
*
"SWITCH REGISTER IF NO"
HARDWARE SWR
"
***********************
I
V

************.******¥

/TYPE PROGRAM TITLE/
( ONC E ON LY)
/
/
/
/

*******************
I
V

HAS PROGRAM
RELOCATED?

\YES
* ••• * •• _••••
\---------->+RESTAR(02)*
\

I NO
V

*************************

**
••

••

':'AVE LOADERS

••

******~~*****************

I
I
I
V

************

PAGE 06

•
CZQMCFO
seTUP

0-124K MEM EXER 16K

DECFLO VER

00.07 20-FEB-7B 07:58

/ CLEAR 'MMAVA'. \yes
/ M~MORY MANAGEMENT \-------------------/ EXITS AND DESIRED? \
I
-----------------------

••••••••••• V* •••••••••••
*SET UP MEM MGMT. SET.
• 'MMAVA' FLAG TYPE •
•
• 'KT11 AVAILABLE'

•••••••••••••••••••••••

1<----------------------------I
V

•••••• *** ••••••..•

•

*TURN OFF CACHE *

••••• ** ••••••••••••
I
1

PAGE 07

CZQMCFO 0-124K MEM EXER 16K
MAP MEMORY

DECFLO VER

00.07 20-FEB-7B 07:58

MAPME~

********.**************

RESET SP SET UP
• POINTERS TO MEMORY
*
.
MAP.
******.****-****.*.****

v
**~

"****************

ITYPE 'MEMORY MAP:'I

/
****~**************

------------------->1
I
V
I

****.******************

I
I
I

*REAJ AND WRITE MEMORY- TIMEOUT TRAP
• LOCATION (AUTO-INC .--»»»»»»----.
•
POINTER)'
I

***********************

V
***********************

.ADJUST SP UPDATE AOP *
• POINTER TO START OF •
•
NEXT 4K.
•
•••••••••••••••••••••••

I
V
I
----------------I
NO
lEND OF A 4K RANK \
I<--------/OF MEMORY REACHED? \
I
I

/
\
-----------------------

I
I

I YES

****<~.****.****.******

I
I
I

• SET FLAG IN MAP TO
* INDICATE FULL 4K.
• SAVE AOR POINTERS

•

I
I
I

I
I

***~~******************

I
I

1<-----------------------------

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

I UPDATE POINTERS \

<---------1 TO NEXT 4K BANK.

\
/ END (12BK) REACHED? \
I YES
V
********************

lODES FIRST 16K OF\NO
ITYPE INSUFFICIENT /
MEMORY EXIST?
\-------->1 MEMORY MESSAGE I

\
I YES
V
*GMPR(12)
*********.**

*******************
***********
'-HALT

••

***********

PAGE 08

CZQMCFO 0-124K MEM EXER 16K
MEMORY BYTE MAP ROUTINE

~ECFLO

VER

00.07 20-FEB-7B 07:5B

PAGE 09
\.

* •••••• * •••
SA-220

**TIMOUT

***********
I
V

MEMORY
MANAGEMENT?

\NO

\---------I

\
. -.------------------

I YES
V
MMINIT(55)

I
I

.•...... *................

••
SET UP MEMO~Y
**
•• MANAGEMENT REGISTERS **

I
I

•••• * ••••••• *** •• * •• ****.

I
I

••

1<----------------V
$PRINT(63)

••• * ••••• ** ••• *.* •••
/TYPE "BYTE MEMORY /
MA~'
/
/

* ••••••••••••••••• *

I
V

.*** ••••• * •• * ••••••••• *
**.

.. INIT TYPEOUT FLAG ..
• INIT ADORESS POINTER ..
.. SET TIMEOUT VECTOR •

• •• ***.* ••••••• * •••••••

*A*--------------------->I

.. *.

***********************

•••••••••••••••••••••••

*00 A DATI; THEN DATI,. TIMEOUT T R A P . .
.. DATO; -THEN DAtI,
*--»»»»»»-------->*
..
DATIP, DATOB
•
..
I
V

I
V

/TYPE "FROM" FLAG \NO
...
NO
/ TYPE 'TO' FLAG
SET? (RO=-1)
\----------> .. B*<--------/
SET? (RO-O?)

I YES
I
I
I
V

•
..
..

AO.JUST SP

*.*

I YES
I
I
I
V

\
\

DECFLO VER

CZQMCFO 0-124K MEM EXER 16K
MEMORY BYTE MAP ROUTINE

00.07 20-FEB-78 07:58

PAGE 10

$PRINT(63)

*.***.***.~**.*****.*

TYPE "FROM"
I

/
/

.******.* •• *.****
I
$TYPAD(63)
V

TYPE "TO'

**.,~***.*

•• **.*.*.*
I
V

$TYPAD(63)

***********.*****.*.

TYPE ADDRESS

/
**** ** * ****** **. **"

TYPE ADDRESS-1

.**** **** * ••• ** •• **
<---------------------------------------I

I
V
*****************

COMPLEMENT

* TYPEOUT FLAG

(RO)

***

*****************

.*.

*8*----------------->1

V
**************.* •

• UPDATE ADDRESS.
*
POINTER

*-----------I

•

***.*************

I
I

V NOT=O

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

I
I

•••
NO
/
\
.A*<-------/ 4K BANK BOUNDRY? \

***

----------------------I YES

*.*

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

NO
/MEMORY MANAGEMENT\
*A*<-------/
AVAILABLE?
\

.*.

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

I YES
V

******************.****

UPDATE MEM MG,H
* NO
/
* REGISTERS + ADDRESS *<-------/ END OF MEMORY?
*
POINTER
•
I
YE~

I
I
I

\
\

----------------------I

I
I

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

•

***********************

I
I
I

I
I
I
I
I

1<-------------------

*.*

*A*

***

/
/

DECFLO VER

CZQMCFO 0-124K MEM EXER 16K
MEMORY BYTE MAP ROUTINE

I TYPE "TO' FLAG
. SET? RO-O

\NO

\---------\
I

.----------------

I YES

••••••••••••••••••••

I
I

TYPE ·TO·

•.•••... **.**......
I

TYPE ADDRESS-1

•••••••••••••••••••

I
I
I
I

••••••••••••••••••••

1
I
I

I
I
I

I<----~--------------

•••••••••••

•• HALT

••

••••••• ** ••

00.07 aO-FEB-78 07:58

PAGE 11

~ECFLO

CZQMCFO 0-124K MEM EXER 16K
MAP PARITY REGISTERS

VER

00.07 20-FEB-7B 07:5B

************

*GMPR(08)

************

GMPR
***********************

'SET UP TA8LE POINTERS •
• SET UP TIMEOUT VECTOR'

•

***********************

------------------->1
I
GMPRA
V
I
I

I
I
I

*****************~*****

~~EAR FLAG. TEST
• TIMECUT TRAP
REGISTER ADR FOR
.--»»»»»»---------*
TIMEOUT'
I
******.****************
GMPRB
V

•

***********************

I
I
I
I

V
••.
'SAVE REGISTER ADR IN •
• SECOND TABLE (MPRX) •

*...................

I .
•
***********************
I

GMPRC

I
I
I

• ADuUST SP. SET FLAG *
-TO INDICATE REGISTER •
•
NOT PRESENT
•
• ••••••••••••••••••••••
I
I

1<----------------------------------

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

NO
/CLEAR MAP. END OF\
----------/ TABLE REACHED?
\

\
I YES
V

*******~**************¥

• TERMINATE SECOND
• TABLE (MPRX) RESEl
•
TIMEOUT VECTOR

•
•
•

***********************
I

/
ANY PARITY
\NO
/ REGISTERS FOUND? \------------------------\

----------------------I YES
!
I
I
I
I

1
I
1
1

********************

/ TYPE "NO MEMORY /
/ PARITY REGISTERS /
/
FOUND".
/
*******************
I

V
************

.MANUAL(15)*
************

PAGE 12

DECFLO VER

CZQMCFO 0-124K MEM EXER 16K
MAP PARITY MEMORY

•••• ** •• * •• *.~ •••• *••• *.
.. INIT ALL REGISTERS
SET UP POINTERS
..

..
..

•• - .••••••• **** ••••••••••
I

MAPRB

•••••••••••••••••••••••

• WRITE WRONG PARITY IN• EACH BANK OF MEMORY ..

.*. .. *••••••••••••• •••..
'~~

I
V

•••••••••••••••••••••••

• FINO WHICH REGISTER •
• CONTROLS WHICH BANK ...

•

•••••••••••••••••••••••
TMAP

I
V

••••• ~* •••• *.* ••••• * •••

• TYPE PARITY REGISTER ..
..
ADDRESS
•

••••••••••••• ** •••••••••..
I

TYPMAP(62)

•••• ** •••••••••••••••••••
•• TYPE MAP OF MEMORY
• * CONTROLLED BY EACH
**
REGISTER

*..**•

•••••••••••••••••••••••••
I
I
I
I
I
I
I
I
I
I
V

00.07 20-FEB-78 07:58

PAGE 13

DECFLO VER

CZQMCF0 0-124K MEM EXER 16K
TEST PARITY REGISTERS

00.07 20-FEB-78 07:58

PAGE 14

CTRLS

.************.**********
.
PARITY REGISTER.

-------->*CLE~R

*****. ~***.**.*** •• ****

.*.***********.**********

I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I

ALL 8ns CLEAR

\NO
**
\----------->*.
\
**

ERROR: REGISTER
DOESN'T CLEAR

**
**

********************.*.*.

I YES

V<----------------------------------

******************.****

..
SET AND CLEAR
..
.NON-RESERVED BITS OF ..
..
REGISTERS
..
.**********************
I
V

$ERROR(63)

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

*******.***.*.***********

\NO
*. ERROR: BIT STUCK IN **
/ SET AND CLEAk OK? \----------->**
REGISTER
••
/
\
*.
**.*****.**** ••• ***.*****
I YES
I
I

I
I
I

$ERROR(63)

V<----------------------------------

YES

-------// MORE REGISTERS? \ \ \
I

RESCHK

************.****** •• **

•
SET BITS IN ALL
•
• REGISTERS. DO "RESET" •

•************.****.*****..
I
V

$ERROR(63)
.*.****.*****************

ALL REGISTERS
CLEARED?

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

I YES

\NO
•• ERROR: RESET FAILED ••
\----------->*. TO CLEAR REGIST:R
\
*.
.*.**********************

<----------------------------------

I
I
V

CZQMCFO Q-124K MEM EXER 16K
USER PARAMETER SELECTION SECTION

~ECFLO

VER

00.07 20-FEB-78 07:58

***********

**MANUAL **

.* •••• *****

MANUAL
~PRINT(63)

** •• ****** •• ****-***

/SELECT PARAMETER \NO
FLAG SET'
\--------------------

/TYPE: "ADDRESS IN /
----------------------------->/ UNMAPPED MEMORY· /----~-------------->1 YES
MANULI V
$RDOCT(63)
I
/
/

I
I
I

I
I

*.**.* •• *****.*.**~*

****.***.* ••••• *.~~

/GET FIRST ADDRESS /
I
/

.*.* ...

I
I
I
I

I
I
1
I

I
I
I
I

* •• ********.
I
V

----------------/FIRST
ADDRESS IN \

1<----------------------------------/
MAPPED MEMORY?
I
/
I

I
I

-----------------------!I
-----------------;>1 YES
V

$RDOCT(63)

********************

I
I

I
/ GET LAST ADDRESS /
1 / /

I
I

•••• ** •••• * ••••
I

I
I

*...

I
I

.----.-----------

I
I
I

I
NO
/ LAST ADDRESS
\
--------/ HIGHER THAN FIRSI \
/
ADDRESS?
\

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

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

I
I

I YES

I
NO
LAST ADDRESS IN \
<-------.------_--__
--___.--.________
-/ / MAPPED
MEMORY?
\
/

I
I
1
I

I
I

----------------------I YES

I
*****.**************

I
I

GET SELECTABLE /
I
I
CONSTANT
/
1
1 / 1

*** ••••• *.**** •• ***

1<----------------------------1

1
1
1
V

PAGE i5

CZQMCFO
START1:

0-124K MEM EXER 16K
START OF PASS

DECF~O

MANU~2

**.* •• *••••• ~* •• * ••
* MAKE NECESSARY

*.*.

•
*ADJUSTMENTS TO FIRST •
• AND LAST ADDRESSES •

• ~ .•••• ****.** •••••••••
1
I
V

* ••••••••••
.... START1 ..
_

...... ....
I

START1

I
I

** •••••••••••••••••••••

EVERYTING *

*INITIA~IZE

*
FOR A NEW PASS
*
*•••••••••••••••••••• **.*
I

1
V

VER

00.07 20-FEB-78 07:58

PAGE 16

CZQMCFO 0-124K MEM EXER 16K
SECTION 1: ADDRESS TESTS.
TEST

DECFLO VER

TSTI

00.07 20-FEB-78 07:58

PAGE 17

INITMM(55)

•••••••••••••••••••••••••
•• INITIALIZE ADDRESS .. *
**
POINTERS
**
.•
*.
*.* •• * .~.* •• ** •••• ** •• **.

----------------------------->1
I
V

••••••••••••••••••• * •••
..
WRITE PHYSICAL
..

I
I
I

.ADDRESS VALUE IN EACH*
..
WORD LOCATION
'"

** •••••••••••••••••••••
I

MORE MEMORY

MMUP(56)

.........

••••• * ••• ** •••••••• ** ••••

...

'JPOATE ADDRESS
POINTERS

---------------.*

•••••• **** •••••••••••••••

lDONE .
V
INITDN(55)

•••••••••••••••••••••••••

•• INITIALIZE ADDRESS

••

.. *
POINTERS
••
••
*'"
•• * ••••••••••••••••••••••

---------->1V
I

DOES EACH
LOCATION HAVE
ADDRESS VALUE?
I YES

SERROR(63)

•••••••••••••••••••••••••

\..

\NO
."ERROR: ADDRESS VALUE .. ..
\---------...
NOT IN LOCATION
.. ..
..

•••••••••••••••••••••••••
I

1<-------------------------------1
V
MMDOWN(56)
••••••• * •• ,•••••••••••••••
MORE MEMORY..
UPDATE ADDRESS
.*
--------------..
POINTERS
...
*..
.*
•••••••••••••••••••••••••
100NE

I
I
I
V

CZQMCFO
TEST 2

0-124K MEM EXER 16K

~ECFLO

T5T2

VER

00.07 20-FEB-78 01:58

PAGE 18

INITMM(55)

.***.**~*****************

.*
INITIALIZE ADDRESS
••
POINTERS
.*
**
*.
*.***********************

-------------------------->1
I
V
I

*****************~*****

I
I
I

..
JRITE PHYSICAL
*
.ADDRESS VALUE IN EACH*
•
BYTE LOCATION
..

I
I

********.**************
I

V
MMUP(56)
***i** •• *****************
I
MORE MEMORY'.
UPDATE ADDRESS
••
----------------..
POINTERS
I

...

.*
••

*.***********************

IDONE
V
INlTDN(55)

*************************

•• INITIALIZE ADDRESS
••
POINTERS

••
••

*************************
------------------------->
I
I
V
I

I
I

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

/ DOES EACH BYTE
LOCATION HAVE
/
ADDRESS VALUE?

I
I

----------------------I YES

\NO

$ERROR(63)
*************************

•• ERROR: ADDRESS VALUE *.

\-----------> •• NDT IN BYTE LOCATION ••
\

1<---·--------------------------1

MMDOWN(56)

*************************

1
~ORE MEMORY
------------------..

UPDATE ADDRESS
POINTERS

••
**

*************************

IDONE

I
I
I
V

••

********************.****
I

CZQMCFO
TEST 3

DECFLO VER

0-124K MEM EXER 16K

00.07 20-FEB-7B 07:5B

PAGE 19

TST3

INITDN( 55)
•• *.***.****
* .. INITIALIZE ADDRESS ••
••
POINTERS
**
.**.**~******

...*.-

'.********************

----------------------------->1
I
I

V
********************.*.

I
I

..
..

WRITE ONE'S
COMPLEMENT OF ADR
• INTO WORD LOCATIO,:

..
..
..

*********.********'.****

I
I

*************************

MORE MEMORY

*..

------------------*..
••

MMDOWN(56)

UPDATE ADDRESS
POINTERS

**
.*

*****************.***.*.*

IDONE
V
INITMM(55)

*******.*****************

*. INITIALIZE ADDRESS **
**
**

POINTERS

.*
**

***********.****.*******~

--------------------··--->1
I
V
I

$ERROR(63)

**.****.****** ••• ***.*.*.

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

/ DOES EACH WORD \NO
•• ERROR: COMPLEMENT OF ....
/HAVE COMPLEMENT OF \----------->.*ADR. NOT IN WORD LaC •••
/
ADR. VALUE?
\
*.
...
* •• ****** •••••••••••• * •••
I YES
I

1<---------------------------------1
MMUP(S":)

V
MORE MEMORY

****.********************

-----------------.*.

UPDATE ADDRESS
POINTERS

**
••

***.************* •• ******

IDONE

I
I
I
V

CZQMCFO
TEST 4

DECFLO VER

0-124K MEM EXER 16K

TST4

*.*.

00.07 20-FEB-7B 07:5B

PAGE 20

INITMM(55)

.*.** •• ~***********.*****
INITIALIZE ADDRESS
POINTERS

******

*.
**
**

~****.************

----------------------------->1
I
V
I

I
I

***********************

* WRITE BANK # VALUE

•

INTO EACH BYTE
LOCATION

I
I

***********************
I

*************************

MMUP(56)

I
MORE MEMORY
.*JPDATE ADDRESS
------------------..
POINTERS

••
••

••

*************************

IDONE .
V
INITMM(55)

*************************

•• INITIALIZE ADDRESS
••
POINTERS

.*
••

•*

*************************

------------------------->1
I
V
I

$ERROR(63)
*************************

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

I
I
I

--_.' -------------------

** ERROR: BANK # VALUE *.

\----------->*.

NOT IN LOCATION

******~******************

I
MORE MEMORY"
------------------*.

UPDATE ADDRESS
POINTERS

••

••
••
*************************
IDONE

I
I
I
V

••

*************************

1 YES
I
1<---------------------------------1
V
MMUP(56)

DOES EACH BYTE \NO
HAVE ITS aANK #
VALUE?
\

CZQMC10
TEST 5

~~e¥LO

0-124K MEM EXER 16K

VER

00.07 20-FEB-78 07:58

PAGE 21

INITDN(55)

TST5

•••••••••••••••••••••••••

•• INITIALIZE ADDRESS
••
POINTERS

••
••

••
••
•••••••••••••••••••••••••

--------->1V

••••••••••••• *••• ~ •••••

I
I
I

.Wr::E l'S COMPLEMENT.
• OF BANK NUMBER INTO •
..
BYTE LOCATION
•

I
I

•••••••••••••••••••••••
I

MMDOWN(56)

••• d • • • • • • • • • • • • • • • • • • • • •

MORE MEMORY..
---------------..

••

UPDATE ADDRESS
POINTERS

••
••

••
•••••••••••••••••••••••••

IDONE
V
INITDN(55)

•••••••••••••••••••••••••

•• INITIALIZE ADDRESS
••
POINTERS

••

••
••
•••••••••••••••••••••••••

,----------------->1V

SERROR(63)

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

•••••••••••••••••••••••••

I
I
I

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

II
I

/ DOES EACH BYTE \NO
•• ERROR: COMPLEMENT OF ••
/HAVE COMPLEMENT Of \----------> •• BANK , NOT IN BYTE ••
BANK VALUE?
\
••
LOC.
••
I YES

1<---------------V
MMDOWN(56)

•••••••••••••••••••••••••

1
~ORE MEMORY
**
-----------------..

UPDATE ADDRESS
POINTERS

••
••

.. ..
••
•••••••••••••••••••••••••
IDONE

I
I
I
V

•••••••••••••••••••••••••

CZQMCFO 0-124K MEM EXER 16K
SECTION 2: WORSE CASE NOISE TESTS.

DECFLO VER

00.07 20-FEB-78 07:58

PAGE 22

TEST 6
I
I

TST6

1<------------------------------------------V
INITMM(55)
I

.* •• ***~.* ••• ****.********
•• INITIALIZE ADDRESS
POINTERS

.*
••

**
**
**

.*~~******.*.****.*******

------------------------->1

I
I
I
I

I
I

* •••••• *****.**.***.***

I
I

I
I
I

.WRITE A CONSTANT INTO.ALL LOCATIONS. (USER.
•
SELECTABLE)

I
I
I

I
I

•••• ******* •• ** •••. ' it.**
I

I
I

I
I
I

V
MMUP(56)
* ••••••••• *.*******.*.***
MORE MEMORY..
UPDATE ADDRESS
**
POINTER

---------------***.

*************************
IDDNE
I
I
I
I
I

I
1
I
I
I
I

I
I
I
I
I
I

I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I
I

CZQMCFQ
TEST 7

DECFLO VER

Q-124K MEM EXER 16K

00.07 20-FEB-7B 07:58

PAGE 23
I
I

TST7
INITMM(SS)
•••• **** ••••••••• * •• ****.
•• INITIALIZE ADDRESS ••
.*
POINTERS
**
**
**

I
I
I
I
I
I

****** .•• **.********* ••• *

----------------------------->1
I
V
I

I
I

/
/
/.

SERROR(63)

***.***..................
CONSTANT FROM \NO
•• ERROR: CONSTANT FROM *.
TST6 IN ALL
\----------->
.. T5T6 NOT IN LOCATION ••
LOCATIONS?
\ . .
••

---~.------------

------------------.----

I YES

•••••••••••••••••••••••••
I

1<---------------------------------1

MMUP(S~)

I
I
I
I
I
I
I

•••• " :***.*.*.**** ••• ***1

I
I
I

MORE MEMORY
--------------...

UPDATE ADDRESS
POINTERS

••
**
••••• *.* •••• **** •• ~ •••• **
IDONE
V

I
I

----------------II
/LOOP
ON TEST 6 IN\YES
SWR?
\-------------------------------/
\ '

I NO
I
I
I
V

CZQMCFO
TEST 10

0-124K MEM EXER 16K

OECFLO VER

00.07 20-FEB-78 07:58

PAGE 24

TST10

•••••••••••••••••••••••

•
•

SET UP DATA TABLE
POINTER

•** ••••

¥ •••••••••••

------------------------------------>1
I
V
I

•
•

•

*.***

CKPMER(61)

•• *********.*.***********

I
I

**CF":';K FOR ANY MEMORY **
••
PARITY ERRORS
••

I
I
I

I
I

V
•• ::**************.*****

I
I

.GET DATA PATTERN FROM.
END OF TABLE
•
TABLE
.------------------------------

*****.**********.*.***.*.
I

..
*
***.*******************
I

I
I
I

INITMM(5S)

•••••••••• ** •• ***********

I
I

•• INITIALIZE ADDRESS
.POINTERS

.--

I
I

- . . -

I
I

*********************....
------------------------->1
V
I
I
***.******************.
I
-PUT DATA INTO MEMORY •
I
LOCATION
*

I
I

I
I
I
I

I
I
I

I
I

I
I
I
I

I
I

. . . .
***********************
I

I
I
I

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

SERROR( 63)
****************.***** •• *
/DATA JUST WRITTEN\NO.*
./
OK?
\---------->**ERROR: DATA CHANGED. _.

I
1

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

*************.***********

I
MORE MEMORY..
----------------....

l..: ')ATE

ADDRESS
POINTERS

- . . .

**********.**************
DONE

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

••

*.***********.* ••••• ***..

I YES
I
1<--------..:--------------------1
V
MMUP(S6)

I
I

I
I
I

I
I

I
I
I
V

•
CZQMCFO
TEST 11

DECFLO VER

0-124K MEM EXER 16K

00.07 20-FEB-7B 07:5B

PAGE 25

TST11

SETCON(S7)

*.***********************

"PUT ALL ONE'S IN ALL
••
MEMORY

.**.*.

***~************.********

INITMM(55)

*************************

•• INITIALIZE ADDRESS
POINTERS
••
**

••
••

****************.**~~****

----------------------------->1
I
V
I

ROTATE(57)

*************************

I
I
I

CLEAR C-BIT AND
"ROTATE IT THROUGH TWO"
••
BYTES
••

I
I
I
I
I
I
I
I
I
I
I
I

*************************

$ERROR(63)

I C-BIT CLEAR AND \NO
I

-1 IN MEMORY
LOCATION?

********* •• **************

••
\-----------)..
\ . .

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

I YES

ERROR: ROTATING 0
FAILED.

********************.****

1<---------------------------------1
MMUP(56)

*************************

MORE MEMORY"

------------------*.
••

UPDATE ADDRESS
POINTERS

••
••

••

*************************

IDONE

I
I
V

••
••
••

CZqMCFO
TEST 12

0-124K MEM EXER 16K

DECFLO YER

TST12

00.07 20-FEB-78 07:5B

PAGE 26

SETCON(57)

•• * •••••••••••••• * •••••••

•• PUT ALL ZEROS IN ALL ••
••
.
MEMORY
••

*•
••
• *.* •• •••••••••••••••••
~~

I
V

INlTMM(55)

•••••••••••••••••••••••••
••

••

INITIALIZE ADDRESS
POINTERS

••
••

••

••••••••••••••• ** ••••••••

---~------------------------->I

ROTATE(57)

••••••••• * •••••••••••••••

•• SET C-BIT AND ROTATE ••
•• IT THROUGH TWO BYTES ••

J
I

••
••
•••••••••••••••••••••••••

SERROR(63)

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

•••••••••••••••••••••••••
.*
ERROR: ROTATING
••

I C-BIT SET AND 0 \NO
lIN MEMORY LOCATlON?\--------->u
I
\..

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

I
I
I

I YES

I
I

FAILED

•••••••••••••••••••••••••

1<----------------------------1
Y

MMUP(56)

•••••••••••••••••••••••••

I
MORE MEMORY..
-------------..

UPDATE AOORESS
POINTERS

...
•••••••••••••••••••••••••

....

IDONE

I
I

I
V

...
••

CZQMCFO Q-124K MEM EXER 16K
TEST 13: 3 XOR 9

~ECFLO

VER

00.07 20-FEB-78 07:58

PAGE 27

TST13
INITMM(55)
*.**.********************
** INITIALIZE ADDRESS
••
POINTERS
••

*.
*.
*.

*************************
------------------------>1
I
V
W3X9(57)

$************************

••

I
I
I

*.
••
**

************* •• *.********
I

I
I
I

'JRITE 256. WORD
BLOCKS WITH

0,0,0,0,-1,-1,-1,-1

MORE MEMORY

MMUP(56)

***;,*********************

------------------.*
$.

UPDATE ADDRESS
POINTERS

.*
••

*************************

IDONE
V
INITMM(55)

*************************
••

INITIALIZE ADDRESS
POINTERS

**
**

*************************
------------------------->1
I
V
I

SERROR(63)

********************** •••

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

/256. WORD BLOCKS \NO
••
/
WRITTEN WITH
/ 0,0,0,0,-1,-1,-1,-1 \ . *

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

\----------->.*

I YES

ERROR: 3 XOR 9
PATTERN FAILURE

*******.*****************
IDONE.

I
I
I
I
I
V

...
********.* •• ********.*.*.
I

1<---'--------------------------1
V
MMUP(56)
I
*************************
r
MORE MEMORY
UPOATE ADDRESS
.*
------------------**
POINTERS
.*
••
••

,
CZQMCFO 0-124K MEM EXER 16K
TEST 13: 3 XOR 9

DECFLO VER

00.07 20-FEB-7B 07:58

PAGE" 28

INITMM(55)

* •• *** ••••••• *** •••• ****.

*. INITIALIZE ADDRESS
**
••

••
.*

POINTERS

**~

'1.**.*.* ••• ****** •• *."

----------------------------->1
I
V
I

I
I

1
J
I

SERROR(63)

\NO..
\----------->**

DATA OK?

\..

ERROR: 3 XOR 9
FAILURE

••

••
••

** •• *** •• * •••••••••••• $$.

------------------.
I YES

1<-------------------------------1

"I
1
I

V
••••••••••• * •••

•

.COMPLEMENT DATA-

l
I

•
..
."' •••••••••••••••

1
1
1
I
1
I

•••••• * •• "' •••••••••••••••

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

/
/

DATA OK?

SERROR(63)
**** ••••••••• * ••• * •••••••
\NO
•• ERROR: COMPLEMENTED 3 ••
\----------->*.
XOR 9 FAILURE
••

\ . .

-~--- .. ----------------

••

*** •••• *** ••••••••••• * •••

I YES
I
1<----------------------------1
V

."'.*
. ••••••.••••••.

..COMPLEMENT DATA ••
*** ••• *** ••••• *.*
I
V

DATA OK?

SERROR(63)

•• * ••••••••••••••••••••••

\NO
••
ERROR: TWICE
••
\----------->*.COMPLEMENTED 3 XOR 9 ...
\
...
FAILURE
••

1 YES

•••••••••••••••••••••••••
I

1<----------------------------1
I
MMUP(56)

•• * •• * •••••• * ••••••••••••
MORE MEMORY
..
UPDATE ADDRESS
**
------------------..
POINTERS
••
••
•• * •••••••••••••••••• * •••

...

100NE
V

CZQMCFO 0-124K MEM EXER 16K
TEST 14: 3 XOR 9

DECFLO VER

00.07 20-FEB-7B 07:5B

PAGE 29

T5T14
INITMM(55)
*************************
•• INITIALIZE ADDRESS ••
••
POINTERS
••

******
-------------------------->
I
I
V

~*************.***

W3X9(57)

***$*****~**.************

I
I

••

WRITE 256. WORD
BLOCKS WITH

** -1,-1,-1,-1,0,0,0,0

••
••

*************************
I

MORE MEMORY

V
MMUP(56)
*************************
o·
JPDATE ADDRESS
**
POINTERS
**

------------------**
••

••

*************************

I DONE .
V
INITMM(55)

*************************
•• INITIALIZE ADDRESS **
••
POINTERS
••

••

*************************
------------------------->
I
V
!
I

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

r
I
I

---

*************************

\----------->.. PATTERN FAILURE ••
••
0------------------**********.*********** •••
I YES
I

1<------------------------------1
MMUP(56)

I
MORE MEMORY..
------------------..

$ERROR(63)

************** •••• ** •••••
ERROR: 3 XOR 9
••

/256. WORD BLOCKS \NO
••
I
WRITTEN wITH
I -1,-1,-1,-1,0,0,0,0 \ . .

UPDATE ADDRESS
POINTERS

••
••

••

**************.********.*
IDONE

I
I
I
I
I
II

,
CZQMCFO 0·124K MEM EXER 16K
TEST 14: 3 XOR 9

~ECFLO

VER

00.07 20-FEB-7B 07:58

PAGE 30

INITMM(55)
*.*****.** •••• ** ••• ******
•• INITIALIZE ADDRESS ••
••
POINTERS
.*

•• *******.**.*****.******

----------------------------->1
I
V
I

I
I

/
/

I
I

SERROR(63)

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

DATA OK?

**.*****.*********.* •• *.*

\NO.*
\----------->**
\

----------.-~----------

I YES

ERROR: 3 XOR 9
FAILURE

••

*** ••• ********
•• *** •• *.*.
I

1<---------------------------------1

V
.**.******* ••••••

I
I

•

.COMPLEMENT DATA.

•
*
*.**********.* •• *

I
I

-.---------------

SERROR(63)

DATA OK?

*************************

\NO
**ERROR: COMPLEMENTED 3 ••
\----------->**
XOR 9 FAILURE
••

.*..

••

\~.

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

******** ••• **.** •••••

1 YES
I
1<---------------------------------1

I
I

****************.

.COMPLEMENT DATA.

I
I
I

*.**********."****

----------------~

\NO.*
ERROR: TWICE
••
\----------->**COMPLEMENTED 3 XOR 9
\
**
FAILURE
••

/
/.

-.---------------------

DATA OK?

SERROR(63)
********.*****.****.*****

1
I

1 YES

**.************** •• **~.**
1

1<------------------------------1
I
MMUP(56)

••
••

******.******************

MORE "EMORY

...

------------------*.
••

U~ ... ATE

ADDRESS
POINTERS

••

••••• *** •• ** ••••••• ***** •
.1
lDONE
V

CZQMCFO 0-124K MEM EXER 16K
TEST 15: 3 XOR 9 (FOR PARITY)

DECFLO VER

TST15

00.07 20-FEB-78 07:58

PAGE 31

INlTMM( 55)

******~.**.**~***********

•• INITIALIZE ADDRESS
••
POINTERS

••

*.
*."' •. '***********************

----------------------------->1
1
V

W3X9(57)

I
I
I
I
1
I

***.*.*******************
••
WRITE 256. WORD
••
•• BLOCKS WITH 401 AND ••
••
-1
••

*************************

*.*.***.* ••• ****** •.• ****
I

MORE MEMORY',

------------------*.
••

MMUP(S6)

UPDATE ADDRESS
POINTERS

••

*************************

IDONE
V
INlTMM(55)
*************************

•• INITIALIZE ADDRESS
••
POINTERS

••

*****.*"'***"'***"''''''''''***'''**

-------------------.
---->1V
I
I

$ERROR(63)

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

I
/

/256. WORD BLOCKS \NO
/ WRITTEN WITH 401
AND -11
\

*************************

\----------->..

ERROR: 3 XOR 9
PATTERN FAILURE

****.**************.*~***

I YES

1<---------------------------------1
MMUP(S';)
*************************
MORE MEMORY"
UPDATE ADDRESS
*.
V

------------------..

••

POINTERS

••

*************************

IDONE
I
I
I
I
V

••
••

CZQMCFO 0-124K MEM EXER 16K
TEST 15: 3 XOR 9 (FOR PARITY)

DECFLO VER

00.07 20-FEB-7B 07:5B

PAGE 32

INITMM( 55)
*************************

.. INITIALIZE ADDRESS
**
. POINTERS

..
••

••

**** ••. ,*******.Itc********

----------------------------->1
I
V
I
I
1

$ERROR(63)

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

**.*******.*************.
ERROR: 3 XOR 9
••

\ . ..*

\NO

\----------->**

DATA OK?

I·

FAILURE

..
••

** ••• ** •• * •• ** ••••••••• *.

I YES

1<---------------------------------1

.~***************

•.COMPLEMENT DATA.•
*•• **** ••• ***** •••*

$ERROR( 63)

****.********************

1
1

\NO

DATA OK?

"ERROR: COMPLEMENTED 3.'
XOR 9 FAILURE
••

\
I

\----------~>*.

**
*.***
•• *.* •• * •• * ••••••• **

YES

1<---------------------------------1

*****************

•

.~OMPLEMENT

•

DATA-

•

****************.
I

$ERROR(63)

************************.*

1
1
1

\NO
DATA OK?

ERROR: TWICE

* •• *.*.*.* ••••• * •••••••••

1 YES

1<---------------------------------1
I
MMUP(56)
•••• ** •• *****.*********.*
MORE MEMORY..
UPDATE ADDRESS
.*

---------------.. _-..

••

\----------->
••
COMPLEMENTED 3 XOR 9 *.
\
••
FAILURE
••

POINTERS

.,
**
•• **.******************.*
I

IDONE
V

CZQMCFO 0-124K MEM EXER 16K
TEST 16: 3 XOR 9 (FOR PARITY)

,)EC;FLO VER

00. 07 20~FE;B-78 0.7; 58

PA~E

TST16
INITMM(S5)
••• *** •••••••••••••••••••
INITIALIZE ADDRESS
*.
POINTERS
••

**
••
••• ****.*** •• ***.* ••••• *.

------------------------->1
1
V
W3X9(57)
I
**.*****.*.** ••••• ~ •• ** ••
X
••
~RITE 256. WORD
*.
X
•• BLOCKS WITH -1 ANa
I
••
401
••
I
•••• * ••• ** •••••••••••••
X
I
1
V
MMUP(56)

.*
*.

MORE MEMORY

••• ~:.* ••• ***.**.*** •••• **

------------------*.
••

UPDATE ADDRESS
POINTERS

••
••

**
• ** •••••••••••••• ** ••••••

IDONE
"
INITMM( 55)
•••••••• ** ••••• ** •• * •••••
•• INITIALIZE ADDRESS **
**
POINTERS
••

•*
••
•••••• **.*** •••••••• * ••••

------------------------>1
1
V
I

SERROR(63)

----------------1256. WORD BLOCKS \NO

•••••••••••••••••••••••••

IWRITTEN WITH -1 AND\----------->..
1
401?
\.*

-----------------.-----

•• ** •••••••••••••••••••••

I
I

ERROR: 3 XOR 9
PATTERN FAILURE

I YES
I <---.-------~--..,--~-~- ---~-"'

V
MMUP(S6)
••• ****.**.* •• ****** •••• *
~ORE MEMORY..
UPDATE ADDRESS
**
POINTERS
**

------------------**
.*
**
••••• ** ••••••••••••••••••
IDONE
I

1
I
I
1
V

.....-- I

••
••
••

CZQMCFO 0-124K M~M EXER 1SK
TEST 16: 3 XOR 9 (FOR PARITY)

DECFLO VER

00.07 20-FEB-7B 07:5B

PAGE 34"

INITMM(55)

* •• ********* •• **.*.******

.* INITIALIZE ADDRESS

*.
••

POINTERS

.*
**

**
:** •• *****************

.*~.

--------------------------->1

SERROR(S3)

.......

********.**************.*

\NO
*.
\----------->**

DATA OK?

I YES

ERROR: 3 XOR 9
FAILURE

...

******.************ •• ***$
I

1<---------------------------------1

*****************

.COMPLEMENT DATA*

*****.***********
I
V

SERROR(S3)
*****************.*- •••• *

\NO
".ERROR: COMPLEMENTED 3*"
\---------->..
XOR 9 FAILURE
."

\..

DATA OK?

----_ .. _--------------I YES

********.****.******.**.*
I

1<-----------------------------1

*****************

.. COMPLEMENT DATA*

*****************
I

SERROR(S3)

********.****************

OATA OK?

/
I

\NO
**
ERROR: TWICE
*"
\---------->**COMPLEMENTED 3 XOR 9 ...
\
**
FAILURE
*.
******************* •• ***$

YES

1<-----------------------------1
I
MMUP(5S)
*.***~********.**********

MORE MEMORY

-----------------**

UPDATE ADDRESS
POINTERS

••
**

*.********.**.**.********
I

IDONE
V

CZQMCFO 0-124K MEM EXER 16K
TEST 17: PARITY BYTE TEST

DECFLO VER

00.07 20-FEB-78 07:58

PAGE 35

TST17
/ANY MEMORY PARITY\NO
••••••••••••
/
. REGISTERS?
\------------------>orST20(39) •

************

I YES
V
SETCON(57)

******************.******
FILL MEMORY WITH
ZEROS

••

.*
••

*************************
I

V
INITMM(55)
*****.*******************
I~.TIALIZE ADDRE5S
•.
••
POINTERS
••

*.
*.

**
*************************
I

WWPBT

•••••••••••
/ DOES THIS B~NK
.'WWPBT •• ----------->/
HAVE PARITY?

***********

\NO
************
\-------->.WWPB5(31) ,.

************

I YES
V
SETAE(60)

*****~*.*.***************

SET MEMORY PARITY
ACTION ENABLE ALL
REGISTERS

••
••

****~~**********.*******.

CKPMER(61)

•• CHECK FOR NON-TRAP ••
"MEMORY PARITY ERRORS ••

••

*************************
I

WWPB1
•••••••••••
"WWPBl ••
•••••••••••

------------->,/

POINTING TO
PARITY VECTOR
(114)?
I
I
I
V

\YES

*****************

,. +4 TO ADDRESS'
.0.*********
POINTER
*---------->.WWPB5(37).

\---------->*

************$****

**** ••• *.***

DECFLO VER

CZQMCFO 0-124K MfM EXER 16K
TEST 17: PARITY BYTE TEST

00.07 20-FEB-78 07:5B

PAGE 36

SERROR(63)

•• *.**** ••••••• * ••• ****.*

\NO
••
/
/ DATA STILL Zf.qO? \----------->..
\
/

••
••

.*
**
.*.*.***.*****.* •• ***** ••

I YES

WWPB2

ERROR: ADDRESSING
ERROR

1<--------------------------------1

•••• *......
* WRITE WRONG PARITY •
**WII/PB2 u---------->*INTO BYTE UNDER TEST •

...... _."' ..

..••••• ***.****.*.*******
I
V

_*.*...
"'.*
*.* •• *.....
........................••.

•••••• ** ••••••••
• READ WRONG PARITY
..
FORCING TRAP

•

•• * •••••••••
I

SERROR(63)

**.*.***.********.*******

*NO TRAP
'.ERROR: READING WRONG ••
.*****.**.*.
*--.,.------->**PARITY FAILED TO TRAPu------>*WWPB4(37),'

** ••••••••(

V MEMORY
V PARITY
V ERROR
V TRAP

PBTRP

SERROR(63)

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

----------~------

/ERROR FLAG SET IN\NO
•• ERROR: NO REGISTER ••
*.** ••••• *.*
ANY REGISTER?
\----------->.* SHOWN PARITY ERROR. * *-------> *WII/PB4 (37) ..

\.*

••

••••••• * •••••••••• - ••••••

I YES

SERROR(63)

**.* ••••••••••••••• * •••••

THIS REGIST'ER \NO
*.
ERROR: PARITY
.*
MAPPED FOR THIS \----------->**REGISTER BAD MAPPED .••
ADDRESS'!

\..

•••• * ••••••••••••••••••••

I YES

1<---------------------------------V

SERROR( 63)
•••••• *** ••• * •• * •••••••
/ALL USED BITS OF \ND
••
ERROR: PARITY
*.
/ REGISTER CORRECT? \-----------> •• REGISTER DATA WRONG •••
/
\.*
••
----~------------

-~----------------~----

1 YES

****** •••••••••••••••••••
I

1<---------------------------------1
I
V

• •••••••••••

CZQMCFQ 0-124K M~M EXER 16K
TEST 17: PARITY BYTE TEST

DECFLO VER

00.07 20-FEB-7B 07:5B

PAGE 37

SERROR(63)

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

**********************.*.

/
ARE ALL OTHER \NO
•• ERROR: MORE THAN ONE **
f PARITY REG. ERROR \----------->**REG INDICATED ERROR. **
/
FLAGS CLR?
\
**
**
I

WWPB3

YES

***********$***********
* SAVE DATA FROM BYTE *

*
UNDER TEST
•• ** •• ************~.****

$ERROR(63)

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

*****************.*******

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

*************************

/ DID SAVING DATA \NO
-.ERROR: SECOND READ OF ••
I RESET ERROR FLAG \----------->.. WRONG PARITY NOT
••
/
\ . .
DETECTED
••
I

YES

1<---------------------------------V

SERROR(63)

*************************

/ DID DATA REMAIN \NO
•• ERROR: DATA CHANGED ••
U\SHANGED WHEN
\-----------> •• DISPITE PARITY TRAP ••
ERROR TRAPPED?
\ . .
••

-----~.----------------

YES

**********.*.********** ••
I

1<---------------------------------V
***********************

.RESTORE RIGHT PARITY.
• IN BYTE UNDER TEST •

•

*****~*****************

......*....
*.WWPB4

WWPB4

IDONE BOTH PARITY \NO

.*------------->/

****.****.*

BIT SET MiD

••••••••••••
\------------->*WWPB2(36) *

CLEARED?

WWPS5

•••••••••••
/ DONE WITH THIS
•• WWPB5 •• ------------------>/
BANK?

***********

************

I YES
V

/
I YES
I
V

\NO

******.*****

************

\------------->*WWPB1(35) ..

DECFLO VER

CZQMCFO 0-124K MEM EXER 16K
TEST 17: PARITY BYTE TEST

MMUP(56)

••••• ** •••••••••• **.* ••••

**** ••• *****

MOR~

MEMORY

UPDATE ADDRESS
POINTERS

••

*WWPBT(35) *<---------------*.
."'
......... .

**
**

*.*.* ••• ' ••••• *.*.* ••• *.*.
**

IDONE
V
MAMF(60)

•• ***.*** ••••••••••• * ••••
RESET ALL PARITY
**

..*.•••••••••••••• *••••••••••.*..
••

REGISTERS
I
I
I
V

00.07 20-FEB-78 07:58

PAGE 38

CZQMCFO
TeST 20

0-124K MEM EXER 16K

OECFLO VER

00.07 20-FEB-7B 07:58

PAGE 39

***********
**TST20 **

.**********

TST20
INITMM(55)
*************************
INITIALIZE ADDRESS **
POINTERS
**

*..**.

******~.**************.**

----------------------------->1
I
v
I

I
I
I
I
I

***************.*******
• ~~PY 2K BLOCK OF
*

PROGRAM CODE INTO
MEMORY UNDER TEST

I
I

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

/010

r
I
I
I

.*********************~

"RAN~OM"

DATA\NO

COpy OK?

$ERROR(63)

.**.

********** ••• ****.*** ••• *

ERROR: PROGRAM CODE
\----------->**
COPIED CHANGE.

/
\ . .
••
----------------------*******.********* •••••••
I YES
I

1<---------------------------------MMUP(56)

*************************

I
MORE MEMORY'.
------------------..

UPDATE ADDRESS
POINTERS

**
**
**

*************************
IDONE

I
I
I
I
V

CZQMCFO 0-124K MEM EXER 16K
TEST 21: EXICUTE DATI, DATO

DECFLO VER

00.07 20-FEB-7B 07:58

PAGE 40

TST21
INITMM(55)
••• *.******.***.*.* ••• ***
•• INITIALIZE ADDRESS
POINTERS
**

*.*.

**1

**
:***.* ..... ********* •••

----------------------------->1
I
V
I

I
I

.*.********.*.** ••• **.*

..
PUT INSTRUCTION
•
'MOV R4, ( R2 ) ,
..
... AND RTS INTO MEMO,;1 ..

** ••••••••••••••• * .****
1

•• ****.******* •• *********

1
1
I
I

****.*.*.**
.*·-»>---------------->.*MAUT
••

•• ~SR TO ADDRESS UNDER ••

TEST

*.*****.**.

*.*.****** •• *.* •••• * •• *.*

*******.******.*.******
.. EXICUTE INSTRUCTION •
.. IN MEMORY ADDRESS ..
.. UNDER TEST (MAUT) ..
*~**** •• ***************

1
I
I

**********.
------------------------------«<--.*RETURN ••

I
I
I
I

I
I
I

I
I

1
I

SERROR(63)
*******************.*****
\NO
.*
ERROR: INSTRUCTION ••
III'.iTRUCTlON EXICUTE\--------->**OIDN'T MODIFY ITSELF."
I
PROPERLY?
\ . .
••

-------.---------

010 THE

-----------------.-----

.*•.

*.** •••••••••••••••••

I YES
I
1<----------------------------V
MMUP(56)

I
I

••• * •• * ••••

I
I

••

I
MORE MEMORY..
--------------....

**** ••••••••••••• *•••••
UPDATE ADDRFSS
POINTERS

:if.

••

.***

••• * *•. * •• *** ••• *.* '" *•••
lDONE

I
I
I
V

..~.

CZOMCFO 0-124K MEM EXER leK
TEST 22: EXICUTE DATI, OATO~

DECFLO VER
(~O

00.07 20-FEB-78 07:58

PAGE 41

BYTE)

INITMM(55)

TST22

*.***********************

•• INITIALIZE ADDRESS ••
*.
. POINTERS
••

**
**
****** . "t*****************
-~-~-·~---~------------------>I
v
•• *****.**.************
•
PUT INSTRUCTION
•
..
'MOV B R4. ( R2 ) ,
..
.. AND RTS INTO MEMORY ..
••• ********.***********

.
I

I
V

I
I
I
I
I
I
~
I
I
I
I

*******¥*****************
.*uSk TO ADDRESS UNDER ••
*******"'***
**--»>-----.-------. --->**MAUT
**
TEST
**

•• *.*********************

I
V

***********************
.. EXICUTE INSTRUCTION ..
.. IN MEMORY AODRESS ..
• UNDER TEST (MAUT) ..

***********************

I
I
I

1
V

***********

------------------------------«<--**RETURN *.

I
I
I
I
I
I
I
I
I

***********

I
I
I
V

$ERROR(63j

*************************

I
010 THE
\NO
** ERROR: INSTRUCTION **
IINSTRUCTION EXICUTE\----------->**DIDN'T MODIFY ITSELF.'*
I
PROPERLY?
\.*

*************************

I YES

I
I
I

***.*****************~***

***********

1<---------------------------------MMUP(56)

MORE MEMnRY

*.
••

-~~---------------.*

UPDATE ADDRESS
POINTERS

*************************
IDONE

I
I
I
V

CZQMCFO 0-124K MEM EXER 16K
TEST 23: EXICUTE DATI, DATDB (HI BYTE)

~ECFLO

00.07 20-FEB-7B 07:58

PAGE 42

INlTMM(55)

TST23

VER

*.** •• *****.*.*****.****.
INITIALIZE ADDRESS
POINTERS

••

••
••

•••• * •• ***** ••• *.********
----------------------------->1
I

••• *** •••••••••••••••••

I
I
I

•
~UT INSTRUCTION
•
"
'MOVB R3,-(R2)'
•
" ANO RTS INTO MEMORY "
••• ** ••••• *** •••••••• **

I
I

•••.••••••••••• *** •••••••
•• vSR TO ADDRESS UNOER ••
• ••••••••••
••
TEST
•• --»>---------------->**MAUT
••

I
I

••
••
•••••••••••••••••••••••••

• •• *** •••••
I

••••••••• ** ••••••••••••

I
I
I

• EXICUTE INSTRUCTION "
IN MEMORY AODRESS "
• UNDER TEST (MAUT) "

I
I

•••••••••••••••••••••••
I

••• ** ••••••

------------------------------«<--..
RETURN *.
I
•••••••••••

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

•••••••••••••••••••••••••

I
1
I

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

•••••••••••••••••••••••••

I
I
I

I
I

/
DID THE
\NO
•• ERROR: INSTRUCTION *.
/INSTRUCTION EXICUTE\-----------> •• OIDN'T MODIFY ITSELF .••
PROPERLY?
\ . .
••

1I
I

SERROR(63)

I YES

1<-----------------------------V
MMUP(56)

••••••••••••••• * •••••••••

1
MORE MEMORY..
------------------..

•*

UPDATE AODRESS
POINTERS

••
••

••

•••••••••••••••••••••••••
IDONE

I
I
I
V

CZQMCFO 0-124K MEM EXER 16K
TEST 24: EXICUTE DATIP, DATO

DECFlO VER

TST24

.* ••

00.07 20-FEB-78 07:58

PAGE 43

INITMM(55)

$********~***.*.*$***

** INITIALIZE ADDRESS **
*.
POINTERS
••

...

;$*********** •• *******

------------------------->1
I
V
•• J

*$**************.******

I
I
I
I

..
'NEG (R2)'
..
.. AND RTS INTO MEMO~Y ..

I
1
I
I
I

PUT INSTRUCTION

********.********* .****
I

V
************************.

**JSR TO ADDRESS UNOER ••
• ••••••••••
TEST
•• --»>----------------> •• MAUT
••

...

******.******.********.*.

****.******
I

I
I
I
I
I
I

••• *.** •• ***** •••••••••
• EXICUTE INSTRUCTION ..
.. IN MEMORY ADDRESS ..
.. UNDER TEST (MAUT)
..

V
***** ••• *.*

$*$*$.****.*****.*** •••
I

I
I
I

------------------------------«<--••
RETURN ••
I
•••••••••••
I
I

SERROR(63)

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

*************************

DID THE
\NO
•• ERROR: INSTRUCTION ••
EXICUTE\-----------> •• DION'T MODIFY ITSELF •••
PROPERLY?
\
.. *
••

II~;TRUCTION

----------------------I

YES

.***.**** ••••• *••••••••••

1<----------------------------------

V
MMUP(56)
******.****************$*

MORE MEMORY
**
------------------**
....

UPDATE ADDR~SS
POINTERS

**
**

*•
•• *•• ~**.***********$****
lDONE

I
I
I
\I

DECFLO VER

CZQMCFO 0-124K MEM EXER 16K
TEST 25: EXICUTE DATIP, DATDB (LO BYTE)

TST25

00.07 20-FEB-7B 07:58

PAGE 44

INITMM(55)

**********.**************

•• INITIALIZE ADDRESS
..
. POINTERS

**
****** .. ***:ilt****.****.*.*

----------------~------------>I
I
V

* ••• *** ••••• ****** ••• **

* PUT INSTRUCTION *
* 'BICB (R2)+.-(R2)'
* AND RTS INTO MEMORY *

I
I

",**",,,,**.,,,**,,,***,,,****,,,*,,,

I
I

••••••• *.** •••••••• **.***

*.*.

I
I

.*US~

TO ADORESS UNDER ••
*.**.*.*.**
TEST
*.--»>----------------> •• MAUT
••

.*.******.*
I

•• *****.*.*.* ••••• *.*****

V
.**"'*.*.*.* ••••••••••••
* EXICUTE INSTRUCTION •
• IN MEMORY ADDRESS $
• UNDER TEST (MAUT) $

I
I

** •••••••••••••••••••••

I
I

* ••• * •• * •••

------------------------------«<--**RETURN

I
I
I
I
I

•••••••••••

I
I

V
-----------------

SERROR(63)

•••

*.*."' ••• * ••• * •••••••••

I
I
I

!
DID THE
\NO
ERROR: INSTRUCTION ••
/INSTRUCTION EXICUTE\----------->**DIDN'T MODIFY ITSELF.**
/
PROPERLY?
\
**

I
I
I

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

I
I

MORE MEMnRY

.*.***.* ••••••••• *•••••• ~

I YES
I
1<---------------------------------V
MMUP(56)
*****.* •••• * •• * ••••• *
** UPDATE ADDRESS
**
POINTERS
**
**
*.*.*.***.*************.*
IDONE

.* ..

------------------**

I
I
I
V

CZQMCFO 0-124K MEM EXER 16K
TEST 26: EXICUTE DATIP, DATOB (HI BYTE)

~ECFLO

TST26

VER

00.07 20-FEB-78 07:58

PAGE 45

INITMM( 55)

******~.********~.*******

... INITIALIZE ADDRESS
*.
POINTERS

••
••

*******~************.****

------------------------->1
I
I

V
******.**********~*** ••
~UT INSTRUCTION

I
I
I

I
I

****************.*.****
I

'BISB (R2)+,(R2)'
• AND RTS INTO MEMORY ..

I
I

V
***. *********************
*.JSR TO ADDRESS UNDER ••
• ••••••••••
••
TEST
... --»>----------------> •• MAUT
••

J
I

**
**
*.* •• ********************

***********
I

******.************~***

I
I
I

• EXICUTE INSTRUCTION •
IN MEMORY ADDRESS •
UNDER TEST (MAUT) •

I
I

***********************
I

***********
RETURN ••

------------------------------«<--••
I
***********

I
1
I

I
I
V

I
I

$ERROR(63)
*************************

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

I
I
I

/
DID THE
\ND
•• ERROR: INSTRUCTION ••
/INSTRUCTION EXICUTE\-----------> •• DIDN'T MODIFY ITSELF."
/
PROPERLY?
\ . .
••

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

I YES

*************************

1<---------------------------------MMUP(56)

*************************

I
MORE MEMORY..
------------------..

...

UPDATE ADDRESS
POINTERS

••
••

••

*************************

IDONE
I

I
I
V

CZQMCFO 0-124K MEM EXER 16K
TEST 21: MARCHING l'S AND O'S

DECFLO VER

TST21

00.07 20-FEB-1B 01:5B

PAGE 46

INITMM(55)

*.***********~****.******

*. INITIALIZE
ADDRESS ••
POINTERS
••

••

.*~

**
,**************.******

MORE MEMORY
I
1------------------------------>1
I

V
***.*******************

•
WRITE 4K WITH
•
*000371-ADDRESSING ~P •

1
1
I
I

I
I.
I

I
I

•••• *** •••••• *.*.* ••• **

•• *
*A*---------------->I

**.

** •• ** •••• ** ••• **

•
..

DECREMENT
ADDRESS AND
READ WDRD

..
•

I
I

* •• **** •• **.* ••••

I
I

I
I
I
I
I

$ERROR(63)

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

***********************.*

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

•• * ••••••••••••••••••••••

I D.TA READ =DATA \NO
"ERROR: DATA READ ODES"
I
WRITTEN
\--------~-->..
NOT EQUAL DATA
••
I
\..
WRITTEN
••

*.*
I YES
*8*---------------->1<---------------------------------1
***
V
***********************

• SWAP BYTES IN CHECK *
.. REG. AND WRITE THIS ..
* DATA INTO TEST LOC . •
***,. ~******************
I

I
I
I

$ERROR(63)
----------------.*.***** ••••••• * •••
I READ TEST LOC. \NO
.'ERROR: DATA READ ODES ••
lODES IT EQUAL CHECK\----------->..
NOT EQUAL DATA
••
I
REG.
\
.*
WRITTEN
••

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

I
I
I
1

I
I

•••••••••• * ••••••••••••••

I YES
I
1<-------------------------------1
V

.*** •••••• *.****.
• SWAP BYTES IN •
·~HECK REGISTER *

1 * *
I
*****************
I

*.*.*.

CZQMCFO C-124K MEM EXER 16K
TEST 27: MARCHING 1'5 AND 0'5

DECFLO VER

I
!
I
I
I
I
I
I
I
I

FASS COUNT
0 OR 3?

\NO
\------------'--------1

----------------------I YES

*A*<-------!
!

DONE PASS?
I
V

I
I
I
I
I

YES

*****************
.. INCREMENT PASS ..
COUNTER
..

1
I
I
I

*****************
$MMUP

**MMUP: UPDATE ADDRESS **
YES
/DONE FOUR PASSES \
POINTERS
** <------/
ON A 4K?
\
/
\

....**

....

***.*****************.***
IDONE

I
I
V

NO MORE MEMORY.
GO TO NEXT TEST.

***********************

1
I

1
I
I
I
I
I
I
I

1
1

.. SWAP BYTES IN ..
.CHECK REGISTER ..

..
..

I
I
I
I

I
I

I NO
V
************~****

***************~4**.***

..
..

*****************

*UPDATE TO NEXT ..
..
ADDRESS
*

,**

00.07 20-FEB-7B 07:58

I
I
I
I
I
I
I
I

1<---------------------------------1
I
V

PAGE 47

CZQMCFO 0-124K MEM EXER 16K
TEST 27: MARCHING 1 'S AND O'S

~ECFLO

VER

00.07 20-FEB-78 07:58

PAGE 48

\YE!/
DDNE A PASS?

\------------------------1
\
V

I NO
I
I

..
INCREMENT PASS
•
*COUNTER-SWAP 8YTES IN.
CHECK REGISTER
$

I
I

**.****** ••••• *** ••••••

----------.------

I
I

/
\HO
/ PASS COUNTER =21 \

I
I

------------------I YES

V
***********************

I
I

1
I
I

RESET ADDRESS TO
80TTOM OF 4K

'"
'"

************* •••• *.****
1

1<-------------------------------1
I
I

SERROR(63)

************************.

**ERROR: DATA READ DOES ••
/DATA READ = DATA \NO
WRITTEN
\----------->**
NOT EQUAL DATA
\
**
WRITTEN
*..
/

I YES
I

•• ***************.*.*****

•••

1----'----------->*....B*,. <------------ I

*~.

------>.A .

....

CZQMCFO 0-124K MEM EXER 1SK
TEST 30: MOS REFRESH TEST

OECFLO VER

INITMM(55)
*************.~*********.*

••
••

INITIALIZE MEMORY'.
ADDRESS POINTERS

**
**-, .- * "'** **.* ** ** * *** *****
I

1---------------------------->1
I

1----------------->* ..... * *** .. * .iI-

I
I

I
I
I
I
I

I
I
I
I

• SET UP DATA PATTERN.
•
TO BE WRITTEN
•
.STARTING WITH 12S~52 *
.**** •• *.******* ••• * •• *

I
I
I
I
I
I
I

I
I

I
I
I
I
I

I
I
V

.** •• "'******.**********
•
WRITE A
•
• WORD-COMPLIMENT THE •
* DATA FOR NEXT WRITE •

.**********************
I
V
-----------------

NO
I
1

\
END OF BLOCK?
\
/ \

1-------/

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

I
I

I YES
V
MMUP(SS)

MORE MEMORY

**"'*"'*************"'******

1-----------------..
••

UPDATE ADDRESS
POINTERS

••
••

••

"''''**********************.
I
V

***********************

•* STALL FOR 2 SECONDS •*
*

***********************
I

INITMM(SS)

*******************~*****

*.
*.
*.
**
****" !t*******************

INITIALIZE MEMORY
ADDRESS POINTERS
I
I
I
V

00.07 20-FEB-78 07:5B

PAGE 49

OECFLO VER

CZQMCFO 0-124K MEM EXER 16K
TEST 30: MOS REFRESH TEST

00.07 20-FEB-7B 07:5B

PAGE 50

1--------------------------->1V
I

••••••••• * •• *** ••••••••
•
INITIALIZE DATA
*
.PATTERN FOR CHECKING.

I
I

I
I
I

•••• *

I
I

---------------·--->1
I
V

I
I
I

-••• ** •••••••••••
I

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

I YES

••••••••••••••••• ** ••••

I
I

I
I
I

V
-----------------

*
•
*••••••• * ••••••••••••••••

.COMPLIMENT CHECK DATA*

NO
/
\
I
1---------/
END OF BLOCK
\
1 / \
I

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

••••••••••• ** •••••• *****.

I
I

ERROR: REFRESH
CIRCUITRY FAILEO

1<-------------------------------1
V

\----------->**

••

/
\ . .
..
----------------------•••••••••••••••••••••••••

= \NO

/ IS OATA READ
DATA WRITTEN?

SERROR(63)

* ••••••••••••••••••••••••

I YES
V
MMUP(56)

I MORE MEMORY..
1-----------------.*

UPDATE ADDRESS
POINTERS

.*
••
.*
•••••••••••••••••••• * ••••
IDONE
I
V

CZQMCFO 0-124K MEM EXER 1SK
TEST 31: MOS REFRESH TEST

1ECFLO VER

INITMM(55)

*.*****.*****************

••

INITIALIZE MEMORY
ADDRESS POIN·SRS

**
**

••

*************************
I

1---------------------------->1
I
V
I

1----------- - ------>*******It ****

I
I
I

• SET UP DATA PATTERN'
•
TO BE WRITTEN
*
.STAQTING WITH 052525 *

I
I
I
I
I

****************~******

I
I
I

I
I

V
-----------------

I
I
V
***********************

•

WRITE A
* WORD-COMPLIMENT THE •
• DATA FOR NEXT WRITE *
************4**********

I
I
NO
/
\
1---------/
END OF BLOCK?
\
I
1 / \
1
I

----------------------I YES

*************************

I MORE MEMORY
.*
1-----------------..

••

MMI'P(5S)

UPDATE ADDRESS
POINTERS

••
••

*•

*****************~*******
V
*****~*.***************

•

• STALL FOR 2 SECONO~ •

•***********************•
I

V
INITMM(55)
****** *"'*"'****"'.*"'*"'*"'*'"
INITIALIZE MEMORY **
•• ADO~ESS POINTERS
**

******"'**"'****"'.******.**
I
I
I
V

00.07 20-FEB-78 07:58

PAGE 51

CZQMCFO 0-124K MEM EXER 16K
TEST 31: MOS REFRESH TEST

OECFLO VER

00.07 20-FEB-7B 07:5B

PAGE 52

1------------------------->1
I
V
I

.***********.**********

INITIALIZE DATA
*
*PATTERN FOR CHECKING *

I
I
1

•

*! :*****+**************

------------------->1
1
V

I
1
1

1
1
I

I
I
I

.COMPLIMENT CHECK DATA-

l
I

I
I

***********************

1
I
1

I
I
I

V
-----------------

$ERROR(63)

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

••• **********************

IS DATA READ = \NO
ERROR: REFRESH
••
DATA WRITTEN?
\----------->** CIRCUITRY FAILED
**
\.*
••
----------------------* ••• * ••••••••••••••••••••
I YES
I
/

1<------------------------------1

V
********.**************

•

NO
/
\
1---------/
END OF BLOCK
\
1
1 / \
I

I
I

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

I YES
V
MMUP(56)

.*.*

*************************

MORE MEMORY
1-----------------**

••

UPDATE ADDRESS
POINTERS

*****.*******************

IDONE

1
V

CZQMCFO
DONE

DECFLO VER

0-124K MEM EXER 16K

DONE

IPROGRAM IN MEMORY\NO
°TO BE TESTED?
\-------->1

I
I

-----0----------------I YES

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

1 INHIBIT PROGRAM \YES
I
1
RELOCATION?
\-------->1
_______________________
1
1
(SW07=1)?
\
1
I NO
V

RELTOP(58)

••• ** •••••••••••••••••• **

1
1

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

** RELOCATE PROGRAM TO .*
YES
I~~OGRAM IN BANKS \
.*
THE TOP OF MEMORY **<-----------1
0 AND 1?
\
$.
**
1
\

I
1

•••••••••••••••••••••••••
I

----------------------I NO

•••••••••• **
*START1(16)*

•• $$$.*.* •• *

RELO(59)

•• ***.***.*** •• *.**.*~*..

*.RELOCATE PROGR~M INTO**
*$
BANKS 0 AND 1
**

**...

RESLDR(59)

••••• ** •••••••••••••
*$$$*~* • • •

** •• *** ••• ***..

•• RELOCATE THE LOADER **
** AREA TO 'TOP OF.*
••
MEMORY'
**
• • • • ~4 • • • *.*.*.*** ••• $*$.
I

I
1

1
1
I

I
I

1
I
I

1
I

I
1
I
I
I

1<---------------I
V

00.07 20-FEB-78 07:58

PAGE 53

~ECFLO

CZQMCFO 0-124K MEM EXER 16K
END OF PASS

VER

00.07 20-FEB-7B 07:58

SEOP

•••••••••••••• **.** •• **

.STANDARD 'SVSMAC' END.
•
OF PASS ROU·INE
..

..••••••••••••••••••• ****..
I
V

•• ***.** ••• **.~.* •• *

: ;YPE END OF PASS /
MESSAGE
/

*******.****.*.*.*.

I
V

\YES
•• *••••••••
NO
/
••
• START1(16).<-~----. ----------/ MONlTOR PRESENT? \---------------->**EXIT

••• *•• **....

••• ***.***..

./ ----------------------

•••••• * ••••

DECFLO VER

CZQMCFO 0-124K MEM EXER 16K
MEMORY MANAGEMENT AND ADDRESSING SUBROUTINES

**."''''* •••••
I

**********************.

INITDN

INlTMM
V
***********************
-LOCATE FIRST BANK IN ..
TEST MAP
..
..

******.****************

I YES
V

***********************

•
..
.SET UP LAST ADR MASK •
..

•

***********************

I
I
I
I

I
I

----------------8K BLOCK SIZE?

\NO
\----------

••

***************~*********

I
V

1<-------------------

~'MDJWN (56)
*************************
"SEARCH DOWNWARDS FOR ••
"TOP BANK IN TEST MAP .-

I·'

V
/

..
..
..

I
V

----------------/ LAST BANK AS
\NO
/
WELL?
\----------

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

SET UP ADDRESS
POINTERS T~ LAST
POSSIBLE ADDRESS

***********************

I
V

• -RETURN ••

***********************

..
..
..

**** •••• **.

***.*******

"INITDN ••
***********

• *INITMM ••

"'****"'**"'''''''

MMINIT
V
**********.************
• SET UP ALL THE MEMORY'
-MANAGEMENT REGISTERS .•

PAGE 55

***********

*"''''*'''**''''''*'''

• *MMINIT -.
*.",ot:*******

I
V

00.07 20-FEB-7B 07:5B

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

/ LAST BANK FLAG
SET?

\NO
\--------

/
\
-----------------------

I YES
V

***********************

I
I

I
I
I

.rUT LAST ADDRESS INTO'
*
ADDRESS POINTER
*

I
I

******.****************

I
I

/
\
-----------------------

I
I

***********************

I
I

I YES
V

• SET UP SECOND BANK
•
POINTERS
•

***********************

I
I
I
I

I
I

I
1<------------------V

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

/ FIRST BANK FLAG \ND
SET?
•
/
\

I
I

\-------->------------------->1<----------------I
INITEX
V

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

I YES
V

*****************~*****

* PUl FIRST ADDRESS •
.INTO ADDRESS POINTER *
*
**.~~******************

********************.**

*
*
****_**.0********** •• **

I
I
I
I
I

* SAVE RETURN PC FOR *
LOOP ADDRESS
I
V

***********

------------------->1

•• RETURN o.

:ZQMCFO
~EMORY

0-124K MEM EXER 16K
MANAGEMENT ANO ADDRESSING SUBROUTINES

**"'* •• *****

********.**

•• ** •••••

MMUP

.·MMDOWN
I

MMDOWN
\yES

LAST BANK?

FIRST BANK?

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

I
V

***********************

••• ***.**.~****.*.*.***.*

• •• *********************.

I
I
I
I

*FIND NEXT BANK (NEXT" NONE
** CHECK FOR NON-TRAP **
*TWO BANKS IF BK BLOCK*------->**MEMORY PARITY ERRORS.**
..
SIZE)
.. FOUND
**
**

*********************..
I

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

\NO
\---------

**********.

.*RETURN **
"**********

I
I

\YES
\------------

I NO

\NO
LAST ADDRESS? . \----/
\
I
-----~----------------I
I YES
I
V
CKPMER(61I
/

I
I

/
\
-------------------

I
I

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

***.....

*.* •• ** •••• ** ••
• FIND NEXT LDWE~ 4K
BANK

I
1

•

****.***.* •• *..........

•••••••••••
.*RETURN .*

I
V

V
******************~****

I
I

** ••• * ••• **** ••••• *•• **

•

***********************

I YES

.. SET UP LAST ADDRESS ..
..
MASK
..

I
I

.. SET UP LAST ADDRESS ..
"
MASK
..
..
..

I
I
I
I

*****************.*.*.*

1<------------------------------------------------

***********************

*ADJUST RETURN ADDRESS.
..
TO LOOP
..

****.*******.:.*********
I

*******.*.*
**RETURN

***.*******

I
I

••••••• **.**.* •••••••
*AO~UST

RETURN ADDRESS ..

TO LOOP
•
..**.. •••••••••••
..
*•••••••••
I
V

*••••• * ••••

... RETURN ....

•••••••••• *

I
I
I

•• *.* ••• *.*

V
<------------

I
V

1
..
NONE FOUND
I
*------------->1

I
I

I YES

/
\
-----------------------

LAST BANK?

FIRST ADDRESS

\NO
\---\
1

..
"

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

I
I

\NO
/
FIRST BANK?
. \-----/
\
I
----------------I
I YES
I

PAGE 56

*.*"

\---------------_.-

I NO

00.07 20-FEB-7B 07:5B

***********

**MMUP

DECFLO VER

I
I
I
I
I
I

1
I

--------~~c
'/'

CZQMCFO 0-124K MEM EXER 16K
SUBROUTINES FOR ADDRESS AND WORSE CASE NOISE TESTS

~ECFLO

00.07 20-FEB-7B 07:5B

**$********

-**********
*·BANKNO

'.PHYADR .*
I

BANK NO

PHYADR V
*****************
• GET VIRTUAL ..
.. ADDRESS (FROM ..
R2)
..

**5ETCON ..

*************** ••

**********,;.
."'RETURN ••

/MEMORY MANAGEMENT\NO
/
AVAILABLE
\------/
\
-----------------------

I
I

***********************

I
I
I
I
I

I YES
V

*ADD INDEX F~CTOR FROM.
..
KIPAR2 TO GET
..
..
PHYSICAL ADR
..

***********************

SETCON

I
V

***********

I
V

***********************
.. CALCULATE BANK N
•
.. USING TEST MAP BANK ..
..
POINTER
..
***********************

***********

I
I

PAGE 57

***********

*********.,*

***********

*. INITIALIZE ADDRESS **
*..
POINTERS
.*

**
**
*.*.************* •••• ****

-------------------->1
I
V

.*********.********* •••

I
I

.. PUT THE CONTENTS OF ..
..
RO INTO MEMORY
•

I .
*
I
***********************
I
I

*************************

UPDATE ADDRESS
POINTERS
IDONE

***** .. *** ••

*********.*

***********

***.* •• ****

••

*·RETURN ....

***********
•• ROTATE ••

***********

**W3X9

I
V

W3X9

***********************

'ROTATE C-BIT THROUGH ..
..
16 BIT WORD.
..

***********************

••

***********************

.WRITE 256 WORD WITH 4.
* OF A PATTERN THEN 4 ..
..
OF A~OTHER
..

*****-*****************

***********

**********.

··RETURN ••

MMUP(56)

.*
.*
**

.***************** ••• ****

1<----------------

*.R~TURN

INITMM(551

*************************

-------------**
MEMORY

ROTATE

VER

-·RETURN **

CZQMCFO 0-124K MEM EXER 16K
RELOCATION SUBROUTINES

DECFLO VER

00.07 20-FEB-78 07:58

•• * ••••••

***"'****.*.

**RELOC

••

**RELTOP ••

"'*."'* ••• ***

RELOC

PAGE 58

*.* •• **** ••
I

REL TOP

******"'******.*"''''''''''** ••

•

MOVE BK BLOCK OF

•

DST

•
..
..

* MEMORY FROM SRC TO

NO
/
-----/

********************.*.
I
V

OAT A OK AFTER
MOVE?

$ERROR(63)
*.***********.***.*****.*
\NO
ERROR: RELOCATION **
\------>*.
FAILURE

.*
\..

I YES
V

********************

/
TYPE PROGRAM
/
/RELOCATION MESSAG~/
/
/
.*****"''''*'''.* •• ** •• *
V

.***.*****.

.*RETURN .*
***********

*.
*.

1
V

* ...... * •• * •
•• HALT
••

•••••••••••

MEMORY
MANAGEMENT?

I
V

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

***********************

• SET UP DESTINATION ..
• PART OF 'RELOC' TO ..
.POINT TO LAST 2 BANK ..

.* •.••••.•• **
•••• **** ••
I
V

RELOC(5B)

* •••••••• * •••••••• * ••••••

** RELOCATE PROGRAM TO ••
••

....

\YES
\-----

LAST 2 BANKS

****.**.*.***** •••
I

*.*....• *

• ••••••••••••••••• * ••••
I
V

RELOC(S')

•••••• * ••••••••••••••••••

.......................
•• RELOCATE PROGRAM
••
LAST 2 BANKS
..

V
*******.*****.*.** •• **.
.ADJUST ALL PERTINENT.
.. ADORESS POINTERS.
,.
..

I
V
**.****.***** ••••• * ••••
..
SET UP MEM MGMT
..
-REGISTERS TO POINT TO •
LAST 2 BANKS
..
•

*** ••••••••••••••• *.***
I

I
I

1
I
I

------------> VI <--------*••••••••••

" .. RETURN ...
* ••••••••••

CZQMCFO 0-124K MEM EXER 16K
RELOCATION SUBROUTINES

DECFLO VER

**RELO

00.07 20-FEB-78 07:5B

* •••• ***.**

••

"·RESLDR ••

lIi'*** •• *****
RHO

PAGE 59

***********
I

I
V

RESLDR

***********************

NO
/
ME~ORY
\YES
-----/
MANA~EMENT?
\----1 / \

.. MOVE "LOADER" FROM ..
.. END OF BK TO TOP OF ..
MEMORY
..
..

I
I

***********************
I

."'.*
•• * •• **
".RETURN ..

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

RELOC(58)

•••• ********* •••• *.*.*.**

•*

*.**.~*.********.***

I
V

••

•• **.*.******.*********

..
SET UP MEM MGMT
-REGISTERS TO POINT TO.
•
B.. ;~KS 0+1

.-RELOCATE PROGRAM BACK".
••
TO BANKS 0+1
**

...
***

*** ••• *****************
I

* •••• * •••••••••••••••• *

RELOC(SB)

***********************~*

*ADuUST ALL PERTINENT ..
- ADDRESS POINTERS
..

.'RELOCATE PROGRAM BACK*.
**
TO BANKS 0+1

****** ••••• **** ••••••• 4

.*
.*
*.
***.*.* ••• ***************

-------------->1<-------------I
V

***********

•• RETURN

***.* •• ***.

***********

~ECFlO

CZQMCFO Q-124K MEM EXER 16K
PARITY ROUTINES

***********

.*PESRV ,.
*** ......... *

-,SETAE

VER

***********

**MAMF

***********

f TYPE UNEXPECTED f
TRAP MESSAGE
I

*******************
I

SERROR(63)

•••• *_.*.*.******.*******

fERROR FLAG SET IN\NO
•• ERROR: TRAP BUT NO
ANY PARITY
\------>*.
FLAG
I
REGISTER?
\

*"
**
**

••••• ** •••• ****** ••••••••

***********

PESRV

******************.*

00.07 20-FE6-7B 07:56

MAMF

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

I
I
I

I PARITY REGISTER \NO
EXIST AND NOT
\-------I
INHIBITED?
\
I

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

I
I

V
*******************.*.*

I YES

.SET UP PARITY VECTOR.*

I
1
I

.****************.*.***

1<------------

***********************.*

***********

** REPORT TRA~ PC AND .,
**
REGISTER DATA
**
**
**
*************************

·"RETURN **
********.*.

PSCAN(61)

*************************

•• SCAN ME, DRY FOR ALL "*
'-BAO PARITY LOCATIONS * •

...

*'
*************************

********.*.

1<----------------------------

·*CLRPAR .*
*********.*
I

***********

I
I

IN ALL REGISTERS"

--->* SET 'ACTION ENABLE' ..

I YES

'.RETURN ••

CLRPAR

****** •••••

*****************.*****

.CLEAR OUT ALL MEMORY ..
..
.. PARITY REGISTERS
..
••• *****.*.***********.

I
V

***** ••••••
**RETURN

•••••••••••

PAGE 60

CZQMCFO 0-124K MEM EXER 16K
PARITY ROUTINES

DECFLO VER

*******
.. ***
I
NO

1<----/
I
/
I
I
I
I

INO

**"'********

I PARITY REGISTER \
EXIST AND NOT
\
INHIBITED?
\

/
/

----------------------I

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

I
I

.******** ••• ***********.'"
/ERROR SHOULD HAVE\YES
•• ERROP: PARITY ERROR..
/
TRAPPED?
\------>** SHOULD HAVE TRAPPED

\..

••

*.********.**************

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

*********************~.

I
I

\..
••
----------------------*************************

I
I

*************************

I *
---*
*

•••••••••••••••••••••••••

I
I
I

•• SCAN MEMORY FOR ALL ••
"SAD PARITY LOCATIONS."
• • • •

*************************

**
**
** ERROR: PARITY ERROR
**.*
I

PSCAN(61)

--------------->1<----------------------------V
***.**.****

/ANY PARITY ERROR \YES
•• ERROR: PARITY ERROR ••
FLAGS?
\------>*.
AT LOCATION.
••

*************************

I
1

$ERROR(63)

$ERROR(631
******~***************.**

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

I
I
I

I NO
V

"'***********"'*"'********

I •
•
I -READ MEMORY LOCATION.
1 * .
$ERROR(63)I

*******************
------------->
I

1<----/
I
I

TYPE SCANNING
MESSAGE

/ ANY ERROR FLAGS \
SET?
\
1 / \

I
I
I

v
********************
PSCAN

----------------------I
V
-----------------

I
I

PAGE 61

***"'.***"'**
**PSCAN ••

**** •• *****

**CKPMER ••
CKPMER

00.07 20-FEB-7B 07:5B

I NO

1<--------------------V
***********************
UPDAT~

ADDRESS
POINTERS

*
*

***********************

IDONE
V
$ERROR(631
----------------•••••• * ••••••• * ••••••••••
/ANY PARITY ERRORS\NO
•• ERROR: NO PARITY.'
/
FOUND?
\------>.*
ERRORS FOUND
••

\
I YES

1<-----------------------------

"RETURN ••

*********.*

***********
**RETURN ••

***********

**************.**********

CZQMCFO 0-124K MEM EXER 16K
SPECIAL PRINTOUT ROUTINES

QECFLO VER

•• TYPMAP **

*.--->1

***********
***********

***********

I
I
I

TYPMAP

**SPRNTQ **--->1

*.**.******
**>11********

I
1
1
I

.*SPRNTR •• --->1

***********

I
1

MAP CONTAIN
FLAGS?

\NO
/
\-------->/
\
/

----------------------1 YES
V

*****************.**

***********

/TYPE FIRST + LAST /
/ ADDRESS OF BANKS /
/
FOUND
/

***********

I
I

***********

**SPRNTO **--->1

****** . -***$

**SPRNT1 **--->1

****.** .. *.*

I
1

***********

**SPRNT3 .*--->1

***.*******
***********

1
1
I

**SPRNT2 **--->1

***********

I
I
V

******************.****

* ROUTINES TO SET UP •
* DATA FOR EP~OR
*
*
T~PEOUTS.
*

***********************
I
V

***********
uRETURN **

••• **** .. ***

PAGE 82

****** •••• *

*********"".
**SPRNT

00.07 20-FEB-78 07:58

••• ****.******* •• **

••••• *** ••• * ••••••••
TYPE EMPTY MAP /
MESSAGE
/
/

**~/*·**·*·*··*····

I
1
I

1
1
I

1<----------------------I

•• RETURN .*
•••• **** •••

CZQMCFO 0-124K MEM EXER 16K
SYSMAC AND STANDARD UTILITY ROUTINES

DECFLO VER

00.07 20-FEB-7B 07:58

SSCOPE

STYPE

**" ~****.** •• ** •• * •• ***

•••••••••••
•
"$SCOPE •• -->*
•••••••••••
•

CONTROLS LOOPING,
INTERATIONS, ETC.
BETWEEN SUBTESTS

•
• ••••••••••
*--> •• RETURN"
•••••••••••

•• * •••••• *•••••• * ••••••

•••••••••••
"STYPE

• •••• * •••• *

• *•••• *••••

***********

••••••••• **

***********

DATA

***+*******

•

** •• ** ••• ~* •••• * •• *.* ••

***********

********.********.*****

••••••••• **

.* ••• **.** •• ***** •••• **•

***.**.****

$TYPOC

ERRTYP

•••••••••••••••• ** •••••

•

"STYPDS *.-->*TYPE A DECIMAL NUMBER*-->"RETURN ••

•
TYPEOUT ERROR
*
•••••••••••
"ERRTYP "-->.MESSAGE, HEADER, AND '-->'*RETURN ••

.. *.*......

*****.*** ••

*-->*'RETURN ••

STYPDS

•••••••••••
'COUNTS ERRORS, LOOPS.'
•••••••••••
"SERROR **-->.PASS DATA TO SERRTYP '-->"RETURN ••

*.** •• * •• -.

ON TTY.

***********.*~*.*******

* •••••• *.* •••••••••••••

• *••••••••••••• _•••*
•••••

** •••• **.**************
* TYPES OUT A MESSAGE'

*.-->.

SERROR

••• ********

PAGE 63

• •• **** ••••

***********************

***********

•

*****.****.

"STYPOC .*-->*TYPE AN OCTAL NUMBER *-->,'RETURN *•

•

***********************

ERRTRP

SRDCHR

.*.*.**.*.*.*.* ••••• ***

***********************

.INPUTS CHARACTER FROM'
•• ***** ... **
**$RDCHR *.-->*
TTY
*-->.*RETURN **

**** •••••• * • UNEXPECTED TIMEOUT..
• ••••••••• *
**ERRTRP •• -->* TRAP (TO 4) ROUTINE .--> •• HALT
••

*.******.**

***********

••• ** ••••• *

•

.*.*.* •••••••••••••• *••

*••••••• * ...

*********************.*

•

INPUTS STRING OF
..
• •••••• ** ••
**$ROLIN •• -->. CHARACTEr'3 FROM TTY *->**RETURN .*

***********

•

***********

• ••••• ****.

****.******************

•

.'STYPAD •• -->*

TYPE AN 18-BIT
ADDRESS (OCTAL)

***********

•

SRDOCT

***********************

....

***********************

ASCII MESSAGES

•***********************'"

SPRINT

**.******* •• *********.*

."SPRINT •• -->.

.**********

RELOCATES MES~AGE
ADDRESS FOR STYPE

•
• ••••••••••
*-> •• RETURN ••

****.********* •• **.****

**** •• ***.**

***********************

*
*

ERROR DATA FORMAT
TABLE

*
,.

*******************.***
*******.***
**.END

.**********

• ••••••• **.

••
..'-->*.RETURN
***********

*********.*****~*******

•••••••••••
-CONVERTS ASCII eCTAL"
•••••••••••
•• $RDOCT •• -->. NUMBER TO MACHINE *-> •• RETURN.'
***********
*
NARY
* *.**.******

••••• *..... *

******.****

STY PAD

SROLIN

•••••••• **.

***********************

CZQMCFO 0-124K MEM EXER 16K
FLOW CHART CROSS REFERENCE LIST

BANKNO
CKPMER
CLRPAR
CTRLS
DONE
ERRTRP
ERRTYP
EXIT
GMPR
GMPRA
GMPRB
GMPRC
HALT
IN ITON
INITEX
INITMM
MAMF
MANUAL
MANUL 1
MANUL2
MAPRB
MAUT
MMDOWN
MMI NIT
MMUP
PBTRP
PESRV
PHYADR
PSCAN
RELO
RELOC
RELfOP
RESCHK
RESLDR
RESTI
REST2
RESTAR
RESTOR
RETURN
ROTATE
SELECT
SETAE
SETCON
SPRNT
SPRNTO
SPRNTI

57#
24
60N
14
53
63
63
54
08
12
12
12
03
17
55
17
32
55
38
12
15
16
13
40
17
09
17
32
57
36
60#
57#
60
03
58#
53
14
03
02
02
02#
02·
04
58
63
25
06/1
35
25
62/1
62#
62#

57
35
60

1;1#

OECFLO VER

00.07 20-FEB-78 07:58

PAGE 64

25
42

26
43

27
44

27
45

28
46

29
49

30
51

31
51

3.1
55#

63N
63N
12

04
18

04
19

08
21

11
21

58
55#

63
55

18
33
57
60N
15#

19
33

20
34

20
35

22
39

23
40

24
41

41
18
55N
18
33

42
19
55
19
33

43
21

44
21

45
55

56#

20
34

20
38

22
39

23
40

24
41

25
42

26
43

27
44

27
45

28
49

29
50

29
51

30
52

31
56#

31
56

60
57
61
53
58
58#

6111
5911
58
58

61
59
58

59N

44
60

45
60

55
61

56
62

56
63

57
63

60
15

40
58
63
26

41
59
63
57#

42
59
63
57

43
60

57#

60N

CZQMCFO 0-124K MEM EXER 16K
FLOW CHART CROSS REFERENCE LIST

SPRNT2
SPRNT3
SPRNTQ
SPRNTR
START
5TARTI
STARTA
TlMOUT
TMAP
T5Tl
lST11
15112
T5T13
T5T14
TST15
lST16
TST17
T5T2
TST20
T5T21
T5T22
T5T23
15T24
T5T25
T5T26
TST27
lST3
TST4
TST5
T5T6
lST7
lYPMAP
W3X9
WWPBl
WWPB2
WWPB3
WWPB4
WWPB5
WWPBT
$EOP
SERROR

SILLUP
$MMUP
$PRINT
$PWRDN
$PWRUP
$RDCHR
$RDOCT
$ROLlN

62#
6211
6211
62#
0611
03
02
0911
13
17
25
26
27
29
31
33
35
lB
35
40
41
42
43
44
45
46
19
20
21
22
23
13
27
35
36
37
36
35
35
54
14
30
39
63
04#
47
04
04#
0411
63
15
63

57#

17
-2
42

18
32
43

19
32
44

20
33
45

1;3/1

6311

16#
06

3911

6211
29
35#
3611

62
31
37
37

36
35
35#

37
37
38

3711

14
30
40
6311

14
31
41

09
6311
15

I)ECFLO VER

00.07 20-FEB-7B 07:5B

PAGE 65

24
34
48

26
36
52

28
37
61

37#

21
34
46

23
34
46

25
36
50

27
36
58

28
36
60

28
36
61

29
37
61

30
37
61

OECFLO VER

CZQMCFO 0-124K MEM EXER 16K
FLOW CHART CROSS REFERENCE LIST

SSCOPE
STY PAD
STYPDS
STYPE
STYPOC
.END

63'
63
10
63
63
63
63

63'
10
63111
63111
63111

63'

00.07 20-FEB-78 07:58

PAGE

CZQMCFO

CZQMCF,tJ1t

Q-t24K IiEMORY EXERCISER,
1~-FE8-78 08:19

16K VER

TITLE CZCMCFO
0 t24K "IEMORY
.. COPYRIGHT (Cl 1975.1978
",DiGITAl. EQUIPMENT CORP.
*MA YNARP. MASS, 01754

MACV 11 30A (1052)

EXE~CISE.R,

20-FEB-7e

07; 56

PAGE 2

SEQ 00B4

16K VER

.. PROGRAM BY BRUCE BURGESS/KEN CHAPMAN
"'THIS PRCGRA!\1 I.,rAS ASSEMBLEr:> USING THE PDP-l1 MAINOEC SySMAC
",PACKAGE (MA INOEC-11-DZQAC-C3), JAN 19, 1977,

13
'4

'5
'7
'B
'9
20
2'

;
ill<

23
24
25
26

;

;
;

CZQMCF,P1'

001100

oe0011
000012
000015
000200
177776
t 71774
177772
1775- j
t 77570

000000
000001
oc 0002
0"-0003
000004

000005
OOOOG6
000007
000006

0-124K TVEMORV EXERCISER,

t4-FEB-78 08:19
000007

00 DOt. J
000040
000100
oeo 140

63
64
65
66
67
68
69
70
71
72
73
74
75
76
71
78
79
80
81
82
83
84
85
86
87
88
89

, 06

, 07
108
, 09
110
111

112

ERROR
TEST

~RROR TYPEOUTS
KT11 ( AT START TI~'~ ONLY)
ITERATIONS
ERROR
ERROR
TEST IN SWR<4: 0>
PROGRAM RELOCAT leN
PARITY ERROR DETECT ION
EXRERCISING VECTOR AREA.

;.INITIAL AOOR~SS OF THE STACK POINTER "** 1100."""
STACK=
1100
.EO:.J1V EMT.~RRDR
: ;BASIC DEFIN!TION OF ERROR CALL
.EOJIV
101 ,SCOPE
: ;BASIC DEFINITION OF SCOPE CALL
; ",M! SCEL LANEOUS DEFINITIONS
HT..
11
: ;COCE FOR HORIZONTAL TAS

LF..
CR..
CRLF;::
PS=
.EQ:.JIV
STKU,~T;::

P!RO:.
OS'wR=
DDISP=

i ;CGDE FOR LINE FEED
; ;CODE FOR CARRIAGE RETURN
; :CODE FOR CARRIAGE RETURN-LINE FEED
: :PROCESSD!=I ~TATUS WORD

12
15

200
177776
P$,PS\'l
17777(1
177772
177570
177570

; ;SiACK LIMIT REGISTER
i :PROGRAM INTERRUPT REQUEST REGISTER
: ;HARD'o'IARE SWITCH REGISTER

: ;HARDWARE DISPLAY REGISTER

; "GENERAL PURPOSE REGISTER DEFINITIONS
RO=
%:'.
; :GENERAl REGISTER
Rl::
%1
; ;GENERAI. REGISTER
; ;GENERAL REGISTER
R2=
%2
; ;GENERAL REGISTER
R3=
%3
; ;GEf',;P~AL REGISTER
R4=
%4
R5;
%5
; ;GENERAL REGISTER
; ;G_NERAL REGISTER
RG=
%6
R7::
%7
;; "ENERAL REGISTER
; iSTACK POINTER
SP=
%6

16K VER

MA:"Yl1

30A(1052)

2Q-FEB-78

07:56

PC:

PRO=
PRt =

i ; PROGRAM COUNTER

LEVE L 0
LEVEL
LEVE L
LEVE L
LEVEL
LEVEL
\..EVEL

LEVEL

;lI<"S'~lTCH

REGISTERr, SWITCH DEFINITIONS
10000C
40000
20000

, ':-0000

5.,./15=
5\>/14=

0200CO

51tJ13=

010000
0(;4000
0020'00
00 t 000

SW12=

10000

SWl \;::.
SWl J=

4000
2000
1000
400
200
100
40
20
10
4

S~/09;;.

000400

S~!08:.

OC0200

SW07;.
SvlO Iii =

ueOl00

000040
000020
OC0010
COOOG4

000002
0(',0001

SW05=S\IJC4=
SW03=
SW02=-

SW01 ..
Sr.-JOQ:.

• EQ:.JIV
· ECUI V
• EQuIV
• EQUIV
• EOUl V

2
1
SW09,~.9

SW08,SVJ8

5\1-,'07,S\oJ7
5\<"06,5\'16
SWOS , 5 '.oJ 5

• EOulV

SI,":04, S'.oJ4
S~03, 5,.,r3

• EOU!V

SW02, S'.oJ2

• EO:.JI V
• EQUIV

SW01 • SI,oJ1

• EeUI v

SWOl,., SWo

1 C0000
0 .. 0000
020000

; ... DATA BIT DEFINITIONS (BITOO TO BIT1S)
BIT 15:;
100000
BIT14:s: 40000
81 T 13=
'-0000

0: 0000

BIT 12=

OO~OOO

9Il 11 =
BrTlO=
BI TO::=
BlTOB,.
B1 TO:-=aIT06=

002000
001000
000400
000200
000 terO
000040
00 0020
0':;C010

000004
000002

6i T05=

B!'i04=
BP03=
BITO:;",
B1 TOl =-

10000

4000
2000
1000

400
200

1 CO
40
20
10

PAGE 3
SEQ 0085

BAS!C D~FINITIONS

o~oooo

104
105

HALT ON
lOCP ON
1C
INHIBIT
12
INHIBIT
INHIBIT
10
BELL ON
9
LbO? ON
8
LOOF ON
7
INHIBIT
6
INHIBIT
INHI BIT
5
BASIC DEFINITIONS
15

000300
0·0340

000200
000240

91
92
93
94
95

103

USE

----------- -------- .

;",PRIORITY LEVEL DEFINITIONS
i ;PRIORITY
0
; ;PRIOR!TY
40
PP2=
100
; ;PRIDRITY
PR3=
140
:;PRIORIlY
:; PRIORITY
PR4=
2tJ
PRS 240
i; PRIORITY
PR6=
300
: iPRICRITY
; ;PRIORlTY
PR7=
340

97
98
99
100
'01
'02

,59 Tl L

57
58
59
61

SWITCH

;

CZQMCFO

OPERAT!ONAI. SWITCH SETTINGS

;
;

;
;
i'"
;
ill<
i'"

2e
29
30
3'
32
33
34
35
36
37
39
39
40
41
42
43
44
45
46
47
48
49
50
5'
52
53
54
55
56

..
..
.
..

• SB rTI.

CZOr.:CFO

CIQMCF.f:ll

Q-1241{ ME,',lORY EXERCISER,
14-~E~-78 08:19

v£f::

MA:;Y"30A(105:2)
BASIC Dt:FINITlONS
SHOG::;:

000001

113

10K

• EOLJI V

8IT09,81":"9

• EQUI V

\16
117
\18
\19
'20
121
;22
123
12'
125
,26
127
128
129
130
131
132
133
13'
135
136
'37
138
13-3
140
141
14'<:
143
144
145
146
147
148
149
150
151
152
153
154
155
156
,57
158
159
160
161
162
163
164
165
166
167
168

• EQUIV

BIT08,B!T8
81TOi,8IT7
BIT06. BIT6
ijIT05.BITS
BIT04, 81 T4
&1 TC3 11 T3
BlT02,CIT2
BIT01, ITt
BITOO,I5110

000004
O~OQl 0
0000 14

000034

TR,VVEC=34

000060
000064
000240

P TRO'JEC=240

Tr;\lE'~=
'!Pv~C:::

.SBTTL

PAGE 4

SEQ 0086

TRAP VECTO

t..CuRESSES
TIME aUT AND OTHER ERROR";
RESERVED AND ILLEGAL INSTRl.ICIICNS
I: T"
SIT
TRACE TRAP
8REAi-\?O!~T

TR ..... P (SPT)

INPUT, JUTPUT TRAP

(lOT)

hSCQPEu

?O~';ER

FAIL
~t';.U!..ATOR TRAP (E!'\IIT) **ERROR ••
"TRAP" TRAP
TTY ~EYBOARD VECTOR

TTY PR!~JTER VECTOR
PROGP.AM INTERh'-/PT REQUEST Vi:CTOR

r.ifMQ,'/Y MJ-NAGEMENT DEFINITIONS

: ... KTll VECTOR ADDRESS
MMVEC=

000250

: .. KTll

177576

172516

250
STATUS REGISTE;t:I ADGI;ESSe5.

177_12177574
177576
172516

SRD"
SRI :::
SR2=
SR3=

117572
'77574

:"'KEIH"E.l "It< PAGE DESCRIPTOR REGISTERS
Ki:P)RO= 172300
KIPDRI = 1 'i2302
K!PDR2= 172304
KfPi)R3= 17:2301)
K.PD.[~4= 172310

1 i 23CO
1723 -·2
172304

172306
172310
172312
172314
172316

KIPuP~'"

1~1312

KI?')R6= 17231~
KIPDFl7= 172316

: *KH:NEl "I" PAGE ADDRESS RE(ISTERS
K1PAI\O= 172340
K!PM~l= 172342
KlPAP.2= 172344

172340
172342
1'12344

172346

169
170
171
172
173
174
175
176
,77
178
179
180
181

16K VER
MACY 1 130A(1052)
20 .... FEP-78
MEMORY r.~ANAGdJlENT DEFINITIONS
KIPAR3=

, 7 2300

Klf:o,\R4=

li.23!:l2

KIPA;S" , 7235~
KIPAR6"" 17235t;
KIP'.R7= 112:356
UP
RW

000006

000001

AE= 1

OC(.114

PA!=lvEC=114

0,7777

MASK'~K=

: ..

202

00021 ~

203
204
205

20G

SEQ ~OB7

PARITY ME~IORY DEFINI1IONS.

; ...

182

PAGE 5

;CODE FOR UPioJA!=lDS I"AP IN MEM MpMT PDR'S
;CCOE FOR READ/WRITE IN M£M MGr.1T PO/i'S

0
6

•

07:56

172346
172350

,72354
1 'i 2356

oeoooo

183
184
185
186
187
188
189
190
191
192
193
194
195
195
197
198
199
200
201

?07

"CPU"
4

0(.0030

0('0014
(:00020
OC0024

CZQMCFa
0-124K ,..·"EMORY EXERCI~ER.
CZQMCF. Pl 1
14-FEB-79 oe: 19

208
209
210
211
212
213
214
215
216
217
218

;'8A5tC
(FIRVEC:;;

R[S'JE.C:. 10
T[31 r . . C.:;l ..
TRT'JEC'" 14
BFT\lE~'" 14
JOTV!:;.C= 20
h.;(;\!EC= 24
Ef1.1i\'f,C::: 30

0000 1 ~

07:55

"'
115

• EQUI II
• EQUI V
· [Ou! II
• EQUI II
· Eoui V
• EQuIV
.EQu! 1/

20-FEB-78

; PARITY ACTION ENA6LE
:PARI"fY iRAP VECTOR

:·,~I:::5CELLA~llOUS

ASSIGNMENTS

; MASK FOR 4K AODRES~ BANK aOUNDRY.

17177

:* CACHE REGISTEI1 DEFIN!T!ONS,
1 "17746

OOOQOO

IMPCr:E=

17-746

.SBrTL

H~AP

000174
COO 174
.::;00176

• = 174

DISH.. ttj:

(.'C' DODO
OC'0000

S\lJREG:

.SBnL

000200

000137

0!J0204

0 0167

0OO21C

000220

0001137
0001 €7
000167

000004
000006

C(IOOC4
0~51 14
OOOOOD

CATCr.ER

• =0
:><ALL USLJSED LOCATIONS FROM 4 - 776 CDNTAII~ A ".+2,HALl'''
;*SiQl:;:.t....:':E TO CATCH ILLEGAL gArS AND INTfRrUi='TS
:'"'LOCATI0N 0 CONTAI,J~· C TO CATCrl Ifv.pr·JPEi"LY LOADED VECTORS

002640
002435

,WORD
0
: ;SJFr.oJARE QISPLf..V REGISTER
•• JO~C
0
;: SPFTVJJ-RE SWI Ter! REG!STER
STARTING AD:'II:ESS(ES)
,JMP
@/{START;;JUMP TO STAF.TING ADDRESS OF PROGfHM
JIv.P
SELECT
;STARTING ADDRESS TO ALLOW fH~ PPEP,'.TOR TO

;SElECT VARIOUS

000064

JMP
JIV:P

RESTAR
RESTOR

; ,<"-::5TOR2: LOADERS TO END or: MEMORY AND H,L.L.T.

003376

JMP

T IMOUT

: TYPE OUT MI;:MORY MAP.

000046
000052

OCQQ52
0400CO
Ou0010

ADDRESS.

USING PREVIOUS PARAMETERS.
BYTE BY BYTE.

ERRTRP
0

.\·;ORO
• \\·CRD
ACT11

HOOKS

; : 'I< .... *,. .. **,,* ... ", .. 0;.

000046
014222

;:~ESTA.RT

• =ERRVEC

.SBT1L

000010

PAR,U~:'TERS.

000064

*>1> '" "'''''1' 0;.** .. * '" "'* .. ~ '" * * .. "* ... """'*,,**.

; HOOhS REQU! RED BY ACT 11
$5 IJPC=.
• ;::4f
$E:~0AD

• =52
,WORD
• =$SVI

BIT14

*'"

.'I'>i<

*"'.** ......... ** "'.

:SAVE FC
;; 1 )5ET

LOC,46 TO ADDRESS OF SEN!;)AD IN ,SEOP

;;2)SET

lOC,52 TO BIT14

;;

RESTORE PC

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

ClQMCFO
CZQMCF.Pl1

0-,24K MEMORY EXERCISER, 16K VER
MAr.Y11 30A(1052)
14-FEB-78 08:19
ACT11 HOOK:)

219
220
221

000300

:.
; ;

000+144

006202

006001
103404

000452

0627C'O

000456
000460
000462
000466
000472
000476
000500
000502

, 00372
000000
010037
000137
062700
006202
006001
103373

000504

0100:17

000510

000410

000512
000516
000522

016700
062700
010006

000524

062700

000530

000110

000532

022767

SEQ 0088

THE FOLLOWING ROUTINES ARE LOCATEP IN THE VECTOR AREA (0-1000) SO THAT
THEY CAN BE ~ROTECTED ey SE LECTlNG SWOS (SeE DOCUMENT FOR USE OF SW05).

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

THE coce CAN ALSO 8E R:UN FROM ANV BA.NK OF MEMORV. ASSUMING MEMORV

000446
000450

PAGE 6

; ; .................. * .... ** ............................ "' ................... ill . . . . . . . . . . "'.
:.
:.

000300 005005
000302 000401
000304 010705
000306 0 1 2706
000312 0\.0576"/
000316 001002
0003.20 000167
000324 005767
000330 001470
000332 032737
000340 - 00103.
000342 012700
000346 012701
000352 012720
000356 005301
000360 001374
000362 012100
000366 OC50.20
000370 012720
000374 0, 2720
000400 012720
000404 O! 2720
000410 0'2720
000414 012720
000420 012720
000424 012737
000432 005000
000434 0, 6701
000440 016702

07:56

,=300

222
223
224
225
226
227
22B
229
230
231
232
233
234
235
236
237
23B
239
240
241
242
243
244
245
246
247
24B
249
250
25,
252
253
254
255
256
257
25B
259
260
261
262
263
264
265
266
267
26B
269
270
271
272
273
274

20-FEB-7S

MANAGEMENT IS OISA6LED BY "CONSOLE STAPT".

........... '"

RESTAR: CI1

BR
RESTOR: MOV
REST':
MOV
TST
BNE

0011 00
001206
002330
000256
00000'

R~ST2:

177572

172300

000010
077406

000200

000400
000600
001000
001200
001400

007600
000001

~TARTA

;GO START

M~'AVA

:CHECK IF ME" MGMT AVAILABLE.
:BR IF NO MEM MGMT,

BIT

NBITO.

2$
NKIPDRO,RO
N8.,
R1
N077406, (RO)+

MOV

;SET UP COUNTER.

:MAP FIRST 2BK l-FOR-l.

Ri
1$
NKIPARO. RO
(RD)+
1200.
(RO)+

;COUNT REQESTERS.
;BR IF MORE REG.
; POINT TO FIRST MEM MGMT ADDRESS REG.

N400.

(RO)+

N600,
Nl000.
111200,

(RD)+
(RO)+
(RO)+
(RO)+

; PARO MAPPED
jPAR1 MAPPED
;PAR2 MAPPED
;PAR3 MAPPED
; PAR4 MAPPED
;PARS MAPPED
;PARS MAPPED

INTO
INTO
INTO
INTO
INTO
INTO
INTO

BANKO.
BANK1.
BANK2.
BANK3.
8ANK4.
BANKS.
BANKS.

(RO)+
... SRO

:PAR7 MAPPEO INTO BANK37_
:ENABLE MEM MGMT.

25:

CLR
MOV
MOV

RO
PRGP,tAP. R1
PRGMAP+2.R2

; INIT TEMP PAR REG.
;GET THE PROGRAM MAP ••• LO 64K.
; ••• HI 64K.

3S:

ASR
ROR

R2
Rl

:SHIFT THE MAP POINTER ••• HI
: ••• LO.

BCS
ADD

4$
11200,

BPL

5$:

172342
10$:

177432
000042

; CHECK IF MEM MGIVIT ACTIVE.
:BR IF MEM WG',lT ALREADY SET UP.
:POINT TO FIRST MEM MGMT DDATA REG.

N1400,
#7600,
NBITo,

45:

000062
0011 00

.,SRO

MOV

000200
172340
000472
000200

lOS

BNE
MOV

Mev
177572

000142
000140

000003

uMP

DEC
BNE
MOV
CLR
MOV
MOV
MOV
MOV
MOV
MOV

172340

;CLEAR FLAG TO INDICATE RESU1T.

:GO RESTORE PROGR.M BEFORE RESTARTING.
:PUT DATA INTO FLAG FOR RESTORE.
:SET UP THE STACK POINTER.
: CHECK I F THE MEMORY HAS BEEN MAPPED.
: SR I F MEMORY MAPPED.

TST
BEQ

MOV

1$:

RS
REST1
PC,
R5
NSTACK, SP
MEMMAP
REST2

205:

HALT
MOV
JMP
ADO

RO.

ASR

.R'5$
1200.
R2

ROR
BCC
MOV

Rt
S$
RO,

;BR WHEN FIRST BANK FOUND.
;UPDATE TMP PAR To:' NEXT BANK.

:SR IF MORE.
;FATAL ERROR!!!
MAP EMPTY?
CIINKJPARO ;PUT TEMP PAR INTO FIRST PAR.
; JUMP INTO PROGRAM IF NOT THERE ALREADY.
RO
;KEEP UPDATING TEMP PAR REG.

:SHIFT POINTER ••• HI
.NKIPARl

; ••. LO
:BR IF TOP BANK NOT VET FOUND.
;SET UP SECOND PROGRAM ANK POINTER.

205

:BR TO RELOCATE SECTION.

MOV
ADO
MO"
ADD

RELOCF. RO
'STACK, ftc
RO,
SP
N20S-STACK,RC

;GET RELOCATION FACTOR.
,SET UP STACK POINTER.
;SET STACK TO RELOCATE PROGRAM.
;ADJUST RO TO RELOCATED "20$11 ADDRESS.

JMP
CMP

(RO)
'3,

:GO TO "20S" (RELOCATED).
PRGMAP: CHECK I F PROGRAM I S IN BANKS 0 AND 1.

/ ;<

CZQMCFO
0-,24K MEMORY EXERCISER, 16K VER
MACY11 30A('052)
CZQMCF_Pll
14-FEB-780B:19
ACT11 HOOKS
275
276
277
27B
279
2BO
2Bl
282
2B3
284
2B5
2B6
2B7
2BB
2B9
290

000540
000542
000546
000550

000552
000556

000562
000566

000572
000574

001402
004767

016;014

21$:

005705
001006
005067
105067
000167
004761
OCOOOO
oe0167

000412
000320
005316

CLRB
JMP

000000
000000

PAGE 7
SEQ 00B9

HELD

:BR IF IN BANKS 0 AND 1;RELOCATE THE PROGRAM BACK TO BANKS 0 AND 1.
JCHECK RESTART/RESTORE FLAG.

:BR IF RESTORE.
;CLEAN UP BEFORE STARTING.
; RESTART WITH PREVIOUSLV SELECTED PARAMETERS.

22$:

002054

START A
;CONTINUE WILL RESTART THE PRCGRAM.
;* Tt-!E FOLLOWING LOCATIONS ARE USED SV THE ABOVE ROUTINE AND MUST BE LOCATED
BELOW 100e TO INSURE CORRECT OPERATION UNDER THE WIDEST VARIETY OF
:. C I RCUMS TANCES.
RELOCF: .WDRO
0
:CONTAINS RELOCATION FACTOR (NO MEM MGMT)
PRGMAP: .WORD
0,0
:PR09RAM MAP - WHERE THE PROGRAM IS LOCATED
MMAVA:
.WORD
0
;MEMORY MANAGEMENT AVAILABLE FLAG.

000000
000000

JSR
HALT
JMP

21$
PC,
R5
22$
STIMES
STSTNM
STARTl

07:56

016476

000600
000602
000606

BEQ
JSR
TST
BNE
CLR

20-FEB-7B

PC,

RES LOR

:RESTORE THE LOADERS TO THE "TOP" OF MEMORY.
;HALT AFTER RESTORING THE LOADERS.

CZQMCFO
0-124K MEMORV EXERCISER,
CZQMCF. P, I
I 4-F EB-7S 08: 19

16K VER
MACY 11 30A( 1 052)
2a-FEB-7S
POwER DOWN A;m UP ROUT INES
.SBTTL

29'
292
293
294
295
296
297
29B
299
300
301
302
303
304
305
306
307
30B
309
3'0
311
312
313
314
315
3'6
317
318
319
320
321
322
323
324
325
326
327
328
929
330
33'
332

;

OOOS10
000616
000624
000626
000630
000632
000634
000636
000640
000644
000650
000656
000660

012737
012737
010046
010146
010246
010346
010446
010546
0' 7746
010667
01 2737
000000
000776

000662
000070
000674
000700
000704
000706
000712
000714
000716
000720
000722
000724
000726
000734
000742
000746
000750
000752
000754
000756
000760
000762

012737
016706
005067
0052:,7
001375
0' 2677
012605
012604
012603
012602
0:2601
012600
012737
012737
004567
025641
012716
a003CO
000002
000000
000776
00 0000

000756
000340

000024
000~26

000274
000112
000~62

000024

000756
000066
000062
000056

000024

000610
000340
022544

000024
000026

CZQMCFO
0-124K MEMORY EXERCISER,
14-F EB-78 06'19
CZQMCF. P11
333
334
335
336
337
33B
339
340
34'
342
343
344
345

346
347
34B
349
350
35,
352
353
354
355
356
357
35B
359
360
3S'
362
363
364
365
36e
367
3GB
3S9
370
37'
372
373
374
375
376
377
378
379
3BO
3B'
382
3B3
384
3B5
3B6
3B7
3SB

PAGE 8
SE~ 0090

POWER DOljlN AND uP HOUTlNES

: • • "' . . . . . . . . . . . . . . . . . . "' . . . . . . . . . . . . . . -oJ< • • "'''' "' . . . . "' . . . . . .

*.* •••• * .... * .................... .

: PoWE R OOWN ROUT I NE
$PWRDN: MolJ
NSILLUP,(iIINPY,'RVEC ; :SET FOR FAST UP
MoV
N340,~#P,oJRVEC+2 : ;PRIo:7
MOV
RC,-(SP)
: :PUSH ~o ON STACK
MOV
Rl,-(SP)
: :PUSH R1 ON STACK
MOV
R2,-(SP)
: ;PU5H R2 ON STACK
MOV
R3,-(SP)
: ;PUSH R3 ON STACK
MOV
R4,-(SP,
;;PUSH R4 ON STACK
MOV
RS.-(SP)
j;PUSF RS ON STACK
MOV
~SWR,-(SP)
: :PUSH e>SWR ON STACK
MOV
SP,SSAVR6
; ;SAVE SP
MOV
ItSPWRUP , • .,PWRVEC ;; SET UP VECTOR
HAL,·
.-2
BR
; ;HANG UP
: : "' ............. lie . . . . . . . .

000226

07: 56

*."' ..... '" "' ............ "...... * ..... * .. *............... *.* ...... .

;POWER UP ROUTINE
$PWRUP: MOV
w$ILlUP,&lNPWRVEC : ;SET FOR FAST DOWN
Mav
SSAVR6,SP
::GET SP
CLR
SSAVR6
; :WAIT LOOP FOR THE TTY
1$:
INC
SSAVQ6
; :WAIT FOR THE INC
BNE
1S
; :OF
~oJORO
MOV
(SP}+,~SWR
; ;POP STACK INTO @SWR
MOV
(SP)+,R5
:;POP STACK INTO RS
MC·J
(SP)+.R4
; ;POP STACK INTO R4
Mev
(SP}+,R3
; :POP STACK INTO R3
MOV
(SP)+, R2
; : POP STACK INTO R2
MOV
(SP)+,R1
; ;POP STACK INTO R1
MOV
(SP)+.RO
; ;POP STACK INTO RO
Mav
#$PWRDN,@/tPWRVEC ; :SET UP THE POWER DOWN VECTO~
Mav
i340,IjI#PloJR\'~C+2 ;: PRIO: 7
JSR
RS,
SP."!NT
:GO PRINT OUT THE FOLLOWING MESSAGE.
$PWRMG: .WORD
PWRMSG
; ;PO~lER FAIL. MESSAGE POINTER
MeV
(PC)+, (SP)
; JRESTART AT RESTART
RESTART·
; ;RESTART ADDRESS
$PWRAD: .WORD
RTI
SILLUP: HALT
.-2
BR
5SAvR6: 0

MA":V11
'6K VER
COMMON TAGS

.S8TT '-

30A('052)

20-FEB-78

07 :S6

PAGE 9
$~O

COMMQN TAGS

; ; '" "" "',.. .. or . . . . . ~ ....

* >II. Ijt:** '" *.* ... ** **,... "' ..... "' ........... "' ........... ", •• ~ .. * ••

: *THI 5 TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS
;-useD IN THE PROGRAM.
001100
001100
001100
001102
001103
001104
001106
001110
001112
001114
001115
001116
OOt 120
001122
001124
0011.26
001130
001132
001134
001135
001 I 36
001140
001142
001144
001146
001150
001152
001154
001155
001156
001157
001160
001162
001164
001166
001170
001172
001174
001200
001201
001202

, =1100
SCMTAG:

000000
000
oeo
000000
000000
000000
ocOOOO
000
00'
000000
000000
ocoooo
000000

$TSTNM:
SERF! .;:
SlCNT:
$LPA.DR:
$LP:;:RR:
SERTT\. :
$1 lEMa:
$ERI;lAX:
$ER~PC :
SGDADR:
SBDADR:
SGODAT:
SBODAT:

DuOCOO
000000
000000
000
000
000000
li7570
177570
177560
177562
177SC;4
, 77566
000
OC2
0'2
000
000000
000000
000000
ooooco
000000
000000
177607
Oi7
0'5
000012

SAUTOB:
$INTAG:

000377

; ;START OF
.WORD
• BYTE
• BYTE
.WORD
.WORD
.WORD
.WORO
• BYTE
• BYTE

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
• BYTE
• BYTE
.WORD
.WORD

SWR:
DISPLAY: .WORD
STKS:
17756(
$,KSl
177562
STPS:
177564
, 77566
STPS:
$NUlL:
• BYTE
$FI L.LS: • BYTE
SFIUC: • BYTE
S7PFlG: • eYTE
$TMPO:
.WORD
$TMP1 :
.~or,J
STMP2 :
.WORD
$TMP3:
.WORD
STJ ME.S: 0
$ESCAPE: 0
SBElL.:
.ASCIZ
SQUES:
.ASCI I
SCRlF:
.ASCI I
$LF:
.ASCIZ

0
0
0
0
0
0
0
0

,
0
0
0
0
0
0
0
0
0
0
D5WR
DOISP

~OMMO~

TAGS

; ;CONTAINS THE TEST NUMBER
: ;CONTAINS ERROR FLAG
; iCONTAINS SUB TEST ITERATIO~ COUNT
: :CONTAINS SCOPIi LOOP ADDRESS
: :CONTAINS SCOPE RE TURN paR ERRORS
; iCONTAINS TOTAL ERRORS DETECTED
: :CONTAINS ITEM CONTROL eYTE
: :CONTAINS tlAX. ERRORS PER TEST
; ;CONTAINS PC OF LAST ERROR IN'TR~pION
; ;CONTAINS ADDRESS OF 'GQOQ' PAT~
: :CONTAINS ADDRESS OF I ~AD' DATA
; ;CONTAINS 'GOOD' DATA
; ;CONTAINS ' BAD' DATA
: : RESERVEO--NOT TO BE USED
; ;AUTOMATIC MODE INDICATOR
; ; I NTERRUPT MODE INDICATOR

: :ADORESS OF SWITCH REGISTER
; :ADDRESS OF DISPLAV REGI$TER
; :TTY KBD STATUS
: ;TTY KBD B:.JFFER
: :TTY PRINTER STATUS REG. ADORES.
;; TTV PRINTER BUFFER REG. ADDRESS
0
; ;CONTAINS NULL CHA~ACTER FOR FILLS
2
: :CONTAINS If OF FILLER C;:HARACTER!;i REQUJREQ
;: INSERT FIL.L CHARS. AFTER A. "LINE FEED"
'2
0
;: "TERMINAL AVAILABLE" FLAG (BI T<P7>.0.y~S)
0
; ;USER DEFINEO
0
; ;USER DEFINED
0
: ;USER DEFINED
0
; ;USER DEFIt~ED
; ;MAX. NUMBER OF ITERATIONS
; : ESCAPE ON ERROR ADDRESS
<207><377><377> ; ; CODE. FOR BELL
; :OI,JESTIQN MAFlK
/7/
<15>
; :CAR~IAGE P.ETURN
<:12>
;: LINE FEED

; : •• * .... * .. "' .. * '" "' .................... *., . . *'" "' ..... '" '" "' .. * ... * * ............ * >II . . . . . . . . . . . . . . . . . . . . . . "''''

• SBn L

APT M.AILBOX-ETABlE

; : "'. "'. ** ............ '" *.* •• ~, ...... II: *. * * ....... * "' .. *. * ...........................
00 I 204
001204
001206
001210

oooaoo
000000
000 aDo

• EVEN
$MA! l:
$MSGTV:

.WORD

$FATAL:
$TESTN!

.WORD
.WO .. ;>

AMSGTY
AFATAL
ATESTN

APT MA I LBOX
MESSAGE TYPE CODE
FATAL ERROR NUMBER
TEST NUMBER

ooal

0- I :24K f, EMORY EX'RCISoR,
CZQMCFO
14-FE,B-78 OB: 19
CZOMCF. ~'11

36e
390
391

392
393
394
395
396
397

39B
399
400
401
402
403
404
405
406

407

001.2 1,2
001214
001216
00' 220
C01.:?22
001224
001224
001223
001226
001230
001232

c: 0000

$FASS:
.WORD
$CE:,\ICT: .WORO
SUN IT:
.WORO
$MSGAO: .WORO
$t($uLG: .WOR~
$ET4.BLE:
$ENV:
• BYTE
$ENVM I
• BYTE
$S,.,'REG: .WORO
SUSWR:
.WORD
$CPUOP: .WORO

O'OJOO

DC 0000
000000

oeoooo
000
000

ocoooo
ocoooo
000000

:
:

483

496
497
49B
499
500

,.:-

000
000

$MhMSl :
$MTYP1 :

,-..
,.

• BYTE

.aYT:;

AMAM51
AMTYPl

00 I 236

000000

$MADR1 ;

.WORD

AMAOR1

001240
001241
001242
001244
001245
001246
001250
001251
001252
001254
001256
001260

000

$MA/o,lS.2 :
$MT '(P2:
$MAOR2 :
$MA't.S3 :

• BYTE
• BYTE
.WORL>
.BYTE
• BYTe
• WORD
• eYT~
• B) rE

AMAMS2
AMTYP2
AM.\DR2
AMM'IS3
AMTYP3
AMAOR3
AMAMS4
AMTYP4
AMADR4
AVECT 1
AVECT2
A9A$E
AOEVM
ACDW,
ACDw2
ADDwO
AoeW1
ADOW2
ADOW3
AOD\!J4
ADOWS
ADDw6
ADOW7
AODw8
AODW9
ADDW10
AOO;':11
ADOW' 2
.\OOWI3
AOO\tll14
ADOW15

:
:

ClO 1262

001264
001266
001270
001272
001274
001276
001300
001302
001304
001306
001310
001312
001314
001316
001320
001322
001324
001326

000
000000
000
000
000000
000

$l\lTY~3:

$Ml1.0R3 :
$~I.\'v1S4:

oeD

$M1 '(P4:
$MA;)R4 :
$VECT1 :
SVECT2:
$8ASE!
$OEIII\>1:

acoooo
OC!QOCO

ocooee

oooaeo
0('00('0

ocoDeo

.~ORO

.WORD

.WO.:.)
.WORD

.wORD

•• 0RO
.wORD
• WORD
.WORD
$00", :
.WOMD
$OOW' :
$DO ..!3:
.WORD
$001'.'4:
.WORD
$00.-;5:
.\\"ORD
$.JDlAIC;
.WORD
$DOwi:
• ~.1RD
$00 •.;0:
.WORD
$DQ ... I}:
.wORD
SDCw
.wORD
$DO:r~l' : .WORO
$DOIJ12: .WORO
SDD'N13: .wORO
$DDW14: .WORO
$00.,5: .WORO
$CDW' ;

$co ... 2:
$OO'lJO:

oeoooo
000000
oooocO
000000
0000'".0
ooooeo
oeoooo
000000
000000
000000
000000
0"0000
000000
000000
000000
000000
000000

CZOMCFO
0-124K MEMORY EXERCISER,
CIQMCF. Pll
14-FEB-78 08:'9

464
4B5
486
4B7
488
489
490
491
492
493
494
495

AENV
AENVM
ASWREG
AUSWR
'CPUOP

00123.
001235

411

.45
446
447
44B
449
450
451
452
453
454
.55
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
490
481
482

APASS
ADEVCT
AUNIT
AMSGAD
AMSGL.G

:'
:-

408
409
410
412
413
414
415
416
417
418
419
420
421
422
423
.24
425
426
427
426
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444

MACY11 30A( 1052)
APT flAI L.BOX-ETABLE

20-F£B-7B

t 6K VER

16K VEP.
MACY11 30A(1052}
APT MAIlSOX-ETA!;3LE

07 :56

PAGE 10
SEQ 0092

PASS COUNT
DEV ICE COUNT
I/O UNIT NUMBER
MESSAGE ADDRESS
MESSAGE LENGTH
APT ENV IRONMENT TABLE
ENVIRONMENT BYTE
ENVIRONf,lENT MODE BITS
APT SWITCH REGISTER
USER SWITCHES
CPU TYPE,OPTIONS
TS 15-1 111iCPU TYPE
11/04001 ,11/05*02,11/20-03,11/40.04,11/45.05
11/70IllQ6,POOs07,Q_10
BIT 10.REAL TIME CLOCK
BIT
9 ... FLOATING POINT PROCESSOR
B':IMEMORY MANAGEMENT
BIT
::HIGH ADDRESS,M.S. aYTE
: :MEM. ", (PE,8lKh1
MEM. TYPE BYTE
(HIGH eYTE)
900 NSEC COPE-OOI
300 Nsec BI POlAR=OO2
500 NSEC MOSsOO3
; ;HIGH ADDRESS.BlK';1
MEM.lAST AODR."'3 BYTES, THIS WORD AND LOW OF -TYPElI ABOVE
; ;HIGH ADDRESS,M.S. BYTE
; ;MEM. TiPE.BLK .. 2
;;MEM.Lt.ST ADDRESS,BlKN2
;;HrGH ADORESS,M.S.BYTE
; ;MEfI" TYPE, BLK/il3
: ;MEM. LAST ADDRESS,8LKN3
I iH!GH ADDRESS,M.S.BYTE
; :MEM. TYPE,BLKI14
; ;MEr,l,LAST ADDRESS, BLKN4
;; INTEr<RUPT VECTOR." BUS PRIORITY"1
:; INTERRUPT VECTOR#~BUS PFtIORITYII2
; : BASE ADDRESS OF EQUIPMENT UNDER TEST
: :OEVICe: :\"'lAP
: ;CONTROLLER DESCRIPTION ~'ORON1
i ;CONTROLLER DESCRIFTION Ii!ORON2
: :DEVICE DESCRIPTOR WORD.O
; ;OEVICE oeSCRIPTOR WORD,,"'
; ;DEVICE DESCRIPTOR WORDN2
; ;DEVICE DESCRIPTOR WORDN3
; ;OEVICE DESCRIPTOR WORDII4
: ;DEVICE DESCRIPTOR WORON5
; ;DEVICE DESCRIPTOR WrJRO"S
; ;DE\iICE DESCRIPTOR WORD"?
::DEVICE DESCRIPTOR WORONS
; ;DEVICE OESCRIPTO~ WCRON9
: ;DEVICE DESCRIPTOR WOROIlIO
;;DEVIO:E DESCRIPTOR W:)RON11
; ;DEVICE DESCRIPTOR WORDN12
::O_VICE DESCRIPTOR WORD"3
; :"EVICE DESCRIPTOR WORON14
: ;OEVICE DESCRIPTOR WORDNtS

20-FEP-78

07:56

PAGE 11

SEQ 0093

SETEI\D:
.MEXlT
• SBTTL APT PARAMETER BLOCK

001330

; : "' .. *,.. . . "' ...... ,. .. ,. . . **
"'* .... II<
** '" •••••
;SET LOCATIONS .24 AND 4"-: AS REOUIRED FOR APT
: ; ...................... "'''' ..... '" "'''' "',.. '" '" '" "'*. "' . . * ..... "' ......... oIt ................ • • • • • • • • • • • • • •
>10

Ii:.", '" "' ... ,..

00: "' .... '" '" "' • • '" "' .... "'. "',.. • • • • • • • • • III.

III "'.

0000.24
000044

001330
OC0024
000200
OC'0044
001330
001330

• $X=.
.",24
200
.=44

; : SAVE CURRENT L.OCA TION
; ;SET POWER FAIL TO POINT TO START OF PROGRAM
; jFOR APT START U~
:;POINT TO APT INDIRECT ADDRESS PNTR.
$Ar"'~IOR :; POINT TO APT HEADER BLOCK
.=.$X
: ;RESET LOCATION COUNTER

;;' ......... * ...... "'"~ ....... "' ... "' ... *................ * .... **"'* .................. "' ............... .
;SETUP APT Pa.RAMETER BLOCK AS DEFINED IN THE APT-PDPlt DIAGNOSTIC
; INTERFACE SPEC.

001330
001330
001332
001334
001336
001340
001342

$APT'""'D:
$HISlS:
$MBADR:
$T5TM:
$PASTM:
SUNI TM;

ooooco
001204
004540
000170
000360
0000~.2

.S6TTL

.WORD
0
;:TWO HIGH BITS OF lB BIT MAILBOX AOOR.
.WORD
$MAIL
::ADDRESS OF APT MAILBOX IBITS 0-15)
.wORD
2400.
: ;~UN TIM OF LONGEST TEST
.WORD
1;20.
:;RUN qt.1E IN SEeS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY)
.WORD
240.
;:ADOITIONAL RUN llf,lE {SECS} OF A PASS FOR EACH ADDITIONAL UNIT
• WOR!)
$ETE,~D-$MAI L/2 :; LENGTH MAl LBOX-ETABLE(WORDS)
APT STATISTICS TABLE

; ; * '" "' .... *. Of: * •• " * ... "' ••
001344
001344
001350
00 I 354
001360
0013134
001370
001374
001400
001404
001410
001414
001420
00 I 424
001430
001434
001440
001444
001450
001454
001460
001464
001470
001474
00 I 500
001$04
001510
00151.2

$ASTAT:
177777
177777
1 7777
177777
177777
177777
'77177
177777
177777
177777
177777
'77771
177777
177777

177i77
177777
,71777
177777
177777
1 ':7777
1777,7
177777
1"i7777
1777:"7
1 ~'7777
177777
0013"14

000000
000000
000000
000000
000000
ooooao
000000
000000
000000
000000
000000
000000
000000
00u000
000000
000000
000000

.WORD
.WORD
.WORD
.I,>,QRD

-1,0
-,
-1,0
-t,O

.\\ORD

-1,0
-1,0

DaDoeD

.wORD
.WORD
.wORe

OOODOO
000000
000000

ooooeo
000000
ooaoeo

000000

.I'.'ORD
.~\ORD

.WORD

.\\'ORO
,I'.ORD
.....'ORO
.l~ORD

• WORD
.wORD
.I'.'ORD
• WORD
.WORD

.WORD

.\\'ORD
.WORD
.WORD
• WORD
$ASTENO:
$APTR:
$ASTAT

-1,0
-1,0
-1,0
-1,0
-1,0
-1,0
-1 .0
-1.0

-1. a
-1,0
-1,0
-1,0
-1,0
-1,0
-1,0
-1,0
-1,0
-1,0

-1 ,0
-1

Ii: ....... "' .............

*'" _.. * .. __ ............... ** .... III. ** ........ *.

, Pl1

0-124!\ rv:[MOf(Y EXERCISER,
14-fE8-78 08: 1 9

HiK vU,

501

;

f OL l:J\'J I ~,G TAGS ARE USUl
;"~" ~ * ~ oj.""~,, ~ ~",* .. ** ..

001514
0015Hi

OC Qot')
070032

RESRVD:

, wOf(O
• viORD

001520
001522
001524
001524
001526

oeoooo

001530
U01532
001534
001534
001536
001540
001540
001542
001544
00' 54-'l
C01546
00'550
001550
001552
001554

001 SS6
001557
001560
001562

.I'.'ORO
• \' 'lRD

lI",\D:
LOOISP:

O()()OOO

567
568

569
570
571
572
S73
574
575
576
577
578
579
580
5B1
582
5B3
584
585
586
5B7
5B8
589
590
591
592
593
594

000000

• \\lORD
• \'\lORO

oroooo
TSTMAP:

.I/IORD
• ~iDRD

OOOOCO

ocoooo
St.VT$T:
000000

• WORD
" wORD

ocoooo
000000
000000

• WORD
,I.'IDRD
BITPT:
.\~OFW

000000
000000

, WORD
TMPPT:

00 0000

oeoooo
MMORE:

000000

SELF LG:
FLAG8K:
O(FLG:

000

OCO

oeo
001562
Oe0000

001564
001566

000000

00'570
001574

COOOCO
OGOOCO

001576
001600

ooooeo

ooooeo
000000

O~OCOo

001602
001606
OOi 61 0
COl 51 2
001614
001616
001620

000000

• WORD
, WORD
• vJORD

FSl"ADR:

, BYTE
, B,YTE
, BYTE
• [VEN
• WORD

TMPFAO:
FAO\lSK:

• WORD
• wORD

Ft.C\1AP:
LSiADR:

wORD
• \"O.t<Q

TM?LilD:
LAO.,1SK:

• 'NORD
• wORD

LAC:.1AP:
BLK',1SK:

, \'lORD
• \vORO
.J,o:OJD
, WORD
• \vORD
• ""'ORO

0.0
0

.I,>,'QP'}

177746

ooooeo

,CO~~T:

000004

Wt'iP:
TeAP:
C;..SFLG:
C;,SR~G :

OOOOCO

oeoooo
1·/774.6

0.0
0

;

:'"

0-124K il,EMORY EXERCISER,
14-FEB-78 08:19

001622
001622
001624
001626

001636
001640

017430

0016-'l2
001644

001646
00165-4
001660

001656
001574
001702
001706
001714
001720
001726
001734
001736
001744
001752
001754
001762
001770
OC 17"l2
De200D
002002
002010
0020 t 6
(!02024

001116
0(,1126
001514
001124
001514
:)01124
001514
001120
001514

DOllED
0':::0000
001514
001120
GOODeO
001514
00112:2

0020Ll6

177777

0:).)030

612

20-FEB-7B

07:56

PAGE 13

50Q 0095

ATIVE ADDRESSING TO GET THE RELOCATED VALUE OF THE ARGUEMEMT TAGS.

STACK
RESRVD
MPRO·
MPRX
PBTRP
MPPATS
PE$RV
$ERRTB

;STACK POINTER INITIAL ADDRESS.
;PARITY REGISTER RESERVED BIT MASK ADDRESS.
;~IEJ:ORY PARITY REGISTE~ T;.8LE ADDRESS •
;i.:O;Oqy PARITY REGISTER EXIST TA8LE ADDRESS •
;?ARITY BYTE TEST HAP ROUTINE ADDRESS.
;:.~[r.mRY PARITy PATTERN TABLE ADDRESS.
;rl'WORY PAR!TY ERROR TRAP ROUTrNE ADDRESS.
;EhROR TyPEOUT TABLE PONTER.
;DECwn TYPE ROUTINE COUNT DESIGNATOR.
; SCC~E !'I.50RT ADR FOR WHEN NO MEM AVA FOR TEST,

8.
TST32

001120
000000
001116
001126
001116
000000
001116
000000
001116
001124

001124

DT1:

$ERR::OC,SGDADR,SGDCAT,SOSJAT,O

001120
000000
001120

OT2:

SVEF. ,'C. $ERRPC, $GDADR, $G ... JAT ,$BDDAT ,0

OT12:

$VERPC,$ERRPC,$GJ'\DR,$GDOAT ,0

001160

OT14:

$VERPC,SERRPC,$TM'PO,SGDADR,O

001120
001126

OT15:

$VERPC. $ERRPC, SGDhDR, $TMPO, $GDDAT ,$BDDAT ,0

001116
001124

001160
001126

OT21 :

$VERPC. $ERRPC. $ Tll'lPO, $GDADR, $GDDAT ,$BDDAT ,0

001116
001124

0011 '-0
0011 :26

D"f23:

$V ERPC, $ERRPC, $ .... DADR, $90AOR. $GODAT ,$BDDAT ,0

001116

001122

OT?4:

$VERPC,SERRPC,$BDADR,O

001116
001162
001116
000000
001162

001122

OT25:

$VE,;?C,SERRPC,$8DADR,$Trl.1PO,$TMP1,O

OT25:

$V":RPC,$ERRPC,$TMPO,$nI1Pl,O

ooooeo

599

610

. ~,~pqx:
• P8fRP
,MPPAT
• PESRV
· ER:;T8
• E:":;HT
, T5T32

002340
000010
014004

600
GOl
602
603
604
605

611

,MPKO:

012052
OC2050

RAD T A a
.STACK
.RESRV

001100
0::'1516
002076
OC2276

001634

RELATIVE ADDRESS I NG TABLE.
THE FOL.JWING LOCAT IONS ARE MODIFIED AT RELOCATION TIME TO A.LLOW

16K VER
MACY1 t 30A(1052)
(PT STATISTICS TABLE
:'"

002042

609

; FIRST VIRTUAL ADDRESS TO BE TESTED.
; FIRST ADDRESS IS USER SELECT ABLE,
;AO..'USTED FIRS T ADO"ESS.
; BIT M).5K TO t\LLOW OOWNI,oJARD AD)RESSING TESTS
TO BR:"..l.K TO "~,lMDCJ\'!N" TO fIND FIRST ADDRESS.
;Mt.P Of BANK IN ",'HICH F I R"T ADDRESS IS LQCATEo.
; LAS T V!RTUAL ADDRESS (+2 ) TO BE TESTED.
; LAS-:- ,\DDRESS IS USER SELECTABLE.
;:,DJUSTED LAS T ADDRESS.
; BIT !\:,\SK TO ALLO~'i UPWARD ADDRESSING TESTS
'0 Bi-"lEAK TO ")IU,'UP" TO FIND LAST ADDRESS.
0;:: EiA~~K IN \\HICH LAST ADDRESS IS LOCATED.
;BLOCK [I,:ASK, DETERMINES THE BLOCK SIZE.
; uS EN SELt:.CTABLE CO~-.lSTANT DATA,
;\'iR lTE \'JRO:-\G PARITY COMMAND
; TEI,1PORARY STOR,\GE
; CJ,CHE PRESENT FLAG
:CilCHE CONTRO!.. REGISTER

; ; '" ,,"" * '" "',. ,,"' .. * ~* '" "'*". >1<*"'*""" "':r "' ... * "',. * . . *** * *"'* .... ***********'" ********

(021)36

606

000000

ooooeo

597
598

607
608

PC LOCATIOI~ FOR ERROR TYPEOUT ROUTINe: (HRrYP).
PARITY REG 811 S RESERVED FOR FUTURE USE.
FIJR MS11 MFr:DRy \'i!TH PARITY, CHANGE TO 071112.
CO:-.J T I GUOL.;S ME~\,'ORY ADDRESS (+2 )
DISPl..:'Y REGISTER IMAGE
i,lAP
E;'CH B1 T CORRESPONDS TO 4K
FIRS T \~ORD CONT A I NS lOW (0-64K) MAP
\~ORD cmHAI-'..J$ HIGH (64-12BK) MAP
; TES r f,~,A p - WHI ~H BANKS ARE SELECTED FOR TEST.
; FIRST ~~'ORD CDNTAPJS LOw (0-641{ ) MAP
; SE~ .J~D .','ORD CONTAI";S HIGH (64-128K) MAP
; S ',','EO TEST r,1AP - USED DURING FIRST PASS TO ONLY
; T ES T EACH SANK ONCE,
FIRST \':QRD CONTAINS LO\~ (0-64K) MAP
":ORD COtHAIt6 HIGh (64-128K) MAP
TY illAP
\O:H!CH BANKS HAVE I\~EMORY PARITY
FIRS T ~'iJRD CONTAI:\jS LO\oJ (0-64K 1 M~P
....'ORD CONTAIr,;S HIGH (64-128K) MAP
;POPHER TO CURRE~H 4K B~~:K OF MEMORY
worlD CmH"!NS LOW (0-64K) 1\o1AP
WORD cmHAINS HIGH (64-128K) MAP
POINTER FOR 2ND 4K BANK OF MEMORY
; FIRS T l,o,'ORD CQrHAINS LOI<J (0-64K) MAP
; SECO~~D '~~ORD CONT A I t,:S HIGH (64-128K) MAP
; LCC'P ADDR!:.SS FO~ r,lUlTIPlE BLOCK TESTING.
; SET UP BY " INITr·,uvl" AND " INlTDN" ROUTINEES.
;US!:.O S" "r,1:,1UP" 'NO "1,lMDOWN" ROUT I NES.
;OPErjATOR SELECTED PARAME TERS FLAG.
(SA=204 )
;81'; 8LOCK INDICATOR.
USED IN "INl TMM" AND "MMUP" •
;ODD/EVEN FLAG USED IN PAPITy r'ilEMORY BYTE TEST.

PMHliAP:

001514
0(:0000
001514
G01160
001514
001162
OC'160
OC 1126
001166

595
596

DE[' INED

MEr'/:~/tf< P :

001530

GZOMCF,Pl1

566

*' '" "'>+-,.. "-*,.,.. * *,,. *-1< *'" ** **' ** * *. **;10 **

;NOTE:

CZOMCFO

557
558
559
560
561
562
563
56"1
565

PAGE 12

* " •• "'" t *~ ~.- **"**,,*~.,, ,,**.***** ~>i<"" *_*-1< .. **.,.***

0
070032

545
546
547
54B
549
550
551
552
553
554
555
556

07: 56

SoQ 0094

539
540
541
542
543
544

~0-FEB-78

..... ~". ~ >i' *,,. .. ,,.-~,.,, '",. >i' .. ,.,. .... ,,,. ... ,,, '" ",,,,~ ~ '>

502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
511
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538

1032 )

MA,':Y 11

APT STATISr Ies

000000
001160
001120

DT30:

$TMPO,$TMPI ,$GDADR,~BODAT ,0

DT31:

5TMP3

,SCTTL

r/EMQRY PARIT'f PATTERNS TA8LE

000000
000000

-1

jTABLE TERMINATOR.

; lHE fOLLCwlNG ARE THE PARITY PATTERNS EXERCISED THRUOUT MEMORY
; ;*"'''*~~. l*"~***"'*.*"'*"",,,,***,,,,,,,,*,,,,,,,,,,,,,,,**,,,,,,,****,,,*,,****,,,,,*,,,*~ ;0.***
MPPATS:

0020 0
0020:2
002') 4
00:;:>0 G

125325

152652
0,.' 2-'1::2
0.251:;:5
1(J2070
072527
177777

05245)

025125
'02070
072527

177777

EVEN,OoD
ODD,EVEN
EVEN ,ODD
ODD,EVEN
EVEN,EVEN
ODD, ODD
EVEN, EVEN

eZQMCFO
O-U"K "EMORV E~iRCISER. 16K VER
MACV" 30A('052)
~O-F~'-78
CZQMCF. P1I
14-' E5-78 OB:ls
M~MORV PARITY PATTUNS TASLE
613

614
615
618

6,V
616

002066
002070
002072

, 07030
, 52525
000000

002074

000000

619
620
62'
622
623
62.

629
630

631

6~5

636
637

63,
639
640
64 1
642
64~

644
645

~:~

646
649
650
651
652

653

002076
OG2,OO
002'02
002'04
002'06
002110
002' 12
00211 4
002',6
002120
00" 22
002124
002q6
002130
002' 32
002'34
002136
002,40
00214i
n.21M
002146
002150

65.
655

0021~2

65 6
657

667

002156
002160
002162
002164
00at66
OP2170
002172
002174
002176
002200
0022Q2
002204

6&8

Oo220~

65e

65g

S6Q

661

662
663
664
'665
666

00215~

C~I/MCFO

CZOMCf.pl1

002210
002212
0 02 214
002216

~73

P02220

677
678
679
680
681
682
683
6S4
B8S
BB6

68 7
6as
6B9
69&
691
692
693

17210'
pOOOOO
000000
000000
'72103
pOOOOO
000000
000000
172'05
000000
000000
0.0000
172107
000000

ooooeo
ooooeo

THE DEVICE ADDRESS.
EACH BIT REPRESENTING A 4K BLOCK.
I.E.'
FlRST WOAO alTO
0 • 4K, BIT1 II 4 - SK,... BITtS iii 60 - 64K
SECONe WORP QITP • 6~ ~ BSK •••• BIT14 • 120 - 124K.

002222
oon~4

002226
002230
002292
00223.

092236
002240

002260
00 2262
Pp2264
0 0 2266

nJl04 +1

o
o
172106"',
o
9
172110 +1

o
o

17211~

;CONTROl MAP (HIGH 64K)
;PARITV STATUS REGISTER

(HIGH 64K)
:MASK FOR MOS.CORE.MS"-K
:PARITV STATUS REGISTER
:CONTROL MAP CLaW 64K)
:CONTROL MAP (HIGH 64K)
iMASK FOR MOS.CORE,MS11-K
;PARITY STATUS RE.GISTER

; CONTROL MAP (lOW 64K)

:CONTROL MAP (HIGH 64K)
:MASK FOR MOS.CORE.MS11-K
:PARITV STAUS REGISTER
: CONTROL MAP (lOW 64.)
;CONTROl MAP (HIGH 64K)
;MASK FOR MOS,CORE.MS1'-K

172114 Tl

o
o
o

MPR7:

17211,. +1

a
o

o
17QI2Q +1
o
o
•
1721Q2 +1

:PARITY STATUS REGISTER
;CONTROL MAP (lOW 64K)
:CONTROl MAP (HIGH 64K)
:MASK FOR MOS.CORE.MS11-K
:PARITY STATUS REGISTER
:CONTROL MAP (LOW 64K)
:CONTROl MAP (HIGH 64K)
;MASK FOR MOS.CORE.MS1'-K
:PARITY STATUS REGISTER
:CONTROl MAP (LOW 64K)
:CONTROL MAP (HIGH 64K)
:MASK FOR MOS.CORE.MSI1-K
:PARITY STATUS REGISTER
; CONTROL MAP (LOW 64K)
:CONTROL MAP (HIGH 64K)
;MASK FOR MOS;CORE,MS"-K
:PARITY STATUS REGISTER

EKERelSER, 16K VER
MAr.Vt1 30A(IOSa) 20,FEB-78 07:56
OB<l9
MEMPRV PARITY REGISTER AOOR£$S TABLE

"'PRI1:

o
1721~4 t'
o
o
o
1~~126 +1
o
Q

MPRt~:

172130 +1

o
o

000000
000000

Dooaea
MPR1S:

SEQ 0097

MAP (LOI' 64.)
iCr;lNTROL MAP (HIGH 64K)
;MASK FOR MOS,CORE,MS1'-K

; PAR lTV STATUS REGISTER
; CONTROL MAP (L.OW 64K)

;CONTROL MAP (HIGH 64K)
; MASK FOR MOS. CORE, MS 1'-K
; PARITY STATUS REGISTER

: CONTROL MAP (LOW 64.)
;CONTROL MAP (HIGH 64K)
; MASK FOR MOS, CORE, MS 11-K
; PARHV STATUS REGISTER

: CONTROL MAP (LOW 64.)
;CONTROL MAP (HIGH 64K)

;MASK FQR MOS,CORE,MS1'-K
;PARlTY STATUS REGISTER

'''~134 +1

;MASK FOR MOS,CORE,MS1'-K
;PARITY STATUS REGISTER

17~132

o
o
o

MPRI4:

PAGE 15

;CONTRO~

000000

000021

: CONTROL MAP

MPR 12:

002276

; CONTROL MAP (LOW 64K)

o
MPR6:

1"12131

696
697

69n70

MPR5:

MPR10:

li~13S

;MASK FOR MOS,CORE,MSt 1-K

1;21 :";
000000
000000
000000
172127
000000
pooOOO

000000
172'33
000000
000000
0,0000

002260
002252
OQ225.
P02256

MPR,3:

~~ggg~

oeoooo

: CONTROL MAP (LOW 64K)

o
172102 +1
o

o
MPR2;

OOPOOO

002f~2

00224p

MPR"

MPR9;

OO!!244

o
o

MPRB:

oroooo

~~,~{)/ I {~,~ W~~ I I I I I 1111I1 I I I I ~ ~~'fW '~~~G'I "~f ,~W I I I I I I I I I I I I I I I

1721~1

~9S

69B

I'
;.
:'

000000
000000
000000
172'23

1i2137
000000
000000
00 0000

699

~~~f/~~tg~I~M~~R~~~~~~ ~~\~~~~~;~6A:I~~N~~gt~~~~ ADDRESS TABLE

THE ~EAST SIGNIFICA~T SIT IN THE DEVICE ADDRESS IS SET TO A ONE (1)

MPR4:

002272
002274

694

172'"
000000
000000
000000
1721'3
000000
000000
000000
172115
000000
000000
000000
H2117
900000
000000
000000

0-1~4K HMORV
14·f£B-~8

669
670
671
672
67~
675
&76

ME¥ORY PMIT'v REGlsTU ADDRESS TABLE

:: ~~E T~~N~~~rAg> '~C~O~~~l.:g~L~~ ~~ ::::~~~NTE~H:y Mi~gRr2~R:~:~~ ~~~~~WING

~26

621

633

628
632

SEQ 0096

:ODD.OPD
;000. EVEN
:EKTRA PATTERN HOLPER FOR
: FUTURE USE
:TABLE TERMINATOR

MPENO:

.SBTT~

PAGE,4

:111111/111/1111////11/1/1/11111111111111111/11/111/1/111111111111111/1

625

83.

107030
152525

07:58

o
o
172136 +1
o

o
o

~gg~i:gt =:~ ~~~~H6:~~)
; CO"TROL MAP (LOW 64.)
;CONTROl MAP (HIGH 64.)
;MASK FOR MOS,CORE,MS11-K

:?AOITV $TATUS REGISTER
;CONTROl. MAP (lOW 64K)

:CONTRqL MAP

(~IGH

64.)

;MASK FOR MOS ,CORE,MS11-K

:THIS IS THE :~D OF THE TABL~ !
;UBLE TO HOLD JUST PARITy STATUS REGISTERS THAT EXIST.
MPR)(:
.BLKW
",
; (THE EXTRA WORD IS FOR A TERMINATOR.)

CZQMCFQ
Q-124K r."(MORY E.XERCI5ER,
CZQMCF.P11
14-FEB-78 08:19

700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755

.SBTTL

20-FEB-78

07:56

PAGE 16

5EQ 0098

ERROR POINTEq TA8LE

;oI.THlS TABLE CONTAINS ThE INFORIfATIWJ FOR EACH ERROR THAT CAN OCCUR.
;*THE INFORMAT!ON IS OBTAINED BY USING THE INDEX NUMaER FOUND IN
;~LOCATlON $ITEM8. THIS NUjI,"3ER INDICATES \IIHICH ITEM IN THE TABLE IS PERTINENT.
;*NOTE1:
IF snn1S IS 0 TrlE ONLY PERTINENT DATA IS ($ERRPC).
;"NOTE2:
EACH lTEM IN HIE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOL~OWS:
;

.
.

;.
;
;.

002340
002342
002344
002346

027010
030367
001646
030734

002350
002352
002354

027044
030406
DC 1660
030740

002356

002366

027044
030406
001660
0307 .. 5

002370
002372
002374
002376

027100
030406
001660
030740

002400

027136

002~02

002360
002362
00236.!l

.
.
.

OF~

002~06

0:)04CG
001660
OJ07.c;0

002410
002412
002414
002416

027174
030406
0016' :)
030740

002420
002422
002424
002426

027240
030406
001660
030740

002430
002432
002434
002436

027301
030406
00 1660
030740

002404

;

00;':·140
002442
002444
002446

0=.7345
0'::0406
001660
030745

OC2450
002<152
002454
002456

027411
0':: 0433
001674
030745

002~60

027465
0:: 0433
001674

;

027555
030454
001706
0;00752

002500

O~ 70 1 0
0.30475
001720
0:;07;..2

002516
002520

c.- 7733

002522
002524

030406
001660
0::'0745

;

002526

;
002530

002532
002534
002536

.
.

;
027654
OJ0454
001706
0.307S2

002514

.
.

030031
0:;'0406
0:] 1660
0307':;0

;
0025<'::0

OJ0063

002:'42
002544

030520

002546

020760

002550
002')52

030132

001736

.
.
.
.
.
.

;
;.

002:->:'4
002556

(jOS61
Ow 1 754
O~;o7S2

;
DC
')0

00
00

62
b4
66

0301 7
C-J06
DC 1 7
0307

OM5
DH'2
DT2
DF2
1 TEM 6
DM6
DH2
DT2
OF2
ITEM 7
OM7
Dl·1
DT2
DF2
·TEM 10
DM10
DH2
DT2
OF2
!lEM 11

OM11
DH2
DT2
OF3
ITEM 12
OM12
OH12
OT12
DF3
ITEM 13
OMt3
DH1 ';

OT12

;

002510
002512

0~0745

002470
002472
OC2.'l74
002476

002502
002504
002506

;; POINTS
; ;POINTS
; ;POINTS
;;PCllNTS

TO
TO
TO
TO

THE
THE
THE
THE

ERROR MESSAGE
DATA HEADER
DATA
DATA FORMAT

;PARlrY REGISTER DATA ERROR.
;PC,REG,S/B,\>JAS
; $ ERR PC , ~GDAOR , $GDOAT ,$ BDDA T
; 16,18,16,16
;ADDRESS TEST ERROR(TST1-5).
;V/PC, PjPC, MA, 5jB, I~AS
; $v ERPC, $ERRPC, $GDADR, $GDDAT, $BDDAl
;16,18,18,16,16

;ADDRESS TEST ERROR(TST1-5).
; VjPC, Pj PC ,10M, SiB, WAS
; $VE"PC, $ERRPC, $GDADR, $GDDAT • $BCCAl
; 16, 18,18.8,8
;CONSTA~T

CAP

ERROP(TST6-10).

; v/pe, PI PC ,r,!A, SIB, WAS
; $VERPC, $ERRPC, $GDADR. $GDDAT • $aODAT
;16,18,18,16,16

lTEM 5

MACY11 30A(1052)
16K VER
ERROR POINTEri TABLE

;

002462
D02464
002466

EM
DH
DT
OF

$ERRTS:
;
ITEM 1
DMl
DHl
DTl
DF1
;
1 TEI.I 2
Dr.12
DH2
DT2
DF2
;
ITEM 3
OM2
DH2
DT2
OF3
;
ITEM 4
DM4
DHL
DT2

002340

0-124K r~EMORY EXERCISER,
CZQMCFO14-FEB-78 08: 19
CZOMCF. P11

756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811

16K VER
MACY11 30A(t052)
ERROR POINTER TABLE

DF3
ITEM 14
OM14
OH14
DT' 4
DF14
ITEM 15
OMl
OH15
DT 15
OF14
ITEM 16
D:vI16

OH14
D-, ,4
DF14
ITEM 17
OM17

DH2
DT2
OF3
1 TEr" 20

orv:20
DH2
OT2
DF2
ITEM 21
DM21
DH21
OT21
OF21
1 T Er,~ 22
ITEM 23
OM23
DH23
DT23
OFt 4
1 TEM 24
D~24

OH24
OT24
OF14

;ROTATI1'.;G BIT ERROR(TST11-12).
; V/F-·C, PI PC ,~lA, 5/B, WAS
; 5VERPC, SERRPC. $GDADR, $GDDA T • $aDDAT
:16,18,18.16,16
;MOS REFRESH TEST ERROR (T5T30-31).
; V/PC, Pipe ,r,.\,.\ ,SIB, WAS
; $VER PC, SERRPC, $GOADR, $GDDA T • $BODAl
;16,18,18,16,16

xor( 9 PATTERN ERPOR(TST13-16).
; V/PC, PjPC,r,·:A, SIB,WAS
; $VEI\PC, SERRPC, SGDAJR, $GDDAT • $BDDAT
;16,18,18,16,.6

;fn,RCH1NG 1'S AND 0'5 ERROR(TST27).
; VjPC, PjPC ,MA. S/B,WAS
; SV .... RPC. SERRPC, $GDADR. $GDDAT, $BODAT
; 1" ,18,18,16,16

20-FEP-78

07:56

PAGE 17

SEQ
PARITY io101ORY ADDRESS ERROR(TST17).
VjPe, PjPe. MA, SjB, \~A5
$V ERPC, $ERRPC, $GDADR, $GDDAT ,$BDDAl
16,18,18,8,8
:DATIP \~ITH WRONG PARITy DIDN'T TRAP(TST11).
; VjPe, PjPC ,r,~A, SIB
; 5', ERPC, $ERRPC, SGDADR, $GDDAT
;'6,18,18.8
;~'iRONG PARITY TRAPED,
BUT NO REGISTER 5HOI.,.S ERROR FLAG.
;VjPC,P/PC,MA,5jB
; 5VERPC, $ERRPC, $GDADR, $GDDAT

; 16,18,18,8
;PARITY REGISTER NOT MAPPED AS CONTROLLING THIS AQORESS(TST17).
;V/PC,PjP:::,REG,MA
; $\"Er; PC, $cRRPe, $TMPO, $GDAQR
; 16,18,18.18
;PARITY REGISTER DATA ERROR.
; VI ~C, PjPC, r,lAUT ,REG, SIB, ~'o!AS
; 51, ERPC, SERRPC, S::;DAJR, $TMPO, $GDDAl • $BCCAT
; 16, 18,18,18, 16,16

;r;lORE TH~~,j OI>.lE REGISTER INDICATED PARITY ERROR.
;V/PC,PjPC,REG,MA
; SVEEPC, SERRPC, $ TMPQ, SGDADR
; 16, 18,18,18
. DAT A SHOU LON I T HAVE CHANGED WHEN PARITY ERROR
TST21 ).
,r,'lA,S/B,l~A5

,5ERRPC, $GDADR, $GDDAT, $BODAT
; 1":' ,18,18,8,8
RM1DO;,1 D~TA ERROR(TST20).
v,' ~C, PjPe .r,~A, SjB, 'llAS
svEF\ PC, $~RRPC, $GDADR, $GDDAT • SBDDAT
1 (',18,18,16,16
INS r RUCT ION EX leUT leN ERROR (TST21-26) •
>J/PC ,PjPC, ruT ,r!.A, SjB,WAS
SVE:·:PC, $ERRPC, $1 M?O, $GDAQR, $GDDAl ,$BDDAT
18,16,18,16,16
USED
PROG.r;;:'M CODE CH/INGED \'JHEN RELOCATED.
V/PC,P/PC,SRC ~~A,DST MA,SjB.WA.S
$oVER PC, $ERRPC, SGDAJR, $BDADR, $GDDAT • SBDDAT
16,18,18,18,16,16

TRAPP=D, BUT NO REGISTER HAD ERROR BIT SET.
VjPC,PjPC,TRP:'PC
SVEF(PC, SERRPC, $BDADR
1 G, 18,18

~099

CZQMCFO
0-1:i!4K r,'EJ"GRV EXERCISER,
, 4-f- e:e-78 OB:1
CZOMCF. Pl'

MAr.Vl1 30A(1052)
16K VER
ERROR POIN I'ER TABLE

a, 2

a, 3

002570

0:;0253

a,s

a,4

002572
002574

8'6

002576

0.30542
OC'20r 2
0:';0752

817
a,a
a, 9
a20
821
822
823
824
825
826
827
828
829
830
83'
832
933
934
835
836

I·
002600
002602
002604
002606

030:213
030673

OM25
OH25
OT25
DF,4
ITEM 26
DM26
D~':6

DH30
DT30
DF30
ITEM 31

002610
002612
002(114
002616

030313
030673
0020'6

030740

002620
002622

DC 0000
O~071S

00:2624
0026213

002030
030766

002630

030347

DM31

002632

000000

002634
002636

002042
030766

0
DT3'
DF30

CZQMCFO
0-,24K MEMORY EXERCISER,
CZQMCF.?11
14-FEB-78 08:19

,6K VER
START:

SEQ 0100

TRAPPED TO 114.

VI PC ,Pipe, TRPI PC REG, WAS
t

$VERPC, SERRPC, SBDAOR, $TMFO, $TMPI

16,18,19,18,'6
FAI LED TO TRAP,

VIPC, P/PC, REG, WAS
SVERPC, SERRPC, 5TMPO, STMPI

16,18,18,,6
(ACTION ENABLE WASN'T SET),
V/PC,P/PC,REG,WAS
SV _RPC, SERRPC, $TMPO, SBDOAT

''',,1 e,' 8,16

NO r.-eSSAQE.
REG,WAS,MA,WAS
STMPO,STMPI,SaOADR,SSDOAT

18,16.19,9
TRAPPEO TO 4
NQ HEADER
STMP3

MACY" 30A(I052)
20-FE8-79
seTU;:: AND MAP MEMORY

.S8TTI., START:

837

PAGE , a

ITEM 25

OT28
OF2
: 'EM 27
DM27
DH26
DT2S
DF2
ITEM 30

0020'8
030740

07: 56

20-FEB-7a

07:56

PAGE 19
SEQ 0101

SETUP AND MAP MEMORV

; /'\: /*\ :/*': /*,: 1*': /": /*,: 1-': /*\: I": /": 1*': 1*': I": /*,: /*,: /*,: /*,:
;..

THIS IS THE NORMAL (eA.

= :200) BEGINNING OF THE PROGRAM.

002640
002644
002646
00'2654

t 05067
000403
'12767

176712

002654
00.2660
002662
002666
002670

012706
005026

001H)

0:.22706

001140

001374
012706

001100

002674
002702
002710

012737

000610

0' 2737

000340

016767

011242

000024
000026
0, '232

002716
002722
002730
002736
002744
002752

013746
012737
0,2767
012767
022777
001012

000004
002756

000004

'77570
'77570
177777

176176
176166

002754
002756
002762
002764
002772
003000

000403
012716

START:
CLRB
sELFLG
ICLEAR SELECT PARAMETER FLAG.
ST ARTA
BR
: GO DO SETUP AND MEMORV MAP.
#-1,
SELECT: MOVB
sELFLG
; SET THE SELECT PARAMETERS FLAG.
Sf ART A:
,sBTH
INITIALIZE THE COM~ON TAGS
: :CLEAR THE COMMON TAGS (SCMTAG) AREA
MDV
N$CMTAG,R6
; ; FIRST l.OCATION TO
CLEARED
ClR
(R6)+
i ;CLEAR MEMORY LOCATION
CM?
H5WR,RS ; :OONE?
BNE
.-6
i ; LOOP BACK I F NO
MOV
NSTACK,SP
; : SETUP THE STACK POINTER
: ;INITlALIZe. A FEW VECTORS
MOV
N$PWRON ,!l!INPWRVEC ;: POWER FAI LURE l'a;CTOR
MOV
1t340,@lHPWRVEC+2 i: LEVEL 7
MOV
SENDCT,nOPCr
: :sETUP END-OF-PROGRAM COUNTER
i iSIZE FOR A HARDWARE SWIICH REGISTER. IF NOT FOUND OR IT IS
:;EQUAL TO A "-1", SETUP FOR A SOFTWARE SWITCH REGISTER.
MOV
@IIERRVEC,-(SP)
i ;SAVE ERROR VECTOR
MOV
N64S,@:IIERRVEC:;5ET UP ERROR vECTOR
MOV
1I0SWR,SWR
; :SETUP FOR A HARDWARE SWICH REGISTER
MOV
HDDISP,DISPlAV: :AND A HARDWARE DISPLAY REGISTER
CMP
#-1,@SWR
: ; TRY TO REFERENCE HARDWARE SWR
SNE
66$
: I BRANCH I F NO TIMEOUT TRAP OCCURRED
; ; AND THE HARDWARE SWR IS NOT '!!II -1
BR
65S
: : SRAflJCH IF NO TIMEOUT
64$:
N6S$,(sP)
MOV
i ; SET UP FOR TRAP RETURN

:*
NOTE:
THIS CODE IS NOT POSITION INDEPENDENT,
: / :, -/: ,-/ : ,-/:" / : ,- I: "I:' * I:' */: \ -/ : \ */ : Vi/: \' I: ,*/ : ,-/:, -/ :" I: "/:"
844
845
846
B47
B48
849
BSO
95,
BS2
BS3
954
955
BS6
857
9SB
BS9
860
86'
862
B63
864
865
B66
B67
86B
B69
670
87'
872
673
874
875
876
877
B7B
879
880
88'
882
B83
8B4
BBS
BB6
887
eBB
8B9
890
89'
892

003004
003010
003016
003020
003026
003026
00~032

177777

176702

171.~02

002764

RT!

OOQQC2

ot 2767
012767
0'2637

000176
000174
000004

176146
176142

66$ :

132767
001403
012767

176202
00020n

, 76207

00'226

176" 2

0050',7
005077

176470
176104

005067

65S:

MDV
MOV
MOV

NSWREG,SWR
: ;POINT TO SOFTWARE SWR
1I0ISPREG,DISPlAY
(SP)+,@N~RRVEC
; ;R~STORE EFlROR VECTOR

CLR
BIT8
SEQ
MOV

SPASS
NAPTSIZE,$ENVM
67$
'$SWREG,SWR

; ;CLEAR PASS COUNT
I: TEST USER SIZE UNDER APT
; :YES,USE NON-APT SwITCH
; ;NC,USE APT SWITCH REGISTER

67$:

003036
00304:2
003044
003052
003054
003060

005227

003062
003066

005737
001015

177777

001040

022737

014222

0,'"'1434
004567
003132

020432
000042

Od0042

LDDISP
CLR
ICLEAR DISPLAY REGISTER STORAGE LOCN
ClR
~DISPLAY
:CLEAR OISPLAY REGISTER
,SBTH
TYPE PROGRAM NAME
I; TYPE THE NAME OF THE PROGRA.M IF FIRST PASS
I~, -:
#-1
:: FIRST TIME?
BNE
68$
; ; BRANCH IF NO
CMP
N$ENOAO,@N42
; ; ACT-1 1?
BEQ
68S
: ; BRANCH IF YES
uSR
R5,
$PRINT
JGO PRINT OuT THE FOLLOWING MESSAGE.
,WORD
69$
; ADDRESS OF MESSAGE TO BE TYPED
, SBTH GET VALUE FOR SOFTW:.RE SWITCH REGISTER
TST
~N42
: :ARE WE RUNNING UNOER XXDP/ACT?
BNE
70S
I :BRANCH IF YES

C2QMCFo
0-124K fiEMORY EXERCISER,
CZQMCF.P1'
14-FEB-78 08:19
893
894
895
896
897
B98
e9g

900
901

902
903
904
905

003070
003076
003100
003106

, 26727
001411
026727
OC 1 01 0

176130

000001

176034

000176

003110
003114
003120
003122
003130
003130

013746
OC4767
000403
'12767

177776
017316

906

003144

907
908
909
910
911

003144
003146
00315?
003154
003160
003166
003172
003176
003202
003204
003210
003212

000001

010700
0227CO

003146

003220

921

003222

004767

922
923
924
925

003.226
003232
003242
003250
003254
003260
003264
003270

OCS067
175354
032777
010000
CO ,014
012737
003272
177572
005037
004767011020
005267
175322
004567
020222
025354

003272
003276
003302
003310
003316

012706
005067
012737
052767
012767

913
914
915

916
917
918
919

176004

OC 1402
175120
000003
175412
175402
001224

175414

000042
000042

000046

920

926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948

003240

014122

13$:
175700
000004

;
001100
176314
003324
000014
000001

949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
9BO
9B1
9B2

903
9B4
9B5
980
987
98B
989
990
991
992
993
994
995
996
997
998
999
1000
1001

lao:?

, 003
1004

000004
'74430
176272

CHECK I F CACHE PRESENT, I F SO TURN IT OFF! I !
MOV
ItSTACK, SP
CLR
; CLEAR CACHE PRESENT FLAG
CASFLG
flMAPMEM ,@IIERRVEC
MOV
1114,
IMPCHE
BIS
MOV
ttl,
CASFlG
;SET CACHE PRESENT FLAG

; ; * ..... * "' .. '" 'i< i<
;'"
;>i<
;..

;*
;--

;Ij!

003366
003374
003376
003402
003404
003406
003,'j 1 0
003414
003420
003424
0031.126
00343·~
003~40

003444
003,'j46
003450
003!152
003454
003456
003462
003464
003470
003474
003500

003502
003504

003510
00J512
003')16
003528
003526
003532
00353-.1
003536
0035<;0
003542
0035-44
003546

001100
001524
001526

012737

003502

; ; *** ... * '" '"

MAP~JlEM :

000001
175606
020126

000004

0~1222

0:]2702
0:) 1374

1$'
017777

0~,0310

050411
010267
005367
005767
001432
0~2767

0 1 3705
0050E7
006305
006305
0(,6305
006305
006305
C06167
006305
01:6167
060567
0':'5567
0004(.4

022626
032702
0052',2
005767
CO 1411
0152737
012702
006303
006104
11"10316

175550
175544
175162
160000
172344
175522

175530

175504
175476
175470
175466

;
2S,
o ~ 7777
3$:

175070
000200
040000

172344

025114

000004

000402

45:

10G303
1003: 3
0~2737

*****""''' "',.. . . *"" *~ ""~,, >i<'" ** ... "'''' .. *** ."''''**** .. ** .... * .. *******$

5$ ,

PAGE 21

R4 = BANK POINTER .•• HI 64K.
R5 = SCRATCH REGISTER.

012706
012700
012701
0(-5010
oe5011
OC 5002
012703
005004
005067
004567
025421

>1" ...

ROUTINE TO MAP ALL OF r,lEr/'ORY.
ONLY FULl.. 4K SANKS \.,Jlll BE RECOGNIZED.
RO
MC:M~·.'AP POINTER ••• LD 64K.
Rl
M;::MMAP POINTER •.• HI B4K.
R2
ADDRESS POINTER
R3
BANK POINTER ••• lO 64K.

MACY 1 ~ 3CA( 1 052)
20-FE8-78
lfiK VEe
07 :56
GET VALUE FOR SDFTWA::{E StJITCH REGISTER

;

003324
003330
003334
003340
003342
003344
003346
003352
003354
003360
003364

SEQ 0102

\,..rlECK I F MEMORY MANAGEMENT IS AVAILABLE. AND SET IT UP IF IT IS.
CLR
MMAVA
;CLEAR MEM 1'-.1GMT AVAILABLE FLAG
BIT
;'!SWI2,
@:SWP
;CHECK FOR INHIBIT KT11 SwITCH
BNE
IMPCK
;ERANCH IF SET
MOV
1/ IMPCK ,@IIE,:RVEC ; SET UP T HI.EDUT TRAP VECTOR
ClR
@NSRO
;ClEAR MEM fliG'.H STATUS REG
J5R
PC,
MM!NJT
;rI,E~.' MGMT INITIALIZATION ROUTINE.
INC
MMAVA
;SET ME:M rliGMT AVAILABLE FLAG
JSR
R5,
SPRINT
;GO PRINT OUT THE FOLLOWING MESSAGE.
. WORD
MMAMES
; ADDRESS OF MESSAGE TO BE TYPED
; "KT11 AVAILABLE"

IMPCK:

CZQMCFO
Q-124K MEMORY EXERCISER,
CZQMCF. Pl1
14-FEB-78 08: 19

PAGE 20

CM?B
SENV,ill
; ;ARE \'1":: RUliNl~G uNDER APT?
SEQ
70$
; ; BRANCH I F YES
eMil
SWR,ltS'/iREG
; ;SOFn~·ARE SWITCH REG SELECTED?
BNE
71$
;;9RANCH IF NO
; ....
THE NEXT HID INSTRUCTICt.S PROVIDE AN INTERFACE TO THE $GTS~""R ROUTINE
; ..
WIHTOUT USING A "TR.~,D" INSTRUCTION AS CALLED FOR BY usYsr;1AC*"'.
MOV
@:IiPS',oJ,
-(SP)
;PUT THE PROCESSOR STATUS ON THE STACK
J5R
PC,
SGT5WR
;GO TO THE SUBROUTINE
BR
71 $
70$:
MOVB
#l,$AUTOB
;;SET AUTO-MODE INDICATOR
71 $:
BR
68$
; ;GET OVER THE ASCIZ
:;69$:
.ASCIZ
<CRLF>'C2QMCFO ' <CRlF>
681 ,
MOV
PC,
RO
;GET CURRENT PROGRAM COUNTER.
CI>'P
#.,
PO
;CHECK IF THE PROGRAM IS RELOCATED.
10$
BEQ
;8R IF PROG::-·AM NOT RELOCATED.
Jr.':1
RESTAR
; GO TRY TO PElOCTED BEFORE CONT INUING.
10$:
MOV
#3,
PRGMAP
;INITIALI2E PROGRAM MAP •••• LO 64K.
CLR
PRGMAP+2
; ••• HI 64K.
CLR
RELOCF
: INIT THE RELOCATION FACTOR.
TST6
@11$ENV
; CHECK FOR APT 11
BNE
13$
;8R IF APT!1
@#4:;:
TST
; CHECK FOR STANDALONE
13$
;BR IF STMmAlONE
BEQ
CMP
@1t42,@#46
; CHECK FOR ACT 11
BEQ
13$
;BR IF ACT11
;MUST BE XXDP
JSR
PC,5AVLDR
; GO SAVE LOADERS

000405

0001€7
012767
005067
005067
105737
001011
C057.: 1
001406
023737
001402

912

16K VER
MACY1130A(1J52)
:20-FEB-78
07:56
GET VALUE FlJ,{ SOFTWARE SIHTCH ReGISTER

>1< . . . . .

MOV
M;)V
MOV
CLR
CLR
CLR
r,'lOV
CLR
CLR
J5R
• WORD
MOV
MOV
SIT
BNE
BI5
BI5
MOV
DEC
T5T
BEQ
BIC
MOV
CLR
ASL
ASL
A5L
ASL
A5L
ROL
ASL
ROL
ADD
ADC
BR'

** *"'**>i<" * "' .. **

>I< '" '"

I;' ST ACK,
SP
I;rv.EM~I1AP, RO
hMEMMAP+2, R 1

(RO)

(R1 )
R2
#1,
R4
$TMP3
R5,
MEMMES

SPRINT

#2$ • @lfERRVEC
(R2) ,
(R2 )+
#MASK4K, R2
1$
(RO)
R3,
R4,
(R1 )
R2,
$TMP2
$TMP2
MMAVA
3$
11160000.$TMP2
@ltlKIPAR,2.RS
$TMP3
R5
R5
R5
R5
R5
$TMP3
R5
$TMP3
STMP2
R5,
$TMP3
3$

TIMEOUT TRAPS TO HERE
Cf;1P
(SP)+ ,
(SP )+
SI5
tlMASK4K, R2
INC
R2
T5 T
Mr,IAVA
4$
8EQ
ADD
11200, @IIKIPAR2
M(·I
1140000, R2
ASL
R3
ROL
R4
BPl
1$
BR
5$
ASLB
BPL
MOV

R3
1$
#ERRTRP,

*"'''' .... ,.*** ** .... ** *"' .. "'*"''''**'''**'''***** ....

; RESET THE STACK
; SET UP MEMORY MAP POINTER ••• lO 64K.
; .•. HI 64K.
; CLR MEMORY MAP ••. LO 64K.
; ••. HI 64K.
; SET ADDRESS POINTER TO 0
; SETUP 4K 8,.\NK POINTER ••• LO 64K.
; .•. HI 64K.
: IN! T TEI,1POPARY HIGH ADDRESS BITS.
;GO PRINT OUT THE FOLLOWING MESSAGE.
; ADDRESS OF I'I',ESSAGE TO BE TYPED
; HMEMO~Y MAP: "
; SET UP TIMEOUT VECTOR
; READ+WRlTE ALL "I1EMORY
; CHECK FOR 4K BOI.JNDRY
; BRANCH IF r'-eRE IN BANK
; SET FLAG FOR SAW: .•• LD 64K.
; .•• HI 6ilK.
; SAVE ADDRESS POINTER.
; ADJUST TO LAST AOR. LAST BANK.
; CHECK FOR rtE\j MGMT.
; BR IF NO MEM MGMT.
; CLEAR BANK BITS ON RELATIVE ADDRESS.
; SAVE KIPAR2.
;MAKE SURE HI BI T5 ARE INIT •
: SHI FT IT 6 PLACES.

: MAKE LAST AOR PHYSICAL.

: GO TO UPDATE POINTERS.

: RESTORE THE STACK POINTER
; lAS T ADDRESS OF 4K BANK
; FIRST ADDRESS OF NEXT BANK.
: CHECK FOR ~.1ci,' rI1C'.1T
: BRANCH I F !~O r,iEM MGMT
;UPDATE TH r;,o P;R
; POINT TO 5 TART OF THIRD PAR
;UPDATE LO B,.1,NK POI:'HER.
;UPDATE HI BANI< POINTER
; BRANCH I F r.~ORE. iVlEMORY TO MAP.
; EXI T 1'/HcN DONE.

;UPDATE MAP POINTER
; BRANCH I F NOT YET DONE
@l#ERRVEC ; RESET TIMEOUT VECTOR

SEQ 0103

C2QMCF'J
0-124K flEMQRY EXERCISER,
CZQMCF.011
14-rEB-78 08:19
1005

014632

1006
1007

003566
C03572

10' 0
1011
, 012
1013
1014
1015
1016

003576
003600
003G04
003610

020027
OC 1530

003612
003616

004567
025524

, 017
10' 8
1019
, 020
1021

003620

000000

1029
1030
1031

1032
'033
1034
'035
1036

1037
103B
1039
1040

1041
'042
'043
1044
1045

1046
1047
, 048
1049
, 050

011167

Oi lOCO
O-i27CO

MOV
MOV

177760
000017

aIC
CMP
aEQ

017674

uSR

.WORD
HALT

OC3664

003670
003672
003674
0031376
003704
003706

003712
003714

003716
003720
003722
003724
003730

01 :2706

001100

0(15067
032777
CC1011

17~754

010000

175300

012737
003664
0050..:7177572
004767 010420
005267
174722

000004

004567
025437

012737

105712
032702
0010Cl
011212
151212
001023
004567
025507

022626
005700
0014'1

1055
1056
1057
105B
'059

003756
003760

1060

003762

005302
010246
004767

J!.. .~

017622

• WORD
CLR
CLR
003742

MOV

000004
10$;

aIT
aNE
MOV

003710
003772

TST
aNE
017562

uSR
.WoRD

MOV
uSR

021212

004567

20$:

017536

0255' 7

;GO TYPE THE MAP.
RS,
iGO PRINT OUT THE FOLLOWING MESSAGE.
$CRI..F
; ADDRESS OF MESSAGE TO BE TYPED
(RO),
SAVTST
;SET UP TEST rI1AP ... LO 64K.
(Rl),
SAVTST+2 ; ••• HI 64K.
(RO).!<O
;GET LO',IJ MEM to,',AP
1;177760. RO
:MASK ALL BUT BOTTOM 4 BANKS
RO,'
#17
;CHECK THAT BOTTO:vt 16K IS ALL THERE!
GMPR
;BRANCH IF 80TTa~,., 16K EXISTS
RS,
$PRINT
;GO PRINT auT THE FOLLOWING MESSAGE.
INSUFF
; ADDRESS OF MESSAGE TO BE TYPED
;"FIR$T 16K OF MEI\;10RY NOT ALL THERE!"
;FATAL EflflOi:< HALT ...
:MEMORY IS NOT CONFIGURED TO RUN THIS PROGRAM.

"'* ...... "''''''' "''''

11< .. " ' ' ' ' .

"'* **'" *. '" '" "' ........

",$

DEC
MOV
uSR

INC
29$ :
30$ :

0(05100

005202

004012
00..]020

022737
001411

007600

OO·~022

012702
0\3737

060000

OS2737
0(;0720

OO,j026
00~03.;1

1 074
1 075

004042
004044

, 076

OOLl04G

1 077
1 078
1 079

004050
004054
004056
004060

COM

INC
SEq

022702

017777

001340
OC5767

174576

aIT
aNE

TST
6!'"1

001735

005700
00,4C7
004567

172346

eMP

172346

172344

aEQ
MOV
MOV

000200

172346

ADD

TST
aEQ
017436

uSR
.WORD

025517

DEC

005302

004062

0',0246
004767

004066

000000

004070

000654

R5,
aYTMES

RO
R2
#20$,
( R2)
IIBITO.
11$

(R2) ,
(R2) ,

RO
30$
R5.
FROM

R2.
PC.
29$

$PRINT

;GD PRINT OuT THE FOLLOWING t';,cSSAGE.
; ADDRESS OF MESSAGE TO BE TYPED
: "BYTE MEMQPY MAP:"
;SET UP TYPE OUT FLAG.
; seT ADDRESS POINTER TO ZERO.
@i?ERRVEC ; seT TIME OUT VEe TO SERVICE NON-EX MEM.
;00 DATI ONLY.
R2
; CHECK FOfl wORD ADDRESS.
;BR IF ODD BYTE ADDRESS.
(R2)
;00 DATI. DATO ••• NOP FOR READ ONLY MAP.
"( R2)
;00 DATI, DATIP, DATDB ••• NOP FOR READ ONLY MAP.
;CHECK FOR PREVIOUS TYPQUT.
; BR I F ALREADY TYPED" FROM".
SPRINT
;GO PRINT OUT THE FOU.OWING MESSAGE.
; ADDRESS OF MESSAGE TO BE TYPED
;" FROM"
-(SP)
;PUT THE DATA ON THE STACK.
$TYPAO
; DETERt.lINE THE PHYSICAL ADDRESS AND TYPE IT.
;GO TO ADDRESS POINTER UPDATE.

R2
R2.
PC.

-(SP)
$TYPAO

; POP fIom OFF STACK.
;CHECK FOR PREVIOUS TYPOUT.
;BR IF ALREADY TYPED "TO".
;GO PRINT OUT THE FOLLOWING MESSAGE.
; ADDRESS OF MESSAGE TO BE TYPED
; "TO"
; BACK UP ONE BYTE.
; PUT THE DATA ON THE STACK.
jDETERMINE THE PHYSICAL ADDRESS AND TYPE IT.

16K VER
MACY'1 ~OA(1052}
20-FES-78
07:56
GET VALUE I"OR SOFTWARE SWITCH REGISTER

OC 5202

oc 14:''3

NSTACK, SP
;SET UP THE STACK POINTER.
MMAVA
:CLEAR MEM 1\/G~'o1T AVAILABLE FLAG.
NSW12,
~SWR
;CHECK IF MEM MG:<ilT TO BE INHIBITED.
1$
;BR IF NO MEM MmH.
lil$,
@NERRVEC ;SET TIMEOUT FOR MEM MG1.'1T CHECK.
~IISK:)
: CHECK FOR I\'EM MGMT ••• TIMES OUT IF NONE.
PC,
MMINIT: INIT ALL MEM MGMT REGISTERS.
MMAVA
;SET MEM MGI\1T AVAlLABLE FLAG.

TIME OUTS COME HERE..
CMP
(SP)+.
(SP)+
TST
RO
30$
aEQ
JSR
R5.
SPRINT
.¥iORD
TO

021164

003774
003776
004002
004004
004010

, 073

8158

11$:

003766

T$T8

000001

CZQMCFo
0-124K ~.:EI'i!ORY EXERCISER.
CZQMCF.Pl1
14-FE9-78 08:19

1 OBO
1081
1082
, 083
, 084
'085

TIMOUT: MOV
CLR
BIT
BNE
MOV
CLR
JSR
INC

005700

003742
003744
003746
003750
003754

1 070
1 071
1 072

SEQ 0104

TyPMAP
$PflINT

SPECIAL ~OUTINE TO TYPE OUT ALL UNlBUS ADDRESSES WHICH RESPOND TO
DATI. DATI?, DATO, A.ND DATOB.

0' 5000
0[5002

000413

, 062
1 063
1 064
1 065
1 066
1 067
1 068
1 069

PAGE 22

: ; * ••••••• ~ ..... ,. ......... '" "'''' ..... "' .... II' Ii<. "'*'" . . . , ..... "' ...... "'**. **"''" * ••• ,.". "' ••

003622
003626
003632
003640
003642
003650
003654
00]660
003664

003740

1 061

PC,

; ;'" '" "'. "'. Ill ... '" III ..... ", .. Ill ...... "'."' ....... ~.•

;1tI<

010246
004767

'054

175742
175740

003732
003734

1051
1052
1053

uSR
uSR
• WORD
MOV

017?~6

201
al1C67

, 008
1009

1022
1023
1024
1025
1026
1027
1028

16K VEI-'i
MACY"
30A(105:2)
QO-FEB"78
07:56
GET VAL,UE F(.Ir< SOFTWARE SWITCH Rl:..3ISTER

MOV

R2
RO

;RESET ADDRESS POINTER.
;RESET PREV10US TYPQUT FLAG.
R2
;UPOATE ADDPESS POINTER TO NEXT BYTE.
31$
:EXIT IF ZEPO REACHED.
#MA$K4K. R2
; CHECK FOR 4K BANK BOUNDRY.
10$
:SR IF r-JQRE THIS 4K BANK.
MMAVA
:CHECK IF ME(lJ! MGMT IS AVAILABLE.
10$
;BR IF NO MEM MGMT.
117600,
@IiKIPAR3 ;CHECK FOR END OF LAST 4K B.boNK.
31$
;EXIT WHEN ALL DONE.
11'60000, R2
;R!:.SET VIRTUAL ADDRESS POINTER.
@"KIPAR3,~IIKIPAR2 ;SAVE MEM !'I.GMT REG FOR TYPEOUT.
H200.
@HKIPAR3 ;UPOATE MEr.l MGMT REG :2 TO NEXT 4K BANK.
10$
; BR BACK TO DO NEXT BANK.
RO
;CHECK PREVIOUS TYPE FLAG BEFORE EXIT.
32$
JBR TO EXIT IF TYPING ALL DONE.
R5.
$PRINT
;GC PRINT OUT THE FOLLOWING MESSAGE.
TO
: ADDRESS OF MESSAGE TO 8E TYPED

;~Ig~

R2
R2.

ADDRESS POINTER UP ONE BYTE.
-[SP)
;PUT THE DATA ON THE STACK.
ST"/PAD; DETERMINE THE PHYSICAL ADDRESS AND TYPE IT.
; .. THIS ROUTINE IS FOR DEBUG USE ONLY.
;'"
TO Rt)N THE MAIN PROGRAM RESTART AT 200 OR 204.
:l-OOP BACK AND DO AGAIN UPON CONTINUE.

pc,

32$:

uSR
HALT

TIMOUT

.SBlTL

MAP PARITY REGISTERS

0211)64

PAGE 23

1086
1087
1088
'089
1090
, 091
1092
1093
1094
1095
1096
1097
1098
,099
l ' 00
110,

; : ... "'''''''.''' ***'"
: '"

012704

002276

004076

032777

0001 r,,)

004104
D01l10S

001036

004112

0 1 2703

OO~120

012737
042713

004124

005773

004130

01.2324
000·103

004132

1104
"05
1106
1107
1108

00.1134
OO.:l136
00.111.12
001.114,1
004145
004150
004154
OO·QI56
004160
004166
004172
C0.:1174
004200

,,09

"'*"' ......... "'''''" '" *",,,,"""'4< "' ..... *"'. "' ... * "'* "'. "' .... '" ."'."''''''''''*

; ; "''''''' •• '''''''''.* .... *. *_*"',.'",..
004072

1102
1103

1110
1111
1112
1113
1114
1115
1116

~* ... ", ...

SEARCH FOk PARITV REGISTERS PRESENT AND TYPE ADDRESSES OF THOSE FOUND
THAT ARE f NCTIONAL ANO HAVE CORR~SPONDtNG PARITY MEMORY

002076
004134
000001
000000

GMPR:

175034

000004

C.226~6

0521:;'3

000001

OC5023
OOSO:::'3
OOSQ23
C~0327

002276

103761
0(;5014

012737
005757
0010t'6

025114
176104

004567
025605

017312

OOOOJ4

MOV
BIT
6NE
r,1CV
MOV

"-"II< ",~,,,,.,,,,, "' ... "'''''''

* "'**"' .. "'''' "'''' ** •• "' ......... "''''''''''''''''

;SET UP POINTt;R TO PARITY REG EXIST TABLE.
;CHECK FOR INHIBIT PARITY SWITCH.
;8R IF INHIBIT PARITY.
II'MPRO,
R3
;5ET UP TABLE POINTER
i'GMPRS, ililtERRVEC ;5ET U? TI~1EOUT TRAP SERVICE
GMPRA:
Bt~
#1.
(R3)
;CLEAR FLAG BIT IN TABLE
TST
@I(R3)
;DOES THIS r"EMQRY PARITY REGISTER EXIST.
:"'
IF IT DOESN'T EXIST, A TIMEOUT TRAP WIll GO T0 "GMPRB".
MOV
(R3)<fo,
(R4)+
;SAVE IT IN THE PAflITY REG EXIST TABLE.
BR
GMPRC
jSKIP TIri1ECUT SERVICE CODE
j'"
TtM~OUT COMES HERE
GMPR8:
CMP
(SP)+,
(SP)+
;RESTORE STACK POINTER
BIS
lil,
(R3)+
;SET FLAG TO INDICATE REGISTER NOT PRESENT
~MPRC:
CLR
(R3)+
;CLEAR THE [I.1AP ... LD 64K.
CLR
(R3)+
: ••• HI 6~K.
CLR
(R3)+
; ••• AND THE MASK.
CMP
R3.
ItMPRX
;HAVE WE CHECKED ALL REGISTERS?
BLP
GMPRA
;NC - GO BACK TO CHECK NEXT ONE
CLR
(~4)
;51;T TERMINATOR IN PARITY REG EXIST TABLoE.
NERRTRP,ItoIiERRVEC; RESTORE TRAPCATCHER
MOV
lSI
MPRX
:ANY PARITy REGISTERS PRESENT?
BNE
MPAMEM
;YES - GO TEST CONTROLS PRESENT
..JSR
RS.
$PRINT
;GO PRINT OUT THE FOLLOWING to,lESSAGE.
MTR
; ADDRESS OF MESSAGE TO BE TYPED
• wo~·p
HMPRX,
IISW06,
GMPRD

R4
@S'I'JR

SEQ 0105

ClOMCFO
0-I,4K M~MOqy exaRcl S~R. 1 ~K VER
MACYl1 30A( 1052)
ClQMCF.Pl1
14-FE8-780S:1,
MAP PARITY REGISTEAS

20-FEB-78

GMPRO:

CLq

(A4)

~MP

MANUAL

CZOMCFO
0.,24K MEMOqy EX~ACISER. 16K VER
MACY" 30A(1052)
ClQMCF .Pl1
14-FU.78 09:19
MAP PARITY MEMOAY
1121
1122
1123

.S8TTL

SEQ 0106

,Q3

004~10

004214
004222

004226

1139
11 40

004240
00.:1;.4

Q042~2

004236

004767 014054
012767 000001
005067 175320
012702 0,<000
005761 174350
00 '.04
012702 054000
Q04167. 010030

MPAMEM:

1161

1162

004~54

00421;0
004264
004270
094272
004300
004302
004304
004312

004330
P04336
004340
004346

, 172

I.E. BIT STUCK AT GQOO PARITY VALUE

~SR

MOV
CLR
MOV
TST
BE')
MOV

PC,
11.

ClRPAR

; INITIALIZE ALL PARITY REGISTEAS

eITPT

: INITIALIZE 4K POINTER
;CLEAR HI 64K POINTER

BITPT+2
#'14000. P.2

MMAVA
MAPRB

;SET AOR POINTER TO 14000.
i CHECK FOR MEM MGMT

'54000. R2

; BRANCH 1 F NO MEM MGMT
;SET ADR POINTER TO PAR2

PC.

; SET UP ALL MEMORY MGMT REGISTEAS.

MMINIT

005067
005061
012703

Q.o27Q
001052
013773

~APRB:

175264
175262
002076
000001
001~12

1$:
2$:
000000

01 1212
0~5712
0A377~

005713

001612
oQOOOO

000000

CL~

CLR
MOV

PMEMAP

8NE
MOV
Mav
TST
BIC
TST

(R2) ,
(R2)
(IINWWP,
.(R3)

BPL

6$
#7740.

BIT

: CLEAR THE PAR lTY MEMORY MAP

PME~AP+2

''''PRO.
".
3$
.'WWP.

R3
(R3)
.(R~)
(R~)

: INITIALIZE TABLE AOORESS
: IS THIS REGISTER PRESENT?
; NO - GET THE NEXT ONE
:YE5 - SET WRITE WRONG PARITY
:ANQ CLEAR REST OF REGISTER
;WRITE WRONG PARITY

; READ WRQNG PARI TY
~(R3)

;C~EAR

WRITE WRONG PARITY
jOTHERWISE, CHECK TO SEE IF THIS
;CO_TROL REGISTER GOT A PAAITY

004316
004320

00432~

1173
1174
1175
1176

PARITY GENERATE OR DETECT LOGIC FAILED
PARITY ~RROR BIT FAILED TO SET
PARITY BITS IN MEMORY LOCATION FAILED

; ;................................. "' ............................. *** ••••

004250

1164
1165

* ••••• * .......... ...

i : .............................. "' •••••••••••••••••••••••••••••••••••
ISET WRITE W~ONG PARITY IN ALL REGISTERS PRESENT
P' THE.N WRITE TEST ;"OCATION VIA DATO & READ TEST LOCATION VIA DATI
1* THEN CL~AR WRITE WRONG PARITY IN ALL REGISTERS.

1163

1166
1167
,,68
1169
1170
, 171

•
"
-

~~R

1146

1153
1154
1155
1156
1157
1158
1159
1160

SEO 0107

MAP PARITV MEMORY

.......................... ".......................................... .

1153n

1141
1142
1143
1144
1145

11~2

PAGE 25

- SETTING WRITE WRCNG PARlTV DIDN'T CAUSE BAD PARITY TO BE WRITTEN

1134
1135
1136
1137
113S

115,

07:56

; ; . . . . . . . . . . . . . . "' . . . . . . . "' • • • "' . . . . . . . . . If. . . . . . . "' ........... "' . . . . . .

1125
1126
1127
1128
1129
1130
1131
1132

1150

20-FEP-76

IMAP COqAESPONDENCE BET.HN PARITY REGI STEAS AND MEMORY. AND TYPE AESUL TS
;NOTE THAT IF PAAITY ME~'OAY IS NOT LOCATEO COARECTLY THAT IT IS IN ALL
;PR08ABILITY DUE TO ONE OF THE FOLLOWING FAILURES:

,124

1147
1148
114S

PAGE 24

; ~NQ MEMORV PARITY REGlSTERS FOUNO"
; MAKE SURE T A8LE IS CLEAA.
;AND SKIP ALL CONTROLS TESTING

1117

1118 004202 005014
1119004204000167'001156
1120

07: 56

004~50

004356
004360
004366
004374
004402
004.,0
004416
004422

100014

032773
001404
cQ763
OC0413
012763
b004Q7
032773
Q01417
012763
OS6763
0567G3
05.767
05.767
01;2103
020327

070032

qooooo
oooe· 6

007Y40

BIT

077772

000006

5$'

007140

000000

65:

070000
175152
17514$
175136
1751.2
000010
002276

000006
000002
000004
175130
115124

75:

3$:

BEO
MOV
BR
MOV
8R
BIT
BEQ
MOV
SIS
BIS
BIS
815
ADO
CMP

n0032, 6(R3)
7$
1177172, 6(R3)
75
#7740.
@(R3)
3S
0700QO. 6(R~)

; ERROR
: BRANCH I F IT 0 I ON 1 T AND CHECK
:IS IT A CORE PAR. REG.
i BRANCI1 I F NOT.
; IF IT IS SET UP MASK
iAND BRANCH TO SET BITS.
i I F MaS SET UP MASK
; AND 6RANCI1 TO SET BIT.
; IF ANY BITS ARE SET
iTHEN CSR IS MS11-K.
;IF MS11-K SET MASK.

BITPT,

;SET FLAG IN MAP FOR THIS PARITY AEGISTER

P(RJ)

2(R3}

BlTPT+2.4(R3)
PMEMAP
I SET FLAG IN PARITY MAP
BITPT+2, PMEMJ..P+2
#10,
R3
;STEP UP TO NEXT REGISTER
R3 t
wMPRX
;ARE WE DONE WITH TABLE?
Sl TPT I

CZQMCFO
0-124K t'i.EJ"GRY EXERCISER,
CZOMCF.P11
14-rES-78 08:19
1177
1178
1179
11 &0
1181
1182
11 B3
1164
1185

16K vER
MA:"Y1130A(1052)
MAP PARITY Mt::M(JRY

004425

1 C 3716

OO.,:j.:; 30

0112 j 2

OC~~32

0':5767
CO 14 I

174150

C62737
{ll: 6367

000200
175072
175070

172344

001000

000003

002260

C).,:j..;36
OO~..j~O

COo.l.'l46

00_1<152
00-4~56

OO-l460

006167
1C 0441
0:3727

BLa
MOV
TST

ASL

RDL

sr.•

1186

00--1466

O~ 1013

1187
1188
t 189

OO~.:170

C-=,2737

00<1"::76
00-4500
OO,15C6
004510
004516
00.'1524
0045:26
004534
004536
OC4540
0045 .. 6
004550
004554
00456C

OC,004
OS 2737
001400

000003

002270

012737
036767

020004
175022

OOHi12

175014

174772

036767

175000

174156

001244
062702
'06367
H)0367

020000
174764

1190
1191
1192
"93
1 194

1 ,gS
1196
, 197
1198
1199
1200
, 201
1202
1203
1;2.04
1205
1206
1207
1208
1209
1210
1211
1212
12:13
1214
1215
1216

SEQ
175000

C36767

BNE
8NE
8R

000740

004574
004600

012703
0:32713
0010L'.6
022763
OlJ1C04
004567
026123

002076
000001

OO~604

004606
0046' ~

OO.'l630

000 .. 17
022763
OQ10C4
004567

004642

026142

004644
004546
004654
004656

000407
022763
001003
004567

1230
1231

004662

026160

1232

004664

10$:

ADD

PAGE

01.0

SEQ 010e

2$
(R2),
MMAVA
10$
w200.

; 00 BACK TO CHECK FOR ANY MORE!
(R2)
;CLEAR BAD PARITY
: CHECK FOR I:E',' MSMT
: GR I F NO tllEM f¥:0",n
!lIo#KIPAR2 ;UPOATE PAP TO NEXT 4K BANK.
8ITPT
;UPDATE BANK POINTER ••• L.D 64K.
BITPT+2
j ••• HI 64K.
TMAP: B~ I F ALt. DONE.
@'HKIPAR:2,1I'1000
;THIS CODE TESTS IF MSll-K IS
12$
jPRESENT A~D IF IT IS I
1f3,@/lMPR'4+2
;THE BIT TO 01SA9LE ECC IN
13$
:THE LOCATION wv;P THAT IS
113.i)IIMPR1S+:;:
;USED AS THE. CO,\1i'JAND TO
13$
; wR tTE WRONG PARITY.
1I'20004,Il\l#W,.'?
SITliIT,
MEMMAP
;CHECK IF SANK EXISTS ••• LD 64K.
1$
;BR IF SANK EXISTS.
BITPT+2,MEMMAP+2 ; ••• HI G4K.
1$
;BR IF BANK EXISTS,
45
; BR I F BANK DOESN'T EXIST.
BITPT,
MEMMAP
;CHECK IF BM~K EXISTS.
1$
jaR IF BANK EXISTS.
11'20000, R2
;UPDATE AD~~ESS POINTER TO NEXT BANK.
BITPT
jMOVE POINTER TO NEXT BANK.
11$
;6R IF MORE TO LOOK FOR.

RO;,JTINE T
TyPE MAP OF \',HERE PARITY MEMORY IS PRESENT
AND WHICH CONTROL REGISTERS CONTROL WHICH MEMORY

00462~

070032

TMAP:

000006

016670

004567

004672

011346

004574

013746
004767
004567

016650

070000

0000~6

0~6071

177776
020004

016602

0~611 0

0134'. J
000010

002276

00'::732
004734
004740

,03722
004567
001201

0115552

1253
1254

004742

022737
001006

070000

002264

1255

0~3727

1 ~56

004752
004760

1257

ao·n6G

022737
CC'1031
0.:;3737
0.43737
012705
021537
DO 1004
005015
052737

002260
002262
070000

001540
001540
002274

OO~774

005042
005044
0[)5052

005056
005060
005064
005066

{R3)

n0032. 61R3)
3$

CMP
6NE
JSR

8R
CMP

RS,
MX3

$PR I NT

"'."'*"' ....... "'''' ...... '''*''''"''' ••• ' ' ••••

; INITIALIZE ALt. PARITY REGISTERS PRESENT
;GO PRINT OuT THE FOLLOwING MESSAGE.
; ADDRESS OF MESSAGE TO BE TYPED
j "PARITY M!:MQRY M;:.p:"
; INITIAUZE TABLE POINTER
;CHECI'; IF THIS REGISTER IS PRESENT.
; BR I F NOT PRESENT,

;GO PRINT OUT THE FOt.LOWING MESSAGE.
: ADDRESS OF MESSAGE TO BE TYPED
; "CORE PARITY"

5$
>77772. 61R3)
4$
R5,
MX4

SPRINT

;GO PRINT OUT THE FOLLOWING MESSAGE.
i ADDRESS OF MESSAGE TO BE TYPED
i "MOS PARITy"

aNF
JSR

#70000. 61R3)
5$
RS,
SPRINT

.WORD

MXS

~SR

016622

O~Q327

004776
005004
005012
005016
005022
005024
005026
005034
005040

16K vER
MACY11 30A(1052)
MAP PARITY MEMORY

QO~726

1258

4$:

016630

005720
0(:4767
()t:2703

1259
1260

#MPRO.

'SlTO.

.w'ORD

004712
004714
004716
004722

004750

3$:

CLRPAR
SPRINT

BIT

BR
000006

PC,
RS.
MTMAP

Br-:E
CMP
BNE
JSR

• WORD

077772

"' . . . . . . . . . . . . . . . *01- . . . . . . . . .

;GO PRINT OUT THE FOLLOWING MESSAGE.
; ADDRESS OF MESSAGE TO BE TYPED
:"MS1~-K CSR"

5$:

00'::664
004670

004700
0047C4
004710

JSR
JSR
.WORD

MOV

1$:

1235

1262
1263
1264
1265
1.266
1267
1268
1269
1270
1271
1272
1273
1274
1275
1276
1277
1278
1279
1280
1281
1282
1283
1284
1285
1286
1287
12B9

BIT
ASL8
8PL

CZOMCFO
0-124K MEMORY EXERCISER.
ClQMCF.P11
14-FES"'78 08:19

1261

11$:

B'E

013502
016720

00.::526
004634

1246
1249
1250
1251
1252

81 T

001251

0047£7
004S€7
0:25462

1221

1 ~42
1243
1244
1245
1246
1247

BIT

001255

004562
004566
004572

004622

1236
1237
1238
1239
1240
1241

8IT
MOV

13$:
12$:

;..
:110

004616

1233
1234

BIT
BI--IE

; ;"' • • • "'..,"'."'."'.

, 21 7

1228
1229

CM"
BNE

07:56

; : '" ...... "' .. **Iie""""'" •• ** .. "' •• *.* "'''' .. * ... ""* "' •• '" '" "'. "' .. "''''''' ..... "'. **. *"'''' ...... "'*

1218
1219
1220
12221223
1224
1225
1226
1227

6EQ
ADD

4$:

20-FEB-78

0' 0300

0~3737

022537
001366

002270
002272
002276
002256

000001

001 ;;)40

001642

002256

002266

0527~7

000001
016434

as:

00.2276

000167

000274

CLP
81S
eMP
BNE

CLR
SIS

002266

0:6176
005737
oCr 1 002

07:56

PAGE 27

SEQ 0109

;GO PRINT OUT THE FOLLOWING MESSAGE.
.WORO
MX1
; ADDRESS OF MESSAGE TO BE TYPED
: "REGISTER AT"
MOV
(R3),-(SP)
; ;SAVE (R3l FOR TYPEOUT
it
THE NEXT TWO INSTRUCTIONS PROVIDE AN INTERFACE TO THE $TYPOC ROUTINE
;.
WIHTOUT LiSING A "TRAP" INSTRUCTION AS CALLED FOR BY *.SYSMAC ....
MOV
@/IPSW,
-( SP)
i PUT THE PROCESSOR STATUS ON THE STACK
JSR
PC,
STYPOC
;GO TO THE SUBROUTINE
J$R
R5.
$PRINT
;00 PRINT OUT THE 'FOLLOWING MESSAGE.
.WORD
MX2
;ADORESS OF MESSAGE TO BE TYPED
; "CONTROLS"
MDV
iSET UP RO FOR TYPMAP ROUTINE.
R3.
RO
TST
( RO)+
;UPDATE POINTER TO MAP.
JSR
TyPMAP
;GO TYPE THE rw1Er,10RY COVERED BY THIS REGISTER.
PC.
2$:
ADD
11'10,
R3
;UPDATE TO f\;EXT REGISTER IN TABLE.
eMP
R3.
flMPRX
;ARE WE ALL DONE I'IITH TABLE?
8LO
1$
;6RANCH IF f,'ORE REGISTERS
JSR
R5.
SPRINT
; THE REASON I'M OUTPUTTING TH1S CRLF
SCRl.:
; IS iO GIVE THE PRINTER ENOUGH TIME TO
; FINISH PRINTING -'..jE MEMORY MAP BEFORE THE RESET OCCURS.
eMP
1i70000.~#MPR14+6 :00 \,;,E HAVE MS11-K AT THIS ADDRESS
BNE
7$
: I F NO BRANCH
81C
@l#MPR14+2·.hPMEMAP ;IF YES THEN CLEAR THE BITS IN
BIC
@lKMPR14+4.@lffPMEMAP : THE PARI TY ME~ll0RY MAP.
eMP
1;170000, @oAlMPR15+6
;00 WE HAVE A MS11-K
BNE
9$
;IF NO GO TO TESTS NOW.
BIC
@IIMPR1S+2.@hPMEMAP
;IF YES I AM GOlNG TO
BIC
@#MPR1S+4.@IIPMEMAP+2
;CLEAR THE PARITy INDICATORS
MOV
IIMPRX,
R5
; FOR THAT PORTION OF MEMORY.
6$:
CMP
(RS),~hMPR14
:SEARCH FOR THIS M511-K
CSR IN
8NE
8$
;ANO IF ITS THERE DELETE IT

0050~5

0(;4567

R5.

.20-FEB-76

9$:

$-PRINT

( R5)
#1,@lIfMPR14
(R5)+,
@IIMPR15

6$
-(R5)

J~'1

.WORD
TST
BNE
..IMP

MX6
@II'MPRX
CTRLS
MANUAL

R5.

: SEARCH FOR M511-K CSR IN
;THE AVAILABILITY TABLE,
; AND CLEAR ITS ADDRESS FROM THE TABLE
@itMPR15 ;SET BITO IN ADDRESS IN CSR TABLE
SPRlNT
;OUTPUT MESSAGE TO RUN MS11-K TEST.
;ARE THERE ANY PARITY REGISTERS TO TEST?
; IF sa TEST THE BITS IN THE REGISTERS,
; IF NO JUMP OvER REGISTER T£STS.

.S8TTL TEST PARITY REGISTERS
; ; "' ..... i< • • • • '" '" "' . . . . . '" . . . . *"' ...... * .... *"'* •••• "' .. "'. ""*"'. '"
** "' .. '" "'''''''*'''*'''
i" SHOw THAT BITS 0, 2. 5 .. 11, AND 15 OF EACH PARITY REGISTER PRESENT
:...
CAN BE SET AND CLEARED.
;'"
THIS ~3 A ONCE ONLY TEST.
*"' ......... "'*"'*'" ........... "''''.''' "'* •• "''''''' "'''' •• '" '" ."' ....

"'* •••••

; :"' ... "' ....... "'.jI"'''' "' ..... '"
005072
005076
005100
005104
005110

005112

CTRL~:

MOY
MOV

0' 2703

002076

062703
032702
001372

000010
000001

8IT

020327

002276

8NE
eMP

a Ii 302

1$:

ACD

.6'MPRO.
(R3).
11'10.
Rl,
1$
R3,

"'*

R3
R2
R3
R2
NMPRX

LOAD INITIAL TABLE ADDRESS FOR A POINTE~
LOAD R2 WITH ADDRESS OF THIS PARITy REGISTER
UPDATE POINTER TO NEXT PAR. REG. ACD.
IS THIS REGISTER BEING USED?
GO TO NEXT I F NOT
ARE WE AT END OF TABLE

CZor.1CFQ
Q-124K r'\'!:r,1CRv ExERCISER,
C':;:OMCF,P11
14-FEB-78 08:19

1289
1290

, 291

005116
005120
005 ~ 2~
005,26

003055
0(;5762
GO,764

16K V!!R
TEST

MACYt130A(105.2)
PARITY REGISTER';
8GT

MOV

RESCHK
-2{R3 )
,$
-2{R3),
hI,

ClR

( R2)

TST
BEQ

177776

2C-FEf'-7B

1293
j 2'34

005134
0~5\40

O~5012

1295

005142
005\44

0'1201
0~6?Ol

174346

BIC

RESRVD,

Rl
Rt

Oe5! 50
005152
0')5 \ 56
OOS,62
005164

CC,405
CC'47S7

8EQ
013134

0('4761

014456

JSR
JSR

2$
PC,
PC.

~r::RROR

RE5RVD

1296
1297
1298
, 299
1300
1301
1302
1303
1304
1305
1306
,307

130a
1309
1310
1311
, 31 2

1313
1314

1315
1316
, 317

1319
, 319
1320
1321
1322
,323

DC OOQ 1
030067

177776

174362

MO'/

000001

r,.,.ov

\~(' -.:;

t R2),

=<'ESRVD

SPRNT

BIT

RO,

000170

CO,O:i.5

BNE

005172
005174

010012

MOV
MOV
CLR

3$
RO,

(R2)

(R2).

t'!1

aD!:·, 76

011201
OCS012

0052CO
005204
005206

O';67C 1
0:'0001
0014e5

174312

013,26
014420

005210
005214

D047E7
QG4767

005220

OGOOCl

005222
005222

0112Cl

005224

C~6701

005230
005232
005236

001405
OC4767

005242

005244

000001
C 33CO

005246
Q05250

00071.2

2$:

174326

65$:

(R2 )

BI·::
CMP

RESRVD,
RO,

BEQ
JSR
JSR

66$
PC,

Rl
Rl

PC,

5PRtHO
SERROR

(R2),

RESRVD,
3$

.WORD

MDV
BIC
BEQ

PAGE

28
SEQ 0110

o 1 6~67
01 :poo

1292

07:56

;GO TO NEXT TEST IF yES
; TEST iilASK FOR PAqlTY REGISTER
; IF
0, THE:~ DC NCT TEST
;GET MASK FOR REGISTER WE ARE WORK:NG ON
;LOAD RO WI,H VALuE OF 1ST BIT TESTED
; INITIALIZE THE P::RITY REGISTER
; i"lEAD THE COt'\T£tHS OF THE PARITY REGISTER
;CLE.'.R BITS II;HICH ARE RESERVED
;CHECK OTnE~ BITS - BRANCH IF OK
;SET UP VALUES FOR ERROR PRINTING.
;o+n ERROR K",,,, (GO TYP!:: A rllESSAGE)
; ERROM TYPE CODe.
; IS THIS BIT RESERVED?
;YES - DON'T TEST IT
;:\0 - SET THIS BrT IN THE PARITY REGISTER
;READ (: SAVE CONTENTS OF THE PARITY REGISTER
;ClEAR THE PARITY REGISTER
;CLEAR SIT lOCATICNS THAT ARE RESERVED
;cmIPARE THE CHECI<. WORD WITH THE DATA READ.
;8RANCH OVER ERROR CALL IF GOOD DATA.
;5ET UP VALUES FOR ERROR PRINTING.
;>o.h ERROR ,."',..
(GO TYPE A MESSAGE)
;ERROR TYPe C'JDE.

66$:

004767

174266

67$:

013054
014376

J~rt

JSR
. wORD
ASL

3$:

I 033~6

BCC
BR

PC,

SPRNT

PC,

$ERROR

RO
2$

; READ THE CONTENTS OF THE PARITY REGISTER
;CLEAR BITS ~'lHrCH ARE RESERVED
;CHECK OTHEP 8ITS - BRANCH IF OK
:SET UP VALUES FOR ERROR PRl!~rING.
;0+,.,., ERROR .** (GO TYPE A MESSAGE)
; ERRSR TYPE CODE.
; ROTATE TO GET ~,EXT BIT TO BE TESTED
; BRANCH IF rmT DONE i·Jl TH ALL SITS
:AFTER TESTI"'G FOR BIT 15 GO GET NEXT REGISTER.

; ; ..... ~ ** ~ '" ** *.. ~:;. "' . . ***0+ 0+ ... * ... "'. '" *0+" "' .... * ... **" ~-* "'*.* ** "' ........... "'**.* ***4 ... ***
:* SHOW THAT RESET CLEARS BITS 0,2. AND 15 OF EACH PARITy REGISTER PRESENT.

1324
1325

;JII
THIS IS A ONCE ONLY TEST.
; ; "'.,.. ",.lOt*"* ** ........... '" **** ...... **" ** *'" '" **** .. *** *0+**.*.* ** *0+ ** .. '" 0+ ***.* "' . .

, 326
~ 327

1328

005252
005256

012704
010403

002076

1329
1330
1331

005260

062704

00u\')10

005264

0327 t 3

1332
1333

005270
005272
005300

001372

1334
1335

, 336

OC5304
005305

012773

022704
oc 2764

000001
177777
002276

MClV
MOV

IfMPRO,

1$:

R4,

#' 1 0,

BIT

ADD
#1.

( R3)

; IS THIS F<.EGISTER BEING USED

RESCHK:

000000

BNE

r,lOV

#-1,
@(R3)
liMPRX, R4
'$

cr,~P

BLT

0~00C5

RESET
MOV
MOV

012703

002076

011302
062703

000010

1340
1341

005310
005314
005316
005322
005326

0327(,,2
001372

000001

BIT

1342
,343

005330
005334

022703

00,221 d

B!'I:E
CMP

1344

005336

01' 201

1337

1338
1339

25:

ADD

0020~4

BGE
MOV

CZQMCFO
0-' 24K f'.Ei,~CRY EXERCI SER,
1 4-F E8-78 OB: 19
CZQMCF .1'11
1345
1346
1347
1348

0053.:;0
005342
005346

042701
OC5701

005350

00 14( ~

1349
,350

005352
005356
005362
005364
005364-

004767
004767
000001

1351
, 352
, ;353
1354

16K VER
TEST

077772

64$:

014256

CLR
BIC
TST
BEQ
JSR
JSR

A POINTER

; BRANCH IF '.0
;SET ALL BITS TO A 1
;Af,lE 'IE AT THE END OF THE TABLE
; IF Y:;:S THEN WE ARE READY TO TEST
; RESET THE \'iORLD
; LOAD HJITIAL ADDRESS FOR POINTER
; STOf,lE PARI TY REGISTER ADDRESS

#MPRX,
MANUAL

('2) ,

MA~Yl1
:SOA (1052)
PARITY :1£GISTER5

0::'5012

012i'~4

ItrllPRO,
(R3) ,
#10,
lit,
2$

; LOAD INITIAL TABLE ADDRESS FOR

;GET CONTENTS OF REGISTER

20-FEB-78

07: 56

PAGE 29

SEQ 0111

( R2)

#77772, R,

R,
65$

pc,

• I<.'ORD

PC,

SPRNT
$ERROR

; CLEAR B!TS NOT EFFECTED
BY RESET
;CHECK IF REST
WERE CLEARED 3Y
~ESET
; BRMlCH OVEP ERROl': CALl. IF GOOD DATA.
; SET UP VALJES FOR ERROR PRINTING.
;,. 0+,... ERROR
(GO TYPE A MESSAGE)
; ERROR TYPE ceDE.

...

65$:
000153

; SRANCH BACK TO CHECK NEXT

1355
1356
1357

005366
005372

012700

000014

012701

00'562

1358

005376

1359
1360
, 361

005400

0::5021
OC 5300

005404
005410

OC 1375
105767
001 Des

1363

005412

016707

173546

1364

0054~O

000167

00040~

1362

005402

174146
174154

MANUAL:

MOV
MOV

1$:

CLR
OEC
BNE
TSTB
BNo
MOV

JMP

1112. ,

;!tFSTADR,Rl
(R1 )+

RO
,$
SELFlG
MANULI
$TMP2.
MANUL2

LSTADR

SET COUNTER TO CLEAR , 2 WORDS.
STARTING AT fSTASR.
CLEAR THE LOCAT IONS.
COUNT.
BR IF f.1DRE.
CHECK FOR SELECT PARA!,lETERS STARTUP.
BR IF PARMlETERS TO BE SE LEeTED.
SET UP VIRTUAL LAST ADDRESS.
SKIP PARAMETER SELECTION SECTION.

CZOMCF:i
0-124K NEMORY EXERCISER,
CZQMCF.Pl1
14-FEB-78 08:19

16K VER
MACY11 30A(1052)
.20-FES-78
USER PARAMETER SELECTION SECTIO:-.l

07:56

PAGE 30

SEQ 0112

1365

.S6TTL

, 366
1361
136B
1369

; ; * ..... "' .. * .......... ",,,, ......... **."' ... ** .... "'. ** ."'* .. ,. ....... ,. "' .. '" O;<i<*.TiT • • • • "' . . . . . "'''' • •

1310
1371
1372
1313
1374
1375
1376
1377
1378
1379
1380
13S1
1382
1383

1384
1385
1386
1397
1388
1389

1390
1391

1392
1.39:1
1394
1395
1396
1397
1398
1399
1400
1401
1402
1403
1404
1405
1406
, 407
1408
1409
1410
1411
1412
1413
1414
1415
1416
1417
141B
1419
1420

; ; "' ... "'."',. ......... ,."...... ,",1'"'''' ........ ", •• ",1< ... "'* ....... '" **"" ",," •• '" ...... ""* * ......... "' ..... "'.
: ... USER P~RAMETER SELECTION SECTION

005424
005430
005432
005434
0054315

005442

005444
005450
005-154
005460
005464
005470
005474
005476
005502
00550 ...
005506
005510
005512
005514
005516

005520
005522
005526
OC5530
005534
005536
005542
005542
005546

012700
OaSC01
OC5002
DeS003
OC4567
026311

00000'

013746
OC.4767
0'::2716
OC 5067

17777 ~
015664
000001
174(;30
174046

005061

020000

oe5503
0:0361

0'6006

,13116
173772

015146

JSR
.WORD

015744

j*
Ol37~6

005550
005554
OOSSeO
005S62
005564
005570
005572
005576
005604
005610
005614
005616
005620
005624
005626

0327~6

005632

001404

1431
1432
1433
1434

1435
1436
1437
143B
1439
1440
1~41

1442
1443
1444
1445
1446
1447
1448
1449
1450
\451
1452
145~

1454
1455
1456
1457
1458

oo£.aso
005662
0056134

0056.0
005672
005676
005700
005702

005704
005706
005712
005714
O:i5720
005722
00572~1

005730
005732
005736
005740
005742
005746
005750
005752
005;56
005762
005766
005770
005774
OOGOOO
006C04
006004
006010

0047E7
005716
0010 J
005767
001005
0.6716
0.6767
Oi 2667
020467
1"'1352
103403
021667
1013"i6

",776
015560
015720
173366

113364

0'5104
llS:

173764

015614
'13750
017777

'2S:

010067
010167
0::0067
050161
0;{.0367
1 C3404
'1 [.1020
C20.267
H 1015
DE 2702
a( S5C3
C06300
OC,S101

16K VER
USER

1 ~69

1";70
1471
1472
1473
1474
1475

(lOGC 12
C00,),6
('00022
006026
OO~~~2
0(·,-,~34

OC.G:i42
G:'i3J5J
':~C~J5a

CJ,:.:'6::
OGGJi2
OC-0:074
0061 CO

R5.
!..ADMES

$PRINT

LSTADR
(SP).
lOS
'MASK4K. (S')
, 3$

020000

~HI

AS!

C:00~7

173574

ROl
BMI
BIT

020167
001 COS

173570

BNE

BIT
SI":;:;

'6$:

l1S:

0057":0
015544

BIT
BN!
BIT
B"E
TST
JSR
.'ORO
Bi,

000606
010067
0'0167
C 57€7
C014(14
0..12716
062716
O~ 2Gf;7

160000
040000
173556

004567

015502

20$:

173624
173622
172620

Mev

013746

177',76

CC4iE.i7

015316

O~ 26£7

173552
,72554
1600tJO
Q400CO
000002
OOC001
017771

1735C'2
1735L..oll

173532
'73524
173516
173510

173502

07:56

PAGE 21

FADMAP
;SET UP FIRST ADDRESS MAP.
Ft.CftAP+2
SAvTST
:SET Fl.AG IN TEST MAP ••• LD 641<.
SAVTST+2 : ••• HI 64K.
$MIOCT
i:HECK FOR PAST L~ST ADR.
; 8R IF BcLQW l.AST AO~.
;6R IF GONE PAST LAST AOR.
LSTADR
;CHECK FOR PAST LAST ADR.
; 6R I F GONE P~ST LAST ADR.
:UPCATE .t..DD::ESS POINTER.
#20000. R.2
R3
; ••• HI B!TS.
RO
;UPDA:E BANK POINTER ••• LO 64K.
; ••• HI 64K.
Rl
; fiR IF OVERFLO·,I.
'7$
MEMMAP
;CHECK IF THIS BANK EXISTS.
RO.
13S
;SR IF BANK EXISTS.
MEMMAP+2 :CHECK IF THIS BANK EXISTS.
Rl.
;BR IF BANK EXISTS.
'3$
14$
;6R IF EANK DOESN'T EXIST.
ME.fI~MAP
;CHECK IF THIS S~NK EXISTS.
RO.
20$
:SR If" IT EXISTS.
Rl.
MEMMAP+2 ;CHECK IF THIS SANK EXISTS.
20$
;9R If" IT EXISTS.
( SP)1'
;ADJUST THE STACK.
R5.
SPRINT
;GO t:RINT OuT THE FOLLOWING MESSAGE.
BADADR
; ADDRESS OF MESSAGE TO BE TYPED
; "?ADDRESS IN UM1APPED BANK?"
MANUAL
; LOOP BACK 70 THE BEGI~mlNG.
LADMAP
;SET UP MAP FOR LAST ADDRESS.
RO.

Rl.

T5T

MMAVA
22$

BIC
ADD
MOV

L~DMAP+2

"60000.(5P'
#40000.

(SP J

(SP)+.

FS:APR

R5.

SPRINT

;CHECK FOR ~"E!.lC!RY MANAGEMENT.
; SR I F NO f\.l£M f. 1G',' r .
:ADJUST FSTAOR TO VITRUAL SANK O.
; ... TO V!RTJ.\L BAr<!\ 2.
;SAVE !=ISRT ADDRESS OFF THE STACK.

;GO PRI~T OuT THE FOLLOWING MESSAGE.
: ADDRESS OF r.~ESSAGE TO BE TYPE!)
:"SELECT CC'~STMlr:
pOI
THE NEl(T TWO INSTRUCTIONS PROVIDE AN III.:ERF,\CE TO THE SROOCT ROUTINE
;* WIHTOt..T USING A "TRAP" IN5TRUCTICN AS CALLED FOR BY **$V$MAC"".
MOV
@N'PS'JJ.
-(SP)
;PUT TH:' PRoceSSOR STATUS ON THE STACK
uSR
pe.
S,l:ZOneT
;GO TO THE SU8RO·... TlNE
filOV
(SP)+.
.cor~ST
:S::.VE THE CC'~ST:.:-.tT
MANUL2: TST
P,',.'~lAVA
;CHECK !F ",lSM fllGlI,olT IS AVAILABLE.
BEQ
31 S
; eq IF Nn fIlE!.1 f.1G\lT.
SIC
N1S0000.LSThOR
;AOuUST LSTAOR TO VIRTUAL BANK O.
ADD
",4COOO, LSTADR
; •.• VIRTUAL BANK ~.
31$=
ADO
#1'2.
LS7':'DR
;A:JdUST LAS: ADDRESS UP ONE 1'10RD.
aIC
~BITO.
LSTADR
:M,\KE SURE IT IS A ~.. ORD ADDRESS.
BI T
~M..\SK4K. LST ADR
: CHECK 1 F LAS T ADR IS ON BANK aOUNDRY.
SNE
STAin1
;aR IF NOT eN e01..lNDRY.
CLR
LAC:t.\P
;CLEAR OUT THE l.AST ADDRESS MAP.
CLR
LAOMAP+2
JSR
• ~!oRD

026~S6

;GET THE DATA.
;CHECK FOR LAST ADR BELOW FIRST ADR.
; 99 I F LAST BELOW FIRST.
;6R IF LAST ABOVE FIRS":'.
;CHECK FOR LAST 9ELOW FIRST.
;8R IF LAST BELOW FIRST.
;CHECK IF FIRST AOR ON BANK BOUNCRY.
; SR I F ON BOUNDRY.

P.O.
R, •
RO.
Rl,
R3.
15$
16$
R2.
'6$

MOV
BEO

22$:
30S:

(5",)

SHIoeT
LSTADR
$H!OCT

MACY1130A(1052}
20-FER-78
SELECTION SECTION

BHI
ADD
ADC

173612

;CHECK IF ADR 0 SELECTED (DEFAULT).

:2R IF NOT a (DEFAULT)
; CHECK HI SITS.
:SR IF NOT a (DEFt.ULT).
;SET UP DEFAULT LAST ADR.

PARAMET~R

CMP

173606

C057€.7
CJ14J6
C·::2767
(J:,27€,7
CG2767
C.127£7
0.12767
0':'10(4
085067
005067

C.'P
BHI
BIT
BEQ

173704

030C€7
001354
0301 E7
co 1351
0007:4

004567
026421

(SP)
11$
SHIoeT
11$
$TMP2.
$TMP3.
(SP)+,
R4.
10$
12$

BIS
81S
CMP
BlO

1 '0415

or. 1010

TST
BNE
TST
SNE
MOV
M''.'
MOV
CMP
SHI
BLO

MOV
MOV

'5$:

;00 PRINT OUT THE FOLLOWING MESSAGE.
; ADDRESS OF MESSAGE TO BE TYPED

; "LAST ADDRESS:"
THE NEXT TWO I~STRUCT!O"'jS PROVIDE A~ INTERFACE TO THE SRDOCT ROUTINE
WIHTOUT USING A ~TRAP" INSTRt.:CTlON AS CALLED FOR BY ."'SVSMAC ......
MOV
~HP::al".
"CSP)
;F-tJT THE PR;JCESSOr! STATUS ON THE STACK
uSR
pc.
SRDDCT
;GD TO THE SUBROUTINE

173730
173726
173664
173662
015630

g5~

1460
1461
1462
1463
1464
1465
1466
1457
10:168

'0$:
004567
026376

;'"

0051334
005640
005E';4
003550
005,:&4

kBlTO.

is ENTEJ=:ED BY STARTING AT 204.

;SET UP SANK POINTER.
Rl
; ... HI 6-.11\.
R2
;CLEAR ADDRESS POINTER.
R3
; ••• HI AD:)RESS BITS.
R5,
SPRINT
;GD PRINT OUT THE FOLLOWING MESSAGE.
.WORD
FAOMES
;ADDRESS OF MESSAGE TO BE TYPED
;"FIRST ADDFESS:"
;.
THE NEXT nlQ INSTRUCT!O~S PROVIDE AI\: INTERFACE TO THE SROOCT ROUTINE
;* \,\IHTOUT USING A "TR"P" !t\STRUCTION AS CALLED FOR BY **SV$MAC*"'.
MOV
Q)IIPSW.
-(SP)
;PUT THE PROCESSOr! STATUS ON THE STACK
$ROOCT
;30 TO THE SUBROUTINE
JSR
PC.
BIC
"'SlTO.
(SP)
;M""KE SU~E ADDRESS IS ON A WORD BOUNDRY.
CLR
SAVTST
; INIT TEST MAP ••• LO 64K.
CLR
SAVTST+2
; ••• HI B4K.
1$:
ADD
;'20000, R:2
iUPDATE ADDRESS POINTER TO NEXT BANK.
AD':::
R3
CM?
R3.
1HIoeT
;CHECK HI A:)DRE$S BITS.
BlO
2$
; BR I F NOT HI E~:J:.:GH YET.
BHI
3$
;BR IF PAST SELE:TED ADDRESS.
CMP
R2.
(SP)
; CHECK THE LO ADD;:;ESS BITS.
;BR IF PAST SELECTED ADDRESS.
BHI
3$
2$:
:UPDATE POI~HER ••. LO 64K.
ASL
RO
ROL
. R1
; ••• HI 64K.
BPL
1$
; SR BACK TO CHECK NEXT BANK.
B~
17$
;BR IF OVERFL':IW.
3S:
BIT
RO.
MEMMAP
;CHECK IF BANK EXISTS.
8NE
4$
;BR IF BANK EXISTS.
BIT
R1.
MEMMAP .. 2 ; CHECK HI 64K.
BE~
, 1$
: SR IF ADDRESS IN UN-MAPPED BANK.
4$:
MOV
SHIoeT, R4
;SAVE FIRST ADR HI BITS.

016050

0£2702

103403
1(,1006
020216
,e 1 004
006300
eG6101
1('0364
0')0507
0:30067
001003
030167
001501
016704

MANUl1: MOV
Cl.R
CLR
CLR
JSR

0-124K f.'EMORY EXERCISER.
;ZQMCF0
;ZQMCF.Pl1
14-FE8-7S 08:19

1421
1422
1423
1424
1-125
1426
1427
14:28
1429
1430

USER FARAMETER SeLECTION SECTION

CONST

SEO 0113

CZOMCFO
0-124K riEi'll0RY EXJ;RCISgR,
C2QMCF.P11
14-r'Ea-78 oa:19

ifjK VEE
~H,E.R

MAr:Y11 30A(1052)
PARAMIiTi:1< SELEcrION

20-FEB-78

07:56

PAGE 32

SEQ 0114

SECT10~

\: /*\: /"'\: /t\: ;*\: 1*\ :/*\ :/'\: /.\: ;*\: i"'\: /*\: /"'\: />11\: /"'\: / .. \: / .. \:
;..
;.

REST OF THE PROGRAM IS PO:'ITION INOEPEtWENT CODE, SO THAT IT CAN EX!CUTE PROPERLY WHEN THE PROGRAM HAS BEEN RELO
THIS IS DONE SO THAT THE; FIRST I'AJ 8AN'KS OF fI~EMORY CAN 8E EXERCISED IN EXACTLY THE SAME MANNER AS THE REST OF MEMORY

: /: \-/; \"' /: \" ': V/: \"/: V'I; \"'1: \'''/: \ ... / ~ V/: \"'/; V"/: \"/: \"/: \*/ :\ .. /: \ .. /: \'"
1482
14B3
1464

1485
1486
1487
1488
14B9
1490
1491
1492

1493

006104
006110
006114
006116
000124
OC6132

006140
006144
00G1 ~O
006152
006160
006162

016706
OC5767
OC 1403

17351 ~
1 7~502

G~2771
o I ~767

000014
006104
172442
Dn37?

01'- 6767
0l!47€7
005767
001406
032737
OC' 1 002

OQ4767

TST

173474
17;!754

'$:

17243~

00000'

BED
BIT
BNE
oSR

177572

006112

16K VER

..,
..

; ",TEST

;

1499

;

1500

;
;
;
; :

1520
1521
1522
1523
1524
1525
1526
1527
1528
1529
1530
1531
1532
1533

;

PC.

004567
090 0 C1

012436

006174

OC-016?

0051;04
;

OOG200
006204
006210
005212
005214
006216
006220
006224
006230

004467
00-1767
010012
012201

Q06222
007644

00
R1
R2
R3
R4
A5

MMINIT

SET U? MEMORY PARI TY ERROR VECTOR
CHECK FOR ~:EMORY MANAGEMENT AVAILABLE.
BRANCH ! F I~O ~~EM MG:-'1T.
CHECK IF MEM rl:GMT ENABLED.
BR IF MEM I'.·G~.n ENABLED.
SET UP MEM MGMT REGISTERS.

30A(10S2)
20-FEB-78
07:56
MEMORY ADDRESS TESTS

FLAG

PAGE 33

SEQ 0115

MEtWRY ADDRESS TESTS

1 $:

0~00C1

0014C5
004767

012142

PO~767

0\3410

64$ :

WRlTE '/ALUE OF MEr.10RY ADDRESS INTO MEMORY
( SHOULD BE)

= ChTA WRITTEN I Nro MEMORY

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

2$:

DATA RSAD FROM MEMORY
\"lRTUAL ADDRESS
'OT USED

OS.
1

",MP

TST32

:!.SCDPE

UPWt.RDS I'IORO ADORESSI:-JG.
JSR
R4.
IN! TMM
PHY ADR
JSR
PC.
MDV
(02 )
RO.
MOV
( R2)+,
R1

00.
655

~.'

PC.

SPRNT2
$ERROR

• WORD
000002

ADD

#2.

BlT
006736

6NE
JSR

05.
2$
PC.

000002

BIT MASK.

'",* •• ** ..... ,. * ........ * ... * ** ;,"''''''' .. "'''' *** .. "''' *,,* ** .. * "'. ** .. * "'***

"SR
• wDRD

eMilSEQ
JSR
"SO

noJAS)

·Jf USED
BLOCK aQUNDRY

PC.
2

:GO TO SCOPE ROUqNE.
; MI~~ !MUr." BLOCK SIZE OF 1 (,;oRDS
REQUIRED FOR Ti-ilS TEST.
; S!<IP TO NExT TEST WHEN LESS THAN ONE BLOCK
; AVId LABLE FOR TEST.
; INITIl,LIZE THE r,~EMDRY ADDRESS POINTERS.
;GET PHYSIC"'L ADDRESS INTO RO
;~iRITE vALUE OF A'-,,)RESS INTO ADDRESS
;G~T THE DATA FRorJi MEMORY ur~DER TEST.
; CO:.1PARE THE CHECK ('iORD ".J!TH THE DATA READ.
; BRANCH OVER ERROF~ CALL IF GOOD DATA.
; SET UP VALUES FOR ERROR PRINTING.
;
ERROR
(GO TYPE A MESSAGE)
;ERROR TYPE CODE.

.......

*'" '"

65$:

OOG:~2

C05232
QOG236
006240
006242

T5T1 :

006166
006166
006172

062700

030502
DO 1 3£;i3
004767

RO
R2
Mf/1UP

: ADD ,2 TO PH'(S lCAl ADDRESS
; CHECK FOR EtW OF A BLOCK.
; BRANCH IF "'ORE rr~ CURRENT BLOCK.
; FIND NEXT BL:JCK A~J:J LOOP TO 1 $.

OOG246

006252

004467
0041157

'62700

006612
007576
000002

0' tl2C1
OD6::!66

1534
1535
1536
1537
1538
1539
1540

@II'''.~O

TST1

MACY11
1:

~e:CTIO:-.l

1497
1498

1519

11'61 TO,

SET STACK POINTER
CHECK CACHE ~RESENT
BRANCrl I F NO CACHE
TURN OFF CACHE
IN!T LOOP AODRESS.

: ; .. * ... '" *"" "' ..... "'-. "' •• '" ot-"" ** "'''-''''' **" '" * ... ,. * .... * "-of** "' ..... '" ** ** >it* ........ '" "'*"' ... ***

1495
1496

1506

(jilC.aSREG
'!;STARTl,$I.f:ADR
RElOCF, $lPADR
MMIiF
PC.
MMAVA
TST1

• SarTI. SECTION

i 494

1S07
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518

B1S
MOV
ADO
"SR

172746

1$
# 14.

Bf-l

CZQMCF'J
0-124K MEMORY eX~RCIS~R.
ClQMCF.P11
14-.FEB-78 08:19

1501
1502
1503
1504
1505

.STACK,
CASFlG

STARTl : MDV

OOG3CO
006302
006302
006304
006309

0:::0001
0:"'1405
004767
G()4767
OGOO02

012046
013340

CHECK THAT VALUE OF MEMORY AODRESS ~';AS WRITTEN CORRECTLY
;
DOWr-.:WARDS (.JORD ADDRESS I NG.
JSO
R4.
INI TON
; INITIALIZE THE r,~EMORY ADDRESS POINTERS.
JSR
PC.
FHYADR
; GET PHYSICAL ADDRESS INTO RO
it'}. ,
4S:
SUB
RO
; DEC D,'\TA By 2
M(,'i
-( R2) •
R1
;GET THE DA iA FRO"" r>lEMORY
CMP
R1
; CQ,:,FARE THE CHECK "';OR8 WITH THE DATA READ.
RO.
SEQ
67$
; 3RANCH OVEP ERROR CALL IF GOOD DATA.
6<;$ ,
SP!f;NTO
PC.
; SET UP VALUES FOR ERROR PRINTING.
JSR
$ERRCR
PC.
(GO TYPE A MESSAGE)
; "'* .. ERROR
; ERROR TYPE CODE.
2
• WaRp

as:

"5"

.. ,. *

67$ :
C30S02
CO 1364
OQ4767

007,62

BIT
BN<
"SR

R5.
4$
PC.

R2
M~1DOWN

; CHECK FOO END OF A BLOCK.
; BRANCH 1 F "lORE IN CURRENT BLOCK.
; FIND NEXT SlaCK AND LOOP TO $TAG1.

CZOi,~CFO

CZorlt'::F,Pl1

0-12..lK [,'EMORY EXEnCISER,
14-FEB-78 09:19

1541
1542
1543
1544

.
...

; ; . >1' .. 01< '" "' . . . . . '" ..

; .TEST 2

:
:
:
:
:'
:'

1545
1546
1547
1548
i 549
1550
1551
1552
1553
1554
1555
1556
1557
1558
1559
1560
1561
1562
1563
1564
1565
1566
1567
1568
1569
1570
1571
1572
1573
1574
1575
1576
, 577
1578
~ 579
15BO
1581
1582
1583
1584
1595

1633
163i1
1635

1636
1637
1638
1639
1640
1641
1642
1643
1644
1645
1646
1647

.-*, "' .. ",,, .. , , " " " ", ....

>I' " ....

SEQ 0116

* ... *,;.- ... '" "'* ".*' "'.'" ..... '"

\"'RIT~ VALUE OF ME;,\OIH ADDRESS INTO MEMORY
O,l.TA WRITTEN I NTO MET/lORY ( SHOULD BE)
DATA REt.O f....~OM MgMORY (WA5 )
V:RTUAL ADDRESS
= NOT USED
NOT USED
BLOCK BOUNDRY BIT MASK.

··

oj.

006320
006324
006330
00633~

006334
006336

006340

TST2:
0(14567
000000

012312

OC44E,7
0:'4767
110022
OC'52CQ

006102
007524

1$:
2$ :

006640

006364
006370
006374
006376
006376
006400
006402

0044"': 7
C04767
005300
1 j 4201
1 ~0001
001405
OC4i67
0 4767
000003
030502
Ou 13€S
004767

006514
007500

011752
013;244

007266

JSR
R5,
!SCOPE.
• \"rr":)
0
UPWARDS BYTE ADDRESSING.
R4,
INITMM
JSR
PC,
PI-!Y!.DR
JSR
MOVB
RO,
( RJ2)+
INC
RO
R5,
R2
BI"
BNE
2$
PC,
MMUP
JSR

:GO TO SCDPE ROUTINE.
: fJO M!.N IMUM BLOCK SIZE REQUIRED THIS TEST.
; INITIALIZE THE ~EMaRY ADDRESS POINTERS.
; GET PHYSICAL ADDRESS INTO RO
;\oJRITE VALUE OF ADDRESS INTO ADDRESS
; ADD ONE TO PHYSICAL ADDRESS
; CHECK FOR END OF A BLOCK.
; BRANCH IF rt'ORE IN CURRENT BLOCK.
: FIND NEXT BLOCK AND LOOP TO '$ •

CHECK THAT VALUE OF MEr,;ORY ADDRESS WAS \oJRITTEN CORRECTLY
DD~oJN\oJARDS BYTE ADDRESSIt-<G.
1 NlTDN
; INITIALIZE THE MEMORY ADDRESS POINTERS.
JSR
R4,
PhYADR
;GET PHYSICAL ADDRESS INTO RO
3S:
JSR
PC,
4"; :
RO
;DEC DATA BY
DEC
-( R2) ,
; GET THE DAjA FRDrll MEMORY
r,10vB
R'
Ch:,..oS
; CHECK THE ~A T A ••• La BYTE ONU VALID.
RO,
R'
65$
; BRANCH OVER ERROR CALL IF GOOD DATA.
BEQ
PC,
SPRNTO
; SET UP VALUES FOR ERROR PRINTING.
64$:
JSR
;.,.
(GO TYPE A MESSAGE)
ERROR
JSR
PC,
SERROR
; ERROR TY PE CODE •
• wORD
3
6SS:
; CHECK FOR END OF A BLOCK.
BIT
R5,
R2
4$
BNE
; BRANCH IF MORE IN CURRENT SLOCK.
M!\mOWN
; FIND NEXT BLOCK AND lOOP TO $TAG1.
JSR
PC,

:
:

006344
006350
006354
006350
006360
006362

030502
001374
004767

....

...

; ; .. "'*'" .¥* ..... *""~ ..... "'*'" "' .. *""''''''*''''' ** .. ** "''''*'' ***'" "* ..... "'''''>II "'''' •• ''' .. '''* "'''' .. ' ' "''''

l,oJRlTE l ' 5 corllPLEME!'IlT VALUE OF ADDRESS INTO ADDRESS.

; .. TEST 3

:'
:'"
;

:
:
:

RO
R'
R2
R3
R4
R5

.
..

= D.\TA WRITTEN INTO r-tD1ORY ( SHOULD BE)
D,UA READ FROM ME~1l0RY (WAS)
VIRTUAL ADDRESS
NOT USED
NOT USED
8LOCK 80UNDRY BI T MASK.

; ;,. . . . . . . . "' .. It '" "' ..

T5T3:

006406
006406

004567

006412

000000

006414
006420

0044£7
004767
005100
062700
010042
030502

006424
006426
006432
006434

012216

006436
006440

OC 1373
004767

006444
007430

1 S:

0000,-,2

2$:

Q-124K MEMCRY EXERCIS~R.
CZQMCFO
14-FEB-78 08: 19
CZQMCF. P1 1
1597
159B
1599
1600
1601
1602
1603
1604
1605
1606
1607
160S
1609
1610
1611
1612
1613
1614
1615
1616
1617
161B
1619
16;20
1621
1622
1623
1624
1625
1626
1627
1628
1629
1630
1631
1632

RO
R'
R2
R3
R4
R5

"'''''''* .... ' ' .. ". ~ '"

; ; .......... *'" ", .... ", ...... * •• * "'''' "'. '" *'" "' .. * •• *' "' .. *'" *."'''' * "'. *"'* ."'*."'''' .... "''''.''' "' ..

C0631.2
006312
006316

1586
1587
1588
15B9
1590
1591
1592
1593
1594
,595
1596

MACY11 30A(1052)
:;:C-FE~-78
07:56
PAGE 34
WRl h
VALUE :]F 1I:£:\~Cf\Y AC;ORESS INTO l\'E,\lORY

IGK VH
T2

005444
006450
006454

004467
004767
005100

005756
007400

BNE
JSR

;NO MINIMUM BLOCK SIZE REOU I RED THIS TEST •
;INITIALIZE THE MEMORY ADDRESS POINTERS.
;GET PHYSICAL ADDRESS INTO RO
; Cm.IPLEMENT THE AoR
; ... 2 TO OAT A--ADR GOES DOWN SO COM GeES UP
; PUT DATA INTO MEMORY
; CHECK FOR END OF A BLOCK.

2$
PC,

Mrt.DOWN

: BRANCH IF tI'ORE IN CURRENT BLOCK.
; FIND NEXT BLOCK AND LOOP TO 1$.

CHECK CaMP LEMENT DATA W!=1ITTEN DOWN
UPWARDS WORD ADDRESSING.
R4,
INI TMM
; INITIALIZE THE MEMORY ADDRESS POINTERS.
JSR
PC,
PHYADR
; GET PHYSICAL ADDRESS INTO RO
JSR
; COMPlEr,lENT IT
CC.l
RO

4$ :
012201
0-: 0001
001405
0(-4767
004767
000002

011676
013144

64S:

MOV
CMP
BEQ
JSR
uSR
• WORD

(R2)+,
RO,
65$
PC,
PC,
2

SUB
BIT
BNE
JSR

R5,
4$
PC,

65$:

006476
006476
006502
006504
006506

3~ :

;GO TO SCOPE ROUT INE.

MA:":Yl1 30A( 1052)
20-FEE-78
07: 56
PAGE 25
WRITE 1 's COMP LEMENT VALUE OF ADDRESS INTO ADDRESS.

007230

006455
006456
006-160
006462
005464
C06470
00647':::

pc.

16K VEO
T2-

"'* "''''. >I ..... *"''' * "' ....... '" '" * "'."' ... "'* * .. "'''' '" "' .. "' .. '" "'*"''''.''' ***"''''* ••

R5,
JSR
SSCOPE
• WORD
0
DOWNWARDS ,.,.ORD ADDRESSING.
R4,
HJI TON
JSR
PHYADR
JSR
COM
RO
#2,
RO
ADO
-( R2)
MOV
RO,
R2
<5,
BIT

162700
030502
001364
OC4767

000002

006472

; ....
;

RO
R'
R2
R3
R4
R5

.
..

:
:'
:'

SPRNT2
$ER"OR

; ; *"'* * "''''''' .. "' .... "' .... "''''''' .....
: "'fEST 4

0'
R'

RO
R2
MMUP
>1<';'

; GET THE DATA FROM
; COMPARE THE CHECK
; BRANCH OVEP ERROR
:SET UP VALUES FOR
(GO
ERROR
;ERROR TYPE CODE.

; '" "'*

...

MEM:JRY UNDER TEST.
WORD WITH THE DATA READ.
CALL IF GOOD DATA.
ERROR PRINTlt-<G.
TYPE A MESSAGE)

; COUNT DOWN WITH ADDRESS
: CHECK FOR END OF A BLOCK.
: BRANCH IF fv'ORE IN CURRENT BLOCK.
: FIND NEXT BLOCK AND LOOP TO 3$.

*"',. ..... '" "'* '" ** '" "''''''' '" * OJ. '"*"'* "'* * ... "'*"' .... *"''''* .... "'.

INTO ALL ADDRESSES IN A 4" BANK
vlRlTE SANK
DATA WRITTE~ INTO MEMORY ( SHOULD BE)
DATA READ F!;Cr.l MEMORY (WAS)
VIRTUAL ADDRESS
NOT USED
·IT USED
B:"OCK BOUNDRY BIT MASK.

:'
:; • "' .. "'''' ... "'* .. "" - .. *>to"' ' ,. .... * ... " "'". "'.,,'" "'. **", .. " '" '" '" ,,'" >i<.* "** *...... *'" "'** "''''**'''
006512
006512
006516

TST4 :
OC45E7
000000

012112

006520
0013524
006530
006532
006534
005536

004467
004767
1".0022
030502
OU 1375
004767

005702
007400

006542
0,)6546
OCE552

OC44G7
004767
1: 2201
0:'0001
001405
004767
C04767
000003

005660
007356

1$:
2S:

006442

:
:

006554
OCG556
OC6560

00E.56·'
00£570

lS·W

006572

1649
, 650
1651
1652

000572
COG574

CJOS02
001356

006576

004767

011564
013050

006402

R5,
SSCOPE
JSR
.I... ORD
0
UPWARDS BYTE ADDRESSING.
R4,
INI TMM
JSR
JSR
PC,
BANKNO
MOVB
(R2 ~ +
RO,
R5,
R2
BIT
2$
8NE
JSR
PC,
M~'UP

;GO TO SCOPE ROUTINE.
;NO M!NU,lUr" BLOCK SIZE REQUIRED THIS TEST.
; INITIALIZE THE MEMORY ADDRESS POINTERS.
; G!:T THE BM,K NUMI3ER INTO RO
INTO .I\LL ADDRESSES
;\',H~PE BANK #
; CHECK FOR END OF A BLOCK.
; SR/...NCH IF II'ORE IN CURRENT BLOCK.
; FINO NEXT BLOCK . "0 LOOP TO '$ •

CHECK THAT DATA \'IRITTEN ABOVE CAN BE READ
UPWARDS BYTE ADDRESSING.
JSR
R4,
lNlnm
; INITIALIZE THE '\~EjWRY ADDRESS POINTERS.
B;'NkNO
;GET THE BA~K t-<u\leER I~HO RO
3$ :
JSR
PC,
4$:
; R!:AD THE DATA O~T OF :.lElIlORY
MOV9
( R2)+.
R'
; CQ!.lPAR ~ THE CHECK IImR!) Vi ITH THE DATA READ.
C~!P
RO,
R'
65$
; BRANCH D'/ER ERROR CALL IF GOOD DATA.
BEQ
64$ .
uSR
PC,
S?RNTI
; SET cP VALUES FD.=< ERrtOR PRINTING.
(GO TYPE A MESSAGE)
PC,
JSR
$ERROR
;
'" ERROR
• WORD
3
; ERROR TyPE CODE •
65$:
R5,
BI1
R2
; CHECK FOR END OF A BLOCK.
4$
BNE
; BRANCH IF II'ORE IN CURRENT BLOCK.
JSR
PC,
MMUP
; FIND NEXT BLOCK AND LOOP TO 3$ •

"''''

SEQ 0117

CZQr.1CFJ
Q-124K rl'!:.r,lORY EXERCISER,
CZOMCf.P1114-FEB-780e:19

1669
1670
1671
1672
1673
1674

;.
;
;
;

1684
1685
1686
1687
1688

...
.

;
;
; ;,. '" "'It "'''' '" "'"'.,. * .......... *"'''',.. .. ,. ... ,." ** '" '" t,.. ", .... ,.. ** "'''' "'"' * '" '" * * .. ,. '" "',. .. '" "' .. *1O "' .. "'_

006602
OOG602
003606

T5T5:
OC4567

012022

oeCODO

006610
006614
006620
006622
006624
0013626
006630

0044q7
OC47€7
005100
1 j 0042
030502
OU 1375
004767

003534
006640
006644
006646
006650
006652
006654
006660
006664
006666
006666
006670
006q.72

0044E7
004767
005'100
1 \ 4201
020001
001405
0047E7
0047E7
000003

;
0062~ )
007310

1727
1728
17::?9
1730
1731
1732
1733
1734
1735
1736
1737
1738
1739
L 740
1741
1742
, 743
1744

J5R
• WORD
CO~N~ARDS

JSR
JSR
COM
MOVB
BIT
BNE
JSR

1$:

2$:

007040

R5,
:tSCCPE
0
BYTE ADDRESSI1'\G.
I NITDN
04,
PC,
BANKNO
RO
-( R2)
RO,
RS,
R2
2$
Mli1[;Ol'jN
PC,

; GO TO SCOPE ROUTINE.
; NO MIN I r~1ur,\ BLOCK SIZE REQUIRED THIS TEST.
; INITIALIZE THE r,'::r.l0RY ADDRESS POINTERS.
; GET THE BA~K ~.ur'11E;ER INTO RO
; l' S cor.~PLEr.:ENT OF BANK
; PUT t '5 cor,' OF BANK
INTO MEMORY
; CHECK FOR END OF A BLOCK.
; BRANCH IF ~/CR= IN CURRENT BLOCK.
: FIND ~EXT BLOCK ....>10 LOOP TO 1 $.

;
;'

CHECK THAT DATA 'NiUTTEt< CAN BE READ.
DQWN\<JAROS BYTE ADDRES'S 11\:G.
INlTCN
JSR
R4,
; INITIALIZE THE MEMOr1Y ADDRESS POINTERS.
J5R
PC,
8ANKNO
3$ :
; GEl T~E BA~~K
INTO RO
RO
COM
; S£T l' S CGl':PLEMENT OF BANK
-( R2) ,
4$:
MOVB
; READ OAT A OUT OF MEMORY
R1
; CO;:,PAR E THE CHECK ',\lORD WITH THE DATA READ.
OlP
RO,
R1
65$
; SRANCH OVER ERROR CALL IF GOOD DATA.
8EQ
SPRNTO
64$ :
JSR
PC,
: SET UP VALUES FOR ERROR PRINTING.
SERROR
JSR
PC,
ERROR *'" *'" (GC TYPE A MESSAGE)
;
• W(l~;)
: ERRO~ TYPE CCDE.
3

006224
007264

011462

.. "' ' '

0127S4

65$:
030502
001366
OCl47E:7

BIT
8'E
JSR

006776

Q-124K f\lEMORY EXERCII':.ER,
CZQMCFO
C2QMCF.P11
14-fE~-78 08:19
1689
1690
1691
1692
1693
, 694
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704
1705
1706
1707
1708
1709
1710
1711
1712
1713
1714
1715
1716
1717
1718
1719
1720
1721
1722
1723
1724
1725
1726

SEQ 0118

RO
R1
R2
R3
R4
R5

1675
1676
1677
1678
1679
16BO
1681
16B2
1683

PAGE 36

\';RITE l' S CO:I.!) L('.1EN T OF BANK
ChTA \~RITTEr~ IN"!'O i"'C:!\-~ORY (SHOU LD BE)
CATA RSAD FROM f,1Ei\IORY (WAS)
\i!RTUAL t.DD~ESS
t\OT USED
I\OT US!:.D
.·_OCK SOU~Dr.y 81 T MASK.

; .. TEST 5

1654
1655

1667
1668

07:56

: : • "',...,"''''''' "' ...... "' .... ***. ~ .. ~~ *-"'" .. " """ "."* .. ,. "'''-'''''''''' "''''" .... ", ..... >1< .... ,. ...... '.. ,. ...

1653

1656
1657
1658
1659
1 G60
t 661
1662
1663
1664
1665
1666

MACY i 1
'o'JR 1 TE i ' 5

16K VEr;.
T5

16K VER

R5,
4$
PC,

R2
MMDOWN

: CHECK FOR END OF A BLOCK.
; BRANCH IF r-,~ORE
CURRENT BLOCK.
; FIND NEXT BLOCK AND LOOP TO $TAG, •

MACY'130A(1052)
20-FEP-78
07:56
\lmRST CASE 1\0lSE TESTS

PAGE 37

SEQ 0119

SECTION 2:

.SBTTL SECTIO!'; 2:

WORST CASE NOISE TESTS

;; ... ~ .. * ~~"*"''''.j "' .. "''''''''''* * *.;. ~'"''' • • ''' + .. ~**"'''''' ""''''.''' * Cf<"""'***"'***0<****"'.***

:*
:-

THESE TESTS ".;RITE ;"I1D18RY WORST CASE NOISE TEST PATTERNS THROUGHOUT
MEr.t,CRY AND CHECK THAT THEY CAN 6E ".;RITTEN AND READ.

; : ** * '" * ** '" *'" *"""'* ** ..... ,. '" "" ~ ",." *,.. *,. * '" '" '" '" *",*,""'>1'''''' ** "' .. "'* '""'"' *"'''' ... '''* * ..... **
; ; "'. ** >1' .. _"'* .. *~ ,:' * * . . '" "'.,. >I' • * .... " ......
"'>I' *'" *;..,,. ..... '" "'''' "'*.'" .... *"''''* .. * *"' .. "'*'" "''''
;*TE5T 6

..
,..

;

;
;

RO
R1
R2
R3
R4
R5

;""

;

oj<,..

\~RITE A CC:NSTA~T INTO MEMORY.
THE CONSTA~T !S USER SELECTABLE (DEFAULT
DATA \"RITH.N INTO MEMORY (SHOULD BE)
DATA READ FRc:.', MEMOR'y (WAS)
VIRTUAL ADDRESS
NOT USED
NOT USED
BLOCK BClUNDRY EI T MASK.

; ; '" "''''''''''''II< *** *", .. ",1O '" *'" *"'** .. ***-."" >1'" >1'. *'"* ...

TST6 :

008676

006676

004567

006702
006704
OC6710
006714
OOB? 16
006720
006722

Deooeo
0167QO
004467
010022
030502
001375
0047t,;7

011726
TST6A:

172700
005512

1$:

006206

JSR
, \vJRD
MOV
JSR
MOV
Bl T
BNE
JSR

R5,
0
• CONST,
R4,
RO,
R5,
1$
PC,

$SCOPE
RD
INl TIV,M
(R2 )+
R2
MMUP

,!<"".

OJ.,.. '"

*- "',.* "'''

oj< • •

= 0).

""** .. * >I' ** ..... * "''''

; G8 TO SCOPE ROUT INS.
;NO M!N!r>;UM BLOCK SIZE REQUIRED THIS TEST •
; GET USER CONSTANT·
: INITIALIZE THE MEMORY A8DRESS POINTERS.
;\\,RlTE CONS T ANT INTO MEr,lORY.
; CHECK FOR END OF A BLOCK.
; BRANCH IF r:ORE IN CURRENT BLOCK.
; FINO NEXT BLOCK AND LOOP TO 1 $.

. ** ~ _"' .. * * .. * "'''' *'" .. *"''''" * .. '" '" ~ .. >I- '" *"" '" "'" "" ".:."" ,,* 1O'" "'''' **". .. ** '" "''''''''''"'.;r*.* ** **

; '·T~ST 7
:""'
IMPOR", .... NT:

READ ME~.mRY AND CmftPARE TO CONSTANT.
THIS TEST SHOULD r~OT BE RUN WITHOUT FIRST RUJI.II'>IING TEST $TN.

; ; '" ,~'" *""' ** "'* **** "'''' "'_ "">I' '" ** * .... "" . . * '" * >t ** '" * **" "' . . ~ •. ,. "' .. ** -+ ... "'* "'''' ** *"'1O** **'"

006726
006726
006732
00;3734
OOE740
OC6744
COE744
0(6746
006750
006752
006756
006762
005764
006764
006766
006770

TST7 :

Q 45E7

011676

OOOOCO
O~ 67CO
004467

, 72650
005462

64$ :

011410
012656

OC7Q14
007020
007022
007030

r,IQV
CMP
BEQ
JSR
J5R
• WORD

(R2)+ ,
RO,
65$
PC,

SSCOPE
RO
IN!' MM

: GO TO SCOPE ROUTINE.
; NO
BLOCK SIZE REQUIRED THIS TEST.
; GET
Cm~STANT
; INITIALIZ:=' THE fl'1EMORY ADDRESS POI ~TERS.

PC: I
4

R1
R1
SPRNT2
:tERROR

; G~T THE OAT A FROM
; cortiPAR::' THE CHECK
; SRMKH O'JEP ERROR
; SET UP VALUES FOR
(GO
; ... >I- *'"
ERROR
: ERROR TYPE CODE.

...

MEMORy UNDER TEST.
I<JORD WITH THE DATA READ.
CALL IF GOOD DATA.
ERRC)R PR! NT I NG.
TYPE A MESSAGE)

65$ ;
030502

001366
004767

006210
; ...
;'"

007010

RS,
0
. CONST,
R4,

1$:
O' 2201
0:00C1
0014CS
004767
OC4767
000004

i0003774
007002
007004

JSR
• \liORD
MOV
JSR

O~j2777

000400

172136

C01416
0177":6
O~ 2716
0227::'6
001007
, 62767
,627G7

172130
17'n40
000006
000001
000030

172052
17.2050

aIT
R5.
R2
;CHECK F'OR END OF A BLOCK.
BNE
1$
;SRANCH IF r-,·ORE IN CURRENT BLOCK.
J5R
PC.
~~r,1UP
; FIND NEXT BLOCK AND LOOP TO 1$.
SPECIAL CHECK TO SEE IF TEST 6 IS SELECTED THRU THE S',·JR.
ALLm,lS THF.. OPERATOR TO S~:ITCH BACK AND FCRTH GEL'IEEN TESTS 6 AND 7
BY Sg~PLY 'TOGGLING" 5':100 ".JHEN S'.~Cl, 5'.'102. A~D S',~08 ARE SET.
BIT
I:S\oJ08,
@lSl-iR
;C~ECt\ TI-lAT LOOP ON TEST BIT SET
BEQ
TST10
;BRA:·jCH IF r·IOT LaC? ON TEST
MOV
@S\<JR,
-(SP)
;GET S'~;ITCH REGISTER DATA.
BIC
#177740, (SP ,J
; C:...E";R ~iO!>l-TESi-NL.:,'1,BER SWITCHS.
CMP
1/6,
(SP)+
;CHECK IF TEST 6 W SWITCHES.
SNE
TST10
; 6RANCH 1 F NOT TEST 6
SUB
#1.
STST:\M
;RESET TEST Nurl'1
SUB
HTST7-TST6,SLPADR ;RESET LOOP AOR

0-124K 1'1 EMORY EXERCI SER,
CZQMCFO
14-FEB-78 oa: 19
CZOMCF. P1 1
1745
1746
1747
1748
1749
1750
1751
1752
1753
1754
1755
1756
1757
175B
1759
1760
1761
1762
1763
1764
1765
1766
1767
176B
1769
1770

007036

VE~

MA;'Y11 30A(1052)
2Q-FE6-76 07 :56 PAGE 36
REAQ MEMORV AND COMPARE TO CONSTANT.

000722

TST6A

*."'" ............................ "' ..... "' ' ........................

;

; ,..
007040
007040
007044
007046
007052
007056
007060
007062
007066
007070
007072
00i074
007076
007102
007106
007110

007110
007112
007114
007120

007122
007122
007126
007130
007134
007140
007144
007146
007152
007156
007160
007162
007164
007170
007174
OOi176
007176
007200
007202

SEQ 0120

,GO TO TEST 6

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

i : ••••••••
j.TEST 10

WORS:; CASE NOISE (PARITV) wORO TESTING
CHECK MEMORV WITH A SERIES OF PATTERNS

., ,,,,,

,..

TST10:
004567
000000
01 B704
0:4767
012400
001420
004467
Ot 0012
012201
020001
DC 1405
OC4767
004767
000004

u!: l

011564
172562
010560

IS:

005340
2$:

64S:

011264
012532

R5,
0
.MPPAT t
PC,
(R4)+,
TST11

SSCOPE

R4,

INIIIVlM
(R:: )
Rl
Rl

,WORD
MOV
JSR
MOV
BEQ
JSR
MOV
MOV
CMP
BEQ
JSR
JSR
.WORO

RO,
( R2)+,
RO,
65$
PC,
PC,
4

BIT
BNE
"SR
BR

R5,
2$
pc,
1$

R4
CKPMER
RO

SPRNT2
SERROR

GO TO SCOPE ROUTINE,
NO MINIMUM BeeCK SIZE REQUIREO THIS TEST.
INITIAUZE PATTERN TABeE POINTER
CHECK FOR NON-TRAP PARITV MEMORY ERRORS.
GET THE OATA PATTERN.
iBR IF END OF TABLE.
INITIAUZE THE MEMORY ADDRESS POINTERS.
PUT OATA PATTERN INTO MEMORY.
GET TH~ DATA FROM MEMORY UNDER T'EST.
COMPARE THE CHECK WORD WITH THE DATA READ.
BRANCH OVER ERROR CAee IF GOOO OATA.
SET UP VALUES FOR ERROR PRINTING.
*"'. ERROR . . . (GO TYPE A MESSAGE)
ERROR TYPE COOE.

65$:
030502
001365
004767
000754

006064

CZOMCFO
0-124K ~~EMaRY EXERCISER,
CZQMeF. ?11
14-FEB-78 08:19
1771
1772
1773
1774
1775
1776
1777
1778
1779
1780
1781
1782
1783
17B4
1785
1786
17e7
1788
1789
1790
1791
1792
1793
1794
t 795
179S
1797
1798
1799
1800
1 BOl
1802
1803
1804
1805
1806
1807
1808
1809
1810
1811
tS12
1813
1814
1815

16K

16K VER
TI1

R2
MMUP

CHECK FOR END OF A BeOCK.
BRANCH I F MORE IN CURRENT BLOCK.
FIND NEXT BLOCK ANO LOOP TO 2$.
BR BACK TO 00 NEXT PATTERN

2Q-FEa-7B 01:56 PAGE 39
MACY11 30A(1052)
ROTATE A "0" BIT THROuGH A FIELD OF ONES.

*. - . . '" "' . . "' .

i ; .................... '" ••••• * •• "' .... t*. "' ........
** ....... "' .........
i·TEST 11
ROTATE A "0" BIT THROUGH A FIELD OF ONES.
;;
"'
''' _
"'
TST11 :
JSR
RS,
SSCOPE
; GO TO SCOPE ROUTINE.
• WORD
0
iNC MINIMUM BLOCK SIZE REQUIRED THIS TEST.
MOV
#-1.
RO
: SET CHECK WORD
,",SR
PC,
SETCON
; PUT THE CO'lTENTS OF RO IN ALL MEMORY.
JSR
R4,
INITMM
; INITIALIZE THE MEMORY ADDRESS POINTERS.
IS:
cec
i CLEAR CARRY BIT IN PSw
PC,
POTATE
"SR
MOV
-2(R2) , Rl
:GET REsueT
63$
BCS
: BRANCH IF 'c' BIT WAS SET
CMP
RO,
Rl
: CO:vlPARE THE CHECK WORD WITH THE DATA REAO.
64$
BEQ
; BRANCH OVER ERROR CALL IF GOOD DATA.
JSR
PC,
635:
SPRNT2
; S~T UP VALUES FOR ERROR PR INTING.
;
PC,
JS~
SERROR
ERROR
(GO TYPE A MESSAGE)
• WORO
5
iERROR TYPE CODE.
64$:
BIT
R5,
R2
;CHECK FOR END OF ~ BLOCK.
1$
BNE
: BRANCH IF "'"ORE IN CURRENT BeOCK.
JSR
PC,
MMUP
; FINO NEXT BLOCK AND COOP TO 1$.

.... .. "''''.'''.''' ....... ... ............. .........................

OC4567
000000
012700
DC4767

CC4461
oc P241
004767
016201

011502
177777
007030
005262
007036
177776

1(.. 3402

020001
001405
004767
004767
000005

030502
001361
004767

01 t 176
012~44

005776

...

; • • 11< • • • "; . . . . . "' . . . . . . "' . . . . . . . . "' • • • • "',. "' . . . . . . . . . ,. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .

: .TEST 12

ROTATE A "1" 8IT THROUGH A FIELD OF ZEROS

; ;. * ...................... II;"'."' •• *** •••• "'."'~."' ...... "' •••••••••••••••••
TST12:

007206
007206
007212
007214
007216
007222
007226
007230

004567
000000
005000
OCi4767
OC4467
COO261
0047£7

00723~

C162ul

007240
001242
007244
00724G
007252
007256
00;260
007260
007262
007264

103002
020001
CO 1405
004167
004767
000005

011416

006746
005200

IS:
006754
177776

R5,
0
RO
PC,
R4.

SSCOPE

ROTATE
Rl

JSR
JSR
.WORD

PC,
-2(R2).
63$
RO,
64$
PC,
PC.
S

BIT
BNE
"SR

R5,
1$
PC,

"SR
.wORD
ceR
JSR
"SO
SEt:
JSR
MOV
BCC
eMP
Bf~

011114
012362

63$:

SETCON
INITMM

SPP.NT2
SERROR

; GO TO SCOPE ROUTINE.
;NO MINIMUM BLOCK SIZE REQUIRED THIS TEST.
; seT CHECK I.. ORD
; PUT THE CDrnENTS OF RO IN ALL MEMORY
; INIT:ALlZE THE MEMORY ADDRESS POINTERS.
: SET 'C' BIT IN PSW
:GO ROTATE 'I' BIT
: GET RESULT
; BRANCH IF 'C' IS CLEAR
;CQ':PARE THI;. CHECK WORD WITH THE DATA READ.
; BRANCH OVER ERROR CALL IF GOOD DATA.
;SET UP VALUES FOR ERROR PRINTING.
; oto*. ERROR
(GO TYPE A MESSAGE)
; ERROR TYPE CODE.

...

64S:
030502
0013",1
004767

005714

R2
MMUP

: CHECK FOR END OF A BeOCK.
; BRANCH IF 1'I1ORE IN CURRENT BLOCK.
: FIND NEXT BLOCK AND LOOP TO 1$.

SEQ 0121

0-1,:?4K "'~EMORJ! HeRC 1 SER.
CZQMCFO
U~-FE6 .. 7a OS"9
CZOMCF .P11

MACV11

20-FEP-7B

30AI'0"21

1817
1618

: ; It

004567

007274

000777

001276

000161

1824
1825

00 7302

095000

1826

00730~

1827
1828
18:29
1830
1 B31
1832
, 833
1834
1835

D07~' 0

Ql 270~
004467
9(,4767

183e
1837
1 S38
1839

1840
1841
1842
, 843
1844
1845
1846
1847
'848

~S.

• WORD

.5.
777

0003Q

uMP

T5T14

007314
007320

03050;Z

0 07 322

001374

007324

004767

• 3X9:
177777
005112

OOo7as

C, •
MOV
~sr

1~'

JSR
~jT

aNE
JSR

Oo'6~4

00500Q

0073;30
OQ73S2
00'7336
007342
0073'::2
007344
007346

012201
020001
<;101405

004467
0127Q4

00S070
000100

11 $;

C,R
JSR
MOV

Ii'.<
JSR

PC.

• ~ORO

O~22C1

MOV

02000t
00 1 ~O5

CMP

.0.

R.
R.

~SR

PC,

JSR
.WORO

PC.
7

SP'-.NT2
$ERROR

0\ 1012
O. ~.60

e4S:

0'0772

004767

01224~

1854

007-102
007-104
007406
00/410
007414

oq20\
O:!OCCt

MOV

l85!;)
lS56
1857

001405
00.:1767
OQ47(;7
000001

BEQ

0122Q1

007.;3Q

00476'1

007434
007440
007.:142
007442
007444
007446
007450

OC47Q7

BEQ

0'vY5~

ass'
010732
Q12200

MOV

~SR

COM

DEC
~N.

COM

O~2703

()OOQO~

0;l0502
O~ 1330
00 476 1

lnK V~R

M.;'I.t:Yl1

;GET THE DATA FROM
; COi.iPARE THE CHECK
j BRANCH OVEP ERROR
; SET UP VALUES FOR
ERROR
(GO
: ERROR TYPE CODE.

MEMORY UNDER TEST.
WORD wITH THE DATA R!:AO.
CALL I F GOOD Of.. TA.
ERROR PRINTING.
TYPE A MESSAGE 1

; GET THE DATA FROM
;CO:,lPARE THE CHECK
; BRANCH OVER ERR.OR
: SET UP VALUES FJR
;
ERROR .... 'l' (GO
;ERROR TYPE CODE.

MEMORY UNDER TEST.
WORD \~ I TH THE DATA READ.
CALL 1 F GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)

: GET THE nATA FROM
; CO.'.lPARE THE CHECK
: BRANCH OVE~ ERROt1
; SET UP VALUI;.S FOR
; .... * ERROR
(GO
j ERROR TYPE CODE.

MEM:!RY UNDER TEST.
ItJORD \'1lTH THE DATA READ.
CALL I F GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)

...

........

( R;!)+.

67$

...

; .. **

(R2)+.
RO.

pc.

S?RNT2
SERROR

Be.
PC.

7
(R2)+ •
"0.
71 $
PC.
PC.
7

R'
SPRNT.2

5'RRO.

.......

...

aNE
~S'

QOSS2~

; COMPLEI,~ENT CHECK \'JORD
; DECREMENT 256. ~:ORD COUNTE~

RO
R4
12$
RO

:COMPlEMENT CHECK ...JoRD

3 0A ('0?2)

20-FEa-78

07: 56

PAGE 41

3 XOR 9 T.~T PATTERN.

BIT

007474

.5.
11$

pc.

R'
tl.MUP

SEO 0.23
; CHECK FOR END OF A BLOCK.
; BRANCH 1 F r,'ORE IN CURRENT BLOCK.
; FIND NEXT 6l'JCK AND LOOP TO 1 t $.

: : "',"'* .... 11<*** ........... "'*.;:'" "'* 10 "' .. **'"'" "'* * "' ...... ..;..-"' . . '" "'*"' .. "' .. "' * .. * ..
* .. ,. .. *** .....
: , CHECK. CO~. CHECK, COM, CHECK 3 XOR 9 PATTERr~ '.~RITTEN ABOVE.
* .... * ** "' .. $* ...... ",*",,,,* .. ,,, "'*..-* .* .. *"'''' ** .. '"*** **.to .. '" "''''
01< . . . . . .

: ; ........ , ~ • • • • • • • "'. >\I.",

~Q74e2

1883
1884

007500

, 685

007sn

1886
1887
1 eas
1 889
1890
1891

007504
007!?Oe
007512

1~O2

JSR
• W~RO

uSR
• ~jORO

005' QO
00S304
00133.
005100

1882

18~B

Ma10RY UNDER TEST.
ItJORD \'11 TH THE DATA READ.
CALL 1 F GOOD DATA.
ERROR PRl1'dING.
TYPE A MESSAGE 1

71S:

00473~

1899
1800
1901

7QS:

0000(\7

005000
C044.7
C 12704

1896
1897

.15.

CMP
BEQ

Q;20001
0014'-5

00746.1
007470

1895

68$'

0.2220

1872
1873
1874
1875
lei6
lSi7
1878
187S
1880
1881

, 893
1894

66S'

CMP

0-124K I,IEMQR¥ EXERCISER.•
CZQMCFJ
14-FEs-ia 00:19
CZQMCF. Plt

OQ74S4

$PRNT2
SERROR

j GET THE DATA FROM
j CC,,'PARE THE CHECK
; BRANCH oVEP ERROR
; SET UP VALUES FOR
;
EKROR
(GO
; ERROR TYPE CODE.

675'

007422
007424
007426

00745~

; SET CHECK \.,rORD
j INtTIALlZE THE MEMORY ADDRESS POINTERS.
j SET 256. WORD COUNTER

65$:

0074~2

007452

INITMM

••
••

(~2)+,

acaco?'

007420

RO
R4.
/164, 1

00.
65$
PC.

BEQ

004167

1892

.2
~.·MUP

MOV

OGo74DO
007402

18GS
1869
1870
1871

INl TMM
\'!3X9

PC,
R5.
1$
PC.

CMP

007370
007374

1864
1865

<I'

;MIN!i\!U~l BLeCf<'_ SlZE OF 256.
WORDS
REQUIRED FD. THIS TEST.
; SKIP TO N~X T TEST WHEN LESS THAN ONE BLOCK
AVA! L;"SLE FO. TEST.
: SET UP TEST DATA
; SET COM DATA REG
: INIT;AUZE THE r..1EMORY ADDRESS POINTERS.
; I';Rl TE 256. \OJ-JRD eLOCK WITH 3 XOR 9 PAT.
; CHECK FOR END OF A BLOCK.
; BRANCH IF r,'ORE IN CURRENT BLOCK.
; FIND NEXT BLOCK ANO lOOP TO • $.

11-1,

12$:

1850
1851
1652
1853

1866
1961

"'* ..... * . . "' .... oj.,.""* '" * .. ** *" ** "'''' "'*

: GO TO SCOPE ROUT INE.

ill .. '" .",4

004767
ocaOO7

1863

...

004707

1859
1860
1861
1862

It. ",$

$SCOPE

II"' "'''' "'. '".It _",,,,,,,,*"'1;<. *"'*"'
** "'* ", .. '" "' .. "'*"' '" '" "''''* * .... *~'* *"'*** '" ", .. ** *'" **
:
CHECK 3 XOR 9 TEST PATTEf\N WRtTTEN ABOVE
:;' "'. "' • . - ... ,..* .... 11<* . . . . . . . "" *" * .. "'* **~, ",," "' .. **'~ "' .... ""* "' .. " '" ** * .. ** .. '" * "' ..... "' .. "'*

0073~O

1B?a

SEQ 0122

"'*,.. .. "+'"." ...... "'., •• "'**"'* ,..,. ........... 1i< .....

o.qa4

0 07 454
00736Q
0'7;362
007362
007364
007366

1849

PAGE 40

TST13 :

007270

,07270

1822

1913

07: 56

3 XOr< 9 TEST PATTER!'>l.

i ; ... "'. "" '" .", .. ",** "'" .......... * ..... f.>to ** '" '" "' .. ,. '" "' .. '" * "" '" "''<'''>10 **,. * . . ", '" "',.,. "'* ..... * ..... **
3 XOR 9 TEST PATTERN.
: -TEST '3

t 916

1819
1820
1821

'fiK VER
"3

007500

007516
C07520
007520
00752:2
007524

00,526

Q1QQ.54

004767

oq\22

OC5t42
0''1'0'
O;;OOC'l

1913
1914
1915
19 16_
1917

"{'2~)

RO
R4.
#64 ••
114.

JSR
,I,o,'ORO

(R2)+ •
liO;
73$
PC.
fC.
7

GOM
CO"
MQV

.0
-I •• )
( .2)+.

~EQ

00514;2
012201
020001

00754q,
007550

007566

MOV
CMP

yOS100

0(-51 CO

OOi~56
00756~

'IOV
MOV

~SR

IN:ITMM

:INITIALIZE THE MEfllORY ADDRESS POINTERS.

; SET 256. WCRD COUNTER
: SET 4 wORD CGUNTER

•1

SPPNT2

SERROR

GST THE OAT A FRm.~
CQ1.1PARE Th!: CHECK
BRANCH OVEP ERROR
SET UP VALUES FO>';
ERROR "'
( GO
ERROR TYPE CODE.

...

. ,.

MEMORY ur'JDER TEST.
'JlOR:) I,tJITH THE DATA READ •
CALL 1 F GO:JO OATA.
ERROR PRINTlNG.
TYPE A MESSAGE 1

73$;

007544

007554

~2$:

000007

00 140~

007552

~SR

21 $1

~3~'

01 ~;!Q1
0:0001
001'::05
QC476?'

007530
007532
007536
90 7542
OCl7544

1S03
1904
1905
, 906
1907
1908
1909
1910
1911
1912

Cil
000\00

004767

OC47P

B~Q

"9.
7.$

.IS.
JSR
• WORn

PC.
PC.
7

CeM
COM

RO
-1.21

~MP

0. 06~O
012076

74$'

000007

COMPLEr,lENT
C;O~_:PU::1-.'lE.NT

R.
R.
SPRNT2
SERROi1

CHECI~

wORD
TEST SATA

GET THE DA. :.. FROM r.'lEM:JRY UNDER TEST.
CQi,lPAME THE CHECf<, \\lORO l'iITH THE DATA READ.
BRANCH OVER ERROf.\ CALL 1 F GOOD DATA.
SET UP VAlUES FOR. ERROR PRINTING.

,. * .. (GO TYPE A MESSAGE)
"'*
..
E~ROR T'(PE
ERKO~

COPE.

7!i$,

0014CS
004767
0:)4 7
OJOO07

Mev
ql.P
~EQ

O' 06' 1

76$ ,

Q' ~052

<is.
.IS"
• .... QRD

( R2)+.

.0.
77$
PC.
PC.
7

cor~PLEr,ITENT

P.
R,
$PF.NT2
SERROR

CC".~PLE;':::'NT

CHECK 'J:ORD
TEST DATA

MSr-.~ORY UNDER TEST.
CO'I;PARE THE CHEer. lliORO WITH THE DA iA READ.
SRANCH OVEP ERROR CALL 1 F 0000 DATA.
SET uP VALUES FO~I ERROR PR I NTI NG,
E~;;;O;;: ** ,. IGO TYPE A MESSAGE)
ERROR TYPE CODE.

GET THE DATA FRQ:l11

...

77$:

007570
Cl07570
Q07572

0:)5303

DEC

CU13Q

B~E;

O~7574

005100

007576

007600

005304
001335

COM
OEC
BNE

007602

005100

CO~

23$
RO
R4
22$
RO
R5.
21 $
PC.

007604

0305C'~

007606
007610

001380

004767

~lT
~Ne

Q05370

<iSR

DECRE],'ENT 4 \~oRD COUNTER
JONE.
SR 1 F
CO:.1PLEME~>IT CHECK 'NORD
DECRE!,l~~H 256. WORD COUNTER
BR IF NOT DO~E _
CO~.iRL:;1;:ENT CHECK WORD
CHECK FOR HW OF A BLOCK.
BRAf\;CH IF ~:ORE IN CURRENT 8LOCK.
FIND NEXT BLOCK ANa lOOP TO 21 $.

ti::.n

"2
MM:JP

0-124K I\~EMORV EXERCI SER.
CZOMCFO
14-F"EB-78 08:1 9
CZQMCF. P1 1

; .. TEST 14

19~7

198a
1989
1990
1991
1992
1993
1994
1995
1996
1997
1998
1999
2000
2001
2002
2003
2004
2005
:;W06
2007
2008
2009
2010
2011
2012
2013
2014
2015
2016
2017
2018
2019
2020

oj! . . . ,...,.. .. '" "' .... "' ..

PAGE 42

SEQ 0'24

* ....... "' ...... *'" "' ........ ,. ••

COMPLEMENT 3 XOR 9 TEST PATTERN

: ; • • lit . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .

"''''.** ....... *. "'* ........ **'''''''''' •••• "'*.*

T5T'4:

007614
007614
007620

000777

007622

000167

000316

JMP

TS115

007626
007632
007634
007640
007644
007646
007650

012700
005003
004467
004767
030502
001374
004767

177777

MOV
ClR
JSR
JSR
BIT
BNE
JSR

If-l.
R3
R4.
PC.
R5.

DC 4567

JSR
• WORD

011010

004566
0064' 2

1$:

005330

R5.
777

PC.

$SCOPE

RO
INITMM
W3X9
R2
MMUP

*.........

: GO TO SCOPE ROUT INE •
;MINIMUM BLOCK SIZE OF 256. WORDS
REQUIRED FOR THIS TEST.
; SK I P TO NEXT TEST WHEN LESS THAN ONE BLOCK
AVAILABLE FOR TEST.
;SET UP TEST DATA
:SET COM DATA REG
: INITIALIZE THE MEMORY ADDRESS POINTERS.
,WRITE 256. WORD BLOCK WITH 3 XOR 9 PAT.
; CHECK FOR END OF A 8l0CK.
: BRANCH IF "ORE IN CURRENT BLOCK.
; FIND NEXT BLOCK AND lOOP TO 1$.

*'" '" '" "' .... \II. "' ........ '" "'. "'. "' ' "' ...........

; i '" "' ... "'. "' ..... ~ .I"'IiI . . . . . . . '"
1iI ~ ... '"
CHECK COMPLEMENTED 3 XOR 9 TEST PATTERN wRITTc:,\I AeOVE.

007654
007660
007664
007670
007670
007612
007674
007676
007702
007706
007710
007710
007712
007714
007716
007722
00;726
007730
007730
007732
007734
007736
007742
007746
007750
007750
007752
007754
007756
007762
007766
007770
007770
007772
007774

012700
004467
012704

177777
004542
000' 00

007776
010000
010002
010004

; ;. "'''' "'''' ... "' . . '" •• "' ••• *..... ** •••• "'."'. "'. "' ....... "'. *.... * "' ...... * •• "' •• "' . . "'. "' ••••
11$'

N-1,

MOV
JSR
MOV

R4.
1164. ,

MOV
CMP
BEQ
JS.
JSR
.WORO

RO.
65$
PC.
PC.
7

MOV
CMP
BEQ
JSR
JS.
• ,,"'lRD

(R2) ••
RO.
67$
PC.
PC.
7

MOV
CMP
SEQ
JSR
JSR
.WORD

(R2) ••
RO.
695
PC.
PC.
7

MOV
C:·')
BEQ
JSR
JSR
.WORD

(R2)+,
RO.
71$
PC.
PC.
7

COM
OEC
BNE

RO
R4
12$

12$:
012201
020001
001405
004767
004767
000007

010464
011732

64$:

(R~) ••

65$:
0'; 22G1
0200C·1
001405
0(;4767

004767

010444
011712

1;&$:

000007

RO
nUTMM
R4

:5E1 CHECK WORD
; INITIALIZE THE N'EMORY ADDRESS POINTERS.
;SET 256. WORD COUNTER

:GET THE DATA FROM MEMORY UNDER TEST.
;COMPARE THE CHECK WORD WITH THE DATA READ.
; BRANCH OVER ERROR CA!.L IF GOOD DATA.
; SET UP VALUES FOR ERROR PRINTING.
:
(GO TYPE A MESSAGE)
ERROR
; ERROR TVPE CODE.

SPRrH2
$ERROR

.,
R,

SPRNT2
.EP.ROR

...

: GET THE OAT A FROM MEMORV UNDER TEST.
;COMPARE THE CHECK WORD WITH THE DATA READ.
; BRANCH OVER ERROR CALL IF GOOD DATA.
;SET UP VALUES FOf;. ERROR PRINTING.
:
(GO TYPE A MESSAGE)
ERROR ...
; ERROR TVPE CODE.

...

675:
012201
020001
001405
004767
0047-'7
(l00007

010424
011672

6S$:

Rl
Rl
SpF!NT2
$ERROR

:GET THE DATA FROM
;CO~.'PARE THE CHECK
; BRANCH OVE? ERROR
; SET UP VALUES FOR
ERROR ""'. (GO
;
; ERROR TVPE CODE.

MEMORV UNOER TEST.
wORD WITH THE DATA REAO.
CALL I F GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)

;GET THE DATA FROM
; COMPARE THE CHECK
: BRANCH OVER ERROR
; SET UP VALUES FOR
(GO
ERROR
; ERROR TVPE CODE.

MEMORV UNDER TEST.
WORD WITH THE OAT A READ.
CA1.L I F GOOD OATA.
ERROR PRINTING.
TYPE A MESSAGE)

"'''''''

60$:
012201
020001
001405
004767
0':"4767
000007

010404
011652

70$:

Rl
R,
SPRNT2
SERROR

;"'.'"

71$:
005100
005304
001335

CZQMCFO
0-124K t.1EMORY EXERCISER,
CZQMCF.Pll
14-FEB-78 08:19
1974
1975
1976
1977
1978
1979
1980
19B1
1982
1983
1984
1985
'9S6

20-FEB-78 07: 56
MACY11 30A(1052)
COMPLE.MENT 3 XOR 9 TEST PATTERN

: : .... '" "'. '" *' ..... "' ... "',. "' ...... "' ........ "'. '"

1918
1919
1920
1921
1922
1923
1924
1925
1926
1927
1928
1929
'930
1931
1932
1933
1934
1935
1936
1937
193B
1939
1940
1941
1942
1943
1944
1945
1946
1947
1948
1949
1950
1951
1952
1953
1954
1955
1956
1957
1958
1959
1960
19151
1962
1963
1964
1965
1966
1967
1968
1969
1970
1971
1972
1973

,6K VER
T14

005100
030502
001330
004767

16K VER
T14

MACY11 3011.( 1052)
20-FEP-78 07:56
COMP"EMENT 3 XOR 9 TES'r PATTERN

BIT

RO
R5.

BNE
JSR

PC.

COM
005174

; COMPLEMENT CHECK WORD
,DECREMENT 256. WORD COUNTER

11$
MMliP

PAGE 43

SEQ 0125

; COMPLEMENT CHECK WORD
; CHECK FOR ENO OF A BLOCK.
;BRANCH IF W.ORE IN CURRENT BLOCK.
; FIND NEXT BLOCK AND LOOP TO 11 $.

; ; "' ••••• * ..... "'* *'" *"' ... "' ............ "' .... "'.
"'.* ••••• "'. "' ' lit. lit "'.
;* CHECK. COM, CHECK. COM. CHECK COMPLEMENTED 3 XOR 9 PATTERN.
* "' ... "11<,,, "' .. "'''''''* ..... "' .... "' ••• "'. "' ........ '" '" "'. '" * '" "' .. * ••••• '" lit"' . . . . . . . "'.
ole ....... '" '" "'''' ..

: ; • • ",.11< '"

010010
010014
010020
010024
010030
010030
010032
010034
010036
010042
010046
010050
010050
010052
010054
010056
010060
o~ 0062
010066
010072
010074
010074
010076
010100
010102
010104
010106
01011;2:
010116
010120
010120
010122
010124
010126
010130
010132
010134
010136
010140

MOV
\,ISR
MOV
Mal'

#-1.
R4.
1164.,
1"4.

RO
:SET UP CHECK WORD.
INITMM: INITIALIZE THE MEMORY ADDRESS POINTERS.
P4
;SET 256. WORD COUNTER
R3
:SET'; WORD COUNTER

MOV
CMP
SEQ
JSR

Rl
R1

J~:'1

(R2)..
RO,
73$
PC,
PC,

• wORD

COM
COM
MOV
CMP
BEQ
JSR
JSR
.\r."")RD

RO
-(R2)
(R2)..
RO,
75$
PC.
PC.

005100

COM
COM

012201
020001
0014CS
004767
0(\4767
0000C7

Mev

RO
-(R2)
(R2)..
RD.
77$
PC,
PC.
7

012700
004461
012704
012703
012201
020001
0(01405
OC47S7
004767
000007

177777
004406
000100
000004

21$:
22$:
23$:

010324
011572

SPRNT2
SERROR

GET THE DATA FROM MEMORY UNDER TEST.
COMPARE THE CHECK wORD WITH THE DATA READ.
BRANCH OVER ERROR CALL IF GOOD ·DATA.
SET UP VALUES FOR ERROR PRINTING.
..... ERROR .. * (GO TVPE A MESSAGE)
ERROR TYPE CODE •

73$:
005100
005142
012201
0200.:1
co 1405
004767
004767
000007

010300
011546

o 5142

010254
011522

76$:

CPlP
BEQ
JSR
JSR
.WORD

Rl
R1
SPRNT2
$ERROR

R,
R1
SPI:NT2
$ERROR

CC:'.lPLEMENT CHECK WORD
CO(,lPLEMENT TEST DATA
GET THE OAT A FROM MEMORV UNDER TEST.
cor,jPARE THE CHECK WORD WITH THE DATA READ.
BRANCH OVER ERROR CALL I F GOOD DATA.
SET UP VALUES FOR ERROR PRINTING.
.. * ERROR •• '" (GO TYPE A MESSAGE)
ERROR TYPE CODE.
CQt.1PLEMENT CHECK WORD
COMPLEMENT TEST DATA
GET THE DAiA FROM MEMORV UNDER TEST.
COMPARE THE CHECK WORD WITH THE DATA READ.
SRANCH OVEP ERROR CALL I F GOOD DATA.
SET UP VALUES FOR ERROR PRINTING.
..... ERROR
(GO TYPE A MESSAGE)
ERROH: TVPE CODE.

.*'"

775:
005303
001342
005100
005304
001335
005100
030502
001330
004767

DEC
BNE
COM
DEC
BNE
COM

BIT
005040

SNE
JSR

R3
23$
RO
R4
22$
RO
RS.
21$
PC.

R2
MMUP

DECRE1v;ENT 4 WORD COUNTER
BR IF NOT DONE.
COi~lPLEMENT CHECK WORD
DECREMENT 256. WORD COUNTER
SR IF NOT DONE.
cor,lPLErI.ENT CHECK WORD
CHECK FOR END OF A BLOCK.
BRANCH I F MORE IN CURRENT BLOCK.
FIND NEXT BLOCK AND LOOP 10 21$.

0-124K r.~EMORY EXERCISER,
CZQMCFO
14-F EB-78 08: 19
CZQMCF. P1 1

16K VE,
T15

f/:ACY 1) 30A(1052)
PAG!:': 44
20-FEB-78
C7: 56
MODIF I ED 3 XOR 9 PATTERN FOR PAR I TY M£MOR (

2024
2025
2026
2027
2028
2029
2030

2031
2032
2033
2034
2035
2036
2037
2038
2039
2040
2041
2042
2043
2044
2045
2046
2047
2049
2049
2050
2051
2052
2053
2054
2055
2056
2057
2058
2059
2060
2061
2062
2063
2064
2065
2066
2067
2068
2069
2070
2071
2072
2073
2074
2075
2076

~ ~ .... ,,**"'''',. ** **"'''''''********.

010144
010144
010150

004567
000777

010460

010152

000167

010156
010162
010166
010172
010116
010200
010202

012700
012703
004467
0047€7
030502
001374
004767

RS,
777

000610

JMP

1'5T16

000401
177777
004234
006060

MDV
MDV
JSR
JSR

#-1.
R4,
PC,

os,

~J3X9

Bl i
eNE
VS"

1$
PC,

MMUP

2125
2126
2127
2128
2129
2130
2131
2132

1$:

004776

,11401,

; GO TO SCOPE ROUTINE.
;MINIM'.:rll BLOCK SIZE OF 256. WORDS
REOUI RED FOR THIS TEST.
; SKI P TO NExT TEST WHEN LESS THAN ONE BLOCK
AVAILABLE FOR TEST.
; SET UP PARITY "ALL ZEROS" PATTERN
; SET COM DATA REG
;INITlALlZE THE 'V1EM'JRY ADDRESS POINTERS.
; \·:RI TE 256. WJRD SLaCK WITH 3 XOR 9 PAT.
; CHECK FOR END OF A BLOCK.
; BRANCH IF /:ORE IN CURRENT BLOCK.
: FIND NEXT BLOCK AND LOO' TO 1$,

$SCOPE

JSR
• WORD

RO
R3
INITMM

;; '" . . "'''' . . *'''*'''.* .. '''>t**''''''** ... '''''''' .... ''' .... '''**''' ... * .. **"' .. "'."'*"'*"'''' .... **'''* .... ** . . *
CHECK P":" II TY 3 XOR 9 PATTERI, WR I TT EN ABOVE.
; ; '" '" ** '" *MOV
'" * '" '" * '" '" '" #401,
'" '" '" '" * *'" * RO
'" * * '" '" '" * *; RESET
~ '" '" '" "' ...... " .. '" '" * '."""' '" i'***"'***"'**"' •• *
PARIiY "ALL ZEROS" PATTERN.

:.
010206
010212
010216
010222
010226
010226
010230
0' 0232
010234
010240
010244
010246
010246
010250
010252
010254
010260
010264
010266
010266
010270
010272
010274
010300
010304
010306
010306
010310
010312
010314
010320
o t 0324
010326
010326
010330
010332

012700
012703
004467
O~ 2704
012201
020001
0014C5
004767
004767
000007

000401
177777
004204
000100

010334
010330
010340
010342
010344
010346.
010350
010352

>!<

11 $:
12$:

#-1,

R4,

INITMM

1164 ••

(R2)+ ,
RO,
65$
PC,
PC,
7

Rl
Rl

.~·'lRD

(R.2)+.
RO,
67$
PC,
PC,
7

MDV
CMP
GEQ
JSR
JSR
· wORD

(R2)+ •
RO,
69$
PC,
PC,
7

R1
Rl

MOV

BEQ
JSR
JSR
· WORD

( R2)+,
RO,
71$
PC,
PC,
7

MDV
MOV
MOV

"0,
R3,
( SP)+.

MOV
vSR
MOV

Mev
010126
011374

64$ :

CMP
BEQ
JSR
JSR
• WORD

SPRNT2
SERROR

; RESET PARITY ALL ONES PATTERN.
; INITIALIZE THE MEMORY ADDRESS POINTERS.
; SET 256. WORD COUNTER

;GET THE DATA FROM MEMORY UNDER TEST.
; CO;,lPARE THE CHECK ~"'ORD WITH THE DATA READ.
; BRANCH OVEF ERROR CALL IF GOOD DATA.
; SET UP VALUES FOR ERROR PRINTING.
;*1<", ERROR
(GO TYP!: A MESSAGE)
; ERROR TYPE CODE.

...

65$:

012201
020001
001405
004767
004767
OOOOC7

010106
011354

665 :

Mav
C!ViP
BEQ
vSR
JSR

SPRNT2
~ERROR

:GET THE DATA FROl\l
; CO;,~PARE THE CHECK
; BRANCH OVE? ERROR
; SET UP VALUES FOR
; "'.* ERROR * .. (GO
; ERROR TYPE CODE.

MEMORY UNDER TEST.
WORD WITH THE OATA READ.
CALL I F GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)

; GET THE DATA FROM
; CO:.;PARE THE CHECK
; E.RAi'JCH OVEP ERROR
; SET uP VALUES FOR
;
(GO
ERROR
: ERROR TYPE CODE.

MEMORY UNDER TEST.
WORD WITH THE DATA READ.
CALL I F GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)

; GET THE DATA FROM
; COMPARE THE CHECK
; BRANCH OVER ERROR
; SET UP VALUES FOR
(GO
;"''''* ERROR
; ERROR TYPE CODE.

MEMORY UNDER TEST.
WORD WITH [HE DATA READ.
CALL IF GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)

67$:
0; 2201
020001
001405
004767
0047 ··7
000007

010066
011334

68$ :

SPRNT2
$ERROR

...

.....

6Cl$:
012201
020001
001405
004767
0-:'4767
000007

c:-::o

010046
011314

70$!

Rl
Rl

$PRNT2
$ERRDR

...

71$ :
010046
010300
012603

0-124K f,'EMORY EXERC I SER,
ClOMCFO
14-FEa-78 08: 19
CZQMCF. Pl1
2077
2078
2079
2080
2081
2082
2063
2084
2085
2086
2087
2088
2089
2090
2091
2092
2093
2094
2095
2096
2097
2098
2099
2100
2101
2102
2103
2104
2105
2106
2107
2108
2109
2110
2111
2112
2113
2114
2115
2116
2117
2118
2119
2120
;.1121
2122
2123
2124

SEQ 0126

.... ** >I.,." "'" ~" .. "',. .. * '" '" *"'.* * .. +-*

2021
2022
2023

005304
001333
010046
010300
012503
030502
001324
004767

16K VER
TlS

; SAVE RO
; PUT R3 INTO RO
; PUT SAVED RO INTO R3

MACY11 30A(1052)
20-FEF-78
07: 56
PAGE 45
MODliIED 3 XOR 9 PATTERt-.. FOR PAR! TY MEMORY
aEe
BNE
MOV
MOV
Mav
BIT
BNE
vSR

004626

-(S; )
RO
R3

R4
12$
RO,
R3,
( SP)+.
R5,
11$
PC,

-(SP)
RO
R3
'2
MMUP

SEQ 0127

; CCUNT 256. W'JRDS
; BRANCH IF rlORE
: SAVE RO
; PUT R3 ! NTO RO
; PUT SAVED PO INTO R3
; CriECK FOR END OF A BLOCK.
; 8RANCH IF N:DRE IN CURRENT BLOCK.
; FIND NEXT BLOCK AND LOOP TO 11 $.

; ;" 1<* * "* '" "'*"'*~ ""** "''fl'''''' *'" C('~J1
. . * .. *, '" "'*"'* .. "''''''' "'."' . . * '" "'* "'* ** ***** "'****** ** ••
;CHECK. COM, CHECK,
CHECK PARITY 3 XOR 9 PATTERN.
; ; '" *. * *,.. * '" ~ , ... * *,..,. ... '" "' .. '" ""' . . "'* "' .. *,. ... ¥*.I "' .. ", .. >I: * * **'" * '"*"'.'" * ** ***."''''**
oj.

010356
010362
010366
010372
010376
010376
010400
010402
010404
010410
010414
010416
010416
010420
010422
01 Ql124
010426
010430
010434
010440
010442
010442
0104l;4
010446
010450
010452
010454
010~60

010464
0' 0466
010466
010Ll70
0104;2
010-174
010500
010504
010506
01 C506
010510
010512
010514
010516
010520
010524

O~ 27CO
012703
0('4467
O' 2704

0; 2201
0200C 1
001405
004767
00.:;767
000007

000401
177777
004034
000100

007756
011224

21$ :
225 :

72$:

MOV
Mav
JSR
Mav

#401.
RO
;;-1.
R3
R4,
INITMM
;;64 •• R4

; S£T UP PARITY "ALL ZEROS" PATTERN.
; SET UP ALL ONES PATTEr/N.
; INITIALIZE THE MErliORY ADDRESS POINTERS.
; SET 255. vlORD COUNTER

Me·
eMP
BEQ
JSR
JSR
• WORD

(R2 )+.
RO,
73$
PC,
PC,
7

GET TH!: DATA FROM
CD~,~PAR::: THE CHECK
BRANCH OVER ERROR
SET UP VALUES FOR
ERROR
(GO
ERROR TYPE CODE.

COM
COM
MOV
CI. ,J
GEQ
JSR
vSR
.II.DRD

RO
-( R2)
( R2)+,
RO,
75$
PC,
PC,
7

COM
COM
Mav
CMP
8EQ
JSR
JSR
.!I.'ORO

-( R2)
(R2 )+,
RO,
77$
PC,
PC,
7

Mav
CIY.P
BEO
JSR
JSR
• WORC

(R2)+ ,
RO,
79$
PC,
PC,
7

COM
carll

R1
Rl

JSR

RO
-( R2)
(R2)+ •
RO,
Bl $
PC,

JSR

PC,

$EI~ROR

Rl
Rl

SPRf\:T2
$ERROR

...

MEMORY UNDER TEST.
WORD WITH THE DATA REAO.
CALL IF GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)

73$ :
005100
005142
012201
020001
0014G5
004767
C 4767
000007

007732
011200

74$:

Rl
Rl

SPRNT2
SERROR

CQMPLEi/,ENT CHECI( WORD
CO:,lPLEiI1ENT TE.ST DATA
GET THE DATA FROM MEMORY UNDER TEST.
cm,iPARE T"E CHECK WORD WITH fHE DATA READ.
BRANCH OVEP ERROH CALL I F GOOD DATA.
SET UP VALUES FCR ERROR PRINTING.
ERROR ,
(GO TYPE A MESSAGE)
ERROR TYPE CODE.

75$:
005100
005142
Q122C 1
020001
001405
0047b7
OC4767
000007

007706
011154

76S:

RO
R,
Rl

SPRNT2
$ERROR

CO',lPLEMENT CHECK WORD
RESTORE DATA
GET THE DATA FROM MEMORY UNDER TEST.
CO:,lPARE T!-IE CHECK WORD WI·I,i THE DATA READ.
BRANCH OVER ERROR CALL IF GOOD DATA.
SET UP VALUES FOR ERROR PRINTING.
(GO TYPE A MESSAGE)
•",,* ERROR
ERROR TYPE CODE.

...

77$ :
012201
O.200Cl
CC 1405
004767
004767
0(;0007

007666
011134

78$ :

Rl
Rl

SPRNT2
SERROR

TI-lE DATA FROM
THE CHECK
SRANCH OVEq ERROR
SET UP VALUES FOR
(GO
E.~ROR
ERROR TYPE CODE.

CO:,i?A~E

...

MEMORY UNDER TEST.
WORD WITH THE DATA READ.
CALL IF GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)

79$:
005100
0051 '::2
o 122C1
020001
001405
004767
004767

MOV
CMP
BEQ

007642
01111 0

BO$ :

CO:,lPLEMENT CHECK WORD
CO"lPLEtI'ENT TEST DATA

$PRrJT2

GET THE DATA FROM MEMORY UNDER TEST.
CO:~PARE THE CHECK
BRANCH OVEFi ERROR
SET UP VALUES FGR
(GO
*"'* ERROR

...

WORD WITH T!-iE DATA READ.
CALL IF GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)

0-124K ~"EMeRY EXERCISER,
CZOMCFO
CZOMCF. P1 1
14-F E8-78 08: 19

2133
2134
2135
2136
2137
2138
2139
2140
:2141
2142
2143
2144
2145

2146
2147
2148
2149
2150
2151
2152
2153
2154
2155
2156
2157
2158
2159
2160
2161
2162
2163
2164
2165
2166
2167
216B
2169
2170
2171
2172
2173
2174
2175
2176
2177
2178
2179
2180
2181
2182
2183
2184
2185
2186
2187
2188

01('530
010532
01 C532

010534
010536
010540
010542
010544
010550
010554
010556
010556
010560
010562
010564
010570
010574
010576
010576
010600
010502
0106Q4
0'0506
010610
010614
010620
010622

010622
010624
010626
010630
010632
010634
010640
01064~

010546
010646
010650
010652
010654
010660
010664
010666
010666
010670
010672
010674
010676
010700
010704
010710
010712
010712
010714
010716
010720

010722
010724
010730
010734
010736
010736
010740
0107,;2
010744
0107<16
010750
010752
010754
010756
010760
010762

2230
2231
2232
2233
2234
2235
2236
2237
2239
2239
2240

2241
2242
2243
2244

SEQ 0'28

; ERROR TYPE COOE.

.wORD
81 $:

CCS100
OC 51 ,", 2
012201
020001
001405
004767
004767
000007

007616
011064

82$ ,

COM
COM
MOV
CMP
BEQ
J"
JSR
.WORO

RO
- (R2)
(R2)+ ,
RO,
83$
PC,
PC,
7

MOV
CMP
BEQ
JSR
JSR
.WORD

(R2)+ ,
RO,
85$
PC,
PC,
7

COM
COM
MOV
CMP
BEQ
JSR
JSR
.WORO

RO
-( R2)
(R2)+ ,
RO,
87$
PC,
PC,
7

COM
COM
MOV
CMP
BEQ
JSR
JSR
• WORD

RO
-( R2)
( R2)+.
RO,
89$
PC,
PC,
7

MOV
CI\'P
BEQ
JS.
JSR
• WORD

(R2)+ •
RO,
9' $
PC,
PC,
7

COM
CeM
MOV
CMP
BEQ
JSR
JSR
· ....·ORD

RO
-( R2)
( R2)+,
RO,
93$
PC,
PC,
7

COlVi
COM
MOV
CMF<

RO
-( .2)
(R2)+,
RO,

R,
R,

$PRNT2
$ERRDR

: COMP LET/lENT CHECK WORD
; RESTORE DATA
; GET THE DATA FROM MEMORY UNDER TEST.
; CO\',PARE THE CHECK WORD WITH THE DATA READ.
: BRANCH OVER ERROR CALL IF GOOD DATA.
; SET UP VAluES FOR ERROR PRH<TING.
(GO TYPE A MESSAGE)
; >i-"'. ERROR
i ERROR TyPE CODE.

...

83$ ,

012201
020001
OC1405
OC4767
004767
000007

007576
011044

84$ ,

Rl
SP··:H2
SERROR

; GET THE DATA FR':~,l
; CO·.~PARE THE CHECK
: BRANCH OVEP ERROR
; SET UP VALUES FOR
(GO
j .. *11< ERROR
: ERROR TYPE CODE.

...

MEMORY UNDER TEST.
WORD WITH THE OATA READ.
CAl.L IF GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)

85$ :

oe51 co
005142
012201
O~OOOl

001405
004767
OU4767
OOOOC7

007552
011020

86$:

R,
R,

SPRNT2
$ERROR

; CorMILE~lENT CHECK WORD
; CO~,'PLEMEN.T rEST DATA
; GET TIo-iE DATA FROM MEMORY UNDER TEST.
; COMPARE THE CHECK WORD '.<JITH THE DATA READ.
; BRANCH OVEn ERROR CALL I F GOOD DATA.
; SET UP VALUES FOR ERROR PRINTING.
(GO TYPE A MESSAGE)
; ...... ERROR
; ERROR TYPE CODE.

...

87$:

005100
0C'51 ~2
o ~ 2201
020001
0:)1 ~C5
004767
0047f;7
000007

007526
01 07: ~

88$ ,

R,
R,

SPRNT2
$ERROR

; CO;,:PLEMENT CHECK '.<JORD
; RESTOP.E OAT A
;GET THE DATA FROM MEMORY UNDER TEST.
; CO~,lPAR E THE CHECK \<JORD WITH THE DATA READ.
; BRANCH OVER ERROR CALL I F GOOD DATA.
: SET UP VALUES FOR ERROR PRINTING.
ERROR
(GO TYPE A MESSAGE)
;
; ERROR TYPE CODE.

...

"''''.

89$ :

012201
0:!OOG1
001405
004767
004767
000007

007506
010754

90$ :

R,
R,

SPRNT2
SERROR

;GET THE DATA FR01l-1
;COM~ARE THE CHEO;
; BRANCH OVEP ERROR
; SET UP VALUES FO-,
(GO
; .. ** ERROR
; ERROR TYPE CODE.

,.* ..

MEMORY UNDER TEST.
WORD WITH THE DATA READ.
CALL IF GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)

91$'

005100
005142
0: 2201
020001
001405
004767
004767
000007

007462
010730

92$ ,

R,
R,

; COTllPL!:J<1ENT CHECK WORD
;CmiPLEr<1ENT TEST DATA
; GET THE DATA FROM MEMORy UNOER TEST.
; COi"PARE THE CHECK WORD i<JITH THE DATA READ.
; BRANCH OVER ERROR CALL 1 F GOOD DATA.
; SET UP VALUES FOR ERROR PRINTING.
ERROR ** .. (GO TYPE A MESSAGE)
: ERROR TYPE COoE.

SPRNT2
SERROR

; .... *

R,
R,

; COMPLEMENT CHECK WORD
; RESTORE DATA
; GET THE DATA FROM MEMORY UNDER TEST.
; COMPARE THE CHECK WORD WITH THE DATA READ.

93$:

005100
0051 L'\2
012201
020001

CO 1405
004767
004767
cooa07

0071'35
010704

, 6K VER
T, 5

MACY11 30A('052)
MODIFIED 3 XOR 9

94$ :

BEO
JSR
JSR
.WORD

95$
PC,
PC,
7

MOV
MOV
MOV
DEC
BNE
MOV
MOV
MOV
BIT
BNE
JSR

RO,
R3,
( SP)+,
R4
22$
RO,
R3,
(SP)+,
.5.
21 $
PC,

.20-FE8-78
07: 56
PAGE 47
PATTERN FOR PARITY MEr,lORY

SPRNT2
$ERRDR

SEQ 0129

; BRANCH OVER ERROR CALL IF GOOD DATA.
; SET UP VALUES FO. ERROR PRINTING.
(GO TYPE A MESSAGE)
; ... "'* ERROR
;ERROR TYPE CODE.

,,'" ..

95$ :

010046
010300
012603
OC5304
CC' 121 3
010045
010300
012603
030502
OC 1204
004767

004216

-(SP)
RO
R3

-(SP)

R3
.2
fI'l:";lUP

: SAVE RO
; PUT "3 INTO RO
; ;:OUT SAVED PO INTO R3
; DECRE~/IENT 256. \<JORD COUNTER
; BRANCH IF f'I10RE.
; SAVE RO
; PUT
INTO RO
; PUT SAVED PO INTO R3
; CHECK FOR END OF A BLOCK.
; BRANCH IF r'>'ORE IN CURRENT BLOCK.
; FIND NEXT BLOCK AND LOOP TO 21 $..

; ; ...... "'''"'''''' * ... ***.'" *"""* "" '" ""~. *" "'* *. "'".'" ***",,~, "' ..... " ........... "'''' "'*>i< .... * "'''' * ......
: ... T~£T

Cor.l?LEMENT PARI-. " 3 XOR 9 TEST

: : '" '" '" * "' ... **."'.'" .,,* .*. *">\0* "'''' >1.**",*

010766
010766
010772

PATTERN.

>II "'''' "' .. "'''' " .. "' .. "'" .. ", .. "' . . . . .

*** .. * ...... "' ... *

TST16:

JSR
.WORD

R5,
777

000610

LIMP

TS717

177777
000401
003412
005236

MOV
r.lOV
JSR
JSR
BIT
BNE
JSf,

#-1,
11'401,
R4,
PC,
.5,

004567
000777

007636

010774

000167

011000
011004
011010
011014
011020
011022
011024

0: 2700
0'2703

004467
OC4767
030502
001374
004767

1$:

004154

$SCOPE

eo
R3
INI TMM
~:3X9

1$
PC,

MMUP

; GO TO SCOPE ROUTINE.
; ~,11 N! r.... u~\l BLOCK SIZE OF 256. WORDS
REQUIRED FOR THIS TEST.
; SKIP TO NEXT TEST l<JHEN LESS THAN ONE BLOCK
AVAILABLE FO. TEST.
; SET UP ALL ONES PATTERN
; SET UP PARITY "A LL ZEROS" PATTERN
; INITIALIZE THE ro.1E~JlORY ADDRESS POINTERS.
: \<JRI TE 256. WORD BLOCK WI TH 3 XOR 9 PAT.
; CHECK FOR END OF A BLOCK.
; BRANCH IF rlORE IN CURRENT BLOCK.
; FIND NExT BLOCK AND LOOP TO , $.

2225
2226
2227
2228
2229

r'5

oeOO07

0-124K i't.EMORY EXERCI SER,
CZQMCFO
14-F E8-78 OB: 1 9
CZOMCF. Pl1
2189
2190
2191
2192
.2193
2194
2195
2196
2197
2198
2199
2200
2201
2202
2203
2204
2205
2206
2207
2208
2209
2210
2211
2212
2213
2214
2215
2216
2217
221 B
2219
2220
2221
2222
2223
2224

MA"',Y1 , 30A('052)
:(O-FEB-78
PAGE 46
07: 56
MODIFIED 3 XOR 9 PATTERN FOR PARITY MEMORY

, 6K VEl=:

; ; '" "' .. >i-*'" '" '" "'. *" ** >i< * "'_ "''''* "' ..... ,..* "' .. " "'"" ........ " .. ~ . .
~,.* "' ... * "' ... "'>I< '" '" '" "" ** **
:
CHECK C:.:JlPLE!11E.NT PARITY 3 XOR 9 PATTERN l.';RITTEN ABOVE.
; ; ... * ... *. "'''',. .. Ii< ",""'Ii< .. ** ** .. .;.,..'" "'. '" "' ..... ,. '" *""" ~ .. '" "' .... "'.;. .. ,. '" A"' ...... "' .. '" * .. "' .. *"' .. *
1;'-1,
r-.mv
PO
; SET UP ALL ONES PATTERN
>1< .....

>1<

01 j 030
011034
011040
all O~4
o 1 ~ 050
011 C50
011052
Cll054
011 C56
011062
011 (,66
011070
01 !070
011072
011 Q74
011076
011,02
0'1106
011110

012700
0,27(·3
004407
0'2704
012201
0200': 1
001405
C'Cr4767
004767
CC 00C7

177777
OOO~01

003362
000100

11 $.
12$ :

MGv
JSR
MOV

,;401,

MOV

(R2)+ ,
RO,
65$
PC,
PC,
7

cr.;p

007304
010552

6";$ :

BEO
JSR
JS.
.1·,lRD

R4,
11'64. ,

655 :
012201
0-0001

Mev

00..: 1405
004767

BEQ
JSR
JSR
• ~ORD

004767
000007

Cr-.'p
007264
010532

66$ :

67$:

(R2)+ ,
RO,
67$
PC,
PC,
7

R3
INI TMM
R4

; SET UP PARITY HALL ZEROS" PATTERN
;lNITIALlZ!: THE !\o'EMClRY ADDRESS POINTERS.
: SET 256. I'lORD COUNTER

R,
R,

GET THE DATA FROM
CO~.:PARE Tr-iE CHECK
BRANCH OVER ERROq
SE T UP VALUES FOR
ERROR
(GO
ERROR TYPE CQDE.

MEMORY UNDER TEST.
\\lORD I'JI TH THE DATA READ.
CALL IF GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)

GET THE OAT A FRO~,l
CGj,IPARE THE CHEer:
BRANCH OV!:;:;, ERROR
SET UP VALUES FOR
( GO
EQROR
ERROR TYPE CODE.

MEr>.-1ORY urJDER TEST.
\.\lORD I'JITH THE DATA READ.
CALL IF GOOD DATA.
ERROR PRINTING_
TYPE A MESSAGE)

SPRNT2
$ERP.OR

SPRNT2
SER. OR

...
".

...
"'*"'

CZO~CFO

ClQMCF.Pl1
2245
224G
2247
2248
2249
2250

0-124K '{O,!ORY EXERCISER,
1,1-FES-78 08:19

011110

012201

0"112
011114

C:;:aOG1

011116
011122
011126

OC'47E7

0(;4767
000007

2251
2252

0111:]0
011130

012201

2253

011132

2254
2255

011134
011136

2256
2257
2258

011142

2259

2260
2261
2262
2263

2264
2265
2266
2267
2268
2269
2270
2271
2272
2273
2274
2275
2276
2277

2278
2279

2280
2281

011146
011 1 50
011150
011152
011154
D1 1155
01116']
01116'::'
011 1 64

020001
0(11 ~05
004767
004767
000007

68$ :

007224

, \<JORD
MOV
MOV

RO,
R3,
(Si=l)+.
R4

010046

MDV

010300
012603

r,\DV
MOV

R3.
(SP)+,

BIT

R5,

011172

030502
0013.:4

011174

004767

010300

DE·:

8NE

004004
;

; '" '"

;'"
011200

011204
011210
011214

012700
0, 2703
0()4-167
012704

177777
000401
003212
000100

BNE

11$

JSR

PC.

CHECK,

con,

Mev

CHECK.

COM,

(R2)+,

RO,

SEQ
JSR
JSR

73$

COM

011310
011310
011312
01131Cl
011316

011322

74$ :

0'J5100
0051-;2

007064

I\:DKRY EXERCISER,
14-FEB-78 08:19

0[4767

76$ :

15K VER
T16

010332

CDr'.l
COM
MOV

O,1P

RO
-( R2)
(R2) +,
RO,

BEQ

77$

JSR

pc,

*,...

MEMORY UNDER TEST.
WORD vJITH THE DATA
CALL IF GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)

READ.

; SAVE RO
;PUT R3 INTO RO
; PUT SAiED PO INTO R3
; CQUi\<, 256, ',...oROS
; pRANCH IF r:ORE
; SAVE RO
;PUT R3 INTO RO
; PUT SAvED ro !NTC R3
; CHECK FOR END OF A BLOCK.
;BRANCH IF r;ORE IN CURRENT BLOCK.
;FIND t-JEXT BLOCK AND LOOP TO 11$.

Co;I1PL£ME~rED

PARITY

XOR S PATTERN.

;SET UP ALL ONt:S PATTERN
;5ET UP

PARITy

;!~ITIALIZE

; SET 256.

THE

"ALL ZEROS" PATTERN
!,lEf~ORY ADDRESS POINTERS.

WORD COUNTER

SPRNT2
SERROR

MEMORY UNDER TEST.
viORD vllTH THE DATA
CALL IF GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)

READ.

CHECK 'liaRD
TEST DATA
DATA FRm.l illEMORY UNDER TEST.
THE CHECK WORD WITH THE DATA READ.
;aRANCH OVEP ERROR CALL IF GOOD DATA.
; SET U;) VALUES FOR ERROR PRINTING.
;~>I-~

Er~ROR

; t:RROR

"'Of'" (GO TYPE
TYPE CODE.

A MESSAGE)

; CO·,'PLE~/.ENT CHECK '1JORD
R1
R1
SPlmT 2

;RESTCRE
;GET THE
: COI;9Al:lE

DA':'A
DATA FRm,l iI~EMORY UNDER TEST.
THE CHECK WORD \~ITH THE DATA READ.
;6RANCH OVEP ERROR C.l.LL IF GOOD DATA.
;5ET UP VALUES FOR ERROR PRINTING.

SEQ 0131

PC.
7

$ERROR

; "** ERROR , . H (GO TYPE A MESSAGE)
;ERRCR TyPE CODE.

MOV

(R2 )

CMP

RO,
79$
PC.
PC,
7

P1
R1

;GET THE DATA FRCI1 MEMORY UNDER TEST.
;COr,-jp,io,RE THE CHECK wORD l,HTH THE DATA READ.
; BRANCH OVER ERROR CALL I F GOOD DATA.
;S[T Lo'P VAL:JES FOR ERROR PRINTING.
;~H ERROR H*
(GO TYPE A MES';AGE)
; ~RROR TYPE CODE.

u5R

· wORD

OG0007

PC,

PC.

THE DA, A FROII'
HIE CHECK
;8RANCH OVE!=! ERROR
;SET U? VALUES FOR
;,..~* EOi'?aR ""'-" (GO
;ERROR TYPE CODE •

30A(1052)
2C-FEB-7S
07:56
P .... GE 49
CO".lPLE.MENT PAR I TY 3 XOR '3 TEST PATTERN.

77$ :
C122(i
0::;0001

OC1-i05
CC4767
OC4767

007044

78$ :

J~ ;
· WORD

010312

COM

012201

MOV

011::J36
011340

0:'0001

Gr.p
BEQ

SPRNT2
SERROR

79$:
COM

00l~05

0::4767

007020

OC'47E.7
OS0007

010266

80$ :

2316
2317
231 B
2319

011342
0113<16

2320

011354
0'1356

J05100
OC.5142

COM
CO:l1

01~360

0122C1

fl.l0V

2323

01;352

2324

2325
2326

011364
011366
011372

0':"0001
0(i1405
0(,4767

2327

01137G

2328
2319
2330
2331
2332

01'.';00

uSR

JSR
,loiORD

RO
-( R2)
(R2)+ ,
RO.

81$
PC.
PC,
7

;cor,~PLEr'·IENT

R1
R1
SPRNT2
SERROR

CHECK \.;ORD
TEST C'ATA
OA7A FROM rl.EMDRY

W..JDER TEST.
~,rORD WITH THE DATA REAO.
;SRANCH ovEr. ERR:JR CALL IF GOOD DATA.
; SET UP VALuES FQ;:( ERROR PRINTING.
ERROR .. "'"
TYPE A MESSAGE)
; ERi<OR TyPE
THE

; "''l'''

81 $:

oe4757
0(:0007

cr.:p

006774

82$ :

010242

BEQ
JSP
JSR

• wORD

PO
- (P2)
(R2 )+.
PO.
83$

R1
R1

PC,
PC.
7

; CO·,iPL[i',1ENT CHECK \liORD
; .:XES TO;<E OAT A
;GET THE Do\TA FROM MEMORY UNDER TEST.
;CC,.'PARE T~~E CHECK ("ORO v.iTTH THE DATA READ.
;GRANCH OVP ERROR CALL IF GOOD DATA.
;SET UP VAL:.JES For~ ERROR PRINTING.
;"",.. Ei<ROR .. ,..* (GO TYPE A MESSAGE)
:ERROR TYPE C:JOE.

83$ :

012201

MOv

0;_0001
001405

Oi~P

0:47£7

(R2)+ ,

RO,

006754

84$ :

JSR

010222

2335
2336
2337
2338

011..;22
011';24

0r.·5142

CCM

0~22C1

1\10V

2339
23·10

011476
0'1430

0:20001

crw

:2341

011·132

OCJ.:j767

006730

2342

01 1~13G

C04767

010176

:!343
234·1
23AS

0114<12
011':'<\4

0'.;00(7

D 11444

2346

011-~I;G

23·17
;:340
23·'l9

L~11";SO

• WORD

0"" T A FRG~.i MEr;1OPY UNDER TEST.
THE CHECK ~IjOR8 \rJITH THE DATA READ.
aVEP ERRQR CALL IF GOOD DATA.
;:3::T UP VALUES F:;~ ERROR PRINTING.
; ••,,. ERf1.0R H'" tGO TYPE A MESSAGE)
; ERRClR TYPE CODE.
THE

;f,RA~.,)CH

855

01141 G
011420
011420

PC,

SPRNT2

PC,
7

SERROR

85$ :

ceM

Q~51(;0

PO
-( P2)
(R2)+ ,

CH£C!-\ 'o'JORD

• WORD

GG5100
Oc.:511.2

COM
COM

RO
- (R2)

C'22('1
0;-:0001
001405
004767

MGV

(R2)+.

C~... P

SPRNT2

.1o;r!""J

RO.
89$
PC,
PC,
7

MGV
OI.P
BEQ

(R2)+.
PO.
91 S

CC140S

86$ :

BEQ
JSR
JSR

CATA
1.1E\10RY UNDER TEST.
'~iGRD II/IlH THE DATA READ.
ERRO
CALL IF GOOD DATA.

TEST
R1
R1

t:lO,
(l7$
PC,
PC,
7

OATA

;CC ;,::>.:..R:':

T~~E
GIJt::~

F,~cr'l~

CH5:0,

~;PR!\J T2
:1ERROR

;
UP V,\LuES
; ",,", E1RJR H "
;ERRClR TYPE

;GET TH:: Dl.'t..

FO;:~

ERR8R PRINTING.
TYPE

A MESSAGE)

87$ :

011.;62
Oll·1GG
011LiJ'O

OG47G7

01l·no

0'22('1

011,n2

C:)0001
O(;J405

011.::7·1

READ,

MA;'Yl1

011334

011..;5':
011L1SlJ

Rl
Rl

• \o"ORD

0',5100
OG5142

011452

RO
-( R2)
(R2)+,
RO,

75$

OC0007

011400
011'::02
0111,0";
011406
01'--112

PC.

SPRNT2
SERROR

BEQ
JSR
JSR

01'326
011330
011J30
011332

011352
011354

PC,

• 'J:ORD

COM
tNJV
CMP

0-124~

011302
011306

;GET THE D.... TA FROM
:CO:.~P,'UiE THE CHECK
;BRANCH OVEr:;' EIHICR
; SET UP VALUES FOR
;H'" [RROR
(GO
;ERROR TYPE CODE.

CHECK

#-1.
RO
#401,
R3
R4,
INITMlll
4'64. ,R4

CrV.P

C2QMCFO

2354

~,lMUP

MOV

Czor{,CF.F11

23:;0
2351
2352
2353

RO
R3
R2

OCr14C5
0047(7

01'264
011266

SEO 0130

MH,10RY UNDER TEST.
THE CHECf, ~·~'ORD I'IITH THE DATA
; BR,;WCH
ERROr.. CALL IF GOOD DATA.
;SET UP VALUES FJr.: ERROR PRINTING.
;""'''' ER~OR Ad",
TYPE A MESSAGE)
;ERROR TYPE

~ '" '" '" ... '" >oj. '" ..-..- .. "' .. '" " ' ' ' .. "' .. 01- .. "' ..... '" '" >< ..." .. '" .. " ' " ". '" ~ .. "'". .. ~ .. ¥ '" ~ '" ... '" "' .. '" '" '" '" '" '" ... "' .....

MOV
MOV
uSR

215:

-(S~)

011224
011226

2295
2296

Pi\CE 48

PATTERN.

225 :

22970'12700:2201
2298
011272
020001
2299
011274
CO 1 405
2300
011276
004767

2334

12$
RO,

020001

011264

2333

$,ERROR

012201

2294

2321
2322

::PRrH2

011220
011220
011222

011250
0014(5
011252
004767
007,,0
2292011256004767010356
2293
0'1262
000007

2312
2313
2314
2315

(R2)+ •

r,iDv

0100'::6

2290

2310
2311

SERROR

RO,
71 $
PC,
PC,
7

07:56

TEST

71$.:

2291

2309

PC,

.I'JORD

Jsr

010472:

2286011240005100
2287
011242
OC51·~2
2288
011244
O~2201
~289
011246
02QCC1

2307
:2308

JSFI

BEQ
JSR

73$ :

:;'305
2306

S?Rl'\T2

MOV
CMP

ovu'

PC,

0,2003
CC 5304
0(..1333

011166
011170

R1
007244
010512

2283011232004767010402
2284
811235
0000C7
2285
011240

2302
2303
2304

R2)+,

OC1405

725 :

2301

XQI-i

[,10V

007134

2282

20-Ft::3-7("1

16K VEr::
T16

006704
010152

88$ :

000007

BEQ
JSR
JS R

~.ERP.OR

; CQl.:PLErI~~rH (HECI, WORD
;Rf_STORE DA~A
FRO~1 MDHJRY UNDE~1 TEST.
;CO·\~i=.oARE THE CHEC~, \oJORD WITH THE DATA
;SRANCH OVEI-' Ef.(ROR CALL IF GOOD DATA.
;SET U;': V'\LUES FOR ERROR P,qPHING.
:,,~ ... EflROR ... p .
TYPE A ~,1ESSAGE)
; [RH8·- TYP=

READ.

89$ :
OAT A

FROM MEMJRY U!~DER

GE T THE

THe CHEO: ~"'ORD WITH THE DA7A READ.
; BRANC~, ovEP ERROr! CALL I F GOOD DATA.

TES T.

0-124K fI.'EMORY EXERCISER,
CZQMCFQ
14-F Ea-7S 08" 9
ClQMCF.rl1

2357
2356
2359
2360
2361
2362
2363
2364
2365
2356
2367

2J08
2309
2370
2371
2372
2373
2374
2375
2376
2377
237B
2379
2380
23BI
2382
2383
2384
2385
23B6
2387
2389
2389

011·176
011 SJ2
011506
011510
011510
011512
01151~

011516
01 t::20
011522
01152!,)
011':132
011E34
vii 534
01153G
011540
011542
011544
011546
011552
011556
011560
011560
011562
011564
011566
011570
011572
011574
011576
0116CO
011602
011604

OC4767
OC4767
OCOOO7

90S:

00666.
010~32

005100
005142
012201
020001
0: 1405
OC 4767
004767
OCOO07

92$:

006640
010106

cos I 00
0~5142

012201
0:0001
001405
0·~471:7

004767

94$:

006614
010062

0~0007

010046
010300
012603
005304
001213
010046
010300
0' 2603
030502
001204
004767

COM
COM
MOV
CMP
BEQ
JSR
JSR
• WoRD

RO
-(R2)
(R2).,
RO,
93$
PC,
PC,
7

COM
COM
MOV
CMP
BEQ
JSR
JSR
.WORO

RO
-(R2)
(R2)+.
RO,
95$
PC,
PC,
7

MOV
MOV
MOV
DEC
BNE
MOV
MQV
MOV
BIT
BNE
JSO

RO,
R3,
( SP).,
R4
22$
RO,
R3,
(SP).,

CC;.~PL.E'~ENT CHECK WORD
CO"~PL.E~"'ENT TEST DATA
GET THE DATA FRO!,' MEMORY UNDER TEST.
cor,\PARE THE CHECK WORD WITH THE DATA READ.
BRANCH OVEP ERRGR CALL IF GOOD DATA.
SET UP VALUES FOR ERROR PRINTING.
ER~OR .""" (GO TYPE A MESSAGE)
ERROR TYPE CODE.

RI
Rl

...

SP~NT2

!.ERROR

cor\:PLE!~ENT CHECK WORD
".STORE DATA
GET THE DATA FROM MEMORY UNDER TE$T,
cor~'PARE THE CHECK WORD WITH THE DATA READ.
BRANCH OvEFI ERROR CALL IF GOOD DATA.
SET UP VALUES FOR ERROR PRINTING.
ERROR ..... (G~ TYPE A MESSAGE)
ERROR TYPE CODE.

RI
RI

...

SPRNT2
SERROR

003374

16K VER
T17

-'(SP)
RO
R3

OS,

-(!:P)
RO
R3
.2

21$
PC,

MMUP

SAVE RO
PUT R3 INTO RO
puT SAVED PO INTO R3
DECRE.;\~ENT 256. WORD COUNTER
BRANCH IF ~ORE.
SAVE RO
PUT R3 INTO RO
PUT SAVED "0 INTO R3
CMECK FOR END OF A BLOCK.
BRANCH IF MORE IN CURRENT BLOCK.
FIND NEXT BLOCK AND LOOP TO 21$.

M,6~Yl1 30A(1052)
20-FEB-78
07:56 PAGE 51
WORSE CASE NOISE P.t.RlTY BYTE TESTING

;.TEST 17
WORSE CASE NOISE PARITY BYTE TESTING
;. CHECK PARITY MEMORY WITH A SERIES OF BYTE PATTERNS
;.
1) FORCE WRC'IG PARITY 1:-.1 ~.\CH BYTE OF PARITY MEMCRY
;*
2) READ IT BACK WITH ACTION ENABLE SET. MAKING SURE THAT A TRAP OCCURS
;.
3) WRITE GOOD PAR!TY AND MA.KE SURE NO TRAP OCCURS WHEN IT IS READ
P'
4) MAKE SURE THE ERROR ADDRESS BITS (CSR BITS <11-5»
ARE CORRECT

; ; ......... ' ., ...................... ••• "'*."''''* •• * .... * ................... .
~

TST' 7;

005767

007014

011622

00'4C4

011624
011632

C~2777

000100

OC 1402
000167
OC5000

000622

243~

0117;6
0' 2000

011540
011642
011646
011552
011660
011662
011670
011672
011674

011676
011702
01170S
011712
011716
011720
01172.:&
011730
011732
011734
011740
011744
011746
011746
011752
011756

011760
011764
011772

004767
OC44e7
1.1::6761
OC1010
036767
OC 1 004
0= 0502
0;:'5202
0:J0167
004767
004767
C.;. 02~7
001004

052702
OCO,67

WWPBO:

170454

2402
2403
2404
2405
2406
2407
2408
2409
2410
2411
2412
2413
2414
2415
2416
2417
2418
2419
2420
2421
2422
2423
2424
2425
2426
2427
2428
2429
2430
2431
2432
2433

011634

SEQ 0132

; SET UP VALUES FOR ERROR PRINTING.
: "'
ERROR
(GO TYPE A MESSAGE)
; ERROR TYPE CODe.

SPRNT2
$ERROR

; ; ................ * .. "' .................. ** ••• **. *** "',,""' •• >11 ***. *•••••••••••••••

0:'4567
C' coco

167306
1$:

2$:
004322
002554
167666

167660

167060

167652

000540
00,67.
005724
000114

004767
004767

WWPBYT:

JSR
.WORD
TST
BEO
BIT

WWPS1:

3$:
64$:

006352
007674

OC0011

$SCCPE; GC TO SCOPE ROUT INE.
:t-.oO MINxr.;UM BLOCi<. SIZE REQUIRED THIS TEST.
: CHECK F:JR Af~Y PARITY MEMORY.
:OR IF NO PARITY r.1EMORY.
~SWk
:OHi.CK FORHIHIBIT PARITY SWITCH.

B£Q

2Si

1$T20
;SKIP THIS TEST If NO PARITY MEMORY PRESENT.
RO
;ZERO TO BE PuT IN ALL MEMORY.
PC.
SET CON
;ROUTlN: TO LOAD ALL MEMORY.
R4,
H~ITMM; INITIAL.lZE THE :v!EMORY ADDRESS POINTERS.
BITPT.
PMEMAP
;CHECK Ii= CURRENT BANK HAS PARITY MEMORY.
2$
;BR IF PARITY MEM.
BITPT+2,PMEMAP+2 ; ••. HI 641{.
2$
;BR IF PARITY MEM.
R5.
R2
;POINT TO END OF BLOCK.
R2
; FIRST AOR OF NEXT SLOCK.
WWi)B5
;SR TO FIND NEXT BLOCK.
PC,
SETAE
;SET ACTION E.NABLE (EVEN IF BANKO.)
PC.
CKPMER; CHECK FOR ANY NON TRAP PARITY ERRORS.
R2.
..114
:CKECK IF POINTING TO PARITY ERROR VECTOR.
3$
:BR IF NOT AT VECTOR.
il4,
R2
;SKIP PARITy VECTOR.
\OIWPS5
jCHECK FOR SLOCK END.
(R2),
R1
;CHECK IF gYTE STILL CLEARED.
65$
: BRANCH OVEn ERROR CALL I F GOOD DATA.
PC.
SPRNT
;5ET UP VAL.UES FOR ERROR PRINTING.
PC.
$ERROR; ...... ERROR .... (GO TYPE A MESSAGE)
11
;ERRO~ TyPE CODE.

BIT

JMP

000004
000512

RS,
o
MPRX
1$
1f5W06,

JMP
CLR
JSR
JSR
BNE
BIT
BNE
BIS
INC

2$:

,112Cl
0(- 1405

JSR
JSR
CMP
BNE
ADO
JMP

Move
BEQ
JSR
JSR
.wORO

:eR If" NI:)T :;',I:;t.

65$:
lC5067
'·,27CO
I" 0012
0167C3
056773
052733
OD5713
001371
110012
016703
0':' 6733
vc5713

2437
2438

012:>02
012004

2439

012010

2440
2441

012014
012016
012020

C': 13i4
0' 6737

012026

105412

::1443
2445

JSR
.wDRO

PC,
PC,
7

955:

011610
011510
011614
011616

2444

uSR

935:

2390
2391
2392
2393
2394
2395
2396
2397
239B
2399
2400
2401

24-12

20-FEB-78 07: 56
MACV11 30A(1052)
PAGE 50
car.1P1.EMENT PAR ITY 3 XOR 9 TEST PATTERN.

91$:

CZQMCFa
0-124K flr.EMCRY EXERCISER,
CZQMCF.Pl1
14-fEB-7S 08:19

2435
2436

16K VER
TIG

167606
000252

ClRb
MOVe

OEFLG
;CLEAR ODD/EVEN FLAG.
#252,
RO
;SET UP DATA ••• EV·~. SETS PARITY BIT.
RO,
(R2)
;MOV DATA I~Ta TEST L.OCATION.
MOV
• M?RX.
R3
;GET PAR!TY REGISTER TABLE POINTER.
10$:
BIS
WWP,@(R3)
;SET toJRITE WRONG PARITY.
SIS
pAE,.(R3)+
TST
(Fl3l
:CHECK FOR TABLE TERMINATOR.
BNE
10$
:SR IF tI;ORE REGS IN TABLE.
:. SET WRONG PARI TY IN LOCAT ION LNDER TEST.
MCVS
RO,
(R2)
;"iI.'RITE SAME DATA (EXCEPT PARITY) VIA DATOB.
MGV
.MPRX,
R3
;OET PARITY REG HBLE POINTeR.
l1S:
BIC
WWP,
0l(R3)-+
;CLEAR wR!TE wRONG PARITY,
TST
(R3)
;CHECK FOR TABLE TERMI~ATOq,
Bt-.:~
11$
;aR F MORE PARITy REGISTERS.
MOV
.PBTRP, @lI.'PAF:VEC :SET UP VECT:JR FOR EXPECTED TRAP.
;. DETECT WRONG PARITY VIA DATIP; DATOB SrlOULDN'T EXECUTE.
NEGB
(R2)
;DATIP (DATOB AND COM PARITY BIT.)
;'"
SHOULD r,AVE TRAPP~D TO PBTRP.

WWPS2:
167644
167622
000001

000000

1676.20
167576

167606

000114

Move

SEQ 0133

0-124K fl.EMC~Y EXERCISER,
14-FES-78 08: 19

012050

016737
CC4767
004767
ae0012
020562

2453

012052

016737

2454
2455
2456

012CGO

0:< 2626

2457
2458

012072

01::074

016703
032713
DC 1 003
017301

2459
2460
2461
2462
2463
?464
2465
2466
2467
2468
2469
2470
2471
2472
2473
2474
2475
2476
2477
2478
2479
2480
2481
2482
2483
:;484
2485
2":86

012100
012',02
012106

1":'0413
0::2703
020367

012112

103765
004767
0047£7

2446
2447

01
01

2449
2449
2450

012042
0120413

T17

006~00

MOV
JSH

007572

,JSR

1 G7602

20-FLl--78
0'/ ::'6
P~GE 52
PARITY :3YH T£5TIt>:G

fl.1ACitl 30A(
\'JO'i5E CASE

16K VEl-<

000114

. PESRV,

PC,
PC,

· .-JORD

\rJwPB4

SEQ 0134

@JliPA~VEC

; RESET VEC70R F01~ UNEX?ECTEO TRAPS.
SPRN-:-O; SET U? V..\LuES FOt{ ERROR PRINTING.
$ERROR
;",. H.ROR »,." tGO TYPE A MESSAGE)
;ERROR TYP~ C80E.
; SK I P TRAP SERV 1 CE.

~451
; >/.

2452

~487

2489
2489
2490

a 120G2
o 12Q6G

012114
012120
01 ::124
012126
012130
012135
012140

012146
012150
012154
0121 GO
012162
012162

Cr:37GO
O~.27CO

o· 63E.7
0-16700
0-:6701

"EG.

JSR
JSR
• WORD

; ERROR TYPE

MOV
MQV

RO.-(SP)
R2,
RO
113777,
RO

; jPUSH RO O~~ STACK
;GET THE ADDRESS POINTER.
;CLEAr· LmoJ ADDRESS eITS.
;SHIFT 6 PLACES RIGHT.

RO
RO
RO
M~;lAVA

FOR r;E"~ rr.GI.n.

TST
BEQ

SIr;
ACD
SIS

; CLEAR 54NK 81 TS
; ADD t.E),~ MG','T OFFSET.
; SET EfiROR A'W AE BIT IN CHECK \I.IORD.

rJlov

;GEl A;:PROPIATE f\1;:,SK.
;CLEAR DARITY REG BITS RESERVED

25$:
167256

167256

; CHECK
;8R IF

BIC
81 C
THE ABOVE
Ci\~P

007364

6EQ
JSR
C

J
• \\ORD
'

tm j';'.E:,I.' r.1G\1T.

FOR FIJTURE.
BITS RESERVED FOR FUTURE,
'ED FDR UNMIXED MEr"'ORY TYPES.
ThE CHECI' '~JOt(u WITH THE DATA READ,
; BRA~KH o'n;,:; ERRO.~ CALL IF GGCl8 DATA.
; SET UD VA~iJES FOR ERROR PRINTING.
; u",
EiiROK ",... (GO TYPE A MES"SAGE)
; ERRCR TYP:: CODE.

CLUR P':'RITY
CAN BE

RO,
67$
PC,
PC,
1S

Rl
SPRNTP
SERROR

67:;:

000000

CLR
MGV

000010

ADD

0:0367

167334

CMP

R3,-(SP)
1110,
R3
::13,
. MP, X

101014
032713

B"1

W\~P83

000001

RTT

1t81 TO.

C'5073

0103 .. 6

0-1241{ !.:EMORY EXERCISER,
14-FE8-78 08:19

2503
2504
2505
2506

01::204

Oj730,

012310
012312

lC0365
OD4767

012316
012322
012324
012326

0(4767
OG0016

012330

1; 1212

012332
012334

0'26C3

0123~O

0..;6701

01234-1
012350
012352
012354
012360
012264

0..;2700
C::'OOC1

lGK VER
T17

O~0757

111204

017301

000000
167152

000001

O~d4C5

C::4767
005756
2522
2523
OC47€7
007254
2524
oeOOlS
2525
0123(:.6
25260123660',2773000001000000
2527
012374
C:0401
2528
0123713
0126CO
~529
0124CO
1::0001
2530
012~.J2
O':Jl40S
2531
OI:2";G~
v~'4757
005732
2532
012~10
o 47f:7 007224
2::.33
012414
oe0017

1\·1ACY11
WOR~::.

BNE
MOV

000000
,)06020
007316

2513

2520

~JEXT

;81

177600
172344
100001
000eC'6
167262

000015

001370

2521

;MJVE POP-HER TO

,MPRX

166402

0':4767

012302

2516
2517
2518
2519

BIT
8NE

ASL
ASL

006066

2502

2514
2515

JSR

SIC
5 I.'; A

003777

0200C 1
001405
OC4767

012270
012274
012276

2511
2512

IF ThIS REGISTER EXISTS.
;BR IF IT 00E51'<'T EXIST.
;GET THE C0\THHS.
;SR IF ErH~'J:· FL:..G SET.

;Ch::CK 17 0.'< END OF TA8LE.
IF MORE REGISTERS.
PC,
SPRf\;TO
;SET UP VALUES FOR ERROR PRINTING.
PC,
SERROR,""" ERROR ",," (GO TYPE A MESSAGE)
13
; ERROR TYPE CJDE.
loJWPB4
;EXIT AFH.R ERROR.
BITPT,
2(R3)
;CHECK THE t';l,? FOR THIS REGISTER.
24$
8R IF THIS REGISiER CONTROLS THIS BANK.
BlTPT+2,4(R3)
THE HI 64K.
24$
;BR IF THIS REGISTEq CONTROLS THIS BANK.
PC,
SPRNTP
;SU UP VALUES FOq ERROR PRINTING.
PC,
SERROR; "",. ERROR · H
TYPE A MESSAGE)

BI T
BtJE

65$:

(R3)
R1

24$ :

2499
2500
2501

2509
2510

22$
@:(R3),
23$
,1110,
R3,
21$

• WORD

; NOT E:

CZQMCF.P11

;;81TO,

miS

BR
23S:

0~0046

O~0200

CZQMCFJ

BIT

8M!
ADD
CMP
BLO

TRAPS CO::E HERE.
1£.4PARVEC ;RESET P..\RITY VECTOR FOR UNEXPECTED TRAPS,
(SP)+
;R[SET T!-lE STACK POINTER AFTER TRAP.
R3
CET PARITY REG A~,D ~AP TABLE POINTER.

1:.C.r.~OK{

.PES~V,

(SP)+.
.MP;iO,

JSR

007514

OC.0014

0E.2703

2507

64$:

006222

000004

012264

2508

22$:

000010
167516

167402

2498

2493
2~94

~ARITY

MOV
CMP
MOV

r~Ov

00G162
007460

2495
2496
2497

2492

21$:

OC' 1 011
C2-6763
001005
0(;4767
0047£7

01//40
012:<42
01 :::244
012250
C12254
012:56
012256
012262

2491

EXPECTED

P6TRP:

000000

000C02

0·i27CO
0':"03(.0
006300
OC6300
0:"57(7
001404
Q.: 27(. 0

012206
012212
01 ?116
C12222
012230
012234

167540
000001

167410

012164

012204

000114

oe0013
0('0533
0'::6763

C12166
012172
012174

012176
012200

167560

@(R3)

(R3)

;CLEAR REG INCLUD!NG ACTION ENABLE.
R3
STACX
;UPDAiE
TO NEXT PARITY REG T MAP.
;CHECK FOR END OF TABLE,
;BR IF END OF TA8LE REACHED.
; CHECK I F NEXT REG EXISTS.

;;rUSH

3CA(1052)
20-FEB-/8
07:56
PAGE 53
ChSE NOISE PARITY t3YTE TESTING

26$
@(R3),

,el1

26$
PC,
SPPNTP
JSR
;::C,
~ ERROR
.1J.'ORD
16
BR
265
wwpa.:;: MOvB
(R2),
"4
;CET THE DA-A FOR CHECKI'\lG.
;" REA~ING THE DATA ViA DAT! TO CI~!:CK IT SriCJLD CAUSE PARITY ERROR, BUT
;"
ACT:ml ENABLE IS NOT SET IN CGNTROt..HlG ;-EG, SO NO TRAP SHOULD OCCURE.
MOVB
; i1~STORE RI::;HT PAr:.ITY
;NorE:
THr
CAN SE r.. ~p'E.D F'JR !='f=QCESSORS
DO
DAT05 TO DESTINATION OF ['.'Ovi:, INSTRUCTIONS.
(SP)+.R3
; ; PO':> STACK INTO P3
!110V
@(Q3).;(1
THE P).RIT'; ~,EGISTER TO CHECK IT AGAIN.
BIC
RESR'.iiJ, "1
P~\RIIY REG BITS RESERVED FOR FUTURE.
;NOTE: THE ABO'/E INSTRUCT:C'N (2
C!l.N BE flOP'ED FOR UNMIXED r'I!EMORY TYPES,
En:::
flAE,
hO
THE PCTIO\J EN,',SLE BIT IN TEST DATA.
CMP
RO,
Rl
HE CHECK '.tJORD I'IITH THE DATA READ.
BEQ
655
;BR).\;CH OVE" ERROR CALL IF GOOD DATA.
64$:
JSR
PC,
SPF:NTP
;SET UP V4LuES FOR E~ROR PRINTING.
JSR
PC,
SERROR
TYPE A MESSAGE)
· wORD
15
65$:

68$:

BP L
JSR

SEQ 0135

;BR fF THIS PARITY REG DOESN'T EXIST.
; SAVE A"JD CHECK FOR ERROR FLAG.
;5R IF NO E[<RJR FLAG.
; SET UP VALuES FOR ERROR PRINTING.
;"'-"-" EP;:;'GR " H (GO TYPE A MESSAGE)
;EKROR TYPE CODE.
;BR A!'"T[R EFRJR.

MOV

111,
R4,

r,~ov

(SP)+,RO

tll0V

66$:

C:;.~8

RO,

6EQ
JSR
JSR

67$
PC,

• wORD

PC,

@(RJ)

!il
R1

SP;:';NTQ
SERROR

;CLEAR ALl BUT ACTION ENABLE.
;GET DATA READ FRCM ME.\10RY FOR TESTING.
POP STACK INTO RO
TrlE DATA.
; 8RJI.~C(-j OVEr, ERRO~ CALL IF GOOD DATA.
; 5:'T UP V4:.,uES FOR ERROR PRINTlNG.
>/.h EF\ROR " H
(GO TYPE A MESSAGE)
TYPE ceDE.

67S:
2535
2536
2537

MCVS

RO,
(R2 )

(R2)

t.253,

2538
2539

012~J2

2540

012~34

2'::'0167

2!:"'11

01~:;4:)

0C.5202

27$:

II\C

25'~2

01:;",42

Oj05C2

\P1\~P8S:

BIT

RS,

r~2

2543

012.';44
012·146

OC1402

BEQ

30$
WWPBl
PC,
PC,

MAMF

2544
2545

:1.546

012·.52
012456

1;0012
1c.:5712
0- 27CO
105167

W\tJP34:

012·;16
012420
012422
012426

TSTB
MOV

000253
167126

CCi~9

8'L
J:.',P

1;:'0002

0:':'0167
004767
OC4767

177316

1772~0

002526
00505~

J~I~P

30$:

JSR

f.lESTORE
DO

OEFLG
27$
\';\~PB2

M.\1UP

DAP..

A OAT~

suRE

RIG)"T

PARITY.

SET ODD PA"ITY DATA.
CHECK IF ;:lONE 80iH O.)!) AND EVEN PARITY.
BR IF DONE 80TH E.V~N :;ND ODD.
LOOP SAC"'; ':"'\lD DO
PARITY BIT CLR).
~OIN:ER TO
BYTE.
CHECK FOR END OF BLOCK.
3R IF ~ND OF SLOCK FOUND.
LOOP g,iCr< ro TEST NEXT BYTE.
FIND NEXT SLOCK "NO LOOP TO W~JPBYT
GO RESET P,\RITv REGISTERS.

CZQMCFD
0-124K t,'EMORY EXERCISER,
CZOr,.\CF, i.'\1
14-F £6-78 08: 19

T:;O

2550
2SS2
2553
2554
2555
2556
2557

2558
2559
2560
2561

\)12.:\62
0120152
01 :;'.:\66

012470
012472
012476
012502
C12504
012500
012510
012514

TST20 ,
004567
000000

Ji0703
GO: 2703
DC 4467
010246

162703

0:;05C2

~564

012~i26

012530

01:2603
012OC2

01~S32

012300

2567

012334
0, 2536
012540

0122Cl

JSR
MOV

1 $'

f'.'\CV

2$ ,

MOV
BIT
SNE
SUB
BI T
BNE
MOV
MOV

007777

010000
3$ ,

C04767

005620

CC4767
000020

007066

012542
C 12546
012552
012554
012554
012560

032703
001002

007777

2576

012562

162703

010000

2577
2578
2579
25BO

012566
012566
012570
012572

64$'

$5COPE
R3
R3
INITMM
-(SP)
-( SP)
(R2 )+
R3

117777 •

MOV
CMP
BEQ
JSR
JSR
.WORD

3$
#10000,
R5,
2$
(SP)+ ,
(SP)+,
( R3)+,
( R2)+,
RO,
65$
PC,
PC,
20

BIT
BNE
SUB

1110000, R3

BIT
BNE
JSR

R5,
4$
PC,

Mav

4S'

0::0001
OJ 1405

2571
2572
2573
2574
2575

R3
R2

; GO TO SCOPE ROUTINE,
;NO MINIMU~ BLOCK SIZE REQUIRED THIS TEST,
: GET CURRENT PROGRAM COUNTER,
: POINT TO BEGINNING OF CURREr-'" 2K BLOCK,
: INITIALIZE THE MEMORY AOORESS POINTERS.
: S:'VE {,I::[110RY POINTER.

: SAY::: "DATA"

PCINTEFI.

;MO\i COJE. 1 ~JTQ T:5T MEr,IORY.
; CHECK FOR END OF "DATA TABLE"
: BRANCH IF r;ORE
: RESET POINTER TO START OF " RANDOM DATA"
; CHECK FOR END OF BLOCK

; BRANCH I F ~.'ORE.
R3
R2
RO
Rl
Rl
SPriNT2

SERROR

:RESET "DATA" POlt'IITER.
; RESET r,lEMJr,y POINTER.
; GET SiB DAiA.
: GET THE DATA FROM MEMORY UNDER TEST.
; Co:.1PARE THE CHECK WORD WITH THE DATA READ,
; BRANCH ovE::) ERROR CALL IF GOOD DATA.
: SET uP VALUES FDR ERROR PRINTING.
;
'" ERROR "'. * (GO TYPE A rI.ESSAGE)
:ERROR TYPE CODE,

'" '"

65$'

#7777 ,
5$

; CHECK FOR END OF "DATA TABLE"
; BR IF MO~E,
; RESET POINTER TO TOP OF "DATA TABLE".

5$'

OJ0502
CO 1360
004767

0024(' j

CZQMCFO
0-124K r-iEMORY EXERCISER,
CZOio1CF.Pl1
14-FE6-78 08:19
2591
2592
2583
2584
2595
2586

16K VER

MACY11

R2
MMUP

: CHECK FOR ENO OF A BLOCK.
; BRANCH 1 F "'~DRE IN CURRENT BLOCK.
; FIND NEXT BLOCK AND LOOP TO 1$ ,

SECTION 3:

30A(1052)
20-FE8-7B
07:56
PAGE 55
INSTRUCTION EXECUTION TESTS.

.saTTl

SECTION

INSTRUCTION EXECUTION TESTS.
** "'* ** >t'. '" * .. "' .. * *'" .,"'''' ,."" . . +- .. '" '" *'" "'* ** ,',," • "' ... * . . ,. ****.* **
; *TEST 21
EXECUTE OAT I, DATO THRU MEMORy.
;*
EXECUTES THE INSTRUCTION 'r.1OV R4,(R2)' THROUGHOUT MEMORY.
:* AN 'RTS R5' (CODE 205) IS PLACED AFTER iHE 'MGV ' INSTRUCTION TO RETURN
;+CONTROL TO THE MAIN PROGRM.t FOR INSTRUCT lOTI,; EXECUTION CHECKOUT,
;.
THIS IS AN EXAMPI.E OF wHAT THIS TEST DOES IN RELATION TO MEMORY:

: ; "' ............ *.'" "'* . . "

2587

..
.

:
:
:
:'
:

2588
2589
2590

2591
2592
2593
259·1
2595

.
.
..

;'"

:
:
:

2596
25\37
2598
:'599
2600

;.
if
: '"

2(;01
2602

;

<j.

i*
i'"
i'"

2603

2604
2605
2606
2507
2609
2609
2610
2611
2512
2G13
2614
2615

6 T -:

007777
0017.24

001370

:2565
2566

R5,
0
PC,
,,7777,
R4,
R2,
R3,
(R3)+ ,

JSR
.I'JORD
R"NTST: MOV

OC1002

012516
0125:22
01 :2524

2569
2570

006142

0 1 0346
012322
0'2703

2562
2563

2568

SEQ 0136

; : ~ ... ~ ....... " .... **-01 or '" "'14<" "w '" of< of<'" '<' '" of< * ....... ,.. '" "'*"'" ~ ..... ,. "' ........... "' ............ >1< . . . . . . 14< ......
; .. T ES T 20
RANDOltl DATA
rES T I NG THRU PPOGRAM CODE RELOCATION.
: ; . ' " >; "' . . . . . . . . . . . . . . . . . . . . ".* "' ..... "'_"'. ,. ... '" "' ..... oi< ..... "' .. "' ..... '" >It"'" "' ... ** ....... * ........ "'.

2547
2548
2549
2551

MAr:Yl1 30A(1052)
20-FEB-7S
07: 56
PAGE 54
RANOor,j DATA
TEST;:T><G TH::(U PROGRAM ceDE RELOCATION.

16K VER

004567
OCQ003

006026

C12S04

oa0167

000056

012610
C'27C3
012e,14
Oi2704
C1262J
D~04CO
2616 01::?G22 0~'44(7
25170121.3250'03:;'2
2618
Jl:::C,3C
O;O~12
2619
01':;632
0(;4542
2G:?O
;),263...
O'22Cl
2621
012[:,,3G
0';:00(-1

010412
000205

Oi.:'642
~, 2.:'J46

2625
2626

012(}S2
0 i :<G54

2627
213:28
2629
:.0630

0121354
0 1 ~,)5G

o;~C:..;o

MEMORY
LOCATION

INSTRUCTION
PLACED THERE

CONTENTS OF MEMORY LCCATION
AFTER INSTRUCTION EXECUTION

1 ST PASS
THRU TEST

40000
4C002

010412
000205

000205
000205

'NO PASS
THRU TEST

40002
40004

010412
000205

000205
000205

ETC, • ETC ••

ETC.

RO,. DATA \'!RITTEN 0/'1: TOP OF JUT BY THE JUT (St-'QULD BE).
R1

R2
R3
R4

OAT A READ FROM r. ~Erwr.:Y (ioJAS).
ADDRE:SS OF I UT j!J.:" T A.
I1~STF!UCT ION uNDER TEST (!UT).
RTS F.5 (CODE 205).
8LOCK 60UNDRY BIT MASK.

; : ... * .. '" * "'.'" '" "'''' . . '''* "'* "'** "'*'" ~ "'''' "'''' * "'* '" ** * .... "'''',.- .. "'* ** '" "'*" "'* ** *,. "'. "'* "'* **

012576
012576
012502

2622
262.3
26:-4

*,.

T5T21 :

G[!14C5
0::4767
0::-47":7
oe0021

JSO
• ~'ORD

$SCOPE

JMP

T$T22

O!D:J:

MC\,
MOV
MOV
JSR

1!i:

Mev

2S:

MDV
JS'{
r.lOV

11010412. R3
(I205,
R4
R4,
RO
R4,
TNl TMM
R3,
; R2)+
R4,
(R2 )
R5,
- (R2)
(R2 )+,
RO,
Rl
65$
PC,
SPRNT3
PC,
$ERROR
21

001600

crv~p

005514
0067/36

RS,
3

645:

BEQ
JSR
JSR
• v,'ORO

GO TO SCOPE ROUTINE.
rot I r~ I r,lU~,l BLOCK 512=. OF 2 WORDS
REQUIRED FOR THIS TEST.
SKI? TO NEXT TES T WHEN LESS THAN ONE BLOCK
AVA! LASLE FOR TEST.
G:::T ' :-,::)V R4, (R2) , INSTRUCTION (ruT) ,
G='T ' RTS R5 '
SET OR 519 DATA AFTER EXECUT ION.
INITlALlZE THE rvlEMORY ADDRESS POIN;ERS.
PUT JUT INTO FIRST LOC OF BLOCK.
PUT ' RTS k5 ' FOLLOI'JING ruT.
GO EX::CUTE THE IuT.
GET TH!: DATA FROM THE MEM ADR UNDER TEST.
CC: ..:?ARE THE CHECK wORD v.'ITH THE DATA READ.
SRANCrl OVEF ERROR CALL IF GOOD DATA.
SE T UP VALUES FOR ERROR PRINTING.
ERROR
(GO TYPE A MESSAGE)
ERROR nPE CODE,

...

.. .

65$ ,

012,~EO

0',03:;:2
>230502
OQ1363

012662

0(;';767

Mev
002316

S'T
BNE
JSR

R3,
R5,
2S
PC,

(R2 )+
R2
MMUP

PuT THE IUT INTO THE NEXT LOCATION.
CHECK FOR END OF A BLOCK,
BRANCH IF r.'ORE IN CURRENT BLOCK.
FIND NEXT SLOCK AND LOOP TO 1$,

SEQ 0137

. P11

0-124K r;EMORY EXERCISER,
14-FEB-78 08:19

16K VEP
T:22

2631
2632

~63S

2636

2638
2639
2640

;..
; ..

2642
2643

INSTRLiCTION
PLACED THERE

MPNJC<i
LOCAT ION

;
;.

2041

2644

;..

;,.

2647

PASS
TF""

40000
40002

OOC'20r;

110605
000205

2ND PASS
THRU TEST

40002
40004

110412
000205

110605
000205

157
THRU

;""

2648
2649

ETC.,

2G50
2651

;""
;-

PO
1'1.1

~'2

2652

;"'

2653
2654

;*
;""

R3
R4

2655

;

~G56

012666

2657

0-12666

2658

110412

;

R5
.. ,j<

ETC.,

ETC.

DATI\ I.,RlTTEN 0\ TO~ OF ruT BY
DATA READ FI~Q;" r,'u;:o",y O'.lAS).
ADDRess OF

005736

012672
012b74

0001E7

000060

012700
012704
012710
012714
01272Q

0~27C3

110412
000;'205
110605
001506

JSR

2565
2666

2672
2673
2674

:2675
2676

012704
Oi27(0
O~4467

DID9L:

• \,. JRD

RS,
3

JMP

TST23

MOV
r,:CV
f.leV

JSR

010322

15:

MO'';

01:;'7~2

010~'2

2":

rl"lev

012724
012726
012720
01:2732

0045<;2
012201
0;.>0001
'2014C5
Cr.,47f7

OO~>,22

012740
Q1274.:'i
012745

004767

006674

012734

JSR
Mev

crl'P
64$:

000021

(SHOULD BE).

""1-""""""''' * ....... "" '",. .. * .. * "',. .. '" * .... "' "'''' * ... "'''' ** "'''' "'"'

$SCOPE

SEQ
J5R
JSR

,,11041
#205,
H110605.QJ
R4,
:!'.J.I~,lM
R3,
(R2)+
R4,
RS,

(R2)
'-( P.2)

(R2)+,
RO,
65$

PC,
PC,

• wORD

SPRNT3
~ERt:(CR

TO SCQ?E ROU TINE .
SLOCK SIZE OF 2 WORe.:;
; REQuIR:'..D FOR THIS TEST.
;SKIP TO NExT TEST i'JHEN LESS THAN ONE BLOCK
; AVA!LABLE FOR TEST.
;GEl 'r,:JV8 F4.(R2)' INSTRUCTION (lUT).
; GET I RT S R5'
;5£T U? SIB DATA AFTER EXECUTION.
;INITI;,.LIZE THE '''lEi,lORY ADDRESS POINTERS.
;PUT IUT INTO fiRST LOC OF BLOCK.
;?UT 'RTS R5' FOLLOwING ruT.
; GO EXECUTE THE rUT.
;GET THE DATA FROfit THE MEM ADR UNDER TEST.
: CO\1PM~E THE: CHEC~ WORD l'nTH THE DATA READ.
; SRANCH OVEP ERROr< CALL I F GOOD DATA.
; SET UP VAL:.JES FOR ERROR PRINTING.
;,p';" ERROR H * (GO TYPE A MESSAGE)
; ERROR TYPE CJOE.

65$ :

012746

0: 0322

MOV

'1677

O~2750

012752

030502
001363
0{;4767

8NE

R3,
R5,
2$

2678
2679

JSR

PC,

MMUP

012754

IUT

205).
8IT tM,SI(.

~ .... " " ' .. " " ' , . -".,. "" '" *-,. .... "' ... ,.".

Tq22:

004567
000003

THE

INSTf~uCTION

RTS ns
BLOC\<,

2659

2667
2668
2G69
2670
2671

co'nENTS OF MEMORY LOCATION
AFTER INSTRUCTION EXECUTION

2645
2646

2660
2661
2662
2663
2664

BIT
002224

CZOMCFO
0-124K l'.-'Et'WRY EXERCISER,
CZQMC:F.Pl1
14-FEB-78 08:19

(R2 )+

; PUT THE lUI INTO THE NEXT LOCATION.
; CHECK FOR END OF A BLOCK.
;BRANCH IF f.-ORE IN CURRENT BLOCK.
; FIND NEXT BLOCK AND LOOP TO 1$.

MACY1130A(1052)
20-FEB-78
07:56
PAGE 57
EXECUTE DATI, DAT08 (HIGH BYTE) THRU rJ1EMQRY.

16K VEK
T23

; ;,.. "" ~,. '" ~,.,. .,* "". ","" "'* * 1<"" "- '" '" ~ '" "'* * '" '" ~,..,. "-,.-",,. '" "*,.",, *10 ",* "'* ", .. "',.,. .. '"* "'* ","" **

26BO
2681

oj<

;"'TEST 23
EXECUTE u~T1, DATOS (HICH BYTE) THRU MErllC'RY.
;*
EXECUTES THE INSTRUCTIG~ 'f,lOVS R3,-(R2)' THROl:GHOUT MEMORY.
t.N 'RTS RS' (CODE 205) IS PLACED ArTER THE '\~OVB' INSTRUCTION TO RETURN
CONTROL TO THE MhIN PRGGRAr.1 FOR INSTRUCTION EXECUTION CHECKOUT.
; ..
THIS IS AN EXAMPLE OF wHAT THIS TEST DOES IN b:ELATION TO MEMORY:

2682
2683
2684
2685

;'"

2686

;.
;,.

MEIJlORY

2688

;...

LOCATION

2689

2690
:'691
2692

;'"

2G87

;*
; '"
;.

2E93

2694
2695

;'-'1-

26')7
2698

;~-

cmnENTS OF MEMORY LOCATION
AFTER INSTRUCTION EXECUTION

40000

1103.12

40002

000205

161342
000205

2ND PASS
THP.U T ES T

40002
40004

110342
000205

161342
000205

ETC.,
RO

269!?

INSTRUCTION
PLACED THERE

1ST PASS
lHR'J TEST

;.
;
;

2696

ETC.,

ETC.

OA'
'.!RITTEN or! TOP Or ruT BY
DATA ,~EAD FRC,,'1 ;.'_cr'.:OF;Y (\\'AS).

THE rUT

(SHOULD BE).

2700
2701

2702
2703
2704

2705
2706

01:2150
012760

004567

2707

012764

000003

2708
2709

012766

De01E7

000064

C12772

0127C3
0127C4
0·,27(0

110342
000205
161342

Ot.'4~£7

001414

2710
::711

2712
2713
2714
2715
2716
2717

2718
2719
2720
2721
2722

2723
2724
2725
2726
2727

2728
2729

SEQ 013B

EXEC!....'TE D:.TI. [J>'.-;-OS (lC'~! BYTE) TH;U r,1E-, . ~QRY.
~:)(~Cl.JH:S THE H'SfRUC:TICN
'i.~:J\J3 R4
r·:2) I THRO'~(,HOUT MEr,1ORY.
;... ~ 'RT$ I~£,'
2CS, IS hACE.D
,'HE '1.1CVB' INSTRUCT ION TO RETURN
C.O-EROL Te.'
f\'lAI"'l F-RCGf;;A~,l FOR INSTRUCTl::::N EXECUTION CHECKOUT.
THiS IS M; (XM;Pl,E rF WHAT THIS TEST DOES IN .~ELATION TO r,1EMORY:

2633
2634

:2537

2C-FEB-7H
07:S5
P~GE 56
(LOw GYrE) H--IRU MEMORY •

MASYi!
EXECJrc

012776
013J02
013;:05
013012
013C14
U1J016
01::'C22
013C24
013026
013020
013032
01303G
0 1 ?O,~::!
013C4":
OLQ'~':;

0130l,C
013050
013052

005644

0103:;'2

JMP

TST24

Mev
Mev
JSR

177776

005324
006576

R5,

MOV

1 $:
2$:

O~0412

0C'4::'f2
O()53C2
0·,2201
0200e1
CG14Cs
CO-l7E,7
0047' 7
000021

DID9H:

JSR
.wORD

645:

Mev

li"110342.R3

1/205,
P";
11161342, RO
R4,
INrn.'<M

d::-q

R3,
14,
RS,

DEC

R::!

l\',OV
CfV:P
8EO

RO,
65$

Mev

JSR
JSR
• ~\'ORD

SSCOPE

(R2) +,

PC,
PC,

(R2
\ R~
-2(R2)

R1
III
SPittn3
S:;RROR

2 WORDS
REOUIRt:D FOR THIS TEST.
SKIP TO NEXT TEST WHEN LESS THAN ONE BLOCK
/Wt.,J LA5LE FSR TEST.
GET ';.:J\.'8 r-3.-(R::)' INSTRUCTIDrJ (lUT).
G~T

'rn3 R5'

SET

SiB

Df\T~

AFTER EXECUTION.

INliIt..llZE THE I,le/DRY AOOR!::SS POINTERS.
PUT rUT INTO FIRST LOC: (F BLOCK.
PUT

' RTS R5'

FQLLOWIN3 IUT.
lUT.
TO MAUT.
FRor,l THE ME~ . l A!)R ur~DER TEST.
CC"IPAtl[ L-!E CHECV. \liORD wITH THE DATA READ.
5R,l..NCH OVEP ERROP CALL IF GOOD DATA.
SET U'-' VAL!JES FOR ERROR PRINTING.
~ .... Ef./;:;>OR ..
(GO TYPE A MESSAGE)
ERROR TYPE CDDE.

GO EXECUTE TH!::
ADJ'JST R2 TO
GET THE DATA

~\OUlT

6S$:
O· 0322
030302
:)::13E.~1

004767

002126

MOV

R3,

(P,2)+

6· T
SNE

RS,

JSR

PC,

2$
MMUP

PUT THE rUT !NTO THE NEXT LOCATION.
CHt:CK FOP. END OF A BLOCK.
BRANCH IF ~.':CRE IN CURRENT BLOCK.
FIND NEXT BLOCK AND LOOP TO 1$.

SEQ 0139

CZOMCFO

CZQr.lCF.Pl1

0-12<iK rJEMCRY EXERCISgR,
14-FEB-78 08:19

2730
2731
2732
2733

MA~Y11

30A(1052)
20-FES-78
07:56
PAGE 58
EXECJTE DATI, DAT!P, DATa THRU t"'Er,~~RY.

16K VEl=;
T24

; ;,. ..... ,. .. " .... >if ..

**"'"' .. '" * .. "''''''''' "''''''''' '" '" "''' "' .. "' ..

:
:
:
:
:
:

2740
2741
2742
2743
2744

..
..
..
..,
.

:
:
:

2751

2752
2753
2754
2755

,5T

40000
40002

00541:2
000205

172366
000205

:2~~D PASS
THRu TEST

40002
40004

005412
000205

172366
000205

013056
013056
013062

i"
;...

f\2
R3

;...

R4
R5

"' .... "'''
TST24:
~045€7

005546

000003

G13064

oe0167

000060

013070
013074
013100
013104
013i 10
013112
013114
013116
013120
013122
013124
013130
013134
0; 3130
013126

0'27e3
0;2704
012700
004467
0103:22
0,0412
('04542
012201
0;20001
CO 1405
C04767
0047£7
0':;OC21

005412
000205
1723 .. 3
001316

013140

0305('2

013142
013144

001363
004767

PASS

ETC.,

i.oj<

i"
;;

2756
2757
2758
2759

ETC.,

ETC.

DATA hlRITTEN ON TQP OF rUT BY THE
DATA READ FRQr.l MEMORY (WAS).
ADDRESS OF LUT
A.
INSTRUCTION UNDER TEST (rUT).
RTS R5 (CODE 205).
BLOCK BOUNDRY BIT MASK.

2764
2765
2766
'2767

2768
2769

2770
2771

2772
2773

2774,
2775

2776
2777
2778

CZQMCFo
CZQMCF.P"

DIPDO:

JSR
• WORD

R5,

JMP

T5T25

MOV
MOV

11005412, RJ
R4
,,172366,RO
R4,
IN I rrl,M
R3.
(R2)+
R4.
(R2)
RS.
-(R2)
(R2)+,
R1
RO,
R1
65$
PC,
SPRNT3
PC,
SERROR
21

MOV
JSR
MCV
MOV
JSR

1 $:

25:

Mev
C~P

005232
006504

BEQ
JSR
JSR
• 'JJORD

645:

MOV
BIT
BNE
JSR

002034

0-124K r.:EMORY EXERCISER,
14-FEB-78 08:19

$SCOPE

t/2JS.

R3.
R5,

(R2)+
R2

:2$
PC.

MMUP

MACY1130A(1052)
20-FES-78
07:56
PAGE 59
EXECI..JTE DATI, DATI, DATIP. DATOS (LOW ByTE) THRU MEMORY.

16K VER
T25

:'
:
:'
i'"
:
:
:
:.
:
:
:
:

...

2789
2790
2791

.
...

2792
2793
2794

MErv:QRY
LOCATION

oj.", "',;.-'" "'''''' "''''

14224,2
000205

142000
OC0205

2ND pASS
TEST

40002
40004

142242
000205

142000
OC0205

TH~U

; '"

2799

;..

~800

;:,.
i'"

;..

2802
013150
013150

ETC ••

R4
R5

ETC.,

ETC.

DA I .... ~'iR ITTEN ON TOP OF f UT BY THE
DATA READ FRO:'.\ 1\1Ei,mRY (\VAS).
ADDRESS OF LUT jD).TA.
INSTRUCTION U1'-oD=R TEST (IUT).
RTS ~5 (CODE 20S·j.
BLOCI-\ BOUNDRY CIT MASK.

; ; "' ...... "'*'" '" "'''' ...... .f<""'''' *** ..... "' ..... "''''''' .. "' .. "''"''II- K" '"

T5T25:
005454

01315-1

OC45E7
OOOOC3

013156

000167

000060

o13 ~ 62

Q127C'3

013166
013172
013176
013202

0-27CO
OC 44€,7
0103:<2

142242
000205
142000
001224

JSR
• ",'ORO

R5.
3

$SCOPE

2807

DPDSl:

Jil.1P

TST26

MOl'

2615
2816

013204

o 132:}0

Oi;45~2

J~"!

2817
281
2819
2820
2821
2822
2823
2824
2825
2826

013210
013.212
013214
013216
013222

0' 22( 1

Mev

O~,OOOl

CW.P

1I142242,K3
#205,
R4
1;142000,RO
:"lI TMrll
R4.
I, R2)+
R3.
.~4 ,
(R2 )
-( R.2)
R5.
(R2)+ •
R1
R,
RO.

BEQ
JSR
JSR
.1A:0RD

PC.
PC.
21

SPRNT3
$ERRDR

R3.
RS.
2$
PC.

(R:: )+
R2

013226
013230
Ci 3.230
01223~

013234
ot 3236

O~27C4

!'.~OV

t S:
25:

0',0412

DC 14(5

0047(,7
00476,

005140
006412

64$ :

C~ 00..:'

CONTENTS OF MEMORY LOCATION
AFTER INSTRUCTION EXECUT ION

40000
40002

: '"

'2801

INSTRUCTION
PLACED THERE

1ST P/\SS
THRU TEST

2795
2796
2797
2798

2827

;PUT THE lUT INTO THE NEXT LOCATION.
;CHECK FOR END OF A BLOCK.
;BRANCH IF I\,'ORE IN CURRENT BLOCK.
; F I NO NEXT BLOCK AND LOOP TO 1 $.

:>Io.TEST 25
EXECUTE DATI, DATI. OATIP. D"TOB (LO~I 9YTE) THRU MEMORY.
;.
DECUTES THE INSTRuCTION 8ICB (R2)+,-{R2)' TH;::OuGHOUT MEMORY.
; ....
AN 'RTS R;:' (CODE 205) IS PLACE!) AFTER THE BICB' INST;:;!UCTIQN TO RETURN
;'"
CO~HROL TO THE rJLUN PRCGRAii\ FOR INSTiWCTIDN EXECUTION CHECKOUT.
:'"
THIS IS AN EXAMPLE OF WHAT THIS TEST DOES IN RELATION TO ME~ORY:

27a7
2788

; GO TO SCOi'E ROUT INE.
;MWIMUM BLeCK SIZE OF 2 'fiORDS
; REQUIRED FOR THIS TEST.
; SKIP TO NEXT TEST WHEN LESS THAN ONE BLOCK
; ;'VAI LABLE FOR TEST.
;GET 'N:;G (1'2)' Ir.STRUCTION (lUT).
;GET 'RTS R5'
;5ET ur> SIB DATA AFTER EXECUTION.
; INITIALIZE THE MEMORY ADDRESS POINTERS.
;f::UT IUT IWO FInST LOC OF BLOCK.
;PUT 'RTS R5' FOLLOWING IUT.
: GO EXECUTE THE rUT.
;GET THE DATA FRm~ THE MEM ADR UNDER TEST.
;CO;,lP'!"RE THE CHEC, WORD I'!ITH THE DATA READ.
;6RANCH OVEr ERROR CALL IF GOOD DATA.
:5ET UP VALt.:ES FOR ERROR PRINTING.
; ..... ERROR "'u (GO TYPE A MESSAGE)
; ERROR TYPE CODE,

; ; "' ..... ", .. , "'..,'" *"'. "'~"'''-'' "'~' . . . . ** ,."'* * .. "" "' .. '" ", .. * .. ". *"- ...... *"' .. '" "' ... "'''' .. * "''''

2784
2785
2786

2812

(SHOULD BE).

6SS:

0,0322

2779
2790
2781
2782
2783

2813
2814

IUT

ion

27GO
2761
2762
2763

28"

>I<

CONTENTS OF MEri.JRY LOCATION
AFTER INSTRUCTION EXECUTION

THR.U TEST

;110

INSTRUCTION
PLAcED THERE

MEMORY
LOCAT ION

2745
2746
2747
2748
2749
2750

2808
2B09
2910

>1< .. '"

;dEST 24
EXECUTE J.l.TI, DATIP, DATD THRU MEr,mRY.
:,.
ExECUTES THE INSTR;.,'CTICN 'NEG (R2)' THRCUGHO'.;T ~:'EMQRY.
AN 'RTS R5' (COC:: 205) IS Pl..ACED AFTER jH~ 'r~::G' I","STRUCTION TO RETURN
:* CONTROL TO THE MAIN PROGRA;,1 FOR INSTRUCTION EXECUTION CHEOiOUT.
;.
THIS IS AN EXAMPLE OF WHAT TH!S TEST DOES IN RELATION TO MEMORY:

2738
2739

2805

;'"

2734
2735
2736
2737

2803
2804
2805

SEQ 0140

>1< .. , . , . " ' , . ...... '" '" '" "'-. . . . . '" ...... " ' ' ' ' ' ' " ' , .

MOV
JSR
MQV

Mev

65$

JUT

>I< .. ,. ....

(SHOULD BE).

*,. .. >I .. *'" '" "' .... *'" ** ** .. '"

GO TO SCOPE ROUT INE.
M 1 ~~ I ;>'1 Ui;l BLeCK SIZE OF 2 WORDS
REQuIRED FOR THIS TEST.
51-\ I P TO NExT TEST ~JHEN LESS THAN ONE BLOCK
AVA I LABLE FOR TES T •
G!:.T :'lCB (r'2)+,-{R2) , INSTRUCTION (JUT).
GET ' RTS R5 t
SET UP 5/ B DATA AFTER EXECUT ION.
INITIALIZE THE MEMORY ADDRESS POI NTERS.
PUT IUT INi'D F I ~ST LaC CF BLOCK.
PUT"RTS R5 ' FOLLO'IJING IUT.
GO EXEC-HE THE rUT.
CET THE OA It. FRG'I'l THE MEM ADR UNDER TEST.
CO:.-1PARE H-IE CHeCK v,'ORD WITH THE DATA READ.
BRANCH OVEr. ERROR CALL IF GOOD DATA.
SET uP VALUES FOR ERROR PRINTING.
ERROR 4<..,'" (GO TYPE A MESSAGE)
ERROR TYPE CODE.

K"'"

65$:

Mev

010322
O:;05( 2

BIT
BJ;~

CO 1363
DC 4707

001742

JSR

MMUP

PUT THE IUT I ~JTO THE NEXT LOCAT ION.
Cf-!ECK FOR E~D OF A BLOCK.
BRA\lCH IF ro'ORE IN CURRENT BLJCK.
FIND NEXT BLDCK AND LOOP TO 1 $.

SEQ 0141

CZOMCFO
0-124K I\~EI\olORY EXERCISER,
CZOMCF.i'11
14-FEB-78 08:19

2973
2874
2875
2976
2877

;.
;
;..
;.

2920

2925
2926
2927
2928
2929
2930
2931
2932
2933

: '"
; '"

R1
R2
R3
R4
RS

; >iO

013242
013242
013246

40002
40004

152212
000205

157212
000205

ETC ••

ETC.

DATA \vRlTTE"I ON TOP OF IUT BY THE lUT
DATA nEAD FROM MEMORY (WAS).
ADDRESS OF IL:T/SATA.
INSTRUCTION wm::R TEST (IUT).
RTS R5 (CODE 205).
8LOC~; BOUNr.~Y BIT MASK.

(SHOULD BE).

; : .... * ............. * ..... ,. .... *** ........ "'.,. *. ** >I< **."'''*.JI, ** ... **** ..... *."''''''' .... **'''*.*.

T':"T26:
004S€7
000003

005362

013250

C00167

000062

013254
013260
o i 3264
013270
013274
013276
013300
013302
0' 3304
013306
013310
013312
013316
013322
013324
013324
013326
013330
013332

0127C3
0127C4
O~ 27CO
OG4467
010322
OJ 0412

152212
000205
157212
001132

DPDBH:

15:
2$:

0045~2

005302
01.2201
020001
001405
004767
004767
000021

005044
006316

64$:

JSR

R5.

. ~:JRo

$sCOPE

JMP

TST27

MOV
MOV
MOV
JSR
MDV
MOV
JSR
DEC
:\10V
CrJ.P
SEQ
JSR
JSR
.wDRD

N152212.R3
#205,
R4
H157212.RO
R4,
IN~TMM
R3.
(R2)+
R4.
1 R2)
R5.
'-IR2)
R2
(R2)+.
R1
RO.
R1
65$
PC.
SPRNT3
PC,
SERROR
21

;GO TO SCOPE ROUTINE.
;MINIMU:A BLeCK SIZE OF 2 WORL";
REQUl REO FOR THIS TEST.
;SKIP TO NEXT TEST WHEN lESS THAN ONE BLOCK
AVAILABLE FOR TEST.
;GET '8lsa (R2)+.(R2)' INSTRUCTION (lUT).
;GET 'RiS RS'
;SET UP S/8 DATA AFTER EXECUTION.
; INITIALIZE THE MEMORY ADDRESS POINTERS.
; PUT IUT INiO FIRST LOC OF BLOCK.
;PUT 'RTS R5' FOLLOWING IUT.
; GO EXECUTE THE lUT.
: RES£T R2 TO POINT TO IUT.
;GET THE DATA FROM THE MEM ADR UNDER TEST.
;CO',!PARE THE CHECI-: WaRD WITH THE OATA READ
i8RANCH OVER ERROR CALL IF GOOD DATA.
i SET uP VALUES FOR ERROR PRINTING.
; . . ,. ERROR *** (GO TYPE A MESSAGE)
;ERROR TYPE CODE.

MOV

R3.
R5.
2$
PC.

: PUT THE IUT INTO THE NEXT LOCATION.
; CHECK FOR END OF A BLOCK.
; BRANCH IF t/ORE IN CURRENT BLOCK.
; FIND NEXT BLOCK ANO LOOP TO 1$.

65$:
0103:2
030502
C01362
004767

BIT
BNE
JSR

001646

(R2)+
R2
MMUP

16K VER
MAf":Y 11 30A (1052)
SE..CTlDN 4:1'.105 7ESTS

20-FEB-78

07: 56

PAGE 61
SEQ 0143

.sBTTL SECTION 4:M:JS TESTS

; ; * .......

,,!

*****-1 "'*'" "'"."' .... 01' ... ~ ",,, • • 1<. '" '" *""* JI,':'", ****'" ••• * ....... *"'* "'** .... '" "'*

;"TE.ST 27
MARCHI:-J8 1'5 A;&D 0'5.
;* ThIS TEST IS DESI,NEC- TO STRESS ~v10S ME~,~O!='IES.
i* STA~TING Al" PiE 30TTcr~ ADDRESS A:~D ADDRESSING l.;PWARDS A 4K BANK IS
i '" ~:RI T T EN WI TH 000377. Tr.EI'< START! NG AT THE TOP AC,DRESS OF THE BANK THE
i~ 000377 IS F:EAD, THE SyTES A?E S,·:,1.PPED TO 177400 AND THE LOCATION
;'"' REREAD -0 CONFIRM THE WRITE, THIS IS REPEATED F:JR EVERY LOCHION
i:j. ·,\CD;(f.SSED [·O\llt~.'iARD U.\:T!L THE SOTTm1 IS REACHED, STARTING AT THE
;,. BOTT8M [AC~' LDCATIO~ IS RD.D FOR ~774)0, THE BYTES ARE 5\'JAPPED TO
;'"' 0;j2,77 AND REREAD 70 CO!"F!R~~ THE WRITE U:... TIL THE TOP ADDRESS OF THE
i~ G,',~·a\ IS REACHED. A'3AIN STAI:("!"!NG AT THE BOTTOM EACH LOCATION !S READ
:'" FC~ 000377.TI'IE BYTES .s,~APPED TO 177400 A':O THE LOCATION REREAD TO
;* CCW1RM THE \':'dTE. L,\STL: STARTING FRO:v1 THE TOP AND ADDRESSING DOWN:* \'.ARO EACH LOCATION IS R~AO.THE eYTES SWAPPED TO 000377 AND THE
:* LOCATION IS REREAD TO CONFIRM THE wRITE. THIS IS REPEATED FOR EVERY
: ""4K B"\"IK UN:)E.R TEST.
;.
;'"
RO=DATA WRITTEN INTO MEflt.GRY(SHOULD BE)
;'"
Rl=DATA READ FRQr.'i r.1E;,~Gl{Y(\oJAS)
;,.
R2=V IR,UAL AODRESS
R3=TIiIlES THROL:GH CGUNTER
;...
;*
R4=NOT USED
:'"
R5=BLOCK BOUNDAI\Y SIT MASK.

21:383

2921
2922
2923
2924

ETC ••

; '"'

i"
;..

2894
2885
2686
2887
2888
26B9
2990
2891
2892

~909

2ND PASS
THRU TEST

2B78
2B79
:2880
2B91
2B92

2910
2911
2912
2913
2914
2915
2916
2917
2918
2919

SEQ 0142

CZQMCFO
0-124K MEMORY EXERCISER.
CZQMCF.Pl1
14-FEB-78 08:19

2693
2894
2895
2896
2897
289B
2899
,2900
2901
2902
2903
2904
2905
2906
2907
2909

*. "' ........

*'" '"

2839

:l872

MA:Y1130A(1052)
20-FEP.-78
07:56
PAGE 60
EXECJTE DATI, DATI, DATtf), DATOS (HIGH BYTE) THRU MEMORY.

; i,. ... " 4- ... '" '"
4->< ** ...... ,. "'. ~ "'.,.. ••• ,. ",.o >1<:10 .. ""*.t>l." '" '" **.o "' •• "' •• *
;,.TEST 26
EXECUTE JATI, DATI, DATI?, DATOO (HIGH BYTE) THFW MEMORY.
iJl,
EXECUTES THE IN$TRUCTICN '8ISS (R2)+,(R2)' THROuGHOUT MEMJRY.
;* AN 'RTS RS' (CODE 2(5) IS PLACED AFTER THE 'SIsa' INSTRUCTION TO RETURN
i"
CONTROL TO THE MAIN ~RCGfi.AM FOR INSTRUCTION EXECUTION CHECKOUT.
:'"
THIS IS AN EXAMPLE C~ .... HAT THIS TEST DOES IN RELATION TO MEMORY:
; ~.
;.
MEMORY
INSTRUCTION
CONTENTS OF MEMORY LOCATION
;.
LOCA. TI ON
PLACED THERE
AFTER INSTRUCTION EXECUTION
;.
;.
1ST PASS
40000
,52212
157212
;. THRu TF .....
40002
00020~
000205

2929
28:29
2830
2831
2832
2833
2034
2935
2636
2837
2838
2840
2841
'2842
2843
2944
2945
2846
2847
2848
2849
2850
2851
2852
2853
2854
2955
2956
2957
2858
2859
2860
2961
2862
2863
2864
2865
2B66
2B67
2868
2869
2870
2871

16K VER
T:26

: ; *'"

013336
013336
013342
0' 334~
013350
013354
013356
013362
013364
013366
013370
013372
013374
013375
013':;02
013406
013410
013410
013412
('13414
013·; 16
013420
013422
013426
013432
0'3434
01343-.+
013-436
0134 .. 0
013442
013446

>1< . . . . . . .

TST27:
004567
OOOOCO
CC44E7
O· 02E7
005003
0'·2700
O.00:L2
030502
001375
O~ 4201
020001
CO 1405
0')47€7
0(;47€.7
000010

005266
001055
166240

1$:
000377

25:

BIT
35:
004764
006232

64$:

65$:
4S:

0[·0300

o· 0012
.:J ~ 1261
020CC1
CD I 4(.5
004767
OC.4767
0:,0010

** •• "' "'.'" .",*JI,""" ",,..,,, .. JI,* "''''.''',. * ••• ,. ****"'* * "'* . . "'. "'.*.>11. * ••• "'* ••

JSR
• wORD
JSR
MOV
CLR
MOV
MOV

004740
006206

66$:

BNE
MOV
CN"P
BEQ
JSR
JSR
.wORD

$SCOPE
R5.
0
INITMM
R4.
R2, TEMP
R3
#000377, RO
RO, (R2)+
R5, R2
2$
-(R2). RI
00.
R1

655
PC.
PC.
10

SPr~NT2

SERROR

SWAB
MOV
MOV
CMP
BEQ
JSR
JSR
.Y.'ORD

RO
RO .IR2) : WR ITE
1 R2). RI
RI
RO.
67$
SPPf'.IT2
PC.
PC.
SERROR
10

SwAP
TS I
BEQ
CMP

RO
R3
5$
R3,II3
6$

;GO TO SCOPE RQUTINE.
;NO MINIM'J~.1 BLOCK SIZE REQUIRED THIS TEST.
; INITIALIZE THE IvlEMORY ADDRESS POINTERS.
;SAVE BANK STARTING ADDRESS
; CLEAR PASS COUNTER
; SETUP TO WP ITE PATTERN
: .... RI TE PATTERN
; END OF 4K?
: CO:--lT WUE WPIT ING I F NO.
; GET :)ATA IJJPITEN
: CO .•;PARE THE CHECK :.>JORD vJl TH THE DATA READ.
: BRAf-JCH OVEn ERROR CALL IF GOaD DATA.
: SET UP VALUES FOR ERROR PRINTING.
;"'* ... ERROR ,.*'" (G0 TYPE A MESSAGE)
:ERROR TYPE CODE.
: S....IAP bYTES OF DATA
. .~JRD
;GET DA lA i>!:'ITEN
; CC',:PARE THE CHEC~. WO~D WITH THE DATA READ.
: BRANCH O'lE~; ERROR CALL IF GOOD DATA.
; SET UP VALJ='S FJR ERROR PRINTING.
; ~ * '" ERROR ... ** (GO TYPE A MESSAGE)
; ERRQR TYPE C:JDE.

S\'IAPPE~

67$:
0(.'0300
005703

001403
020327
001010

000003

B~E

PUT

~AT A

BACK TO ORINGINAL

IF ON PASS a OR PASS 3
WE ARE AL::D?ESS I:-.IG DO~N
IF ON PASS 1 OR 2 GO TO
UPWAPf'l

CZQMCFO
Q-1241< r.,'EMORY EXERCISER.
CZOMCF.P1114-FEB-780e:19
2934
2935
2936
2931
2938

2939
2940
2941
2942
2943

2944
2945
2946
2947
2948
2949
2950

2951
2952

2953
2954
2955
2956
2957
2958
2959
2960
2961
2962
2963

013450
030502
C134520C1346
013454
005203
013456
022703
013462
001427
013464
000300

2979
2980

2981
2982
2983
2984
2985
2986

2987
2988
2989

BR
INC
SWAB
CMP
BNE
MDV
BR
JSR
JSR

4$
R3
RO
R3. #2
3$
TEMP. R2
7$
R4.INJTMM
PC.MMUP

; INCREMENT
PASS COUNTER
; SET UP NEw READ h'ORO
; ADDRESSING UP?
: I F NO GO TO DOWN SEQUENCE
; I F YES RESET ADDRESS TO START
: GO TO UP SEQU",ICE
; INITlAI,.IZE MEMORY AODRESS POINTERS
;UPDATE TO NEW BANK IF e,XISTS

062702
0'::'0502
OC1411
011201
020001
001405
004767

0046: 1

004767

006122

000002

BIT

166054

9$:

(R2). Rl
RQ.

69$

PC,

SPRNT2
$ERROR

pc.

"'>1' • •

"''''.'''.'''*'''.'''lI<'''.

RO=DAU. WRITTEN INTO MEMORY(SHOULO BE)
Rl=OATA REAO FROM MEMORY(WAS)
R2;::iRTUAl. ADDRESS
R3=SMA~\.. LOOP COuNTER FOR STALL
R4=Nut,1aER OF TIMES SMALL LOOP DONE
R5'~BLOCK BOUNDARY aIT MASK.

i"
;'"
;..
:'"
:...

; ; •• * •• "' .............. * ••• * "'*"' •••••• "' .... "' ••• * ...... *•• "'* ."' ............ '" ......... .
013552
013552
013556
013560
013564
013570
013572
013574
013576
013600
013604
013606
013612
013614
013616
013620

013622
013626
013632
013632
01 ;3634
013636
013640
013644
013650
013652
013652
013654
013656
013660

rST30 :
004567
QOOOOO
0044':7
0, 2700
010022
005100
030502
OC1374
004767
0('15003
0127(;4
005303
001376
005304
001374

005052

JSR
.WORD

000642
125252

JSR

BOT

004467
012700

8NE
JSR
CLR
MOV
OEC
BNE
DEC
BNE

001400
000Q46
2$:

16K VER
T30

000600
125252

$SCQPE
INITMM

MOV
MOV
COM

15:

R5.

R4.
11125252
RO
RO
R5.
1$
PC.
R3
#46.
R3
2$
R4

.Ro

• (R2)+
R2
MMUP
R4

: GO TO SCOPE ROUTINE.
: NO MINIMUM BLOCK SIZE REQUtRED THIS TEST.
; INITIA~IZE THE MEMORY ADDRESS POINTERS.
;SETUP OATA PATTERN
;WRITE A W'JRO
;CCr.,PLEMENf DATA
; CHECK FOR END OF A BLOCK.
:eRANCH IF f.l.ORE IN CURRENT BLOCK.
;FIND NE~T BLOCK AND l.OOP TO 1$.
; SET uP COUNTER FOR STALL
: 00 LOOP 46 TIMES OR 2. SEC. TOTAL.

MACY11 30A (1052)
20-FEB-78
07 :56 FAGE 63
WRn;; CHECKERBOARD STAR" ING WlTH '125.52' DATA.
oJSR
MOV

R4.
INITMM
#125252 •• 0

; INlTIAL.IZE THE MEMQRY ADDRESS POINTERS.
; INlT DATA FOR CHECKING

MOV
CMP
BEQ
JSR
JSR
.WORD

( R2)+.
RO.
65$
PC.
PC.
6

:GET THE DATA FROM MEMORY UNDER T~ST.
: COMPARE THE CHECK WORD WITH THE DATA READ.
; BRANCH OVER ERROR CALL IF GOOD OATA.
; SE;T UP VALUES FOR ERROR PRINTING.
ERROR ** . . (GO TYPE A MESSAGE)
;ERROR TYPE CODE.

COM
BIT
BNE
JSR

RO
R5.

WRITE CHFCI'.ERSOARD STARTING WITH 052525 OAT A

004740

JSR

00Q530
052525

JSR
MOV
MDV
COM

$5COPE
R5.
0
INlTMM
R4.
11052525, RO
RO.
(R2)+
RO
R5.
R2
1$
PC.
MMUP
R3
1146.
R4
R3
2$
R4
2$
R4.
lNllMM
>052525. RO

3$:
012201
020001
001405
004767
004767
000006

004522
005770

64$:

SPP.NT2
$ERROR

: "'*.

65$:
0051 CO
030502
001365
004767

001320

3.pc.

; : .. '•••••••• *",. *.,.. .... >11*. >II,.
: I!<TEST

MMUP
Ii: • • " ' .

; CHECK FOR END OF A BLOCK.
; BRANCH I F ""ORE IN CURRENT BLOCK.
; FIND NEXT SLOCK AND LOOP TO 1$.

* .. * •••• ** *' "' ... * '" '" >1<. "' .. *"'.4o" ** ................ '"

; ; .** ........ "'."' ......... ** ... '" ............................ "' ........ "'''' "' ........................
013664
013664
01367(1
013672
013676
013702
013704
o t 3706
013710
013712
013716
013120
013724
013726
013730
013732
013734
013740
013744

3033

68$:

000002

000660
001432

BEQ
MOV
CMP
BEQ
JSR
JSR

7$:

; : "'."''''''' . . "''''''' '" ~ ... 111."' ..... "' . . "' ........ >t*. "'''' **"'**'*** •• "'''''''.

3026
3027
3026

.3034
30:;!5
3036

9$
RO
7$
112.R2
R5. R2

;.TEST 30
WRITE CHECKERBOARD STARTING WITH !12;252 1 OATA.
; .. THESE TESTS WRITe A CHECKER90ARD THROUGHOUT MEMORY, STALL
;* FOR 2 SECONDS THEN C!':e(;K PATTERN TO VERIFY DATA 010 NOT
;~ DETERIORATE BETWEEN RE.FRESH CYCLES.

o t 374A

30~9

SEQ 0144

OC0733
005203
000300
0::0327
0(,11316
016702
OG0757
004467
004767

013470
013.tl74
013476
013500
013502
013504
013506
013512
013516
013520
013520
013522
013524
0135:26
013Ei32
013534
013540
013542
013546

3025

3030
3031
3032

6$:

BNE
!NC
eMP
BEO
SWAB'
BR
ADO

R5.R2
3$
R3
f/41 R3

PAGo 62

• WORD

000404

CZOMCFO
0-124K MEMORY E)(ERCI SER.
CZOMCF. P11
, 4-F I;B-78 OS: 19
2990
2991
2992
2993
2994
2995
2996
2997
2998
2999
3000
3001
3002
3003
3004
3005
3006
3007
3008
3009
3010
3011
3012
3013
3014
3015
3016
3017
3018
3019
3020
3021
3022
3023
3024

BIT

07:56

000010

013466

2971

2978

5$:

000004

2964

2977

MACYl1 30A(1052)
20-FEB-7B
MARCHING I!S AND OIS.

: DONE A PASS?
: IF NO CONTINUE
;IF YES INC~EMENT PASS COUNTER
: ARE 'tJE DONE ALL PASSES FOR THIS 4K'?
; I F YES 6RMJCH
; ELSE SET UP NEw READ WORD
:GO TO START OF AQDRESS UP
:UPDATE TO NEXT AODRESS
: OONE A PASS
; I F YES BRANCH
;GET OATA WPITTEN
:COMPARE THE CHECK WORD WITH THE DATA READ.
: eRANCH OVER ERROR CA~L I F GOOD DATA.
:SET UP VALU'S FOR eRROR PRINTING.
: "' ... ERROR •• '" (GO TYPE A MESSAGE)
; ERROR TYPE COOE •

2965
2966
2967
2968
2969
2910
2972
2973
2974
2975
2976

16K VER
T27

TST31 :
004567
000000
004467
012700
010022
0051 ;,,'J
030502
001374
004767
005003
012704
005303

1$:

81T
BNE
JSR

001266

cc 1

000046
2S:

0~1376

005304
001374
004467
012700

000466
052525

MOV
DEC
BNE
DEC
BNE
JSR
MOV

; 00 TO SCOPE ROUTINE.
:NO MINIMUM a~OCK SIZE REQUIREO THIS TEST.
;INITIALl,?:E THE MEMQRY ADDRESS POINTERS.
:SETUP DATA PATTERN
lWRITE A wor::o
; CHECK FOR END OF A BLOCK.
; BRANCH I F MORE IN CURRENT BLOCK.
; FIND N!;.XT a~OCK AND ~OOP TO 1$.
; SET COUNTER FOR LOOP
:00 LOOP 46 TIMES OR :2 SEC. TOTAL

; INITIALIZE THE MEMORV ADDRESS POINTERS.
; INlT PATTERN FOR CHECKING

3$:

013762

012201
020001
001405
004767
004767
000006

013764
013764
013766
013770
013772

005100
030502
001365
004767

0137~6

013750
013752
0' 3756

.~ORO

004410
005656

645:

MOV
CMP
BEQ
J5R
JSR
.wORC

(R2)+ •
RO.
65$
PC.
PO.

COM

Rl
111
SPRNT2
HRROR

; GET THE DA TA FROM ME"'O~V UNDER TEST.
;CG:\~PARE THE CHECK WORD WITH THE DATA READ.
; BRANCH OVEP ERROR CALL IF GOOD DATA.
;SET UP VALUES FOR ERROR PRINTING.
i"''''''' ERROR UI!< (GO TYPE A MESS~GE)
: ERROR TYPE CODE.

65$:

001206

BIT

OS.

BNE
JSR

3$
PC.

MMUP

I C;HECK FOR END OF A B\.OCK.
; BRANCH IF MORE IN CURRENT BLOCK.
1 FINQ NEXT B~OCK AND ~OOP TO 1 $.

SEQ 0145

CZOMCFO

0-124K MEMORY

CZO~1CF. P 11

3037
3038

3039
30~0

3041

30';2
S043
3044
3P45
3046
3047
304a
304~

JOSO
;3051
,3052
305'3
3054
3055
3056
3057
3058
305~

3060
3061
3062
3063
30.4
3065

013776
013776
014002
014004
014010
014014
014022
Q 1 4024
014032
014934
014042
014044

l~-FEe"",e

EXERC I SER,
OS: 19

16K VER
DONE;

,JOA(1052)
:29- F EP-78 07: 56 PAGE
RE.1.0':ATE PROGRAM AND REPEAT A"L TESTS.

MACV11

004!:j67
OC OQOQ

004629

.SBTTL DONE:
DONE:
oSR

005067

165160

T,T32:

105067
0~S767

165068
164562

165512

001004
036767

164554

1 ~5504

.~'JaRD

1$ :

0OlA3~

0>2777
001031

OO~:,?OO

1650~~

Of.4 76 7

000003

l saS 39
OP0046

~$:

CLR
CLRa
BIT
aNE
BIT
B,Q
BIT
BN[

014052

001013

0140~4

000042

014062
014064
014070

02;l7 37
001416
1 057~7
OC1013

014072
014076

004767
000167

OQ2362
17200.

01410.2
014106
014112
014114
014120
0141 ~O
014124

004767
D057.H
00140;2
004767

002754
000042

OP4567
001201

0073.6

CMP
BNE
CtflP
BEQ
TSTB

001224

81\1
oSR
""MP

3$:

4$:

oSR
TST
BEQ
oSR

5' :

003150

16K VER
DONE:
; ; '" "' .. '" >It

;'INCRE~ENT

3093

3094
S095

3096
3097
3098
3099
3100

014126
0141 :26
014130
014134
014140
914146
0141 ;iO

0141 ::>2
014154
014156
014160
q1416~

014166

014170

160034
160052
1 OO~OO

RES LOR
$PRINT

jGO PRHH OUT THE FOLLOWING ~ESSAGE.
; ADDRESs OF MESSAGE TO BE TYPED

11< ....... II< '" '" "' .... '" '"

"'.11< ... '" '" '" '" "'** ....... "'* oj! '" II! "'''' • • >Ii • • "'''' ... , ..... Ii'''

END OF PASS ROUTINE

NOP
CLR
INC
BIC
DEC

1~5044

005327
SEOPCT I

000001
003040
0127:37
000091
007324

013749
004767
OC4567
0: 427.

177176
01022S
007302

oSR
• WORD

16!i016

C16700
001416

014:?:?2

9(:'4710

O'4:;~4

000240
OJC240
000240
O;l3737
001405
105737
GC 1 002
004767

014250
014254
014254
014260
014266
014274
014:275

; ;VES

; ; R.ESTORE COUNTER

1
R5,
$ENOMG

SPRINT

;GO PRI" OUT THE FOLLOWIN~ MES~~GE.
: ADDRESS OF MESSAGE TO BE TVP~D

$PASS, .... (SP)
; :SAVE 5PASS FOR TYPEOUT
THe. I'jEXT HJ<;I INSTRUCTlQNS PROV{OE AN INTERFACE TO THE $TYP05 ROUTINE
WIHTQUT USING A "TRAP" INSTRUCTION AS CALLED FOR BV **$VSMAC**.
MOV
\llI#PSW.
-(SP)
;PUT THE PROCES~OR STATUS ON THE STACK
JSR
PC.
$T'(POS
;GO TO THE 5U8ROVTJNE

,.3624

0(10005

014226
014230
014232

; ; LOOP?

JSR
.WORD

RS.
$ENUL,

$PRINT

;GO PRlNT OUT THE FO~LOWING MESSAGE.
;AOORESS OF MESSAGE TO BE TVPED

MOV
SEQ

42.
SDOAGN

PC. (RO)

; ;GET MONITOR AODRES.
; ; BRANCH I F NO MONI TOR
: ; CLEAR THE ~oJORLD
; ; GO TO MON ITOR

@1/42,ifolP'46
$OOA5N
@N$ENV

;: APl1
; ; ARE ,,'Je UNDER ACT11 OR XXDP
;:IF ACT11 THEN R':'START
: ;CHECK FOR APT11

SGET42 :

01421 ;;1
014216
014:;120

014240
014242
01':':;246

(PC)+.~(PC)+

I : ZERO THE NUfI18Ei1: OF ITERA nONS
; ; INCREMENT THE P';iS NUMB'R
; ;DON'T ALLOW A NEG. NUMBER

MOV

: ...

014200
014204
014210
01421 :2

• WORD

SPAS.
111000·00, SPA":S
( PC)+
1
SOOAGN

$EOPC;T

004567
0,4260
016746

014174

$TIMES

BaT
r·,1OV
SENDCT: • WORD

0141 SO

3101

3111

PC.
R5,
$CR,F

; RELOCATE p"OGRAM ~ACK TO FIRST ~~.
; TEST FOR
; I F NOT R,
~ NO I,.INDER MON. DONT
;RESTORE L ADERS.

$.OP:
0"'0:240
P05067
005267
0..1;.2767

3102
3103
3104
3105
3106
3107
310e
3109
3110,
3112
3113
3114
3115
3116
3117
3f 18
3119
3120
3121

RElO

THE PASS NUMSER (SPASS)
;.;TyPE "END PA$~ ItXXXXX" (WHERE XXXXX IS A OEC~~AL NUMBER)
;"IF THtRES A MONITOR GO TO IT
;.IF THERf ISN'T JUMP TO START1

3073

3092

PC.

"* "' . . "' ........ >It

.saTTL

3089
;3090
3091

MACYl1 30A(10S2)
20-FEB-78
07:56
PAGE 65
RHOCATE PROGRAM ANa REPEAT A" TESTS.

3070
3071
S072

30BS

nus

a•.

• WORD

3068
3069

3086
3087
308e

; GO TO SCOPE ROUTINE,
;NO MINHt,Uf,' SL.OC;K SIZE Re:QUIR~D
TE~T.
;RESP rTE;RATlON COUNTER FOR RESTARTING n;ST.
; RESET TEST N\JMaER~
PRGtMP, SAVT$T
; CHECK IF PPOGRAM IS IN TEST AREA.
: SR IF IT P~OG IN Me:~ TQ BE TESTEC.
~s
PRGMAP+2. SP.VTST+2 : CHECK HI 64K
$EOP
: SR IF PNOG NOT IN MEM TO aE Tf;STEO.
#5'1107,
f·'sWR
; CHECK fOR INHIBIT RELOCATION SWITCH.
$EOP
;s,op RELOCATION IF SW! TCH S'T.
PRGMAP
k3.
: CHECK IF PfiCGRAM IN FIRST
4$
: 6~ I F NOT IN FIRST 8K.
@N42, ~N~6
i CHECK FOR ACT11
6$
ACTl f •
: SR
: CHECK FOR APT11
"'k$ENV
6$
; IF APT 11 DO NOT RELOCATe:
;r.1UST BE X;(iJP OR STANOALON~
RfLTOP
PC.
:REI..OCATE PROGRAM TO TOP OF MEMORY.
START1
I LOqP BACK AND R~JN ALL TEST$ AGAIN.
$SCCPE

RS,
0
$ TIMES
$TSTWIl

@N4~

o,~

S066
3067

3084

SEQ 0146

ALI- TESTS.

6$:

CZQMCFO
0-124K MEMORY EX.RqS'~'
CzQMCF. Pl1
14-FEB"7B OB:1~

3074
3075
3076
3077
3078
3079
3080
3081
3092
3083

R~~EAT

RELOCA TE PROGRAM AND

REseT

SENOAO:

oSR

NCP
000042

; ; SAVE ROOM
; : F.OR

Nap
Nap
eMP
BEQ

000046

TST~

001 :224
OO,J074

BN.
oSR

$OOAGN

oM"

START1

PC,

;:!F APT11 THEN RESTART
SAVlOR

:: IF xxDP FIRST SAVE MONITOR

$DOAGN:

000167
005015
040520
000
317

171624
047105

020104

0~1523

02,440
000

SENDMG:

.ABCIZ

: : RETURN"'''''''''''

<lS><12>/Ef'JD PASS Ii/

5ENULL: ·.BYTE
-1,-1,0
; ;NULL CHARACTER STRING
.SB:iTL 5U8ROl)TINE AND TRAP ROUTINE SECTION.
~6TTL
MEM8RV MANAGErolE:oIT AND ADDRESSING SUBROUTINES.
; "' ... _ ........ '"' .... ,

,,,.,"" ¥ ....... "',.. ... '" '" ",,,, '" "' ............ "' ...

*" .. ~ **"' ..... * ** "'* "'''' "'''' .......... "'OIl 10*
OJ.

SET UP ALL THE MEM ~;'IGI\IT fiEG!STERS FOR NORMAl. OPERATION.
1HE PROGRt.:,1 IS POINTED TO 5Y PARS 0 AND 1.
THE MEMEiRY UNDER TEST IS POINTED TO BY FARS :2 ANO 3.
THE DE.V~':E ADDRESS AREA IS POINTED TO BY PAR 7.

SEQ 0,47

0-12'lK \'[MOi{Y

.Pl1

,16K VER
MACY1130A(1052)
20-FEB-78
07:56
PAGE 66
ME;110RY MANAGEIV.E.NT AND ADDRESSING SUBROUTINES.

14-rE8~'H3

; ..

3122

PARS 4,

M~O

SEQ 0148

5 ARE UNUSED.

3123
3124
312S

:3126
3127
3128
3129
3130
3131
3132
3133

3134
3135
3136
3137
3138

MMINJT:

01,1300
o1 ~300
014306
014314

012737
012737
012737

077406
077406
077406

1723"0
172302
172304

r,lOv

012737

077406

172306

014330

OC5037

014334
014340

005037

172310
172312
172314
0'17405

172316

MOV
CLR
eLR
CLR
MOV

,72342

CLR
MOV

014322

CC5037

014344
014352
01435'.3

012737

014370

005037
005037

172340
000200
1723 l 1
i 72346

005037
DC 5037

172350
1/2SS2

o 1·~36·4

3139
3140

014404

3141
3142
3143
3144
3145

014416

005037
012737

014410

012737
000207

014424

CLR

CLR
CLR
CLR
ClR

172354

007600
000001

11200-1 »400+UP+R\>J,@IJKIPORO
11200-1 "400+UP+R'JJ,@lrlKIPDR1
1120Q-l.+<40Q+UHRloJ,@IIKIPDR2
11200-1 ~ 4 OO+UP+R\v ,@I#KI PDR 3
@#KIPDR4
@II'KIPDR5
@lrlKIPDR6
11200-1 -t.o!lOO+UP+RW ,@#KIPDR7
@lIlKIPARO
;MAP PARO I NTO
#200, @IIKIPAR1
;MAP PAR1 INTO
@#KIPAR2
;MAP PAR2 INTO
@lIiKIPAR3
@IIKIPAR4
@IfKIPARS
@IIKIPAR6
11'7600, @LIfKIPAR7 ;MAP PAR7 HHO
111.
iPll'SRO
; ENABLE MEMORY
PC
; RETURN

MOV

MeV

MOV
MOV
RTS

172356
177572

;SET
;SET
;SET
;SET

KIPDRO :; RW UP
KIPDRl :z: RW UP
KIPDR2 ,. RW UP
KIPDR3 '" RW UP

200
200
200
200

BLOCf(S
BLOCKS
BLOCKS
BLOCKS

;SET KIPDR7 .. RW UP 200 BL.OCKS
BANKO
BANKl
BANKO

110 BANK
MA~;I),GEMENT

: .... "' .. "' .... **.;. ~ .. " ..-** *"'« Of. "' .. "' .. '" *'" ¥ "'''' ..... * '" ** . . '" "'''''"'''* "' ...... ** • "''''''' .. * ......... "'*

3146

r~EMORY

ADDRESS POINTER

INITIALIZATION ROUTINES.

3147

3148
3149
3150
3151

3132
3153

3154
3155
3156
3157
315B
3159
3160
3161
3162
3163
3164
3165
3166
3167
3168

3169
3170
3171
3172
3173

3174
3175
3176
3177

012767
005067

014426
014434
014·1·10
014.142014_146
014452
014454

00000 j
, 651 06

16~ 11 0

016705
0(,5767
CO 1514
005037

165140

014·~60

012702

172344
040000

0367(7

165054

01~~72

001015

0;4474

036767

165046

01q502
01 <1504

001011
062737

000200

0063E7
006167

MOV
TST
BED
CLR

164134

014464

014512
014516
014522
014524
01.:)526

r.lov
165036

001004
036767
Oc, 1 405
0'6705

014536

o 1 ~544

0145·~6

01.:)552

042767
013737
0" 6767
016767
032705
001505
062737
006367

014560
014566
014574

014602
014606
014610
014616

3179
3180
3181

01..JG30

3182
3183
3184
3185
3186
3187

3188
3189
3190
3191
3192
3193
3194
3195
3196
3197
319B
3199

014646
014650
01~556

014660
014666
014670
014674
014702

000447

014704
01ii712
014714
014720

BIT

165026
165024

ASL

ROL
BPl
HAL T

165012

165:146

165004

165040

0~2767

0147:')0
014736

3203
3204
3205
3206

01~754

014760
01~772

015000

020000
172344
164752
164746

165016
, 723~6

Mav

164754
164750

MOV

BIT

020000
000200

172346

55:

164726

16K VER
MACY11 30A(1052)
20-FEB-78
07:56
PAGE 67
MEMORY MANAG.:J'JIENT AND ADDRESSING SUBROUTINES.

164724

164714

BEQ
ADD
ASL

ROL

8MI
BIT

164672

BNE
164706

164:364

161.1674

154124

16~666

164716

BIT
6$ :

BEQ
81 T
BNE

BIT
BEQ
MOV

16470.:1

81:
BR

164634

164616

BI TPT •
11$

TSTMAP

BNE
ADO

1120000,

AS'.B

BI TPT

164610

BPL
HALT
MOV

10$ :

11 $:

BIT

10$

016767
036767
CO 1 021

164602

C327~'3

020000

BIT

t/5IT13,

21 $

164570

BEQ
ASLB

001423
106367
10J41

o~ 6767
001";C3
0'· 67C5
000·102

3213
3214
3215
3216

015044

CO 1 004

3217
3?18
3.219

015046
015054

0014:'0

3:t20

015062

3221
3222

01506..j

BIT
BNE

164562
001412
112767

164612
164636

000011
154544

164540
164557
164574

164564
20$ :
21 $:

20$

BIT

TMPPT,

20$

21 $

1645: 4

BIS
SIS

036707

164S02

164524

BIT

,64474

'64516

0.iG767

Qi670S
005002
ue57E7

BIT

22$ :
8R

464516

2767

100000
007600

172344

:;0

0(104: 3

C151:'2
O'
ODO-L,)
3232
01:;;130
0'
01::'152
3233015136066767163436

'6<1414

BLKMSK, R5
; RESET R5 TO CURRENT BLOCK MASK.
R2
; lIH T ADDRESS POINTER.
r.1MAVA
; CHECK FOR ~EM fllGMT
31 $
; BRANCH I F NO MEM MGMT
pBIT1S, BITPT+2 ;SET POINTER TO TOP BIT
BITPT
#7600,
@Il'KIPAR2 ;SET PA~ TO TOP OF MEM
32$
; BRMKH TO cmlMON AREA

31$:
32$:

MOV

#BITe,

B ITPT

MOV
ADD

#33$,
RELOCF,

MMORE
MMORE

164440

16·~432

1S oj-1t6
164.110

81 TPT ,
BITPT+2, TMPPT+2
BITPT,
FAOMAP
;CHECK IF FIRST ADDRESS NEEDS TO BE SET.
22$
;BR IF FIRST BANK.
BITPT+2,F;"DMAP+2 ;CHECK HI 64K.
INlTEX
;8R IF NOT FIRST BANK.
TMPFAD, R2
; RESET ADDRESS POINTER TO FIRST ADR.
INITEX

MOV
CLR
TST
BEQ
MOV

('C1411

0,')7::7

;CHECK IF THIS BANK TO BE TESTED.
; SR IF MATCH.
; UPDATE PHYSICAL ADR PNTR TO NEXT BANK.
;UPDATE BANK POINTER TO NEXT BANK.
; BR I F MORE BANKS.
ERROR! !!
NO 4K BAj\jK FOUND?
;COF-Y BANK POINTER.
; CHECK I F LAST BANK.
;ER IF LAST BANK.
;CHECK FOR 8K BLOCK SIZE.
; aqAT>lCH I F SMALLER BLOCK SIZE.
;POINT TO NEXT 8At.K.
; 3RANCH I F OVERFLOW.
:CHECK IF BANK TO BE TESTED.
; 5RANCH IF r,OT TO BE TESTED.
; SET 8K BLOCK SIZE FLAG.
;CHECK FOR LAST BANK,
;B~
IF NOT LAST 8ANK.
;RESET MASK TO FIND LAST ADR.
;SKIP MASK RESET.
;RESET MASK TO 4k BLOCK SIZE.
;SET Tro1PPT FOR FLhGING LAST BANK.

INlTDN:

163510

01 S1 06
015112

LAD~Jl5K,

TSTMAP
F LAG8K
LADMAP

MOV

BNE

016702
000445

TMPPT,

BEQ
i'.1QV

015036

Ti\'lPPT

20$
';:11,

015022
015030

; FAT AL
TMPPT
LAOMAP

12$

8Ml
B_

017777
16:;516
16·1512

164520

SITPT,
BlTPT,

BEQ
MOva

012705
056767
0: G7E7

015070
01:-,072
015J76
01:>100

; ••. HI POINTER,
20$
; BR I F NO MORE.
TMPPT,
TSTMAP
;CHECK IF BANK TO BE TESTED.
6$
;8RANCH IF A M,1.TCH.
TMPPT+2, TSTMAP+2 ;CHECK FOR HI 64K BANKS.
5$
: 8RANCH I F NO MEi~OrtY
rt.1PPT,
LADrwlAP
; CHECK I F LAST BANK.
7$
; BRANCH I F A r/iATCH
TMPPT+2. lAD~AP+2 :CHECK HI 64K
21$
;SR IF NOT LAST BANK.
L,\OMSK, RS
;RESET MASK TO FIND LAST AOR.
1120000, TMPLAD
;rI1AKE SUR~ LAST ACOKESS IS IN BANK 3.
21$
;SR TO FINISH UP.

020000
15<1620

015014
015016

(ll~CS6

TMPPT+2

036767

321'
3212

3229

4$:

W·l
BIC
Mev

001006
062702
1 C 6367

01 SODG
01S010

3226

BI T
BEQ

3$:

165026

164674

014762

014770

BIT
BNE

#8lTO.
8!TPT
;SET POINTER TO 8ANKO
BITPT+2
;CLEAR HI 641<: BANK POINTERS
R2
; SET ADDRESS POINTER TO 0
BLKMSK, R5
; RESET R5 TO BLOCK MAsr;.
MMAVA
;CHECK FOR fv1£r.l M.3MT AVAILABLE
10$
; Br:lANCH 1 F NO MEM MGMT
@l#KIPAR2
; SET UP 3RO PAR TO BANr<O
#40000, R2
; RESET VIRTUAL ADR POINTER
BITPT,
TSHliAP
;CHECK IF THIS BAf'.IK TO BE TESTED
2$
; BRANCH 1 F rM TCH
31TPT+2,I·STN:AP+2 ;CHE:CK IN HI MAP
25
; BRANCH 1 F II'ATCH
1;200,
@,':KIPAR2 ;UPDATE ME~.~ ',lGMT, THIRD PAR.
BITPT
:UPDATE LO t:OlNTER TO NEXT BANK.
BlTPT+2
; ... HI POINTER.
, $.
; 8R I F MORE.
;FATAL ERROR!!!
NO 4K BANK FOUND?
BI TPT ,
LAOMAP
; ChECK I F LAST BAf>.K.
3$
;BR IF LAST BANK.
BITPT+2,LADMAP+2 ;CHECK IF LAST BANK.
4$
: BR I F NOT LAS T BANK.
LADr,~SI{,
R5
;SET MASK TO FIND LAST ADR.
(;'20000, TrvlPLAO
;MAKE S'JRE VIRTUAL LAST ADR IN BANK :2.
@.'JKIPAR2,0/1KJPAR3 ;COPY CURRENT PAR INTO FORTH PAR.
BITP!,
TJl.1PPT
;COPY BlTPT ••. lO 64K.
BITPT+2, TfI1PPT+2 ; •.. HI 64K.
#81T13. R5
;CHECK FOR A BLOCK SIZE OF 8K.
21$
;6RANCH IF NOT 8K.
#200,
@P'-IPAR3 ;UP DATE FORTH PAR.
TMPPT
;UPDATE LO POINTER TO NEXT 4K BANK.

020000

3210

~223

25:

1 C0367

0147<;4
014746
014752

3224
3225

8N':.
ADD

172344

0(,0000

3200
3201
3202

3207

006167
100473
036767
OC 1 004
036767
OC 1760
036767
001004
036767
0(1455
0167C5

BIT
BNE

OOOOGO

01 Lt534

014622
O,<lG26

1$:

',003€0
0267 7

MOV
ClR

CLR

005002

CZQMCFO
0-124K I,~EMQRY EXERCISER,
CZQMCF.?11
14-FEB-78 08:19
3178

N I TMM:

;SET UP BANK POINTER
;S[T ILM~.lDm.,1N" EXIT ADDRESS.
; ADO OF FSET

SEQ 0149

0-124K ri'EMORY EXE;.RCISER.
CZQMCFO
l<;-F E8-76 08: 19
CZQMCF. P1 1
3234
3235
3~36

3237
3238
3239
3240
3241
3242

015144

OC4767

0' Si 50

DCOOOO

C15152
015160
015162
015170
015172
015176
015202

02G767
001 or 1
0:6761
Q01402
016702
010467
000204

MAr:y 11 30A(1052)
20-FES-78
C7: 56
PAGE 6S
16K VER
MErl.ORY MANAG£r.:ENT AND ADDRESSING Su8ROUT I NES.

164361$

164422

t 64350

164414

33$ :

3.,$ :
INI TEX: Mr'
RT5

164376
164352

3243
3244
3245
3246
3247
324B
3249
3250
3251
3252
3253
3254
3255
3256
3257
3258
3259
3260
3261
3262

3263
3264
3265
32G6
3267
3268
3269
3270
3271
3272
3273
3274
3275
3276
3277
3278
3279
3280
3281
3282
3283
3284
3285
3286
3287
3288
3289

,.
,-

:;**.

015204
015212
015214
015222
015224
015230
015234
015236
015242
015250
C 15254
015260
015262
015270
015272
o 1530C
015302
015310
015312
015320
015322
015326
015334
015342
015350
015354
0'5356
o 1 S36~
015372
015376
O"l54U2
015404
015412
C 1 5-~ 1 ~
015422
015424
015432
015434
015442
015444

036767
OC 1122
0367E7
001116
016705
005767
001515
012702
062737
DC6367
oe6167
le0577
0:,6767
001004
036767
001760
036767
001004
036767
0014CS
016705
0':)2767
016767
016767
O.J2705
DC 1530
OJ 37'.:.7
062727
006367
OC6,67
1 G0513
036767
001004
0::;6767
001760
036767
CO 1 004
036767
001475
016705

164340

164370

164332

16436,2

3299
3300
3301
3302
3303
3304

3305
3406
3307
3308

3309
3310
3311
3312
3313
3314
3315

3316
3317
3318
3319
3320
3321
3322
3323
3324
3325
3326
3327
3329
3329
3330
3331
3332
3333
3334

164240

164250

164232

164236

164272

164230

164264

164;:52
020000
1642::J4
16<'1200
020QOO

164242
164206
1642Q2

45:

BIT
BNE
BIT
BNE
MOV
TST
SEO
MOV
ADD
ASL
RDL
BMI
BIT
BNE
BIT
SEQ
BIT
BNE
BIT
BEO
MOV
BIC
MOV
MOV

BIT
S$ ,

164140

164116

6$'

164132

164110

164120

1641S0

164112

164142

6EO
MDV
ADO
ASL
ROL
6M!
BI T
8NE
BIT
SEQ
BIT
BNt
BIT
BEQ
MOV

7$'

as,

164130

TMPPT,
LAOMAP
; CHECK FOR LAST SANK FLAG.
10$
; BR IF LAST ,BANK.
TMPPT+2, LADMAP+2 ; CHECK FOR LAST BANK FLAG.
10$
; BR IF LAST BANK.
; RESET R5 To BLOCK MASK.
BLKMSK. R5
MMAVA
;CHECK FOR IlfE:,l MGMT AVAI LABlE
20$
; BRANCH IF :~Q MEr.! MGMT
;'40000, R2
; RESET VIRTUAL ADR POINTER
@It;KIPAR2 ;UPDATE MEr>~ ~lGMT. THIRD PAR.
#200,
81 TPT
;UPDATE
f:-OINTER TO NEXT BANK.
8ITPT+2
: ••. HI POINTER.
; BR IF AlL DONE.
32.
BI TPT.
TSTMAP
; CHSCK jF THIS BANK EXISTS
2$
; BRANCH IF r\~ATCH
BITPT+2, TSTMAP+2 : CHECK IN HI MAP
1$
MATCH
; 9RANCH IF
BI TPT,
LADMAP
; CHECK FOR LAST 8,l.NK FLAG.
3$
; BRANCH IF LAST 5':"NK FLAG.
B I TPT +2 , LADMAP+2 ; CHECK IF LAST BANK FLAG.
4$
: BR IF NOT LAST BANK.
LADM5K, R5
; RESE T MASK.
1120000, TMP LAD
: ~I!AK~ SURE VIRTUAL LAST ADR IN BA1'JK 2
; COpy B!TPT. •• LO 64K.
BI TPT •
TMPPT
BITPT+2, TMPPT+2 ; ... HI 64K.
118IT13, R5
; CHECK FOR A BLOCK SIZE OF SK.
31 S
; BRANCH IF /',OT.
@ItKI P,1,R2 ,~IfK I PAR3 ; COpy CURPENT PAR INTO FORTH PAR.
@.;IKIPAR3 ;UP DATE fCiHH PAR.
#200,
TMtlPT
;UPDATE LO POINTER TO NEXT 4K BANK.
TMPPT+2
; ••• HI POINTER.
30$
; SR IF NO MORS.
TMPPT,
TSTMAP
; CHECK IF BANK TO BE TESTED.
; 8RA:-JCH IF A ~,'!ATCH.
7$
TMPPT+2, TSTMAP+2 ; CHECK FOR HI 64K 6ANKS.
5$
; BRANCH IF NO ME~ORY
TMPPT, Lt..OII,-lAP
; CHEC~ FOR LAST BANK FLAG.
8$
; BRANCH I F A MATCH
TMPPT+2, LADMAP+2 ;CHECK HI 64K
31 $
; BR IF NO LAST BANK FLAG.
; RESET MASK TO FINO LAST ADDRESS.
LADMSK. R5

'.0

20-FEB-78
16K VER
MACY 11 30A (1052)
07: 56
PAGE 69
MErWRY MANAGCMENT AND A:JDRESSING SUSROUTINES.
BIS
BR

1120000,

10$'

CMP
BNE
BR

TMPLAD.
31$
32$

164063

20$'

164053
q4000D
020000
1640:.. ..

21 $'
22$'

ASRB
BEQ
BCS
CLRB
SWB
ADD
ASLB
SMI
BIT
BEO
BIT
BEO
MOV
MDV

F LAGBK
22$
30$
FLAG8K
#40000,
#2COOO,
Bl TPT
32$
81 TPT.
21 $
BITPT,
23$
LADMSK,
BITP r.
118IT13.
31 $
Tr.tPPT
30$
TMPPT,

1 :;4120

015·150
015456

052767
000467

020000

015460
015464
015466

026702
001064
000474

164112

015470
015474
015·176
015500
015504
015510
015514
015520
015522
015530
015532
015540
015542
015546
015554
015560
015562
015566
01557Q
015576
(,15500
0' 5606
015614
015622
01562.:1
015630
015632
01553e
015644
015652
01 !;)656

106267
0;)1407
1 C·3455
105067
, &2702
062702
1 C6367
1 C0457
O~ 6767
OJ 1767

164018

154000

026767

154006

164042

0:·1402
016705
016767
032705
001426
1 C 6367
100421
036767
001415
026767
112767
C36767
001403
C 16705
OC 0402
Q127C5
056767
0567€7
016716
OC02C7

0' 5660

005767

164412

0151364
015666
015672

001402
004767
000207

001744

164032
163772
020000

163774

163762
163754

163732

163740
000011
163124

163774
163743
163760

163750
017777
163702
163676
163676

163704
163700

23$'

BIT

TMPLAD

: SET VIRTUAL ADR TO BANK 3,

; CHECK IF LAST AOR REACHED.
; BR IF MORE.
; 8R IF ALL DONE.

31$

R2
'2
T$TM.l\P

LADMAP
R5
TMPPT
R,S

; SHIFT BK FLAG
; BR IF NOT BK BLOCK.
; 8R IF ANOTHER 4K,
; CLEAR O:.JT ALL FLAGS.
: BACK we 8K.
; :JPCATE PHYSICAL AOR PNTR TO NEXT BANK.
: UPD:\TE POINTER.
; GRMlCH l'iHEN liND IS REACHEO.
; CHECK Ie THIS BANK EXISTS,
; BRANCH IF NO MATCH.
; CHECK FOR LAST !3ANK FLAG.
; BR IF NO MATCH.
; R:'SET MASK TO F!·.) LAST ADR.
; SET UP TMP POINTER.
; CHECK FOR B~ BLOCK SIZE.
: BRANCH IF SMALLER BLOCK SIZE.
: POINT TO NEXT BAr-.:K.
; BRANCH IF OVERFLOW.
; CHECK IF BANK TO BE TESTED.
; BRANCH IF NOT TO BE TESTED.
; CHECK FOR LAST BANK FLAG.
; SET 8K BLOCK FLAG.
; CHECK FOR LAST BANK FLAG.
: 8R IF NO FLAG.
; RESE7 r<olASK TOFIND LAST ADR.

BEO
ASLB
8MI
TSTMAP
BIT
BEQ
30$
BITPT,
LAorMP
BIT
MOV8
FLAG8K
#11,
SITPT,
LADMAP
BIT
30$
BEQ
MOil
LADMSK, R5
31 $
BR
30$ ,
#MASK<;K. R3
; SET MASK TO 4K.
MDV
31 $:
BI S
BITPT,
Tir.PPT
; SET TMPPT FOR FJNDJNG LAST AOR.
BITPT+2, TMPPT+2
BIS
MOV
.I'1MORE.
(SP)
; FUDGE RETUPN ADDRESS TO LOOP.
RTS
PC
; RETURt...!
;'1< E.EFORE FINAL EXIf • CHECK FOR ANY NCN-TRAP PARITY ERRORS.
MPRX
T5T
; CHECK FOR ANY PAp,ITY REGISTERS PRESENT.
32$'
33$
BEQ
: 6R IF NONE.
J5R
PC,
CKPMER
; CHECK FOR PARITY MEMORy ERRORS.
33$ :
RTS
PC
; STRAIGHT RETURN.

; : _........ "' .. ,. .. * .. """"",, "'''' ..... " * .. ,. ...... * "''''''''" *-l<"",.,..,.'1.*..,'"** ..... ,.*** ............... "' . . *"'''' . . *''''''*

,-..
;

;"'

3338

3344
3345

2$'

17:2346
172346

172344
000200
164152
164150

3337

3343

1$:

3S'

3335
3336

3339
33.:10
3341
33';2

: ; '" ", ... * .. * '" '" '" *"'" *""1<,, "'''' '" "' ..... "' .. ** ** "' .. ,,* ¥ '" *""" "',. "''''''' "' .. '" '" *'" "'''' '" "''''* "'''''''''''''''''''*

MMUP:

172344

164256

**"'''' *'" "'"' '" " .. * "' .. ,,'" ** "'" "' .. "' .. "'''' '" *"'''' "''''* '" "'* * *'" "' .. "' ....... * "'." •• "'*'"

UP\'IARDS ADDRESSING !.tOUT INE
F II\:)S NEXT EXIST!"lG 4K BANK ANO UPDATES POINTERS.
GOES TO ADDRESS IN "r>!~,'O,. c" IF f\1QRE BANKS.
DOES STRA1GHT EX[ T WHE'· ALL ME¥.DRY HAS BEEN DONE.

164356
163:-'?2
040000
000200
164270
164266

# ....

01567';
0157C2
015704
C 15712
015714
015720

C··6767
0(:1004
0::6767
001404
026702
001052

163644

1636G6

163636

163660

163644

SEO 0150

MI'WO'II>':-.i
; ROUTINE TO SEARCH DOWNWARD FOR TCP MEril BANK
; FAT AL ERRGR!! !
NO MEM rr-..rDICATED IN MEM MAP ABOVE 81(1
B1 TPT ,
LADMAP
;CHECK FOR t\DN BOUNDRY LAST ADDR,
34$
; BR IF LAST BANK FLAG FOUND.
Bt TPT+2, LADMAP+2 ;"CHECK FOR NON BOUNDRY LAST ADDR.
INl TEX
; Sli IF NO LAD FlG FOUND.
LSTfl,DR, "2
;SET UP R2,
R4,
MMORE
; PUT RETURN PC INTO "fi'jMORE"
R4
; RETURN
PC,

CD',l~tDN

,-,.

0-124K r,;riMORY EXERCISER,
CZOf\1CFO
Czor..l~F. ).>11
14-FEB-7B 08: 19
3290
3291
3292
3293
3294
3295
3296
3297
3298

J5R
HALT
BIT
BNE
BI T
BEO
MDV

000524

r\~Er'WRY DO\~:~~oJARDS ADDRESS I NO SUSRDUT It~E.
F Ir-.CS NEXT LO'.'lER 4K B:..NK A~O UPDATES POINTERS.
GOES . J ADDRESS IN '·MMORE .. IF MORE BANKS,
DOES STRAIGHT EXIT \'JHEN ALL M'::JlmRY HAS BEEN DONE.

..... ..

; ; "'
"' ~ ... '" '"
MMDO, .. ~ : BI T
BNE
BI T
BEO
1 S:
CMP
BNE

'" '" "" "',. "',. ... +: .. ", .. "''''' ~ .. "' .. '" '" " ,. '" "',. '" ... " ... ~

-to "' .. "' ..

* . . '" "' ...... '" .... '" '" "' .. "' ... *'"

; CHECK FOR FI RST ADR FLAG.
; SR IF F IRSi ADR IN THIS 6ANK.
BIT~T+2, FADl'llAP+2
; CHECK FOR FIRST AOR FLAG.
2$
; 6R IF NO FLAG
TMPFAD, R2
; CHECK IF FIRST ADDRESS REACHED.
9$
; BR I F MORE.

B1 TPT,
1$

F ADI\1AP

SEO 0151

'"
3346
3347
3348

3349
3350

3351
3352

3353
3354
3355

3356
3357

3359
3359
3360
3361

3362
3363
3364
3365
3366
3367
3368

Q-12.:1K r,'EMrJrlY EXERCISER,
14-'FE8-78 08: 1 9

015722
015724
015730
015732
015740
015'744
015750
015752
015760
015762
015770
015772
0'5776
016000
016004
016010
01601 :!
0160~O

3369

016022
01G030
016032
016040
016042
016046

3370

016052

CZQI~CFC

CZQMCF.P11

000453
OC5767
001425
162737

006067
006067
103440
036767
001004
036767
OU 1760

01 ::2702
OC0411
162702

OC6261

16K VER
MACY11 30A( '052)
20-FEP-78
07: 56
PAGE 70
MEMORY MANAGiir,:f,NT AND ADDRESSING SUBROUTINES.

2$ :

162656
000200
163602

172344

163574

163566

163550

163560

163542

060000

4$:

020000
1 G3534

5$ :
6$:

1635.26

C36767

163516

163540

163510

163532

O~' 1 004
036767
OC 1402
016705
0167, <3
000207

7$:

163520

8$ :

163502

95 :
10$ :

0-1241K ftEMORY EXERCISER.
14-FEB-78 08:19

16K VER
MArY11 30A(1052)
20-FE8-78
07:56
PAGE 71
SUBROuTINES Fefl ADDRESS AND ~JORSE CASE NOISE TESTS.
.SBTTL

3381
3382
3383
33f;Ll
3385
3386

3387
3388
3389
3390

3391
3392

SEQ 0'53

SUBROL:TINES FOR ADDRESS AND 1110RSE CASE NOISE TESTS.

; ;.,. ", ... ,. *. * * .... '" ** ."' .... "' •• '" ** *"'''' ..... "'~ * . . "' . . ,. ."'''' ** *'" * * ** "'**>It*", **.* ** **

3372

,',-'<

ASR
Bes
BIT
BE,)
BIT
8NE
BIT
BEQ
MOV
MOV
RTS

'63510

3371
3373
3374
3375
3376
3377
3378
3379
3380

sua

1 C3420
036767
001767

B" IF ALL DONe.
MrllAVA
Ch'ECio\ IF MEM MOMT IS AVAILABLE
6$
BRANCH I F NOT
lmJER r,lEM r':G1I1T PAR BY 4K
#200. @#KIPAR2
BI TPT+2
MOV POINTER TO NEXT LOWER BANK ••• HI MAP.
BI TPT
••. 1.0 r,MP.
, 0$
BR IF NO MORE.
BITPT,
TSTMAP
CHECK FOR SANK EXISTING
4$
BR IF S:"NK TO BE T~STED.
91 TPT+2, l'STMAPT:,"i ; CHECK FOR BANK IN HI MAP.
3$
BR ! F NOT ThE.RE.
#60000, R2
SET ':"DR POINTER TO TOP OF BANK
7$
GO TO COMrl",CN EXIT
#20000, R2
BACK POINTER DOI,IN ONE BANK
BI TPT
f,10VE POINTER TO r~EXT LOI'l'ER BANK
10$
BRANCH TO EXIT IF NO MORE
MEM
81 TPT,
TSTMAP
CHECK ! F BA"'K EXISTS
5$
BRM~CH IF BANK CO£SN I T EXIST
BI TPT,
FADMAP
CHECK IF FIRST SANK FLAG.
8$
8R IF FIRST SM.K.
BITPT+2, FADrt.AP+2 ; CHECK IF FIRST BANK FLAG.
9$
6R I F r~o FLAG FOUND.
FADMSK, R5
SET UP R5 TO FIND FIRST ADDRESS.
(SP)
MMQF\::.
RESET RETURN ADDRESS
PC
RETURN

TST
BEQ
SUB
ROR
ROR
Bes
BIT
BNE
BIT
BEQ
MO',
BR

3$ :

SEQ 0'52

, OS

i*
;>10

016054
016056
015062
016066
016070
016072
016076
016100
016102
01 \:1 04
016106
016110
016114
016116
015122
016124
0\6126

010200
OC 5067
OC5767
001417
010146
0' 3701
OC6301
0:'6301
0;:6301
OC6301
0::;6301
Ce616?
OC6301
006167
060100
012601
000207

S~8fWUTINE TO CALCULATE PHYSICAL ADDRESS AND PUT IT
BITS 16 AND 17 A~E IN $TMPO.

PHYADR:
163076
162520

MOV
eLR
1:-

R2,
$TMPO
MMAVA

BEQ
MOV
MOV
ASL
ASL
ASL
ASL
ASL
ROL
ASL
ROL
ADD
MOV
RTS

172344

163044
163036

R1,-(5P)
@IfKIPAR2.
R1
R1

IN RO (BOTTOM 16 BITS).

;VITRUAl PHD 11:0
;ClEAR TEMP SAVE OF HIGH BITS
; CHECK FOR r..!EM MGMT AVAI lABlE
; BRANCH IF !\O Mi:M MGMT
; ;PUSH R1 ON STACK
:GET PAR TO 8E ADDED TO VIRTUAL
;SHIFT IT 6 TIMES

R,
R1
R,
$TMPO

; SAVE EXTRA BITS

R'
$TMPO
R1,
RO
(SP)+. R1
PC

; ADD SHI FTED PAR TO VIRTUAL
; ;POP STACK INTO R1
: HE TURN

3393

; ; *"~ "' . . ..

3394

>Ii* "' ..

* .. '" *,. . . *.* .. "' .... *"''''**." . . '" *.* """ '" If* *'" ** **,.'" **"'*"'*** .*** "'*
INTO RD.

3395

3:::l06
3397
3398

; ; * ** * .. ~ .. "'* .. * ... ~*". ** *** '" ** ** "'*** ............ + .. * ** * >Ii .. **" "'. ** .. '" *"'* *******

3399
2400
3.:''t01
3402
3tl03
3404

340S
3406
3407

3'408
3409
3·11 C
3411
3£112
3413
3414

016130
016132
016134
01 G136
01 G142
016146
0161 :50
01 G152
01 61 S~
016156
0161 GO
016162
016162
016164

016166

:,,417
3418
3'~ 19

H.'0373
000000

MOV
MOV
ASR
ROR
BCS
I NCB
BPL
HALT

012602
012601
000207

MOV
MOV
RTS

(SP)+. R2
(SP)+, R1
PC

BANKNO:

CLR
MOV

rwv
163402

163400

15:

026202
oo60C 1
lC.3403
1 U52CO

;; POP 5T ACK INTO R2
;;POP STACK INTO r1
; RETURN

;; .. *,. •. ",,,,,.****,,,,.**** . . ,,,,, "''''**''' ...... "' .... ,. "'**"' .. **""'1''''****''**''''''*** "'*******
;*
;

016170
(J 161'/0

SUB~OUTINE

; >1< .. '"

TO l.~RITE ThE CO:'IJ5TANT

* "''' * ", .. * "',..*"' .... '" •• *

snCON:

JSR
MOV

R4,

O~OO~2

030502

C04467

176232

BIT

RS,
2$
PC,
PC

BtjE

3420
3421
3422

BANK NUMBER

RO
; INIT RO
R1,-(SP)
;;PU5HR10NSTAO:
R2,-(SP)
;; PUSH R2 ON STACK
BITPT,
R1
;GET BANK I\f,AP POINTER ••• LD 64K.
8lTPT+2,R2
; ... HI64K.
R2
;SHIFf POINTER ... HI
R1
;, •• lO
2$
; 5R IIJHEN POINTER FOUND.
RO
; COUNT BANKS.
1$
;SR IF NOT OVEF<;FLCW.
;FATAL ERROR!!!
NO POINTER FOUND.

005000
010146
010246
016701
016702

3415
3416

SU9ROUTINE TO PUT

176776

uSR
RTS

RO,

>I< TO '"

IN RO

INTO ALL OF MEMORY.

*"'''''''*.* ..... ***01- .... '" "' . . "' .. * .. "" "'''' "'*** ** * "'** ** '" *

HHTMM
(R2 J+

02
MMUP

II<

INITIALIZE THE MEMORY ADDRESS P01NTERS.
MOV CON5TMIT INTO MEMClRY
CHECK FOR END OF A BLOCK.
BRANCH IF UORE IN CURRENT BLOCK.
FIND NEXT Bl.OCK AND lOOP TO 1$.
RETU~N

,"11

0-1:2.11{ '.'[!\.10RY EXERCISER,
14'~FE8-78 08:19

16K VER
MACY1130A(t052)
20-FES-78
07::;'6
PAGE 72
SUSROUTJNES FeR ADDRESS AND WORSE CASE NOISE TESTS.

SEQ 0154

; ; .. ,,* .. '" "' ....... ,,*** ..... "''''''' -+<* ......... * .... * ...... "'**""""", .. ", .... , , "'" "' ...... "'* .. *** ••• * ....
fWLJTII'..:~

;'O
3426
3427
3428
3429

0\ C21 0
016212
01 C;;! 14
01521 G
01 b;?20
01 E222
016224
01 G23:)
016232
01,3234
o t G236
016240
016242
J 16244
016246
016250
016252
016254

1 C6 112
1 C6112
1 c G112
1 C6112
1 C6112
1 C6112
1 C'6112
1':6122
1 C 6112
106112
106112
106112
1 C61 j:2
1 :.,6112
1 (,6112
106112
106122
OC0207

3449
3450
3451
3452

0162S6

012704

016262

010022

016~64

3453

016266

010022
0,0022

:l4JO
3431
3432
3433
3434

3435
3436
34.37

3438
34J!:1

3440

3441
3442
3443
3444
34·15
3446
3447

o t 6226

;

oj.

THROL:GH A MErI.OPY LOCATION.

I R2)

;(R2)=177776
; (R2 j::<177775
;(R2)=177773
;(R2)=li7767
;{R2)=177757
; (R2)=177737
; (R2)=177677
;iR2)=177777
;(R2)=177577
;(R2):;177377
; (R2)=176777
;(R2)=175777
;{R2)=173777
;(R2)=167777
;(R2)=157777
; (R2)=137777
; {R2)=071777
; (R2)=177777
; RETURN

(R2 )

I R2)

I R2)
I R2)
I R2)
I R2)
( R2)+
PC

00000 j
000002
000004
oeoo 1 a
:)00020
000040
000100
000000
000200
000400
001000
002000
0:)4000
010000
020000
040000
1·"":0000
000000

'O'"

MOV

i/16. ,R4

MOV
MOV
MOV
MOV

RO,(R2)+
RO, (R2)+
RO,{R2j+
RO.(R2)+

MOV
MOV
MOV
MOV

R3,(R2}+
R3,{R2)+
R3,(R2)+
;<3, (R2)+

r.',ov
MOV
MOV

RO, (R2)+
RO,(R2)+
RO,{R2)+
RO, (R2)+

MOV
r.KIV
MOV
1\10V

R3,(Q2)+
R3.(R2)+
R3,(R2)+
R3,(R2)+

DEC
BNE
MOV
MOV

R4
2$
RO,

MOV
RTS

(SP)+.
PC

MOV

R3,

16K VER
MACY1130A(1052)
RElOCAT I ON ;J0BROuT I NES.
.S8TTL

'O*

;EACH LOOP WRITES 256.

-(SP)
RO
R3

"'If

WORDS

SAVE RO
PUT R3 INTO RO
PuT SAVED RO INTO R3
RETURN

20-FEE'-78

07:56

PAGE 73

SEQ 0155

RELOCATION SUBROUTINES.

; ; *"'" '" "' .. "'* "'''''''''" . . '" '"

3478

OR
OR
CR
OR
OR
OR
OR
OR
OR
OR
OR
OR
OR
OR
JR
OR
OR

*. '* ...... "'*"''O ""*,. ...... "'* '" '" ""* "'''' "" '" * .. "'",," * *'" *'" "' .. ,. .. "'''' ..... ,. * "'* **"'**. ****** ......
SU9RQuTINE TO \~RITE 3 XOR 9 PATTERN INTO 256. WORD BLOCK.
"''"* '" "' . . "' .. "',.,. "'. ***** "' .. * *'" >10* "'* '" '""'** '" '" .. "'* "'''' .... * .... ***

2$:

3477

"'>I'lI- ...... '" ,,->I- '" 'O"

"'*"'''' "' . . "' . . "'''' ..... "''O ****'" ** ** "' •• **** ••• ** ••

; .. ROuTINE TO RELOCATE PROGRAM CODE

3479
3460

3481
3482

015336
016336

3483

016340
016342

3507
350B
3509
3510
3511
3512
3513
3514
3515
351 G
3517
3518
:;S19
3520
J:)21

BIT

; '" ,.,... .. ,. .... "''O '"

3X9:

0(.0020

CZQrl'lCFQ
0-124K MEMORY EXERCISER,
C2QMCF. P 11
14-F E8-78 08: 19

3505
3506

ROLB
ROL8
ROL9
ROL8

ROlB

3454
016310
010022
3465
3466
01fl312
010r2
3467
016314
010322
3468
016316
010322
3469
016320
C1C3:.:2
3470
3471
016322
C05304
3472
01G32.::j
001356
3473
016326
O· 00c6
3474
016330
0',0300
3475016332012603
3476
016334
000207

3500
3501
3502
3503
3504

I R2)
I R2)
I R2)
I R21
I R2)
I R2)
I R2)
(R2 )+

ROLB
ROLL
ROLB
ROLB
RTS

3460
3461016302010022
34620163040',OC22
3453
016305
0; 0022

3499

ROL9
fWL9
ROLB
ROLB
ROLB
ROLB
RDL9

ROLB

3454
016270
010022
3455
3456016272010322
3457
016274
010322
3458
016276
010322
3459016300010322

3485
3486
3487
3,q88
3489
3490
3491
3492
3493
3494
3495
3496
2497
3498

'c'

I R2)

3448

3484

TO ROlATE

~ 0 61 12

016344

o t 6346
016350
016354
015356
016360

016362
016366
016370

0113372
016376
01 r,3402
016406
016·112
016416
016..:;20
016422
016.-::26
016430

016432
01 G4 34
016440
016442

016-t·j.:J

;; . . "' .. *"''''' ""* '" "'''' .. "''O,. "''''*,. .. *,. .. '" *'" *"'*" ** *""** '" ** *'O ... *"'" '" * *'" "''''*** ...... ***. "'*

RELOC:
010246

010346
010446
012502
012503
0127C4

4$:
020000
1$:

0122:23
OC 5304
DC 1 375
012704
024243
CC'1417
011267
01 1367
0;0267
C1Q367
OC 4767
OC·0023
oooo . . J
162705
000746
OC·5304
001355
004567

020000

2$ :

MOl'
DEC
nNE
1\10 V
CMP
BEQ

Me /

162526
162524
162512
162510

MOV
MOV
I\~OV

JSR
• ',IiORD
HAL T
SUB
BR
DEC
BI.C:
JSR
• wORD

003222

000004

005052

026542
010346
004767

MDV
MOV
MOV
MOV
MOV
MOV

r.lOV
JSR

006502

r.mv

016~52

012604
012603

MOV

016454
016456

012602
000205

MOV
RTS

016 .. 50

R2,-{SP'
; ;PUSH R2 ON STACK
R3.-( SP)
;; PUSH R3 Cr-.! STACK
R4,-ISP)
;; PUSH R4 O~ STACK
(R5)+.
R2
;GET FIRST LOCATION.
(R5)+.
R3
;GET FIRST LOCATION OF DESTINATION.
t; 20000, P4
;SET UP 8K COUNTER.
(R2)+.
(R3)+
;MOV :HE DATA.
R4
; COUNT THE WORDS.
1$
; BR I F MORE.
11'20000, R4
;RSSET THE CO:JNTER.
-IR2),
-IR3)
; CHECK THE JAT A JIJST MOVED.
3$
;8R IF QATA OK,
I R2),
$GDOA T
;G::T SOURCE DATA.
I R3),
SBDDAT
;GET DESTIN.UIDN DATA.
R2,
; GET SouRCE ADDRESS.
$GDADR
$aDADR
; GET DESTINATION ADDRESS.
R3,
PC,
$ERROR
; ........ ERROR *** (GO TYPE A MESSAGE)
: ERR'JR TYPE CODE.
23
; FATAL ERROR!!!
RELOCATION FAILED.
{f4,
R5
;ADJUST RETURN POINTER.
4$
; GO BACK AND TRY AGAIN.
R4
; COUNT ~'iORDS.
2$
; BR IF 1\10RE.
R5,
SPRINT
;GO PRl:-.lT OuT THE FOLLOWING MESSAGE.
PRELOC
; ADDRESS DF MESSAGE TO BE TYPED
; "PROGRf>M RELOCATED TO "
R3,
-(SP)
;PUT THE DATA ON THE STACK.
PC,
$TYPAD
; DETERMINE THE PHYSICAL ADDRESS ANO TYPE IT.
(SP)+,R4
;; POP STACK INTO R4
(SP)+,R3
;; POP STACK INTO R3
(SP j+. R2
;; POP STACK INTO R2
R5
; RETURN

; ; '" " .. * .... "'*,..* . . ***""**** **""* * "''''*''''''''' " "'''' ... * "'''' . . "'*"* .. "' .. "'''' .. ***''''''*''''''''' .. ****
;""
SUBROUTINE TO MOVE PROGRAM FROM BOTTOM TO TOP OF MEMORY.
; : .... " . . "' .... "',. * ""'* * ~ * ** .. *'O ~ "" ...... ,·tI '" '" * ,""
~".
"'* *","*11- "'* '" "'''' 'O'O *** ... ** *'"
>< ..

to- ..... Of< ..

016460

C22767

01 G.:lS6

OJH01

016470
o 1 (;.~ 72

000000
0100c~6

3S22
3523

01(,)-474
(\ 16476

3::;2"1
3:;25
3:,26
J527
35:28

C 1l;~'02
01 b:,04
01
2
H.;~ 14
o 1 ~j S.2 C

0 1 0146
OC57E7
oe 1455
O· 2737

3529

01,,526

3530
3531
3532

01 b';;JO

01 t;S32
0165.34

162114

RELlap:

",,,"

O/,P
SEQ
HALT

113,

r-iOV

RO,-{SP)
; ;PUSH RO O"i STACK
R1 ,-I SP)
;; PUSH Rl ON STACK
r.r1r.1AJA
10$
@>r,KIPAR3 ;SET PAR TO TOP OF MEM
1i7600,
RO
;INIT BANK POINTER ••• LO 64K
; ••. HI64K.
kBlT15. R1
11200.
@IIKIPAR3
; B~CK DDi'JN ONE BANK.
R1
;MOVE POINTER ••• HI 64K.
RO
; •• L064K.

PRSI,1AP

;CHECK THAT THE PROGRAM IS NOW IN BANKS 0 AND 1.
;BR IF OK
;FATAL ERROR!!!
PROG SHOULD BE IN BANKS 0 AND 1

1 $:

015,172

000003

MOV
T5T

162104

SEQ

007600

172346

lilOV
CLR

100000

0'
1627:.07
006ce 1

000200

0-,0167

162766

MOV
172346

Sl'B
ROR
ROR
BCS

BIT

QO$

R1,

MEl\lMAP+2

;CHECK

FOR BANK EXISTS.

,;>11

3533
3534
3535
3536

3S37
3538

3539
3540
3541

3542
3543
3544
3545

3546
3547
3548
3549
3550
3551
3552
3553
3554
3555'
3556
3557
3558
3559
3560
3561
3562
3563
3564
3565
3566
3567
3569
3569
3570
3571
3572
3573
3574
3575
3576
3577
3578
3579
3580
3581
3582
3583
3584
3585
3586
3587
3588

O-·'24K ~'EMORY EXERCISER,
14-FEB-78 08:19

016540

0'6542
016546
016550
016556
016560
0\6562
016570
016572
016574
01 G57€016602

001003
020067
001764

,62756

0137~·;

172346

172344

3$:

010046
010146
162737
OC6001
006000

000200

172344

4~:

lC34S7
0~0167

016604
016610
016612
016614
016616
016622
0,6624
01(%30
016632
016634
016642

OC 1 003
030067
001764
052601
052600
0'::0067
001044
004567
000000
0';0000
013737
013737

016650
016654

010167
000473

016656
016662
016664
016670
016672
016674
016700
016702
016706
016710
016712
016716
016720
016722
016724
016726
016732
016734
016734
016736
016742
016746
016750
016752
016756

012700
DC 500 1
, 52701
006200
1034;'20
080067
001771
162701
006200
, 03~1 1
030067
001762
010046
006300
052600
030067
001401

016760
016762
016766

060106
010167
060137

162714
6$:
161760

'77506
172"'44
172346

1/2340
172342
; ...

161730

000400

10$:

020000

11$ :

016772
016776
017002
017010
017012
017016
017022
017026
017032
017034
017036
017042
017044
017050
017052
017054
017060

BNE
BIT
SEQ
MOV
MOV
MOV
SUS
RC.:
RDR
BCS

3$
RD.
2$

MOV

#BITS,
Rl
#20000.

20-FEB-78

07:56

PAGE 74
SEQ 0156

JBR IF AVAILABLE
MEMMAP
;CHECK FOR BANK EXISTS.
; SR IF r"O SANK FOUND.
rpNKI~AR3.@NKI~AR2 ;COPV PAR
RO,-(SP)
: ;PUSH RO ON STACK
Rl.-(SP)
;;PUSHR10NSTACK
#200,
~ItKIPAR2 :BACK DOWN WITH LOW PAR.
R1
;SHIFT POINTER.
RO
; ••• LOGAK,
90$
;BR IF OVERFLOl.~.
BIT
R1,
MEMMAP-t2
CHECK IF BANK EXISTS ••• HI 641<.
B~E
6$
; BR IF BANK EXISTS.
BIT
RO,
MEMMAP
ICHECK IF BANK EXISTS ... LO 64K,
BEQ
4$
I BR I F BANK DOESN'T EXIST,
SIS
(SP)+,
R1
.... ;GET SECOND SANK POINTER.
SIS
(SP)+,
FiO
: ... lO 64K.
BIT
'RO,
PRGMAP
;CHECK FOR CONFLICT.
BNE
90$
:A30RT IF DESTINATION OVERLAYS SOURCE.
JSR
R5.
RELOC
;GO RELOCATE PROGRAM.
0
; SOURCE FIRST ADDRESS.
• WORD
• ItJORO
'WOOD
; DESTINATION FIRST ADDRESS.
MOV
"flKIPAR2,@IIKIPARO ;RELOCATE LO BANK
MOV
@NKIPAR3,@#KIPAR1 ;RELOCATE HI BANK.
PROGRAM SHOULD NOW BE EXICUTlNG OUT OF LAST TWO BANKS OF MEMORV.
MDV
R1,
PRGMAP+2 ; ~ESET PROGRAM MAP.
8R
30$
; 8R TO COMMON EX IT •

5$:

162724

CLR

162624

90$

BIT

RO,

MEMMAP

BEQ

11$
#20000,

BCS
BIT

162606

BEQ
MOV
ASL

BI5
BIT
BE:0

161650

;5ET 8ANK POINTER TO TOP OF MEM.
;SET ADDRESS POINTER TO TOP.
; BACK DOWN ONE BANK.
:MOVE POINTER DOWN ONE BANK.
;BR IF OVERFLDl.oJ.
;CHECK IF THIS BANK EXISTS.
;8R IF NON-EXrSTANT BANK.
;BACK ODloJN TO NEXT BANK.
jMOV POINTEP DOWN DNE BANK.
;9R IF OVERFLOIi.
;CHECK IF THIS BANK EXISTS.
;BR TO START OVER H NO LOWER ~ANK.
: SAVE THE POINTER.
;RESET POINTER TO HI BANK.
;SET BIT FOP, La BANK.
; CHECK FOR A PROGRAM CONFLICT.
;BR IF NO CONFLICT.

SUB
A5R
BCS

SUB
A5R

020000

RO
90$

RO.

MEMMAP

11$

RO,
RO

-(SP)

(SP)+,

RO
PRGMAP

RO,
12$

90$:
000000
010167
004567
000000
000000
010167
060107

;FATAL ERROR!!!
NOT ENOUGH MEMORY'??
13$
;SET DATA FOR RELOCATION SUBROUTINE.
RELOC
;GO RELOCATE THE PROGRAM TO TOP OF MEM.
o
;SOURCE STAPTING ADDRESS •
o
;DESTINATION STARTING ADDRESS.
13$:
R1,
RELOCF
;5ET RELOCATION FACTOR IN UNRELOCATEO CODE.
R1,
PC
; JUi',IP TO RELOCATED PROGRAM
ADD
;•
PROGRAM N01tI EXICUTING OUT OF TOP OF MEMORY.
R1,
SP
; ADJUST THE STACK PQINTER TO TOP OF MEMORY.
ADD
R1.
RELOCF
;SET THE RELOCATION FACTOR.
MDV
Rl,
@,vERRVEC ;ADJUST ERROR VECTOR.
AOO
12$:

000006
177370

161622

161612
000004

C2Qr\-1CFO
Q-124K ~'EMORY EXERCISER,
CZQMCF.Pl1
14-FEB-78 08;19

3589
3590
3591
3592
3593
3594
3595
3596
3597
3598
3599
3500
3601
3602
3603
3604
3605
3606
3607
3608
J609
3510
3611
3612
3613
3614
3615
3616

16K VER
MAr::Y11 30A(1052)
RELOCATION SUElRDUTINES.

060 t 37
060137
026727
001404

000024
000 ~, 4
162132

DED16?

162122
162120
001622
161546

060167
062701
066721
oe5721
0C'1776
024127
C01371
010067
012601
012600
066716
000207

HALT
MOV
J5R
• VJORD.
.wORD
MOV

Rl,
RS,

16K VER
MACV11 30A{1052)
RELOCATION SUBROUTINES.

ADD
ADO
CMP
BEQ
ADD

177570

ADD
14$:
15$:
16$:

ADO
ADD
TST
BEQ
CMP
BNE

177777

MDV

30$ :

161532

MOV
MOV

ADO

151520

RTS

20-FEB-78

07:56

PAGE 75
SEQ 0157

Rl,
@lNPWRVEC ;ADJUST POwER FAll VECTOR.
Rl,
(§:#PARVEC ; ADJUST PAP lTV ERROR VECTOR.
#177570 ; CHECK FOR HARDWARE SWITCH REGl STER.
SWR,
14$
; 8R IF HARDWARE SWITCH REGISTER.
;ADJUST SOFTWARE SWlTCH REGISTER.
Rl,
SWR
Rl,
DISPLAY ;~DJUST SOFH'JARE DISPt.AY REGISTER.
; POINT TO THE RELAT IVE RELOCATION TABLE.
NRADTAB.Rl
;ADD RELOCATION FACTOR TO ADDRESSES IN TABLE.
RELOCF, (R1)+
(Rl )+
;CHECK FOR INTERUM TERMINATOR.
16$
;BR SO AS TO NOT MODIFY ZERO.
-(Rl),
#-1
;CHECK FOR END OF TABLE.
15$
;8R IF MORE IN TABLE.
; SET NE'/J PROGRAM MAP ••• LO 64K.
RO,
PRGMAP
(SP)+, Rl
;; POP STACK INTO R1
; ; POP STACK INTO RO
{SP)+,RO
RELOCF, (SP)
;ADJUST RETURN ADDRESS.
PC
; RETURN

: ; '" "'''' "' ..... * "' ... .;. .*"'** . . "'*'" **11-"'''' "'.* ** , •. ", "'. "'** .. *"''''*** ... ' ' .. ' ' .... "''''''''''* ............ .
;*

017052
017070
017072
017074
017100
017102
017106
017114
017120
017122
017124
017130

032767
001401
000000
Oe5767
O-:J1417
005037
012737
004567
000000
040000
005037
012737

3619
3620
3621
3622
3523017136000444
3624
016746
3625 017140
(11714:..1
01 1667
017150
004567
3628 017154
OOOOGO
3629
017156
000000
3630
017160
161607
3631
, 516'.3
017162
3632
3633 017164
010046
012700
3634
017166
017172
166620
3635
017176
OC5720
3G36
017200
001776
3637
017202
024027
36311
0'" 1371
017206
3639
012600
3540
01721·)
16 I 637
35..11
01721 :2
3642
017216
3643
017222
3644
017226
026727

000003

161512

1$:

161506
172344
000200
177216

172340
000200

172346

172342
:,.,

10$:

161434
000004
177162

BIT

113.
1$

MOV

;~ELOCF.

117570

AND 1.

-(SP)
;PUT RELOCATION FACTOR ONTO THE STACK.
(SP),
20$
;SET DATA FOR RELDC SUBROUTINE.
RS,
RELOC
;GO MOVE. THE PRom/AM BACK TO 8ANKS 0 AND 1.
20$:
o
;SOURCE STAFTING ADDRESS.
o
;DESTINATlON STARTING ADDRESS.
sua
(SP),
PC
:JU~\~p TO RELOCATED PROGRAM.
; '"
THE PROGRAM IS NOW EXICUTlNG OUT OF BANKS 0 AND 1.
(SP),
SP
;RESE:T THE STACK POINTER.
SUB
MOV
RO,-(SP)
; ;PUSH RO ON STACK
MOV
/1RADTAB,RO
;5ET UP POINTER TO RELATIVE ADDRESS TABLE.
21$:
SUB
2(SP),
(RO)+
;RESET ADDRESSES TO UNRELOCATED VALUES.
22$:
F·T
(RO)+
;CHECK FOR TERr-.1INATORS.
22$
; BR OVER TE;::MINATGRS.
BEQ
CMP
-(RO),
11-1
;CHECK FOR END OF TAQLE INDICATOR.
BNE
21$
;8R IF r-l10RE ADDRESSES IN TABLE.
MOV
(SP)+,RO
; ;POP STACK INTO RO
(SP),
!£:lIlERFiVEC ;ADJlJST ER:>OR VECTOR.
SUB
SUB
{SP),
@lIlP .. RVEC ;AOJUST PO'JIER FAIL VECTOR.
(SP),
@I#",ARVEC ;ADJUST PARITY ERROR VECTOR.
SUB
eMP
SWR.
1/ 177570 ; CHECK FOR HARDWARE SWITCH REGISTER.
J5R
. WORD
• WORD

177777

PRGMAP; CHECK FOR PROGRAM ALREADY IN BANKS 0 OR 1.
BEQ
;BR IF NO CONFLICT.
;FATAL ERROR!!!
PROGRAM ALREADY IN BANKS 0 OR 1!!11
HALT
TST
MMAVA
; CHECK FOR ~'E~il I'.:GMT.
10$
; SR t F NO MEMMGMT.
BEQ
CLR
@/IKIPAR;,:
; SET PAR 2 TO BANK O.
#200,
@,III--:IPAR3 ;5ET FAR 3 TO BANK 1.
MOV
J5R
RS.
RELOC
;GO MOVE 8K INTO BANKS 0 AND 1 •
• WORD
o
;SOURCE STARTING ADDRESS.
• ~~ORD
40000
;DESTINATlO~ STARTING ADDRESS.
@nKIPARO
;RESTQRE PA? 0 TO BANKO.
CLR
MOv
#200,
@oltKIPARl ;RESTDRE PAR 1 TO BANK 1.
PROGRAM IS NOW EXICUTING OUT OF BAt,;KS 0 AND 1.
BR
30$
; SR TO COMMON EXIT.

MOV

001622
000002

000004
000024
000114
,61706

SUBROUTINE TO RELOCATE PROGRAM BACK TO BANKS

; ; '" *"' ....... "''''''' *"'***"'."''''''' **"'*"'''' .. ",*",~, * .. "'* "'II' '" '" "'**'" "'''"* **"'****"''''****** "'*

RELO:

CZQrilCFJ
C lQ~'CF ,

;;;545
3646
3G47
3648
3649
3650
3651
3652
3653
3654

0- 1 24K ;"'EMORY EXERCI SER,
t4-rEB-78 08: 19

01723";
017::'36
0' 7242
017246
017250
017254
017262
017266

r,1-\CY11 30A(1052)
16K VER
RELOCATION $.JsrWUT INES.

oe 1':;04
1E 1667
151667
162616
005067
D 12767
005067
OC0207

161676
161674
23$ :
161324
000003
161316

30$ :
161120

3581
3684
3685

3686
3687
3688

.3589
3690
3691
3692

;

017270
017274
017270
017300
017304
017306
017312
017316
0'7322
017324
017326
017330
017334
017340
017342
017::46

017350
017354
017356
017362
017364
017372
017374
017376
017~OO

017406
017410
017414
017416
017420
017422
017426

016700

RES LOR:

0(,0000
0[5767
001402
DC 5037
012701
012702
0< 4140
0053..:.2
DC 1375
005067
005767
001402
DC 5237
0002C7

161302

1$:

0057E7
001024
012700
010001
0·,2727
011020
0(.'0776
022626
012737
0100-':6
0127C2
0140L'"
0053C2
001375
012667
000207

177572
040000
002734

2$:

162164
161246
'77572

4$'

162144
040000
017376

000004

025114

('00004

002734

162072

3738
3739

>1< .. to .... '" . " ' .

BACK TO THE

'1<* .. "' •••

",>II."

"TOP" OF MEMORY FROM

>1< ....

LMAO,
1$

; CHECK IF THE LOADERS ItJgRE SAVED.
; BR IF LOADER AREA ~IIAS SAVED.
;FATAL ERROR!!!
CAN'T RESTORE ,DADER AREA IF IT WA$N'T SAVED.
; CHECK FOR ~.'EM r\lG~1T.
; SKIP IF NO rf.EM MO.H.
; 01 SABLE MEr.1 J'/:GMT.
R1
; GET END OF BK. ASSUME PROG NOT RELOCATED.
; GET COUNTEP.
R2
-(RO)
: MOVE THE l..CADER AREA.
; caUNT HOW LONG THE AF~EA IS.
: eR IF NOT r:OR!; TO MOVE.
; CLEAR MONI TOR SAvED FLAG
; CHECK FOR IVEM r.1Gr,lT.
: 8R IF :"110 MEM MGMT.
; ENABLE MEM MGMT.
: RETURN.

MMAVA
2$
@IISRO
1140000,
1t1 500 ••
-( R1).
R2
3$
LMAD
MMAVA
4$
@1I5RO
PC

PARITY MEMORY

011667
004567
026501

017.il42
017444
017446
017452
017454

0 1 0146

017·~56

017460
017462
017455
017470
017472
017474
017476
017500
017502
017506
017510
017510
017514
017520
017522
017526
017530
017530
017532
017534

161465
004052

PiSRV:

162156

0(,4767

002152

Ii< '" "' .. oj. . . . .

0(14767
0047e7
oc 0025
0047E7
0007E1

*"' .... ** .. "'* ."'''' ......... ** . . .

000610
00.2120
000216

* .. * •• ,.", "' .... "'. * "' ... "''II'" * * *. ****
oj.

SBOADR
$PRINT

JSR
JSR
• WORD
JSR
BR

PC,
PC,
25
PC,
2$

SFRNTQ
SERROR

MOV
MOV
RT I

(SP)+,R8
(SP)+. R1

MOV
MOV
MDV
1$ :
T5T
8MI
TST
BNE
JSR
;u>tERROR'"**
• WORD
BR
2$ :
TST
SEQ
TST
BPl
JSR
• WORD

004004

01< 01< . . .

(SP),
RS,
UNEXPT

J~''''

0103413

OC0024
000417
OC5713
OC 1 415
005733
1 GQ374
024567
0:;:6572

MOV
.\·JDRD

0167C3
OC5733
1 C:0415
0"5713
001374

SEQ 0159

TRAP SERVICE AND SUBROUTINES.

~:E'_~CRY UNEXPECTED ERROR TRAP $ERVICE ROUTINE.
FINO OUT ~HICH R~GISTER DETECTED THE ERROR.
THEN SCAN MEMORY TO SEE IF PARITY ERROR STILL SET AND REPORT

; ; *"' ..... "'** ... ,.~ "' ..
017438
017434
017440

oj< . . . "' • •

****"' .. >to.* ...

LOCATION.

;GET PC OF INSTRUCTION WHICH CAUSED ERROR.
;GO PRINT OUT THE FOLLOWING r-,'-;SSAGE.
;,l..DDRESS OF MESSAGE TO BE TyPED
;"UNEXPECTED r,;Er.\ORY PARITY TRAP."
Rl,-(SP)
; ;PUSH R1 ON STACK
R3,"'(SP)
; IPU$H R3 or~ STACK
.MPRX,
R3
;Gr;:.T POINTER TO PARITY REGISTERS.
@(R3)+
;CHECK THE FARlTY REG FOR AN ERROR FLAG.
3$
:8R IF THIS REGISTER SHmoJS THE ERROR.
(R3)
;CHECK FOR TA8LE TERMINATOR.
1$
;8R IF It'ORE REGISTI;RS.
PC,
$ERROR
;* .... ERROR "'.* (GO TYPE A MESSAGE)
NO REGISTER INDICATED i::RROR
24
; ERROR TYPE CODE.
4$
;EXIT
(R3)
;CHECK FOR TABLE TERMINATOR.
4$
;SR IF NO MORE PARlTY REGISTERS.
@(R3)+
;CHECK THE PARITY REG FOR AN ERROR nAG.
2$
:BR IF NO EFROR FLAG.
R5,
$PRINT
;GO PRINT OLIT THE FOLLOWIf'IIG MESSAGE.
MTOE
; ADDRESS OF MESSAGE TO BE TyPED
; II MORE
THAN ONE EF:ROR FOUND."

PSCAN

;SET UP VALUES FOR ERROR PRINTIN~.
; "". ERROR ..... (GO TYPE A M~SSAGIf:)
; ERROR TyPE CODE.
; GO SCAN MEr:ORY FOR BAD PARITy.
;GO LOOK FOP, 1\10RE ERRORS.

45:

o· 26C-3
012601
OClQOC2

; ;POP STACK INTO R3
;; POP STACK INTO R1
;RETURN.

; ; ..... '" '""' ...... '" * OJ. '" "' .... 11< ..... "';t. "' ...... "',.. .... "' ..... "~"'Oj. * .. * .. "' .... ** '" • **.~ ** .** '" *** ..
;RO'.JTIN~ TO ENABLE PARITY ERROR ACTION ON MA!r~F PARITY MEMORIES
;THIS ROUTINE IS MEANT TO CATCH UNEXPECTEDS

017:536
017542
Oi 7544
('17S!:-2

3740

o 175S4
017560

3743
3745

AR~A

;* PARITY

:;;741
3742
3744

* ... " '" "''''''' '" '" **"'''*.''\jI''

; ; "' ..... *"''''. '" "'>to "'~ ..... "'''''''*'''"' .. ** .. '" **'1''' '" * ......

3698

3719
3720
3721
3722
3723
3724
3725
3726
3727
3728
3729
3730
3731
3732
3733
3734
3735
3736
37:17

oj<"

THE LClADER

o ANO 1.

ROUTI NE TO SAVE THE LOADERS AT THE END OF BK.
SAVLDR:
TST
lMAD
; CHECK IF LOADERS HAVE BEEN SAVED ALREADY.
"
4$
BNE
; BRANCH J F ALREADY SAVED
MOV
#40000, RO
;GET END OF BK
fI.'!OV
R1
RO.
;GU END OF 8K
MOV
#2$ • @IIERRvEC
; Sr:T UP TIMEOUT VECTOR
'( RO)+
Mev
(RO) •
; SEARCH FOR END OF MEMORY
1$'
BR
1$
;KEEP SEARCHING
CMP
(SP)+ •
(SP )+
; RESTORE STACK POINTER
25'
II ERRTRP ,@pERRVEC ; RESET TIMEOUT VECTOR.
MOV
-( SP)
Mev
RO.
SAVE LAST r>'E:\10RY AODR~SS (CDNT I GUOUS)
MOV
/11500. , R2
SET UP ItJORD COUNTER
-( R1 )
35:
MOV
SAVE THE LOADERS
- (RO).
DEC
R2
COUNT THE WORDS
SNE
3$
BRANCH I F MORE WORDS
MDV
( SP)+.
LMAD
SAVE LAST r.~EMORY ADDRESS
RT5
PC
RETURN
4$'

• S8TTL

3697

3718

16K VER
MACY11 30A(105.2)
20-FEB-78
07:5$
PAGE 77
PARITY WE:ViiJRY TRAP SERVICE AND SJBROUTINES •

3695
3696

3714
3715
3716
3717

MDV
BNE
HAL T
T5BEQ
ClR
MDV
MOV
MOV
DEC
BNE
ClR
TST
Be_
INC
RT5

3$'

3693
3694

3713

°RCMAP
'3.
PRGMAP+2

; 9R IF HARD\'!~RE S\'J! TCH REGISTeR.
; ADJUST SOFTWARE sw ITCH REGISTER.
; ADJUST SDFiWAR~ DJ SPLAY REGISTER,
; ADJUST RETURN APDRESS.
; RESET ~ELQCATION FACTOR.
, SET PROGRAM MAP TO POINT TO BANKS
: •.• HI 64K.
;RETURN.

'" "''''''' ..... >It .. ,. . . . ,. '"

1 62224

OC 1 001

CZQMCF0
0-124K r>':EMORY EXERCISER,
CZQMCF. P11
14-FEB-78 os: 19

3699
3700
3701
3702
3703
3704
3705
3706
3707
3708
3709
3710
3711
3712

PAGE 76

" \I.'HENCE T - CAME. THE LCADER AREA IS SAVED AT THE END OF THE 8" OF
PROC.RAM CODE WHEN THE FROClRAM IS INITIALLY RUN.
"
"'* .. "'''' '" * ***'1''' .... * '" ","',. "' ..... "',. ** "' .. * ...
"'* .... * ... "' ..... "''''.
" ;~'

3656
3657

3660
3661
3682
3663
3664
3665
3666
3667
3688
3669
3670
3671
3572
3673
:J674
3675
3676
3677
3678
3679
3680
3681
3682

SJJR
DrSPLAY
(SP)

rl-: I S SUBROUTINE MOVES

07: 56

S.Q 0158

; ; "' ....... "'* * . . *,.,~ "'" "'** "''' ~*.*

3655

3658
8659

23$
(SP) ,
(SP) •
(SP)+ ,
RELOCF

BEQ
SUO
SUB
SUS
ClR
MOV
CLR
RTS

20-FEfI-78

01757:2
01'1600

C057£7
0014:54
032777

MAMF:

162534
000100

161366

CO 1 o~o

TST
BEQ
BI T
8NE
TST
8EO

aC57E7

161020

032i77
,)01004
0:6727
103415

000040

1&1350

BIT

161764

0010JO

BNE
O:,P
BlG

MPRX
MAMF2
IISwo,
MMI1F2
RE LOCF
SET AE
#$\»5,
SETAE
FSTADR,
MAMF2

@swR

GlSI'!R
;/1'1000

CHECK IF ANY PARITY REGISTERS EXIST.
EXIT IF NO FARlry REGISTERS.
CHECK FOR INHIBIT PARITY ERROR DETECTION.
EXIT IF NO PARITY ERROR DETECTION.
ChECK] F Pf<OGRM1 RELOCATED OUT OF BANK O.
BR IF PRO:) IN BANK O.
CHECK IF \lECTORS PROTECTEQ.
SR IF VECTeR AREh PROTECTED.
CHECI.{ FOR SThRTING ADDRESS AS:JVE THE VEI!;TQRS.
EXIT IF VECTORS EXPOSED TO TESTING.

CZQIIICFO
O-,24K MEMORY EXERCISER. 16K YER
MACY11 30A('052)
20-FE8-78 07:56 PAGE 78
CZQMCF.P11
14-FEB-18 08:19
PARITY ~EMORY TRAP SERVICE AND SUBROUTINES.

3746
3747
3748
3749
3750
3751
3752
3753
3754
3755
3756
3757
3758
3759
3760
3761
3762
3763
3764
3765
3766
3767
3768
3769
3770

017602
017610
017614
017616
0'7622
017626

017630
017632
017634

016737

162030

000114

SETAE:

005037. QODi 16
O' 03<6
0' 6703 162006
052733
OC5713
001374
012603
000207

MaV
CLR
MOV

MaV

IIAMF1:

000001

IIAMF2:

DIS
TST
BNE
MOV
RTS

tII,PARVEC ; SET PARITY ERROR TRAP VECTOR
.,PARVEC+2
;PRIORITY LEVEL 0 ON TRAP
R3,-(SP)
: : PUSH R3 O~ STACK
R3
:GET PARITY REGISTER TABLE POINTER,
• MPRX ,
'AE,
III(R3)+ :SET ACTION ENABLE BIT IN PARITY REG
(R3)
:CHECK FOR END OF TA8LE.

MAMFl
(5P)+,R3

;8R IF MORE PARITY REGISTERSo
; ;POP STACK INTO R3

;RETURN.

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

i ; .............................. " •••••••••••••••••••••••••••••••••••

; ;"'

017636
017642
011644
017652
017654

017656
017662
017664
017666
017614
017676
017702
017706
3771
3772 017710
3773 017712
3774 017716
3775 017716
3776 017722
3777 017726
3778' 017730
3779 017734
3780 017736
3781
017740
3762 017742
3783
3784
3785
3786
3787
3788

005767
001437
032777
001033
010346
016703
005733
1C0023
032773
001010
OG4767
OC4767
OC.0026
000411
004767

004767
004767
000027
004767
005713
001351
012603
000207

000100

SUBROUTINE TO CHECK PARITY REGISTERS FOR ERRORS THAT DIDN'T TRAP.

CKPMER: TST

1624: ;
161266

161746
1$:
000001

177776
64$:

000422
001732

25:
65$:

000402
001712

;CHECK FOR INHISlT PARITy ERROR CHECKING.
;BR IF PARITY ERROR CHECKING INHIBITED,
l lPUSH R3 ON STACK

MOV

.MPRX,

;GET PARITY REG TABLE POINTER.

TST
BPL
BIT
8NE
dSR
..JSR
• WORD
BR

P(R3)+
3$'
'BITO,
25
PC,
PC.
26
3$
PC,

:CHECK THE PARITY ~EG FOR AN ERROR FLAG,
lBR IF NO EPROR
.;-2 (R3) :CHECK IF A TRAP SHOULD HAVE OCCURRED.
;BR IF NO ACTION ENABLE.
SPRNTQ
;5ET UP VALUES FOR ERROR PRINTING.
SERROR;". ERROR ••• (GO TYPE A MESSAGE)
; ERROR TYPE CODE.

~SR

TST
BNE
MOV
RTS

3S'

PSCAN

PC,
SPRNTQ
PC.
SERROR
27
PC t
PSCAN
(R3)
'$
(SP)+,R3
PC

:GO SCAN ALL MEMORY FOR PARITY ERRORS.
:SET UP VALUES FOR ERROR PRINTING.
; ••• ERROR ••• (GO TYPE A MESSAGE)
; ERRO~ TYPE CODE.
lGD SCAN ALL MEMORY FOR PARITY ERRORS,
: CHECK FOR TABLE TERMINATOR.
;BR IF MORE~
; ,POP STACK INTO R3
; RETURN.

....................................."'...........................
.................................................................

45:
;
•
•
•
;

rcEGISTERS~

,BR IF NO PARITY

,SW6,
PSWR
4$
R3,-(SP)

~SR
~SR
.W('ID:)

000010

lCHECK IF ANY PARITY REGISTERS EXIST,

BIT
BNE
MDV

~SR

000026

MPRX

REO

YHIS SUBROUTINE WILL SCAN ALL OF "'EMORY LOOKING FOR BAD ,PARITY.
TYPE OUT ALL LOCATIONS FOUND TO BE BAD, AND WRITE BACK INTO THE
LOCATIONS IN ORDER TO RESTORE GOOD PARITY.

MACY11 30A(1052) 20-FEP-7B 07:56 PAGE 79
0-124K MEMORY EXERCIS,ER. 16K VER
CZQMCFO
PARITY MEMORY TRAP SERVICE AND SUBROUTINES.
14-FEB-78 08:19
CZQMCF .Pl1
3789
3790
3791
3792
3793
3794
3795
3796
3791
3798
3799
3900
3801
3802
3903
3804
3805
3806
3B07
3808
3909
3810
3811
3812
3813
3814
3815
3816
3811
3818
3819
3820
3821
3822
3823
3824
3825
3826
3927
3829
3629
3630
3831
3932
3833
3934
3935
3836
3837
3838
3839
3840
3841
3942
3843
3844

SEQ 0'60

~ PESRV.

017744
017744
017746
017750
017752
017754
017756
017762
011766
011712
017774
020000
020002
020004
020006
020012
020020
020024
020030
920032
020036
020042
020046
020052
020054
020060
020062
020062
020064
020066
020072
020074
020076
020100
020102
020106
020110
020110
020114
020120
020122
020124
020126
020130
020132
020134

020140
020142
020146
020150
020152
020154
020160
020162

PSCAN:
010046
010146
010246
010346
010446
013746
013746
004567
026636
012700
005001
005002
005004
OC4167
012137
005031
005767
001406
013746
005031
012702
030007
001003
030167
001442

MOV
MDV
MOV
MOV
MOV
MOV
MOV

000114
000116
003520

~SR

• WDRD
Mar
CLR
CLR
CLR

000001

000256
000116
000116
160556
172344
172344
040000
161452

1$:

161446

;; PUSH RO ON STACK
;; PUSH Rt ON STACK
j ; PUSH R2 ON STACK
; ; PUSH R3 ON STACK
;; PUSH R4 ON STACK
;;PUSH • .,,14 ON STACK
;;PUSH @l1I116 ON STACK
:GO PRINT OUT THE FOLLOWING MESSAGE •
; ADDRESS OF MESS,\GE TO BE TYPED
; "SCANNING MEMORY FOR BAD PARITY.·
;SET IlIT POINTER TO FIRST BANK.
;eLR HI 64K POINTER.
; INIT ADDRESS POINTER.
; INIT ERROR DETECTED FLAG.
:CLEAR THE PARITY REGISTERS.
;HALT IF ANOTHER PARITY TRAP.

MOV
CL::
TST
BEQ
MOV
CLR
MOV
9IT
BNE
BIT
BEQ

RO
'BITO,
Rl
R2
R4
PC,
CLRPAR
.,114
"16.
.,1116
MMAVA
; CHECK FOR ~EMORY MANAGEMENT.
;BR IF NO MEM MGMT.
1$
;: PUSH .#KI PAR2 ON STACK
"'KIPAR2,-(SP)
; INIT MEM MGMT TO POINT TO BANK O.
.'KIPAR2
;SET ADR POINTER TO PAR2.
1140000. R2
;CHECK IF THIS BANK OF MEM EXISTS.
RO,
MEMMAP
taR IF THIS BANK EXISTS.
2$
Rl,
MEMMAP+2 : CHECK HI 64K MAP.
; BR I F THIS BANK OOESN I T EXIST.
10$

MOV
MOVS
MOV
TST
BPL
TST
BNE
DEC
INC

Rl,-(SP)
(R2),
Rl
.MPRX.
R3
"(R3)+
6$
R4
5$
SERTTL
R4

~SR

PC,
PC,
30
(R21,
P-(R3)
(R2)
P(R3)+
6$
R5,
PEWNC

~SR

000114

RO,-(SP)
Rl,-(SP)
R2,-(SP)
R3,-(SP)
R4,-(SP;
.'"4,-(SP)
.'"6,-(SP)
$PRINT
R5,
SCANM

2$:
010146
111201
C: 6703
005733
1 00024
005704
001003
005367
005204

3$:
161536
4$:

161004

004767
004767
000030
111212
005053
105712
005733
100005
004567
026700

000210
001520

005073
005113
001350

177776

~SR

.WORD
MOVB
CLR
TSTB
TST
BPL
~SR

00'3352

.WORD

6$:

0052C2

032702
001341
0'2601

5$:
64$:

0177',7

CLR
TST
BNE
INC

BIT
BNE
MOV

SPRNTQ
$ERROR

(R2)

$PRINT

"-2(R3)
(R3)
4$
R2
HMASK4K, R2
3$
(SP)+,Rl

: PUSH Rl ON STACK
READ THE LOCATION TO SEE IF IT HAS A PARITY ERROR.
SET UP POINTER TO PARITY REGISTERS.
CHECK FOR THE ERROR FLAG.
SR IF NO EPRQR FLAG.
CHECK IF FIRST ERROR. THIS SCAN.
BR IF MORE THAN ONE ERROR FOUND.
ADJUST ERROR COUNT.
SET FLAG TO INDICATE ERROR FOUND.
SET UP VALUES FOR ERROR PRINTING.
**. ERROR . . . (GO TYPE A MESSAGE)
ERROR TYPE CODE.
REWRITE THE LOCATION TO CLEAR BAD PARITY,
CLEAR THE ERROR flAG.
CHECK IF THE PARITY ERROR WAS CLEARED.
CHECK FOR THE ERROR FLAG.
SR IF IT IS OK.
GO PRINT OuT THE FOLLOWING MESSAGE.
ADDRESS OF MESSAGE TO Be TYPED
~PARITY ERPQR WIll NOT CLEAR."
CLEAR OUT THE PARITY ERROR FLAG.
CHECK FOR THE END OF REG ADR TABLE.
SR IF MORE PARITY REGISTERS.
GO TO NEXT MEMORY ADDRESS.
CHECK FOR END OF 4K BANK.
SR IF MORE MEMORY THIS BANK.
: POP STACK INTO Rt

SEQ 0161

CZOMCF:)
0-12~K r:EIY'ORY EXERCISER,
CZOMCF.P1'
14-F'EB-78 08:,9

3845
38.!16
3847
3848
3849
3850

3855

02016..:3
020166
020172
020176
020200
020206
020212
020214
020216
0202.20
020:224

3856

020226

3857

020230
020232
02C234
020236
020242
0,2024';
020244
020250
020254
020256

3851
3852
,B53

3854

3858
3859

3860
3B61

3862
3863
3864
3965

3866
3B67

02~260

3868

020262
020264
020266

3869
3870
3971
3872
3873
3874
3B75

3976
3B77
3979
3879

3880
3891
3882
38S3
3884
3985
3886
3887

000402
062702
005767
0014' '3
C62737
0: 4702
OC6300
006101
100313
012637
0" 0402
106300
100306
OC 5704
001003
OC4567
025706

16K VER
MA~Y11 30A(1052)
20-FES-78
07:56
PARITY MEMORY TRA.P SERVICE AND SUBROUTINES.

10$:

020000
160410
000200
040000

11$:
172344

12$:
20$:
003250

BPL
MOV
BR
ASLB
BPL
TST
BNE
JSR
.WORD
MOV
MOV
MOV
MOV
MOV
MOV
MOV
RTS

(SP)+,@l1t116
(SP)+,i)#114
(SP)+,R4
(SP)+,R3
(SP)+ •• ~
(SP)+, Rl
(SP)+,RO
PC

21$:
012637
012637
0'2604
012603
012602
012601
012600
000207

: ;POP STACK
: :POP STACK
: ;POP STACK
; ; POP STACK
: ;POP STACK
; ;PQP STACK
: :POP STACK
; RETURN.

INTO @1i116
INTO @#114
INTO R4
INTO R3
INTO R2
INTO R1
INTO RO

; ; •••• ** *'" * .. * .~ ......... *. "" "' •• * ........ *"' .. * .... ", ... *'" *. *' •• "' •• 111*. '" "'*.'" *.
:ROUTINE TO CLEAR ALL PARITY REGISTERS PRESENT

020270
020270
020272
020276
020300
020302
020304
020306
020306
020310

; : .......... *'" "' ••..• "'''' "'''' ...... *"'. * "'. "'. "'.*. **..... * '" '" * •• * '" "'* ** *. ** * * *'" **. *

CLRPAR:
0; 0346
016703
CC5713
001402
005033
000774

161332
1$:

MOV
MOV
TST
BEQ
CLR
BR

R3,-(SP)
.MPRX,
R3
(R3)
2$
@(R3)+
1$

;; PUSH R3 ON STACK
JGET PARITY REGISTER TABLE POINTER.
jCHECK FOR THE TABLE TERMINATOR.
; BR IF DONE ALL PARITY REGISTERS.
;CLEAR THE PARITY REGISTER.
: BR FOR MORE

MOV
RTS

(SP)+,R3
PC

: : POP STACK INTO R3
:RETURN.

2$:
012603
000207

.SBTTL
SUBROUTINES TO SET UP DATA FOR ERROP PRINTOUT ROUTINE.
i: "'''' ...... "' .....
* ••••••••••••••• >i<"'.
i'"
TH::SE ROUTINES ARE US EO TO TRANSFER DATA TO COMMON TAG AREA (.SCMTAGl
; ..
FOR ERROR PRINTOUT BY .$ERROR & .$ERRTYP ROUTINES FROM **SYSMAC ....

"'111 •• "''''* •• *''' ..... ** ••

3888
36B9
3890
3891
3892
3693

SEQ 0162

11 $
; BR TO CHECK FOR NEXT BA.NK.
"20000, R2
; SK I P Btl.NKS THAT AREN I T THERE.
MMAVA
; CHECK FOR fI.'EM MGMT.
12$
; BR IF NO MEM MGMT.
11200.
ifl#KIPAR2 ;UPDATE MEr-.' MGMT REG TO NEXT 4K.
#40000, R2
;RESET ADDRESS POINTER TO BEGINNING OF BANK.
RO
:UPDATE BANK POINTER.
R1
: ••• HI 64K.
1$
: 8R IF MORE BANKS.
(SP)+,@lNKIPAR2
:; POP STACK INTO @lIIKIPAR2
20$
:GO CHECK IF ANY ERRORS FOUND.
RO
;UPDATE POINTER TO NEXT SANK.
1$
: BR I F MORE BANKS.
R4
;CHECK IF M.Y PARITY ERRORS DETECTED.
21$
JBR IF ERRORS DETECTED.
R5.
$PRINT
JGO PRINT OUT THE FOLLOWING MESSAGE.
NOPES
; ADDRESS OF MESSAGE TO BE TYPED

BR
ADO
TST
BEQ
ADO
MOV
A5L

Rr .

172344

PAGE 80

*"'*.** .*."''''* "*

; ; ....... "'. * '" * **. * '" '" "' . . ** ........ '" "' .... ** .. '" "' •• "' ...... *........ '" ** ...... ** •• '" *. -** -*"

020312
020316
020322

010267
0050f7
000430

160602
160602

SPRNT:

MOV
ClR
BR

R2,
$GDDAT
SPRNTB

SGDADR; SAVE THE ADDRESS UNDER TEST.
;SHOULO BE OATA IS "0".

020324
020330
020334

0143E7
013367
000402

16063C
160626

SPRNTQ: MOV
MOV
BR

-(R3).
$TMPO
@(R3)+, $TMPI
SPRNTO

;GET THE PARITY REGISTER ADDRESS.
;GET THE COiHENTS OF THE PARITY REG.

020336
020342

O~ 1367
010267

160616
160552

SPRNTP: MC!V
SPRNTO: MOV

(R3),
R2,

:GET THE PARITY REGISTER ADDRESS.
:GET THE MEMORY ADDRESS BEING TESTED

3894
3895
3996
3897
3898
3B99
3900

CZQMCFO
0-124K fJ'EMORY EXERCISER,
CZQMCF. Pl 1
14-FEB-78 OB:19
3901
3902
3903
3904
3905
3906
3907
390B
3909
3910
3911
3912
3913
3914
3915
3916
3917
3918
3919
3920
3921
3922
3923
3924
3925
3926
3927
392B
3929
3930
3931
3932
3933
3934
3935
3936
3937
393B
3939
3940
3941
3942
3943
3944
3945
3946
3947
3948
3949
3950
3951
3952
3953
3954
3955
3956

020346

000414

020350
020354
020360

0102157
005367
000407

160544
160540

020362
0203G6
020372
020400
020404
020410

010367
C.10267
162767
010067
010167
000207

160572
160526
000002
160520
160516

$TMPO
$GDAOR

MACY11 30A(1052)
16K VER
20-FEP-7B 07:56
PAGE 81
SUBROUTINES TO SET UP DA.TA FOR ERROR PRINTOuT ROUTINE.
BR

160520

SPRNT A

SPRNTt : MOV
DEC
BR

R2,
$GDAOR
SPRNTA

$GDADR

; GET THE MEW-DRY ADDRESS BEING TESTED
; ADJUST IT FOR PR INTOUT •
; SR TO COMMON SECTION.

SPRNT3: MOV
SPRNT2 : MDV
SUB
SPRNT A: MOV
SPRNT B: MOV

R3,
R2,
.2,
RO,
Rl,
PC

$TMPO
$GDADR
$GOADR
$GDDAT
!3DDAT

:GET THE DATA IN R3.
:GET THE MEr/DRY ADORESS BEING TESTED
: ADJUST IT FOR PR INTOUT.
;GET WHAT THE DATA SHOULD BE
;GET 1;HAT THE DATA WAS
; RETUKN TO ENTER ERROR ROUTINES

RT~

;;.t •••• "'''' •••• ''' .......... * .. * ••• ",ot* "' • • • • • '" ."' • • • "' • • • "' • • "' • • "''''.
;* SUBROUP'.IE TO TYPE OUT A MAP OF .:1K BANK.
;" 1'10 POINTS TO THE MAP UPON EN ERING THIS ROUTINE.
020412
020414
020416
020422
020424
020430

005710
001007
0057€0
001004
004567
0262f'6

020432
020434
020434
020436
020440
020442
020444
020450
020452
020456
02:0460

000475

020~62

020464
020470
020472
020474
020476
020502
020504
020510
020512
020514
020516
020520
02C524
02C526
020532
020534
020534
020536
020540
020542

: ;. '" "' ••• '" "'. "'. 0;;* '" '" "'*. "' •••• '" "'. "'.'" '"

000002
003062

SEQ 0163

; BR TO COMMON SECTION.

TYPMAP: T' .
BNE
T5T
BNE
JSR
.WORD

( RO)
1$
2(RO)
1$
R5,
NOMEM

"'''''''* ••••

• '" '" "'.* "' .... '" '" "' ....... * •••• "'* * .** *. **

CHECK I F ANY MEMORY IN MAP •• ". La 64K.
SR I F MEMORY IN MAP.
••. HI 64K.
BR J F MEMORY IN MAP.
GO PRINT OUT THE FOLLOWING MESSAGE.
ADDRESS OF MESSAGE TO BE TYPED
"NO MEMORY FOUND. N
EXIT

MOV
Mev
MOV
MOV
MOV
CLR
MOV
MOV
BIT
BNE
BIT
TSTB
BNE
SUB
SBC
JSR
.WORD
BR
TSTB
BEQ
ACD
ADC
JSR
.WORD

Rl ,-( SP)
R2,-(SP)
R3,-(SP)
R4,-(SP)
#BITO,
Rl
R2
11-1.
R3
R3,
R4
Rl,
(Ru)
3$
R2,
.2(RO)
3$
R3
5$
#1,
R3
R4
RS,
SPRINT
TO
4$
R3
5$
#1,
R3
R4
R5,
SPR INT
FROM

: PUSH Rl ON STACK
; PUSH R2 ON STACK
; PUSH R3 O~J STACK
; PUSH R4 ON STACK
SET UP BANK POINTER ••• LO 64K.
••• HI 64K.
SET UP ADDPESS POINTER TO -1.
HI BITS OF ADDRESS AS WILL.
CHECK THE r.IAP FOR THIS BANK.
BR IF THIS BANK PRESENT •
CHECK HI 6";K MAP.
BR IF THIS BANK PRESENT.
CHECK FOR PREVIOUS PRINTOUT.
BR IF ALREADY TYPED "TO"
SACK UP TO LAST ADR OF PREVIOUS BANK.
••• HI ADDRESS Bl TS.
GO PR!rH OUT THE FOLLOWING MESSAGE.
,\DORESS OF MESSAGE TO 8E TYPED
GO TO TYPE THE ADORESS.
CHECK FOR PREVIOUS TYPEOUT.
BR I F ALREADY TyeE "FROM" •
POINT TO FIRST ADDRESS OF THIS BANK.
•.. HI BITS OF ADDRESS.
GO PRINT OJT THE FOLLOWING MESSAGE.
ADDRESS OF MESSAGE TO BE TYPED

MOV
MOV
ASL
ROL

R3,-(SP)
R4,-(SP)
R3
R4

;PUSH R3 Ot~
; PUSH R4 O~J
BIT 15 INTO
BIT 15 INTO

SPRINT

1~ :

010146
0102.:16
C~ 0346
010446
0: 2701
005002
0127C3
Oi 0304
030110
001014
030260
0010',
105703
001042
1627C3
005604
004567
025517
000410
1057C3
001431
OE.2703
005504
004567
0::t5507

000001
177777
2$:
000002

B~;E

000001
003002

3$:
000001
002760
4$:

010346
010446
006303
006104

STACK
STACK
C-9I T
R4.

CZOMCF,}
0-124K r,'EMORY EXERCISER,
ClQMCF.P'1
14-FEB-78 08:19
3957
3958
3959
3960
3961
3962
3963
~g64

3955
3956
3967

020544
020546

OC'6003

020550
020554
020560
020561
020562

013746
004767
003
000
010346

177776
004104

020561:1
020570
020574
020575
020576
020600
020602
0:20606
020610
020612
020614
020616
020620
020622
020624
020626

013746
004767
005
001
012604
012603
062703
005504
006301
006102
103321
012604
012603
012602
012601
000207

177776
004070

16K VER
M,o.;--V11 30A(1052)
~O-FEB-78
07:56
PAGE 82
SUBROUTINES TO SET UP DATA FOR ERROR PR!NTOUT ROUTINE.

010446,

020000

.S8TTL

'-\0':::9

4050
4051
4052
4053
~OS4

4055
4e56
-lOS7
·~05B

·1059
-lOGO
4051

020630
020634
020640
020642
020644
020652

013746
004767
o~ 2504
010516
032777
001117

020654

000416

020656
020662
020670
020674
020700
020702
020704
020710
020712
020712
020720
020722
020726
020732
020736
020740
020744
020746
020754
020756
020764
020766
020774
020776
021002
021006
021010
021016
021020
021024
021026
021032
021040
021042
021050
C21055
:)21062
J:c'l 070
021074
021100
021104
021112
021120
021124
021126
021130
02113-1
021 1 4 ~l
021146
021150
02 ~ 1 S6

02' 1 6'~
qOSB

"'* "' ......

020630

177776
001524

040000

013746
012737
DeS737
012637
co 0466
022626
012637
000426

000004
020702
177060
000004

0:2777
OC'1407
017746
0:'271.6
122667
001465
105767
001421
126767
1 G 1 015
022777
001404
016767
0(' 0446
105067
005067
0(;0415
C-:;2777
001011
005767
001406
OC'5267
026767
002024
0127E7
0,6767
105267
'I; 6767
011667
0116E7
005067
, 12767
0',6777
016716
0205 :1
001402
000167
o i 2767
005767
001404
1:2 67;7

000400

1602<56

:)21172
021176
021200

UU0004

160220

160212
000340
1601,. ;

160127

001000

160154

160116

160112

160101
160162
16(",2:2

160166
160052
160132
000001
000552
160020
160014
160012
160010
160066
000001
157764
157762

0·' 6767
005767
001430
032777

07:56

160044
160034
160112
160120

160003
160022

000470
037777
160044

160444

157726

000021

160422
160372
1574C2

160372

000040

157732

pc.

PAGE 83

SEq 0165

@NERRVEC,-(SP)
; SAVE THE CONTENTS OF THE ERROR VECTOR
/iS$ ,@l#ERRVEC
; SET FOR TIMEOUT
MOV
TST
@#177060
: TIME OUT ON XOR?
MOV
(SP)+,i,PNERRVEC
; RESTORE THE ERROR VECTOR
BR
$SV LAD
;GO TO THE NEXT TEST
5$:
CM?
(SP)+,(SP)+
;CLEAR THE STACK AFTER A TIME OUT
MOV
(SP)+,@\IiERRVEC
; RESTORE THE ERROR VECTOR
BR
: LOOP ON THE PRESENT TEST
7$
SS: :hIlHIlIIEND OF COD:: FOFl THE XOR TESTERH###,i'
BIT
1J8lT09,@SWR
; LOOP ON SPEC. TEST?
2$
BEQ
;SR IF NO
IPStoJR,-(SP)
MOV
;SET DESIRED TEST NUM. FROM SWR
#$SWRMK. (SP)
BIC
;STRIP AloJAY UNDESIRED
CMPB
(SP)+,$T5TNM
;O!·~ THE RIGHT TeST?
SaVER
;8R IF ve;s
BEO
2$:
TST8
$ERFLG
; HAS AN ERROR OCCURRED?
BEQ
3$
; ~R I F NO
CMPB
SERMAX. $ERFLG
:MAX. ERRORS FOR THIS TEST OCCUR~ECi'
3$
BHI
; Bf( IF NO
BIT
NBIT09,@5WR
; LOOP ON EFROR?
4$
BEQ
;8R IF NO
;SET LOOP ADDRESS TO LAST SCOPE
7$:
MOV
$LPERR. SLPADR
SOVER
•
BR
4$:
CLR6
; ZERO THe ERROR FLA~
$ERFLG
CLR
;CLEAR THE NU~BER OF ITERATIONS TO MAKE
$TJMES
BR
1$
;ESCAPE TO THE NEXT TEST
3$:
BIT
IIf,lIT11 ,~SWR
; INHIBIT lTERATIONS'?
BNE
1$
leR IF YES
; IF FI RST PASS OF PROGRAM
TST
$PA5S
BEQ
1$
INHIBIT ITERATIONS
INC
; INCREMENT ITERATIDlII COUNT
SIeNT
CMP
STIMES, $ICNT
;CHE~K THI; NUMS::R OF ITE~ATIONS MADE
SOVER
BGE
j8R IF MORE ITERATION REQUIRED
1S:
Mev
#t,$ICNT
;REINlTIALlZE ThE ITERATION COUNTER
MOV
$MXCNT ,$TIMES
;SET NUMSER OF ITERATIONS TO DO
$TSTNM
$SVLAD: INC~
;COUNT TES; NUI,19ERS
MOVB
$TSTNM, $ I ESTN
;5[T TEST r·!ur.1BER IN APT MAILBOX
M('V
(SP),$LPAOR
; SAVE SCOPE LOOP AOORESS
Mev
(SP), $LPERR
; SAVE ERRor LOOP ADDRESS
CLR
$ESCAPE
;CLEAR THE ESCAPE FROM ERROR ADORESS
MOVB
II 1 • $ERMAX
:Or>jLY ALLOI'J ONE( 1) ERROR ON NEXT TEST
$OVER:
MOV
ST5TNM,(!;1P[SPLAY
;DISPLAY TEST NUI;'IB~R
MOV
$LPADR,(SP)
; FUDGE R~TURN AC.DRESS
INSERT: CM?
R5,
ISP I
CHE~K FOR Loa I' ON TEST.
1$
BEQ
SR IF START NEXT TEST.
JMP
E:NDINS
JMP 1 f LOOP ON LAST TEST.
1::;:
MOV
SET 8~ 80UtmRY MASK.
N'37777. BLKMSK
T:· T
$PASS
CHECK FOR PASS O.
BEQ
2$
SR IF PASS 0
CMPB
$ TSTNM. #21
CHECK IF 1:. SECTION 3.
BHIS
3$
BR IF IN SECTION 3.
2$;
ASR
BLKMSK
RES~T 8D~.m)RY TO 4K.
FSTADR. TMPFAD
35:
MOV
GET FIRST ADDRESS.
TST
RELOCF
CHECK ! F pqG RE.LOCATED.
4$
BEQ
SR IF NOT RELOCATED.
#SW05,
@SWR
BIT
CHECK I F Lac 0-776 TO BE PRQTECTED.

ens

160137

004000

20-FEB-7S

MOV

000004

160143

$SCOPE:
:- THE NEXT TlvO INSTRUCTIONS PROVIDE AN INTERFACE TO THE $CKSltlR ROUT INE
;- WIHTOUT USING A "TRAP" INSTRUCTION AS CALLED FOO B¥ **SYSMAC",",
-( SP)
@#PSloJ,
; PUT THE PROCESSOR STATUS ON THE STACK
MOV
$CK$wR
;GO TO THE SU8!10UTINE
JSO
PC,
R4
: SAVE M1tHMJM BLOCK MASK NEXT TE$T,
MOV
(R51+,
15P)
; PUT RETURN PC ONTO sr ACK, SIMULATE ,",SR
MOV
05,
#6IT14,@lS\!JR
; ; LOO::' ON P;;ESENT TEST?
BIT
1 S:
; : YES IF SW14=1
BNE
SaVER
;tln/iIINSTART OF CODE FOR THE XDR TESTERil'lrl{;'iil'
; ; IF RUNNING ON THE "XDR" TESTER CHANGE
$XTSTR: BR
G$
: ; THIS INSTRUCTION TO A "NaP" (NOP.240 I

16K VER
MACY11 30A(1052)
SCOPE HANDLER ROUTINE

021160

~067

SCOPE HANDLER ROUT INE

"''''* '" .,," *"'*'" ****'" '" * .. * ** **1iI.1I<>i< *'"

II< ......
** *'" ** ..... "'''' •• ** "'''' .. '''**
; ",THIS ROUTINE CONTROLS THE LOOP 1 NG OF SUBTESTS. IT WI Ll INCREMENT
: .. AND LOAD THE TEST NUM!3ERISTSTNf.1) ItHO THE DISPLAY REG. (DISPLAY<7:0»
; .. AND LOAD THE ERROR FLAG I HRFLGI INTO OISPLAY<15:0S>
; ",THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE:
LOOP ON TEST
; ... 5;,0114=1
i .. 5Wl1 =1
INHIBIT lTERATILI'lS
LOOP ON ERROR
; .5'1,'09=1
LOOP ON TEST IN SWR<4: 0>
; *5"1'J08=1
; ... CALL
SCOPE
; : SCOPE= I aT
:

: ; ..... or '"

CZQMCFO
0-124K MEMORY EXERCISER,
CZOMCF. P11
14-F E8-78 08: 19
4013
4014
4015
4016
4017
40' 8
4019
4020
4021
4022
4023
4024
4025
4026
4027
4028
4029
4030
4031
4032
4033
4034
4035
4036
4037
4038
4039
4040
4041
4042
4043
4044
4045
4046
4047
4048

R3
R4,-(SP)

3958
3969
3970
3971
3972
3973
3974
3975
3976
3977
3978
3979
3980
39B1
3982
3983
3984
3985
3986
3987
3988
3989
3990
3991
3992
3993
3994
3995
3996
3997
3998
3999
4000
4001
4002
4003
4004
4005
4006
4007
4008
4009
4010
4011
4012

SEO 0164

; RESTORE 61 '5 14-0.
: ; SAVE R4 FOR T y'PEOUT
; ; TYPE ADDRESS BITS 21-15
;
THE NEXT TWO INS-:'RUCTIDNS PRO v I DE AN IrHERFACE TO THE $TYPOS ROUT INE
;. WlHTOUT USING A II TRAP" INSTRUCTION A5 CALLED FOR BY ... ·SVSM,.\C .....
@#PSW,
-I SP)
: PUT THi:. PRC'CESSOI1 STATUS ON THE STACK
MOV
$TYP05
;GG TO THE SUBRO'JTINE
PC,
JSR
; ; TyPE 3 DIGIT (5 I
,L :TE
3
; : SUPP~ESS LEADING ZEROS
0
• BYTE
R3,-(5P)
; ; SAVE R3 FeR TYPE.QUT
MOV
; ; TYPE ADDRESS BITS 14"'0
;
THE NEXT Hla INSTRUCTIONS PROV I DE AN INTERFACE TO THo $TVPOS ROUT !NE
WIHTOUT U5ING A "TRAP" INSTRUCTION AS CALLED FOR BY .... SVSMAC .. • •
:
-( 51")
~#PSw ,
: FUT THE PROCESSOR STATUS ON THE STACK
MOV
PC,
S T .. POS ;GO TO THE SUSROIJTINE
JSR
; : TYPE 5 DIGIT (51
5
• BYTE
1
; : TYPE LEADItJG ZEROS
• BYTE
; : POP ST AC~ INTO R4
(SP)+,R4
MOV
; ; POP 5i ACK INTO R3
MOV
(5PI+,R3
#20000, R3
:UPOATE TO t-.EXT BANK.
5$:
ADO
: ••• HI ADDRESS BITS.
R4
ADC
R1
: SHI FT POINTER ••• LO 64K,
ASL
; ••• HI 64K.
ROL
R2
2$
; BR IF MORE BAt-:KS.
Bec
; : POP STACK INTO R4
(SP)+,R4
MOV
; ; POP STACK INTO R3
(SP)+,R3
MOV
(SP)+,R2
: ; POP 5T ACK INTO R2
MDV
; : POP STACK INTO
MOV
(SP)+, R1
;RETURN.
6$:
PC
"TS

ROR
MOv

0-12~"

. (111
021206
021210

4071
4072
4073

021216
021220
021226

.. 074

021234
021242
021244
021250

4075
4076
4077
4078
4079
4080
4081
4082

4083
4084
4085
4086
4087

4088
4089
4090

4091
4092
4093
4094
4095
4096
4097

4098
4099
4100

4101
4102
4103

4104
4105
4106
!l107

4108
';109
4110
4111
4112
4113
4114

4115
4116
4117
4118

4119
4120

4121

021252

021256
021260

021266
021274
0:21302
021310
021316
021322
02132·'
021332
021334
021342

021346
02 t 350
021352
021356
021360
021364
021370
021376
021400
021406
021414
021420
021422
021426
021434
021436
02144~

021452
021460
021462021470
021<:72
021500
021502
021506
021510
021514
021516
021516
021522

',IEMORY EXERCISER,
',::',-FEB-78 08: 19

16K VER

MACil1 30A(1052)
SCOPE HANDLEr( ROUTINE

BEO

001424
0:;:6727
lC3C20

160350

001000

012761

001000

0:'2767

000001
160334

160336
160334
001 "'00

O~6727

1 (} 1 006
004567

001770

JSR
. WORD

RS,
SKPMES

CLR

157350

Mova

- (SP)
$TSTNM,

JSR
• WORD

002242

1603' 0

TS160176
160166
10$:

B~ .;;

BNE

160164
160160
160156

160122
160116
11$!

160142

0':;6767
0 ... 6767
036767
001004
036767
001404
0.26767
10'406
005767
001017
005767

160140
160134
160112

160060
of 50122

160104

160114

160100

160064

BNE

14$ :

160022

001014
15$:
004567
026763

(SP)

;GO PRINT OUT THE FOLLOWING MESSAGE.
; ADDRESS OF MESSAGE TO BE TYPED
; "SKIPPING TEST Ii"
; C LEAR THE \>JORD ON THE 51 ACK.
; PUT THE DATA ON THE STACK.

20-FEB-78

07:56

PAGE 8!:l

SEO 0167

021532
021535
021542
021543
021544
021540
021552
021560

021563
021 ~72
021576

021600
021602
021610
021614
021620

013746
0047'-'"

177776
003122

003
001
DC 0427
062716
000004
O£.2767
000004
012767017777
Ot 6705
157772
040567
157770
006305
001374
012767
017777
157762
016705
040567
157760
OC6305

021622

C01374

021624
021626

0(.0207
000004

021630
021634

013746
004767

157326
160000

157770

177776
000524

THE NEXT HJO INSTRUCTIONS PROVIDE AN INTERFACE TO THE STYPOS ROUTINE
;.
WIHTDUT USING A "TRAP" INSTRUCTION AS CALLED FOR BY '-SYSMACu.
MOV
@/tPSW,
-(SP)
;PUT THE PROCESSOR STATUS ON THE STACK
JSR
PC,
STYpoS
:GO TO THE SUBROuTINE
.BYTE
3
;TYPE 3 DIGITS.
• BYTE
1
; TYPE LEADIt~G ZEROS.
BR
END INS
;RETURN TO SKIP TEST.
16$:
Ar"l
174,
(~P)
;SKIP THE SKIP ON RETURN.
ADD
114,
$LPADR
;ADJUST THE LOOP ADR PAST THE SKIP.
20$:
MOV
Nr-,iiASK4K, F ADMSK
; GET 4K MASK.
Mav
n.~PFAD, RS
;GET FIRST ADR.
21$:
BIC
R5,
FADMSK
;CLR MASK ABOVE LO'HEST BIT OF FIRST ADR.
ASL
R5
;MOVE LO.oJEST BIT UP ONE.
BNE
21$
;lCoP UNTIL OvERFLOW.
MOV
IIMASK4K, LA,"'.\~SK
; SET MASK BITS
MOV
TMPLAD, RS
;GET LAST AJR.
22.$:
BIC
RS,
LADMSK
;CLR ALL MASK BITS ABOVE LOloJEST BIT IN LAST ADR.
ASL
R5
;MOVE LOWESi BIT OF LAST ADR UP ONE.
BNE
22$
;LOoP UNTIL OvERFLOW.
ENDINS: RTS
PC
;EXIT SCOPE ROUTl~E BACK TO TEST.
$MXCNT: 4
; ;'IIAX. NUMBER OF ITERATIONS
;* THE NSXT nJO INSTRUCTIONS PROVIDE AN It.JTERFACE TO THE $CKSWR ROUTINE
;* WIHTOUT USING A "TRAP" INSTRU,:TION AS CALLED FOR BY **SYSMAC"' ••
MOV
@KPS'.... ,
-(SP)
;PUT THE PROCESSOR STATUS ON THE STACK
JSR
PC,
$CKSWR; GO TO THE SUBROUTINE
.SBTTL
ERROR HANDLER ROUTINE
i ; ..

'"**** ......

>11 •

""'* **.* .. '"

>1< .. '",., .. '"

*"' ....... "'**

>10 '"

"'*"'** ** '" >II 'i""'.****. "'*** ......

;*HllS ROUTIN~ WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT,
; .. SAI,IE THE ERr R IT£M NUIl13ER AND THE ADDRESS OF THE ERROR CALL
; ",AND GO TO SERRTYP ON ERROR
:"THE 511JITCH OPTIONS PROVIDED 8Y THIS ROUTINE ARE:
;.SW~5:;1
HALT ON ERROl;
:",SW13=t
INHIBIT ERROR TYPEOUTS
;"SW10 .. 1
BELL ON ERROR
;"S:oJ09=1
LOOP ON ERROR
;·CALL
ERROR
; :ERRQR=EMT ANO N=EP.ROR ITEM NUMBER

4154
0.1155

4156
4157
4158
4159

4160
4161

021640

021640
021644

4169
4170

021650

4171
4172
4173

021650

4174

021676
021700

~176

SPRINT

16K VER
MAr;Y11 30A(1052)
SCOPE HANDLER ROUTINE

4152
4153

4177
4178

BIC
BIC
BI T
BIT
BEQ

13$ :

160016

4150
-1151

4175

12$ :

BNE

4125
4126

4162
4163
4164
4165
4166
4167
4168

BIC
BIT

160064

:::ZQMCFQ
0-124K r..'EMORY EXERCISER,
:ZQMCF. Pl1
14-FEB-78 OB: 19

4149

BIC
BIC
BIT
BEQ

160150

017777

116716

4146
4147
4148

BNE
BIT
BEQ
BIC
CLR
TST
BEQ
BIT
BEQ
INC
BIT

160166

0~0.:.j67

0050~6

414S

MOV
RT:
MOV
MOV

MOV
BIC
BIC

001414

021524

4141
4142
4143
4144

4$:

160234
160230
1602;20
160214

032767
CO 1 006

021526

4140

BIS
CMP

O~1006

4124

412B
4129
4130
4131
4132
4133
4134
4135
4136
4137
4138
4139

SEQ 0166

4$
TMPFAD,
4$
,,, 000,
IiBITO.
LSTADR,
4$

CMP
BLOS
TST
BNE
TST
BNE

CMP
8HIS
rAOV

BHI

016716
160366
000207
016767
q:i031 0
016767160242
016767
160236
Ol:G767
157274
046767
157270
005767
157670
OC',011
032767
000003
C01405
0.:.2767
177774
005067
160164
00571.4
001503
030467
160206
ac '416
050-167
150200
005267
160174
032767
017777

4122
4123

4127

PAGe: 84

;BR IF SW NOT SET.
,ncoO
; CHECK I F NOT BEJNG TESTED.
;BR IF ALREADY PROTECTED.
TrI!~FAD
; RESET FIRST ADDRESS.
FADMAP
; SET FLAG HJ FIRST BANK.
Ifl0CO
;CHECK IF GONE PAST LAST ADR.
; BR I F ENOUGH MEr>t1CRY.
$PRINT
;GO PRINT OUT THE FOLLOWING MESSAGE.
R5.
NOMTST
; ADDRESS OF MESSAGE TO BE TYPED
; "NO MEMORY TESTED"
.T5T32, (SP)
;ADJUST RETURN ADR FOR ABORT.
PC
;ABDRr.
LSTADR. TMPLAQ
;GET LAST ADDRESS.
SAVTST, TSTI\~AP
;GET TEST MAP, LD 64K.
SAVTST+2. TSTMAP+2 : ••• HI 64K.
PRGMAP. "TSTMAP
; DON'T TEST OVER THE PROGRAM.
PRGMAP+2, TSTMAP+2
$PASS
;CHECK FOR FIRST PASS
10$
;BR IF NOT FIRST PASS.
113,
TSTMAP
;CHECK IF FIRST HolD BANKS AVAILABLE.
10$
;NOT TESTING FIRST 2 BANKS.
11177774,TSTMAP
;CLR ALL BUT FIRST 2 BANKS.
TSTMAP+2
R4
; CHECK FOR A MINIMUM BLOCK SIZE.
20$
;BR IF NO MIN BLOCK SIZE.
R4,
TMPFAD
;CHECK IF FIRST ADR ON BLOCK BOUNDRY.
11$
;BR IF FIRST ADR ON BLOCK BOUNDRY.
R4,
TMPFAD
;ADJUST FIRST AOR TO END OF oLOCK.
TMPFAD
; FIRST ADR TO FIRST ADR OF NEXT BLOCK.
NMASK4K. TMPFAO
;CHECK IF FIRST ADR REACHED 4K BOUNQRY.
11 $
; BR I F NOT ON 4K BOUNDRY.
FADMAP, TSTMAP
;DON'T TEST FIRST BANK.
FADMAP+2. TS T rI.AP+2
R4,
TMPLAD: CHECK I F LAST ADR ON BLOCK BOUNDRY.
12$
: BR I F ON BLOCK BOUNDRY.
R4,
TMPLAD; ADJUST LAST ADR DOWN TO NEXT BLOCK BOUNDRY.
,iJMASK4K. TI\lPLAD
; CHECK IF ADJUSTED TO 4K BOUNDRY.
12$
; SR I F NOT ON 4K eOUNORY.
LADMAP, TSTMAP
;SKIP TESTING LAST BANK.
LADMAP+2. TSTMAP+2
FAm;1Ap, LADMAP
:CHECK IF FIRST AND LAST IN SAME BANK.
13$
;BR IF IN SAME BANK.
FADMAP+2,lADMAP+2 ; .•. UPPER 64K.
145
;BR IF FIRST AND LAST NOT SAME BANK.
TMPLAD, TMPFAD
;CHECK IF ANY MEMORY LEFT.
15$
: BR IF NO MEMGRY TO TEST.
TSTMAP
; CHECK I F ANY BANKS LEFT TO TEST! I
16$
;BR IF TEST MAP NOT EMPTY.
TSTMAP+2
;CHECK FOR ANY BANKS.
16$
;BR IF TEST MAP NOT EMPTY.

026737

0-46767
C'::6767
030467

07:56

:20-FEP-7B

021654
021662

021670

021704
021706

4179

021712
C21716

4180

021724

013746177776
004767
000514
062716
000002
105267
157223
001775
0',6777
157214
032777
002000
OC1403
D045E.7
001606
0011"i .::;

005267

157:200

011667
162767
1;7767

157:200
00000,2
157166

157252
157242

15717'2
157162

$ERRoR:
;'"
lHE NEXT 1\0,10 INSTRUCTIONS PROVIDE AN INTERFACE TO THE $CKSWR ROUTINE
;'"
WIHTOUT USING A "TRAP" INSTRUCTION AS CALLED FOR BY nSYSMAC**.
MOV
@#PStoJ.
-(SP)
;PUT THE PROCESSOR STATUS ON THE STACK
JSR
PC,
$CKSI~R
;GO TO THE SU3ROUTINE
ADD
#2,
(SP 1
; ADJUST PO!!HER PAST CODE \oJORD.
75:
INCB
SERFLG
; ; SET THE E~'ROR FLAG
SEQ
75
;;DON'TLETTHEFLAGGOTOZERO
MOV
$TSTNM,t'.PD!SPLAY; ;DISPLAY TEST NUMBER AND ERROR FLAG
BIT
1r8IT10,@S'oJR
;;!3ELL ON Ef:.ROR?
BEQ
1$
; ;NO - SKIP
JSR
R5,
SPRINT
;GO PRINT CUT THE FOLLOWING MESSAGE.
• 1110 PI)
5BELL
; ADDR;::SS OF MESSAGE TO BE TYPED
1$:
INL
$ERTTL
; ;COUNT THE NuMBER OF ERRORS
MOV
(SP),$ERRPC
; ;GET ADDRESS OF ERROR INSTRUCTION
SUB
112, SERRPC
@l$ERRPC,$ITEMB;;STRIP AND SAVE THE ERROR ITEM CODE
MOV..

CZQMCFO
0-124K 1\!'EMORV EXERCISER,
CZOMOP. P 11
14-F EB-78 08: 19
4181
418:2
4183
4184
4185
4186
4187
4188
4189
4190
4191
4192
4193
4194
4195
4196
4197
4198
4199
4200
4201
420:2
4:203
4204
4:205
4206
4207
4208
4209
4210
4211
4212
4213
4214
4215
4216
4217
4218
4219
4220
4221
4222
4223
4224
4225
4226
4227
4228
4229
4230
4231
4232
4233
4234
4235
4236

021732
021740
021742
021746
021752
021754
021754
021762
021764
021772
021776
021777
022000
022002
022006
022010

022012
022016
022022
022030
022032
022036
022042
022044
022050
022050
022056
022060
022062
022062

lVK VER
MACV11 30A(1052)
ERROR H,ANOLER ROUTINE

032777
DC 1005
004767
004567
001201

020000

122767
001007
116767
OC4767
000
000
000777
005777
100005
000000

000001

157242

157124
002044

000004

013746
004767

177776
000342
00' 000

157200

BIT
BNE
usR
uSR

J00116
001540

.WOR~

20-FEe-7S

'SIT13.OlSWR
20$
PC. SERRTYP
R5.
SPRINT
SCR.F

PAGE 86
S~Q

0168

::SKIP TYPEOUT IF SET
:: SKIP TVPEDUTS
"GO TO USEI' ERROR ROUTINE
:ilO PRINT OUT THE FO'LOWING MESSAGE.
,AODRESS OF MESSAGe TO BE TYPED

20$:

032777
001402
016716
005767
001402
Oi 6716

022737
00100t
000000

157110

157052
157130
157122
014222

000042

CMPB
wAPTENV.SENV
;;RUNNING IN APT MOOE
BNE
2$
, ,NO. SK I P APT ERROR REPORT
Mova
$ITEMB.21S
"SET ITEM NUMBER AS ERROR NUMBER
uSR
PC.SATY4
"REPORT FATAL ERROR TO APT
21$:
.BYTE
0
• BYTE
0
2~S:
BR
22S
, ,APT ERROR LOOP
2$:
TST
OSWR
, ,HALT ON EPROR
BPL
3S
i:SKIP IF CONTINUE
;;HALT ON EFRORI
HALT
,. THE NEXT TliO INSTRUCTIC'S PROVIDE AN INTERFACE TO THE SCKSWR ROVTlNE
;. WIHTOUT USING A "TRt-POI INSTRUCTION AS CALLED FOR BV •• S't'SMAC"'~
MOV
""PSW.
-(5P)
,PUT THE PROCESSOR STATUS ON THE STACK
uSR
PC.
SCKSWR, GO TO THE SUPROU-INE
3$:
BIT
'BIT09 •• SWR
"LOOP ON EPROR SWITCH SET?
BEQ
4$
"SR IF NO
MOV
SLPERR. (51))
;; FUDGE RETURN FaR LOQPING
4$:
TST
SESCAPE
, : CHECK FOR AN ESCAPE ADORESS
BEQ
5$
;; BR I F NONE
MOV
$ESCAPE. (sP)
, ,FUDGE RETURN ADDRESS FOR ESCAPE
55:
CMP
II$ENDAO •• #42
, ,ACT-. 1 AUTO-ACCEPT?
BNE
6$
;;BRANCH JF NO
HAL T
;; YES
6S:
RTS
PC
;:
,.,

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

000207

.SBTTL

ERROR

I~ESSAGE

TYPEOUT ROUTINE

:-THIS ROUTINE USES THE "ITEM CONTROL BYTE" ($ITEMB) TO DETERMINE WHICH
,-ERROR IS TO SE REPORTEO. IT THEN OBTAINS. FROM THE "ERROR TABLE" (sERRTs).
,-AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR.
SERRTYP:

022064
022064
022070
022072
02'074
022076
022102

004567
001201
0100 ;5
005000
156700
001007

00'422

022104

016746

157006

022110
022114
022120

O! 3746
004767
000513
0'6767

177776
002570

022122

MOV
CLR
BISB
BNE

R5.
SPRINT
SCRLF
RO.-(SP)
RO
$ITEMB.RO
1$

MOV

SERRPC.-(SP)

uSR
.WOR~

157012

156770

157364

jGO PRINT OUT THE FOLLOWING MESSAGE.
,ADDRESS OF MESSAGE TO BE TYPED
,SAVE RO
,PICKUP THE ITEM INDEX

,IF ITEM NUMBER IS ZERO. uUST
,TYPE THE PC OF THE nROR
, ,SAVE SERRPC FOR TYPEOUT
: : ERROR AOOi!ESS
;. ~:;E NEXT TWO INSTRUCTIONS PROVIDE AN INTERFAC~ TO THE STYPOC ROUTIN~
;. WItHOUT USING A "TRAP" INSTRUCTION A.S CALLED FOR BY *.SY~MAC •••
MOV
"'PSW.
-(SP)
,PUT THE PROCESSOR STATUS ON THE STACK
,GO TO THE SUBROUTl NE
uSR
PC.
STY. OC
BR
'0$
,GET OUT
1S:
MOV
SERRPe. SVERPC· ,SET UP VIRTUAL PC FOR TYPEOUT.

MA~'t't 1 30A(10s2)
20-FEB-78
CZOMCFO
0-124K rv: EMORV EXERCISER, 16K VER
ERROR MESSAGE iVPEDUT ROUTINE
CZQMCF. P11
14-F EB-78 08: 19

4237
4239
4239
4240
4241
4242
4243
4244
4245
4246
4247
4246
4249
4250
4251
4252
4253
4.254
4255
4.256
4257
4.258
4.259
4260
4.261
4262
4263
4264
4.265
4266
4267
4268
4269
4270
4271
4272
4273
4274
4275
4276
4277
4278
4279
4280
4281,
4282
4283
4284
4285
4286
4287
4288
4289
4290
4291
4292

07156

022130
022136
022140
022142
022144
022146
022152
022156
022160
022164
022166
022172
022174
022200
022202
022206
022210
022214
022216
022220
022222
022224
022230
022232
022236
022240
022242

166761
005300
006300
0063~' )
OC6300
066700
012067
001406
004567
000000

022244
022250
022254
022256
022260

OJ 3746
004767

O~4567

001201
012067
001406
004567
000000
004567
001201
010146
012001
001451
0€6701
012000
066700
105720
001006
013146

156444

157356

157466
000006
001326
001320
000006
001304
001276

156.50
156342

0004~6

013746
004767
000417
122760
CO 1 004
013146
004767
000407

022320
022324
022330
022331
022332
022334
022336

0' 3746
004767
003
00'
005711
001404
004567

,.,.

177176
002140

177777
002640

005046
n3116

177777

,.,.

177776
002334

001150

PAGE B1

RELOCF. $VERPC
,MAKE VIRTUAL IF NOT ALREADY.
RO
,ADuUST THE INDEX SQ THAT IT WILL
RO
AS~
WORK FOR THE ERROR TAB~E
ASL
RO
RO
ASL
ADD
.ERRTB. RO
j FORM TABLE POINTER
MOV
(RO)+.2S
,PICKUP "ERROR MESSAGE" POINTER
B(J
3$
,SKIP TYPEOUT IF NO F~INTER
uSR
SPRINT
,GO PRINT OUT THE FOLLOWING MESSAllE.
R5.
25:
.WORD
0
"E"ROR MESSAG\," POINTER GOES ~ERE
uSR
SPRINT
,GO PRINT OuT THE FOLLOWING MESSAGE.
RS.
.WORD
SCRI,F
,ADDRESS OF MESSAGE TO BE TYPED
3$:
MOv
(RO)+.4$
,PIC~UP 'OATA H"AQeR' POINTeR
55
;SKIP TvpeOUT IF 0
BEQ
uSR
$P.:INT
R5.
,GO PRINT OUT THE FOLLOWING MESSAGE.
4$:
0
.WORD
,"OATA HEAOER" POINTER GOES H~RE
SPRINT
uSR
R5.
,GO PRINT OUT THE FOLLOWING MESSAGE.
.WORO
SCRLF
,ADDRESS OF ~ESSAGE TO BE TYPED
5$:
MOV
Rl.-(SP)
j SAVE R1
MOV
(RO)+.Rl
,PICKUP "DATA TABLE" POINTER
9$
BEQ
,BR IF NO DATA TO BE TYPEc
, ADuUST POINTER
A~D
RELOCF. Rl
MOV
(RO)+.RO
; PICI<UP "DATA FORMAT" POINTER
, AOuUST POINTER.
ADD
RELOCF. RD
6$:
(RO)+
TSTB
,CHECK THE FORMAT
BNE
7S
,BR IF NOT la-BIT OCTAl,
MOV
, ,SAVE iii ( Rl)+ FOR TYPEOUT
"(R' )+.-(SP)
THE NEXT·.I0 INSTRUCTIONS PROVID;: AN INTERFACt TO THE 5TYPOC ROUTINE
WIHTOUT USlNG A "TRAP" INSTRUCTION A~ CALLED FOR BY ·uS't'SMAC •••
-(SP)
MOV
()NPSIII,
,PUT THE PROCESSOR STATUS ON THE STACK
$TYPOC
uSR
PC.
,GO TO THE SUBROUTINE
BR
BS
8MI
17$
75:
; BRANCH I F NOT DECIMAL
(I(Rl )+.-(SP)
MOV
;;SAVE ;o(Rl 1+ FOR TYPEOUT
THE NEXT TWO INSTRUCTIONS FoRQVIDE AN INTERFACE TQ THE $TVPDS ROUTINE
WIHTOUT USING A "TRApM INSTRUCTION AS CALI.ED FOR BV **SYSMAC •••
@/lPSW t
-(SP)
MOV
,PUT THE PROCESSOR STATUS ON THE STACK
uSR
PC.
STYPOS
;GO TO THE SUBROUTINE
a$
;SKIP
BR
-1 (RO)
175:
CMPB
11-1,
;CHECK FOR lB-BIT ~oORESS FORMAT.
BNE
la5
,BR IF NOT lB-BIT ADDRESS FORMAT.
MOV
!!>(R1)+. -(SP)
;PUT THE DATA ON THE ST"CK.
uSR
PC.
STY PAD
,OETERMINE THE PHYSICAL ADDRESS AND TYPE IT.
as
,SKIP
BR
la$:
-(SP)
CLR
,CLEAR THE WORO ON THE STACK.
(II(R1)+ • (SP)
MOVB
:PUT THE DATA ON THE STACK.
THE NEXT TWO INSTRUCTIONS PROVIDE AN INTERFACE TO THE $TYPOS ROUTINE
WIHTOUT USING A "TRAP" INSTRUCTION AS CALLED fOR BV •• SVSMAC* ••
(IlNPSW t
-(SP)
MOV
,PUT THE PROCESSOR STAT~S ON THE STACK
uSR
STYPOS
;GO TO THE SUBROIJTI~E
PC.
• S"'T!
3
,TYPE a DIGITS.
• BYTE
1
,TYPE LEADING ZEROS •
as:
TST
(R1)
,15 THERE ANOTHER NUMBER?
BEQ
9S
;BR IF NO
~SR
R5.
~PRINT
,GO PRINT OUT THE FOLLOWING MESSAGE.

,.,.

177776
002434

100406
013146

022262
022:266
022272
022274
022302
022304
022306
022312
022314
022314
022316

SUB
DEC

07:56

SEO 01119

CZCh1:FC
C2Qi,~-:F.Ol1

·1293
42Q4

0"12';1\ ·,·EI\10RY I:XERCISER,
t.1-FEt3-78 08:19

()2~)3~2

C22362

C22]4'~

C::0734

4296

0:;:2.346

4297

C223S0

0 ~ 2601
c,~ 2500
004567

IMCY1130A(1052)
20-FEB-78
1'.lES$AGE rYPEOUT ROUTINE

16K VER
~RROR

07:56

PAGE 88

SEQ Q110

• WORD
6R

11 $
6$

; AD8RESS OF ~,~ESSAGE
; LCS'P

9$:

1,10'J

1CS:

r,lOV
J$R

(SP}+,RI
(SP)+,RO
RS,
SPRINT

;GO PRINT C.H THE FOLLOWING MESSAGE.

• ',','JRD

$CR~F

TO BE

TYPED

4295

4301
·1302
4303
4304
4305

02:2362

001134

OC 1201
000207
oe0011

'1$:
.SBTTL
:

4307
.:1308
11309

4312

4316
4317
£:318
4319
43:2D

.1321
4322
4323
432~

.:13:25

4326
4327
4328

~ ..... >I' ,,'" '" . . . .

; RETURN

:TA8 CHARACTER.

"''''* ..... ;. . . ..-."'''' "'''' '" "' .. * '" "' ......

.jo . . . . . . . . . "''''

* '" "'. "'''' *. "'* "'* .. * ... 11<. "'*

LS8

: ;,. ",. . . "'" . . *"',. .... "'~, .. " ** "'. "' ........ ~ . . * ..... "'". .. ", .. "' ..... '" ",,,",*.i- * * ... ***. ** ... **"''''** *.

..l311
4313
4314

: ADDRESS OF MESSAGE TO BE TYPED

RTS
PC
.ASCIZ
/
· EVEN
TTY HJPur ROUTINE

;"SQFT,IiARE S':J1 7 :H R!::GISER CHANGE ROUT!~S.
IS EtHERED FROI,l THE TRAP HANJLER, AND I>J!LL
; .. S::RVICE H,': TEST FOR CHAt..;GE 1: .. SOFn~A~E Sv.'ITCH REGISTER TRAP CALL
; .\I:HEN OP ERAT II>JG I N TTY FLAG MO:)E.
$CKSwR: cr,lP
IfS\\!rtEG,$WR
;; IS THE SOFT~S\oJR SELECTED?
BNE
15$
: ; SRMlCH 1 F NO
T5T8
@$TKS
: :CI-'IA~ THERE?
BPL
15$
: :IF NO, DCl'.('T 'l/AIT AROUND
MoVB
@$TKB,-(SP)
: :SAVE THE CHAR
alC
;,IACl77,(SP)
; ;STRI?-OFF THE ASCII
o.~?
1f7,(SP)...
:;IS IT A CWHROL G?
BNE
155
; ;NO. RETURr>.; TO IJSER
SAUTDB,N1
: ;ARE \1:2 RU~<NING IN AUTO~MDDE?
CMPB
BEQ
15$
; ; BRANCH I F YES
;"ROl;Tl~E

4310

4315

; .. 4~

• ENAEL

4306

; RESTORE Rl
; RESTeRE RO

022364
02.2372
02237-1
C214CO

022767

000176

1 C5777
100101

156544

02~·102

117746

156540

022406

0"'2716
0.::2726
001072

177600
000007

126727

156510

022412
02:::'4 i \3
02242J
022426
('22430
02::434

156546

0: 1104

000001

001466

004567

022435
C22'::42

R5,
SCNTLG

~PR INT

JSR
• \l,O.;J
Mev

R5,

SPRINT

MOVS

@$TKB,-(SP)

BIC

rC177,(SP)

JSR
• \~G~D

001056

02~311

; GO "C;O I ~T OUT THe: FOLLOW I NG MESSAGE.
: ADDRESS QF rllESSAGE TO BE TYPEJ

$GTS\\R:

022436
004567

;GO PRINT OUT THE FOLLOI'ilNG MESSAGE.
; AODF.2SS OF II",ESSACE TO BE TYPED
; ;SAV:: S\~RE'::; FOR TYPEOUT
;*
THE NEXT TWO INSTRUCTIO~S PROVIDE A"J INTERFACE TO THE $TYPOC ROUTINE
;'"
II:IHTOur USING A "TR ... p" IN$TRUCTICN AS CALLED FOR BY .... SYSMAC .....
MOV
@!lPS\-J,
-(SP)
;PuT THE PROCESSOR STATuS ON THE STACK
JSR
PC,
$TYPoC
;GO 70 THE SUBRO'JTlNE
JSR
R5.
SPRINT
;GO PRlf..<T O:.1T THE FOLLOwING MESSAGE.
· \';QR;)
~MNEw
; ;,.!Y::RESS OF ~ESSAGE TO BE TYPED
19$:
CLR
-(SP)
; ;CLEAR COU'HER
ClR
-(SP)
:;THENEo'JS/.R
7$;
T5TS
@$TK5
; ;CHAR THERE?
SPL
7$
;; IF NOT TRY AGAIN

001050

0:23316

·13290224440167.16155526
4330
4331
4332
02:?450
0 1 3746
177776
'-::333
4334
4335
.Il336

0::::.:)54
0:::2";00
022.:)6.'1
0:;'2~6i3

0047E.7
OG<:5E7
013327
0050.,5

4337

o::~·no

005046

002230
001026

4338
022472
105777
156446
4339
022476
100375
·:1340
43:.110225001177':'6156442
4342
022504
0.:)2716
177600

S:.:S\\'R

S,\'REG,-( .:.P}

; ; PICK UP CHAR
;;MAKE IT 7-BIT ASCII

4343
-1344

4345
4346
4347

022510
022514

434a

022516

021627

000025

001006
004567

000170

CMP

CZOMCF'::
0-12~K IIEMCRY EXERCISER,
C2QI,ICF.::Ol1
14-;-E8-78 08:19

4349

022522

4350
4351

022524
022530

023304
OE:2706
000756

16K VER
TTy

10$

J5R

R5,

SPRINT

MACY1130A(1052)
INilUT ROJT!NE

2C$ :

000006

(SP),#25

BNE

• \-:ORD
ADD

$CNTLU
N6, SP

19$

;; IS IT A CCNTROL-U?
; ; BRANCH 1 F ~jOT
:GO PRINT our THE FOLLOwING MESSAGE.

2.0-FEP-78

07:56

PAGE 89
SEQ 0171

; ADDRESS OF MESSAGE TO BE TYPED
;; IGNORE PREVIOUS INPUT
;;LET'S TRY IT AGAIN

~352

4353
.:1354

4355
4356
4357
4358

4359
<13130
~361

022532
02:;536
02254:)
022;-·44

::21627
DC 1 023
0<::5766

C2=,::..:.6

0' 6677
0:32706

000002

004567
DC 1201
126727
OJ 1 003
0:2777
0(;0802
0047£:7

000726

0:: 16:27
002420

000060

4362

4363

02:'.566

4364
.::;365
<1366
4367
4368
4369
4370

022574
0;)2576
022,'3(}4
0:::::606

4372
4373
4374
4375
.;1375
4377

022612
022616
cn620
::":::',2'324
022326
0:::2632
(.2:::'636

022E40
022542

.::)378
4379
..')380
4391
..:J3B2
4383
~384

000004

DC 1 ~03

156364

02:?E:S2
0::::2635

ADD

16$

;;15 IT A <CR>?
: ; 8~ANCH IF NiJ

4( SP J
11$
.2 (SP) ,@lSI'JR
,1,'6, SP

;:YES. IS IT THE FIRST CHAR?
; ; gRANCH I F YES
; ; SAVE :-':HJ £WR
; :CLEAR UP STACK

RS,
SPRINT
$CRLF
SINTAG,I11
1 S$
#100,@$TKS

;GO PRPH OuT THE FOLLOWING MESSAGE.
; AD:::lRESS OF .'liESSAGE TO BE TYPED
; ; RE-Et~A9LE TTY K8D INTERRUPTS?
; : BR,\NCY 1 F NOT
; ; ~E-H'ABLE TTY KBD INTERRUPTS
; ; RETI..;~N

(SP), II' 1:-

14$:
• WORD

00000 1

000100

156340

Cr'>~PP

8NE
MOV

15$:

16$ :

001142

021627
CO 30 15

000067

0·127":0

000060
000002

C(;5766
O~ 14C3
CC6316
OC,6316
0(:6316
0052£6
c 6616
0007C5

JSR

156343

FIT :
JSR

1 B$

BIC

p60.(SP)+

TST
SEQ
ASL

2(SP)
17$
(SP)
( SP)
I SP)
2 I SP)
-2(SP),ISP)
7$

ASL

177776

PC,$TYPEC
(SP),#6C

CMP
BL T
CMP
BGT

A:.>L.

17$:

000002

C22~60

0::'::'660
02:;'564
022G66

CMP
BNE
TST
BEQ

MDV
115 :

000006

cnS6'J
C2256:>
D22564

4371

10$:

000015

INC
SIS
BR

1 B$

(SP),#57

; ; ECriO CHAR
; ;CHt.R < O?
; ; 8RA~CH I F YES
; ;CHAR > 7?
; ; BRANCH I f YES
; ;STRIP-DFF ASCII
;; IS :HIS THE FIRST CHAR
;;BRANC:i IF YES
;;NO, Sh!FT PRESt-NT
, ,
CHt.;;: OVER TO MAKE
"
RCO,'f, FOR NEVI ONE.
; ; KEEP cou~n OF CHAR
; ; SET I ~ t\:Evl CHAR
; ;GET THE NEXT ONE

18$ :

00"1567
001200
000716

JSR

000626

.~\ORD

RS,
SQU.S

20$

il:,85
4385
!!397
4388

.D$ABl..

43.')9

;",THIS ROUTINE WILL

$PR1NT

;Go PRINT OiJT THE FOLLOWING MESSAGE •
; ADDRESS OF r<.lESSAGE TO BE TYPED
; ;SIMULATE CONTROL-U

LSB

INPUT A SINGLE CHARACTEP FROM THE TTY

4390
4391

; '"
: '"
;

4392
4393
..:J39.'l
"';395
4396
4397

'n98
4339
4400
4~01

4402
4.r,03
4404

D22670
0:;;02672
C22700
02::!704
022706
C22714
C22722

o· ~ 6':6

SRDCHR:

o~ G5E6

COC004

1:"'5777

'56':!~0

1 CQ3"/5
i 1 77(6

000002

1 S:

156234

COOCG~

1776ro
OOQQu4

coo:: :)4

J~:~730

0·;27&6
02E627
001013

022732

105777

156206

000023
25:

RDCHR
RETURN HERE

I.~OV

MOV
T$TB
BPL
r'>.:V9

(SP),-(SP)
~(SP) ,2(SP)

@$TKS

BIC
CI,'::O

1$
<P$TK8,4(SP)
;,-C<177>,4(SP)
4(SP) ,#23

aNE
TSTB

@$TKS

:; l~puT A SINGLE CHARACTER FROM THE TTY
; ;CHARACTER IS ON THE STACK
; ;~~'ITH PARITY BIT STRIPPED OFF

PUSH CC'.'J"J THE PC
SAVE TH~ PS
\','A I T FC:~
A CHARACTER
RE·\] ThE TTY
GET RIC) OF JUNK IF ANY
IS I T A CmHROL-S?
BRANCH 1 F NO
WA I T FOR A CHARACTER

t/'A~Yl \ 30A(1052)
1NP'JT ROUl :t~E

,16K VSR
TTy

·1<;05
.;1·1CG
,1.107

;:: 0]75
1"77.45
C~2716

':>..\08

022+3-'"

0: \ 366
0::2750

C:0750
(,;6627

':;411
<':412

022756

OC2~07

·~413

022i70

0:1:60327

4414

022776

OC,30C3

4415

023000
023006

0·'2766
000002

('23010
023012

en 0346

02301~

O~ 27C3

023020
02:;024

022703
101467

023026
023032
023036
023040

0137'::6
0G-4767

O:"30·~a

O~ 10:4
0057 ~ 6

~416

156202

r,1ClV9

177600
000021

eM;::>

@l$TK8,-(5P)
#-C177, (SP)
(SP) L , 1121

BIC

000,40
000175

000040

000004

4418
4419
4420
4421

4424
~425

·1426
4427
4428
4429
4430
4431

4432
4433
'::;"'34
'::;!.l35

8230-10

4437

$RDLIN:

177776

177632

1·,2513

000177

4438

0.23052

001010
1'27f.7

0001:"\

O~3060

00<1567

000426

023('64

O~3272

023050

~441

02:;066

0'2716

4442

O~3072

C~53C.3

4~43

02307~

C!:':C3~7

·~444

023100
023102
C2310i3
C23112

4'::;.'15

4 .. 46
4447
4448
~449

4 .. 50
4451
4~52

4453
4454
':>435
4456
4457
4458
4459

44(.0

823114
02311 -0

023120
0::;3122
C23130

-4461
4452

4463
4.;64

177,77

i C'3~': 1

'·,13E:?

000164

OO~5f7

000400

023272
CeO?':;1

OJ571 G
001407
1127E,7
C':-J~557

000134
000356

023272
OC5016

0:;:>3144

C010(4

C23146
C23152

000340

023154

O'J4567
023304
0007: 7

0'23156

122713

000022

122713

0-1~~).\

Pl1

023162

1(5013
0:'4567
001201
CC4SG7

0~3:!02

000025

08:19

0;:3274
OJ0706

C.:'3272

4475

C)23225

000015

~476

('';::':-232

12.2723
0:: 1272
1 ['50E3

177777
000246

O>''i5E7

C~~5E7

C'233.J~

0:;'3311

• wORD

R5,
SCRLF
R5.
STTY I N

07:56

PAGE 91

SEQ 0173
;; 9R;NCH IF ;-.JJ
; ;CLE;';;: THE CHt..R,.\CTER
;GO PRINT OUT TME FOLLDI'>'ING MESSAGE.
; A')ORi;;:SS 0;: rf.ESS:'CE TO BE TYPED
;GO PRItH OuT T~E FOlL'J~oJING MESSAGE,
; ADDRESS OF MESS,l.,GE TO BE TYPED
; ;GO PICKUP At~OTH£R CHACTER

SPRWT
$PRINT

45:

C2::..224

0;:' 3252
0:::'3.::051.1
0::::"',:;:62
C23:/C
C2..3272
023273
02327";

20-FEP-78

3£
I R3)

JSR
,vWRD
JSR

000312

.q47~

023250

I,'$TTYIN,:n

CL~9

4471
<1472
<1473

4.';81
4432
-4433
';484

-(S?)

MACYI130A(1052)
INPUT RCLJT.:.NE

000320

0:"j4567
IJC) 12CO
DC 07CO
1; 13E7

4~69

4470

R3.-(SP~

MOV
CLR
MOV
C.',!P
BLOS

8NE

02:::.2':14
023204
G23.21 ::J
022212
0:-:'21 t;
::22720

4468

16K VER
Tn

J01014

O:J~'166

0.23200

00",,42

f.\E',lORY HERCISER,

'~-FEB-78

C:231G~

013172
02317-1

000212

023274

023',34
023130
0231-10

CZ:)~,~CF:')

CZO;,\CF

15:

023"74
023304

<:;439
4440

; ; IS IT A CG~HROL-Q?

; ;S:"VE R3
; ;CLEAR THS RUBO'JT KEY
; ;GET ,t-,CDRi:.SS
2$:
II$TTYI:'i+B, ,R3
; ;BUFFER FULL?
45
; ; 5R IF yES
;*
THE NEXT '~~D IN:3TR"JCTIGNS PROVIDE AN !:'>!lERFACE TO THE $RDCHR ROUTINE
;~
\I.'IHTOUT US!NG A "TRAP" It'>:STRUCTlON :.5 CALLED FOR BY **SY5MAC"*".
r.:ov
@N'PS\1,
-(SP)
;PU- THE PROCESSOR STATUS ON THE STACK
JSR
PC,
Sr;:DCHR
;GO TO THE :~USROJTINE
MOVB
(SP)+,(R3)
;;GETCHAR~CTER
10$:
cr.1PB
1;177, (R:J)
;;15 IT A Ru50UT
ar'JE
5$
; ; GR I F ~Cl
1ST
(SP)
; ;15 THIS Tf-IE Flt;lST RU30Ul'?
BNE
GS
;;3RIFNO
MOYS
#1\,9$
;:T'rPE A 8ACi-\ SLASH
JSR
H5,
SPRINT
;C::' PRI'H C-.. l THE FOLLOWING MESSAGE.
,\\ORD
9$
; ADCf.iES:3 OF ~~ESSAGE TO BE TYPED
r"cv
ft-,,(SP)
;;SET ThE R,J8-:JUThEY
65:
DEC;:;:3
; ; 6A(:rCJP BY ON:'
cr;,p
R3,#$rTYIN
; ;STAC" Er.1PTY?
SlD
4$
; ;GR IF YES
(R3),9$
;;SETUr:' TO :VPEO'JT THE DELETED CHAR.
r.!DV9
,JSR
R5,
SPRINT
;GO F-RINT Q:.H THE FOLLOWING MESSAGE.
.l'iaRD
9$
; ADDRESS OF r,1ESSAGE TO BE TYPED
6R
25
; ;00 READ ;,J,OTHER CH ... R.
55:
TST
(SP)
; ;RU20UT KEy SE:?
SEQ
7$
; ;!3R IF NO
MCVB
f;' \,9$
;; TYPE A BACK SLASH
JSR
R5,
SPRINT
;GO t-"RI'H Oul THE FOlLO~'JlNG MESSAGE.
• ",;ORD
9$
; ADDRESS OF MESS;>.G.E TO BE TYPED
CLR
(SO)
; ; CLEAr;: THE RU60uT KEY
7S:
GriPS
1i25,(R3 1
;;!S CHARACTER A CTRl U?
BNf
8$
; : BR ; F r~o
JSri
R5,
$PRINT
;GO ~RIt~T ouT THE FOLLOIoJING MESSAGE.
.WORD
$CNTLU
;;.oonss OF MESSAGE TO 6E TYPED
BR
1$
;;GOSTARTDVER
8S:
CMP':'
1'122,(R3)
;:15 CH,.\RACTER A "~R"?

Oc: 5046

1:'2713

UNTIL ITS THERE
CHARACTER
IT 7-81T ,.\SCII

2$
1$

000004

P,.\GE 90

;;IF t-..:.JT DJ SCARD IT
; ; YES, ;:;:Es....,r:E
Cl,1?
4(SP) ,.1140
; ; IS IT 'JPPER CASE?
3l>~
81 4$
;;SqANCH IF YES
Cr.1;::>
4(SP) ,#175
;;IS IT A SPECIAL. CHAR?
4$
E.GT
;;BRANCH IF YES
#40 ,4( SP)
; ; ~ll;'KE I T U~PER CASE
BIC
RT!
; ; GG SACK TO USE!;
4S:
; ; .. ,. ................ "'+ ....... >i< ....... +"' .. "'* ..... * .. "'** .......... * ............... ",,,, .. "'''''''''' "' .. ** ......... "' ......... .
;o.THIS ROUTINE \~:LL lNPuT A STRING FRcrl'1 THE TTY
; "CALL:
;.
;; INPUT A STRING FKO~ THE TTY
ROLIN
;.
RETURN HERE
; ;;,.D:::'R:::SS OF FIRST CHARACTER WILL BE ON THE STACK
;.
; ;TER:>1rNATOF WILL BE A BYTE OF ALL O'S

BNE

000004

07:55

SEQ 0172

ePl

4417

4422
4423

2C-FE9-7!3

000302
35:

C00052
000266

0127"":0

136
5015

SPRINT

JSR

RS,

;GO PRItJT C\JT THE FOLLDloJING MESSAGE.
; ADDtlC:S5 OF M£SSA'':E TO BE TYPED
!riE Bl!!="FEq AND LOO~
.,
THE CHARAcrER
;GQ PRI~JT OuT T~lE FOLLOWING MESSAGE.
; :..DIJRESS OF ~,lESSu.GE TO BE TYPED
; ; CHECK FOrt RETURN
; ; lCQ~ IF :'1:]T RETURN
;;CLEAR RETl."RN (THE 15)
;GC PRI'H C1uT THE FOLLOWING MESSAGE.
; ADDRESS OF :11=.SSAGE TO BE TYPED
; ;CLEA!J RuaDUT KEY FROM THE STACK
; ; RESTORE R3
; ;AD~':.JST THE STACK AND PUT ADDRESS OF THE
FIRST ASCII CHARACTER ON IT

1S
l R3). 9$

CMPR

SPR!NT

000004
023274

HI5.(R3)+
2$
-1 (R3)
R5,
$PRINT
SLF

8NE
CLRB

J£ -:
• '..iORD
TST
fl.l0V
M:iV
MOV

000002
OOOC04

lSP)+
(SP)+,R3
(SP),-(SP)
4(SP) ,2(SP)

ftSTTiIN,4{SP)

f,lQV

RTl

000002
OCO
OCO
00 00 10
0:;,25::6

R5,
$QUES

0[, 12(2
CG57:;6
0'2603
o ~ 1 ('::6

0; 6566

JSR
· WORD
8R
!;iO''':'

Q""'

$-:'TilN:

,BYTE
• BYTE
.LLKB
.ASCiZ

005015

COO

006507

000012

$Cl\TLU:
SOH I G:

020122

$MS'Nh:

. ASClZ
.ASCIZ

053505

$MNE\>J:

,ASCIZ

.SOTTL

READ

0~J316

C23324

O::C075

000

023327
023334

040

047040

036<140

000040

053523

A:~

; ; qETL!R~
; ;STSRAGE FOR ASCII CHAR. TO TYPE
; ;TER:,1I~lATQr.
; ; RESERVE 8 BYTES FOR TTY INhJT
; ;CD:HROL "LI"
; ;CDNTROL "G"

o
8.
rUj<15><12>
rG/<15><12>
<1S><12>/5\'iR

NE"JJ;:; /

OCTAL NUMS':'R FROi,l THE TTY

S RDUTINt: 1,ollLL R~AD Mi OCTAL (ASCII) N0r.lBER FROM THE TTY AND
I T TO 8I~A;:n.
Il\:PUT cr~ARACTERS \.;~ l.L BE CHEeKE:> TO H~SL:RED THEY ARE LEGAL
;~OCH.L DIGITS. !F A~~ ILLEGAl. CHARACTER IS >:Et.D A "7" WILL eE TYPED
; "FOLLm..rEC BY ,'J.. CARRI;.,GE RETURN-LINt: FEED. lHE CQr;'PlETE WJf,18ER MUST
;"-THEN BE RETYPED. THE INPUT IS TER',:P.JATED BY TYPING A CARRIAGE RETuRN.
; "CALL:
;.
; ; RE,l,D AN OCTAL NL;M3ER
RODCT
;.
RETURN HERE
;; LQ.': OKDr:R 8!TS ;'RE ON TOP OF THE STACK
;.
; ;H!::'H ORCE~ BITS ARE IN SHIoer
;

; "C!·v,~~S~

; .. T~[

C' 113-'6

o 6,';'(6

$FlDOCT: MOV

000004

; ; PROV: Di: SP;>.CE FeR THE

r,;:::v

000:)02

o 0.:.:6

iJ1CV
r\4CIJ
rllC' V

01-,6
02/~6
:;~,15

15:
; '"'

THE NEXT

~516

;.""

~!IHTOUT

T.~D INSTRUCTIONS Pf./CVIDS A~~ nlTERFACE TO THE 5RDLHJ RQUTINE
USING A "TRAP" INSTRUCTION AS CALLED FOR BY **SYSMAC ....

•
.;'!1

0-12.'jK /,B1JRY EXERCISER,
lO::"FEB-78 08:19

4517
4518

4519
4520
4521
:1522
4523
-1524
<.1525

C 13746
OC4767
()12E?OO
01 00 ~ 1
0':: 5001

C,Z330.G

o::.n76

~'23412

4528

('23416
023·120

0: 1420
, 22716
0['3026
I' 2716

4533

023 ... 30

O~6301

4534
.:\535

O;;?3~32

OC 61 02
0":;2716

023~140

O~O156

023.;52

010267
012602
012601
C-,26CO

4541

0:::34513
O~3~50
C'.2::~G2

4550
4551
H55,2

023~6ij

3$:

0000CO
0;)4567
001200
000723
000000

023510

t;' 7, (SP)

BLT
ASl
ROl
ASl
ROl

4$
j ; *~

; ; "'4

; ;·8

I;~C7.(5P)

; ; S TR r p THE ASCI I JUNK
; ; ADD IN THIS DIGIT
; ; LOOP
;;CLEAN TU<f.TlNATOR FROM STACK
; ; SAVE THo PE su1..T

(SP)+. R1

2$
(SP) +
Rl ,12 (51=')

TST

rv:ov
MOV

R2,$HIOCT
{SPl+.R2

r.~ov

(SP)+, R1

MOV

(SP)+,RO

; ; POP STACK INTO R2
; : POP STACK INTO R1
; ; POP STACK INTO RO
; ; HE TU~:-.J
; ;ClE.t.:--J PARTIAL FROM STACK
; ; SET A TER~,:INATQR
;GO PRINT OUT THE FOLLOWING MESSAGE.

RTl
4$:

TST

(SP )+

CLR9

(RO 1
R5,
0
R5,
SQUES
1$
0

JSR
• WORD
JSR
• ~"JRD
BR

000014

55 :
000006

$HIOCT:

.lr\'ORD

SEQ 0174

; ; PICK:.]P hilS CHARACTER
; : IF ZERO GET OUT
; ;MAKE SURE THIS CHARACTER
;; IS AN OCTAL DIGIT

R1
R2
R1
R2
R1
R2

rv,ov

00001.2
000032

lC'5010
0;:...';567

C~IP~

C::'OOO2
OC5726

C2::;~66

02,}470
023'::7,2
023-'176
02350C
023504
0:23506

OGT

ROl
BIC
ADO

0,:)5726

O~:::::;':;6

4540

RI
R2
(RO)+,-(5PI
3$
,ti'O,(SP)

PAGE 92

THE PROCESSOR STATUS ON THE STt.CK
; GJ TO TeE Sl!8RO'JTINE
: ; GET ADDRESS OF 1ST CHARACTER
; ; AND SAVE IT
; ;CLEAR DATA \~OR~

$RDl,lN

Bl'
cr.1PB

07:56

; PUT

(SP)+,RO
RO .5::'

AS!,.

177770

062601
000756

02344,2
02';;444

~543

000067

0:·6\ 02

023~34

-~5-42

000060

-( SP 1

Of/PS'.'I.
PC,

C lR
CLR
MOV8

2$ :

0..:;6102
0(.6301

;":2]·.24
023.:;26

4539

4549

r.lOV

C063U1

023422

4544
4545
4546
4547
4548

000102

O~'242~

4530
4531
4532

4:'38

1774;22

l,lOV
JSR
MDV

1 \ 2046

4527

4536
4537

17777-q

~:5002

4:;,26
'i529

16K VE"
MA~:Yl1 30,.\(1052)
20-FEa~78
READ AN OCTAL NUf','BER FRG,' THE TTY

SPRINT

; GO PR 1 ~T O:.JT THE FOLLOWING MESSAGE.
; ADDRESS OF MESSAGE TO BE TYPED
; ; TRY A3.'dN
; ;HIGH ORDEr:; BITS GO HERE

SPR I NT

a553
4554
4555
4556

; ; >l ., 01- ....... "'". "' .. -I' ". "' .. '" '" • >!< "' '" • -" ... oj' ~ . . . . . .

; ...
;.

4557
4558

4559

023512

a ~ 2567

4550
45Gl
4562

023516

066767

-':563

OQOO16
, 5505 6

C23530

0 1 37-"6
C(.'4767

4565

OZ3S34

oeODeD

4566
.. 567

023536

OG0205

0235~4

177776
000004
1$:

.5Bn L

4568
4509
4571
4572

;,;of1Q:JT1NE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TER!\HNATE WITH A 0 BYTE.
;-THE ROUTh.. 2 'HILl INSERT A NUJ",lBER OF NULL CHARACTERS AFTER A LINE FEED.

CZQM:::r:J
0-124K MEMORY EXERCiSER,
CZQ1>'.CF.,.,11
14-FEB1"78 06:19

16K VER
MACy11
TYPE ROuTINE.

: ~NOTE 1 :

4573
4574
.:::575
4576
4577
':;578

;

02~~::40

T5TS

$TPFlG

BPl

HAL T

J2~:554

i..~JJS7o

4595

;;;:'::"1(:,00

G2J:'J70

C~JGC'4

coooeo

02::-( 12
(,23f,20
022G22

lJ2767
OJ 1 0,;)3

1$:

MQV
r,~c

000002
000001

155436

crl.pa

OJO 1 00

155427

8NE
BITS

000004
000:,2
Op0040

1~2C46

6!$ ;

• \~ORD

67$:

61 T~

f! .t..PTCSUP, SENVM

90$

25 :

~'o
r.~:..." 8

(R01+,-(SPI
4$
( SP)+

606:

eNE

D;~3;;;30

(

3S:

TST
rl.O'J
ACD

4$:

RT 1
CMPB

C'~3( 46

1 ;'2716
OC1007

000)02
000011

02~';G51:)

[).2~!~, [3-1

D:?:o7 J

0:;4357
oJ:! I:;C 1
105J67

(SP)+.RO

8EQ

JSR

177630

000130

#2, (5P)

C1\·:P9
8NE
TST

000200

C':5:~6

0:3: 52

.... APTSPOOL,$ENVM

62$

0')1005
26CO

62$

RO .61 '$
PC.S.\TY3

0::5726

(.:,00C·2
1 ;:;2716
cr,1421

RO,-(SP)
@l2(SP).RO
#APTENV, SENV

MOV

~:23C24

O~:2716

;

SEQ
JSj~

155405

$CR!,.F
CLRB
8R
JSR

ftHT. (SP)
B$
pCfi!LF, (~P)

5$
(SP )+
R5,

SPRINT

$CHARC~T

000056
155:!54

C:~J7C2

02~il·O~

O~67';;6

155.2~4

Mev

$NULL,-(SP)

1 C 5365

000001

D"CB
BLT
JSR

C!I~p

(;;r-.;E

PC. $TYPEC
SFIlLC, (5P)+

·i 5 ~ 9

'::;o:?D

·;C21
"~ G? 2

';L1D
·16]";

G23i~ 0
C.':.'.,71 ,1
0:'::':' i 1 G
0::J722

\):::3726

·.);.<27iJ
0.; 4 7(:, 7

",5367
:)':;07',0

00003;;!
000072

F!RST ADDRESS OF AN

DECS

IF Yi=.$

: ; ERANCH

I F NOT <CRlF>

;; POP
<CR><LF> EG'UIV
;GO PR~:H OJT THE FO~L:JWING MESSAGE.
; ;CLE:'R CHAr-ACTER COUNT
;~'r.r r. . EXT CH:'R,'-'<CTER
; ; GO TyPE Tn I S Crl:"R:..CiER
; ;15 IT TU,lE FOR FIlL.ER CHARS.?
; ;!F t\D GO :::;,ET NEXT CHAR .
; ;GU " OF FlLLSR CHARS. NEEDEQ
; ;,.'.,~.() TH~ NJLL Crl:.R.
;; COES ;.. NUL.L NE!:.D TO BE TYPED?
; ;8R If NO--G.) POP THE NULL OFF OF STACK
: ;GO TYPE A. ,>oIULL
; ; JO NOT CQl:NT AS A COUNT
; ; L08P

, (SP 1

PC.5TvP[C
$CHARCNT
7$

jHOR!ZClNTAL TA3 PROC::SSOR

C:!3730

, ~ 271 6

0000'::0

8$ :

STRING

IS TI-;ERE A TER:YlINAl?

~b2:'

46:!6
':;627
<1628

ASCIZ

;;HA:_T HERE IF NO TERMINAL
; ; LEAVE
; ; SA\/E ::;0
; ;GET AJDRESS OF ~SC!Z STRING
;; R~~~Nr'~3 I'! APT :.:ODE
• ;NCl,GO CHECK FeR APT CONSOLE
; ;SPJCL r,:ES;;'AGE TC APT
; ; NO, GO Ch~CK FO~ CONSOLE
i; SETUP ME.S'.,AGE ALDRESS FOR APT
; ; S;:':JCH. .',1ES::.~GE TO APT
; ; ~.;::SSt,G::: ;"::DRESS
; ; AFT COi~?':l,"E SUPFRSS5ED
: ;YES.SldP TYPE OUT
;; PUSH CHA'IACTEG TO BE TYPED uNTO STACK
;;SR IF IT ISN'T 'THE TERMINATOR
;; IF TERi.llNATOR POP IT OFF THE STACK
; ; RESTOR::' RG
; ;ADJUST RETURN PC
; ;RETuRN
; : BRr'.NCH 1 F <HT>

;

C ': 0754
C1{,"·'i(;7
1267:::G
D:; 13~7

55 :
65:

; ;MESADR

;

0:::3':,25

~G',6

.::617
·i61

C-; 14[5
o~ 0067
CC.47"; ,

C23(·; 1 0

-1507

·~61 2
.1513
461 ·1
·'1615

$TYPE;

1 C OOC2

OvOOOO
0:·0430
0' 00':;5
C 1 7600
1 ';.27f.7
0.'] 1 0 11
1 ;j27e7

4592
·'593
4594

.:16":'9
'~61 0
·::511

155413

PAGE 93

TYPE
MESADR

0~3S~6

105767

G7:56

SoQ 0175

023544

4591

'~608

;
;,!,

~588

'1603
.1604
4605
'1606

;~NOTE3;

-4593

4GOO
~160 1
.:1602

20-FEP-78

; ·CALL:
:"'1) USING A lRAP INSTR::TlON
;11:
TYPE
,Mf;SADR

4581
4S32

4586
4597
4599
4599

30A(1C52)

$NUlL CO;o,JTAINS THE CHARACTEP TO BE uSED AS THE FILLER CHARACTER.
SFIlLS CONTAINS THE NUl1aER OF FILLER CHARACTERS REQUIRED.,
$FI LLC CONT A!NS THE CH:"RACTER TO FI lL AFTER.

p~OTE2:

;

.:1579
4580

':;589
4590

TYP,:" ROUTINE

; ;"'''''''''''I!<~.*.''''''~''''''''**.*'''"''''"'' :"''">i<.' "'."''''.**",'''*''' ... '''.'''''' . . '''''' ..... ** •• '''''' •••

4570

4584
4585
4586
'iSB7

(R5)+.
1$
;G~T THE M!:SSAGE VIRTUAL ADDRESS.
AGO
RELOCF, 1$
;il'AKE IT P:""!Y$lCAL.
THE NEXT 11'10 IN$TP.UC1!ON$ PROVIDE AN INTEf\FACE TO THE $TYPE ROUTINE
\'iIHTOt.H U~lNG A "TR"P'· :N5TRUCTION AS CALLED FOR BY """SYSMACu.
Mev
@/;'P$W ..... (S~)
;~UT THE PROCESSO~ STATUS ON THE STACK
J5R
PC,
STYPE
;GCI TO THE SUSRO·JTINE
.WORQ
0
:CONTAINS THE PHYSICAL MESSAGE ADDRESS.
RTS
R5
; RETUR~.

SPRn:T; r.mv
0000 I 0
:'"
; ..

4564

* . . '" . . '" " ~ '" '... '" ...... '" "' ..... '" '" .... "' ..... '" •• "' .......

SUS>:COUTlh,,,; TO PASS RELOCATED ..1SSS,l..GS AOD~ESSES TO THE $TYPE ROUTINE.
CAll:
JSR
qs,
S;JRINT
<MESSAGE VIRTUAL AOJRESS>

Move

,,'

• (SP)

;;REPLACE

iA8 WlTH SPACE

. [)11

Q-124K ','EY,1DRY EXERCISER,
1..1-FE8-78 08: 19

4629

023734

084767

11630
4631

02Ji41)
023746
0)3750
02:;752
023,-54

132757
OC1372
C-::5726

0-:-0723
'C5777

4639

023770
023776
02.'1000

1.<:27G5
081003
1 C5067

4640

02..]004

4641

02":005

0(;0406
, :::2766

4642
1643
4644
4645
4646
4647

02';014

4632
4633
4G3·~

4638

4648
46-49
4550
4651
4652
-4G53

4654
4655
.:1656
4657
4658
--1559

4560
4661

4662
il663
4664
4665
4666
/,567

4668
4669
4670
4671
4672

000052

$TYPEe:

'55170

116677

024016
02..'1020
02402?:

000002
000015

155162

000012

000002

OC 1402
105227

000001
000001

000376
000366

000001

000360

010046

02LiQS2

0'.0146
; 05767

02<1060

024062
02-1070
024072
024100
024102
02,::,06
024114
024120
024122

024126
024130
024132
02":;136
024140

001450
1_ 2767
-: 32767

155134

000100

155125

O~ 7600

000004

062766
005767
001375
010067
1 C57~0
C01376

000002
155064

,6E700
0062eD

155062

010067
0' 2767

155056
000004

0:,0413

02<1 ~ 62
02/~'70

Oi 67.a6

000004
000002
153602

CJ2417"~

004767

177340

624200

000000

~6aO

O::!11202

-4681
4682

C24202
G24206
024210

0014.22

024214

062766

105767
0176CO

026701
0:; 1402
010021
O~ 5211

155244

1C5767

000150

012701

1 $:

155;)32

000016
000004

16X VER
AFT

MA-~Y11

$,"~SGAD, RO

RO
RO, Sf,1SGLGT
/1-1, S;/lSGTYPE
5$

MOV
TST

105067

02~J22

1G5067

000106
00C'01

4707
,nOB
4709
·1710

02·1326
024332
02.::334

1':':50G7

000074

012601

02·1]30
02·:340

4712

02':;J.:10

010046

4713

C2--1J·12

4714
4715
4716
4717
4718
4719
4720
4721

C2·'134ti
024352
C·;::'':;356
0.24360
02,13134
02·;J72

10$ :

TST8

11 $:

SEQ
TST
SEQ
TST
SNE
MOV
ADD

154702
000C04

INC
CLRB
CLR8
ClRB
rilOV

MOV
RTS

DeS7E.7

r,\ov
155144
001344
154626

MOV
SUB
TST
BNE
MOV
MOV
MOV

1 $:

C'10067
012iS7

15-'1635
0013 - 1

154626

012767

000002

154604

012600

OS020i

$LFLG
10$

; ; SHOULD LOG AN ERROR?
;;IF NOT:
8R
; ; GET ERROR /I
; ; aUMP RETURN ADOR.

@l4(SP),RO
H2,4(SP)

30A(1052)
20-FES-i'B
ROuTINE

Oi:56

PAGE 95

#$ASTAT ,R1
(Rl )
8$
RO, (.~1 )+
(R1 )+

( Rl)
$FFLG

12$
::;'ENV

, 2$
SMSGTYPE

115
@l4(SP),$FATAL

#2 ,4i SP)
srllSGTYPE
$FFLG
$lFLG
$MFLG
(SP)+, R1
(SP)+,RC
PC

SEQ 0'77

; ;PO!NT TO TABLE START
; ; END OF T ;"8LE?
;;IF SO:
B~
: ; PROPER EN fRY?
; : I F SO:
Br<
; ; r:lovE PAST COUNTER
;; KEEP LOOKING
; ;TA8LE FULL?

;; IF

so:

wO~D

8P -- NO MORE ROOM

; ; $.=T U;:> NEVI ENTRY
; ; SUMP ERROP COUNT
; ;SH:JUL0 REPORT FATAL ERROR?
; : I F NOT:
6R
; ;RUNNING U~,DER APT?
; ; I F NOT:
6R
;; FINISHED LAST MESSAGE?
; ;IF NOT:
\l-JAIT
; ; GET ERROq Ii
; :B:jT,1P RETURN ADDR.
; ;TELL APT TO TAKE ERROR
; ;CLEAR FATAL FLAG
; ;CLEAR LOG FLAG
; ;CLEAR MSSSAGE FLAG
; ; ;:'OP STACK INTO iH
;; POP STACK INTO RO
; ; RETUliN

MOV

RTS

Ot~

RO,-(S?)
SAPTR, RO

:; PUSH RO

"i$ASTAT,RO

#$A5 TAT ,~~.l;.GAD
#2, i\~SGTY
(SP)+,RO
PC

; ;GET SIZE OF STAT TABLE
: ;SEE IF ocr·:E LAST COMMUNICATION
;;JF NO,;
l-lAIT
; ; SET i,1i::SS:"'3E LE~~GTH
; ; SET i.~ESSA:::;E ADDR.
; ;TELL APT TO TAKE STATS.
;; POP SH.CK INTO RO
;; RETUR"J

RO,-(SP)
#$ASTAT, R1
(R1 )+

; ;PUSH RO O~~ STACK
: ;GET START OF TA".'LE
;; E~m OF TA3LE?

$f..'tSGTY

RO, $I,~SGLG

STACy.

$ATY7:

MOV

0' OM6

224':;~~

012701
0(.5721
1(0402

0;1 :J20

005021
0:;0774

001344

MOV
TST
8MI

1 $:

; ; I F SO:

CLR

{R1 )+

; ;CLEAR ERROR COUNT
; ;KEEP ClEAPING

2$:

82 ~.122

0.: ·126
0)';27
0:1 ·130

BEQ
MOV
INC

0: 1375

02~4GO

,n32
473:3
4734
-n.3S

; ; SUS START OF MESSAGE
: :GtT MESSAGE UJGTH !N WORDS
; ; PUT LENGTH IN MAl L80X
;; TELL APT TO TAVE MSG.

$ATY6:

02"';·;02
c.-:?";.:10.:l
02-:404
02·'1,-106

.12·:

9$ :

012600
OC 0207

4711

c·~

154736

02.::;316

-1731

8$ :

0:; 1416

4706

IN MAILBOX

; ; PUT ~lSG A::;DR IN JSR LINKAGE
; ; SUMP RETURN ADDRESS
;;PUSH 177776 ON STACK
; ; CALL TYPE MACRO

6$
$APTR,Rl
10$
RO, (Rl )+

4705

\l-1AIT

AD~R

@4(SP),<l$,
tl2 ,4( SP)
177776,-(SP)
PC,$TYPE

154710

; : puT

000772

000004
000002
15'1666

COMi~UNICATIONS

Br.~ I

iJ24:170

; ; I F NOT:

; ;GET MESSAGE ADDR.
; ;8UMP RETURN ADDR.
; ; SEE I F DOt~E '-'J/ LAST XMISSION?

;;IFNOT:

JSR
• WORD

6$:

024276
02·Ls04
024312

; ; SHJULD SPCOL rIiESSAGES?

;; FIND END OF MESSAGE

02~236

OeS757
001413
OC5767
CC 1375
017667
CS2766
0:5267

Or·1 STACK
: ; SHOULD TyPE A MESSAGE?
;;IF NOT:
6R
; iOPERATI~G UNDER APT?
; ; IF NOT:
8R

02424C

4727

FATAL ERROR

STACK

RO, 5~'I!SGAD
(RO )+

ADD

000004

8~'E

O;"'~412

; ;TO ONLY REPORT

MOV
TSTa
BNE
SUB
ASR
MDV
MDV

Mav

DeS711

4700

4740

#APTENV, SENV

35
IIAPTSPOOL.$I!NVM
3$
@4{SP),RO
11'2, 4( SP)
SMSGTYPE

r.mv

3$ :

001344

4701
4702
4703
11704

'1738

;; PUSH Rl

BlTS

SEQ
MQV
ADD

02Ll242

4739

R1 ,-( SP)
$MFLG

BEQ
TST

O:?427~

"'* *"' '"'" "' ........ "'''''''''' . . "''''''' ....

;; PUSH RO

eMP

02·1~;63

>\- "'". ....

RO,-{SP)

001406
005i21

02·125~

; ; COUNT THE CHAR ACT ER
; ; CHARACTER COUNT STORAGE

;;TO REPORT FATAL ERROR
; ;TO TYPE A MESSAGE

100404
0;:00:: :

02'12,';0
02.1)52

; ; =-XI j
;; IS CHARACTER A LINE FEED?
; ; 9RANCH I F YES

h1,$FFLG
1I'1,SiMLG
SAT'r":
fll,$FFLG

Bi...lE

000004
000002

4690
4691

4728

Move

TST8

02'::'234

4725
4726

MOVB
8R

000221

4689

4721'1

Mava

SEQ
MOV
ADD
TST

4S:
5$:

4687
4688

02"'246
024250

;; LOA:! CHAR TO BE TYPED INTO DATA REG.
;; IS CHARACTER A CARRIAGE RETURN?
; ; BRANCH 1 F NO
; ; YES--CLEA.9 CHARACTER CQUI'<IT

APT COMMUNICATIONS ROUTINE

02.'j222
02':225
02£1230
02.:1232

024252

SEQ 0176

cl.wa

000004

CZOMCFO
0-124K I,:EMORY EXERCISER,
CZQf;\CF.Pl1
14-FEB-iS 08:19

4723

$ATY4:

155072

017667
C£27E6

,n:n

$ATY1:
$ATY3:

DC' ·-:125

02'::14~

469i
4698
<',699

( PC)+

MOV
M",v
TSTS
BEQ

000001

024154

4692
4693
-16'34
4695
4596

D$TPS
$TYPEC
2{SP) ,z'$TPB
HCR,2(SP)
1$
$CHARCNT
STYPEX
flLF,2(SP)
$TYPEX

PAGE 94

; ; n:"E A S?ACE
;;3R":'!\CI-l If NOT AT
;; TAG SlOP
;; PCP Spr-\CE OFF ST,.\CK
: :GET NEXT CHARACTER
; ;\~AIT UNTIL PRINTER IS READY

; :,. .. '4-"". "'." " ... "'* .. ** .. * .. ** "' ..... *"'""' "'""' "'." ..... :.- '"

0: 1 031

02" 152

4686

1$:

000346

4674
4675
4676
4677
4678
4679

4685

(SP )+

TS18
BPL
i\.'OVB

07:56

$: Tye:

02..1050

02';050
02-105.:1

INCr;:
$CHARCNT: .lvORD
$TYPEX: RTS

OCODOO
000207

112767
112767
0004-:3
112767

B~E

CLRB
BR
CMPS
BEQ

000014

.SBTTL

C 2,1 024
024032
02'1040

PC, $TYPEC
#7, SCH..\F:CNT

O,lPB
ONE

000002

2C-FEt'l-?8

J5R
81 is
TST

-,673

4583
4684

9$:

, (;0375

4635
4635
4637

0000 1 4
000007

16K VER
Mk:":Y 1 1 30A(1052)
TyPE ROJTI\JE

MOV

012600
C002e?

RTS

(SP)+,RO

OCO

$MF LG:

• BYT::

oeo

$LF>...G:

SFFL.G:

.8VTE
.BYTE

000

C;,44.?2
0;.02('0
C", 000 1
0'::01 CO
0000'::0

APT
APT
APT

• EVEN
I ZE>C=200
~,v::;001

f'00[..=100
APT SUP=040

;; POP STACK INTO RO
; ; RETURN
; ;i\~ESSG. FLAG
;; LOG FLAG
;; FATAL FLAG

CZ~y,t::F:;

Q-l:!4"; l\,EWJRY EXERCISER,

CZ')i,I';F.i'll

Al=-l

4741
474,2
47-13
I,j 74-4
-1745

47;)2
4753
4754
1.755
,1756
4757

$TY

(;2·1.:140

o ~ 0546

012746

4761

0:;'.·"l·~ 54

016605
100004

-~ 762

:>2.::.;-31:-

4763

02';460
0::';·!6':'
C ::-1-"72

4750

O:::·l.~ 7G

4766
4767

O:?-"50'J

4768
4769

r,10V

MOV
MOV

010346

02.:1~':;4

0(,5405
112766
0167CU
012703
050003
112723

0: 5002
0: 6001
1-: 0105
0(2402

BPl
NEG
000055

2$ :

·0::: 52C2

4773
4774
4775

C:::-1:.:'20

o;::-~ 5 4;:·

0':'0774
OE·O 1 C5
OC57C2
0(' 1 OC2
1 C5716
1:' 04C7
1 C6316
~ ':,3003
1 '- 6653

000001

02·:530
~.:?.::;S 32

C)2·E',3':'

000060

000Q40

155054

C~':'S70

1; 02~3
0')57:20
0:·0067
1 C37";6
101002

J246CQ

'00003

02-4502
02~612

1166f3
105013
C',2605

024514

012603

02·1574

02'-1510

4795
4796

177777
6$:
7$ :

es:
177777

177776

9S:

02,-,620

012600

4800

004567
024654
016666
C12616
C")0002
C23':;20
CC: 1750
OC0144
CG0012
0(,.0004

~801

4802
4803

~,308

4809
4810
<'l811

OJ--1G42
02·1644

024650
024,352
024654

000004

;; PUSH ;';;0 O·J STACK
; ;PU::'H q1 0:,; STACK
;; PU~H K2 atl STACK
;;PUSH P.3 0:/ S'7ACr(
; ;PUSH RS o~; ST,.l.CK
; ;5E7 SLANK S\>JITCrl .1..ND SIGN
; ;GET THE I!JPUT NU',tsER
; ;[lR IF INi'uT IS POS.
; ;MAKE THE 8INARY NU\18ER pas.
; ;:·,1.:,V,E TNE ASCI r I·,UMBER NEG,
;GET RELOCA,I8~~ FACTOR.
;: SETUP THE OuTPJT POINTER
;ADQ HJ RELOCATIO:i FACTOR.
; ;5ET THE FIRST Cf-','..RACTER TO A BLANK
; ; CLEAR TH= BCD NL'i\19ER
: ;GET HiE CONSTANT
: ; Fom,' THIS BCD DIGIT
; ; 9R I F DONE
;; INCREA.SE THE BCD OIGIT BY 1
; ;,\DD BACK THE co.o',srANT
; ;CHCCK IF BCD DIGIT=Q
;;FAlL TI--!~C~GH IF 0
; :STILL DOH.G LEADING a'S?
;;OR IF yES

25
8$
R5. R2

TST8
BPI

~10\la

-1 (SP) ,-2(R3)

ClRB

(R3 )
(SP)+,R5
(5P)+,R3

( SP)+

;;BRIFNO
;; YES--SEJ TH!: SIGN
; ;r'.',AKE THE BCD DIGIT ASCII
; ;MAh:E IT A SP~CE IF NOT ALREADY A DIGIT
; ;PUT THIS CHAR."C-:-Ei1 IN THE OUTPUT BUFFER
; :JUST I!>iC~Er,·E.N7H;G
; CHECK THE TABLE INClEX
: GO D~ THE NEXT DIGIT
; ;GO T.:J ~X!;
; ;GET THE LSD
; ; GO eH.'\,~JGE TO ASCI I
; :1',:,\5 THf: LSD THE FIRST NON-ZERO?
;;8~
OF NO
; ;YES--SET THE SIGN FOR TYPING
: ; SE T THE TER~11I NA TOR
;; POP STACK INTO !=i5
;; PO? STACK INTO R3

(SP)"R2
(SP)+, Rl
(SP)+,RO
R5,
$PRINT
$DBLK
2(SP) ,4(SP)
(SP)+, (SP)

PAGE 97

SEQ 0179

;; POP STACK INTO R2
;; POP STACK INTO R1
;;POP STACK INTO RO
;GO PRiNT OuT THE FOLLOWING MESSAGE.
; ADDRESS OF MESS~GE TO BE TYPED
; ; ~DJUST THE STACK
; ; RETURN TO USER

10000,
1000,
100.

10.
SC3~K:

.SBfTl

, BlKW
4
BINARY TO OCTAL

(ASCII)

AND TYPE

"'* "'*

*"' .. ,. .. "' .. "' . . * *

; ;,. '" * "''' "* >i< * ... -I'~" **** ",,~,. .......... ** ... ~.j. "''''
*" * "'* ** *'" ** * '"
.olIO
;><THIS ROUTINE IS US::D TO ChANGE ,\ 16-BIT B1NAR'1 ~UMBER TO A 6-01GIT
; .. OCTAL (ASCII) NUr<.13ER AND TYPE IT.
:*STYPOS---[.HER HERE TO SETUP ~JPPRESS ZEROS AND NUiIo1SER OF DIGITS TO TYPE
: .. CALL:
;,
MOV
NUM,·~ (SP)
: ; Nurl19ER TO BE TYPED
;
TYPOS
; ;CALL FOR TYPEO'JT
;,
; ;N=l TO 6 FOR N:.Jr<.1BER OF DIGITS TO TYPE
• BYTE
;.
; ; M= 1 OR 0
• BYTE
; ; 1 =TYPE LEADING ZEROS
;'
;
;; O=SUPPRESS lEADING ZEROS
;.
:"$~YPON----tt'-iTER HERE TO TYPE OUT vJITH THE SAr~E PARAMETERS AS THE LAST
: *$TYf'OS OR $TYPOC

~8' 7

4818

4821
4822
4823
4824

4825
4826
4827
4828
';829
4830

MOV
Typr:J

NUM,-(Sr)

; ; NU:\18ER TO 8E TYPED
; ;CAL~ FOR TYPED:')T

;,
; .. qYPOC---ENTER HERE

4831
4832
4833
48J4

;

;'"

4835
4836

·1

MOV
rW'JB

@i(SP),-(SP)
1 (SP) .SC::-llL
(S;l)+,im:SDE+l

000000
000001
000211
00000:2

000213

000001
000006
000005

COOt73
000167

$TYPOC: rvlOVB

000 1 56

$T'yPON:

1 6667
1 2667
C 2716
C 0'::06
127·7

2767

27(;,7

o ~ 32
3·l
2l;

NUM,-tSP)

C 7046

., 70

$TY~CS:

<;0
.4 44
·1 46
-1 52

G7J4
5":04

000147

~7C4

000006
000134
000127
000012

o 6605
0;2-'1766

0 50("3

ADD

riOV~

r,jOl.!9
MOV
1\1:./

03~G

1 04E7
G7C4

MOV9
8R

0-1 .. 6
0 C546

FOK TyPEOl!T OF /... 16 BIT

MOV
TYPQC

5.4

G :1 70
oJ "1 C2
C ',C6
~ 1C

C 4

4(349
4550
4851
4852

18uTI~E

; : 11SD?

RTI
$OTBl;

4619
4820

·~839

(SP)

75
(S' )

BlO
"HI

MOV

~816

4840
4841

MOV

MOV
J5R
• i~IClRJ
MDV
MOV

176662
000002

SP)
R1 ,-( SP)
R2,-(S?)
R3, -( S?)
R5 .-( 5;:-)
#2C2JO,-(SP)
20(SP),R5
1$
R5
It' -,1 (SP)
RELOCF, ;;:0
#SDBLK,R3
RO.
R3
II' ,( R3)+
R2
SDTBl(RO) ,R1
R1 ,R5
4$
R2
3$
R 1, R5
R2

MOVB
T ST
CI'.P

~lOV

4813
4814
4815

4838

TO DEcrr';:'L ';':.0 T'(PE

16K VER
MACY1130A(1052)
20-FEB-78
07:56
CON'JERT BINARY TO DECH~Al AND TYPE ROUTINE

4812

4B37

SEQ 0178

US~J

6$
1 (5?) ,-I (R3)
1." 0, R2
p' ,R2
R2.(R3)+
(RO )+
RO,
.EIGHT

MOVI)
51S
BIS

MOV

012602
012601

4799

AS ll...
Bee

Mev

CZOl-rlCFO
0-124K f:EMORY EXERCISER,
C2QMCF,Pl1
14-FES-78 08:19
02·~G'6

8;,11

C~27C2

024576

4$:

INC
8R
ADD

55 :

0:-'2702

0105C2
J00764
1 C5726

SUB

TS T
5NE
TS T

C::::.': 4',3

02:'572

3$ :

Bl T

02·1552

4785
47St?;
4787
';788
4789
4790
4791
4792
4793
4794

ClR

r.mv

024644

O:~510

MOV
MOV
ADD
MOV9

000040

02<4514

02~S2':'

1$ :

154106

Ll771
4772

C:!.J'.~22

MOVB

000001

024654

02·1S 12

4776
-'.777

MOV
MOl!

020200
000020

4770

4[105
4806
4807

r,o. -(

MOV
MOV

c., 0146

02""~'::2

.1804

pes:

010046
0: 0 145

'-;758
.. 759

4797
4798

PAGE 96

~748

,na4

07:56

TG CMA~~GE ;\ 16-BIT 8PJ,l,Rf NU';~BER TO A 5-DIGIT
;.S!',:"'~Q D~Cli'.:~,L
(ASCII) '.UI.,.!BE'< ,'..~n TV?;; IT. DEPEr,QIr\G ON \>JHETHER THE
; .. i~:"~,'8;::'~ lS PCSlTI\fE O~ ~.ECATrvE .; SPACE OR A r,11~~uS S!GN ~'JILl 8E TYPED
;--auo,<::. Ti-lE FiRST DIGIT OF THE NU\'aE~. LEAJING ZEROS WIll AUoJAYS 6E'
;*RUoLA':::EC ',oJITH SPACES.
:.C', L l:
;
MOV
NUM.-(SP)
:; PUT THE BINARl' NUMBER ON THE STACK
;
T Y PDS
; ;':;0 TO THE R':::UTlt-.;E

.11~7

4778
4779
4780
4781
4782
4783

20-FEB-78

ROunNE

CO'NEr;.r BINARY

;*T!-o!IS f'OUTlNE

47<,9
4750
.; 75 1

4765

30,\(10'52)

CCl',~·.'UN!c.q:m~s

.SSlTl

~746

4754

MA~Y11

16K VEe;

14-"E8-76 08:19

;;CALL

ti2,
$ 7)
fi 1 .5"') F! L L
N6. S:"~JDE+1
1.5,SQ':'NT
F:3 ,-I SD)
R4,-(SP)

r,iOV

R5,-(SD,

Move

SQf.!DDE+l,R4
R4
/16. R4

NEG

ACD
r,1CV8

R-1. $C;MODE

MOVS
MOV
ClR

$OFILl,R4
12(SP),R5
R3

NI,.Ir~·,EER

; ; NLJ:-.~8ER

TO BE TYPED
FOR TYPEOUT

; P: CKL; P iHE .',~ODE
LOA:) ZERO FILL S\\'!TCH
OF DIGl T5 TO TYPE
; t.OJUST RETURN A[;DRESS

SET THE ZERO FILL $\lJITCH
SET FJR SlX(6) DIGITS
:::ET THE. !TERA-TIeN COWH
5t.\'E R3
SAVE R4
St..\/E RS
GET THe N',J1'.18ER DF DIGITS TO TYPE
SUSTriACT JT FOri MAX. AlLO',oJED
SAVE I T FOR USE
GET THE ZERO FILL SWiTCH
PICKUP THE INPUT NUMBER
CLEAR THE. OUTPUT WORD

EXERCISER,
08:19

CZQMCFO
CZQMCF.P11

1 $:

ROL

2$:

025·J04

006105
006105
OC 6 1 05
0":0503
6103

ROL
ROL
ROL
MOV
ROL

0:: ~iC' 06

1:5367

Q25C!2

, C0017
0":2703
001002

02,1770

4854

024772
024774

4857
4858
4859
4860
4861
4862
4863

4864
4865
4866
4867

4868
4869
4870
4871
4872
4873
<1874
4875
4876
lIe77
4878
4879
4880
48S1
4882

4883
4884
4885
4886

4887

025002

02~~014

02!)020
025022
02~:)24

02!)026
025030
025034
025040
025044
025050

02505:1.
025056
025060
02:'062
0250'34
e23036
025D70
0::5072
025074

0251C2
0)5104
0:<3106
025107
025110
025111

025112

3$ :
000 1 00
177770

OC 5704
0,': 1403
DC 5204
052703

0:: 2703
110367
004567

000040
000042
176442

025114
025116
025120
025~ 22
025126

Move

0007~'3

8R
MOV
MOV

MOV
M:':J
MOV

(SP)+,R3

7$:

000032

012605
012604

0!2603
0' 6666

000002

000004

012616

000002
000
000
000
000

OC5067

{SP)+,R5

(SP)+,R4
2(SP) ,4(SP)
(SP)+, (SP)

; ; RETURN

• BYTE
• BYTE
soeNT:
• BYTE
$OF!LL: .BYTE
$OMGOE: • "'ORO
a
;ERROR TRAP SERVICE ROUTINE
ERRTRP: TST
(PC)+
1$:
.WORD
0
BNE
2$
INC
1$
MOV
(SP),
STMP3
JSR
PC,
tERROR
.WORD
31
BR
3$
2$ :
HAL T

ooooeo

000002

soeNT

85 :

005727

025150

SPRINT

R5,

RTI

oeoooo

025144

177770
154034
17~:.i02

02515~

010046

025154
025156
025160

01 01~6
010246

CZQ~,;SFt.:

0103.q6

0-124K r/JErJlOF(Y EXERCISER.
14-FES-78 08:19

16K VER
P~YSICAl

MA-:Y11 30A(1052)
20-FE8-78
AJDRE£;S TYPE ROUTINE

ON STACK
ON STACK
ON STACK
ON ST ACIo{

07:56

PAGE 99

12(SP}, R2

;GET BASE. A:JORESS

C'05003
ODS757
0:'14-:· )

153412

CLR
TST
SEQ

025170
025174

r.~:'M~VA

02~176

022737

000001

BIT

ifl.

;,,;'J>(Krr~G & INCEX REG!STER
; GrlECK FOR r:E!'i1 illG!',H AVAI LABLE
; BRANCH I F 1m MEN' MGMT
; CHE.CK I F r~EM MG!I1T ENABLED
; BRANCH IF :'.'Dl ,l,iGiV,T NOT ENABLED
;COPY VIRTUAL ADR
;SHUFFLE BITS 13,14,15 INTO 1,2,3

t 77572

@;;SRO

OC 1424

8EO

1.10 'v

R2,

025110

OG6,01
006101

R[ _

ROl

Rl
Rl
Rl
Rl
#177761, Rl
IJKIPARO, Rl

0C5101

ROL

ROL
17776t

172340

~1921

02~~222

O~ 5' 01
C:6101
0":2701

4922

0,2:':::26

0(: 2701

<1923
4924

0:':5232
0)S23~

011101
012700

02~140

0[,6301

025242

CC:'6103
C77003

0:25;:16
O~5220

02::'2~~

C:::5246

ROL

4$:

160000

Li939

O~5JCC

11940
4941

C2~":?04

C~27C3

023210

110367

000060
000036

Q:'SJ 1 L<
02532':';
025322

0C4567

1761~2

02:-252
02S25~

4931

02:;255

4932
tl933

025230

·193.::
<1935
4936

4937

02~,274

49.38

0:;'::'276

C05300
OO! 3fO
o ~ 2503
0126C2
J: 20G 1

~ ~ISO

0:!:o340

~952

C<:S3"~2

·'195.3

C:253--16

~95<1

02~'350

000006

35 :

000003

012600
012616
C::t:5E 7

R3
RO,

BIC
ADD

#160000, R2
Rl,
R2

ADC
ASL
ROL

i'I'~OV

#6, RO

ASL

RDL

R3
Rl
2$

ADD
11.0 v 8

JSR

176144

0:::70C5
000207
OCO

85 :

1:'01,,'
MOV
ASl
ROl
SOS

DEC
BNE
MOV

O~50C3

~2SJ24

<\051

1 $:

025352

02:'326
C"S330
02';,332

~'349

BIC
ADD

000006

0..l2702
060102
0:'5503
006302
0:;6103
0.2700
DC 0·104
0:', 6302
0-:6103
DC 530 1
(0(1374
(,127C1

(Rl),

116,
Rl

;VA::I10JS

R2
R3

; DIGI T caUNT
; PRINT FIRST DIGIT

#3, Rl
#60,
R3,
R5,

;

0240':;0

;DIGIT SHIP COU!'JT
;r,~;\KE IT Ar~ ASCII DIGIT
;LOAD D!GIT INTO I,\ESSAGE

R3
8::'

;GO PR!~JT OUT THE FOLLOWING MESSAGE.
; AC'DR::SS OF MESSAGE TO BE TVPED
; CLEAR WDEX
; DEC DIGl T COUNT

~,PRINT

rwv

(SP)+,R2

MOV
lo'lQV
i.1QV
JSR

(SP)+, Rl
(SP)+,

(SP)

R5,

SPRI NT

• WORD
RTS
. BYTE

RD
2$
(SP}+,R3

;; PuP STACK INTO R3
; ; POD ST !\CK INTO ~2
; : POP SH,CK INTD III

(SP)+, RO

;; PO? STACK INTO RO
;ADd:JST THE STACK TO CLEAR DATA
;GO f.RINT OuT THE FOLLOWING MESSAGE.
; ADDRESS OF MESSAGE TO BE TYPED
; R~ TUR'.
;ONE :)IG!T ~,'ESSAGE BUFFER
;';~ESSAGE TERMINATOR

FlLl2
PC

r""n-~,"GE

STA ...JDARD

PROGq;.,~;

PRINTOuTS t;SEC

; THE PRCGRA""
025015

;So.::T TO APPFOPRIATE PAR
;G~T COIHENTS OF PAR
; SET UP COUNTER
;SHIFT PAR
;SAVE OVERFLOW BITS
;CQUNT SIX SHIFTS
;SAVE 5.'l.NK BrrS
;CO:.1PUTE PHYSICAL ADDRESS
; ~""KE SURE CARR i ISN I T LOST!
; FIRST DIGIT TO R3

":$

.I..:ORO
CLR
DEC
8NE
r.1QV

.5BTH

C2S3S4
0:J:'3G::;:>

;CLR ALL EXCEPT SITS 1.2,3

R1
RO

.BYTE

ODD

4963
4564

(18 BITS).
RO
Rl
R2
R3

MO'J

0.0201

·~9~8

TO RECOVER

000012

02:;::0·~

4942

FIRST WAS PRINTED

016602

025162
025165

c::: s:.:! 05

494·1
49·Q5
4946
..J9.c:7

;SKIP HALT
; ERROR! SECOND TRAP TO 4 OCCURRED

.SGTTl
PH'/SIc ... L ADDRESS TYPE ROUTINE
; ...
ROUTll\,E TO TYPE A PHYSICAL ADDRESS
$HPt.D:
Mev
RO,-(SP)
;; PUSH
MOV
Rl ,-( SP)
;; PUSH
R2,-(SP)
MOV
; ; PUSH
MOV
R3,-(SP)
; ; PUSH

~914

4943

;CHECK IF Pr,EV TRAP TO 4 REPORTED
; CGIH td NS ErROR REPORTED FLAG
; 8RA!~CH IF t~OT REPORTED
;5ET OOUBLE TRAP FLAG .
; SAVE THE GAD PC FOR TYPOUT.
; '" '"'" ERROR *'11* (GO TYPE A MESSAGE)
; ERROR TYPE CODE.

; RETURN TO PROGRAM AND TRY

4915
4916

4925
4926
4027
4928
4929
4930

; ;OCTAl DIGIT COUNTER
; ; ZE-RO Fl LL Sw ITCH
; ;NUM5ER OF DIGl TS TO TYPE

CLR

Rll

025152

ClQMCF.Pl1

4917
4918
4919
4920

; ;STORA3E FeR ASCII DIGIT
; ;TERMINATm· FOR TYPE ROuTINE

; BEFORE

3$ :

177746

4901
4902

<i910
4911
4912
4913

~3,8$

2$
6$

000000

4909

a's

R4
/I' 0 ,R3
/I' ,R3

025142

4907
4908

BIS

INC

4898
4899
4900

4903
4S04
4905
4906

5$ :

BLl

--1897

025135

: ;GET RID OF JUNK
: ;TEST FOR G
; ; SuP( RESS THI S C?
; ; SR I F YES
; : DON L T SUPPRESS ANYMORE
; ;~MKE THIS DIGIT ASCII
; ;rM,KE ASCII IF NOT ALREADY
; ;SAVE FOR TYPING
;GO PRINT QUT THE FOLLOWING MESSAGE.
; ADDRESS OF MESSAGE TO BE TYPED
; ;COUNT BY 1
; ;8R IF MORE TO DO
; ; BR I F DO~E
; ;INSURE LAST DIGIT ISN'T A BLANK
; :GO 80 THE LAST DIGIT
; ;RESTQRE RS
; ;RESTCRE R4
; ; RESTORE R3
; ;SET THE STACK FOR RETuRNINCl

OC5204

025140

025132

1f'177770, R3
4$
R4

002402

4896

.:'1892

; ; SR I F NO

BIC

; ;GET LSB OF THIS DIGIT
:; TYPE THIS DIGIT?

003346

001010
005267
01,667
004767
0:'0031
000401

'l893
4894
4895

JS:"?
• '.'<'ORD
DECB
BOT

1 S 5367

SEQ 0180

;;ROTATE MSB INTO "C"
;;GO DO MS3
:: FORM THIS DIGIT

DECB

INC
BIS

C~51 06

PAGE 98

BPL

4$ :
000060

07:56

R5
R5
R5
R5, R3
R3
$OMODE

BNE
TS·
BEQ

4898

.i1889
4890
4891

U1ACY11 30A(1052)
20-FE8-78
TO ocrAL (ASCll) AND TYPE.

4853

4855
4856

16K VER
BINARY

052113
0..;;2515

030461
047515

; ok .. '

,. .. "' .. ", .. "' .. '"'''' '"

MMAMES:

.ASCI2

** *"''' *'

'oj. '" ..

'~,. ..... '"

<15><12>'KT11

~.1~SSAGE3

Tf-1RUO.iT

*"'. '" "'* *** *'" ""'" "'''' ** .. ., .. '" "'* '" $"'* '" ... ****"'*
(li.:'MGRY 11,ANAGEMENT) AVA!LA6LE'

SEQ 0181

CZQr,~C:FJ

CZQMCF • Pl1

4$65
4966
4967
.. 968
~969

49,0
4971
4972
,1973
4974
4975
4976

Q-124K ~:,E~.1JRY EXERC 1 SI!R,
14-f" ES-78 Oil:1 ~

g:~~~~
()40440

O~QS~6

041101

042'5' 4

Q~G4 1:2
0201 J1
000

046505
040515

MEr.1M(:S:

,A5~ r~

<15><1:!>IMEMQRY MAP; ,

052131

aVrrflgS:

• ASCIr

<15>O:::1:2>'BYT~ ME\tORY

023~2Q

ooq

J~5_j21

015

O;!5426

051117

02~,.:l34

025120
015
C?0105
C5452;2

,)25437
C,254..;4

025·132
Q2::'.-)SO

0:'4;524

0: 1111

QC5015

4980

025~104

4981

O~S5':>7

035120
010

4982

025514

O~011

4983

D;25517

4084
4;:J:8:j

J;;S52-1

DO'i 01 5

02~,:::32

0';3106
052116
0:,1117

040

><0 11:

• ASCIZ

<15>(1~>'FROM

OOO~40

TO:

O:i2~23
042S~1

IN~~FF :

.~'L·Z

· ASCI.

<1 S)< 12~' INSUFF fC 1 E;NT

MTR:

.ASCIZ

<15><12'~'NO

PWR"$(> :

.ASCI~

<15)< 12>' RE~ TART ~ NG AFTER A POWER "AI I.URE' <15>S:l 2>

NOPES:

.ASCI2

<lS><12>'N'O PARI TY

PRORE L:

,. ~CI!

<15><12>' PRO;:;RAM NO~ RESIDES 6~C~ AT 0

• ASCJ~

<1S>(12)'H!T ~ONT!NUE FOR NOR~AL R!,JN~ING J <15><12>

0-11 ;>11

0 20117

043500
001522
04~1 16

O~1511

o1!;

0i1 56 :25

O·~252A

02[,63.:j

O~2517

Of!564~

015

499,

Q2~·C<l6

O~052';

5000
5001

02::·0-5.:l

0;:Ql07

C2:;66~

0:: 0122
u:'2?27

5016

047~;>~

046111

CCOC12
CO sq 15

051012
05 7"12
043 10 1
Q20101
P2012:=!
05112$

043::140
COO
C5150~
0471 t 1

04;!524
047530

C4Q506
e06505

0 47 5 16

050140
020131

047~22

G25730
G:2::'736
02S7Q4

C4:,10 .J

052517

OS 152~
O'l21 1f.3

0';7440
0";7515

05",52.2

C~575:2

0~OE03

005 516

CDOe 12

02:::760
0;::57613

oe5015
1'.)·;0522

O;!5774

0201 :27

051120
02Q11 S
Q4;:!522

043517
047516.
044;'2;)

2260Q.2
Q2GO 1 0
02GO 16

C . ,504

02011~

0<01,3

C4C~O;;!

0.!5~03

0404--10

04'7524

o~o 12'
Q3404Q

026025

015

0440q

C52111

02p9:;2

041440

047117

0445~A

16K Vf:~
MACY11 30A(105~)
20-FE~-7E\
STANPARD ~R(juR~M. fy1E.SSA~~5

5021

02S~40

5022
5023

02b·>~G

02012~

04751.6

04'l;'QQ
0465n

(;::G.):;..:j

5024

(;2G~62

0;6101
0'::4516

051040
~435t6

O,4712;l
005015

5025
5026

025070
02607 !
026076
J.JS104

015

cSl 0 Q
04 2524

02q 12,2

5029
5~30

5031
5032
~O33

SQ3.:l

S035
5035
5037
5C38
5039
5040
S041
5Q4:2

0;::'6110
0;26113
(;213123
C<.:?G 1 ~o
02\313':5

coo

p~ 1511
C.52101

047117

O~1124

0~01 ;1'3
041412
0,'Q5.0

0511 "1

0;::':,\ ~ [56

02(; 174

OC0040

(1::G1 q:'l
:);26176

0':5(:1$

O;;1~15

030461

,>5455

041440

O~1 : 23

O~(i';40

~043

Y:'f.'nD

C':i1 o~

:;;044

{:;:'75..:4

5046

023226
02':2;34
026242

5047
50 .. 8
50.;19
5050

02G::SrJ

82-34'36
82,'::264
O,':lS.?65

0:: 1 040
0'", 9532
CC-OCS6
OC50 15

:')~~.?;J

1 6605

5051
5052

sos,

c::: l<~ C 2

~,054

5055
5056

O;2e:,3t6

026.";2.1

SO~7

S05a
30;;;;Q
SOGO
SO:31
SOf,2

O';".l45

i~~~~~

::,< l~-; 1 ~

051117
C;51505
G2ll':41
0465' 'i
04E
5

l61
5,05
0.:. 1120
02052';
04'440
0521 DS

CS.2, ~3

027::; ;;6

0"'75C6

047516
051117
04'71 ;25

027104

015

CO;;01 "

O~61

ceo

O:!oq3
O~ 21 C3

052 t 25
950040
C321 ~5
047111
OH6101

04G4~O

M:.:,2:

,ABelZ

MX3:

.ASCIZ

<15>';12>-'CORE PARUY

~t::

.ASCII'

<IS><12~'MOS

MX~:

.ASCH

<15><12>'MS1hK CSR

Mx6:

.ASC,Z

'MSll .... K MEM~RY PR~SEN1!!

NOMEM:

.ASqZ

<1p><12>'NQ MEr,IORY FOUNt;>_ J

F"'OM~S:

.4.SCp

~15><12><12><12>'INPUT

.ASCIZ

<15)'<1~;"'FIRST

C_ ,'·~::;C

CO~~TROL;;

PARITY

TO COMPLET~LY TEST RUN OZMML ••• '

O~01 ,31

044,i 1 2
C4(:.l40
0511 q1
051 t o~
04H';O
eGG

015

043912

O~1111

0';0";.::::0

0':.;2S;;;2

Of 1 ~23

(42104
02:;;': 72

C4C514
0.;.\2104

C42=;;22

020072

020

027412
[:ill scS
0524·-;0

C'::2101

';';04";0
C'::'15:':3

.ASCF

C42Cc;.O

CS~1;3

Oj~

1 3

ALL PARAMETERS IN OCTAL.'

;'PDRE!.SS:

l,.AD~.lES:

,A~C

B.;D:.CR:

• ASC L

<15>< 12> I ?ADDRESS

CO"iST:

,ASCIZ

<1S><12>'SELECT

<15,>< 12>' l,.AS T ADDRESS:

DC 0

~,')G8

~·r:~~~21

015

SC09
SOlO

v=l~-~2l~

D!..11 ('4

'~ .~J-;3·;

S071

" ;~ ~ i. ~ ..; .2

5072

,:;'1\-,·;5J

)--17' 11
::'01(' I
0'::05':2

S'J73
5074

~, :::s·;SG

~ ~ 50 I 5

::0076

C45 ;~5

o·

~,~5015

.:--.;:'2..\ C..:j

:,C7S

g~;~~~

0::0116
':':6114
0";6501

<15><12" 'P.~GlSTER AT

MX1:

,.:.,:·cC~O

SOG3

':<'64

l:,C67

c~o i

C:' 1515

SEQ 0163

")445~2

C54524

C20131

PAGE 10~

000040
e4.15~2

02D~Q4

Q7;S6

0521 c~
oe212~

oeo

Tp BK'

ilbo

P47515

(',2:3212

5045

04:!~0~

u~,611 7

O:?'~156

FOUND ON ,.,EMCRV· 5CANI<I~><12>

OOP040

c~ 1440

01 :;
0;01 ;
O~ ~ 5 1
C;: ;.-0
0:,015,
OC OQ.40

0201 ~2
OJ,S15?

O~01 o~

.ijROR~

C4~S l5
Q51440

020Q60
113

0=2516

PARIT'( ReGIST,RS FOUND'

054S~4

C.zOMCrO
C~1+4K !.~EMORY EXERC1SER,
CZQrtI:F _ ;:\11
1 ~-r EB-79 oe: 19

5027
&028

16K NOT ML THERE I I

021,.0.,),05

052111

0~60'4

r~EMORY1·.FI':l)l'

027':'5'6

051101
0511

025722

, TO

000

~99S

5011
,01 B
5019
5020

<1S><12>'PARJTY \IEIIORY MAP: '

Q4701 ;2
0445:n

0:·4124

~99il

5"14
5015

,ASCI,

g~~7;

020124

4997

5011
5012
5013

"'TM~P:

020124

0.0:"·0520
OL1040

0257'05
C25714

C445,:22
041330$
040615

051~22

C2501 :?
0';-5620

5001;1
5007
5009
59 0 9
5010

0405:20
0464·
020 13~
DOD
043C.12
000
047&24
04711 t

02D113
0461 D1
051105

-1993
11994
·1995

5005

O;i01,Q1

0~4'O06

025576
G;15604

C2S 704

0475i5

0::-3091

4990

5004

MAP: I

D~ 1 012
Q42515

0464"10

046305

..;991
4992

0..15670
02SG'i'G

(,; .. 7 1 05

046440
O;;!7ql

025540
025546
023554
02S562
C2S570

5003

047101

oeOOi2

025:17G

...~2S'3 Cl5

PAGE 100
SEQ 0182

0";3501

~979

5002

07: ,6

024524

.::~5470

4989

:20-FEe ... 78

MESSljqES

C.:.\6111

0254G2

4087

~OA( lQS2)

PROG~AM

025·10'1
0;:5..; t 2

054522

4977

·HlBS

~TANOA~O

0;25370
C25376

4978

49~6

MAGYll

16" VE"

O~:25l0

IN Uf\.MAPPED BANK'?'

C2C12J
046-316
C,2C! OJ

O~SplS

CO':"~77

Q4;!523
0414 .. ,)
047101

C42;514
Ctl7117

C35124

C;ON~TANT;'

Q-12t:f", \'Ef,~,ORY E.XERCISER,
14-FEB-78 08:'9

015
050130

5077
S078
5079
S(>80
SOS1
5082
S083
5084

5085
5085
5087

5088
5089
5090

0213514

0.20104'
0545~

J: 211 1
0,7553G
02C,::42

O·~7522

0('5015
O~ 0522

0':: 7514
026564
02G572
025GOO

02'3606
02Gl) 14

020104
G" 50 15

OS2040
c'; 7 117
044522
0: 1122

052412
041505
042515
050040
020,31

.ASCIZ

<15><12>'Ut\EXPECTED MEM,JRY PARITY ERROR'

051120

043517

PkE.LOC:

.ASCIZ

<15><12>'PROGRAM RELOCATED TO

020115
040503

042::'22
04252-4
000,:40
042522

MTDE'

.ASCIZ

<15><12>'MORE THAN ONE PARITY ERROR FOUND.'

SCANM:

.ASCIZ

<15><12>'SCANNING MEMORY FOR BAD PARITY. t

PE'I;NC:

.ASCIZ

<1S><12>'PARITY ERROR WILL NOT CLEAR.'

NOMTST:

.ASCrz

<15><12>'NO MEMORY TESTED.'

5KPMES:

• ASCIZ

<15><12>' SKI PPING TEST II'

FILL2:

.ASCIZ

<377><377>

.SBTTL

ERR_ 'l REPORTING MESSAGE.... AND TABLES.

000122

047524
047515
0~051 0

020105
03~524

042440
043':40
000:56
047! 01
046440
020131
040502
044522

0:26030

5094
5095
5096
5097
5098

02564';
026652
02G(60
02 ..3666
0212(:74

054524

5099
5100

(;2(.)700

005015

02G706

0~4S24

042440

051117
0:;'0114

053il40
047516
040505

5101
5102
51 C3
5104
5105
5106

5D7
5108
5109
5110
5111
5112
5113
5114

025730
02G7:j6

0.:; 7506

0'"6103
000

02,)737

015

(2(:,74";
.)2G752
J2676C

052040

026763
026770

026776
027004
027005

0~~2515

0271 ('4
015

050120
042524
000
377

0~21 16

041523
043516

051117
020122
040520
000:'56
040520

044522
C511 ")2

046111
020124
027122

047012
047515

020117
054522

051505
00'
051412
0471 - :

042524

052123

044513
020107
021440

000377

5115
5116
5117
5118
5119
5120
5121
5122'
5123
5124
5125
5126
5127
5128

5129
5130
5131
5132

;

5134
5135
5136
5137
5138
5139
5140
5141
5142
5143
5144
5145
5146
5147
5148
5149
5150
5151
5152
5153
5154

027010
C27016
027024
027032
OJ7(.4)
02"i04~

027052
027060
027056
027074
027100
027106
027114
027122

027130
027136
0271~4

on152
02716C
02716G

02717t:,
027202
027210
027216
027224

on.?32
02,-240

O·:05~G

044522

c:; 1 0':'0
Q.~ 0524
051117

043505
020122
042440
000056

0.12101

031104

O·:2S~'4

CS452.:l
051511

0~01~3

042524

051122

051505
052123
051117

OS2CSO
O:!44('5
C.J,7503
0521; 6
0::>0101
024122

052123
000056
051516

040524

0~20.L10

051105
051524

027262
027270
027276
027301
027306

027314
0]7322
C27330

02,-J36

5157

027344
0::>'/345

5162
5163

5164
5165
5166

5167
5168
5169
5170
5171
5172
5173
5174

5175
5176
S 177

5178
5179
5180
S181
S1 S2
~')' B3
518·1
5185
S1B6
5187
5188

040':24
041040
051122

052050

052123

(,,..4524
052111
051117
0304b 1

020455
0'-; 7515

024462
020123

000:56
042522

051106

051505

020110

0':2524
0:: 11:::2
051524
031455
iJ':::0063

052123
051117

042440

O~'j"352

0273EO
C27366
027':;'7·1

027':;02
02'7':< 1 0
027:'11

0)-;.:116

115
0.::7111
C;;0123
0:::3460
O~7522

O;:~-50n

0::27:)14
027522

(,27570

027612

• ASCIZ

'MOS REFRESH TEST ERROR (TST 30-31).'

"MARCHING 1 l S AI.J 0'5 ERRDR(TST 27)."

OM11 :

• ASCIZ

'PARITY MEMORY ADDRESS ERROR( TST17).'

OM12:

.A~~IZ

"DATIP WITH 'r'JRONG PARITY DIDN'T TRAP(TST17)."

DM13:

.ASCIZ

'WRONG PARITY TRAPPED.

DM14

• ASCIZ

'PARITY REGISTER NOT MAPPED AS CONTROLLING THIS ADDRESS(TST17).'

020123
024122

0.;2515

052(50

1 C4

052101
052111
047117
04c1522
042111
051124
052123
000

047522

J50111
020110
C20107

054524
C2J516
050 I 01
033161

0')2125

047040

043516
C52! 11
050! 01
C41840
02a 117

0':;2522
OS 11 C5
OS 1527
031117
027107
120
O~iO 131
o~-, 21 :;,3
0:::21 17
0.:;2520

04-,507

052123

051440
0424';0

047510
051122
040514

020104

O·~ 1 4i; 0

O'"l7117

O:IOC~O

DM6:

• ASC:Z

027')51

C20131
042sr. ')

'ROTATING BIT ERROR(TST1'-12).'

DMl 0:

033461

027051
127

• ASCIZ

044103
023·161
02010-.1
051105
051524

047101

051117

032050

DM5 :

'3 XOR 9 PATTERN ERROR(TST13-16).'

0.:; 2522

Q27~lS~

SEQ 0185

• ASCIZ

052123
OCO

0:27·;G2
827V:'5
027472
027500

PAGE 103

OM7 :

0:' 1122

O·-,20,W

07:56

020122
052124
051105
051524
033':61

020116
02'::122
026.",33
000
051101
020107

040440
051523

0:;"0124

'CONSTANT DATA ERROR(TST6-10).'

047530
0405:'1

C~4522

0.:0520

.A~CIZ

C24::~0

027C51

02-i~:';':'

DM4:

000:56

052111
04',..J; 5
042104
042440

..:.:27 ... ·16

'ADDRESS TEST ERROR(TSTl-5).'

030-:63

051101

021432

.ASCrz

020124

033462

053440
OS 1 127

DM2:

02-1461

C20124
000
120
020131

027-;2'1

'PARITY REGISTER DATA ERROR.'

16K VER
MACY11 30A(1052)
20-FEB-78
ERROR REPORTING MESSAGES AND TABLES.

000856

0:2 0071

.ASCIZ

C52101
047522
033124

024460

OS 1105
00:.7522
C'::0524
027051

DM1:

026,~61

0:; 0455
0-17522
O~ 3515
0'::2440

02715<;

5156

5159
5160
5H')1

"'* .... * ****.' ... " ....... "" ~ * '",,, .. '" '" "''' "'* .. " >r" *"'* *** .. "'**"'*"' . . *"''''''''''"' "'*

; ; * * ~ * *** '" ** *'"'*'" ** "'*'" '" *.' "'* * "' .. "''''* "',.,. .. "-** * .. '" *"'* *"''''* ** ** ...... * •• "' •• "'.

040504
C51122

0·124.10

027:24S

5155

5158

;,.. "' . . . . . . "' .. '" >j<

; .. MESS,'>'GE BLOCK FOR ERROR TABLE TYPEOUTS

CZOMCFO
0-12t;K tl'EMORY EXERCISER,
CZQfv:CF,P1'
14-FEB-78 08:19
5133

020116
040520

051"7

02G622

0::0104

SEQ 0184

UNExPT:

5091

0:26636

PAGE 102

0"1:56

042516
042524
047515
051 101
051105

5092
5093

052517
DC 50 15
044516
C:6505

16K VER
MArYl, 30A(1052)
20-FEB-78
STANDARD PROGfU,M MESSAGES

051101
051124

026104

0~3040

BUT NO REGISTER SHOWS ERROR FLAG.'

OOC

051101
042522
051105
0.:l(~440

C52111
0445,J7
047G ..;0
e50101
051 SO 1
051124

CZQrtt:F:;
0-12""K ','E,,-1QRY EXERCISER.
Czor,KF.;'J 11
I --1-F:::8-78 08: 19

5189
5190
5191
5192
5193
5194
5195
5195
5197
5198
5199
5.200
5201
S;202
'3203
5204
5205
5206
5207
5208
5209
5210
5211
5212
5213
5214
5215

5216
5217
5218
5219
5220
5221
5222
5223
5224
5225
52.26
5?27
5228
5229
5230
5231
5232
S:233
52:::4
5235
5236
5:237
5238
5239
5240
5241
52.42
5243
5244

02';1320

0~6117

04~514

02"(:26

c:: 2040

027~.~12

0"':2101
0:4123

04.:.510
CS1 1 04
J5152-1
000056
042522
0201 i 6

0276::;0
0)7654

027704

027 ~' 1 2
0:;::7720
027726
J27733
027740

027746
0?77S-=<
0:':7752

0:4;J67
0':' 7515
0':0510
0::0105
0:;2123
0":2116
O~2\05

0:='2111
O':,75~2

104
0·;4123
023516
(:':;2526
C':: 3516
0.,2510
O';~522

03C:::04
(UOaI2

CJC020
030026
C 3C031
O':;;OC'36
;)30044

0;;0052

030070
030075
030104

03·)112
030120
030126
030 t 32
030140
030146
030154
030162

030170
030176
030177
030::'04

03:J212
030220
030226
03C'234
03('242
03C250
030253
O:?026C
03;)266
03~273

030300

OS 1 I ~2

0.,0522
u:'2050
0)70_1

122
0:0115
0·- 2440
O=-20S0
0;:7051
111
1525
0':2440
0'::4524

0511~2

0: 2123
0:4466
0:'1120
O:~ 0 I 15
J..; 1440
0.::21 e5
0:01 16
0~1 05C3

042522
051105

O~1505

.'SCll

'MORa: 7!-'AN ONE REGlSrE;R INDICATED PARITY ERROR.'

OM1?:

• ASCll

"OA T4

047504
040524051 !1 7
030C62

OMfO:

• ASCIZ

'RANDOM DATA ERROR{ T5T20),'

051124
047117

OM~1 :

• ASCIZ

OM;?3:

• ASCIZ

'PROGRAM CODE CHANGED WHEN RELOCAT~D. I

DM24:

.ASCll

'TRAPPEP.

OM25:

,ASCI:;:

'TRAPPED TO

• A$CIZ

'FAILED TO TRAP,'

05?"40
047117
044:'07
044·~·;O

04 I 440

040310
C53140
040520
042-140
052':40
042105
033461

0-17503
040510
053440
042522
04:2:",24

030306
030313
030320
030325
038334
030342
O~0347

030354
030362

:00
020101
042114

SHOUL-ON' T HAVE CHANGED wHEN PAR lTY ERROR TRAPPED (TST 17) • "

04fJS10

INSTRUCTION E>;ECUTION ERROR(TST21-26).'

052503
042·~40

CS2C :50
031055
0405.:?2
042504
C4;3516
042510
r~7514

0271Q4

oeo
124
C.)21 C5
020124
O~35C5

0:;::0122

u51105
G":45C2
0271 ~4
1 :4
O~21 C5

0300461
106
020104

040522
050
O~7117
C~61f'?

0 .. 7123
052105
015
C50120
C20117

04C522
020054
047516
051511
040510
047522
020124
000
040522
052040

0501 'Q
C52S02
051 (.'40

0270l,,~

~'::l0
04~S 14

044501
047524

0271,20
041501
042440
020105
052047
027051
052012
042105
020064

BUT NO RE;GISTER HAD ERROR BIT SET.'

042524
C20104
C20 122
04:2523
050120
020117

114.'

052040

16K VER
MACY11 30A(1Cl52)
20-FEB'T"78
ERROR REPOc(Tl1\G MESS)'GES AND TABLES.

000
044524
040516
040527
051440
000
040522

07:56

PAGE 105

SEQ 0187

DM27:

,ASCIZ

"(ACTION ENAf3LE WASN'T SET)."

Oi,.31:

.ASCIZ

<15><12>'TRAPPED TO 4

OS2~40

000

; ; ............ ** . . ** * .............. *.* . . * "'* ** '" >!I If If"' .. " , " . " * .. ********.* *....... *"' ............ .
oj.

;OATA COI,.UMN hEADINGS

030367
030374
0:;0402
030--l06
038414
0::;:0422
03:)·:30
030433
030~40
C3~446

030.:54
O:?C462
030-470
030'::75

120
OQ4507
0-"0527
0;' 7526
0::OC57
CS1411
051501
126
027520
004501
0': 7526
0:'0057

004503
027523
000123
041520
OO.:J503
041057
000
050'157
041520

OC4507

126

027~)23

.ASCIZ

'V/PC

PiPe

5/B

I,,: )4503

OH12 :

.ASCIZ

IV/Pr;:.

PiPe

5/6'

OH14:

.AS:CIZ

'v/pc

PiPe

R'G

MA'

OH15;

.ASCIC

'vIPC

PIPC

MAUT

REG

SIB

050011
C52511
051411
05150,

OH21 :

.ASCIl

'v/pc

Pipe

IUT

SIB

CQ4:',03
C51·;11
C0450 1
040515
05341 I

DH23:

.ASCI;;

IV/PC

Pipe

SRC MA

CST MA

SIB

(104503
052~; 1 1

DH::!4:

• ASCIZ

, vlPe

PIPC

T~P/PCl

DH2?:

• ASCIZ

r v/PC

"I PC

TRP/PC

REG

WAS'

PH25:

, ASC1Z

, VIPC

~ IPC

REG

ioJAS I

DH30;

• AS. Il

REG

WAS

WAS I

04;2:::i22
COO

027523
000123
041520
OO.:;5 r l

0045:;4

O~0515

0~1057

053411

OO~S24

WAS'

C46·~11

040515
050057
041520

D:-25Cl
0'::4507
0":0527
0;: 7526
OSOC57

004503

WAS'

046411
042522
004502

oeo
126

(J3(1=~36

:::~75:0

::,7~

0':'1522
C:;,15C4

05e057
041520
04G440
020124

0:;1411

041057

"::::1501
':26
O:'iS20
(1501':::2

000
050057
041520
050057
041520
00--.503

041520
033411

:;;294

050857
c!3C70G
030714
030715

O,H2 :

OO';50~

0; 7:520

CJC'~;'0

C~0~1 1
0405,5
053411

041520

030502

03(;550
G.'1·::;SSi

042522
004502

00010'
050", 11

030510
030516
03:):';24
0%530
03':;-532,
J 3,):;":":

5291
5202
:'>293

5205
52!;l6
5297
5298
5299
S300

SEQ 0186

0201~3

C52101
051 ! 01
151105

043517

PAGE 104

030524

041511
050040
020131
027122
OS2101
052517
020 124
042105
020116
05·1524051117
050120
052123
000
047101
040504
051122
052123
000
051516
044524
042530
0,,7117
051117
030462
000036

07:56

043516

C::QMCFD
0-124K J'I'Er,:ORY EXERCISER.
CZQMCF.;:011
14-t'EB-78 08:19

5245
5246
5247
52":;8
5249
5250
5251
5252
5253
5254
5255
5256
5257
5258
5259
5260
5261
5262
5263
5264
5265
5266
5267
::.268
5269
5270
:'271
5272
5273
5274
5275
5276
5277
5273
S:?79
5280
5231
5282
5283
5:284
S2iJ5
520G

16K VER
MAGYII 30A(1052)
20-FE2-78
I;R.t(DR REPQRl 4NG MESSA~ES AND T,\bI.ES,

0·;3505
0(,0
122

COO 1 03
C5 ... 11
C51124
051-'J 11

C51501
COi~::'J3

0~1520

"-:51:: 11

053411

C51501

0'03505

0534 t 1

WAS I

CZQ'-JlCFO
Q-l.24K r,~EMORY EXERCISER,
CZQMCF.P11
14-FEB-78 08:19

5301
5302

030722
030730

051501
046411
040527· 000i23

'16K VER

MACY1130A(1052)
20-FE3-78
ERROR REPORTING MESSAGES AND TASLES.

530a
5309
5310
5311
5312

5313
5314
5315

5316
5317
5318

*"'''' .. "'''' "'* .. "'*"'*

000

377

000

OF,:

.BYTE

0,-1,0 .. 0

030737

000
000
000
000

377
000

377

DF2 :

• BYTE

O,-1,-1,O,d

371

377

OF3 :

• aYTE

0,-1,-1,-2,-2

377
000

DF14 :

• BYTE

0,-1,-1,-1,0,0

000

DF21 :

• BYTE

0,-1,0,-1,0,0

000
377

OF30:

• BYTE

-1,0,-1,-2

030740
030743
03C745
030750
030752
030755

376

000
377

030760
030763

000

030766

371

030771

376

377

376
377
OC)
377
000
CJO

000001

CZQMCF. ?11

OOOJOO
DOOeaD

"~D\oJ2

OQCClQQ

A J:J'N 0
."DOWl

CCOOOO
OCOOOO
0000JO

AD;::~10~

oc~oco

:,00\'.'11 = 000000

oocooo

AD~I"14'"

C OOO:JC
ooeD00

AUJ,>,J15"

ooooc-:

ADDV!3
A)(Y~~4

A~:)'.\'S
A~--O\\'6

1\0:)1':7
ADD',\'9
>,~D\>i9

AJEVCT"

Auf'l/:,'
AE
M.NV
AENVM

CO':::OC8
000D00
COOOoo
JUClCOO

O(hjCG0
02000('
000JOO
OeOOOD
O'J,)JGO
leaDOD

OJOOOO
GOOOoe

/,f,~,':'.DR3~

OOOGOO
C0CCCO

te t,,' :,rlIS 1 ~ OCGCl'JC
r".1,~""S2 ~

oeoo(;o

A1,~:,M:'~3·'

008COO

f..i;1;,WJ4"
A·S':;Il.D

c: 0000
CC'C.:OOO

384
384
384
384

SEQ 0189

'"a
439
440
4·~ 1

4'~2

44:"1.

444
431
432

2519

3750

4659

4737/1

41·-1

4,7
420
3-;;2

393
386

384

4(7

COCQGJ

384

4' 5

Ar,~;- Y'-:3 ~

00.:'80J

384

418

384

42'
389

::'~j4

'08

428

.<~,~:y;,J2~

,'\'I T y;J.~

PAGE

399
429

419
422
4:6

384
384

07: 56

425
427

384
384
384

'79#

oe0000

/I:',~t'\ QR<1 "

384

384
384
384

20-FEE\-78

-- USER S'yI'llBOLS

384
384
::;84

384

384
384

M1t..D~2;

, 6K VER
MAGY 11 30A( 1052)
CROSS REFE~I:.;"CE TABLE

433
434
435
436
437
438
390
426
2433
395
396
387
4' 2
4'6

N;CCOO

,'\',1/, ['R 1 ~

AFATAL"

384
384
384
384
384
384
384
384
384
384
384
384
384
384
384
384

<:0:):'01
~'(\OJOO

; THE LOADERS ARE SAVE HERE TO END OF 8K

• END

Q-124K II~EMORY EXERCISER,
14-FEB-78 08: 19

;',CPUDP",

MJ;::r~!2

*. "' ' " . . . . . . . "' ' . . .

• EVE. l
321 to

032110

CZQMCF0

f,C;)W12=
",:';0,-113"

; : * "' ...... ,. * * ** "" ..... ** ", .. ", .. " "'* ... * *"'* *"' "'"'''' '" "''''* . . ' ' II< .... '" "'''' "'''' . . . . . . . . . . . " .... " . " ..

030734

5321
5322
5323

SEQ 01 B8

; ; oj, ... '" ", .. OJ. '" ,. ..... ,",. >1- . . . . . . "'« '" OJ. '"
*",~, .. "''''''' .........
;- OATA FORMAT TABLE FOR ERROR PRwrOUT.

5319
5320

AGASE
.... C;:; ...J1

PAGE 106

004501

5303
5304
5305

5306
5307

07:56

384

4598
4187
E.76
4593
334

384
384

,\ \, r: C I I ~

DODO::!)

/;\'[CT2"
6:.D;.Jfi

OC(!:<.O

l~NNKNO

G 1 61

B J T PT

384
::'24
384
"::41..
1 (332

52211

47:: #
45:; 1

4736#
4G(~ 1

473811

3:37
388
391

393
423
424
506.:31i'
16·11
1134"

1667
1135*

1677
1171

339711
1172

1173

1174

l ' B2>!<

1183'"

1192

1194

1197

1200"

c.:Or.1CF0
C2Qi~Cf,;;'1

aITO
81 TOO
Sl Tal
81 TO-11
I3l T03
81 T04

61105
Bl T06
8J T07
BI Toa
B1 i09
13 IT 1

SI TtO

0-12-",; ': Er.mRY EXERCISfZR,
14'"F E6-78 08: 19

000001
00:;00 I
('00002
OtOO04
OCOQ1C
(JO{lO~O

~DO::40

OOJ100
000200
:)"0400
001COO

OCOOOf
OC;?OOO

8! Tl1

00";GOO

;31 T12

() I 0000

SI T 13
BI T 14
131 T 1:5

o~c-aoG

BIT2
81 T3
81 T4
BI T~
~I T6

MAry 11 30AI10,~)
20-FE9-78
1 ~K VER
C7: 56
CROSS REFE.4Et'-ICE T A!3L.E
USER Sy;.1BQLS

2409

241,

2·:67

3173
3238
3317

319~

:3195;

3259.

3:;1qC,
::324

3319
3400

3366
12;3#
376 7
11211
111#
11011

116
117
115
115
114

106#
105#

104"

40~'

,...
3201

or TS

11511

3231

3~60

001 CDC

lHII
547#
13- '/

3151

3n2

10'13

4973#

940·

1483

3331

37591'

030760

BOO

QF3

a3C:~5

729
631
717
762
772
777

D',il0

DMI1
or"1 2
DMt 3
D:.1i4
[':,1',6
D:,117
:):112

D",120
D:~121

O:~23

D.\124
D"~25
nl\'~26

D:',127
D",131

DM7
['ONE
DPDBL
D3\vR

Drl
DT I 2
DT 14
D115

0'1'2
DT ~ I

[J,~TVEC~

46(;8
064

$11

749

9'6
754

764

769.

19Q

5311/!

737

142

741

53t i'#

836

525911

7Et I

526,.
5269'

7a2
5271#
727
527711

796

732

1 13K vEP,

MA,;::Vl I 30A(1052)
20-FEB-78 07:!;6
CROSS REF~RI:.,>lCE TAB"
U~ER sYII",aOL$

;;

!?~al

8,9

82f1
53:)OIt

2613#
27()tIr

027"65
02 ,55~

771

51!~311

O~ 7554

76'
786

519411'
!;i 2-":! 2#
726

001 '736
[101 7 ~4

721

792
797
80~

808
8' 3
6' 8
823

833
73'
736
741

746

:"('22',l2
CC':'C30
~,2 -4

,4
ERRVEC-, 000004

ERRTRP

F ADMAP

O~11570

FADMES

026311

88h

3594*

3~47'"

4054 ...

4172·

733

739

743

746

753

401.:i'"

928",
4016·

401 ~.

4340

3342

3364

515 ~ /I
515811
516511

5173#

5124#

52131;
!:i~ I Bil

5no'
523211
5~4a.t

52·13#

62(.1611
025 ,.
51 ;2911
5134#
5139#
S1451i

~O3811

285911
~81 Oil

5791;1

300
7 ~ !3
763
773

5811,1
S7Sil'

778
723

::.;,,;411

7'39

4411
573ft
577~

863
765
783

728

758

789

794

8i:S

JO 1

00:;:; III

SEQ 0191

0296U

B7;?"

027240
013776
013::54
013'162
177570
001':;46
001674
J::11705
0;)1120
C'C)lGGO

PAGE 110

;1:71 I I;
2GG2N

511911

0;3C'031
03'')CG3
030132
03l)177
030Z!53
030273
030213
030347
0:':::7100
027136

526211

529~"
5288#

8'4
829

4~41

806
744

776

02773:)
;.):!7044

193

'le; >"

73~

784

834*
87:'

:;('.2131

ENDlt\S

91';6
1283N
361

36tH
195#

D r ~5
DT2G

46<:'1

7' 6
751
756
761
7GG

0::717~

N'D6H

:3804

779
, J4
5315,
759

722

80'
809

12C8

507311
4p37

53-: 7/1

CZOMCFO
0-124K ~.'~MORY UERCl.ER,
C2QMCF,Pll
, 4-' Ea-1e oal19

or.l1

3254

937*

724

01SPLA
DJ SPRE

78B

3527

1485*
2417

030740

DIDBL
DIDO
DJ POD

-'3274

55111

O]O75~

030521
03C642
030673
Oq07 I S
012772
012700
012610
013)70
001142
000174
027010
0273o,
027;345
027411

75~

3148

4,01

;'52#
1 '755
1133
1458
3~'

DF14
()F2
DF2t

03':'561

752

2501

1',6~

39#
1273
45#
719
174

DH23
DH24
DH25
:>H2G
DH30
D1D2H

5309.

4064.

2485

3236

4008

2'7

erig

030406
030530

926

4059*

3310
3364

40n

118~

030475

921

4181

3305
336:)*

4p3U

1211/'
120#
119#

0304?4

531311
7~5

~3"

3172

3167
3.231 ...
3307
3362

4113

103#
1 0:211

000004
0000 1 0
OC0020

030765

2456

3n6-

2163
32.27"-

122#

248~

030367
03043.:3

1491

1369

3214

316;2'"

1I~

10911'
10811'
10711

11711

DF30
DN'
OH12
DH14
DH1S
DH2
OH21

1470

1213

1O~9

40 7 3

0000 4 0

DFl

1380

34~2

25'

99'
9S'

026~5~

3303*

;33?5

;3340

~931

~ 00000

OO:t015
0002PO
005072
177570
D30734

32' 7
On3
3353

3~6B

~325

3' 56

3401

QClO200
0004CO

co~~s T
eR
CRLF
CTRLS
DD!SP

SEQ 0190

3350*

l2G~

;3149>10
3213
326(3

123
122
12'
,2Q

11311

J174

!3LI-iMSK
OJ 1 h06
BPTVEC" coep 14
Byn,1 ES 0:;5437
DO 1616
GASFLG
CASREG
001620
CI(PMI;,R
C 17636
CLRPAR
O:29;?7P

3161 ...

31 ~8
3215
3272
3351·

3148'1'
3199
3264

000100

BIT7

2469
319a

38':0

lOU
1 ~Oil

040000

PAGE 'O~

59211
:.941.>
:,:,96..,
:'92'1
133#
4038
200
125~

35SS"
54 ... 11
41 I 1
1374

8,
6i S
82J
830
845

825

413 I
IVA
2C'5

":14411

36~ 1·

3681'"
1422'"

14;2 1'"

5054*

111 ~

3685

4a~911

66t

862,
36853215

873'"
4.013

n'7

927,

9£,4'"

1004*

1027 ..

1037"

1 097*

1112*

3366

4073·

4100

4101

4109

O~124K ~;EMORY

EXEflCISER,
14-FEB-78 08: 19

,Pl1

538#

!" AOMSK

F I LL2

Gr\~pf.lA

001557
025507
001562
00,1072
004120

GMPRB

004134

G~r1 P RC
G'11PRD

00..:'1 \ 42
004202

F LAG8K
FRDr/I

FS [{IDR
Gr\~PR

G",
HT

000011
Ir.iPCHE", 177746
IMPCK
003272
G 15064
HnT~N
015176
INITEX
INI TMM
014426

Ir~SERT

02112~

l~SUFF
025524
lOnEe= 000020
KIPARO= 172340
KIPAR1~ 1723.'12
KIPAR.2~· 172344

4953
532#
1046
53511
1013
1098#
1097
1102

PAGE 111

SEQ 0192

4136 ..

3368
5113#
3297*

32(07'"
3951

49811/

1357

1455*

3300 ..

3318"

3744

4065

1666
3241 A'

1676

3>22,11

1631

1640
2043

1708
2091

.2906

295B

1722
2217
.2977

3554*
362'*

3620-'"

4922

l1Bl "'

1185

3554

2484
3615*

3135*

3539*
3136'"

3809

3154.
3810>11

3171 *

3176"*

3276*

3.277*

109311

11,0

194

11 Q4i1
11 S6i1'
111011'
905

36'

4606

4647

186#
9:'::6
1528
321 B
1511

939 ..
927
1564
3220
1554

3239
1602

1095

19::29
2714
4056#
'015

936.4'

1591

1940

1988

2764

2813

2032
2862

1758
22.28
2990

1779
2276
3010

1B27

2408

2555

1837
2616

3023

314811

3417

3160*
3949*
3525*

3854*

1802

1890
2665

4934#

, ~111

242

261·

167#

26"'-

168/1

975

3134.
995..-

166#

3349~

3276
KI PAR3= 172346

16K VE!1
MP,:"Y1130A(1052)
20-FEB-7B
07:56
CROSS REFEf~E~CE TABLE - - USER SYMBOLS

16911'

'069

3331
1072

3133,;35551072,;35360-

1073*

3171
3528.,.

3258'"

3536

3555

3616",
l\IPARil=
KIPAR5~
r..lr-AR6~

K!":'117~

KIPDRO"

KIPQR1=

17:2350
172352
172354
172355
172300
172302
172304
172306
172310
172312
17:314
17::';16

17011'

3137.;:

171 #
172#

3138>13139,.
3110*
237
3126*
3127-.0

173#
155#
15l :

157#

KI?OR2.,.
KIPDR3"
KIPDR4=
KIPDR5"
KIPOR6:.
1\1 POR7::
LAOMAP

001602

3250

14·19*
3252

LAOf.,'LES

C2G376

1 ~01

5064#

LI\:J tllSK

001500

~DO I SP

OQ,S22
CO(J012
0015:l0
(OC, S74
017536
01 'if,22
01',634

5441/"
508#

LF
LMAO
lS T AOR
r~1 .:-[.', F

MAMFl
r.1AftF2
l'vlAi'JUAL

C'C:;.366

Mr.. NU ... l

005424
006826

MAI~UL2

M·\PMEM

:.1A?R8

003324
004250

1 sal;"
1 S911
16011
161 II
162;1

3128*
3129"

3130"
3131 ..

3132*

54611

37#
507#
541 II
1488
375017
3737
111 9
1362

ME.~i~MAP

017777
C01524

MEMt,1ES

025-121

M~M,~.\ES

025J54
000606

M~~,'\VA

M\mOI'JN

M,'.-liNIT
fI11'.10RE
M:'IUP

015674
01-1300
001554
015204

OO:;'2~6

~,"l'R5

0021
002126
002136
002146

MPR6
MPR7

002156

MPR8
MPR9

0021
002206

MTMAP
MT(JE

I.n R
f\'~X 1
1\~.x2

:]251162
02~)S72

025505
C!:2 60 71
02611C
02[,123

I\';<~

1.1)(5
~,1X G

J'..QI'.~::'M
J~cn~: 5 T

Ot.~L_G

(J01::6C

PM;VEC
:.-' rlT RP

,'H'i40R

3321

4139>j1

4141*

3677
1417

3691·

1467*

1468*

37541;
1 ~r;:}1'

1413"

1428

1471

16K VER
MACY1130A(1052)
20-FEB-i8
07:56
CROSS REFERENCE TABLE
USER SYjl~BOLS
966

230#
2481

1576

:'5.:13

1065
954
3545

1419
1192
3565

924*
3152

930' ..
3224

972

993

1024*

1030*

3255

3347

3378

3523

1688

3234

3340;'1

991
953

1029

1598
11 LlO

1672
1493

3241*
1636

1471

1194
3570

3212
1197
3812

3323
1394

2020

2827

2036
2877

2959

113311'

11 ()~

1113

1176

1150

1212

1283

1255
1259

1256
1260

1262

2446*

2453...

3590*

3643*

3746*

3747*

1555

1565

1592

16w3

3376#

33.:':19

6:;6#
63711
3736

562

632#

1093
3759
1096

1 11.37
1199

1257

3326
1651

1712

1733

2084

2204
2963

2221
3003

53311

11-4

S66
:3836

O·d:-CS4
177772

lSi2
43,

000240

137#

4081

4134
1440

4139
1442

3847

1253

4105

1435

1437

1067
3613

1137

1179

3662

3671

1451
3807

2630

1917
2679

1342

:2401

1815

1792
2389

2545

1831
2580

3036

3250#

3421

1248

1261

1272

1288

1334

1328

1337

1266

4977#
4:.19311'
502611'
502911'
50311;'

5034#
503711
50·10#
5050#
51 (. 511

50':5#
2~le*

36J~1;I

SC99#
1529

4098

1769
2269

508711'

2428"
24·12",
2453#

5EQ 0193
3842
1396

3016

636#
672#
6761!'
68011

1218
1224
1230
1271
3923
4077
3861

4074

1465

3359

1560

1210
3719
1116
1234
1242

3240

312<:.#

1977

E·92 II
64011
64411
648#
65211
65611
6GJII
66411
66811

3238
411 ~

3814

2778

684#
EBBlf

3236
4109

PAGE 112

1933

1524

3208
41 DB

1448

272S

:>[;';NC

3309

3233*
161 £

617#
565
563

OC::'25G

3259

"1343

52811

0(,2050
002276

MPR14
i.1r-'R15
MPR2
MPR3
f.lPR4

3270

3745

5'J9#

MPPATS

0)::>216

3210

127~

3534

144ft
1114

0(.2226
002235

3199
4107

3752
373g

49rl.l
49f.; 3 II'

«00250
C'04210

[I'1PR10
fM-'R11

3319

373611

962

G02074

0:)2076
MOR10021C5

31 B6

3317

25~6

3532

f>',PEND

r.~pqo

3167
3307

L;6.:17
3670*

114.311'

JI',:IWEC
rlWMllEM

r,~PRX

3165
3287

3188

1138

932

1473-

31 £9

146:5#
952#

233
1489
4911
1540
929

1474*
3285

3184

3268

830*
4641
3 .... .))
1333*

1364
938

18311

: 450'"
3266

136911'

0-124K N~EMORY EXERCISER,
CZQM':FO
C:OMCF, ;:>11
14-FEB-78 08: 19
MAS\o\4\o\::;

3125*

1874

CZQ:'~~FO

CZQMCF,Pl1

0-124K ti1EMORY EXERCISER,
14-FEB-78 08:19

P:.1EMAP
PRI:. LOC
PRGMAP

001540
026542
000602

PROREL

025760

50121t

OOC JOD

60.
6"
62.
63'

P.O

",,

(000040
OC0100
000140
C0020J

PR2

"'3
PR.

0:;:

51911

1148'"

3506

5032#
254
3610

253
3601.

0002;40
OC03JC

65.
66'

P07

000340
177776
017744
177776

6711
40<
3725
4h'

psw

P~iRM5G

025641
PWRVEC" 000024
RA:>TA9
0.:'11622
R~NTST
012470
RELOC
015336
RE LOCF
000500
RE L TOP
RELO

C 15460

01 i062
005.252

RE5CHK
RESLDR
RESRVD

017270
001515
000300
000304

~EST AR
RESTOR
RESTl
REST2
IIE5VEC=
fOi)TATE
•.J
SAVLDR
5"VT5T
SCANM
SELECT
SELFLG
SETAE
SEfCON

000306
;:000324
000010
016210
000006
0' 7350
00' 534

02f,635
C02646
001556
0' 7602
016170
026763

SKP!'.~ES

SPt-lNT
SPRNT A
SPRNTB
SPRNTP
SPRNTQ
SPRNTO
SPRNT1
SPRNT2

13211

295*
3595
3551
2e8N
4258
3517011
3059
1328#
301:i2

348111

269
4237
3056

276
1289
262
50511
201
202
227

551
221311

231
12711
1781
17611
921
515#
3798

18-:4
3125
31:'8

1 e"C3*
5093#
846#
844*

199
531:1

2 •. 6
1778
4121

5"
S!=:2
5R3
STACK

5T ART
ST ART A
START'
STKLMT=
SWR

Si'.'REG
S;oJO

5\'JOO
S\'IOI
Sw02
SWC3
51,;04

5\'/05
51'106
5W07
S~:OB
S\~09

SW1

S:.oJIO
5\0.'11

2623
148#

15IN

1;7774
001140

31#
198
232
281
42'
303

OCO' 76

1 i39
4032
196#

000001
000001
000002
000004
COOO 1 0

000020
000040
oco 1 00
000200
000400
001000
000002
002000
004000

95'
35.
84.
83.
8U
81#
80N

'79#
78N

77#
76#
94#

o ~ 0000

73N

020000
04COOO

72i1

oooco

S~'J8

000:)04
00('010
oce020
000040
OC0,00
000:;::00
000·1CO

5\';9

DC l 00:)

5~3
S'.',~

5".,5

5IJ.'6
S~~7

T8ITvE.:: ('00014
OC1514
T rr.l0UT
003522
TKVEC '" 0C::'OGO
H~A;>
1;0..+562
B~;:FAO' C0156.1
T:,1PLt.D
001576
11,'lPPT
001550

O~:'5 ~-;

1 f'l~'EC

J~O:)64

rr~APvE..: :'OC034
TRTVEC" 0000 14
TSTMAP
001530

2891t
3651 '"

912*
4085

3043

3045

3049

3517

3549

1462

3091

3962

3970

4004

4127

4~32

4431

4517

4563
3589*

3642*

3575

3778
1239
4266

1405
4286

4148

4167

311*

323*

S56*

3580

3617

Slt3*
4260

1487

3627
3233

4560

47£4

3740

4066

3659#
f2)2*

1296

1301

1306

328

910

34266
31.2&

3127

3128

3132

1905
2106
2248
2375

3596

3604

3625

3649*

2486*

2487

2488

2517

3043

3045

4082

4083

1864
2063
2190
2350

.2070
223A

189S
2097
2241

2357

2366

':161011

1314

367711

, 009.

8-1S*

1381 ..

1423*

1361

37~3

3746"

2407

3416-1

1316
39(5

1349
391011

2424

389111

2505

252~

3775
1570

3827
1682

3899#
3895#
2447

2463

2531

38£7

3900#

'786

1809
1999
2156

1843
2008
2165

1850
2049
2172

2316

2325

2332

1851
2056
2181
2341

3029

3908i1

390.311

160J
1953

1967

1990

2122

2140

2147

2282

2300
2947

2307

2996

1763

2915

,6K VER
CROSS

MACVt130A{10S2)
Re.FE~ENCE

20-FEB-78

2820

2870

251·

1028*

270

272

645
14132#

~47h

2722

235

229

PAGE 114

TABLE -- USER SVtJlBOLS

2771
928*

2672

07:56

l8e7

SEQ 0195

1491

390711'
3141 *

3664*

3673*

560

854

936

952

1023

3057

3110

4194

871.3646*
4201

B78*
3738
4313

895
3742
4358*

4913

844#

284
1472

316*
24'3
4039

871

36r,
3047
406B
895

1486

852
3591

3593'"

4173
4313

4181
4329

863*

865
3644

925

1025

1094
4022

1737

3761

<ooa

3188

4098
4105
319S*

3205

3208

3281

3283

4113
4113
32:03*
:::285 •

3287

3310*

328.
41 00*

3305

4101*

3315
4107*

4024

95
94
93

92
9'
90
89

88
8"
80

4068
1094
3047
1737

2403

7. .

S~\!12

5'<.'15
5.'J?:

2411

75'

$\1.'13

SW14

2409

149;/
150 ..

172516

OC6104

1260*

3741
lac t
51"" ~II

2492
3769
1534

2471
3722
1309
1645
1517

001100
002640

002554

1259*

391111

CZQMCFO
0-124K IVEMORV EXERCISER,
CZOMCF.P11
14-fEB-78 08:19
020362
177572
, 77574
177576

1256*

228#
229#
233#

1946
211";
2255
2570

SPRNT3
SRD

274
3650*

1255*

4998#

5591f

1298

020366

SEQ 0194

1173*

2553#

3901
3893

020350

839

4233

020-1,0:>
020336
020324
02C342

PAGE 113

3773

4199
326

020312
020~04

MA::Vll 30A(1052)
20-FEB-78 07:56
TABLE -- USER $'y,11BOLS

RSFE~E, .. CE.

64<

P.5
PRG
PS
PSCAN

16K VER
Cl<.OS5

925

1025

3742
3736

3761

71#
70'
93#
9C'

91#
90'
G9'

88.
87#
86.
1.2811
~50#

29C7*

:03
1::.5".
'184
537,11
543#
525.4
3213 ...
3313$.
1056

102311'

295G
1085

12:JB.¥
3219

3344

4065 ...

4070

:;, :0·

31:E)'"

3271 '"

3290-

3293

4094
4081.

3172*

31731'

3178'"

31 SO

3182

3214*
3315
, 078

3272'"

3273*

3279*

4102
3184
3279*

3324*
394';

3177"
3252
3325'"

3192
4083·

3192
4084'"

3:205
4085*

3262
4088

3.25~

4096*

4097*
4104*

4135
4140

4983"

13EII
13-111

1.:'9'"
512R

315£

3353

336.2

3264

3281

4090*

4091·

CZQMCFO
Q-124K MEMORY EXERCISER,
CZQMCF. Pl1
14-FEB-78 08: 19
TST1
lST10
lST11
TST12
TST13
TSTl4

006166
007040
007122
007206
007270
007614
010144
010766
011610
006312

TST1S

TST16

lST17
TST2
T5T20

012462

T5121

012576
012666
012760
013056
013150
0'3242
013336
006406
013552

TST22
T5T23
T5124
T5T25
T5T26
T5T27
TST3
T5T30
lST31

013664
C 14004
006512
006602

T5T32
T$T4

1$T5
T516
TST6A

IST?
iYPMAP

006676
006704
006726
020-112

UNEXPT

026501

UP
wWP
WWPBVT
WWPBO

000000
001612
011652
011616
011712
011756
012326
012416
012442
016256
001330
001512
001344
001510

W~'o'PBl

WWPB2
WWPB3
wwPB4
wwPB5
W3X9
$A.PTHD
SAPTR
$AST AT
$ASTEN
$AlVC
$ATVl
SATV3
$ATV4
SAlV6
$ATV7
SAUToe
$8ASE
!>BDADR
SBOOAT
$9ELl
SCOWl

02~C50

0240:24
024032
024042
02~340

0::?4404
001134
001260
001122
001126
001174
001264

410e*
14"0
1738
,757

$D3LK
$::JOWO
$DDWl
S,ODW10
$D~\>Jl1

$IJOW12
SDDW13
$DOWI4
S:JDW15
$:::JOVJ2
$:)DW3
$DDW4

SDDW5
~DDl'o'6

$i)!)I'o'7
S,ODW8
5DDw9
SDEver
$~EVM

$DOAGN
$!)TBL
$E.NDAD

$E.NOCT
S.L:t~CMG

$ENULL
S=:NV
S:;NVM

HOP
S:::OP(;T
$SRFLG
SERMAX
$ERROR

001266
024020
022364
001100
000000
000004
0.23311
023304
001232
001201
024654
001270
001272
001314
001316
001320
0013"22
001324
001326
001274
DC 1276
001300
001302
CO 1304
001300
OC1310
001312
001214
001262
11' 42~4
024644
014222
014156
0'4260
0,4275
001224
00, 225
014126
014150
001103
001115
021640

C0111S

SERRTB
$tRIHV

CC23~O

.$ERTTL

001112
001172
001224

$ESCAP
:foE.TABl.

O~2C6~

4117

1742

175U

SEQ 0196

1504#

179711
1819#

1823
1925
2028
2213
155011
2405

19211
20246
22"9#
2398M
2550'

26071
261 "
2660
2709
27:':1
2808
2657

2656'
2705'
275511

2804#
2853#
2903#

1587N
297411
3007N

1508

569

3041 II

,627#
16621
170411
170711
1718N
1005

1744

1744
1246

391811

3701
1751
S49H

507711
3121i
1153

3126
1157

,',""5

111'" ~ •

3129
2432

2218

34491

4681

4695

4711

4714

4718

4724

902·

432

4495

587
573
4176

590
575
4213

592
591

3497·
594

3699·
Sc.7

596

3495·

3127

3132
2439

2<409~

2401#
24181
24301
2500
2450
2415
1828
456
49911
472H
498N
4652
4650H
4596
4190
4711#

2544
2540
25091
2466
2421
1930
482H
4692
499

2535#
25421
2033

H13

4654#

465111
465311

4722N

35711
425N
352#

354#
376#
427H

428#
4613",
4005
340#
370#
370#
4325
4349
39911
378#
4553
4765
429#
43011
439#
440#
441#
442#
443*
4441r'
431#
4321f
4334'
434#
435#
43611
·137#
438#
39011
426#
3082
4769
215
858
3087
3094
39SN
39611
3046
656'"
343#
3 ;911
1299
1810
2000
2157
2317
2~O6

SE.RRPC

4115
1492

PAGE 115

171·"11

CZOMCFO
0-124K MEMORV EXERCISER,
14-F EB-78 08: 19
CZOMCF. P11
$COW2
SCHARC
$CKSWR
$CMTAG
SCM3
iCM4
iCNTLG
$CNTLU
$CPUOP
$CRLF

16K VE.
MACY11 30A(1052)
20-FE8-78 07 :56
CROSS R!;FERENCE T A8LE -- USER SYMBOLS

2997
35011
4180
S67
4133
34 ;"
37511
394#

16K VER
CKOSS

MACV11
REFERi:.~CE

30A(1052)
lO-FEB-78
07:56
TABLE -- USER S'I'r.1BOLS

4630
41GB
850

4639*
4200
859

4644N
4313#

~"11#

372#

373'

374#

44;::10#
4458

4489#
1251
4647
4009#

3065

4195

310:.

3107

31091

31 DON

4208

91.
4593
S07S#
30B5
4023
.:;053*
1317
1851
2.150

3053
4598

575
4229

4030
4146
1350
1858
2057
2182
2342
.2571
3710
577
4236

4177*
4204

~206

4623'"
4149
849

10C7
461~

4B01

309B
48CS#
9as
308-lN

3911·

PAGE 116
S~Q 0197

4213

4223

4248

4254

3106
4661

4187

4591

4659

4699

4036*

4146

4170·

4213

1 S18
1 B65
2064
2191
2251
2624
3723
579

1535
188S
2071
2235

1571
1897
2099
2242
2367
2723
3776
584

1610
1906
2107
2249
2376
2772
3829
587

4299

4362

4464

4499

1693
1954
2123
2283
2448
2871
4894
592

1728
1961
2132
2292
2464
2917

1764
1968
2141
2301
2472
2926

1787
1991
2148
2309
2493
2948

594

417S·

4179*

311111

311-l#

893
e7d
3048
3081#
3992
4030
1310
184!,'
2(j~9

2166
2326
2523
3030
573
4213
714 ..
4.221 "
3824*
4052·

217~
233~
253~
349~,

4213
4213

2358
2673
3770
581

1646
1947
2116
2256
242~

f821
4164#
590

C':QMCFO
0-12th, rn:,1\10FlY EXERCISER,
CZQMCF- ,;:) 1 1
14-F £S-78 08:'9
SETEN:)
~,rATAL

$FF LG
$F lLLC

$F lL LS
SGDADR
S·:;ODAT
$G~T42
$GTSt~R

SHD
SHIelS

!rllOCT
$lCNT
$! llUP
'1INTAG

$1 lEMB
$LF
$lF-LG

$LPADR
SLPERR
$M.ADRI
S~.;ADR2

Sf;1ADR3
S~ADR4

$r.,lA! L
$\14MSl
$'1.4MS2
:S~M\MS3
$,,~AMS4

S·... GADR

S\lrLli
srV:'~E"'"

$rl.1SGAD
$f.1SGLG
$tIlSGTY
srt.So>JR

S':'TYPl
iMTYP2
$¥.TYP3
S:\1TYP4
sr.~XCNT

$NULL
$NWTST=

CO 1330

00 1 206
02<:,DO
001156
00,,55
001120

001124
014212
022436
000000
00' 330
023510
001104
000756
001135
001114
001202

024427
0011 C6
001'10
001 ::136
00,24.2
001246
001252
001204
OO~ 234

001240
001244
001250
C01332
0::1..!426
0233.27
001220
001222
001204
023316
001235
00124!
001245

445#
39711

460
47 ';2_

4650.
3G811
367#

4'333*
4616
4647

35111

573

3904*

39128*

35311

573

900
12

$PASTM
SPRINT

1398
4043*
31 ~
4363

1385
3441i

295
3!,)SII
3489

37911
4681
34511

346#
4 2#

S;J~~·RV.G

420/f
464"
4651 4335
39:- .i
393#
38G}f

SPWRUP
$·:)UES
S"DSHR
$ROLIN
$RDOCT
$RDSZ -=
$SAVR6
SSCDPE

001:200
022670
023010
0233~0

000010
00076.2
020630

579

581

584

587

596

J77

581

584

587

3494·

3892*

1409

1412>1-

4540'"

4552'

4046+'

1414
4145

1425

4044

4055

4133·

4187

4591

3891.

3900*

1696
2392
2830

391e -

330/1

4-l95

4180*

~189

4213
4706*
14a6*
4034

4479

464

4213
4489

4226

4051*

1744*
4145

4034.
4203

468

875

893

4049

4700

4704*

4715

1543

15iaN
177111
268011

1618k
1816#

1620

1694#

1918#

1653#
2021 "

1655

179411

2206'

2682

2730#

2732

2779#

2781

2390>
2828'

4860*

488711

4553

4E47

~733#

148H

4145

4732t

4493#
4667*
4672.
4655
449'"

4670
47th
4673*

471 a . .

40711
4 ~ 5:1
418#
41 ~511

4619
1497
1716
2594

1495#

2881
4842*
4837*
4009
399#

2~,j1 II

4872·
4841
4C27
8iS·

464i
i 541 II
1747#
263111
2963
48)[.#

1749

2633

1580

1697
2547#
2879#

30041;

4a";6
4035

4849.'"
4045

405411

307£;·

3079'<'

3088

3111

4041

4060

4096

4146

931
1233

'61
1241
3797

1006

1115
3064

3860
4292

1055
1445
3950
<327

1457

3835
4253

1032
1373
3922

1045

1250

1014
127C

4076
4334

4120
4348

4478

4547

46611

325
1223
3505

888
122:;1
37JQ
4245

0-124K MEMORY EXERC ISER.
14-FEB-78 08:19

000610
000746
OOJ662

577

465 7

43:.a
4211;

000752

575
::S90S*
575

417#

4222

$PWRAD
$PWRDN

473411

41411

4047
366#

CZO~CFO

4705*

416#

419w
4.22#
385#
40611

021626
001154
000001

CZOMCF.Pl1

4696
4647

432611

258211

$.PASS

SEQ 0198

46311

001251

025110
025112
021112
001212
001336
023512

PAGE 117

3095#

1714#

SOCNT
SDiliOOE
$OVER

'6K VEFI
MA:'"Ytl 30A(1052)
20-FES'"'78
07:56
CROSS REFERE.\!CE T ABL.E -- USER SYMBOLS

3718
4247

4298

16K VER
MACY 11 30A( 1 052)
20-FE9-78
07: 56
CROSS REFERENC.E TAB I.E -- USER SYMBOLS

4439
48':'0
32811
29511
326,;'

4446
4870

4452
4942

32'

856

305

31111
4213
4432

37711
439611
4424#
1379
4417#

42_,

1400

3943
4324

4518
1406

1077

4361

1217
3093
4104
4382

4549

4559>

4611

1209
3086
4175

PAGE 118

SEQ 0199

4457
4952

4463

4465

4469

4473

4383

4470

4489

4550

4$53

4647

1463

4509~

304*

312

1505
2211

1551

313*
1588

332#
1663
2657

1719

1752

2551

1628
2608

1705

2399

2706

2756

28C5

1175
2954

1798
2904

1820
2975

1922
300B

2025
3039

855

856

858

859

886

890

3077

4002

4165

4197

4208

4308

19
1553
2401
3096

329

374

1777

1800
2906
4008

314-

4001#
$SETUP", 000 130

18BN
4~S3

$STUP -= 177777
$SVI.AD
021056
$SVPC
00C010
SSWR
= 167400

188ft

4017
21311
1N
376
1927

3010

SSWREG

00' 226

$S~~R~.lK"

COJ340

:;;TESTN
$11MES
$TKB
$TKS
$TMPO
$IMPl
$D',P2
STMP3

C01210
C01170
001146
001144
001 i 50
001162
001164
001166

STN

000032

4022
4158
39711
1N
388#
279*

363"
36211
370N
37111
37211
373N

170711

1819
2547
$1 P3
~TPFlG

$TPS

$131M
$ rSTNM
Si'TYIN
STYPAD
~.T) ?DS
SlYPE,
ST'r PEe
$TYPE,X
$ TYPQC
S TYPON
$ TyPQS

001152
.101157
001150
('01334
co" ':02

276111
36511

36911
36411

'::65*
280*
4213

4(14811

218
12
859
203-0

3072
4023
4159
L,'8

2"
4049*
37411
43':'6
43:;0
579

1510
2215

3077

399B

4024

40~5

4044
4406
4398
594

4047*

13q
984*
,553#
1747

1411

431 ;
4315
581

974_

950*

1510~

172111

342#
4443
1092

1049
3092

10:50
4274

475311

4564

458511
461 :5

46;
fIG::::!

·::2-' 22
02.:;

0.2~

C.2t:, 154

4337
4640
1240
4839
3963

9:,j'"

~ 435

1716
1916
2582
2604
4647
4647
4647

iJ2.l 32

4039
4213

4037*

4·~26

c::~:

3994

4038
4201

3111
4037
4194

3077*
43·~ 1
4,33Q

0"" 7t:,

073 40
0:.1 54

1754
2810

3997

;"4
596

4427

1721

2761
3995
4051

594

4636 ..
4585
4634

1707

2711

3041 *

97,.

2553:1
27i9

21
1665

2662
3993

4029
4173

592
5S8

20
1630

·2613

~160

4028

9iO-

12
1714
1B2511

19
1590
2553
3110
4030
4181

1921
2607
281011

4400

4365·
592
3896*
985982*
1541
1734
1927#

2021

2613#
2829

26;31
2853

3042"

3992

4026

.'·166
3509

4484
4279

446811
4904#

4635

4629

4634#

46·:2

':6~::1I

4234
4842#
3971

426",

4333

4840#

412[;

4287

483511

3996
4054

2859
3997
4145

4156

375
1825
2977
4020
4157

389S*

3899*

3907*

4145

4404

596
986157.8

1754..,
2024
2656
2859.;1

3387·
1412
1590#
1757
2030#

4893·
1618

1771
2206

16~ON

1653

177711

1794
2215#
271 t II

166511
180011

1694
1816

2390
2730

240111

266211
2879

2680

2209
2705

2906>

2961

2977>

3004

2755
301011

4049

4054

4062

4124

4146

4172

CZQMCFQ
Q-124K MEMORV EXERCISER,
CZQMCF. Pl1
14-FEB-78 08: 19
$UNIT
SUN ITM
SUSWR
$VECT1
$\lECT2
$vERPC
$XTSTR
$OFlLl
$40CAT=

· TST32
• $ASTA=
• $X

.3X9

001610
DO 1642
00'640
00' 634
001630
001626
001632
001636
001624
001622
001644
U

001330
007302

CK~WR

Ck,WD

,.,.
,.
1 B85
2104
2280
2621

CKWD2

1964
2153
2329
COMMEN
ENDCOM
ERROR
ESCAPE
GETPRI
GETSWR
GTSWR
LOPDR
MORETA
MUL T
NEWTST

,.,.

,.
,.,."
",.
,.

PRINT
J'lUSH

3334

SKI P
SLASH
SPACE
STARS

2670
1514
1986
2162

579
4886;;

213
534t

190N

194N

4499
1';6·\·
4796
4242
1754

4495

4~CSl

1707

1721

563.

2431

2438

2461

562N
564N
566#
561#
560#
56911
4651
452N
1825N

2455

2453

3746

45~';N

3164
41 ~6
1515
1903
2120
2298
2720
1605
1996
2169

205'
457N

591

594

597

590

592

594

4236 ....

4237 ....

307
SUS

331
4145

339'
4146

390
4213

3819

3877

216N

218#

219'

4647

853
4735,41

909
4909"

532"

2499

3705

3749

3764

214'"
69711

3111

452
4306

2442
2446
1482

4079
4654
457

16K VER
CROSS

27139
1723
20C5
2178

!3235
4197
1607
19S1
2139
2314
291S
1760
2045
2187

2363

3197
4155
1532
194..t
212\:1
23~5

20-FEB-7B 07:56
MACV11 30A(1052}
TABLE -- MACRO NAMES

PAGE 121

SEQ 0201

R~FERENCE

3407

3500

1643

1680

1958

1965
2154

2145

2323

2330

2868
1839

2914
1847

2053
2230
2372

2060
2238
2567

3519

3577

3612

1725
1988

1761
1997
2170

1784

1807

1841

2006

2047

2179

2188

2355
2994

2364
3027
1893

2054
2232
2373

2163
2339
2923
1854

2067
2245

2992

2348
2945
11361

2093
2252
3025

lS83
2103

2278

3661

2288

1902
2119
2297

2112

1848
2061
2239
2490
1942

2'28
2304

~520

1862
2095
2253
2568

1950
2137
2313

1957
2144
2322

1855

2068
2246

2347
838

2354

138#

'38#

842

1480

3126

3127

3128

31:'1

138#
2390

1495
2547

1541

1653

1694

2021

2828

2879

1794
3004

1918

"2779

2528
4541
1031

2730
3391
4708
1045

1771
2961

1816

2680

316

1578
2631
2515
39B1
1014

161B

2502

138N

340B
4709

3602

:;640

3753

3781

3844

4729

3063

3505

3700

1223
3922

1229

1456

3510
4720
1077
3718

40713

1232
4119

2474

2497
3952

3380

3398

3926

4511

4654

1403
4429

1460
4515

3089
4561

3960

2338

,."

138N
138N
13eN

1476

447
138N

3862

1241
4942

1373
4952
136#
3809
.:;429

,.
'"
'"
1N
1N

8£;,:)N

897
3124

3854

3789
ROCHR
ROOEC
ROLIN
RODCT
REPORT
RESREG
SAVREG
SCOPE
SCQPEX
SCOPIN
S:' TPRI
SETUP
SlrJITRP

4002
1307
1894
.2113
2289

577
4850

32'

2206
POP

260

5'75
4840·
4183

4531#
4488"
548N
568#
567.+'
565Jf

0-124K I";IEMORV EXERCISER,
CZQMCFO
14-F EB-78 08: 19
CZQMCF. Pl1
ABORT

SEQ 0200

4:24N

504..4011#
4836.
4008

........ "'*'" U

.. "' ' ..

PAGE 119

391#
467#
398'"
423#

001216
001340
001230
001254
001256
001514
020654
025111
032110

• CONST
• EIGHT
• ERRTB
.MPPAT
.MPRX
.MPRO
• PBTRP
• P:'SRV
• RESRV
• ST ACK

16K VER
MACV11 30A(1052l
20-FEB-78 07;56
CROSS REFERI::.I>lCE TABLE -- USER SYMBOLS

931

4514
1376
138#

3882
961
1399

297

31 ?
3974
1006
1 .. ,5

3816

303
3875

1403

1460

lOSS

1714

1747

1115

4795
1209

3727
4947
1217

3797

3835

3860

3481
4656

3520
4677

3537
4711

3633

3703

4753

'1748
490·1

3763

4722

3988

4002

4125

4146

4165

4197

4231

471
1122

1N
1N

33#
3987#

,.,.
,.
4264
,.,-

3987#

4056
4006
138N

13eN

847

897
427'
13SN

1237
4284
1757

1376
4330

138N

621

631

138N

220
570
1206
1653
181 a
208S

13811

503

554

211
559

1142
1586
1794
:2023
2562
2973
3396

,,46
·618
1796
2038
2606
3004
3413

1203
1626
1816
2040
2631
3006
3415

2655
3066
3423

225

293

309
604

335

380

393

9<2

951

1323
1693
1876
2208
2730

1326
1694
1878
2223
27 _4
3·47
3478

1366
1703
191 S
2225
2779
3244
3480

1019
1358
1714
1920
2271
2803
3249
3514

572

602

1277

1281
1690
1835
2206
2704
3123

3145

3446

3448

166
1823
2080
2690
3117
3425

45~

458

1022

1088

149,

449

1503

1717
1936
2273
2828
3334
3516

1091
1541
1750

1938
2390
2852
3339

2879
3372

3607

36C9

1747

~979

~397

1549
1771
19B1
2547

2902
3375
3654

501
1131

1578
1773

2021
2549
2961
3394
3658

~11

0-1241( ";:',1.JRY EXERCISER,
1..J-FE3-78 08:19

S',i;iSU
S"i~OR3

14;15i1

:. 1 f·;t:GS
1 Y;:;ADR
;'r ~DIt'li

T r ;;3YT
T y ;JDEC
TYPDS
Tl DE

"
1229"
3360
4324
4547

np:-J"M

TY I'NUM

'""
,"

TYPO':
TYPOCS
TYPOC:T
TYPQN
1 Y POS
TYPTXT
5CK'/iO

;I!

"""

1855
2069
~247

2491

SINON

Slr~Mr'"

19~O

~a62
~'\~,,1::>N

S'.li·:UP

1975
2981
1#
19013
2C56
2234

S$CKWO

::375
:2870
333/1
333.;<

S51.;r,1::tE
$:1CHM
$SCSCA
S5NEwT

1#
2206
875"

::;,SSETM

$SS)\rP
.CrlBHD

256111
2390il
268011
263111
2::'82#

· Cl1
· 0 ~ n3H

· DIDal
.01 DO

CZQr,~GF::.

CZQ;/iCf". "'11
.DIPDO
· D,DSrl
.DP[)BL
.EQUAT

;)698
.:;213
5'18
138#
:i074
~ 497
1 C~8

.sernA

· S~328
.10820
· ~;ul V
• :;i:.QP

1;.;
1"

1014
1457
41;5
4439
4952

1 G32
3064
4184
4446

1608

1644
1959
2146
2324

2331

2770

2819

1722
2276

3914

1077
3505
4247
4463

1115

1209

1217

3700
4251
4465

3718
'::'253
4468

3797
4292
4473

1785
2007

1808
2048

2189
2365

1842
2055
2233

4812

3917
4959

3989
4962

1697

427:'1

4231

1885
2105
2281
2530

2290
2569
1591
16:'2

1 S64
1 t.54
2032
2977
1::-.74
1558

2043

2J90
1596

203..'.1
3014
1309
1 £57
2070
22 ... 8

1445

4263

1045

1055

3086

4222

3003
4245

4452

4457

1223
3835
4298
4479

. 533
• 90"::
2121
2239
2622
16:.3L
~ 631
20::) 1
3010
, 670

4329

1569
1945
:.. I 30

2306
2671
1676

1640

1703

2228
3416

1614

163:'
2202
3419
13':9
; 837
210C
2282

1896
2115
2291

2471
2996

3029

2~47

2925

29' -

1517

2492

371

372

373

1495

1541
2582

1578

161E.

2631

2680

138#

1757

1952
2139
2315
2721

2217
3023
1686
16.!i9
2219

2CE.2
3034
1316
18E4
2097
2255
2463

2547

1681
1966

1726
19S9

2155

2164
2340
2869

2349
2915

2180
2356
2924

2~08

1779
2555

1802
2616

1827
2665

1767
2577

1790

2628

1813
2677

1829
2727

~776

1609
1953
2140

16.!5
1960
2147

1582
1967
2156

1727
1990
2165
2341
2672

1763
1999
2172
2350
2722

2357
2771

2190
2366
2820

1771

1794

1816

1918

2021

2961

3004

1758

1710
2267

2387

1534
1905
2122
2300
2505
3721

f 570
19<;6
2131
2307
2522
3769

3774

1653
2730

1694
2779

2828

1731

1762

1998
2171

2316

2325

~332

2531

2570
3826

26.23

1747
2879

1714

29~6

1872

1849
2062

2374
2995

2240
2423
3028

1880
2764

1929
2813

1915
2825

2975

1786
2008
2181

1931

1809
2049

:'962
::!39::>
268::'

2633
258~

16K VER
MACV11 30A{1052)
20-FEB-78
07:56
CROSS REFERENCE TAB~E - - MACRO NAMES

PAGE 123
SEQ 0203

2732
2830
2781
28

25#
1716
209
381 II
447
L647

469
188
333

3066
4150

111

~213

1"
1}/

2,495
.:..303

liE

1n
3987

4810

·'"7-40

1 if
l;i

032110

'006
41 :?O
4301
4942

3890
4740

SS2

370
138#
1361+'
2390

'::568

:"8$.

931
1373
3950
43,11-3
48CO

3987
4649

4281

3088

lS1 G
1895
21 ~ .:1

1~·

3473

1348

138#
1308
1863
2036
2254
2521
, 52S
,511
1983
2906
153E
i 522
2016
3001
~ 298
i 850
2063
2241
'::42';
2915

1,7
1P
· S51 2£
· SSJi"r<
1 r;
· ~ T I~;' P I "
.'~ T i PB
1h
.~il'0D
11:"
.~. T'{OE
1.1

.STY?O
· S":;OC,i
· 1170

2384

42a~

1:1

.S3S2Q

2379

4125

291

,5S::20

2259
1655
4278

2264

::;508

1 ~'"l.O

10:::1

3968

396"

1!/

4570

~330

1 1/

4558

4224
3966
4229

• ::,r,'vL T

· SI~H,);D
· ~,.,:;:r' E

4554

1236

"
1.'

4497

5306

3958

2881
',504
2550
188
13

1 iI

4417

~3C4

138#

28791:

1F
11f

:.363-

5257

138#

· ~lARHD

3874

4334
LlSl1

11;

3872

.:1325
'<:549
1364'
132#
1237

1299
, 851

171~.:{

3768

3343

2G64
2242
;425
::::017

1/1
1 II
1p

3784

1232

18-l'::

23~la

3758

~922

2057
2235
2376
2871

• SCOPE

3756

21 )4

0-124k IvE~,l,JRY EXERC!SER,
14-F E8-78 08: 1 9

2730·,;,
28284'
2779:1
1*

SEQ 0202

3735
43 ~ 8

4271
ESB
12..'.11

1;1
1:;

· SCATe

859JI
2079
1543
1059

PAGE 122

138#
.; 123
13811
:;'089
3::'5

.HEADE
.ln11

· SETuP
• S~,'RHI
.S\'i;<lO
• Tr.i7
.SACTl
• ,'E,APTB
· $,J,PTH
.3':'PTY
,'!t.$T .;

3732
.:;305
5255

16K VEP.
MA:::V't 30A(1052)
~C-FEP-78
07:56
CF:OSS REF£RE'ICE TA3',.E
!\-1t,CKO t\iA',1ES

0(10

1310
1858
2071
2249
2.:;48

2926

155l

2607

13' 7
1805

2098

1350
, 6SS
2107

1518
1897
2116

2'.283

2292

2256
2464
2948

2472

2493

2997

3030

1S8?
2656

1627
:2105

2'155

1662

1535
1906

1571
1947

2123
2301
2506
3498

2132

3710

2532
3723

1704
2804

1718
:2853

1751

1774

2903

2974

2308
2523

1610

16';6

1954
2141

1961
21 ~B
2326
2571
3770

2317

1683
1968
2157
2333
2624
3776

1728
1991
2166
2342
2673

1764

1787

2COO

2009
2182
2358

2173
2351

1810
2050

2191

2772

2367
2821

3828

2723
';894

1797

1819

1921

2024

2209

3007

3030

CZOMCFO
0-124)0( ~.'EMDRY EXERCISER,
CZOMCF. Pl1
14-F EB-78 08: 19

16K VER
MACY'1 30A(1052)
20-FE:-78
07:56
CF\OSS REFERENCE TABLE -- M.... CRO NAMES

ERRORS DETECTED:
CZOMCF. SIN. czcr~CF. LST leRF /SOL/NL.:TOC=CZQMCF. SML. CZQMCF. P11
~UN-Tlr,~=: 21 ~8 1 SECONDS
RUN-TIf.:E RATIO: 130/51=2.5
CORE USED:
39K
(77 PAGES)

PAGE 124

SEQ 0204