PDF Printing 600 Dpi AC 9045F MC_CZQMCF0 0 124K Mem Exer 16k_Feb78 MC CZQMCF0 16k Feb78
AC-9045F-MC_CZQMCF0-0-124K-Mem-Exer-16k_Feb78 AC-9045F-MC_CZQMCF0-0-124K-Mem-Exer-16k_Feb78
User Manual: AC-9045F-MC_CZQMCF0-0-124K-Mem-Exer-16k_Feb78
Open the PDF directly: View PDF 
.
Page Count: 144
| Download | |
| Open PDF In Browser | View PDF |
IDENTIFICATION
...............
PRODUCT CODE:
AC-9045F-MC
PRODUCT NAME:
CZQMCFO 0-124K MElli EXER 16K
PRODUCT DATE:
MAINTAINER:
The
and
DIAGNOSTIC ENGINEERING
in this document is subject to change without notice
not be const~ued as a commitment by Digital Eq~ipment
Digital Equipment Corporation assumes no responsibility
fo" any e~ro~s that may appe ... · in this document.
Info~mation
Should
Co~po~atlon.
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
DIGTAL
PDP
UNIBUS
DEC
DECUS
DECTAPE
MASS£!JS
Co~poratlon:
~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.
B.
of
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
ns
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.
B.
If running without memory management, then:
Load Address <214+relocation factor>
(Relocation factor
is typed when the
relocated) ,
Press START.
C.
program
is
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
D.
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
INH.8IT MEMORY MANAGEMENT (INITIAL
START ONLY)
SW12
=
OR UP ••.•
SW11
=1
OR UP ••••
INHIBIT SUBTEST ITERATION
SW10 =
OR UP .•••
RING BELL ON ERROR
SW9
OR UP •.••
LOOP ON ERROR
SW8
=1
SW7
: 1 OR UP ..••
SW6
OR UP ••••
OR UP ••.•
LOOP ON TEST IN SWR<4:0>
INHIBIT PROGRAM
~ELOCATION
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
+
of
15
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
Page 8
8 minutes
Full Pass:
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)
of
e~ror
detection
code.
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.
TRP/PC
= Ph~$ical
error
Program Counter of the code whiCh caused
a
trap.
=
REG =
PS =
Memory Address
IUT
Instruction Under Test.
MA
3.2
Parity REGister address.
Processor Status word.
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
A.
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.
B.
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.
C.
In the case of error reporting and there is
to allow the information transfer.
no
terminal
CZQMCFO 0-124K MEM EXER 16K
4.0
Page 9
D.
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.
E.
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
I
I
I
ADDRESS
I
I
I
I
I
I
I
twP!
!AEt
I
I
I
I
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
I
!WP'
I 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
10
BIT ASSIGNMENTS ARE DEFINED AS FOLLOWS:
BIT15
5.3
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
I
I
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
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
~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.
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
NO
ERROR
TAKES PLACE
CC~RECTION
BITOO
DOUBLE ERROR ENABLE
6.0
SUB-TEST SUMMARIES
6.1
Section 1:
Add~ess
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
location and checks it.
add~ess
TEST 3 W~ites the complement of each word
location and Checks it.
into that
byte
into
that
add~ess
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
to
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.
TEST 11
IIRipples li
TEST 12
"Ripples u
in
word
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
Exe~ution
code
through
memory
and
Tests.
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
on the memory under test.
II
TEST 22 Executes an instruction which does
DATOS on the low by~ ~ of memory under test.
II
DATI
and
a
TEST 23 Executes an instruction which
DATOS on the high byte.
a
DATI
and
a
TEST 24
DATC.
6.4
does
DATO
Executes an instruction which doe ..
a
DATIP
and
a
TEST 25 Executes an instruction wllieh does
DATOS on the low byte.
a
DATIP
and
II
TEST 26 EXECUTES AN INSTR~CTION WHICH DOES
DATOS on tile high byte.
A DATIP
and
II
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
14
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
of
'$ifJ ITCH
i Imitc
BOUNCE'.
(The best procedure when changl ng
is to stop 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.
These are the
~dtches
LOCATION CONTENTS
12
100
36
001404
limit.
to toggle-In-program #1:
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
**
$;. ** .. .'. *. *' ** ...
$
COPYRIGHT 1978
DIGITAL EQUIPMENT CORPORATION
MAYNARD, MASS. 01754
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
I
/
HAS MEMORY BEEN \NO
MAPPED?
\------------------>
\
I
REST2
/
/
••••• ** •••••
*STARTA
•
************
YES
V
/MEMORY MANAGEMENT\NO
AVAILABLE?
\------------------\
I
----------------------V
I YES
***********************
V
'RESET SP AND JUMP TO •
•••••••••••••••••••••••
• RELOCATED PROGRAM $
• seT UP MEMORY MGMT. • •
*
* MAP PROGRAM INTO *
•• *************.*******
* VIRTUAL BANKS 0 & 1 •
I
***********************
I
1<---------------------------I
I
V
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
V
RELO(S9)
II
I
****.........
I
••• ~~ ..• *••••• *...........
I
I
•••••••• * •••
•• RELOCATE PROGRAM TO ••
••
BANKS 0 & 1
••
**
••
I
I
1<------------------
V
/
/
RESTART FLAG
(RS-O)?
/
I NO
V
\YES
••••••••••••
\---------->*START1(16)*
\
............
RESLOR(S9)
•••••••••••••••••••••••••
••
••
••
RESTORE ~OADERS
••
•*
••
•••••••••••••••••••••••••
I
V
•••••••••••
• ·HALT
••
•••••••••••
PAGE 03
CZQMCFO 0-124K MEM EXER 16K
POWER FAIL ROUTINES
OECFlO VER
*.*.*.*.***
.*****.**.*
*.SPWRON .*
•• ** •••••••
• * •••• ** •••
I
V
•••••••••••
• ••••••••••
**SPWRUP *.
**SlllUP ..
I
V
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
"-SELECT
00.07 20-FEB-78 07:58
***********
**
*.START
**
.**********
*********"'.
*****************
• SET FLAG FOR
"
S~LECTING
PARAMETERS
VER
"''''*'''''''''*'''''''''''''''
"'*"'''''''
"
"
.CLEAR FLAG FOR "
•
SELECTING
"
"
" PARAMETERS
*****.*.********.
*****************
I
STARTA
.. >It.' ..
"
"
"
V
"'* ** *'" "'''''''* *'" ** ** ****
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
-----------------------
NO
••••••••••• V* •••••••••••
*SET UP MEM MGMT. SET.
• 'MMAVA' FLAG TYPE •
•
• 'KT11 AVAILABLE'
•••••••••••••••••••••••
1<----------------------------I
V
•••••• *** ••••••..•
•
*TURN OFF CACHE
*
*
••••• ** ••••••••••••
I
1
V
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
**~
"****************
I
ITYPE 'MEMORY MAP:'I
I
/
/
****~**************
I
------------------->1
I
V
I
****.******************
I
I
I
*REAJ AND WRITE MEMORY- TIMEOUT TRAP
• LOCATION (AUTO-INC .--»»»»»»----.
•
POINTER)'
I
I
***********************
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
V
I
I
I
I YES
I
I
I
****<~.****.****.******
I
I
I
I
• SET FLAG IN MAP TO
* INDICATE FULL 4K.
• SAVE AOR POINTERS
•
I
I
I
I
I
***~~******************
I
I
II
I
I
1<-----------------------------
V
-----------------
I UPDATE POINTERS \
NO
<---------1 TO NEXT 4K BANK.
\
/ END (12BK) REACHED? \
I YES
V
********************
I
lODES FIRST 16K OF\NO
ITYPE INSUFFICIENT /
MEMORY EXIST?
\-------->1 MEMORY MESSAGE I
I
\
I YES
V
*GMPR(12)
*********.**
I
I
*******************
***********
'-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
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
.. *.
V
***********************
•••••••••••••••••••••••
*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)
$PRINT(63)
*.***.***.~**.*****.*
I
I
I
TYPE "FROM"
I
I
I
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
0
*-----------I
•
***.*************
I
I
I
V NOT=O
I
-----------------
I
I
•••
NO
/
\
.A*<-------/ 4K BANK BOUNDRY? \
***
/
I
\
----------------------I YES
*.*
V
I
- ----------------
I
NO
/MEMORY MANAGEMENT\
*A*<-------/
AVAILABLE?
\
.*.
/
\
----------------------- -
I YES
V
******************.****
UPDATE MEM MG,H
* NO
/
* REGISTERS + ADDRESS *<-------/ END OF MEMORY?
*
POINTER
•
I
V
*.*
*A*
***
YE~
I
I
I
I
\
\
\
----------------------I
I
I
I
-----------------
•
***********************
I
I
I
I
I
I
I
I
1<------------------V
/
/
DECFLO VER
CZQMCFO 0-124K MEM EXER 16K
MEMORY BYTE MAP ROUTINE
I
I TYPE "TO' FLAG
. SET? RO-O
\NO
\---------\
I
I
.----------------
I YES
V
••••••••••••••••••••
1
I
I
TYPE ·TO·
•.•••... **.**......
I
I
I
I
V
I
I
TYPE ADDRESS-1
•••••••••••••••••••
I
I
I
I
I
I
I
I
I
••••••••••••••••••••
I
I
I
I
1
I
I
I
I
I
I<----~--------------
V
•••••••••••
•• 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
I
I
V
••.
'SAVE REGISTER ADR IN •
• SECOND TABLE (MPRX) •
*...................
I .
•
***********************
I
I
GMPRC
I
I
I
• ADuUST SP. SET FLAG *
-TO INDICATE REGISTER •
•
NOT PRESENT
•
• ••••••••••••••••••••••
I
I
1<----------------------------------
V
-----------------
NO
/CLEAR MAP. END OF\
----------/ TABLE REACHED?
\
/
\
I YES
V
*******~**************¥
• TERMINATE SECOND
• TABLE (MPRX) RESEl
•
TIMEOUT VECTOR
•
•
•
***********************
I
V
/
/
ANY PARITY
\NO
/ REGISTERS FOUND? \------------------------\
----------------------I YES
!
I
I
I
I
1
I
1
1
V
I
V
********************
/ 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
V
•••••••••••••••••••••••
• WRITE WRONG PARITY IN• EACH BANK OF MEMORY ..
.*. .. *•••••••••••••
I
V
'~~
..
•••
•••••••••••••••••••••••
• FINO WHICH REGISTER •
• CONTROLS WHICH BANK ...
..
•
•••••••••••••••••••••••
TMAP
I
V
••••• ~* •••• *.* ••••• * •••
• TYPE PARITY REGISTER ..
..
ADDRESS
•
••••••••••••• ** •••••••••..
I
V
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
****
$ERROR(63)
V
r
.*.***********.**********
I
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
I
~***.**.*** ••
.*
V<----------------------------------
YES
-------//
I
MORE REGISTERS?
\
\
\
I
RESCHK
V
************.****** •• **
•
SET BITS IN ALL
•
• REGISTERS. DO "RESET" •
•************.****.*****..
I
V
$ERROR(63)
.*.****.*****************
,I
ALL REGISTERS
CLEARED?
/
-----------------------
I YES
*.
..
\NO
•• ERROR: RESET FAILED ••
\----------->*. TO CLEAR REGIST:R
\
*.
.*.**********************
I
<----------------------------------
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'
\--------------------
\
I
/TYPE: "ADDRESS IN /
----------------------------->/ UNMAPPED MEMORY· /----~-------------->1 YES
MANULI V
$RDOCT(63)
I
/
/
I
I
I
I
I
I
I
*.**.* •• *****.*.**~*
****.***.* ••••• *.~~
/
I
/GET FIRST ADDRESS /
I
/
.*.* ...
I
I
I
I
II
NO
1<----------------------------------/
I
/
I
I
I
1
I
I
I
I
I
/
I
I
I
I
I
* •• ********.
I
V
----------------/FIRST
ADDRESS IN \
MAPPED MEMORY?
\
I
\
I
I
I
-----------------------!I
-----------------;>1 YES
V
I
$RDOCT(63)
********************
I
I
/
I
/ GET LAST ADDRESS /
1 / /
I
t
•••• ** •••• * ••••
I
/
I
I
I
I
I
*...
I
I
I
I
V
I
I
I
.----.-----------
I
I
I
I
I
NO
/ LAST ADDRESS
\
--------/ HIGHER THAN FIRSI \
/
ADDRESS?
\
I
-----------------------
I
V
1
-----------------
I
I
I
I YES
I
I
NO
<-------.------_--__
--___.--.________
-/ /
LAST ADDRESS IN \
MAPPED MEMORY?
\
/
I
I
1
I
I
I
\
I
----------------------I YES
II
I
*****.**************
I
I
/
GET SELECTABLE /
I
I
CONSTANT
/
1
1 / 1
*** ••••• *.**** •• ***
I
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
V
** •••••••••••••••••••••
EVERYTING
*INITIA~IZE
*
*
FOR A NEW PASS
*
*•••••••••••••••••••• **.*
I
I
1
I
1
V
VER
00.07 20-FEB-78 07:58
PAGE 16
CZQMCFO
SECTION
0-124K MEM EXER 16K
ADDRESS TESTS.
TEST
DECFLO VER
00.07 20-FEB-78 07:58
PAGE 17
1:
TSTI
INITMM(55)
•••••••••••••••••••••••••
•• INITIALIZE ADDRESS .. *
**
POINTERS
**
.•
*.
*.* •• * .~.* •• ** •••• ** •• **.
----------------------------->1
I
V
••••••••••••••••••• * •••
..
WRITE PHYSICAL
..
I
I
I
.ADDRESS VALUE IN EACH*
..
WORD LOCATION
'"
** •••••••••••••••••••••
I
V
MORE MEMORY
MMUP(56)
.........
••••• * ••• ** •••••••• ** ••••
...
'JPOATE ADDRESS
POINTERS
---------------.*
•••••• **** •••••••••••••••
lDONE .
V
INITDN(55)
•••••••••••••••••••••••••
•• INITIALIZE ADDRESS
••
.. *
POINTERS
••
••
*'"
•• * ••••••••••••••••••••••
---------->1V
I
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
I
...
.*
••
*.***********************
IDONE
V
INlTDN(55)
*************************
•• INITIALIZE ADDRESS
••
POINTERS
••
••
**
**
*************************
------------------------->
I
I
V
I
I
I
-----------------
1
/ DOES EACH BYTE
LOCATION HAVE
/
ADDRESS VALUE?
I
I
----------------------I YES
I
V
I
I
/
\NO
$ERROR(63)
*************************
•• ERROR: ADDRESS VALUE *.
IN BYTE LOCATION ••
\-----------> •• NDT
\
*.
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
I
I
I
V
I
*************************
I
MORE MEMORY
*..
------------------*..
••
MMDOWN(56)
UPDATE ADDRESS
POINTERS
*.
**
.*
*****************.***.*.*
IDONE
V
INITMM(55)
*******.*****************
*.
**
**
INITIALIZE ADDRESS
POINTERS
**
.*
**
***********.****.*******~
--------------------··--->1
I
V
I
$ERROR(63)
**.****.****** ••• ***.*.*.
-----------------
I
/ 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
I
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
***********************
*
•
i
I
I
WRITE BANK # VALUE
INTO EACH BYTE
LOCATION
•
*
***********************
I
I
V
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
/
I
--_.' -------------------
I
I
**
\----------->*.
**
ERROR: BANK # VALUE *.
NOT IN LOCATION
••
I
******~******************
I
MORE MEMORY"
------------------*.
UPDATE ADDRESS
POINTERS
**
••
••
••
*************************
IDONE
I
I
I
V
••
*************************
1 YES
I
1<---------------------------------1
V
MMUP(56)
I
1
/
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
I
I
.Wr::E l'S COMPLEMENT.
• OF BANK NUMBER INTO •
..
BYTE LOCATION
•
I
I
•••••••••••••••••••••••
I
I
I
I
••• d
MORE MEMORY..
---------------..
••
V
MMDOWN(56)
•••••••••••••••••••••
UPDATE ADDRESS
POINTERS
••
••
••
•••••••••••••••••••••••••
IDONE
V
INITDN(55)
•••••••••••••••••••••••••
•• INITIALIZE ADDRESS
••
POINTERS
**
••
••
••
•••••••••••••••••••••••••
I
,----------------->1V
I
SERROR(63)
-----------------
•••••••••••••••••••••••••
I
I
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
•••••••••••••••••••••••••
II
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
V
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
V
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
TST6 IN ALL
LOCATIONS?
***.***..................
\NO
•• ERROR: CONSTANT FROM *.
\----------->
.. T5T6 NOT IN LOCATION ••
\ . .
••
------------------.----
I YES
•••••••••••••••••••••••••
I
1<---------------------------------1
V
MMUP(S~)
I
I
I
I
I
I
I
I
I
•••• " :***.*.*.**** ••• ***1
I
I
I
..
1
.*
MORE MEMORY
--------------...
UPDATE ADDRESS
POINTERS
*.
••
**
••••• *.* •••• **** •• ~ •••• **
IDONE
V
I
I
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
I
V
•• ::**************.*****
I
I
.GET DATA PATTERN FROM.
END OF TABLE
•
TABLE
.------------------------------
..
*
***.*******************
I
I
I
I
I
V
I
I
I
INITMM(5S)
I
•••••••••• ** •• ***********
I
I
I
•• INITIALIZE ADDRESS
.POINTERS
.--
I
I
I
I
- . . -
I
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
I
I
I
I
I
I
I
I
I
I
I
I
I
. . . .
***********************
I
I
I
I
I
V
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
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
I
TST11
V
SETCON(S7)
*.***********************
"PUT ALL ONE'S IN ALL
••
MEMORY
*.
.**.*.
***~************.********
I
V
INITMM(55)
*************************
•• INITIALIZE ADDRESS
POINTERS
••
**
••
••
**
****************.**~~****
----------------------------->1
I
V
I
*.
ROTATE(57)
*************************
0-
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)
V
I C-BIT CLEAR AND \NO
I
I
-1 IN MEMORY
LOCATION?
********* •• **************
••
\-----------)..
\ . .
-----------------------
I YES
ERROR: ROTATING 0
FAILED.
********************.****
I
1<---------------------------------1
MMUP(56)
V
*************************
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
I
Y
ROTATE(57)
I
••••••••• * •••••••••••••••
I
•• SET C-BIT AND ROTATE ••
•• IT THROUGH TWO BYTES ••
J
J
I
••
••
•••••••••••••••••••••••••
I
I
I
Y
I
SERROR(63)
-----------------
•••••••••••••••••••••••••
.*
ERROR: ROTATING
••
I
I C-BIT SET AND 0 \NO
lIN MEMORY LOCATlON?\--------->u
I
\..
I
-----------------------
I
I
I
I YES
I
I
I
FAILED
•••••••••••••••••••••••••
I
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
r
••
I
I
I
*.
••
**
************* •• *.********
I
I
I
I
'JRITE 256. WORD
BLOCKS WITH
0,0,0,0,-1,-1,-1,-1
V
MORE MEMORY
MMUP(56)
***;,*********************
*.
------------------.*
$.
UPDATE ADDRESS
POINTERS
.*
••
**
*************************
*.
IDONE
V
INITMM(55)
.*
*************************
••
INITIALIZE ADDRESS
POINTERS
**
**
**
*************************
------------------------->1
I
V
I
I
SERROR(63)
********************** •••
-----------------
r
r
/256. WORD BLOCKS \NO
••
/
WRITTEN WITH
/ 0,0,0,0,-1,-1,-1,-1 \ . *
I
-----------------------
I
II
\----------->.*
I YES
ERROR: 3 XOR 9
PATTERN FAILURE
*******.*****************
IDONE.
I
I
I
I
I
V
o.
...
********.* •• ********.*.*.
I
1<---'--------------------------1
V
MMUP(56)
I
*************************
r
MORE MEMORY
UPOATE ADDRESS
.*
------------------**
POINTERS
.*
••
••
*.
o.
,
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<-------------------------------1
"I
1
I
V
••••••••••• * •••
1
•
*.
I
.COMPLEMENT DATA-
l
I
•
..
."' •••••••••••••••
1
I
1
V
I
1
1
1
I
1
I
•••••• * •• "' •••••••••••••••
-----------------
/
-----------------
/
/
DATA OK?
SERROR(63)
**** ••••••••• * ••• * •••••••
\NO
•• ERROR: COMPLEMENTED 3 ••
\----------->*.
XOR 9 FAILURE
••
/
\ . .
-~--- .. ----------------
••
*** •••• *** ••••••••••• * •••
I YES
I
1<----------------------------1
V
."'.*
. ••••••.••••••.
I
..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
••
••
•• * •••••••••••••••••• * •••
...
1
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
••
X
"
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
---
r
II
I
\----------->.. PATTERN FAILURE ••
••
0------------------**********.*********** •••
I YES
I
1<------------------------------1
MMUP(56)
V
*************************
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 \ . .
I
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
I YES
II
*.
ERROR: 3 XOR 9
FAILURE
••
*** ••• ********
•• *** •• *.*.
I
1<---------------------------------1
V
.**.******* ••••••
I
I
•
I
•
.COMPLEMENT DATA.
•
*
*.**********.* •• *
I
I
I
I
I
V
I
-.---------------
1
/
1I
SERROR(63)
DATA OK?
/
I
I
*************************
\NO
**ERROR: COMPLEMENTED 3 ••
\----------->**
XOR 9 FAILURE
••
1
.*..
••
\~.
-----------------------
******** ••• **.** •••••
I
1 YES
I
1<---------------------------------1
I
V
I
I
****************.
*
1
.COMPLEMENT DATA.
I
I
I
*.**********."****
*
*
I
I
V
I
----------------~
t
/
\NO.*
ERROR: TWICE
••
\----------->**COMPLEMENTED 3 XOR 9
\
**
FAILURE
••
o.
/
/.
I
-.---------------------
I
DATA OK?
SERROR(63)
********.*****.****.*****
1
I
1 YES
I1
**.************** •• **~.**
1
1<------------------------------1
I
MMUP(56)
I
1
••
••
******.******************
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
V
I
*************************
I
*.*.***.* ••• ****** •.• ****
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
I
1<---------------------------------1
MMUP(S';)
*************************
MEMORY"
UPDATE ADDRESS
*.
V
MORE
------------------..
••
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)
-----------------
1
1
**.*******.*************.
ERROR: 3 XOR 9
••
\ . ..*
\NO
\----------->**
DATA OK?
I·
FAILURE
..
••
** ••• ** •• * •• ** ••••••••• *.
I YES
1
1<---------------------------------1
V
.~***************
•.COMPLEMENT
•
DATA.
*•• **** ••• ***** •••*
1
$ERROR( 63)
V
****.********************
1
1
\NO
DATA OK?
"ERROR: COMPLEMENTED 3.'
XOR 9 FAILURE
••
\
I
.*
\----------~>*.
1
**
*.***
•• *.* •• * •• * ••••••• **
YES
1
1<---------------------------------1
V
*****************
•
.~OMPLEMENT
•
DATA-
*
•
****************.
I
$ERROR(63)
V
************************.*
1
1
1
**
\NO
DATA OK?
ERROR: TWICE
••
XOR 9 *.
••
* •• *.*.*.* ••••• * •••••••••
I
\----------->
••
COMPLEMENTED 3
\
••
FAILURE
1 YES
1<---------------------------------1
I
MMUP(56)
•••• ** •• *****.*********.*
MEMORY..
UPDATE ADDRESS
.*
MORE
---------------.. _-..
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)
.*
*.
I
X
MORE MEMORY
••• ~:.* ••• ***.**.*** •••• **
**
------------------*.
••
UPDATE ADDRESS
POINTERS
••
••
**
• ** •••••••••••••• ** ••••••
IDONE
"
INITMM( 55)
•••••••• ** ••••• ** •• * •••••
•• INITIALIZE ADDRESS **
**
POINTERS
••
•*
••
•••••• **.*** •••••••• * ••••
------------------------>1
1
V
I
SERROR(63)
----------------1256. WORD BLOCKS \NO
•••••••••••••••••••••••••
1
IWRITTEN WITH -1 AND\----------->..
1
401?
\.*
I
-----------------.-----
•• ** •••••••••••••••••••••
I
I
ERROR: 3 XOR 9
PATTERN FAILURE
I YES
I <---.-------~--..,--~-~- ---~-"'
I
I
I
I
I
*.
~ORE
V
MMUP(S6)
••• ****.**.* •• ****** •••• *
MEMORY..
UPDATE ADDRESS
**
POINTERS
**
------------------**
.*
**
••••• ** ••••••••••••••••••
IDONE
I
1
I
I
1
V
..
I
.....-- I
••
••
••
'
33
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)
V
.......
********.**************.*
/
/
/
\NO
*.
\----------->**
DATA OK?
\
I YES
*.
ERROR: 3 XOR 9
FAILURE
...
******.************ •• ***$
I
1<---------------------------------1
V
*****************
*
.
.COMPLEMENT DATA*
*****.***********
I
V
SERROR(S3)
*****************.*- •••• *
/
/
\NO
".ERROR: COMPLEMENTED 3*"
\---------->..
XOR 9 FAILURE
."
\..
DATA OK?
/
----_ .. _--------------I YES
..
.*
********.****.******.**.*
I
1<-----------------------------1
V
.
*****************
.. COMPLEMENT DATA*
..
*****************
I
SERROR(S3)
V
********.****************
/
/
OATA OK?
/
I
\NO
**
ERROR: TWICE
*"
\---------->**COMPLEMENTED 3 XOR 9 ...
\
**
FAILURE
*.
******************* •• ***$
YES
I
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
V
•••••••••••
/ DOES THIS B~NK
.'WWPBT •• ----------->/
HAVE PARITY?
***********
/
\NO
************
\-------->.WWPB5(31) ,.
\
************
I YES
V
SETAE(60)
*.
*****~*.*.***************
SET MEMORY PARITY
ACTION ENABLE ALL
REGISTERS
••
••
**
••
••
****~~**********.*******.
I
V
CKPMER(61)
•• CHECK FOR NON-TRAP ••
"MEMORY PARITY ERRORS ••
••
••
*************************
I
WWPB1
•••••••••••
"WWPBl ••
•••••••••••
------------->,/
/
V
POINTING TO
PARITY VECTOR
(114)?
I
I
I
V
NO
\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
V
•••• *......
* 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)
V
........................ .
----------~------
/
/
/ERROR FLAG SET IN\NO
•• ERROR: NO REGISTER ••
*.** ••••• *.*
ANY REGISTER?
\----------->.* SHOWN PARITY ERROR. * *-------> *WII/PB4 (37) ..
\.*
••
••••••• * •••••••••• - ••••••
I YES
SERROR(63)
V
/
/
/
**.* ••••••••••••••• * •••••
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
V
***********$***********
* SAVE DATA FROM BYTE *
*
UNDER TEST
• ** •• ************~.****
••
$ERROR(63)
V
-----------------
*****************.*******
-----------------------
*************************
/ DID SAVING DATA \NO
-.ERROR: SECOND READ OF ••
I RESET ERROR FLAG \----------->.. WRONG PARITY NOT
••
/
\ . .
DETECTED
••
I
YES
I
1<---------------------------------V
SERROR(63)
*************************
/
I
/ DID DATA REMAIN \NO
•• ERROR: DATA CHANGED ••
U\SHANGED WHEN
\-----------> •• DISPITE PARITY TRAP ••
ERROR TRAPPED?
\ . .
••
-----~.----------------
I
YES
**********.*.********** ••
I
1<---------------------------------V
***********************
.RESTORE RIGHT PARITY.
• IN BYTE UNDER TEST •
•
*
*****~*****************
I
......*....
*.WWPB4
WWPB4
IDONE BOTH PARITY \NO
.*------------->/
****.****.*
V
/
BIT SET MiD
CLEARED?
WWPS5
\
************
I YES
V
•••••••••••
/ DONE WITH THIS
•• WWPB5 •• ------------------>/
BANK?
***********
••••••••••••
\------------->*WWPB2(36) *
/
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
v
I
I
-----------------
I
r
I
I
I
I
*
.*********************~
/
/010
"RAN~OM"
DATA\NO
COpy OK?
.*
$ERROR(63)
.**.
********** ••• ****.*** ••• *
ERROR: PROGRAM CODE
\----------->**
COPIED CHANGE.
/
\ . .
••
----------------------*******.********* •••••••
I YES
I
*
1<---------------------------------MMUP(56)
I
v
I
*************************
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
1
I
I
I
.*.********.*.** ••• **.*
..
PUT INSTRUCTION
•
'MOV R4, ( R2 ) ,
..
... AND RTS INTO MEMO,;1 ..
** ••••••••••••••• * .****
1
1
V
I
•• ****.******* •• *********
1
1
I
I
1
****.*.*.**
.*·-»>---------------->.*MAUT
••
•• ~SR TO ADDRESS UNDER ••
*.
TEST
*.
.*
*.*****.**.
*.*.****** •• *.* •••• * •• *.*
I
V
*******.******.*.******
.. EXICUTE INSTRUCTION •
.. IN MEMORY ADDRESS ..
.. UNDER TEST (MAUT) ..
*~**** •• ***************
I
1
I
1
I
I
I
I
V
**********.
------------------------------«<--.*RETURN ••
I
I
I
I
I
I
I
I
I
1
I
I
I
V
SERROR(63)
*******************.*****
\NO
.*
ERROR: INSTRUCTION ••
III'.iTRUCTlON EXICUTE\--------->**OIDN'T MODIFY ITSELF."
I
PROPERLY?
\ . .
••
I
-------.---------
010 THE
-----------------.-----
.*•.
*.** •••••••••••••••••
I YES
I
1<----------------------------V
MMUP(56)
I
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
I
1
V
***********
I
------------------------------«<--**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
*************************
I YES
I
I
I
I
V
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
V
I
••• *** •••••••••••••••••
I
I
I
•
~UT INSTRUCTION
•
"
'MOVB R3,-(R2)'
•
" ANO RTS INTO MEMORY "
••• ** ••••• *** •••••••• **
I
I
I
I
V
I
I
•••.••••••••••• *** •••••••
•• vSR TO ADDRESS UNOER ••
• ••••••••••
••
TEST
•• --»>---------------->**MAUT
••
I
I
••
••
•••••••••••••••••••••••••
I
I
• •• *** •••••
I
V
I
••••••••• ** ••••••••••••
I
I
I
• EXICUTE INSTRUCTION "
IN MEMORY AODRESS "
• UNDER TEST (MAUT) "
I
I
•••••••••••••••••••••••
I
I
V
••• ** ••••••
I
I
------------------------------«<--..
RETURN *.
I
•••••••••••
I
V
I
-----------------
•••••••••••••••••••••••••
I
1
I
/
.1
-----------------------
•••••••••••••••••••••••••
I
I
I
I
I
/
DID THE
\NO
•• ERROR: INSTRUCTION *.
/INSTRUCTION EXICUTE\-----------> •• OIDN'T MODIFY ITSELF .••
PROPERLY?
\ . .
••
I
1I
I
SERROR(63)
I YES
I
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
.* ••
**
*.
INITMM(55)
;$*********** ••
------------------------->1
I
V
**
...
*******
••
I
*$**************.******
I
I
I
I
..
'NEG (R2)'
..
.. AND RTS INTO MEMO~Y ..
I
I
I
1
I
I
I
I
..
PAGE 43
$********~***.*.*$***
INITIALIZE ADDRESS
POINTERS
•• J
00.07 20-FEB-78 07:58
PUT INSTRUCTION
********.*********
I
.****
V
************************.
**JSR TO ADDRESS UNOER ••
• ••••••••••
TEST
•• --»>----------------> •• MAUT
••
...
.*
**
******.******.********.*.
****.******
I
V
I
I
I
I
I
I
••• *.** •• ***** •••••••••
• EXICUTE INSTRUCTION ..
.. IN MEMORY ADDRESS ..
.. UNDER TEST (MAUT)
..
I
V
***** ••• *.*
$*$*$.****.*****.*** •••
I
I
I
I
------------------------------«<--••
RETURN ••
I
•••••••••••
I
I
V
I
SERROR(63)
-----------------
*************************
DID THE
\NO
•• ERROR: INSTRUCTION ••
EXICUTE\-----------> •• DION'T MODIFY ITSELF •••
PROPERLY?
\
.. *
••
II~;TRUCTION
I
----------------------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
* ••• *** ••••• ****** ••• **
1
* PUT INSTRUCTION *
* 'BICB (R2)+.-(R2)'
* AND RTS INTO MEMORY *
I
I
",**",,,,**.,,,**,,,***,,,****,,,*,,,
I
I
I
I
V
••••••• *.** •••••••• **.***
I
*.*.
I
I
.*US~
I
TO ADORESS UNDER ••
*.**.*.*.**
TEST
*.--»>----------------> •• MAUT
••
*.
.*.******.*
I
•• *****.*.*.* ••••• *.*****
1
I
V
.**"'*.*.*.* ••••••••••••
* EXICUTE INSTRUCTION •
• IN MEMORY ADDRESS $
• UNDER TEST (MAUT) $
I
I
I
I
** •••••••••••••••••••••
I
I
I
I
V
.*
* ••• * •• * •••
1
I
------------------------------«<--**RETURN
I
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
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
I
'BISB (R2)+,(R2)'
• AND RTS INTO MEMORY ..
I
I
V
***. *********************
*.JSR TO ADDRESS UNDER ••
• ••••••••••
••
TEST
... --»>----------------> •• MAUT
••
J
I
**
**
*.* •• ********************
I
I
***********
I
V
I
******.************~***
I
I
I
• EXICUTE INSTRUCTION •
IN MEMORY ADDRESS •
UNDER TEST (MAUT) •
I
I
***********************
I
I
V
I
***********
RETURN ••
------------------------------«<--••
I
***********
I
1
I
I
I
V
I
I
I
$ERROR(63)
*************************
-----------------
I
I
I
/
DID THE
\ND
•• ERROR: INSTRUCTION ••
/INSTRUCTION EXICUTE\-----------> •• DIDN'T MODIFY ITSELF."
/
PROPERLY?
\ . .
••
I
-----------------------
I
I YES
I
*************************
I
1<---------------------------------MMUP(56)
I
V
I
*************************
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
***.*******************
I
1
•
WRITE 4K WITH
*000371-ADDRESSING
1
1
I
I
I
I.
I
I
I
~P
*
*
•••• *** •••••• *.*.* ••• **
•• *
*A*---------------->I
**.
V
** •• ** •••• ** ••• **
*
•
..
DECREMENT
ADDRESS AND
READ WDRD
*
..
•
I
I
* •• **** •• **.* ••••
I
V
I
I
I
I
I
I
I
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
I
I
1
I
I
V
•••••••••• * ••••••••••••••
I YES
I
1<-------------------------------1
V
.*** •••••• *.****.
• SWAP BYTES IN •
·~HECK REGISTER *
1 * *
I
*****************
I
I
I
V
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
NO
*A*<-------!
!
1
!
\
\
YES
*****************
.. INCREMENT PASS ..
COUNTER
..
1
I
I
I
*****************
$MMUP
V
**MMUP: UPDATE ADDRESS **
YES
/DONE FOUR PASSES \
POINTERS
** <------/
ON A 4K?
\
/
\
....**
....
***.*****************.***
IDONE
I
I
V
.
NO MORE MEMORY.
GO TO NEXT TEST.
.
..
***********************
I
1
I
1
I
I
I
I
I
I
I
1
1
.. SWAP BYTES IN ..
.CHECK REGISTER ..
..
..
I
I
I
I
I
I
NO
************~****
***************~4**.***
..
..
I
V
*****************
\
DONE PASS?
I
V
I
I
I
I
I
I
V
*UPDATE TO NEXT ..
..
ADDRESS
*
V
,**
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
V
I
I
----------.------
I
I
/
\HO
/ PASS COUNTER =21 \
I
/
I
I
------------------I YES
I
\
V
***********************
I
*
I
I
*
1
I
I
RESET ADDRESS TO
80TTOM OF 4K
..
'"
'"
'"
************* •••• *.****
1
1<-------------------------------1
I
I
V
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
V
I
1----------------->* ..... * *** .. * .iI-
I
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
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
I YES
V
MMUP(SS)
MORE MEMORY
**"'*"'*************"'******
**
1-----------------..
••
UPDATE ADDRESS
POINTERS
••
••
••
"''''**********************.
I
V
***********************
•*
STALL FOR 2 SECONDS
•*
*
*
***********************
I
V
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
I
I
---------------·--->1
I
V
I
I
I
I
I
I
I
I
I
I
II
I
I YES
I
••••••••••••••••• ** ••••
I
I
I
II
II
I
I
I
I
I
I
I
I
I
V
-----------------
I
*
•
*••••••• * ••••••••••••••••
.COMPLIMENT CHECK DATA*
NO
/
\
I
1---------/
END OF BLOCK
\
1 / \
I
-----------------------
I
••••••••••• ** •••••• *****.
I
I
ERROR: REFRESH
CIRCUITRY FAILEO
1<-------------------------------1
V
I
I
*.
\NO
\----------->**
**
••
/
\ . .
..
----------------------•••••••••••••••••••••••••
I
II
=
/ 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
I
I
I
• SET UP DATA PATTERN'
•
TO BE WRITTEN
*
.STAQTING WITH 052525 *
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
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
*************************
I
V
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
•
I
*! :*****+**************
I
1
1
I
------------------->1
1
V
I
I
I
1
1
1
1
I
I
I
I
I
I
I
I
I
I
I
I
I
I
.COMPLIMENT CHECK DATA-
l
I
I
I
***********************
I
I
I
1
I
1
I
I
I
V
-----------------
I
$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
1
1
IPROGRAM IN MEMORY\NO
°TO BE TESTED?
\-------->1
\
I
I
-----0----------------I YES
1
-----------------
1
V
I
1 INHIBIT PROGRAM \YES
I
1
RELOCATION?
\-------->1
_______________________
1
1
(SW07=1)?
\
1
I NO
V
RELTOP(58)
••• ** •••••••••••••••••• **
**
.*
$.
RELOCATE PROGRAM TO
THE TOP OF MEMORY
.*
1
1
-----------------
YES
**<-----------1
0 AND 1?
\
I
\
1
•••••••••••••••••••••••••
I
----------------------I NO
I
V
V
**
•••••••••• **
*START1(16)*
•• $$$.*.* •• *
1
I
1
I~~OGRAM IN BANKS \
RELO(59)
•• ***.***.*** •• *.**.*~*..
*.RELOCATE PROGR~M INTO**
*$
BANKS 0 AND 1
**
$.
I
**...
V
RESLDR(59)
••••• ** •••••••••••••
*$$$*~* • • •
..
** •• *** ••• ***..
•• RELOCATE THE LOADER **
** AREA TO 'TOP OF.*
••
MEMORY'
**
• • • • ~4 • • • *.*.*.*** ••• $*$.
I
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
•• ***.** ••• **.~.* •• *
1
/
: ;YPE END OF PASS /
MESSAGE
/
*******.****.*.*.*.
/
I
V
\YES
•• *••••••••
NO
/
••
• START1(16).<-~----. ----------/ MONlTOR PRESENT? \---------------->**EXIT
••• *•• **....
••• ***.***..
\
./ ----------------------
•••••• * ••••
I
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 •
..
•
***********************
~'MDJWN (56)
*************************
"SEARCH DOWNWARDS FOR ••
"TOP BANK IN TEST MAP .-
I·'
I
I
I
I
V
I
-----------------
I
I
I
I
1<-------------------
/
----------------8K BLOCK SIZE?
\NO
\----------
••
***************~*********
/
/ LAST BANK FLAG
SET?
\NO
\--------
/
\
-----------------------
I YES
V
V
/
..
..
..
I
V
----------------/ LAST BANK AS
\NO
/
WELL?
\----------
-----------------------
SET UP ADDRESS
POINTERS T~ LAST
POSSIBLE ADDRESS
***********************
I
V
• -RETURN ••
V
***********************
..
..
..
..
**** •••• **.
***.*******
"INITDN ••
***********
• *INITMM ••
"'****"'**"'''''''
MMINIT
V
**********.************
• SET UP ALL THE MEMORY'
-MANAGEMENT REGISTERS .•
PAGE 55
***********
*"''''*'''**''''''*'''
• *MMINIT -.
*.",ot:*******
I
V
00.07 20-FEB-7B 07:5B
***********************
I
I
I
I
I
.rUT LAST ADDRESS INTO'
*
ADDRESS POINTER
*
I
I
******.****************
I
I
/
\
-----------------------
I
I
***********************
I
I
I
I
I
I YES
V
• SET UP SECOND BANK
•
POINTERS
•
*
***********************
I
I
I
I
I
I
I
I
I
1<------------------V
I
I
-----------------
/ FIRST BANK FLAG \ND
SET?
•
/
\
I
I
I
\-------->------------------->1<----------------I
INITEX
V
/
-----------------------
I YES
V
*****************~*****
* PUl FIRST ADDRESS •
.INTO ADDRESS POINTER *
*
**.~~******************
I
I
I
I
I
I
I
********************.**
*
*
*
****_**.0********** •• **
*
SAVE RETURN PC FOR
LOOP ADDRESS
I
V
I
***********
I
***********
I
------------------->1
•• RETURN o.
:ZQMCFO
~EMORY
0-124K MEM EXER 16K
MANAGEMENT ANO ADDRESSING SUBROUTINES
**"'* •• *****
********.**
•• ** •••••
MMUP
/
/
**
.·MMDOWN
I
v
MMDOWN
\yES
LAST BANK?
\
/
I
I
V
***********************
-----------------
••• ***.**.~****.*.*.***.*
I
• •• *********************.
I
I
I
I
*FIND NEXT BANK (NEXT" NONE
** CHECK FOR NON-TRAP **
*TWO BANKS IF BK BLOCK*------->**MEMORY PARITY ERRORS.**
..
SIZE)
.. FOUND
**
**
*********************..
I
I
V
-----------------
\NO
\---------
I
V
I
**********.
I
.*RETURN **
"**********
I
I
I NO
I
I
V
I
I
/
I
\YES
\------------
FIRST BANK?
\NO
LAST ADDRESS? . \----/
\
I
-----~----------------I
I YES
I
V
CKPMER(61I
/
I
I
V
/
\
-------------------
V
I
I
/
/
/
-------------
V
***.....
*.* •• ** •••• ** ••
• FIND NEXT LDWE~
4K
BANK
I
I
1
•
1
****.***.* •• *..........
V
•••••••••••
.*RETURN .*
I
V
I
I
V
******************~****
I
I
I
I
** ••• * ••• **** ••••• *•• **
*
I
V
I YES
.. SET UP LAST ADDRESS ..
..
MASK
..
•
***********************
I
I
I
I
.. SET UP LAST ADDRESS ..
"
MASK
..
..
..
I
I
I
I
V
*****************.*.*.*
1<------------------------------------------------
V
***********************
*ADJUST RETURN ADDRESS.
..
TO LOOP
..
..
.
****.*******.:.*********
I
V
*******.*.*
**RETURN
**
***.*******
/
V
I
I
••••••• **.**.* •••••••
*AO~UST
*.
RETURN ADDRESS ..
TO LOOP
•
..**.. •••••••••••
..
*•••••••••
I
V
*••••• * ••••
... RETURN ....
•••••••••• *
I
I
I
•• *.* ••• *.*
V
<------------
I
V
I
1
..
NONE FOUND
I
*------------->1
I
I
I
I
I
I YES
I
/
\
-----------------------
LAST BANK?
FIRST ADDRESS
\NO
\---\
1
I
I
..
"
--------------
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
1
--------~~c
'/'
CZQMCFO 0-124K MEM EXER 16K
SUBROUTINES FOR ADDRESS AND WORSE CASE NOISE TESTS
00.07 20-FEB-7B 07:5B
-**********
*·BANKNO
.*
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
..
***********************
I
SETCON
I
V
I
V
***********
I
V
***********************
.. CALCULATE BANK N
•
.. USING TEST MAP BANK ..
..
POINTER
..
***********************
***********
I
I
PAGE 57
***********
*********.,*
***********
V
*.
*..
INITIALIZE ADDRESS
POINTERS
**
**
*.*.************* •••• ****
.*********.********* •••
I
I
I
.. PUT THE CONTENTS OF ..
..
RO INTO MEMORY
•
I .
*
I
***********************
I
I
I
V
I
*************************
MORE
.*
**
IDONE
V
*********.*
***********
***.* •• ****
*·RETURN ....
***********
•• ROTATE ••
***********
***********
***********
**W3X9
W3X9
'ROTATE C-BIT THROUGH ..
..
16 BIT WORD.
..
.
*
***********************
••
V
***********************
.WRITE 256 WORD WITH 4.
* OF A PATTERN THEN 4 ..
..
OF A~OTHER
..
*****-*****************
I
V
V
***********
***********
***********
**********.
··RETURN ••
.*
.*
**
.***************** ••• ****
••
***********************
MMUP(56)
UPDATE ADDRESS
POINTERS
***** .. *** ••
I
V
**
.*
-------------------->1
I
V
I
1<----------------
*.R~TURN
INITMM(551
*************************
-------------**
MEMORY
V
ROTATE
VER
.*
**$********
'.PHYADR
~ECFLO
-·RETURN **
CZQMCFO 0-124K MEM EXER 16K
RELOCATION SUBROUTINES
DECFLO VER
00.07 20-FEB-78 07:58
•• * ••••••
***"'****.*.
**RELOC
••
*.
**RELTOP ••
"'*."'* ••• ***
RELOC
PAGE 58
*.* •• **** ••
I
v
REL TOP
V
******"'******.*"''''''''''** ••
•
MOVE BK BLOCK OF
MEMORY FROM SRC TO
•
DST
•
..
..
*
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
/
I
V
----------------------
\
***********************
• SET UP DESTINATION ..
• PART OF 'RELOC' TO ..
.POINT TO LAST 2 BANK ..
.* •.••••.•• **
•••• **** ••
I
V
RELOC(5B)
* •••••••• * •••••••• * ••••••
**
••
....
\YES
\-----
.*
RELOCATE PROGRAM TO ••
LAST 2 BANKS
****.**.*.***** •••
I
*.*....• *
• ••••••••••••••••• * ••••
I
V
RELOC(S')
•••••• * ••••••••••••••••••
.......................
•• RELOCATE PROGRAM
••
LAST 2 BANKS
..
V
*******.*****.*.** •• **.
.ADJUST ALL PERTINENT.
.. ADORESS POINTERS.
,.
..
I
I
V
**.****.***** ••••• * ••••
..
SET UP MEM MGMT
..
-REGISTERS TO POINT TO •
LAST 2 BANKS
..
•
..
*** ••••••••••••••• *.***
I
I
I
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
***********
I
I
V
RESLDR
V
-----------------------
RELOC(58)
•••• ********* •••• *.*.*.**
•*
*.**.~*.********.***
I
V
••
.. MOVE "LOADER" FROM ..
.. END OF BK TO TOP OF ..
MEMORY
..
..
I
I
***********************
I
V
."'.*
•• * •• **
".RETURN .. *
V
•• **.*.******.*********
..
SET UP MEM MGMT
-REGISTERS TO POINT TO.
•
B.. ;~KS 0+1
.-RELOCATE PROGRAM BACK".
••
TO BANKS 0+1
**
...
***
*** ••• *****************
I
V
* •••• * •••••••••••••••• *
RELOC(SB)
***********************~*
*ADuUST ALL PERTINENT ..
- ADDRESS POINTERS
..
.'RELOCATE PROGRAM BACK*.
**
TO BANKS 0+1
****** ••••• **** ••••••• 4
.*
.*
*.
***.*.* ••• ***************
I
I
.
-------------->1<-------------I
V
***********
•• RETURN
*.
***.* •• ***.
V
***********************
NO
/
ME~ORY
\YES
-----/
MANA~EMENT?
\----1 / \
II
PAGE 59
***********
~ECFlO
CZQMCFO Q-124K MEM EXER 16K
PARITY ROUTINES
***********
***********
.*PESRV ,.
*** ......... *
-,SETAE
VER
***********
*.
**MAMF
***********
f
I
I
V
I
f TYPE UNEXPECTED f
TRAP MESSAGE
I
I
I
*******************
I
SERROR(63)
V
•••• *_.*.*.******.*******
fERROR FLAG SET IN\NO
•• ERROR: TRAP BUT NO
ANY PARITY
\------>*.
FLAG
I
REGISTER?
\
*.
f
*"
**
**
••••• ** •••• ****** ••••••••
MAMF
----------------
I PARITY REGISTER \NO
EXIST AND NOT
\-------I
INHIBITED?
\
I
I
---------------------
I
I
V
*******************.*.*
I
I
I
I YES
.SET UP PARITY VECTOR.*
.****************.*.***
I
1<------------
V
PC AND
REGISTER DATA
***********
.,
·"RETURN **
********.*.
**
**
**
*************************
I
V
PSCAN(61)
*************************
•• SCAN ME, DRY FOR ALL
'-BAO PARITY LOCATIONS
"*
...*•
*'
*************************
********.*.
1<----------------------------
·*CLRPAR .*
*********.*
I
V
***********
I
I
I
1
I
..
V
TRA~
I
I
IN ALL REGISTERS"
--->* SET 'ACTION ENABLE' ..
***********************.*
**
V
I
I
I
I YES
** REPORT
**
***********
I
PESRV
******************.*
00.07 20-FE6-7B 07:56
'.RETURN ••
CLRPAR
****** •••••
*****************.*****
V
.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
**"'********
V
I PARITY REGISTER \
EXIST AND NOT
\
INHIBITED?
\
/
/
----------------------I
I
V
I
-----------------
I
I
I
I
.******** ••• ***********.'"
/ERROR SHOULD HAVE\YES
•• ERROP: PARITY ERROR..
/
TRAPPED?
\------>** SHOULD HAVE TRAPPED
/
\..
I
-----------------------
*********************~.
*.
V
1
I
I
••
I
*.********.**************
I
/
\..
••
----------------------*************************
I
I
*************************
I *
---*
*
1
•••••••••••••••••••••••••
I
I
I
•• SCAN MEMORY FOR ALL ••
"SAD PARITY LOCATIONS."
• • • •
I
*************************
I
.*
**
**
** ERROR: PARITY ERROR
**.*
I
V
PSCAN(61)
--------------->1<----------------------------V
***.**.****
I
/ANY PARITY ERROR \YES
•• ERROR: PARITY ERROR ••
FLAGS?
\------>*.
AT LOCATION.
••
/
*************************
I
1
$ERROR(63)
$ERROR(631
******~***************.**
-----------------
I
I
I
I
I NO
V
V
"'***********"'*"'********
I •
•
I -READ MEMORY LOCATION.
1 * .
$ERROR(63)I
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
I
1<--------------------V
***********************
UPDAT~
ADDRESS
POINTERS
*
*
*
***********************
IDONE
V
$ERROR(631
----------------•••••• * ••••••• * ••••••••••
/ANY PARITY ERRORS\NO
•• ERROR: NO PARITY.'
/
FOUND?
\------>.*
ERRORS FOUND
••
/
\
I YES
**
1<-----------------------------
"RETURN ••
V
*********.*
***********
**RETURN ••
***********
**
**************.**********
CZQMCFO 0-124K MEM EXER 16K
SPECIAL PRINTOUT ROUTINES
QECFLO VER
•• TYPMAP **
*.--->1
***********
***********
***********
1
1
I
I
I
TYPMAP
**SPRNTQ **--->1
*.**.******
**>11********
I
1
1
I
/
/
/
V
MAP CONTAIN
FLAGS?
1 YES
V
*****************.**
I
1
/TYPE FIRST + LAST /
/ ADDRESS OF BANKS /
/
FOUND
/
1
***********
I
***********
I
I
V
1
***********
••• ****.******* •• **
**SPRNTO **--->1
****** . -***$
•• RETURN .*
•••• **** •••
I
I
1
1
***********
I
**SPRNT3 .*--->1
***.*******
***********
I
1
1
I
**SPRNT2 **--->1
***********
I
I
V
******************.****
*
*
*
ROUTINES TO SET UP
DATA FOR EP~OR
T~PEOUTS.
•
*
*
***********************
I
V
***********
uRETURN
••••• *** ••• * ••••••••
TYPE EMPTY MAP /
MESSAGE
/
/
**~/*·**·*·*··*····
I
1
I
1
1
I
1<----------------------I
**SPRNT1 **--->1
****.** .. *.*
\NO
/
\-------->/
\
/
-----------------------
.*SPRNTR •• --->1
***********
PAGE 82
****** •••• *
*********"".
**SPRNT
00.07 20-FEB-78 07:58
**
••• **** .. ***
CZQMCFO 0-124K MEM EXER 16K
SYSMAC AND STANDARD UTILITY ROUTINES
SSCOPE
**"
•••••••••••
•
"$SCOPE •• -->*
•••••••••••
•
~****.**
DECFLO VER
•
• ••••••••••
*--> •• 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
STYPE
•• ** •• * •• ***
CONTROLS LOOPING,
INTERATIONS, ETC.
BETWEEN SUBTESTS
00.07 20-FEB-7B 07:58
• •• **** ••••
***********
***********************
*'
***********
•
*****.****.
"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
56
1;1#
61
OECFLO VER
00.07 20-FEB-78 07:58
25
42
26
43
27
44
27
45
28
46
29
49
29
49
30
51
31
51
3.1
55#
PAGE 64
63N
63N
12
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#
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
59
59
53
59N
59
44
60
45
60
55
61
55
61
56
62
56
62
56
63
56
63
57
63
57
63
57
63
57
63
57
63
60
15
02
06
40
58
63
26
41
59
63
57#
42
59
63
57
43
60
35
57#
57
60N
26
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
53
54
33
57#
57
17
-2
42
18
32
43
19
32
44
20
33
45
10
10
15
63
1;3/1
63
6311
16#
06
16
3911
39
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
24
34
48
26
36
52
PAGE 65
37#
21
34
46
23
34
46
25
36
50
27
36
58
28
36
60
28
36
61
28
37
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
63'
00.07 20-FEB-78 07:58
PAGE
I.
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
;
;
;
27
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
60
00 DOt. J
000040
000100
oeo 140
6~
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:
%7
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
96
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
90
97
98
99
100
'01
'02
.
.,
,59 Tl L
57
58
59
61
SWITCH
;
22
CZQMCFO
OPERAT!ONAI. SWITCH SETTINGS
;
;
;
;
i'"
;
ill<
i'"
'6
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
• EQUI II
• EQUI V
· [Ou! II
• EQUI II
· Eoui V
• EQuIV
.EQu! 1/
000034
TR,VVEC=34
000060
000064
000240
P TRO'JEC=240
Tr;\lE'~=
'!Pv~C:::
TRAP VECTO
PAGE 4
SEQ 0086
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
60
TTY PR!~JTER VECTOR
PROGP.AM INTERh'-/PT REQUEST Vi:CTOR
64
r.ifMQ,'/Y MJ-NAGEMENT DEFINITIONS
.SBTTL
: ... KTll VECTOR ADDRESS
250
MMVEC=
000250
: .. KTll
STATUS REGISTE;t:I ADGI;ESSe5.
177_12177574
177576
172516
SRD"
SRI :::
SR2=
SR3=
117572
'77574
177576
172516
:"'KEIH"E.l "It< PAGE DESCRIPTOR REGISTERS
Ki:P)RO=
KIPDRI =
K!PDR2=
KfPi)R3=
1 i 23CO
1723 -·2
172304
172306
172310
172312
172314
172316
K.PD.[~4=
172300
1 'i2302
172304
17:2301)
172310
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=
KIPA;S" ,
KIPAR6"" 17235t;
KIP'.R7= 112:356
UP
RW
~
PARITY ME~IORY DEFINI1IONS.
; ...
000001
AE= 1
OC(.114
PA!=lvEC=114
0,7777
MASK'~K=
182
: ..
202
00021 ~
203
204
205
20G
SEQ ~OB7
;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
•
PAGE 5
7235~
li.23!:l2
000006
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
1
"'
115
000004
O~OQl 0
0000 14
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,
IMPCr:E= 17-746
1 "17746
.SBrTL
OOOQOO
• = 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
002640
002435
000046
000052
OCQQ52
0400CO
Ou0010
PAR,U~:'TERS.
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.
;:~ESTA.RT
ADDRESS.
USING PREVIOUS PARAMETERS.
BYTE BY BYTE.
• =ERRVEC
.\·;ORO
• \\·CRD
; : 'I< ....
000046
014222
,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
.SBT1L
000010
CATCr.ER
• =0
:>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
jPAR1
;PAR2
;PAR3
; PAR4
;PARS
;PARS
MAPPED
MAPPED
MAPPED
MAPPED
MAPPED
MAPPED
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
3$
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.
RO
: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.
BR
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.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:
$CE:,\ICT:
SUN IT:
$MSGAO:
$t($uLG:
$ET4.BLE:
$ENV:
$ENVM I
$S,.,'REG:
SUSWR:
$CPUOP:
O'OJOO
DC 0000
000000
oeoooo
000
000
ocoooo
ocoooo
000000
:
:
483
496
497
49B
499
500
AENV
AENVM
ASWREG
AUSWR
'CPUOP
,.:-
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
• BYTE
• BYTE
.WORO
.WORD
.WORO
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
--
.WOR~
APASS
ADEVCT
AUNIT
AMSGAD
AMSGL.G
.WORD
.WORO
.WORO
.WORO
:'
:-
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
;; INTEr10
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
,a
-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
;"~" ~
001514
0015Hi
OC Qot')
070032
001520
001522
001524
001524
001526
oeoooo
O()()OOO
001534
001536
001540
001540
001542
001544
00' 54-'l
C01546
00'550
001550
001552
001554
001 SS6
001557
001560
001562
*~
RESRVD:
lI",\D:
LOOISP:
~,G
.I'.'ORO
• \' 'lRD
P:
000000
• \\lORD
• \'\lORO
oroooo
TSTMAP:
.I/IORD
• ~iDRD
OOOOCO
ocoooo
St.VT$T:
000000
• WORD
" wORD
ocoooo
PMHliAP:
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
• WORD
, WORD
• vJORD
000000
O~OCOo
001602
001606
OOi 61 0
COl 51 2
001614
001616
001620
-
FSl"ADR:
TMPFAO:
FAO\lSK:
• WORD
• wORD
Ft.C\1AP:
LSiADR:
wORD
• \"O.t,'QP'}
177746
0.0
0
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
,CO~~T:
000004
Wt'iP:
TeAP:
C;..SFLG:
C;,SR~G :
OOOOCO
oeoooo
1·/774.6
;
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
002042
599
0020Ll6
177777
0:).)030
600
GOl
602
603
604
605
609
610
611
612
20-FEB-7B
07:56
PAGE 13
50Q
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
(021)36
606
. ~,~pqx:
• P8fRP
,MPPAT
• PESRV
· ER:;T8
• E:":;HT
, T5T32
002340
000010
014004
597
598
607
608
,MPKO:
012052
OC2050
RE
RAD T A a
.STACK
.RESRV
001100
0::'1516
002076
OC2276
001634
ok
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
:'"
001514
0(:0000
001514
G01160
001514
001162
OC'160
OC 1126
001166
595
596
.
:'"
GZOMCF,Pl1
566
000000
ooooeo
; 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 "' ... * "',. * . . *** * *"'* .... ***********'" ********
CZOMCFO
557
558
559
560
561
562
563
56"1
565
000000
ooooeo
*_*-1< .. **.,.***
-
, BYTE
, B,YTE
, BYTE
• [VEN
• WORD
<
*' '" "'>+-,.. "-*,.,.. * *,,. *-1< *'" ** **' ** * *. **;10 **
* " •• "'"
545
546
547
54B
549
550
551
552
553
554
555
556
PAGE 12
TAGS ARE USUl DE[' INED
.. ** ..
t *~ ~.- **"**,,*~.,, ,,**.***** ~>i<""
0
PC LOCATIOI~ FOR ERROR TYPEOUT ROUTINe: (HRrYP).
070032
PARITY REG 811 S RESERVED FOR FUTURE USE.
;NOTE:
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 LOIi' *,,. .. ,,.-~,.,, '",. >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
,$GDADR,~BODAT
DT30:
$TMPO,$TMPI
DT31:
5TMP3
,SCTTL
r/EMQRY PARIT'f PATTERNS TA8LE
,0
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
0095
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
002222
oon~4
002226
002230
002292
00223.
092236
002240
002260
MPR5:
+1
nJl04 +1
o
o
o
172106"',
o
9
172110 +1
D
o
o
17211~
P
172114 Tl
o
o
o
17211,. +1
a
o
o
17QI2Q
o
o
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
+1
o
MPR7:
;PARITV STATUS REGISTER
MAP (LOW 64K)
(HIGH 64K)
:MASK FOR MOS.CORE.MS"-K
:PARITV STATUS REGISTER
:CONTROL MAP CLaW 64K)
:CONTROL MAP (HIGH 64K)
; CONTROL
: CONTROL MAP
o
MPR6:
+1
•
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 '~C~O~~~l.:g~L~~ ~~ ::::~~~NTE~H:y Mi~gRr2~R:~:~~ ~~~~~WING
=
MPRB:
1i2137
000000
000000
00 0000
699
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.
1721~1
oroooo
ADDRESS TABLE
I'
;.
:'
000000
000000
000000
172'23
OO!!244
00224p
~~~f/~~tg~I~M~~R~~~~~~ ~~\~~~~~;~6A:I~~N~~gt~~~~
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
;.
::
~26
621
633
o
;:
628
83.
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
632
107030
152525
07:58
o
o
o
172136
o
o
o
; CO"TROL MAP (LOW 64.)
;CONTROl MAP (HIGH 64.)
;MASK FOR MOS,CORE,MS11-K
+1
:?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:
;
.
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
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
;
;
;
;
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
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
002514
;
002526
;
002530
002532
002534
002536
.
.
;*
;
027654
OJ0454
001706
0.307S2
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
CG
62
b4
66
0301 7
C-J06
DC 1 7
0307
5
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
.
.
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
MACY11 30A(1052)
16K VER
ERROR POINTEri TABLE
;
002462
D02464
002466
.
;; POINTS
; ;POINTS
; ;POINTS
;;PCllNTS
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
;3
;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'
e
MAr.Vl1 30A(1052)
16K VER
ERROR POIN I'ER TABLE
a, 2
1*
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
I'
1*
DH30
DT30
DF30
ITEM 31
I'
002610
002612
002(114
002616
030313
030673
0020'6
030740
a
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.
t REG, WAS
$VERPC, SERRPC, SBDAOR, $TMFO, $TMPI
VI PC ,Pipe, TRPI PC
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
,a
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.
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
= :200)
BEGINNING OF THE PROGRAM.
:*
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
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
se
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
'C2QMCFO '
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
R3
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
aR
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).!77772. 61R3)
4$
R5,
MX4
SPRINT
;GO PRINT OUT THE FOLLOWING MESSAGE.
i ADDRESS OF MESSAGE TO BE TYPED
i "MOS PARITy"
5$
aNF
JSR
#70000. 61R3)
5$
RS,
SPRINT
.WORD
MXS
~SR
016622
O~Q327
004776
005004
005012
005016
005022
005024
005026
005034
005040
R3
2.
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
1013
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
000001
r,.,.ov
.
\~('
BIT
RO,
BNE
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$:
004767
67$:
013054
014376
RESRVD,
RO,
BEQ
JSR
JSR
66$
PC,
Rl
Rl
PC,
5PRtHO
SERROR
(R2),
R'
RESRVD,
3$
Rl
.WORD
,
MDV
BIC
BEQ
J~rt
JSR
. wORD
ASL
3$:
I 033~6
BCC
BR
;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.
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.
;JII
THIS IS A ONCE ONLY TEST.
; ; "'.,.. ",.lOt*"* ** ........... '" **** ...... **" ** *'" '" **** .. *** *0+**.*.* ** *0+ ** .. '" 0+ ***.* "' . .
012704
010403
002076
062704
00u\')10
005264
0327 t 3
1332
1333
005270
005272
005300
001372
005252
OC5304
005305
012773
022704
oc 2764
000001
177777
002276
MClV
MOV
IfMPRO,
R4
1$:
R4,
R3
#' 1 0,
R4
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
25:
ADD
0020~4
BGE
MOV
CZQMCFO
0-' 24K f'.Ei,~CRY EXERCI
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
(R2 )
BI·::
CMP
28
66$:
174266
005260
1338
1339
SPRNT
CO,O:i.5
005256
, 336
,
010012
1329
1330
1331
1337
-.:;
RO
005172
005174
, 326
1334
1335
t R2),
=<'ESRVD
000170
1324
1325
~ 327
1328
MO'/
PAGE
SEQ 0110
o 1 6~67
01 :poo
1292
07:56
SER,
16K VER
TEST
.3
.2
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
R3
'2
#MPRX,
MANUAL
R3
('2) ,
R1
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
,
BR
2$
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
REGISTER
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. ,
RO
;!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;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
SP
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-II "'''' •• ''' .. '''* "'''' .. ' ' "''''
; .. TEST 3
:'
:'"
;
:
:
:
RO
R'
R2
R3
R4
R5
.
.
..
l,oJRlTE l ' 5 corllPLEME!'IlT VALUE OF ADDRESS INTO ADDRESS.
WRITTEN INTO r-tD1ORY ( SHOULD BE)
D,UA READ FROM ME~1l0RY (WAS)
VIRTUAL ADDRESS
NOT USED
NOT USED
8LOCK 80UNDRY BI T MASK.
= D.\TA
; ;,. . . . . . . . "' .. 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
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-
:-
005444
006450
006454
"'* "''''. >II ..... *"''' * "' ....... '" '" * "'."' ... "'* * .. "'''' '" "' .. "' .. '" "'*"''''.''' ***"''''* ••
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
n,
; ; *"'* * "''''''' .. "' .... "' .... "''''''' .....
: "'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-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-10 LOOP TO 1 $.
"
"
;
;'
CHECK THAT DATA 'NiUTTEt< CAN BE READ.
DQWN\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, •
H'
MACY'130A(1052)
20-FEP-78
07:56
\lmRST CASE 1\0lSE TESTS
PAGE 37
SEQ 0119
SECTION 2:
.SBTTL SECTIO!'; 2:
;; ... ~ .. * ~~"*"''''.j
:*
WORST CASE NOISE TESTS
"' .. "''''''''''* * *.;. ~'"''' • • '''
+ ..
~**"''''''
""''''.''' * 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:
; ; '"
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
O' 2201
0:00C1
0014CS
004767
OC4767
000004
64$ :
011410
012656
OC7Q14
007020
007022
007030
JSR
• \liORD
MOV
JSR
RS,
0
. CONST,
R4,
r,IQV
CMP
BEQ
JSR
J5R
• WORD
(R2)+ ,
RO,
65$
PC,
SSCOPE
RO
IN!' MM
...
"'* "'''' ** *"'1O** **'"
: GO TO SCOPE ROUTINE.
; NO
BLOCK SIZE REQUIRED THIS TEST.
; GET
Cm~STANT
; INITIALIZ:=' THE fl'1EMORY ADDRESS POI ~TERS.
PC:
4
I
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.
IIING TEST $TN.
*""' ** "'* **** "'''' "'_ "">I' '" ** * .... "" . . * '" * >t ** '" * **" "' . . ~ •. ,. "' .. ** -+
1$:
i0003774
007002
007004
,~'"
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\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.
T7
000722
OR
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
.3
JSR
PC.
• ~ORO
7
O~22C1
MOV
02000t
00 1 ~O5
CMP
.0.
R.
R.
~SR
PC,
JSR
.WORO
PC.
7
SP'-.NT2
$ERROR
e4S:
0'0772
01224~
1854
007-102
007-104
007406
00/410
007414
oq20\
O:!OCCt
MOV
l85!;)
lS56
1857
001405
00.:1767
OQ47(;7
000001
BEQ
BEQ
0'vY5~
0122Q1
007.;3Q
00476'1
007434
007440
007.:142
007442
007444
007446
007450
OC47Q7
ass'
010732
Q12200
JSR
• W~RO
MOV
~SR
uSR
• ~jORO
COM
005' QO
00S304
00133.
005100
DEC
~N.
COM
007474
O~2703
()OOQO~
0;l0502
O~ 1330
00 476 1
lnK V~R
Tq
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.
R.
pc.
S?RNT2
SERROR
Be.
PC.
Rl
7
(R2)+ •
"0.
71 $
PC.
PC.
7
Rl
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
1882
.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
Ma10RY UNDER TEST.
ItJORD \'11 TH THE DATA READ.
CALL 1 F GOOD DATA.
ERROR PRl1'dING.
TYPE A MESSAGE 1
71S:
00473~
18~B
7QS:
0000(\7
005000
C044.7
C 12704
1899
1800
1901
.15.
CMP
BEQ
Q;20001
0014'-5
00746.1
007470
1896
1897
68$'
0.2220
1872
1873
1874
1875
lei6
lSi7
1878
187S
1880
1881
1895
66S'
CMP
0-124K I,IEMQR¥ EXERCISER.•
CZQMCFJ
14-FEs-ia 00:19
CZQMCF. Plt
, 893
1894
$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
OQ74S4
R.
; SET CHECK \.,rORD
j INtTIALlZE THE MEMORY ADDRESS POINTERS.
j SET 256. WORD COUNTER
65$:
0074~2
00745~
••
••
Ii'.<
0\ 1012
O. ~.60
004767
007452
INITMM
1
(~2)+,
acaco?'
007420
RO
R4.
/164,
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
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
0(-51 CO
007566
MOV
CMP
yOS100
00754q,
007550
OOi~56
00756~
'IOV
MOV
~SR
IN:ITMM
:INITIALIZE THE MEfllORY ADDRESS POINTERS.
R4
; SET 256. WCRD COUNTER
: SET 4 wORD CGUNTER
.3
.,
•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.
"'*
..
E~ROR
ERKO~
,. * ..
(GO TYPE A MESSAGE)
T'(PE COPE.
7!i$,
0014CS
004767
0:)4 7
OJOO07
67
Mev
ql.P
~EQ
O' 06' 1
76$ ,
Q' ~052
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
Rl
:GET THE DATA FROM
;COMPARE THE CHECK
; BRANCH OVER ERROR
; SET UP VALUES FOR
:
(GO
ERROR
; ERROR TVPE CODE.
MEMORY UNDER TEST.
WORD WITH THE DATA READ.
CA!.L IF GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)
: GET THE OAT A FROM
;COMPARE THE CHECK
; BRANCH OVER ERROR
;SET UP VALUES FOf;.
:
(GO
ERROR ...
; ERROR TVPE CODE.
MEMORV UNDER TEST.
WORD WITH THE DATA READ.
CALL IF GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)
: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)
.,
SPRrH2
$ERROR
.,
R,
SPRNT2
.EP.ROR
...
...
...
*.
675:
012201
020001
001405
004767
0047-'7
(l00007
010424
011672
6S$:
Rl
Rl
SpF!NT2
$ERROR
"'''''''
60$:
012201
020001
001405
004767
0':"4767
000007
010404
011652
70$:
Rl
R,
SPRNT2
SERROR
U.
;"'.'"
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
R2
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
012700
004461
012704
012703
012201
020001
0(01405
OC47S7
004767
000007
177777
004406
000100
000004
21$:
22$:
23$:
010324
011572
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
7
COM
COM
MOV
CMP
BEQ
JSR
JSR
.\r."")RD
RO
-(R2)
(R2)..
RO,
75$
PC.
PC.
COM
COM
RO
-(R2)
(R2)..
RD.
77$
PC,
PC.
7
SPRNT2
SERROR
GET THE DATA FROM
COMPARE THE CHECK
BRANCH OVER ERROR
SET UP VALUES FOR
..... ERROR .. * (GO
ERROR TYPE CODE •
MEMORY UNDER TEST.
wORD WITH THE DATA READ.
CALL IF GOOD ·DATA.
ERROR PRINTING.
TVPE A MESSAGE)
73$:
005100
005142
012201
0200.:1
co 1405
004767
004767
000007
005100
5142
012201
020001
0014CS
004767
0(\4767
0000C7
010300
011546
o
Mev
010254
011522
76$:
CPlP
BEQ
JSR
JSR
.WORD
Rl
R1
SPRNT2
$ERROR
7
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
R2
;; '" . . "'''' . . *'''*'''.* .. '''>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,
R3
R4,
INITMM
1164 ••
R4
(R2)+ ,
RO,
65$
PC,
PC,
7
Rl
Rl
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
; RESET PARITY ALL ONES PATTERN.
; INITIALIZE THE MEMORY ADDRESS POINTERS.
; SET 256. WORD COUNTER
;GET THE DATA FROM
; CO;,lPARE THE CHECK
; BRANCH OVEF ERROR
; SET UP VALUES FOR
;*1<", ERROR
(GO
; ERROR TYPE CODE.
MEMORY UNDER TEST.
~"'ORD WITH THE DATA READ.
CALL IF GOOD DATA.
ERROR PRINTING.
TYP!: A MESSAGE)
: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)
;
;
;
;
MEMORY UNDER TEST.
WORD WITH [HE DATA READ.
CALL IF GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)
...
SPRNT2
SERROR
65$:
012201
020001
001405
004767
004767
OOOOC7
010106
011354
665 :
Mav
C!ViP
BEQ
vSR
JSR
SPRNT2
~ERROR
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$!
GET THE DATA FROM
COMPARE THE CHECK
BRANCH OVER ERROR
SET UP VALUES FOR
(GO
;"''''* ERROR
; ERROR TYPE CODE.
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
Me·
eMP
BEQ
JSR
JSR
• WORD
(R2 )+.
RO,
73$
PC,
PC,
7
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
;
;
;
;
S£T UP PARITY "ALL ZEROS" PATTERN.
SET UP ALL ONES PATTEr/N.
INITIALIZE THE MErliORY ADDRESS POINTERS.
SET 255. vlORD COUNTER
GET TH!: DATA FROM
CD~,~PAR::: THE CHECK
BRANCH OVER ERROR
SET UP VALUES FOR
ERROR
(GO
ERROR TYPE CODE.
...
...
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
Gn
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,
:
;
;
;
:
;
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 PRHi-"'. ERROR
i ERROR TyPE CODE.
R,
R,
$PRNT2
$ERRDR
...
83$ ,
012201
020001
OC1405
OC4767
004767
000007
007576
011044
84$ ,
; GET THE DATA FR':~,l
; CO·.~PARE THE CHECK
: BRANCH OVEP ERROR
; SET UP VALUES FOR
(GO
j .. *11< ERROR
: ERROR TYPE CODE.
R,
Rl
...
SP··:H2
SERROR
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$:
; CorMILE~lENT CHECK WORD
; CO~,'PLEMEN.T rEST DATA
; GET TIo-iE DATA FROM MEMORY UNDER TEST.
; COMPARE THE CHECK WORD '.'ORE IN CURRENT BLOCK.
FIND NEXT BLOCK AND LOOP TO 21 $..
.3
; ; ...... "'''"'''''' * ... ***.'" *"""* "" '" ""~. *" "'* *. "'".'" ***",,~, "' ..... " ........... "'''' "'*>i< .... * "'''' * ......
: ... T~£T
'6
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
R2
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 li-*'" '" '" "'. *" ** >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
R,
R,
SPRNT2
$ERP.OR
",
R'
SPRNT2
SER. OR
; SET UP PARITY HALL ZEROS" PATTERN
;lNITIALlZ!: THE !\o'EMClRY ADDRESS POINTERS.
: SET 256. I'lORD COUNTER
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)
...
".
...
"'*"'
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
R1
R1
, \oj. '" ..-..- .. "' .. '" " ' ' ' .. "' ..
CHECK,
MOV
MOV
uSR
215:
Mev
(R2)+,
R1
R1
73$
COM
011322
74$ :
0'J5100
0051-;2
007064
I\:DKRY EXERCISER,
14-FEB-78 08:19
011310
011310
011312
01131Cl
011316
0[4767
76$ :
15K VER
T16
010332
CDr'.l
COM
MOV
O,1P
BEQ
77$
JSR
pc,
~
.. "'". ..
~
..
Co;I1PL£ME~rED
¥ '" ~ '" ... '" "' .. '" '" '" '" '" '" ... "' .....
PARITY
XOR S PATTERN.
3
;5ET UP
PARITy
;!~ITIALIZE
; SET 256.
THE
"ALL ZEROS" PATTERN
!,lEf~ORY ADDRESS POINTERS.
WORD COUNTER
THE DA, A FROII'
HIE CHECK
;8RANCH OVE!=! ERROR
;SET U? VALUES FOR
;,..~* EOi'?aR ""'-" (GO
;ERROR TYPE CODE •
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.
SPRNT2
SERROR
;~>I-~
Er~ROR
; t:RROR
;
"'Of'" (GO TYPE
TYPE CODE.
A MESSAGE)
CO·,'PLE~/.ENT
CHECK '1JORD
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.
;RESTCRE
;GET THE
: COI;9Al:lE
R1
R1
SPlmT 2
30A(1052)
2C-FEB-7S
07:56
P .... GE 49
CO".lPLE.MENT PAR I TY 3 XOR '3 TEST PATTERN.
MA;'Yl1
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.
RO
-( R2)
(R2) +,
RO,
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$ :
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.:..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
Rl
Rl
7
011334
011..;5':
011L1SlJ
RO
-( R2)
(R2)+,
RO,
• \o"ORD
0',5100
OG5142
011452
PC.
SPRNT2
SERROR
75$
OC0007
011400
011'::02
0111,0";
011406
01'--112
PC,
BEQ
JSR
JSR
01'326
011330
011J30
011332
011352
011354
READ.
;SET UP ALL ONt:S PATTERN
• 'J:ORD
COM
tNJV
CMP
0-124~
011302
011306
CHECK
#-1.
RO
#401,
R3
R4,
INITMlll
4'64. ,R4
RO,
011342
0113<16
2354
COM,
SEQ
JSR
JSR
2316
2317
231 B
2319
23:;0
2351
2352
2353
~,lMUP
01- .. "' ..... '" '" >< ..." .. '" .. " ' " ". '"
CrV.P
C2QMCFO
2334
CHECK.
RO
R3
R2
MOV
Czor{,CF.F11
2333
con,
-(S~)
OCr14C5
0047(7
01'264
011266
MEMORY UNDER TEST.
WORD vJITH THE DATA
CALL IF GOOD DATA.
ERROR PRINTING.
TYPE A MESSAGE)
225 :
22970'12700:2201
2298
011272
020001
2299
011274
CO 1 405
2300
011276
004767
2321
2322
12$
RO,
011224
011226
2295
2296
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$.
R3
020001
011264
*,...
$,ERROR
012201
2294
;GET THE D.... TA FROM
:CO:.~P,'UiE THE CHECK
;BRANCH OVEr:;' EIHICR
; SET UP VALUES FOR
;H'" [RROR
(GO
;ERROR TYPE CODE.
::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
7
0,2003
CC 5304
0(..1333
2291
2309
PC,
.I'JORD
RO,
71 $
PC,
PC,
7
SEO 0130
71$.:
2286011240005100
2287
011242
OC51·~2
2288
011244
O~2201
~289
011246
02QCC1
2307
:2308
JSFI
Jsr
010472:
73$ :
:;'305
2306
S?Rl'\T2
BEQ
JSR
Pi\CE 48
PATTERN.
ovu'
PC,
MOV
CMP
07:56
TEST
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
q1
R1
007244
010512
2283011232004767010402
2284
811235
0000C7
2285
011240
2302
2303
2304
R2)+,
9
OC1405
725 :
2301
XQI-i
[,10V
007134
2282
20-Ft::3-7("1
16K VEr::
T16
006704
010152
88$ :
000007
P
BEQ
JSR
JS R
R1
~.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$ :
Rl
GE T THE
P1
;
BRANC~,
OAT A
FROM MEMJRY U!~DER
TES T.
THe CHEO: ~"'ORD WITH THE DA7A READ.
ovEP ERROr! CALL I F GOOD DATA.
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
1
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
12
BR
\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
14
; 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.
a
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
R3
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[/.h
UP
67S:
2535
2536
2537
2538
2539
012~J2
2540
012~34
2'::'0167
2!:"'11
01~:;4:)
0C.5202
27$:
II\C
R2
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
JSR
f.lESTORE
DO
OEFLG
27$
\';\~PB2
M.\1UP
DAP..
A OAT~
TO
BE
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
Ji0703
GO: 2703
DC 4467
010246
006142
6T
007777
0017.24
of< of<'" '<' '" of<
162703
0:;05C2
~564
012~i26
012530
01:2603
012OC2
01~S32
012300
2567
012334
0, 2536
012540
0122Cl
-:
f'.'\CV
2$ ,
MOV
BIT
SNE
SUB
BI T
BNE
MOV
MOV
007777
010000
3$ ,
001370
:2565
2566
R5,
0
PC,
,,7777,
R4,
R2,
R3,
(R3)+ ,
JSR
MOV
1 $'
OC1002
012516
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"
; BRANCH I F
R3
R2
RO
Rl
Rl
SPriNT2
SERROR
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
~.'ORE.
: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$
R3
; 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
3:
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
;
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>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
MPNJC0001
'2014C5
Cr.,47f7
OO~>,22
012740
Q1274.:'i
012745
004767
006674
012734
JSR
Mev
crl'P
64$:
000021
(SHOULD BE).
""1-""""""''' * ....... "" '",. .. * .. * "',. .. '" * .... "' "'''' * ... "'''' ** "'''' "'"'
$SCOPE
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.
SEQ
J5R
JSR
,,11041
#205,
H110605.QJ
R4,
:!'.J.I~,lM
R3,
(R2)+
R4,
RS,
(R2)
'-( P.2)
(R2)+,
RO,
65$
R1
PC,
PC,
• wORD
21
Rl
SPRNT3
~ERt:(CR
65$ :
012746
0: 0322
MOV
'1677
O~2750
012752
030502
001363
0{;4767
8NE
R3,
R5,
2$
R2
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
; ;,.. "" ~,. '" ~,.,. .,* "". ","" "'* *
26BO
2681
oj<
1<"" "- '" '" ~ '" "'* * '" '"
~,..,.
"-,.-",,. '" "*,.",, *10 ",* "'* ", .. "',.,. .. '"* "'* ","" **
;"'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.'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,
R2
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-12if ..
**"'"' .. '" * .. "''''''''' "''''''''' '" '" "''' "' .. "' ..
:
:
:
:
:
:
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
RO
;"
R1
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
Of
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
3
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
RO
; '"
R1
2799
;..
R2
~800
;:,.
i'"
R3
;..
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
a
; 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
RO
: '"
; '"
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
3
$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.
:
;
;
;
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
; ; * .......
,,!
*****-1 "'*'" "'"."' ....
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$.
20-FEB-78
07: 56
PAGE 61
SEQ 0143
.sBTTL SECTION 4:M:JS TESTS
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
10
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
o
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.
2$
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
: COMPARE THE CHECK
; BRANCH OVER ERROR
; SE;T UP VALUES FOR
ERROR ** . . (GO
;ERROR TYPE CODE.
COM
BIT
BNE
JSR
RO
R5.
3$:
012201
020001
001405
004767
004767
000006
004522
005770
64$:
"
Rl
SPP.NT2
$ERROR
: "'*.
MEMORY UNDER T~ST.
WORD WITH THE DATA READ.
CALL IF GOOD OATA.
ERROR PRINTING.
TYPE A MESSAGE)
65$:
0051 CO
030502
001365
004767
001320
3.pc.
R2
; : .. '•••••••• *",. *.,.. .... >11*. >II,.
: I!1<. "' .. *"'.4o" ** ................ '"
WRITE CHFCI'.ERSOARD STARTING WITH 052525 OAT A
; ; .** ........ "'."' ......... ** ... '" ............................ "' ........ "'''' "' ........................
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
8$
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
JSR
00Q530
052525
JSR
MOV
MDV
COM
.~ORO
1$:
81T
BNE
JSR
001266
cc
000046
2S:
0~1376
005304
001374
004467
012700
000466
052525
1
MOV
DEC
BNE
DEC
BNE
JSR
MOV
$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
; 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
004740
004410
005656
645:
MOV
CMP
BEQ
J5R
JSR
.wORC
(R2)+ •
RO.
65$
PC.
PO.
6
COM
RO
Rl
111
SPRNT2
HRROR
; GET THE DA TA FROM
;CG:\~PARE THE CHECK
; BRANCH OVEP ERROR
;SET UP VALUES FOR
i"''''''' ERROR UI!< (GO
: ERROR TYPE CODE.
ME"'O~V UNDER TEST.
WORD WITH THE DATA READ.
CALL IF GOOD DATA.
ERROR PRINTING.
TYPE A MESS~GE)
65$:
001206
BIT
OS.
BNE
JSR
3$
PC.
R'
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 • • "'''' ... ,
SEQ 0,47
.....
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
RO
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•.
6$
• 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
e4
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"'''''''''''
<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.
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,
5,
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
01
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
: .... "' .. "' .... **.;. ~ .. " ..-** *"'«
'"
3146
r~EMORY
Of. "' .. "' .. '"
ADDRESS POINTER
;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
*'" ¥ "'''' ..... * '" ** . . '" "'''''"'''* "' ...... ** • "''''''' .. * ......... "'*
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~
016705
0(,5767
CO 1514
005037
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
014·~60
014512
014516
014522
014524
01.:)526
r.lov
165036
3179
3180
3181
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
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,
R2
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
0.iG767
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$
BR
21 $
1645: 4
BIS
SIS
036707
164S02
164524
BIT
,64474
'64516
BIT
0014:'0
Qi670S
005002
ue57E7
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
0
;CHECK IF FIRST ADDRESS NEEDS TO BE SET.
;BR IF FIRST BANK.
;CHECK HI 64K.
;8R IF NOT FIRST BANK.
; RESET ADDRESS POINTER TO FIRST ADR.
BR
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
22$
BITPT+2,F;"DMAP+2
INlTEX
TMPFAD, R2
INITEX
MOV
CLR
TST
BEQ
MOV
('C1411
0,')7::7
RS
;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
R5
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.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
01..JG30
1$:
',003€0
0267 7
MOV
ClR
CLR
165140
014464
014622
O,~ ~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
20-FEB-78
16K VER
MACY 11 30A (1052)
07: 56
PAGE 69
MErWRY MANAGCMENT AND A:JDRESSING SUSROUTINES.
32$'
33$ :
BIT
TMPLAD
: SET VIRTUAL ADR TO BANK 3,
R2
; CHECK IF LAST AOR REACHED.
; BR IF MORE.
; 8R IF ALL DONE.
31$
R2
'2
T$TM.l\P
LADMAP
R5
TMPPT
R,S
BEO
ASLB
8MI
TSTMAP
BIT
BEQ
30$
BITPT,
LAorMP
BIT
MOV8
FLAG8K
#11,
SITPT,
LADMAP
BIT
30$
BEQ
MOil
LADMSK, R5
31 $
BR
#MASK<;K. R3
MDV
BI S
BITPT,
Tir.PPT
BITPT+2, TMPPT+2
BIS
MOV
.I'1MORE.
(SP)
RTS
PC
E.EFORE FINAL EXIf • CHECK FOR
MPRX
T5T
33$
BEQ
J5R
PC,
CKPMER
RTS
PC
; 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!~,'O,. c" IF f\1QRE BANKS.
DOES STRA1GHT EX[ T WHE'· ALL ME¥.DRY HAS BEEN DONE.
164356
163:-'?2
015·150
015456
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
# ....
01567';
0157C2
015704
C 15712
015714
015720
C··6767
0(:1004
0::6767
001404
026702
001052
163644
1636G6
163636
163660
163644
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, .. ~ :
1 S:
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
~
... '" '" '" '"
BI T
BNE
BI T
BEO
CMP
BNE
"" "',. "',. ... +: .. ", .. "''''' ~ .. "' .. '" '" " ,. '" "',. '" ... " ... ~
B1 TPT,
1$
BIT~T+2,
2$
TMPFAD,
9$
-to "' .. "' ..
* . . '" "' ...... '" .... '" '" "' .. "' ... *'"
; CHECK FOR FI RST ADR FLAG.
; SR IF F IRSi ADR IN THIS 6ANK.
FADl'llAP+2 ; CHECK FOR FIRST AOR FLAG.
; 6R IF NO FLAG
R2
; CHECK IF FIRST ADDRESS REACHED.
; BR I F MORE.
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
B"
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
1$
BEQ
MOV
MOV
ASL
ASL
ASL
ASL
ASL
ROL
ASL
ROL
ADD
MOV
RTS
172344
163044
163036
RO
R1,-(5P)
@IfKIPAR2.
R1
R1
R'
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
3420
3421
3422
BANK NUMBER
H.'0373
000000
MOV
MOV
ASR
ROR
BCS
I NCB
BPL
HALT
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.
012602
012601
000207
MOV
MOV
RTS
(SP)+. R2
(SP)+, R1
PC
005000
010146
010246
016701
016702
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''''****''**''''''*** "'*******
;*
3415
3416
SU9ROUTINE TO PUT
;
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
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
01 G23:)
016232
01,3234
o t G236
016240
016242
J 16244
016246
016250
016252
016254
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
0\ C21 0
016212
01 C;;! 14
01521 G
01 b;?20
01 E222
016224
o t 6226
;
oj.
THROL:GH A MErI.OPY LOCATION.
I R2)
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
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
3426
3427
3428
3429
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,
1$
",,,"
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
o
000003
162104
r-iOV
RO,-{SP)
MOV
T5T
R1 ,-I SP)
r.r1r.1AJA
10$
@>r,KIPAR3
1i7600,
RO
kBlT15. R1
11200.
@IIKIPAR3
R1
RO
SEQ
007600
172346
lilOV
CLR
0'
1627:.07
006ce 1
0-,0167
100000
000200
MOV
172346
Sl'B
ROR
ROR
BCS
162766
BIT
; ;PUSH RO O"i STACK
;; PUSH Rl ON STACK
;SET PAR TO TOP OF MEM
;INIT BANK POINTER ••• LO 64K
; ••. HI64K.
; B~CK DDi'JN ONE BANK.
;MOVE POINTER ••• HI 64K.
; •• L064K.
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,
R1
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.
RO
SUB
A5R
BCS
SUB
A5R
020000
R1
RO
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
1
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
3660
3661
3682
3663
3664
3665
3666
3667
3688
3669
3670
3671
3572
3673
:J674
3675
3676
3677
3678
3679
3680
3681
3682
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
0(,0000
0[5767
001402
DC 5037
012701
012702
0< 4140
0053..:.2
DC 1375
005067
005767
001402
DC 5237
0002C7
RES LOR:
161302
1$:
0057E7
001024
012700
010001
0·,2727
011020
0(.'0776
022626
012737
0100-':6
0127C2
0140L'"
0053C2
001375
012667
000207
2$:
162164
161246
'77572
4$'
162144
040000
017376
000004
025114
('00004
002734
162072
3738
3739
;~
;*
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:
0(,4767
002152
OC0024
000417
OC5713
OC 1 415
005733
1 GQ374
024567
0:;:6572
0(14767
0047e7
oc 0025
0047E7
0007E1
MOV
'1<* .. "' •••
",>II."
>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.
000610
00.2120
000216
01< 01< . . .
Ii< '" "' ..
oj. . . . .
*"' .... ** .. "'* ."'''' ......... ** . . .
* .. * •• ,.", "' .... "'. * "' ... "''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
SEQ 0159
TRAP SERVICE AND SUBROUTINES.
(SP),
RS,
UNEXPT
J~''''
0103413
162156
to .... '" . " ' .
~: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
.\·JDRD
0167C3
OC5733
1 C:0415
0"5713
001374
>1< ..
ANO 1.
RO
MMAVA
2$
@IISRO
1140000,
1t1 500 ••
-( R1).
R2
3$
LMAD
MMAVA
4$
@1I5RO
PC
PARITY MEMORY
; ; *"' ..... "'** ... ,.~ "' ..
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
"'* .. "'''' '" * ***'1''' .... * '" ","',. "' ..... "',. ** "' .. * ...
LMAO,
1$
;* 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<"
o
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
PC
; 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.
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
'" "''''''' ..... >It .. ,. . . . ,. '"
1 62224
177572
040000
002734
PAGE 76
S SUBROUTINE MOVES THE LClADER AR~A BACK TO THE "TOP" OF MEMORY FROM
\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.
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
SJJR
DrSPLAY
(SP)
rl-: I
"
"
" ;~'
3656
3657
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 Pfi<"'.
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
TYPMAP: T' .
BNE
T5T
BNE
JSR
.WORD
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
( RO)
1$
2(RO)
1$
R5,
NOMEM
"'''''''* ••••
• '" '" "'.* "' .... '" '" "' ....... * •••• "'* * .** *. **
BR
6$
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
:
000001
177777
2$:
000002
B~;E
000001
003002
3$:
000001
002760
4$:
010346
010446
006303
006104
SEQ 0163
; BR TO COMMON SECTION.
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
1
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~
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
SPRINT
16K VER
MAr;Y11 30A(1052)
SCOPE HANDLER ROUTINE
(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
BIC
BIC
BI T
BIT
BEQ
13$ :
160016
4152
4153
4177
4178
12$ :
BNE
4150
-1151
4175
BIC
BIT
160064
4125
4126
4162
4163
4164
4165
4166
4167
4168
BIC
BIC
BIT
BEQ
160150
:::ZQMCFQ
0-124K r..'EMORY EXERCISER,
:ZQMCF. Pl1
14-FEB-78 OB: 19
4149
.;;
BNE
160164
160160
160156
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(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
16K VER
~RROR
IMCY1130A(1052)
20-FEB-78
1'.lES$AGE rYPEOUT ROUTINE
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
.SBTTL
:
4307
.:1308
11309
4312
4316
4317
£:318
4319
43:2D
.1321
4322
4323
432~
.:13:25
4326
4327
4328
.....
>I' ,,'" '" . . . .
"''''* ..... ;. . . ..-."'''' "'''' '" "' .. * '" "' ......
.jo . . . . . . . . . "''''
* '" "'. "'''' *. "'* "'* .. * ... 11<. "'*
LS8
: ;,. ",. . . "'" . . *"',. .... "'~, .. " ** "'. "' ........ ~ . . * ..... "'". .. ", .. "' ..... '" ",,,",*.i- * * ... ***. ** ... **"''''** *.
..l311
4313
4314
4~ ~
; RETURN
:TA8 CHARACTER.
;"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~?
: ; 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
BR
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·
~
o~
SRDCHR:
6':6
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)
,2(SP)
~(SP)
@$TKS
BIC
CI,'::O
1$
,4(SP)
4(SP) ,#23
aNE
TSTB
@$TKS
3$
:; 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 \
1NP'JT ROUl
,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
4424
~425
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
i
C'3~':
177,77
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
8R
2S
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
CG~HROL-Q?
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
; ;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$
eR
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
2$
4418
4419
4420
4421
·1426
4427
2C-FE9-7!3
ePl
4417
4422
4423
30A(1052)
:t~E
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
9$
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
a
C23324
O::C075
000
023327
023334
040
047040
036<140
000040
053523
A:~
;
;
;
;
;
;
o
8.
rUj<15><12>
rG/<15><12>
<1S><12>/5\'iR
j
; qETL!R~
;STSRAGE FOR ASCII
CHAR.
TO TYPE
;TER:,1I~lATQr.
; RESERVE 8 BYTES FOR TTY
;CD:HROL "LI"
;CDNTROL "G"
INhJT
/
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~
; ..
C' 113-'6
o 6,';'(6
o
T~[
$FlDOCT: MOV
000004
; ; PROV: Di: SP;>.CE FeR THE
r,;:::v
000:)02
0.:.:6
01-,6
iJ1CV
r\4CIJ
rllC' V
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;'
BLT
ASl
ROl
ASl
ROl
4$
7, (SP)
j ; *~
; ; "'4
; ;·8
I;~C7.(5P)
; ; S TR r p THE ASCI I JUNK
; ; ADD IN THIS DIGIT
; ; LOOP
;;CLEAN TUl ., 01- ....... "'". "' .. -I' ". "' .. '" '" • >!< "' '" • -" ... oj'
:~
; ...
;.
4557
4558
4559
023512
4550
45Gl
4562
023516
-':563
a~
2567
066767
OQOO16
, 5505 6
C23530
0 1 37-"6
C(.'4767
4565
OZ3S34
oeODeD
4566
.. 567
023536
OG0205
0235~4
177776
000004
1$:
;,;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.
:
4573
4574
.:::575
4576
4577
':;578
;
02~~::40
T5TS
$TPFlG
BPl
1$
J2~:554
4595
;;;:'::"1(:,00
G2J:'J70
C~JGC'4
coooeo
02::-( 12
(,23f,20
022G22
lJ2767
OJ 1 0,;)3
BR
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
~'o
90$
25 :
r.~:..."
606:
8
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
JSR
177630
(R01+,-(SPI
4$
( SP)+
(SP)+.RO
8EQ
000130
0
#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
6.
C!I~p
e
(;;r-.;E
PC. $TYPEC
SFIlLC, (5P)+
2$
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
~S
F!RST ADDRESS OF AN
DECS
BR
IF Yi=.$
: ; ERANCH
I F NOT
;; POP
EG'UIV
;GO PR~:H OJT THE FO~L:JWING MESSAGE.
; ;CLE:'R CHAr-ACTER COUNT
;~'r.r r. . EXT CH:'R,'-'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
;
25
C ': 0754
C1{,"·'i(;7
1267:::G
D:; 13~7
55 :
65:
; ;MESADR
;
3$
0:::3':,25
~G',6
a
C-; 14[5
o~ 0067
CC.47"; ,
C23(·; 1 0
-1507
·i
$TYPE;
HAL T
i..~JJS7o
.::617
·i61
155413
1 C OOC2
OvOOOO
0:·0430
0' 00':;5
C 1 7600
1 ';.27f.7
0.'] 1 0 11
1 ;j27e7
105767
PAGE 93
TYPE
MESADR
0~3S~6
4592
·'593
4594
·~61 2
.1513
461 ·1
·'1615
..
G7:56
SoQ 0175
023544
4591
.:16":'9
'~61 0
·::511
.
;
;,!,
~588
'~608
20-FEP-78
$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.
;~NOTE3;
-4593
'1603
.1604
4605
'1606
1:
30A(1C52)
; ·CALL:
:"'1) USING A lRAP INSTR::TlON
;11:
TYPE
,Mf;SADR
4581
4S32
4GOO
~160 1
.:1602
~NOTE
p~OTE2:
;
.:1579
4580
4586
4597
4599
4599
TYP,:" ROUTINE
; ;"'''''''''''I!<~.*.''''''~''''''''**.*'''"''''"'' :"''">i<.' "'."''''.**",'''*''' ... '''.'''''' . . '''''' ..... ** •• '''''' •••
4571
4572
':;589
4590
* . . '" . . '" " ~ '" '... '" ...... '" "' ..... '" '" .... "' ..... '" •• "' .......
(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~.
.5Bn L
4568
4509
4570
4584
4585
4586
'iSB7
......
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
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
062766
005767
001375
010067
1 C57~0
C01376
000002
155064
,6E700
0062eD
155062
010067
0' 2767
155056
000004
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
1 $:
155;)32
000016
000004
IIAPTSPOOL.$I!NVM
3$
@4{SP),RO
11'2, 4( SP)
SMSGTYPE
026701
0:; 1402
010021
O~ 5211
155244
1C5767
000150
MA-~Y11
MOV
TST
Br.~
I
02.::;316
105067
4706
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
0:
4714
4715
4716
4717
4718
4719
4720
4721
C2·'134ti
024352
C·;::'':;356
0.24360
02,13134
02·;J72
; ; SUS START OF MESSAGE
: :GtT MESSAGE UJGTH !N WORDS
; ; PUT LENGTH IN MAl L80X
;; TELL APT TO TAVE MSG.
@4(SP),
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
02~4GO
012600
OS020i
4723
02-:404
0' OM6
4721'1
02·'1,-106
4725
4726
O;"'~412
224':;~~
012701
0(.5721
1(0402
0;1 :J20
005021
0:;0774
0.: ·126
0)';27
0:1 ·130
BEQ
MOV
INC
0: 1375
02"';·;02
c.-:?";.:10.:l
,n32
473:3
4734
-n.3S
154710
000004
000002
15'1666
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
$ATY6:
,n:n
.12·:
9$ :
012600
OC 0207
4711
~.122
C~
154736
4705
c·~
8$ :
0:; 1416
iJ24:170
IN MAILBOX
RO
RO
RO, Sf,1SGLGT
/1-1, S;/lSGTYPE
5$
6$
$APTR,Rl
10$
RO, (Rl )+
024276
02·Ls04
024312
\l-1AIT
AD~R
$,"~SGAD,
8R
4700
; : puT
COMi~UNICATIONS
6$:
4701
4702
4703
11704
8R
2$
000772
OeS757
001413
OC5767
CC 1375
017667
CS2766
0:5267
; ; I F NOT:
; ;GET MESSAGE ADDR.
; ;8UMP RETURN ADDR.
; ; SEE I F DOt~E '-'J/ LAST XMISSION?
;;IFNOT:
JSR
• WORD
001344
DeS711
; ; SHJULD SPCOL rIiESSAGES?
;; FIND END OF MESSAGE
Mav
16X VER
AFT
Or·1 STACK
: ; SHOULD TyPE A MESSAGE?
;;IF NOT:
6R
; iOPERATI~G UNDER APT?
; ; IF NOT:
8R
,5
02~236
82
FATAL ERROR
STACK
RO, 5~'I!SGAD
(RO )+
ADD
000004
m~
8~'E
02424C
-1731
; ;TO ONLY REPORT
MOV
TSTa
BNE
SUB
ASR
MDV
MDV
SEQ
MQV
ADD
02Ll242
012701
#APTENV, SENV
35
BlTS
000004
000002
4690
4691
4740
;; PUSH Rl
S5
9$
4727
"'* *"' '"'" "' ........ "'''''''''' . . "''''''' ....
R1 ,-( SP)
$MFLG
BEQ
TST
O:?427~
>\- "'". ....
;; PUSH RO
eMP
02·1~;63
; ; COUNT THE CHAR ACT ER
; ; CHARACTER COUNT STORAGE
RO,-{SP)
001406
005i21
02·125~
j
;;TO REPORT FATAL ERROR
; ;TO TYPE A MESSAGE
100404
0;:00:: :
02'12,';0
02.1)52
; ; =-XI
;; IS CHARACTER A LINE FEED?
; ; 9RANCH I F YES
h1,$FFLG
1I'1,SiMLG
SAT'r":
fll,$FFLG
Bi...lE
TST8
02'::'234
'1738
Move
000221
4689
4739
MOVB
8R
r.mv
3$ :
4S:
5$:
4687
4688
4728
Mava
BR
02.'j222
02':225
02£1230
02.:1232
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'...G:
SFFL.G:
.8VTE
.BYTE
D
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
o
;; 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
4761
o ~ 0546
02.:1~':;4
012746
0:;'.·"l·~
016605
100004
54
:>2.::.;-31:-
4763
02';460
0::';·!6':'
C ::-1-"72
O:::·l.~
4766
4767
7G
O:?-"50'J
4768
4769
r,10V
MOV
MOV
010346
02""~'::2
762
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
4[105
4806
4807
~,308
4809
4810
<'l811
OJ--1G42
02·1644
024650
024,352
024654
000004
; ;,\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
BR
5$
TST8
BPI
95
~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.
.SBfTl
, BlKW
4
BINARY TO OCTAL
(ASCII)
AND TYPE
"'* "'*
*"' .. ,. .. "' .. "' . . * *
; ;,. '" * "''' "* >i< * ... -I'~" **** ",,~,. .......... ** ... ~.j. "''''
*" * "'* ** *'" ** * '"
.olIO
;>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
10.
SC3~K:
4818
·~839
18uTI~E
; : 11SD?
RTI
$OTBl;
4619
4820
4840
4841
(SP)
75
(S' )
BlO
"HI
MOV
~816
4838
5S
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
4B37
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
~8'
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
a
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
.1804
IS
r,o. -(
MOV
MOV
c., 0146
4750
4797
4798
pes:
010046
0: 0 145
'-;758
.. 759
,na4
PAGE 96
..
~748
4778
4779
4780
4781
4782
4783
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
4765
20-FEB-78
ROunNE
CO'NEr;.r BINARY
;*T!-o!IS f'OUTlNE
47<,9
4750
.; 75 1
4754
30,\(10'52)
CCl',~·.'UN!c.q:m~s
.SSlTl
~746
-~
MA~Y11
16K VEe;
14-"E8-76 08:19
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,
SQf.!DDE+l,R4
R4
/16. R4
ACD
r,1CV8
R-1. $C;MODE
MOVS
MOV
ClR
$OFILl,R4
12(SP),R5
R3
NI,.Ir~·,EER
NLJ:-.~8ER
;;CALL
Move
NEG
; ;
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
R5
BR
3$
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
ac
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
~3,8$
0007~'3
8R
MOV
MOV
25
MOV
M:':J
MOV
(SP)+,R3
7$:
000032
012605
012604
0!2603
0' 6666
000002
000004
012616
000002
000
000
000
000
85 :
soeNT:
$OMGOE:
;ERROR
ERRTRP:
ooooeo
OC5067
000002
soeNT
{SP)+,R5
(SP)+,R4
2(SP) ,4(SP)
(SP)+, (SP)
; ; RETURN
• BYTE
• BYTE
• BYTE
.BYTE
• "'ORO
a
TRAP SERVICE ROUTINE
TST
(PC)+
.WORD
0
BNE
2$
INC
1$
MOV
(SP),
STMP3
JSR
PC,
tERROR
.WORD
31
BR
3$
HAL T
$OF!LL:
005727
025150
SPRINT
R5,
8$
RTI
oeoooo
025144
1$:
177770
154034
17~:.i02
2$ :
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
R3
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
1$
@;;SRO
OC 1424
8EO
15
1.10 'v
R2,
025110
OG6,01
006101
R[ _
Rl
ROl
Rl
Rl
Rl
Rl
#177761, Rl
IJKIPARO, Rl
0C5101
ROL
ROL
17776t
2701
172340
~1921
02~~222
O~ 5' 01
C:6101
0":2701
4922
0,2:':::26
0(:
<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
R3
i'I'~OV
#6, RO
BR
3$
ASL
R2
RDL
R3
Rl
2$
ADD
11.0 v 8
JSR
176144
0:::70C5
000207
OCO
85 :
Rt
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),
;CLR ALL EXCEPT SITS 1.2,3
;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
R1
RO
116,
Rl
":$
R2
R3
; DIGI T caUNT
; PRINT FIRST DIGIT
#3, Rl
#60,
R3,
R5,
;DIGIT SHIP COU!'JT
;r,~;\KE IT Ar~ ASCII DIGIT
;LOAD D!GIT INTO I,\ESSAGE
R3
8::'
8$
rwv
(SP)+,R2
MOV
lo'lQV
i.1QV
JSR
(SP)+, Rl
(SP)+,
(SP)
R5,
SPRI NT
• WORD
RTS
. BYTE
a
.5BTH
;VA::I10JS
R3
RD
2$
(SP}+,R3
;; PuP STACK INTO R3
; ; POD ST !\CK INTO ~2
; : POP SH,CK INTD III
(SP)+, RO
;
025015
0240':;0
;; 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""
C2S3S4
0:J:'3G::;:>
;GO PR!~JT OUT THE FOLLOWING MESSAGE.
; AC'DR::SS OF MESSAGE TO BE TVPED
; CLEAR WDEX
; DEC DIGl T COUNT
~,PRINT
.I..:ORO
CLR
DEC
8NE
r.1QV
.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
1$
CLR
Rll
025152
ClQMCF.Pl1
4917
4918
4919
4920
; ;STORA3E FeR ASCII DIGIT
; ;TERMINATm· FOR TYPE ROuTINE
; BEFORE
3$ :
177746
4901
4902
<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
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
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
025:17G
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
5
040
• ASCIZ
<15>(1~>'FROM
TO:
O:i2~23
042S~1
IN~~FF
.~'L·Z
0-11 ;>11
0 20117
O~1511
o1!;
0i1 56 :25
O·~252A
02[,63.:j
O~2517
Of!564~
015
499,
Q2~·C<0 11:
OOO~40
046111
CCOC12
CO sq 15
051012
05 7"12
043 10 1
Q20101
P2012:=!
05112$
0 47 5 16
050140
051101
0511
052111
020131
047~22
.J
052517
OS 152~
O'l21 1f.3
cs
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
020Q60
113
04'7524
o~o 12'
Q3404Q
026025
015
0440q
C52111
02p9:;2
041440
047117
0445~A
02b·>~G
02012~
04751.6
(;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
0201 ~2
OJ,S15?
O:?'~156
q:'l
0=2516
coo
p~ 1511
C.52101
c~
1440
7
u~,611
01 :;
0;01 ;
O~ ~ 5 1
C;: ;.-0
0:,015,
OC OQ.40
O~01 o~
04:!~0~
<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;>_
F"'OM~S:
.4.SCp
~15><12><12><12>'INPUT
.ASCIZ
<15)'<1~;"'FIRST
C54524
i
0:
C45
o·
051117
C;51505
G2ll':41
0465' 'i
04E
5
l61
5,05
0.:. 1120
02052';
04'440
0521 DS
;~5
Y:'f.'nD
C':i1
{:;:'75..:4
5046
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
047516
051117
04G4~O
5051
0"'75C6
04'71 ;25
027104
015
CO;;01 "
044,i 1 2
C4(:.l40
0511 q1
051 t o~
04H';O
eGG
O';".l45
::,<
052 t 25
950040
C321 ~5
047111
OH6101
CS.2,
l~-;
1~
I
TO COMPLET~LY TEST RUN OZMML ••• '
J
O~01 ,31
043912
O~1111
Of 1 ~23
(42104
02:;;': 72
C4C514
0.;.\2104
C42=;;22
020072
020
027412
[:ill scS
0524·-;0
C'::2101
Oj~
1 3
tz
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:
0
DC 0
~,')G8
~·r:~~~21
015
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
PARITY
~3
0';0";.::::0
C_ ,'·~::;C
,
027::; ;;6
015
';';04";0
C'::'15:':3
,
C42Cc;.O
0':.;2S;;;2
SC09
SOlO
::0076
15
CS~1;3
~,~5015
.:--.;:'2..\ C..:j
:,C7S
O~61
,.:.,:·cC~O
SOG3
':<'64
l:,C67
g~;~~~
ceo
O:!oq3
O~ 21 C3
J
23
023226
02':2;34
026242
SO~7
CO~~TROL;;
.ASCII'
c~o
e4.15~2
:;;044
S05a
30;;;;Q
SOGO
SO:31
SOf,2
PAGE 10~
'
~t::
23
P47515
~043
026.";2.1
50 I 5
0521
c~
oe212~
oeo
BK'
")445~2
O~1 :
0::0116
':':6114
0";6501
Tp
000040
030461
O;2e:,3t6
<15><12" 'P.~GlSTER AT
<15>';12>-'CORE PARUY
O;;1~15
~,054
.ASCF
.ASCIZ
O~(i';40
5055
5056
5CANI<12>
SEQ 0163
,ABelZ
041440
i~~~~~
MX1:
Q7;S6
MX3:
OC0040
o~
FOUND ON ,.,EMCRV·
<1S>(12)'H!T ~ONT!NUE FOR NOR~AL R!,JN~ING J <15><12>
M:.:,2:
0':5(:1$
C:' 1515
• ASCJ~
ilbo
"1
C20131
sos,
<15><12>' PRO;:;RAM NO~ RESIDES 6~C~ AT 0
~CI!
O~1124
,>5455
c::: l<~ C 2
,.
0511
02D~Q4
5052
PRORE L:
.ijROR~
0~01 ;1'3
041412
0,'Q5.0
(',2:3212
5045
<12>'N'O PARI TY
047117
0;::':,\ ~ [56
:);26176
.ASCI2
OOP040
02(; 174
(1::G1
NOPES:
16K Vf:~
MACY11 30A(105~)
20-FE~-7E\
STANPARD ~R(juR~M. fy1E.SSA~~5
(;::G.):;..:j
SQ3.:l
<15)< 12>' RE~ TART ~ NG AFTER A POWER "AI I.URE' <15>S:l 2>
C4~S l5
Q51440
5024
S035
5035
5037
5C38
5039
5040
S041
5Q4:2
.ASCI~
C4Q506
e06505
5022
5023
~O33
PWR"$(> :
PARIT'( ReGIST,RS FOUND'
04;!524
047530
C4:,10
0;::'6110
0;26113
(;213123
C<.:?G 1 ~o
02\313':5
<15><12'~'NO
043::140
COO
C5150~
0471 t 1
04'l;'QQ
0465n
5~30
.ASCIZ
I
054S~4
02S~40
5031
5032
16K NOT ML THERE I
MTR:
r~EMORY1·.FI':l)l'
:
5021
5029
TO
<1 S)< 12~' INSUFF fC 1 E;NT
021,.0.,),05
C.zOMCrO
C~1+4K !.~EMORY EXERC1SER,
CZQrtI:F _ ;:\11
1 ~-r EB-79 oe: 19
5027
&028
,
· ASCI.
:
027':'5'6
G25730
G:2::'736
02S7Q4
0~60'4
I
000
~99S
5011
,01 B
5019
5020
047~;>~
043500
001522
04~1 16
0:·4124
~99il
5"14
5015
<1S><12>'PARJTY \IEIIORY MAP: '
Q4701 ;2
0445:n
020124
4997
5011
5012
5013
,ASCI,
g~~7;
0.0:"·0520
OL1040
025722
"'TM~P:
020124
...~2S'3 Cl5
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:
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
~979
5002
PAGE 100
SEQ 0182
0";3501
.::~5470
4989
07: ,6
024524
0254G2
4087
lQS2)
:20-FEe ... 78
MESSljqES
C.:.\6111
4977
·HlBS
~OA(
PROG~AM
025·10'1
0;:5..; t 2
054522
4978
49~6
~TANOA~O
0;25370
C25376
023~2Q
~969
49,0
4971
4972
,1973
4974
4975
4976
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;'
1
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,7553G
02C,::42
0.20104'
0545~
:2
J: 211
1
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.
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
0~~2515
0271 ('4
015
050120
042524
000
377
027005
0~21
16
041523
043516
051117
020122
040520
000:'56
040520
044522
C511 ")2
020124
027122
020117
054522
051505
00'
051412
0471 - :
042524
044513
020107
021440
000377
5115
5116
5117
5118
5119
5120
5121
5122'
5123
5124
5125
5126
5127
5128
5129
5130
5131
5132
;
02"i04~
027052
027060
027056
027074
027100
027106
027114
027122
O·:05~G
044522
c:; 1 0':'0
Q.~ 0524
051117
043505
020122
042440
000056
0.12101
031104
O·:2S~'4
CS452.:l
051511
5134
5135
5136
5137
5138
5139
5140
5141
5142
5143
5144
5145
5146
5147
5148
5149
5150
5151
5152
5153
5154
027130
027136
0271~4
on152
02716C
02716G
02717t:,
027202
027210
027216
027224
on.?32
02,-240
0~01~3
042524
0·124.10
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
5156
02,-J36
5157
027344
0::>'/345
5159
5160
5H')1
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
0:2 0071
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
02
(,27570
027612
• ASCIZ
'MOS REFRESH TEST ERROR (TST 30-31).'
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
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
1 4i; 0
O'"l7117
O·~
DM6:
"MARCHING 1 l S AI.J 0'5 ERRDR(TST 27)."
052(50
O:IOC~O
'ROTATING BIT ERROR(TST1'-12).'
• ASC:Z
027')51
C20131
042sr. ')
• ASCIZ
DMl 0:
033461
027051
127
DM5 :
044103
023·161
02010-.1
051105
051524
047101
051117
032050
SEQ 0185
'3 XOR 9 PATTERN ERROR(TST13-16).'
0.:; 2522
Q27~lS~
PAGE 103
• ASCIZ
052123
OCO
0:27·;G2
827V:'5
027472
027500
07:56
OM7 :
0:' 1122
O·-,20,W
'CONSTANT DATA ERROR(TST6-10).'
020122
052124
051105
051524
033':61
020116
02'::122
026.",33
000
051101
020107
040440
051523
0:;"0124
.A~CIZ
047530
0405:'1
C~4522
0.:0520
DM4:
C24::~0
027C51
02-i~:';':'
'ADDRESS TEST ERROR(TSTl-5).'
000:56
052111
04',..J; 5
042104
042440
..:.:27 ... ·16
.ASCrz
030-:63
051101
021432
DM2:
020124
033462
053440
OS 1 127
'PARITY REGISTER DATA ERROR.'
02-1461
C20124
000
120
020131
027-;2'1
.ASCIZ
16K VER
MACY11 30A(1052)
20-FEB-78
ERROR REPORTING MESSAGES AND TABLES.
000856
OS 1105
00:.7522
C'::0524
027051
DM1:
C52101
047522
033124
024460
02715<;
"'**"'*"' . . *"''''''''''"' "'*
026,~61
0:; 0455
0-17522
O~ 3515
0'::2440
027:24S
5155
5158
"'* .... * ****.' ... " ....... "" ~ * '",,, .. '" '" "''' "'* .. " >r" *"'* *** ..
; ; * * ~ * *** '" ** *'"'*'" ** "'*'" '" *.' "'* * "' .. "''''* "',.,. .. "-** * .. '" *"'* *"''''* ** ** ...... * •• "' •• "'.
040504
C51122
CZOMCFO
0-12t;K tl'EMORY EXERCISER,
CZQfv:CF,P1'
14-FEB-78 08:19
5133
;,.. "' . . . . . . "' .. '" >j<
; .. MESS,'>'GE BLOCK FOR ERROR TABLE TYPEOUTS
027010
C27016
027024
027032
OJ7(.4)
t
046111
047012
047515
052123
'
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
I
OM;?3:
• ASCIZ
'PROGRAM CODE CHANGED WHEN RELOCAT~D.
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
I
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
MA
5/B
I,,: )4503
OH12 :
.ASCIZ
IV/Pr;:.
PiPe
MA
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
MA
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
~
REG
ioJAS
I
DH30;
• AS. Il
I
MA
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
REG
IPC
WAS
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
*"'''' .. "'''' "'* .. "'*"'*
OF,:
.BYTE
377
000
000
000
000
000
377
000
377
DF2 :
• BYTE
O,-1,-1,O,d
371
377
OF3 :
• aYTE
0,-1,-1,-2,-2
0,-1,-1,-1,0,0
376
000
377
030760
030763
000
030766
371
030771
376
377
376
377
OC)
377
000
CJO
377
000
DF14 :
• BYTE
000
DF21 :
• BYTE
0,-1,0,-1,0,0
000
377
OF30:
• BYTE
-1,0,-1,-2
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-:
MJ;::r~!2
CO':::OC8
000D00
384
384
384
384
384
384
384
384
384
384
384
384
384
384
384
384
--
440
1
4'~2
44:"1.
444
431
432
/,f,~,':'.DR3~
OOOGOO
C0CCCO
OCGCl'JC
384
384
384
419
422
4:6
oeoo(;o
384
384
Auf'l/:,'
AE
M.NV
AFATAL"
/I:',~t'\
QR<1 "
te t,,' :,rlIS 1
~
r".1,~""S2 ~
'79#
N;CCOO
384
384
A1,~:,M:'~3·'
008COO
f..i;1;,WJ4"
A·S':;Il.D
c: 0000
.<~,~:y;,J2~
Ar,~;-
Y'-:3
~
384
384
384
384
<:0:):'01
~'(\OJOO
AENVM
384
384
CC'C.:OOO
384
384
384
384
3750
4659
4737/1
41·-1
3-;;2
393
386
384
4(7
384
4' 5
00.:'80J
384
418
384
42'
389
::'~j4
2519
4,7
420
COCQGJ
,'\'I T y;J.~
SEQ 0189
439
4·~
384
384
::;84
>,~D\>i9
AJEVCT"
O(hjCG0
02000('
000JOO
OeOOOD
O'J,)JGO
leaDOD
'08
'"a
OJOOOO
GOOOoe
ADD',\'9
PAGE
428
oe0000
A~--O\\'6
07: 56
S'yI'llBOLS
399
429
M1t..D~2;
A~:)'.\'S
1\0:)1':7
20-FEE\-78
USER
425
427
,'\',1/, ['R 1 ~
COOOoo
JUClCOO
; THE LOADERS ARE SAVE HERE TO END OF 8K
, 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
A)(Y~~4
to
• END
Q-124K II~EMORY EXERCISER,
14-FEB-78 08: 19
;',CPUDP",
ADDV!3
.... " . " ..
• EVE. l
321
032110
CZQMCF0
f,C;)W12=
",:';0,-113"
*. "'' '" . . . . . . . "'' . .
0,-1,0 .. 0
000
030737
030740
030743
03C745
030750
030752
030755
*
; : * "' ...... ,. * * ** "" ..... ** ", .. ", .. " "'* ... * *"'* *"' "'"'''' '" "''''* . . ' ' II< .... '" "'''' "'''' . . . . . . . . . . . "
030734
5321
5322
5323
0
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~
/;\'[CT2"
6:.D;.Jfi
DODO::!)
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
Sl
81
I3l
81
TOO
Tal
TO-11
T03
T04
61105
Bl T06
8J T07
BI Toa
B1 i09
13 IT 1
SI TtO
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
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
0-12-",; ': Er.mRY EXERCISfZR,
14'"F E6-78 08: 19
0000
2409
241,
2·:67
3173
3238
3317
319~
:3195;
3259.
3:;1qC,
::324
11211
111#
116
117
115
115
114
106#
105#
104"
40~'
J174
99'
9S'
248~
,...
3201
1211/'
120#
119#
3~60
3151
3n2
37591'
'le;
QF3
a3C:~5
729
631
717
762
772
777
12C8
:3804
507311
4p37
46<:'1
91';6
46(;8
1283N
361
D',il0
DMt 3
D:.1i4
[':,1',6
D:,117
:):112
Drl
DT I 2
DT 14
D115
0'1'2
DT ~ I
0'
776
027"65
02 ,55~
771
51!~311
O~
76'
786
519411'
!;i 2-":! 2#
726
001 '736
[101 7 ~4
00:;:; III
:;('.2131
[J,~TVEC~
ENDlt\S
721
792
797
823
833
73'
736
741
:"('22',l2
CC':'C30
~,2 -4
,4
ERRVEC-, 000004
ERRTRP
F ADMAP
O~11570
FADMES
026311
741
..
526211
PAGE 110
SEQ 0191
0296U
746
B7;?"
88h
3594*
3~47'"
4054 ...
4172·
739
743
746
753
511911
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
4411
5791;1
300
7 ~ !3
763
773
5811,1
S7Sil'
778
723
::.;,,;411
7'39
573ft
577~
863
765
783
728
733
758
789
794
8i:S
JO 1
D r ~5
DT2G
;;
834*
87:'
80~
DPDBL
D3\vR
142
529~"
5288#
36tH
195#
027240
013776
013::54
013'162
177570
001':;46
001674
J::11705
0;)1120
C'C)lGGO
737
732
27()tIr
808
8' 3
6' 8
['ONE
5311/!
2613#
03l)177
030Z!53
030273
030213
030347
0:':::7100
027136
DM7
19Q
;1:71 I I;
2GG2N
030132
N'D6H
769.
MA,;::Vl I 30A(1052)
20-FEB-78 07:!;6
CROSS REF~RI:.,>lCE TAB"
U~ER sYII",aOL$
7' 6
751
756
761
7GG
0::717~
764
1 13K vEP,
!?~al
D.\124
nl\'~26
9'6
754
526,.
5269'
7a2
5271#
727
527711
82f1
53:)OIt
O:~23
D:',127
D",131
749
53t i'#
7Et I
8,9
D:~121
D"~25
806
744
$11
73~
784
836
8'4
7554
02773:)
;.):!7044
0;3C'031
03'')CG3
D",120
4~41
525911
796
829
>"
064
779
, J4
5315,
759
722
80'
809
1483
53-: 7/1
CZOMCFO
0-124K ~.'~MORY UERCl.ER,
C2QMCF,Pll
, 4-' Ea-1e oal19
DMI1
or"1 2
940·
3331
BOO
or.l1
3254
937*
030760
01SPLA
DJ SPRE
193
3527
1485*
2417
724
DIDBL
DIDO
DJ POD
-'3274
55111
030740
030521
03C642
030673
Oq07 I S
012772
012700
012610
013)70
001142
000174
027010
0273o,
027;345
027411
78B
4,01
;'52#
1 '755
1133
1458
3~'
O]O75~
03':'561
75~
3148
4973#
10'13
DF14
()F2
DF2t
DH23
DH24
DH25
:>H2G
DH30
D1D2H
752
2501
1',6~
39#
1273
45#
719
174
030406
030530
5309.
4064.
2485
3236
4008
2'7
3231
030475
926
4059*
3310
3364
4p3U
lOU
1 ~Oil
lHII
547#
13- '/
0304?4
921
4181
3305
336:)*
4113
103#
1 0:211
11511
030765
531311
7~5
~3"
3172
3167
3.231 ...
3307
3362
40n
001 CDC
030367
03043.:3
2456
3n6-
2163
32.27"-
122#
or TS
DF30
DN'
OH12
DH14
DH1S
DH2
OH21
1491
1369
3214
316;2'"
1I~
10911'
10811'
10711
erig
DFl
1470
1213
1O~9
40 7 3
118~
026~5~
1380
34~2
25'
11711
OO:t015
0002PO
005072
177570
D30734
3303*
;33?5
;3340
~931
0000 4 0
co~~s T
eR
CRLF
CTRLS
DD!SP
32' 7
On3
3353
3~6B
~325
3' 56
123
122
12'
,2Q
QClO200
0004CO
!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
SEQ 0190
3350*
l2G~
;3149>10
3213
326(3
3401
000100
BIT7
3161 ...
31 ~8
3215
3272
3351·
3148'1'
3199
3264
n5
11011
~
OC0020
2469
319a
38':0
11311
040000
00000
000004
0000 1 0
3319
3400
3366
12;3#
376 7
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~
3681'"
1422'"
1·
14;2 1'"
5054*
111
~
66t
3685
4a~911
862,
36853215
873'"
4.013
n'7
927,
401.:i'"
928",
4016·
401
4340
3342
3364
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
4953
532#
1046
53511
1013
1098#
1097
1102
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
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
3539*
3136'"
3171
109311
11 Q4i1
11 S6i1'
111011'
905
36'
186#
9:'::6
1528
321 B
1511
19::29
2714
4056#
'015
4606
4647
939 ..
927
1564
3220
1554
3239
1602
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
166#
242
167#
26"'-
168/1
975
3349~
3276
KI PAR3= 172346
SEQ 0192
11,0
1095
,
PAGE 111
4136 ..
3368
5113#
194
G",
HT
16K VE!1
MP,:"Y1130A(1052)
20-FEB-7B
07:56
CROSS REFEf~E~CE TABLE - - USER SYMBOLS
16911'
'069
261·
3134.
995..-
3331
1072
3133,;35551072,;35360-
1073*
3554
*
2484
3615*
3135*
3809
3154.
3810>11
3176"*
3276*
3.277*
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
KI?OR2.,.
KIPDR3"
KIPDR4=
KIPDR5"
KIPOR6:.
1\1 POR7::
LAOMAP
001602
LAOf.,'LES
C2G376
LI\:J tllSK
001500
~DO
OQ,S22
CO(J012
0015:l0
(OC, S74
017536
01 'if,22
01',634
I SP
LF
LMAO
lS T AOR
.:-[.', F
MAMFl
r.1AftF2
r~1
l'vlAi'JUAL
C'C:;.366
Mr.. NU ... l
005424
006826
MAI~UL2
M·\PMEM
:.1A?R8
003324
004250
17011'
3137.;:
171 #
172#
3138>13139,.
3110*
237
3126*
3127-.0
173#
155#
15l :
157#
1 sal;"
1 S911
16011
161 II
162;1
3128*
3129"
3130"
3131 ..
3132*
54611
3250
14·19*
3252
1 ~01
5064#
5441/"
508#
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
:]251162
02~)S72
025505
C!:2 60 71
02611C
02[,123
I.n R
f\'~X 1
1\~.x2
I\';<~
1.1)(5
~,1X
G
J'..QI'.~::'M
J~cn~:
5T
Ot.~L_G
(J01::6C
PM;VEC
:.-' rlT RP
,'H'i40R
4141*
3677
1417
3691·
1467*
1468*
3752
373g
3745
37541;
127~
"1343
1 ~r;:}1'
1413"
1428
1471
16K VER
MACY1130A(1052)
20-FEB-i8
07:56
CROSS REFERENCE TABLE
USER SYjl~BOLS
966
3534
:'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
1471
1194
3570
3212
1197
3812
3323
230#
2481
1576
1029
1598
11 LlO
1672
1493
3241*
1636
1394
11
()~
1113
1176
1212
1283
1255
1259
1256
1260
1262
2446*
2453...
3590*
3643*
3746*
3747*
1555
1565
1592
16w3
3376#
562
632#
3326
1651
1712
1733
2084
2204
2963
2221
3003
S66
:3836
O·d:-CS4
177772
lSi2
43,
000240
137#
5EQ 0193
3842
1396
4098
4105
1435
1437
1 11.37
1199
1253
1257
4134
1440
4139
1442
3847
1179
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
1137
3662
1769
2269
508711'
2428"
24·12",
2453#
1067
3613
3016
636#
672#
6761!'
68011
11-4
4081
1465
3359
1150
6:;6#
63711
3736
53311
4074
312<:.#
1093
3759
1096
33.:':19
1218
1224
1230
1271
3923
4077
3861
3240
3814
113311'
1210
3719
1116
1234
1242
3238
411 ~
49rl.l
49f.; 3 II'
2959
E·92 II
64011
64411
648#
65211
65611
6GJII
66411
66811
3236
4109
PAGE 112
2036
2877
684#
EBBlf
3208
41 DB
1448
2827
01
:>[;';NC
4139>j1
2020
617#
565
563
OC::'25G
3321
1560
0(,2050
002276
MPR14
i.1r-'R15
MPR2
MPR3
f.lPR4
3309
1977
MPPATS
0)::>216
3259
2778
144ft
1114
0(.2226
002235
3270
1933
1524
«00250
C'04210
[I'1PR10
fM-'R11
3210
272S
G02074
0:)2076
MOR10021C5
3199
4107
3233*
161 £
f>',PEND
r.~pqo
3319
373611
52811
JI',:IWEC
rlWMllEM
r,~PRX
31 B6
3317
25~6
5'J9#
932
3167
3307
L;6.:17
3670*
114.311'
233
1489
4911
1540
929
3165
3287
3188
1138
962
1473-
31 £9
146:5#
952#
3532
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
3506
0002;40
OC03JC
65.
66'
P07
000340
177776
017744
177776
6711
40<
3725
4h'
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
4233
3551
2e8N
4258
3517011
3059
1328#
301:i2
348111
269
4237
3056
276
1289
262
50511
201
202
227
551
221311
5"
S!=:2
5R3
STACK
5T ART
ST ART A
START'
STKLMT=
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
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
OCO' 76
1 i39
4032
196#
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
TO
O~:'5 ~-;
1 f'l~'EC
J~O:)64
rr~APvE..: :'OC034
TRTVEC" 0000 14
TSTMAP
001530
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
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
34266
31.2&
3127
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
2672
235
2722
251·
MACVt130A{10S2)
Re.FE~ENCE
2771
928*
20-FEB-78
229
270
272
07:56
l8e7
PAGE 114
TABLE -- USER SVtJlBOLS
2820
2870
1028*
1491
SEQ 0195
390711'
3141 *
3664*
3673*
936
952
1023
4194
871.3646*
4201
B78*
3738
4313
895
3742
4358*
560
854
3057
3110
4913
844#
284
1472
316*
24'3
4039
871
645
14132#
36r,
3047
406B
895
~47h
1486
852
3591
3593'"
4173
4313
4181
4329
863*
865
3644
925
1025
1094
4022
1737
3761
020336
020324
02C342
SEQ 0194
1173*
41
3773
4199
326
020312
020~04
5032#
254
3610
PAGE 113
64<
P.5
psw
MA::Vll 30A(1052)
20-FEB-78 07:56
TABLE -- USER $'y,11BOLS
RSFE~E, .. CE.
1148'"
253
3601.
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
3353
315£
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
3127
111'"
~
•
3129
2432
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
2218
34491
4681
4695
4711
4714
432
4495
3497·
594
3699·
Sc.7
H13
4718
4724
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
902·
587
573
4176
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#
590
575
4213
16K VER
CKOSS
4623'"
4149
849
4630
41GB
850
~"11#
372#
44;::10#
4458
4489#
10C7
461~
4B01
309B
48CS#
9as
308-lN
592
591
MACV11
REFERi:.~CE
596
3495·
30A(1052)
lO-FEB-78
07:56
TABLE -- USER S'I'r.1BOLS
4639*
4200
859
4644N
4313#
373'
374#
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
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
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
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
594
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
CO 1330
00 1 206
02<:,DO
001156
00,,55
001120
445#
39711
460
47 ';2_
4650.
3G811
367#
4'333*
4616
4647
35111
573
39128*
3904*
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=
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
573
35311
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
2881
4842*
4837*
4009
399#
464i
i 541 II
1747#
263111
2963
48)[.#
4619
1497
1716
2594
1495#
2~,j1
II
4872·
4841
4C27
8iS·
*
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
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
4446
4870
4452
4942
32'
856
305
31111
4213
4432
304*
1505
2211
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,;'
37711
439611
4424#
1379
4417#
42_,
1400
3943
4324
4518
1406
312
4465
4469
4473
4383
4470
4489
4550
4$53
4647
1463
4509~
332#
1663
2657
1705
1719
1752
2706
2756
886
890
314-
1551
2551
1628
2608
855
856
858
17
19
1553
2401
3096
4361
1217
3093
4104
4382
SEQ 0199
4463
2399
1209
3086
4175
PAGE 118
4457
4952
313*
1588
1077
4478
4547
4549
4559>
4611
28C5
1175
2954
1798
2904
1820
2975
1922
300B
2025
3039
3077
4002
4165
4197
4208
4308
329
374
1777
1800
2906
4008
4001#
$SETUP", 000 130
18BN
859
4~S3
$STUP -=
$SVI.AD
$SVPC
SSWR
=
177777
188ft
021056
00C010
167400
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
1510
2215
3077
~160
25
2"
4049*
37411
43':'6
43:;0
579
4029
4173
4028
3041
*
431 ;
4315
581
342#
4427
4443
1092
10:50
4274
475311
4564
458511
461 :5
46;
fIG::::!
·::2-'
02.:;
22
10
0.2~
24
C.2t:, 154
4337
4640
1240
4839
3963
1411
9:,j'"
1510~
1049
3092
iJ2.l 32
13q
984*
,553#
1747
172111
52
c::~:
073 40
0:.1 54
40~5
435
4·~26
4039
4213
4047*
1716
1916
2582
2604
4647
4647
4647
0"" 7t:,
3994
4038
4201
3111
4037
4194
4044
4406
4398
594
974_
4636 ..
4585
4634
1754
2810
4024
;"4
596
2553:1
27i9
24
1721
2761
3995
4051
399B
594
950*
23
1707
2711
4037*
97,.
~
21
1665
2662
3993
3077*
43·~ 1
4,33Q
592
5S8
20
1630
·2613
3997
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
22
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
U
.3X9
001610
DO 1642
00'640
00' 634
001630
001626
001632
001636
001624
001622
001644
.. "'' ' ..
5'75
U
001330
007302
4840·
4183
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
2338
138#
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
2347
838
591
594
590
597
592
594
4236 ....
4237 ....
205'
457N
214'"
69711
216N
218#
219'
4647
853
4735,41
909
4909"
532"
2499
3705
3749
3764
3111
307
SUS
331
4145
339'
4146
390
4213
3819
3877
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
2354
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
1476
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
12
,."
138N
138N
13eN
'38#
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
579
4886;;
32'
2206
POP
260
577
4850
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
032110
• CONST
• EIGHT
• ERRTB
.MPPAT
.MPRX
.MPRO
• PBTRP
• P:'SRV
• RESRV
• ST ACK
PAGE 119
391#
467#
398'"
423#
001216
001340
001230
001254
001256
001514
020654
025111
........ "'*'"
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
458
471
1122
1N
1N
33#
3987#
,.,.
,.
4264
,.,-
3987#
4056
4006
138N
13eN
847
427'
13SN
1237
4284
1757
1376
4330
138N
621
631
138N
220
570
1206
1653
181 a
208S
897
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
449
45~
1022
1088
149,
1503
1717
1936
2273
2828
3334
3516
1938
2390
2852
3339
2879
3372
3607
36C9
1747
1091
1541
1750
~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
'"
H
r
1"
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!
"""
1#
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
· SCATe
.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
30
2306
2671
1676
:.. I
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"
1F
1!/
4570
~330
1 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
1#
3874
4334
LlSl1
2
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:;
· SETuP
• S~,'RHI
.S\'i;
Source Exif Data:
File Type : PDF
File Type Extension : pdf
MIME Type : application/pdf
PDF Version : 1.3
Linearized : No
XMP Toolkit : Adobe XMP Core 4.2.1-c043 52.372728, 2009/01/18-15:56:37
Format : application/pdf
Creator : Copier User
Title : PDF Printing 600 dpi
Create Date : 2005:01:06 17:10:24Z
Creator Tool : Oce-Technologies
Modify Date : 2013:11:25 21:37:26-08:00
Metadata Date : 2013:11:25 21:37:26-08:00
Oce Scan Application Selector String: Scanjob
Oce Scan Compression : 8
Oce Scan Hostcomputer : pr342
Oce Scan Identification Number String: 4575
Oce Scan Image Logic : 1
Oce Scan Image Orientation : 8
Oce Scan Job Description : PDF Printing 600 dpi
Oce Scan Model : 166010924l
Oce Scan Resolution : 600
Producer : Adobe Acrobat 9.55 Paper Capture Plug-in
Document ID : uuid:6e2a6a73-abd8-4879-bf3a-58b181b78f9f
Instance ID : uuid:5d4864f8-af24-427f-959a-9259cfcf4a10
Page Count : 144
Author : Copier User
EXIF Metadata provided by EXIF.tools