Digital PDFs

AH-S511A-MC

August 1981

314 pages

Original

150MB

view download

OCR Version

214MB

view download

Document:	CZMLCA0 ML11 ML11 PROM MAINT PROG AUG 1981 bw
Order Number:	AH-S511A-MC
Revision:	000
Pages:	314
Original Filename:	CZMLCA0__ML11__ML11_PROM_MAINT_PROG__AH-S511A-MC__AUG_1981_gray.pdf

OCR Text

ML11

PROM

MAINT PROG

_CZMLCAO

ATENIE
ve
carrimnrs
AH S511A- nc2 we
oev usa

FICHE 1 OF

ML11

PROM MAINT
CZMECAD

PROS

Ple
2h
orE
p e
om HEINGN

SEQ 0001

WOORE BSkELT =

STITLE

'CZMUCA MU=11 PROM MAINTENANCE PROGRAM'
IDENTIFICATION

ORODUCT CODE:

AC=S5509A=M(

PRODUCT NAME:

(ZMLCAQ ML=11 PROM MAINTENANCE PROGRAM

PRODUCT DATE:

APRIL 22, 1981

MAINTAINER:

DIAGNOSTIC ENGINEERING

AUTHOR:

D.W.NEALE

THE INFORMATION IN THIS DOCUMENT IS

SUBJECT

(HANGE WITHOUT

THE USE
SUPPLIED

OR
BY

RELIABILITY OF
DIGITAL OR ITS

NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT.
NO RESPONSIBILITY IS ASSUMED FOR
SOF TWARE ON EQUIPMENT THAT IS NOT
AFFJLIATED COMPANIES.

THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION:

DIGITAL
DEC

PDP

DECUS

UNIBUS

DECTAPE

MAS SBUS

5
.

PROGRAM ABSTRACT

SYSTEM REQUIREMENTS
RELATED DOCUMENTS AND STANDARDS

DIAGNOSTIC HIERARCHY PREREQUISITES
OPERATING INSTRUCTIONS

rONO N

ASSUMPTIONS

NO VNS WO

COMMANDS
SWITCHES

FLAGS

HARDWARE QUESTIONS
SOF TWARE QUESTIONS

CONTENTS

GENERAL INFORMATION

bt wh—=0

—d
ed

TABLE OF

EXTENDED P-TABLE DIALOGUE
QUICK STARTUP PROCEDURE

PERFORMANCE AND PROGRESS REPORTS

ERROR INFORMATION

5.0

DEVICE INFORMATION TABLES

6.0

PROM MAINTENANCE TABLE REPRESENTATIONS

7.0

TEST SUMMARIES

1.0

GENERAL

INFORMATION

1.1

PROGRAM ABSTRACT

THE ML=11 MEMORY SYSTEM WITH ITS MOSTLY ARRAY TECHNOLOGY HAS
THE FACILITY TO OFFSET AROUND KNOWN BAD MEMORY LOCATIONS IN
ITS MEMORY ARRAYS.

INITIALLY, THESE MEMORY ARRAYS ARE TESTED FOR BAD ROW AND COLUMN

ADDRESS LOCATIONS AND THE SPECIFIC OFFSETTING INFORMATION IS
STORED IN PROM ON THE ARRAY MODULE. THIS TESTING IS DONE ON A
SPECIAL 2224 MEMORY TESTER BY MEMORY MANUFACTURING.
THE DESIGN OF THE ML11 HAS ALSO PROVIDED LOGIC THAT WHEN UNDER

SOF TWARE CONTRCL WILL UPDATE AN ARRAY MODULES OFFSETTING INFOR-

MATION.

THIS LOGIC IS TO BE UTILIZED WHEN ADDITIONAL MEMORY

CELLS ARE DISCOVERED BAD AFTER THE SYSTEM HAS LEFT THE MANUFACT-

URING FACILITY.

HAS REGUESDEBERMECCREATION OF A PROGRAM THAT WHEN

RUN WILL TEST A GIVEN ML=11 SYSTEM FOR ANY ADDITIONAL BAD MEMORY

CELLS AND UPDATE THE OFFSET INFORMATION SUCH THAT THE BAD LOCATIONS

WILL BE MASKED OUT.

THIS PROGRAM WILL SELECTIVELY UPDATE BAD MEMORY CELL OF FSETING

OR A SINGLE
ggfiKAN ENTIRE ML-11 SYSTEM, A SINGLE ARRAY MODULE

SEQ 000¢

THE PROGRAM WILL EXERCISE THE ML=11 WITH ALL ONES, ALL ZEROES

A?D 2ANDOH DATA PATTERNS TO FIND ANY ADDITIONAL FAILING MEMORY
CELLS.

ONCE THE ADDITIONAL FAILING CELLS HAVE BEEN MASKED OUT THE

PROGRAM WILL GO BACK INTO THE FAILING CELLS AND VERIFY THAT
THESE BAD CELLS HAVE BEEN MASKED OUT.

THE OPERATOR WILL BE NOTIFIED OF ANY ERROR CONDITIONS WHICH
MIGHT OCCURE DURING THE EXECUTION OF THE PROGRAM. ADDITIONAL

INFORMATION PERTAINING TO THESE ERROR MESSAGES CAN BE FOUND

IN SECTION 3.0 OF THIS DOCUMENT.

THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC
RUNTIME SERVICES SOF TWARE (SUPERVISOR). THESE SERVICES PROVIDE
THE INTERFACE TO THE OPERATOR AND TO THE SOF TWARE ENVIRONMENT.
THIS PROGRAM CAN BE USED WITH XXDP+, ACT, APT, SLIDE AND PAPER
TAPE. FOR A COMPLETE DESCRIPTION OF THE RUNTIME SERVICES, REFER
TO THE XXDP+ USER'S MANUAL. THERE IS A BRIEF DESCRIPTION OF
THE RUNTIME SERVICES IN SECTION 2 OF THIS DOCUMENT.
1.2

SYSTEM REQUIREMENTS

PDP=11 CENTRAL PROCESSOR WITH A MINIMUM OF 28K USABLE MAIN
MEMCRY
.

CONSOLE TERMINAL.

RH11 OR RH70 DISK CONTROLLER.

A MINIMUM OF ONE ML=11 SYSTEM ATTACHED TO THE ABOVE

XXDP+ LOAD MCDIA.

RELATED DOCUMENTS AND STANDARDS
1.

SUPPRGC.DOC

SUPINT.MEM

1.3

RH CONTROLLER.

(o, SR . B

1.4

SUPFUN.C
XXDPPLUS.DOC

BLISS LANGUAGE GUIDE

BLISS-16 USER'S GUIDE

DIAGNOSTIC HIERARCY PREREQUISITES

IT WILL BE ASSUMED THAT PRIOR TO RUNNING OF THIS PROGRAM
THAT ALL APPROPRIATE (PU, MAIN MEMORY, ML=11 LOGIC TEST

AND ML-11 SYSTEM EXERCISER HAS BEEN SUCCESSFULLY RUN ON
THE ML=11 SYSTEM AND THAT THE SYSTEM EXERCISER SPECIFICALLY
CALLS OUT THE RUNNING OF THIS PROGRAM.

SEQ 0003
-

’

THE SYSTEM EXERCISER WHEN IT CALLS FOR THE RUNNING OF THIS
PROGRAM WILL INDICATE WHICH ARRAYS AND BANKS OF THE ML=11
SYSTEM NEED TO BE PROM MAINTENANCED. THIS INFORMATION

SEC 0004

SHOULD BE THEN INPUTED INTO THIS PROGRAM.

HOWEVER THIS PROGRAM IS DESIGNED TO GIVE THE

OPERATOR THE OPTION TO PROM MAINTENANCE EITHER
THE ARRAY AND BANK THAT THE SYSTEM EXERCISER

CALLS OUT FOR PM'ING OR SELECT PROM MAINTENANCE

FOR AN ENTIRE ARRAY MODULE (FOUR BANKS) OR

SELECT PROM MAINTENANCE FOR THE ENTIRE ML-11
SYSTEM (ALL PRESENT ARRAY MODULES).
1.5

ASSUMPTIONS

2.0

OPERATING INSTRUCTIONS

THIS SECTION CONTAINS A BRIEF DESCRIPTION OF THE RUNTIME SERVICES.

FOR DETAILED INFORMATION, REFER TO THE XXDP+ USER'S MANUAL (CHQUS).
2.3

S
COMMAND

THERE ARE ELEVEN LEGAL COMMANDS FOR THE DIAGNOSTIC RUNTIME SERVICES
(SUPERVISOR). THIS SECTION LISTS THE COMMANDS AND GIVES A VERY
BRIEF DESCRIPTION OF THEM. THE XXDP+ USER'S MANUAL HAS MORE DETAILS.
COMMAND

EFFECT

START
RESTART
CONT INUE

START THE DIAGNOSTIC FROM AN INITIAL STATE
START THE DIAGNOSTIC WITHOUT INITIALIZING
CONTINUE AT TEST THAT WAS INTERRUPTED (AFTER *()

EXIT
ADD

RETURN TO XXDP+ MONITOR (XXDP+ OPERATION ONLY')
ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE

PROCEED

DROP
PRINT

DISPLAY
FLAGS

ZFLAGS

CONTINUE FROM AN ERROR HALT

CONSIDERED TO BE ACTIVE AT START TIME
DEACTIVATE A UNIT
PRINT STATISTICAL INFORMATION (IF IMPLEMENTED
BY THE DIAGNOSTIC - SECTION 4.0)
TYPE A LIST OF ALL DEVICE INFORMATION

TYPE THE STATE OF ALL FLAGS (SEE SECTION 2.3)
CLEAR ALL FLAGS (SEE SECTION 2.3)

A COMMAND CAN BF RECOGNIZED BY THE FIRST THREE CHARACTERS.

YOU MAY, FOR EXAMPLE, TYPE ''STA'' INSTEAD OF ''START''.

THIS PROGRAM USES THE DIAGNOSTIC RUN TIME SERVICE FOR PROGRAM
PARAME TER INPUT, ERROR REPORTING AND MESSAGE PRINTING.

IT IS DESINGED TO TEST ONE ML=-11 SYSTEM AND IS EXPECTED TO RUN
FROM START TO FINISH WITH NO OPERATOR INTERRUPTIONS (ie. *().
THEREFOR THE ONLY RECOGNIZED DRS> COMMAND BY THIS PROGRAM IS
THE *START' COMMAND AND CONTROL C AND ANY OTHER DRS> COMMAND

MUST BE AVOIDED.

SWITCHES

THERE ARE SEVERAL SWITCHES WHICH ARE USED TO MODIFY SUPERVISOR OPERATION.

THESE SWITCHES ARE APPENDED TO THE LEGAL COMMANDS.

ALL OF THE LEGAL

Sw]TCHES ARE TABULATED BELOW WITH A BRIEF DESCRIPTION OF EACH,

IN THE DESCRIPTIONS BELOW, A DECIMAL NUMBER IS DESIGNATED BY 'DDDDD'".
SWITCH

EFFECT

/TESTS:LIST

EXECUTE ONLY THOSE TESTS SPECIFIED IN
LIST IS A STRING OF TEST
THE LIST.
EXAMPLE = /TESTS:1:5:7=10,
FOR
NUMBERS,
THIS LIST WILL CAUSE TESTS 1,5,7.8,9.10 T0
BE RUN. ALL OTHER TESTS WILL NOT BE RUN.

/PASS :DDDDD
/FLAGS:FLGS

/EOP:DDDDD .

JUNITS:LIST

EXECUTE DDDDD PASSES (DDDDD = 1 10 64000)
SET SPECIFIED FLAGS.
IN SECTION 2.3.

FLAGS ARE DESCRIBED

REPORT END OF PASS MESSAGE AFTER EVERY
(DDDDD = 1 TO 64000)
DDDDD PASSES ONLY.
TEST/ADD/DROP ONLY THOSE UNITS SPECIFIED

IN THE LIST. LIST EXAMPLE = /UNITS:0:5:10=12
USE UNITS 0,5,10,11,12 (UNIT NUMBERS = 0-63)

EXAMPLE OF SWITCH USAGE:

START/TESTS:1=5/PASS:1000/E0P:100
THE EFFECT OF THIS COMMAND WILL BE: 1) TESTS 1 THROUGH 5 WILL BE

EXECUTED, 2) ALL UNITS WILL BE TESTED 1000 TIMES AND 3) THE END OF
A
MAY,
YOU
RS.
CHARACTE
THREE
FIRST
THE
BY
ED
RECOGNIZ
SWITCH CAN BE
=5"",
'‘/TESTS:1
OF
INSTEAD
"'
'/TES:1=5
TYPE
FOR EXAMPLE,
BELOW IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED BY FA(H
PASS MESSAGES WILL BE PRINTED AFTER EACH 100 PASSES ONLY.

COMMAND.

START
RESTART
CONT INUE

TESTS

PASS

FLAGS

EOP

UNITS

X
X

X
X
X

X
X

PROCEED

OROP

ADD

DISPLAY
FLAGS

ZFLAGS
EXIT

AS MENTIONED BEFORE THE PROGRAM IS DESIGNED TO TEST ONE ML-1
SYSTEM AND IS EXPECTED TO RUN FROM START TO FINISH WITH NO
OPERATOR INTERRUPTIONS.

THEREFOR USAGE OF ANY SWITCHES WOULD PROVE MEANINGLESS TO
THE PROGRAM AND SHOULD BE AVOIDED.

2.3

FLAGS

;

FLAGS ARE USED TO SET UP (ERTAIN OPERATIONAL PARAMETERS SUCH AS

SEQ 0005

LOOPING ON ERROR. ALL FLAGS ARE CLEARED AT STARTUP AND REMAIN
CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH. FLAGS
ARE ALSO CLEARED AFTER A START COMMAND UNLESS SET USING THE
FLAG SWITCH. THE ZFLAGS COMMAND MAY ALSO BE USED TO CLEAR
ALL FLAGS.

WITH THE EXCEPTION OF THE START AND ZFLAGS COMMANDS,

NO COMMANDS AFFECT THME STATE OF THE FLAGS;

THEY REMAIN SET OR

CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH.
FLAG

EFFECT

HOE

HALT ON ERROR = CONTROL IS RETURNED TO

LOE

LOOP ON ERROR

RUNTIME SERVICES COMMAND MODE

INHIBIT ALL ERROR REPORTS
INHIBIT ALL ERROR REFORTS EXCEPT

[ERe
IBR*

FIRST LEVEL

(FIRST LEVEL CONTAINS

ERROR TYPE, NUMBER, PC, TEST AND UNIT)
INHIBIT EXTENDED ERROR REPORTS (THOSE
CALLED BY PRINTX MACRO'S)
DIRECT MESSAGES TO LINE PRINTER
PRINT TEST NUMBER AS TEST EXECUTES
"BELL'' ON ERROR
UNATTENDED MODE (NO MANUAL INTERVENTION)
INHIBIT STATISTICAL REPORTS (DOES NOT
APPLY TO DIAGNOSTICS WHICH DO NOT SUPPORT

IXR*
PRI
PNT
BCE
UAM
ISR

STATISTICAL REPORTING)

INKIBIT PROGRAM VROPPING OF UNITS

IDR

ADR
LOT

EXECUTE AUTODROP CODE
LOOP ON TEST

EXECUTE EVALUATION (ON DIAGNOSTICS WHICH

Evil

HAVE EVALUATION SUPPORT)

*ERROR MFSSAGES ARE DESCRIBED IN SECTION 3.1

SEE THE XXDP+ USER'S MANUAL FOR MORE DETAILS ON FLAGS. YOU MAY
SPECIFY MORE THAN ONE FLAG WITH THE FLAG SWITCH. FOR EXAMPLE,
TO CAUSE THE PROGRAM TO LOOP ON ERROR, INHIBIT ERROR REPORTS

AND TYPE A "BELL'' ON ERROR, YOU MAY USE THE FOLLOWING STRING:
/FLAGS:LOE
: IER:BOE

AS MENTIONED BEFORE THIS PROGRAM IS DESIGNED TO TEST ONE ML=-11
AND IS EXPECTED TO RUN FRCM START TO FINISH WITH NO OPERATOR
INTERRUPTIONS.

THEREFOR USAGE OF ANY FLAGS WOULD PROVE MEANINGLESS TO THIS

PROGRAM AND SHOULD BE AVOIDED.

2.4

HARDWARE QUESTIONS

WHEN A DIAGNOSTIC IS STARTED, THE RUNTIME SERVICES WILL PROMPT

THE USER FOR HARDWARE INFORMATION BY TYPING ''CHANGE HW (L) ?''

YOU MUST ANSWER 'Y'' AFTER A START COMMAND UNLESS THE HARDWARE
INFORMATION HAS BEEN ‘'PRELOADED'' USING THE SETUP UTILITY (SEE
(HAPTER 6 OF THE XXDP+ USER'S MANUAL). WHEN YOU ANSWER THIS
QUESTION WITH A "'Y*', THE RUNTIME SERVICES WILL ASK FOR THE NUMBER
OF UNITS (IN DFCIMAL). ONLY ONE DRIVE IS PERMITTED TO BE PROM

MAINTENANCED PER EXECUTION OF THE PROGRAM THEREFOR ANSWER THIS

SEG 0006

QUESTION WITH *1'.

QUESTIONS.

YOU WILL THEN BE ASKED THE FOLLOWING

OPTION 1

IS ENTIRE ML=11 SYSTEM TO BE MASKED®

OPTION 2

'IS A SINGLE ARRAY TO BE MASKED'

OFTION 3

'IS A SINGLE BANK TO BE MASKED®

TRANSFER 'SYS'

TRANSFER 'BCARD'
TRANSFER °'DONE*

TRUE

IS TRUE

FALSE

"ENTER BANK NUMBER TO BE MASKED'

'BOARD*

*ENTER BOARD NUMBER TO BE MASKED'

*Sys’

*STARTING RH REGISTER ADDRESS'
'DRIVE UNDER TEST NUMBER'

'ARE YOUR INPUTED PARAMETERS CORRECT'

'DONE"*

¢.5 SOF TWARE QUESTIONS

SOF TWARE QUESTIONS ARE NOT USED DURING THIS PROGRAM AND THIS

QUESTION SHOULD BE ANSWERED WITH A "NO' RESPONCE.

HOWEVER IF A YES RESPONCE IS GIVEN THE FOLLOWING MESSAGE WILL
BE PRINTED:

*NOT USED TYPE <CR>'
2.6

EXTENDED P-TABLE DIALOGUE

TRADITIONALLY

DRS> PROVIDES YOU WITh THE ABILITY TO

BUILD P-TABLES FO% MULTIPLE DRIVE TESTING. BECAUSE OF THE
IMPACT OF THIS PROGRAM ON A ML=-11 SYSTEM AND THE LENGTHY
RUNTIME ONLY ONE DRIVE WILL BE PROM MAINTENANCED PER
EXECUTION OF THIS PROGRAM.

HOWEVER THE NATURE OF DRS> WILL STILL ALLOW YOU TO BUILD

MULTIPLE DRIVE SELECTION FOR TESTING.

THIS PROGRAM WILL

TREAT THIS AS A SYSTEM ERROR AND SELECT THE FIRST P-TABLE
BUILT FOR THE RUN TIME PARAMETERS.

2.7

START=UP PROCEDURE

(XXDP+)

TO START=UP THIS PROGRAM:
1.

BOOT XXDP+

2. GIVE THE DATE AND ANSWER THE LSI AND SOHZ (IF THERE
IS A CLOCK) QUESTIONS

2. TYPE 'R CIMLCA"
4.

TYPE "'START"

SEQ 00Q7

THE START COMMAND WILL BE THE ONLY COMMAND
ACCEPTED BY THIS PROGRAM AND TYPING ANY OTHER

COMMAND MUST BE AVOIDED. FOR TESTING MULTIPLE
DRIVES REPEAT STEPS &4 THRU 7 FOR EACH DRIVE.

S. ANSWER THE ''CHANGE HW'' QUESTION WITH "'v*'
6. ANSWER ALL THE HARDWARE QUESTIONS

7. ANSWER THE ''CHANGE SW'' QUESTION WITH "N
WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING ONLY THE

DEFAULTS FOR FLAGS AND SOF TWARE PARAMETERS.

ARE DESCRIBED IN SECTIONS 2.3 AND 2.5.

THESE DEFAULTS

3.0 ERROR INFORMATION

3.1

TYPES OF ERROR MESSAGES

THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY BE ISSUED BY

A DIAGNOSTIC: GENERAL, BASIC AND EXTENDED. GENERAL ERROR_MESSAGES
ARE ALWAYS PRINTED UNLESS THE '‘IER'' FLAG IS SET (SECTION 2.3).
THE GENERAL ERROR MESSAGE IS OF

NAME

TYPE

NUMBER

ERROR MESSAGE

THE FORM:

ON UNIT NUMBER

TST NUMBER PC:XXXXXX

,WHERE; NAME = DIAGNOSTIC NAME
TYPE = ERROR TYPE (SYS FATAL, DEV FATAL, HARD OR SOFT)
NUMBER = ERROR NUMBER

UNIT NUMBER = 0 = N (N IS LAST UNIT IN PTABLE)
TST NUMBER = TEST AND SUBTEST WHERE ERRCR OCCURRED
PC:XXXXXX = ADDRESS OF ERROR MESSAGE CALL

BASIC ERROR MESSAGES ARE MESSAGES THAT CONTAIN SOME ADDITIONAL
INFORMATION ABOUT THE ERROR. THESE ARE ALWAYS PRINTED UNLESS
THE ''IER'' OR ''IBR'' FLAGS ARE SET (SECTION 2.3).
THESE MESSAGES
ARE PRINTED AFTER THE ASSOCIATED GENERAL MESSAGE.

EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR INFORMATION
THESE ARE ALWAYS
SUCH AS REGISTER CONTENTS OR GOOD/BAD DATA.
PRINTED UNLESS THE ''IER'', "'IBR'' OR ''IXR'' FLAGS ARE SET (SECTION 2.3).
THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL ERROR

MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES.
3.2 SPECIFIC ERROR MESSAGES

ERROR NUMBER

ERROR DESCRIPTION

ERR_1

ONLY THE DRS> START COMMAND IS RECOGNIZED
TO START THE PROGRAM EXECUTION.

ANY OTHER DRS> COMMAND WILL CAUSE THIS ERROR

ERR_2

DURING THE HARDWARE QUESTIONS THE OPERATOR
IS ASKED IF A SINGLE BANK, A SINGLE ARRAY
OR THE ENTIRE ML=-11 SYSTEM IS 10 BE PROM

SEC 0008

MAINTENANCED.

HE/SHE IS THEN ASKED IF HIS/HER INPUTS ARE
CORRECT.

THIS ERROR DETECTS A NO ANSWER FOR SELECTING
SYSTEM, ARRAY OR BANK AND A YES ANSWER TO 'ARE
YOUR INPUTED PARAMETERS CORRECT'.

EVEN THOUGH DRS> WILL BUILD MULTIPLE P=TABLES
THIS PROGRAM WILL USE AS ITS RUN TIME PARAMETERS
THE LUN 0'S ENTRIES.

THIS ERROR DETECTS THE ABSENCE OF THIS FIRST

P-TABLE
ERR_&

'LUN O'.

THIS ERROR DETECTS UNCONFIRMED FAILING CHIPS.
je. CHIPS THAT FAILED DURING MASS BUS WRITE
CHECK TRANSFERS BUT THE FAILURE DID NOT REOCCURE
DURING DATA DIAGNOSTIC MODES. THIS MAY INDICATE

THAT THIS FAILURE MAY BE A SOFT ERROR OR POSSIBLE

HARDWARE ERRORS.
ERR_S

CONDITION A

THIS INDICATES THAT 'ONE' ALL BAD CHIP (GREATER
THAN 10 ALL BAD ROWS AND OR COLUMNS) HAS BEEN
DETECTED IN A CHIP AT A GIVEN BANK.

THIS CHIP IS NOT PROM MAINTENANCED AND THE ERROR
CORRECTION IS EXPECTED TO CORRECT THE FAILING DATA
FROM THIS CHIP UNTIL FIELD SERVICE CAN REPLACE
THE ARRAY FROM WHICH THIS CHIP RESIDES.

ERR_6

CONDITION B

THIS INDICATES THAT A SECOND ALL BAD CHIP HAS

BEEN DETECTED IN A GIVEN BANK.

THE BAD CHIP IS NOT PROM MAINTENANCED AND FURTHER

TESTING OF THIS ARRAY IS ABORTED.

FIELD SERVICE SHOULD REPLACE THIS ARRAY BEFORE
LEAVING THE SITE.

ERR_7

CONDITION C

INDICATES THAT BAD NIBBLE OFFSETS HAS EXCEEDED
14 OFFSETS RESULTING IN UNSAFE ERRORS.

THE ARRAYS NIBBLE OFFSETS FOR THIS BANK ARE MASKED
UP TO 14 OFFSETS. THE ERROR CORRECTION IS EXPECTED

égHgggRECT THE UNMASKED ERRORS WHICH WERE LEFT

FIELD SERVICE SHOULD REPLACE THIS ARRAY MODULE

AT THE EARLIEST POSSIBLE DATA.

SEQ 0009

ERR_B

CONDITION D

THIS INDICATES THAT PROM BLAST ERRORS WERE DETECTED.
THIS MEANS THAT THE SELECTED NEW PROM DATA WAS NOT
WRITTEN INTO THE PROMS CORRECTLY. EITHER THE
SELECTED PROM LOCATIONS WERE NOT WRITTEN CORRECTLY

OR OTHER PROM LOCATIONS WERE INADVERTENTLY WRITTEN INTO.

THIS COULD RESULT IN EITHER BAD LOCATIONS
angggT BEING MASKED OR GOOD LOCATIONS ARE BEING

LATER ROUTINES WILL DETERMINE IF THIS SITUATION

WARRENTS THE ARRAY TO BE REPLACED.
ERR_9

AS MENTIONED BEFORE ONLY THE FIRST P-TABLE BUILT
WILL BE USED AS THE PROGRAM PARAMETERS.
THIS ERROR DETECTS GREATER THAN ONE P-TABLE
WAS BUILT DURING THE HARDWARE QUESTIONS.

ERR_10

DURING WRITING NEW PROM DATA TO THE PROMS THE
DATA CLOCK BIT LOCATED ON THE ARRAY DATA MODULE
IS TESTED FOR COMPLETION OF THE PROM WRITE.
THIS ERROR DETECTS THE FAILURE OF THIS BIT TO
CLEAR AFTER WRITING TO THE PROMS.

ERR_11

AFTER THE PROMS HAVE BEEN WRITTEN WITH NEW PROM
DATA THE PROGRAM VERIFIES THAT ALL NEWLY FAILING
CHIPS HAVE BEEN SUCCESSFULLY MASKED OUT.

THIS ERROR DETECTS THE OCCURANCE OF UNCORRECTABLE
ERROR DURING THIS VERIFY PASS.
THIS ERROR CAN NOT BE TOLERATED AND THE ARRAY IS
CALLED OUT FOR REPLACEMENT.
FIELD SERVICE MUST REPLACE THIS ARRAY MODULE
BEFORE LEAVING THE SITE.

IF THIS ERROR STILL EXITS AFTER THE ARRAY IS

REPLACED THEN POSSIBLE HARDWARE ERRORS MAY

EXITS IN THE DRIVE.

SHOULD BE RUN AGAIN.

ERR_12

THE LOGIC TEST AND EXERCISER

AGAIN DURING THE VERIFY PASS THE DRIVE IS EXAMINED
FOR ERRORS AFTER BLASTING.

SINGLE BIT ERRORS ARE TOLERATED IN BANKS WHICH
ARE RUNNING DEGRADE MOPE (EITHER ONE ALL BAD CHIP
WAS LEFT BEHIND OR NIBBLE OFFSETS GREATER THAN
WERE DETECTED). HOWEVER NON - DEGRADE MODE BANKS
SHOULD BE RUNNING ERROR FREE AFTER BLASTING.
THIS ERROR DETECTS THE OCCURANCE OF SINGLE BITS
IN THE BANKS WHICH ARE NOT IN DEGRADE MODE.
THIS COULD INDICATE THAT THE PROGRAM FAILED TO

SEQ 0010

TO FIND AND MASK OUT ADDITIONAL ERROR IN THE BANK
OR THAT POSSIBLE HARDWARE ERRORS EXIST.

THE PROGRAM SHOULD BE RUN ON THIS BANK AGAIN.

IF THE ERROR STILL EXISTS THEN ISOLATE WHERE

THE PROBLEM LIES. IF THIS PROGRAM IS SUSPECTED
THEN CONTACT DIAGNOSTIC ENGINGERING.

THIS ERROR DETECTS THE PRESENTS OF UNEXPECTED

FRR_13

DRIVE ERRORS DURING OR AFTER A MASS BUS TRANSFER. ATER THE A MESSAGE IS PRINTED STATING THE ERROR
ALL THE DIRECTLY READ ML-11 REGISTERS ARE DUMPED
TO THE TERMINAL.

4.0 PERFORMANCE AND PROGRESS REPORTS

AT THE END OF EACH PASS, THE PASS COUNT IS GIVEN ALONG WITH THE
TOTAL NUMBER OF ERRORS REPORTED SINCE THE DIAGNOSTIC WAS STARTED.

TMIS PROGRAM WILL BE EXECUTED ONE TIME PER 'START' COMMAND ISSUED.
THE DRS> REPORT OF HOW MANY OF ERRORS DETECTED HAS NO MEANING DURING

EXECUTION OF THIS PROGRAM.

ONCE THE PROGRAM EXECUTION HAS COMPLETED THIS JUST PM'ED UNIT IS
ggogggb TO SUPPRESS FURTHER PROGRAM EXECUTION AND CONTROL IS PASSED
>-

DROPPING OF A UNIT RESULTS IN A DRS> MESSAGE OF 'PASS ABORTED FOR
THIS UNIT'.

THIS MESSAGE HAS NO SIGNIFICANCE ON THE PROGRAMS

EXECUTION AND SHOULD BE IGNORED.
5.0 DEVICE INFORMATION TABLES

HARDWARE P-TABLE ENTRY DEFINTITION

TABLE LOCATION

DESCRIPTION

1. A_HWTBL : INITIAL(O)

STORES A TRUE OR FALSE VALUE AND
HAS NO DEFAULT VALUE.

SELECTS WHETHER THE ENTIRE ML-11 SYSTEM
(ALL PRESENT ARRAYS) ARE TO BE PM'ED.

2. B_HWTBL : INITIAL(O)

STORES A TRUE OR FALSE VALUE AND

HAS NO DEFAULT VALUE.

SELECTS WHETHER A SINGLE ARRAY MODULE
IS TO BE PM'ED.

3. (_HWTBL : INITIAL(O.

STORES A TRUE OR FALSE VALUE AND

HAS NO DEFAULT VALUE.

SELECTS WHETHER A SINGLE BANK IS TO

BE PM'ED.

4. D_HWTBL : INITIAL(O)

STORES THE SELECTED BANK NUMBER TO

BE PM'ED IF PM'ING SINGLE BANKS.

SEQ@ 0011

THERE IS NO DEFAULT VALUE.
E_HWIBL

STORES THE SELECTED ARRAY MODULE TO
BE PM'ED IF PM'ING SINGLE ARRAYS.

INITIAL(O)

THERE IS NO DEFAULT VALUE.
F_HWTBL

INITIAL (176400)

STORES THE RH CONTROLLER BASE REGISTER

ADDRESS.

THE DEFAULT ADDRESS IS %0'176400'.
G_HWTBL

STORES THE DRIVE SCLECTION NUMBER
OF THE SELECTED DRIVE TO BE PM'ED.

INITIAL(O)

THERE IS NO DEFAULT VALUE.
. H_HWTBL

STORES THE DRIVE OPTION CODE FOR THE

INITIAL(O)

SELECTED DRIVE.

CODE 1 = 16K MOS RAMS
CODE 2 = 64K MOS RAMS
9.

[ _HWTBL

INITIAL(TRUE)

STORES A TRUE OF FALSE VALUE.
THIS FORCES THE OPERATOR TO REVIEW
HIS/HER PARAMETER INPUTS FOR CORRECTNESS
BEFORE PERFORMING PROM MAINTENANCE.
THE DEFAULT VALUE IS TRUE.

6.0 PROM MAINTENANCE TABLE REPRESENTATIONS
ERROR MAP

THE ERROR MAP IS A BLOCK VECTOR OF 512 BLOCKS.
THESE BLOCKS RERESENT THE SECTORS IN A CHIP.
THESE BIT POSITIONS IN
EACH BLOCK HAS 8 WORDS.
THE WORDS REPRESENT ROW ADDRESSES 0 TO 127.
THE ADJACENT COLUMN ADDRESS FOR EACH ROW ADDRESS
(AN BE CALCULATED BY ADDING THE ROW ADDRESS TO THE

ROWS SECTOR NUMBER.

ERROR_MAP

I
I

{

,
ROWS 0-127

] SECTOR 0

1
{

I
I

ROWS 0-127

} SECTOR 1

SEQ 0012

SEQ 0013

SECTOR 511 OR 127

BLAST
THE

TABLE

BLAST

TABLE

IS A BLOCK VECTOR OF

FOUR BLOCKS.

EACH BLOCK REPRESENTS A PROMS BANK 0O TO 3.
EACH BLOCK HAS 512 WORDS.
EACH BLOCK IS FURTHER
DIVIDED INTO TWO SECTIONS.
THE UPPER SECTION REPRESENTS
ROW PROM DATA O TO 127 (OR 0 TO 256 IF 64K CHIPS)
AND THE LOWER SECTION COLUMN PROM DATA 0 TO 127
(OR O

TO 256

64K

CHIPS).

BLAST TABLE
-

-1

ROWS ADRS

eccccce-

el e I

COLS ADRS

[mm———-

(OLS ADRS

ROWS ADRS

I
l
{

(OLS ADRS

TWE BLAST

JUT

TABLE

K
R
R
L

}

e e

I
I
1
{

BANK

I
1
I
I
I
l
I
I

ROWS ADRS

COLS ADRS

BANK 0

e ey

ROWS ADRS

]

I
|

IS LOADED WITH T NEW PROM DATA TO MASK

THE NEWLY FAILING ROWS AND COLUMNS AND

IS ALSO LOADED wiTH

OLD PROM DATA FROM PREVIOUS PROM BLASTING,

TEMP BLAST

TABLE

IN EACH WORD

THE TEMP BLAST TABLE IS A BLOCK OF 10 WORDS.

1S STORED A BAD ROW OR (OLUMNS RESPECTIVE NIBBLE NUMBER,
ITS ROW OR COLUMN NUMBER AND A FLAG TO TELL WHETHER THIS

TABLE ENTRY IS A ROW ADRS OR A COLUMN ADRS.

THIS TABLE IS NECESSARY BECAUSE ONCE A BAD ROW OR COLUMNS
ADDRESS IS STORED INTQ THE MAIN BLAST TABLE THERE IS NO

WwAY OF KNOWING OF WHICH NIBBLE THE ROW OR COLUMN COMES FROM.
THIS INFORMATION IS NEEDED WHEN THIS PART IS DETERMINED TO
BE ALL BAD ¢ > 10 ALL BAD ROW OR COLUMNS) IN THIS EVENT
THIS CHIPS NEWLY FAILING ROWS AND COLUMNS ARE NOT BLASTED.
TO ACCOMPLISH THIS THE TEMPORARY BLAST TABLE IS SIMPLY NOT
TRANSFERED INTO THE MAIN BLAST TABLE.

I
!
I
{ R_C_NUMBER { NIBBLE NUM } ENTRY O

I
i
} R_C %
I

[

3100

12 70 4

BITS ;

e )|
I
I

I
I
I
—
o A Eimaesesees
1
I
I
|
I
I
I
I
I
I
I
I
e § ittt S
l

I ENTRY 1

I
1
I
I ENTRY XX
I
———— I

TABLES USED IN CALCULATING SELECTED ROWS AND (OLUMNS

FOR BLASTING.

COLUMN COUNT TABLE

THIS TABLE KEEPS A COUNT OF THE NUMBER OF TIMES THE
COLUMNS FAILS WITH A PARTICULAR FAILING ROW.

ROW COUNT

THIS SINGLE VARIABLE COUNTS HOW MANY TIMES A ROW

NUMBER IS FOUND BAD WHEN SEARCHING THE ERROR MAP.
EACH TIME A ROW IS FOUND BAD THE COUNT IS INCREMENTED.
IF THIS COUNT GETS > 10 THEN THIS ROW IS CALLED ALL
BAD AND IS SELECTED FOR BLASTING. WHEN THIS HAPPENS
THE COUNTS OF THE ADJACENT FAILING COLUMN IS DECREMENTED
BY ONE. THE COLUMN POINTER TABLE POINTS TO THESE ADJACENT
FAILING COLUMN COUNTS.

IF THE ROW COUNT DOES NOT REACH > 10 AFTER SEARCHING THRU

THE ERROR MAP THEN THIS ROW IS NOT SELECTED FOR BLASTING
AT THIS TIME AND THE ADJACENT FAILING COLUMN COUNTS ARE
NOT DECREMENTED.

THE ERROR MAP IS THEN SEARCHED AT THE NEXT ROW NUMBER.
COLUMN POINTER TABLE

AS MENTIONED BEFORE THIS TABLE POINTS TO THE ADJACENT
FAIL.NG COLUMN NUMBERS WHICH FAILED WITH THE ROW SEARCH.

REMAINDER TAELE

THE PROGRAM EXECUTION WILL FIRST SEARCH THE ERROR MAP FOR ROWS

SEQ 0014

WITH GREATER THAN 10 COUNTS AND THE ADJACENT FAILING COLUMNS
COUNTS ARE INCREMENTED. NOW ONCE THE ERROR MAP HAS BEEN SEARCH FOR
ROWS COUNTS > 10 THEN COLUMN COUNT TABLE IS SEARCHED FOR COLUMN
COUNTS > 10. IF A COLUMN COUNT IS > 10 THEN THIS COLUMN NUMBER
IS SELECTED FOR BLASTING AND ITS COUNT IS ZEROED.
ALL THAT IS LEFT NOW ARE RANDOM FAILING ROWS AND COLUMNS
SCATTERED THROUGH THE CHIP. THESE SCATTERED ROW COLUMN

PAIRS ARE TRANSFERED INTO THE REMAINDER TABLE WHERE THEY
CAN BE INTERIGATED AND SELECTED FOR BLASTING.

COLUMN COUNT
TABLE

[====emv I

{ cef 0

oLl

REMAINDER TABLE
0

I COL 6

I coL 7

[=====m- I
[======- I

[-====-- I
I coL 8
I
[=====- I
I coL 9
I
[====eev I

I coL 10

1 coL

et|
I

COL ADRS

I
e e|
I
I
I
ReI
I
I
I
—————-]
e=

[-=====- I
I coL 3
I
[======= 1
I COL &
I
[=====—- I

I coL S

ROW ADRS

e
i

[====ee- I
I coL 2
I

|eeeeececccccae- |

[=====—= |

[=====-- I
I coL »x
I
1
[-=====ROW COUNT

TI
I
I
eI

{ POINTER O

{ POINTER 1

{ POINTER 2

SEQ@ 0015

[ PCINTER 3
I POINTER XX

BAD CHIP TABLE

THE BAD CHIP TABLE STORES AWAY THE FAILING CHIPS

DISCOVERED BAD IN A BANK DURING WRITE CHECK TRANSFERS
AND DURING SINGLE STEP DMA MODES.
FOR EACH CHIP IS ALSO STORED.

THE FAILING DATA PATTERN

THIS TABLE IS A BLOCK OF 39 BYTES AND THE BIT DEFINITIONS ARE

AS FOLLOWS:

BIT
BIT
BIT
BIT
BIT

BIT
BIT
BIT
BIT

8
7
6
S
&

3
2
1
O

IS A FAULT INDICATOR
INDICATES ZEROES DATA FAILURE
INDICATES ONES DATA FAILURE
INDICATES RANDOM DATA O FAILURE
INDICATES RANDOM DATA 1 FAILURE

INDICATES RANDOM DATA 2 FAILURE
INDICATES RANDOM DATA 3 FAILURE
INDICATES RANDOM DATA 4 FAILURE
INDICATES RANDOM DATA 5 FAILURE

BAD CHIP TABLE
ot |

I CHIP O

j vy, I

I CHIP 1
I
et I
I CHIP 2
I
[ ————— 1

{

I CHIP 3

} CHIP &

[ CHIP 5
I
§ S—— I

CHIP XX

}

I CHIP 38

§ S——— I

7.0 TEST SUMMARIES

THIS PROM MAINTENANCE PROGRAM CONTAINS ONLY ONE TEST. THIS ONE
TEST IS THE MAIN CONTROL LOOP WHICH LOOPS THE PROGRAM EXECUTION
ON THE SELECTED ARRAYS AND BANKS FOR PROM MAINTENANCE.
)%
ELUDOM

SEQ 0016

E 2
21-Apr=1981 (08:27:48
21=-Apr=1981 08:15:46

BSKEL?Z
REV A PATCH 00
R IR IR U T

0001
0002
0003
1493

YOO

1497
1498
1499
1500

'BLSMAC.REQ"';

'PROGRAM HEADER'

LITERAL

DSSNBR_OF _TESTS = 1;

i’;HE PROGRAM HEADER IS THE INTERFACE BETWEEN
13

RV LV R L0 LV RV AV R RV AV A AV I R A

HEADER

(XASCII'CZMLCA',%ASCII'A', %ASCII'0",120,0,PRI00>;

%SBTTL

°'DISPATCH TABLE'

ERRTBL;

WWW

- OWVooN

WVMEBWR =0V
NN WN=2O VNN
&WflWWWWNNNNNNNNNN—J—:
il ) ol il WN—=0O0
il sl i i &

(ALL);

OYOYOYOHY
O

YOYOYOYOY
O

POINTER

LV L, LV LV IV TV NV NV AW RV N

L
L R
L T
T
R
A ETE TE
D RN R

R R R PR TR IETETE

%SBTTL

EQUALS;

N R R
TEA TR R
A
TETETE A

REQUIRE

: THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR.

L I

L I I

1494
1495
1496

gggghfi BSKEL2 ( IDENT = "REV A PAT(H 00') =

%(
o

* THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST.
; IT IS USED BY THE SUPERVISOR TO DISPAT(H TO EACH TEST.

DISPATCH (DS$NBR_OF _TESTS);

%SBTTL

°'DEFAULT HARDWARE P-TABLE'

x(
*++

THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF
THE TEST=DEVICE PARAMETERS.
THE STRUCTURE OF THIS TABLE

IS IDENTICAL TO THE STRUCTURE OF THE HARDWARE P-TABLES,

; AND IS USED AS A '‘TEMPLATE'® FOR BUILDING THE P-TABLES.

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKLZ2.BLI.1 (1

55098017

(

154
154
1544

1545
1546
1547
1548

DEFAULT HARDWARE P-TABLE

BGNHW

(DFPTBL);
GLOBAL

—

'BANK NO. TO BE MASKED

'ARRAY NO. TO BE MASKED
E_HUTBL : INITIAL (0),
F_HWTiSL : INITIAL (%0'176400'), 'RH REGISTER BASE ADRS
'DRIVE SELECT NO. OF DRIVE TO MASKED
G_HUTBL : INITIAL (O),
'OPTION, 1 = 16K MOS RAMS, 0 = 64K MOS RAM
INITIAL (1),
H_HWTBL
I PARAME TERS CORRECT INDICATOR
I_HWTBL: INITIAL (1)e

e
e
e

ENDHW

2SBTTL *SOF TWARE P-TABLE'
%(
;00

:
:

SET UP A ASSEMBLY TIME AND MAY BE VARIED BY THE OPERATOR

Atc??gNTIME.
St

et Sttt
NSy 8, 8,

THE SOFTWARE TABLE CONTAINS VARIOUS DATA USED BY THE
THESE PARAMETERS ARE
PROGRAM AS OPERATIONAL PARAMETERS.

HOWEVER THIS PROGRAM WILL NOT USE THIS CPTIONAL

)

e
R

STBIXXRANZ2Z

) —t -l ol -l —lh — - — ;

AN NN NN NN NN W

-l ol

'MASK ENTIRE SYSTEM FLAG INDICATOR
'MASK A SINGLE ARRAY FLAG INDICATOR
'MASK A SINGLE BANK FLAG INDICATORG

THERE ARE NO SOF TWARE QUESTIONS USED

HOWEVER THIS
DURING THIS PROGRAM.
SOF TWARE TABLE LOCATION IS PROVIDED
IN THE EVENT OF A °'YES' RESPONCE T0
THE DRS> SOFTUARE QUESTION ‘Change Scftware'

BGNSW (SFPTBL);

AN
00O
WRY —

A_HWTBL : INITIAL 0),
B_HWTBL : INITIAL (Q),
CCHWTBL : INITJAL (0Q),

D_HWTBL : INITIAL 0),

vV v w
LN v
o OO O YUY
- OV ~ VN
WV—=O
W

——
[T

ONCOYEOY
OO OO

564

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKLZ2.BLI.T (1)

1549

CNNCYON
DS

e
e s 8o ®o®q 8o 08868, 0,%c 00000, 0s0:800:00%000000:000:% 0000080909000 0:05050s0c0:08008:080000, G 868000500900 40

BSKEL?2
- REV A PATCH 00

21=-Apr-1981 08: 2 48
21=Apr=1981 08:15:46

GLOBAL

SWTBLS_RET : INITIAL (0);

ENDSW;

%SBTTL

‘PROTECTION TABLE'

44
:00

; THIS TABLE IS USED BY THE RUNTIME SERVICES
;

TO PROTECT THE LOAD MEDIA,

'DUMMY ARGUMENT

SE098018

PROTECTION TABLE

1594

1596
1597

BGNPROT (=1,=1,=1);

1598

'1ST ARG
‘2ND ARG

1599
1600

!3RD ARG

OFFSET INTO P-TABLE FOR (SR ADDRESS
OFFSET INTQ P-TABLE FOR MASSBUS ADDRESS
OFFSET INTO P-TABLE FOR DRIVE NUMBER

ENDPROT;
END
ELUDOM

BSKEL?2

/REV A /

132

103

115

101

ME
: : .ASCI]
LSNA

$CODES
/CIM/
/LCA/

LSREV::

LSUNIT: :.WORD
L$TIML::.WORD
WORD
: . P:
L$HPC
.WORD
CP:
:
L$SP
: .WORD
L$SHPTP:
.WORD
:
L$SPTP:
.WORD
LSLA:DP:
L$STA:: .WORD
.WORD
L$CO::
L$DT P::.WORD
L$APT:: .WORD
L$DTP:: .WORD
: .WORD
L$PRIO:
LSENVI::.WORD
LSEXPT::.WORD
:
LSMREV:
BYTE

L$EF::

BYTE
.WORD

L$SPC:: .WORD
: .WORD
LSDEVP:
: .WORD
L$REPP:
4:
: .WORD
LSEXP

OO0

1595

OOOWW

BSKEL2
REY A PAT(H 00

21=Apr=1981 08:27:48
21=Apr=1981 08:15:46

LEDVTYP
LSRPT

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKLZ2.BLI.T (1)

Page

SEQ 0019

000136
000140

000000C
000000

000142

000000

000144

000000

000146

000000

000150

000000

000152

176400

000154

000000

000156 000001
000160

000162

000601

000164

000000¢

000166

000000

000170
000172
000174
000176

177777
177777
177777

.WORD
LSEX:PS:
.WORD
::
LSAUT
L$DUT:: .WORD
LSLUN:: .WORD
.WORD
L$DE:SP:
:
.WORD
:
LSLOAD
.WORD
LSETP::
L$ICP:: .WORD
L$CCP:: .WORD
LSACP:: .WORD
L$PRT:: .WORD
L$TEST::.WORD
L$DLY:: .WORD

ME
: : .WORD
L$HI
.WORD
D$PC:NT:
LS$DISPATCH::
.WORD
:
: .BLKW
ERRTYP
:
.BLKW
:
NBR
ERR
:
.BLKW
:
MSG
ERR
:
.BLKW
:
BLK
ERR
:
N:
WLE
LSH
.WORD
::
A.HWTBL
.WORD

B.HWTBL::
.WORD
C.HWTBL::
.WORD
D.HWTB:L:
.WORD
L
::
WTB
E.H
.WORD
F.HWTBL::

.WORD
:
:
TBL
G.HW
.WORD
::
H.HWTBL
.WORD
:
TBL:
I.HW
.WORD

:
: .BLKW
LSNDHW
:
N:
WLE
LSS
.WORD
SWTBL$.RET::

0
L $AU

L$DU

0
LS$DESC
-73743
LSERRTBL
LSINIT
LSCLEAN
L$AUTO
L$PROT
- 00O

000000
000000G
000000G
000000

PROTECTION TABLE

d —d -

| REV A PATCH 00

— e

. BSKEL?

H 2
21=-Apr=198
21=Apr=198

<<LSNDHW=L SHWLEN>/2>
0
0
0
0
0
=1400

0
1
1

<<LSNDSW=L$SWLEN>/2>

-wORD

L$PROT::. WORD
.WORD
.WORD

-1
-1

. BLKW
LENDSW::

’

-1

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKLZ2.BLI.1

Page

SEQ 0020

PROTECTION TABLE
.GLOBL
.GLOBL

|
O

nnn

4
] —f —

e
g bt B 4

)
)
)
ol

T
L
L
(L

bt b

)

— —{ —
—

bt By B
b
b

=
—f

[ooXosRooXuodooRooRooRooRooRvodooRuoduo
ookvo)

St Bt bt By By by bt et Bt B

BITO==
EF .START==
EF .RESTART==
EF .CONTINUE==

o
HiuwnnmmnnnoO=rRnWwWs

—

"nn

LOT=
ADR=

nmuonnh

EF .NEW==

PRIO

LS$SOFT, TSPTHV, LSRPT, LSINIT
LSCLEAN, LSLAST, LSHARD, LSDVTYP
LS$DESC, L$DU, L$AU, LSAUTO, T1
-100000
40000

20000

10000
4000

2000

1000

200

Emmmmmmmmm
Bt Bt

SNOWS NNV OOCOO0O0O0O0DO
==
O=NWH
N NOOVO =W

.GLOBL

R
o]

REV A PATCH 00

@
=]

BSKEL2

1 2
21-Apr=1981 08:27:48
21=-Apr=1981 08:15:46

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKLZ2.BLI.1

(@)

Page

SEQ 0021

J 2
21-Apr=1981 08 :27:48
21-Apr-1981 08 :15:46

2000

4000
10000

20000

LSERRTBL==
L$Sw==
L $HW==
L$DEPO==

DFPTBL==
SFPTBL==

: Size:

; Run Time:

0 code + 64 data words
00:04.2

: Elapsed Time: 00:08.4
29 pages
: Memory Used:
: (ompilation (omplete

40000
=700000
ERRTYP

LSSWLEN+?2
LSHWLEN+?2
LSREV+1

LSHWLEN+?
LSSWLEN+2

T0PS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKLZ.BLI.1 QP

55098022

K 2
21-Apr-198
21=-Apr=198

BSKEL3
- REV A PATCH 00

08:28:04
08:17:20

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL3.BLI.T1T (1)

MODULE BSKEL3 (IDENT = 'REV A PAT(H 00') =

BEGIN

REQUIRE °*BLSMAC.REQ';

EQUALS;

XSBTTL 'TYPE AND DESCRIPTION'

.
.

4
.

.
-

DEVIYP

.
.

(XASCIZ'ML=11 BLOCK MODE MEMORY SY5');

3
.

DESCRIPT (%ASCIZ'ML=11 ARRAY MAINT PROG'):

.
.

.
-

v
-

%SBTTL "HARDWARE PARAMETER CODING SECTION'

.
-

.
o

.
-

4
.

.
.

4
-

.
.

»
.

4
.

.
.

L4
-

.
.

L4
.

L4
-

.
.

.
-

4
.

v
.

.
-

4
-

.
.

.
-

L
-

4
'l
.

s 44

THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS
THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE

INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS
WITH THE OPERATOR.

VN WN—=O0
NBWR—=O0V0 NORNHWN—=O0
&W%WWWWNNNNN
RPN — CONO

—=OVoo~N

—— O T
) i cald il il cilh i il wld wld ald [P PP

il il il il i

wvwn
o (W TV TV IV LV LV, LW LV, W LV, LV, LV, LV, LV,
Vi oo
oo ona wviwvwonov
—d cad il ol il il
-t O
no
S
WWW

ailzinlalialainiainl

BGNHRD;
BIND

' DEF INE HARDWARE MESSAGES

= UPLIT(XASCIZ'IS ENTIRE ML-11 SYSTEM TO BE MASKED'),
M_ARR = UPLIT(XASCIZ'IS A SINGLE ARRAY TO BE MASKED'),
= UPLIT(XASCIZ'IS A SINGLE BANK TO BE MASKED'),
= UPLIT(XASCIZ'ENTER BANK NO. TO BE MASKED'),
= UPLIT(XASCIZ'ENTER BOARD NO. TO BE MASKED'),
UPLIT(XASCIZ'STARTING RH BASE REGISTER ADDRESS'’,
E =
UPLIT(XASCIZ'DUT DRIVE NUMBER'),
= UPLIT(XASCIZ'IS DRIVE OPTION AN ML11A'),
T

= UPLIT(XASCIZ'ARE YOUR INPUTED PARAMETERS

SELECT WHICH OPTION THE PROGRAM IS
TO RUN UNDER.

OPTION 1. PROM MAINT ENTIRE ML11 SYSTEM
OPTION 2. PROM MAINT A SINGLE ARRAY
OPTION 3. PROM MAINT A SINGLE BANK

ASK AM ] TO MASK AN ENTIRE SYSTEM ?

CORRECT®):

SEQ 0023

BSKEL3

HARDWARE PARAMETER CODING SECTION

1542
1543
1544
1545

GPRML (M_SYS,%0'0",1,N0,1);
}FERT(DRV_PRAM):

ASK AM 1 TO MASK AN ENTIRE ARRAY ?

GPRML (M_ARR,%0'2',1.N0.1);
¥FER1(ENIER_BOARD):

ASK AM ]I TO MASK A SINGLE BANK ?

NN NN TN
NN HWh—

)l il il il i il sl il i il sl ) il ) i sl
NN NN NN NN
v VTN

§PRML<n.e~x.zo'4'.1.~o.1);
INPUT TO THE PROGRAM THE SELECTED

PROGRAM RUN TIME PARAMETERS.

*FERF(DONE_HRD);

v W= OV
80‘0“

ENTIRE BANK TO BE PROM MAINT

OONON

'3"
,NO,1);
GPRMD (M_BNK_NO,%0'6',D,%0'7"',0,%DECIMAL"

SL(E§TER_BOIRD>:

' ENTIRE BOARD TO BE PROM MAINT

IMAL"
15" ,NO,1);
GPRMD (M_BRD_NO,%0'10*,D,%0'77",0,XDEC

) i e

SL(ng_PRAnf:

ENTIRE RH BASE ADDRESS
ENTIRE DRIVE UNDER TEST

ENTIRE DRIVE OPTION 16K PARTS OR 64K PARTS

GPRMA (M_RH_BASE ,%0°'12',0,0 .%0'177777" ,YES,1);

N0, 1);
GPRMD (M_DUT, %0 14°,0,%0°'7*.0,%0'77"
.1.N0, 1)
20" 16ION,
GPRML (M_OPT

FORCE THE OPERATOR TO REVIEW HIS INPUTED
PARAMETERS FOR CORRECTNESS BY ASKING THE
THE INIT CODE WILL ABORT
NEXT QUESTION.

e P P T P P P P

PRP PR R

R R N R R L A TR

R TR

A E A

R PRTR PR PR TR PRLR

R TR D D TR A L L

REV A PATCH 00

k¥
21-Apr=1981 08:28:04
21=Apr=1981 08:17:20

THE PROGRAM EXECUTION IF HE RETURNS A NO

1582
1583
1584
1585
1586

1587

RESPONCE

$L (DONE_HRD);
ENDHRD;

GPRML (M_CORRECT,%0'20",1,YES,1);

%SBTTL 'SOF TWARE PARAMETER CODING SECTION'

;
:
:

THE SOF TWARE PARAMETER CODING SECTION CONTAINS MACROS
THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. THE
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL3.BLI.1 (M

55095024

BSKEL3

REV A PATCH 00
C 1594
C 1595
C 1596
C 1597

INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS
WITH THE OPERATOR. HOWEVER THIS PROGRAM WILL NOT USE THIS SECTION.
)%

BGNSFT;
BIND

g DEF INE THE SOF TWARE MESSAGES

é_aer = UPLIT(XASCIZ® NOT USED TYPE <CR>');

O OO

—=OVONOVNSWN—=O
V0o~

S g—g—p———
R
R

O ONCONO OO
oo ocooooorOrOrOrOr

| INPUT THE SOFTWARE QUESTION TO THE PROGRAM

GPRML (M_RET,0,1,YES,1);

e
— et D e e e

OYOYO

21=-Apr=1981 08:17:20

SOF TWARE PARAMETER CODING SECTION

S
&2

1598
1599
1600
1601
1602
1603
1604

21=-Apr=1981 08:28:04

ENDSFT;

%SBTTL 'REPORT CODING SECTION®

! THE REPORT CODING SECTION CONTAINS THE
5 "PRINTS'' CALLS THAT GENERATE STATISTICAL REPORTS.

' THIS SECTION "AUTO DROP' IS NOT USED
' DURING THIS PROGRAM

BGNRPT;

RETURN;
ENDRPT;

114

055

061

040

114
113
117
040
115

117
040
104
115
117

LTITLE
.IDENT

S3KEL3
/REV A /

PSECT

$CODE$

LSDVIiYF::
ASCIT

JSCIL

LASCII
ASCII
JLASCII
JASCII
LASCII

/ML=/

/711 7/

/BLO/
/CK /
/MOD/
/E M/
/EMO/

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL3.BL!.1

Page

SEQ 0025

REV A PAT(H 00

131

040
123

055

01120
000044
000001
000000¢
000110
000116
000120
000122
000124
000126

000132
000134

002120

N 2
21-Apr-1981 08:28:04
21-Apr=1981 08:17:20

REPORT CODING SECTION

o-a..a-a-a-ag—a
[N Sty DN
8NNOWN
—

BSKEL3

040
122

/RY /
/SYS/
<00>

L$DESC::.ASC]

040

LSHRDLN::

GP$1::

.WORD

GP$2::

.WORD

/ML=/

/11

GP$3::

.WORD

/G/<00><00>

§§6L$NDHRD-LSHRDLN>/2>-1>
T.SYS
§§EESLDRV.PRAM-iDRV.PRAM>'400>*4>+20>

.WORD
.WORD
$ENTER.BOARD:
.WORD

T.ARR

.WORD
.WORD
$DONE .HRD :
.WORD
GP$4::
.WORD
.WORD
.WORD
.WORD
.WORD
$LENTER.BOARD:
.WORD

?.BNK

GP$5::

.WORD

000140
000142
000144
000146

.WORD
.WORD
.WORD
$L. DRV .PRAM:

000150
000152

GP$6::

.WORD

000156
000160
000162

GP$7::

.WORD

000166
000170

/ARR/
/AY /
/MA]/
/NT /
/PRO/

040
117
000

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL3.BLI.1

§§§6$LENTER.BOARD-SENTER.BOARD>'400>*4>+20>

§SZ§$LDONE.HRD-SDONE.HRD)‘400>*4>+40>
;.BNK.NO

0
3
1004
4042

M.BRD .NO
77

0
17

1004

5031

B.RH.BASF
-1

6022

M.DUT
7

(1)

Page

SEQ 0026

| BSKEL3
| REV A PATCH 00 REPORT CODING SECTION
000172
000174
000176

000200

007120
000320
000001

000210

000212

000214
000216
000220
000222

000000

000000
000003
0C0006
000011
000014
000017
000022
000025
000030
000033
000036
000041
000044
000047
000052
000055
000060
000063
000066
000071
000074
000077
000102
000104
000107
000112
000115
000120
000123
000126
000131

.WORD
.WORD
.WORD

7120
M.OPTION
1

WORD

1004

.WORD
.WORD

M.CORRECT
1

BLKW

.WORD

LSNDHR:D:

LS$SFTLN::
JWORD

000000C

GP$10:: .WORD
.WORD
.WORD

000130
000416°
000001

11
105
MM
040
055
040
123
115
117
105
101
105
1M1
101
1M
114
101
101
124
102
115
113
000
11
101
11
114
102
113
117
105

GP$8::

GP$9::

000352
000001

LENDSFT::

123
116
122
115
061
123
124
040
040
040
123
104
123
040
116
105
122
131
117
105
101
105
000
123
040
116
105
101
040
040
040

21-Apr=1981 08:17:20

$LDONE .HRD:

001004

| 000202 010130
000204
000206

21-Apr-1981 08:28:04

040
124
105
114
061
131
105
124
102
115
113
000
040
123
107
040
122
040
040
040
123
104

P.AAA:

040
123
107
040
116
124
102
115

"P.AAC:

P.AAB:

10130

<<<LSNDSFT=L$SFTLN>/2>=1>

130
M.RET
1

.BLKW

PSECT

S$PLITS,

.ASCII
LASCII
LASCII
LASCIT
ASCIT
LASCII
LASCII
ASCII
LASCII
ASCII
LASCII
LASCII
.ASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCI1
LASCII
JASCII
LASCII
JASCII
LASCII
LASCII
JASCII
LASCII
LASCIT
LASCII
LASCIDT

/IS /
/ENT/
/IRE/
/7 ML/
/=117
7 Sy/
/STE/
/M 1/
/0 B/
/7E W/
/ASK/
/ED/<00>
/IS /
/A S/
7ING/
/LE /
/ARR/
/AY /
/70 /
/BE /
'MAS/
/KED/
<00><00>
/IS /
/A S/
7ING/
/LE /
/BAN/
/K T/
/0 B/
/E W/

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL3.BLI.T (1)

Page 5
SEQ 0027

—

BSKEL3
REV A PATCH 00 REPORT CODING SECTION
0001 34

000137
000142
000145
000150
000153
000156
000161
000164

000167

000172
000175
000176
000201
000204
000207
000212
000215
000220
000223
000226
000231
000234
000237
000242
000245
000250
000253
000256
000261
000264
000267
000272
000275
000276
000301
000304
000307
000312

000315

000320
000323
000326
000331
000334
000337
000342
000345
000350
000352
000355
000360

101

123

21-Apr=1981 08:17:20

LASCII

113

104
116

000
124

124
040
101
040
056
117
105
101
105
000
101
111
040
040
123
122
11
105
101
122
123

P.AAE:

122
102
105
105
123
122
104
105

116
122
117
104
117
124
102
115
113
000
124
124
107
110
101
040
107
124
040
104
123

104
040
111
040
115

125
104
126
116
102

124
122
105
125
105

P.AAG:

105
105

105
102
113
117
124
102
115
113
000
105
105
102
122
116

040
040
040
123

104
i23
122
116

000

122

111
104
126
117
1M1
040
040
061
000
101
040
125

122
101
040
056
117
105
101
105

000

1¢3
12
10§
120
117
101
115
061
000
122
131
122

040
116
116
040
040
040
123
104

000

21-Apr-1981 08:28:04

P.AAD:

P.AAF:

040
111
040
124
116
118
114
101

P.AAH

105
117
040

P.AAI:

/ASK/

ASCII
LASCII

/ED/<00>
/ENT/

LASCII
LASCII
LASCII
JASCII
LASCII
,ASCII
ASCII1
JASCII
.ASCII
.ASC1I1
LASCII
LASCII
LASCII
ASCII
.ASCII
LASCII
LASCIT
.ASCII
LASCII
JASCII
LASCII
LASCII

/7 TO/
/ BE/
/7 mA/
/SKE/
/D/<00><00>
/STA/
/RTI1/
/NG /
/RH /
/BAS/
/E R/
/EGI1/
/STE/
/R A/
/DDR/
/ESS/
<00>
/DUT/
/ DR/
/IVE/
/7 NU/
/MBE/

LASCII
.ASCII1
ASCII
LASCII
JASCII
.ASCII
ASCII
LASCII
LASCII
.ASCII
JASCII
.ASCII
LASCII
LASCII

LASCII

LASCII
.ASCI1
LASCII
LASCII
LASCII
LASCII
LASCII
LASCIT
LASCIT
.ASCII
LASCII
LASCII

/ER /
/BAN/
/K N/
/0. /
/70 /
/BE /
/MAS/
/KED/
<00>
/ENT/
/ER /
/BOA/
/RD /
/NO./

/R/<00><00>
/1S 7/
/DRI/
/VE /
/0PT/
/ION/
/7 AN/
/7 ML/
/711A/
.00><00>
/ARE/
/7 YO/
/UR /

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL3.BLI.T1 (1)

Page 6
SEQ 0028

e
e TM e L
e
R

P.AAJ:

LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII

LASCII
LASCII
LASCII
LASCII
LASCII
LASCII

BITi5==

BIT14==

BIT13==
BIT12==
BIT11==

BIT10==
BIT09==
BIT08==

BITO7==

BIT06==

BIT05==
BIT04==
BIT03==
BIT02==
BITO1==

BIT00==
BIT9==
BIT8==
BIT7==
BIT6==

BITS5==

BIT4==

BIT3==
BIT2==
BIT1==

BIT0==

EF .START==
EF .RESTART==
EF .CONTINUE==
EF .NEW==
EF .PWR==

PRIQ7==
PRI106==
PRI0S==

/INP/
JUTE/
/D P/
/ARA/
/MET/
/ERS/
7 €O/
/RRE/

/CT/<00>
/ NO/
/T U/
/SED/
TY/
/PE /
/<CR/

/>/<00>

-100000
40000

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL3.BLI.1 (M

Page

SEQ 0029

SRR

120

B e e e e R Y e B R ettt
N WON—=OO—=rNNO nNNO
NO =S NNOWVNNWHN —=0OW

OWWVNHNOOoNSrnownow O

—O

116
124
QOONNOH=rNVNONO no£S

076

REPORT CODING SECTION

[ R

O —
NSO
O—=O
NN
SO OWHownownun-=

000363
000366

?_a_ao_n_ao_a_a..a.n—a_a
RGz

| BSKEL3
REV A PATCH 00

D 3
4
8:
21-Apr=1981 08:28:0
21-Apr=1981 08:17:20

REPORT CODING SECTION

55098030

i nmn
wiinen

)

> MUVUVOVDO

HOE==
L$HARD==
M.SYS=
M.ARR=
M.BNK=
M.BNK .NO=
M.BRD.NO=
M.RH.BASE=
M.DUT=
M.OPTION=
M.CORRECT=

L$SOFT==

.SBTTL
PSECT

000224

000207

LRPT:

1 word
; Routine Size:
; Maximum stack depth per

000226
000232
000234

004767
104425
000207

; Routine Size:

; Maximum stack

1631

;
g
invocation:

& words

depth per

LRPT REPORT CODING SECTION
$CODES

1613

0 words

TRAP
RTS

invocation:

LESFTLN+?

RTS

LSBTTL
L$RPT:: JSR

177772

.AAC
.AAD
.AAE
. AAF
.AAG
.AAH
LAA]

P.AAJ

M.RET=

000416"

LSHRDLN+2

P.AAA
P.AAB
TVOOVDOUVTVTODTO

—

000010

200

nioO—=rnwWws

PRI

000200
000140
000100
000040

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL3.BLI.1 (1)

. REV A PATCH 00

Cmse333s NODO<ODDODD
D C T A
bt bt bt e
QTEBxDVZOE
DMMe=—M
niooooo

BSKEL3

E 3
21=-Apr-1981 (08:28:
21=Apr=1981 08:17

0 words

L$RPT REPORT CODING SECTION

Pg,LRPT

1629

TETETE TR D

R T

alalalal OV

R I R

BSKEL3
REYV A PAT(H 00
1632
1633

1639

1640

1644

' DURING THIS PROGRAM

' THIS SECTION "AUTO DROP' IS NOT USED

1646

BGNAUTO:

1648

ENDAUTO;

RETURN;

LAUTO:

000207

Routine Size:

Maximum stack

word

.SBTTL

RTS

depth per invocation:

0 words

177772

LSBTTL
LSAUTO: : USR

woras

TRAP
RTS

depth per invocation:

LAUTO AUTODROP SECTION
PC

LSAUTO AUTODROP SECTION
PC,LAUTO
61
PC

0 words

1649

1650

YYD

;

1651
1652

1653
1654

1655
1656
1657
1658
1659

1660

1661
1662
1663

! DROPPED FROM TESTING.

004767
104461
000207

Page

SEQ 0031

' -

1641
1642

Maximum stack

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL3.BLI.1

‘AUTODROP SECTION'

| THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF
' THE "'ADR'' FLAG WAS SET. THE UNIT(S) UNDER TEST ARE (HECKED TO
i SEE IF THEY wiLL RESPOND. THOSE THAT DON'T ARE IMMEDIATELY

; Routine Size:

%XSBTTL

1636
1637
1638

1645

000240
000244
000246

AUTODROP SECTION
%

1647

;

21=-Apr=1981 08:17

1634

1635

1643

000236

F
3
21=-Apr=1981 08: 2

ZSBTTL

°'DROP UNIT SECTION'

"¢

i THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE
!

)%
'

TO NO LONGER BE

TESTED.

THIS SECTION °*DROP UNIT' IS NOT USED

| DURING THIS PROGRAM

BGNDU;

RETURN;

1630

BSKEL3
REV A PATCH 00 DROP UNIT SECTION
1664

LDu:

: Routine Size:

word

LDU DROP UNIT SECTION

1648

.SBTTL

PC,LDU

LS$SDU DROP UNIT SECTION

1663

1664

1680

0 words

000252 004767 177772

L$DU:: JSR

TRAP

104453

RTS

000207

& words

; Routine Size:

: Maximum stack depth per invocation:

0 words

YOYOYOHY
M

1668
1669

1670

%SBTTL

"ADD UNIT SECTION®

1671
1672

! THE ADD=-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES
TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK
!

1676

1673
1674
1675

1677
1678
1679
1680
1681

!
TO THE
=
)%

TEST CYCLE.

THIS SECTION "ADD UNIT'

! DURING THIS PROGRAM
!
BGNAU;
RETURN;
ENDAU;

; Routine Size:

IS NOT USED

LAU:
1 word

: Maximum stack depth per invocation:

0 words

000264 004767 177772

L$AU::

104452

.SBTTL

LAU ADD UNIT SECTION

.SBTTL

LSAU ADD UNIT SECTION

TRAP

—_WN

R R

1667

R
L
R
T
TETETE
TR IR I
TR

1665

1666

000262 000207

000270

Page 10
SEQ 003¢

LSBTTL

RTS

: Maximum stack depth per invocation:

000260

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL3.BLI.T1 (1)

ENDDU;

000250 000207

000256

21=Apr=1981 08:28:04
21=Apr=1981 08:17:20

RTS

JSR

PC,LAU

BSKEL3
REV A PATCH 00

000272

H 3
21=Apr=19 81
21=Apr=19 81

ADD UNIT SECTION
RTS

000207

; Routine Size:

4 words

;

: Maximum stack depth per invocation:

O words

1682

1683

1684
1685
1686

END
ELUDOM

20 code + 216 data words
00:05.5
Time:
00:09.5
ed
Elaps
Size:

Run Time:

30 pages
Compilation (omplete

Memory Used:

8:28: 04
8:17: 20

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL3.BLI.T (1)

SEG

9503 3

21=Apr=1981 08:19:06

REV A PATCH 00

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.T (1)

MODULE BSKEL4 ( IDENT = 'REV A PAT(CH 00') =

o
.

BEGIN

L4
.

i\ PRETTY BLF COMMANDS

.
.

]

i <BLF /NOF RROR>

.
.

SE>
_KEY
| <BLF /L OWERCA

.
.

i LIBRARY FILES

.
B

4
-

.
.

§ REQUIRE FILES

.
.

2
.

.
-

require 'BLSMAC.REQ';

.
.

L4
.

.
.

4
-

.
-

K
-

4
-

4
.

.
.

.
-

4
-

.
-

.
.

.
-

.
B

4
B

L4
3

3
= =
b
s
NWWWNINON PNONONORNONOMNOND
W =20V
NN
WN=O
W =OV0 N OV

L4
.

e A L A IV

p————

(T TV IV TV TV TV LW IV TV AV NV LV LW RV R0 RV AV RV R

MNYMIOYOYANOYOYOY
YN OYOYOYOY A OY O OYOY OO OO O

BSKEL4

I 3
21=-Apr=1981 08:40:22

DUE TO YHE BLiSS=16 COMPILER BLISS16 COMPILERS
THE fOLLQUING ROUTINE SUBSCRIPTS ARE USED:
: ROUT INE SUBSCPIPTS

I ROUTINE NAME = INITIALIZE
IN_ROUTINE NAME = INTERIGATE
L_ROUTINE NAME = LOAD
DM ROUTINE NAME = DIAGNOSTIC MODE
GEN_ROUTINE NAME = GENERATE
FB ROUTINE NAME = FIND BAD
CLR_ROUTINE NAME = CLEAR
OF F_ROUTINE NAME = OFFSETS
MOV ROUTINE NAME = MOVE
CS_ROUTINE NAME = CHECK SUM

PM"ROUTINE NAME = PROM MAINTANENCE

CAC_ROUTINE NAME = CALCULATE
BL ROUTINE NAME = BLAST
VER _ROUTINE NAME = VERIFY
S_ROUTINE NAME = SEARCH
§_Rou71~5 NAME = TRANSFER

g MISCELLANEOUS SUBSCRIPTS

”

F_MISCELANEOUS NAME = FLAG

RESTRICTION OF 6 CHARACTERS PER UNIQUE VARIABLE NAME

55095034

. BSKELS
' REV A PAT(H 00 CONSTANT LITERAL DECLARATIONS
:

qggg

%sbttl *CONSTANT LITERAL DECLARATIONS'

}g%g

: CONSTANT LITERAL DECLARATIONS

1538

21=Apr=1981 08:40:22
21=-Apr=1981 08:19:06

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (2)

:
:

1539
1540

:
§
2
:
:
:

1543
1544
1545
1546
1547
}gzg

FUNC_1 = %0'000001°,
FUNCZ2 = %0'000011°,
FUNCZ3 = %0'000031°,
FUNCZ4 = %0'000051',
FUNCZS = %0'000061°,
fUNC—6 = %0'000071",

;22?

: DATA CONSTANTS

1552

ONES= %o0' 177777'

'ALL ONES DATA FIELD

:
:

1554
}ggg

ZEROES = ¥%o0'000000°,
ZERO %0'000000°,

'ALL ZEROES DATA FIELD
!ZERO DATA FIELD

}gg;

E REGISTER ACCESS OFFSET INDEXES

:
:
:
:

1559
1560
1561
1562

MLCST1 = 0,
MLWC = 1,
MLBA = 2,
MLDA = 3,

1564

MLDS = 5,

'ML_ADDR + %X0'12' DRIVE STATUS REGISTER

:
:
:
:
:

1569
1570
1571
1572
1573

MLDB = 9,
MLMR = 10,
MLDT = 11,
MLSN = 12,
MLE1 = 13,

'ML_ADDR + X0'22' DATA BUFFER REGISTER
'ML_ADDR + X0'Z24' MAINTENANCE REGISTER
'ML_ADDR + %X0'26' DRIVE TYPE REGISTER
'ML_ADDR + X0'30' SERIAL NUMBER REGISTER
'ML_ADDR + %0'32' ECC CRC WORD REGISTER 1

}22}

:
:
:
:

:
:
3

:
S
:

1553

1563

1565
1566
1567
1568

1574
1575
1576

1577
1578
1579

1580

}gg;

}ggz

1585

L(iteral
:

! MASS BUS TRANSFER CODES

ONE = %0'000001°

MLCS2 = 4,
MLER = 6,
MLAS = 7,
MLLA = 8,
MLPA = 8,

MLE2 = 14,
MLD1 = 15,
MLD2 = 16,

MLEE = 17,
MLEL = 18,
MLPD = 19,

MLBAE = 20,

flLCS3 = 21,

!NOOP FUNCTION
'DRIVE CLEAR FUNCTION
!SEARCH FUNCTION
'WRITE CHECK FUNCTION
'WRITE FUNCTION
'READ FUNCTION

'SINGLE ONE DATA FIELD

'ML_ADDR + %0'0' CONTROL AND STATUS REGISTER 1
'ML_ADDR + %0'2' WORD COUNT REGISTER
'ML_ADDR + %X0'4' UNIBUS ADDRESS REGISTER
'ML_ADDR + X0'6' DESIRED ADDRESS REGISTER

'MLZADDR + %0°'10' CONTROL AND STATUS REGISTER 2
'ML_ADDR + X0'14' ERROR REGISTER
'ML_ADDR + X0'16' ATTENTION SUMMARY REGISTER
'ML_ADDR + %0'20' LOOK AHEAD REGISTER
'ML_ADDR + X0'20' PROM ADDRESS REGISTER

'MLZADDR + %0'34' ECC CRC WORD REGISTER 2
'ML_ADDR + X0'36' DATA DIAGNOSTIC REGISTER 1
'MLZADDR + %0°'40°' DATA DIAGNOSTIC REGISTER 2

'ML_ADDR + X0'42°' ECC ERROR REGISTER
'ML_ADDR + X0'44' ECC ERROR LOCATION REGISTER
'ML_ADDR + X0'46' PROM DATA REGISTER
'MLZADDR + X0°'S50' BUS ADDRESS ES2TENSION REGISTER

.+ %0°'52' CONTROL AND STATUS REGISTER 3
'ML_ADDR

; ERROR NUMBER (ONSTANTS

! wesxx FRROR LOCATION #==+

Page 2
SEQ 0035

BSKEL&

REV A PATCH 00 CONSTANT LITERAL DECLARATIONS
1586
1587
1588
1589
1590
1591
1592
1593

;
;
;
;
;
;
;
:

1594
1595
1596
1597
}ggg

;
;
;
;
}

ERR_1 = 1,
ERRTMZ = 2.
ERRC3 = 3,
ERRCG = &,
ERRCS = S,
ERRT6 = 6,
ERRC7 = 7.
ERR_8 = 8,

ERRCS = 9,
ERRC10 = 10,
ERRC11 = 11,
ERRC12 = 12,
ERRC13 = 13,

K 3
21-Apr=1981

08:40:22

21-Apr-1981 08:19:06

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1 (2)

"INIT CODE SECTION
i INIT CODE SECTION
i INIT CODE SECTION
iPM_THIS_BANK ROUTINE
i IN"ERROR_MAP ROUT INE
i IN_ERROR_MAP ROUT INE
i IN"BLAST"TBL ROUTINE
'VER_BLAST ROUTINE
i INIT CODE SECTION
iBL_PROMS ROUTINE
i VER_ERROR_MASK ROUT INE
i VER“ERROR "MASK ROUT INE

'MASS BUS TRANSFER ROUTINE

;
:
:

}28?
1602
1282

g DESIRED SECTOR ADDRESS FIELD SELECT CONSTANT VALUES
' BANK SELECT SIZE EXPRESSION
BNKSSEL_SIZE = 2,
i ARRAY SELECT SIZE EXPRESSION
ARRSSELZSIZE = 4,

1282

§ FLAG REGISTER SELECTION DEFINITION

1607

F_FLG_ERR = 0,

:
:
:
:
:
:
:
:
:
:

}g}g
1618
}g}g
}25}
1623
1624
1625
1259
}253
1630

| BOOLEAN VALUES
TRUE = 1,
FALSE = 0,
g CRC DATA BIT DEFINITIONS

;
:

;2%2
1636

g MISCELLANIOUS CONSTANTS
ML11A = 1,

;
;
:
:
:
:
;

f
:

1608
1609
1610
1611
1612
1613
}2}@

1631
}ggg

1637

FTUNC_ERR_FLG = 1,
F"ERR_MAP_ENTERED = 2
F_BLST_TBL_ENTERED = 3,
F_ALL_BAD_THIP = 4,
F_RAND _DATA = 5,
FTABORT_ARRAY = 6,
FZD_CLK_TIME_OUT = 7,

CRC_P = 36,
CRCCA = 37,
CRCTB = 38,
CRCCNIBBLE = 2,
g DELAY MACRO CELAY VARIABLES
ONE US = 1,

FIFTY MS = 100.
TEN_MS = 10000,

SET_FLG = 1,

| GENERAL PURPOSE ERROR FLG

DETECTED
i INDICATES AN UNCORRECTABLE ERROR WAS
i INDICATES THAT THE ERROR MAP HAS AN ENTRY
' INDICATES THAT THE BLAST TABLE WAS ENTERED
>14 ROW OR (OL BAD
' INDICATES THAT THIS BANK HAS ONE ALL BAD CHIP
LY USED
I INDICATES THAT RANDOM DATA PATTERN IS ISPRESENT
TO BE ABORTED
' INDICATES THAT FURTHER TESTING OF THIS ARRAY
T INDICATES THAT THE DATA CLOCK BIT IS HUNG HIGH
ILOGICAL TRUE INDICATOR
iLOGICAL FALSE INDICATOR

'ECC CRC CHIP 36
"ECC CRC CHIP 37
iECC CRC CHIP 38
iECC CRC NIBBLE NINE
'DELAY FOR ONE MICRO SECOND
iDELAY FOR SO MILLI SECONDS
iDELAY FOR 10 MILLI SECONDS

'ML11A IS A 16K MOS RAM ARRAY

iCONSTANT TO SET A FLAG

Page

SEQ 0036

——
—————————————

BSKELS
REV A PATCH 00 CONSTANT LITERAL DECLARATIONS
:
:

1638
1639
1640
1641

CLR_FLG = 0,
enabt = 1
DISABE = 6.

21=-Apr=1981 08:40:22
21=-Apr=1981 08:19:06

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (2)

'CONSTANT TO SET A FLAG
'"ENABLE MLMR REGISTER FUNCTION
'DISABLE MLMR REGISTER FUNCTION

Page &
SEQ 0037

M 3

21-Apr=1981 08:40:22

BSKELSG

21-Apr=1981 08:19:06

' REV A PATCH 00 FIELD DECLARATIONS
3

}g:%

}sbttt *FIELD DECLARATIONS'

1644

| FIELD DECLARATIONS

1646

1645

1647
1648

3
s

1228

:
:

1651
1652

1655

3
$

1653
1654

1656

:
:
:
:
s
:
:
3
2
3
:
:
3
:
:
:

:
:

field
!

; REMAINING ERROR TABLE STRUCTURE MAP

MAP_REM_TBL =
set

tes,

1660

MAP_CHIP_TBL =

I FAILING CHIP AND PATTERN STRUCTURE MAP
set

FAULT = [15, 1, 0].
PAT_0 = [14, 1, 0J.
PATC1 = [13, 1, 0],
RAN_1 = [12, 1, 0],
RAN_2 = [11, 1, 03.
RAN_3 = [10, 1, 01,
RAN_4 = [9, 1, 01,
RAN_S = [8, 1, 0],
RAN_6 = [7, 1, 0],
RAN_7 = [6, 1, 0],
RAN_8 = [5, 1, 01,
RAN_9 = [4, 1, 0],
RAN_10 = (3, 1, 0J.
RAN_11 = [2, 1, 0],
RAN_12 = [1, 1, 0],
RAN_13 = [0, 1, 01,

1662
1663
1664
1665
1666
1667
1668
1669
1670
1671
1672
1673
1674
1675
1676
1677

PATS = [0, 15, 031,

1678

ALL = [0, 16, 0]

1679

1680
1681

'SELECT BOTH ROW AND COLUMN POSITION

RO_CL = [0, 16, 0]

1661

'SELECT FAILING ROW NUMBER POSITION
'SELECT FAILING COLUMN POSITION

ROW = [8, 8, 0].
coL = [0, 8, 01,

1657

}ggg

tes,

}gg%

; WRITE BUFFER STRUCTURE MAP

1684

MAP_WRT_BUF =

:
:
:
:
:
:
5
:

1686
1687
1688
1689
1690
1691
1692
1693

1685

PA:<NCALE>PMSKL4.BLI.1 (3)

Page

SEQ 0038

TOPS=20 Bliss=16 v2(212)

set

BIT_O = [0, 1, 0],
BIT_1 = [1, 1, 0.
0].
BIT_2 = [2, 1,
BIT_3 = [3, 1, 0],
BITZ4 = [4, 1, 0],
BITCS = [5, 1, 01,
BIT_6 = [6, 1, 0].
0],
BIT"7 = [7, 1,

ISET WHEN THIS CHIP HAS ADDITIONAL FAILING ROW/(COL
'THIS CHIP FAILS ZEROES PATTERN
'THIS CHIP FAILS ONES PATTERN
'THIS CHIP FAILS RANDOM PAT 1
ITHIS CHIP FAILS RANDOM PAT 2
'THIS CHIP FAILS RANDOM PAT 3
'THIS CHIP FAILS RANDOM PAT 4
'THIS CHIP FAILS RANDOM PAT 5
ITHIS CHIP FAILS RANDOM DATA 6
ITHIS CHIP FAILS RANDOM DATA 7
ITHIS CHIP FAILS RANDOM DATA 8
'THIS CHIP FAILS RANDOM DATA 9
'THIS CHIP FAILS RANDOM DATA 10
'THIS CHIP FAILS RANDOM DATA 11
ITHIS CHIP FAILS RANDOM DATA 12
'THIS CHIP FAILS RANDOM DATA 13
'SELECT ALL FAILING PATTERNS
'SELECT ALL BITS IN BYTE

'DEFINES BIT O OF WRITE BUFFER
'DEFINES BIT 1 '
"
"
'DEFINES BIT 2 *'
»
'DEFINES BIT 3 '
"
=
'DEFINES BIT &4 "'
.
"
'DEFINES BIT 5 "'
e
o
'DEFINES BIT 6 "'
"
'DEF INES BIT 7 "'

————————————————————

KSR

g KWW‘.N
S W
OO0 00

1741
1742
1743
1744
1745

N 3
21-Apr=1981 08:
21-Apr-1981 0 8
)

Ok
aa
[
T s s s s
OO

OCOOOOO.

oOnnnnunn

I\
U
= aaaasP [» ]
VIS WN—=O

'DEFINES
'DEF INES
'DEFINES
‘DEFINES
‘DEFINES
'DEFINES
:DEFINES
'DEFINES
'DEFINES

TOPS=20 Bliss=16 v2(212)

:06

PA:<NEALE>PMSKL4.BLI.1

BIT 8
BIT 9
BIT 10 0 '’
i
i
BIT 1
BIT 1
BIT 1
BIT 1
BIT 1 5
WORD OF THE WRITE BUFFER
1

£ @Womomommoao @
bt bt b
e —b
1] Pl et

FIELD DECLARATIONS
w <o —_—
e ———— -

D
D
)
e
e
D e
e
el
e
e
) —
—
—d —
)
b —
o
b
)
b
cild
b b
ad
-

s =l

1737
NN\

L T T T
R
L IR TP I IR S
L
L
R TR U TP TR T TR TR TR T T I TR
R T
L

1735

B
R
U
D I

NNNN NNNNNNN NNNNNNNNNNNNNNYNNNNYNYY
WO
NN PPN
= =3 b b s s
2 OO0
WN)
= OOV
NOWVNESW NN=OVONOWVNEWN=0V0~N

A S

REV A PATCH 00

R U T

BSKEL4

LRI

————————

e—
—
—

i TEMPORARY BLAST TABLE STRUCTURE MAP
MAP_TMP_BLST_TBL =
set

NIB_NO = [0, 4, 03,
R_C_NO = (4, 8, 03,
RCT= 15, 1, 03
tes,

-DEFINES FAILING CHIPS NIBBLE POSITION
:DEFINES CHIPS FAILING ROW OR COLUMN
‘SET = ROW ADDRESS, CLR = COLUMN ADDRESS

g RH / ML=11 REGISTER ACCESSING STRUCTRUE MAP
MAP_ML11_REG =
set

MLCS1

CONTROL

SC = [15,

TRE = [14,

STAUTS REGISTER 1

1, 01,
1,

03,

MCPE = [13, 1, 03,
DVA = [11,°1,70],
RDY = [7, 1, 03],

IE = [6, 1,707,

FUNC = (0, 6, 01,

*SPECIAL CONDITION
! TRANSFER ERROR
'BUS PARITY ERROR
'DRIVE AVAILABLE
!DRIVE READY
! INTERRUPT ENABLE
*FUNTION GO BIT
'FUNTION CODE

g MLWC WORD COUNT REGISTER
WC_REG = [0,

16, 01,

'WORD COUNT REGISTER

! MLBA UNIBUS ADDRESS REGISTER
BA_REG = [0,
!

16, 01,

'UNIBUS ADDRESS REGISTER

MLDA DESIRED ADDRESS REGISTER

DA_REG = [0,

16, 01,

'DESIRED SECTOR REGISTER

! MLCS2 CONTROL AND STATUS REGISTER 2

DLT = [15, 1, 01,
WCE

= {14,

1, 0],

'DATA LATE
‘WRITE (HECK ERROR

(3)

55095039

B
-

s
v

'MASSBUS DATA BUS PARITY ERROR

WO OOLIOOOWLY

s
s
.
s

'UNIBUS PARITY ERROR
'NON-EXISTENT DRIVE
'NON=EXISTENT MEMORY

’

. 0],

'MISSED TRANFER

'OUTPUT READY
! INPUT READY
'CONTROLLER CLEAR
'PARITY TEST

'UNIBUS ADDRESS INCREMENT INHIBIT
'UNIT SELECT

R ET R T N

; MLDS DRIVE STATUS REGISTER
'ATTENTION ACTIVE
'ERROR SUMMARY
'MEDIUM ON LINE

MOL

LBT

TETETEIETE

DFR
DRY

nunn

ATTN = [15,
COMP_ERR =

!LAST BLOCK

'DRIVE PRESENT

'DRIVE READY

!VOLUME VALID

YV 6, 1

mitnnun

A T E T ETETE TR P O DL

DCK

UNS
OP]
1AE

ERROR REGISTER

; MLER

Y. €1.

DPAR
ILR

TR YR IRTR IR

{LF

nnwu

CPAR

RMR

[o. 1. 03,

'DATA CHECK
'DRIVE UNSAFE

'OPERATION INCOMPLETE
' INVALID ADDRESS ERROR
'ADDRESS OVERFLOW ERROR
'ECC HARD ERROR
'DATA PARITY ERROR
'CONTROL PARITY ERROR
'REGISTER MOD ERFUSED ERROR
'ILLEGAL REGISTER ERROR
'ILLEGAL FUNCTION

MLAS ATTENTION SUMMARY REGISTER

éTTN_REG = [0, 16, 01,

'ATTENTION SUMMARY REGISTER

R T R R

i MLPA PROM ADDRESS REGISTER

TR TETE TR

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (3)

!PROGRAM ERROR

-y

e
D =3

R
-

b ey

"nnunun

DRV_SE

BAI

T R O

PAT

L R

L U

MDPE
ORDY
IRDY
CLR

"Hunn

PGE
MXF

)

O L A

NED
NEM

Fh—O—
O~ s

PE =

Lo Lam Lo Lamm Bl

FIELD DECLARATIONS
WS N0
—— = (W
He s s ONNOOs O—=No

REV A PAT(H 00

Lol
on Lo Lo}

BSKEL&

21-Apr-1981 08:40:22
21-Apr-1981 08:19:06

éA_REG = [0, 16, 01,
1791

i MLMR MAINTENANCE REGISTER
SIZING = c11.os. 01,

1795
1797

!PROM ADDRESS REGISTER

RT‘[oo

ARR_TYP = [10, 1, 0],
01,
REF"MAR = [7, 1,

P_RW= [6, 1, 03,

!SYSTEM SIZING
! TRANSFER RATE
'ARRAY TYPE
'REFRESH MARGIN
'PROM READ/WRITE

55095040

SSKELS
REV A PATCH 00 FIELD DECLARATIONS

1798

01,
P_DIS = [S5, 1. 01,

D-CLK = (4. 1,
DTDM = [3.71,70],
D_EN = [2, 1, 0]

:
:

1799
1800

:
:
;

1802
1803
}382

;
:

4389
1808

| MLLT DRIVE TYPE REGISTER
DRVIYP = [1., 8, 01,

:
:
:
:

}g}}
}ggz
}g}g
1817

g MLSN SERIAL NUMBER REGISTER
§ER1AL_REG = [0, 16, 01,
g MLE1 ECC CRC WORD REGISTER 1
PAR_CRC_WRD = [8, 6, 01,

}ggg

E1_REG = [0, 6,703,

:
:
:

1355
1823
1824

1801

;

}ggg

:
:
:
:
:
:
:

1818

1825
1826
1827
1828
1829
1830
}ggg

£-pIS = (1, 1, 03,
E“DM = 0, 1, 0],
MR_REG = o, 16, 03,
DT_REG = 0, 1, 03,

CRCSA ="[0, 6, 0],

g MLE2 ECC CRC WORD REGISTER 2
8_32 = [8, 1, 01.
B33 = [9, 1, 01,
B-34 = [10, 1, 03.
B-35 = (11, 1. 01.
B-36 = [12. 1. 03.
B-37 = (13, 1. 03.
BTM38 = [14. 1. 01,
CRcss = [0, 6, 01,
E2_REG = [0, 6, 01,

:
:

;g%z
1835

g MLD1 DATA DIAGNOSTIC REGISTER 1
B_0 = [0, 1. 03,

1848

8713 = (13, 1. 0.

:
:
:
:
:
:
;
:
:
:
:
:

1836
1837
1838
1839
1840
1841
1842
1843
1844
1845
1846
1847
1849

21-Apr=-1981 08:40:22
21-Apr-1981 08:19:06

'PROM DISABLE

iDATA CLOCK
iDATA DIAG MODE

iDATA CHECK ENABLE

ECC DISABLE MODE
'ECC DIAG MODE
IMAINTENANCE REGISTER
'DRIVE TYPE

iDRIVE TYPE REGISTER

'SERIAL NUMBER REGISTER

'PARITY CRC WORD
iCRC WORD A-A

ECC CRC REGISTER 1

'DATA BIT 32

iDATA BIT 33
iDATA BIT 34
iDATA BIT 35
iDATA BIT 36
iDATA BIT 37
iDATA BIT 38

'CRC WORD B-B

iECC CRC REGISTER 2

'DATA BIT 0

81 = [1. 1. 03,
B2 = [2. 1. 01,
83 = [3. 1. 03,
B4 = [4, 1. 01,
B~S = (5. 1. 03.
86 = (6., 1. 01,
87 = [7. 1. 01.
B8 = (8. 1. 01,
B9 = 9, 1. 01,
8710 = [10,71. 02,
B-11 = [11. 1, 01,
812 = [12. 1. 01.

iDATA BIT 1
iDATA BIT 2
iDATA BIT 3
iDATA BIT 4
iDATA BIT S
iDATA BIT 6
iDATA BIT 7
iDATA BIT 8
iDATA BIT 9
iDATA BIT 10
iDATA BIT 11
iDATA BIT 12

B 14 = [14, 1, 01,

'DATA BIT 14

iDATA BIT 13

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (3)

Page 8
SEQ 0041

BSKEL&

REV A PATCH 00 FIELD DECLARATIONS
B 15 = [15, 1, 01,
1850
| §
DB1_REG = o, 16, 03,
}gg}
| 8
| MLD2 DATA DIAGNOSTIC REGISTER 2
}ggz
|

:
:
;
;
:
3

'DATA BIT 16
iDATA BIT 17
iDATA BIT 18
iDATA BIT 19
iDATA BIT 20
iDATA BIT 21
iDATA BIT 22
iDATA BIT 23
iDATA BIT 24
iDATA BIT 25
iDATA BIT 26
iDATA BIT 27
iDATA BIT 28
iDATA BIT 29
iDATA BIT 30
iDATA BIT 31
'DATA DIAG REGISTER 2

}ggz
1875

UNC = [15, 1. 03,

'UNCORRECTABLE ERROR

1877
1878
}ggg

crc = (13, 1, 0],
CHAN = [6. 6. 0],
E_Bit = [0, 6, 0.

'CRC ERROR
i CHANNEL IN ERROR
{ERROR FUNCTION

1867
1868
1869
1870
}g;}

:
3
-3
:

o1-Kpr-1981 08:19:06
'DATA BIT 15
iDATA DIAG REGISTER 1

B_16 = [0, 15, 03,
817 = [1. 1. 0],
818 = [2. 1. 0J.
8719 = [3. 1. 03,
B-20 = (4, 1. 0],
B-21 = [S. 1. 03,
B-22 = [6. 1. 01.
B-23 = [7. 1. 01.
B 24 = (8. 1. 01,
B-25 = [9, 1, 01,
B-26 = (10, 1, 03,
B=27 = [11. 1. 01,
B 28 = [12. 1. 03.
B-29 = [13. 1. 03.
8730 = (14, 1. 03.
8-31 = [15. 1. 03,
?B?_REG = [0, 16, 01,
| MLEE ECC ERROR REGISTER

1855
1856
1857
1858
1859
1860
1861
1862
1863
1864
1865
1866

:
:
:
:
;
:
:
:
:
:

21-Apr-1981 08:40:22

1876

SGL = [14. 1. 01,

§ MLEL ECC ERROR LOCATION REGISTER
%L_REG = [0, 16, 01,
g MLPD PROM DATA REGISTER
éD_REG = [0, 16, 01,

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1 (3)

iSINGLE ERROR

:
:
:
:

}gg}
;ggz
1332
}ggg

}ggg

g MLBAE BUS ADDRESS EXTENTION REGISTER

133}

@AE_REG = [0, 16, 01,

:
:
:
;

}ggz
}ggg
}ggg
1899

| MLCS3 CONTROL AND STATUS REGISTER 3
'CONTROL AND STATUS REGISTER 3
(S3_REG = [0, 16, 03,
| ML_ALL ACCESS ALL BITS IN SELECTED REGISTER
'ACCESS ALL REGISTER BITS
ML_ALL = [0, 16, 0]

;

1901

1900

tes;

'ERROR LOCATION REGISTER

'PROM DATA REGISTER
'BUS ADDRESS EXTENTION REGISTER

Page

SEQ 0042

BSKELS
REV A PATCH 00 STRUCTURE DECLARATIONS
:

;88%

1904

:
3
:
:
:

1905
1906
1907
1908
}g?g

1911

1915

1917

:
:
:

1912
}glz
1916

! STRUCTURE DECLARATIONS

structure
g

i ML=11 REGISTER ACCESSING STRUCTURE

' THIS STRUCTURE ALLOWS ML-11 REGISTER

' ACCESSING TO BE TRANSPORTABLE BETWEEN
' THE PDP=11 AND VAX DIAGNOSTIC SUPERVISORS

!<BLF/NOFORMAT>

begin

1821

local

:
:

1923
1924

ML_REG = .(RH + %upval+*0)<0, %Zbpval, 0>;

1926

end <P, S, E>;

:
:

1922

1925

1927
1628

Page 10
SEQ 0043

1919

1920

TOPS=20 Bliss=16 v2(212)
PA-<NEALE>PMSKL&4.BLI.T (&)

?sbttl *STRUCTURE DECLARATIONS'

21=-Apr=1981 08:40:22
21=Apr=1981 08:19:06

ML_REG;

ML_REG

!<BLF/FORMAT>

)

BSKELSG

P T T
TR TR LR
T T

T T T
O

REYV A PAT(H 00

EXTERNAL DECLARAT]IONS

1929

}sbttl 'EXTERNAL DECLARATJIONS'®

1931

i EXTERNAL DECLARATIONS

1930
1932
1933
1934

1935

1936
1937
1938

1939

1640
1941
1942
1943
1944
1945
1946

1947
1948

1949
1650

1951
1652

21=-Apr=1981 08:40:22

21=Apr-1981 08:19:06

TOPS=20 Biiss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.T (5)

extefnal rout ine

| RANDOM NUMBER GENERATOR ROUTINE WRITTEN IN MACRC SOURCE CODE
RANGEN : novalue;
extefnal

RANDOM N.MBER GENERATOR ROUTINE SEED VARIABLES

SEED1,

'FIRST WORD OF RANDOM NUMBER BUFFER

RANDAT,

'L INKAGE WHICH RANDOM NUMBERS ARE RE TURNED

SEED2,
SEED3,

| DIAGNOSTIC SUPERVISOR GLOBAL VARIABLES

LSUNIT;

iSECOND WORD OF RANDOM NUMBER BUFFER
i THIRD WORD OF RANDOM NUMBER BUFFER

'SUPERVISOR STORAGE OF UNITS SELECTED

Page

SEQ 0044

BSKELS&

" REy A PATCH 00 OWN STORAGE DECLARATIONS
;

;ggz

1955

1657

1959

195%¢

1958

21=-Apr=1981 08:40:22

o1-Apr=1981 08:19:06

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1 (6)

Xsbttl 'OWN STORAGE DECLARATIONS®
| OWN STORAGE DECLARATIONS
!

own

;

1329

| ERROR MAP INTERIGATION STRUCTURES

1962

1963
1964
}ggg
1967
1968
1969
48;9

COL_CNT_TBL : vector [256, byte] volatile,

!COLUMN COUNT TABLE

'REMAINDER TABLE
REM-TBLTM: block [100] field (MAP_REM TBL) volatile,
e, !COPIED REMAINDER TABLE
volatil
M_TBL)
COPTED _REM_TBL : block [100] field (MAP_RE
TABLE POINTER
COUNT
'COLUMN
(OL_PTR : Vector [10, bytel volatile,
i 1/0 BUFFERS
!
'WRITE BUFFER
BUF) volatile,
WRT BUF : block [(128 + 5i1#2)] field (MAP_WRT
BUFFER
'READ
RD_BUF : vector [256] volatile,

13;%

}3;@

i FAILING ROW AND SECTOR STORAGE STRUCTURE
ganon_nAp . blockvector [512. 8] volatile,

!'ERROR MAP OF FAILING ROWS AND SECTORS

:
;
.

}g;g
}g;g

:
:
-

}gg?
1982
1983

i FAILING CHIPS AND PATTERN STORAGE STRUCTURE
'FAILING CHIP TABLE
éHIP_TBL : block [39] field (MAP_CHIP_TBL) volatile,
§ ROW & COL BLAST INFORMATION STORAGE STRUCTURE
| TEMPORARY BLAST TABLE
TMP_BLST_TBL : block [10] field (MAP_TMP_BLST_TBL) volatiie,
TABLE
BLAST
'ACTUAL
BLAZT TBL : blockvector L[4, 512] volatile,

}ggg

g ML-11 ACCESSING STRUCTURE REFERANCE

;
:
3
:
:
;
:

;

}3%2

1998
1999

ARR_SEL_POS : volatile,
BNK”SELTMPOS : volatile,

2002

i PROGRAM FLAG REGISTERS

2004

BAD_BNK_REG : bitvector [8] volatilte,

:
:
.
:

}gg?
1992
1993
1994

:
:

1996
1997

588?

:
g

1995

}ggg

:
:

i COLUMN ADRS BASE INDEX INTO BLAST TABLE

'RH BASE REGISTER ADDRESS
ML_ADDR : ref RH tield (MAP_ML11_REG) volatile,
§ INIT CODE GLOBAL VARIABLES
'NUMBER OF COLUMNS PER MOS RAM
MAX_CHIP_COL,
iML-11 DIVICE UNDER TEST
ML BUT : volatile,
ED DESIRED SECTOR ADRS WHERE ARRAY MAINT IS PERFORMED
‘FABRICAT
ARRSBNK SEL : volatile,
OF HOW MANY BANKS TO ARRAY MAINT
'COUNT
TSTED BNK : volatile,

]

coL _BASE,

2003

INC_BNK : volatile,
INCCARR : volatile,

'BANK ADRS INCREMENT VALUE
i ARRAY ADRS INCREMENT VALUE

BNK_NUM_SEC : volatile,

i INDICATES NUMBER OF SECTORS PER BANK. 16k = 128, 64K = 256

"FIELD SELECT POSITION EXPRESSION
iFIELD SELECT POSITION EXPRESSION

"INDICATES IF BANK HAS NEW ERRORS

Page

SEQ 0045

&
BSKEL

REV A PATCH 00
2005
2006
2007

2008
2009
2010
2011
2012
2013
2014
2015
2016
2017
2018

2019

OwN STORAGE DECLARATIONS

FLG REG : bitvector [16] volatile,
QEGRADE_MOD_REG : bitvector [8) volatile,

21=Apr=1981 08:40:22
21=-Apr=1981 08:19:06

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (6)

'GENERAL FLAG REGISTER

!DEGRADE ARRAY MODE FLAG REGISTER

f MISCELLANECUS VARIABLES

SIZE : volatile,
DST : volatile,
SRC : voiatile,
LST_TSTED_ARR : volatite,
RAND_PASSTM: velatile;

| SUPERVISOR GLOBAL EQUATES

EQUALS;

! TRANSFERS WORD COUNT SIZE
! TRANSFERS DESTINATION ADDRESS
! TRANSFERS SOURCE ADDRESS

'LAST ARRAY MODULE NUMBER IN Mi =11 SYSTEM
'RANDOM DATA PASS VARIABLE

Page
13
SEQ 0046

BSKELSG

REV A PAT(H 00

2020

2021
2022

k3
.

2023

21=-Apr=1981 08:40:22
21=Apr=1981 08:19:06

BIND DECLARATIONS

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (7)

%sbttl °*BIND DECLARATIONS®
!

i BIND DECLARAT]ONS

bind

4
.

! ERROR AND RUN TIME MESSAGES

ILL_CMD_MSG = uplit (%asciz'ILLEGAL PROM MAINTENANCE PROGRAM COMMAND *),

.
.

BGN MSG = uplit (X%asciz'STARTING PROM MAINTENANCE'),
START MSG = uplit (Xasciz'TYPE START TO EXECUTE PROGRAM'),
HQ_ERR_MSG = uplit (¥asciz'HARDWARE QUESTIONS NOT ANSWERED CORRECTLY *),
HQ“MSG = uplit (Xasciz'BLASTING SYSTEM, ARRAY OR BANK NOT SELECTED '),
END_MSG = uplit (Xasciz'PROM MAINTANENCE COMPLETED '),
SUPRES M3G = uplit (%asciz'SUPPRESSING PROGRAM EXECUTION '),

4
.

.
.

.
-

2
-

.
.

RET_DRS MSG = uplit (¥%asciz'RETURNING TO DRS>'),

LUN_MiSS_MSG = uplit (%asciz'LUN O P-TASLE NOT PRESENT'),

.
-

CON_A_MSG = uplit
CON_B_MSG = uplit
CON_C_MSG = uplit
CON_D_MSG = uplit

B
-

L4
.

.
.

(%asciz'CONDITION A"),
(Xasciz'CONDITION B'),
(Xasciz'CONDITION C*),
(Xasciz"CONDITION D '),

UNC_CRIP_MSG = uplit (Zasciz'UNCONFIRMED FAILING CHIP'),
GTRCMSG = uplit (%asciz'MORE THAN ONE UNIT SELECTED FOR PROM MAINT'),
UNIT_SEL_MSG = uplit (%asciz'ALL UNITS EXCEPT UNIT O WILL BE IGNORED'),

.
-

.
.

.
-

.
.

L
-

’

.
.
-

.
.

.
-

SW_BUG_M3G = uplit (%asciz'UNEXPECTED SOF TWARE BUG DETECTED NOTIFY DIAG ENG').
ABORT_MSG = uplit (Xasciz'PROM MAINTANENCE ABORTED FOR THIS ARRAY'),
NO_AD_MSG = uplit (%asciz'NO ADDITIONAL ERRORS BLASTED FOR THIS ARRAY'),
UNC_ERR_MSG = uplit (Xasciz'UNCORRECTABLE ERRORS DETECTED AFTER BLASTING'),
TIME_OUT_MSG = uplit (%asciz'DATA CLOCK BIT FAILED TO RESET AFTER PROM WRITE'),
REP_M7363 MSG = uplit (%asciz'REPLACE ARRAY DATA MODULE M7363'),
MEM_ERR_M3G = uplit (%asciz'MEMORY ERRORS STILL EXIST AFTER BLASTING'),
UNX_DRV_ERR_MSG = uplit (¥asciz'UNEXPECTED DRIVE ERRORS DETECTED'),

RD_XFERTMMSG = uplit (¥asciz'OCCURED DURING A MASS BUS READ TRANSFER'),
WRT_XFER_MSG = uplit (%asciz'OCCURED DURING A MASS BUS WRITE TRANSFER'),
WT_THK_XFER_MSG = uplit (¥asciz'OCCURED DURING A MASS BUS WRITE CHECK TRANSFER'),
¥_MSG = uplTt (Xasciz''),

.
.

k2
-

4
B

4
-

.
-

L4
.

.
B

.
.

L4
-

' PRINTING FORMATS
ONE_MSG = uplit (Xasciz'¥TIN'),

' PRINT ONE MESSAGE

THREE MSG = uplit (Xasciz'XTXTRTIN'),

i PRINT THREE MESAGES

TWO_MSG = uplit (Xasciz'XTXTAN')

FOUR_MSG =

uplit (Xasciz'XTXTXTXTIN'),

LF ="uplit (Zasciz"AN'),
LFS = uplit (Xasciz'ININ')

0_1_PRINT = uplit (%asciz'¥TZ01ZN"),

0_6_PRINT = uplit (Zasciz'XTX06%N'),
D-2TPRINT = uplit (Zasciz'X¥TXD2IN'),

!PRINT TWO MESSAGES

i PRINT FOUR MESSAGES

'PRINT A LINE FEED <CR>
! PRINT TWO <CR>

i PRINT OCTAL DIGIT AND A MESSAGE

' PRINT SIX OCTAL DIGITS AND A MESSAGE
! PRINT A TWO DIGIT NUMBER AND A MESSAGE

DRV_SEL_PRINT = uplit (Xasciz'%ADRIVE X01X%A SELECTEDAN'),

' PRINT THE DRIVE SELECTED NUMBER TO THE OPERATOR
ARR_SEL_PRINT = uplit (Xasciz®¥SXSXSXSXSXSASLSAATESTING ARRAY XD2IN'),

Page

SEQ 0047

! PRINT THE ARRAY SELECTED TO THE OPERATOR

BNK_SEL_PRINT = uplit (%asciz' %SASASXSASXSUSASASXSASASASASXSXSXABANKXSASXSADTAN' ),

' PRINT THE BANK PRESENTLY UNDER TEST TO THE OPERATOR
XSXO1XSXABIT #XSID2AN'),
YXSXD2XSXABANK
(%asciz'¥AARRA
uplit
EXSAD2AN'),
XSX01¥SYANIBBL
YXSXD2XSXABANK
uplit (%asciz'YAARRA
RERUN PROGRAMZN'),
SXSXAOR
MODULEXSXD2X
ARRAY
PLACE
uplit (Xasciz'XARE
')
ZSXO1IN
SXABANK
YXSXD2X
'¥AARRA
uplit (Xasciz

L
L
L
IR

uplit (1asq12'ZSZSZS!SXAMLCS1XS!S!SXSZS1S!SiSXSZS1515151525152062N').

WwC_PRINT

BA_PRINT
DA_PRINT

CS2_PRINT
DS_PRINT

ER_PRINT
AS_PRINT

MR”PRINT
DT_PRINT
SN_PRINT

EE_PRINT
EL-PRINT

'),
uplit (Xasciz'¥SXSASASAAMLWCESZSASXASASXSXSXSASASASASASASASASA06IN
),
06IN
ASASASASASI
SASASASASAS
ZSASASASASA
SXSXSXAMLBA
uplit (¥asciz'¥S¥
')
SASASASI06AN
ASASXASASASA
ASASXSASISAS
YSXSXAMLDAXS
uplit (Xasciz'¥SXS
'
SISISLO6IN
SASASASASI
SASISASASA
CS2XSXSASA
XSXSASXAML
(Xasciz'¥S
uplit
6IN'),
ASLSASASASASI0
ASASASASASASAS
XSXAMLDSZSXSAS
(Xasciz'¥SXSXS
uplit
uplit (Zasc12'ZSZSZSXSXAMLER!SZS%S!SZSZSISXSIS!SXS!SZSXSZSXSZOéZN').
uplit (%asciz' XSXSXSXSXAMLASXSXSXSXSXSASXSXSXSASASXSASASASASRO6IN' ),
uplit (Zasciz'XSZSXSISZAMLMRXSZSZSZSXSZS!SZS!SISZSISXS!SZS!SZOéZN').
uplit (¥asciz'¥SXSXSXSXAMLDTZSASASASASASASASASASASASASASISASI06IN'),
uplit (Zasciz'ZSZSZS!SXAMLSNZSZSISXSZSISZSISZSZSZSXSZSZSISXS1061N').
"),
uplit (asciz'¥SXSXSXSXAMLEEZSASASASASASASASASASASASASASASASA0OIN
uplit (Xasciz'¥SXSXSASXAMLELXSASASASASASASASASASASASASASASASAV6ZN').

HEADER_PR IN T = uplit (%asciz'%SASASXSXSXSASXSXSASZAREGISTER

DUMPININ'),

COL_DESC_PRINT = uplit (Xasciz'XSXSXAREGISTER NAME XSXSXSXSXSXSXACONTENTSIN'),
X_PRINT =

plit

(%asciz'');

2072
2073

BIND DECLARATIONS

REV A PAT(H 00

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (7)

BSKEL4

21-Apr=1981 08:40:22
21-Apr=1981 08:19:06

Page

SEQ 0048

BSKEL4

| REV A PATCH 00

gggg

Zsbrtl "MACRO DECLARATIONS®

2098

| MACRO DECLARATIONS

2107

i
:
2

2108
M 2109
M 2110

M 2112

M 2114

macro
-

ML-LL REGISTER ACCESSING MACRO

THIS MACRO ALLOWS ML=11 REGISTER ACCESSING TO BE
TRANSPORTABLE BETWEEN THE PDP-11 AND VAX DIAGNOSTIC
SUPERVISORS.

2106

NN
VIS

il
-

OO0

2
2
2
2

—

2099
2100
2101

:
:
4
:

’
WRT_RH (0, FIELDNAM, IMAGE) =
begin

local

MLREG;

M 2113

MLREG = .ML_ADDR [0, ML_ALLJ;
MLREG<Xfieldexpand (FIELDNAM)>

v 2115
M 2116

3
:

M 2117
2118
2119

:
5
3

S}gg

:
:

M 2122
M 2123

5}39

M 2128

S}%}

M 2133

3
2
:

:
:

2
:

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL&.BLI.T (8)

MACRO DECLARATIONS

515§

s;gg

2134
M 2135
2136

m 2137
2138

(.ML_ADDR + Xupval*0) = .MLREG;
end; %,

IMAGE;

; CLEAR RH AND MASS BUS DEVICES
CLR_MBUS =
WRT_RH TMLCS2. CLR,

ONE);!CLEAR THE MASS BUS

uRT_QH (MLCS2, DRV_SEL,

.ML_DUT):X,

'RESTORE THE DRIVE SELECT NUMBER

; CLEAR MASS BUS DEVICES
CLR DRIVE =

WRT_RH TMLCST, FUNC,

FUNC_2):%.

'CLEAR THE DRIVE

; MAINTANENCE REGISTER DIAG MODE SETTING MACROS
RD_PROM_MODE =

%,
WRT_RHTMLMR,MR_REG,PM_RD_MODE);
=
WRT PROM MODE
%,
WRT_RH(MLMR,MR_REG,PM_WRT_MODE)
DAT DM (X)" =
WRT_RH TMLMR,D DM,

'ENABLE PROM READS
'ENABLE PROM WRITES

X):X,

'ENABLE/DISABLE DATA DIAG MODE

X)X,

'"ENABLE/DISABLE ECC DISABLE MODE

WRT_RH (MLMR,P_RW,

X):X,

'ENABLE PROM READ WRITE

2144

WRT_RH TMLMR,D_CLK,

ONE):%,

'DATA CLOCK

M 2147

DCK_EN (X)TM=

X);%,

'ENABLE PROM DISABLE

M 2139

ECC DIS (XY =

2140
M 2141

WRT_RH TMLMR.E_DIS,
PROM RW (XJ =

M 2143

DAT (LK =

2142

M 2145
2146

PROM DIS (X) =
WRT_RH (MLMR,P_DIS,

SE098049

—————

il
ol
il

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1

WRT_RH (MLMR,D_EN,

X):%,

'ENABLE DATA CHECK ENABLE

WRT_RH TMLMR,E_DM,

X);%,

'ENABLE ECC DISABLE

ECC_DM (X)TM=

§ MISCELLANIOUS

PM_RD_MODE =

%0'0000407%,

MACROS DEF INITIONS
'ENABLE PROM READ MODE

'ENABLE PROM WRITE MODE

i
il
o

21-Apr=1981 08:19:06

MACRO DECLARATIONS

)

3
3
z

I R

R IR IR

)

il ol —

Vi
[0y
£ Poo>
OOVONOVNEWN
=00

ASTASTANIANI
S 1N 1N 1NN [yS LAV, )no

| BSKEL&
' REV A PATCH 00

21-Apr=1981 08:40:22

0., 16, 0%;

'SELECTS FULL WORD OF DATA ELEMENT

(8)

SE 395050

BSKEL4

REV A PAT(H 00

21-Apr=1981 08:19:06

EXTENDED MESSAGE PRINTING SECTION
%sbttl 'EXTENDED MESSAGE PRINTING SECTION'

gwb
&

—OVvo~N

d
)
D
e
i
e
e

O—=NOwW

-2

e e

i o

i i e

i e

b b

2—1—.—.?—1—0—1—.
==
—AO—.? NW=NNONOONO
ON=O—
VIW—= OOV
=On
SN —
ONS NSNS
N0V W ?—Aoo_l

—

N wvoeooorrOr OTM

2161
2162
63

—

——————————
T

21=Apr=1981 08:40:22

:
:
:
:

FUNCTIONAL DESCRIPTION: REGISTER DUMP

THIS BGNMSG WILL GET CALLED WHEN THE
DRIVE DETECTS ERRORS DURING A MASS
BUS TRANSFER. THIS BGNMSG WILL PRINT
OUT TO THE TERMINAL THE ERROR REGISTERS.

'PRINT THE DUMP MESSAGE

BGNMSG (DUMPER);

114
107

040
117
115

114
101

120

124
101

040

000

124
124
107
122
040
111
105
116

000

131
040
101
040

040

105
124
120
107

115

SPLITS,

LASCII

/L P/

ASCII
.ASCII

LASCII
LASCII
.ASCII
LASCII
LASCII
LASCII

101
111
040
117
115
116
116
103

P.AAB:

120
122
122
124

P.AAC:

LASCII

ASCII
LASCII
LASCII
ASCII
LASCIT
LASCII
LASCII
LASCII

.ASCI1

.ASCII
LASCII
LASCI1
LASCIT

LASCII

105

ASCII
LASCII
ASCII
LASCII

103
105
122
122

122

.PSECT

LASCII
ASCII

105
122
122
040
115
116

000

BSKEL4
/REV A /

LASCII
ASCII

115
101

116
116

103
120
107
115
117
101

P.AAA:

.TITLE
.IDENT

P.AAD:

LASCII
.ASCII

/ILL/
/EGA/

/ROM/
/7 MA/

/INT/
/ENA/

/NCE/
7/ PR/
/OGR/
/7AM /
/COM/
/MAN/

/D /<00>
/STA/
/RTI1/
/NG /
/PRO/
/M M/
/AIN/
/TEN/
/ANC/

/E/<00>
/TYP/
/E S/
/TAR/
/T 1/

/0 E/

/XEC/
/UTE/
/ PR/
/OGR/

/AM/<00>
/HAR/

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1

(9)

SEQ

g505

18
:

BSKEL4

REV A PATCH 00

000145
000150
000153
000156
000161
000164
000167
000172
000175
000200
000203
000206
000211
000214
000216
000221
000224
000227
000232
000235
000240
000243
000246
000251
000254
000257
000262
000265
000270
000273
000274
000277
000302
000305
000310
000313
000316
000321
000324
000327
000330
000333
000336
000341
000344
000347
000352
000355
000360
000363
000366
000370

104
122
121
123
117
040
124
116
105
104
117
105
114
000
102
123
116
123
124
054
122
131
122
101
040
124
105
103
104
000
120
115
101
124
105
105
117
114
105
000
123
120
123
116
120
107
115
130
125
117
000
122

EXTENDED MESSAGE PRINTING SECTION
127
105
125
124
116
116
040
123
122
040
122
103
131
000
114
124
107
131
105
040
122
040
040
116
116
040
114
124
040

101
m
040
123
115
101
101
117
102
113
117
123
105
105
000

P.AAE:

122
040
11
101
116
040
115
105
104

117
115
116
116
103
103
120
124
040

P.AAF:

125
122

120
105
m
040
117
101
105
103
1m
040

P.AAG:

124

P.AAH:

123
107
122
122
040
105
124

116
000
105

101
040
105
1M1
123
117
101
127
105
103
122
124
040

LASCII
ASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
.ASCII
LASCII
LASCII
LASCII
.ASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCIT
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
_ASCII
LASCIT
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
.ASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCIT
LASCII
LASCII
LASCII
LASCITI
_ASCIl1

21-Apr=1981

08:40:22

21-Apr-1981 08:19:06

/DWA/
/RE /
/QUE/
/ST1/
/ONS/
/7 NO/
/T A/
/NSW/
/ERE/
/D C/
/ORR/
/ECT/
/LY 7/
<00><00>
/BLA/
/ST1/
/NG /
/SYS/
/TEM/
/7, A/
’RRA/
/7y O/
/R B/
/ANK/
/7 NO/
/T S/
/ELE/
/CTE/
/D /<00>
<00>
/PRO/
/M M/
/AIN/
/TAN/
/ENC/
/E C/
/70MP/
/LET/
/ED /
<00>
/Sup/
/PRE/
/S8S1/
/NG /
/PRO/
/GRA/
/M E/
/XEC/
/UT1/
/ON /
<00><00>
/RET/

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1

(9)

Pa ge
19
SEQ 0052

—————

| BSKEL&
. REV A PATCH 00 EXTENDED MESSAGE PRINTING SECTION
000373
000376
000401
000404

125
111
049
040

000412

114

000407
000415

000420
000423
000426
009431
0004 3
000437
000442
000444
000447
000452
000455
000460
000463
000466
000471
000474
000477
000502
000505
000510
000513
000516
000521

000524

000526
000531
000534
000537
000542
000545
000550
000553
000556
000560
000563
000566
000571
000574
000577
000602
000605
000610
000613
000616
000621

123

040

120
101
105
117
120
123
124
103
104
111
040
103
104
111
040
103
104
111
040
103
104
111

040

000

125
117
111
105
106
114
107
110
000
115
105
110
040
105
116
040
114
124
040
122
122

122
116
124
104

116
107
117
122

076

000

060

040

125

055
102
040
124
122
105
000
117
M
117
101
117
111
117
102
117
11
117
103
117
111
117
104

000

116
116
122
104
101
11
040
111
000
117
040
101
117
040
111
123
105
105
106
040
117

116

P.AAI:

124
114
116
040
105
116
116
124
116

000
116
124

P.AAJ:

P.AAK:

116

000

116
124
i16

P.AAL:

116
124
116
040

P.AAM:

103
106
115
040
11
116
103
120

P.AAN:

122
124
116
116
125
124
105
103
104
117
120
115

P.AAO:

000

LASCII
LASCII
LASCII
LASCII

/URN/
7ING/
7 TO/
7/ DR/

LASCII

/LUN/

LASCID
LASCII
LASCII
LASCII
.ASCI1
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
(ASCII
LASCII
LASCII
LASCII
.ASCII
LASCIT
LASCII
LASCII
_ASCII
LASCII
LASCII

/P=T/
/ABL/
7B N/
/70T 7/
/PRE/
/SEN/
/T1/<00>
/CON/
/DI1T/
/ION/
/7 A/<00>
/CON/
/DIT/
/ION/
7/ B/<00>
/CON/
/RIT/
/ION/
7/ C/<00>
/CON/
/DIT/
/ION/

LASCII

LASCIT

LASCII

.ASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
.ASCII
LASCIT
LASCIl
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCIT
LASCII
LASCII

21=Apr=1981 08:40:22
21-Apr-1981 08:19:06

75>/<00>

707/

/7 D/

<00><00>

/UNC/
/ONF/
/7IRM/
/ED /
/FAL/
/LIN/
/G C/
/HIP/
<00><00>
/MOR/
/E T/
/HAN/
/ ON/
/E U/
/NIT/
/ SE/
/LEC/
/TED/
/7 FO/
/R P/
/ROM/

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (9)

Page %0
SEQ 005

[

—

| BSKEL4
REV A PATCH 00 EXTENDED MESSAGE PRINTING SECTION
000624
000627
000632
000634
000637
000642
000645
00065C
000653
000656
000661

0490
1
000
101
040
111
040
103
124
116
040

115
116
000
114
125
124
105
105
040
111
060

101
124

000667
000672
000675 000700
000703
000704
000707
000712
000715
000720
000723
000726
000731
000734
000737
000742
000745
000750
000753
000756
000761
000764
000766
000771
000774
000777
001002

114
105
107
122
000
125
130
103
104

040
040
116
105

102
111
117
104

001005
001010
001013
001016
001021
001024
001027
001032
001035
001036
001041
001044
001047

127

117
127
105
125
104
105
105
116
111
040
101
105
000
120
115
101
124
105
105
102
124
040
122
110
040
122
000
116
101
m
117

111

114
116
123
130
120
125
124
040

P.AAP:

LASCIL
LASCII
LASCI1
,ASCII
LASCII
LASCII
LASCII
LASCII
LASCIT
LASCII
LASCII

7 MA/
ZINT/
<00><00>
/ALL/
/7 UN/
/ITS/
/7 EX/
/CEP/
/T W/
/NiT/
707/

LASCII
LASCII
LASCII
LASCII
LASCII
.ASCII
LASCII
LASCII
LASCII

/L B/
/E 1/
/GNC/
/RED/
<00>
/UNE/
/XPE/
/CTE/
/D S/

LASCIT

114

116
120
124
040
106
101
040
107
105
103
104
117
106
104
107
116
000
122
040
111
101
116

105
105
105
123
124
122
102
040
124
124
040
124
131
1M1
040
107

P.AAQ:

P.AAR:

040
117
105
106
040
111
101
101

117
115
116
116
103
101
122
104
117
124
123
122
13

117
104
124
116

040
104
1M
101

P.AAS:

LASCII
LASCII
.ASCII
LASCII
LASCII
LASCI1
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
.ASCII
LASCIT
LASCII
LASCII
LASCII
LASCII
.ASCII
LASCII
LASCII
LASCII
LASCII
LASCI1
LASCII
LASCII
.ASCII
LASCII
LASCIT
LASCII

21-Apr=1981 08:40:22
21=-Apr=1981 08:19:06

/WIL/

/OFT/
/WAR/
/E B/
/UG /
/DET/
/ECT/
/ED /
/NOT/
ZIFY/
7/ DI/
/AG /
/ENG/
<00><00>
/PRO/
/M M/
/AIN/
/TAN/
/ENC/
/E A/
/BOR/
/TED/
/7 FO/
/R T/
/HIS/
/ AR/
/RAY/
<00>
/NO /
/ADD/
/IT1/
/ONA/

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (9)

Page 21
SEQ 0054

21=-Apr-1981 08:19:06

BSKEL&

. REV A PATCH 00 EXTENDED MESSAGE PRINTING SECTION

001052
001055
001060
001063
001066
001071
001074
001077
001102
001105
001110
001112
001115
01120
001123
001126
001131
001134
001137
001142
001145
001150

114
122
122
102
123
104
117
124
123
122
131
125
117
105
101
105
122
122
104
105
105
101

040
122
123
114
124
040
122
110
040
122
000
116
122
103
102
040
122
123
105
103
104
106

105
117
040
101
105
106
040
1M
101
101

001164
001167
001170

116
000
104

107

000

001245

124

101
040
117
040
124
101
105
124
122
105
101
105
120
115
122
105
105

124
103
103
102
040
111
104
117
105
124
106
122
122
040
111
000
120

001153
0C1156
001161

001173
001176
001201
001204
001207
001212
001215
001220
001223
001226
001231
001234
001237
001242

001250
001253
001256
001261
001264
001267
001272
001275
001300

105
102
123

101
114
113
11
106
114
040
040
123
040
124
040
117
127

122
114
105
122
131
101
040
104
105

122
114
124

101
040
122
040
124
115
125
040

103
122
124
114
105
117
040
124
124
040
124

P.AAT:

040
101
111

103
101
101
104
101
117
114
115

P.AAU:

P.AAV:

ASCIT /L E/
.ASCII /RRO/
.ASCII /RS /
LASCII /BLA/
LASCII /STE/
LASCII /D F/
LASCII /0R /
LASCII /THI/
LASCII /S A/
ASCII /RRA/
LASCII /7Y/<00>
.ASCII /UNC/
.ASCII /ORR/
LASCII /ECT/
LASCII /ABL/
LASCII /E E/
.ASCII /RRO/
LASCII /RS /
LASCII /DET/
LASCII /ECT/
LASCII /ED /
LASCII /AFT/
LASCII
LASCII
LASCII

/ER /
/BLA/
/ST1/

LASCII
LASCII
LASCII
LASCIT
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
.ASCII
LASCII
LASCII

/A C/
/LOC/
/K B/
/1T 7
/FAl/
/LED/
/7 TO/
/ RE/
/SET/
/7 AF/
/TER/
/ PR/
/0M /
/WRI/

LASCII
LASCII
.ASCII

LASCII

.ASCII
LASCII
LASCII
.ASCII
LASCII
LASCII
LASCII
LASCIT
LASCIT

21=-Apr-1981 08:40:22

/NG/<00>
<00>
/DAT/

/TE/<00>
/REP/
/LAC/
/E A/
/RRA/
/Y D/
/ATA/
/7 MO/
/DUL/
/7E M/

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1 (9)

Page

SEQ 0055

21=-Apr-=1981 08:40:22

BSKEL4

21=-Apr=1981 08:19:06

. REV A PATCH 00 EXTENDED MESSAGE PRINTING SECTION
- 001303
001306

067
3

063
000

066

001365
001370
001373
001376
001401
001404
001407

130
103
104
122
105
122
122

120
124
040
111
040
122
123 .

05
105
104
126
105
117
040

001310
001313
001316
001321
001324
001327
001332
001335
001340
001343
001346
001351
001354
001357
001362

001412

001415
001420
001423

001424
001427
001432
001435
001440
001443
001446
001451
001454
001457
001462
001465
001470
001473
001474
001477
001502
001505
001510
001513
001516
001521
001524
001527

115
117
040
122
123
124
114
130
124
106
122
114
124
107
125

104

105
105
000
117
125
104
125
116
101
101
040
123
105
040
101
106
000
117
125
104
125
116
101
101
040
123
122

105
122
105
117
040
11
040
111
040
124
040
101
M
000
116

115
13
122
122
123
114
105
123
101
105
102
123
116
000
105

105

124

P.AAW:

P.AAX:

ASCID
LASCII

7736/
73/7<00>

JASCII
.ASCI1
LASCII
JASCII
LASCII
.ASCII
.ASCII

/XPE/
/CTE/
/D D/
/RIV/
/E E/
/RRO/
/RS /

JASCII
LASCII
JASCII
.ASCII
LASCII
JASCII
LASCII
JASCII
CASCII
JASCII1
LASCII
LASCII
JASCII
ASCII
ASCII

LASCII

103
104

124
000

103
122
040
122
107
040
123
102
040
101
124
116
105

103
105
104
1M1
040
115
123
125
122
104
122
123
122

P.AAY:

103
122
040
122
107
040
123
102
040
1M

103
105
104
1M1
040
115
123
125
127
1264

P.AAZ:

/MEM/
/ORY/
7/ ER/
/ROR/
/S S/
/TIL/
/L E/
/XiS/
/T A/
/FTE/
/R B/
/LAS/
/TIN/
/76/<00><00>
/UNE/

/DET/

ASCIT 7ELCT/
LASCII 7ED/<00>
ASCII <00>
.ASCII /0CC/
JASCII /URE/
.ASCII /D D/
LASCII /URI/
ASCII /NG /
JASCII /A M/
.ASCII /ASS/
JASCII 7/ BU/
LASCII /S R/
.ASCI{ /EAD/
/ TR/
LASCI
JASCII /ANS/
.ASCII /FER/
LASCII <00>
.ASCII /0CC/
LASCII /URE/
.ASCI1 /D D/
.ASCII /URI/
JASCII /NG /
LASCII 7A M/
LASCII /ASS/
JASCII -/ BU/
JASCII /S W/
LASCIDI /RIT/

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1 (9)

Page 23

SEQ 0056

BSKEL4
REV A PATCH 00 EXTENDED MESSAGE PRINTING SECTION
- 001532
- 001535
001540

001543

001546
001551
001554
001557
001562
001565
001570
001573
001576
01601
001604
001607
001612
001615
001620
001623
001626
001630
001633
001636
001641
001644
001646
001651
001654
001657
001660
001663
001666
001671
001674
001677
001700
001703
001706
001711
001714
001716
001721
001724
001726
001731
001734
001736
001741
001744
001747
001752

040
101
106

105
122
123

000

122

117
125
104
125
116
101
101
040
123
122
105
110
113
122
123
122
000
045
116
045
124
000
045
124
045
000
045
124
045
116
045
000
045
116
045
117
116
045
117
116
045
104
116
045
122
105
117
01

103
122
040
122
107
040
123
102
040
111
040
105
040
101
106
000
000
124
000
124
045
000
124
045
116

000

103
105
104
111
040
115
123
125
127
124
103
103
124
116
105
000

045
000
045

116

045
124
000

124
045
124
000
116

045
124
045
000
000

116
000
124
061
000
124
066
000
124
062
000
101
111
040
061

045
000
045
045

040

ASCII
LASCII
LASCII

124
116
105

045
045
045
045
104
126
045
045
123

LASCII

ASCII
.ASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCIT
LASCII
LASCII
LASCII
LASCII
LASCIT
LASCII
LASCI1
LASCII
P.ABB: .ASCII
P.ABC: .ASCII
LASCII
P.ABD: .ASCII
LASCIT
LASCII
P.ABE: .ASCII
LASCII
LASCIT
LASCII
P.ABF: (ASCII
LASCIT
LASCIT
LASCII
P.ABG: .ASCII
LASCII
P.ABH: .ASCII
LASCII
P.ABI: .ASCII
LASCIT
LASCII
P.ABJ: .ASCII
LASCIT
LASCII
P.ABK: LASCII
LASCII
LASCIT
P.ABL: LASCII
LASCII
LASCII
LASCIT

P.ABA:

21=-Apr=1981 08:40:22
21=-Apr=1981 08:19:06

LASCIT

/E T/
/RAN/
/SFE/

/R/<00><00>

/0CC/
/URE/
/D D/
/URI/
/NG /
/A W/
/ASS/
/7 BU/
/S W/
/RIT/
/E C/
/HEC/
/K T/
/RAN/
/SFE/
/R/<00><00>
<00><00>
/XT%/
/N/<00><00>
/XT%/
/TAN/
<00><00>
/%XT%/
/TRT/
/%N/<00>
<00>
/XT%/ /TXT/
/XT%/
/N/<00><00>
/%N/<00>
<00>
/ANX/
/N/<00><00>
/XTX/
/701%/
/N/<00>
/%XT%/
/706%/
/N/<00>
/%T%/
/D2%/
/N/<00>
/XAD/
/RIV/
/E %/
/701%/
/A S/

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (9)

Page 24
SEQ 0057

BSKEL&
.~ REV A PAT(H 00 EXTENDED MESSAGE PRINTING SECTION
001755
- 001760
001763
001766
001770
001773
001776
002001
002004
002007
002012
002015
002020
002023
002026
002031
002034
002036
002041
002044
002047
002052
002055
0C2060
002063
002066
002071
002074
002077
002102
002105
002110
002113
002116
002120

002123
002126
002131
002134
002137
002142
002145
002150
002153
002156
002161
002164
002167
002172
002175
002200
002203

105
103
104
000
045
123
045
123
045
123
124
124
107
122
13
104
116
045
123
045
123
045
123
045
123
045
123
045
101
116
123
045
104
116
045

122
131
045
045
101
116
123
061
045
111
043
045
045
045
122
131
045

114
124
045
000
123
045
123
045
123
045
105
"M
040
122
040
062
000
123
045
123
045
123
045
123
045
123
045
123
102
113
045
123
061
000
101

122
045
104
123
102
113
045
045
101
124
045
104
116
101
122
045
104

105
105
116

045
123
045
123
045
101

P.ARM:

045
123
045
123
045
123
045
123
045
123
045
101
045
123
045
045

P.ABN:

101
101
123
062
045
101
045
117
123
102
040
123
062
000
101
101
123
062

P.ABO:

123
116
101
101
045
045

P.ABP:

LASCII
LASCII
LASCII
JASCII
,ASCI]
LASCII
LASCII
LASCII
JASCII
LASCII
ASCIYE
JASCII
LASCII
LASCII1
JASCII
LASCII
JASCII
.ASCII
JASCII
LASCII
LASCII
JASCII
JASCII
JASCII
LASCII
JASCII
JASCII
JASCII
JASCII
LASCIT
JASCII
JASCII
JASCII
JASCII
.ASCII

.ASCII
ASCIYE
LASCII
LASCII
JASCI]
JASCII
LASCI1
LASCII
LASCII
ASCII
LASCI1
LASCII
JASCII
.ASCII
JASCII
LASCII
LASCII

21-Apr=1981 08:40:22
21=Apr=19 81 08:19:06
/ELE/
/CTE/
/DAN/
<00><00>
/%S%/
/S%S/
/7%S%/
/S%S/
/7%S%/
/S%A/
TIESY
/TIN/
/G A/
/RRA/
/7Y %/
/7D2%/
/N/<00>
/%S%/
/SXS/
/7%S%/

/S%S/
/7%S%/
/S%S/
/%S%/
/S%S/
/7%S%/
/S%S/
/7%S%/
/ABA/
/NK%/
/S%S/
/7%S%/
/D1%/
/N/<00>
/%AA/
/RRA/
7YES/
/7%D2/
/7%S%/
/ABA/
/NK%/
/S%0/
/71%S/
/%AB/
/1T 7/
/7#%S/
/7%D2/
/7%N/<00>
/%AA/
/RRA/
7YXS/
/7%D2/

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (9)

Page 25
SEQ 0058

BSKEL4
. REV A PATCH 00 EXTENDED MESSAGE PRINTING SECTION
- 002206

045

- 002214
002217
002222
002225
002230
002233
002236
002241
002244

116
123
061
045
M
114
123
062
000

. 002211

0022406
002251
002254
002257
002262
002265
002270
002273
002276
002301
002304
002307
002312
002315
002320
002323
002326
002331
002332

002335
002340

002343
002346
002351
002354
002357
002362
002365
002366
002371
002374
002377
002402
002405
002410
002413
002416
002421
002424
002427
002432

101

045
105
101
040
122
040
104
105
045
045
123
117
122
125
120
107
115
000
045
122
131

045
045
101
116
123
061
000
045
123
045
101
103
045
123
045
123
045
123
045
123

/7%S%/

123

045

LASCII

113
045
045
101
102
105
045
045
000

045
117
123
116
102
045
104
116

101
120
103
101
101
115
125
045
104
123
045
122
105
116
122
122
045

122
114
105
122
131
117
114
123
062
045
101
040
122
040
117
101
116

P.ABQ:

LASCII /NKX/
LASCII /S%0/
LASCII /71%S/
LASCII /%AN/
LASCII /71BB/
LASCII /LEX/
LASCII /S%D/
LASCII- 72%N/
LASCII <00><00>

101
122
045
104
123
102
113
045
045

101
101
123
062
045
101
045
117
116

P.ABR:

123
045
123
115
123
123
045
123
045
123
045
123
045

045
123
045
114
061
045
123
045
123
045
123
045
123

P.ABS:

102

101

LASCI1

/ABA/

.ASCII
LASCI1
LASCII
ASCII
LASCII
LASCII
LASCIT
LASCII
LASCII
LASCII
LASCII
LASCII
.ASCII
LASCII
.ASCII1
LASCII
JASCII
LASCII
LASCII

/XAR/
/EPL/
/ACE/
/7 AR/
/RAY/
7 MO/
/DUL/
/EXS/
/7%D2/
7%S%/
/S%A/
/0R /
/RER/
/UN /
/PRO/
/GRA/
/MIN/
<00>
/%AA/

.ASCII
LASCII
LASCII
LASCII
LASCI1
LASCIT
ASCII
LASCIT
LASCIT
.ASCII
LASCI1
LASCII
LASCII
LASCII
LASCIT
LASCII
LASCII
ASCII1
LASCIT
LASCI1
LASCII
LASCII

21=Apr=1981 08:40:22
21=Apr=1981 08:19:06

/RRA/
/YXS/
/%D2/
/%S%/
/ABA/
/NKX/
/S%0/
713N/
<00>
/%S%/
/S%S/
/7XS%/
/7AML/
/7CS1/
/7XS%/
/S%S/
/%S%/
/SXS/
/7%XS%/
/S%S/
/%S%/
/S%S/

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (9)

Page 26
SEQ 0059

BSKEL4
| REV A PATCH 00 EXTENDED MESSAGE PRINTING SECTION
| 002435

| 002440
| 002463
002466
002451
002454
002457

002462
002465
002470
002473
002476
002501
002504
002507
002512
002515
002520
002523
002526
002531
002534
002537
002540
002543
002546
002551
002554
002557
002562

002565
002570
002573
002576
002601
002604
002607
002612
002615
002620
002623
002624
002627
002632
002635
002640
002643
002646
002651
002654
002657
002662

045

123
045
117
16
045
123
045

101
127
123
045
123
045
123
045
123
045
123
045
123
066
000
045
123
045
101
102
123
045
123
045
123
045
123
045
123
045
123
066
000
045
123
045

101
104
123

045
123
045
123
045

123

045
123
066
000
123
045

123
115
103
045
123
045
123
045
123
045
123
045
123
045
045

123
045
045
000
045
123
045

045
123
045
114
045
123
045
123
045
123
045
123
045
123

123
045
123

045
123
045

115
101
045
123
045
123
045
123

P.ABT:

114
045
123
045
123
045
123
045
123
045
123
045
117
116

123
045
123
115
101
045
123
045
123
045
123
045
123
045

123
045
045

ASCII

045

045
117
16

114
045
123
045
123
045
123
045

P.ABU:

21-Apr-1981 08:40:22
o1-Apr-1981 08:19:06

ASCII
ASCIT
ASCII
TASCII
.ASCII
CASCIT

CASCIT
CASCIT
CASCIT
.ASCII
CASCIT
CASCIT
CASCIT
JASCIT
CASCIT
CASCII
CASCIT
CASCIT
CASCIT
CASCIT
ASCII
ASCIT
.ASCII
ASCIT
CASCII
CASCIT
CASCII
ASCIT
ASCIT

"ASCII
CASCIT
CASCII
CASCIT
« LASCIT
ASCIT
ASCII
CASC1I
JASCIT
ASCIT
- LASCII
P.ABV: .ASCII
CASCII
TASCIT
CASCIT
ASCIT
ASCIT

CASCIT
CASCIT
ASCIT
JASCIT
CASCIT

/%S%/

/5%S/
/%S%/
706%/
/N/<00><00>
/%S%/
/5%S/
/%S%/
/AML/
/7Wi%/
75%S/
/%S%/
75%S/
/%5%/
75%S/
/%S¥/
75%S/
7%S%/
/S%S/
/%S%/
/5%0/
763N/
<00>
/%S%/
/5%S/
/%S¥/
7AML/
/BA%/
75%S/
/%S%/

/5%S/
/%S%/
/5%S/
/%S¥/
75%5/
/%SX/
75%S/
/%S%/
/S%0/
763N/
<00>
/%S%/
75XS/
/%S%/

/AML/
/DA%/
/S%S/

/%S%/
/5%S/
/%S¥/
/S%S/
/%S¥/

T0PS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (9)

Page 27
SEQ 0060

BSKEL4
; REV A PATCH O0 EXTENDED MESSAGE PRINTING SECTION
123

045

| 002673
. 002676

123
045

045
123

. 002704
002707
' 002710
002713
002716

066
000
045
123
045

- 002665

1 002670
| 002701

002721

002724
002727
002732
002735
002740
002743
002746
002751
002754
002757
002762
0027€5
002770
002773
002776
003001

003004
003007
003012
003015
003020
003023
003026
003031
003034
003037
003042
003045
003050
003053
003056
003061
003062
003065
003070
003073

003076
003101
003104
003107
003112

045

123

101

103
045
123
045
123
045
123
045
123
045
123
045
117
116
045
123

045
101
104
123
045
123
045
123
- 045
123
045
123
045
123
066
000
045
123
045
101

105
123
045
123
045

123

045

117

116

123
045
123

045
123
045
062
045
123
045
123
045
123
045
123
045
123
045
045
000
045
123

123
045
123

045
123
045

115

122
045
123
045
123

P.ABW:

045
114
045
123
045
123
045
123
045
123
045
123
045
117
116

114

045
123
045
123
045

/S%S/
7%S%/

LASCII
LASCIT
.ASCII
JASCII
JASCII

763N/
<00>
/%S%/
/S%S/
/7%5%/

LASCII
JASCIT
LASCII
LASCII
JASCII
LASCII
JASCII
JASCII
LASCII
JASCII
ASCII
ASCII
ASCII
JASCII
.ASCII
ASCII

/(CSe/
/7%XS%/
/S%S/
/7%S%/
/S%S/
/7%S%/
/S%S/
/7%XS%/
/S%S/
/7%S%/
/S%XS/
/%S%/
/06%/
/N/<00><00>
/%S%/
/S%S/

LASCII

P.ABX:

P.ABY:

/S%S/

/7%S%/

JASCII
ASCIT

JASCII

114

123
123
045
123
045
123
045
123
045
123
045
123
06€
000
123
045

123
115
123
045
123
045
123
045
123
045
. 138
045
123
045
045

JASCII

123
045

045

115

LASCII

123

21=-Apr-1981 02:?8:82
21=-Apr=1981 0

ASCII
ASCII
LASCII
JASCII
JASCII
JASCII
JASCIT
LASCII
JASCII
LASCII
LASCII
ASCII
JASCII
LASCII
LASCII
ASCII
_ASCII
JASCII
LASCII
JASCII

LASCII
ASCI]
LASCII
LASCIT
LASCID

/S%0/

7AML/

/%S%/
/AML/
/DS%/
/S%S/
/7%S%/
/S%S/
7%S%/
/7S%S/
/7%S%/
/5%S/
7%S%/
/S%S/
/%S%/
/S%0/
763N/
<00>
/%S%/
/S%S/
/7%S%/
/7AML/

/ER%/
/S%S/
/7%S%/
/S%S/
/7%S%/

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T1 (9)

Page 28
SEQ 0061

BSKEL4
REV A PATCH 00 EXTENDED MESSAGE PRINTING SECTION
003115
003120
003123
003126
003131
003134
003137
003142
003145
003146
003151
003154
003157
003162
003165
003170
003173
003176
003201
003204
003207
003212
003215
003220
003223
003226
003231
003232
003235
003240

003243
003246
003251
003254
003257
003262
003265
003270
003273
003276
003301
003304
003307
003312
003315
003316
003321
003324
003327
003332
003335
003340

123
045
123
045
123
045
123
066
000
045
123
045

101
101
123
045
123
045
123
045
123
045
123
045
123
066
000
045
123
5

101
115
123
045
123
045
123
045
123
045
123
045
123
066
000
045
123
045
101
104
123
045

045
123
045
123
045
123
045
045

123
045
123
045
123
045
117
116

123
045
123
115
123
045
123
045
123
045
123
045
123
045
123
045
045

045
123
045
114
045
123
045
123
045
123
045
123
045
123
045
117
116

P.ABZ:

123
045
123
115
122
045
123
045
123
045
123
045
123
045
123
045
045

045
123
045
114
045
123
045
123
045
123
045
123
045
123
045
117
116

P.ACA:

123
045
123
115
124
045
123

045
123
045
114
045
123
045

P.ACB:

LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCIT
.ASCII
LASCII
LASCII

LASCIT
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCI1
LASCII
LASCII1
LASCII
LASCII
LASCII
LASCII
.ASCII
LASCI1
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
.ASCII
LASCII
LASCII
LASCIT
LASCIT
LASCII
LASCIT

21-Apr-1981 08:40:22
21=-Apr=1981 08:19:06
/S%S/
/%S%/
/SXS/
/XS%/
/S%S/
/%S%/
/S%0/
/6AN/
<00>
/X3%/
/S%S/
/%S%/

/7AML/
/ASX/
/SXS/
/%XS%/
/S%S/
/%S%/
/S%S/
/%XS%/
/SXS/
/XS%/
/SXS/
/%XSX/
/S%0/
/76%N/
<00>
/XS%/
/S%XS/
/%XS%/
/7AML/
/MRX/
/S%S/
/XS%/
/S%S/
/%S%/
/S%S/
/%S%/
/S%S/
/%S%/
/SXS/
/%S%/
/SX0/
/6AN/
<00>
/%XS%/
/S%XS/
/%S%/
/7AML/
/DTX/
/S%S/
/7%S%/

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (9)

Page 29
SEQ 0067

BSKEL&4

REV A PATCH 00

- 003343
- 003346
003351
003354
003357
003362
003365
003370
003373
003376
003401
003402
003405
003410

003413
003416
003421
003424
003427
003432
003435
003440
003443
0C3446
003451
003454
003457
003462
003465
003466
003471
003474
003477
003502
003505
003510
003513
003516
003521
003524
003527
003532
003535
003540
003543
003546
003551
003552
003555
003560
003563
003566

123
045
123
045
123
045
123
045
123
066
000
045
- .123
965

101
123
123
045
123
045
123
045
123
045
123
045
123
066
000
045
123
045
101
105
123
045
123
045
123
045
123
045
123
045
123
066
000
045
123
045
101
108

L S
21-Apr=1981 08:40:22
21-Apr=1981 08:19:06

EXTENDED MESSAGE PRINTING SECTION

045
123
045
123
045
123
045
123
045
045

123
045
123
045
123
045
123
045
117
116

123
045
123
115
116
045
123
045
123
045
123
045
123
045
123
045
045

045
123
045
114
045
123
045
123
045
123
045
123
045

123
045
123
115
105
045
123
045
123
045
123
045
123
045
123
045
045

045
123
045
114
045
123
045
123
045
123
045
123
045
123
045
117
116

P.ACD:

123
045
123
115
114

045
123
045
114
045

P.ACE:

P.ACC:

123
045
117
116

LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
.ASCII
LASCII
LASCII

LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
.ASCII
.ASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
.ASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
.ASCII
LASCII
LASCII
LASCII
LASCII
.ASCII
LASCII
LASCII
LASCII
LASCII

/SXS/
/%S%/
/SXS/
/%S%/
/SXS/
/%S%/
/S%S/
/XS%/
/S%0/
/6%N/
<00>
/XS%/
/S%S/
/XS%/

/AML/

/SN%/
/S%XS/
/%S%/
/S%S/
/XS%/
/SXS/
/XS%/
/SXS/
/XS%/
/SXS/
/%S%/
/S%0/
/6%N/
<00>

/%S%/
/S%XS/
/XS%/
/AML/
/EEX/
/S%XS/
/%S%/
/SXS/
/XS%/
/S%S/
/%S%/
/S%S/
/%S%/
/S%S/
/XS%/
/S%0/
/6XN/
<00>

/%S%/

/S%S/
/%S%/
/AML/

/ELX/

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (9)

Page

SEQ 0063

—————————

BSKELS
REV A PATCH 00 EXTENDED MESSAGE PRINTING SECTION
003571
003574
003577
003602
003605
003610
003613
003616
003621
003624
003627
003632
003635
003636
003641
003644
003647
003652
003655
003660

123
045
123
045
123
045
123
045
123
045
123
066
000
045
123
045
123
045
123
045

045
123
045
123
045
123
045
123
045
123
045
045

123
045
123
045
123
045
123
045
123
045
117
116

123
045
123
045
123
045
123

045
123
045
123
045
123
045

003705
003710
003713

116
045
123

000
123
045

000
045
101

003663
003666
003671
003674
003677
003702

003716
003721
003724
003727
003732
003735
003740
003743
003746
003751
003754
003757
003762
003764

000000

101
107
124
040
125
045

122
111
105
116
105
045
123
045
123
103
124
124
116
000

122
111
105
040
115
116

105
123
122
101
045
123
045
123
045
117
105
123
000
000

P.ACF:

LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCIT
.ASCII
LASCII
LASCI1
LASCII
LASCII
LASCII
LASCII

/S%S/
/%S%/
/S%XS/
/%S%/
/SXS/
/%XS%/
/S%S/
/XS%/
/SXS/
/XS%/
/S%0/
/6%N/
<00>
/XS%/
/S%S/
/%S%/
/SXS/
/%S%/
/S%S/
/XSX/

LASCII
.ASCII
LASCII

/N/<00><00>
/%S%/
/SXA/

.ASCII
LASCII
LASCII
LASCII
LASCII
LASCII

105
123
122
104
120
045

P.ACG:

107
124
040
115
123
045
123
045
101
116
116
045

P.ACH:

21-Apr=1981 08:40:22
21-Apr=1981 08:19:06

.ASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII1
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
.ASCII

/ARE/
/GIS/
/TER/
7/ D/
/UMP/
/INX/

/REG/
/IST/
/ER /
/NAM/
/EXS/
/XS%/
/SRS/
/%XS%/
/SXA/
/7CON/
/TEN/
/TSX/
/N/<00>
<00><00>

.PSECT

SOWNS$,

.BLkWw

200

BLKW

144

000000

COL.CNT.TBL:

000400
000710

144
REM,TBL:.BLKW
COPIED.REM.TBL:

T0PS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (9)

Page 31
SEQ 0064

——

| BSKEL&

REV A PATCH 00

]

| 001220
' 001232

EXTENDED MESSAGE PRINTING SECTION

036770

COL.PTR:.BLKW
WRT.BUF
: .BLKW
RD.BUF: .BLKW
ERROR .MAP :
.BLKW
CHIP.TBL:
BLKW
TMP.BLST.TBL:
.BLKW
BLAST.TBL
:
BLKW
COL.BASE
:

036772
036774

ML.ADDR:.BLKW
MAX.CHIP.COL:

036776
037000

ML.DUT: .BLKW
ARRSBNK
. SEL :

037002

TSTED.BNK:

005626
006626
026626
026744

026770

037004
037006
027010

037012
037014
037016

21-Apr=1981 08:19:06

10000

47
12
4000
1

.BLKW

BLKW
INC.BNK: .BLKW
INC.ARR: .BLKW
ARR.
SEL .POS:
BLKW
BNK.SEL.POS:
.BLKW
BNK .NUM, SEC:
.BLKW
BAD .BNK
. REG:
.BLKB

1
1
1

1
1

037020
037022

FLG.REG:.BLKW
1
DE GRADE
.MOD . REG
1
BLKB

037024
037026

SIZE:
DST:

037032

LST.TSTED.ARR:

037030

SRC( :

.BLkW
.BLKW

BLKW

BLKW
RAND
. PASS :
BLKW

037034

.GLOBL
.GLOBL

100000
040000
020000

BIT15==
BIT14==
BIT13==

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1

S
2176
400

.BLKW

.EVEN

21-Apr=-1981 08:40:22

1
1

1
RANGEN,
LSUNIT

SEED1,

=100000
40000
20000

SEEDZ,

SEED3,

RANDAT

(9)

Page

SEQ 0065

IDU

D
. MSG=
ILL.CM
BGN.MSG=
HOE

80001308
- WIS

—

——

—

gs“az
(Sw;
gE

) o

]

]
R

O=NWH N

] o

Bt Bt Beng

) o] ] o

]

g B

]

] o

Bd Bg B

e
-{

]

Bt Sg

—NoW
8000
Hunn
??%?%? Qmhnn

]

Bt Bt Bt B

y©
O

]

DODEPEEODEODEDEEOEO®D®®®®D®D®D®

TTTTTTT"MY
TMMSt Bt Bt Bt Bt S

mmmmm

EXTENDED MESSAGE PRINTING SECTION

L
T L T T )
hnnnnnnhn

ADR

5233333 2 2

FQI

LI L
O
O
N

oOm® Xx DBQ
MDMMes
M §m
Pl

BSKELSL

r~sere—DVDOVE®

. REV A PATCM 00

% -zr-vw
08: 19:06

1000

r-1981 08: 40:22

PA:<NEALE>PMSKL4.BLI.T

TOPS=20 Bliss=16 V2(212)

BSKEL&

REV A PATCH 00
000104"*

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (9)

EXTENDED MESSAGE PRINTING SECTION
START .MSG=

HQ.ERR.MSG=
HQ.MSG=

END .MSG=
SUPRES .MSG=

RET.DRS.MSG=

LUN.M]ISS.MSG=
CUN.A.MSG=
CON.B.MSG=

CON.C.MSG=
CON.D.MSG=
UNC.CHIP.MSG=
GTR.MSG=

UNIT.SEL.MSG=
SW.BUG.MSG=
ABORT .MSG=
NO.AD.MSG=

UNC.ERR.MSG=

TIME .QUT .MSG=

REP.M7363.MSG=

MEM.ERR.MSG=

UNX.DRV.ERR.MSG=

RD.XFER.MSG=
WRT . XFER.MSG=
WT.CHK .XFER.MSG=
X.MSG=
ONE .MSG=
TWO.MSG=
THREE .MSG=

FOUR.MSG=
LF=

LFS=

0.1.PRINT=
0.6.PRINT=

D.2.PRINT=
DRV.SEL.PRINT=

ARR.SEL.PRINT=
BNK.SEL.PRINT=
A.B.C.PRINT=
A.B.N.PRINT=
REP.PRINT=
A.B.PRINT=
CS1.PRINT=
WC.PRINT=
BA.PRINT=
DA.PRINT=

(S2.PRINT=

003316

DS.PRINT=
ER.PRINT=
AS.PRINT=
MR.PRINT=
DT.PRINT=

P.ABS
P.ABT
P.ABU
P.ABV
P.ABW
P.ABX
P.ABY
P.ABZ
P.ACA
P.ACB

Page
34
SEQ 006 7

BSKEL4

REV A PATCH 00

EXTENDED MESSAGE PRINTING SECTION

PSECT

000000

000000
000004
C00006

004767
104423

DUMPER: : JSR

000000V

TRAP

RTS

000207

ESLSTNTSTNTNT
NN [V

4 words
: Routine Size:
; Maximum stack depth per

Voo ~NOINES
W

) cd —
)
e
e
—

162706

PC ,M$DUMPER

0 words

PRINTB (BA—PRINT, .ML_ADDR [MLBA, ML_ALL]):
PRINTB (DA PRINT, .ML"ADDR [MLDA, ML ALLJ);
PRINTB (CS2 PRINT, .MC_ADDR [MLCS2, ML_ALLI):
PRINTB (DS_PRINT, .ML_ADDR [MLDS, ML_ACL)):
PRINTB (ERZPRINT, .ML_ADDR [MLER, ML ALLJ)'
PRINTB (AS_PRlNT ML-ADDR [MLAS, ML_ALLD):
PRINTB (MR_PRINT, .ML_ADDR [MLMR, ML_ALLJ).

'PRINT MLBA CONTENTS
'PRINT MLDA CONTENTS
'PRINT MLCS2 CONTENTS
'PRINT MLDS CONTENTS
'"PRINT MLER CONTENTS
IPRINT MLAS CONTENTS
'PRINT MLMR CONTENTS

(DT_PRINT, .ML_ADDR [MLDT, ML_ALLJ):
(SN_PRINT, ML_ADDR [MLSN, MLALLY):
(EE_PRINT, -ADDR [MLEE, ML_ALL)):
(EL_PRINT, .ML_ADDR [MLEL, ML_ALL));

003636
000001

'PRINT MLWC CONTENTS

'PRINT MLDT CONTENTS
'PRINT MLSN CONTENTS
'PRINT MLEE CONTENTS
'"PRINT MLEL CONTENTS

.SBTTL

M$DUMPER EXTENDED MESSAGE PRINTING SECTION

SUB
MOV
MOV

#32.,S
#HEADER PRINT,=(SP)
#1,-(SP)

TRAP

M$DUMPER:

MOV

003710
000001

MOV
MOV

036772' 000036
000036

MOV
MOV

002366
000002

2171

PRINTB (WC_PRINT, .ML_ADDR [MLWC, ML ALY

000032

SE095068

$CODES

'PRINT THE HEADER
'DESCRIBE THE COLUMN HEADINGS
'PRINT MLCS1 CONTENTS

ENDMSG;

DUMPER EXTENDED MESSAGE PRINTING SECTION

PRINTB (HEADER_PRINT);
PRINTB (COL_DE3C_PRINT);
PRINTB (CST-PRINT, .ML ADDR [MLCS1, ML_ALL));

PRINTB
PRINTB
PRINTB
PRINTB

PR TR TR

TETETETE

T ETR B T T

172

invocation:

P.ACH

X.PRINT=

.SBTTL

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (9)

P.ACC
P.ACD
P.ACE
P.ACF
P.ACG

SN.PRINT=
EE.PRINT=
EL.PRINT=
HEADER.PRINT=
COL.DESC.PRINT=

003402°*

21-Apr=1981 08:40:22
21=-Apr=1981 08:19:06

TRAP

MOV
MOV

:
:

2171
2172

SP.RO

: SP.

#COL .DESC.PRINT, (SP)
#1,-(SP)

2173

: *,ML.REG
: ML.REG,*

2174

aML .ADDR, 36 (SP)
36(SP), (SP)

#CS1.PRINT,=(SP)
#2,-(SP)

BSKEL4

REV A PATCH 00

EXTENDED MESSAGE PRINTING SECTION

010600

036772"

000040

MOV

036772"
000004 000042
000042
002540
000002
036772

000006 000044
000044
"
002624
000002

000046

036772
000012 000050
000050
002776
000002

036772
000014

000052
003062"
000002

036772"

MOV
MOV

002454
000002

036772

MOV
TRAP
MOV
MOV

000052

MOV
TRAP
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV

MOV

MOV
MOV

TRAP
MOV
MOV
MOV
MOV

MOV

000054

MOV
TRAP
MOV

MOV
MOV

036772"

SP,RO
14

ML .ADDR,RO

2(R0) ,40(SP)

40(SP), (SP)
#WC.PRINT,=(SP)
#2,-(SP)

SP,RO

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1
.

ML .ADDR,RO

4(R0) ,42(SP)

42(SP), (SP)

#BA.PRINT,=(SP)
#2,-(SP)

2175

; *,ML.REG
; ML.REG,*
SP,»

* ,ML.REG

SP,*

ML .ADDR,RO
)
, 44 (SP)
6(RO
44 (SPY, (SP)

* ,ML.REG
*
ML .REG,

SP,RO

SP,*

ML .ADDR,RO
10(R0) ,46(SP)
. (SP)
46(SP)
#CS2.PRINT,~(SP)

* ,ML.REG
ML.REG,*

SP.RO

SP,*

ML .ADDR,RO
12(R0) ,50(SP)
. (SP)
50(SP)
#DS.PRINT,=(SP)

* ,ML.REG
ML.REG,*

SP.RO

SP,*

2177

2178

#2,-(SP)

2179

ML .ADDR,RO

* ML .REG

(SP)
, 520)
14(R
. (SP)
52(SP)
#ER.PRINT,=(SP)

*
ML .REG,

SP.RO

SP,*

#2,-(SP)
14

ML .ADDR,RO

54 (SP)
16(,R0)

)
. (SP)
54 (SP

#AS.PRINT,=(SP)

TRAP
MOV

#2,-(SP)

SP.RO

2176

ML.REG,*

SP.RO

#DA.PRINT,=(SP)
#2,-(SP)

Page
36
SEQ 0069

SP'.

MOV
MOV

MOV

016700

:40:
21=-Apr-1981 8 8:40:22
9:
21=-Apr=1981 8:19:06

* ML .REG
ML .REG,*

2180

2181

2182

000364

000372
000376

016066

016616
012746

EXTENDED MESSAGE PRINTING SECTION
0000%4

000056

MOV
MOV
MOV
MOV
MOV
TRAP
MOV

000026

036772

000030
000062

MOV
MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
MOV
MOV

000060

000062

003402
000002

036772
000042 000064

036772
000044 000066
000066
003552"
000002

000566

000207

TRAP
ADD

000124

k
184 words >
2 Rougine Size:
n:
invocatio
per
; Maximum stack depth

RTS

42 words

24(R0O) ,56(SP)
56(SP), (SP)
#MR.PRINT,=(SP)

8:40:
8:19

jole]

REV A PATCH 00

—

BSKELSG

—

21=-Apr=198
21=-Apr=198

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL&.BLI.1

SP,

SP,RO
14

2183

ML .ADDR,RO

26(R0O) ,60(SP)

, (SP)
60(SP)

* ,ML.REG
ML.RFG,*

SP,RO

SP,*

#D7.PRINT,=(SP)
#2,-(SP)

14
ML .ADDR,RO

* ,ML.REG

30(R0O) ,62(SP)
62(SP), (SP)

ML.REG,*

SP,RO

SP,*

#SN.PRINT,=(SP)
#2,-(SP)

* ,ML.REG
ML.REG,*

: SP,»
2186

ML .ADDR,RO
44 (RO) ,66(SP)
(SP)
, P)
66(S

* ,ML.REG
ML .REG,*

#EL.PRINT,=(SP)

#2,-(SP)

SP,RO

14
#124,SP

2184

2185

ML .ADDR,RO
42(R0) ,64(SP)
(SP)
64 (S,P)
SP,RO

; *,ML.REG
; ML.REG,*

#2,-(SP)

#EE.PRINT,=(SP)
#2,-(SP)

55095070

WP,
2171

BSKELSG

2188
2189
00 ~NONN BN NP
—
800802000

ROUTINE DECLARATIONS

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1T (100

%sbttl 'ROUTINE DECLARATIONS'

rout ine GEN_RANDOM_DATA
begin

: novalue =

FUNCTIONAL DESCRIPTION: GENERATE RANDOM DATA
THIS ROUTINE WILL GENERATE A WRITE BUFFER
THE ROUTINE TO ACTUALLY
OF RANDOM DATA.
GENERATE THE RANDOM NUMBER IS A GLOBAL MACRO
ROUTINE LINKED AT LINK TIME.

TR
R R R R
R

no
no

e T

il el

USLSTNLNTSTNTS SN,

PP PR
PR LR TRD R

D T

REY A PATCH 00

G 6
21=-Apr=1981 08:40:22
21=Apr=1981 08:19:06

!OFFSET VARIABLE INTO WRITE BUFFER

OFFSET;

WRT_BUF + %0'0"
WRT_BUF + %o'2’
WRT_BUF + %0'4"

OFFSET = %0'6";
incr WRD_CNT

begin

WRT BUF

end;

004167

0000006

016767
016767
016767
012701
012702
004767

000000G 001232°
000000G 001234°
000000G 001236

020227
003764
000207

; Routine Size:

'INITIAL SEED1 TO WRITE BUFFER + 0
'INITIAL SEED2 TO WRITE BUFFER + 2
'INITIAL SEED3 TO WRITE BUFFER + 4

.SEED1;
.SEEDZ:
.SEED3;

from L

'ADJUST OFFSET BY 6

to (128 + 511+2) do

OFFSET

end;

LOFFSET + 2;

.SBTTL

GEN.RANDOM.DATA ROUTINE DECLARATIONS

JSR

R1,$SAVEZ2

MOV
MOV
MOV

SEED2,WRT.BUF +2
SEED3,WRT.BUF +4
#6,R1

JSR

PC ,RANGEN

GEN.RANDOM.DATA:

MOV

000000G 001232°
000002

002176

28 words

'WRITE BUFFER + OFFSET GETS THE RANDOM NUMBER
'BUMP THE OFFSET BY 2

+ _OFFSET = _RANDAT;

1%:

Maximum stack depth per

MOV
TRAP

3 words

SCED1,WRT.BUF

#4 R2
22

2
3
: *,0FFSET

: *,WRD.CNT
5

MOV
ADD
INC
CMP

RANDAT ,WRT .BUF (R1)
#2 ,R1
R2
R2 #2176

:
:
;
;

RTS

BLE

invocation:

!LOAD 768 WORDS WITH RANDOM DATA
'GENERATE THE RANDOM NUMBER

;
RANGEN ()
BREAK;

2214
2215
2216
2217
2218

104422
016761
062701
005202

;

local

«»,«(OFFSET)
*,OFFSET
WRD.CNT
WRD.CNT,»

55096071

BSKELS
REV A PAT(H 00

21=-Apr=1981 08:40:22
21=-Apr=1981 08:19:06

ROUTINE DECLARATIONS

routine DM_RD_TRANSFER (SiZE, DST, SRO)

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (n

Page

SEQ 0072

novalue =

begin

TR R P LR

+*+

i
i
i

FUNCTIONAL DESCRIPTION: DIAGNOSTIC READ TRANSFER
THIS ROUTINE WILL PERFROM A DIAGNOSTIC
MODE READ TRANSFER AT THE DESIGNATED
SOURCE AND DESTINATION ADDRESSES.

I EETETE

]

f ORMAL PARAMETERS:
$iZk:

"TETETECETEIETE A

DR M R N R

DST:

2244
2245

010146

000662
000666
000672
000674
000700

016700
016046
011601
152701
016700
010160
016700
016046
011601
016700

000766

SOURCE ADDRESS OF TRANSFER
!CLEAR THE MASS BUS

.ML_DUT);

.SBTTL

DM.RD.TRANSFER ROUTINE DECLARATIONS

MOV

R1,=(SP)

DM.RD.TRANSFER:
036772
000010
000040
036772
000010
036772
000010

036776"
177770
000007

MOV

ML .ADDR,RO

BISB
MOV
MOV
MOV
MOV
MOV

#40,R1
ML .ADDR,RO
R1,10(RO)
ML .ADDR,RO
10(RO) ,=(SP)
(SF) ,R1

BIC
BICB
BIS
MOV
MOV
MOV
MOV

#177770,R0
#7 ,R1
RO,R1
ML .ADDR,RO
R1,10(RO)
ML .ADDR,RO
24 (R0O) ,-(SP)

MOV
MOV

MOV

016700

'ENABLE DATA DIAG MODE
'SELECT THE DIVICE UNDER TEST
'LOAD THE TRANSFER SIZE
'LOAD THE TRANSFER SOURCE ADDRESS
'LOAD THE TRANSFER DESTINATION ADDRESS
'LOAD A READ FUNCTION WITH GO SET

WRT RH (MLWC, wC REG, .SIZEY;
WRT RH (MLDA, DA REG, .SRC):;
WRT RH (MLBA, BA REG, .DST);
WRT RH (MLCS1, FUNC, FUNC_4):
end;

036772

000740
000744
000750
000754

000762

DISTINATION ADDRESS OF TRANSFER

CLR_MBUS;
DAT DM (ENABE)
.
WRT RH (MLCS2, DRV_SEL,

000660

000710
000714
000720
000722
000726
000732

SRC:

SPECIFIES THE SIZE OF THE TRANSFER

BISB
MOV

10(RO) ,=(SP)
(SP) ,R1

2219
2220
* ML .REG
ML .REG,MLREG
* ,MLREG
MLREG,
*

* ,ML.REG

ML .REG,MLREG

ML .DUT,RO

(SP) ,R1

#10,R1
ML .ADDR,RO

* ,MLREG
* MLREG
MLREG,
*

* ,ML.REG

ML .REG,MLREG

* MLREG

239

000007

#7.R1

* ,MLREG
* ,MLREG

R1,10(R0O)

MLREG,*

2(R0) ,=(SP)

* ML .REG

ML .ADDR,RO
R1,2(RO)
ML . ADDR,
RO

MLREG,
*

#177770.R0

177770

MOV

RO,R1
ML . ADDR,
R0

ML .ADDR,
RO

6(R0) ,=(SP)
20(SP) ,R1
RO
ML .ADDR,

Buerd

lon
o

pury

i
i

000004
036772"

#77.R0

RO, aML . ADDR
#16,SP
+ ,R1
(SP)

036772°
000016

98 woras
: Rougine Size:
; Maximum stack depth per

R1.6(RO)
ML . ADDR,
RO
4(RO) ,=(SP)
R
24(SP)
ML .ADDR ,RO
R1.4(RO)

= (SP)
aML .ADDR,
(SP)+ ,RO

000077
000051

i
s
&»&O

i
ol
il

D
i
i

MOV

REBRRXNEE

001102

clh il

* ML .REG

036776

MOV

22(SP) ,R1

012601
000207

MLREG,*

R1,24(RO)
ML . ADDR,RO
10(R0) ,=(SP)
(SP) ,R1
ML .DUT RO

MOV

000024
036772"
000010

036772"

001160
001162

ROUTINE DECLARATIONS

TOPS=20 Bliss=16 V 2(212)
(1D

PA:<NEALE>PMSKL4.B LI.T

1nyocation:

10 words

010160
016700
016046
011601
016700

001020

001006
001010
001014

— -

000772
000776
001002

38 38888833

.
.

REV A PAT(CH 00

BSKEL4

Wew.

21-Apr=1981 08:40:22
21-Apr=1981 08:19:06

SEQ

g5073

2240

ML .REG,MLREG

241

SIZE ,MLREG

2242

* ML.REG

SRC ,MLREG

MLREG,
*

2243

* ML.REG

DST.MLREG
MLREG,
*
* ML.REG
ML .REG,MLREG
* ,MLREG
* ,MLREG
MLREG,
*

2244

2219

BSKELS

REV A PATCH 00

3
:
3
;
:
3
3
3
:
3
:
:
:
:
:
S
$
;
:
3
3
:
:
3
3

2246
2247
2248
2249
2250
2251
2252
2253
2254
2255
2256
2257
2258
2259
2260
2261
2262
2263
2264
2265
2266
2267
2268
2269
2270

2272

001164

001166
001172
001176
001200
001204

001210
001214
001220
001224
001226
001232
001236
001242
001244
001250
001254
001260
001264
001266
001272

2271

routine DM_WRT_TRANSFER (SIZE, DST, SR()
begin

l
|

010160
016700
016046
011601
(016700
042700
142701
050007
016700
010160
016700
016046
011601
152701
016700

Page

SEQ 0074

: novalue =

THIS ROUTINE WILL PERFORM A DIAGNOSTIC
MODE WRITE TRANSFER AT THF DESIGNATED
SOURCE AND DESTINATION ADDRESSES.

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (12)

FUNCTIONAL DESCRIPTION: DIAGNOSTIC MODE WRITE TRANSFER

FORMAL PARAMETERS:
SIZE:

SIZE OF THE TRANSFER

DESTINATION ADDRESS OF THE TRANSFER

DST:
l
I

SOURCE ADDRESS OF THE TRANSFER

CLR_MBUS;
DAT DM (ENABE) ;

'CLEAR THE MASS BUS
'ENABLE DATA DIAG MODE

WRTTMRH (MLWC, WC_REG, .SIZET:

iLOAD THE TRANSFER SIZE

'SELECT THE DIVICE UNDER TEST

WRT_RH (MLCS2, DRV_SEL, .ML_DUT):

iLOAD THE DESTINATION ADDRESS
iLOAD THE SOURCE ADDRESS
'LOAD A WRITE FUNCTION WITH GO SET

WRTRH (MLDA, DA_REG, .DST);:
WRTRH (MLBA, BA_REG, .SRC):
wn;_au (MLCST, FONC, FUNC_S);
ena,

_SBTTL

010146

016700
016046
011601
152701
016700

21-Apr=1981 08:19:06

ROUTINE DECLARATIONS

21-Apr=1981 08:40:22

036772"

000010

DM.WRT.TRANSFER ROUTINE DECLARATIONS

DM.WRT.TRANSFER:
R1,-(SP)
MOV

MOV

ML . ADDR,RO

10(R0O) ,=(SP)
(sP) ,R1

;

* «,ML.REG

* ML.REG,MLREG

= ,MLREG

000040

BISB

#40,R1

000010

MOV

R1.10(RO)

: MLREG,*

10(R0) ,=(SP)

: *,ML.REG

036772"

000010

036776"
177770
000007

036772"

000010
036772"
000024

000010

036772"

MOV

ML .ADDR,RO

MOV

RO
ML . ADDR,

MOV

(SP) ,R1

MOV

MOV
BIC

BI(B

BIS

MOV

MOV
MOV

MOV

BISB
MOV

ML.DUT,RO
#177770.R0
#7.R1

: ML.REG,MLREG

: *,MLREG

RO.R1

: ».MLREG

R1.10(R0)
ML . ADDR RO

: MLREG,*
:

ML . ADDR,R

24 (R0) ,=(SP)
(SP) ,R1

#10,R1

ML .ADDR,RO

2246
2247

* »,ML.REG

: ML.REG,MLREG

* ».MLREG

266

BSKEL4

REV A PATCH 00

ROUTINE DECLARATIONS

001276

000024
036772"
000010

R1,24 (RO)
ML . ADDR,
RO
10(R0) ,~(SP)

036776"

ML .DUT,RO

'
'

001302
001306
001312
001314
001320

010160
016700
016046
011601

(SP) ,R1

#177770.R0

177779
000007

#7.R1

RO.R1

RO
ML . ADDR,
)
R1.10(R0
ML . ADDR,
RO
2(R0O) ,=(SP)
22(SP3 ,R1
RO
ML .ADDR,

036772"

R1,2(RO)
ML . ADDR
RO

001362
001366
001372
001376
001402
001406
001412

6(RO) ,=(SP)
22(SP) ,R1
ML .ADDR,RO

R1.6(RO)
ML . ADDR,RO
4(RO) ,=(SP)

001416

22(SP) ,R1

001422
001426
001432
001436
001442
001444
001450
001454
001460

ML .ADDR,
RO
R1.4(RO)
aML .ADDR,=(SP)

(SP) +.R0

#77.R0
#61.R0
RO, aML . ADDR
#16,SP
(SP)+,R1
PC

001464
001466

98 words
: Routine Size:
; Maximum stack depth per

;

invocation:

10 words

—_——

21=Apr=19
21=Apr=19

00 Co

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T1 (12)
; MLREG,*

; *,ML.REG
; ML.REG,MLREG

58095075

2267

* ,MLREG
* ,MLREG
MLREG,*

* ML .REG

2268

: SIZE,MLREG
MLREG,
*

2269

* ,ML.REG

DST ,MLREG
MLREG,
*

* ,ML.REG

2270

SRC,MLREG
MLREG,
*

* ,ML.REG

ML .REG,MLREG

2271

* ,MLREG
* MLREG.

MLREG,
*

2246

21-Apr=1981 08:40:22
| BSKEL&
21-Apr-1981 08:19:06
ONS
| REV A PATCH 00 ROUTINE DECLARATI
2273 routine DM_RAND_LOAD (TEMP_ARRSBNK_SEL) : novalue =
i :
:

Ss;g

2279

2282

2¢80
2281

:
3

!
!

FUNCTIONAL DESCRIPTION: DIAGNOSTIC MODE RANDOM DATA LOAD
THIS ROUTINE WILL LOAD VIA DIAGNOSTIC MODE
RANDOM DATA TO THE DESIGNATED ARRYA AND BANK
SELECTED BY THE TEMP ARRAY AND BANK SELECT
FORMAL PARAMETERS

ARGUMENT.

3
3

2283
2284

!
'

:
:

2286
2287

!
!

:
:
:

2289
2290
2291

;
3
3

2295
2296
2297

GEN_RANDOM_DATA ();
S_BUF_INDEX = ZERO;
BOF _INDEX = .S_BUF _INDEX

;

gggg

1ncrbSEQ-CNT from 0 to .BNK_NUM_SEC do

2285

:
3

2288

2292
gggz

gggg

TEMP_ARRS$BNK _SEL:

THISTARGUMENT STORES THE SELECTED ARRAYS
ARRAY SELECT NUMBER AND THE SELECTED ARRAYS

BANK SELECT NUMBER.

local

'START BUFFER INDEX POINTER
'BUFFER INDEX POINTER
'GENERATE A WRITE BUFFER WITH RANDOM DATA

S_BUF _INDEX,
BUF _INDEX;

ITHE FIRST SECTOR STARTS AT WRITE BUF WORD ZERO
'BUF INDEX WILL GET 128 RANDOM DATA WORDS

DM_WRT_TRANSFER (STZE = -256 DST= .TEMP_ARRSBNK_SEL, SRC = WRT_BUF);
egin

'LOAD ALL SECTORS IN BANK WITH RANDOM DATA

BREAK;

ggg%

%ggg

3
:
3
:
3

2306
2307
2308
2309
2310

'LOAD ALL WORDS IN SECTOR WITH RANDOM DATA
1ncrbURD CNT from 0 to 127 do
egin
WRT_RH (MLD1, DB1_REG, .WRT_BUF [.BUF_INDEX, WRD]): !LOAD DATA REG 1
WRTZRH (MLD2. DB2_REG, .WRT_BUF [.BUF_INDEX, WRD]): !LOAD DATA REG 2
DATA REG 3
WRT“RH (MLE2. E2_REG, .WRT_BUF [.BUF TNDEX WRDJ); 'LOAD
TCLOCK THE RANDOM DATA INTO THE ML=-11 LONG WORD
DAT_CLK;
IGET THE NEXT RANDOM DATA WORD
BUF _INDEX = .BUF_INDEX + ONE;

;
:

2313
gg}g

S_BUF _INDEX = .S_BUF_INDEX + 2;
eUg INDEX = .S_BUF_INDEX;

2316

2318

end;

001470

004167

0000006

001474

162706

(000020

2317

Page 43
SEQ 0076

begin

2274
2275
2276

| ¢
:
:

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (13)

ISTART THE NEXT SECTOR 2 WORD DEEPER
'BUF INDEX WILL GET 128 MORE RANDOM DATA WORDS

'CLEAR THE SINGLE STEP DMA MODE

CLR_MBUS;
.SBTTL
. LOAD:
DM.RAN

JSR

SuB

DM.RAND.LOAD ROUTINE DECLARATIONS

R1,$SAVES
#20,SP

2273%

004767
005005
005004
012746
011667
016646

011667
012746
011667

ROUTINE DECLARATIONS

——

;g.GEN.RANDOM.DATA

177064

R4
#-400,=(SP)
(SP) ,SIZE
40(SP) ,=(SP)
(SP) ,DST

177400

037024
000040
037026
001232°
037030*
177420
037014" 000010
000006

;

BNK .NUM.SEC,10(SP)

2%:

* SEC.CNT

6(SP)
3%
22

Page

SEQ 0077

2295
2296
2297
2298

TEMP.ARRS$BNK.SE
,*

.BUF ,=(SP)
#WRT
(SP) ,SRC
PC,DM.WRT.TRANSFER

1%:

036772
000036 000024

UF
. INDEX
S.B
F
. INDEX
BU

REV A PAT(CH GO

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (13)

BSKELS&

. CNT
WRD

R4 ,R3
R3

BUF . INDEX,*

ML .ADDR,R3
36(R3) ,24(SP)

* ML .REG

2300
2301
2304
2306

001232"
:

ML .ADDR,R3

036772°"
000036
036772°
000040 000022

R2.36(R3)

: MLREG,*

ML .ADDR,R3
40(R3) ,22(SP)
(R1) .R2
ML .ADDR,R3
R2.40(R3)

036772
000040
036772
000034 000020

* = ,ML.REG
1«

* % ML.REG

ML .ADDR,R3
24(R3),16(SP)
16(SP) .R2
#20,R2

ML .ADDR,R3

R2.24 (R%)
R4
RO

RO, #177
2%
#2,R5

00G010
000014

3%:

RS,R4
6(SP)

6§SP),10(SP)
]

ML .ADDR,R3

10(R3) ,14(SP)
14(SP) ,R2

2308

; *,MLREG

R2.34 (R3)

000016

2307

MLREG

; MLREG,*

ML .ADDR,R3
34(R3) ,20(SP)
(R1),R2
ML .ADDR,R3

036772"

*,MLREG

; MLREG,*

:6*.ML.REG
«" M( .REG,MLREG
* « MLREG
: MLREG,~

EX
F
. IND
; BU

: WRD.CNT
: WRD.CNT,»

:
:
s
:

*,S.BUF.INDEX
S.BUF . INDEX ,BUF . INDEX
SEC.CNT
SEC.CNT,»

P »,ML.REG

: ML.REG,MLREG

2310
2304

2313
2314
2300

2315

21-Apr=1981 08:40:2 2
21-Apr=1981 08:19:0 6

BSKEL&
REV A PAT(H 00

ROUTINE DECLARATIONS

001776

000040

152702

016703
010263
016703
016366
016602
016705
042705

N 6
21=-Apr=1981
21-Apr=1981

036772°

016703
010263
062706
000207
126 words
;. Maximum stack depth per invocation:
;

Routine Size:

BISB

#40,R2

;

*,MLREG

MOV
MOV
MOV
MOV

ML .ADDR,R3
10(R3),12(SP)

R2.10(R%)

;

MLREG,*

BIC
BICB
BIS

142702
050502

MOV

MOV
ADD
RTS

17 words

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1

ML .ADDR,R3

12(SP) .R2
ML .DUT ,RS

;

*,ML.REG

; ML.REG,MLREG

#7,R2
RS,R2

*,MLREG

Page

SEQ 0078

#177770,RS
ML .ADDR,R3

R2.10(RS}

#26,SP

;

*,MLREG

MLREG,
*

2273

- BSKELL
REV A PAT(HM 00 ROUTINE DECLARATIONS
:

2319

:
:
}
:

e
2326
e3?
Sgg

2330

:
|

235%
2333

'
!

3
:

:
:

53352 : FUNCTIONAL DESCRIPTION: DIAGNOSTIC MODE LOAD ONES AND ZEROES DATA

2331

233

2335

233
38
2338

2339
2340

:
:

2341
2342

3
:

2344
53322

2343

THIS ROUTINE WILL LOAD VIA DIAGNOSTIC MODE
ONES OR ZEROES ‘' THE CONTENTS OF DATA *‘ 10
THE DESIGNATED ARRAY AND BANK SELECTED BY
TEMP ARRAY BANK SE_ECT ARGUMENT.

|
:
!

FORMAL PARAME TERS:

NK :
TEMP_ARRSA_SEL

THISTARGUMENT STORES THE SELECTED ARRAYS ARRAY
SELECT NUMBER AND THE SELECTED ARRAYS BANK SEL=-

DATA:

!
3

ECT NUMBER.

THIS ARGUMENT CONTAINS THE SELECTED DATA PATTERN
TO BE WRiTTEN THE THE ARRAY AND BANK SELECTED BY

ARRAY BANK SELECT.

'SINGLE STEP DMA WRITE MODE
NK_SEL, SRC = WRT BUF).
.TEMP_ARRSB
=
DST
=256,
=
(SI2E
DM_WRT_TRANSFER
DATA REG 1 WITH DATA
'LOAD
.DATA);
DB1_REG,
(MLD1,
wRY_RHMTM
'LOAD DATA REG 2 WITH DATA
WRT_RH (MLD2, DB2_REG, .DATA);
'LOAD DATA REG 3 WITH DATA
WRT_RH (MLE2, E2_REG, .DATA);
'LOAD ALL SECTORS IN BANK WITH DATA
incr SEC_CNT from 0 to .BNK_NUM_SEC do

3
:
3

3%4‘;
2349

incr WRD_CNT from 0 to 127 do

2352

incr WRD_CNT from 0 to (127 + 511+2) do

'CLOCK THE DATA [NTO THE ML-11
'FILL THE WRIVE BUFFER JUP WITH DATA

2355

CLR_MBUS;

'CLEAR THE SINGLE STEP DMA MODE

:
3

gggg
gggz

2356

'LOAD ALL WCRDS [N SECTOR WITH DATA

DAT_TLK;

WRT_BUF [.WRD_CNT, WRD] = .DATA;

end;

002064

(0041567

000000G

002070

162706

000014

002100

011667

037024°

002114
002120

012746
011667

001232°
037030°*
177034

.SBTTL
DM.1.0.LO0AD:

DM.1.0.LOAD ROUTINE DECLARATIONS

JSR

R1,$SAVES

002074 012746 177400

MOV

#-400,=(SP)

;

002104 016646 000036
002110 011667 037026'

MOV
MOV

36(SP) ,=(SP)
(SP) ,DST

,*
BNK
; TEMP,ARRS,SE

004767

JSR

002124

Page &6
SEQ 0079

begin

2
S

10PS=2) Bl iss=16 v2(212)
PA: <NEALE>PMSKLA.BLI.T (14)

routine DM_1_O_LOAD (TEMP_ARRSBNX_SEL, DATA) : novalue =

3
}

21=Apr=1981 08:40:22
21=Apr-1981 08:19:06

002130 016701 036772'

SUB

MOV

#14,SP

(SP) ,SIZE

MOV
MOV

#WRT .BUF ,-(SP)
(SP),SRC

MOV

ML .ADDR,R1

PC,DM.WRT, TRANSFER

2319

2342

2343

| BSKEL&
'

REV A PATCH 0OC

ROUTINE DECLARATIONS

002134

000036
000040

002142
002146
002150
002154
002160
002164

016166

016605
010500
016701
010061
016701
016166

c 7
21-Apr-1981 08:40:22
21-Apr=1981 08:19:06

55095080

36(R1),20(SP)

000020

40(SP) .RS
R5.,RO

ML .ADDR,R1

036772"
000036
036772°
000040 000016
036772"
00004
036772"
000034 000014
036772"
000034
037014"

RO.36(RT)

ML .ADDR,R1
40(R1),16(SP)
ML .ADDR,R1
RO.40(R1)

R
ML . ADD,R1
34(R1),14(SP)
ML .ADDR,R1
,
34 (R1)
RO
,R4
M.
SEC
BNK .NU

R2.#177
2%
R3
R3.R4
1%
RO
RO,R1
R1

(R1)
RS,WRT.BUF

RO, #2175

002175

; MLREG,*

RO.24 (R1)

001232"

; *,ML.REG

24(R1),12(SP)
12(SP) RO
ML .ADDR,R1

4%:

; MLREG,*

R3
33
R2

#20,R0O

3%:

2344

; SEC.CNT

ML .ADDR,R1

036772".
000024 000012
000012

: WRD.CNT

ML .ADDR,R1
10(R1) ,10(SP)
10(SP) .RO

000006

ML .ADDR,R1
RO,10(R1)
ML .ADDR,R1
10(R1) ,6(SP)

#40,R0

6(SP) ,RO
ML .DUT,RS

#177770,RS
RS.RO
ML . ADDR,R1
RO,10(R1)

#22,SP

2345

2347
2349

*,ML.REG

; ML.REG,MLREG
; *,MLREG
: MLREG,*
: WRD.CNT
: WRD.CNT,*

; SEC.CNT
s SEC.CNT,*

2347

WRD.CNT

2352

: WRD.CNT,*

2353

; WRD.CNT
; WRD.CNT,»

2352

036772
000010 000010
000018

000010

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (14)

* ML.REG

2353

: ML.REG,MLREG
: *,MLREG
: MLREG,*

* ,ML.REG

:
:

*,MLREG
* ,MLREG

; ML.REG,MLREG

*
MLREG,

2319

!f_._‘,.__..--_..

ANST

=PRSS

——

i BSKEL&

21=-Apr=1981 08:19:06

| REV A PATCH 00 ROUTINE DECLARATIONS
002432

-; Routine Size:

RIS

000207
116 words

)

: Maximum stack depth per invocation:

21-Apr=1981 08:40:22

15 words

TOPS=20 Biiss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1 (14)

Page 48

SEQ 0081

BSKELSG

E 7
21-Apr=1981 08: 40:22
21=-Apr=1981 08: 19:06

REV & PATCH 00

ROUTINE DECLARATIONS

routine WRT_CHK_TRANSFER (SI1ZE, DST, SRO)
begin

TOPS=20 Bliss=16 v2(212)
(15
PA:<NEALE>PMSKL4.BLI.1T

novalue =

‘ae

.
.

FUNCTIONAL DESCRIPTION: WRITE CHECK TRANSFER
THIS ROUTINE WILL PERFORM A WRITE CHECK TRANSFER
AT THE DESIGNATED SOURCE AND DESTINATION ADDRESS.

.
.

FORMAL PARAMETERS:
SIZE:

.
L4

STORES THE SIZE OF THE TRANSFER

snc.

STORES THE DESTINATION ADDRESS OF THE TRANSFER
STORES THE SOURCE ADDRESS OF THE TRANSFER

.
.
.

CLR_MBUS;

ECCDIS (ENABE):

L4
.

WRTTMRH (MLCS2, DRV_SEL,

.ML_DUT);

WRT-RH (MLWC, WC_REG, "SIZEY:

L4
.

WRT-RH (MLDA, DA_REG, DST):
WRTRH (MLBA, BATREG, .SRC);
WRTTMRH (MLCS1, FONC, FUNC 4)

.
.
'

if .ML_ADDR [MLCS1, SC]

then

not

then

.
.

.
B

.
.

'WE EXPECT THE WRITE CHECK BIT TO BE SET

'DROP THIS UNIT

'JUMP TO THE CLEAN UP CODE

end;

'DOES THE TRANSFER CAUSE A SC ERROR

'REPORT THE UNEXPECTED ERROR
R_MSG, DUMPER);
gSF (ERR_13, UNX_DRV_ER
'PRINT WHAT TRANSFER CAUSED THE ERROR
wT_CHK_XFER MSG)
DOCLN;
end;

.ML_ADDR [MLCS2, WCE]

PRINTB (ONE_MSG,
DODU(.LSUNTIT);

'LOAD A WRITE CHECK FUNCTION WITH GO SET

begin

!CLEAR THE MASS BUS
'DISABLE ERROR CORRECTION
'SELECT THE DIVICE UNDER TEST
'LOAD THE TRANSFER SIZE
'LOAD THE DESTINATION ADDRESS
'LOAD THE SOURCE ADDRESS

'DELAY FOR TRANSFER TO COMPLETE

until .ML_ADDR [MLDS, DRY]:
if .ML_ADDR [MLCST, SC]

then

'DID THE TRANSFER CAUSE A SC ERROR

begin

it not .ML_ADDR [ML(CS2, WCE]

then

i
begin

‘WE EXPECT THE WRITE CHECK BIT TO BE SET

Page

SEQ 0082

BSKEL &

REV A PATCH 00

2409
2410
2611
2612
2613
2414
2415
2416
24617

016700
016066
016601

SEQ 0083

'JUMP TO THE CLEAN UP CODE

DOCLN;
end;

end;
end,;

LSBTTL

WRT.CHK.TRANSFE ROUTINE DECLARATIONS

MOV

R1,=(SP)

WRT.(HK.TRANSFE:

000032
036772"

SuB

000030

MOV
MOV
MOV

BISB

000026

016601
016700

042700
142701

016066

Page

‘DROP THIS UNIT

DODU (. LSUNTT);

16700
010160
016700
016066

010160
016700

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1T

'REPORT THE UNEXPECTED ERROR
ERRSF (ERR_13, UNX_DRV_ERR _MSG, DUMPER);
PRINTB (ONE_MSG, WwT_CHR_XFER_MSG); '"PRINT WHICH FUNCTION CAUSED THE ERROR

152701

050001
016700
010160
016700
016066
016601
152701
016700
010160
016700
016066
016601
016700
042700
142701
050001
016700
010160
016700
016066
016601
016700

21=-Apr=1981 08:19:06

ROUTINE DECLARAT IONS

010146
162706

21-Apr=1981 08:40:22

036772"
000010
036772
000024
000024
000024

000002
036772
000024
036772
000010 000022
000022
036776
177770

000007

MOV
MOV
MOV
MOV
MOV
MOV

BIC
BICB
BIS
MOV
MOV
MOV
MOV
MOV

BISB
MOV
MOV
MOV

MOV

MOV
BIC
BI(B
BIS
MOV
MOV

036772
000020

000016

MOV

MOV
MOV
MOV

MOV
MOV

2357

#32,SP

2358

ML .ADDR,RO

0)
, 30(SP)
10(R

* ,ML.REG
ML.REG,MLREG
* MLREG

30(SP) .R1

#40,R1

ML .ADDR,RO
R1.10(RO)
ML . ADDR
, O
26 (SP)
10(,R0)
26(SP) -R1
ML .DUT .RO

*
MLREG,
;
;

#177770.R0
#7.R1
RO.R1
ML . ADDR,
RO
R1.10(RO)

*,ML.REG
ML.REG,MLREG
* ,MLREG

* ,MLREG

MLREG,
*

RO
ML . ADDR,

24 (SP) -R1
#2.R1

* ,MLREG

R1.24 (RO)

*
MLREG,

22 (SP)
10(,R0)

* ML.REG
ML .REG,MLREG

ML . ADDR ,RO

RO
ML - ADDR
22(SP) -R1

ML .DUT

2376

* ML.REG
ML.REG,MLREG

(SP)
, 240)
24(R

2377

#177770,R0
#7.R1
RO,R1

* ,MLREG

R1.10(R0)

*
MLREG,

2(R0),20(SP)
R
42(SP)

* ML.REG
SIZE ,MLREG

R1.2(RO)

*
MLREG,

* ,MLREG

ML . ADDR, RO

ML . ADDR , RO

ML .ADDR,RO

,
ML . ADDRRO

6(RO) ,16(SP)

* ML.REG

2378

BSKELG
REV A PAT(H 00

002676

G 7
21-Apr=1981 0 8:40:22
21=-Apr=1981 0 8:19:06

DECLARAT IONS

016601
016700
010160
016700

40(SP) ,R1

; DST,MLREG

R1,6(RO)

; MLREG,*

ML .ADDR,RO
ML .ADDR,RO
4 (RO) ,14(SP)
36(SP) ,R1
ML .ADDR,RO
R1,4(RO)
aML .ADDR,12(SP)
12.5P) RO

000014

000012

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (15)

* «,ML.REG

* SRC,MLREG
*
MLREG,
* ,ML.REG

?QL.ADDR.10(SP)

036772

ML .ADDR,RO

000010
040000

10(R0O) ,6(SP)
#40000,6(SP)
1%
54
15

000006
000006

* ,MLREG

*
MLREG,

* ,ML.REG

; *,ML.REG
;

2391

#ONE .MSG,=(SP)
#2,-(SP)

SP,RO

2392

LSUNIT,RO

000000G

1%:

000004

036772 000002
016700 036772"
016016 000010
032716 040000
001022
104454
000015
001362
000000*

012746
012746
012746
010600

001546"
001630
000002

016700

000000G

104414

2387

2390

000006
036772"
000012 000004

2383

*,ML.REG

UNX.DRV.ERR.MSG
DUMPER
K
,=(SP)
.CH
. XFER.MSG
#WT

001546"
001630°*
000002

2381

ML .REG,MLREG
* ,MLREG

#77 .RO
#51,R0
RO,aML .ADDR

036772" 000010

2380

MOV
BPL
MOV
MOV

BIT

TRAP

.WORD
. WORD
. WORD

MOV
MOV
MOV

MOV
TRAP

MOV

2389

#6,SP
ML .ADDR,RO
12(R0) ,4(SP)

;

aML .ADDR,2(SP)

: *,ML.REG

4(SP)
1%

2%
ML .ADDR,RO

, (SP)
10(RO)
#40000, (SP)
2%
54
15

2400

*,ML.REG

; ML.REG

2402
2406

* ML.REG

; *,ML.REG
2409

UNX.DRV.ERR.MSG
DUMPER

#WT . CHK XFER.MSG,=(SP)

2610

#ONE .MSG,=(SP)
#2,-(SP)

SP,RO
14

LSUNIT,RO

2611

| BSKELS
' REV A PATCH 00 ROUTINE DECLARATIONS
. 003166
- 003170

104451
104444

| 003202
003204

012601
000207

TRAP
TRAP

- 003172 062706 000006
003176 062706 000032
: Routine Size:

181 words

2$:
:

: Maximum stack depth per inyocation:

21=-Apr=1981 08:40:22
21-Apr-1981 08:19:06

17 words

ADD
ADD

MOV
RTS

51
ai

#6,SP
#32,SP

(SP) +,R1
PC

T0PS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (15)

3
:

Page 52
SEQ 0085

2408
L I

REV A PATCH 00

2418
2419
2420
2421
24622
2423
2624
2425
2426
2627
2428
2429
2430
2431
2432
2433
2434,
2435
2436
2437
2438
2439
2440

.
.

4
.

.
.

.
-

4
-

L4
.

.
.

.
-

.
.

.
-

K
B

.
-

.
.

L4
.

.
-

.
.

2641

.
.

.
-

.
.

.
-

2442
2443
24bd,
2645

2446

.
.

.
-

.
.

.
-

E
-

.
-

.
.

.
N

.
-

.
.

4
-

.
.

.
-

o
.

.
-

»
-

.
.

2447
2448
2449
2450
2451
2452
2453
2454
2455
2456
2457
2458
2459
2460
2461
2462

begin

FUNCTIONAL DESCRIPTION: WRITE TRANSFER

THIS ROUTINE WILL PERFORM A WRITE TRANSFER
AT THE DESIGNATED SOURCE AND DESTINATIONS

ADDRESS.

;
1

F ORMAL PARAnegggé:

s "

STORES THE SIZE OF THE TRANSFER

STORES THE DESTINATION ADDRESS OF THE TRANSFER

S1¢

SRC(:

STORES THE SOURCE ADDRESS OF THE TRANSFER

CLR_MBUS;

WRT_RH (MLCS2, DRV_SEL, .ML_DUT);
WRT_RH (MLWC, WC_REG, .SIZEJ;
WRT_RH (MLDA, DA_REG, .DST):
WRT_RH (MLBA, BA_REG, .SRC);
WRT_RH (MLCS1, FUNC, FUNC_5);
then

ICLEAR THE MASS BUS

'SELECT THE DIVICE UNDER TEST
'LOAD THE TRANSFER SIZE
'LOAD THE DESTINATION ADDRESS
'LOAD THE SOURCE ADDRESS
'LOAD A WRITE FUNCTION WITH GO SET.
'DOES THE TRANSFER CAUSE A SC ERROR

it .ML_ADDR [MLCS1, SCJ
begin

'REPORT THE UNEXPECTED ERROR
ERRSF (ERR 13, UNX_DRV_ERR_MSG, DUMPER);
FUNCTION CAUSED THE FRROR
WHICH
'PRINT
_MSG);
PRINTB (ONE_MSG, WRT_XFER
UNIT
THIS
'DROP
DODU (.LSUNIT);
' JUMP TO THE CLEAN UP (CODE
DOCLN;
end;

'DELAY FOR TRANSFER TO COMPLETE

until .ML_ADDR [MLDS, DRYJ;

'DID THE TRANSFER CAUSE A SC ERROR

i; .ML_ADDR [MLCS1, SC]

then

begin

'REPORT THE UNEXPECTED ERROR
ERRSF (ERR 13, UNX _DRV_ERR MSG, DUMPER);
FUNCTION CAUSED THE ERROR
WHICH
'REPORT
MSG);
WRT_XFER_
PRINTB (ONE_MSG,
UNIT
THIS
'DROP
DODU (.LSUNTT);
'JUMP TO THE CLEAN UP CODE
DOCLN;

2464

2466

PA:<NEALE>PMSKL4.BLI.T1 (16)

routine WRT_TRANSFER (SIZE, DST, SR() : novalue =

2463

2465

21-Apr=1981 08:19:06

ROUTINE DECLARATIONS

TOPS=20 Bliss=16 v2(212)

BSKELSG

21-Apr=1981 08:40:22

end;

.SBTTL

WRT.TRANSFER ROUTINE DECLARATIONS

Page

SEQ 0086

BSKEL&

REV A PAT(H Q0

. 003206
-

003210
003214
003220
003226
003232
003236
003242

ROUTINE DECLARATIONS
WRT.TRANSFER:

010146

162706

016700

J 7
21-Apr=1981 08:40:22
21=Apr=1981 08:19:06

000024
036772"
000010 000022
000022
000040
036772"
000016
036772"
000010 000020
000020
036776
177770

SuUB
MoV
MOV
MOV
BISB
MOV
MOV
MOV
MOov
MOV
MOV
BIC

BICB

000007
036772
10
036772
000010 0C0016
000016
036776"
177770
000007
036772
000010
036772
000002
000034
036772"
000002
036772"
000006
000032
036772
000006
036772"
000004
000030
036772"
000004
036772
000006
000077
000061
036772°
036772'

MOV

000014

000012

000010

000006

000004

BIS

MOV
%
MOV
MOV
MOV
MOV
BIC
BICB
BIS

MOV
MOV
MOV
MOV
MOV
MOV
MoV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
BICB
BISB
MOV
MOV

BPL
TRAP

. WORD
.WORD

R1,=(SP)
#24,5P
ML .ADDR,RO

22 (SP)
10(,R0)

22(SP) .R1

#40,R1

ML .ADDR,RO

R1.10(RO)
ML . ADDR,RO

20(SP)
10(,R0)

20(SP) .R1

ML .DUT.RO

#177770.R0
#7.R1
RO.R1

ML . ADDR,RO
R1.10(RO)
RO
ML . ADDR,
(SP)
16
R0)
,
10(
16(SP) .R1
ML .DUT,RO
#177770.R0
#7.R1

RO.R1
ML . ADDR
RO
R1,10(R0)
ML . ADDR,
RO

2(R0) ,14(SP)
34(SP) ,R1
RO
ML .ADDR
R1,2(RO)
ML . ADDR,RO

6(R0) ,12(SP)
32(SP) ,R1

ML .ADDR,RO
R1.6(RO)

ML .ADDR,RO

4(R0) ,10(SP)

30(SP) ,R1
RO
ML .ADDR
R1.4(RO)
6 (SP)
aML .ADDR,
6(SP) .RO
#77.R0O
#61,R0
RO,
aML . ADDR

,
4 (SP)
aML . ADDR
1%

15
UNX.DRV.ERR.MSG

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T1 (16)

55095087

2418
2419
* ,ML.REG
ML .REG,MLREG
* ,MLREG
MLREG,
*

* ML .REG
ML .REG,MLREG

* ,MLREG

* ,MLREG
MLREG,*

2438

* ,ML.REG

ML .REG,MLREG
* ,MLREG
* ,MLREG

MLREG,*
* ML .REG

2439

SIZE ,MLREG
MLREG,*
* ML .REG
DST.MLREG

MLREG,=

* ,ML.REG
SRC ,MLREG
MLREG,*
* ML.REG

ML .REG,MLREG

2440

2441

2442

* ,MLREG

MLREG,
*

* ,ML.REG

chldy

2447

BSKELS

REV A PATCH 00

003524
|

K 7
21=Apr=1981
21-Apr-=1981

ROUTINE DECLARATIONS

PA:<NEALE>PMSKL4.BLI.1 (16}

DUMPER
#WRT . XFER.MSG,=(SP)

001474"
001630°
000002

003526
003532
003536
003542
003544
003546
003552

10PS=20 Bliss=16 v2(212)

#ONE .MSG,=(SP)
#2,<(SP)

SP.RO

SP.'

000006
000002

1%:

2449

51
Gl
#6,SP

ML .ADDR,RO
12(R0) ,2(SP)
2(SP)
1%

aML .ADDR, (SP)
2%
54

036772

2448

LSUNIT,RO

000000G

Page

SEQ 0088

2446
2455
* ,ML.REG

ML .REG

* ,ML.REG

2457
2460

15
UNX.DRV.ERR.MSG
DUMPER

001474
001630°"
000002

#ONE .MSG, = (SP)
#2,<(SP)

SP,RO
14

016700
104451

0000006

062706
062706
012601
000207

000006
000024

104444

003654
003660
003662

151 words
; Routine Size:
; Maximum stack depth per invocation:

2461

#WRT . XFER.MSG,=(SP)

LSUNIT,RO
51

2%:

44
#6,SP

(SP)+,R1

14 words

§ P,

2462
2459

2618

PA:<NEALE>PMSKL4.BLI.T (17)

begin

FUNCTIONAL DESCRIPTION: READ TRANSFER

THIS ROUTINE PERFORMS A READ TRANSFER AT THE
DESIGNATED SOURCE AND DESTIONATION ADDRESSES.
FORMAL PARAMETERS:
SIZE:

STORES THE SIZE OF THE TRANSFER

snc.

STORES THE DESTINATION ADDRESS OF TRANSFER
STORES THE SOURCE ADDRESS OF TRANSFER

CLEAR THE MASS BUS
iDISABLE ERROR CORRECTION

CLR_MBUS:
ECCTDIS (ENABE);

WRTTRH (MLCS1, FONC, FUNC_6);

'SELECT THE DIVICE UNDER TEST
'LOAD THE TRANSFER SIZE
'LOAD THE SOURCE ADDRESS
'LOAD THE DESTINATION ADDRESS
'LOAD A READ FUNCTION WITH GO SET

if .ML_ADDR [MLCS1, SC1

'DOES THIS FUNCTION CAUSE A SC ERROR

WRTRH (MLCS2, DRV_SEL, .ML_DUT);

WRT_RH (MLWC, WC_REG, .SIZEJ;
WRT_RH (MLDA, DA_REG,
WRT_RH (MLBA, BA_REG,

then

.SRC);
.DST);

begin

ERRSF (ERR_13, UNX_DRV_ERR_MSG, DUMPER);

PRINTB (ONE_MSG, RD_XFER_M3G);
DODU (.LSUNIT);
DOCLN;

P
P P
e
e

TOPS=20 Bliss=16 v2(212)

routine RD_TRANSFER (SIZE, DST, SR(C) : novalue =
+

L
R
N
A
R
R PR
PR IRTR IE T CETE

2467
2468
2469
2470
2471
2472
2473
2474
24,75
2476
2477

21-Apr=1981 08:19:06

ROUTINE DECLARATIONS

R PRLR LR RLA R L

A PATCH 00

ELS

<
X

21-Apr-1981 08:40:22

end;

'REPORT THE UNEXPECTED ERROR

'REPORT WHICH FUNCTION CAUSE THE ERROR
'DROP THIS UNIT
'JUMP TO THE CLEAN UP CODE

'DELAY FOR THE TRANSFER TO COMPLETE

until .ML_ADDR [MLDS, DRY];

'DID THE TRANSFER CAUSE A SC ERROR

if .ML_ADDR [MLCS1, SC]

'REPORT THE UNEXPECTED ERROR
ERRSF (ERR_13, UNX_DRV_ERR_MSG, DUMPER);
'PRINT WHICH FUNCTION CAUSED THE ERROR
PRINTB (ONE_MSG. RD_XFER_M3G);
ena,

begin

then

'DROP THIS UNIT
'JUMP TQ THE CLEAN UP CODE

DODU (.LSUNIT);
oogLN:

end;

.SBTTL

RD.TRANSFER ROUTINE DECLARATIONS

Page 56
SEQ 0089

003664

010146

003666
003672
003676
003704
003710
003714

162706

RD.TRANSFER:
MOV

SuB

000024

036772"
000010
036772°

036772"
004066
004072
004100

004206

000010
036772"
000002 000014
000036
036772"
000002
036772"
000006 000012
000032

036772"
000006
036772"
000004 000010
000034
036772"
000004
036772" 000006
000006
000077
000071

*,ML.REG

*,MLREG

24 (SP) .R1

; ML.REG,MLREG

MOV
MOV
MOV
MOV
MoV
MOV

ML .ADDR,RO
R1.10(R0)
ML - ADDR,RO

MOV
MOV
MOV
MOV
MOV

BISB

000016

(SP)
, 240)
10(R

;

ML .ADDR,RO

BIC
BICB
BIS

000020

MOV
MOV
MOV
MOV
MOV
MOV

BIC
BICB
BIS
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV

#40,R1

22 (SP)
10(,R0)

22(SP) -R1
ML .DUT .RO

#177770,R0
R1.10(RO)

; MLREG,*

#2.R1

RO
ML . ADDR,
R1.24 (RO)
RO
ML . ADDR,
16(SP)
10(,R0)
16(SP) .R1
ML.DUT .RO
#177770.R0
#7.R1
RO.R1

ML .ADDR ,RO
R1.10(R0)

R
ML . ADDRO
2(R0) ,14(SP)
36(SP) ,R1
ML .ADDR,RO
R1.2(RO)
ML
- ADDR RO

6(R0) ,12(SP)

*,MLREG

: % ,ML.REG
; *,MLREG
:

MLREG,*

*,ML.REG

:
:

*,MLREG
*,MLREG

MLREG,*

MLREG,
*

MLREG,*

4(R0O) ,10(SP)

* ML.REG

MLREG,*

#77.R0

ML .REG,MLREG
* ,MLREG

#71.R0

2489

2450

DST ,MLREG

R1.4 (RO}

aM[ .ADDR,6(SP)
6(SP) RO

2488

* ML.REG
SIZE ,MLREG

R1.6(RO)

34 (SPJ ,R1
ML .ADDR,RO

2487

; ML.REG,MLREG

32(SP).R1

ML .ADDR,RO

2486

: ML.REG,MLREG

* ML.REG
SRC ,MLREG

ML .ADDR,RO

2468

; *,ML.REG
; ML.REG,MLREG

; *,MLREG

,
ML . ADDRRO
24 (R0) ,20(SP)
20(SP) .R1

SEQ 0090

; MLREG,*

#7 .R1
RO.R1

ML . ADDR,RO

* ML .REG
* MLREG

2691

——————

2467

R1,=(SP)
#26,SP

MOV
MOV
MOV

BISB

000022

239822380282888
QIR SLENEKRISRSR

ROUTINE DECLARATIONS

Page

——————

REV A PATCH 00

T0PS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (17)

BSKEL&

m7
21-Apr=1981 08:40:22
21-Apr=1981 08:19:06

010077
017766
100022
104454

N 7
21-Apr=1981 0 8:40:22
21=-Apr=1981 0 8:19:06

ROUTINE DECLARATIONS

036772"
036772 (00004

MOV
MOV
BPL

TRAP

000015
001362"
0000CC
012746 001424"
012746 001630°
012746 000002

010600
104414

016700

0000006

062706
016700
016066

000006
036772"
000012 000002
000002

104451
104444

105766
100370

017716

100022
104454
000015

.WORD
. WORD
MOV
MOV
MOV
MOV
TRAP
MOV

1%:

036772"

.WORD
.WORD
. WORD
MOV
MOV
MOV

001362
000000
012746 001424"
012746 001630"
012746 000002
010600
104414
016700
104451
104444
004370

004372

062706
062706
012601

TRAP

0000006

000006
000026

MOV

2%:

000207

Routine Size:

Maximum stack

164 words
depth per invocation:

TRAP
TRAP
ADD
MOV
MOV
iSTB
BPL
MOV
BPL
TRAP

15 words

TRAP
TRAP
ADD
ADD
MOV
RTS

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1

RO,aML
. ADDR
?2L.ADDR.4(SP)

. MLREG,*
;s *,ML.REG

54
15

(17)

Page

SEQ 0091

2493
2496

UNX.DRV.ERR.MSG
DUMPER

#RD .XFER.MSG,=(SP)

2497

#ONE .MSG,=(SP)
#2,-(SP)

SP.RO
14

LSUNIT,RO
51

2498

b
#6,SP
ML .ADDR,RO
12(R0) ,2(SP)

* *,ML.REG

1$
aML .ADDR, (SP)

: *,ML.REG

2(SP)
2%
54

: M[.REG

#RD . XFER.MSG,=(SP)
#ONE .MSG, = (SP)

LSUNIT
RO
51

aa
#6,SP

#26,SP

(SP)+ ,R1

2506
2509

15
UNX.DRV.ERR.MSG
DUMPER

#2,-(SP)
SP,.RO
14

2495
2504

2510

I,
251

2508

2467

8SKELS
REV A PATCH 00

-——

L
. BSKELS
REV A PAT(M 00

251

ROUTINE DECLARATIONS
routine [_(HIP_TBL
begin

21=-Apr-1981 0 g:#g:??
:06
21=-Apr=1981 C

T0PS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (18

Page

SEQ 0092

: novalue =

FUNCTIONAL DESCRIPTION: INITIALIZE THE BAD (WIP TABLE
THIS ROUTINE WILL CLEAR ALL 39 TABLE
ENTRIES TO ZERO.
incr TBL_INDEX from O to 38 do
CHIP_TBL [.TBL_INDEX, ALL] = ZEROES:

'INITIALIZE THE BAD (HIP TABLE

end;

004374

010746

004376
004400
004402
004404
004410
004412
004416
004420
004422

C05000
010001
006301
005061
005200
020027
003770
012601
000207

LSBTTL
[.CHIP.TAL:
CLR

R1,=(SP)
RO

ASL

MOV

1%:

026626°

C00046

12 words ;
: R0u§ine Size:
: Maximum stack depth per invocation:

MOV

RO,R1

(HIP.TBL(RY)

CLR
INC
(MP
BLE

RO
RO, 446

RTS

MOV

2 words

I.CHIP,.TBL ROUTINE DECLARATIONS

(SP)+,R1

TBL. INDEX

: TBL.INDEX,*

: TBL.INDEX
s TBL.INDEX,*

2516
2526
2527
2526

2516

REV A PATCH 00

ROUTINE DECLARATIONS
routine I_TMP_BLST_TBL
begin
s

21-Apr-1981 08:40:22
21-Apr-1981 08:19:06
:

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (19)

Page

SEQ 0093

novalue =

FUNCTIONAL DESCRIPTION: INITIALIZE THE TEMP BLAST TABLE
THIS ROUTINE WILL CLEAR ALL 100 ENTRIES
OF THE TEMP BLAST TABLE TO ZEROES.
'INITIALIZE THE TEMPORARY BLAST TABLE
incr TBL_INDEX from 0 to 9 do
TMP_BLST_TBL [.TBL_INDEX, FULL_WRD] = ZEROES;
end;

004424

004426

004430

004432
004434
004440
004442
004446
004450
004452

I.TMP.BLST.TBL ROUTINE DECLARATIONS

MOV
CLR
MOV
ASL
CLR

R1,=-(SP)
RO

I.TMP.BLST.TBL:

010146

05000

1$:

010001

006301
005061
005200
020027
003770
012601
000207

.SBTTL

026744

INC
CMP
BLE

000011

12 words
; Routine Size:
; Maximum stack depth per

MOV
RTS

i
invocation:

2 words

:
; TBL.INDEX

2530
2540
2541

RO
?g.#11

; TBL.INDEX
; TBL.INDEX,*

2540

(SP) +,R1

2530

S?.R1

TMP.BLST.TBL(R1)

; TBL.INDEX,*

e ey

BSKEL4

D 8
21-Apr-1981

| BSKEL&
. REV A PATCH 00 ROUTINE DECLARATIONS

21-Apr=1981 08:19:06

2544
2545

2546

routine [_COL_CNT_TBL : novalue =
begin

%gzg

;

:
:

2550
32t

!
1

2554

3
:

004454

2555

2556

2557

FUNCTIONAL DESCRIPTION: INITIALIZE

PA:<NEALE>PMSKL4.BLI.T

Page 61

SEQ 0094

THE COLUMN COUNT TABLE

incr TBL_INDEX from O to 255 do

coL_TNT_TBL [.TBL_INDEX] = ZEROES;

'INITIALIZE THE COLUMN COUNT TABLE

end;

.SBTTL
I.COL.CNT.TBL:

005000

1%:

004464 020027 000377

8 words

s TBL.INDEX

cMP

RO, 4377

; TBL.INDEX,*

CLRB
INC

RTS

;

: Maximum stack depth per invocation:

0 words

1.COL.CNT.TBL ROUTINE DECLARATIONS

(LR

BLE

003772

004472 000207

: Routine Size:

TOPS=20 Bliss=16 v2(212)(20)

THIS ROUTINE WILL CLEAR THE COLUMN COUNT
TABLES 256 ENTRIES TO ZEROES.

004456 105060 000000"
004462 005200
004470

08:40:22

COL.CNT.TBL(RO)
RO g
1%

; *(TBL.INDEX)
; TBL.INDEX
:

2554

2555
2554
2544

BSKEL4

REV A PATCH 00

E 8
21-Apr-1981 0 8:40: 22
21-Apr-1981 0 8:19: 06

ROUTINE DECLARATIONS

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (21)

Page 62
SEQ 0095

routine [_REM_TBL : novalue =
begin

{0¢

;

‘

FUNCTIONAL DESCRIPTION: INITIALIZE THE REMAINDER TABLE

THIS ROUTINE WILL CLEAR THE REMAINDER

TABLES 100 ENTRIES TO ZEROES.

' INITIALIZE THE REMAINDER AND COPIED REM TABLE

incrbTBg_INDEX from 0 to 99 do
egin

TBL [.TBL INDEX, RO_CL] = ZEROES;

REM

cOPTED_REM_TBL [.TRL_INDEX, RO_CL] = ZEROES:

end;
end;

004474
004476
004500
004502
004504
004510
004514
004516
004522

004524
004526

.SBTTL

[.REM.TBL:
MOV
CLR

010146
005000
010001

006301
005061
005061
005200
020027
003766

1%:

000710°"

CLR

COPIED.REM, TBL (R1)

RO, 4143

MOV

INC

CMP

000143

RLE
MOV

012601

RTS

000207

14 words
2 Rou?:ine Size:
; Maximum stack depth per

:
:
:

ASL

R1,=(SP)
RO
RO,R1
R1

(LR

000400"

invocation:

2 words

I.REM.TBL ROUTINE DECLARATIONS

.
TBL (R1)
REM
RO

1%
(SP)+,R1

;

TBL
. INDEX
TBL . INDEX,*

. INDEX
TBL
TBL.INDEX,
*

2558
2568
2570
2571
2568

2558

BSKEL&

REV A PAT(H 00
2575
2576

2577
2578
2579
2580
2581
2582
2583
2584
2585

2586

2587
2588

004530
004532
004536

004540
004544
004546
:

;

ROUTINE DECLARATIONS

005200
020027
003772
000267

ngine Size:

Maximum stack

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL&.BLI.1

Page 63
SEQ 0096

routine [_COL_PTR : novalue =
begin
ee

FUNCTIONAL DESCRIPTION: INITJALIZE THE COLUMN POINTER TABLE

THIS ROUTINE WILL CLEAR THE COLUMN POINTER

TABLES 10 ENTRIES TO ZEROES.

;

'INITIALIZE THE COLUMN POINTER TABLE

incr TBL_INDEX from O to 9 do
cOL_PTR [.TBL_INDEX] = ZEROES:
end;

005000
105060

21=-Apr=1981 08:40:22
21=-Apr=1981 08:19:06

001220

LSBTTL
1.COL.PTR:
(LR

1%:

000011

8 words

depth per invocation:

(MP

COL.PTR(RO)
RO
:
RO,#11

RTS

CLRB
INC

BLE

( words

[.COL.PTR ROUTINE DECLARATIONS

; TBL.INDEX

s ~(TBL.INDEX}
; TBL.INDEX
; TBL.INDEX,*

2585

2585
2575

routine I_ERROR_MAP : novalue =

2592
2593
2594
2595
2596
2567

tes

21-Apr=198

oo
G0 6o

ROUTINE DECLARATIONS

2589

2590
2591

G 8
21=-Apr=198

_—

BSKELS
REV A PAT(H 00

:22
:06

TOPS=20 B! iss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (23)

Page

SEQ 0097

begin

FUNCTIONAL DESCRIPTION: INITIALIZE THE ERROR MAP

INITIALIZE THE ERROR MAPS 512 BLOCKS

TO ZEROES.

incr TBL_INDEX from 0 to %0'17776' by %c'2' do
(ERRCR_MAP + _TBL_INDEX) = ZEROES:

'INTIALIZE THE ERROR MAP

end;

; Routine Size:

;

Maximum stack

I.ERROR.MAP ROUTINE DECLARATIONS

CLR

1 .ERROR.MAP:

004550
004552
004556
004562
004566
004570

.SBTTL

006626"
000002

1$:

017776

(LR
ADD

ERROR .MAP (R0)
#2,RO

BLE

(MP

RTS

G words

depth per invocation:

0 words

RO, 417776
PC

; *(TBL.INDEX)
s *,TBL.INDEX

2599
2600
2599

2589

; TBL.INDEX

: TBL.INDEX,*

BSKEL&

REV A PATCH 00
2603
2604
2605
2606
2607
2608
2609
2610
2611
2612

2613

2614
2615
2616

004572

004574
004600
004604
004610
004612

21=Apr=1981 08:19:06

ROUTINE DECLARATIONS
routine I_BLAST_TBL
begin
:40

05060
062700
020027
003771
000207

Maximum stack

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1 (24)

Page

SEQ 0098

: novalue =

FUNCTIONAL DESCRIPTION: INITIALIZE THE BLAST TABLE

CLEAR THE BLAST TABLES & BLOCKS TO

TO ZEROES.

{

incr TBL INDEX from O to %0'7776' by

%0'2' do

(BLAST_TBL + .TBL_INDEX) = ZEROES:

'INITIALIZE THE BLAST TABLE

end;

.SBTTL

I.BLAST.TBL ROUTINE DECLARATIONS

(LR

; TBL.INDEX

RO,#7776

; TBL.INDEX,*

1.BLAST.TBL:

005000

; Routine Size:

;

H 8
21=Apr=198 1 08:40:22

1%:

026770"
000002
007776

CLR
ADD

BLAST.TBL (RO)
#2,R0O

BLE

CMP

RTS

9 words

0 words

depth per invocation:

...

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

; =(TBL.INDEX)
; *,TBL.INDEX
:

2613

2614
2613

2603

BSKELSG

REV A PATCH 00

2617
2618

I 8
21=-Apr-1981 08:40:22

21-Apr=1981 08:19:06

ROUTINE DECLARATIONS

SEQ 0099

egin

FUNCTIONAL DESCRIPTION: LOAD RANDOM DATA

THIS ROUTINE WILL LOAD VIA MASS BUS
TRANSFERS RANDOM DATA TO THE SELECTED
ARRAY AND BANK SELECTED BY ARRAY BANK

:
:
:

SELECT.

:
FORMAL PARAME TERS:

2631

Page

rout;ne.L-RANDOM_DATA (TEMP_ARRSBNK_SEL) : novalue =
++

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (2%

_SEL :
TEMP_ARR$BNK

THIS ARGUMENT STORES THE SELECTED ARRAY
AND BANKS ARRAY AND BANK SELECT NUMBERS.

!
:
local

'WRITE BUFFER RANDOM DATA INDEX

RANDOM_INDEX = ZERO;
GEN_RANDOM_DATA ()3

'THE FIRST TRANSFER STARTS AT WRITE BUF WORD ZERO
'GENERATE A WRITE BUF OF RANDOM DATA
'LOAD ALL SECTORS IN BANK WITH RANDOM DATA

RANDOM_INDEX;

incrbSEQ_CNT from 0 to .BNK_NUM_SEC do

= WRT BUF [.RANDOM_INDEX, WRD1);
TRANSFER (SIZE = =256, DST = .TEMP_ARR$BNK_SEL + .SEC_CNT, SRC DEEPER
IN WRITE BUFFER

egin

WRT

RANDOM_INDEX = .RANDOM_INDEX + 2:
end;

'NEXT SECTOR STARTS 2 WORD

)

end;

0000006

173742
037014
177400
037024

000016
037026

.SBTTL

L .RANDOM. DATA:
JSR
"7
(LR

JSR
MOV

1$:

(LR
BR

176302

R1,$SAVE4
R3

PC,GEN.RANDOM.DATA
BNK.NUM.SEC,R4

,»
2 SEC.CNT

ADD
MOV
ASL

R2.=(SP)

R3.R2
R2

ADD
MOV

#WRT .BUF ,R2
R2,SR(

JSR

PC,WRT.TRANSFER

MOV

SEC.CNT

R1,R2

16(SP) ,R2
R2,DST

MOV

RANDOM. INDEX

;

#-400,-(SP)
(SP),SI1ZE

MOV

;

Rl
2%

MOV
MOV

MOV

001232°*
037030

L.RANDOM.DATA ROUTINE DECLARATIONS

R2,=(SP)

2617
2637
2640
2642

: TEMP.ARR$BNK.SE,*
;

RANDOM. INDEX, *

REV A PATCH 00

004704
004710
004714
004716
004720
004722

062703
062706
005201
020104
003746
000207

ROUTINE DECLARATIONS
ADD
ADD

000002
000006

; Routine Size:
36 words
: Maximum stack depth per

2%:

INC

BLE

RTS

:
3
invccation:

8 words

#2,R3

#6 . SP

R1,R4

jole)
Co o

————
e e

BSKEL4

21-Apr=198
21-Apr=198

:40:
19

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1

X
OM.
; *,RANDINDE
;

SEC.ONT
SEC.CNT,*

55098100

2643
2641

2640

2617

BSKEL4
REV A PATCH 00

2647
2648
2649
2650
2651
2652
2653
2654
2655
2656
2657

:
:
:
:
:
:
:
;
:
:
:

2658

2659

21-Apr=1981 08:40:22

21=Apr=1981 08:19:06

ROUTINE DECLARATIONS

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1 (26)

begin

fee

FUNCTIONAL DESCRIPTION: LOAD ONES AND ZEROES DATA

FORMAL PARAMETERS:

THIS ROUTINE WILL LOAD THE SELECTED ARRAY AND BANK WITH ONES OR ZEROES DATA.

_SEL :
TEMP_ARRSBNK

;

THIS ARGUMENT STORES THE SELECTED ARRAYS ARRAY AND BANK SELECT NUMBER.

incr WRD_CNT trom 0 to (127 + 511%2) do
WRT_BUF [.WRD_CNT, WRD] = .DATA;

'LOAD THE WRITE BUF WITH DATA

'LOAD ALL SECTORS IN BANK WITH DATA
incr SEC_CNT from O to .BNK_NUM_SEC do
WRT_TRANSFER (SIZE = =256, DST = .TEMP_ARRSBNK_SEL + .SEC_CNT, SRC = WRT_BUF);

2664

end;

2662
2663

004724

004167

004730
004732

005000
010001

004734
004736
004744
004746
004752
004754
004760
004762
004764
004770
004774

005002
005006
005010
005014
005020
005024
005030
005032
005034
005036

006301
016661
005200
020027
003767
016703
005002
000423
012746
011667
01020}
06660

010167
010146
012746
011667
004767
062706
005202
020203
003753
000207

routine L_1_0_DATA (TEMP_ARR$BNK_SEL, DATA) : novalue =

2660
2661

:
:

SE098101

.SBTTL
L.1.0.DATA:
JSR

000000G

1%:

000012

CLR
MOV
ASL

MOV

001232°*

INC

L.1.0.DATA ROUTINE DECLARATIONS
.

R1,$SAVE3

; WRD.CNT
; WRD.CNT,=

RO
RO,R1
R1

12(SP) ,WRT.BUF (R1)

; DATA,»

2647
2658
2659

: WRD.CNT

2658

; WRD.CNT,=

?g,fi2175

002175

gng

037014°

MOV
CLR

BNK.NUM. SEC,R3
R2

:
; SEC.CNT

2661

MOV
MOV
MOV

#-400,-(SP)
(SP) ,SIZE
RZ,R1

2662

037026"

MOV

R1.,DST

001232°
037030
176162
000006

MOV
MOV
JSR
ADD
INC
CMP

T
.BUF ,-(SP)
#WR
(SP) ,SRC
PC,WRT.TRANSFER
#6,SP
R2
R2,R3

177400
037024"

2%:

ADD

000016

38 words
; Routine Size:
; Maximum stack depth per invocation:

MOV

3%:

BLE

RTS

7 words

s SEC.CNT,»

,*
; TEMP_.ARRS$BNK.SE

16(SP) ,R1

R1,-(SP)

;s SEC.CNT
s SEC.CNT,»
:

2647

—
—

122
:06

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (27)

routine L_CHIP_TBL (FAIL_CHiP, PAT_SEL) : novalue =
FUNCTIONAL DESCRIPTION: LOAD BAD CHIP TABLE
THE BAD CHIP TABLE STORES FOR A BANK
ALL THE FAILING MOS RAMS AND THIER
THE POSSIBLE
FAILING DATA PATTERNS.
DATA PATTERNS THAT COULD FAIL ARE:
1.
2.

ALL ONES DATA

ALL ZEROES DATA

THIRTEEN RANDOM DATA PATTERNS

THIS ROUTINE WILL SET THE FAULT FLAG
AND FAILING DATA PATTERN FLAG FOR EACH
MOS RAM FOUND TO BE BAD.
FORMAL PARAMETERS:

FAIL_CHIP:

- POINTS TO THE FAILING CHIPS TABLE POSITION

.EO}gTS TO THE CURRENT FAILING PATTERN FOR THIS
H

CHIP_TBL [.FAIL_CHIP, FAULT] = SET_FLG;

case .PAT_SEL from O to 14 of

'SET THIS CHIPS FAULT FLAG

'SELECT THE CHIPS FAILING DATA PATTERN

set

éHIP_TBL C.FAIL_CHIP, PAT_0] = SET_FLG;

TRPRT P

begin

1] ¢

(3] :

Co Co

ROUTINE DECLARATIONS

e
e e PR

TR T PRTRCEPRLRLR
R ALA RL

L L PR TR IR IR IETETETE

TRU A O e

BSKEL4
REV A PATCH 00

L 8
21=Apr=19
21=Apr=19

CHIP_TBL [.FAIL_CHIP, PAT_1] = SET_FLG:

(2] &

CHIP_TBL [.FAIL_CHIP, RAN_1] = SET_FLG;

[4]

'SET ZEROES DATA FLAG
'SET ONES FLAG

'SET RANDOM DATA 1 FLAG

CHIP_TBL [.FAIL_CHIP, RAN_2] = SET_FLG:

'SET RANDOM DATA 2 FLAG

'SET RANDOM DATA 3 FLAG

CHIP_TBL [.FAIL_CHIP, RAN_3] = SET_FLG:

[5] :

’

CHIP_TBL [.FAIL_CHIP, RAN_4] = SET_FLG;

[6] :

CHIP_TBL [.FAIL_CHIP, RAN_5] = SET_FLG;

'SET RANDOM DATA 4 FLAG

'SET RANDOM DATA 5 FLAG

SEQ

% 02

BSKEL&

21=-Apr=1981 08:40:22
21-Apr-1981 08:19:06

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (27)

REV A PATCH 00

ROUTINE DECLARATIONS

2717
2718
2719

] :
CHIP_TBL

JFAIL_CHIP, RAN_6] = SET_FLG;

'SET RANDOM DATA 6 FLAG

d 3
CHIP_TBL

.FAIL_CHIP, RAN_7] = SET_FLG;

'SET RANDOM DATA 7 FLAG

.FAIL_CHIP, RAN_8] = SET_FLG;

'SET RANDOM DATA 8 FLAG

.FAIL_CHIP, RAN_9] = SET_FLG;

'SET RANDOM DATA 9 FLAG

CHIP_TBL

JFAIL_CHIP, RAN_10] = SET_FLG;

!'SET RANDOM DATA 10 FLAG

33
CHIP_TBL

.FAIL_CHIP, RAN_11] = SET_FLG;

'SET RANDOM DATA 11 FLAG

:
CHIP_TBL

FAIL_CHIP, RAN_12] = SET_FLG;

!SET RANDOM DATA 12 FLAG

CHIP_TBL

JFAIL_CHIP, RAN_13] = SET_FLG;

!SET RANDOM DATA 13 FLAG

(9]

CHIP_TBL
3

CHIP_TBL

[14]
tes;

SEQ

%0103

end;

L.CHIP.TBL ROUTINE DECLARATIONS

MOV

R1,=-(SP)

L.CHIP.TBL:

010146
016600
006300
062700
052710
016601
006301
066107
000036
000044
000052
000060
000066
000074
000102
000110
000116
000124
000132
000140
000146
000154

.SBTTL

MOV

000006

ASL

6(SP) RO
RO

100000

ADD
BIS

RO
#CHIP.TBL
#100000, (RO)

ASL

ADD

005072"

026626"

MOV

000004

.WORD
WORD
JWORD
_WORD
JWORD
"WORD
_WORD
.WORD
"WORD
"WORD
"WORD
"WORD
WORD
‘WORD

4(SP) ,R1

1$(R1) ,PC

2$-1%
3$-1%
43-1%
5%-1%
6$-1%
7%-1%
8%-1%
93-1%
10%-1%
11$-1%$
12%-1%
13$-1%
14$-1%
158-1%

2665

: PAT.SEL,*

2693

: FAIL.CHIP,*

2691

e
e

BSKEL&

REV A PATCH 00

005126
005130
005136
005142
005144

005152
005156
005160
005166

005244
005246
005252
005254
005260
005262

000162
05271?
00045
052710
000446
052710
000443
052710
000440
052710
000435
052710

000405
152710
000402
152710
012601
000207

ROUTINE DECLARATIONS
168-1%

040000

2%:

040000 (RO)

020000

3%:

ngooo (RO)

010000

4%:

004000

5%:

#10000, (RO)
17%

002000

6%:

001000

7%:

17%
q1000 (RO)

000400

8%:

0400 (RO)

000200

9%:

#220 (RO)

000100

10%:

000040

11%:

000020

12%:

#100, (RO)
17%
#40.(RO)
17%

000010

13%:

000004

14%:

000002

15%:

000001

16%:

74 words
; Routine Size:
: Maximum stack depth per

17%:

:
:
1nvocation:

21-Apr-1981 08:40:22
21-Apr=1981 08:19:06

2 words

#4000, (RO)
17%
#2000, (RO)

17%
#10, (RO)
17%
#4,(RO)

(SP)+,R1

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (27)

55095104

2697
2693

2700

2693
2703
2693
2706

2693
2709
2693
2712
2693
2715
2693
2718
2693
2721

2693

2724
2693
2727
2693
2730
2693
2733
2693
2736
269
273
2665

L
A AL

2749

2746

2762

2763

TR L LR D LI LR T TR IR

2764

2766

2767
2768
2769
2770
2771
2772
2773
2774

2776
2777
2778
2779
2780
2781
2782
2783
2784
2785
2786
2787
2788
2789
2790
2791
2792
2793
279

mtmimt ml@mimimimimimtmial@imtas
=t =t ==

275
2754
2755
2756
2757
2758
2759
2760
2761

FUNCTIONAL DESCRIPTION: LOAD FAILING CHIP
THE PROGRAM WILL FIRST SEARCH THRU THE
SELECTED ARRAYS AND BANKS AND FIND ALL
NEWLY FAILING MOS RAMS.

ONCE THEY ARE FOUND THEN THEY ARE LOADED
WITH THE DATA PATTERN WHICH FAILED THE
MASS BUS WRITE CHECKS AND THE FAILING
ROW COLUMN PAIR ADDRESS IS SEARCHED FOR.

THIS ROUTINE WILL LOAD A FAILING CHIP
WITH ONE OF THE DATA PATTERNS WHiCH FAILED
DURING THE MASS BUS TRANSFERS.
THE CHIP TBL STORES WHICH CHIPS HAVE FAILED

AND THIER FAILING PATTERNS.
FORMAL PARAME TERS :

TEMP_ARRSBNK _SEL:
THISTARGUMENT STORES THE SELECTED ARRAY AND

BANK SELCECT NUMBER.
BAD_CHIP:

et momt et mimiml

2750

2751
275

2775

qin-

2748

2765

A R

foutb:e L_FAILING_CHIP (TEMP_ARRSBNK_SEL, BAD_(WIP, LST_PAT) =

2747

PR PETR

TR TR R IR TE A I ETE T ETR

O P T R

2744

2745

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1T (28)

2743

21-Apr=1981 (8:19:06

ROUTINE DECLARATIONS

BSK ELG
REV A PAT(H 00

e TR TR T

8 9
08:40:22
21-Apr-1981

LST_PAT:

THIS POINTS TO A FAILING CHIP WHICH IS
CURRENTLY BEING PM'ED.

THIS IS A POINTER INTO THE FAILING PATTERN
THE FAILING PATTERN
PORTION OF THE TABLE.

SEARCH STARTS AT THE LAST FOUND FAIL PATTERN

AND WILL RETURN WITH FIRST FAILING PATTERN
FOUND.

1ncerAT SEL from .LST_PAT to 14 do

ISEARCH TH CHIP TABLE FOR A FAILING PATTERN

egin

case .PAT_SEL from 0 to 14 of

'SELECT A PATTERN

set

[0] :

1;.CHIP_TBL [.BAD_CHIP, PAT_0] !DID THIS PATTERN FAIL

then

begin

'LOAD CHIP WITH ZEROES
DM 1 0 LOAD (.TEMP ARR$BNK SEL, ZEROES);
THIS PAT FLAG
'CLEAR
FLG;
CLR
=
07
PAT
CHIP,
[.BAD
CHIPTMTBL
'CLEAR THE RANDOM FLAG
FLG_REG [F_RAND DATAJ = TLR_FLG;
“'RETURN WHICH PATTERN WAS SELECTED
retarn .PAT_SEL;

Page

SEQ0105

——————y

BSKEL 4
REV A PATCH 00 ROUTINE DECLARATIONS
2795
2796

3
:

2797

2798

2799

2800

2801

3
:

2806
2807

3
3
:
:
:

2808

2810

2813

3
:

:
:

2811
2812

2814
2815

2816

3
:

2821
2822

:
3
3
3

2823

2825

:
:

3
:
:

2824

2826
2827
2829
2830
2831

2832
2833
2834
2835

3
:

2838
2839

2
3

it .CHIP_TBL [.BAD_CHIP, PAT_1] !DID THIS PATTERN FAIL

then

begin

'LOAD CHIP WITH ONES DATA
DM_1_0_LOAD (.TEMP_ARRSBNK_SEL, ONES):
'CLEAR THIS PAT FLAG
CLR_FLG;
=
CHIPTTBL [.BAD_CHIP, PAT_1]
RANDOM FLAG
THE
'CLEAR
FLG_REG [F_RAND_DATA] = TLR_FLG;
WAS SELECTED
PATTERN
WHICH
'RETURN
return .PAT_SEL:
end;

2] :

if not .CHIP_TBL [.BAD_CHIP, RAN_1]

then

begin

GEN_RANDOM_DATA ();

else

end

2836
2837

2840
2841

2842

2846

'GEN THE RANDOM DATA BUT DONT LOAD IT

!LOAD THE CHIP WITH RANDOM DATA
DM_RAND _LOAD (.TEMP_ARRS$BNK_SEL);
'CLEAR THIS PAT FLAG
CLR_FLG;
CHIP_TBL [.BAD_CHIP, RAN_1]"=
RANDOM FLAG
THE
'SET
SET_FLG;
FLG_REG [F_RAND_DATA] =
WAS SELECTED
PATTERN
WHICH
'RETURN
return .PAT_SEL;
end;

(3] :

if not .CHIP_TBL [.BAD_CHIP, RAN_2]

then

begin

GEN_RANDOM_DATA ();
else

end

'DID THIS PATTERN FAIL

'GEN THE RANDOM DATA BUT DONT LOAD IT

begin

!LOAD CHIP WITH RANDOM DATA
DM_RAND LOAD (.TEMP_ARRSBNK_SEL);
'CLEAR THIS PAT FLAG
CLR_FLG;
=
RAN_2]
P,
CHIP_TBLC [.BAD_CHI
RANDOM FLAG
THE
'SET
3ET_FLG;
=
ATA]
FLG_REG [F_RAND_D
WAS SECECTED
PATTERN
WHICH
'RETURN
return .PAT_SEL:
end;

[4] :

it not .CHIP_TBL [.BAD_CHIP, RAN_3]

then

begin

GEN_RANDOM_DATA ();

2843
2844
2845

'DID THIS PATTERN FAIL

begin

2828

3
s
S
3

3
.

(1] :

2817
2818
2819
2820

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (28)

end;

2802
2803
2804
2805

2809

21=-Apr-1981 08:40:22
21-Apr-1981 08:19:06

else

end

begin

'DID THIS PATTERN FAIL

'GEN THE RANDOM DATA BUT DONT LOAD [T

SEQ 0106

TOPS-20 Bliss=16 v2(212)

21-Apr-1981 08:40:22

BSKELG

PA:<NEALE>PMSKL4.BLI.1 (28)
21-Apr=1981 08:19:06
REV A PATCH 00 ROUTINE DECLARATIONS
!LOAD CHIP WITH RANDOM DATA
DM_RAND LOAD(.TEMP_ARRS$BNK_SEL);
2847
}
'CLEAR THIS PAT FLAG

CHIP TBC [.BAD CHIP, RAN_3] = CLR FLG;
'SET THE RANDOM DATA FLAG
“IRETURN WHICH PATTERN WAS SECECTED
return .PAT_SEL;

2848
2849
2850

3
:
3

2851
2852
2853
2854

3
:
3

2855

2856
2857

3
:

FLG_REG [F_RAND_ DATA] = SET_FLG;

end;

5 :

if not .CHIP_TBL [.BAD_CHIP, RAN_4]

then

2858

2859

3
:

2860
2861

:
3
:

2863
2864
2865

else

2866
2867
2868
2869

3
3
:

2870

3
:

2
F

3
3
:
:

:
s

it not .CHIP_TBL [.BAD_CHIP, RAN_5]

else

:
s
3

(8] :

2875

2876

3
:
:
$

end;

then

S
3
3

2884

2885

2886
2887

begin
GEN_RANDOM_ DATA 0;
end
begin

end;

(7] :

if not .CHIP_TBL [.BAD_CHIP, RAN_6]

then

2891

else

end

begin

'DID THIS PATTERN FAIL
;

'GEN THE RANDOM DATA BUT DONT LOAD IT
.

;

!'LOAD CHIP WITH RANDOM DATA
DM_RAND LOAD (.TEMP_ARRSBNK_SEL);
. 'CLEAR THE PAT FLAG
CHIP TRLC[BAD CHIP, RAN_6]1"= CLR FLG;
RANDOM DATA FLAG
THE
ISET
FLG_REG [F_RAND_ DATA]= SET_FLG;

2892
2893
2894

return .PAT_SEL;

2895

end;

2896

2897
2898

begin

GEN_RANDOM_DATA ();

2888

2889
2890

'DID THIS PATTERN FALIL

!LOAD CHIP WITH RANDOM DATA
DM_RAND LOAD (.TEMP_ARR$BNK_SEL);
'CLEAR THE PAT FLAG
CHIP TBT [.BAD _CHIP, RAN_S5]1"= CLR FLG;
ISET THE RANDOM DATA FLAG
FLG_REG [F_RAND DATAJ = SET_FLG;
“'RETURN WHICH PATTERN uAs SELECTED
return .PAT_SEL;

2877
2878
2879
2880
2881
2882
2883

'GEN THE RANDOM DATA BUT DONT LOAD IT

begin

2871

2872
2873
2874

end”

RANDOM DATA ();

!LOAD CHIP WITH RANDOM DATA
DM RAND _LOAD (.TEMP_ARR$BNK_SEL);
'CLEAR THE PAT FLAG
CHIP TBLC [.BAD _CHIP, RAN_4]1 = CLR FLG;
ISET THE RANDOM DATA FLAG
FLG_REG [F_RAND DATAJ SET_FLG:
“IRETURN WHICH PATTERN WAS SELECTED
return .PAT_SEL;

2862

begin

'DID THIS PATTERN FAIL

[8] :

“'RETURN WHICH PATTERN WAS SELECTED

Page

SEQ 0107

BSKELSG
REV A PATCH 00 ROUTINE DECLARATIONS
2899

2900

2903

2901

3
:

2904
2905

;

2911

2906
2907
2908
2909
2910

3
:
3
3
J

2912

2913

2915

2914

2916
2917

3
:

it not .CHIP_TBL [.BADSHIP RAN_7]

then

GE _RANDOM_DATA 0;
else

end

2919

2920
2921

:
3
$
-

2926
2927

3
3
3
$
:

2929

2930
2931

2932
2934

2935

3
:
|
:

2937
2938
2939
2940

2936

3
:
2

:
2

2946
2947

2945

then

begin

GEN_RANDOM_DATA ();

else

end”

2949

'DID THIS PATTERN FAIL

'GEN THE RANDOM DATA BUT DONT LOAD IT

begin

!LOAD CHIP WITH RANDOM DATA
DM RAND LOAD (.TEMP_ARR$BNK_SEL);
'CLEAR THE PAT FLAG
FLG:
cHIP TRLC L. BAD CHIP, RAN_8]1"= CLR
RANDOM DATA FLAG
THE
ISET
FLG_REG [F_RAND_ DATA] = SET_FLG;
WAS SELECTED
PATTERN
WHICH
N
“'RETUR
return .PAT_SEL?
end;

L1011 3

it not .CHIP_TBL [.BAD_CHIP, RAN_9]

then

begin

GEN_RANDOM_DATA ();

else

end

'DID THIS PATTERN FAIL

'GEN THE RANDOM DATA BUT DONT LOAD IT

begin

!LOAD CHIP WITH RANDOM DATA
DM_RAND LOAD (.TEMP_ARR$BNK_SEL);
'CLEAR THE PAT FLAG
CLR_FLG;
=
(HIP TRC [.RAD CHIP] RAN_91"
RANDOM DATA FLAG
THE
'SET
FLG_REG [F_RAND_ DATA]= SET_FLG;
WAS SELECTED
PATTERN
WHICH
N
“'RETUR
return .PAT_SEL?
end;

(117 :

it not .CHIP_TBL [.BAD_CHIP, RAN_10]

then

begin

GEN_RANDOM_DATA ();

2948

2950

‘

'GEN THE RANDOM DATA BUT DONT LOAD IT

it not .CHIP_TBL [.BAD_CHIP, RAN_8]

2941

2942
2943
2944

'DID THIS PATTERN FAIL

(9] :

2933

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (28)

end;

2922
2923
2924
2925

2928

,¥
begin
CHIP WITH RANDOM DATA
'LOAD
DM RAND LOAD (.TEMP_ARR$BNK_SEL);
'CLEAR THE PAT FLAG
CHIP TBC [.BAD CHIP, RAN_7]"= CLRFLG
RANDOM DATA FLAG
THE
'SET
FLG_REG [r RAND DATAJ SET_FLG:
WAS SELECTED
PATTERN
“IRETURN WHICH
return .PAT_SEL?

2918

21<Apr=1981 08:40:22
21-Apr=1981 08:19: 06

else

end”

'DID THIS PATTERN FAIL

'GEN THE RANDOM DATA BUT DON! LOAD IT

Page

SEQ0108

F'y

21-Apr-1981 08:40:22
21-Apr=1981 08:19:06

BSKEL
REV A PAT(H 00 ROUTINE DECLARATIONS
begin

2951

!LOAD CHIP WITH RANDOM DATA
DM _RAND LOAD (.TEMP_ARRSBNK _SEL);
'CLEAR THE PAT FLAG
C(HIP TRL[BAD CHIPT RAN_107 = CLR_FLG;
TSET THE RANDOM DATA FLAG
FLG_REG [F_RAND_ DATA] = SET_FLG;
“'RETURN WHICH PATTERN WAS SELECTED
retuarn PAT_SEL:

2952
2953
2954
2955

3
s
3
3

2956
2957
2958
2959

:
3
;
:

end;

(121 :

it not .CHIP_TBL [.BAD_CHI?, RAN_11]

2960

then

2961
2962

:
:

2964
2965

:
:
:
3

2967
2968
2969
2970

s
:
:
:

S
:

2992

2993

2996

2
:

begin

!LOAD CHIP WITH RANDOM DATA
DM_RAND LOAD .TEMP_ARR$BNK _SEL);
'CLEAR THE PAT FLAG
CHIP TRLC[ BAD CHIP, RAN_ 127 = CLR FLG
SET THE RANDOM DATA FLAG
FLG_REG [F RAND DATAJ = SET_FLG;
end;

it .CHIP_TBL [.BAD_CHIP, RAN_13]

then

begin

DM_RAND LOAD (.TEMP_ARR$BNK _SEL);

'DID THIS PATTERN FAIL
!LOAD CHIP WITH RANDOM DATA

'CLEAR THE PAT FLAG
CHIP_TBL [.BAD CHIPT RAN_131 = CLR_FLG;
RANDOM DATA FLAG
THE
'SET
FLG_REG [F_RAND DATA] SET_FLG:

2994
2995

return .PAT_SEL;

end;

2997

2998

2996
3000
3001

~'RE TURN UHICH PATTERN WAS SELECTED

[14] :

2991

'DID THIS PATTERN FAIL

'GEN THE RANDOM DATA BUT DONT LOAD IT

end

return .PAT_SEL?

2988

2990

else

2986

begin

GEN_RANDOM_DATA ();

2982
2983
2984

2989

3
:

!LOAD CHIP WITH RANDOM DATA
DM_RAND LOAD (.TEMP_ARR$BNK_SEL);
'CLEAR THE PAT FLAG
cHTIP TRC[.BAD CHIPT RAN_117 = CLR_FLG;
'SET THE RANDOM DATA FLAG
FLG_REG [F_RAND DATAJ = SET_FLG;
“IRETURN WHICH PATTERN WAS SELECTED
return .PAT_SEL;

then

2979

2987

begin

2978

end

it not .CHIP_TBL [.BAD_CHIP, RAN_12]

2976
2977

2985

IGEN THE RANDOM DATA BUT DONT LOAD IT

(131 :

2975

IDID THIS PATTERN FAIL

end;

2971
2972
2973
2974

2980
2981

else

2966

:
:

:
3
3

begin

GEN_RANDOM_DATA ();

2963

}

10PS=20 Bliss=16 v2(212)
PA:<NEALE>PM3KL4.BLI.1 (28)

tes;

end;

“IRETURN WHICH PATTERN WAS SELECTED

Page

SEQ0109

BSKELSG
REV A PATC(H 00

3003
3004

21=-Apr=1981 08:40:22

21-Apr=1981 08:19:06

ROUTINE DECLARATIONS

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4&.BLI.1 (28)

SE098110

'RETURN NEGITIVE ONE IF ALL PATTERN FLAGS ARE CLEARED

return =1;

end;

SBTTL

L.FAILING.CHIP ROUTINE DECLARATIONS
R1,$SAVE2
12(SP) ,RO

L.FAILING.CHIP:

004167

000000G

016600

000012

JSR
MOV

026626

MOV

000010

MOV
DEC
JMP
MOV
ASL
ADD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

ASL

ADD

000560

005326

4%:

040000

MOV

000014

(LR
JSR
BIC
BR
BIT
BEQ

174460

040000

020000

000014
177777
174430
020000
000040
000416
010000
000014

17377¢

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD
BIT
BEQ

MOV
MOV

037020
7%:

JSR
BIC
8I(B
(MP
JMP

BIT

BEQ
MOV
JSR

2743

RO
#(CAIP.TBL
,R2

RO,R2
10(SP) ,R1
R1
24$%
R1,R0
RO

BAD.(CHIP,*

2788

LST.PAT PAT.SEL

2780

PAT.SEL,*

2783

PAT,.SEL

;

3$(RO) ,PC
4%-3%
58-3%
7$-3%

8%$-3%

9%-3%

108-3%
11$-3%
128-3%
13$-3%
16%$-3%
15%-3%
16$-3%
17$-3%
18%-3%

21%-3%
120000.(R2)
14(SP) ,=(SP)
-(SP)
PC,DM.1.0.LOAD
#40000, (R2)
6%
#20000, (R2)
1%
14(SP) ,=(SP)

2788
;

TEMP_,ARR$BNK.SE
,*

2791
279
279
2799

;

TEMP.ARRS$BNK
. SE ,*

2802

#-1,-(5P)

PC,DM.1.0.LOAD

#20000, (R2)

2803

(SP)+,(SP)+
23%
#10000, (R2)

2799
<801
28
281
281

#40,FLG.REG

19%
14(SP) ,=(SP)

PC,DM.RAND.LOAD

;

TEMP_ARRSBNK ,SE,*

G%:

MOV
JSR

000014

173726

BIC

002000

001000

10%:

118z

173656

000400
12%:

000014
173634
000200
13%:

000100

005700
005704
005710
005712
005716
005720
005724

005730
005734
005736
005742

14%:

000020
000014

173540
000020

000010

(R2)
19%
14(SP) ,-(SP)
PC,DM.RAND.LOAD
#200, (R2)

16%:

S NN,

TEMP
. ARRSBNK . SE.*

19%

TEMP
. ARRSBNK . SE.*

14(SP) ,-(SP)

#400, (R2)

22%

TEMP
. ARRSBNK . SE.*

22%

#100, (R2)

19%
14 (SP) ,=(SP)
PC,DM.RAND.LOAD
tégo.(nz>

TEMP.ARR$BNK. SE,*

#40, (R2)
19%
14 (SP) ,=(SP)
PC,DM.RAND.LOAD
#40, (R2)

TEMP
. ARR$BNK .

MOV

TEMP
. ARRSBNK . SE,*

JSR
B8I(B

#20, (R2)
19%
14 (SP) ,=(SP)
PC,DM.RAND.LOAD
02?,(R2)

BITB
BEQ

#10, (R2)
19%

JSR
BICB

15%:

TEMP
. ARR$BNK . SE,*

22%

TSTB
BPL
MOV
JSR
BI(B

MOV

000014
173564
000040

2833

PC,DM.RAND.LOAD

BITB
BEQ

2832

#1000, (R2)

JSR
BIC

BITB
BEQ

TEMP
. ARRSBNK . SE,*

22%

#1000, (R2)
19%
14(SP) ,-(SP)

#400, (R2)

JSR
BI(B

173610

22%

#2000, (R2)
19%
14(SP) ,=(SP)
PC,DM.RAND.LOAD
#2000, (R2)

BIT
BEQ

MOV

000014

000040

BIT
BEQ
JSR
BIC

000014

000100

MOV

000014
173702
0010C0

000400

BIT
BEQ

19%
14 (SP) ,=(SP)
PC,DM.RAND.LOAD
#4000, (R2)

2819
2825
2828

22%

—

JSR
BIC

004000
002000

#4000, (R2)

2818

[

000014
173752

BIT
BEQ

22%

8%:

#10000, (R2)

e N, NN,

004000

BIC

010000

005472
005476

g8111

21-Apr-1981

ROUTINE DECLAPATIONS

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1

BSKELS
REV A PATCH 00

H 9
21-Apr-1981

BSKEL4

A PATCH 00
REV
A

ROUTINE DECLARATIONS

. 005744

00004

005750

| 005754

016646
004767
142712

000440
132712
001412
016646
004767
142712

000426
132712
001003

I 9
21-Apr=1981 08:40:22
21=-Apr=1981 (08:19:06
14(SP) ,=(SP)
PC,DM.RAND. L OAD

173514

19%
14 (SP) ,=(SP)

000014

PC,.DM.RAND.LOAD
#4,(R2)

173470

000004

000002

#2,(R2)

172550

19%:

PC,GEN.RANDOM.DATA

000014
173436
000002

20%:

14 (SP) ,-(SP)
PC,DM.RAND.LOAD
#2,(R2)

000001

21%:

037020°*

000016

22%

24%

14 (SP) ,=(SP)
PC.DM.RAND.LOAD
#1,(R2)
#40,FLG.REG
(SP)
+

R1,RO

x
206 words :
; Routine Size:
on:
1nvocati
per
; Maximum stack depth

5 words

TEMP ,ARRSBNK
. SE , *

PAT.SEL
,*
PAT.SEL

24%:

25%:

TEMP . ARR$BN
. SE K
,*

#1,(R2)

22%:

177204
177777

TEMP . ARR$BN
. SE ,K
*

20%

24%

PAT.SEL
,*

RTS

55098112

2952

2953

22%

18%:

23%:

006116

TEMP.ARRS$BNK
. SE ,*

#4,(R2)

17%:

000004

000040

;

5}6 (R2)

000010

000014
173412
000001

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1

BSKEL&

21=Apr=1981 08:19:06

REV A PAT(H 00 ROUTINE DECLARATIONS
3005

3006
3007
3008

%8?8

3011
3012
3013
%81?
3016
3017
3018
3019
3020

i+
i

FUNCTIONAL DESCRIPTION: LOAD THE ERROR MAP

THE ERROR MAP STORES BY SECTOR ALL THE
NEWLY FAILING ROWS. THE FAILING COLUMN
ADDRESS CAN BE CALCULATED BY ADDING THE
ROW NUMBER TO THE SECTOR NUMBER.

:
:

THIS ROUTINE SEARCHES THE TESTED BANKS
LOOKING FOR BAD ROWS AND ALL SECTORS.
IF A BAD ROW IS DETECTED THEN THAT ROWS
BIT POSITION IN THE ERROR MAP AT THIS
SECTOR 15 SET INDICATING THAT A BAD ROW

!
;

FORMAL PARAMETERS:

NK:
_SEL
TEMP_ARRSB

i IPTHIS ARGUMENT STORES THE ARRAY AND BANK SELECT NUMBER
HIP:
THIS ARGUMENT POINTS TO A FAILING WHICH IS PRESENTLY
BEING TESTED. DIVIDING THIS ARG BY 4 GIVES THE NIBBLE
POSITION IN THE ML-11 WORD AND THIS ARG MOD &4 GIVES THE
CHIPS BIT POSITION WITHIN ITS NIBBLE.

3033

3034
3035
3036

i
:
!
:
local

:POINTS TO A WORD IN THE ERROR MAP
IPOINTS TO A BIT IN THE ERROR MAP
ISECTOR RANDOM STARTING POSITION

WRD_INDEX,
BITTINDEX,
RAND_INDEX,

ISELECT DATA DIAG REG WHERE FAILING CHIP RESIDES
'SELECT THE FAILING CHIP POSITION
'FIRST SELECTS DATA DIAG REG; SECOND SELECTS RANDOM DATA OFFSET

DIAG_REG_SEL.,
BIT_SEL,
OFFSET;

- . Oreserajarasa

3037
3038
3039

! BAD CHIP / 16 AND BAD _CHIP MOD 16 WILL

' POINT IO WHICH DIAGNOSTIC REGISTER THE BAD

'CALCULATE WHICH DATA DIAG REG TO READ
'CALCULATE FAILING CHIPS BIT POSITION

it .OFFSET eqgl 2

) —

awns

MLE?
MLD1
MLD2

—

i OFFSET VALUES 8

"wun

OFFSET = .BAD_CHIP/16;
IT_SEL = .BAD_CHIP mod 16;

<)
R &~

o ~N

' CHIP CAME FROM AND THE BITS
' POSITION WITHIN THE REGISTER.

3056

’

WAS FOUND AT THIS SECTOR.

;

'1S BAD CHIP DIVIDED BY 16 EQUAL TO 2

SEQ 0113

begin

3030

Page

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.T (29)

routine L_ERROR_MAP (TEMP_ARRS$BNK_SEL, BAD_CHIP) : novaiue =

;

21=-Apr=198 1 08:40:22

. BSKEL&
' REV A PATCH 00 ROUTINE DECLARATIONS
3
:

:
3

3057
3058

then

3059
3060
3061
3062

%822

else

21-Apr-1981 08:40:22
21-Apr=1981 08:19:06

begin

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (29)

DIAG_REG_SEL = 14;
BIT_SEL = .BIT_SEL + 8;

'SELECT DATA DIAG REG MLE?
'THIS REGISTERS DATA BITS STARTS IN HIGH BYTE

DIAG_REG_SEL = .OFFSET + 15;

'0 ¢+ 15 = MLD1; 1 + 15 = mMLD2

end

Page 81
SEQ 0114

'OFFSET = 2 IF RANDOM DATA
if .FLG_REG [F_RAND_DATA] then OFFSET = 2 else OFFSET = ZERO;
DM RD TRANSFER (SIZE = =256, DST = RD_BUF, SRC = .TEMP_ARRSBNK_SEL):

gggg

:
3

3067
gggg

3070

RAND_TNDEX = ZERO;
incr SEC_NUM from O to .BNK_NUM_SEC do

%g;g

incrbnoq-Nun trom 0 to 127 do

3
:

%8;9
3078

'READ ALL WORDS IN FAILING CHIP
egin
'CLOCK DATA INTO THE DATA DIAG REGISTERS
DAT_CLK;
if .WRT_BUF [.RAND_INDEX + .ROW_NUM, .BIT_SEL, ONE, ZERO] neq .ML_ADDR [.DIAG REG_SEL. .BIT_SEL.

3080

then

3071

3079

3081

3085

:
3
:
2

3086

end;

%gg?

3092

3094

006120

006124

begin

'CALCULATE ERROR MAP WORD OF FAILING ROW
WRD_INDEX = .ROW_NUM/16;
' CAOCULATE ERROR MAP BIT POS OF FAILING ROW
BITINDEX = .ROW_NUM mod 16;
ERROR MAP [.SEC_NUM, .WRD_INDEX, .BIT_INDEX, ONE, ZERO] = SET_FLG;

11S WRITE BUF DATA EQL DATA DTAG REGISTERS DATA

ONE, ZERO]

3082
3083
3084
3087

begin

3093

004167

162706

FLG_REG [F_ERR_MAP_ENTERED] = SET_FLG:

RAgo_INDex = .RAND_INDEX + .OFFSET;
ena,;

end;

000000G

.SBTTL
R
. MAP:
L .ERRO

JSR

SUB

000022

MOV

010004

MOV

006144

012746
004767

000020
000000G

006146 016616 000044

006152
006156

006162

012746
004767

010066

000020
0000006

000006

!FLAG THAT ERROR MAP WAS ENTERED

'THE NEXT SECTOR STARTS 2 WORDS DEEPER IF RANDOM DATA
'CLEAR THE SINGLE STEP DMA MODE

CLR_MBUS;

006130 016646 000040
006134
006140

I THE FIRST SECTORS DATA STARTS AT WORD ZERO
'READ ALL SECTORS IN FAILING CHIP

L.ERROR.MAP ROUTINE DECLARATIONS

R1,$SAVES

#22,SP

40(SP) ,-(SP)

: BAD.CHIP,

RO,R4

: »,OFFSET

MOV
JSR

#20,-(SP)
PC,BLSDIV

MOV

44 (SP) , (SP)

MOV
JSR

MOV

#20,-(SP)
PC ,BL$MOD

RO,6(SP)

3005

: BAD.CHIP,»
: *,BIT.SEL

3047
3048

——
N

BSKELS

REV A PATCH 00
006166

006172
006174
006200
006206
006210
006212
006216
006224
006226
006232
006234
006236

020427

001006

062766
0004

032767

L 9
21-Apr=1981 08:40:22
21-Apr=1981 08:19:06

ROUTINE DECLARATIONS
000002

R4 42

000016

000010
000017
000040

1%
#16,R2
#10,6(SP)

000006

037020°*

1%:

2%
R4 ,R2

2%:

#40.FLG.REG

000002

011667
012746

016766

53
4%:

177400

037024°
005626

152700

016703
010063

000020

004767

000000G
000006

066700

012716

036772°
000032
000032
000014
000001

0000006

* OFFSET
OFFSET

3067

000032

6%:

TEMP .ARRS$BNK
. SE , *

SEC.NUM

3070

ROW.NUM

24 (R3) ,32(sP)

3071
3074
3075

* ,ML.REG
ML .REG,MLREG
* MLREG

ML .ADDR,R3

32(SP) .RO

#20,R0

14(SP) ,R3
R3

000014
000001

3065

RS
8$

000014

016646
012746

* ,DIAG.REG.SEL

3068
3070

036772'
000024

001232°

OFFSET,DIAG.REG.SEL

3059
3060
3056
3063

RAND
. INDEX

ML .ADDR,R3

062703

*,BIT.SEL

3056

14 (SP)

29K.NUM.SEC.16(SP)

037014" 000016

000024
000032

SEL
*,DIAG.REG.

(SP),SIZE

(SP),DST 52(SP) ,=(SP)
(SP), SRC
PC,DM.RD. TRANSFER

000014

03677

#2.R4
4$
R4
#-400, (SP)

; OFFSET,*

SE095115

#RD.BUF ,~(SP)

5%:

016366
016600

#17.R2

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (29)

24 (R3)
RO.

R3,=(SP)

14(SP) ,~(SP)

#1,-(SP)

MLREG,*
ROW.NUM,*

3078

RAND
. INDEX , *

BIT.SEL.,*

=(SP)
PC.BL$GT?2
#6,SP

RO,R3
RZ.RO
ML .ADDR,RO
(RO ,32(SP)

* ,ML.REG

SP, (SP)
14(SP) ,-(SP)

BIT.SEL.*

#32,(SP)

#1,-(SP)
-(SP)

PC,BLSGT?

3079

ML .REG,*

3078

BSKEL4

REV A PATCH 00

006450
006454
006456
006460
006462
006466
006472
006476
006500
006504

062706
020300
001444
010146
012746
004767
010066
010116
012746
004767

ROUT INE DECLARATIONS

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL&4.BLI.1 (29)

98116

#10,SP

000010

R3,RO
7$

R1,=(SP)

;

PC,BLSDIV
RO.26(SP)
R1. (SP)

; *,WRD.INDEX

#20,-(SP)

000020
000000G
000026

#20,-(SP)

000020
000000G
000026

ROW.NUM,
*

; ROW.NUM,
*

PC,BLSMOD

000030

BIT.INDEX

RO.26(SP)
RS.RO
RO

*
C
EC.NUM,

30(SP) ,RO

; WRD.INDEX,*

RO
RO

3082

3083

3084

006626

#ERROR .MAP RO

000026
000001

#1,-(SP)

RO, (SP)

26(SP) ,=(SP)

000000G
037020°"
000004
000014
000177

7%:

8%:

000016
036772
000010 000026
000026
000040
036772"

#4 ,FLG.REG
#14,SP
R1

R1,#177
6$
R4,14(SP)

RS
R5,16(SP)

OFFSET,RAND. INDEX

; SEC.NUM
*
; SEC.NUM,

: *,ML.REG

ML .ADDR,R1
RO.10(RT)
ML . ADDR,R1

; MLREG,~*

24 (SP)
10(,R1)

RO.10(R1)

: MLREG,*

3090
3070
3091

; *,ML.REG
: ML.REG,MLREG
;
.

#34,SP

3085
3081
3074

; ML.REG,MLREG
; *,MLREG

#177770.RS
#7.R0
RS.RO

ML .ADDR,R1

26 words

;

ML .ADDR,R1
26(SP)
10(,R1)
,RO
26(SP)

24(SP) .RO
ML .DUT.RS

000207

ROW.NUM
ROW.NUM,
*

#40,R0

000024

)
192 words :
; Routine Size:
: Maximum stack depth per invocation:

; BIT.INDEX,*

(SP) ,=(SP)
PC,BL$PU2

000014

006716

21-Apr=1981 08:40:22
21-Apr=1981 08:19:06

*,MLREG
*,MLREG

3005

3095
3096
3097
3098

S NN

(=1Velo
V]

WWWWW

AONURUNUNINUNINININ
= S L D B e 2 2 2000

—.—.-—l—‘—‘_A—‘-—l-—‘-‘—l_l—l—‘—fl—‘—‘—j-‘—l—fl—._‘-—.-—.—-l—-l_‘—I._J—)—.—D-J—l

WN—=O VNN W =000KGR
*wbwm—og OONONE

(N (N N AN LN (N N LN N N AN N N N N NN NN NN N NN NN VNN NNV N NN N WWWWW
b
d
b
)
b

LIO R U TR
R D L R
T E T E T E TR TR R P PR
R
R R
R
TR R E
O
L
E TRLT E TRA T A S ET D

BSKEL4
REV A PATCH 00

21-Apr=1981 08:40:22

21-Apr-1981 08:19:06

ROUTINE DECLARATIONS

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1 (30)

Page

SEQ 0117

routine X_TMP_BLST_TBL (TEMP_ARRSBNK_SEL. ALL_BAD_CNT) : novalue =
begin

;

FUNCTIONAL DESCRIPTION: TRANSFER TEMP BLAST TABLE TC MAIN BLAST TABLE

i
!

THE TEMP BLAST TABLE STORES THE NIBBLE NUMBER,
ROW/COLUMN NUMBER AND A R/C SELECT FLAG FOR A

ONCE IT IS DETERMINED THAT THIS CHIP IS NOT ALL

ROW/COLUNM WHICH HAS BEEN SELECTED FOR BLASTING.

;

BAD (ie. > 10 ALL BAD ROW/COL) THEN THIS TEMP BLAST

i
!
!
!

THIS TABLE IS NEEDED BECAUSE ONCE THIS INFORMATION
1S ¥FERED INTO THE MAIN BLAST TABLE THERE IS NO WAY
OF KNOWING WHICH CHIP THIS BAD ROW/(COL CAME FROM.
THERFOR MAKING IT IMPOSSIBLE TO DELETE A ROW/(COL

TABLE IS XFERED INTO THE MAIN BLAST TABLE.

FROM THE BLAST TABLE ONCE IT HAS BEEN LOADED INTO IT.

;

i
!

FORMAL PARAME TERS:

TEM_ARRSBNK _SEL:

THIS ARGUMENT STORES THE ARRAY AND BANK SELECT

NUMBER.
ALt _BAD_(NT:

'
!

THIS ARGUMENT TELLS THIS ROUTINE HOW MANY
REMAINDER TABLE ENTRIES TO XFER INTO THE

'
!

THE MAIN BLAST TABLE.

;
local

'POINTS TO FAILING BANK

BNK_NUM;

BNK_NUM = , TEMP_ARRSBNK_SEL<.BNK_SEL_POS, BNKSSEL_SIZE>:

' TRANSFER TEMP BLAST TABLE TO BLAST TABLE

incr (NT from 0 to .ALL_BAD_CNT do
i; LTMP_BLST_TBL [.CNT, R_(] eql 1

then

'CALCULATE THE FAILING BANK

"IS THIS A FAILING ROW

;

BLAST TBL [.BNK_NUM, .TMP_BLST_TBL [.CNT, R_C_NOJ, .TMP_BLST_TBL [.CNT, NIB_NOJ, ONE, ZFRO] =

eLse

'LOAD THE BLAST TABLE WITH THE FAILING ROW NO. AT THIS NIBBLE

SET_FLG

NOJ, ONE,
BLAST TRL [.BNK_NUM, .TMP_BRLST_TBL [.(NT, R_C_NO] + .COL_BASE, .TMP BLST_TBL [.(NT, NIB
NIBBLE NO.

'LOAD TRETMBLAST WITH THE FAILING COLOMN AT HIIS

ZFRO] = SET_FLG;

end;

006720

004167

0000006

006724

012746

000016

LSBTTL

X.TMP.BLST.TBL ROUTINE DECLARAT]ONS

JSR

R1,$SAVE3

X.TMP BLST.TBL:

MOV

#16,-(SP)

2039

214

MOV
CLR
JSR
SWAB
(LRB

0000006

105000

ASL

006 300

010003
005002
000450
010201
006301
012700
060100
005710

CLR

i$:

026744"

ASL

MOV
ADD
TST

BPL

ASR
ASR
ASR

ASR
BIC

177400

2%:

ASR
ASR

BIC

177400

036770°

3%:

026770°

BIC
MOV

177760
000001

MOV

JSR

000000G
000010

; Routine Size:

4%:

000022

000010
64 words

; Maximum stack depth per

ADD
ADD
ASL
ADD
MOV

ADD
INC
(MP
BLE
ADD
RTS

invocation:

12 words

3134

MOV

100010

007110
007112
007116

n2,-(SP)
=(SP)
PC,BLSGT?
RO

CNT

3130

CNT,»

3132

#TMP . BLST.TBL,RO
R1,RC
(RO)
2%
(RO) ,R1

3134

R1
R1

R1
#177400,R1

3137

(RO) ,R1
R1
R1
R1

R1
#177400,R1

,R1
COL .BASE

3138

R3,R1
R1

#BLAST.TBL,R1
R1,-(SP)
(RO) ,=(SP)

#177760, (SP)
#1,-(SP)
(SP) ,=(SP)

PC,BLSPU2

#10,SP
R2
R2,22(SP)
1%
#10,SP

CNT

037012°
000002

SP, (SP)

BNK, SEL .POS,=(SP)

CNT ,ALL .BAD.CNT

§§

ADD

MOV

—

006742
006744
006750
006752

060616
016746
012746
005046
004767
000300

55095118

. 006730
| 006732
. 006736

ROUTINE DECLARATIONS

T0PS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (30)

. BSKEL&
| REV A PATCH 00

B 10
21-Apr=1981 08: 40:22
2i=Apr=1981 08: 19:06

3141

3142

3143

3144

% 22

.
.

.
-

.
.

.
-

.
.

.
-

.
.

.
-

.
o

.
.

.
-

.
.

o
.

k3
-

.
-

1
1

.
-

4
-

L4
-

.
-

k
-

4
.

.
.

.
-

.
.

3
.

L4
-

.
-

L4
B

L4
-

.
.

.
-

.
.

‘;
.

170
171

172
173
174
};g

routine X_TO_REM_TBL (REM_PTR) =

begin

14+

FUNCTIONAL DESCRIPTION: TRANSFER COLUMN COUNT TABLE TO T.

HAVE SEARCHED FOR ALL BAD ROWS AND COLUMNS ALL

THAT REMAINS ARE SINGLE CELL FAILURES A SCATTERED
THROUGH OUT THE MOS RAM.

THIS ROUTINE XFERS ALL THE REMAINING ROW COLUMN
ADDRESS PAIRS OF THE REMAINING FAILURES INTO
THE REMAINDER TABLE WHERE THEY ARE INTERIGATED
AND THE BEST BLAST SELECTION IS DETERMINED.
_

FORMAL PARAME TERS :

REM_PTR

THIS ARGUMENT WILL FIRST POINT TG THE

STARTING TABLE POSITION WHERE THE FIRST
XFERED ROW/COLUMN PAIR IS TO GO.

ONCE THE ROUTINE IS COMPLETED THIS ARGUMENTS
VALUE 1S RETURNED TO INDICATE HOW MANY ROW/(COL
PAIRS WERE XFERED INTO THE REMAINDER TABLE.

local

'STORES THE ADJACENT ROW ADDRESSES WORD POSITION
'STORES THE ADJACENT ROW ADDRESSES WORD BIT POSITION

WRD_INDEX,
BIT_INDEX,

'STORES A COLUMNS ADJACENT ROW NUMBER
'STORES THE NUMBER OF ADJACENT ROW ADDRESSES FOUND
'VARIABLE SECTOR STARTING ADDRESS
'VARJABLE SECTOR ENDING ADDRESS

ROW_NUM,
ADJACENT_CNT,
START_SET,
END_SEC:

incr COL_NUM from O to .MAX_CHIP_COL = 1 do

'%g?

1"f1 LCOL_CNT_TBL [.COL_NUM] nea ZERO

182
183

184

185

186

begin
then

begin

319C

3192

)

if .COL_NUM gtr 127

then

begin

ROW_NUM = _COL_NUM - 128;
START _SEC = 258;
END_SEC = 511;

187
3188
3189

3191

“AINDER TABLE

ONCE THE ERROR MAP AND THE COLUMN COUNT TABLES

177

1;2

T0PS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (31)

else

end

begin

'SEARCH COLUMN COUNT TABLE

'DOES THIS LOCATION HAVE A COUNT IN IT
'IS THIS A 64K CHIP

'THE FIRST COLUMN ADDRESS STARTS AT 128
'THE FIRST SECTOR STARTS AT 256
'THE END SECTOR ENDS AT 511

Page 86
SEQ 0119

T———

¢ 10

21-Apr-1981 08:40:22
21=-Apr=1981 08:19:06

BSKEL4
REV A PATCH 00 ROUTINE DECLARATIONS

OOOgOOOOOOmmmmmmmwmmbbb
OO
NO NS WN 2OV NN
W =0V~

wwwwwwwwwwuuwwwwwwwwwwwwwwwwwwwwwwwwwwwww
—l_l-—l—l—l_l—-l—l—l_)-—)_h.—l—l-ld_l_d—l—l—-.

‘

[
e
e

D 10

21-Apr=1981 08:40:22

BSKEL&

21=-Apr-1981 08:19:06

REV A PATCH 00 ROUTINE DECLARATIONS
START_SEC = ZERO;
ROW_NOM = . (OL_NUM;

3193
3194

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.T (31)

'THE START SECTOR STARTS AT ZERO
‘AT THE FIRST SECTOR THE COLUMN = ROW

3196

it .BNK_NUM_SEC eql 127 then END_SEC = 127 else END_SEC = 255;

3198

end;

'IS THIS A 16K CHIP

3201

| NOW SEARCH THRU THE ERROR MAP AND FIND THIS COLUMNS

! ADJACENT FAILING ROWS USING ROW_NUM AS A POINTER TO THE
!

ADJACENT_CNT = ZERO;

%sgg

incrbSEQ_NUM from .START_SEC to .END_SEC do

3211

3212
3213

3214

3216

3218

:
:
H

'CLEAR THE ADJACENT COUNT

3205
3209

ADJACENT ROW.

3217

3219
3220
3221
ggsz

egin

WRD_INDEX = .ROW_NUM/16;

!SEARCH ALL THESE SECTORS

'CALCULATE WHICH WORD THIS ROW IS IN

it .ERROR_MAP [.SEC_NuUM, .WRD_INDEX, FULL_WRD] neq ZERO !'IS THIS ROW BIT SET

then

begin

' CALCULATE THE ROWS WORD BIT POSITION

BIT_INDEX = .ROW_NUM mod 16;

it .ERROR_MAP [.SEC_NUM, .WRD_INDEX, .BIT_INDEX, ONE, ZEROJ] eql 1

then

begin

'UP THE ADJACENT COUNT
ADJACENT _CNT = _ADJACENT_CNT + 1;
'LOAD THE REM_TBL WITH THIS COLUMN NO.
.COL_NUM;
=
COL)
,
REM_TBL [.REM_PTR
'LOAD THE COPIED TABLE TOO
.COL_NUM;
=
COL]
,
[.REM_PTR
M_TBL
COPTED_RE
selectone .SEC_NUM of
set

!FIND WHICH PHYSICAL ROW NUMBER THIS IS

(o tg 127, 256 to 383] :

gsgg

egin

{ARE WE IN QUAD 0 OR 2

REM TBL [.REM_PTR, ROW] = .WRD_INDEX*16 + .BIT_INDEX;
cosYso_Rsn_rat [.REM_PTR, ROW] TM= .WRD_INDEX*16 + .BIT_INDEX;

3228
gggg

end,;

(128bto.255. 384 to S11] :

%gg%

egin

!'ARE WE IN QUAD 1 OR 3

REM TBL [.REM_PTR, ROW] = .WRD_INDEX*16 + .BIT_INDEX + 128;
COPTED_REM_TBL [.REM_PTR, ROW] = .WRD_INDEX*16 + .BIT_INDEX + 128;

3234
3235

3236

tes;

3237

end;

3239

REM_PTR = .REM_PTR + 1; !UP THE REM_PTR POINTER

3241

it ADJACENT_CNT eql .COL_CNT_TBL [.COL_NUM] then exitloop;

3243

end;

Page 87

SEQ 0120

BSKELSG

007120

007130
007140

ROUTINE DECLARATIONS

3245

ROW_NUM = (.ROW_NUM = 1) and %0'177°;

3247
wh

004167

end;
end;

X.TO.REM. TBL:

(000000G

016766
C00167

000520

105764

000000°

0C7154
007160

000167
021627

000502
000177

2%:

162701
012766
012762

000200
000400
000777

007212

005066

000010

007220

026727

037014' 000177

007230

01276%

000177

000002

007240

012766

000377

000002

007252

016604

000010

007312

066605

000012

000020
000000G
000012

(€00012

3141

R1,$SAVES

MAX.CHIP.COL,12(SP)
1%:

007170
007174
007202

X.TO.REM.TBL ROUTINE DECLARATIONS
#14,SP

000014

036774 000012

012746
004767
010066

'RETURN HOW MANY ROW COLUMN PAIRS WERE XFERED

return .REM_PIR;

007146

007264
007270
007274

'DECREMENT THE ROW COUNT AND AVOIDE OVER RUN

end;

3252
3255

%0121

end;

3248

3254

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (31)

end;

3246

W
o

TR TR TR TR TR TR LTS

REV A PAT(H 00

E 10
21=Apr=1981
21=-Apr=1981

000010
000002
3%

=(SP)
17%
(SP) ,R4

COL.CNT.TBL(R&)
2%
16%

(SP) ,#177
3%

(SP) ,R1
#200,R1
#400,10(SP?
#777,2(SP)
5%

COL .NUM, *

COL .NUM, =

COL .NUM, ROW.NUM
* ,ROW.NUM

*,START.SEC
* END.SEC

(SP) ,R1

START.SEC
NUM
.OW
COL .NUM,R

43
#8177 ,2(SP)

« END.SEC

10(SP)

BNK .NUM.SEC,#177

4%:

3177

COL .NUM

#377,2(SP)
12(SP)
10(SP) ,R4
R4
15%
R1,=-(SP)
#20,-(SP)
PC,BLSDIV
RO, 12(SP)
R4 RO

RO,RS
12(SP) ,RS

* END.SEC
ADJACENT.CNT
START.SEC,SEC.NUM
SEC.NUM
ROW.NUM,
*

* ,WRD
. INDE X
SEC.NUM,»

; WRD.INDEX,*

3180

REV A PATCH 00

007316
007320
007324
007326
007330

006305
005765
001544
010146
012746
004767
010066
012746
060516
010046

21=Apr=19

ROUTINE DECLARATIONS
ASL

006626

BSKELS

o 0o

21=Apr=19

#20,-(SP)

: ROW.NUM,*

RO14(SP)

: *,BIT.INDEX
; BIT.INDEX,*

000001

RS, (SP)
RO.=(SP)
#1.-(5P)

000000G
000010

PC,BLSGT2
#10,SP

= (SP)
, MAP
#ERROR.

RO
138

22(SP)
44(SP)
RS

000044

RS
#REM,
TBL ,R2
RS ,R2
10(SP), (R2)

000400"*
000010
000710

#COPIED.REM,
1RL ,R3
RS,R3
10(SP), (R3)

000010

REM.PTR,*

«
; COL.NUM,
; COL.NUM,*
; SEC.NUM

;

B%:

000014
000001
000001
9%:

000377
108:

000777

000016

;

ADJACENT.CNT

3219
3220

3221
3223

; SEC.NUM,*

000600

;

: SEC.NUM,+

7%:

000577

000200

3216

; SEC.NUM,+

000177

000016

3214

-(5P)

000022

000400

ERROR .MAP (R5)

P ,RL SMOD
ADD

Page

SEQ 0122

148
R1,=(5P)

000020
000000G

TOPS=20 Bliss=i6 v2(212)
PA:<NEALE>PMSKL&.BLI.T (31)

11%:

WRD.INDEX,*

14(SP) ,RO
RO, 1(R2)
RO,1(R3)
12%
Rkil200

; BIT.INDEX,*

RG 4377

: SEC.NUM,+

R& , #4600
12%
RG 4777
12%

; SEC.NUM,+

16(SP) ,RO
RO

»
: SEC.NUM,

3228

3229
3223

: SEC.NUM,
; WRD.INDEX,*

3234

G 10

BSKELS

REV A PAT(H 00

007552
00755
007556
007560
007564
007566
007572
007576
007602
007606
007610
007614
007620
007624
007626
007632
007634
007636
007640
007642
007644
007650
007652
007654
007660
007662

007664
007670
007672
007676
007702
007706

21=Apr=1981 08:40:22
21=Apr=1981 08:19:06

ROUTINE DECLARATIONS
ASL
ASL

006300

ASL
ADD
MOV
ADD

000014
000200
000001
000001
000044

MOvR

12%:

15%:¢

177600

177246
000034
000076

: Routine Size:
188 words
; Maximum stack depth per invocation:

RO,RS
#200,R5
R5.,1(R2)
RS,1(R3)

; BIT.INDEX,*

44 (SP)

REM.PTR

10(SP) ,R3

COL .NUM, =

BISA
(MP
BNE

(OL.CNT.TBL (R3),RS
22(SP) RS

(MP

(SP)+, (SP)+
R1,RS
RS
RS,R1

3235
3239
3241

,+*
; ADJACENT.CNT

ADD

000010

000014

INC
(LR

MOV

000010

000009°
000022

000002

MOvR

RO
RO
RO
14(SP) ,RO

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.T (31

158:
16%:

17%:

18%:

words

MOV
DEC
MOV
BIC
(MP

INC

BLE
INC

8GE
JMP
MOV
ADD
RTS

;

* ,ROW.NUM
* ,ROW.NUM

#177600,R1

(SP)+, (SP)+

SEC.NUM
SEC.NUM, END.SEC

R4 ,2(SP)

(SP)
(SP) .14 (SP)

18%

34 (SP) RO

#816,5F

ROW.NUM,*

3213
3247

3208
3207

; COL.NUM
; COL.NUM,=

3177

REM.PTR,»

3142
3141

;

H 10

21=Apr=1981 08:40:22
21=Apr=1981 08:19:06

3256

3257
3258
3259
3260

3562
3263

3264
3265
%S(gg

begin

lee
FUNCTIONAL DESCRIPTION: COLUMN PURGE
|

THE REMAINDER TABLE IS LOADED WITH ALL THE
THE REMAINING SINGLE CELL FAILURES SCATTERED

THROUGH OUT THE C(MIP. THIS REMAINDER TABLE
IS INTERIGATED FOR THE BEST POSSIBLE CHOICE
FOR ROW OR COLUMN SELECTION FOR BLASTING.

.
¢

3268
3269

ONCE A ROW OR COLUMN IS SELECTED FOR BLASTING
1T OCCURANCE IN THE REMAINDER TABLE MUST BE

3272
3273

THIS ROUTINE WILL SEARCH THE REMAINDER TABLE
OF A SELECTED COLUMN FOR BLASTING AND PURGE

TAKEN OUT.

W
~o
~

3280

R
L
T

I RL R P T

3276

THE TABLE OF ITS OCCURANCE AND ALSO ITS

!
|
i

!
:

ROW PAIR ADDRESS.

FORMAL PARAMETERS:E
COL_SEL:

THE

[

TABLE.

INDICATES HOW MANY OCCURANCES OF THIS COLUMN

TO EXPECT

LST_REM_ENTRY:

;

TO FIND IN THE

TABLE.

POINTS TO THE LAST TABLE ENTRY + 1

I R

3290
3291
3292

3294

3295
N
O
oo

3297
N

T E T ET

TR T

]

THIS ARGUMENT POINTS TO THE COLUMN SELECTED
FOR BLASTING AND THE COLUMN TO BE PURGED FROM

QUANTITY:

'
3287

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (32)

routine (OL_PURGE (COL_SEL, QUANTITY, LST_REM_ENTRY) : novalue =

L O I

®e
%o . % 0. g,

BSKELG
- REY A PAT(H 00 ROUTINE DECLARATIONS

3299

3301

3302

3303

3305

ggoc

it JLST_REM_ENTRY gtr ONE

then

'PURGE THE COLUMNS IF REMAINDER TABLE ENTRIES > 1

begin

incr PUR_LOC from O to LST_REM_ENTRY = 1 do
begin

f; LREM_TBL [.PUR_LOC, COL] eql .COL_SEL

then

'PURGE THE REMAINDER TABLE QF THIS COLUMN
‘1S THIS COLUMN TO BE PURGED

begin

it (,PUR_LOC + .QUANT!TY) neg .LST_REM_ENTRY

then

'1S THIS COLUMN LAST IN TABLE
,

begin

incr PURGE from ,PUR_LOC to (.LST_REM_ENTRY = 1) = _QUANTITY do

REM_TRL [.PURGE,RO_CL] = .REM_TBL [.PURGE + .QUANTITY, RO_CLI;

Page 91
SEQ 0124

[ 10

BSKEL4G

REV A PATCH 00

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (32)

incr COPY from O to .LST REM_ENTRY = _QUANTITY do

!COPY REM TBLL TO COPIED TBL

21=Apr=1981 08:19:06

ROUTINE DECLARATIONS

0128

NO U NP
=

COPIED_REM_TBL [.COPY, RD_CL] = .REM_TBL [.COPY, RO_CLI:

end;

s - ol

NN N NN N (N NN
NN NN NN NN NN

‘EXIT THE LOOP WHEN PURGE IS -COMPLETE

exitioop;
end;

el e

OV00

N—J il

21-Apr=1981 08:40:22

end;

end;
end,

000000G

LSBTTL
COL .PURGE :
JSR
TST

000020
000001

1%:

MOV
CMP
BLE
(LR
BR
MOV
ASL

(LR
BISB

000400
000024

CMP
BNE
MOV
MOV

000022

ADD

(MP
BEQ

mov

2%:

000400°* 00040C*

3%:

SUB
MOV
DEC
BR
MOV

(0L .PURGE ROUTINE DECLARATIONS
3256

R1,$SAVES
-(SP)

RS
20(SP)

#1
RS,

*
; LST.REM.ENTRY,

3290

;

PUR.LOC

3294

; PUR.LOC,*

3297

R4
REM.
TBL (R1) ,R4
,
24 (SP)
R4

s ®, 000 .SEL

22(SP) ,R3

QUANTITY,»

;

PUR.LOC,*

R3,R0
(SP) ,RO
RO,RS

RS,R2
R3,R2

3301

33Q5
;

PUR.LOC,PURGE

PURGE,*

;

PURGE

3306

ASL

MOV
ADD
ASL
MOV

INC

*
; PURGE,

REM. TBL (R1) ,REM, TBL (RO)
R4

R4 ,R2

RS ,RZ
R3,R2

;

PURGE

; PURGE ,*

3305
3308

;

(OPY

BSKELG

REV A PATCH 00

4%:

010040
010042
010044

5%:
6£%:
7%:

002722
005726
000207

: Routine Size:

8%:

58 words

; Maximum stack depth per

5%
RO,R1

1nvocation:

7 words

TOPS=20 Bliss=i16 v2(212)

PA:<NEALE>PMSKL4.BLI.T (32)

Page

SEQ 0126

; COPY,*

3309

; COPY

3308

3313

(S”) RS
1%

;

gSM.TBL(R1).(0PXED.REM.TBL(R1)

000400* 000710°

010052

010070
010072

21=Apr=1981 08:19:06

ROUTINE DECLARATIONS

010036

010054
010056
010060
010062
010064
010066

J 10
21=-Apr-1981 08:40:22

RO,R2
4%
(SP)

(SP)+
P(

COPY,»

; PUR.IOC

3294

PUR.LOC,*

3256

K 10

G 09 0 §s0 0o $o g

3321
3322
3323
324
325

INWWW

90 05 85 40 S0 V0 00 V6 00 T5 90 ¥ 00 00 00 00 00 85 Te 00 00 80 00

BSKELS
REV A PAT(H 00

®o Go S o
6 Bo gs $0 86 $6 8

.
.

326
327

3328
3329
3330
3331
3332
3333
3334
3335
3336

21=Apr=1981 08:40:22

21-Apr-1981 08:19:06

ROUTINE DECLARATIONS

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.T (33)

55095127

routgne_nou_Puacf (ROW_SEL, QUANTITY, LST_REM_ENTRY) : novalue =
egin

fes
'

FUNCTIONAL DESCRIPTION: ROW PURGE

THIS ROUTINE IS EXACTLY THE SAME AS COLUMN
PURGE EXCEPT THAT THE (OPIED REMAINDER
TABEL IS SEARCH AND PURGED OF ROW NUMBERS.

:
:
:

'PURGE THE ROW IF COPIED TABLE ENTRIES

if .LST_REM_ENTRY gtr ONE

then

> 1

begin

incerUR_LOC from 0 to .LST_REM_ENTRY = 1 do

3337
3338

'PURGE THE COPIED REM TABLE

egin

it .COPIED_REM_TBL [.PUR_LOC, ROW] eql .ROW_SEL

3339
3340

then

3341
3342
3343
3344
3345
3346
3347
3348
3349
3350
3351
3352
3353
3354
3355
3356
3357

'1S THIS THE ROwW TO BE PURGED

begin

if (,PUR_LOC + .QUANTITY) neq .LST_REM_ENTRY

then

'1S THIS THE LAST TABLE ENTRY

begin

incr PURGE from .PUR_LOC to (.LST_REM_ENTRY = 1) = .QUANTITY do

COPIED_REM_TBL [.PURGE, RO_CL] = TCOPIED_REM_TBL [.PURGE + .QUANTITY, RO_CL];

'COPY COPIED TC REM
incr COPY from O to .LST_REM_ENTRY = .QUANTITY do
REM_TBL [.COPY, RO_C[] =".COPIED_REM_TBL [.COPY, RO_CLI:
end;

'EXIT LOOP WHEN PURGE IS COMPLETED

ex;tloop:
enda,

end,;
end;

end;

010074

004167

000000G

010100
010102
010106
010112
010114

005746
016605

000020

005016

000001

.SBTTL
ROW.PURGE:
JSR
TST

MOV
A

ROW.PURGE ROUTINE DECLARATIONS
R1,$SAVES

3321

20(SP) ,RS

; LST.REM.ENTRY»

3332

: PUR,.LOC

3336

-(SP)

(MP

#1
RS,

CLR

(SP)’

BLE

| BSKEL4

REV A PATCH 00

010116
010120
010122
010124
010126

ROUTINE DECLARATIONS
7%

000454
011601

010132
010136

010140
010144
010146
010150
010152
010154
010156
010160
010162
010164
010166
010170
010172
010174
010176
010200
010206
010210
010212
010214
010216
010220
010222
010224
010226
010230
010236
010240
010242
010244
010246
010250
010252
010254
010256

L 10
21-Apr=1981 08:40:22
21=Apr=1981 08:19:06

(SP),R1

R1
k&

R4
COPIED.REM,.TBL+1(R1)

; PUR.LOC,*

000711
000024

2:.24(SP)

; *,ROW.SEL

000022

22(SP) ,R3

: QUANTITY,*

(S?) ,RO

; PUR.LOC,*

8%
RS,R2
R3,R2

R3,RO
RO,RS

2%:

000710* 000710°

3%:

.
58 words i
invocation:
per
depth
stack
: Maximum

R4 ,RO

; PURGE ,*

g?,R1

. PURGE,*

3343

; PURGE

COPIED.REM,.TBL(R1),COPIED.REM.TBL(RO) ;

;

R5.R2

R4 ,R2

3339

PURGE

3348 °

3347

: PURGE ,*
3350

; COPY

4%:

g?.m

; COPY,»

3351

. COPY
. COPY,»

3350

5%:

RO
RO,R2
8%

3355

7%:

%gP),RS

; PUR.LOC,*

8%:

(SP) +
PC

(R1)
,REM.TBLBL
(R1)EM.T
COPIED.R

6%:

000207

; PUR.LOC,PURGE

3347

(SP) ,R&

R4 ¢
3%

55095128

R3.R2
RO

000710* 000400°*

; Routine Size:

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (33

7 words

(SP)

; PUR.LOC
:

3336

3321

M 10

BSKEL4
REV A PAT(H 00

3363

3364
3365
3366
3367
3368
3369
3370
3371
3372

3373
3374
3375

3376
3377
3378

21-Apr=-1981 08:40:22

21=Apr=1981 08:19:06

ROUTINE DECLARATIONS
routine COL_SORT (LST_REM_ENTRY)
begin
xS

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1 (34)

FUNCTIONAL DESCRIPTION: COLUMN SORT

BEFORE THE REMAINDER TABLE IS INTERIGATED FOR COLUMNS

.
1

THIS ROUTINE WILL SORT THE COLUMN SIDE OF THE
REMAINDER TABLE AND THE ROW PAIR GETS MOVED

THE COLUMN SIDE CF THE TABLE MUST BE SORTED.

AROUND WITH THE COLUMN PAIR.

: novalue =

Page

SEQ 0129

FORMAL PARAMETERS:

LST_REM_ENTRY:

POINTS TO THE LAST REMAINDER TABLE ENTRY

:
local

' TEMPORARY STORAGE FOR BUBBLED ENTRY

i; .LST_REM_ENTRY gtr ONE

'SORT THE TABLE IF ENTRIES ARE > 1

TEMP;

then

begin

incr PASS from 1 to .LST_REM_ENTRY = 1 do

'BUBBLE SORT TABLE UNTIL IN ASENDING CRDER

incr index from 0 to ((.LST_REM_ENTRY = 2) - (.PASS = 1)) do

'BUBBLE UP THE BIGGEST NUMBER

i; .REM_TBL [.index, COL] gtr .REM_TBL [.index + 1, (OL]

'IS THE NEXT ENTRY > THIS ONE

then

begin

TEMP

= _REM_TBL [.index, RO_CLI];

'COPY THE BIGGER ENTRY

'PUT THE SMALLER ENTRY HERE
REM_TBL [.index, RO_CL] = .REM_TBL [.index + 1, RO_CLI]:
[N NEXT ENTRY
ENTRY
BIGGER
TRE
'PUT
.TEMP;
=
RO_CL]
1,
+
[.index
REg_TBL
end;

end;
end;

000000G

000020
000001

000002

.SBTTL

(OL.SORT ROUTINE DECLARATIONS

JSR

R1,$SAVES

3363

MOV

20(SP) ,=(SP)

; LST.REM.ENTRY,*

3384

(SP) ,RO

3390

s PASS

3388

COL.SORT:

TST

(MP

-(SP)

(SP) ,#1

BLE

SuUB

#2,RO

MOV
CLR

)

BSKEL4
REV A PAT(H 00

010310
010312
010314
010316
010320
010322
010324
010326
010330
010332
010336
010340

010342
C10344
010350
010352
010354
010360
010362
010366
010370
010372
010374
010376
010400
0106402
010404

000431
010005
160305
010501
005201
005004
000421
010405
006305
012702
060502
010405

006305
062705
121215
101405
011266
011512
016615
(05204
020401
003755
005203
020316
002744
022626

DECLARATIONS

1%:

2%:
000400°

Maximum stack

4%
R4 RS
RS

;

INDEX

;

INDEX,*

R4 RS
RS

;

INDEX,*

¢ TEMP

%1 30

3390

3392

#REM.
TBL +2 RS
(R2), (RS)

000002

(R2),2(SP)
(RS), (R2)

000002

3%:

2(SP), (RS)

5%:

6%:

invocation:

8 words

«%:

43 words

(34)

#RCM
TBL ,R2
,
RS .R2

000402°

depth per

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1

RO,RS
R3,RS
RS ,R1

R1
R&

000207

;. Routine Size:

;

ROUTINE

N 10
21=Apr=1681 08:40:22
21=Apr=1981 08:19:06

(SP)+,(SP)+

TEMP,»

INDEX

;

INDEX,*

.
.

PASS
PASS,»

3395
3396
3397
3390

3388
3363

BSKELG

REV A PATCH 00

B N

21-Apr=1981 08:40:22

21=Apr=1981 08:19:06

ROUTINE DECLARATICNS

TOPS=20 Bliss=16 V2(212)

PA:<NEALE>PMSKL4.BLI.T1 (35

Page 98
0131
SEQ

routine ROW_SORT (LST_REM_ENTRY) : novalue =
lee

FUNCTIONAL DESCRIPTION: ROW SORT

THIS ROUTINE SERVES THE SAME PURPOSE AS
COLUMN SORT EXCEPT THE COPIED REM TABLE

|
!

ROWS ARE SORTED.

:
local

'TEMPORY STORAGE FCR BUBBLED ENTRY

i; .LST_REM_ENTRY gtr ONF

'SORT THE TABLE IF ENTRIES > 1

TEMP;

then

T TR
LR LA

TR LRTR
CE TR I

D U T

begin

incr PASS from 1 to .LST_REM_ENTRY = 1 do

'BURBLE SORT TABLE UNTIL IN ASEENDING ORDER

'BUBBLE UP THE BIGGEST NUMBER

incr index from 0 to ((.LST_REM_ENTRY = 2) = (.PASS = 1)) do

i; .COPIED_REM_TBL [.index, ROW] gtr .COPIED_REM_TBL [.index + 1, ROW]

then

be n

.COPIED_REM_TBL [. 1ndex. RO CLl;

COPIED REM TBL [.index, RO_CL]

'COPY THE BIGGER ENTRY

fOPIED REM TBL [.index + 1, RO_CLJ;

COZIED REM_TBL [.index + 1, RO_ CLJ = .TEMP; TPUT THE BIGGER ENTYR IN NEXT ENTRY

end;

ROW.SORT ROUTINE DECLARATIONS

JSR

R1,$SAVES

MOV

20(SP) ,~-(SP)

BLE

SUB

#2,R0O

TST

000020

(SP) ,RO

3423

: PASS

3421

MOV

RO,RS

3423

MOV

R5,R1

CLR

1%:

3403

3417

MOV

-(SP)

: LST.REM.ENTRY,*

CMP

000001

000002

.SBTTL

ROW.SORT:

000000G

SuUB
INC

(SP) .41

R3.RS

: PASS,»

s INDEX

cNn

BSKEL4
REV A PATCH 00

21-Apr-198 08:40:22
21=-Apr=1981 08:19:06

ROUTINE DECLARATIONS

2%:

010454
010456

000710°*

R4 ,R5
RS
#COPIED.REM.TBL
,R2

R4 ,R5
R5

010506
010512
010514
010520
010522
010524
010526
010530
010532
010534
010536
;

#COPIED.REM.TBL+2,R5
1(R2) ,1(RS)

000002

(R2),2(SP)
(R5), (R2)

000002

Routine Size:

2(SP), (RS)

6%:
45 words

8 words

(SP)+,(SP)+

Page 99
SEQ 0132
3425

*
INDEX,

*,TEMP

*
TEMP,
INDEX
*
INDEX,
PASS
PASS,
*

: Maximum stack depth per invocation:

INDEX,*

3%:
4%:

020316
002742
022626
000207

;

000712°*
000001
000001

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (35)

3428
3429
3430
3423

3421
3403

BSKEL&

R TR

TA T E TR T

DR PR T UD R LA L R

LR TETE TR

L U

REV A PATCH 00

34,36
3437
34,38
3439
3440
3441
3442

3443

3444
3445
3446
3447
3448
3449
3450
3451
3452
3453
3454
3455
3456
3457
3458
3459
3460
3461
3462
3463
3464
3465
3466
3467
3468
3469
3470

routine S_BLAST_TBL
begin

Page

100

SE095133

(BNK_NUM) =

TO DETERMINE IF A BANK HAS ANY ADDITIONAL
FAILING ROW OR CCLUMNS THE BLAST TABLE IS
SEARCHED FOR ANY BITS SET.

)

IF BITS ARE SET THEN THIS BANK MUST BE

PM'ED.

IF NO BITS ARE SET THEN THIS BANK

CAN BE SKIPPED AND NOT PM'ED

THIS ROUTINE SEARCHES THE BLAST TABLE AT
THE SELECTED BANK AND SEES IF ANY BITS ARE
ARE SET INDICATING NEW ERRORS FOR THIS BANK.
A TRUE INDICATOR IS RETURNED IF NEW ERRORS
EXIST AND A FALSE INDICATOR IS RETURNED IF

:
:
:
:
:

NO NEW ERRORS ARE FOUND.

;
I

FORMAL PARAMETERS:
BNK_NUM:

POINTS TO THE BANK TO BE SEARCHED

'LOOK AT ALL ROWS AND COLS FOR THIS BANK

incr SEARCH from 0 to .MAX_CHIP_COL*2 - 1 do
begin

if .BLAST_TBL [.BNK_NUM, .SEARCH, FULL_WRD] neq ZERO then return TRUE;

!RETURN TRU IF ANY BITS SET

end;

'RETURN FALSE IF NO BITS ARE SET

return FALSE;
end;

000000G

010544
010550

016703
006303

036774"

.SBTTL

S.BLAST.TBL:
JSR

MOV
ASL

MOV

000012

SWAB

CLRB

ASL

000412

1%:

010002

060102
006302
005762

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (36)

FUNCTTICNAL DESCRIPTION: SEARCH THE BLAST TABLE

004167

016600
000300
105000
006300
005001

21=-Apr=1981 08:19:06

ROUTINE DECLARATIONS

010540

010552
010556
010560
010562
010564
010566
010570
010572
010574
010576

21-Apr=1981 08:40:22

026770"

S.BLAST.TBL ROUTINE DECLARATIONS
R1,$SAVE3

MAX.CHIP.COL,R3
R3

12(SP) ,RO

3436

3462

; BNK.NUM,*

3465

RO
RO

CLR
BR

R1
3%

; SEARCH

3462

ADD

R1,R2

: SEARCH,*

3465

MOV
ASL

TST

RO,R2
R2

BLAST,TBL (R2)

——y

BSKEL4

REV A PATCH 00

010602
010604
010610

001403
012700
000207

EN
21=Apr=19 81 08:40:22
21=-Apr=1981 08:19:06

ROUTINE DECLARATIONS
BEQ

0C0001
2%:

RTS

INC

BLT
CLR
RTS

; Routine Size:

26 words

: Maximum stack depth per invocation:

4 words

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (36)

101

55095134

#1,R0

R1,R3
1%
w0

: SEARCH
;

SEARCH,*

3462

3437
3436

K EL&

v A PATCH 00

3476
34,77
34,78
34,79
3480
3,81
34,82
3483
3484
34,85
3486
34,87
34,88
3489
3490
3491
3492
3493
3494
3495

3496

34,97
34,98
3499
3500
3501
3502
3503

21-Apr-1981 08:19:06

ROUTINE DECLARATIONS

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1 (37)

routéhe_S_(OLUMNS (MOST_OF TEN, SUM_MOST, LST_REM_ENTRY) =
egin

FUNCTIONAL DESCRIPTION: SEARCH THE COLUMN TABLE
THE REMAINDER TABLE
IS SEARCHED FOR THE

BEST POSSIBLE CHCICE FOR BLASTING ie.

WHETHER TO SELECT ROWS OR COLUMNS

BLASTING.

FOR

THIS IS DONE BY FIRST FINDING WHETHER

ROW NUMBERS OR COLUMN NUMBERS APPEAR MOST
THEN IN THIS
OFTEN IN THE REMAINDER TABLE.
MOST OF TEN.
APPEARS
MEMBER
WHICH
COUNT
GREATER

:
:
:
:

FORMAL PARAMETERS:

THIS ROUTINE SEARCHES THE REMAINDER TABLE FOR
THE NUMBER OF DIFFERENT NUMBER OF FAILING
COLUMNS FOUND AND WHICH FAILING COLUMN NUMBER
HAS THE GREATEST NUMBER OF OCCURANCES.

TEN:
ST
_OF
MO

PASSED B¢ REFERENCE AND STORES THE MOST

OF TEN FOUND COLUMN.
TEN:
OF
SUM_
PASSED BY REFERENCE AND STORES THE SUM

OF THE MOST OF TEN FOUND COLUMN.

LST_REM_ENTRY:
POINTS TO THE LAST REMAINDER ENTRY

local

CUR_SUM,
PRE_SUM,
CUR_MOST,
PRE_MOST,
DIF;

PRE_MOST = :REM_TBL [ZERO, (OLI;
DIF = 1;
if .LST_REM_ENTRY gtr ONE

then

'STORES CURRENT SUM OF MOST OFTEN FOUND COLUMN
'STORES PREVIOUS SUM OF MOST OFTEN FOUND COLUMN
'STORES CURRENT MOST OFTEN FOUND COLUMN
'STORES PREVIOUS MOST OFTEN FOUND COLUMN

'STORES HOW MANY DIFFERENT COLUMNS WERE FOUND
'CURRENT SUM STARTS AT ONE

CUR_SUM = 1;

PRE_SUM =

WWN WNWILNWWWWWLWW
oo
o Vi oo
oo [ I
N — OO
NOWNESWN

IR CETELE
PR RET
RT

L I I e
T A A

PR PR TRPR PR

TR PR TR

LR T L R R LI T TR TN TN

3,7
2472
3,73
34,74
3475

21-Apr=1981 08:40:22

begin

COL_SORT (.LST_REM_ENTRY);

'PREVIOUS SUM STARTS AT CNE

'PREVIOUS MOST OF TEN STARTS AT FIRST COLUMN IN TABLE
'DIFFERENT COLUMN COUNT STARTS AT ONE
'FIRST TABLE ENTRY IS MOST OFTEM IF TABLE ENTRY < 1
'SORT THE COLUMN SIDE OF REMAINDER TABLE

incrbinQex from 0 to .LST_REM_ENTRY = 2 do

'FIND THE SUM, MOST OF TEN AND DIFFERENT

egin

iz LREM_TBL [.index, (OL] eql .REM_TBL [.index + 1, (OL]

then

begin

YIS THIS THE SAME AS THE NEXT

102

55095135

21=Apr-1981 08:40:22

BSKEL4

21-Apr=1981 08:19:06

else

3526
3527

T
L
T
R
T

end

begin

" INCREMENT THE DIFFERENT COLUMN COUNT

it .CUR_SUM gtr .PRE_SUM

'IS THE CURRENT SUM > PREVIOUS SUM

DIF

3528

3530

then

3531

3532

= DIFfF » 1;

begin

PRE_SUM= .CUR_SUM;
pns_nosr .CUR MOST

2533
;g;g

'SAVE THE SUM OF THE CURRENT MOST OF TEN
'SAVE THE CURRENT MOST OF TEN

enda,

'START CURRENT SUM BACK TO ONE

(UR_SUM = 1;

3537

end;

3538

end;

3540
ehd.'

3542
H
»H

W
w

0136103
SEOge

'MOST OFTEN IS THIS ENTRY
CUR_MOST = .REM_TBL [.index, COLJ;
"INCREMENT THE SUM OF THE MOST
= CUR UM+ 1;
CURZSUM

3523
3524

W
N
n)
w

TRTR}

- REV A PAT(H 00 ROUTINE DECLARATIONS

TOPS=20 Bliss=16 V2(212)
PMSKL4.BLI.1 (37)
PA:<NEALE>

3545

! THIS TEST TO SEE IF THE LAST SET OF

3549

if .CUR_SUM gtr .PRE_SUM

T T

3546
3550
3551

! UNIQUE COLUMN NUMBERS IN THE TABLE IS > THE PREVIOUS SUM

then

'IS THE CURRENT SUM > THE PREVIOUS SUM

begin

'SAVE THE SUM OF THE CURRENT MOST OF TEN

PRE_SUM= ,CUR_SUM;

3552

'SAVE THE CURRENT MOST OF TEN

PRS_MOST = .CUR MOST

%ggz

end;

010624

010630

010632
010636
010640
010642
010646

010654
010660
010664

3556
3557
gggg

'RETURN THE MOST OFTEN FOUND COLUMN
'RETURN THE SUM OF THE MOST OF TEN COLUMN
'RETURN THE DIFFERENT NUMBER OF COLUMNS FOUND

.MCST_OFTEN= .PRE_MOST;
= PRE SUM;
.SUM_MOST
re;urnDIF;
en

004167

000000G

024646

012701 000001
010105
005046
116716 000400°
012766 000001 000002
016604
020427
003444

010666 010446

000024
000001

LSBTTL

S.COLUMNS ROUTINE DECLARATIONS

JSR

R1,$SAVES

3471

MOV
MOV
CLR
MOvR
MOV

#1,R1
R1,R5
-(SP)
REM. TBL , (SP)
#1,2(SP)

; *,CUR.SUM
* ,PRE.SUM
PRE .MOST
* PRE .MOST
*,DIF

3507
3508
3509
5510

MOV

R4 ,-(5SP)

3515

S.COLUMNS:

(MP

MOV
(MF
BLE

-(SP) ,=(SP)

24 (SP) ,R4
R4 41
6%

LR
R

‘

LST.REM.ENTRY,*

3512

H 1N

BSKELSG
REV A PAT(H 00

010670
010674
010700
010702
010704
010706
010710
010712
010714
010722
010724
010732
010736
10740
010742

004767
162704

005002

010746
010750

010752

ROUTINE DECLARATIONS

000002

REM. TBL (R3) ,REM. TBL +2(RO)
2%
REM. TBL (R3) ,€(SP)

000400°* 000006

7(SP)

000007

000004

000002

#1,R1

RZ
R2,R4
1%
+
(SP)
R1,RS
7%

R1,RS
4(SP), (SP)
(SP) +,a26(SP)
RS,a24 (SP)
(SP)+,R0O

000026
000024

+
(SP)
PC

65 words

; Maximum stack deptt per invocation:

10 words

;

INDEX,*

;

INDEX,*

*,CUR.MOST
CUR.MOST
CUR.SUM
DIF
. SUM
CUR.SUM,PRE

2%:

000004

011004
011010
011014
011020
011022
011024
Routine Size:

* INDEX

000400 000402°

000001

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (37)

PC,COL.SORT

1%:

000006

;

JSR

177364

010754
010762
010766
010770
010772
010774
010776
011000

011002

21-Apr=1981 08:40:22
21=Apr=1981 08:19:0¢

. SUM
CUR.SUM,PRE
ST
.MOST
,PRE
.MO
CUR

*,CUR.SUM
INDEX

*
INDE,X

; CUR.SUM,PRE.SUM
CUR.SUM,PRE .SUM
CUR.MOST,PRE.MOST

PRE .MOST ,MOST.OF
TEN

E?E.SUM.SUM.MOST
*

104

55098137

3517
3520

3523
3524
3520
3528
3530

3533
3537
3517
3514
3549

3552
3553
3556

3557
3472
34a7

BSKELS
PEV A PAT(H 00

3560
3561
3562
3563
3564
3565
3566
3567
3568
3569

.
£
.
.
.
E
.

.
.
.

3570

3571
3572
3573

L4
.
.

3574

3575
3576
3577

L4
.

.
v

3578
3579
3580
3581
3582

3583

.
-

.
.

4
-

3584
3585
3586
3587
3588
3589

routbne S_ROWS (MOST_OF TEN, SUM_MOST, LST_REM_ENTRY) =
*e

FUNCTIONAL DESCRIPTION: SEARCH ROWS
THIS ROUTINE HAS THE SAME FUNCTIONALITY
AS SEARCH COLUMNS EXCEPT THAT THE COPIED
REMAINDER TABLE IS SEARCHED FOR ROW NUMBERS.
iocal

PRE _SUM,

CUR_MOST,
S?E_MOST.
CUR_SUM = 1.
PRE_SUM = 1;
PRE_MOST = .COPIED_REM_TBL [ZERO, ROW];
DIF = 1;

1'; .LST_REM_ENTRY gtr ONE
then

begin

ROW_SORT (.LST_REM_ENTRY);

'CURRENT SUM STARTS AT ONE
'PREVIOUS SUM STARTS AT ONE
'PREVIOUS MOST OF TEN STARTS AT FIRST TABLE ENRRY
'DIFFERENT ROW COUNT STARTS AT ONF

'FIRST TABLE ENTRY IS MOST OFTEN IF TABLE ENTRY < 1
'SORT THE ROW SIDE OF COPIED REM TABLE

incrbinqex from 0 to .LST_REM_ENTRY = 2 do

'FIND THE SUM, MOST OFTEN AND DIFFERENT

egin

i’f1 .COPIED_REM_TBL [.index, ROW] eql .COPIED_REM_TBL [.index + 1, ROW]

then

begin

'MOST OFTEN IS THIS ENTRY
= .COPIED_REM_TBL [.index, ROW];
(UR_MOST
OF MOST
SUM
' INCREMENT THE
CUS_SUM CUR SUMTM+ 17

else

begin

' INCREMENT THE DIFFERENT ROW COUNT

i; .CUR_SUM gtr .PRE_SUM

'1S THE CURRENT SUM > PREVIOUS SUM

DIF

then

= .DIF + 1;
begin

PRE_SUM = _CUR_SUM;

PRS_MOST = .CUR_MOST;

v
.

'SAVE THE SUM OF THE CURRENT MOST OF TEN

'SAVE THE CURRENT MOST OF TEN ROW

end;

cug SuM= 1;

4
.

'STORES CURRENT SUM OF MOST OFTEN FOUND ROW
'STORES PREVIOUS SUM OF MOST OF TEN FOUND ROW
'STORES CURRENT MOST OF TEN ROW FOUND
'STORES PREVIOUS MOST OF TEN ROW FOUND

CUR_SUM,

TOPS=20 Bliss=16 V2! 212)
>PMSKL4.BLI.1 (38)
PA:<NEALE

egin”

21-Apr-1981 08:19:06

ROUTINE DECLARATIONS

21-Apr=1981 08:40:22

end;

'START CURRENT SUM BA(CK TO ONE

‘

ge 105
5£00138

J 1

BSKEL&

REV A PAT(H 00
3612
3613
3614
3615
3616
3617
3618
3619
3620
3621
3622
3623
3624
3625
3626

3627
3628
3629
3630

011026
011032

004167
024646
012701

21-Apr-1981 08:40:22
21-Apr=1981 08:19:06

ROUTINE DECLARATIONS

: UNIQUE ROW NUMBERS IN TABLE IS > THE PREVIOUS

'IS THE CURRENT SUM > PREVIOUS SUM

i; .CUR_SUM gtr .PRE_SUM

then

beqgin

'SAVE THE SUM OF THE CURRENT MOST OFTEN

_SUM= _CUR_SUM;

'SAVE THE CURRENT MOST OFTEN ROW

PRE_MOST = .CUR MOST
end;

'RETURN THE MOST OFTEN FOUND ROW
'RETURN THE SUM OF THE MOST OFTEN FOUND ROW
'RETURN THE NUMBER OF DIFFERENT FOUND ROWS

.MOST OFTEN= .PRE_MOST;
= PRE SUM;
. SUM_MoST
re;urnDIF;
en

.SBTTL

3560

MOV

#1,R1

; *,CUR.SUM

CLR

-(SP)

; PRE.MOST

3578
3579
3580

CMP

0C0001

MOV

BLE

JSR

PC,ROW.SORT

#2,R4
R2

:
; INDEX

3588

MOV

R2.R3

s INDEX,*

3591

MOV

R2 RO

; INDEX,*

el D
RS

ASL

gzge

000711 000006
000007

MOVB
CLRB

000006

000002

3581
3583
3586

000711* 000713"

)

: =, ,PRE.MOST
: *,DIF
: LST.REM.ENTRY,*
-

ASL

INC

2%:

R4 41

; *,PRE.SUM

R4 ,-(SP)

SUB
CLR

000004

R1,RS

COPIED.REM.TBL+1,(SP)
#1,2(SP)
24 (SP) ,R4

MOV

1%:

-(SP) ,-(SP)

MOVB
MOV
MOV
CMP

177310

S.ROWS ROUTINE DECLARATIONS

R1,$SAVES

S.ROWS: JSR

000000G

000002

WU
Pl o

106

THIS TEST TO SEE [F THE LAST SET OF

000001

—d D d o d o e e D d D
[N
Y
g— a———— —— N

SEO 0139

end;

000711°
000001 000002
000024

elelfelolelolololelololalolols
(o]

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (38)

ggPIED.REM.TBL*1(R3).COPIED.REM.TBL*S(RO) :
COPIED.REM,TBL+1(R3),6(SP)
7(SP)

gt\g

R1,RS

MOV

R1.,RS

INC

MOV

4 (SP)

6(SP) 2(SP)

; *,CUR.MOST
; CUR.MOST

3594

3591

: CUR.SUM,PRE.SUM

3601

: CUR.SUM,PRE.SUM

36
360

; CUR.SUM

;s DIF

: CUR.MOST,PRE.MOST

3595

K 11

BSKELG

REV A PAT(H 00
011164
011170

011172
011174
011176
011200
011202
011204
011206
12

011216
011222
011224
011226

012701
005202

012676

010576
012600
005726
000207

; Routine Size:

21-Apr=1981 08:19:06

ROUTINE DECLARATIONS
3%:

000001

5%:

020204

003744
005726
020105
003403
010105
016616

21-Apr=1981 08:40:22

6%:

000004

7%:

000026

000024

#1,R1
R2

R2.R&
1%

+
(SP)

R1,RS
4(SP), (SP)

. SUM
CUR.SUM,PRE

ST
,PRE .MOST
CUR.MO

RS,@24 (SP)

S?E.SUM.SUM.MOST

(SP)+,a26(SP)
+
(SP)

10 words

X
INDE
*
INDEX,

CUR.SUM,PRE .SUM

65 words

*,CUR.SUM

R1,RS

(SP)+,RO

: Maximum stack depth per 1nvocation:

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1

F
TEN
PRE .MOST ,MOST.O
"

Page 107

SEQ 0140

3608
3588
3585
3620

3623
3624
3627
3628
3561
3560

BSKEL&
REV A PATCH 00

L N
21=Apr=1981

21=-Apr=19 81

ROUTINE DECLARATIONS

8:40:22

8:19:06

T0PS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (39

routine S_REM_TBL (BAD_CHIP, ALL_BAD) =
O U

begin

T TR TR T O

FUNCTIONAL DESCRIPTION: SEARCH THE REMAINDER TABLE
THE REMAINDER TABLE IS LOADED WITH ALL THE
REMAINING SINGLE CELL FAILURES SCATTERED

R I E T ETR

BLASTING SELECTION.

THROUGH OUT THE CHIP.

THESE SCATTERED REMAINING ROW COLUMN PAIRS
ARE THEN TRANSFERED INTO THE REMAINDER TABLE
WERE THEY ARE INTERIGATED FOR THE BEST POSSIBLE

R TR NR R

THIS ROUTINE SEARCHES THE REMAINDER TABLE OF
THE REMAINING ROW COLUMN PAIRS AND DETERMINES
THE BEST POSSIBLE CHOICE FOR BLASTING.

FORMAL PARAME TERS:
BAD_CHIP:

T T T I

R O O

ALL_BAD:

POINTS THE THE FAILING CHIP PRESENTLY
BEING PM'ED.

COUNTS HOW MANY ALL BAD ROW AND COLUMNS
IF THIS COUNT
HAVE BEEN FOUND THUS FAR.
EXCEEDS A COUNT OF 10 FOR ANY ONE CHIP
THEN THAT CHIP IS CALLED A ALL BAD AND
IF
A CONDITION A MESSAGE IS PRINTED.
TWO ALL BAD CHIPS ARE DISCOVERED IN THE
THE SAME BANK THEN A CONDITION B MESSAGE
IS PRINTED AND FURTHER TESTING OF THIS

L R TR TR IR A TR A E PRTR PR N B PLI

ARRAY IS ABORTED.

local

LST_REM_ENTRY,

DIFTcOLS.

DIF ROWS,
ROW_MOST_OF TEN

COL_MOST_OF TEN,

ROW_SUM,

'SUM OF THE MOST OFTEN FOUND COLUMN IN REMAINDER TABLE

COL_SuMm;

I_REM_TBL

();

LST_REM_ENTRY
LST_REM_ENTRY

'POINTS TO LAS ENTRY INTO REMAINDER TABLE
'DIFFERENT NO. OF COLS IN REMAINDER TABLE
'DIFFERNET NO. OF ROWS IN REMAINDER TABLE
'MOST OF TEN FOUND ROW IN REMAINDER TABLE
'MOST OFTEN FOUND COLUMN IN REMAINDER TABLE
'SUM OF THE MOST OFTEN FOUND ROW IN REMAINDER TABLE

4 ERC;

'INIT THE REMAINDER AND COPIED REM TABLES
'LSAT REM ENTRY STARTS AT ZERO

L T0 "REM_TBL (.LST_REM_ENTRY);

while .LST_REM_ENTRY gtr ZERO do
begin
ALL_BAD = .ALL_BAD + 1;

'XFER COLUMN COUNT BABLE TO REMAINDER AND (OPIED TABLES

'SEARCH THE REMAINDER AND COPIED TABLE UNTIL EMPTY

' INCREMENT THE ALL BAD ROW / COLUMN COUNT

108

SE098141

MmN

BSKEL&

REV A PATCH 00

ROUTINE DECLARATIONS

3683

®
.
-

.
.

then

3687
3688
3689

.
.

.
-

.
.

4
-

.
.

.
-

4
.

.
-

.
.

L4
.

.
.

.
-

L4
.

.
.

.
-

i
.

.
.

#
.

.
-

L4
.

.
-

L4
-

.
.

3690
3691
3692
3693
3694
3695
3696
3697
3698
3699
3700
3701
3702
3703
3704
3705
3706
3707
3708
3709
3710
3711
3712
3713
3714
3715
3716
3717

eLse

begin

OF COL_SUM, .LST_REM_ENTRY).
DIF_COLS = S_COLUMNS (COL_MOST_TEN,
"FIND"THE COLUMNS DIFFERENT, MOST LFTEN AND SUM
OF ROW_SUM, .LST_REM_ENTRY)
DIF_ROWS = S_ROWS (ROW_MOST_TEN,
'"FIND THE ROWS DIFFERENT, MOST FOTEN AND SUM

then

begin

TMP_BLST_TBL [.ALL_BAD, R_CJ = SET_FLG:; !INDICATE THIS IS A BAD ROW
'LOAD THE FAILING ROW NO.
TMP_BLST_TBL [.ALL_BAD, R_C_NO] = .ROW_MOST_OF TEN;

TMP_BLST_TBL [.ALL_BAD, NIB_NO] = .BAD_CHIP74; 'LOAD THE FAILING NIBBLE POSITION
ROW_PURGE (.ROW_MOST_OF TEN,~.ROW_SUM, .LST_REM_ENTRY); !PURGE THIS ROW FROM TABLE
'REALIGN THE POINTER
LSL-REM_ENTRY =~ ,LST_REM_ENTRY =" .ROW_SUM;
else

begin

TMP_BLST_TBL [.ALL_BAD, R_CJ = CLR_FLG; !INDICATE THIS IS A BAD COLUMS
'LOAD THE FAILING COLUMN NO.
TMP_BLST_TBL [.ALL_BAD, R_C_NO] = .COL_MOST_OF TEN;
FAILING NIBBLE POSITION
THE
TMP BLST_TBL [.ALL_BAD, NIBCNO] = .BAD_(HIP74; !LOAD

COL_PURGE (.COL_MOST_OFTEN,”.COL_SUM, [ST_REM_ENTRY);

LSL_REM_ENTRY =" LST_REM_ENTRY =".COL_SUM;

'PURGE COLUMN FORM TALBE

'REALIGN POINTER

ena,

end;

'RETURN THE NUMBER OF ALL BAD ROWS/COLUMNS FOUND

regurn LALL_BAD;

eng,

.SBTTL

S.REM.TBL ROUTINE DECLARATIONS

JSR

R1,$SAVES

PC,]1.REM.TBL

S.REM.TBL:

000000G

011234
011240

000012

173230

JSR

011250
011254
011260

175644

JSR

011264
011266
011272
011276
011302

'ARE DIFFERENT ROWS < DIFFERENT COLUMNS

i; .DIF_ROWS leq .DIF_COLS

011230

011244
011246

Page 109
SEQ 0142

'EXIT AND RETURN THE COUNT OF ALL BAD ROW/(COL

return .ALL_BAD

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (39)

'IS THE ALL BAD COUNT > 9

i; .ALL_BAD gtr 9

3684
3685
3686

21=-Apr=1981 08:40:22
21-Apr=1981 08:19:06

000002

000002
d
000032
000032
000011

SuB

CLR
CLR

1%:

#12,SP

(SP)
-(SP)

PC.X.TO.REM. TBL

MOV

RO,2(SP)

CMP

R3,4#11

gog
L
INC
MOV
BLE

%gsp),nz
32(SP)
32(SP) ,R3
2%

: LST.REM_ENTRY
:
: =, LST.REM.ENTRY

: LST.REM.ENTRY,*
: ALL.BAD
; ALL.BAD,*

3631

3675

367
3677
‘

3680
3682
3684

BSKEL4
REV A PATCH 00

011304
011306
011310

005726
010300
000540

011316

060616

011312

011320

012746

000014

012746

000014

011324

060616

011330

004767

011326

011334
011336

011342

011344

010246

R2,=(SP)

MOV
MOV

RO,R1
46(SP) , (SP)

010001
016616

C04767

006303
062703

011410

052713

011420
011422
011424
011426
011430

006305
006305
006305
006305
042705

011440
011442
011446
011452

050513
042700
142713
150013

003035

JSR

042713

170017
007760

000022
000022

011472 166666
011500 (€004 36

000026

011506

000026

011466

004767

176402

011502

042713

011512
011514
011516
011520
011522
011526

006305
006305
006305
006305
042705
042713

170017
007760

011534

042700

177760

100000

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (39)

;

3686

COL.MOST.OF
TEN, *

COL.SUM,
+

3689

; *,DIF.COLS
.
:

Page 110
SEQ 0143

3691

ROW.MOST.OF
TEN, *

: ROW.SUM,
*

3699

3697

R1,R4

: DIF .ROWS,DIF.COLS

3694

BIS

#100000, (R3)

3697

ASL
ASL
ASL
ASL
BIC

RS
RS
RS
RS
#170017,RS

BIS
BIC
BICB
BISB

RS, (R3)
#177760,R0
#17.(R3)
RO, (R3)

ASL
ADD

R3
#TMP.BLST.TBL
,R3

MOV

BIC

MOV
MOV
MOV
JSR

PC.S.ROWS

#4,-(SP)

(MP

000024

SP, (SP)

MOV

BGT

177760
000017

SP, (SP)

08:40:22
08:19:06

: «,DIF .ROWS
: BAD.CHIP,*

JSR

100000

000022

050513

ADD

026744"

016605

ADD

0000006

016646
016646
010246

011532

PC.S.COLUMNS

MOV

010246

020104

011454
011460
C 1464

RO,R4
#14, (SP)

JSR

SP, (SP)

#14,-(SP)

011404

011434

R2,=(SP)

MOV

012746

011414

MOV

000014

000046
000004

011406

#14,=(SP)

012746

060616

177446

011376
011400

MOV

SP, (SP)

000014

004767

011372

#14,-(SP)

ADD

MOV
MOV

011354

011366

(SP)+
R3,R0
6%

MOV
ADD

177270

060616

011360
011362

2%:

ST
MOV
BR

010004
012716

011350

011352

21-Apr=1981
21-Apr=1981

ROUTINE DECLARATIONS

SUB
BR
BIC

MOV

PC.BLSDIV

3¢

22(SP) .RS

3698

#7760, (R3)

;

3699

22(SP) ,=(SP)
22(SP) .=(SP)
R2,-(SP)

: ROW.MOST.OF TEN, *
: ROW.SUM,

3700

26 (SP) .24 (SP)
4%
#100000, (R3)
26(SP) ,RS

; ROW.SUM,LST.REM.ENTRY
:
:
: COL.MOST.OFTEN, *

3701
3694
3705
3706

;

37072

PC . ROW. PURGE

ASL
ASL
ASL
ASL
BIC
BIC

RS
RS
RS
RS
#170017,RS
#7760, (R3)

BIC

#177760,R0

BIS

: ROW.MOST.OF TEN, *

RS, (R3)

BSKELSG

REV A PATCH 00

- 011540
| 011544
011546
-

011552
011556

142713
150013
016646

016646
012746

ROUTINE DECLARAT]IONS

000026
000026
000024
176120

000207

; Routine Size:

#17,(R3)
RO, (R3)

00007

000032
000022

011616

B 12
21-Apr-1981 0 8:40:22
21=-Apr=1981 0 8:19:06

26(SP) ,=(SP)
26(SP) ,=(SP)

(OL .MOST.O“TEN,*
COL.SUM,=

SP, (SP)

LST.REM.ENTRY,*

32(SP) ,24(SP)
q€2.SP

COL.SUM,LST.REM.ENTRY

#24 ,=(SP)

PC,COL
. PURGE

000024

A
¥

5%:

000030
000012
124 words

6%:
y

; Maximum stack depth per invocaticon:

21 words

TOPS=-20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (39)

+
(SP)

30(SP) ,RO
#12,SP

ALL.BAD,*

55098164

3708

3709

3631

C 12

BSKEL&

REV A PATCH 00
3718
3719
3720

21-Apr-1981 08:40:22
21-Apr=1981 08:19:06

ROUTINE DECLARATIONS

TOPS-20 Bliss=16 V2(212)

PA:<NEALE>PMSKL4.BLI.

(40)

routine S_COL_CNT_TBL (BAD_CHIP, ALL_BAD) =
begin~
I

FUNCTIONAL DESCRIPTION: SEARCH THE COLUMN COUNT TABLE

I
I

THE COLUMN COUNT TABLE STORES A COUNT OF
ADJACENT FAILING COLUMNS WHEN THE ERROR
MAP IS SEARCHED FOR BAD ROWS.

l
I
l

THIS ROUTINE SEARCHES THE COLUMN COUNT
TABLE FOR COLUMN COUNTS FOR COLUMNS
COUNTS GREATER THAN 10. IF A COUNT OF
GREATER THAN 10 IS FOUND THEN THIS IS
CALLED A ALL BAD COLUMN AND THE TEMP
BLAST TABLE IS LOADED WITH THIS COLUMN
NUMBER. THE COLUMN COUNT TABLE AT THIS
ALL BAD COLUMN NUMBER IS CLEARED.

I
l

l
I
I
I
I

I
I

FORMAL PARAMETERS:
BAD_CHIP:

POINTS A FAILING CHIP WHICH IS PRESENTLY BEING

ALL_BAD:

;

3744

PM'ED.

KEEPS COUNT OF HOW MANY ALL BAD ROW AND OR COLUMNS
IF THIS COUNT COUNT
ARE FOUND FOR THIS CHIP.
EXCEEDS 10 THEN THIS CHIP IS CALLED A ALL BAD
CHIP.

l
I

incr COL_NUM from 0 to .MAX_CHIP_COL - 1 do
begin

'1S THIS LOCATIONS COUNT > 10

if .COL_CNT_TBL [.COL_NUM] gtr 10
then

begin

ALL_BAD =

' INCREMENT THE ALL BAD ROW/COL COUNT

LALL_BAD + 1;

'IS THE ALL BAD COUNT > 9

it .ALL_BAD gtr 9

then

else

'"EXIT AND RETURN ALL BAD COUNT

return .ALL_BAD

'SEARCH THRU THE COLUMN TABLE

CLR_FLG; !'INDICATE THAT THIS IS A BAD COLUYN
'LOAD THE BAD COLUMN NUMBER
COL _NUM;
TMP“BLST_TBL [.ALL_BAD, R_C NOJ)
'LOAD THE FAILING NIBBLE POSITION
BAD CHIP/4;
TMP_BLST_TBL [.ALL_BAD, NIB” NOJ
TABLE OF THIS BAD COLUMN
THE
'CLEAR
= ZEROES;
COLCNT_TBL [.CoL_Numl
end;

end;

_BLST_TBL [.ALL_BAD, R_C ]

Page

112

55095145

REV A PATCH 00
3770
377
3772
3773

011620

011624
011626

011630

011636
11640
011644
011650
011654

011656
011660
011662

004167

ROUTINE DECLARATIONS

126227
101446
005266
016601
020127
003402

011664
011670
011674
011676

011700
011702
011704
011706
011712
011716
011720
011724
011730
011734
011740
011744
011746
011752

011754
011756

011762
011764
011770
; Routine Size:

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL&4.BLI.1 (40)

end;

113

55098146

‘e

'EXIT AND RETURN THE NUMBER OF ALL BAD ROWS/COLS

return .ALL_BAD;

end;

.SBTTL

S.COL.CNT.TBL ROUTINE DECLARATIONS

JSR

R1,$SAVE?2

S.COL.CNT.TBL:

0000006

CLR

005002

000453

8:40:
0:22
08:1 9:06

—
S

BSKEL&

D 12
21=-Apr=1981
21-Apr-1981

1%:

000000' 000012

CMPB

BLOS

INC
MOV

000010
000010
000011

026744"
100000

000012
000004
000000G

R2.RO

; COL.NUM,=

3763

: BAD.CHIP,*

3764

COL.CNT.TBL(R2)

; *(COL .NUM)

INC
CMP

R2
R2,MAX.CHIP.COL

; COL.NUM
; COL.NUM,»

3765
3761
3749

MOV

10(SP) ,RO

; ALL.BAD,*

3719

ASL
ASL
ASL

RO
RO
RO

CLRB

53 words

BICB
BISB
CMP

BLT

RTS

invocation:

5 words

#TMP .BLST.TBL,R1
#100000, (R1)

000000"*

: Maximum stack depth per

3755
3757

ADD
BIC

BIC

000010

; ALL.BAD
; ALL.BAD,*

3762

177760

036774"

10(SP)
10(SP) ,R1

JSR

3%:
4%:

3752

RTS

MOV

000017

,=
s *(COL.NUM)

ASL

BIC
BIC
BIS
MOV

007760

COL.CNT.TBL(R2) ,#12

R1,#11
2%
R1,RO

170017

3718
3749

BLE
MOV

CMP

2%:

; COL.NUM

3759

#170017,R0
#7760, (R1)
RO, (R1)
12(SP) ,~(SP)
#4 ,=(SP)

PC.BLSDIV

#177760,R0O

#17,(R1)
RO, (R1)

(SP)+,(SP)+

3718

BSKELS
REV A PATC(H 00

3774
3775
3776
3777
3778
3779
3780
3781
3782
3783

.
.

El
.

.
.

o
.

L]
B

3784

3785
3786
3787
3788
3789
3790
3791
3792

.
o

.
.

.
-

.
.

.
.
.

.
-

3796
3797
3798
3799
3800
3801
3802
3803
3804
3805
3806
3807
3808
3809
3810
3811
3812

.
.

2
-

.
-

L4
-

.
.

L4
.

.
.

.
-

.
.

I3
-

.
.

.
-

o
-

.
.

e
.

L4
-

4
.

L4
.

.
.

.
-

.
B

.
k3

3813
3814
3815

21-Apr-1981 08:19 2 06

ROUTINE DECLARATIONS

T0PS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.T (41)

Page 114

SEQ 0147

routine S_ERROR_MAP (BAD_CHIP) =
begin

i +*4

FUNCTIONAL DESCRIPTION :

SEARCH THE ERROR MAP

THE ERROR MAP IS LOADED WITH ALL THE
FAILING ROW NUMBERS AT THIER FAILING

;

SECTOR NUMBERS.

THIS ROUTINE SEARCHES THE ERROR MAP FOR

}

OCCURANCES OF BAD ROWS.

WHEN A BAD ROW IS FOUND A BAD ROW COUNT
IS INCREMENTED AND A BAD COLUMN COUNT
AT THE ADJACENT FAILING COLUMN IS ALSO

INCREMENTED.

;

IF THE ROW COUNT EXCEEDS 10 THEN THIS IS
CALLED A ALL BAD ROW AND THE ROW NUMBER IS
LOADED INTO THE TEMP BLAST TABLE. THE ADJACENT
FAILING COLUMN COUNTS IS DECREMENTED BY ONE

3793
3794
3795

E 12
21=-Apr=1981 08:40: 22

IF AFTER SEARCHING THE ERROR MAP THE BAD ROW
DOES NOT EXCEED 10 THEN THE PROGRAM GOES ON TO
THE NEXT ROW AND THE FAILING COLUMN COUNT ARE
LEFT ALONE.

FORMAL PARAMETERS:
BAD_CHIP:

POINTS TO A FAILING CHIP PRESENTLY BEING
PM'ED.

Label

'LEAVE LOOP LABEL

local

WRD_INDEX,

'STORES THE ERROR MAP WORD WHERE THIS ROW RESIDES

ROW_CNT,

'POINTER INTO TO THE COLUMN POINTER TABLE

BIT_INDEX,
PTR,

COL _INDEX,

QD_PAIR_LOOP,
QD_NUM_SEARCH,
QD_OFFSET,

START SEC,
EnD_SEC,
ALL”BAD;

ALL BAD = =1
1_COL_CNT_TBL O);

ISTORES THE BIT IN THE ERROR MAP WORD WHERE THIS BIT RESIDES
'COUNT OF HOW MANY BAD ROW FOUND

ISTORES THE CALCULATED ADJACENT FAILING COLUMN NUMBER
ISELECTS HOW MANY QUADRANTS TO TEST
'SELECTS HOW MANY QUADRANTS TO TEST

IOFF SET USE IN CALCULATING WHICH QUADRANT TO TEST

'STARTING SECTOR VARIABLE
'ENDING SECTOR VARIABLE
ISTORES HCW MANY ALL BAD CHIPS ARE FOUND

ISTART ALL BAD AT =1 THIS VALUE GETS RETURNED
"INIT THE COLUMN COUNT TABLE

8SKE
REV A PATCH 00

TOPS=20 Bliss=16 v2<212>
(&41)
PA:<NEALE>PMSKL4.BLI.T1

ROUTINE DECLARATIONS

!IS THIS A 16K CHIP

it JBNK_NUM_SEC eql 127

then

begin

116K CHIPS ONLY HAVE ONE QUADRANT TO TEST

= 0;
GQD_PAIR_LOOP

else

QD-NUM_SEARCH =
end

(¢

begin

164K CHIPS HAVE FOUR QUADRANTS TO TEST

QD_PAIR_LOOP = 1;

GD_NUM_SEARCH

end,

QD_OFFSET = =2;

'START THE OFFSET OFF AT =2

incr QD_LOOP from 0 to .QD_PAIR_LOOP do

'LOOP ON TWO QUADRANT PAIRS

begin

QD_OFFSET =

'UP THE OFFSET BY TWO

.QD_OFFSET + 2;

incr ROW_NUM from 0 to 127 do
begin
_INDEX

ROW_NUM/16;

ROU NUM mod 16;

BIT_INDEX

'SEARCH ALL WORDS IN THIS SECTOR

'CALCULATE WHICH WORD THIS ROW IS IN
'CALCULATE WHICH BIT IN WORD THIS ROW IS IN

begin
incr QD_SEARCH from 0 +

.QD_OFFSET to .QD_NUM_SEAR(CH + .QD_CFFSET do

btegin
case

.QD_SEARCH from 0 to 3 of

SEARTH BOTH QUADRANTSTMIN THIS PAIR
'WHICH QUADRANT ARE WE IN

set

[0l

'WE ARE IN THE FIRST QUADRANT OR JUST A 16K PART

:
begin

ROW_CNT
= ZERO;

PTR = =1;
1_COL_PTR ¢

begin

START _SEC = 256;

I T T
I
(TR
TR TR

'WE ARE [N QUADRANT 1

£1) @

R I

STARTTMSEC
= 0;
END_SEC = 127;
end;

'ROW STARTS AT O FOR THE FIRST QUAD SEARCH
'THE POINTER STARTS AT -1
'INIT THE COLUMN POINTER TABLE
'QUAD O SECTORS START AT 0
'QUAD O END SECTOR ENDS AT 127

END_SEC = 383;
end;

[2]

:
begin

ROW_ CNY

'QUAD 1 SECTORS START AT 256
'QUAD 1 SECTORS END AT 383

'WE ARE [N QUADRANT 2
= ZERO;

PTRTM= =1;

'START THE ROW COUNT AT ZERQ
'RESET

THE POINTER

Page 115

SEQ 0148

- BSKEL4
. REV A PATCH 00 ROUTINE DECLARATIONS
3878
3879
3880
3882

3883
3884
3885

3886
3887

3385
3890

ggg;

3893

3894

3895

gggg

3898

3899

3900

3901

3903

incr SEC_NUM from .START_SEC to .END_SEC do
begin

3911

begin

it .ROW_CNT gtr 9

then

'IS THERE > THEN 10 BAD ROWS

begin

ALL_BAD = .ALL_BAD + 1;

if LALL_BAD gtr 9

'UP THE ALL BAD COUNT

'IS THERE > 10 ALL BAD ROWS/COLUMNS

return .ALL_BAD !EXIT AND RETURN THE THE COUNT

begin

TMP_BLST_TBL [.ALL_BAD, R_C] = SET_FLG; !THIS IS A BAD ROW
'FIND WHICH ROW NUMBER THIS IS.
selectone .SEC_NUM of
set

3913

[0 to 127, 256 to 383] :

3916
3917

[128 to 255, 384 to 511] :
TMP_BLST_TBL [.ALL_BAD, R_C_NO]

TMP_BLST_TBL [.ALL_BAD, R_C_NOJ

3914

3918

3920
3922
3923
3925

3926

3928

3929

!IS THIS ROW BIT SET

ROW_CNT = .ROW_CNT + 1; !UP THE BAD ROW COUNT

3906

3910

'SEARCH THRU ALL SECTORS FOR THIS QUAD

it .ERROR_MAP [.SEC_NUM, .WRD_INDEX, .BIT_INDEX, ONE, ZERO] eql 1

else

3908

'QUAD 3 SECTORS END AT 517

end;

3904

3907

'QUAD 3 SECTORS START AT 384

?84:

END_SEC = 511;

then

Page 116
SEQ 0149

'WE ARE IN QUAD 3

L33 ¢
begin
START _SEC

then

3905

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (41)

"INIT THE COLUMN POINTER TABLE
'QUAD 2 SECTORS START AT 128
'QUAD 2 SECTORS END AT 255

I_COL_PTR O);
STARTZSEC = 128;
END_SEC = 255:
end;

3881

G 12

21=-Apr=1981 08:40:22
21=-Apr=1981 08:19:06

tes;

.ROW_NUM;

.ROW_NUM + 128;

TMP_BLST_TBL [.ALL_BAD, NIB_NO] = .BAD_CHIP/4; 'FIND WHICH NIBBLE ITS IN
!DECREMENT THE COLUMN COUNTS
incr index from 0 to .PTR do
COL_CNT_TBL [.COL_PTR [.index]] = .COL_CNT_TBL [.COL_PTR [.index1] = 1;
it .QD_PAIR_LOOP eql 0

then

!'CLEAR THE QUAD OF THIS ROWwW

incr CLR SEC ROW from O to 127 do

ERROR_MAP [.CLR_SEC_ROW, .WRD_INDEX, .BIT_INDEX, ONE, ZERQ] = CLR_FLG

H 12

21=-Apr=1981 08:19:06

ROUTINE DECLARATIONS

3930
3931
3932
3933
3934
3935
3936
3937
3938
3939

PA:<NEALE>PMSKL4.BLI. 1

Page 117

SEQ 0150

(&1

else

.QD_SEARCH leq 1

then

begin

incr CLR_SEC_ROW from 0 to 127 do

ERROR_MAP [.CLR_SEC_ROW, .WRD_INDEX, .BIT_INDEX, ONE, ZERO]
CLR_FLG;

3940
3941
3942

incr CLR_SEC_ROW from 256 to 383 do
ERROR_MAP [.CLR_SEC_ROW, .WRD_INDEX, .BIT_INDEX, ONE, ZERO]
CLR_FLG:

3943
3944
3945

else

3946
3947
3948
3949
3950

end

begin

incr CLR_SEC_ROW from 128 to 255 do
ERROR_MAP [.CLR_SEC_ROW, .WRD_INDEX, .BIT_INDEX, ONE, ZERO]
CLR_FLG;

3951
3952
3953
3954
3955
3656
3957
3958
3959

incr CLR_SEC_ROW from 384 to 511 do

ERROR_MAP [.CLR_SEC_ROW, .WRD_INDEX, .BIT_INDEX, ONE, ZERO]
CLR_FLG:

end;

legve A;

'LEAVE THE LOOP AND DO THE NEXT ROW NUMBER

end;

end

begin

selectone .SEC_NUM of

' INCREMENT THE ADJACENT CCLUMN COUNT TABLE

set

(0 to 127] :
begin

COL_INDEX = .ROW_NUM + _SEC_NUM;

if .COL_INDEX geq 128 then COL_INDEX = .COL_INDEX = 128;
end;

[128 to 255] :

else

begin

TR T ETE LA TETE TR T

TR R

R TRR

E T E

A PR PR U
LR N PR T L O

REV A PATCH 00

T0PS=20 Bliss=16 v2(212)

it .COL_INDEX geq 128 then (OL_INDEX = ,COL_INDEX = 128;

COL_INDEX = .ROW_NUM + (,SEC_NUM = 128);

BSKEL4

21=Apr=1981 08:40:22

BSKELG

REV A PAT(H 00

I 12
21-Apr=1981 08:40:22

21=-Apr=1981 08:19:06

ROUTINE DECLARATIONS

2982
2983
3984
3985
3586
3687
2688
3989
3990
3991
3992
3993
3994
3965

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1 (41)

Page 118

SEQ 0151

end;

(256 to 383] :
begin

COL_INDEX = .ROW_NUM + (.SEC_NUM = 128);
it .COL_INDEX geq 256 then (OL_INDEX = .COL_INDEX = 128;

end;

[384 to 511]
begin

COL_INDEX = .ROW_NUM + (.SEC_NUM = 256);

3996

it .COL_INDEX geq 256 then COL_INDEX = .COL_INDEX = 128;

3997
3998
3999

end;

4000
4001
4002
4003
4004
4005
4006
4007

tes,;

_ CNT_TBL [.COL_INDEX] = .COL_CNT_TBL
(oL
PTR = PIR + 1;
_PTR [.PTR] = ,COL_INDEX;
(oL
end;

[.COL_INDEX] + 1;

end,;

end;
end;

end;

return .ALL_BAD;

end;

011772

0000006

011776
012002
012010
012014
012022
012024
012030
012034
012036

000032

177777
172440

000010

037014" 000177

S.ERROR.MAP ROUTINE DECLARATIONS

JSR
SuUB
mMCv
JSR

R1,$SAVES
#32,SP
#-1,10(SP)
PC,1.COL.CNT,TBL

BNE

CLR

000022
000030
000001

.SBTTL

S.ERROR. MAP:

(LR

000022

1%:

MOV

22(SP)

3774

; “,ALL.BAD

3824
3825

; QD.PA]IR.LOOP

gg(sp)

* QD.NUM.SEARCH

#1,22(SP)

* »,0D.PAIR.LOOP

3827
3830
3831

3827
3835

000020
000016

2%:

#1,30(SP)
#-2,20(SP)

3%:

#2,20(SP)

000016
4%:

30(SP) ,16(SP)
20(SP) ,16(SP)

R3
R3,-(SP)
#20,-(SP)
PC,BLSDIV
RO, 12(SP)
R3, (SP)
#20,-(SP)

PC ,BL$MOD

RO,12(SP)

000006
299

012200

000032

6%:

177777
172302
000022

000010

000177

000020

000400
000577

000022
000020

000032
177777
172232
000200

000377
000600

000777
000022
001150

012352
012356

26 (SP)
43%

000014

000010

7%:

9%:

000022
000020
000022
000020

10%:
11%:

QD.LOOP

Page 119

SEQ 0152

3836
3839
3841

*,QD.OFFSET

3843
3842

ROW.NUM
ROW.NUM,
*

3845
3847

QD .NUM. SEARCH, *
QD.OFFSET,*

INDEX
. RD
* ,W

ROW.NUM,*

* BIT.INDEX

3848

26(SP) ,6(SP)

QD.OFFSET,QD.SEARCH

3852

6(SP) ,RS

QD.SEARCH,
*

3856

ROW. CNT

3861
3862

6(SP)
40%
RS

QD.SEARCH

6% (RS) ,PC
7$-6%

8%-6%

9%-6%
108-6%
32(SP)
#-1,10(SP)
PC,]1.COL.PTR

22(SP)

8%:

; *,QD.NUM, SEARCH
*,QD.OFFSET

000030
000020

000001
177776
000026

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (41)

21-Apr=1981 08:19: 06

e
e
e
e
e

012766
012766
005066
000167
062766

J 12
21=-Apr=1981 08:40: 22

ROUT INE DECLARATJONS

bru‘f\)f\).&
NONOONS
N

012052

012044

REV A PATCH 00

roroRONRONroroNY

K L4
BSKE

#177,20(SP)
11%
#400,22(SP)
#577,20(SP)
11%

32(SP)

#-1,10(SP)
PC,I.COL.PTR
#200,22(SP)
#377,20(SP)
11%
#600,22(SP)
#777,20(SP)
sg(SP),RS

12%:
13%:
R

14(SP) ,RO

*,PTR

START.SEC
* END.SEC
* START.SEC
* END.SEC
ROW. CNT
«,PTR

3863

3865
3856
3870

3856
3876

* END.SEC
START,.SEC,SEC.NUM

3878
3879
3880
3856
3885
3886
3890

+
SEC.NUM,

3893

* START.SEC
* END.SEC

* ,START.SEC

SEC.NUM

*
WRD . INDEX,

BSKEL4
REV A PATCH 00

012360
012364
012366
012372

062700
010046
016646
012746

K 12
21-Apr=1981 08:40:22
21-Apr=1981 08:19:06

ROUTINE DECLARATIONS

RO,=(SP)
14 (SP) ,~(SP)
#1,-(SP)
=(SP)

000014
000001

#10,SP
RO
12%

32.SP)
32(SP) ,#1

000011

000654

000006
001126
000016

000011

14%

14%:

15%:

026744"

; BIT.INDEX,*

33%

16(SP)

16(SP) ,#11
15%

#6,SP
4 43
16(SP) ,R4

: ROW.CNT

3896

; ALL.BAD
; ALL.BAD,*

3901
3903

3905

: ALL.BAD,*

3908

; SEC.NUM

3910

: ROW.CNT,»

z;OOOOO.(RA)

000177

RS,#177

: SEC.NUM,*

RS ,#400
18%
RS,4577
18%
R3,R2
21%
R5,#200
19%
RS ,#377
20%
RS ,#600
22%
35,3777

; SEC.NUM,»

16%

16%:

000577
17%:

000200

18%:

000377
000600

19%:

000777
000200

3898

R4
R4
#TMP.BLST.TBL

100000

000400

Page 120
SEQ 0153

PC,BL$GT?

000000G
000010

000016
000016

‘

#ERROR .MAP RO

006626"

000032
000032

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (41)

17%

20%:

;

SEC.NUM,*

: ROW.NUM,*

3914

; SEC.NUM,*

3910

;

SEC.NUM,+

: SEC.NUM,*
:

SEC.NUM,*

: ROW.NUM,»

3917

; BAD.CHIP,*

3920

21%:
R

170017

007760
012614
012620

012746
004767

000056
000004
0000006

22%:

#170017 ,R2
#7760, (R4)»
R2, (R&4)
56(SP) ,=(SP)
#4,-(SP)
PC.BLSDIV

|
-

BSKEL&
REV A PATCH 00
012624

012630
012634
012636

042700
162714
150014

L 12
21-Apr-1981 08:40:22
21=Apr=1981 08:19:06

ROUTINE DECLARATIONS
BIC

177760

000017

23%:

001220"

T0PS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1 (&1)

121

#177760,R0

#17,(R4)
RO, (R&)
R2

24%

,R4
COL.PTR(R2)

; INDEX
,*
*(INDEX)

;

3922

3923

ggL.CNT.TBL(Ré),RO

000000"*

BL
(R4)
RO,COL.CNT.T

000000"

24%:

000014
000034

25%:

R2
R2,14(SP)

s INDEX

3922

34 (SP)
26%

; QD.PAIR.LOOP

3925

; CLR.SEC.ROW

3928
3929

23$

R4
R4 ,RO
RO
RO
RO

; INDEX,PTR

; CLR.SEC.ROW,*

sO(SP),RO
0

; WRD.INDEX,*

20(SP) ,=(SP)

; BIT.INDEX,*

000177

R4 2177

; CLR.SEC.ROW
; CLR.SEC.ROW,*

000012

32%
12(SP) .41
29%

000020

#ERROR .MAP ,RO
RO,=(SP)

006626
000020
000001

#1,-(SP)
-(SP)
PC,BL$PU2
#10,SP
R4

000000G
000010

25%

000001

26%:
27%:

000020

55098154

3928

; QD.SEARCH,*

3925
3933

; CLR.SEC.ROW
; CLR.SEC.ROW,*

3937
3938

20(SP) ,RO

; WRD.INDEX,*

20(SP) ,=(SP)

; BIT.INDEX,*

R4 ,RO
RO
RO
RO

006626"

RO
#ERROR .MAP RO
RO, ~(SP)

000020
000001

#1,-(SP)

000000G
000010

#10,SP

000177

R4 2177

-($P)

PC,BLSPU2

: (LR.SEC.ROW

; CLR.SEC.ROW,*

3937

BSKEL&4
REV A PATCH 00

013052

003751
012704

M2
21-Apr-1981 Og':40:22
21-Apr=1981 0 :19:06

ROUTINE DECLARATIONS
BLE

000020
000001

MOV
MOV
ASL
ASL
ASL
ADD
ASL
ADD
MOV
MOV
MOV

000000G
000010

ADD

#10,SP
R4

000400

28%:

000020

006626"

CLR
JSR
INC

000577
29%:
30%:

000020
000001
000000G
000010

ADD

000020

006626

CLR
JSR

000377
000600

000020

006626"

000020
000001

020427

31%:

PA:<NEALE>PMSKL4.BLI.1

; *,CLR.SEC.ROW
; CLR.SEC.ROW,*

Page

122

55098155

3941
3942

20(SP) ,RO

RO
#ERROR .MAP,RO
RO,=(SP)

20(SP) ,=(SP)

#1,-(SP)
-(SP)

; BIT.INDEX,*

PC ,BL$PU2

BLE
BR

MOV
MOV
ASL
ASL
ASL
ADD
ASL
ADD
MOV
MOV
MOV

000200

013276

27%

#400,R4
R4 ,RO
RO
RO
RO

TOPS=20 Bliss=16 v2(212)

; CLR.SEC.ROW
; CLR.SEC.ROW,*
; *,CLR.SEC.ROW
; CLR.SEC.ROW,*

20(SP) ,RO

;

20(SP) ,=(SP)

; BIT.INDEX,*

RO
#ERROR .MAP RO
RO,=(SP)
#1,=-(SP)
-(SP)

PC,BL$PUZ
#10,SP

3941

3933
3949
3950

WRD.INDEX,*

; CLR.SEC.ROW
: CLR.SEC.ROW,*

3949

; *,CLR.SEC.ROW
; CLR.SEC.ROW,*

3953

ASL
ASL
ASL

#600,R4
R4 ,RO
RO
RO
RO

ASL
ADD
MOV

0
#ERROR
. MAP , RO
RO,=(SP)

INC
CMP
BLE
MOV

ADD

MOV
MOV

CLR
JSR

R4 4377
30%

sO(SP).RO

: WRD.INDEX,*

20(SP) ,=(SP)

; BIT.INDEX,*

#1,-(SP)

-($P)
PC,BLSPU2

000000G
000010

ADD

alb.sp

000777

CMP

R& #777

INC

3954

: CLR.SEC.ROW
; CLR.SEC.ROW,*

3953

BSKEL4

REV A PATCH 00

013302
| 013304

003751
022626

013310
013312
013314

005705
002411
020527
003

| 013306

N 12
21-Apr=198
21-Apr=198

ROUTINE DECLARATIONS

32%:

000517

8:40:
8:19

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.T

31%

(Sf;)*, (SP)+

SEC.NUM

000177

3971

COL.INDEX,*

3973

34%:

SEC.NUM,»

3966

SEC.NUM,«
SEC.NUM,
«

ROW.NUM,
#

*,COL.INDEX
OL
. INDEX
*,C

000200
000200
35%:

000577

3981

SEC.NUM,*

3966

SEC.NUM,*
SEC.NUM,«

. INDEX
*,COL
OL
. INDEX
*,C

000200
000400
:
6%

000777

;

3989

StL.NUM,«

3966

SEC.NUM,
=
SEC.NUM,«

*,COL. INDEX
*,COL.INDEX

COL . INDEX,*

37%:
38%:

39%:

————
—

#200,R1

X
OL
. INDE
*,C

10(SP)
10(SP) ,R4
R1,COL.PTR(R4)
RS
R5,20(SP)
40%

PTR
PTR,*

COL.CNT,.TBL(R1)

3987

COL. INDEX,
*

ROW.NUM,*

003002

3979

COL . INDEX,*

ROW.NUM,
*

0135¢c

3966

SEC.NUM,
COL . INDE X

ROW.N
COL UM,
. INDEX

000377

000600

123

SEC.NUM,
+

000200

000400

Page

SE095156

3959

33%:

000200

(41)

*(COL
. INDEX)

(OL.INDEX,*
SEC.NUM
SEC.NUM_END,
SEC

3995

3997
4«00
400
4004

3890

——

j=l=

-———

—_——

———

t———
e

BSKELS&

REV A PATCH 00

013522
013526
013532
013540
013542
013546
013552
013554
013560
013562
013566
013572
013600
13602
013606
013612
013616
:

;

000167
005266
026666
003002
000167
062706
005203
020327
003002
000167
005266
026666
003002
000167

016600
062706

000267

Routine Size:

Maximum stack

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (41)

ROUTINE DECLARATIONS
176674

000006
000006

40%:

000024

QD.SEARCH

INC

QD.SEAR(CH,*

BGT

176420
000006

4L1%:

000177
176326
000026
000026

JMP

JMP
ADD
INC

; ROW.NUM
;

BGT
42%:
43%:

000022

176262
000010
000032
459 words

44%:

depth per invocation:

28 words

JMP

INC

BGT
JMP
MOV
ADD
RTS

26(SP)
26(SP) ,22(SP)
443

10(SP) ,RO

#32,SP

ROW.NUM,»

; QD.LOOP
; QD.LOOP,QD.PAIR.LOOP
.

3846
3845

ALL.BAD,*

3841

3775
3774

p—————

BSKEL4

REV A PATCH 00

routine S_CHIP_TBL (START) =

4024
4025
4026
4027
4028
4029
4030
4031
4032

4034

i
:

w.
e

4033

4035
4036
4037
4038
4039
4040
4041
4042

4043

'+¢

125

55095158

THIS ROUTINE SEARCHES THE BAD CHIP TABLE
LOOKING FOR FAILING CHIPS. WHEN A FAILING
CHIP IS FOUND THE FAILING CHIP NUMBER IS
RETURNED. IF NO FAILING CHIP IS FOUND

i
!
'
!

THEN A =1 1S RETURNED.

;

i
!

FORMAL PARAMETERS:

STRAT:

INDICATES WHERE TO START SEARCHING
IN THE BAD CHIP TABLE

ISEARCH THRU THE CHIP TABLE

incr TBL_INDEX from .START to 38 do

if .CHIP_TBL [.TBL_INDEX, FAULT] then return .TBL_INDEX;

'EXIT AND RETURN NDEX

'EXIT AND RETURN =1 IF NO CHIP FAULTS ARE DETECTED

reéurn -1;
enda,

_SBTTL

S.CHIP.TBL ROUTINE DECLARATIONS

MOV

R1,-(SP)

S.CHIP.TBL:

MOV

026626"

2%:

000046

3$:

00207
18 words

; Maximum stack depth per

invocation:

2 words

. START,TBL.INDEX

4020

4038

MOV

RO,R1

; TBL.INDEX,*

4040

TST

CHIP.TBL(R1)

; TBL.INDEX

4038

;

4021
4020

ASL

BMI

INC

2%
R1

CMP

RO, #46

MOV

#-1,R0

RTS

BLE

177777

4(SP) ,RO

;

* TBL.INDEX

DEC

1$:

: Routine Size:

PA:<NEALE>PMSKL4.BLI.1 (42)

FUNCTIONAL DESCRIPTION: SEARCH THE BAD CHIP TABLE

000004

013644
013646
013652
013654

TOPS=20 Bliss=16 v2(212)

begin

010146

013622
013626
013630
013632
013634
013636
013642

013660
013662

21-Apr-1981 08:19:06

ROUTINE DECLARATIONS

4020
4021
4022

4023

013620

c 13
21-Apr-=1981 08:40:22

MOV

(SP)+,R1

* TBL.INDEX,*
:

D 13

21-Apr=1981 08:40:226
21-Apr-1981 08:19:0

BSKEL&
REV A PATCH 00 ROUTINE DECLARATIONS
3

4044

routine RD_OLD_PROM_DATA (ARR$BNK_SEL) : novalue =

4046
4047

4052

4045

:
3

begin

FUNCTIONAL DESCRIPTION: READ THE OLD PROM DATA INTO THE ERROR MAP
THIS ROUTINE WILL READ THE OLD PROM DATA
STORED IN PROM ON THE TESTED ARRAY INTO

3
:
3

2823 ;
4050 !
4051 !

3
:

&055
4054

!
'

4056

3
H
3

4058
4,059
4060

!==-

4062

4055

4057

4061

4063

THE ERROR MAP.

FORMAL PARAMETERS:

ARRS$BNK _SEL :

STORES THE SELECTED ARRAYS ARRAY AND BANK SELECT

NUMBERS

local

PROM_ADRS,

FINISH;

'STORES THE BUILT PROM ADDRESS

'INCR LOOP ENDING VARIABLE

ERROR_MAP : blockvector [4, 512] volatile;

IMAP THE ERROR_MAP THE SAME AS THE BLAST TABLE

2822

map

282§

it .BNK_NUM_SEC eql 127 then FINISH = 127 else FINISH = 255;

:
:

4069
4070

RD_PROM_MODE;
PROM_ADRS = ZEROES;

:
:

28;9
28;3

:
:
:
4
:
M

4064

28;}
28;2
4075

4080

3
3
3

4082
4083
4084

4081

2832

:
:

2832
4089

:
:

4091
4092

4094

4090

4093

4095

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (43)

'SELECT THE LOOPS ENDING

'ENABLE PROM READS
'CLEAR THE PROM ADDRESS

'SELECT THE ARRAY
PROM_ADRS<11, 4> = .ARR$BNK_SEL<.ARR_SEL_POS, ARRSSEL_SIZE>:
'READ PROM DATA FOR ALL FOUR BANKS ON THIS ARRAY
incrbseg_anx from 0 to 3 do
eqgin
'THE FIRST LOOP READS ROW PROM DATA
PROM_ADRS<10, 1> = ZERO;

PROM_ADRS<8, 2> = .SEL_BNK;
incrbnoq_Nun from 0 to .FINISH do
egin

PROM

_ADRS<0, 8> = .ROW_NUM;

WRT RH (MLPA, PA_REG, .PROM_ADRS);

ISELECT THE PROMS BANK POSITION
'READ OUT ALL THE PROM ROW DATA
ISELECT THE ROW ADDRESS

!'WRITE THE ADDRESS TO THE MLPA REG

'WAIT FOR PROM DATA TO CLOCK INTO MLPD
DELAY (ONE_US);
] = .ML_ADDR CMLPD, PD REG];
ERROR_MAP T.SEL_BNK, .ROW_NUM, FULL_WRD
IPUT THE PROM DATA INTO TRE ERROR MAP
end;

PROM_ADRS<10, 1> = ONE;
incr COL_NUM from 0 to .FINISH do
beg;n

PROM_ADRS<0, 8> = .COL_NUM;
WRT RH (MLPA, PA_REG, .PROM_ADRS);

DELAY (ONE _US);

ITHIS LOOP WILL READ CUT THE PROM COLUMN DATA
'READ OUT ALL THE PROM COLUMN DATA
'SELECT THE COLUMN ADDRESS
!WRITE THE ADDRESS TO THE MLPA REG

iWAIT FOR PROM DATA TO CLOCK INTO MLPD

FULL WRD] = .ML_ADDR [MLPD, PD_REG];
ERROR_MAP [.SEL_BNK, .COL_NUM + .COL_BASE, THE
ERROR MAP WITH THE PROM DATA

TLOAD

Page 126
SEQ 0159

BSKELS

REv A PATCH 00

ROUTINE DECLARATIONS

4096
4097
4098
4099
4100
410

end;

'CLEAR QUT THE PROM READ MODE

CLR _MBUS;

end;

013664

0000006

013670
013674
013702
013704
013710
013712
013716
013722
013730
013734
013740
013744
013746
013752
013754
013760
013764
013766
013772
013774
013776
014000
014002
014006
014012
014014
014016
014020
014022
014026
014032
014034
014036
014040
014042
014044

000022
037014° 000177

014046
014050

LSDLY

RD.OLD.PROM.DAT ROUTINE DECLARATIONS
SBTTL
RD.OLD.PROM,DAT:
R1,$SAVES
JSR

#22,5P

* FINISH

#177,(SP)
2$
#377,(SP)
ML .ADDR,R1

000377
036772
000024 000016
000040
036772
000024

24(R1) ,16(SP)

#40,R0
ML .ADDR,R1
RO,24 (R1)
R2
#42,=(SP)
SP, (SP)

000042

ARR.SEL .P0OS,=(SP)

037010°
000004

0000006

103777
074000
3%:

MOV

#4 ,-(SP)
=(SP)
PC,BL$GT?2
RO
RO
RO
RO
#103777 ,RO
#74000,R2
RO.R2
RS

RS R4

0176377 R4

176377
003400

#3400,R2

4044

4067

?gx"NUM.SEC,#177

000177

* FINISH

* ,ML.REG
* ,MLREG

MLREG,*

PROM.ADRS

4070
4071

ARRSBNK
. SEL , *

* ,PROM.ADRS
* ,PROM.ADRS

SEL .BNK
*
SEL.BNK,

4073
4076

* ,PROM.ADRS

* PROM,ADRS

SEL.BNK, *

4083

ROW.NUM

4078

PROM.ADRS

4080

(LRB

105000

006300
005004
000444
105002

ge 127

SEO 0160

end;

.GLOBL

005005
010504
000304
042704
042702
050402
010500
000300

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL&.BL!I.1 (43)

E 13
21=-Apr=1981 08:40:22
21=-Apr=1981 08:19:06

(%:

CLRB

BSKEL4
REV A PATCH 00

014052
014054

014060

014066
014070
014074
014100
014104
014106

014112
014114
014120
014122
14124
014126
014130
014132
014134
014136

150402

016701
016166
010203
016701
010361

012703
001411
016701
001404

005066

005301
001374
005303

ROUTINE DECLARATIONS

036772
000020
000001
0000006

000030

ROW.NUM,PROM.ADRS

(SP)
, 241)
20(R

* ,ML.REG
PROM.ADRS ,MLREG

ML . ADDR ,R1

036772"
000020 000024

R2,R3
ML . ADDR,R1
R3,20(R1)
#1,R3
1

5%:

000010

014764
014166
014172
014174
014176
014200

: $$TMP2

ML .ADDR,R1

46(R1),22(SP)

22(SP) ,ERROR.MAP(R3)
R4

R4,10(SP)
4%
#2000,R2
R3
15%
R2

9%:

036772
000020

ML .ADDR,R1
R4,20(R1)

R2,R4

#1,R4

14%

11%:

L$DLY.R1

000000G

13%
30(SP)

12%:

13%:

R1
12%
R4

14%:

R3,R4

,R4
COL .BASE

036770°
ASL

036772
000046 000016
000016 006626°
020366

000010

MOV

15%:

4082

ROW.NUM,
«

ML .ADDR,R1
20(R1),20(SP)

000030

4081

4083

036772
000020 000020

000001

Page 128

SEQ 0161

*, $$TMP1

7%:

10%:

014206
014214
014216

*, $8TMP2

$$TMP
$$TMP1

002000

014202

MLREG,
*

6£%:

036772°
000046 000022
000022 006626

014150
014156
014160

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (43)

R4 ,R2

.8%:

014142

014222
014226
014232
014234
014240
014242
014246
014250
014252
014254
014256
014260
014264
014266
014270
014274
014302
014310
014312

F 13
21=Apr-1981 8 8::40: 22
8:19:06
21=Apr=1981

* ,ML.REG

ML.REG,
*
ROW.NUM

4078

* ,PROM.ADRS

COL .NUM

4,087
4089

PROM.ADRS

4091

ROW.NUM,F INISH

COL .NUM,PROM.ADRS

* ML .REG

PROM.ADRS ,MLREG
MLREG,*

*, $$TMP2

4093

; o« ,38TMP1

$3TMP
$$TMP1

: $8TMP?2
COL .NUM, »

* ,ML.REG
ML .REG,*
COL .NUM
COL JNUM,F IN]SH

4089

RO,R&
R4

ML .ADDR,R1
46(R1),16(SP)
16(SP) ,ERROR .MAP (R4)
R3
R3,10(SP)

- 014316
- 014320
014322
| 014326
. 014330
1 014334
016342
014346
014352
014356
014362

003727
005205
020527
003633
016701

016166
016600
152700

014366
014374
014400
014404
014410
014414
014416
014422
014426
014432

; Routine Size:

;

Maximum stack

ROUTINE DECLARATIONS
BLE
INC

000003

BLE

MOV
MOV
MOV

036772"
000010 000014
000014
000040
036772°
000010
036772
000010 000012,
000012
036776"

BISB
MOV
MOV
MOV

MOV

MOV
MOV

BIC
BICB
BIS

177770

000007

MOV
MOV
ADD

036772
000010
000032

RTS

180 words

depth per

invocation:

19 words

10%
RS

RS, #3
3$
ML .ADDR,R1
10(R1) ,14(SP)
14(SP) ,RO
#40,R0
ML.ADDR,R1
RO,10(R1)
ML .ADDR,R1
10(R1) ,12(SP)
12(SP) RO

ML.DUT,RS

#177770,RS
#7.,R0

ML .ADDR,R1
RO,10(RT)
#32,SP
PC

o0
0o Co

BSKELS
REV A PATCH 00

——

G 13

21=Apr=198
21=Apr=198

TOPS--20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (4%
SEL .BNK
SEL .BNK, #

Page 129

SEQ 016¢

4073
4098

* ,ML.REG

ML .REG,MLREG

* ,MLREG

*
MLREG,
* ML .REG

ML .REG,MLREG

* ,MLREG
* ,MLREG
MLREG,*

4044

&G
BSKEL
S
REV A PAT(H 00
4102

LR TR

4103

4104
4105

4106

4107
4108

21=Apr=19

ROUTINE DECLARATIONS
routine OR_OLD_NEW_PD (BNK_NUM)
begin

I
|

RSP
Y
O
——
-

Page 130

SEQ 0163

: novalue =

ONCE THE NIBBLE OFFSET HAVE COUNTED AND
THERE DOES NOT EXIST OFFSET > 14 THEN
OLD PROM DATA STORED IN THE ERROR MAP
AT THIS BANK IS OR'ED INTO THE BLAST

;

TABLE WHERE THEN THE CHECK SUMS (AN
BE CALCULATED.

FORMAL PARAME TERS:

:
ARRSBNK _SEL

“STORES THE SELECTED ARRAYS ARRAY AND BANK SELECT
NUMBERS.

VOO NN
NN

PA:<NEALE>PMSKL4.BLI.1 (44)

FUNCTIONAL DESCRIPTION: OR THE OLD PROM DATA STORED IN THE ERROR MAP

R
D T T
N
PRT L

:06

TOPS=20 Bliss=16 v2(212)

WITH THE NEW PROM DATA STORED IN THE BLAST TABLE

122

R T T

T A

map

incrbCN[ from 0 to .MAX_CHIP_(OL*2 = 1 do

'MAP THE ERROR MAP LIKE THE BLAST TASBLE

!OR ALL NON ZERO BLAST TABLE LOCATIONS

egin

i; .BLAST_TBL [.BNK_NUM, .CNT, FULL_WRD] neq ZERO

then

'IS THIS LOCATION NOT ZERO

] or .ERROR_MAP [
BLAST TBL [.BNK_NUM, .CNT, FULL_WRD] = .BLAST_TBL [.BNK_NUM, .CNT, FULL_WRD
LOCATION
MAP
ERROR
ADJACENT
WITH
COCATION
THIS
'OR
BNk _NUM, (TNT, FULL_WRDI;

end;
end;

014434

0000006

014440
014444
014446
014452

036774

.SBTTL

OR.OLD.NEW.PD:
JSR

014466

026770"

R1,$SAVE4

MAX.CHIP,COL ,R4

MOV

14(SP) ,RO

SWAB
CLRB

RO
RO

CLR

ASL

1%:

OR.OLD.NEW.PD ROUTINE DECLARATIONS

MOV
ASL

000014

014454
014456
014460
014462
014464

014470
014472
014476
014500

ERROR_MAP : blockvector [4, 512] volatile;

i
MOV

ADD

ASL

33
RO,R3

R1,R3
R3

MOV

BL
#BLAST.T,R2

(R2)

ADD

R3,R2

4102
4124

: BNK.NUM,*

627

: CNT
3

; ONT,»

BSKELSG

REV A PATCH 00

014502

014504
014512
014514
014516
014520

001403
056363
005201
020104
002762
000207

I 13
21=Apr=1981 08:40:2
21=Apr=1981 08:19:0

ROUTINE DECLARATIONS
006626" (26770"

27 words
; Routine Size:
; Maximum stack depth per

3%:

BEQ
BIS
INC
(MP

BLT
RTS

i‘nyocation:

5 words

2%
E?ROR.MAP(RS),BLAST.TBL(RS)

TOPS=20 Bl iss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1

L CNT

(44)

Page 131

SEQ 0164

4129
4124

s CNT,»
4102

6137
4138

4139
4140
414
6142
4143
L4144

routine BIT_CLR_OLD_NEW (BNK_NUM)
begin
++

4147
4148
4149

6150
4151
4152

THE POSSIBLY THAT OLD BAD ROWS OR COLUMNS
THE CHIP IS PERFORMING.

THESE FAILING ROWS AND COLUMNS IF ANY

MUST BE CLEAR QUT FROM THE BLAST TABLE
;ngLLOU THE COUNTING OF BAD NIBBLE OFF=

FORMAL PARAME TERS:

BNK _NUM:

SELECTED BANK NUMBER FOR BIT CLEARING.

ERROR_MAP : blockvector [4, 512] volatile;

incr CNT from O to .MAX_CHIP_(OL*2 = 1 do

4164

4165

begin

BLAST _TRL [.BNK_NUM, .CNT, FULL_WRD] =

4166

4167
4168
4169
4170

014540

end;

BNk _NuM, JTNT, FULL_WRD];

014552
014554
014556

IMAP THE ERROR MAP LIKE THE BLAST TABLE

'BIT CLEAR BLAST TABLE WITH ERROR MAP AT THIS BANK

( not .ERROR_MAP [.BNK_NUM, .CNT, FULL_WRD]) and .BLAST_TBL [

end;

0000006

036774°

.SBTTL

BIT.CLR.OLD.NEW ROUTINE DECLARATIONS

BIT.CLR.OLD.NEW:
R1,$SAVE3
JSR

MOV

MAX.CHIP.COL,R3

MOV

12(SP) ,RO

ASL

000012

014542
014544
014546

014550

novalue =

THIS ROUTINE BIT CLEARS THE ERROR MAP WITH

4158
4159
4160
4161
4162
4163

014534

132

5095165

THE BLAST TABLE AT THE SELECTED BANK.

4156
4157

014526
014532

IN FACT WE HOPE THEY DO
MAY ALSO FAIL.
SO TO GIVE US A PAST HISTORY OF HOW THE

4153
4154
4155

014522

WHEN A FAILING CHIP IS SEARCHED FOR NEWLY
FAILING ROWS AND COLUMNS THERE IS ALWAYS

6145

4146

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (45)

FUNCTIONAL DESCRIPTION: BIT CLEAR THE OLD AND NEW PROM DATA

4135
4136

21=Apr=1981 08:19:06

ROUTINE DECLARATIONS

BSKELG
REV A PAT(H 00

J 13
21=-Apr-=1981 08:40:22

4135

: BNK.NUM,»

4166

4164

SWAR
CLRB

RO
RO

(LR
B8R

R1
2%

: CNT

4164

R1,R2

; CNT,»

4166

ASL

1%:

MOV

RO,R2

ASL

ADD

K
SKEL&
' BS

REV A PATCH 00
014560

014566
014570
014572
014574

046262

005201
020103
002767
000207

;: Routine Size:

K 13
21=-Apr=1981 08:40:22

21=-Apr=1981 08:19:06

ROUTINE DECLARATIONS
006626° 026770°
2%:

8IC
INC
BLT

RTS

22 words

: Maximum stack depth per inyocation:

4 words

. (R2)
g:;non.mpmz) _BLASTBL
R1,R3
1%

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1 (45)

; CNT

;

Page 133

SEQ 0166

4164

s CNT,»
4135

L 13

| BSKEL&
| REV A PATCH 00
671
4172

.
-

6173
4174
6175

L4
.

.
-

4176
4177
4178
6179

4
-

.
-

.
.

4180
4181
4182
4183
4184
4185
4186
4187
4188
4189
4190
419
4192
4193
4194
4195
4196
4197
4198
4199
4200
4201
4202

.
.

.
-

.
.

.
-

&
-

.
-

.
.

L4
-

.
-

5
.

o
-

.
.

.
-

L4
.
.

.
.

.
-

k2
-

.
-

.
.

4
-

=
.

.
-

4
.
.

.
-

4
.

k2
.
-

.
-

.
L4
4

21-Apr=1981 08:40:22
21=Apr-1981 08:19:06

ROUTINE DECLARATIONS

routgne_IN_eLAsr-rsL (ARRSBNK_SEL, TSTED_BNK) : novalue =
egin

FUNCTIONAL DESCRIPTION: INTERIGATE THE BLAST TABLE
THIS ROUTINE FIRST CLEARS THE BLAST TABLE

OF ANY OLD BAD ROW OR COLUMN DATA THAT MIGHT
HAVE BEEN FOUND DURING THE SEARCHING FOR NEW
FAILING ROWS AND COLUMNS.

THE SELECTED BANK IS THEN SEARCHED TO SEE IF
?EGNSDDITIONAL FAILING ROWS OR COLUMNS WERE
IF NO ADDITIONAL FAILING ROW COLUMNS WERE
FOUND THEN THE BANK IS NOT FURTHER TESTED.

IF ADDITIONAL FAILING ROW OR COLUMNS WERE

FOUND THEN THE BLAST TABLE AND THE ERROR
MAP IS SEARCH FOR NIBBLE OFFSET > 14.

FORMAL PARAMETERS:
ARR$BNK SEL:

STORES THE SELECTED ARRAYS ARRAY AND BANK SELECT

NUMBERS.
TSTED_BNK

INDICATES HOW MANY BANKS PER ARRAY MODULE
IS T0 BE PM'ED.

4203
4204
4205
4206

'QUADRANT O OFFSET SUM
'QUADRANT 1 OFFSET SUM

4207
4208
4209
4210
4211

ROW_D
ROW_12
COL_0

coL-128_25

BNK_NUM,

6221

4222

'STORES BANK SELECTOR
'STORES ARRAY SELECTOR

ARRNUM,

'STORES OFFSET COUNTS WHICH ARE > 14

OVER_FLOW;

4216

map

ERROR_MAP : bloc kvector

SECTORS 0-127
SECTORS 128-255

'QUADRANT 2 OFFSET SUM = SECTORS 256-383
'QUADRANT 3 OFFSET SUM = SECTORS 384-511
'OFFSETS COUNT FOR ROWS 0-127
'OFFSET COUNT FOR ROWS 128-255
'OFFSET COUNT FOR COLUMNS 0-127
'OFFSET COUNT FOR COLUMN 128-255

4212
4213
4214
4215

6217
4218
4219
4220

T0PS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (46)

[4, 512] volatile;

I_ERROR_MAP ();
RD_oLb_PROM_DATA (.ARRSBNK_SEL);

IMAP THE ERROR MAP LIKE THE BLAST TABLE

'INIT THE ERROR MAP BEFORE WF STORE THE PROM DATA IN THERE
'READ THE OLD PROM DATA INTT THE ERROR MAP

BNK_NUR = ARRSBNK_SEL<.BNR_SEL._POS, BNKSSEL_SIZE>; 'SELECT THE BANK TO INTERIGATE

Page

134

55098167

4223
6224
4225
4226
4227
4228
4229
4230
4231
4232
4233
4234
4235
4236
4237
4238
4239
4240
4241

4242
4243

4244
4245

ge 135

SEO 0168

ARR_NUM = .ARRSBNK _SEL<.ARR_SEL POS, ARRSSEL _SIZE>; 'SELECT THE ARRAY OF THIS BANK
incr SEL_BNK from O to .TSTED_BNK = 1 do
begin

'INTERIGATE THE PM'ED BANKS

BIT_CLR_OLD_NEW (.BNK_NUM);

'CLEAR THE OLD FAILING ROWS/COLS FROM THE BLAST TABLE

it S_BLAST_TBL (.BNK_NUM)

'ARE THERE ANY NEW ERRORS IN THIS BANK

then

begin

BAD_BNK_REG C.BNK_NUM] = SET_F.G;

'FLAG THAT THIS IS A BAD BANK

incr NIB_NUM from 0 to 9 do
beg in
Row 0 127 OFF = ZERO;

!SEARCH THRU ALL NIBBLES IN THIS BANK

ROW_128_255_OFF = ZERO;

= ZERO;
coL_0 127 OFF
_0OFF = ZERO;
COL_128_255

incr ROW_NUM from O to 127 do
begin

YINIT
'INIT
'INIT
'INIT

THE
THE
THE
THE

ROW COUNT
ROW COUNT
COLUMN COUNT
COLUMN COUNT

!SUM THE NUMBER OF FAILING ROWS 0-127

if .BLAST_TBL [.BNK_NUM, .ROW_NUM, .NIB_NUM, 1, 01 then ROW_0_127_OFF

.ROW_0_127_OFF + 1

.ROW_NUM, .NIB_NUM, 1. 0] then ROW_0_127_OFF

LROW_0_127_OFF + 1

4246
4247
4248

it .ERROR_MAP [.BNK_NUM,

4249

4250
4251
4252
4253
4254
4255
4256
4257
4258
4259
4260
4261
4262
4263
4264
4265
4266
4267
4268
4269
4270
4271
4272
4273
4274

(46)

énd'
incr COL_NUM from O to 127 do

begin

i¢ .BLAST_TBL [.BNK_NUM,

then

'SUM THE NUMBER OF FAILING COLUMNS 0-127
.COL_NUM + .COL_BASE,

.NIB_NUM, 1, 0]

COL_0_127_OFF = .COL_O_127_OFF + 1;

if .ERROR_MAP [.BNK_NUM, .COL_NUM + .COL_BASE, .NIB_NUM, 1. 0]
en

COL_0_127_OFF = .COL_O_127_OFF + 1;

end;

if .BNK_NUM_SEC gtr 127

then

'IS THIS A 64K PART

begin

incr ROW_NUM from 128 to 255 do

begin

'SUM NUMBER OF FAILING ROWS 128-255

it .BLAST_TBL [.BNK_NUM, ROW_NUM,

then

.NIB_NUM, 1. 0]

————

ROUTINE DECLARATIONS

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1

BSKEL&
REV A PATCH 00

m13
21-Apr=1981 08:40:22
21-Apr=1981 08:19:06

21-%9121981
08:40:3 2
21-Apr=1981 08:19:

4275

ROW_128_255_0OFF =

_ROW_128_255_OFF

i;eaERROR_HAP [.BNK_NUM,

ROW_128_255_OFF

.ROW_NUM,

+ 1;

1ncrbCOL NUM from 128 to 255 do

!SUM NUMBER OF

FAILING COL

128-255

egin

1; .BLAST_TBL [.BNK_NUM,
en

.COL_NUM + ,COL_BASE,

COL_128_255_OFF = .COL_128_255_OFF

1L.ERROR_MAP [.BNK_NUM,

then

COL_128_255_OFF

.(COL NUM +

.NIB_NUM,

1, 0]

.NIB_NUM,

1, 0]

+ 1;

_COL_BASE,

= .COL_128_255_OFF + 1;

end;
QD_1_SUM

OD-2-SUM
QD-37SUM

end;

.ROW_128_255 OFF

.COL_0_127_OFF;

'SUM NUMBER OF

LROW_0_127 OFF + .COL_1287255 OFF:

s 'SUM NUMBER OF FAILURES INQUAD 2

.ROW_128_255_OFF + .COL_128_255_OFF;

QD_O_SuM = .ROW_0_127_OFF + .COL_0_127_OFF;
if .QD_0_SUM gtr
then

FAILURES IN QUAD 1

'SUM NUMBER OF FAILURES IN QUAD 3

!SUM NUMBER OF FAILURES IN QUAD 0

gsr (ERR_7, CON_C_MSG, 0);

PRINTB (A_B_N_PRINTS .ARR NUM,

'REPORT THE ERROR

.BNK NUM,

.NIB NUM); 'PRINT WHERE

DEGRADE,_MOD REG [.BNK _NUM] = SET_FLG;
"INDICATE THIS IS A DEGRADED BANK
OVER_FLOW
=~.QD_0_SUMTM= 14; 'CALTULATE THE DIFFERENCE
incr ROW_NUM from 0 to 127 do
1:1

.BLAST_TBL

then

begin
BLAST _TBL

'DELETE ROW OFFSETS UNTIL EQL 14

[.BNK_NUM,

.ROW_NUM,

.NIB_NUM,

[.BNK_NUM,

.ROW_NUM,

.NIB NUM,

'IS THIS ROW BAD

0] = CLR_FLG;

OVER_FLOW= .OVER_FLOW = T; 'DECREMENT THE "DIFFERENCE
QD_2”SUM
= oo 2_5um - 1;
if

.OVER_FLOW eql

'CLEAR THIS BAD ROW

'DELETE OTHER SUMS USING THIS ROW

ZERO then exitloop;

'EXIT

DIFFERENCE EQL

I
R

'IS QUAD O OFFSETS > 14

end;
if

.OVER_FLOW neq ZEROD

then
A

SEO 0169

+ 1;

.NIB_NUM,

.ROW_128_255_OFF

ge 136

PA:<NEALE>PMSKL4.BLI.1 (46)

end;

nnn

4276
6277
4278
4279
4280
4281
4282
4283
4284
4285
4286
4287
4288
4289
4290
4291
4292
4293
4294
4295
4296
4297
4298
4299
4300
4301
4302
4303
4304
4305

TOPS=20 Bliss=16 v2(212)

ROUTINE DECLARATIONS

I I

e
L L T RR I

R I I

R I

SR R

N R

T T

T T T T

Y T TM TM

BSKEL4
REV A PATCH 00

begin

'DID DELETING BAD ROW GET

THE

DIFFERENCE

TO 14

SKEL&

oA
Y

B 14

REV A PATCH 00

21-Apr-1981 08:40:22

21-Apr=1981 08:19:06

ROUTINE DECLARATIONS

4327

incr COL_NUM from O to 127 do

I FETE LR TR TR TR LA R I E T A ETE T E T

A T

L T L T I T ETEIECETE

N PR L R L L

TRTE

TRT EE TR
LT

4328

4329
4330
433
4332
4333
4334

then

4350
4351
4352
4353
4354

4355
4356

4357
4358
4359
4360
4361
4362
4363
4364
4365
4366
4367
4368

4369
4370
4371
4372

4373
4374
4375

4376
4377
4378

begin

OVER_FLOW = .OVER rLow -1;
QD_1_SUM = 00_1 Sum -

0]= CLR_FLG:;

IDECREMENT THE DIFFERENCE

'DELETE THIS COLUMN FROM OTHER SUMS

it .OVER_FLOW eql ZERO then exitloop;

'EXIT IF DIFFERENCE IS AT 0

end;
end;
end;

i; .BNK_NUM_SEC gtr 127

then

'IS THIS A 64K PART

begin

it .QD_1_SUM gtr 14

thenb

'IS QUAD 1 SUM > 14

ERgsr (ERR_7, CON_C_MSG, 0);

'REPORT THE ERROR

'TELL WHERE

PRINTB (A B N PRINTS .ARR_NUM, .BNK_NUM, .NIB_NUM);

DEGRADE _MOD~REG [ .BNK ~un1 = SET rLG

' INDITATE THIS IS A DEGRADED BANK

incr ROW_NUM from 128 to 255 do

'DELETE BAD ROWS UNTIL OFFSETS ARE AT 14

=-.QD_1_SUM= 14;

OVER_FLOW

TCALCULATE THE DIFFERENCE

i; LBLAST_TBL [.BNK_NUM, .ROW_NUM, .NIB_NUM, 1, 0]

then

begin

BLAST TBL [.BNK_NUM, .ROW_NUM, .NIB_NUM,

OVER_FLOW= .OVER FLOW = T1;

= .QD_3_3umM - 1;
ap_3_SuMm

A BAD ROW
!IS THIS
i

0]= CLR_FLG;

‘DECREMENT THE DIFFERENCE

'DELETE OTHER SUMS OF THIS BAD ROW

if .OVER_FLOW eql ZERO then exitloop;

'EXIT WHEN DIFFERENCE IS AT 0

end;

i; .OVER_FLOW neq ZERO
then

'IS THIS QUAD OFFSET AT 14 NOW

begin

incr COL_NUM from 0 to 127 do

'DELETE BAD COLUMNS UNTIL OFFSETS ARE AT 14

i; LBLAST_TBL [.BNK_NUM, .COL_NUM + .COL_BASE, .NIB_NUM, 1, 0]

then

begin

Page 137

SEQ 0170

'DELETE BAD (OLUMN UNTIL OFFSETS ARE AT 14

8LAST TBL [.BNK NUM, .COL_NUM + ,.COL_BASE, .NIB_NUM,

4337

4349

PA:<NEALE>PMSKL4.BLI.1 (46)

it .BLAST_TBL [.BNK_NUM, .COL_NUM + .COL_BASE, .NIB_NUM, 1, 0]

4335
4336

4338
4329
4340
4341
4342
4343
4344
4345
4346
(347
4348

T0PS=20 Bliss=16 v2(212)

C 14

BSKELS

REV A PATCH 00

21-Apr=1981 08:40:22
21=-Apr-1981 08:19:06

ROUTINE DECLARATIONS

1, 0] = CLR_FLG;
BLAST TBL [.BNK NUM, .COL_NUM + .COL_BASE, .NIB_NUM,
TE

4379
4380
4381
4382
4383
4384
4385
4386

.
-

.
.

L4
.

.
.

4,387
4388
4389
4390
4391
4392
4393
4394
4395
4396
4397
4398
4399
4400

.
.

.
-

.
.

.
-

.
.

L4
-

.
.

13
.

.
.

]
.

.
-

4401

L4
.

.
-

B
.

L4
-

OVER_FLOW = .OVER_FLOW = T; !DECREMERT DIFFEREN

L4
.

.
.

.
-

4
-

.
-

end;

if .QD_2_SUM gtr 14

then

begin

.
.

.
-

.
.

.
-

4
.
-

.
.

L4
-

.
.

.
-

.
.

k2
.

.
.

4
.

'IS THIS QUAD OFFSETS > 14

ERRSF (ERR_7, CON_C_MSG, 0);

'REPORT THE ERROR

'REPORT WHERE
PRINTB (A_B_N_PRINT, .ARR_NUM, .BNK_NUM, .NIB_NUM);
A DEGRADED BANK
IS
THIS
TE
'INDITA
;
DEGRADE_MOD_REG [.BNK_NUM] = SET_FLG
NCE
DIFFERE
THE
ATE
TCALCUL
OVER_FLOW =".QD_2_SUM = 14;
!DELETE BAD ROWS UNTIL OFFSET ARE AT 14
incr ROW_NUM from O to 127 do
i:‘ .BLAST_TBL [.BNK_NUM, .ROW_NUM, .NIB_NUM, 1, 0]

then

!IS THIS A BAD ROW

begin

4402
4403
4404
4405

BLAST TBL [.BNK_NUM, .ROW_NUM, .NIB_NUM, 1, 0] = CLR FLG;

4408
4409
4410
4411

end;

OVER_FLOW = .OVER_FLOW - T;

4413
4414
461"
4416
4417
4418
4419
4420
4421
4422
4423
4424
4425
4426
4427
4428
4429
4430

'DECREMENT THE DIFFERENCE

if .OVER_FLOW eql ZERO then exitloop;

i;eBOVER'FLOH neq ZERO

'EXIT WHEN AT O

'IS QUAD OFFSETS AT 14 YET <

begin

44612

'EXIT WHEN AT 0

it .OVER_FLOW eql ZERO then exitloop;

4406
4407

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (46)

incr COL_NUM from 128 to 255 do

'DELETE BAD COLUMNS UNTIL OFFSETS AT 14

i;eBBLAST'TBL C.BNK_NUM, .COL_NUM + .COL_BASE, .NIB_NUM, 1, 0]
begin

BLAST TRL [.BNK_NUM, .COL_NUM + .COL_BASE, .NIB_NUM, 1, 0] = CLR_FLG:
!DELETE OTHER SUMS OF THIS COLUMN
QD _3_3uM = .QD_3 SUM - 1;7
OVERZFLOW = .OVER_FLOW = 1; !DECREMENT THE DIFFERNECE
'EXIT WHEN AT O
if .OVER_FLOW eql ZERO then exitloop:
end;
end;

end;

Page 138
SEQ 0171

BSKEL4

21-Apr=1981 08:19:06

LR TR LT

4432

then

4434
4435

4433

begin

'REPORT THE ERROR
ERRSF (ERR_7, CON_C_MSG, 0);
PRINTB (A_B_N_PRIRT, .ARR_NUM, .BNK_NUM, .NIB_NUM);

4436
22%;

2223

it .BLAST_TBL [.BNK_NUM, .ROW_NUM, .NIB_NUM, 1, 0]

4441

then

4442

4443

begin

BLAST_TBL [.BNK_NUM, .ROW_NUM, .NIB_NUM, 1, 0] = CLR_FLG;

222;

it .OVER_FLOW eql ZERO then exitloop;

4449

end;

OVER_FLOW = .OVER_FLOW = T;

2222

if .OVER_FLOW neq ZERO

4451

4452

then

'DECREMENT THE DIFFERENCE

'CLEAR

!EXIT WHEN AT 0

!IS QUAD OFFSETS AT 14 YET

incr COL_NUM from 128 to 255 do

2222

'DELETE BAD COLUMN UNTIL OFFSET AT 14

if .BLAST_TBL [.BNK_NUM, .COL_NUM + .COL_BASE, .NIB_NUM, 1, 0]

L
TR ELETE
TRLR T

PR L L R
P
PRTR
e
T

!IS THIS A BAD ROW

4444

4457

then

4458
4459

begin

4460

BLAST TBL [.BNK_NUM, .COL_NUM + .COL_BASE, .NIB_NUM, 1, 0] = CLR_FLG:

2222

it .OVER_FLOW eql ZERO then exitloop;

4465

end;

OVER_FLOW = .OVER_FLOW = T; !'DECREMENT DIFFERENCE

222;

4466

'PRINT WHERE

!INDITATE THIS IS A DEGRADED BANK
DEGRADE_MOD_REG [.BNK_NUMJ = SET_FLB;
TCALCULATE THE DIFFERENCE
OVER_FLOW =".QD_3_SUMTM = 14;
'DELETE BAD ROWS UNTIL OFFSET ARE AT 14
incr ROW_NUM from 128 to 255 do

4450

'1S THIS QUAD OFFSETS > 14

if .QD_3_SUM gtr 14

4631

4467

4469

end;
end;

end;

OR_OLD_NEW_PD (.BNK_NUM);

4475

4476

end;

4477

BNK_NUM = .BNK_NUM + 1;

4478

4479
4480
4481

'EXIT WHEN AT 0

end;

4468

4470
4471
4472
4473
4474

end;

Page 139

SEQ 0172

'OR THE OLD PROM DATA WITH NEW PROM DATA
' INCREMENT TO THE NEXT BANK

—_—_——
e

REV A PATCH 00 ROUTINE DECLARATIONS

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1 (46)

D 14

21-Apr=1981 08:40:22

m——

—

E 14
81 08:40:22
g1=Apr-1 81
08:19:06
21-Apr-19

|
‘| BSKEL4

| REV A PATCH 00 ROUTINE DECLARATIONS
|

| 014576

004167

0000006

_SBTTL

IN.BLAST.TBL:

JSR

014602 162706 000032

014606 004767 167736
014616

004767

177042

014622 012716 000054
014626 060616

014630
01463«
014640
014642

016746
012746
005046
004767

037012°
000002

0000006

016746
012746
005046
004767

0000006G

014712 016646 000016
014716 004767 177600
014722 016646 000020

1$:

014740 000167 002734

2%:

014726
014732
014734
014736

004767
005726
006000
103402

173606

014752
014756
014762
014766
014772

006266
006266
006266
016646
062716

000022
000022
000022
000022
037016°

015006
015012
015014

012746
011646
004767

015024
015026
015030
015032

000300
105000
006300
010003

014744 016666 000020 000022

4220

4221

: *,BNK.NUM

4223

: *,ARR.NUM

: SEL.BNK
; BNK.NUM,*
: BNK.NUM, *

4225
4227
4229

20(SP),22(SP)

: BNK.NUM,*

4232

22(SP) ,=(SP)

: BNK.NUM,

SP, (SP)

RO.10(SP)

MOV

#62, (SP)

MOV
MOV
CLR
JSR

ARR. SEL .POS,=(SP)
#4,-(SP)
-(5P)
PC,BLSGT2

MOV
JSR
MOV

PC,BIT.CLR.OLD.NEW

SP, (SP)

RO.44 (SP)
42(SP)
48%

16(SP) ,=(SP)
20(SP) .=(SP)

JSR
ST
ROR
BLO

PC,S.BLAST.TBL
(SP)+
RO
2$

ASR
ASR
ASR
MOV
ADD

22(SP)
22(SP)
22(5P)
22(SP) ,=(SP)
(SP)
#BAD .BNK .REG,

MOV

014776 016646 000022

4171

4222

BNK. SEL .POS,=(SP)
#2,-(SP)
-(5P)
PC,BLSGT2

JMP

Page 140

SEQ 0173

;

MOV
MOV
CLR
JSR

MOV

* ARRSBNK.SEL,*

52(SP) ,=(SP)

#54, (SP)

MOV
CLR
JMP

;

PC,1.ERROR.MAP

MOV

ADD

037010°
000004

014676 010066 000044
014702 005066 000042
014706 000167 003000

PC,RD.OLD.PROM.DAT

MOV

014652 012716 000062
014660
014664
014670
014672

JSR

ADD

014646 010066 000010

014656 060616

#32,SP

MOV

014612 016646 000052

PA:<NEALE>PMSKL4.BLI.1 (46)

IN.BLAST.TBL ROUTINE DECLARATIONS
;
R1,$SAVES

SUB

JSR

TOPS=20) Bliss=16 v2(212)

47%

* ARRS$BNK.SEL,*

* ARRSBNK.SEL,*

BIC

8177770, (SP)

015020 016600 000030

MOV

30(SP) ,RO

: BNK.NUM, *

4244

015034 005005
015036 005066 000044
015042 005066 000046

CLR
(LR
CLR

RS
44 (SP)
46(SP)

; NIB.NUM
. ROW.0,127.0FF
* ROW.128.255.0FF

4234
423
423

015002 042716 177770

MOV
MOV
JSR

000001

0000006

015046 005066 000050

3$:

#1,-(SP)
(SP),=(SP)
PC ,BL$PU2

SWAB
CLRB
ASL
MOV

RO
RO
RO
RO,R3

CLR

50(SP)

L COL.0.127.0FF

4238

| BSKEL&
| REV A PATCH 00

ROUTINE DECLARATIONS

000052

015052

015056
015060
015062
015064
015066
015070

CLR

4%:

026770"
000001

CLR

MOV
ADD
ASL
MOV
ADD
MOV
MOV

CLR
JSR
ADD

000000G
000006

52(SP)

R2
R3,Ré4
R2,R4

L,
(SPY
#BLAST.TB
R5,=(SP)
1.=(SP)
«{SP)

000001

MOV

ADD
ROR
ADC
INC

#10,SP
RO
44 (5P)
R2

000044

000177

036770

026770

5%:

BLE
CLR
MOV
ADD
ADD
ASL

ADD
MOV
MOV

000001

MOV

000000G
000006

ADD

000052
036770
006626"

000001
0000006
000010

CLR
JSR

ROR
AD(C
MOV
ADD
ADD

ASL
ADD
MOV

MOV

CLR
JSR

ADD
ROR

4241
4244

*
ROW NUM,

=
NIB NUM,

PC.BL$GT?

006626"

(LR
JSR

ROW .NUM

4239

R4 ,=(SP)

ROR
ADC
MOV
ADD

000000G
000010

COL.128.255.0FF

Page 141

SEQ 0174

#6,SP
RC
4L6(SP)
R4, (SP)
#ERROR .MAP, (SP)
R5,=(SP)
#1,-(SP)

000046

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (46)
SeS. e,

21-Apr=198
21=-Apr=198

ROW .0.127.0FF

4248

NIB.

=(SP)

PC,BL$GT?

R2,.R177
2
R2
R2,R4

,R4
COL .RASE

RW.
ROW.
RW.

4241

(oL.
coL.

4253
4256

R3.R4
R4

L
,Ré
#BLAST.TB
R4,=(SP)
RS,=(SP)
#1,-(SP)
=(SP)

PC.BL$GTZ
#6,SP
RO

NIB.

R2,R4

oL .0.127.0FF
»
(oL NUM,

R3,R4
R&
#ERROR .MAP , R4
R&, (SP)
RS.=(SP)

NIB.

52(SP)

,R&
COL .BASE

#1°-(5P)

-($P)

PC ,BL$GT?

#10,5P

4258
4260

015314
015322
015324
015330
015332
015334
015336
015340
015342
015346
015350
015352
015354
015360
015366

015370

015372
015376
015400
015404
015410
015412
015416
015420
015424

015426
015432
015434
015436
015442

015444
015450
015454
015456
015462
015466
015474
015476
015502
015504
015510

015512
015514
015520
015522
015524
015530
015532

INC
CMP
BLE
CMP
BLE

000177

037014"' 000177

MOV
SWAB

000030

50(SP)

; COL.0.127.0FF

R2,.R177
5%

;

COL.NUM

30(SP) ,RO

SEO 0175

4262

4253

COL.NUM,*
4266

BNK .NUM. SEC,#177
8%

ge 142

; BNK.NUM,
*

4273

CLRB

000060

026770

000200

000060

6%:

MOV

000001

CLR
JSR

0000006
000006

ADD
ROR
ADC
MOV
ADD
ASL
ADD
MOV
MOV
MOV

000050
000062
006626°

000001

CLR
JSR
ADD
ROR

0000006
000010

000046
000060

000060
000200

036770°*
026770
000001

0000006

ASL
ASL
MOV
MOV
ADD
ASL
ADD
ADD
MOV
MOV

ADC

INC
CMP
BLE

000377
7%:

MOV
ADD
ADD
ASL
ADD
MOV
MOV
MoV

(LR
JSR

RO,R2

#60,R4
SP. R4

;

ROW.NUM,
*

;

*,ROW.NUM

R4 ,R2
.
TBL ,R2
#RLAST

#200,60(SP)
R2,=(SP)
RS.=(SP)
#1.-(5P)

: NIB.NUM,*

4270
4273

-($p)

PC,BL$GT?
#6.SP
RO
50(SP)
R3,R4

ROW.128.255.0FF

62(SP) ,R4

;

RS.=(SP)
#1.-(5P)
-(5P)

;s NIB.NUM,*

R4
#ERROR
. MAP , R4
R4, (SP)

4275
6277

ROW.NUM,
*

PC,BLSGT2

#1C,SP
RO
46(SP)

.128.255.0FF
NUM
NUM,

60(SP)

P)7
, #437
60(S
6%

COL .BASE ,R4
R3,R4

OL .NUM
»
NUM,

L
,R4
#BLAST.TB
R4 ,=(SP)
R5,=(SP)
#1,-(SP)
-(SP)

PC.BLSGT?

479
4270

ADC

000050

22¢

. 015312

005566

015300

TM~

21-Apr-=1981 08:19:06

ROUTINE DECLARATIONS

REV A PATCH 00

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL&.BLI.1 (46)

BSKEL4

G 14
21-Apr-1981 08:40:22

+
; NIB.NUM,

4283
4286

H 14
21=Apr-1981 08:40:22

012746
005046
004767
062706
006000
005566
005202
020227
003726
C16666
066666
016666

015624
015626
015¢34
015642
015650 066666
015656 016666
015664 066666
015672 016666
015700 066666
015706 026627
015714 003571
104454
015716
015720 000007
015722 000474"
015724 000000
015726 010546
015730 016646
015734 016646
015740 012746
015744 012746
015750 010600
015752 104414
015754 016616
015760 062716
015764 016646
015770 042716
015774 012746
016000 011646
016002 004767
016006 016601
162701
016012
016016 005002
016020 - 010304
016022 060204

ADD

000054

ADC

036770°"

Page

143

SEQ 0176

#6,SP

RO
54 (SP)
R2,R4
R4
COL .BASE
R3,R4

(OL.128.255.0FF
(OL .NUM, *

4288
4290

006626"
MOV

000001

CLR

000000G
000010

000052
000377
000046
000050
000044
000052
000046
000052
000044
000050
000034

000036
000036
000040
000040
000042
000042
000034
000034

BLE

ADD

8%:

000016

#ERROR .MAP R4
Ré4, (SP)
R5,=(SP)

NIB.NUM,*

#1,-(SP)

=(SP)
PC,BLSGT2
#10,SP
RO

52(SP)

COL.128.255.0FF

4292
4283

46(SP) ,36(SP)
50(SP),36(SP)
44 (SP) ,40(SP)
52(SP) ,40(SP)
46(SP) ,42(SP)
52(SP) ,42(SP)
44 (SP) ,34(SP)
S0(SP) ,34(SP)
34(SP) 216

ROW.128.255.0FF ,QD.1.SUM
(0L.0.127.0FF, QD 1. SUM

4296

COL .NUM
COL .NUM, =

R2
R2,#377
7%

ROW.0.127.

4297

ROW. 128.
(OL.128.
ROW.0.1
.1

4298

COL.128.

17%

4301

4303
4306

54
7

CON.C.MSG
0

4307

RS,=(SP)

32(SP) ,=(SP)
62(SP) .=(SP)
#A.B.N.PRINT,=(SP)

000032
000062
002172
000004

#4.-(SP)

SP.RO

14
44 (SP) , (SP)

000044
037022
000042
177770
000001

#DE GRADE

4308

.MOD.REG, (SP)

42(SP) ,=(SP)

#177770, (5P)

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

PC,BL$PU2
54 (SP) ,R1

000000G
000054
000016
9%:

#16.R1
R2

R3,R4

R2.R&

015616
015620

010416
010546

000006

015542
015544
015550
015552
015556
015560
015562
015566
015570
015572
015576
015600
15604
015610
015612

062706
006000
005566
010204
066704
060304
006304
062704

| 015536

21-Apr=1981 08:19:06

ROUTINE DECLARATIONS

QD.0.SUM,OVER.FLOW

* ,OVER.FLOW

ROW.NUM

REV A PATCH 00

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1T (46)

LERE

BSKEL&

ROW.NUM,*

BSKEL4
REV A PATCH 00

| 016024

| 0160206
016032
016034
016036
016042
016044

016050
016054
016056

006304
062704

010446
010546

012746
005046
004767
062706
006000

103021
010446
010546
012746
005046
004767

005301

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1

ROUTINE DECLARATIONS

Page

144

SEQ 0177

R4
#BLAST.TBL

026770

R4 ,=(SP)

RS,=(SP)

000001

000000G
000010

000000G
000070

4316

; NIB.NUM,*

; OVER.FLOW
; QD.2.SUM
; OVER.FLOW

4317
4318

4320

#10,SP

;
;

TST

9%
R1

; OVER.FLOW

4324

MOV

R2
R2,R4

;
;

COL .NUM
=
COL.NUM,

4328
4330

R2,#177

158:

16$

,R4
COL .BASE
R3,R&

ROW.NUM
ROW.NUM,
=«

4315
4311

000177
12%:

12%

A=
<o

-_0
oo P

000010

036770

NIB.NUM,+

#10,5P

RO
11%
R4 ,=-(SP)
RS,=(SP)
#1,=-(SP)
-(SP)
PC,BLS$PUZ
R1
70(SP)
R1
108

000001

000010

;

#1,-(SP)
-(SP)
PC,BL$GT?2

026770

TBL ,R4
#BL.AST
R&,=(SP)

RS.=(SP)

000001

0000006
000010

036770

«
; NIB.NUM,

#1.-(5P)

-(SP)
PC,BL$GT?2

#10,5P

RO
15%
R2,R4

,R&
COL .BASE

;

COL.NUM,+

4333

Rz.R4
R

026770°*

016240

L
R4
#BLAST.TB

000001

R4 ,=(SP)
R5,=(SP)
#1,-(SP)

000000G

PC ,.BL$PUZ

*
; NIB.NUM,

-(SP)

; OVER.FLOW

433

016242

016246

016250

016252
016256
016260
016264
016266
016272
016274
016300
016306
016310
C16314
016322
016324
016326
016330
016332
016334
016336
016342
016346
016352
016356
016360
016362
016366
016372
016376
0716402
016406
016410
016414
016420
016424

016430
016432
016434
016436
016442

016444
016446
016452

016454
016460
016464

005366
005701
001003
062706
000406

000066
000010

000010

66(SP)
R1
14%
#10,SP
16$

#10,SP
R2

RS, #177

000177
000020

037014* 000177

17%:

001334
000036

18%:

000016

13%
#20,SP

TOPS=20 Bliss=16 V 2(212)
(46)

PA:<NEALE>PMSKI.4.B LI.1

; QD.1.SUM
; OVER.FLOW

(OL .NUM
COL .NUM, *

4335
4337

4332
4328
4305
4345

BNK .NUM. SEC,#177
18%
45%

Page 145

SEQ 0178

36(SP) 416
27%
54

QD.1.SUM,
*

RS,=(SP)

*
NIB.NUM,
BNK .NUM, *

4349
4352

7
50~.c.nsc

000032
000062
002172*
000004

32(SP) ,=(SP)
62(SP) .=(SP)
#A.B.N.PRINT,=(SP)

000044
037022
000042
177770
000001

, (SP)
44(SP)
#DE GRADE .MOD . REG, (SP)
42(SP) ,=(SP)

000000G
000056
000016
000200

PC,BLSPU2
56(SP) ,R1

#4 .= (SP)

SP.RO

#177770, (SP)

4353

ARR .NUM, *

SP,*

4354

BNK .NUM, *

#1,-(SP)

(SP) ,=(SP)

19%:

QD.1.SUM,OVER.FLOW

4355

* ,R0W.NUM

4357
4359

#16,R1

* ,OVER.FLOW

R2.R4

ROW.NUM,
*

#200,R2
R3.R4
R&

026770
000001

000000G
000010

TBL ,R4
#BL.AST
R&,=(SP)
RS.=(SP)

NIB.NUM,*

#1.-(5P)

-($P)
PC,BLSGT2

#10,SP

21%

016466

016470
016472
016474
016500

Lo
]e )

ROUTINE DECLARATICNS

N
A H

REV A PATCH 00

—

BSKELSG

J 14
21=Apr=19
21=Apr=19

000001

R4 ,-(SP)
R5,=(SP)
#1,-(SP)
=(SP)

4362

NIB.NUM,+

K 14

BSKELS&

| REVA PATCH 00
| 016502 004767
016506

¢ 016510

016514
016516
016520
016524
016526
016532
016534
016540
016542
016544
016546

016550
016552
016556
016560
016562
016566
016570
016572

005301
005366
005701
001003
062706
000406
062706
005202
020227
003733
005701
001454
005002
010204
066704

21-Apr—198
21=-Apr=198

ROUTINE DECLARATIONS

146

55098179

000072

PC,BL$PU2
R1
72(SP)

000010

#10,SP

000010

21%:

#10,SP
R2

; ROW.NUM

4361
4357

22%:

; OVER.FLOW

4370

R2
R2.R4

; COL.NUM

4374
4376

000000G

205

; OVER.FLOW
; QD.3.SUM
; OVER.FLOW

22%

000377

R2 #4377
19%

26%

23%:

036770

E
,R4
COL .BAS
R3,R4

;

4363

4364
4366

ROW.NUM,»

COL.NUM,*

026770°

R4
#BLAST.TBL

000001

#1,-(5P)

R4 ,=(SP)
R5,=(SP)

25%

R2,R4

E
,R4
COL .BAS

036770

COL.NUM,*

4379

R3.R4
R4

026770

R4
#BLAST.TBL

000001

#1,-(SP)
=(SP)

R4 ,=(SP)
RS,=(SP)

PC.,BL$PUZ

0000006

R1
ADD

000010

24%:
25%:

000010

000177
000020
000040

*
; NIB.NUM,

-(SP)
PC,BLSGT2
#10,SP
RO

000000G
000010

000016

#20,SP

.WORD
.WORD
.WORD

; OVER.FLOW

26$%

23$

BLE

*
; NIB.NUM,

438
438

#10,SP

R2 2177

26%:

27%:

24%

#10,SP
R2

TRAP

016716
016720

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1

4LO0(SP) ,#16
36$
54
7
CON.C.MSG

; COL.NUM

4378
4374

: 0D.2.SUM,=

4390

;

COL.NUM,*

4351

4393

016722
016724
016730
016734
016740
016744
016746
01€750
016754
016760
016764
016770
016774
16776
017002

SP.RO

: P,

14
, (SP)
44 (SP)
#DE GRADE .MOD . REG, (SP)
42.5P) ,=(SP)

000044
037022"
000042

#177770, (SP)

177770

22(SP) ,=(SP)
62(SP) .=(SP)

#A.B.N.PRINT,=(SP)
#4,~(SP)

012746
012746 |

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (46)
*
; NIB.NUM,
; BNK.NUM,»
; ARR.NUM,*

RS,=(SP)

010546
016646
016646

oo
o

REV A PATCH 00

—_—

BSKEL4

o000

L 14
21=-Apr=19
21=Apr=19

Page

147

55095180

4394

4395
; BNK.NUM,»

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

000001

PC,BLSPU2
60(SP) ,R1

000000G
000060
000016

28%:

,R4
ST.
#BLATBL

000001

#1,-(SP)

Ré4,=(SP)
RS,=(SP)

4396

ROW.NUM

4398
4400

* ,OVER.FLOW

#16,R1
R2
R3,R4
R2.R4
R4

026770"

QD.2.SUM,OVER.FLOW

ROW.NUM,*

; NIB.NUM,*

-(5P)
PC,BLSGT2
#10,SP

0000006
000010

4403

; NIB.NUM,
*

000001

000000G

PC,BL$PUZ

000010

#10,SP

000010
000177

29%

29%:
30%:
31%:

000200
036770°"

017146
017150

010446
010546

026770

32%:

; OVER.FLOW

31%

#10,SP

R2
R2,#177
$

R2.R4

E
,R4
COL .BAS
R3.R4

; ROW.NUM
;

440

439

ROW.NUM,*

; OVER.FLOW

4410

*,C0L.NUM
COL.NUM,*

4414
4416

;
:

BL
#BLAST.T,R4
R4 ,=(SP)
R5,=(SP)

4404
4406

; NIB.NUM,*

M 14

REV A PATCH 00

017152

017156
017160
017164
017170
017172
017174
017176
017202
017204

017206
017212
017214
017216
017222
017224

012746
005046
004767
062706
006000

21=Apr=1981 08:40:2 2
21=Apr=1981 08:19:0 6

ROUTINE DECLARATIONS

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1

(46)

148

55095181

#1,-(SP)
-(5P)

000001

PC,BLSGT2

000000G
000010

#10,5P

348
R2 R4

036770"

,R4
COL .BASE
R3,R4

026770

R4
#BLAST.TBL

COL .NUM, =

4419

R4,=(SP)

RS,=(SP)
#1,-(SP)

000001

000000G
000072

=(SP)
PC,BL$PU2
7€(SP)

000010

#10,SP

33%

33%:

000010

34%:

000377

000020
000042

000016

358:
368

NIB.NUM,*

QD.3.SuM
OVER.FLOW

35%

#10,SP
R2

R2 4377
32%
#20,SP
42(SP) 416
45%
54

4420
4421
4423

4418

COL .NUM
COL .NUM, *
QD.3.SUM,*

4414

4392
443
4434

7
CON.C.MSG

BSKEL&

4435

RS,=(SP)

32(SP),=(SP)
62(SP) .=(S5P)

#A.B.N.PRINT,=(SP)
#4,=(SP)

SP.RO
14

4436

, (SP)
44 (SP)
#DE GRADE .MOD . REG, (SP)
42(SP) ,=(SP)

#177770, (SP)
#1,-(SP)
(SP),=(SP)

000016
000200

PC,BLS$PU2
62(SP) ,R1

37%:

#16.R1
#200,R2
R3,R4
R2.R4
R4

QD.3.SUM,OVER.FLOW

* ,OVER.FLOW
* ,ROW.NUM

ROW.NUM,
+

4437
4439

4441

BSKEL4
REV A PATCH 00

017410
017414
017416

017420
017424
017426

017432
017436
017440
017442
017644
017446
017452
017454
017460
017462
017464
017470
017472
017476
017500
017504
017506
017510
017512
017516
017520
017524
017526
017530
017534

017536

017540
017544

017546

017552
017556
017560
017562
017564
017570
017572
017574
017600
017602
017604
017610
017612
017616
017620
017622
017626

—

062704
010446
010546

N 14

21=-Apr=1981 08:40:22

ROUTINE DECLARATIONS

21=-Apr=1981 08:19:06

026770°

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1

R4 ,~(SP)
RS,=(SP)
#1,-(SP)
-(SP)
PC,BL$GT2
#10,SP

000000G
000010

; NIB.NUM,
*

RO
39%

R4 ,=(SP)

R5,=(SP)

000001

#1,-(SP)
-(SP)
PC,BLSPUZ2
R1

000000G

38%

000010

000377

036770

026770°"
000001

0000006
000010

036770°"

026770"
000001

0000006
000010

; NIB.NUM,
+

;

OVER.FLOW

#10,SP

38%:
39%:
40%:

000200

149

#BLAST.TBL
,R4

000001

000010

Page

55095182

4444

4445
4447

40%

#10,SP
R2
R2,#377
7$

* ROW.NUM
:

ROW.NUM,
*

4443
4439

;

OVER.FLOW

4451

*,COL.NUM

4455
4457

41%:

;

COL.NUM,

;

NIB.NUM,*

;

COL.NUM,
=

;

NIB.NUM,
+

;

OVER.FLOW

R3,R4
R4
#BLAST.TBL
R4
R4 ,=(SP)

R5,=(SP)

#1,-(SP)
=(SP)

PC,BL$GT?2
#10,SP
RO

438
R2 R4

,R4
COL .BASE

4460

R3.R4
R4
,R4
#BLAST.TBL

R4 ,=(SP)
R5,=(SP)
#1,-(SP)
=(SP)
PC.BL$PU2
R1
42%
#10,SP
443

4461

6463

S—

BSKEL&

REV A PATCH 00

ROUTINE DECLARATIONS

017630
017634

000070

062706
005202

017636
017642
017646
017650
017652
017656
017660
017664
017670
017674

020227
003725
062706
005205
020527
003002
000167
016616
004767
062706

017704
017706
017712
017720
017722
017726
017732

005726
005266
026666
002002
000167
062706
000207

017700

42%:
43%:

000377

448
45%:

000020
000011

46%:

47%:

000042

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (46)

#10,SP
R2

COL .NUM

000046

815 words
per invocation:
depth
stack
um
Maxim
;

4L8%:

(5%

43 words

150

55898183

44659
4455

(OL.NUM,*

RO, H377

41$

#20,SP

4637
427%

RS 11

NIB.NUM
NIB.NUM,«

3$
30.SP), (SP)

BNK .NUM, *

4475

. NUM
BNK

4231
4478
4226
4225

175152

005266

; Routine Size:

B 15
21=-Apr=1981 08:40:22
21=-Apr=1981 08:19:06

PC,OR.OLD.NEW.PD
#10,SP

20(SP)

(SP)+
4L2(SP)
42(SP) ,66(SP)
49%
1%
#50,SP
PC

NN,

% N

———————————————

SEL .BNK

SEL .BNK, TSTED .BNK

“n

c 15

21-Apr=1981 08:40:22
21-Apr-1981 08:19:06

BSKEL&
REV A PATCH 00 ROUTINE DECLARATIONS
4482

4483

routine IN_ERROR_MAP (TEMP_ARRSBNK_ SEL, BAD_CHIP) : novalue =
begin

4484

2239

4488

:
:
:

4490
4491
4492

:
:

4494
2232

:
:

4485

4489

FUNCTIONAL DESCRIPTION: INTERIGATE THE ERROR MAP
THIS ROUTINE EXICUTES IN THE FOLLOWING
STEPS:

1. IT FIRST SEARCHES THE ERROR MAP FOR
ALL BAD ROWS ie. OCCURANCES OF BAD
ROWS > 10 TIMES.

2. 1T THEN SEARCHES THE COLUMN COUNT
TABLE FOR COLUMN COUNTS > 10>

4497
2238

3. IT THEN XFERS TO THE REMAINDER TABLE
ANY REMAINING CELL FAILURES.

4500

4501
zggg

!
:

4. IT THEN INTERIGATES THE REMAINDER TABLE

2
:

4504
4505

'
!

4508

4493

:
:

4510

4511

4513

4515

!
4506
4507 !
4509

4512

4514

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (47)

FOR THESE REMAINING CELL FAILURES
AND SELECTS THE BEST ONE FOR BLASTING.

FORMAL PARAMETERS:
_S
TEMP_ARRSBNK

SELECTED ARRAYS ARRAY AND BANK
THE
srans
NUMBERS.
SELECT

BAD_CHIP:

POINTS TO THE FAILING CHIP PERSENTLY

BEING PM'ED.

local

ARR_SF'.,

BNK_NUi,

'STORES ARRAY SELECT NUMBER

'STORES BANK SEL NUMBER

3
:
:
3

zg}g
4518
4519
4520

'RECORDS TOTAL ALL BAD ROWS AND COLUMNS FOUND BAD
ALL_BAD;
'LOAD THE ARRAY SEL NUMBER
£ R_SEL = .TEMP_ARRSBNK_SEL<.ARR_SEL_POS, ARRSSEL_SIZE>:
'LOAD THE BNK SEL NUMBER
SIZE>;
BNKSSEL_
,
_SEL_POS
a~x “NUM = .TEMPARRSBNK_SEL<.BNK
Y BLAST TABLE
TEMPORAR
'INIT"THE
I TMP BLST_TBRL T1);
ALL BAD ROWS

4523

if .ALL_BAD leq 9

2%%9

4528

4530

:
3

225}
4524
4525

4529

22%}
4533

AtL _BAD = S_ERROR_MAP (.BAD_CHIP);
then

ISEARCH ERROR MAP FOR

'IS THE ALL BAD COUNT <= 9

begin

ALL_BAD = S_COL_CNT_TBL (.BAD_CHIP, .ALL_BAD);
it .ALL_BAD leq 9

then

begin

'IS THE ALL BAD COUNT <= 9

ALhBAD= S_REM_TBL (.BAD_CHIP, .ALL_BAD);
en

!SEARCH COLUMN COUNT TABLE FOR ALL BAD (OLS
!FIND THE REMAINING BAD ROWS/COLS

Page 151
SEQ 0184

D 15

21-Apr-1981 08:40:22
21=Apr=1981 08:19:06

" L BSKEL&
} REV A PATCH'00 ROUTINE DECLARATIONS
4536

453%7

then

‘3

4538

65641

else

4544

(546

2%28

4547

:
:
3

4551
4552
4553

:
:
:

:
:
:
:
:

then

4561

004167

be
g

'REPORT A CONDITION A

'REPORT WHERE
PRINTB (A R ¢ PRINT, .ARR SEL, .BNK_NUM, .BAD_CHIP);
FLAG
CHIP
BAD
ALL
THE
“ISET
SET_FLG;
=
CHIP]
BAD
ALC
[F
FLG REG
DEGRADE_MOD_REG [.BNK_NUM] = SET _FLG;

else

end

RRSF (ERR_6, CON_B_MSG, 0);
pmma (REP_PRINT, .ARR SEL)
FLG_REG [F_ABORT ARRAYJ = SET FLG;
end;

4558

4560

'XFER TEMP BLAST TABLE TO BLAST TABLE

'1S THIS THE FIRST ALL BAD CHIP IN THIS BANK

ERRSF (ERR_S, CON_A_MSG, 0);

4554
4555
4556
4557
4559

017734

_SEL, .ALL_BAD);
x_dMP_BLST_TBL (.TEMP_ARRSBNK

4548
4549
4550

begin

1f not .FLG_REG [F_ALL_BAD_CHIP]

4545

'REPORT A CONDITION B
'REPORT WHERE
'SET THE ABORT ARRAY FLAG

end;
end;

000000G

.SBTTL
IN.ERROR.MAP:

JSR

IN.ERROR.MAP ROUTINE DECLARATIONS

R1,$SAVE3

SP, (SP)

,*
: TEMP.ARR$BNK.SE

#16,-(SP)

017740 012746 000016

MOV

037010
000004

000000G

MOV
MOV
CLR
JSR

ARR.SEL .POS,=(SP)
#4 ,-(SP)
-(SP)
PC,BL$GT2

017766 012716 000024

MOV

#24,(SP)

000000G

MOV
MOV
CLR
JSR

BNK.SEL .POS,=(SP)
#2,-(SP)
-(SP)
PC, BLSGTZ

020014 004767 164404
020020 016602 000030

JSR
MOV

PC,1.TMP.BLST.TBL
30(SP).R2

017744

017746
017752
017756
017760

017764

017772

017774
020000
020004
020006

020012

020024
020026

060616

016746
012746
005046
004767

010003

060616

016746
012746
005046
004767

010001

010216
004767

Page 152
SEQ 0185

'WERE THERE <= 9 ALL BAD ROWS/COLS FOUND

it .ALL_BAD leg 9

T0PS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (47)

037012'
000002

171740

020032 020027 000011

ADD

MOV

ADD

MoV

MOV
JSR

RO,R3

SP, (SP)

RO,R1

R2, (SP)
PC,>.ERROR.MAP

: *,ARR.SEL

,*
: TEMP.ARR$BNK.SE

; * ,BNK.NUM

4482

4518

4519

:
; BAD.CHIP,*

4520
4521

: ALL.BAD,*

4523

E 15
21-Apr=1981 08:40:22
21=-Apr=1981 08:19:06

ROUTINE DECLARATIONS

iuPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLi.1 (47)

R2,=(SP)
RO,=(SP)
PC,S.COL.CNT.TBL
RO, 211
1%
R2,=(SP)
RO,=(SP)
PC,S.REM.TBL
(SP)+,(SP)+
(SP)+,(SP)+

171550
000011

171142
1%:

000011

RO,#11
2%

32(SP) ,=(SP)

000032

RO,=(SP)

gg.X.TMP.BLST.TBL

166606

000020

037020'

2$:

000020

14
#20,FLG.REG

SP.RO

BISB

037020°

4531
ALL.BAD,*

;

s ALL.BAD,*

; TEMP.ARRS$BNK.SE
,*
; ALL.BAD,*

4530
4525
4536
4539
4536
4544

4547

4548
;
:

BNK.NUM,»
ARR.SEL,*

SPF,e
4549
4550

R1.RO
RO
RO
RO

RO, (SP)
R1,=-(SP)

#177770, (SP)

177770
000001

*
; BNK.NUM,

#1,-(SP)

(SP) ,=(SP)
PC ,BLS$PUZ2

3%:

TRAP

.WORD
.WORD
. WORD

MOV
MOV
MOV
MOV

4546
4544
4554

#12,SP
4%

54
6
CON.B.MSG

000000G
000012

020252

4528

#DEGRADE .MOD.REG,RO

037022°

002246
000002

SE098186

ALL.BAD,*

;

3%
54
5
-CON.A.MSG
0

002120°*
000004

153

4526

#20,FLG.REG

R2,=(SP)
R1,~(SP)
R3,-(SP)
#A.B.C.PRINT,=(SP)
#4,-(SP)

Page

R3,=(SP)
#REP.PRINT ,=(SP)

;

SP.,RO

: SP,*

#2,=(SP)

ARR.SEL,*

4555

BSKELSG

REV A PATCH 00

020254

020256

020264

020266
020272

104414

ROUTINE DECLARATIONS

152767

000100

062706
000207

000022

005726

; Routine Size:

F 15
21=Apr=1981 08:40:22
21=Apr=1981 08:19:06

(37020'

112 words

: Maximum stack depth per invocation:

TRAP

(%:

5%:

19 words

BISB
TST
ADD

RTS

#100,FLG.REG
(SP)+

#22,SP

10PS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (47)

Page 154
SEQ 0187
4556

4542
4483
4482

G 15

21=-Apr=1981 08:40:22

21-Apr=1981 08:19:06

- BSKEL&

' REV A PAT(H 00 ROUTINE DECLARAT IONS
4562

4563
4564
4565
4566
4567
4568
4569
4570
4571

routine FB_DATA_CHIPS (TEMP_ARRS$BNK_SEL)
begin

|
1

;

:
:

4577
4578

'
!

4580

4573
4574
22;2

:
;
:

4579

:
:
:

4581
4582
4583

4585

4584

4586
4587
2233

4590

;

FAILING CHIPS.

IF A BAD CHIP IS DETECTED THEN THE ML=11 BIT

FROM WHICH THE FAILURE CAME FROM IS CALCULATED
AND THE FAILING CHIP NUMBER AND PATTERN IS
STORED INTO THE BAD CHIP TABLE.

!
!
:

: novalue =

THIS ROUTINE WILL SEARCH THE SELECTED BANKS
VIA MASS BUS TRANSFERS LOOKING FOR ADDITIONAL

]

PA:<NEALE>PMSKL4.BLi.1 (48)

FUNCTIONAL DESCRIPTION: FIND THE BAD DATA CHIPS

6572

TOPS=20 Bliss=16 vZ2(212)

FORMAL PARAMETERS:
TEMP_ARRS$BNK _SEL:

STORES THE SELECTED ARRAYS ARRAY AND

BANK SELECT NUMBER.

!
local

'COUNTS NO. BITS TESTED IN READ BUFFER

BITS TSTED,
OFFSET,

RAND INDEX,
BAD BITS : bitvector [16],
FAIT_CHIP;

'RANDOM DATA OFFSET

ISTARTS SECTOR TRANSFER AT RANDOM WRITE BUFFER WORDS
'LOADED WITH FAILING READ BUFFER WORD
'RECORDS THE FAILING ML-11 DATA CHIP

4591
4592
2232

SEED1 = ZEROES;

SEED2 = %0'1233';
SEED3 = %0'7622"':
OFFSET = ZEROES;

'INIT RANDOM DATA SEED1

;

aggg

1ncerAT SEL from O to ONE + .RAND_PASS do

'LOOP THRU ALL PATTERNS

;

zggg

RAND_INDEX = ZEROES;

'RESET RANDOM INDEX TO ZERO

4599

selectone .PAT_SEL of

'SELECT A PATTERN

4601

2282

;
2
:
3

4600

egin

set

4602

[0l :

;

4605

13 :

:
:

4608
4609

(otherwise] :
beg

3
;:

4612
4613

tes;

:
:

2289
4610

4611

i NIT RANDOM DATA SEED2
i INIT RANDOM DATA SEED3
iCLEAR THE RANDOM DATA OFFSET FOR 1'S AND 0'S DATA

L_1_0O_DATA (.TEMP_ARRSBNK_SEL, ZEROES); !LOAD ZEROES DATA

L_1_O_DATA (.TEMP_ARRSBNK_SEL, ONES);
ANDOM_DATA (, TEMP_ARR$BNK _SEL);

orrssr = 2;
end;

!LOAD ONES DATA
'LOAD RANDOM DATA

'ENABLE THE RANDOM DATA OFFSET

ge 155

SEQ 0188

H 15

BSKEL&
REV A PATCH 00
4614

4615
4616
4617
4618
4619
4620
4621
4622

.
.
.

z
.

.
.

E
.

.
.

L
.

4623
L6264

.
.

4625
4626
4627
4628
4629
4630
4631
4632

.
.
.

.
.

]

ROUTINE DECLARATIONS

incr SEC_CNT from O to BNK_NUM_SEC do
begin

4
.

.
.

4638
4639
4640
4641
4642
4643
4644
4645

L4
.

4
.

.
.

L4
.

.
.

4646

.
.

E
.
-

4
.

El
.

.
.

L4
.

.
B

L4
N

.
.

E
.
.

.
.

4
.

4647
4648

4649
4650

4651
4652
4653
4654
4655
4656
4657
4658
4659
4660
4661
4662
4663
4664
4665

PA:<NEALE>PMSKL4.BL!.1 (48)

!WRITE CHECK ALL SECTORS IN THIS BANK

WRT_CHK_TRANSFER (SIZE = -256, DST = (.TEMP_ARRSBNK_SEL + .SEC_CNT),
SRC = WRT_BUF [.RAND_INDEX,
WRDJ1);

if .ML_ADDK [MLEE, crcl

then

'WAS THERE A CRC BIT ERROR

begin

FATL _CHIP = .ML_ADDR [MLEE, CHAN];

L_CHIP_TBL (.FATL_CHIP, .PAT_SEL);
else

end

'READ THE FAILING CRC BIT NUMBER

'STARE AWAY THE FAILING BIT AND PATTERN

begin

if .ML_ADDR [MLEE, UNC]

then

'WAS THERE A UNCORRECTABLE ERROR

begin

FLd_REG [F_UNC_ERR_FLG] = SET_FLG;

!SET THE UNC ERROR FLAG FOR FUTURE REF

end,

4637

TOPS=20 Bliss=16 v2(212)

;
BREAK

4633
4634
4635
4636

21=-Apr=1981 08:40:22
21-Apr=19 81 08:19:06

end;

i; .ML_ADDR [ML(CS2, WCE]
then

'WAS THERE A WRITE CHECK ERROR

begin

'CLEAR THE MASS BUS OF THE ERROR
®
CLR_MBUS;
THE BITS TESTED COUNT
'CLEAR
BITS_TSTED = ZEROES:
_SEL + .SEC_CNT);
SRC = .TEMP_ARRSBNK
RD_BUF,
=
DST
RD_TRANSFER (SIZE = =256,

incrbBUfi_lNDEx from 0 to 255 do

'FIND THE FAILING READ BUFFER WORD

egin

i; .WRT_BUF [(.RAND_INDEX + .BUF_INDEX), WRD] neq .RD_BUF [ .BUF _INDEX]

then

begin

BAD_BITS = .WRT_BUF [(.RAND_INDEX + .BUF_INDEX), WRD] xor .RD_BUF [.BUF_INDEX];
incr BIT_INDEX from O to 15 do

!FIND THE FAILING BIT(S)

i; .BAD_BITS [.BIT_INDEX] eql ONE

then

!IS THIS A BAD BIT

begin

FATL_CHIP = (.BITS_TSTED + .BIT_INDEX) mod 36.
'CALCULATE THE FAILING ML=11 BIIT

L_CHIP_TBL (.FAIL_CHIP, .PAT_SEL):
end;

end;

'STORE AWAY THE BIT AND PATTERN

Page 156

SEQ 0189

I 15
T0PS=20 Bl ss=16 v2(212)
1981 08:40:22
Z1=Apr=
| BSKEL&G
LE>PMSKL4.BLI.1 (48)
PA:<NEA
6
08:19:0
981
21-Apr=1
" REV A PATCH 00 ROUTINE DECLARATIONS
'ADD 16 BIT TO THE BIT TESTED COUNT
BITS_TSTED = .BITS_TSTED + 16;
4666
:
end;

157

55096190

4667

4L668

0830
4671

3
3

4674
4675

Page

RAND_INDEX = .RAND_INDEX + LOFFSET; 'BUMP THE RANDOM INDEX IF RANDOM DATA
end;

4672
4673

3
:

L676

;

end;

004167

000000G

020300 162706
020304 005067

000034
000000G

020330 016705

037034'

020274

020344
020346
020352
020356

020360

010566
005266

1%:

000407

020376

001010

020404
020410
020414
020416

012746
004767
005726
000407

020372 020127 000001

2%:

177777
164310

3%:

020420
020424
020430
020436
020444

016646
004767
012766
016766
005066

020450 000167
020454 104422
020456 012746
020462 011667

000052
164164
000002 000010
037014 000016
000002
000610

177400
037024°

020466 016603 000056
020472 066603 000004
020476
020502

010367
010346

037026

4%:
5%:
6%:

RAND .PASS,RS

4590
459
4592
4593
4595

MOV
INC

R5,12(SP)
12(SP)

CLR
CLR
TST

JMP

R1
16%
4(SP)
R1
2%

: PAT.SEL,*

4599

R1.41

MOV
JSR
MOV
MOV
CLR

JMP
TRAP
MOV
MOV

MOV
ADD

MOV
MOV

4597
4599

4603

CMP

MOV
JSR
TST
BR

: PAT.SEL
: RAND. INDEX
; PAT.SEL

: TEMP.ARR$BNK.SE,*

-(SP)

BNE

:
:
: OFFSET

52(SP) ,=(SP)

CLR

MOV

020400 016646 000052

4562

#1233,SEED?2
#7622,SEED3
6(SP)

MOV

005046

#34 ,SP
SEED1

MOV
MOV
CLR

BNE

001004

020370

R1,$SAVES

MOV

020362 016646 000052
020366

JSR

SUB
CLR

000012
000012

005001
000167 000732
005066 000004
005701

FRB.DATA.CHIPS ROUTINE DECLARATIONS

FB.DATA.CHIPS:

020310 012767 001233 000000G
020316 (12767 007622 000000G
020324 005066 000006

020334
020340

.SBTTL

52(SP) ,=(SP)

#-1,-(SP)
PC,L.1.0.DATA
(SP) +
5%

52(SP) ,=(SP)
#2,10(SP)
BNK.NUM,SEC,16(SP)
2(SP)
PC,L.RANDOM.DATA
14%
22
#=500,-(SP)
(SP),SIZE

56(SP) ,R3
4(SP) ,R3
R3,DST
R3,-(SP)

: TEMP.ARRS$BNK.SE,*

4606

4599
4610

E
: TEMP.ARR$BNK.S,*
; *,OFFSET
3
; SEC.CNT
:
3

: TEMP_.ARR$BNK.SE,*
: SEC.CNT,»

4611

4615
4616

4618

12(SP) ,R4

000072

R4 ,=(SP)
PC,WRT.CHK.TRANSFE

036772"
000042 000042
020000 000042

ML .ADDR,R5

036772°"
000042 000040
000040

ML .ADDR,RS

177700

#177700,RS
RS,12(SP)
R5,=(SP)
R1.=(SP)
PC.L.CHIP.TBL
(SP)+,(SP)+
13

42(R5) ,42(SP)
;iOOOO.A?(SP)
42(R5) ,40(SP)

RS
40(SP)

4620

009032

34 (SP)
#40000,
13$

32(SP)
10(,RS)

PAT.SEL
,*

4634
4639

4641

* ML.REG

#40,R4

; ML.REG,MLREG
: *,MLREG

R4 .10(RS)

: MLREG,*

32(SP) .R4

ML . ADDR,RS

30(sP)
10(,RS)

30(SP) .R4
ML .DUT .RS

#177770.,RS
#7 .Rb

; *,ML.REG

; ML.REG,MLREG
:

= ,MLREG

RS R4
ML .ADDR RS

. *,MLREG

20(SP)

; BITS.TSTED

R4 .10(R5)

#-400,=(SP)
(SP),SI1ZE

4626

4624
4622
4631

ML .ADDR,RS

ML .ADDR ,RS
000030

: *,FAIL.CHIP
: FAIL.CHIP,*

ML . ADDR,RS
34 (SP)
10(,RS)

4625

* ML.REG,*

ML .ADDR ,RS
42(RS),36(SP)
8$
#2.FLG.REG

8%:

* «,ML.REG

000002 037020"
036772
000010 000034
040000 000034

7%:

4622

. %.ML.REG

036772
000042 000936

* «,ML.REG

164214

021002

158

4619
4618

R4, SRC

000012

020776

S0 0191

161704

016705
010465
00
012746
011667

RAND.INDEX,*

#WRT .BUF ,R&

001232"*
037030"

036772"

;

016604
006304

020504
020510
020512
020516
020522

ROUT INE DECLARATIONS

TOPS=20 Bliss=16 v 2 { 212)
PA : <NEALE>PMSKL4.B L 1.1 (48)

TR TR

BSKEL&
REV A PATCH 00

J 15
21=-Apr-=1981 08:40
21=-Apr=1981 08:19

; MLREG,*

4643

4644

K 15

| BSKEL&
|

REV A PATCH 00

021006

021012

| 021016
. 021022
021024

021030
021032
021034

010367
004767

162634

010346

MOV

22(SP) ,R4

R2,R5
R5

001232 005626°

BEQ

001232°*
005626

R3,34(SP)

AN OHNO
SNNNN-‘—'-‘S

e P
B

4649

; BUF . INDEX,*

4652

; *,BAD.BITS
; BIT.INDEX

4654
4656

; BAD.BITS,*
R5,=(SP)
#177770, (SP)

177770
000001

; BIT.INDEX,*

#1,-(SP)
=(SP)

PC,BL$GT?
#10,SP
RO
11%
R5,=(SP)

000000G
000010

30(SP), (SP)

000030
000044
0000006
000024

#44 ,-(SP)
PC,BL$MOD

163630
000006

11%:

000017

000377

4646

RAND. INDEX, *

; BIT.INDEX,*

000034

005202
020227
003674

;

(R4) ,R3
WRT.BUF
RD .BUF (RS) ,=(SP)

10%:

000020

EX
F
. IND
; BU
; BUF.INDEX,*

#g;.BUF(RL),RD.BUF(RS)

(RS) ,R3
RD.BUF
(SP)+,R3

000034

021224
021232
021234
021240

SEQ 019¢

R3, (SP)

005626"

020527
003730

Page 159

(SP) ,DST
R3,SRC
R3,=(SP)

R2
R2.R4

9%:

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (48)

#RD .BUF ,=(SP)

PC,RD.TRANSFER

000022

021040
021042
021044
021046
021054
21056

21=Apr=1981 08:19: 06

ROUTINE DECLARATIONS

005626°
037026"
037030"

012746
011667

21=Apr=198i 08:40: 22

000026

12%:

RO,24 (SP)
RO, (SP)
R1,=(SP)
PC.L.CHIP.TBL
#6,SP
R5
RS, #17
10%
#20,26(SP)

R2,#377
9%

; BIT.INDEX,*

4659

; BITS.TSTED,*

;

;
;

*,FAIL.CHIP

FAIL.CHIP,*
PAT.SEL,*

; BIT.INDEX
; BIT.INDEX,*

; *,BITS.TSTED
X
F
. INDE
s BU
; BUF . INDEX,*

4661

4658
4654
4666
4646

ottt

REV A PATCH 00

ROUTINE DECLARATIONS

021242
021246

000006
000016
000006
000002
000002

13%:

000014

14%:

000016

177154

15%:

000012
177034

02132¢
;

Poutine Size:

000034
268 words

; Maximum stack depth per

21=Apr=1981 08:19:06

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (48)

6 SP
6 ( SP) ,14(SP)
6 SP

X
INDE.
OF FSET ,RAND

(SP)
§P
g S P ), 16(SP)

SEC.CNT
SEC.CNT,*

062706

L 15
21=Apr=1981 08:40:22
=R
-

BSKEL4

invocation:

(SP)+

16%:

R1
R1,12(SP)

17%:

1%
#34 ,SP

words

17%

;
;

PAT.SEL
PAT.SEL.,*

Page 160

SEQ 0193

4641
4671
4616
4615

4596
4595

4562

m15

BSKELS
REV A PATCH 00

Le77

4,678
4679
4680

k2
.

.
.

.
.
k2
.

L
-

.
.

»
-

.
-

.
.

k2
.

.
-

.
.

4
.

.
.

o
-

.
.

.
-

.
.

4
-

L4
.

4
.

.
-

L4
.

&
.

4
.

.
-

.
.

.
-

.
.

L4
-

4
.

k2
-

4
-

.
.

4
.

.
.

.
v
.

l+e

4716
4717
4718
4719
4720
4721
4722

4723
4724
4725
4726
4727
4728

PA:<NEALE>PMSKL4.BLI.1 (49)

begin

4,683
4684
4685

4715

TOPS=20 Bliss=16 v2(212)

routine FB_CRC_CHIPS (TEMP_ARR$BNK_SEL) : novalue =
!

L686
4687
4L688
4689
46350
4691
4692
4693
4694
4695
4696
4697
L698
4699
4700
4701
4702
4703
4704
4705
4706
4707
4708
4709
4710
4711
4712
4713
4714

21-Apr=1981 08:19:06

ROUTINE DECLARATIONS

4681

4682

21-Apr=1981 08:40:22

FUNCTIONAL DESCRIPTION: FIND THE BAD CRC CHIPS

THIS ROUTINE FINDS ALL THE ADDITIONAL FAILING

CRC CHIPS FOR A SELECTED BANK.

i
:

THIS ROUTINE IS ONLY CALLED IF A UNC ERROR
OCCURED DURING THE FIND BAD DATA CHIP ROUTINE.

i
'

IF A BAD CRC CHIP IS FOUND THEN IT IS STORED
INTO THE BAD CHIP TABLE ALONG WITH ITS FAILING

DATA PATTERN.

!
1

FORMAL PARAMETERS:

TEMP_ARRSBNK _SEL:

STORES THE SELECTED ARRAYS ARRAY AND BANK

SELECT NUMBERS.

:
local

ISTARTS SECTOR TRANSFERS AT RANDOM WRITE BUFFER WORDS

RAND INDEX,

'RANDOM DATA OFFSET
iSAVE LOCATION FOR NIBBLE PROM DATA

OFFSET,
PD_SAVE : bitvector [16];

'CLEAR THE RANDOM DATA OFFSET FOR 1°'S AND 0'S DATA
i INIT THE RANDOM DATA SEED1
i INIT THE RANDOM DATA SEED2

OFFSET = ZERO;
SEED1 = ZERO;

SEED2 = %0'i233';:
SEED3 = %0'7622';

i INIT THE RANDOM DATA SEED3

incr CRC_SEL from CRC_P to CRC_B do
begin

i; not .CHIP_TBL [.CRC_SEL, FAULT]

then

'FIND BAD CRC BITS P, A, B

'DID THIS CRC BIT FAIL DURING 'FB_DATA_CHIPS'

begin

incerA[_SEL from 0 to ONE + .RAND_PASS do
egin

'LOOP THRU ALL PATTERNS

RAND_INDEX = ZERO;

'RESET THE RANDOM INDEX

selectone .PAT_SEL of

'SELECT A PATTERN

set

0] :

DM_1_0_LOAD (.TEMP_ARR$BNK_SEL, ZEROES):

[13

DM_1_0_LOAD (.TEMP_ARRSBNK_SEL, ONES);

'LOAD ZEROES DATA

!LOAD ONES DATA

Page 161

SEQ 0194

N 15

21-Apr-198 08:?8:2 g
21=-Apr=1981 08: :0

BSKEL4

T
R T RT

T T T P P PR
PR TRPPTRTR DRDILR DI TIL R

i P
T R TR R T LALET T TR T

REV A PATCH 00 ROUTINE DECLARATIONS
4729
4730
4731
4732
4733
4734
4735
4736
4737
4738
4739
4740
4741
4742

4743
4744
4745
4746
L4747
4748
4749
4750
4751
4752
4753
4754
4755
4756
4757
4758
4759
4760

PA:<NEALE>PMSKL4.BLI.1 (49)

be
'LOAD RANDOM DATA
DMgRAND LOAD (.TEMP_ARRS$BNK_SEL);THE RANDOM
DATA OFFSET

"ENABLE

OFFSET= 2;
end

tes.,

DM_RD_TRANSFER (SIZE = =256, DST = RD_BUF, SRC = . TEMP_ARRS$BNK _SEL) ;
case .CRC_SEL from CRC_P to CRC_B of

'SELECT THE FAILING CRC BIT

set

'TEST CRC BIT P

[36] :

begin

incrbSEQ_CNT from O to .BNK_NUM_SEC do

!READ THRU ALL SECTORS

egin

BREAK;

1ncrbHRD CNT from 0 to 127 do

'READ THRU ALL WORDS IN SECTOR

'READ OUT THE PROM DATA FOR THIS WORD
PD_SAVE= .ML_ADDR [MLPD, PD_REGI;
'CLOCK THE DATA INTO THE DIAG REG'S
DAT_CLK;
egin

i; not .PD_SAVE [CRC_NIBSLE]

then

'1S THIS A GOOD NIBBLE

begin

i; .ML_ADDR [MLE2, B_36] neq .WRT_BUF [(.RAND_INDEX + .WRD_CNT), BIT_12]

then

begi

L)
?HIP TBL (.CRC_SEL, .PAT_SE
G THIP AND PATTERN
3

endag,

4762
4763
4764
4765
4766

'SAVE THE FAILIN

end;

4767

RAgD_INDEX = .RAND_INDEX + .OFFSET; !BUMP THE RANDOM INDEX
end;

end;

'TEST CRC BIT A

[57] &

begin

incrbSEQ_CNT from 0 to .BNK_NUM_SEC do
egin

BREAK;
incr WRD_CNT frcm O to 127 do

!READ THRU ALL SECTORS

.
'READ THRU ALL WORDS IN THIS SECTOR

162

0195
SEOge

(otherwise] :

4761

4768
4769
4770
4771
4772
4773
4774
4775
4776
4777
4778
4779
4780

TOPS=20 Bliss=16 v2(212)

BSKELG

| REV A PAT(HM 00

21-Apr-1981 08:40:22

21=Apr=1981 08:19:0€

ROUTINE DECLARATIONS

;;egot .PD_SAVE [CRC_NIBBLE]"~

4786

:;eaML_ADDR [MLE2, B_37] neq .WRT_BUF [(.RAND_INDEX + .WRD_CNT), BIT_13]

::gHIP-TBL (.CRC_SEL, .PAT_SEL):

4791

4809
4810
4811
4812

TR
TRTR
LRTR T

4813

4814
4815
4816
4817
4818
4819
4820
4821
4,822
4823
4824
4825
4826

4827
4828
4829
4830
4831

4832

!IS THIS A GOOD NIBBLE

begin

4787
4788
4789
4790

4805

Page 163

SEQ 0196

'CLOCK OUT

DAT_CLK;

4783
(784
4785

4806
4807
4808

(49)

'GET THIS WORDS PROM DATA
gggngf .ML_ADDR [(MLPD, PD_REGI;
DATA INTO THE DIAG REG'S

4781

4782

4792
4793
4794
4795
4796
4797
4798
4799
4800
4801
4802
4803
4804

TOPS=20 Bliss=16 V2(212)

PA:<NEALE>PMSKL4.BLI.T

'SAVE THE BAD (HIP AND PATTERN

end;

zazq_INDEx = .RAND_INDEX + .OFFSET; !BUMP THE RANDOM INDEX
end;

'TEST (RC BIT B

[38] :

begin

incr SEC_CNT from 0 to .BNK_NUM_SEC do

'READ ALL SECTORS

BREAK:

incr WRD_CNT from 0 to 127 do

'READ ALL WORDS IN THIS SECTOR

THE PROM DATA FOR
'GET
[MLPD, PD_REGI;
359§2v5 .ML_ADDR‘CLOCK
REG'S
DIAG
INTO
OUT DATA
DAT_CLK;

I;egot .PD_SAVE [CRC_NIBBLE]

'1S THIS A GOOD NIBBLE

begin

:LeafiLADDR [MLE2, B_38] neq .WRT_BUF [(.RAND_INDEX + .WRD_CNT), BIT_14]

::gHIP_TBL (.CRC_SEL, .PAT_SEL):

'SAVE THE BAD (HIP AND PATTERN

end;
end;

Q:ZQ_INDEX = ,RAND_INDEX + .OFFSET; !BUMP THE RANDOM INDEX

————

C 16

21=Apr=1981 08:40:22
21=-Apr=1981 08:19:06

BSKEL&
REV A PATCH 00 ROUTINE DECLARATIONS
3

4833

(834
4835

4837

4839

tes;

enq;

4838

:
3

4840
4841

4843

021324

021330

4842

004167

162706

end;

021360
021364

012701
0i0105

000044

00¢€ 305

021370
021374
021376
021402

005765
100002
000167
016705

021416
021420

005002
000167

021430

001004

021406
021412

010566
005266

021424 005016
021426 005702

001052
037034°
000010
000010

000001

021450 016646

000060

021446

021454
021460
021464
021466

001010

(12746
004767
005726
000407

000060

021500 012766

000002

004767

021506
021512
021516
021522

012716
011667
012746
011667

2%:

TST
BPL
JMP
MOV

3%:

ASL

157770

177400
037024'
005626°
037026

MOV
INC

CLR
JMP

CLR
TST

BNE

MOV
\

177777
160400

021470 016646
021474

1%:

MOV
MOV

001016

020227

021442

005046
000407

CLR
MOV
MOV

026626

000060

021436
021440

CLR

000000G
001233 0C0000G
007622 000000G

016646

021432

SuB

000042

000002

021366

.SBTTL
FB.CRC.CHIPS:
JSR

000000G

(005066

005067
(012767
012767

'CLEAR THE SINGLE STEP DMA MODE

CLR_MBUS;

021334

021340
021344
021352

end

end;

4836

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (49)

4%:

6%:
000004

7%:

R1,$SAVES

4677

2(SP)

; OFFSET

#44 ,R1
R1,RS

F
3
3

; *,CRC.SEL
; CRC.SEL,*

4704
4705
4706
4707
4709
4712

4716

#42,SP

SEED1
#1233,SEED2
#7622 ,SEED3
RS

CHIP.TBL(RS)
2%
27%
RAND .PASS ,RS
RS,10(SP)
10(SP)

R2
26$%

: RAND. INDEX
: PAT.SEL

4718
4720

60(SP) ,=(SP,

: TEMP.ARR$BNK.SE,*

4724

R2,.#1

: PAT.SEL,*

4720

60(SP) ,=(SP)

: TEMP_.ARRS$BNK.SE,*

4727

60(SP) ,=(SP)

: TEMP_ARRS$BNK .SE,*

4720
4731

#2,4(5P)

; *,OFFSET

4732
4734

-(SP)
5%

BNE

CMP

MOV
JSR
TST
BR

MOV

JSR

MOV

MOV
MOV
MOV
MOV

: PAT.SEL

(SP)
R2

CLR
BR

MOV

5%:

FB.CRC.CHIPS ROUTINE DECLARATIONS

#-1,~-(SP)
PC,DM.1.0.LOAD
(SP)+
7%
PC,PTM.RAND.LOAD

#-400, (SP)
(SP) ,SIZE
#RD .BUF ,=(SP)
(SP) ,DST

021544
021550
021552
021556
021560
021562
021564
021572
021576

(SP) ,SRC
PC,DM.RD.TRANSFER
R1,RS
#44 RS

157116

000044
8%:

037014 000014
000012

036772"
000046 000046
000046 000042
036772
000044

4738

9$-8%

14%-8%

9%:

203-8%
BNK .NUM.SEC,14(SP)

10%:

11%:

12(SP)
13%

R3
ML .ADDR,RS
4L6(RS) ,46(SP)

46(SP) ,42(SP)
ML .ADDR,RS
24 (RS) ,44(SP)

4744

SEC.CNT

4745
. CNT
WRD

* ML .REG

#20,R4

,
24 (RS)
R4

; MLREG,*

*,PD.SAVE+1

#2,43(SP)
12%

036772
000034 000040

ML .ADDR,R5S
34 (R5) ,40(SP)

000006

6§SP),RS

4748
4750

ML .REG,PD.SAVE

; *,ML.REG
; ML.REG,MLREG
; *,MLREG

44 (SP) ,R4

000043

4753
4757

* ,ML.REG

,*
. CNTD
WR
RAND
. INDEX , *

WRT .BUF (RS) ,RO

001232°*
167777
000040
167777

RO
#167777
4L0(SP) ,R4

; ML.REG,*

R4 ,RO
12%
R1,=(SP)
R2,=(SP)
PC.L.CHIP.TBL

: CRC.SEL,*

8167777
,Ré4

000006
000014

13%:

11%
10(SP, .6(SP)
12(SP)
12(SP) ,14(5P)

037014"* 000014
000012

14%:

000177

gOO

12%:

(SP)+, (SP)+
R3
R3,#177

—

163074

022014

;3 CRC.SEL,»

8% (RS) ,PC

ML .ADDR,RS

000012
000012

165

021556

000010

56096198

. SE ,*
: TEMP,ARRSBNK

021532
021536
021542

64 (SP) ,=(SP)

000064
037030*

016646

ROUT INE DECLARAT JONS

N, NN,

| 021526

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (49)

Be N

BSKEL&
REV A PATCH 00

.NUM,SEC,14(SP)

cony
oA~

.
|

12(SP)
1

4760

PAT.SEL,*

; WRD.CNT

4759
4748

; WRD.CNT,*

; OFFSET,RAND. INDEX
;s SEC.CNT
;5 SEC.CNT,*

4768
4744

4739
4776

: SEC.CNT

[}

036772"
000046 000036
000036 000042
036772"
000034

R3
ML .ADDR,RS

16%:

4L6(RS),36(sP)

(SP)
SP)
36(.42
ML.ADDR,RS

24 (RS) , 34 (SP)

000043

036772
000034 000032

#2.43(SP)
17$
ML .ADDR,RS

*,PD.SAVE+1

MLREG,*

34 (RS) ,32(s5P)

* ,ML.REG
*
WRD.CNT,
RAN
. INDEX
D
,*

#157777
R0

32(SP) R4

#157777
R4

4785
4789

ML.REG,*

R4 ,RO

17$
R1,=(SP)
R2,=(SP)
PC.L.CHIP.TBL
(SP)+, (SP)+

162656

17%:

000177
000010
000012
000012

4777
4780
4782

WRT .BUF (RS) ,RO

157777

022174
022202
022206
022214
022216
022220
022226
022232
022234
022236
022240
022244
022252
022260
022264
022272
022276
022302
022306
022312
022320

166

* ML .REG

R4 .24 (RS)

6(SP) ,RS

55098199

ML .REG,PD.SAVE
ML .REG,MLREG
* ,MLREG

001232°
157777
000032

022164
022166
022172

. CNT
WRD

34 (SP) R4
#20,R4
ML .ADDR,RS

R3.RS

000006

15%:

022016
022020

ROUTINE DECLARATIONS

TOPS=20 Bliss=16 v2(212)
PA:<NEAL E>DPMSKL4.BLI.1 (49

REV A PATCH 00

E 16
21=Apr=1981 08:40:22
21=Apr=1981 08:19:06

e ——————

BSKEL4

000014

037014" 000014
000012

18%:

000046 000030
000030 000042
036772"
000024 000026

OF FSET ,RAND . INDE X
SEC.CNT
SEC.CNT,*

12(SP)
24%

. CNT
WRD

46(RS), 30(SP)

* ML .REG

(SP)
.42P)
30(S
ML .ADDR,RS

24(R5) ,26(SP)

BITB

- SEC.CNT

ML .ADDR,RS

22%:

BISB

000043

16%
10(SP) ,6(SP)
12(SP)
12(SP) ,14(SP)
15%

25%
BNK.NUM,SEC,14(SP)

19%:
20%:

21%:

036772"

. CNT
WRD
*
WRD.CNT,

R3,#177

000006

CRC.SEL
,*

26(SP) R4
#20,R4

ML .ADDR ,RS

R4 .24 (RS)
#2°43(SP)

23%

4792

PAT.SEL.,*

4791
4780
4799
4776

4738
4807
4808
4811

4813

ML .REG,PD.SAVE
* ML .REG
ML .REG,MLREG
* ,MLREG

; MLREG,*

; *,PD.SAVE+]

4LB14

F 16

REV A PATCH 00

022322
022326
022334
022336
022342
022344
022350
022354
022360

016705
016566
010305
066605
006305
016500
042700
016604
042704

ROUTINE DECLARATIONS

036772"

000034

MOV

(C00024

000006

001232°
137777
000024
137777

23%:

000177
000010
000012
000012

000006
000014

24%:

000006

25%:

000010

26%:

176750

000046
176674
036772
000010 000014
000014
000040
036772
000010
036772"

27%:

28%:

036772"

Maximum stack

BIC

R4
#137777

INC
CMP
BLE

ADD
INC
CMP
BLE
ADD
INC

(MP
BGT
JMP
INC
CMP
BGT
JMP
MOV
MOV
MOV
BISB
MOV

MOV
ADD

RTS

000207

; Routine Size:

WRT .BUF (R5) ,RO
#137777 ,R0

MOV
MOV
MOV
MOV
BIC
BICB
BIS
MOV

177770
000007

;

MOV
BIC

MOV

000010 000012
000012
036776"

022572

R3,R5
gésp>,ns

CMP
BEQ
MOV
MOV
JSR

162440

340 words
depth per invocation:

28 words

)
, 24 (SP)
34 (R5

R4 ,RO
23%
R1,=(SP)
R2,=(SP)
PC,L.CHIP.TBL

CRC.SEL,*

10(SP) ,6(SP)
12(SP)
12(SP) ,14(SP)
218
#6,SP
R2

R2,10(SP)
27%
3%
R1
R1.,446
28%
1%

ML .ADDR,RS
)
, 14 (SP)
10(RS5
14 (SP) R4
#40,R4

ML .ADDR,RS

R4.10(RS)

R
ML .ADDRS
10(RS) ,12(sP)
12(SP) R4
ML .DUT ,RS
#177770.,RS
#7.Ré4
RS ,R4
ML .ADDR,RS

R4 .10(R5)

#.72,SP
PC

55096200

* ,ML.REG

ML .REG,*

R3
R3, #4177
22%

167

,*
WRD.CNT
RAND
. INDEX , *

24 (SP) R4

(SP)+,(SP)+

4820

ML .ADDR,RS

MOV
ADD

MOV

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (49)

' BSKEL&

21-Apr=1981 08:
21=-Apr=1981 0

4823

PAT.SEL,*

D
. CNT
WR
*
WRD.CNT,

OF FSET ,RAND . INDE X
SEC.CNT

4822
4811
4830

4807

SEC.CNT,*

PAT.SEL
PAT.SEL.,*

CRC.SEL
CRC.SEL.,*

4717
4716

4709

4840

:
* ,ML.REG
ML .REG,MLREG

* ,MLREG

*
MLREG,

* ML .REG

ML .REG,MLREG

* ,MLREG
* ,MLREG
MLREG,*

4677

G 16

| BSKEL&

e T

R L

R R T L

PR T ETETE L

TETR T L L

REV A PAT(H 00

022574

4844
4845
4LB46
4847

4848
4849

routine FB_CHIPS (TEMP_ARRSBNK_SEL)
+e

FIND BAD CRC CHIP ROUTINES.

IF THE FB_DATA_CHI® ROUTINE DETECTES A UNC
ERROR THEN THE FB_CRC_CHIP ROUTINE IS NOT
CALLED.

FORMAL PARAME TERS:

TEMP_ARR $BNK _SEL

STORES THE SELECTED ARRAYS ARRAY AND BANK
SELECT NUMBERS.

1 CRIP TBLTMO);

'FIND ALL THE BAD DATA (HIPS 0-=35 IN THIS BANK
FB_DATA_CHIPS (.TEMP_ARRSBNK_SEL);
it .FLG_REG [F_UNC_ERR_FLG] then FB_CRC_CHIPS (.TEMP_ARRSBNK_SEL);
. 'FIND ALL THE BAD CRC CHIPS IN THIS BANK
end;

000002

004767
016646
004767
032767
001405

161566

; Routine Size:

'CLEAR THE UNCORRECTABLE ERROR FLAG
'INIT THE BAD CHIP TABLE

FLG_REG [F_UNC_ERR_FLG] = CLR_FLG;

142767

004767
005726
005726
00207

novalue =

THIS ROUTINE CALLS THE FIND BAD DATA (HIP AND

4855

4869
4870

Page 168

SEQ 0201

FUNCTIONAL DESCRIPTION: FIND BAD CHIPS

4854

4867
4,868

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (50)

begin

4853

016646

022642

ROUTINE DECLARATIONS

4850
4851
4852

4856
4857
4858
4859
4860
4861
4862
4863
4864
4865
4866

21-Apr=1981 08:40:22
21=Apr=1981 08:19:06

000002
175456

000002

.SBTTL
FB.CHIPS:
BICB
JSR

037020*

MOV
JSR

037020°

176466
1%:

20 words

; Maximum stack depth per

invocation:

2 words

4864
4865

PC,FB.DATA.CHIPS

MOV

4(SP) ,=(SP)
PC,FB.CRC.CHIPS

TST
RTS

TEMP .ARR$BNK
. SE , *

2(SP) ,=(SP)

q%.FLG.REG

JSR
TST

4863

#2,FLG.REG
PC,I.CHIP.TBL

BIT

BEQ

000004

FB.CHIPS ROUTINE DECLARATIONS

+
(SP)
+
)
(SP

;

TEMP.ARRS$BNK
,SE ,*
4845
4844

H 16
08:40:226
21-Apr-1981
981 08:19:0

BSKEL&
REV A PATCH 00 ROUTINE DECLARATIONS
4871

4872
4,873

:
:

LB74

21-Apr=1

routine PM_THIS_BANK (TEMP_ ARR$BNK_SEL) : novalue =
begin

14+

;

22;2

;

4877

2ggg

:
3
3

FUNCTIONAL DESCRIPTION: PROM MAINTENANCE THIS BANK
THIS LOOPS ON THE ROUTINES THAT WILL

FIND ALL THE NEWLY FAILING CHIPS IN

4881
4882
4,883

!
!
!

THE BLAST TABLE WILL GET LOADED WITH
ALL THE NEWLY FAILING ROW AND COLUMN
ADDRESSES AS A RESULT OF THESE CALLED

4886

4888

4L878

4884
4,885

:
3

4,887

4889

4890

4,891

4892

zggg

4893

figgg

4898

4900

;

4899

:
:

:
.
:
:

_SEL :
TEMP_ARRS$BNK

STORES THE SELECTED ARRAYS ARRAY AND BANK
SELECT NUMBER.

Local

BAD_(HIP,

LST_PAT;

BAD_CHIP = S_CHIP_TBL (ZERO);
it .BAD_(CHIP geq ZERC

then

begin
do

4907
4908

:
;

FORMAL PARAMETERS:

4903

:
3

3
;

ROUT INES.

FLG_REG [F_ALL_BAD_CHIP] = CLR_FLG;

4904

:
:

!
!

THIS ARRAY BANKS.

238}

4905
4906

4909
4910

23};
23}2

4915
4916

231;
2353
4921

4922

v2<212)(51)
Bliss=16.BLI.T
TOPS=20 E>PMSKL4
PA:<NEAL

b:qin

SEED1 = ZERO;
SEED2 = %o' 1233'-

{PCINTS TO BAD CHIPS TO BE TESTED

ILAST PATTERN TEST FOR THIS FAILING CHIP
'FIND A BAD CHIP TO TEST

'ARE THERE ANY CHIPS TO TEST
'CLEAR THE ALL BAD FLAG

"INIT THE RANDOM DATA SEED1
'INIT THE RANDOM DATA SEED?2

"INIT THE RANOMD DATA SEED3
SEED3 = %0'7622';
ICLEAR THE ENTERED ERROR MAP FLAG
;
CLR_FLG
=
TEREDJ
FLG_REG [F_ERR MAP_EN

BREAK;
i ERROR MAP 0:

LST_PATTM ZERO:
do .

INIT THE ERROR MAP

‘LAST PATTERN STARTS AT ZERO
'TEST ALL FAILING PATTERNS FOR THIS BAD (HIP

e in
LST PAT = FAILING CHIP (.TEMP_ARRSBNK_SEL, .BAD_CHIP, .LST_PAT);
L_ERROR MAP LTEMP_ ARR$BNK _SEL,”.BAD_CHIP);
TLOAD THE ERROR MAP WITH FAILING ROWS AND COLUMNS
4
en

until .CHIP_TBL [.BAD_CHIP, PATS] eql ZEROES:
it .FLG_REG [F_ERR_MAP_ENTERED]

then

'REPEAT UNTIL ALL PATTERNS ARE TESTED

'WERE ANY FAILING ROWS/COLS DETECTED

0202169
seoge

I 16

BSKELS

REV A PATCH 00

ROUTINE DECLARATIONS

QERROR-MAP (. TEMP_ARRSBNK_SEL, .BAD_CHIP);
in

492%

4924

4925

4926
4927
4928
P 4929
4930
4931

(A_B ¢_PRINT,

. TEMP_ARRIBNK_SEL<.BNK_SEL_POS, BNKSSEL_SIZE>, . BAD_CHIPY;

SEQ 0203

(REPORT WHERE

'CLEAR THIS CHIPS FAULT FLAG
CHIP_TBL [.BAD_CHIP, FAULT] = CLR_FLG;
'"FIND THE NEXT FAILING CHIP
BAD_THIP = S_CRIP_TBL (.BAD_CHIP);
end

until (.BAD_CHIP Llss ZERO) or (.FLG_REG [F _ABORT_ARRAY1);

PM.THIS.BANK ROUTINE DECLARATIONS

R1,$SAVES

MOV

RO.R3
5s

CLR
JSR

0 037020°'
000000G

001233
007622
000004

0000006
0000006
037020°*

BLT

BICB
CLR
MOV
MOV
BI(CB
TRAP
JSR
CLR
MOV
ASL

000010

MOV
MOV
MOV
MOV
JSR
MOV
MOV
MOV
JSR

077777

026626"

000004

037020°

'REPEAT UNTIL ALL BAD CHIPS TESTED

.SBTTL

PM.THIS.ngK:

000000G

010246

Page 170

' INTERIGATE THE ERROR MAP

0); 'REPORT THE UNCONFIRMED ERROR _SI7
(ERR 4, UNC _CHIP_MSG,_ARRS
Engsr
BNK_SEL<.ARR_SEL_POS, ARRS$SEL
.TEMP
PRINTB

4932

022650
022652
022656
022660
022662
022670
022674
022702
022710
022716
022720
022724
022726

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4&.BLI.1T (51)

begin

4933
4934
4935
4936
4537
4938
4939
4940

022644

21-Apr=1981 08:40:22
21=Apr=1981 08:19:06

ADD

BIT
BNE

BIT

BEQ
MOV

=(SP)
PC,S.CHIP.TBL

4871
4896

; *,BAD.(HIP

#20,FLG.REG
SEED1
#1233,SEED?2
#7622 ,SEED3
#4 ,FLG.REG

22
PC,1.ERROR.MAP
R4
R3,R1
R1

16(SP) ,R2
RZ,=(SP)
R3,-(SP)
R4 ,-(SP)
PC,L.FAILING.CHIP
RO,R4
R2,(SP)
R3,=(SP)
PC,L.ERROR.MAP

- 4898
4901
4905

4907
4908

; LST.PAT
; BAD.CHIP,~*

4910
4911
4919

;

4915

TEMP.ARRS$BNK.SE
,*

; BAD.CHIP,*
; LST.PAT,#

; *,LST.PAT

4916

; BAD.CHIP,*

#10,5P

4914
4919

#4 ,FLG.REG

4921

g;????,(HXP.TBL(R1)
38
R2,=(SP)

L9204

2 SKEL&

REV A PATCH 00

023010
023012

- 023016

023020
023022

J 16
21=-Apr=1981 08:40:22
21=-Apr=1981 08:19:06

ROUTINE DECLARATIONS

010346
004767 174716
000447
104454
000004
000526°
000000
010346
012746 000022
060616
016746 037012°*
012746 000002
005046
004767 000000G
022626
000002
000024

54
&

; BAD.CHIP,*

ADD

SP, (SP)

;

BNK. SEL .POS,=(SP)

JSR
CMP

PC,BLSGT2
(SP)+, (SP)+

MOV
MOV
CLR
JSR
CMP
MOV
MOV
MOV
MOV

026626"

4%:

170446

037020°
5%:

023174
109 words 3

: Maximum stack depth per invocation:

12 words

UNC.CHIP.MSG
0
R3,=(SP)

MOV

TRAP
ADD

BIC

MOV
JSR
MOV
CMP
ST
BLT
BIT
BEQ
ST

RTS

SEQ 0204

4921
4928

#22,=(SP)

Page 171

; BAD.CHIP,*

"WORD
"WORD
MOV

MOV
MOV
ADD

000002
002120°*
000004

; Routine Size:

TRAP
JWORD

B8R

MOV
CLR

000000G

000100

R3,=(SP)
PC . IN.ERROR.MAP

MOV

037010°*
000004

000006
100000

MOV
JSR

T0PS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (51)

4930

TEMP_,ARRS$BNK.SE,*

#2,=(SP)
-(5P)

RO,2(SP)
#24, (SP)
SP, (SP)

ARR. SEL .POS,=(SP)
#4,~(SP)
-($P)

,*
; TEMP_ARR$BNK.SE

PC,BLSGT2
(SP)+, (SP)+
RO,2(SP)
,
(SP)
#A_B.C.PRINT
#4,=(SP)
SP.RO
14
#6,SP

(R1)
0,
TBL
00
CHIP.
#100
R3, (SP)
PC.S.CHIP.TBL
RO.R3
(SP)+,(SP)+
R3
5%
#100,FLG.REG
1%
(SP)+

i P,

; BAD.CHIP,*

; *,BAD.CHIP
; BAD.CHIP

4927
4933
4934
4904
4936

4872
4871

K 16

BSKEL&

REV A PATCH 00
4941
L4942

.
.

6943

4944

4945

4946

21-Apr=1981 08:40:22
21=-Apr=1981 08:19:06

ROUTINE DECLARATIONS

.
.

Page 172

SEQ 0205

routine CAL_CHK_SUM : novalue =
begin

FUNCTIONAL DESCRIPTION: CALCULATE THE CHECK SUMS
THIS ROUTINE WILL CALCULATE THE NEW

4947
4948
4949
4950

T0PS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (52)

CHECK SUMS FOR THE NEW PROM DATA TO
BE BLASTED INTO THE SELECTED ARRAYS
PROMS
.

4951

4952
4953
4954
4955
4956
4957

.
.

.
-

.
.

4958
4959
4960
4961
4962

e
.

.
.

4963

.
-

.
.

L4
-

4
.

.
.

.
-

.
.

4
.
.

.
.

ks
.

.
.

4
-

ke
.

.
.

e
-

.
-

.
.

.
-

.
.

4964
4965
4966
4967
4968
4969
4970
4971
4972
4973
4974
4975
4976
4577
4978
4979
4980
4981
4982
4983
4984
4985
4,986
4987
4988
4989
4990
4991
4992

local

PD_SAVE : bitvector [16],
PD-0_9 _CNT,
CHK_SUM_CNT,

iSTORES THE NUMBER OF COUNT TO UPDATE THE (HECK SUMS WITH

REMAINDER;

Label

'LEAVE LOOP LABEL

map

'STORES THE PROM DATA TO BE CALCULATED
'COUNTS NUMBER OF BITS 0-9 SET
'COUNTS THE OLD CHECK SUM VALUE

ERROR_MAP : blockvector [4, 512] volatile;

incr BNK_SEL from 0 to 3 do
begin

if .BAD_BNK_REG [.BNK_SEL]

then

'MAKE THE ERROR MAP LOOK LIKE THE BLAST TABLE

'LOOK AT ALL THE BANKS
'1S THIS A BAD BANK

begin

incrbpbquD_SEL from 0 to .MAX_CHIP_COL*2 - 1 do

'LOOK AT ALL THE ROWS AND COLUMNSNS

egin

i'f\ .BLAST_TBL [.BNK_SEL. .PD_WRD_SEL, FULL_WRD] neq ZERO

'1S THIS LOCATION ENPTY

then

begin

PD_0_9 CNT = ZERO;
(HE_SUM_CNT = ZERO;

'CLEAR THE COUNT
'CLEAR THE COUNT

incr CNT from 0 to 9 do

'COUNT THE # OF BITS SET INO - 9

PD_SAVE = .BLAST_TBL [.BNK_SEL, .PD_WRD_SEL, FULL_WRDJ;

'GET THIS PROM DTAT WORD

if .PD_SAVE [.CNT] then PD_O_9_CNT = .PD_O_9_CNT + 1

'GET THE OLD COUNT
CHK_SUM_CNT = .PD_SAVE<10, 3>;
1>;
VE<13,
CHK_SUM_CNT = ,CHK_SUM_CNT + .PD_SA
1>;
VE<14,
CHK”SUM_CNT = ,CHKZSUM_CNT + .PD_SA
CHK"SUMTMCNT = .CHK_SUM_CNT + .PD_SAVE<i5, 1>;
'HOW MANY MORE TO ENTER
REMAINDER = .PD_0_B_CNT = .CHK_SOM_CNT;

L 16

BSKEL4

~ REV A PATCH 00
4993

4994
4995
4996
4997
4998
4999
5000

4
.

.
.
B

5001
5002
5003
5004
5005
5006
5007
5008
5009
5010
5011
5012
5013
5014
5015
5016
5017
5018
5019
5020

.
L4
L4
.
.
k2
4
.

.
.
L4
.
L4
.

L4
kS
.

L
4
L

21=-Apr=1981 08:40:22
21=-Apr=1981 08:19:06

ROUTINE DECLARATIONS

i; .REMAINDER geq &

then

i; .PD_SAVE<12, 1> eql ZERO
then

begin

then

begin

BLlsr 8L [. BNK_SEL,

end;

i; .REMAINDER geq 2

then

'DO WE ADD IN MORE THAN 1

begin

if .PD_SAVE<11, 1> eql ZERO

then

begin

'IS THIS BIT ALREADY SET

PD SAVE<11, 1> = SET_FLG;
REMAINDER= .REMAINDER = 2;

'SET THIS BIT
!SUBTRACT THE WEIGHT

if .REMAINDER eql ZERO

'ARE WE DONE

then

begin

BLAST_TBL [.BNK_SEL, .PD_WRD_SEL, FULL _WRD] = .PD_SAVE;

ERROR"MAP [.BNK_SEL, .PD “WRD_SEL, FULL wRDJ = BLIST TBL [.BNK_SEL.

.PD_WRD_SEL FULL_WRD];
'LEAVE THE LOOP
leave A7

.
L4
k2

end;

4
k2

end;

.PD SAVE;

end;

'ARE WE ALL DONE

end;

'SET THIS BIT

BLAST_TBL [.BNK_SEL, .PD_WRD_SEL, FULL_WRD]
ERROR"MAP [ .BNK SEL. .PD"WRD_SEL, FULL_WRDJ]
.PD_WRD_SEL, FULL_WRDJ;
'LEAVE THE LOOP
leave A7

SET _FLG;

it .REhAJNDER eql ZERO

'1S THIS BIT ALREADY SET

REMAINDER = REMAINDER - &4; 'SUBTRACT ThE WEIGHT

PD “SAVE<12,

'DO WE ADD IN MORE THAN 3

begin

TOPS=20 Bliss=16 V2(212)
PA:<NEALE>PMSKL4.BLI.1 (52)

if .REMAINDER geq 1

then

)
begin

'DO WE ADD MORE THAN 0O

it .PD_SAVE<10, 1> eql ZERO

then

'IS THIS BIT ALREADY SET

173

SE095206

M 16

BSKELS&

REV A PATCH 00

21=Apr=1981 08:40:22
21=Apr=1981 08:19:06

ROUTINE DECLARATIONS
begin

PDgSAVE<10

SET _FLG;

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1

(52)

'SET THIS BIT

REMAINDER = REMAINDER = 1; 'SUBTRACT THE WEIGHT

.
.

if .REMAINDER eql ZERO

then

'ARE WE DONE

BL ST TBL [.BNK_SEL, .PD_WRD_SEL, FULL_WRD]

ERRORTMMAP [.BNK_SEL, .PD_WRD_SEL, FULL_WRD]

.PD_WRD_SEL, FULL_WRD];
'LEAVE THE LOOP
leave AT

L
L4

.PD SAVE;

.BLAST_ 8L L. BNK _ SEL

end;

.
.

end;

.
.

end;

i; .PD_SAVE<13, 1> eql ZERO !IS THIS BIT ALREADY SET

.
o
.

then

begin

PD SAVE<13, 1> = SET_FLG;

L4
4
.

REMAINDER= .REMAINDER = 1;

if .REMAINDER eql ZERO

then

begin

FOLL_WRD];
leave A;

.
L4

end;

.
.

4
.
.

.
.
L4
.

then

‘

begin

PD SAVE<14, 1> = SET_FLG;

REMAINDER= .REMAINDER = 1;
it .REMAINDER eql ZERC

then

'ARE WE DONE

begin

FULL_WRD];
leave A;

.
’

end;

'SUBTRACT THE WEIGHT

ERROR_MAP [.BNK_SEL, .PD_WRD_SEL, FULL “WRD]

‘

'SET THIS BIT

BLAST_TBL [.BNK_SEL, .PD_WRD_SEL, FULL_WRD]

'LEAVE THE LOOP

if .PD_SAVE<14, 1> eql ZERO !'1S THIS BIT ALREADY SET

APD_SAVF;

end;

'ARE WE DONE

ERROR_MAP [. BNK_SEL, .PD_ WRD_SEL, FULL “WRD] = .BLAST_ TBL [.BNK_SEL, .PD_WRD_SEL,

'SET THIS BIT

BLAST_TBL [.BNK_SEL, .PD_WRD_SEL, FULL _WRD] =

'LEAVE THE LOOP

end;

PD_SAVE<15, 1> = SET_FLG;

'SET THE BIT

.PD_SAVE;

ge 174

SEO 0207

BLIST 6L C. BNK_SEL, .PD_WRD_SEL,

N 16

21-Apr=1981 08:48:226

BSKEL&

REV A PATCH 00 ROUTINE DECLARATINNS

21-Apr=1981 08:19:0

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.1 (52)

Page 175

SEQ 0208

;

5097

2833

SEL, FULL_WRD] = .PD_SAVE; [.BNK_SEL, .PD_WRD_SEL, FULL_WRD]
BLAST_TBL [.BNK_SEL, .PD_WRD__SEL,
FULL_WRD] = .BLAST_TBL

3
:
H
:
:
;

5100
5101
5102
5103
5104
5105

end;

5108

;

5106
5107

:
3

023176

004167

ERRORMAP [ .BNK_SEL. .PD_WRD

end;
end;
end;

end;

0000006

023202 162706 000016

023206 005046
023270 ©11600
023212
023214
023216

006200
006200
006200

.SBTTL
CAL.CHK.SUM:

010046

023236
023242
023244
023250
023254

012746
005046
004767
062706
006000

006366

MOV

000000G
000010

023276 911600

023300 * "000300
023302 305000
023304 006300
023306 010066

000012

023312 005066 000004
023316 000167 000456
023322 016605 000004
023326 066605
023332 006305
023334 012766
023342 060566

2%:

000012

026770* 000010
000010

38
j

023346 005776 000010
023352
023354

001002
000167

000414

023360 005066 000006

4%:

RO,=(SP)

(SP) ,RO

:
; BNK.SEL,*

4972
4975

4(SP)
16%
4(SP) RS

: PD.WRD.SEL
: PD.WRD.SEL,*

4972
4975

: PD.0O.9.CNT

4579

14 (SP)

RO
RO
RO
RO, 12(SP)

ADD
ASL
MOV
ADD

12(SP) ,RS
RS

BNE
JMP

CLR

4965
4968

#1,-(SP)
-(5P)
PC,BLSGT2
#10,SP
RO

SWAB
C(LRB
ASL
MOV

4941

: BNK.SEL,*

2(SP) ,=(SP)

2%
17%
MAX.CHIP.COL,14(SP)

CLR
JMP
MOV

R0
#BAD .BNK .REG,

BLO
JMP
MOV
ASL

: BNK.SEL
. BNK.SEL,*

-(SP)
(SP) ,RO

#177770, (SP)

MOV

#16,SP

BIC

MOV
CLR
JSR
ADD
ROR

000001

000014

RO
RO
RO

MOV

023232 042716 177770

023272

ASR
ASR
ASR

ADD

023226 016646 000002

023256 103402
023260 000167 000530
023264 016766 036774' 000014

R1,$SAVES

CLR
MOV

023220 062700 037016°
023224

JSR

SUB

1%:

CAL.CHK.SUM ROUTINE DECLARATIONS

#BLAST.TRI ,10(SP)
RS,10(SP)

210(sP)
4%
15%

6(SP)

000002
000010

CLR

CO0C16

2(5P)
alo(SP),16(SP)

5%:
ASR
MOV

000016

R4 .=(SP)

#177770, (SP)

177770
000001
ADD
ROR

000006
000011

,R4
#177770
R4,2(SP)

000002

020000

6%:

000002
040000

#20000,16(SP)
6%

000016

7%:

006002
000016

R4
R4 ,2.5P)
R4

#40000,16(SP)
7%
R4

R4 ,2(SP)
R4
16(SP)

8%:

000002

R4
R4,2(SP)

6(SP> ,R1
2(SP) ,R1
R1,44
9%

—
[

; CNT
s CENT ,»

4983

=
; PD.SAVE

4987

,
CNT
*,CHK.SUM

; *,PD.SAVE
; *,CHK.SUM.CNT
. *,PD.SAVE

: *,CHK.SUM.CNT

PD.SAVE
CNT
«, CHK . SUM.

PD.0.9.CNT,REMAINDER
CHK. SUM. CNT ,REMAINDER
REMAINDER,
*

010000

000016

g10000.16(SP)

: *,PD.SAVE

010000

000016

#10000,16(SP)
#4 R1
14%

* PD.SAVE

000004

4980
4981
4983
4985

: CNT,»

; PD.0.9.CNT

R&
R4
R4

177770

CNT
=
CN,T

SEQ 0209

#1,-(SP)
-(SP)
PC,BLSGT2
#10,SP

5%
16(5SP) ,R4

000016

M.
CHK.SUCNT
* ,PD.SAVE

Page 176

; PD.SAVE,*

R3.=(SP)

000000G
000010

SN,

ROUTINE DECLARATIONS

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (52)

B 1
21=Apr=198
21-Apr=198

* ,REMAINDER

4988

4989

4990

4991
4993

500

5004

023626
023632

023634

023642

020127
002412
032766
001006
052766
162701

023714
023716
023724
023726
023730
023736
023740
023746
023750
023752
023760
023766
023774

024000
024006
024010
024014

024016
024022
024024
024030
024034

001440
005701
003411
032766
001005
052766
005301
001425
032766

ROUTINE DECLARATIONS
9%:

000002

004000

000016

004000
000002

000016
10%:

002000

000C16

002000

000016

020000

000016

020000

000016

040000

0C0016

040000

000016

100000
000016

000010
000004

000004

11%:

12%:

#4000,16(SP)
108
#4000,16(SP)
#2,R1
14%
R1
11%
#2J00,16(SP)
11%
#2000,16(SP)
R1
14%
#20000,16(SP)
12%

14%
#42000.16(SP)
13
#40000,16(SP)
R1
14%
#100000,16(SP)

16(SP) ,@10(SP)

@10(SP) ,ERROR.MAP(R5)

006626*

4(SP)
4(SP) ,14(SP)
17%
3%
(SP)

000014

177306

(SP) 43

000003

:
; Routine Size:
208 words
; Maximum stack depth per invocation:

10%

;

;?0000,16(SP)

000016
000010

177160
000020

R1,#2

18%:

18 words

18%
1%
PC

177

55098210

; REMAINDER,*

5016

*,PD.SAVE

5020

*,PD.SAVE
* REMAINDER
REMAINDER

5023
5024
5029
5039

*,PD.SAVE

5043

* ,PD.SAVE
REMAINDER

5046
5047
5052
5062

*,PD.SAVE

* ,PD.SAVE

REMAINDER

* ,PD.SAVE
* ,PD.SAVE
REMAINDER
* ,PD.SAVE
PD.SAVE,
*

5065

5066
5071
5079

5088
5096

5097
5098

PD.WRD.SEL
PD.WRD.SEL
,*

4972

. SEL
BNK
BNK.SEL
,*

4965

4941

-——

——

REYV A PATCH 00

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (52)

BSKELS

21-Apr=1981 08:40:22
21=-Apr=1981 08:19:06

routine BL_PROMS (ARR$BNK_SEL)
begin

3
g

IN THIS LOCATION.

:
FORMAL PARAMETERS:

ARR$BNK _SEL :

STORES THE SELECTED ARRAYS ARRAY AMD
BANK SELECT NUMBER.

!
I

2}%%

g}%g

:
g
;

5136
5137
g}gg

212?

E
4

:
:

5143

5144

5145
5146

5147
g}zg

5150

g}gz

5155

:
o

g;g;

:
:

5156
5157

5160

:
:

5158
5159

'LEAVE LOOP LABEL

local

ISTORES THE GENERATED PROM ADDRESS

PROM_ADRS,

5131

Label

5130

;

: novalue =

THIS ROUTINE WILL SEARCH THROUGH THE BLAST
TABLE AND LOOK FCR NON-ZERO LOCATIONS.
IT WILL THEN BLAST THE PROMS AT THE SELECTED
ARRAY AND BANK WITH THE NEW PROM DATA FOUND

:
:
:
:

Page 178
SEQ 0211

FUNCTIONAL DESCRIPTION: BLAST THE PROMS

5129

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (53)

—g———— R

A
T

VIV

DI T

T YR

I T ST

L I

R R R R

)

WRUNOPONONONINUTONON)
— =3 b b
b —cd b b ()
OVONONEHWN—=O
QO

BSKELG
REYV A PAT(H 00 ROUTINE DECLARATIONS

21-Apr=1981 08:40:22
21-Apr=1981 08:19:06

FINISH;

1S THIS A 16K PART
if .BNK_NUM_SEC eqi 127 then FINISH = 127 else FINISH = 255;
'ENABLE PROM WRITES
WRT PROM_MODE;
'CLEAR THE PROM ADRS
PROM_ADRS = ZEROES;
ISELECT THE ARRAY
ARRSSEL_SIZE>:
S,
R_SEL_PO
_SEL<.AR
PROM_ADRS<11, 4> = .ARR$BNK
'LOOP THRU ALL THE BANKS
incr SEL_BNK from 0 to 3 do

begin
if .BAD_BNK_REG [.SEL_BNK]

then

begin

PROM_ADRS<10, 1> = ZERO;
PROM_ADRS<8, 2> = .SEL_BNK;
incr ROW_NUM from 0 to .FINISH do
begin

'IS THIS A BAD BANK

'LOAD THE ROW ADDRESS SELECT BIT
'LOAD THE BANK SELECT
(BLAST ALL THE NEW ROW PROM DATA

i; .BLAST_TBL [.SEL_BNK, .ROW_NUM, FULL_WRD] neq ZERO
then

!IS THIS TABLE ENTRY NOT ZERO

beg&n

PROM_ADRS<0, 8> = .ROW_NUM; 'LOAD THE ROW NUMBER
WRT_RH (MLPA, PA_REG, .PROM_ADRS); !SELECT THE PROM ADDRESS

WRTZRH (MLPD, PD_REG, .BLAST_TBL [.SEL_BNK, .ROW _NUM, FULL_WRD1);
TCLOCK THE NEW PROM DATA IN
DATTCLK;
DELAY (FIFTY_MS);

IWAIT FOR THE WRITE TO COMPLETE

!LOAD THE PROM DATA

21=-Apr=1981 0 8:19:06

ROUTINE DECLARATIONS
i; .ML_ADDR [MLMR, D_CLk]

'DID THE DATA CLOCK TIME OuT

begin

ERBSF (ERR_10, TIME _OUT_MSG, 0);

lon
NON

PRINTB (ONE_MSG, REP_M7363_MSG);
PRINTB (ONE-MSG, SUPRES_MSB);
FLG_REG [F_D_CLK_TIME_OUT] = SET_FLG:

'REPORT THE ERROR

leave A;
end;

end;
end;

PROM_ADRS<10, 1> = ONE;

'TURN ON THE COLUMN ADDRESSES

incrbCOQ_NUM from 0 to .FINISH do

'BLAST ALL THE NEW COLUMNS

egin

it .BLAST_TBL [.SEL_BNK, .COL_NUM + .COL_BASE, FULL_WRD] neq ZERO
'1S THIS TABLE entry not ZRRO
.

then
w

_A-l._a—a—l_h—l..a_l_a_a_l._a—a_a_n—l_a_n—-l_a—nb_b..h_a

(WL LV TV IV LV, W RV LW, LW RV RV, W, AN Al v ey

I ETE
TR LA
LT
EE TR

R IR IR S

then

5
p)
5
5
5
5
5
5171
5172
5
5
5
5
5
5
5 79
5 80
5

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (53)

begin

NUMBER
PRSM ADRS<0, 8> = .COL_NUM; 'LOAD THE COLUMN THE
PROM ADDRESS

WRT_RH (MLPA, PA_REG, .PROM_ADRS);

.SELECT

WRT_RH (MLPD, PD_REG, .BLAST_TBL [.5EL_BNK, .COL NUM + .COL_BASE, FULL_WRD]);
TCLOCK THE NEwW PROM DATA IN
DAT CLK;
DELAY (FIFTY_MS);

'WAIT FOR THE WRITE TO COMPLETE

if .ML_ADDR [MLMR, D_CLK]

'DID THE DATA CLOCK TIME OUT

then

beg1n

ERRSF (ERR 10, TIME _OUT MSG, Q)
PRINTB (ONE_MSG, REP_M7363 _MSG);
PRINTB (ONE_MSG, SUPRES_MSG):

'REPORT THE ERROR

FLG_REG [F_D_CLK_TIME_OUT] = SET_FLG:

leave A;
end;

end;
end;
end;

end;

CLR_MBUS;
DELAY (TEN_MS);

end;

'CLEAR THE PROM WRITE ENABLE
'WAIT FOR THE VOLTAGE TO SETTLE

Page

SEQ 02

BSKELG
REV A PAT(H 00

E 1
21-Apr=1981 0 8:40:22

BSKELSG
REV A PAT(H 00

.SBTTL

006167

000000G

024042
024046
024054
024056
024064

162706
026727
001004
012766
000403

000034
037014" 000177

012766

024074 016701
024100 016166
024106 012702
024112 016701
024116 010261
| 024122 005003
024124 012746
024130 060616
024132 016746
024136 012746
024142 005046
024144 004767
024150 000300
024152 006300
024154 006300
024156 006300
024160 042700
024164 042703
024170 050003
024172 005005
024174 010500
024176 006200
024200 006200
024202 006200
024204 062700
024210 010046
| 024212 010546
| 024214 042716
024220 012746
024224 005046
024226 004767
024232 062706
024236 006000
024240 103402
024242 000167
024246 010504
024250 000304

|
|
|

ROUTINE DECLARATIONS

02403

024066

024252
004256
024262
026264

024266

——

—

042704
042703
050403
010500

000300

21=Apr=1981 08:40:
21=Apr=19 81 08:19

000177

000002

BL.PROMS:
JSR
SUB
CMP
BNE
MOV

MOV
MCV
MOV
MOV
MOV
MOV

000377 000002
036772
000024 000030
000140
036772
000024

CLR

MOV
ADD
MOV
MOV

000054

037010
000004

CLR
JSR
SWAB

000000G

ASL
ASL
ASL

103777

074000

3%:

037016"

MOV
CLR

JSR

000000G

ADD

000010

176377

ASR
ASR
ASR
ADD

BIC

000001

003400

MOV

MOV
MOV

177770

000626

BIC
BIC
BIS
CLR

4%:

ROR
BLO
JMP
MOV

SWARB
BIC
BIC
BIS
MOV

SWARB

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (53)

180

SE095213_

BL.PROMS ROUTINE DECLARATIONS
5109

R1,$SAVES

#34,SP

5134

BNK.NUM.SEC,#177
1%
#177,2(SP)

; *,FINISH

#377,2(SP)

;

*,FINISH

#140,R2

:
:

*,ML.REG
*,MLREG

ML .ADDR,R1
24(R1) ,30(SP)
ML .ADDR,R1
R§,24(R1)

; MLREG,*
: PROM.ADRS

SP, (SP)
ARR.SEL .POS,=(SP)

; ARRS$BNK.SEL,*

R
#54,-(SP)

#4,-(SP)
-(SP)

PC.BL$GT2

RO
RO
RO
RO
#103777 ,R0

#74000,R3
RO,R3
RS

*,PROM.ADRS

% ,PROM_.ADRS

: SEL.BNK

5140
5144

;

SEL.BNK,*

20%
RS,R4

SEL.BNK,*

5148

#176377 ,R4
#3400,R3
R4 ,R3
R5.R0
RO

:
;
;

*,PROM.ADRS
*,PROM.ADRS
SEL.BNK,*

515%

RO
RO
RO

#BAD .BNK .REG,RO
RO,=(SP)
R5,=(SP)
#177770, (SP)
#1,-(SP)
-(SP)

PC,BL$GT?2

#10,SP
RO
4%
R4

BSKELG

REYV A PAT(H 00

- 026270
- 024272
024274
024300
024302

ROUT INE DECLARATIONS

CLRB

105000

006300

ASL
MOV

€00010

CLR

5%:

000010

036772"
000020 000036

036772"
000020
036772

00004€ 000034
026770
036772
000046

036772

000032
000024
000032
000020
036772
000024
000144
000000G

000042

024446
024452
024454
024456
024460

024462
024466
024474
024502
024504
024506
024510
024512
024514
024520
024524
024530
024532
(24534

024540

6%:
$:

8%:

036772
000030
000024
000020 000030

MOV
ADD
ASL

TST
BEQ
CLRB
BISB
MOV
MOV

026770"

024352
024356
024364
024370
024374
024400
024404
024412
024416
024422
024426
024432
024436
024440
024444

9%:

MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
MOV
BISB
MOV
MOV
MOV

BEQ

MOV

BEQ
CLR
DEC
DEC
BR
MOV
MOV

BIT
BEQ

TRAP

001250"
001630°*
000002

012716
012746

000330°*
001630*

21=-Apr=1981 08:40:22
21-Apr=1981 08:19:06

.WORD
.WORD
.WORD

MOV
MOV
MOV
MOV
TRAP
MOV
MOV

RO
RO
RO,10(SP)
R4
11%

R4 ,RO
10(SP) ,RO

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (5%

Page 181

SEQ 0214

5150

; ROW.NUM,

5153

;

; PROM.ADRS

5156

; ROW.NUM

BLAST.TBL(RO)
10%
R3

R4 ,R3
ML .ADDR,R1
20(R1) ,36(SP)

R3.R2
ML .ADDR,R1
R2,20(R1)
ML .ADDR,R1
46(R1) ,34(SP)

)
,R2
BLAST.TBL(RO
ML .ADDR,R1
R2,46(R1)
ML .ADDR,R1

24 (R1) ,32(SP)
32(SP) ,R2

#20,R2

ML .ADDR ,R1
R2,24(R1)
#144 ,R1
9%

ROW.NUM,PROM.ADRS
* ML.REG

; PROM.ADRS ,MLREG
*
MLREG,

: *,ML.REG

;

: MLREG,*

; *,ML.REG
; ML.REG,MLREG
; *,MLREG
; MLREG,*
: x,$8TMP?2

42(SP)
R2
7$
R1
6%

; $$TMP
: $S$TMPT

#20,30(SP)
10%

54
12
TIME.OUT.MSG
0
#REP.M7363.MSG,=(SP)
#ONE .MSG, = (SP)

5160

*,38TMPT

ML .ADDR,R1
24(R1) ,30(SP)

5158

*,MLREG

L$DLY,R2

5157

: $STMP2

* «,ML.REG

5162

* «ML.REG

5165

5166

#2,-(SP)

SP.RO

14
#SUPRES .MSG, (SP)
#0ONE .MSG,=(SP)

5167

BSKELSG

REV A PAT(H 00

- 024550
024552
- 024554

104414

000535
000012

024564

10
11

002000

024566
024572
024574
024576
024600
024604
024610
024612

036770"
000010

12%:

024620
0246622
024624
024630
004636
024640
0204644
024650
02465%
024662

MOV
MOV
MOV

036772
000020 000026
036772"
000020
036772
000046 000024
026770
036772
000046
036772"
000022
000024
000022
000020
036772"
000024

024666

024672
024676
024702
024710
024714
024720
024724
024730
024734

000144

0000006

026736

024742
024 744
024750
024752
024754

000042

MOV
ADD

ADD
ASL
7ST
BEQ
CLRB
BISB

026770

024616

ER
INC
CMP
BLE
BIS
CLR

MOV
MOV

#2,<(SP)

SP,RJ

14
17%
R4
R4,12(SP)

5%
#2000,R3
R4

19%
R4 RO

,RO
COL .BASE

18%
R3
R4 ,R3
ML .ADDR,R1

20(R1),26(SP)

ML.ADDR,R1
R2,20(R1)
ML.ADDR,R1
46(R1) ,24(SP)

)
,R2
BLAST.TBL(R0O

22(SP) ,RO

#20,R0

ML .ADDR,R1
RO,24(R1)
#144 ,R2
16%

L$DLY,R1
15

036772
000024 000020
000020

16%:

;

ROW.NUM

;

; COL.NUM

*,PROM.ADRS

5176
5178

;

COL.NUM,*

5181

PROM.ADR5S

5185

;

ROW.NUM,F INISH

; COL.NUM,PROM.ADRS

: %, ML.REG
*

;
;

ML .ADDR,R1

24(R1) ,20(SP)
(PC) ,20(SP)
18%
54

5186

PROM.ADRS ,MLREG

MLREG,
*

*,ML.REG

5187

* ,MLREG

. MLREG,*
;
;
;

*,ML.REG
ML.REG,MLREG
*,MLREG

MLREG,*

%, 38TMP2

5189

; *,38TMP1

; $3TMP
; $3TMPT
:

158:

024756
024760
024764
024772
024776

;s P,

BLAST.TBL(RQ)

R2,46(R1)
ML.ADDR,R1
24(R1) ,22(SP)

14%:

SEQ 0215

10(sP) ,RO
RO

ML .ADDR,R1

138:

Page 182

$STMFP2

: * ML.REG
:

5191

*,ML.REG
5194

025010

012746

001250"

0
#REP.M7363.MSG,=(SP)

12
TIME.OUT.MSG

0
[Se)

MOV
MOV
TRAP

000002

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (53)

024556
024560

012746
010600

ROUT INE DECLARATIONS

024544

21=Apr=1981 08:40:22
21=-Apr=1981 08:19:06

BSKELSG

R[V A PAT(H 00

ROUTINE DECLARATIONS

025014

012746
012746
010600

001630°
000002

012716
012746
012746
010600

000330°*
001630°
000002

104414

152767

062706

000424
005204
020466
003641
005205

000200
000012

-1
g
21=-Apr=1981 08:40:22
21-Apr=1981 08:19:06
MOV

037020°"

17%:
18%:
19%:

000012

20%:

000003
177064

036772
000010 000616

21%:

MOV
MOV
TRAP
MOV
MOV
MOV
MoV
TRAP

BISB
ADD

INC
CMP
BLE
INC
CMP
BGT
JMP
MOV

MOV
MOV

BI1SB
MOV
MOV
MOV
MOV
MOV
MOV

000014

016701
010061
012702
001411
016701
001404
005066
005301
001374
005302
000766
062706
025242 000207
.

Routtine

Size:

BIC
BICB
BIS
MOV

036772°
000010
023420

MOV
MOV

BEQ

MOV

0000006

BEQ
CLR
DEC

000042

DEC
BR

ADD
RTS

000044

323 words -

: Maximum stack depth per invocation:

29 words

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (53

Page 183

SEQ 0216

#ONE .MSG,=(SP)
#2,-(SP)

SP.RO

14
#SUPRES .MSG, (SP)
#ONE .MSG,=(SP)
#2,-(SP)
?P.RO

: P,
5196

SP,

5197
5198

#2J00,FLG.REG
#12,SP

20%
R4

R4 ,12(SP)
12%

ML .ADDR,R1
10(R1) ,16(SP)
16(SP) ,RO
#40,R0
ML .ADDR,R1
RO.10(R1)
ML .ADDR,R1
10(R1) ,14(SP)

; COL.NUM
; COL.NUM,FINISH

5178

; SEL.BNK
s SEL.BNK,*

5140

1 x,ML.REG

: ML.REG,MLREG

; *,MLREG
;

MLREG,*

; *,ML.REG

14(SP) ,RC
ML.DUT,RS

: ML.REG,MLREG

#7 .RO

RO.10(RT)

; MLREG,*

#177770.R5

5207

*,MLREG

RS.RO
ML .ADDR,R1

; *,MLREG

#23420,R2

;% ,$8TMP2
;o

5210

,$8TMP1

; $$TMP

: $$TMPT

: $8TMP2
5109

BSKEL&

sl
il
il
ol el

n il ol sl

OV~[0 XV, B Y WIT,N)

roruNurROPRONONONUNY

wvivivio
i AL

routine VER_BLAST (ARR$BNK_SEL)
begin

PR T E TR
A PR

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL&4.BLI.T (54)

: novalue =

FUNCTIONAL DESCRIPTION: VERIFY THE PROM BLAST
AFTER THE PROMS HAVE BEEN BLASTED THE
PROMS MUST BE READ TO INSURE THAT THEY

WERE WRITTEN CORRECTLY.

THIS ROUTINE READS ALL THE BANKS PROM
DATA AND COMPARES IT TO THE IDENTICAL
PROM DATA STORED IN THE ERROR MAP.
FORMAL PARAME TERS:
ARRSBNK _SEL :

STORES THE SELECTED ARRAYS ARRAY AND BANK
SELECT NUMBERS.

local

PROM_ADRS,
FINISH,

ARR_SEL .

N
T
DL

-Q.l-!.0.0-..0.!.‘-t.'-|.n.'-.0-0-!-.!-‘-..‘

———

21=-Apr=1981 08:19:06

ROUTINE DECLARATIONS

I E T ET ETR

A TE T ET

L L

REV A PATCH 00

21-Apr=1981 08:40:22

map

'STORES THE GENERATED PROM ADDRESS
'VARIABLE ENDING SECTOR NUMBER

ISTORES WHICH ARRAY IS SELECTED FOR PM'ING

ERROR_MAP : blockvector [4, 512] volatile;

'MAKE THE ERROR MAP LOOK i IKE THE BLAST TABLE

if .BNK_NUM_SEC eql 127 then FINISH = 127 else FINISH= 255;
RD_PROM_MODE;

'ENABLE PROM READ MODE

incr SEL BNK from 0 to 3 do

'LOOP ON ALL BANKS

'IS THIS A 16K CHIP

ARR SEL = ARRSBNK SEL<.ARR_SEL_POS, ARRSSEL SIZE>:; !'LOAD THE ARRAY SELECT NUMBER
TCLEAR THE PROM ADDRES
PROM ADRS = ZEROES;
'LOAD THE ARRAY SELECT NUMBER
_ARR_SEL;
=
4>
“ADRS<11,
PROM_
be

ADRS<1O 1> = ZERO;
“ADRS<8, 2> = .SEL _BNK;
PROM

'SELECT THE ROW ADDRESSES
'SELECT THE BANK

incr ROUNUM from O to .FINISH do

'LOOK AT ALL ROW ADDRESSES IN THE BLAST TABLE

8M ADRS<0, 8> = .ROW_NUM;
n

er RH (MLPA, PA REG PROM ADRS);

DELAY (ONE US)

'LOAD THE ROW NUMBER

'SELECT THE PROM ADDRESS

'WAIT FOR THE PROM DATA TO COME OUT

1; .ERROR_MAP [.SEL_BNK, .ROW_NUM, FULL_WRD] neq .ML_ADDR [MLPD, PD_REG]
ten

BSF (ERR_8, CON_D_MSG, 0):

'REPORT THE ERROR

PRINTB (A_B PRINT. TARR SEL, .SEL_BNK);

DEGRADE_MOD_REG [.SEL_BRK]= SET_FLG:

EO 0217

184

BSKEL4

REV A PATCH 00

21-Apr=1981 08:40:22

21~Apr-1981 08:19:06

ROUTINE DECLARATIONS

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (54)

ge 185

SEO 0218

end;
end;

PROM_ADRS<10, 1> = ONE;

!SELECT THE COLUMN ADDRESSES

1ncr COL_NUM from 0 to .FINISH do

!LOOK AT ALL THE COLUMNS

= .COL_NUM; ADRS) ;
gM ADRS<0, 8>PAREG
PROM
f\

wRT RH (MLPA

DELAY (ONE US)

'SELECT THE COLUMN ADDRESSES
'SELECT THE PROM ADDRESS
'WAIT FOR THE PROM DATA TO COME OUT

1; .ERROR_MAP [.SEL_BNK, .COL_NUM + .COL_BASE, FULL_WRD] neq .ML_ADDR [MLPD, PD_REG]
then

PRRSF (ERR_8, CON_D_MSG, 0);

'REPORT THE ERROR

PRINTB (A B PRINT. -ARR SEL, .SEL_BNK):

DEGRADE _MOD_REG L. SEL_BNK] = SET_FLG:

end;
end;
end;

'CLEAR OUT THE PROM READ MODE

CLR_MBUS:
end;

025244

000000G

025250
025254
025262
025264
025270
025272
025276
025302
025310
025314
025320
025324
025330
025332
025336
025342
025344
025350
025352
025354
025356

000024
037014"' 000177

.SBTTL
VER.BLAST:
JSR

5212

R1,$SAVES

SuUB
CMP

#24 SP
BNK. NUM SEC,.#177

MOV

#177,(SP)

;

*,FINISH

MOV
MOV
MOV
MOV
MOV
MOV
MOV

#377,(SP)
ML .ADDR,R1
24(R1) ,20(SP)
#40,R0O
ML .ADDR,R1
RO,24(R1)
#44 ,-(SP)

;

*,FINISH

;
:

*,ML.REG
*,MLREG

037010°
000004

MOV
MOV

ARR.SEL.P0OS,=(SP)
#4 ,-(SP)

000000G

JSR

PC,BL$GT2

BNE

000177
000377
036772"
000024 000020
000040
036772"
000024
000044

000303

VER.BLAST ROUTINE DECLARATIONS

1%
2%:

ADD

CLR

MOV
CLR
MOV
SWAB

SP, (SP)

5240

MLREG,
*

ARRSB
. SEL
NK
,*

5243

-(SP)

RO,R5
R4
R5,R3
R3

* ARR.SEL

PROM.ADRS

ARR.SEL
,*

5244

5245

K L&G
BSKE

REV A PATCH 00

025360
025362
025364
025366
025372
025376
025400

ROUTINE DECLARATIONS

103777
074000

3%:

025402
025404
025406

176377
003400

025412
025416
025420
025422
025424
125426
125430
325434
025436
025440
025442
02544
025450
025456
025460

ASL
ASL
ASL
BIC
BIC.
BIS

R3
R3
R3
#103777 ,R3
#74000,R4
R%,RL

MOV
SWAB
BIC

R2.R3
R3
#176377
,R3
#3400 ,R%
R3.R4
R2.RO

CLR

BIC
BIS

SWAB
CLRB

ASL
MOV

000012

CLR

4%:

036772
000020 000026
036772
000020
000001

025470
025474
025476
025502
025504
025510
025512
025514
025516
025529
025522
025526
025530
025534
025542
025550
025552
025554
025556
025560
025562

000000G

000032

5%:
6%:
7%:

000012
036772
000046 000024
006626" 000024

8%:

MOV
MOV
MOV
MOV

BEQ

MOV
BEQ
CLR

DEC
BR
MOV
ADD
ASL
MOV
MOV

CMP
BEQ

.WORD
.WORD
.WORD

002332*
000003
104414

5247
5250

* ,PROM.ADRS

RO,12(SP)

R3
108
R4

*
SEL.BNK,

5258

ROW.NUM

5252

PROM.ADRS

5254

ROW.NUM,PROM.ADRS

ML .ADDR,R1

20(R1) ,26(SP)

R4 .RO
ML .ADDR,R1
RO,20(R1)

#1.,RO

8%
L$DLY.R1
7$

DEC

TRAP

025564

* ,PROM.ADRS

CLRB
BISB
MOV
MOV

MOV
MOV
MOV
MOV
MOV

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL&4.BLI.1 (54

* PROM.ADRS
SEL .BNK
*
SEL.BNK,

MOV

025464

025566
025572
025576
025600

E 9
21-Apr=1981 08:
21-Apr-1981 08:

TRAP

* ,ML.REG

5255

PROM.ADRS ,MLREG
MLREG,
*

*,$8TMP2

5256

*,$8$TMP1

$$TMP
$$TMPT

$$TMP2
R3.R0

12(SP) ,RO

ROW.NUM,
*

5258

ML .ADDR,R1
46(R1) ,24(SP)
)
,24 (SP)
ERROR.MAP(R0

* ,ML.REG

* ML.REG

9%
54
10
60N.D.MSG

R2,=(SP)
R5,=(SP)
#A.B.PRINT,=(SP)
#3,-(SP)

SP,RO
14

5261

*
SEL.BNK,
ARR.SEL
,*

; P>

5262

BSKEL4
REV A PATCH 00
025602
025604
025606

025610
025612
025616
025620

21=-Apr=1981 08:40:22
21-Apr=1981 08:19:06

ROUTINE DECLARATIONS
MOV

010200
006200
006200

037022°

ASR
ASR
ASR
ADD
MoV

MOV

BIC

177770
000001

000000G
000016

000010
002000

11%:

036772
000020
000001

0000006

000032

12%:
13%:

14%:

036770"
000012

036772
000046 000020
006626 000020
104454

026006
026010
026012
026014
026016
026022
026026
026030

000010
000510°*
000000
010246
010546
012746 002332°*
012746 000003
010600
104414

15¢%:

#177770, (SP)
#1,-(SP)

ADD

#%6,SP

INC
CMP
BLE
BIS
CLR
BR
CLRB
BISB
MOV
MOV
MOV
MOV
MOV

036772
000020 000022

#DE GRADE .MOD .REG,RO
RO, (SP)
R2,=(SP)

MOV
MOV

JSR

:
9%
10%:

R2,RO
RO
RO
RO

MOV
BEQ

TRAP

.WORD
.WORD
. WORD

MOV
MOV
MOV
MOV
MOV

TRAP

SEL.BNK,*

187

55098220

5263

; ROW.NUM

5260
5252

#2000,R4

; *,PROM.ADRS
; COL.NUM

5268
5270

;

5272

R3,10(sP)
4%
R3
17%

R3.R4
ML .ADDR,R1
<0(R1),22(SP)
4 ,RO
ML .ADDR,R1
RO,20(R1)
#1,R0

; ROW.NUM,F INISH

PROM.ADRS

COL .NUM,PROM.ADRS

; *,ML.REG
;

5273

PROM.ADRS ,MLREG

; MLREG,*

: %, $8TMP?2
;

BEQ
CLR
DEC

BEQ

(SP) ,=(SP)
PC,BL$PU2

MOV

DEC
BR
MOV
ADD
ADD
ASL
MOV
MOV

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.? (54)

5274

*,38TMPT

: $3TMP
: $8TMPT

: $8TMP2
R3,R0

COL .BASE ,RO

12(SP) ,RO
RO
ML .ADDR,R1

46(R1),20(SP)
ERROR.MAP(R0) ,20(SP)
16%
54

;

COL.NUM,»

5276

; *,ML.REG
: *,ML.REG
5279

60N.D.MSG
SEL.BNK,*

R2,=(SP)
R5,=(SP)
#A.B.PRINT,=(SP)

;

SP,RO

3 SP.e

;

ARR.SEL,*

5280

010246
042716
012746
011646
004767

026074
026076

026102

026104
026106
026112
026114
026120
026124

026132
026136
26142

026146
026152
026156
026164
026170

DECLARATIONS

037022
177770
000001

0000006
000016
000010

026206

026212
026216
"26(’; 2
~

;
;

Routine Size:
Maximum stack

R2,RO
RO
RO
RO

BIC

R2,=(SP)
8177770, (SP)

MOV
JSR
ADD

INC

BLE
INC

BGT

036772
000010

000016

18%:

JMP
MOV

MOV

BISB
MOV

000010

MOV
MOV
MOV

000014

MOV

026174

026200
026204

MOV
ASR
ASR
ASR

ADD
MOV
MOV

NON

026046
026050
026052
026056
026062
026064
026070

010200
006200
006200
006200
062700
010016

ROUTINE

026032
026034
026036
026040
026042

BIC
BI(RB
BIS
MOV

036772"
000010
000034
24R words

depth per

MOV
ADD
RTS

invocation:

21=Apr=1981
21=-Apr=1987

BSKELS
REV A PAT(H

27 words

#DEGRA
.MOD .REG,RO
DE
RO, (SP)

08:40:22
08:19:06

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL&.BLI.1T

;

SEL.BNK,

Page

188

SEQ 0221

5281

SEL .BNK, *

#1,-(SP)
(S?) ,=(SP)

PC,BLSPU2

#16,SP
R3
R3,10(SP)
1%
R2

R2,#3
18%

(0oL .NUM
COL .NUM,F INISH

SEL .BNK
SEL .BNK, *

ML .ADDR,R1
10(R1) ,16(SP)
16(SP) ,R0O
#40,R0
ML .ADDR
,R1
RO,10(R1)
ML .ADDR,R1

10(R1) ,14(SP)
14(SP) ,RO

" ML.DUT.RS

#177770,RS

#7 R0

RS,R0O
ML .ADDR,R1
RO,10(R1)
#34,5P
P

* ML.REG
ML .REG ,MLREG

* ,MLREG

MLREG,
*
* ML.REG
ML .REG,MLREG

* MLREG

* MLREG
MLREG,
*

5278
5270
5247

BSKEL4

REV A PATCH 00
5290
5291
5292
5293
5294
5295

K
.

.
-

4
-

.
-

L4
.

5296

5297
5298

L4
-

.
-

k2
.

.
-

21-Apr=1981 08:19:06

ROUTINE DECLARATIONS

rout;ne.VER_ERROR_MASK (ARR$BNK_SEL, TSTED_BNK) : novalue =

PA:<NEALE>PMSKL4.BLI.1 (55)

:
:
:
:
:
:
:

FUNCTIONAL DESCRIPTION: VERIFY THE ERROR MASK

;

.
-

SAME ARRAY IN HOPES OF FINDING AND MASKING THE ERROR.
ON THE SECOND PASS BEFORE REPLACING THE ARRAY.

FORMAL PARAME TERS:
:
ARR$BNK_SEL

STORES THE SELECTED ARRAYS ARRAY AND BANK SELECT NUMBERS

L4
.

.
.

.
-

ooy

.
.

L
.

.
.

.
-

.
.

.
-

L4
-

.
.

.
-

L4
-

WM, = O 000 ~NO N S W=

NN
=St a
g

WNINWNINWNNN
NN NN
—

local

'STORES THE SELECTED BANK NUMBER
'STORES THE SELECTED ARRAY NUMBER

BNK_NUM,
ARR_NUM;

ARR_NUM = .ARR$BNK_SEL<.ARR_SEL_POS, ARRSSEL_SIZE>; !LOAD THE ARRAY NUMBER
incr SEL_BNK from O to .TSTED_BNK - 1 do
begin

.
.

i; .BAD_BNK_REG [.BNK_NUM]

then

begin

i; S_CHIP_TBL (ZERO) geq ZERO

'WERE ANY BAD BITS FOUND

then

begin

i; .FLG_REG [F_UNC_ERR_FLG]

then

.
-

.
.

']
.

.
.
K
.

'WAS IT AN UNC ERROR

begin

ERRSF (ERR_11, UNC_ERR MSG, 0):
PRINTB (REP_PRINT,” .ARR_NUM);

'1S THIS A BAD BANK
'FIND ANY BAD BITS

'LOAD THE BANK SEL NUMBER

FB_CHIPS (.ARR$BNK_SEL):

!VERIFY ALL BANKS

BNK_NUM = .ARR$BNK_SEL<.BNK_SEL_POS, BNKSSEL_SIZE>:

SEQ 0222

FOR A GOOD BLAST THE
AFTER THE PROMS HAVE BEEN BLASTED AND THE PROMS ARE READ
BLASTED ROWS AND
ALL
THAT
SURE
MADE
AND
SELECTED ARRAY IS WRITE CHECKED AGAIN
COLUMNS HAVE BEEN SUCCESSFULLY BLASTED.
TO BE REPLACED.
UNC ERRORS ARE NOT TOLERATED IN ANY BANK AND WARRENTS DTHEANDARRAY
NOT CONSTITURE AN ERROR.
DOES
TOLERATE
IS
BANKS
MODE
SINGLE CHIP FAILURES IN DEGRADE
WILL CAUSE AN
AND
D
TOLERATE
NOT
IS
BANKS
NODE
SINGLE CHIP FAILURES IN NON-DEGRADE
RUN ON THE
BE
COULD
PROGRAM
THE
HOWEVER
.
ERROR AND THAT THE ARRAY BE REPLACED

Page 189

TOPS=20 Bliss=16 v2(212)

egin

:
;

wviviunuuo

e —————
— e

21=-Apr=1981 08:40:22

else

'REPORT THE ERROR

end

begin

i; not .DEGRADE_MOD_REG [.BNK_NUM]

then

begin

!IS THIS NOT A DEGRADE MODE BANK

ERRSF (ERR_12, MEM_ERR_MSG, 0); !REPORT THE ERROR

BSKEL4
REV A PATCH 00

AR
21=-Apr=1981 08:40:22
21=-Apr=1981 08:19:06

ROUT INE DECLARATIONS

PRINTB (REP_PRINT,

5342
5343

end;

TOPS=20 Bliss=16 v2(212)

PA:<NEALE>PMSKL4.BLI.T (55)

Page 190

SEQ 0223

.ARR_NUM);

end;

end;
end;

ARRSBNK_SEL = .ARRS$BNK _SEL
end;

+ . INC_3NK;

'SELECT THE NEXT BANK

end;

026224

004167

0000006

026230
026234
026236
026242
026246
026250
026254
026256
026260
026262
026266
026270
026274
026300
026302
026306
026310
026312
026314
026316
026320
026322
026326
026330
026334
026340
026342
026346
026352
026354
026356
026362
026366
026370

012746
060616
016746
012746
005046
004767
010004

000020

MOV
ADD
MoV
MOV
CLR

037010
000004

JSR

0000006

000030
037012
000002
0000006

037016"
177770

000001

000000G
000010

000036

174206

004767

.SBTTL

165224

VER.ERROR.MASK ROUTINE DECLARATIONS

:
VER.ERROR.MASK
R1,$SAVES
JSR

1%:

MOV
CLR
BR

MOV

ADD
MOV
MOV

CLR
JSR

MOV
MOV

ASR
ASR
ASR
MOV
ADD
MOV
BIC
MOV

CLR
JSR
ADD
RCR
BCC

MOV

JSR
CLR

JSR

#20,-(SP)

SP, (SP)
ARR.SEL .POS,=(SP)

* ARRSBNK
. SEL,*

5290
5314

#4,=(SP)

-(SP)
PC.BL$GT?2
RO,R4
R1

6%
#30,=-(SP)
SP, (SP)

BNK . SEL .POS,=(SP)

* ,ARR .NUM
SEL .BNK

ARR$B
. SEL
NK
,*

5316

5318

#2,-(SP)
=(SP)

PC,BL$GT?
RO,R2

R3,-(SP)
#BAD .BNK .REG, (SP)R2,-(SP)

#177770 (SP)

* ,BNK .NUM
BNK .NUM, *

5320

BNK .NUM, *

#1,-(SP)
-(5P)

PC,BL$GT2

#10,SP
RO
5%

36(SP) ,=(SP)

PC,FB.CHIPS
-(SP)
PC,S.CHIP.TBL

ARRS$BNK
. SEL , *

5323
5325

BSKEL4

REV A PATCH 00

026374
026376
026400

005726
005700
002454

032767

ROUTINE DECLARATIONS
TST
TST

000002

BLT
BIT

037020°

BEQ
TRAP
.wORD
.WORD

.WORD

002246"
000002

037022"'

2%:

177770

026516

026522
026524
026526
026532
026534
026542
026546
026550
026554
026556
026562

MOV
MOV
MOV
MOV
TRAP
BR
MOV
ADD
MOV

BIC

Mov

000001

026474
026476
026500
026502
026504
026506
026510
026512

CLR
JSR

000000G
000010

ADD
ROR
BLO
TRAP

.WORD
.WORD
.WORD

002246"
000002

000006

3$:

037004"' 000036
000010

5%:

000024

6%:

000010

;
112 words
: Routine Size:
; Maximum stack depth per invocation:

21-Apr=1981 08:40:22
21-Apr=1981 08:19:06
(SP)+
RO
4%
#2,FLG.REG

5332

54
13
UNC.ERR.MSG
R4 ,-(SP)
#REP.PRINT,=(SP)
#2,-(SP)

: ARR.NUM,»

5331
5338

3%
R3,-(SP)

#DE GRADE .MOD .REG, (SP)
R2,=(SP)
#177770, (SP)
#1,-(SP)
-(SP)

; BNK.NUM,»

PC,BL$GT2

#10,SP

5341

gEM.ERR.MSG
;

ARR.NUM,
*

SP.RO

3 P

ADD
ADD

K
, 36 (SP)
INC.BN

: *,ARRS$BNK.SEL

INC
CMP
BLT

5333

SP,RO

R4 ,=(SP)
#REP.PRINT ,=(SP)
#2,-(SP)

TST

Page 191

SEQ 0224

5329

MOV
MOV
MOV
MOV
TRAP
ADD

ADD
RTS

18 words

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (55)

14
#6,SP
+
(SP)

#10,SP
R1

R1,24(SP)

%
#10,SP

1 SEL.BNK

* SEL.BNK,TSTED.BNK

E ¢
21-Apr=1981 08:40:22

21-Apr=1981 08:19:06

%sbttl *INITIALIZE CODE SECTION'
INITIALIZE CODE SECTION

BGNINIT;
loca&

;HARDUARE PTABLE ENTRY TEMPORARY STORAGE LOCATIONS

e P A

R L B L

R L L L Y

INITIALIZE CODE SECTION

'DRIVE OPTION CODE 1 = ML-11A, 0 = ML-11B
'ARE THE PROGRAM PARAMETERS CORRECT FLAG
'HARDWARE PTABLE POINTER

PTBL_PTR,

'SUPERVISOR LOGICAL UNIT NUMBER VARIABLE

LUN;
TM

'WHERE MORE ONE PTABLE BUILT

if .LSUNIT gtr ONE
then

gsr (ERR_9, HQ_ERR_MSG, 0);

R TR

R IR E IR

ARR_HWTBL,
BNK_HWTBL,
BNK_NO_ HWTBL,
ARRTMNO HWTBL
,
RH_BASE HWTBL,
puT HWTBL,
,
OPTTON_HWTBL
CORRECT HWTBL,

'REPORT THE ERROR

'REPORT WHAT THE ERROR IS

PRINTB (ONE MSG “GTRTMMSG);
PRéNTB (ONE_MSG, UNIT_SEL_MSG);

LIR
FE PR PR P DR RN I LI
e

'PROM MAINT THE ENTIRE SYSTEM
'PROM MAINT A SINGLE ARRAY MODULE
'PROM MAINT A SINGLE BANK
'BANK NUMBER TO BE PRCM MAINT
'ARRAY MODULE NUMBER TO BE PROM MAINT
'RH BASE REGISTER ADDRESS
'DIVICE NUMBER TO BE PROM MAINT

svs _HWTBL,

'REPORT THAT THE FIRST PTABLE BUILT WILL BE USED

'ONLY ONE DRIVE IS TO BE TESTED

ESUNIT = 0;

i BECAUSE OF THE INPACT OF THIS PROGRAM ON THE
i ML=11 SYSTEM ONLY THE START COMMAND WILL BE
| RECOGNIZED TO START PROGRAM EXECUTION

if not
then

(READEF

(EF_START))

ER sr (ERR_1, ILL_CMD MSG, Q);
PRINTB (ONE_MSG, START MSG)

DODU(.LSUNTIT);

'WAS THE START COMMAND USED TO START THE PROGRAM
'REPORT THE ERROR

'REPORT WHAT THE ERROR IS
!DROP THIS UNIT

!GO TO THE CLEAN UP CODE SECTION

DOCLN;
end;
M imtatmt
-

IR AR R

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (56)

THE CONTENTS OF THE FIRST P-TABLE BUILT (LUN 0 )

WILL BE THE SELECTED PROGRAN PARAMETERS.
P-TABLES BUILT WILL BE
= ZERO;

IGNORED.

ALL OTHER REMAINING

ge 192

SEQ 0225

BSKEL&

. REV A PATCH 00 INITIALIZE CODE SECTION
5407

5408

5409
5410

:
:

if (GPHARD (.LUN, PTBL_PTR)) eql ZERO

then

ERRSF (ERR_3, LUN_MISS_MSG, 0);
PRINTB (ONE MSG SUPRES MSG);
PRINTB (ONE_MSG, RET_DR3 MSG)
DODU(.LSUNTIT);
DOCLN;

5411
5412
5413
5414
5415

3
3
}
:
:

5416
5417
5418
5419

2
:
;
:

:
:

begin

else

end

5420
5421

i INPUT TO THE PROGRAM THE HARDWARE PTABLE
I ENTRIES AND STORE THEM INTO THE TEMPORARY

5423

5424

5427

3
3
2
3
¢
:

5439

2
:

5441
5442

:
:

5446
5447

:
:
:

5635
5436
gz%g

5440

end;

:
!
OPERATOR
THE
! BEFORE WE START, LETS SEE IF
! ENTERED HIS PARAMETERS CORRECTLY.

if not .CORRECT_HWTBL

then

begin

PRINTB (LFS);
PRINTB (ONE MSG SUPRES MSG);
PRINTB (ONE MSG RET_DRS_MSG) ;

5443
5444
5445

5448

'REPORT THE ERROR
'REPORT SUPPERSS MESSAGE
'REPORT RETURNING TO DRS>
'DROP THIS UNIT
'GO TO THE DROP UNIT CODE SECTION

SYS_HWTBL = .((.PTBL_PTR) + %0'0"):

5433

5434

'1S THE FIRST PTABLE PRESENT

ARR_HWIBL = .({(.PTBL_PTR) + %0'2'):
BNK_HWTBL = .((.PTBL_PTR) + %0'4");
BNK_NO_ HWTBL = . ((. PTBL_PTR) + %0'6').
ARRTMNO _HWTBL = .((.PTBL_PTR) + %0'10');
RH BASE HWTBL = .((.PTBL_PTR) + %0'12");
DUT HWIBL = .((.PTBL PTRY + %0'14');
OPTION HWTBL = .((.PTBL_PTR) + %0'16');
CORRECT_HWTBL = .((.PTBL_PTR) + %0°'20");

5428
5429
5430
5431
5432

DODU (.LSUNTIT);
DOCLN;

5449

else

5451

end

'ARE THE INPUTED PARAMETERS CORRECT
:

'PRINT SOME LINE FEEDS TO BE NEAT
'PRINT THE SUPPRESS MESSAGE
'PRINT RETURNING TO DRS> MESSAGE
'DROP THIS UNIT
'GO TO THE CLEAN UP CODE SECTION

begin

5450

gzg%

; BUILD THE RUN TIME PARAMETERS

5454

ARRSBNK_SEL = ZEROES:

5458

' SET UP 16K OR 64K MOS RAM RUN TIME PARAMETERS

:
3

5455
gzgg

TOPS=20 Bliss=16 v2(2:2)

PA:<NEALE>PMSKL4.BLI.1 (56)

! STORAGE LOCATIONS

5425
5426

3
}

21-Apr-1981 08:19:06

beg1n

5422

21=Apr=1981 08:40:22

ML_ADDRTM= .RH_BASE HWTBL ;
QL“DUT= .DUT THWTBL ;

'LOAD THE ARRAY & BANK SELECT VARIABLE WITH ZEROES

'LOAD THE ML=-11 BASE ADDRESS INTO ML_ADDR
'LOAD ML_DUT WITH THE DIVICES DRIVE SELECT NUMBER

Page 193

SEQ 0226

BSKELG

REV A PATCH 00
5459
5460
5461
5462
5463

INITIALIZE CODE SECTION
it .OPTION_HWTBL eql ML11A

then

INCCBNK = %o
INCCARR = %0
BNK_NUM_SEC
ARR_SEi._POS
BNK_SEL _POS
:
MAX_CHIP_COL = 128:
end”

5465

5466

W05 §6 0o 0u0eUeOsWs gy ¥ Wo Gt 95 40 Co §¢ G5 G0 To gy 9099 ¥ 94 00 LR IR T

5475
5476
5477
5478
5479
5480
5481
5482

5483
5484
5485
5486
5487
5488
5489

5490
5491

5492
5493
5494

5495
5496
5497
5498
5499
5500
5501
5502
5503
5504
5505
5506
5507
5508
5509
5510

else

begin

COL_BASE
= 256;
= %0'1000';
INCCBNK
INCCARR = %0'4000°;
BNK_NUM_SEC
511;"
1
ARR_SEL_POS
BNK SEL_POS
:
X_CHIP_COL = 256;
end
O -

5467
5468
5469
5470
5471
5472
5473
5474

begin

(OL_BASE =1

5464

21-Apr=1981 08:40:22
21=Apr=1981 08:19:06

T0PS=20 Bliss=16 v2(212)
PA: <NEALE>PMSKL4 BLI.T (56)

‘IS THIS A ML=11A OPTION 16K PARTS
'LOAD THE COLUMN BASE OFFSET
'LOAD THE BANK INCREMENT VARIABLE
'LOAD THE ARRAY INCREMENT VARIABLE

'LOAD THE BANKS NUMBER OF SECTORS VARIABLE
'LOAD THE ARRAY SELECT POSITION CONSTANT
'LOAT THE BANK SELECT POSITION CONSTANT
'LOAD THE MAXIMUM COLUMNS PER CHIP VARIABLE
'LOAD THE COLUMN BASE OFFSET VARIABLE
'LOAD THE BANK INCREMENT VARIABLE
'LOAD THE ARRAY INCREMENT VARIABLE
'LOAD THE BANKS NUMBER OF SECTORS VARIABLE
'LOAD THE ARRAY SELECTION POSITION CONSTANT
'LOAD THE BANK SELECTION POSITION CONSTANT
'LOAD THE MAXIMUM COLUMNS PER CHIP VARIABLE

BUILD THE RUN TIME PARAMETER FOR MASKING
: EITHER THE ENTIRE SYSTEM, AN ENTIRE ARRAY OR
I

A SINGLE BANK.

if .SYS_HWTBL
then
be

'IS THE ENTIRE ML=11 SYSTEM TO BE PROM MAINT

'SELECT THE DRIVE UNDER TEST
WR RH (MLCS2, DRV_SEL, .ML_DUT);
'READ AND SAVE THE SIZING
13
= .MC_ADDR [MLMR, SIZING]
LST_TSTED_ARR
'DO TWO RANDOM DATA PASSES
RAND PASS = 4;
ITEST FOUR BANKS PER ARRAY
TSTED_BNK = 4;

else

end

begin
if

.ARR_HUTBL

then

= 0;
TSTED ARR

RAND PASS
= 8;

"IS A SINGLE ARRAY TO BE PROM MAINT

'LOAD LOOP VARIABLE TO TEST ONLY ONE ARRAY
'DO THREE PASSES OF RANDOM DATA

'TEST ALL FOUR BANKS ON THE ARRAY
'SELECT WHICH ARRAY TO TEST
ARR$BRK_SEL<.ARR_SEL_POS, ARRS$SEL_SIZE> = .ARR_NO_HWTBL:
= &;
TSTED BNK

else

end

begin

Page 194

SEQ 0227

BSKELG

| REV A PAT(H 00

INITIALIZE CODE SECTION

5517
5518
5519
5520

5521
5522
5523
5524

else

R
A
[

'LOAD LOOP VARIABLE TO TEST ONLY ONE ARRAY

end

begin
!

i THE HARDWARE QUESTIONS WERE NOT ANSWERED
i CORRECTLY. MASKING EITHER A SYSTEM, ARRAY

5525

5526

REPORT THE ERROR

5530

ERRSF (ERR_2, HQ_ERR_MSG, 0);

'REPORT THE ERROR

5534

DODU (.LSUNIT);

IDROP THIS UNIT

no
~

gggg

| OR BANK WAS NOT SELECTED.
' AND RERTURN TO DRS>.

PRINTB (ONE_MSG, HQ_MSG);
PRINTB (ONE_MSG, SUPRES_MSG);
PRINTB (ONE_MSG, RET_DRZ_MSG):;

5531
5532
5533

DOCLN;
end

5536
5537
5538

5539
5540
5541
5542
5543
5544

000000

'REPORT WHAT THE ERROR IS
'PRINT SUPPRESS MESSAGE
!PRINT RETURNING TO DRS> MESSAGE
'GO TO THE CLEAN UP CODE SECTION

end

end
end

ENDINIT;

026564 004167 (00C00N0G
026570 162706 000014
026574 026727 000000G 000001
026602 003426
026604 104454
026606 000011
026610 000142°

012746
012746
012746
010600
104414
012716
012746

Page 195

SEQ 0228

'DO FIVE PASSES OF RANDOM DATA
RAND _PASS = 13;
'TEST ONLY ONE BANK
TSTED BNK = 1;
> = .ARR_NO_HWTBL;
ARRSSEL_SIZE
,
.ARR_SEL_POS
ARRSBNK_SEL<
"CSELECT WHICH ARRAY TO PROM MAINT
ARRSBNK_SEL<.BNK_SEL_POS, BNKSSEL_SIZE> = .BNK_NO_HWTBL;
'SELECT WHICH BANK TO PROM MAINT

5515
5516

5535

026614
026620
026624
026630
026632
026634
026640

begin

LST_TSTED_ARR = 0;

5514

w
w

O
R
R
O T T O
R
R
R
L
R
R
R
R P T
T

then

5512

5513

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (56)

‘1S A SINGLE BANK TO BE PROM MAINT

it BNK_HWTBL

5511

21-Apr=1981 08:40:22
21=-Apr=1981 08:19:06

000560°
001630°*
000002

000634°
001630°

LINIT:

.SBTTL

LINIT INITIALIZE CODE SECTION
R1,$SAVES

5354

CMP
BLE

LSUNIT #1

5377

5380

.WORD
.WORD
. WORD

1
SO.ERR.MSG
#GTR.MSG,=(SP)
#ONE .MSG,=(SP)
#2,-(SP)

5381

JSR

TRAP

MOV
MOV
MOV
MOV
TRAP
MOV
MOV

#14,SP

SP,RO

: SP,»

#UNIT.SEL .MSG, (SP)
#0ONE .MSG,=(SP)

5382

026652
026654

026660
026664
026670
026672
026674
026676
026700
026702
026704
026710
026714
026720
026722
026724
026730
026732

026734

026740
026742
026744
026746
026750
026752
026754
026756
026760
026764
026770
026774

INITIALIZE CODE SECTION

012746
010600

000002

062706
005067
012700

000012
000000G
000040

104414

104447
103422
104454

000001
000000
000000
012746

012746
012746

010600
104414

062706
005000

000006

2%:

#40,R0
47

TRAP

MOV
MOV
MOV
MOV
TRAP
MOV
TRAP
TRAP
ADD

MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
TRAP

0000006

MOV

000012

TRAP
ADD

000006
000002
000004
000006
000010
000012
000014
000016

000004
000002

3%:

SP,RO

MOV
MOV
MOV
MCV
MoV
MOV
MOV
MOV

Page 196

SEQ 0229

3 W,
5379
5385
5392

LSUNIT

5365

éLL.CMD.MSG
#START .MSG,=(SP)
#ONE .MSG, = (SP)

5396

#2,-(SP)

SP.RO
14

: 9,
5397

LSUNIT,RO

LUN

TRAP
MOV

.WORD
.WORD
. WORD

000330°'
001630°*
000002

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (56)

CLR

TRAP

000370°'
001630"
000002

027042
027050
027056
027062
027066
027072
027076

MOV
TRAP

CLR

.WORD
.WORD
. WORD

000104"*
001630°"
000002
0000006

104451
104444

14
#12,SP

BCS

016700

#2,-(SP)

MOV
MOV
TRAP
ADD

* PTBL.PTR

5394
5406
5408
5411

bUN.MISS.MSG
#SUPRES .MSG,~(SP)

5412

#0ONE .MSG,=(SP)
#2,-(5P)

SP,R0O
14

#RET.DRS.MSG,
(SP)
#ONE .MSG,=(SP)

#2,-(SP)
SP,RO
14

5413

§ WP,

LSUNIT,RO
51

ah
#12,SP
4%

(R5) ,6(SP)
2(R5) ,4(SP)
4(R5) ,2(SP)
6(RS), (SP)
i cned suslh auld

026644
026650

21-Apr=1981 08:40:22
21=Apr=1981 08:19:06

BSKEL4
REV A PATCH 00

PTBL.PTR,SYS.HWTBL

:
:
:
:
:
:

=(PTBL.PTR) .BNK.HWTBL
»(PTBL.PTR) .BNK.NO.HWTBL
=(PTBL.PTR) .ARR.NO.HWTBL
*(PTBL.PTR) ,RH.BASE . HWTRL
«(PTBL.PTR
.DUT . HWTBL
)
=(PTBL.PTR).OPTION.HWTEL

=(PTBL.PTR) ,ARR.HWTBL

BSKELS
REV A PATCH 00

027102
027106
027110
027112
027116
027122
027124
027126
027132
027136
027142
027144
027146
027152
027156
027162
027164
027166
027172
027174
027176
027202
027204
027210

016505

INITIALIZE CODE SECTION
000020

4%:

000330°*
001630°"
000002
000370°"
001630"
000002
000000G

000014
5%:

037000°*
036772
036776"

042705
142704
050504
016705

000177
000011
000007
000200
000400
001000
004000
000777
000013
000011
000400
000001

036770
037004
037006"
037014"
037010
037012°
036774
000006

036772
000010 000012
000012
036776"
177770

000007

036772"

BLO

CLR

MOV
MOV

DEC

036770"*
037004"
037006"
037014°
037010*
037012°*
036774"

000200
000200
001000

MOV
ROR

MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
TRAP
MOV
TRAP
TRAP
ADD

001700
000001

027214
027220
027222
027224
027232
027240
027246
027254
027262
027270
027276
027300
027306
027314
027322

027416

Jd &
21=-Apr=1981 08:40:22
21-Apr=1981 08:19:06

MOV
MOV
MOV
MOV
MOV
MOV
MOV

6%:

7%:

MOV
MOV
MOV
MOV
MOV
MOV
MOV

BIT
BEQ

MOV
MOV
MOV
MOV

BIC
BICB
BIS
MOV

20(R5) ,R5

RS
5%

#LFS,=(SP)
#1,-(SP)

SP,RO

14
#SUPRES .MSG, (SP)
#ONE .MSG,=(SP)
#2,-(SP)

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (56)

; *(PTBL.PTR) ,CORRECT.HWTBL
; CORRECT.HWTBL

Page 197

SEQ 0230

5432
5440
5443

s P,
5444

SP.RO

14
G,
(SP)
#RET.DRS.MS
#ONE .MSG, = (SP)
#2,-(SP)

SP.RO
14

5445
s W,
5446

LSUNIT,RO
51
G4
#14,SP

8%
ARRS$BNK
. SEL
R2.ML .ADDR
R3,ML.DUT
R4
6%

RH.BASE .HWTBL , *

; DUT.HWTBL,*
; OPTION.HWTBL

#1000, INC.ARR

#177 ,BNK .NUM.
SEC

#11,ARR.SEL .PCS
#7 ,BNK . SEL .POS

;EOO.MAX.CHIP.COL

9%
ML .ADDR,RS
10(RS),12(sP)
12(SP) R4

ML .DUT .RS

#177770.RS
#7 R4
RS Ré

ML .ADDR,RS

5461

5464
5465
5466
5467
5468
5469
5470
5461
5474

#200,
COL .BASE
#200, INC.BNK

#400,
COL .BASE
#1000, INC.BNK
#4000, INC.ARR
#777 ,BNK .NUM,
SEC
#13,ARR.SEL.POS
#11,BNK.SEL
.FOS
#400 ,MAX.CHIP.
COL
#1,6(SP)

5442
5440
5454
5455
5456

5475

*,SYS.HWTBL

* ML .REG
; ML.REG,MLREG
* ,MLREG
* ,MLREG

547
547
5478
5479
548
548

5492

21=Apr=1931 08:19:06

| REV A PATCH 00 INITIALIZE CODE SECTION

21-Apr=1981 08:40:22

BSKEL4

#4 ,RAND . PASS
#4 ,TSTED.BNK
14%
#1,4(SP)
10%
LST.TSTED.ARR
#10,RAND .PASS
#4,TSTED .BNK
#ARRSBNK . SEL ,=(SP)

3
;
:
; *,ARR.HWTBL
3
:
:
3

5494
5495
5489
5500
5503
5504
5505
5506

R1,=(SP)

,*
; ARR.NO.HWTBL

R4,10(R5)
ML .ADDR,R5
24 (R5) ,10(SP)
10(SP) ,RS

027454 042705 177740
027460 005305
027462 010567 037032°

BIC
DEC
mMov

#177740,R5
J
R
R5,LST.TSTEL.ARR

ASR
ASR
ASR
SWAB

027466 012767 000004 037034°
027474 012767 000004 037002°
027502 000532 000001 000004
027504 032766
027512 001422
027514 005067 037032'
037034'
027520 012767 000010
027526 012767 000004 037002°
027534 (012746 037000°
027540 016746 037010°
027544 012746 000004
027550 010146
027552 004767 000000G

027556 000502
027560 032766 000001 000002
027566 001434
027570 005067 037032° 037034°*
027574 012767 000015 037002°
027602 012767 000001
027610 012746 037000° '

8%:
9%:

MoV
MOV
BR
BIT
BEQ
CLR
MOV
MOV
MOV

MOV
MoV

MoV

108:

027614 016746 037010°
027620 012746 000004
027624 010146
027626 004767 000000G

BR
BIT
BEQ
CLR
MOV
MOV
MOV

MOV
MoV

MOV

ARR.SEL .POS,=(SP)
#4,-(SP)

R1,=(SP)

,*
; ARR.NO.HWTBL

14 (SP) ,=(SP)

; BNK.NO.HWTBL,*

MoV
MOV

BR
TRAP

JSR

PC,BL$PU2

.WORD
.WORD
.WORD

MOV

2
HQ.ERR.MSG
0

#HQ.MSG,=(SP)

MOV

#2,=(SP)

027656 000440
027660 104454

027662 000002
027664 000142°
027666 000000

027670 012746 000216°

027674 012746 001630°

027700

012746

027704 010600
027706

104414

027714

012746

000002

027710 012716 000330*

001630°

13%
#1,2(SP)
1%
LST.TSTED.ARR
#15 ,RAND .PASS
#1,TSTED.BNK
#ARRSBNK . SEL , = (SP)
PC ,BL$PU2
#ARRSBNK . SEL , (SP)
BNK.SEL .POS,=(SP)
#2,-(SP)

MOV

MoV

11%:

ARR.SEL .POS,=(SP)
#4,~(SP)
PC,BL$PUZ2

027632 012716 037000°
037012°

027636 016746
027642 012746 000002
027646 016646 000014
027652 004767 0000006

RS
RS
RS
RS

JSR

MOV

MoV

TRAP

MOV

SEQ 0231

5493

MOV
MOV
MOV
MoV

006205
006205
006205
000305

PA:<NEALE>PMSKL4.BLI.1 (56)

Page 198

; MLREG,*
:
: *,ML.REG
; ML.REG,*

027422 010465 000010
027426 016705 036772°
027432 016566 000024 0CO010
027440 016605 000010
027444
027446
027450
027452

TOPS=20 Bliss=16 v2(212)

12%
54

#ONE .MSG, = (SP)

SP,RO
1k3

#SUPRES .MSG, (SP)
#ONE .MSG, = (SP)

5498
5511
5514
5515
5516
5517

:
: *,BNK.HWTBL
:
H
r
:

5519

:
:

5509
5530

5531

: SP,0

5532

027730
027734
027740
027744
027746
027750

027754
027756
027760
027764
027770
027774
:

;

012746
010600

000002

012716
012746
012746
010600

000370
001630"
000002

016700
104451

000000G

104414

000207

Routine Size:

Maximum stack

027776
030002
030004

004767
104411

MOV

mMOov
TRAP

MOV
MOV
MOV
MOV
TRAP
MOV
TRAP

000006
000010
000014
325 werds

£ NN
PAAAH

027720
027724
027726

ADD
ADD
ADD
RTS

depth per invocation:

19 words

176562

LS$INIT: :JSR

.SBTTL

TRAP
RTS

000207

: Routine Size:

TRAP

4 words

; Maximum stack depth per

invocation:

Co 0o

INITIALIZE CODE SECTION

T SR

S TRe

BSKEL4
REV A PATCH 00

L &
21=Apr=19
21=Apr=19
#2,-(SP)

SP,RO

14
(SP)
#RET.DRS.MSG,
#ONE .MSG,=(SP)
#2,-(SP)

SP.,RO
14

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (56)

Page 199

SEQ 0232

s SP,»
5533

3 P,
5534

LSUNIT,RO
51
G4

5509.
5498
5354

#10,SP
#14,SP

LSINIT INITIALIZE CODE SECTION

PC,LINIT
11

0 words

‘o,
‘

5542

e
e

BSKEL&
REV A PATCH 00 MAIN PROM MAINT CONTROL CODE

ggzg %sbttl 'MAIN PROM MAINT CONTROL CODE"

21-Apr-1981 08:40:226
21-Apr=1981 08:19:0

:
:

ggzg | MAIN PROM MAINT CONTROL CODE
5549 BGNTST;

;
:

5550
5551

5§552
gggz

local

:
:
:

5555
5556
5557

!
| PROMPT THE OPERATOR THAT THE
| PROM MAINTANENCE PROGRAM HAS BEGUN

5560 PRINTB (ONE_MSG, BGN_MSG);

PM ALL SELECTED
5563 | THIS OUTER LOOP WILLFROM
EITHER ONE ARRAY TO THE SELECTED

:
:

gggg

TEMP_TSTED_BNK,
TEMP_ARRSBNK _SEL ;

PRINTB (DRV_SEL_PRINT, .ML_DUT);

5564

| ARRAYS. IT WILL-.PM

:
;

5566
5567

5569

5365

OF TESTED BANKS PER ARRAY
' TEMPORARY. STORAGE FOR THE NUMBER
i TEMPORARY STORAGE FOR THE ARRAY & BANK SELECT VARIABLE

| DRIVES MAX ARRAYS.PRESENT.
S

5568 incr ARR_SEL from 0 to .LST_TSTED_ARR do

begin

ITEST ALL SELECTED ARRAYS

5570

BREAK;

5578

5579

ROWS.&
| THIS INNER LOOP WILL FIND INNEWTHEFAILING
BANKS OF THE. SELECTED

5583

:
;
:
:
:
:
:

:
:

5571
5572
5573
5574
5575
gg;g
5580
ggg}

.
DEGRADE_MOD_REG = ZEROES; . b,
BAD_BNK_REG = ZEROES;
.
FLG_REG = ZEROES;
'
();
TBL
1 BCAST
Ny,
TEMP_TSTED BNK = .TSTED_BNK;
..
;
NK_SEL
.ARRIB
=
_SEL
RRSBNK
TEMP_A

ICLEAR THE DEGRADE MODE REGISTER
iCLEAR THE BAD BANK REGISTERS FLAGS
iCLEAR THE FLAG REGISTER
iINTI THE BLAST TABLE
STORAGE
iLOAD NUMBER OF TESTED BANKS INTO TEMPSTORAG
E
TEMP
INTO
SEL
BANK
&
ARRAY
'LOAD THE

i COLUMNS WITHIN BAD CHIPS

.
i ARRAYS. EITHER 4 BANKS, IF PM'ING SYS/ARRAY
| OR 1 BANK IF PM'ING % SINGLE BANK WILL BE TESTED.

| PROMPT THE OPERATOR WHICH ARRAY IS PRESENTLY SELECTED

gggg

PRINTB (ARR_SEL_PRINT, .ARRSBNK_SEL<.ARR_SEL_POS, ARRSSEL_SIZE>);

2588

gggg

:
;
;
:

5590
5591
5592
5593

5596

Page 200
SEQ 0233

| AND WHICH DRIVE IS SELECTED.

ggg;

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (57)

'PROM MAINT ALL THE FAILING CHIPS IN THIS BANK

egin
BNKSSEL_SIZE>); !PRINT
PRINTB (BNK_SEL_PRINT, .TEMP_ARRSBNK_SEL<.BNK_SEL_POS, CHIPS
IN THIS BANK
E"BAD
'FIND"TH
FB_CHIPS (.TEMPTARRSBNK SEL)}
IN THIS BANK
CHIPS
BAD
THE
MAINT
'PROM
PM"THIS BANK (.TEMP_ARRIBNK_SEL);
TO THE NEXT BANK
NT
INCREME
"
K;
.INC_BN
+
SEL
TEMP_ARRSBNK_SEL = .TEMP_ARRSBNK_

TE:P_TSTED_BNK = .TEMP_TSTED_BNK = 1;

!'DETREMENT THE TESTED BANK COUNT

until (.TEMP_TSTED_BNK eql ZERO) or (.FLG_REG [F_ABORT_ARRAY]);
en

'REPEAT UNTIL ALL BANKS ARE TESTED

i
o

BSKELS

PR TETE T

VR TR

SRR

P S T
S I TR

PR TP S

PN T

REV A PAT(H 00

030006
030012
030016
030022
030032

5597
5598
5599
5600
5601
5602
5603
5604
5605
5606
5607
5608
5609

N 2
21-Apr=1981 08:40:22
21=Apr=1981 08:19:06

MAIN PROM MAINT CONTROL CODE

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (57)

i THE BLAST TABLE HAS NOW BEEN LOADED WITH ALL
.

NEWLY FAILING ROWS AND COLUMNS WITHIN THIS TESTED ARRAY.
REG [F_ABORT_ARRAY]-

then

else

PRINTB

(ONE_MSG,

begin

IN_BLAST_TBL

ABORT_MSG)

(.ARR$BNK_SEL,

5610

if .BAD_BNK_REG eql
then

5613
5614
5615
5616
5617
5618

else

5611
5612

PRINTB

(ONE_MSG,

ABORT ARRAY FLAG SET DURING PROM MAINT

'REPORT

THAT PROM MAINT

.TSTED_BNK);

ZERO

"INTERIGATE
'ARE

NG_AD_MSG)

THERE

!PRINT

begin
CAL_CHK_SUM (),

FOR

ADDITIONAL

THE

THIS ARRAY

THE BLAST

ANY ADDITIONAL

'CALCULATE

BL_PROMZ
(ARR&BNK_SEL);
if

'WAS THE

TABLE

ERRORS

S ABORTED

TO BLAST

MESSAGE

NEW PROM DATA (HECK

SUMS

'BLAST THE PROMS WITH THE NEWLY FAILING ROWS/COLS

.FLG_REG [F_D_CLK_TIME_OUT]

then exitloop;

5619
5620
VER_BLAST (.ARRSBNK SEL);
'VERIFY THAT THE BLAST WAS SUCCESSFUL
5621
VER_ERROR MASK (.ARR$BNK _SEL, .TSTED BNx)
5622
g
TVERIFY THAT THE BLAST MASKED OUT THE NEW FAILING ROWS/COLS
5623
end,
5624
5625
end;
5626
ARRSBNK_SEL = .ARRSBNK_SEL + . INC_ARR;
' INCREMENT TO THE NEXT ARRAY
5627
end,;
5628
5629
i
5630
5631
E PROMPT THE OPERATOR THAT THE
PROGRAM EXECUTION HAS ENDED
5632
5633
5634 PRINTB (ONE MSG, END_MSG);
'REPORT THAT THE PROGRAM [S (OMPLETED
PRINTB (ONE_MSG, RET_DRS MSG)
5635
'PRINT RETURNING TO DRS> MESSAGE
5636 DODU(.LSUNTT);
:
'DROP THIS UNIT
5637 DOCLN;
!GO TO THE CLEAR UP CODE SECTION
5638 ENDTST;

004167
012746
012746
012746
104414

016716

0000006
000052
001630°*
000002
C36776"

$71:

LSBTTL
JSR
MOV

$T1 MAIN PROM MAINT CONTROL CODE
R1,$SAVE4
:
#RGN.MSG, = (SP)
:

MOV
MOV

#2,-(SP)
SP.RO

MOV

TRAP

MOV

lONE.HSG.-(SP)
ik

_ML.DUT, (SP)

’

ol
:

5561

012746
012746
010600
104414

MAIN PROM MAINT CONTROL CODE
MOV
MOV
MOV
TRAP
MOV

0017%6"
000002
037032'

CLR

1%:

037022"
037016
037020"

CLR
JSR

154466

MOV
MOV
MOV
MOV
MOV

037002°"
037000*
037000"
037010°*
000004

CLR
JSR

000000G

001770"
000002
2%:

037012"
000002

CLR
JSR

MOV
MOV
MOV
MOV
TRAP
MOV
JSR
MOV

002036"
000002

172354

JSR

172416
037004"*

ADD
DEC
ADD

000014

030302

104414

MOV
MOV
MOV
MOV
TRAP
MOV
MOV

000000G

000100

037020°*

000100

037020"

000766"
001630"
000002

TRAP
CLR
CLR

3%:

TST
BEQ
BIT
BEQ

BIT

BEQ

MOV
MOV
MOV
MOV
TRAP

#DRV.SEL .PRINT,=(SP)
#2,=(SP)

SP.,RO
14

ARR. SEL

PC,I1.BLAST.TBL

NK
. SEL ,=(SP)
#ARRSB

FLG.REG

TSTED.BNK
,R3
ARRS$BNK
. SEL ,R2

202

5568

LST.TSTED.ARR,R&
9%
22
DEGRADE .MOD.REG
BAV .BNK .REG

Page

55095235

3 W,

5569
5571
5572
5573

REV A PATCH 00

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (57)

PETETETE TR TR

BSKEL4

B 3
21=-Apr=1981 08:40: 22
21=-Apr=1981 08:19: 06

* TEMP.TSTED.BNK
. SE
*,TEMP.ARR$BNK

5574
5575
5576
5586

ARR.SEL .POS,=(SP)
#4,<(SP)

-(SP)
PC.BL$GT?2
RO, (SP)
#ARR.SEL .PRINT ,=(SP)
#2,-(SP)

SP.RO

§ P,

R2,=(SP)

BNK.SEL .POS,=(SP)

TEMP.ARR$RBNK.SE,*

5590

#2,-(SP)
-(SP)

PC.BL$GT1
RO, (SP)

#BNK . SEL .PRINT,=(SP)
#2,=(SP)

SP.RO

14
R2, (SP)
PC,FB.CHIPS
R2, (SP)
PC,PM.THIS.BANK

: SP,»
:

TEMP.ARRS$BNK.SE,*

55N

;

TEMP.ARR$BNK.SE,*

5592

lgC.BNK,RZ

. SE
* TEMP.ARR$BNK

TEMP.TSTED.BNK

5593
5594
5589

R
#14,SP

TEMP.TSTED.BNK

5596

#100,FLG.REG

#100,FLG.REG
4%
#ABORT .MSG,=(SP)
#ONE .MSG,~(SP)
#2,-(SP)

SP,RO
14

5603

5605

——————e
e

BSKEL4
REV A PATCH 00

000452
016746
016746
004767
005767
001012
012746
012746
012746
010600

MAIN PROM MAINT CONTROL CODE
4%:

037000°
037002°

104414

030502
030506
030510
030512
030516
030520
030522
030526

012716
012746
012746
010600
104414

037016

TST

5%:

172616

037000
173446
037020°*

6%:

037000
174630

037000
037002"
175574

7%:
8%:

037006 037000*
000022

9%:

10%:

000274
001630°*
000002
000370°
001630*
000002

062706
000207

000022
)

invocation:

22 words

TOPS=20 Bliss=16 v2(Z12)
PA:<NEALE>PMSKL4.BLI.1 (57)

Page

203

SEQ 0236

8%
,=(SP)
BNX
.SEL
ARR$
TSTED.BNK ,=(SP)

5603
5608

géD.BNK.REG

5610

#NO.AD .MSG,=(SP)
#ONE .MSG,=(SP)
#2,-(SP)

5612

PC,IN.BLAST.TBL

SP,RO

SP,

14
+
(SP)

5610
5615

PC,CAL.CHK.SUM

,=(SP)
BNK
.SEL
ARR$

5616

FLG.REG

5618

PC.BL .PROMS

BPL
ADD
BR
MOV

ARRS$BNK .SEL, (SP)

5620

MOV
MOV

, (SP)
BNK
. SEL
ARR$
TSTED.BNK ,=(SP)

5621

(SP)+

5607
5627
5569

JSR
JSR
TST
ADD
ADD

INC

BLE

MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
TRAP
MOV
TRAP
TRAP
ADD
RTS

169 words

Maximum stack depth per

JSR

MOV

JSR
TSTB

000022

0000006

; Routine Size:

;

MOV
MOV

MOV
MOV
MOV
MOV
TRAP

001036°
001630°*
000002

016700
104451
104444

JSR
TST

164254

104414

005726
000426
004767
016746
004767
105767
100003
062706
000423
016716
004767
016716
016746
004767
005726
066767
062706
005201
020104
003604
012716
012746
012746
010600

E 3
21-Apr=19 81 08:40:22
21=-Apr=1981 08:19:06

#22,SP
108

PC,VER.BLAST

PC,VER.ERROR.MASK

K
. SEL
INC.ARR,ARR$BN
R1
R1.R4
1%
#END .MSG, (SP)
#ONE .MSG, = (SP)
#2,-(SP)

SP.RO

14
(SP)
#RET.DRS.MSG,
#ONE .MSG,=(SP)
#2,-(SP)

SP,RO
14

ARR.SEL
ARR.SEL
,*

5568

5634
SP,*

5635
SP,*

LSUNIT,RO
51

5636

#c2,SP

5544

[

D 3
21=-Apr=1981 08:40:22
21-Apr=1981 08:19:06

004767

177252

030530
030530
030534
030536
030540
030542

.SBTTL
oo

!
|

MAIN PROM MAINT CONTROL CODE

REV A PATCH 00

——

BSKEL4

TRAP

104466

ROR
BLO
RTS

006000
103773
000207

.
8
6 words
:
invocation
per
depth
stack
: Maximum
; Routine Size:

JSR

0 words

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.1 (57)

Page 204

SEQ 0237

T1 MAIN PROM MAINT CONTROL CODE
5637

BSKEL&
REV A PATCH 00

5639
5640
5641
5642
5643
5644
5645

030544
030546
030552

010146
016700
016046
011601
152701

030624

030630
030634
030636
030640

016700
010160
016700
016046
012601
016700
042700
142701
050001
016700
010160
005726
012601
000207

; Routine Size:

;

CLEAN UP CODE SECTION

030646
030650

004767

BGNCLN;

CLR_MBUS;

ENDTLN;

.SBTTL
LCLEAN: MOV

MOV
MOV

036772"
000010

MOV

BISB
MOV
MOV

000040
036772"
000010

MOV
MOV

036772"
000010

MOV

MOV
BIC
BICB

036776"
177770
000007

BIS

MOV
MOV

036772"
000010

31 words

TST
MOV

invocation:

R1,=(SP)

ML .ADDR,RO

10(RO) ,=(SP}
(SP) ,R1
#40,R"

ML .ADDR,RO

R1,10(R0O)
ML .ADDR,RO
10(RO) ,=(SP)
)
+ ,R1
(SP
ML.DUT,RO
#177770,R0
#7 ,R1
RO.R1

ML .ADDR,RO
R1,10(R0O)
+
(SP)

* ML .REG

;

ML .REG,MLREG
*,MLREG

;

MLREG,*

5638
5643

; *,ML.REG
; ML.REG,MLREG
:

*,MLREG

; *,MLREG
MLREG,*

5638

)
+ ,R1
(SP

.SBTTL

L$CLEAN CLEAN UP CODE SECTION

JSR

PC,LCLEAN

& words

TRAP
RTS

invocation:

LCLEAN CLEAN UP CODE SECTION

RTS

L$CLEAN::

177676

; Routine Size:
4 words
; Maximum stack depth per

5647
5648

Page 205

SEQ 0238

i CLEAN UP CODE SECTION

104412
000207

5646

TOPS=20 Bliss=16 v2(212)
PA:<NEALE>PMSKL4.BLI.T (58)

%sbttl 'CLEAN UP CODE SECTION'

Maximum stack depth per

030642

E 3
21-Apr=1981 08:40:22
21=-Apr=19871 08:19:06

0 words

end

e ludom

; 0TS external

references

5644

BSK ELS

. REV A PATCK 00

21=Apr=1981 08:19:06

CLEAN UP CODE SECTION
.GLOBL
.GLOBL
.GLOBL

Size:

Run Time:

6357 code ¢+ 8970 adata words
01:28.3

flapsed Time: 02:51.0

131 pages
Memory Used:
(ompilation Complete

21=-Apr=1981 08:40:22

BL$GT2, $SAVES, $SAVE4, $SAVE3
$SAVEZ2, BL$PU2, BLSGT1, BLSDIV
BLS$MOD

TOPS=20 Bliss=16 v 221 2)
PA:<NEALE>PMSKL4.BLl.1 (58)

Page

206

SE095239

Pmsk!3

1166+

1168+

113+
1134+
1176+
1176+

1140+
1140+
1178+
1178+

Q+#
Q+#

e
+E+

S5+

b
b

1+#
1+#

1196+
1196+
1230+
1230+
1317+
1317+
962+
962+
1101+
1101+

D e

1194+
1194+
1228+
1228+
1310+«
1310+
952+
952+
1094+
1094+

1101+
1168+
1168+

b cd e

1101+

1094+
1166+
1166+

1094+

Pmsk
2

633+4
1003+
1003+
1140+
1140+
1178+
1178+
1203+
1203+
1234+
1234+
1348+
1348+
1003+
1003+

PONUNIN)
= = = 2O 0O
00 00 — — 00 00 W\ 00 00
W OO 0000 N~

$CODES®

487+
967+
967+
1134+
1134+
1176+
1176+
1201+
1201+
1232+
1232+
1322+
1322+
967+
967+

Pmsk L4

473+
473+
486+

619+#

619+4
619+#
632+4

Pmskl3

473+

Pmsk L2

$BGNTST

648+
648+
648+
648+
661+
662+

506+
506+
506+
506+
519+
520+
619+#

n &S

Pmsk L4

501+
501+
501+
501+
514+
515+
473+

496+

496+
496+
509+
510+

PRI

3
Pmsk

484+
484+
497+
498+

496+

OO NN

Pmsk L2

484+

$BGNSUB

484+

Pmsk L4

266+4

Pmskl3

267+4
459+
459+
459+
459+
472+
473+
454+
454+
454+
454+
LET7+
4LEB+
LEL+H
LOL+A
LbL+A
LbL+a
L77+4
LT7B+A
962+
962+

263+4
263+4
263+4
263+4
276+4
277+4

wil

Pmsk
2

266+
334+4
334+4
334+4
334+4
347+4
3LB+4
33344
33344
33344
333+4
3L6+4
34,748
332+
33244
33244
332+
345+
346+8
952+
952+

265+

254+
254+
254+
254+
267+
268+

$BGNSEG

253+4
253+#4
253+4
253+4

il wud el

Pmsk L4

252+
252+
252+
252+

Pmsk (3

271+

PPNV
=2 = 2 2 O O

£ TMP2

Pmsk L2

Pmsk L4

Pmskl3

257+
257+
257+
257+
270+

Pmsk
2

$$TMPT

272+
273+

BOON BPNMNN = — = —OO

Pmsk L&

260+#
260+#
260+#
260+#
273+#
274L+4

0000 5 S0\ O\ ALY = = 000 & 5.0, Oy

Pmsk(3

259+
259+
259+
259+

T
T S Y———————
Y I R

$3TMP

LL6+H

Pmsk (2

L32+#4
L32+4
445+4

Pmsk L4

SEQ 0240

20005~ G OONNO
O b~ o

Pmsk (3

L32+4
432+4

B OO WWNINININ
— — — —

Pmskl2

$8LAST

Pmskl4

Pmski2
Pmskl3
Pmsk 4

$GLORS

Pmskl2
Pmskl3

Pmskl4

Pmskl2
Pmskl3

SOWNS

$POINT

$POPLEV

1147+
1148+
1189+
1190+
1274+
1215+
1245+
1246+

1075+#

1096+

1106+

1075+#
1075+#
1088+#
1089+#

1096+
1096+
1109+
1110+

1106+
1106+
1116+
1120+

SPUSHLEY

1323+
1324+
385+»

385+«
385+»
385+«
398+«
309+x

1075+4#

1291+#

1330+
1331+

1096+

Pmskl3

1076+
1076+
1089+
1090+

1095+4#
1095+#
1108+4
1109+#

1304+#
1076+

1002+#

1095+4#

1006+#
1006+#

Pmskl3

1002+#

1006+#

Pmsklé

1015+4
1016+4#

1019+#
1020+#

Pmskl4

Pmskl2
Pmskl3
Pmskl4d

1322+
1322+

1114+
1115+
1181+
1182+
1209+
1210+
1243+
1244+

1095+#4

Pmskl3

1226+
1221+
1 SEQ 0241
1221+
1294+ . 1302+
1302+
1294+

1016+
1017+

1073+#4
1074+#

1074+
1075+

1077+
1078+

1087+
1088+

1094+#
1095+#4

1095+
1096+

1361+
1362+

1398+
139G+

980+
981+

1076+

Pmskl2

1219+
1219+
1283+4
1283+#4

975+
976+

Pmskl2

1217+
1217+
1259+
1259+

965+
966+

1317+
1317+

1561
1561

Pmskl4

1215+
1215+
1253+
1253+

1203+
1203+
1234+
1234+

1291+#
1291+#

Pmskl4

1210+
1210+
1238+
1238+

1201+
1201+
1232+
1232+

1310+
1310+«

1002+#

339+#

330+4
339+#
330+4
352+#
353+4

338+#

3IR+4
338+#
I3+
357+#4

35044

1006+#

470+

470+
470+
470+
483+
484+

469+

L6+
469+
469+
482+
LB3+

1335+«
1336+

1205+
1205+
1236+
1236+

1196+
1196+
1230+
1230+

1107+
1108+
1179+
1180+
1207+
1208+
1241+
1242+
$END_L INK

1194+
1194+
1228+
1228+

1348+
1348+

1153+
1154+
1191+
1192+
1216+
1217+
1247+
1248+

1385+
1385+

1156+
1157+
1193+
1194+
1218+
1219+
1249+
1250+

1106+

1566
1566

1582
1582

1
1
1
} 301+

1055+

1 1055+
1 1055+
1 1055+
1

068+

1069+

632+

653+

654+

482+

485+

632+

632+
632+
632+
645+
646+
482+
482+
482+
495+

496+

653+
653+
653+
666+
667+
485+
485+
485+
498+

499+

654+
654+
654+
667+
668+

632+
632+
632+
645+
646+

1420+
1420+

1161+
1162+
1195+
1196+
1223+
1224+
1251+
1252+
1433+
1434+

1489+
1489+

1163+
1164+
1197+
1198+
1228+
1229+
1266+
1267+
1502+
1503+

1165+
1164+
1199+
1200+
1230+
1231+
1272+
1273+

1170+
1171+
1201+
1202+
1232+
1233+
1296+4#
1297+#4

1172+
1173+
1203+
1204+
1234+
1235+
1307+
1308+

1097+
1098+

1177+
1178+
1205+
1206+
1239+
1240+
1315+
1316+

Pmsk
2

449+
449+
449+
449+

Pmskl3

462+

Pmsk L4

$SUBNUM

463+
449+
449+
- 449+
449+

Pmsk
2

Pmsk (3

462+

Pmsk
L4

g $TSTNUM

463+
449+

Pmsk (2

449+

Pmsk (3

449+
449+
462+
463+

Pmsk
4

ExvZ¢

397+
391+
391+
391+

Pmsk (2
Pmsk (3
Pmskl4

ZREMAINING

Pmsk L2

Pmskl3
Pmsk L4

Pmsk (2
Pmsk (3
Pmsk L4

ABORT_MSG

Pmsk
4

ADJACENT_CNT

Pmsk L4

ADR

Pmsk
2

Pmsk(3
Pmsk L4

ALL

Pmsk L2

Pmsk L3
Pmsk L4

ALL_BAD

Pmsk L4

397+

438+

438+
451+
452+

723+

723+
723+
723+
736+
737+
4959

4960

404+
405+
695+

695+
695+
695+
708+

709+
726+
726+
726+
726+
739+
740+
4976
4977

20454
5604
5605
20464
3172
32044
- 32054
3173
224L+#
224+4
224+4
224+4
237+4
238+#
1007+
1007+
1007+
1007+
1020+
1021+

3630
3631
3717
2718
3902
3903

L72+
472+
472+
472+
485+
486+
471+
471+
471+
471+

484+

485+
474+
474+
474+
474+
487+
488+
392+
392+
392+
392+
405+
406+
702+
702+
702+

702+

715+
716+
728+
728+
728+
728+
741+
742+
5008

483+
483+
483+
483+

3
SEG 0247

496+
497+

507+
507+
507+
507+
520+
521+
626+
626+
626+
626+
639+

640+
407+

407+
407+
407+
420+
421+
709+
709+
709+
709+
722+

723+

889+

889+
889+
889+

902+

5009

903+
5031
5032

32184
32194

3240
3241

628+

628+
628+

628+

630+
630+
630+
630+

641+
642+

643+
644+

430+
716+

728+

416+
416+
416+
416+
429+

716+
716+
716+

729+
730+
919+
919+
919+
919+
932+

728+
728+
728+
741+

742+

933+
5054
5055

951+
951+
951+
951+
964+
965+
5073
5074

3696
3697
3761
3762
3916
3917

3697
3698
3762
3763
3919
3920

3808
3809
5140
5141

3848
3849

5168
5169

3958
3959
5197
5198

3705
3706
3821
3822

3706
3707
38234
3824

3715
3716
39004
39014

1508
1508

1678#
16794
36814

36824
37544
37554
3904
3305

45204
452#

4522
4523

45254
L5264

—

$SEGNUM

o
e

4527

ALL_BAD_CNT

Pmskl4

AQE

Pmsklé

APTSTAT

Pmskl2
Pmskl3
Pmskl4

ARG

Pmskl2
Pmskl3

Pmskl4é

ARRSBNK _SEL

Pmskl4

ARRSSEL _SIZE

Pmskl4

ARR_HWTBL

Pmskl4

4528
3094

3095

17744

45304

45314
3129

4535

4536

d
4538

4539

;

3130

17754

1035+
1035+

1048+

1045+

1488+

1490+

1501+

1490+
1490+
1503+

1993

4043

4070

4170

4220

5607
5608

5615
5616

5619
5620

5620
5621

56264
56274

1488+

1502+

1994
5289
5290

1504+

4044
5313
5314

4071
5317
5318

1602#

4070

4222

5365

54248

5499

16034
5366

5368

4071

5425#

4223

5500

4171
5322
5323

4517
4518

5427#

5505

5516

4221
53504
53514

4221

4222

4222
S453%#
54544

4223
55054
55064

5211

5108

5137

5138
55184
5519#

5212
5575
5576

5109
55164
S517#

4929

5138

5137

5242

5243

5314

5313

5505

5516

4928

5506

5517

ARR_NO_HWTBL

Pmskl4

ARR_NUM
ARR_SEL

Pmsklé 4213
4214
Pmskl4 4513
4514
Pmskl4 1997

42228

4306

4352

4393

4434

5311

53134

5332

5341

L5178

4547

4554

5234

52428

5244

5261

5279

5567

4222

4517

4928

5137

5242

5313

5516
5517

5585
5586

4393

4434

ARR_SEL _POS

5369

1998

2070#
20714
17944

ARR_SEL _PRINT
:
ARR_TYP

Pmskl4

AS_PRINT

Pmskl4

ATTN

Pmskl4

20864
17604

ATTN_REG

Pmsklé

1784k

Pmskl2

Pmskl4

Pmskl3

Pmskl4

SEQ 0243

17954

20854

5428#

42238

4518#4

4070
4071

5506

4307

4548

4223

5517

4353

4555

4518

4394

5235

4929

5585
5586

2180
2181

17614

1785#

1039+

1039+
1039+
1039+
1052+
1053+

A_B_C_PRINT

Pmskl4

20744

4547

A_B_N_PRINT

Pmsklé

2075#

4306

A_B_PRINT

Pmsklé

2075#

20764
2077#

2078%#

4928

4548

4929

4307
5261

4353
5279

5262

4352

5280

4394

4435

52434

5138

5312

5245

5243

53144

5262

5314

5333

5280

54678
54684

5242

5243
5585
5586

5585

5586

5342

5568

5477#

5505

5478# - 5506

A_HWTBL

| B
| BAD_BITS
|

| BAD_BNK_REG

Pmskl2

1547

Pmskl2

+14
i 903+

951+

953+

Pmskl3

903+

951+

953+

Pmsklé

916+

964+

966+

Pmskl4

4586
4587

L6518
L6524

4655
4656

Pmskl4

2003
2004

BAD_CHIP

Pmskl4 2742

BAE_REG

Pmskl4

BAI

Pmskl4

BA_PRINT

Pmskl4

BA_REG

Pmskl4

BGNAU

Pmsk L2

2743
2854
2855
2937
2938
3047
3048
4530
4531

Pmskl3
Pmsk L4

BGNAUTQ

Pmsk L2
Pmskl3
Pmsklé

BGNCLN

Pmskl2

2787

2788
23862
2863
2944
2945
3630
3631
6547
4548

4968

2771

2792
2869
2870
2952
2953
3698
3699
4892
4893

5319

55714

5609

2798

2802

2809

2817

2379

2440

2489

5144

2799
2877
2878
2959
2960
3706
3707
48954
48964

5320

2803
2884
2885
2967
2968
3717
3718
4897
4898

5572#

2810
2892
2893
2974
2975
3763
3764
4914
4915

4936

20804

2175

17354

2242

20814

17368

351+#

351+4
351+#

351+4#

364+4
365+#

2176

2243
1678
1678

357+#

357+4
357+#
357+
370+#
37144

1645
1645

363+4

369+#

377+4
369+4
369+#
369+4
382+#
383+#4

Pmsk(2

1300+#

Pmskl3

1300+#
1300+#

1300+#

5642
5643

1661
1661

1518
1518

2269
2270

5143

17554

17564

Pmskl2

Pmskl4

42328

4967

18914

Pmsk L4

Pmskl3

BGNHRD

18904

363+#
363+#
363+#4
376+4#

Pmskl3

BGNDU

49348

42318

2380

2441

2490

5610

2818
2899
2900
2982
2983
3773
3774
4915
4916

2824

2825
2907
2908
2989
2990
3919
3920
4918
4919

2832

2833
2914
2915
2993
2994
4481
4482
4923
4924

2839

2840
2922
2923
3004
3005
4520
4521
4929
4930

SEQ 0244

2847

2848
2929
2930
3046
3047
4525
4526
4932
4933

BGNHW

Pmsk
2

3
Pmsk

SEQ 0245
1544
1544

Pmsk L4

8GNINIT

Pmskl2

Pmsk L3
Pmsk L4
BGNMSG

Pmsk L2

Pmskl3
Pmskl4

BGNPROT

Pmsk L2

Pmsk (3
Pmskl4
BGNPTAB

Pmsk L2

Pmsk L3
Pmsk L4
BGNRPT

Pmsk L2
Pmsk (3
Pmsk L4

BGNSEG

1627
1627

Pmsk
2

Pmsk L3
Pmsk L4

BGNSE TUP

Pmsk
2
Pmsk
3
Pmsk L4

BGNSFT

Pmsk L2
Pmsk(3
Pmsk L4

BGNSRV

Pmsk L2
Pmskl3

1599
1599

e e o oy

Pmsk L4

Pmsk L4
BGNSUB

Pmsk
2

Pmsk(3
Pmsk L4
BGNSW

Pmsk
2

Pmskl3
Pmsk L4

BGNTST

Pmsk L2

Pmsk (3
Pmsk L4
BGN_MSG

Pmsk L4

BITO

Pmsk L2

Pmsk L3
Pmsk L4

817100

Pmsk L2

Pmsk L3
Pmsk L4

BITO1

Pmsk L2

Pmsk L3
Pmsk L4

BITC?2

Pmsk
2

3
Pmsk
Pmsk L4

BITO3

Pmsk L2

Pmsk (3
Pmsk L4

BITO4

Pmsk
2

Pmsk
3
Pmsk L4

BITO0S

Pmsk
2

S542+#4
543+4
495+4
495+#
495+4
LO5+4
508+#
509+#
1059+#
1059+#
1059+#

SEQ 0246

1576
1576

1059+#
1072+#

1073+#
453+4
453+4
453+4
L53+4
LEG+H

LET+A
20294
20304
198+#

5548
5549
5559
5560

198+#
198+#
198+#

211+4
212+#
187+#
187+#
187+4
187+4
200+#
201+#

186+#
186+#
186+#
186+#
199+#

200+#

185+#
185+#
185+#
185+#
198+#
199+#

184+#4

184+#
184+#
184 +#
197+4
198+#4
183+#4

183+#
183+#4
183+4

196+4
197+#4
182+#
182+#

194+

194+
194+
194+

207+
208+

193+
193+

Pmsk L3

193+
193+

Pmskl4

BIT06

Pmsk
2

Pmsk
3
Pmsk L4

BI1107

Pmsk
2

Pmsk (3
Pmsk L4

BITO8

Pmsk L2
Pmsk L3
Pmsk L4

B1T09

Pmsk (2

Pmsk
3
Pmsk L4

8IT1

Pmsk
2

Pmsk(3

Pmskl(
BIT10

Pmsk L2
Pmskl3Pmsk (4

gIT1?

Pmsk L2

Pmsk
3
Pmsk L4

BIT1?

Pmsk
[2
Pmsk (3
Pmsk L4

BiT13

Pmsk |2

Pmsk
3
Pmsk 14
Pmsk
2

1+4

206+
207+
192+
192+
192+
192+

205+
206+
191+
191+
191+
191+

2064+
205+
190+

190+
190+
190+

203+
204+
189+
189+

189+
189+

202+
203+

SEQ 0247

Pmsk L4

BIT?

Pmskl?2
Pmskl3
Pmsk L4

BIT3

Pmsk
2

Pmsk (3
4
Pmsk

BIT4

Pmsk L2
Pmsk (3
Pmsk L4

8ITS

Pmsk L2
Pmsk L3
Pmsk L&

BIT6

Pmsk L2

Pmsk
3
Pmsk L4

BIT7

Pmsk
2
Pmsk (3
Pmsk L4

BIT8

Pmsk L2

Pmskl3
Pmsk L4

BITY9

Pmsk L2

Pmsk (3
Pmsk L4

BITS_TSTED

Pmsk L4

ka3

7+#
+ +
+
+

el
sl
sl

SEQ 0248

34
Tuaun

Pmskl3

sl il coeld

Pmsk L2

)

BIT1S

NNNNO000
NN
W
rorororO

Pmskl4

Pmskl(3

185+#
186+#
196+#
196+#
196+#
196+#

209+#
210+#
195+#
195+4
195+#
195+#

208+#
209+#

194 +#
194+#
194 +#
194 +#

207+#
208+#

193+#
193+#
193+#
193+#
206+#

207+#

192+#
192+#
192+4
192+#

205+#
206+#

191+4#
191+#
191+4#
191+#

204 +4
205+#

190+#
190+#
190+#
190+#

203+4
204+4
189+#

189+#
189+#
189+#

202+#
203+#
4583
4584

L6424
L6434

4658
4659

LO654

LO66H

| BIT_O

L4
Pmsk

1685#

BIT_1

Pmskl4

16864

BIT_10

Pmskl4

BIT_1

Pmskl4

BIT_12

Pmskl4

16864

16874

1695#

16964

16974

1697#

4756

BIT_13

Pmskl4

1698#

4788

BIT_14

Pmsklé4

1699%#

BIT_15

Pmsklé

BIT_2

Pmskl4

BIT_3

Pmskl4

BIT_&

Pmskl4

16894

BIT_S

Pmskl4

16904

BIT_6

Pmskl4

BIT_7

Pmskl4

BIT_8

Pmskl4

BIT_9

Pmskl4

BIT_CLR_OLD_NEW

Pmsklé

BIT_INDEX

Pmskl4 3034

BIT_SEL

Pmskl4

BLSLAS

BLAST_TBL

Pmskl2

16984
16994

1700#

17004

4757
4789

4819
4820

17014

16874

1688#

16884

1689#

16904

16914

16924

1692#

16934

16944

1695#

4134

4135«

4226

4227

30824

3083

3170

3037

3047#

30594

3077

392+

393+

3035
3847#
38484
3038

30834
3892
3893

30484

3084
3928
3929

30604

395+

3171
3937
3938

392+

393+

395+

Pmsklé4

405+

406+

408+

Pmskl4

1982

2613

31334

31364

4285
4286
4415
4416
5029
5030

4312
4313
L4184
44198
50514
5052#

43154
43164
4440
4441
5052
5053

4329
4330
L4438
L4448
5070#
5071#

5108+

5615

4221

4518

Pmskl4

BNKSSEL _SIZE

Pmskl4

5180
5181

5109«

16014

1602#

5186
5187
5616

3127
3128

4222

32134

3215

3464

32144
3941
3942

3216
3949
3950

3227

3228
3953
3954

3228

3229
4653
4654

3234
4655
4656

3234

3235
4658
4659

3812

4243

4255

4272

4378%#
43794
5005#
50064
5097
5098

4399
4400
5006
5007
5152
5153

44024
44034
5028#
50294
5157
5158

3233

3813

3078

Pmskl3

BL_PROMS

SEQ 0249

4519

4128#

L1654

43324
4333%#
4456
4457
5071
5072

4358
4359
L4598
L4604
5087#
5088#

4129%

L1668

4929

5317

5518

5589

4930

5318

43614
L362#
4974
4975
5088
5089

5519

4375
4376
4980
4981
50964
5097#

5590

4244

4256

4273

5366

54254

5510

Pmsklé 5367
5368
Pmsklé 3125

54068
54274
3107#

5518
3133

Pmsklé

BNK _HWTBL

BNK_NO_HWTBL
BNK _NUM

BNK _NUM_SEC

54068

5367

3128

516

42218

4226

4228

313

34,36

3465

4101
4102

2%%5

4126

4128

4129

4134

4243

4247

4255

4259

4333
4415
4416
45184
45198

4353
4418
4419
4547
4548

4127

4129

4248
4329

4130

4256
4332

4316
4399
4400
La778
44788

4330
4402
4403
4514
4515

4066

4265

4344

5029

5051

5052

5070

4313
4394
4395
4474
4475

Pmskl4 1999

2299

2346

2639

2660

3069

3195

3826

4614
4615

4743
4744

4775
4776

4806
4807

5133
5134

5239
5240

S4664
54678

54764
S477H

4975

4981

4221

4518

4929
4930

5318

5317

54684

54784

5578

5519

5590

2301

3071

4616

4745

4777

4808

4908

5569

2305
2306

2306
2307

2307
2308

23094
23108

23134
23144

4645
4646

4648
L6495

4651
4652

2300

4967

BNK_SEL_PRINT

Pmskl4

2072#

Pmsk L2

228+#4

4968

Pmskl3
Pmsk L4

Pmsk 2
Pmskl3

Pmsklé4
Pmsk 2
Pmskl3
Pmskl4

3127

1998

1999

3128

20734

5590

5589

2347

4974

4222

2640

4980

4519

2661

5005

500¢

3070

5006

5007

3196

5028

5029
54694

3827

5030
54794

4067
5052

4266
5053

5589

228+#
228+#
228+#

241 +#

242+4

240+#

240+4
240+#

240+4

253+# 2212
254+#

245+#4

2213

2302

3072

4617

4746

4778

4809

4909

5570

245+4
245+#4
24L5+4
258+#
259+#

BSKEL?

Pmsk 2

BSKEL3

Pmskl3

BSKEL4

Pmskl4

}fi

BUF _INDEX

Pmskl4 2292
2293

Pmsklé4

18344

B_!

Pmskl4

18354

8_10

Pmsk L4

18354

18364

13440

22962
2297#

4260
4352

4244
4315

4308
4393
4394
4459
4460

2000

4135

4312

4337
4378
4379
4456
4457

Pmskl4

B_O

3464

4290
4375
4376
4443
Ghhg

BNK_SEL _POS

BRESET

3435

4286
4361
4362
444
4441

4965

3136

4277
4358
4359
4435
4436

Pmskl4 4964

BREAK

5519

4273
4353
4354
4434
4435

BNK _SEL

80E

SEQ 0250

5511

4345
5071

Pmskl4

| B_12

Pmskl4

' B_13

Pmsklé4

|
|

|
L B_14
;

Pmsklé

18454

18464

18474

1848#
1848#4
1849#

18494

| B_15

Pmskl4

' B_16

Pmskl4

B_17

Pmskl4

. B_18

Pmskl4

18564

B_19

Pmskl4

18574

B_2

Pmskl4

18364

B_20

Pmskl4

1858#

B_21

Pmsklé4

18594

B_22

Pmskl4

B_23

Pmskl4

B_24

Pmskl4

B_25

Pmskl4

B_26

Pmskl4

B_27

Pmskl4

B_28

Pmskl4

|
‘

B_29

Pmskl4

B_3

Pmskl4

8_30

Pmskl4

B_31

Pmsklé

B_32

Pmskl4

B8_33

Pmskl4

B_34

Pmskl4

B_35

Pmskl4

B_36

Pmskl4

B_37

Pmsklé4

B_38

Pmskl4

18504

18544

1855#

18554

18564

1857#

18584

18374
185%%

18604

18614

1862#

18634

18644

1865#

18654

18664

18674

18684

1837#

1838#

18684

18694

18704

1822#
18234

18234

18244

1825#

18254

18264

4756

18274

4757

1828#

4789

18294

4B20

1827#

18284

4788

4819

SEQ 0251

Pmskl4

B_S

Pmsklé&

B ¢

Pmskl4

8.7
B_8

Pmsklé

Pmskl4

1841#
18424
18424

B_%

Pmskl4

1843#

8_HWTBL

Pmskl2

‘

Pmskl3
Pmsklé4

Pmskl3

Pmsklé

Pmskl2

(SATLO

Pmskl3
Pmsklé
Pmsk 2

($AU

Pmsk 3
Pmsk L&

($BRK

C$BSEG

Pmsk L2

1839#

1835#

18404

18414

18434

18444

1548

951+

951+
951+
951+
964+
965+

953+

953+
953+
953+
966+
967+

1396+

1359+
1359+
1359+
1372+
1373+

1387+
1387+
1387+
1400+
1401+

1396+
1396+
1396+
1409+
1410+

1246+#
1246+#
1246+#
1259+#
1260+#

1350+
1350+
1350+
1363+
1364+

1358+
1358+
1358+
1371+
1372+

1387+
1387+
1387+
1400+
1401+

1395+
1395+
1395+
1408+
1409+

1246+#

50+4#

50+4#
50+4#
63+4
b4+#t

S7+4#
S57+#

1350+

573+
573+

573+
573+
586+
587+

583+
583+

583+
583+
596+

Pmsk L2

26+4

Pmskl3

26+4

Pmsk L4

39+
40+

254+
255+

12+#
12+#8

491+
491+

26+#

505+

71+4

597+

241+

26+

241+

26+

241+

12+#

Pmsk L4

12+4
25+#

Pmsk | 2

10+4

Pmsk 3

1387+

1350+
1350+
1350+
1363+
1364+

Pmsk 4

Pmsk 2

1359+

1248+4
1248+#
1248+#
1261+#
1262+#4

57+4
57+4
70+4

Pmsk (3

Pmsk 3

F$RSUB

SEQ 025¢

Pmskil2 1248+# 1350+

(BATHI]

($AUTO

18384

B_&

10+#4

241+

497+
491+
504+

1358+

1387+

1395+

1428+

1433+

1444+

1462+

1427+

1433+

1437+

1456+

1428+
1428+
1428+
1441+
1442+

1427+
1427+
1427+
1440+
1441+

1433+
1433+
1433+
1446+
1447+

1444+
1444+
1444+
1457+
1458+
1437+
1437+
1437+
1450+
1451+

1462+
1462+
1462+
1475+
1476+

1456+
1456+
1456+
1469+
1470+

Pmsk 4

Pmskid

(ROEFG

Pmsk i3

Pmsk i 4

Pmsk L2

% JERE 4

Pmskl3

Pmsk L&

Pmskl2

CSCLEAN

Pmskl3
Pmsk L4

Pmsk 2

C$CLOS

Pmsk3

Pmsk (4

Pmsk i 2

CSCLPT

Pmsk (3

Pmsk L4

Pmskl2

C$COUNT

23+4

24+

45+#

Pmsklé
Pmsk 2

C$CVEC

Pmski(3
Pmsk &

Pmskl2

C$DCLN

Pmskl3
Pmsk L4

Pmsk 2

C$D0ODU

Pmsk 3

——

——————

SEQ 0253

L5+#

(5+8

LS+m
58+#

S59+#
58+#

58+4
58+4
S8+4
71+4
72+4#

18+#
18+#

18+4#
18+4

842+

B42+
B42+
B4?2+
855+
BS6+

593+

593«
593+

31+4
32+m

606+
607+

37+
37+#
37+
50+
51+#

760+
760+
760+
773+
774+

37+4

14+4

14+4
14+4

14+4

27+
28+4#

760+

305+

305+
305+

305+

318+
319+

342+# 1132+
3420+

1132+

1420+

1435+

1420+

Pmsk 3

524+

525+

1435+

1139+

1331+

1345+

1348+

1368+

1382+

1382+
1382+

1395+
1396+

1348+

1368+

340+
3420+

1132+
1132+

113G+
1139+

1331+
1331+

1345+
1345+

1348+
1348+

1368+
1368+

355+#
356+4

1145+
1146+

1152+
1153+

1344+
1345+

1358+
1359+

1361+
1342+

1381+
1382+

1420+
1420+

1433+
1434+

38+#4

38+4#

38+4
38+4
51+#
52+

L4+4

Lo+ 8

L4+4

Li+a

57+4
58+4

L9+4

49+#

49+
L9+4

1435+
1435+

1448+
1449+

685+

685+
685+
698+
699+

812+

825+
B26+

804+

BO4+

1385+

1405+

1417+

1385+
1385+

1405+
1405+

1417+
16417+

1398+
1399+

1418+
141G+

1430+
1431+

1385+

1382+
_

1405+

1417+

Pmsk L&

C$DRPT

6244

SEQ 0254

Pmsk L2

Pmsk (3
Pmsk L4

“$DuU

Pmsk (2

Pmsk(3
Pmsk L4

(SEDIT

Pmsk (2

CSERDF

Pmsk L2

Pmsk (3

Pmsk
i2

4
Pmsk

($ERSOF
T

Pmsk (2

Pmsk (3
4
Pmsk

CSESCAPE

Pmsk
2
Pmsk (3
Pmsk (4

($ESEC

Pmsk (2

Pmsk (3

147+
147+
147+

160+
161+

311

311+
311+
311+

324+
325+

661+
661+
661+
661+

Pmsk (3

R S

Pmsk
2

LA R

(SERSF

Pmsk 14

Pmsk (3

Pmsk
2

—

C$ERROR

4
Pmsk

Pmsk (3

($ERHRD

Pmsk
4

\l-‘O:J\lV\I

4
Pmsk

b d e d d e e d d e e e o D e D D d D e d e =D [\ YN~
H
WWWWN—=—=2OO0O0 oo
PNNVWWN
= = 2 2O O
~ —
NNNNNOWHNNN—=O
NN ~N

Pmsk (3

Pmsk L4

T8t SUB

Pmsk
2
Pmskl3
Pmsk (4

CSETST

Pmsk L2
Pmsk(3
Pmsk
4

($EX]T

Pmsk L2

Pmsk
3
Pmsk L4

($GETS

Pmsk L2

Pmsk(3
Pmsk L4

CEGE Tw

Pmsk (2

Pmsk (3
Pmsk L4

CSGMAN

Pmsk L2

Pmsk (3
Pmsk L4

($GPHRD

PmsLk
2

c6+8

675+
647+

11+4
11+#

647+
647+

IREY

660+
661+
629+
629+

23+4

643+
318+

20+#
34+4

36+4
34+4

34+4
L7+4
LB+a
30+#
30+#

30+#
30+#
L3+4
L4+m

31+4
31+4

C$GPLO

Pmsk (2

629+
629+
642+

318+

3371+
332+

775+
775+
775+
775+
788+

770+
770+
770+

45+4
L3+4
L3+4
L3+m
L3+4
S6+#
S57+#4
Lo+#

868+
868+
868+
868+
881+
882+
752+

55+#
S6+#

783+

784+

752+
752+
752+
765+
766+

Pmsk
3
Pmsk 14

($GPR]

Pmsk L2

Pmsk (3
Pmsk L4

CINIT

Pmsk (2

Pmsk (3

326+
326+
326+
326+
339+
340+

789+
770+

31+4
3+4

Li4+4

SEQ 0255

647+

24+m
25+4
G+l
S+a
S+#
Sl

Pmsk (3
Pmsk
4

674+

27 +4
11+24

791+
791+
791+
791+

804+
805+
563+
563+
563+
563+

887+

881+
881+
881+

854+

895+

897+

897+
897+

897+

910+
911+

Pmsk L4

CRINLP

Pmsk
2
Pmsk (3
4
Pmsk

| CSITCNY

Pmsk L2

Pmskl3
Pmskl4

CEMAN]

Pmsk
2

Pmsk L3
Pmsk L4
CSMEM

Pmsk L2
Pmsk 3
Pmsk L4

Pmsk L2

Pmsk (3
Pmsk L4
($OPEN

Pmsk L2

Pmsk (3
Pmsk L4

($PNTB

Pmsk L2

Pmsk(3
Pmsk L4

CEPNTF

Pmsk L2

3
Pmsk
Pmsk L4

CSPNTS

Pmsk L2
Pmsk(3

Pmsk L4
CEPNTX

Pmsk L2
Pmsk (3

30+#

31+4
2L+#

24L+#
2L+#

2L+A

37+4
38+#
948+#

948+4
QLB+#
I48+#

961+#

962 +#
LB+#
LB+H
LB+#
LB+#
61+#
62 +#

33+4
33+4
33+4
33+4
LOE+A

L7+#
27+#

27+
27+#
27+
LO+#
L1+4

36+4
36+4
36+4
S6+4

Lo+

50+#
20+#
20+#
20+#
20+#
33+4
34+4
23+#
23+4
23+4
23+4
36+4
37+4
22+#
22+#
2o+H
22+#
35+4
36+4

2l+#
21+#
2l+#
FARY

576+
577+
291+
291+
291+
291+
304+
305+

975+
975+
975+
975+
988+
983+
298+
298+

298+

311+
312+
284+
284+
284+
284+
297+
298+
519+
519+

519+
519+
532+
533+
765+
765+
765+
765+
778+
779+
695+

695+
695+
695+
708+

709+

716+
716+
716+
716+

729+

730+
709+
709+
709+
709+
722+

723+

702+
702+

SEQ 0256

978+
978+
978+
978+
971+
992+

980+
980+
980+
980+

993+

994+

983+
983+
983+
983+
996+
997+

989+
989+
989+
989+
1002+
1003+

991+

997
+
991+
991+
1004+
1005+

993+

993+
993+

1006+

1007+

995+

995+
995+
995+

1008+
1009+

C$Q10

Pmsk L4

59+#
59+#
SO+#
59+#
72+#
73+4
15+#
15+#
15+#
15+#
28+#

Pmsk
2

L7+4

Pmskl2
Pmsk
3
Pmsk L4

C$RDBU

Pmsk
2

Pmsk (3

C$REFG

29+#

L7+4
L7+#
L7+4

Pmsk(3

60+#

Pmsk L4

CSRESERV

61+#

Pmsk L2

8+#
8+#
8+#
8+#

Pmsk L3
Pmsk L4
CERESET

Pmsk L4

Pmsk(3
Pmskl4

CBRPT

Pmsk
2

Pmsk(3
Pmskl4

C$SEFG

Pmsk
2

Pmsk(3
Pmsk
L4

C$SPRI

Pmsk (2
Pmskl3

P
e I

Pmsk (3

_— e

Pmsk L2

277+
277+
277+

290+
291+
820+
820+

820+
820+
833+
834+

22+R
35+4
35+4
35+4
35+4

Pmsk
2

4
Pmsk

($RFLA

277+

21+4

Pmsk(3

CSREVISION

715+
716+

LB+#
LO+#

20+#
20+#
20+#
20+#
33+
34+4
2S+#

25+4
25+#
25+#4

38+4

39+4
29+#
29+#
2o+#
29+#
LO+H

L3+4

LE+A
LbE+H
Lb+4
LE+H
59+4

60+#

L1+4
L1+4
L+4
L1+4

677+
677+

SEQ 0257

IO
SNV ICE SR

34+4
3I5+4

Pmsk L&

|
r

C$SVEC

Pmsk L4

S4+#

Pmsk 2

55+4

690+

39+4

39+#

669+

39+4
39+#

669+

669+
669+

Pmskl3

i
3

Pmsk 4

Pmskl2

C$TPR]

Pmskl3

Pmskl4

Pmskl2

CeTSCT

1878#

1978
27208
27218
2809

2810
2892#
28934

Pmskl4
Pmsk L2

Pmsklé

Pmsk L2
Pmskl3
Pmskl4

Pmskl2
Pmskl3

Pmskl4

2974
2975

4955
4956

304+#

979+
979+
979+
992+
993+

990+
990+
990+
1003+
1004+

992+
992+
992+
1005+
1006+

25064

26904

26964

26994

27024

27054

27084

2711

2714k

27174

28184
2899
2900

2825
2907#
2908#

28334
2914
2915

2840
29224
2923#

2848%#
2929
2930

2855
29378
29384

28634
2944
2945

2870
29528
2953#

28784
2959
2960

2885
29674
29684

25074
27234
2724w
28174

29824
29834

L9794
L9804

841+4
759+#

759+4

1753#

CLRVEC

Pmsk L2

684 +#

Pmskl3

4625

827+#4
827+#4
827+#
840+#

Pmsklé

17548

684+4
684+#
684 +4

966+
966+
966+
979+
980+

5615

827+#4

(LR

992+

G76+
976+
G76+
989+
990+

304+#
304+#
304+#
317+#
318+#

759+#
759+4
772+#
773+#4

990+

G76+ .

. Pmsklé 1977

4941%

979+

966+

964+

4624

Pmskl3

:
CLOSE

938+#

18774

Pmskl3

.
3
:

CLOCK

32+#
33+4

Pmsklé

CHAN

19+#
19+#
19+#

. Pmskl4

CAL_CHK_SUM

CKLOOP

19+#

SEQ 0258

682+
683+

964+
964+
964+
977+
978+
5614

Pmskl4

CHK_SUM_CNT

S2+#
S3+4#

L &

691+

038+#
938+#
938+#
951+4
952+#
4940x

CHIP_TBL

2122

2123

26914
2726
2727K
2824
2989
2990

LOB6H
4LOB74

26578
2729
2730m
28324

29934
29944

LOB7A
4LOBBA

27004
27324
27334
2839
4039
4040

49884
49894

27034
2735
27364
28478
4711
4712

49894
49904
_

27064
2738#
2739#
2854
4918
4919

4990
4991

2709
2787
2788
28624

49324
49334

2712&
27914
27928
2869

27154
2798
2799
28778

27184
2802#
28034
2884

SEQ 0259

| CLR_DRIVE

Pmsk L4

CLR_FLG

Pmsk L4

2847
2848
3704
3705
4402
4403

CLR_MBUS

Pmsk
L4

2484
2485

CLR_SEC_ROW

Pmsklé

3949
3950

CNT

Pmskl4

coL

Pmsk L4

COL_0_127_OFF

Pmsk L4

COL_128_255_OFF

Pmsk L4

(OL_BASE

Pmsk L4

GOL_CNT_TBL

Pmsk L4

COL_DESC_PRINT

Pmsk L4

COL_INDEX

Pmsk L4

COL_MOST_OF TEN

Pmsk L4

- COL_NUM

4129
4130

3508
3509

4300

4301
4297
4298
4285

Pmsk L4

4
Pmsk

-COL_PURGE

Pmsk L4

COL_SEL

Pmsk L4

COL_SORT

Pmsk L4

COL_SUM

Pmsk L4

COMP_ERR

Pmsk L4

40034
40044

3707
3708

3708
3709

4164

3522
3523

4375
4376

4378
4379

39964
39974

4001
4002

4003
4004

3748
3749

3751
3752

3762
3763
4327

4332
4333

37644
37654

4329
4330
54634
54644
40014
40024

39864
39874

39944
39954

3219
3220
4255
4256
4413

3240
3241

4414

COL_PTR

3952

5271
5272

4282

4283

4418
4419

54734
54744

4285
4286
4454
4455

4289

4456
4457

4328
4459
4460

o e ey

Pmsk L&

3424
3425

3427
3428

1363+
1363+

1379+
1379+

1390+
1390+

1392+
1392+

1400+
1400+

1414+

1422+
1422+

1363+
1363+

1379+
1379+

1390+
1390+

1392+
1392+

1400+
1400+

1414+
1414+

1422+
1422+

1376+
1377+

1392+
1393+

1404+

1403+

1405+

1427+
1428+

16435+
1436+

4791
4792

4822

CRC

Pmsk L4

CRC$A

Pmsk L4

CRCSB

Pmsk L4

CRC_A

Pmsk L4

(RC_B

Pmsk L4

CRC_NIBBLE

Pmsk L4

CRC_P

Pmsk L4

CRC_SEL

Pmsk L4

CS1_PRINT

Pmsk L4

(52_PRINT

Pmsk L4

(S3_REG

Pmsk L4

tuR_MOST

Pmsk L4

CUR_SUM

Pmsk
4

(_HWTBI

Pmsk
|2

1606+

4621
4622

4737
4738
4784
4785
4737
4738
4737
4738

4815
4816

4759
4760

Pmsk
[4

1368+
1369+

NN NN N

CPAR

1355+
1356+

(o 0 SV IV TV IV ]
Ao = NP NN

Pmsk
L4

—_—

——

Pmsk (3

3594

Pmsk
2

3350

COUNT

3351

Pmsk L4

33474
33484

J—

CORRE CT_HWTBL

3338
3339

4823

g\u‘ufo
sen®

Pmsk L4

33084
33094

N NN

CoPY

32344
32354
7593

P
a—

34284

32284
32294
3590
3591
3350
3351

(W AW LW _ LW, ]

Pmsk (4

COP1ED_REM_TRL

20404
20414

Pmsk L4

4433
4434

CON_D_MSG

4392
4393

Pmsk L4

D OOOWwWN

CON_C_MSG

SEQ 0260

W W
W

Pmsk L4

(oA,

CON_B_MSG

2037#
20384
20384
2035#
20394

Pmsk
4

CON_A_MSG

3604
3605
3548
3549

35774

$578#

55948

2G5

Pmsk L2
Pmskl3
Pmsk L4

D$ERR1

Pmsk L2

3
Pmsk
Pmsk L4

D$ERRZ

Pmsk
2

Pmski3
Pmsk L4

D$ERR3

Pmsk
2

Pmsk (3
Pmsk L4
D$ERRS

Pmsk L2

Pmsk L3
Pmsk L4

D$ERRS

Pmsk
2
Pmsk
3
Pmsk L4

DSERR6

Pmsk L2
Pmsk L3
Pmsk L4

D$ERR7

Pmsk L2
Pmsk L3
Pmsk L4

D$ERRS8

Pmsk L2
Pmsk (3
Pmsk L4

D$ERRY

Pmsk
| 2

Pmsk
3
Pmsk L4

911+
911+
911+
911+
924+
G25+
732+4
732+4
732+#
732+4
745+4
746+4
734+#
734+4
734+4
734+#
747+4
748+4
736+#
736+#
736+#
736+#

749+#
750+#4
738+#
738+#
738+#4
738+#
751+4
752+#
740+4
740+4
740+4
740+4
753+4
754+4
742+4
742+4
742+#
742+4
755+#4
756+#
744+4
4
744+
744+4
744 +4
757+#
758+#4
746+4
746+4
746+4
746+4
759+#
760+4
748+#

748+4
748+4
748+4
761+4
762+#

SEQ 0261
1560
1560

1565
1565

———————

—

S————————————
.

Pmskl2

Pmsklé

781+
781+
781+
794+

787+#
787+#
787+#
800+#

Pmsk {2

962+

Pmskl2
Pmskl3

D$PCNT

Pmskl3

Pmskl4

DATA

DATADR

791+

791+
791+
791+
804+

Pmsklé

DSGET

765+

765+
765+
765+
778+

Pmckl3

—

779+
781+

795+

962+
962+
975+
976+

2318

Pmskl2

862+

Pmskl4

2319

862+

85
855+
B6B+#

B69+#

801+#4

2342

2343

868+

2343

2344

2352

873+

881+

886+

2344

873+

2345

881+

1371+
1371+
862+
862+
1371+
1371+

1372+
1372+
868+
868+
1372+
1372+

1373+
1373+
873+
873+
1373+
1373+

1384+
1385+

1385+
1386+

1386+
1387+

1413+
1414+

875+
876+

Pmsklé 2142#

DAT_DM

Pmskl4

5143
2136#

DA_PRINT

Pmskls

2081#

DA_REG

Pmskl4

DB1_REG

Pmskl4

DB2_REG

Pmskls

DCK

Pmskls

17704

DCK_EN

Pmsk L4

s}zgz

DECX

Pmskl2

Pmskl4

SEQ 0262

85 8

1400+
1400+
881+
881+
1400+
1400+

DAT_CLK

Pmskl3

962+

Pmsklé

Pmskl3

B05+
787+#

21374

881+
882+

886+
887+

2308

2349

2239

2266

2309
2238

2176

2350
2265

20824

2177

17408

2242

2269

18514

2306

2343

18714

2307

2344

113+

117+

123+

881+
881+

888+
888+

897+
897+

881+
881+

888+
888+

897+
897+

894+
895+

901+
902+

910+
911+

1739

18504

18704

0241

2305

2306

2268

2342

894+
895+

2€46

2658

897+

1326+

1334+

1335+

1336+

1363+

1409+
1409+
1326+
1326+
1409+
1409+

34+
34+

1335+
1335+

1336+
1336+

1363+
1363+

1339+
1340+

1347+
1348+

1348+
1349+

1349+
1350+

1376+
1377+

4813

5158

5187

143+

147+

864+

2353

2647

886+

897+

1407+
1407+
886+
886+
1407+
1407+

1408+
1408+
897+
897+
1408+
1408+

1420+
1421+

1421+
1422+

899+
900+

910+
911+

4782

3075

4750

2378

2439
2440

2489

127+

133+

137+

3076

2379

4751

4783

2659

1326+

1422+
1423+

4814

1334+

5159

1335+

1336+

1363+

5188

2488

2343

17714

113+

113+
113+

126+
127+

117+

117+
117+

130+
131+

147+

B68+

875+

864+

868+

875+

127+

133+

137+

143+

123+
123+

127+
127+

133+
133+

137+
137+

143+
143+

147+
147+

864+
864+

868+
868+

875+
875+

136+
137+

140+
141+

146+
147+

150+
151+

156+
157+

160+
161+

877+
878+

881+
882+

888+
889+

123+

e ————————

i| D$FILE

—_—

————
e
e
e

WWN

[

| DEGRADE _MOD_REG

Pmskl4 2005
Pmskl2

DELAY

2006

249+#

43074

43088

Pmskl2

DEPO

Pmskl3

Pmskl4

Pmskl2

DESC

Pmskl3

Pmsklé

Pmskl2

DESCRIPT

Pmskl3
Pmskl4

PmsklZ

DEST

Pmskl3

Pmskl4
Pmskl2

DEVTYP

Pmskl3

5337

5570#

4549

5262#

52804

5188
5189

5209
5210

5255
5256

5273
5274

779+

781+

782+#

879+

886+

895+

927+

928+

930+

1326+

1339+

4092
4093

5159
5160

4L354m

44354

43948
43954

4436F

45504

52634

52814

5338

SEQ 0263

55714

24L9+#

Pmskl3 ~ 249+4
24L9+#
262+# 4081
Pmsklé

43534

263+#
1111+

4082
1141+

1111+

1141+

1124+
1125+

1154+
1155+

1257+

1258+

1111+

1257+
1257+

1257+

1270+
1271+

1257+#

1257+#
1257+#
1270+#
1271+#

769+

769+
769+
769+
782+
783+

1251+#

1141+
1141+

1258+

1260+

1258+

1260+

1271+
1272+

1273+
1274+

1258+

1260+

1501
1501

770+

770+
770+
770+
783+
784+

774+

775+

774+
774+
774+
787+
788+

775+
775+
775+
788+
789+

779+
779+
779+
792+
793+

781+
781+
781+
794+
795+

782+#
782+#
782+#4
795+#
796+#

Pmskl4

1251+#
1251+#
1264+#

1498
1498

Pmskl2

862+

866+

873+

879+

1363+
1363+

1376+
1376+

1400+
1400+

1412+
1412+

879+
879+

886+
886+

895+
895+

927+
927+

928+
928+

930+
930+

1326+
1326+

1339+
1339+

Pmskl4

875+
876+

879+
880+

886+
887+

892+
893+

899+
900+

908+
909+

940+
941+

941+
942+

943+
944+

1339+
1340+

1
1

DFPTBL

Pmsk L2

}gzz

DIAG_REG_SEL

Pmskl4

3036

30584

30624

3077

DIF

Pmsklé

3504

35094

3527#

3575

35804

35984

3628

DFLT

‘

Pmskil3

DIF_COLS
Dif_ROWS

1265+#

862+

862+
862+

3037

3505

Pmsklé 3667
3668
Pmskls 3668

806+

866+
866+

30594

35104

36884
36894
36904

873+

873+
873+

3063#

3508%#

3693
369
3693

3078

3557

3558

3576

865+

35814

927+

3599

928+

3629

1339+

Pmsk (3
Pmsk L4

DISPLAY

Pmsk L2
Pmsk (3

Pmsk L4

DLT

Pmsk
4

OM_1_0_LOAD

Pmskl4

OAD
DM_RAND_L

Pmsk L4

ER
DM_RD_TRANSF

Pmskl4

DM_WRT_TRANSFER

Pmsk L4

DCCLN

Pmsk L2

961+4#
961+#
961+#
Q74 +4
Q75+#
1488+#
1488+#
1488+#

1488+#

1501 +#
1502+#
17434
17444

2318~

4723
4724
2846
2847
4730
4731

4726

2861
2862

2876
2877

2411
2412

2449
2450

2462
2463

2498
2499

2410
2411

2448
2449

2461

2462

2497
2458

2239
2240

2266
2267

2376
2377

2437
2438

2790
2791
2816
2817
2981
2982
3066
3067
2297
2298

2801
2802
2831
2832
2992
2993

2392
2393

4735
4736

4727

2891
2892

2906
2907

2921
2922

2936
2937

2951
2952

5397
5398

5414
5415

5446
5447

5396
5397

5413
5414

5445
5446

5533
5534

2486
2487

549
5492

2341
2342

DODU

VIS

—
—_—

noN

Pmsk L4

Pmsk (3

Pmsk
2

DONE _HRD

Pmskl3

DORPT

Pmsk L2

—_—

Pmsk L4

Pmskl3

Pmsk (3
Pmsk L4

Pmsk L4

DPR

Pmsk L4

DRVTYP

Pmsk L4

DRV_PRAM

Pmsk L3

DRV_SEL

Pmsk L4

— =

DPAR

RN
S WA

961+4

Pmsk
2

SEQ 0264

n—

DISPAT(CH

16394
16404

—_

Pmsk L4

nonNy

DISABE

PONY
— —

~ DRV_SEL_PRINT

Pmskl4

Pmsklé

DRY
. DSSNBR_OF _TESTS

Pmskl2
Pmskl3

Pmskl4

1765#

2399

2454

1126+

14964

1522

20694

17668

1106+

1126+

2504

1522

1139+

1140+

969+

Pmskl4 2010

2218

2242

2245

2268

Pmskl4

DT_PRINT

Pmskl4

DT_REG

Pmski4

Pmskl2
Pmskl3
Pmskl4

961+
961+
961+
974+
975+

2466
2467

2083%#

2219

2489
2490
2178

2179

20884

2183

2087#

1808#

965+
955+
965+
978+
979+

2243

26414
26428

967+
967+
967+
980+
981+

2246

26614
26628

969+
969+
969+
982+
983+

2269

30664
30674

22978

22984

L617H
L6184

2341k

2356

L643H
LbL4R

L7354
4LT73ER

2342k

2182

18094

1043+

1043+
1043+
1056+
1057+

2170

2389

2408

5371

54304

5456

Pmsklé

DUT_HwTBL

Pmsklé

2171
5370

DVA

Pmskl4

1723#

D_2_PRINT

Pmskl4

Pmski4

963+
963+
963+
976+
977+

20844

DUMPER

2390
54294

2446

2409
5455

2447

5161

5190

17244

20674

20684

1798#

Pmskl4

17994
1799#

D_EN

Pmskl4

18004

D_HWTBL

Pmskl2

1550

Pmskl4

E1_REG

Pmskl4

E2_REG

Pmskl4

ECC_DIS

D_DM

2503

1126+

2011

1496#

2455

967+

DS_PRINT

D_CLK

2400

SEQ 0265

965+

Pmskl4

5561

963+

Pmskl3

oSY

5560

961+

Pmskl2

| DSNUM

20684

1800#

18014

1550

1917
1918

18184

18194

2143

2144
2137

5162

2138

2147
2148

1925

1926

18304

2307

2344

Pmskl4d

2138%#

2375

2485

ECC_DM

Pmskl4

21484

ECH_ERR

Pmski4

18314

21394

2145%

17754

17764

2308

2376

2345

2486

5191

2459

2460

2495

2496

2508

2509

2357

2378

2379

24617
2618

2439

2440

EE_PRINT

Pmskl4

EFN

Pmski2
Pmskl3

Pmsk L4
EF _CONTINUE

Pmsk 2
Pmski3

Pmskl4
EF_NEW

Pmskl2
Pmskl3

Pmsk 4
EF _PWR

Pmskl2
Pmskl3

Pmskl4
EF _RESTART

Pmskl2
Pmskl3

Pmsk L4
EF_START

Pmskl2
Pmskl3

Pmsk L4
EL_PRINT

Pmskl4

EL_REG

Pmskl4

EMT_ESLOAD

Pmskl2
Pmskl3

Pmskléd
ENABE

Pmskl4

ENDAU

Pmskl2

Pmskl3
Pmsk L4

ENDAUTO

Pmskl2

Pmskl3

2089#
20904

819+
819+
819+
819+
832+
833+

205+#
205+#
205+#
205+#
218+#
219+4

2184
2185
820+
820+
820+
820+
833+
834+

SEQ 0266

206+#
206+#
206+#
206+#
219+#

220+#
207+#
207+
207+#
207+#
220+#
221 +4
204+~

204 +#
204+#

204 +#
217+4
218+#
203+#
203+#
203+#
203+#
216+#
217+#
2090#
20914
18824
18834

1131+#
1131+4#
1131+4#
1131+

1144+4

1145+4

16384

16394
S568+#

568+#
568+#

568+#

581+#
582+#
578+#
578+#
S578+#

5391
5392
2185
2186
1220+
1220+
1220+
1220+

1233+
1234+

2238

2239
1680
1680

1647

2265

2266

2375
2376

2485
2486

Pmsk L&
ENDCLN

SEQ 0267

Pmsk L2
Pmsk L3
Pmskl4

Pmsk
2

Pmsk (3
Pmsk L4

ENDKRD

Pmsk (2

Pmsk (3

Pmsk L4

Pmsk L2

)

ENDHW

Pmsk L4

Dl cd o

PmskL3

ENDINIT

Pmsk
2

07+#

Pmsk L3
Pmsk L4
ENDMSG

Pmsk L2

5543
5544

Pmsk L4

ENDPROT

Pmsk (2

OO ——
OO 0000

Pmsk (3

Pmsk (3
4
Pmsk

ENDPTAR

Pmsk L2

Pmsk 13
Pmsk L4

ENDRPT

Pmsk
2
Pmsk (3
Pmsk L4

ENDSEG

Pmsk
|2

Pmsk
3

1629
1629

Pmsklé

ENDSE TUP

Pmsk (2
Pmskl3
Pmskl&

ENDSFT

Pmskl2

Pmskl3

END3RY

537+#

549+

1335+#

537+#

Pmski4&

SS50+#

Pmsk 2

541+#

Pmsk 2

Pmskl2

Pmskl4

Pmsk (2
Pmskl3
Pmsklé

Pmsklé
Pmsklé

ENTER_BOARD

Pmskl3

EQUALS

Pmskl2

Pmskl3
Pmsklé

ERRBL K

1321+4

545+

Pmskl3

:
END_SEC

425+4
1321+#

537+#

Pmskl4

END_MSG

411+4
424+4

Pmsk(2

Pmskl3

ENDTST

411+#

Pmskl4

Pmsk L4

ENDSW

SEQ 0268

1612
1612

Pmskl3

ENDSUB

AREY

1321+#
1321+
1334+#

Pmskl3

ENDSRV_MODPR |

665+#
666+4

Pmskl2
Pmsk(3

551+#

549+
562+

563+

541+4

541+
541+4
S54+4

555+#4
639+4
639+#

639+#
639+#
652+#
653+#
1073+#
1073+#
1073+#
1073+#

1581
1581

1086+#
1087+#

618+#

618+#
618+#

618+#
631+#4#

632+#4

20334

20348
3174
3175
1547
1547
167+4#

167+#
167+#
167+4
180+#
181+4#
1105+#
1105+#
1105+#
1105+#

5637

5638

5633

5634
31884
31894
1561
1561
1506

1506
1492
1492
2018
2019

31954
31964

3206
3207

3820
3821

38644
38654

38704
38714

38794
38804

38854
38864

3889
3890

Pmskl4é

. ERRDF

Pmskl2
Pmskl3

Pmsk L&

" ERRHRD
|

Pmskl2
Pmskl3

Pmsk 4

| ERRMSG

Pmskl2
Pmskl3

Pmski4

ERRNBR

Pmskl2

117+#

111+4

124+4
125+#

121+#
121+#

121+#

134+#

135+#

1104+

1104+
1104+

1117+

1118+

1103+

Pmskl2

111+

Pmskl3
Pmskl4d
ERROR

111+#

Pmsklé

;

Pmsk L2
Pmsk(3
Pmsk L4

1117+

111+

111+
111+
124+

125+
102+#

Pmskl3

Pmsk L4

117+
117+
130+

121+
121+
134+

2599

3083%

131+

135+

131+

137+

141+

147+

131+
131+
144+

137+
137+
150+

141+
141+
154+

147+
147+
160+

127+

131+

141+

145+

127+
127+
140+

137+

151+

141+

155+

147+

161+

102+#

Pmskl2

121+

127+

}}g+z

ERRSF

ERRSOFT

117+

121+

102+#

Pmsklé 1973

Pmskl4

117+

102+#

ERROR_MAP

Pmskl3

SEQ 0269

111+#

1103+
1103+
1103+
1116+

Pmskl3

ERRNUM

1118+%

1119+#

1974
4064
4065
4289
4290

131+#

131+#
131+#
131+#

2600
40824
40834
4962
4963

144+4

2389

5410
5411

5529
5530

145+#
4546
4547
141+#

141+4

141+#

141+4

154+4

155+#

2390
4553
4554

3210

30844
4093#
409%#4
S006#
5007#

3211
4121
4122
50294
SO30#

2408

2446

2409
4927
4928

2447
5164
5165

3215

3216
4128
4129
S052#
50534

2459

2460
5193
5194

3892

30284

3863
4161
4162
50714
50724

302904
4165
4166
S088#
50894

2495

2508

2496
5260
5261
,

2509
5278
5279

39374

39414

39384
4217
4218
5097#
50984

39424
4247
4248
5237
5238

4305

4351

4306
5331
5332

4352
5340
5341

39494

39534

39504
4259
4260
5257
5258

39544
4276
4277
5275
5276

4392

4433

4393
5379
5380

4434
5394
5395

ERR_1

Pmsk L4

ERR_10

Pmskl4

ERR_11

Pmsk L4

ERR_12

Pmsk L4

ERR_13

Pmskl4

ERR_2

Pmsk L4

ERR_3

Pmsk L4

ERR_&

Pmsk L4

ERR_S

Pmsk L4

ERR_6

Pmsk L4

ERR_7

Pmsk L4

ERR_8

Pmsk L4

ERR_9

4
Pmsk

ER_PRINT

Pmsk L4

ESCAPE

Pmsk L2

Pmsk(3
Pmsk L4

EVL

Pmsk
2

Pmskl3
Pmsk L4
EXIT

Pmsk (2

Pmsk L3
Pmsk L4

EXIT_TST

Pmsk L2

-4+

U — 00 Co Co Co

ll s

cld
axll

il calh

prgu—

roro

HernornornOnY

4
Pmsk

D o

Pmsk(3

SEQ 0270

anll wal

Pmskl2

WVIWVT NI WU = ed e el d
NN
= b a3
WW— e
W WO OWW rororONY
o —=wuiHSsSnsonunrnornonon
+ 4+ 4+ + 4+

| ERRTYP

X B+ +++4++++++++
L2
22 B

Pmsk L4

N —p—————
Y
- g

Pmskl3

Pmsk L2

WUV = e e e e e e e e e d
\O Co 0—=—=0O000O0—=—=0000
A Ve XL LSSV NP AV e lelele]

ERRTBL

2446
2447

2459
2460

4392
4393

4433
4434

2495
2496

2508
2509

Pmskl3

Pmsk L4

| E_BIT

Pmsk L4

E_DIS

Pmsk L4

EDM

Pmsk L4

E_HWTBL

Pmsk L2

FAIL_CHIP

Pmsk L4

FALSE

Pmsk L4

FAULT

Pmsk L4

FB_CHIPS

Pmskl4

FB_CRC_CHIPS

Pmsk L4

FB_DATA_CHIPS

Pmsk L4

FEQUAL

Pmsk
2

2702
2703
2735
2736

2705
2706
2738
2739

2708
2709

4587
4588

4932
4933

5131
5132

51334
51344

28334
2834n

28484
28454

2711
2712

46244
46254

2714
2715

4625
4626

2717
2718

L6584
L6594

2720
2721
4660
4661

Pmsk(3
Pmsk L4
F IELDNAM

Pmsk L4

FIFTY_MS

Pmsk L4

F ILENAME

Pmsk L2

Pmsk L3
Pmsk L4
F ILNAM

Pmsk L2

Pmskl3

FLAVOR

Pmsk L2

4
Pmsk

FINISH

NN
oo~

Pmsk L4
v

SEQ 0271

5233
5234

52394
52404

5251
5252

28934
28944

29084

2923
2924#

Pmsk L3
Pmsk L4
FLG_REG

Pmsk L4

2803#
28044

28184
28154

28634
28644

28784
28754

29094

3064
3065
4935
4936

49074
495084

FORDEC

30844
30854

51674
51684

4543
4544
51964
51974

45484
45494

L5554
45564
55724
55734

4128
4129
5030
5031
5097
5098

4129
4130
5051
5052
5152
5153

4165

2878
2879

2855
2894

2908
2909

5328
5329

i iealcRsay

29834
29844

Pmsk L2

Pmsk(3
Pmsk L4
FOUR_MSG

Pmsk L4

FULL_WRD

Pmsk L4

1002+#

2540
2541
4980

4981

5071
5072
5257

FUNC_3

Pmsk L4

FUNC_4

Pmsk L4

FUNC_S

Pmsk L4

FUNC_6

Pmsklé4

F_ABOKT_ARRAY

Pmsk L4

F_ALL_BAD_CHIP

4
Pmsk

F_BLST_TBL_ENTERED

Pmsk L4

F_D_CLK_TIME_OUT

Pmsk L4

F_ERR_MAP_ENTERED

Pmsk L4

F_FLG_ERR

Pmsk L4

F_HWTBL

Pmsk L2

F_RAND_DATA

Pmsk L4

F_UNC_ERR_FLG

Pmsk
4

GSCNTOP

Pmsk
2

Pmskl3

5052

5053
5157
5158

4166

4167
5053
5054

5180

5181

2380
2381
2441
2442
4935

10#
114

SS I
\g g“&!

Pmsk L4

FUNC_2

Pmsk L4

FUNC_1

— — —
) — — — —d — —d ——d
b
N— )
o OO ONONNN oo
OO NN —
el JpN] —

Pmsk L4

FUNC

4166

89+#
89+#
89+#
89+#

5602
5603

4549

2848
2849
3064
3065

2863
2864

2923
2924

Pmsk L2
Pmsk (3
Pmskté

GHPRMD

Pmsk (2
Pms!k
3
Pmsk
L4

GEPRM,

Pmsk (2

Pmsk i3

67+8
6E7+4

80+#

81+#

LEBen
68+4
6£8+o
68+a
81+#

Bosa

18T
[Sle8Y

[SIRY4
[SIeRT

2
R
R
R
N

sl
il ol <ol <l
)

1495+

1496+

892+
892+
892+
892+
905+
876+
876+
876+

876+

889+
89C
B6S+
B6S+
BES

L9+
*

GE$PRMA

Q7+4

98 +#
67+8
674

Pmsk L4

1482+
1482+
1482+

Pmsk (3

Pmsk L2

86+
87+

GSOF S1ZE

98+#
9F+4
B4+4
BL+#
4
B4+
B4+#

~NON

Pmsk
4

1409+
1409+
1409+
1409+
1422+

ao Qo

Pmsk (3

73+
73+
73+
734+

Pmsk
2

GSOFF SET

864
87+#4
85+#
85+#
85+#
85+#

Pmskl4

Pmsk
3

107+4
73+4
73+4
73+4
73+#

Pmsk L2

—

GENO

106+#

WNWWWWN

L4
Pmsk

Pmsk (3

1639+
1439+
1439+
1439+
1452+
1453+
931+
931+
931+
931+
944+
945+
1336+
1336+
1336+
1336+
1349+
1350+
1482+

NN N

Pmsk
2

IM
GHLOL

107+4
108+#
93+4
93+4#
93+4
93+4

Pmsk L4

1448+
1446+
1446+
1446+
1446+
1459+
1460+

NN NN

. Pmskl3

Q4L+H
94 +4
L+h
Q4L+4

Pmsk
2

NN AN

GBHIL IM

— e

Pmsk L4

AN N

Pmsk (3

83+#

92+#
Q2+#
Qo +#
92+#
105+#
106+#

Pmsk
2

1429+
1430+

GBEXCP

1394+
1395+

Pmsk L&

) cold

Pmsk (3

Pmsk
2

57+
58+

&»H S NVNVESSSNESWWW
&»H WWANANWNOOOVOVOO
~N SN BSNOOCOO

GSDISP

102+#
103+#
69+#4
69+#
69+4
69+4
82+

-h -l

" Pmsk
L4

1409+
1409+
140G+
1409

1423+

5
SEQ 0273

Pmsk L4

G$RADA

Pmsk L2
Pmskl3

Pmsk L4

G$RADB

Pmskl2
Pmskl3

Pmsk L4

GSRADD

GSRADL

Pmskl2

904+
904+

S0+#
91+4#

917+
918+

77+8

79+4

904+

912+

916+

93+4#
94+

878+
B79+

929+
930+

Pmsk L2

Pmsk L2
Pmsk L4

Pmskl2
Pmskl3
Pmskl4

GETPRI

904+

77+8
77+#

865+

Pmsk L3

GETBYTE

77+8

93+4#

80+#
80+#
80+#

78+4
78+#

78+#

926+

865+
865+
865+

908+

70+4#

1286+

70+4#

1286+

70+4
70+4#

83+#
84+#

74+4

74+#
74+4
74+4
87+#

88+#4

2189«

2932
2933

774+4

T74+H

Pmskl3

774+#

Pmskl4

787+#

Pmskl2

790+#

774+4

788+#

Pmskl3

790+#
790+#

Pmskl4

803+#

790+#

916+
916+
916+

908+

Pmsklé4 2188*
Pmskl2

912+
912+
925+

78+#

91+4#
Q2+#

SEQ 0274

920+
920+
920+
933+
934+

80+#

Pmsk L4

GEN_RANDOM_DATA

920+

81+#
81+#
B1+#
94+#4
OS+#

1422+

1423+

Pmskl2

Pmskl3

GSYES

B1+4

879+

79+
79+4#
92+#

Pmsk L4

GSXFER

B78+

Pmskl3
;
Pmsk L4

Pmskl3

GERADO

79+4#

80+#

921+
922+

1286+

1299+
1300+

929+

929+
929+
929+
942+
943+

2294

2637

2812

2947
2948

2962
2963

2977
2978

2295

2638

2813

2827

2828

2842

2843

2857

2858

2872

2873

2887

2888

2902

2905

2917

2918

GE TWORD

Pmsk L2

Pmskl3
Pmsk L4

GET_DATA

Pmsk
2

769+#
769+4
769+4
769+#
782+#

783+4

Pmskl3
Pmskl4
GMANIA

SEQ 0275

775+

775+
775+
775+
788+
789+

Pmsk L2

779+#
779+#
779+#
779+#
792+#
793+#

Pmsk 3
Pmskl4
GMANID

Pmsk L2
Pmsk (3
4
Pmsk

GMANIL

Pmsk L2

Pmsk (3
Pmsk L4

Pmsk L3
Pmsk L4

GP$_COUNT

Pmsk L2
Pmsk L3
Pmsk L4

GPHARD

Pmsk L2

Pmsk(3

2l b2
+

Pmsk L2

GP$DISP

Pmskl4

89+
02+
03+

Pmskl3

OO0

Pmsk
2

GP$ATLO

Pmsk L4

Pmsk L3

Pmsk L2

2k 2k 2t al b 2l b

GP$ATHI

ol 2

Pmski4

NNNN"\\JU\\AJ\ 00
S
00 00

—l_l—l—l_‘—l—l—l—l—l—l—l—)_j—l—l—l—l—.-—l—l—l—l-l—l

1328+

1328+
1328+

1328+
1341+

1342+

1365+
1365+
1365+
1365+
1378+
1379+

13
13
1385+
13
13
13

76448

Pmsk L&

Pmskl2

GPRMA

Pmskl3
Pmsk L4

GPRMD

GPRML

1326+#

}339*#

Pmskl3

1363+#
1363+#

1363+#

1376+#
1377+4

Pmskl2

1400+#

Pmskl3

1400+#
1400+#

1400+#

1413+#

1414+#

GTR_MSG

Pmskl4

20424

G_HWTBL

Pmskl2

}gg%

HEADER

Pmskl2
Pmskl3
Pmskl4

HEADER_PRINT

HIGH

;

1111+#

1111+#
1111+#

1565
1565

1573
1573

1541
1541

1546
1546

1551
1551

1574
1574

886+

897+

1326+

1111+#

1124+#
1125+#

881+

2092#

873+

873+
886+

887+
235+#

2172

881+

HQ_MSG

Pmskl4

2032#

5530

H_HWTBL

Pmskl2

1554

1AE

Pmskl4

IBE

Pmskl2

900+

235+4

235+#
235+#4
248+#
24L9+#

5379

886+

5529

895+

2031#

Pmsk L4

886+
899+

Pmskl4

Pmskl3

886+

894+

HQ_ERR_MSG

1363+

1510

873+

Pmsk L4

1510

Pmskl2

Pmskl3

1610
1610

5381

2171

Pmskle

1583
1583

5380

2091#

Pmsklé4

HOE

20434

1560
1560

Pmskl4
Pmskl3

SEQ 0276

1363+#

Pmskl4

1326+#

Pmskl2
Pmskl4

5407

765+# 5408

2032#

20334
1554

1773#

17744

232+#

232+#4
232+#
232+#
245+4
2L6+#

225+#

5380
5531

5530

897+
897+

897+

910+

911+

1326+

1339+

1340+

34
34 1+

i 341+

1+
} 4+
35 5+

1363+

1363+
1363+
1376+
1377+

1378+

1378+
1378+
1391+
1392+

32+

1447+

1449+

1432+
14 32+

1447+

1449+

1460+

1462+

14
14

32+

14 45+
14 46+

1447+
1447+
1461+

1449+

1449+
1463+

Pmsk
3
Pmsk L4

1€

Pmsk L4

. lER

Pmsk L2

Pmskl3
Pmsk L4

ILF

Pmsk L4

ILL_CMD_MSG

4
Pmsk

ILR

Pmsk L4

IMAGE

Pmsk
4

Pmsk L2

Pmsk
3
Pmsk L4

INC_ARR

Pmsk L4

INC_BNK

Pmsk L4

X
INDE

Pmsk L4

INLOOP

225+#4
225+#
238+#
239+#

SEQ 0277

17254
17264

233+4
233+4
233+4
233+4
2L6+4

247 +4

1780#
17814

2028#
20294

17794
1780#

2108
2109

907+
907+
907+
907+
920+
921+
54754
54764
54644
54654
3394

902+
902+
902+
902+
915+
916+

1995
1996

3395
3587
3588

Pmsk L2

Pmsk
3
Pmsk L4

IN_BLAST_TBL

4
Pmsk

IN_ERROR_MAP

Pmsk L4

10AE

Pmsk
2
Pmsk
3
Pmsk (4

10EF

Pmsk L2
Pmsk (3
Pmsk L4

I0FN

Pmsk (2

Pmsk (3

5607
5608
4923
4924

911+
911+
911+
911+
924+

915+
915+
915+
915+
928+
929+

54744
54754
3395
3396

5592
5593

925+
5626
5627

3590
3591

3396

3397
3593
3594

919+
919+
919+
919+
932+
933+

3422
3423
3921
3922

3424
3425
3922
3923

3427
3428

3428
3429

3429
3430

3516
3517

i e
e

Pmsk
2

Pmsk (3

Pmsk L4

o
.
.
B
I
I
I

Pmsk L4

Pmsk(3

D o

Pmsk L2

NN
- —d e

10PL

Pmsk L&

IR IR IR

Pmsk 3

SEQ 0278

RN Buan

—a -2

Pmsk L2

VNN ANNOrOONNN wviunun

10LN

Co 0o
PV lelelelels
AV 1NN LULN1LN B Oo

170+#
171+4
158+#

Pmskl4

Pmsk
2
Pmsk (3
Pmsk L4

ISR

Pmsk (2

Pmsk
3
Pmsk L4
IXE

Pmsk L2

529+
529+
529+
529+
542+
543+

530+
530+
530+
530+
543+»
544+

Pmsk (3
Pmsk L4

1_BLAST_TBL

Pmsk L4

I_CHIP_TBL

Pmsk L4

1_COL_CNT_TBL

Pmsk L4

1_COL_PTR

Pmsk L4

I_ERROR_MAP

Pmsk L4

1_HWTBL

Pmskl2

{_REM_TBL

Pmsk L4

1_TMP_BLST_TRL

Pmsk L4

K IND

Pmsk
[2

Pmskl3

3877
3878

4909
4910

855+

4
Pmsk

SEQ 0279

856+
915+

Pmsk (2

915+
G15+
915+

Pmsk (3

928+

Pmsk L4

929+

Pmsk L2

Pmsk(3
Pmsklé

LSAPT

Pmsk L2

Pmsk (3

L SAUT

00 00 00 00

) —

e
— — — —

Pmsk L4

Pmsk(3

b
—
N —

Pmsk
2

L $AU

e
el
D
D —

Pmsk L4

Pmsk .2
Pmsk (3

L8CCP

AU —

00 00 00 00

NN
= — =3 —

4
Pmsk

Pmsk L3

Pmsk L2

LSAUTO

—d

Pmsk L4

Pmsk
2

Pmskl3
Pmsk L4

L8CLCK

Pmsk
2
Pmsk (3
Pmsk L4

L$CLEAN

Pmsk L2
Pmsk L3
Pmsk (4

LSCLRVEC

Pmsk
2
Pmsk (3

5904+
590+«
590+
590+
603+«
604+
685+
685+
685+
685+

689+#
689+#
68G+4
68G+4

1208+
1208+
1208+
1208+
1221+

1222+

Pmskl3
Pmsklé

L3DEPO

Pmsklé

1155+#

Pmskl3

Pmskl4

Pmskl2
Pmskl3

Pmsklé

Pmsk L2

LSDISPATCH

Pmskl3

Pmskl4

LEDLY

Pmskl2
Pmskl3

Pmskl4

L$DOCLN

Pmskl2
Pmskl3

Pmskl4

L $DODU

Pmskl2
Pmskl3

Pmskl4

L $DORPT

1181+

1142+#

Pmskl2

LEDE VP

1168+

Pmskl3

Pmskl4

L$DESP

1168+

1142+#

Pmskl3

Pmskl2
Pmskl3

SEQ 0280

1168+

Pmskl2

LSDESC

1168+

700+4

703+#

1142+#
1142+#

1156+#

1118+

1218+

1258+

1218+
1218+
1218+
1231+
1232+

1258+
1258+
1258+
1271+
1272+

967+

1126+

1181+

251+
251+

257+
257+

1236+
1236+

1118+
1118+
1118+
1131+
1132+

1217+

1217+
1217+
1217+

1230+

1237+

1194+

1194+
1194+

1207+

1208+

967+
967+
967+
980+
981+

1126+
1126+
1126+
1139+
1140+

251+
251+
264+
265+

257+
257+
270+
271+

812+
812+
812+
825+
826+

B16+#
816+4
B16+#
829+#
830+#

812+

804+

816+#

1236+
1236+
1249+
1250+

808+#

804+
804+
804+
817+
818+

808+#
808+#
808+#
821+#
B22+#

796+
796+
796+

800+#
800+#
800+#

796+

1181+
1181+
1181+
1194+
1195+

800+#

—

Pmskl2

| L$CO

698+

699+

Pmski4&

Pmsk L3

Pmsk L4

LSERRTBL

LBETP
Pmsk
2

Pmsk (3

4
Pmsk

Pmsk
2

Pmsk L3

Pmsk L4

Pms[k
2

Pmsk(3

Pmsk L4

Pmsk (2

Pmsk i3

Pmsk
4

2 -0

08+#
08+#4

21+4
22+4

38+
LR

POPLUNVNUNUND
— = =3 3 =3 -3
whornurnON
jole]
0o 0o
NS

—

L SERROR
Pms[k
2

BTahan

Pmsk 14

Pmsk (3

D —d —

LSENV]
Pmsk (2

Pmsk L4

Pmsk L3

ol
)

sl
i

vl culd wld

cnld ansll

O+

L+

rororurLNONY
PNOND
= —d =t =2
N WNNANWN

T
b
e
)

4+t

AL —» 0L 0o 0o o
“

Pmskl3

—

LSEF
Pmsk (2

LEDVTYP
Pmsk L2

Rl
T
T
R
e R
I
I
I
IR
R

LSDUT

Pmsk L4

b b b BB D DD
DB DD QAN
b
B
aaannnr NN
VNNV
= = OO0 OVVOVWOOOVOOVOWW——= = afNUN)
— = —
— 00 0o 0O
WWRONS
S BSWOOoOOoOoN
00 0o 0o 0o

Pmsk(3

| L$DU
JE

Pmsk
2

R Y

Pmsk
&

N T

J——y

Pmsk
3

CLSDTYP
Pmsk
2

LSDTP

NNV
PPN

Pmsk (4

8
8
8
8
SEQ 0281

9
94+
7 6+
7 6+

76:

LSHPCP

LSHPTP

L $HRDLN

L $HW

Pmsk (3

Pmsk L4

Pmsk (2

Pmsk (3

Pmsk L4

Pmskl2

Pmsk(3

Pmsk L4

Pmsk L2

Pmskl3

Pmsk L4

Pmsk
2

Pmsk(3
D e

Pmsk L2

Pmsk L4

Pmskl3

d e

LSHIME
D

Pmsk
i2

7+
7+
7+

D ——d —d —

Pmsk L4
756+4

— —

756+#
769+4
770+#
[0, Yo X% 1%, 1Y, 1Y, ]
V\b—l—).—h
+ 4+ 4+ 4+

Pmskl3

—d

Pmsk L2

—

el e

e cd i

i ol

) sl il

) e

) aeld

e A 1Y ]
ESHSTNTSTNT NSNS LSS 1S L e
—=O0O0O0O—=—-=0000C O 00 C0 00 Q0 NN
—0ovoooonunes
W WWWN
S = —

b i

Pmsk L4

Pmskl3

L $HARD
Pmsk (2

Pmsk L4

P — e

Pmsk L3

L$GPHARD

Pmsk (2

LBEXPS

|
LSEXPG

Pmsk L4

p—————

Pmsk(3

Pmsk
2

LSEXPT

0O OO WWWWININ=
= =2 —

Pmsk L4

SEQ 0282

756+#

756+4

1304+#

1304 +#

1304+#
1304 +#
1317+#
1318+#

LSICP

WWONONN
NN
(o N o e e
S

SEQ 0283

sl
sl
o

cld el aud
el

b anld

)
il

bl
i

ld cnild

il cald aulh cnild

oomammbl\

Pmsk L4

Pmsk (3

Pmsk (2

LSHWLEN

[elelelele
e
e

Pmsk L4

Pmsk L2

Pmsk L3
4
Pmsk

LSINIT

Pmsk
2

3
Pmsk
Pmskl4

L$INLOOP

Pmsk L2

Pmsk(3
Pmskl4

LEISR

Pmsk
2
Pmsk L3
Pmsk L4

LSLADP

Pmsk L2
Pmsk L3

LSLAST

Pmsk L2

Pmsk(3
Pmsk L4

L$LOAD

Pmsk (2

435+
435+
435+
435+
448+
449+

Pmsk (3
Pmsk L4

LSLUN

Pmsk L2
Pmsk L3
Pmsk L4

L SMANUAL

Pmsk L2
Pmskl3

301+4
301+4
301 +#
301+#

—_, e

Pmsk L4

31444
315+4

Pmsk L4

LSMEMORY

287+#4
287+#
287+#
287+4
300+#

Pmsk
2

Pmsk L3
4
Pmsk

Pmsk L3
Pmsk L4

Pmsk L2

526+#
526+#
526+#
526+#
539+#
540+#

D
) —d
—d

L SNAME

19+#
19+#
19+#
19+4#
32+4

Pmsk
2

88+

L $NDSW

Pmskl2

Pmsle'
Pmsk L4

L$PRIO

b
b il

by + 4+ 4+ 4+ 4+ + + +++4 + +

Pmsk L4

+ + 4+ + 4+

Pmsk (3

lelelelelels) W
ONONPNUN)
= = = s 0 0 00 00 OO 00 —
NN
N &S = b
- \0 cowvvunun wviN
Role
AV AV LV,

Pmsk
2

b cnd ald wal il

LSNDSFT

Pmsk L4

i <

Pmsk L3

b il

Pmsk (2

L SNDHW

Pmsk L4

-l <

Pmsk L3

Pmsk (2

— o

LENDHRD

4
Pmsk

Pmsk(3

LEMSG

Pmsk L4

—

Pmsk (3

301 +4

B AN NN NN = — =
—s
O O0000
OCOoOo s~ WWW
~Y — 00 0o
o~ -l b S5 &N Py N
++++
+
+
+
+ + + + 4+ + 4+ + 4+

Pmsk L2

WWWWW—
=-

LSMREV

SEQ 0284

Pmsk
2

Pmsk(3

oo
+ + +

norONON

b
b

b wb

Pmsk L3

Pmsk (2

-—d wd

LSPROT

Pmsk L4

22+

35+
36+

Pmsklé

LSPRT

Pmskl2

277+

280+#

290+
291+

280+#
293+#4
294 +4

820+
820+
820+
833+
834+

824 +4
824+4
824 +H4
837+#4
838+#

Pmskl4

Pmskl2
Pmskl3

Pmskl4é

L$REPP

Pmskl2
Pmskl3

Pmskl4

LEREV

Pmskl2
Pmskl3

:
LSRFLAGS

Pmskl4é

Pmskl2
Pmskl3
Pmskl4

LS$RPT

Pmskl2
Pmskl3
Pmskléd

L$SETPR]

Pmskl2
Pmskl3
Pmskl4

LS$SETVEC

Pmskl2
Pmskl3
Pmskl4

L$SFTLN

1139+

Pmskl4

Pmskl3

LSREADEF

1232+

1138+

1232+
1232+
1232+
1245+

Pmskl3

L$READBUS

965+

966+

Pmskl2
Pmskl3

1246+

277+
277+
277+

820+

1196+

1246+

SEQ 0285

1247+

280+#
280+#

824 +4

1196+
1196+
1196+

1209+
1210+

1140+

1142+

1140+

1142+

1140+

1142+

1154+
270+

1156+
273+4

283+

286+#

1140+
1153+

270+
270+
270+
284+

1142+
1155+

273+4
273+4
273+4
287+#4

610+x

1117+

677+

681+4

610+
610+«
610+
623+«
624+*
677+
677+
677+
690+
691+

669+

669+
669+
669+
682+
683+

1310+

1310+
1310+
1310+

1117+
1117+
1117+
1130+
1131+

1199+

1199+
1199+
1199+
1212+
1213+

681+4
681+#
681+4
694 +4
695+#

673+4

673+4
673+4
673+4
686+#
687+4

1311+

1311+
1311+
1311+

1312+

1312+
1312+
1312+

LESWLEN

LSTEST

LSTIML

LSUNIT

Pmsk L3

Pmsk
4

Pms12
k

Pmsk (3

Pmsk L4

Pmsk (2

Pmsk(3

Pmsk L4

Pmsk
2

Pmsk |2

Fmskl3

Pmsk!3

Pmsk
i4
8¢

)

) e

il anl)

anill wnl el

b —a

HHrororON

—

WWRORRORONNONONONON

[0 AV, IANIAN AN S Te AV, |

R ols AV LV LV LV LV, P

2 NN

oo nvnvnnirnoro

D e

NOAWNWWORNRINOFONY

O+

INWWWWWWWNWN

i —

O+4
— 2

o+h

e B

Fele QW RV IV LV, ]

)

W
NN—'O:J\I\JVJ‘
+
+ + +

oogooo_._._.-.._a_.
NN
O*OQ&J\N'\J'\J'\J
OO

—d

nono

— — —

feRole Yo Yo Jo QWL NE s Rolallele AV . LVLSN1,S - 5
I

—

NNUNNO O VOOV WW= =

— — — —— —

) —

—

— —

—

—a

— ——

ONOOA NNV

—

—d ——a

—

Pmsk
2

Pmsk L4

Pmskl3
— —

Pmsk L2

— — — —

4
Pmsk

) —

Pmsk(3

L8SW
Pmsk (2

—dd —

Pmsk L&

) —

Pmskl3

—h ——

LESTA

Pmsk 2

—) —

Pmsk L4

—

Pmsk (3

— —

LESPTP

Pmsk (2

—

Pmsk L4

) —

Pmskl3

el el

LSSPCP

it el

L$SPC

Pmsk
2

Pmsk
L4
SEQ 0286

Q4+

Q9+
9+
Q¢

LAB

LASTAD

Pmsk L4

2448
2449

2461
2462

2497
2498

5376
5377

53844
5385#

5396
5 SEQ 0287

Pmskl2

1274+
1274+

1275+
1275+

1279+
1279+

1284+
1284+

1285+
1285+

1291+
1291+

Pmskl3

1274+
1274+

1275+
1275+

1279+
1279+

1284+
1284+

1285+
1285+

1291+
1291+

4
Pmsk

1287+
1288+

1288+
1289+

1292+
1263+

1297+
1298+

1298+
1299+

1304+
1305+

Pmsk L2

Pmsk (3
Pmsk L4
LAU

Pmsk
2
Pmsk (3

Pmsk L4
LAUTO

Pmsk L2

Pmsk L3
Pmsk L4

LBT

Pmsk L4

LCLEAN

Pmsk
2

Pmsk (3
Pmsk L4
LDU

Pmsk
2

Pmsk L3
4
Pmsk
LF

Pmskl4

LFS

Pmsk L4

LINIT

Pmsk L2
Pmsk(3
Pmsk L4

LOADTS

Pmsk L2

572+
572+
572+
572+
585+
586+
582+
582+
582+
582+
595+
596+
592+
592+
592+
592+
605+
606+
602+
602+
602+
602+

615+
616+

5442
5443
562+
562+
562+
562+
575+

576+
Q74 +4
Q74+4

983+
983+

Pmskl3
Pmskl4
LOC

Pmskl2

Pmskl3

LOE

Pmskl4
.
Pmskle

Pmskl3
Pmskl4
LOT

Pmskl2
Pmskl3
Pmskl4

LOW

Pmskl2
Pmskl3
Pmskl4

LRPT

Pmskl2
Pmskl3
Pmskl4

LST_PAT

Pmskl4

LST_REM_ENTRY

Pmskl4

LST_TSTED_ARR

Pmsklé

LUN

Pmsklé

LUN_MISS_MSG

Pmskl4

L_1_0O_DATA

Pmskl4

L_CHIP_TBL

Pmskl4

L_ERROR_MAP

Pmskl4

L_FAILING_CHIP

Pmskl4

L _RANDOM_DATA

Pmskl4

969+
969+
982+
983+
269+
269+
269+
269+
282+
283+
234+#
234+4
234+#
234+4
247+#4
24L8+#
223+#4
223+4
223+#
223+#
236+#
237+#
873+
873+
873+
873+
886+
887+
376+x
3764%
376+
376+
389+«
390+*
2742
2743
3255
3256
3349
3350
3514
3515
3690

Q74 +4
Q74+4
O87+#
988+#

270+#
270+4
270+#
270+4
283+#4
284+4

983+
983+
996+
997+

886+
886+
886+
886+
899+
900+

SEQ 0288

897+
897+
897+
897+
910+
911+

1363+
1363+
1363+
1363+
1376+
1377+

1326+
1326+
1326+
1326+
1339+
1340+

2664*

2665+
3004*
3005+
2742+
2743'
2616+

2617«

1440+
1440+
1440+
1440+
1453+
1454+

1442+
1442+
1442+
1442+
1455+
1456+

3342

3346

3680

3511
3512
3688
3689

3343
3470
3471
3679

3691
2012

2013
5374
5375
20364
20374
2646*
%
2647

1378+
1378+
1378+
1378+
1391+
1392+

4759
4760

4791
4792

4822
4823

MECLCK

Pmskl2

829+

833+

840+#

Pmskl3

829+
829+
842+
843+

833+
833+
846+
847+

840+#
840+#
853+#
854+#

Pmskl4

MEDFLT

Pmskl2
Pmskl3

Pmskl4
MSEXCP

Pmskl2
Pmskl3
Pmsklé

M$RAD

Pmski2
Pmskl3

Pmskl4
MEXFER

Pmskl2
Pmskl3
Pmsklé

MANUAL

Pmskl2
Pmskl3
Pmsk L4

829+

866+

866+
866+
866+
879+
880+
1341+

1341+
1341+
1341+
1354+
1355+

877+

877+
877+
877+
890+
891+
1265+
1265+
1265+
1265+
1278+
1279+

297+#

297+#
297+#
297+#
310+#
311+#

833+

879+

879+
879+
879+
892+
893+
1378+

893+
893+
893+
906+
907+
1270+
1270+
1270+

902+#
902+#
902+#
915+#
916+#
1275+
1275+
1275+

1270+
1283+
1284+

Pmskl4

1659#4

1977

MAP_ML11_REG

Pmskl4

1715#

1987

MAP_REM_TBL

Pmskl4

16504

1962

MAP_TMP_BLST_TBL

Pmskl4é

17064

1981

MAP_WRT_BUF

Pmskl4

1683#

1968

MASK

Pmskl2
Pmskl3

Pmskl4

MAX_CHIP_COL

Pmskl4

MCPE

Pmskl4

MDPE

Pmskl4

MEMLOC

Pmskl2

17164

16514
1707#

16844

862+

862+
862+
862+
875+
876+

1991

1992

17224

1988

1963

283+

927+4
927+#4
927+4
940+4
941+4

902+#

1337+

1275+
1288+
1289+

1279+#
1292+#
1293+#

1339+

1376+

1374+

1410+

1339+
1339+
1339+
1352+
1353+

1376+
1376+
1376+
1389+
1390+

1412+

1412+
1412+
1412+
1425+
1426+

1337+
1337+
1337+
1350+
1351+
1279+#
1279+#
1279+#

1374+
1374+
1374+
1387+
1388+

1410+
1410+
1410+
1423+
1424+

1386+

1400+

1421+

4163

4971

54694

1963
1964

1982

1969

868+

873+

881+

1363+

3176

3461

3748

4123

868+
868+
868+
881+
882+

3177

17504

283+

1446+#

927+#4

1978

17234
1751#

895+
865+
895+
908+
909+
1432+#

1432+#4
1432+#
1432+#
1445+#

MAP_CHIP_TBL

16604

895+

1378+
1378+
1378+
1391+
1392+

893+

SEQ 0289

840+#

284+4

284+#4

873+
873+
873+
886+
887+

3462

881+
881+
881+
894+
895+

3749

1363+
1363+
1363+
1376+
1377+

4124

1386+
1386+
1386+
1399+
1400+

4164

1400+
1400+
1400+
1413+
1414+

(972

1421+
1421+
1421+
1434+
1435+

54704

54794

54804

284+4
284+4
297 +4
298+#

Pmskl3

Pmsk L4
MEMCRY

Pmsk
2

SEQ 0290

Pmsk
3

Pmsk L4

MLDS

4
Pmsk

MLDT

Pmsk L4

MLE1

Pmsk L4

MLE?Z

Pmsk L4

MLEE

Pmsk L4

MLEL

4
Pmsk

MLER

Pmsk L4

MLLA

Pmsk L4

MLMR

Pmsk L4

ML PA

Pmskl4

2239
2240

2266
2267

2376
2377

2386
2387

2405
2406

2437
2438

2486
2487

2342
2343
2343
2344
2241
2242

2268
2269

2378
2379

2439
2440

2488
2489

2399
2400

2454
2455

2503
2504

2344

4756
4757
4624
4625

4788
4789
4630
4631

2345

4621
4622

5644

MLDB

2177
2178

Pmsk L4

2456
2457

n)—

MLDA

2443
2444

00 0o

Pmsk L4

2441
2442

MLD?2

2401
2402

—

4
Pmsk

2382
2383

Co G0
[0 0%,|

mMLD1

2380
2381

wron

4
Pmsk

2270
2271

oo~

MLCS3

2243
2244

~NO~

Pmsk L4

2173
2174
2505
2506
2123
2124

—

MLCS2

2489
2490

4
Pmsk

2440
2441

MLCS?

2379
2380

nono

Pmsk L4

2269
2270

MLBAE

2242
2243

—_— -

Pmsk L4

TRr_un

MLBA

D D

Pmsk L4

D e

MLAS

Pmsk L4

d d e e e e

ML11A

D oD e e

Pmsk L4

B YN

MEM_ERR_MSG

i
NNNNN
S WWN
=

Pmskl4

. MLPD

Pmskl4 1578%#

4082

2112

2114n

2113

21154

1572%

2184

1560

2175

1988

2115

4,638
4639

4749
4750

Pmskl4 1898#

2114

2182
2183

2183
2184

ML SN

Pmskl&

MLWC

Pmsklé

15714

1559

Pmskl4 1987

54544
54554

18994

Pmeklé 1992

ML_REG

Pmsklé4

MCL

Pmskil&

MOST_OF TEN

Pmskl4

MR_REG

MSGADR

5492
5493

2115

2124

1993

19234

1921

1922

1762#

17634

3470
3471

19242

3555#

35564

2241

2116

4812

4782

4813

2377

2438

5157

5158

2267
2268

2173

2487

2174

2175

2176

2177

2178

2184
2185

2185
2186

2376

2437
2438

2486

2487

54554
54564

5492

897+

1326+

1349+

1363+

2174

2239
2240
1924

2175

2266

2267

2176
2377

2177

4819
4820
2178

3559

3560

868+
868+

873+
873+

881+
881+

886+
886+

897+
8G7+

1326+
1326+

881+
882+

886+
RB7+

894+
g

8§99+
900+

910+
911+

111+

117+

121+

127+

131+

124+
125+

130+
131+

134+
135+

140+
141+

144+
145+

Pmski2
Pmsk(3

Pmsklé
Pmskl2
Pmski3
Pmsklé

Pmskl4

111+
111+
111+

117+
117+
117+

249+

253+

262+

266+

249+
249+
249+

263+

17458

253+
253+
253+

267+

5161
5162

2179

5190
5191

2180

5257
5258
2181

2181

5275
5276

2181

2182

5561

36274

1326+

SEQ 0291

36264

897+

1435+

5276

1925

886+

B75+
12;2'

5560

2173

4812
4813

886+

Pmskl4

5491

2399
2400
4093
4094

2179

4,788
4789

4756
4757

2184
2185
2503
2504

881+

1421+

2180

2386
2387
4082
4083

2178

4781
4782

2183
2184
2492
2493

873+

862+
862+

2179

2382
2383
3077
3078

2177

2136

1421+

2443
2444
4630
4631

2185
2186
2505
2506

2176

2175

868+

2401
2402
4621
4622

2405
2406
4624
4625

5258

2174

2117

862+

123?’

2180

2177

2135

Pmskl2

2179

2176

Pmskl4

2134

2178

5187

2175

2133

1804

5275

2174

2439

1803#

2182

5257

2488

2378

Pmskl4

20874

5186

2117

2181

1421+

MxF

2114

2240

4750

4781

20864

Pmsk(3

MULT

2174

2123

MSGPTR

2183

2182
2183
2456
2457

2181
2182
2454
2455

ML_DUT

MR_PRINT

2116

21164

Pmsklée

ML_ALL

2115#

4094

MLREG

ML _ADDR

4749

4083

15794

4093

873+

121+
121+
121+

881+

127+
127+
127+

131
131+
131+

1363+

1386+

1400+

1349+
1349+

1363+
1363+

1386+
1386+

1400+
1400+

1339+
1340+

1362+
1363+

1376+
1377+

1399+
1400+

1413+
14174+

137+

141+

147+

150+
151+

154+
155+

137+
137+
137+

141+
141+
141+

147+
147+
147+
160+
161+

1400+

Pmsk L4

NEM

Pmsk L4

NIB_NO

Pmsk L4

NIB_NUM

Pmsk L4

3133
3134

Pmsk L2

Pmsk (3

3136
3137

4243
4244
4329
4330
4418
4419

4247
4248
4332
4333
4434
4435

1541

1546

5611
5612
1370+
1370+

4
1466+
1466+8

1541

Pmsk L4

529+«
530+«

1546

Pmsk L2
Pmsk(3
Pmsk L4

NG_AD_MSG

Pmck
4

X
NO_A_RADI

Pmsk
2

19+

531+
532+

3706
3707
4259
4260
4358

4359
4443
4444

1560
1560

3763

3919
3920
4276
4277

4375
4376
4459
4460

4285
4286
4378
4379

—

28+
29+

Pmsk L4

516+«
516+«
516+%
516+%

(L lV, |

Pmsk (3

1093+
1094+

1088+#
1088+#
1088+#
1088+#
1101+#
1102+#
518+
518+
518+
518+

15+
15+
15+
15+

Pmsk
2

NED

81+#
82+

1080+
1080+
1080+
1080+

b e

Pmsk L4

68+#
68+#
68+4#
68+#

—_—

g
e
A
IR
Y
.Y
p——g——
Y
W
YO
U
TN
IR

Pmsk (3

59+

b =
+ 4+

Pmsk (2

N &S =
+ + 4+ 4+

NAM

WML

Pmsk
3

Voo

M_SYS

) cald

Pmskl3

il sl el ol

TM_RH_BASE

Pmsk (3

M_RET

) e

Pmskl3

)

M_OPTION

Pmskl3

D e

M_DUT

i s

Pmsk
3

SEQ C29¢

i e

T
M_CORRE

) e

Pmskl3

b o

M_BRD_NO

VILIL L IL i elelelelelalV IV LV IV, Ts No AV, LV, LV, LV, LV LV, LV it db A a e oy
S NN—==NINNNOOOONOON
NN S
_L LN OO S S WWWWNNNOO
= =0

SR ees Odd\l\lg()muu\b
§§§§22\§ RN

Pmsk (3

M_BNK_NO

Pmsk
3

M_BNK

Pmsk (3

[@TalV, IV, IV, 1V, Ts Ne AV, LV, [V, ] VIV VIV IV IV IV IV, [V, [V V)
ROWWRLrRVrRUND
VRNV N
v

M_ARR

4289
4290

4393
4394

4306
4307
4399
4400

4312
4313
4402
4403

O$BONRPT

O$BGNSFT

O$DuU

O$ERR TR

O$CNSW

Pmsk (3

4
Pmsk

Pmsk (3

Pmsk L4

Pmsk L3

Pmsk |4

Pmsk L3

Pmsk L4

Pmsk
2

Pmsk L2

Pmsk (2

022+
023+

21+

= =2 2 2 NONWWWWAN
=

— = PPNV
NI NNV NONONINON) = = =3
2 AN
— =
PO
= = = 2 NN NN
N = =00

Pmsk (3

++++

Pmsk L2

i4
Pmsk

R
B

OgOOQOOOOOOOOO\hU\
APNONDNDWNIES = — = = 00NN

Pmsk
3

eolelele]
OO OO

JRAU

Pmsk
2

Pmsk L4

Pmsk (3

=2 = =i =2 NN = = =

—

70+

SN WWWWWWWWNW
OOO0
NNN0000
N
— b -\
—d
e PN ND
+*

Pmsk (3

A PP

Pmsk (2

Pmsk L4

Pmski3

—

O$APTS

Pmsk
2

p————

Pmskl4

NO_ODD_ADR

—.—.—.-—l—‘—l—l—b—l—l—l—‘—da—‘—l—h—l—h-—‘—l—l—d—l—l PR
(elelele]
elaoleolelalelalaleleleolelelele] <

Pmskl3

SEQ 0293

Pmsk L&

Pmsk L2

Pmsk(3

Pmskl4d

O$POINTER

Pmskl2

941+#

941+4#
GS4+#

1010+

1160+

1010+
1023+

1032+
1045+

1160+
1173+

1016+

1020+

1025+«

1029+«

1033+

1037+«

1041+

1045+

1033+

1037+«

1041+

1045+

1049+

955+#

1024+

1??5»!

1016+

947+#

1032+

1046+

1020+

1174+

1025+«

SEQ 0294

v
1029+

1033+

1037+

1041+

1049+

1053+

1049+

1053+

1058+

1062+

1066+

2202
2203

22078
2208#

46108
4611

22134
22144

4670
4671

3215
3216

7289
3290

1045+

1049+

1053+

Pmskl3

1112+

S47+#

1??500

1016+
1016+

1020+

1020+«

1025+

1029+

1033+

1038+

1042+

1015+

1052+

1144+

1025+

1026+

1033+«

1037+«

1041+

1053+

Pmsklé

1112+

960+#

1?3;0:

1030+

1034+

1043+

1047+

1046+

1050+

1054+

1144+
1144+
1144+
1157+
1158+
1463+
1463+
1463+

1473+
1473+
1473+

1474+
1474+
1474+

1481+
1481+
1481+

1482+
1482+
1482+

1477+

1487+

1488+

1495+

1496+

1039+

1051+

1055+

1059+

1063+

1067+

C$SETUP

Pmskl2
Pmskl3
Pmski4

OFFSET

Pmskl2
Pmskl3
Pmsklé

1126+

946+#

946+4#
946+#
946+#
959+#
960+#
1455+
1455+
1455+
1455+
1468+

1469+

22144
2215#

OFFSET_SIZE

OLDPC

3038
3039

1461+
1474+

1475+

30464
3047%

1463+
1476+

3055
3056

Pmskl2

47034
47048
1372+

47318
47328
1408+

4767
4768
1481+#

Pmskl3

1335+

1372+

1481+4

Pmski4

1348+

1385+

Pmsk (2

530+
530+
530+
530+
543+
544+
530+
530+

1408+
1
1421+
1422+

1494+#
1495+#

S547+4
547+4

530+

547+4

544+

S561+4

Pmskl3

Pmskl2
Pmskl3

Pmsklé
ONE

1457+
1470+
1471+

1052+
1052+
1052+
1065+
1066+
1461+
1461+
1461+

4700
4701
1335+

Pmsk L4
OLDPSW

1015+
1015+
1015+
1028+
1029+
1457+
1457+
1457+

Pmsklé

530+

543+

ONE S

Pmskl4

ONE _MSG

Pmsklé

30644
30654

1481+
1494+

1482+
1495+

3089
3090

4584
4585

45928
45934

3928
3929

3133
3134

3937
3938

3136
3137

2509

5165

5166

4798
4799

4829
4830

3077
3078

3078
3079

3083
3084

5175
5176

5267
5268

5376
5377

2460

2496

560+#

2122
2123

2143
2144

2309
2310

4086
4087
15514
1552#
2059#

4594
4595
2801
2802
2390

4655
4656
4605
4606
2408

4715
4716
4726
4727
2447

20604

3062
3063

1474+
1487+

547+

1552#
1553

3331
3332

1473+
1486+

3383
3384

2391

3416
3417

26410

3511
3512

2448

3582
3583

2461

3892
3893

2497

2510

5166

3941
3942

5167

3945
3950

3953
2954

5194

5198

5195

5196

ONE _US

Pmsk L4

OPEN

Pmsk L2

£H e

5380

5443

5444

3520+
920+
920+
620+
933+
934+
43334
43344
4409
4410

927+
1927+
927+
927+

5444

5559

5445

SEQ 0295

5273
5274

Pmsk(3
Pmsk L4
(02

Pmsk L4

OPTION_HWTBL

Pmskl4

CRDY

Pmsk L4

OR_OLD_NEW_PD

Pmsk L4

ouT

Pmsk L2

Pmsk (3
Pmsk L4
OVER_FLOW

L4
Pmsk

0_1_PRINT

Pmsk L4

0_6_PRINT

Pmsk L4

Pmsk L2

5430#
54314
4474
4475
904+
904+
904+
904+
917+
918+
4308#
43054
4381
4382
44604
L4614

5460
5461

908+
908+
908+
908+
921+
922+

43164
43174
43954
43964
4462
4463

912+
912+
912+
912+
925+
926+
4319
4320
44034
L4044

Pmsk(3
Pmsk L4

PEPTR

Pmsk (2

Pmskl3
Pmskl4
PAR_CRC_WRD

Pmsk L4

PASS

Pmsk L4

PAT

Pmsk L4

PATS

Pmsk L4

PAT_O

Pmsk L4

PAT_1

Pmsk L4

1925
1926
435+

435+
435+
435+

448+
449+

3420
3421

3422

2787
2788
2798
2799

2791
2792
2802
2803

3423

916+
916+
916+
916+

929+
930+
4323
4324
4405
4406

940+
941+
4336

4337
L4204

929+
929+
929+

929+
942+

943+
43544
43554
4422
4423

931+
931+
931+
931+
944+

945+
L3624
43634
44364
L4374

4365
4366

4444m
L4454

4369
4370

4446

4447

Pmskl4 2664

PAT _SEL
| PA_REG
PD_0_9_CNT

2665
2894
2895

,Pmsklé 1788#
Pmskl4

2692

2779

4080

4091

49784

4984

2693
2909
2910

1789%

4081

4955

4979%

4954

4082
4083
47498

PD_REG
PD_SAVE

Pmskle 1886#
1887#
Pmskle 4701

PD_WRD_SEL

Pmskl4

PGE

Pmsklé4

PM_RD_MODE

Pmsklé

2133

21534

OM_THIS_BANK

Pmskl4

4870

5591

PM_WRT_MODE

Pmsklé

2135

PNT

Pmskl2
Pmskl3

Pmskl4

PNTR

4702
4987
4988
5051
5052
4971
4972

PRE_MOST
PRE_SUM

4092

49854

4093
4094
4752

4753
4989
4990
5064#
50654
4980
4981

2783
2939
2940
5156

5157

4990
4991

4749
4750
47814

47824
4996
4997
5070
5071
5005
5006

2793

2794
2954
2955

2804

2805
2969
2970

5185 . 5254

2819

2820
2984
2985

5255

5273

4781
4782
4784

4812
4813
4B12M

5157
5158
4B15S

48134
5005
5006
50814
5082#
5007
5008

2849

2864

2879

5186
5187
4953

5257
5258
49804

5275
5276
4984

4986

5051

5052

2835
2995
2996

2850
4594
4595

2865
4598
4599

2 SEQ 0296
4625
4626

5272

5186

4785
4999%
5000#
5078
5079
5006
5007

2834

4816
5019
5020
5087
5088
5028
5029

4954
5022#
50234
50954
50964
5029
5030

49814
5028
5029
5096
5097
5030
5031

4985
5042
5043

5052

4987
50454
50464

5053

1745#

17464

1748#

17494

2134

4871
2136

229+#

229+#
229+#
229+#
24L2+#
243+4

21544

5592

21554

21564

Pmskl2 1001+

1002+

1047+
1047+

1051+
1051+

1001+

1002+

1006+

1007+

1019+

1023+

1027+

1031+

1035+

1039+

1043+

1006+

1007+

1019+

1023+

1027+

1031+

1035+

1039+

1043+

Pmskl3 1001+
1001+

1002+
1002+

1006+
1006+

1007+
1007+

1019+
1019+

1023+
1023+

1027+
1027+

1031+
1031+

1035+
1035+

1039+
1039+

1043+
1043+

Pmsklé 1014+
1015+

1015+
1016+

1019+
1020+

1020+
1021+

1032+
1033+

1036+
1037+

1040+
1041+

1044+
1045+

1049+

1048+

1052+
1053+

1056+
1057+

752+#

B27+

829+

833+

840+

843+4

3626
3627
3600

3603~

1047+
1047+

POINTER

4750
4988
4989
5061
5062
4974
4975

2780
2924
2925

2782

Pmskl2

1060+
1061+

751+

1051+
1051+

1064+
1065+

01+# 1508

Pmskl3

751+

752+4

827+

829+

833+

840+

843+

Pmskl4

764+

765+4

840+

842+

846+

853+

856+4#

1014+4

3555
3556
3548

3574
3575
35514

35794
35804
3556

3604#
36054
357

Pmskl4 3503
3504
Pmskl4 3501

3502

35084
35094
35074

35084

35334
35344
3529
3530

3552#
35534
35324

35334

3549

3552#

3557

357

36234
36244
35784

35794

3601

36044

Pmski2

Pmskl2

Pmskl2
Pmskl3

Pmskl4

Pmskl2
Pmskl3

Pmsk L4

Pmskl2
Pmskl3
Pmsklé

Pmskl2
Pmskl3

Pmski4é

PRIO7

Pmskl2
Pmskl3
Pmsklé

PRINTB

Pmskl2
Pmskl3

243+#
244+
218+#

231+#
232+#

217+#

217+4

217+#

217+4
230+#
231+#

216+#

216+#4
216+#
216+#
229+#
230+#

215+#

215+#
215+#
215+#
228+#
229+#

214+#

214+4
214+#
214+4
227 +R
228+#

213+#

213+4
213+#
213+#
226+#
227+#

212+#

212+#4
212+#
212+#
225+#
226+#
211+#
211+4
211+#
211+4
224+#4
225+#

692+4

692+#
692+#

1124+
1125+
1510

|
|

218+#
218+#

Pmsk 4

PR106

Pmskl3

PRIOS

1510

Pmsklé

PR104

1183+

218+#

Pmskl3

PRIO3

1111+

Pmskl2
Pmsklé

PRI02

230+#

36234

230+#
230+#
230+#

Pmsklé

PRIOY

3627

3620

1111+
1111+
1111+

Pmskl3

PRIOO

Pmskl2

36228

{

¥ s

PRI

3619

3628

1183+
1183+
1183+

1196+
1197+

SEQ 0297

U
-

PRINTS

PRINTX

PRIO

PRIOR

444+

719+#

Pmskl2

699+#

Pmskl3

699+#

Pmsk L4

712+#

Pmskl2

790+

791+4

Pmskl3

790+

791+4

Pmsk L4

803+

804+#

Pmskl2

668+

669+

676+

541+

542+

547+

676+
676+
676+
689+
690+

Pmskl3

541+

542+

547+

Pmsklé

554+

555+

560+

PROM_ADRS

Pmskl4 4060

L069%

40704

PROM_DIS

Pmsklé

PROM_RW

Pmsk L4

PTSNUM

Pmskl2

21444

L0704
S137#
51384
52488
52494

O
~nN

OV—=0O 0NN

wvivawvniwn
s Ssrorororno
VIVTWNWNES SN

W00~
—O0Ow

Pmsk L4

438+

706+#

435+

Pmskl3

wviviwviuna
e Ssrorornorn

429+

706+#

v
e ssrororon
VIV
=
ON\WN0000
£
0000 NN

423+

Pmsk L2

WW S S WWOo000 N~

412+

726+#

4061
51364
5137#
52448
52454

40904

4087#
S5184%#
51854
5272
5273

Pmskl4d

Pmskl2

40864

4081
5175#
51764
5271k
52728

713+#

Pmskl4

5194
5195
5442
5443
5611
5612

4080

Pmskl3

669+
669+
669+
682+
683+

5395
5396
5585
5586

5166
5167
5412
5413
5604
5605

51 95

81
82
60
61

5165
5166
5411
5412
5589
5590

40794

2184
4393
4394

713+

668+
668+
668+
681+
682+

4928

40804
5156
5157
52678
52684

Pmskl2

Pmskl3

PRIORITY

PRINTF

40764
51554
51564
5254
5255

2183

2
2
5
5

180
2 S SEQ 0298
sg 09

40754

2182

2183
4352
3 53

2179
2180
2496

4074

2181

2182
4306

2178
2179
2460

4075#
S147#
S148%
52534
5254

2172

2177
2178
2447

4071#
S1464
51474
52498
52504

2171

706+

75
76
90

2176
2177
2409

705+

(WL IV IV [V, P

Pmsklé

\h\hww&\l‘ww—‘—‘

677+
677+
677+
690+
691+

S}z?:

405+#4

406+

412+

5196

5443
5444
5633
5634

677+

21454

405+#

423+

429+

435+

438+

444+

4091#
5185
5186

4091

4092
5232
5233

5130

5131
52434
52444

PTABS

Pmsk
2

423+
423+
436+
437+

5423
5424
38764
38774

5424
5425
3921
3922
3347
3348
3304
3305

429+
429+

442+

443+

435+
435+

438+
438+
451+
452+

457+
458+

5427
5428

5428
5429

3342
3343

3346
3347

448+

449+

444+
444+

SEQ 0299

Ll LA Ll

Pmsk L4

412+
412+
425+
426+

]

Pmsk 3

Pmskl3

aD_0_SuM

Pmsk L4

QD_1_SUM

Pmsk
L4

QD_2_SuM

Pmsk L4

QD_3_SuM

Pmsk L4

QD_L 00P

Pmsk L4

QD_NUM_SEARCH

Pmsk L4

QD_OFFSET

Pmskd4

QD_PAIR_L
OOP

Pmsk L4

QD_SEARCH

Pmsk L4

QUANTTY

Pmsk
4

RADI X

Pmsk 2

Pmsk(3

Pmsk L4

3349
2350

1370+
1370+

1374+
1374+

1363+
1363+

1370+

1374+
1374+

3851
3852
3851
3852
3840
3841

3924
3925

3305
3306
889+
889+

3307
3308
893+
893+

889+
889+

893+
893+

902+

906+
907+

903+

1346+
1347+

1376+
1377+

MMM

3347
3348

4431

173+
174+
4308
4309
4348
4349
4389
4390
44154
44204

ACACATMTI

Pmsk
4

Pmsk (3

160+
160+
160+
160+

Pmsk (2

1363+
1363+

1370+

LR
2

Pmsk L4

P_RW

Pmsk L4

P_DIS

3301

Pmsk
4

PUR_LOC

5431
5432

4004

Pmsk L&

PURGE

5430
5431

NN
WM

Pmsk L4

5429
5430

— NN
NN NN

PTR

5426

Pmskl4

—

PTBL_PIR

NN
WA
NN

Pmsk L4

1387+

1388+

—_—

| RANDAT

| RANDOM_INDEX

| RAND_INDEX

——

Pmskls

Pmsklé4

1946

1947

2634

Pmekle 3038
L7178

2013

RAND_PASS

Pmskié

RANGEN

Pmsklé

2014
1937+

RAN_1

Pmskl4

16648

RAN_10

Pmsklé

16734

RAN_11

Pmskl4

16744

RAN_12

Pmsklé

1675#

RAN_13

Pmskl4

RAN_2

Pmskl4

RAN_3

Pmskl4é

RAN_&

Pmskl4

RAN_S

Pmskl4

RAN_6

Pmskl4

RAN_7

Pmsklé

RAN_8

Pmskl4

1938«

16654

45964 4618

L7BB

47984

4B19

2817

2729

2%4

2703

4716

2810

54944

2953

2733

2960C

2968

2736

2975

2735

2959
2974

2989

2739

2990

2706

2825

2824

2832

2833

2862

1668%#

2714

2869

1669%#

2717

2884

16694

1670#

16704

16714

2715

2718

2720
2721

2855

2870
2885

2848

2863

2877
2878

2892

2893

2899

2907

2900

2908

16714

2723

2914

2922

1672#

2726

2929

2937

3066

4643

4648

16724

1969

RD_OLD_PROM_DATA

Pmskl4

RD_PROM_MCDE

Pmsklé

17254

1970
4043%

4044

2132#

21334

2724

2727

3067
4220

4221

4068

4069

2466*

4643

2496

2467

RD_XFER_MSG

Pmskl4

2052#

READBUS

Pmsk 2

276+4

20534

276+#

276+4
289+#
290+#

819+#

819+#
819+#

4644

2497

2915

2930

4644

5241

5242

2509
2510

4735

2994

2854

2712

4651

2983

2711

16684

5515#

2993

1667#

2840

5 504#

55144

2982

2847

2709

4820

5034

2967

2839

1667#

§799c

2952

2945

2732

4 586

45974

2818

2708

16664

Pmsklé4

Pmskl3

4585

2809

2212

2705

RD_BUF

Pmsk L2

2702

1665#

16738
17244

READEF

SOBOF
54934

4595
2211

2738

16668

47678

SEQ 0300

26424

4715

4594

16764

Pmskl4

Pmsklé

4756

16768

16778

2641

S067# 3077

1675#

RDY

Pmskl3

26364

2730

Pmskl4

2214

16748

RAN_9

RD_TRANSFER

2213

2923
2938

4649

4652

4736

4619

4B29%
48304

4648

4649

4651

4652

4670N 4699
46714

4700

——

Pmskl4

REF _MAR

832+#

5391

833+# 5392
17958
4
Pk

5002

50234

5025

5038

| REMAINDER

Pmsklé 4956

4990#

4992

50004
50014

5003

5016

50244

5026

REM_PTR

Pmsklé 3140

3219

3220

3227

3228

3233

3234

32384

32394

3254

33064

3309

33514

4957
3141

49914
3220

4993
3221

32194

REM_TBL

Pmskl4 1962

25694

REP_M7363_MSG

Pmskl4

2049%#

5165

5194

REP_PRINT

Pmskl4

20764

4554

5332

RET_DRS_MSG

Pmskl4

20354

5412

REVERSEACTUALS

Pmskl2

695+

1963

20364

4555

5413

702+

702+
702+
702+
715+

Pmskl4
Pmskl2

1111+

1141+

Pmskl3

1111+

1141+

1124+
1125+

1154+
1155+

Pmskl4

RFLAGS

20774

5166

695+
695+
695+
708+

Pmskl3

REVLEV

20504

25704

Pmskl2
Pmskl3

Pmskl4

709+

1111+

1111

269+#

269+#
269+#
269+#
282+#
283+#

716+

32204
5195

3228

32274

32284

5342

5445

5533

709+

709+
709+
709+
722+
723+

32334

3234

3296

3297

3235

33054

3308

5039

3253

50464

5047#

33504

3391

3392

5341

5333

5444

3229

5015

5532

5634

716+

723+#

728+

737+8

742+

716+
716+
716+
729+
730+

5635

723+4
723+#
723+4
73644

728+
728+
728+
741+

1141+

114%

Pmsklé

19174

1923

1987

RH_BASE _HWTBL

Pmskl4

5369

5454

RMR

Pmskl4

5370
1778#

5428#

ROUT

Pmskl2

17794

111+

117+

121+

127+

131+

137+

141+

147+

668+

669+

124+
125+

130+
131+

134+
135+

140+
141+

144+
145+

150+
151+

154+
155+

160+
161+

681+
682+

682+
683+

Pmskl3

Pmsk L4

19184

111+
111+
111+

1924

54294

117+
117+
117+

3227

ROW

Pmskl4 16524

ROW_0_127_OFF

Pmskl4

ROW_128_255_OFF

Pmskl4

4209

L2368

ROW_CNT

Pmskl4

3813

38604

ROW_MOST_OF TEN

Pmskl4

16534
4208

4209
4210
3814

3669

3228
L2354

L2368
L2337

38614

36390

1988

5455

121+
121+
121+

3228

3229
L2433

L244M

127+
127+
127+

3233

3234
L2247

4301

L2798

4296

4298

38754

38954

3697

3235
4296

3338

3339
4300

4297

4278

38764

3234

L2LBA

4L274M

L27S5K

131+
131+
131+

137+
137+
137+

38964

3699

4295

3897

3898

4297

141+
141+
141+

3424

3425

147+
147+
147+

3579
3580

668+
668+
668+

3590
3591

669+
669+
669+

3593
3594

SEQ 0301

5048

5049

3394

3395

31864
31874
3978
3979
4276
4277

ROW_SORT

Pmsk L4

ROW_SUM

Pmsk L4

RO_CL

&
Pmsk

RPT

Pmsk (2

3700
3701
3305
3306

5155
5156

3395
3396

3396
3397

3427
3428

4080

4311
4443
4444

3308
3309

3350
3351

3394
3395

3761
3762
3705
3706

3913

3916

2456

2505
2506

2660
2661

4614

4615

4617
4618

4643

4743
4744

4775
4776

3889
3890

3892
3893

3909
3910

3965

3970
3971

4
Pmsk

4356
4357

4082
4083
4358
4359
5157
5158

4079

[o
NP
o o8

ROW_SEL

3844
3 SEQ 0302

NN
P
[ SV PV

4
Pmsk

32464
32478

3208
3209
3994
3995

4312
4313
5149
5150

4440
4441

ROW_PURGE

31934
31944
3986
3987
4310

ronY

Pmsk L4

Pmsk (3
Pmsk L4

Pmsk L4
Pmsk L4

3914

3917

SEC_NUM

L4
Pmsk

SEED1

Pmsk L4

SEED2

4
Pmsk

49044
49054
49054

SEED3

Pmsk L4

SFL_BNK

Pmsk L4

b
—

49064
49064
49074
4224
4225
5261

5262

SERIAL_REG

Pmsk L4

SETPR]

Pmskl2

4644

3966

(o 3V, 1o
BN

Pmskl4

(WL LV, LV, LV, |
ww—-l—d
- NN

SEC_CNT

V.1V,
IV, 1V, |

Pmsk L4

OV~

2457

Pmsk L4

PN
— =

IV
IV, V)
NN.-I_J

Pmsk L4

ROW_NUM

Pmskl3

SEQ 0303

Pmsk L4

SETUP

Pmsk
2

Pmskl3
Pmsk L4
SETVEC

Pmsk
2

Pmsk(3
Pmskl4

SET_FLG

2690
2691
2726
2727
2908
2909
3696
3697

Pmsk L4

SFPTBL

Pmsk L2

SFT

Pmsk L2

4999
5000

2699
2700
2732
2733
2938
2939

2705
2706
2738
2739
2968
2969

5045
5046

4353
4354
5081
5082

2245
22L”

22974
22984

4231
4232

2708
2709
2818
2819
2983
2984
4394
4395

5095
5096

2711
2712
2833
2834
2994
2995
4435

2714
2715
2848
2849
3083
3084

2717
2718
2863
3084
3085

2720
2721
2878
2879
3134
3135

5167
5168

4548
4549
5196
5197

4549
4550
5262

5263

4555
4556
5280
5281

2356
2357

2377
2378

2417
2418

2438
2439

2356
2357

2379
2380

2417
2418

2440
2441

4436

3
Pmsk
Pmsk L4
SGL

Pmsk L4

SIZE

Pmsk L4

SIZING

Pmsk L4

SN_PRINT

Pmsk L4

SRC

Pmsk L4

STANDARD

Pmsk L2

Pmskl3

26614

L6174
46184

2245
2246
26614
26624

22974
22984

26624

673+
673+

Pmsk L4

START

Pmsk L4

START_MSG

Pmsk L4

20304

START_SEC

Pmsk L4

3173
3174

736+#
736+4
736+4
736+4
749+4
750+#

3206
3207

46184
46194
7640+4
740+4
740+4
740+4

23414
23424
L6434

L64L4H

23414
23424
46434

LO44M

754+4

742+4
742+4
742+4
7420+4
755+#
756+#

38634
I86LH

38654
38704

753+#4

47354
47364

47354
47364
744 +8

744+4
744+8

744+4
757+#
758+#

I878#4
38754

746+4
766+4
746+4
746+4
759+#
760+#

748+#4
748+4
748+#
7L48+4
761 +4
762+#

IB8LH
28854

3889
3890

Pmsk L2

SEQ 0304

Pmskl3

5411
5412

5443
5444

N —

36274
3628#

v
v
NN

OO
oWV ON0

Pmsk L2

Pmsk
4

SUPRE S_MSG

—

Pmsk L&

SUM_MOST

Pmsk L4

Pmskl3

SW_BUG_MSG

Pmsk L4

SYS_HWTBL

4
Pmsk

S_BLAST_TBL

Pmsk L4

X
UF
_ INDE
S_B

Pmsk L4

S_CHIP_TBL

Pmsk L4

S_COLUMNS

Pmsk L4

S_COL_CNT_TBL

Pmsk L4

S_ERRCR_MAP

Pmsk L4

S_REM_TBL

Pmsk L4

S_ROWS

Pmsk L4

T$$TAG

Pmsk
2
Pmsk
3
Pmsk L4

T$CODE

Pmsk L2

Pmskl3

Pmskl
4

3435+
3436
4019«
4020+

3470%
3471
3717
3718+
3773
3774
3630+
3631
3559+
3560
306+
306+
306+
306+
319+
320+
341+4
341+4
897+
897+
1381+
1381+

341+4
341+4

897+
897+
1381+
1381+

354 +#
355+4
910+
G111+

54234
54244
4228

5488
5489

22954
22964

2296
2297

4229

4895
4,896

3688
3689
4525

4933
4934

23124
2313
5324
5325

Pmsk L2

SWTBLS_RET

wall el

Pmsk L4

4526

4520

4521
4530
4531
3690
3691
312+
312+
312+
312+
325+
326+
865+
865+

1330+
1330+
1386+
1386+

865+
865+

1330+
1330+
1386+
1386+

878+
879+

1343+
1344+

LLB+a
LLB+H
LLB+H
LLB+A

LE1+4
LE2+M

868+
868+

476+

476+
476+

476+
489+
490+

1409+

876+
876+
1340+
1340+
1411+
1411+
876+
876+
1340+
1340+
1411+

881+
882+
1351+

889+
890+
1353+

1338+
1338+
1409+
1409+

868+
868+

1338+
1338+
1409+

1352+

1411+

1354+

489+
489+
489+
489+
502+
503+
880+

880+

1349+
1349+

1416+
1416+

880+
880+

1349+
1349+
1416+

1416+

893+
894+
1362+

1363+

509+
509+
509+
509+
522+

523+
892+
892+
1373+
1373+

1434+
1434+
892+

892+
1373+
1373+

1434+
1434+
905+
906+
1386+

1387+

896+
896+

1377+
1377+

896+
896+

1377+
1377+

90+
910+
1390+

1391+

T$FREE

TSHIL
M

TSLOLIM

TSPTHY

T$RAP

T$RAPRO

TSTEMP

391+

Pmski3

391+

Pmsklé

404+

Pmskl2

1243+#

Pmskl3

1243+#

Pmskl4

1256+#

Pmskl2

1244+#

Pmsk(3

1244+4

Pmskl4

1257+4

Pmskl2

4071+#

Pmskl3

401+#

Pmsklé

414+4

Pmskl2

241+

Pmskl3

241+

Pmskié4

254+

Pmskl2

305+

Pmskl3

305+

Pmskl4

318+

Pmskl2

340+#

Pmskl3

340+#
3

4
4

Pmsk L4

3
3
3

573+

583+
583+
583+
583+
596+
597+

1338+

1340+
1340+

866+
866+

877+

1338+
1474+
1474+

1338+
1338+
1474+
1474+
879+

880+

1351+
1352+

877+
1340+
1340+

890+
891+
1353+
1354+

1434+
1435+
1446+

1447+
1448+

613+
613+
613+
613+
626+

674+
€75+
893+
893+
1377+

629+
629+
629+
629+
- 642+
643+
665+4
665+#4
665+#
665+#
678+4
679+4
894+
894+
1410+
1410+

1411+
1411+

893+
893+

894+
894+

895+
895+

SEQ 0305

1446+
1446+
1446+
1459+
1460+

ol
el anld el

1449+

1462+
1463+

1442+
1442+
1442+
1442+
1455+
1456+

491+
491+
491+
491+

877+
877+

)
i

1449+
1449+
1449+

el
ol

1447+
1447+
1447+
1447+
1460+
1461+
1440+
1440+
1440+
1440+
1453+
1454+

PR SR R oF o F F 2P o
- =000 0onN

S
R

D
e
e

Pmskle

}

Pmsk L4

}

Pmsk 3

Pmsk (2 i

—

TSEX(P

S NWWWN
S &
OO 0000 0omMNNY
MU - 00 0o Co Co \W &~

504+
505+
878+
878+
1374+

1374+

878+
878+
1374+
1374+

891+
892+

1387+
1388+

593+

593+
593+

593+
606+

607+
511+

511+
511+
511+
524+
525+

603+
603+
603+
603+

616+
617+

647+
647+
647+

879+

647+
660+
661+
880+

1375+
1375+

1376+
1376+

879+
879+

1375+
1375+

880+
880+
1376+
1376+

892+

893+

879+

893+
1388+

1389+

880+

894+

1389+

1390+

627+

661+
661+
661+
661+

1377+

760+

760+
760+

760+
773+
774+

895+
895+

1377+
1377+

1410+
1410+

1411+
1411+

906+
907+
1390+
1391+

908+
1423+

907+

908+
909+

14264+

1424+
1425+

858+#
858+#
858+#
858+#
871+#
872+#

896+
896+
1412+

1412+

896+
896+
i412¢

1412+

905+

910+
1425+
1626

1487+

)

TBL

1488+

Pmsk 2 i
Pmskl3

Pmskl4

2525

1488+
1489+

SEQ 0306

Pmsk L& i

| TBL_INDEX
TEMP

Pmskl4

3381

TEMP_ARRSBNK
_SEL

Pmskl4

2272

2540
2541

2613
2614
3414
3415
2341
2342
2861

2862
3066
3067
4617

4618
4914
4915

TEMP_TSTED_BNK

Pmskl4

5551

TEN_MS

Pmskl4

16314

THREE _MSG

Pmskl4

20614

TIME

Pmsk
2

2617
2876
2877
3094
3095
4643
4644

4915
4916

2567
2568

2570

2584
2585

2585
2586

3429
3430
2641
2642
2891
2892
3127
3128

2646
2647
2906
2907

2742
2743
2936
2937

2790
2791

2801
2802
4561
4562
4843
4844

4928
4929

4519
4730
4731
5552
5553

4538
4539
4735
4736

4039
4040

4676
4677
4923
4924

2571

4518

4481
4482
4723
4724

2951
2952

55754

2967

55764

5589
5590

5595
5596

Pmsk L4
TIME_OUT_MSG

Pmskié4

20484

TMP_BLST_TBL

Pmskl4

1981

TRAP

Pmski2

108+

3133
3134
3907#
3908#
287+4
287+4

3136
3137
39134
39144
294+
294+

B24+4
824+4
287+#
287+#4

852+#
852+#
294+
294+

B24L+A
B24+4
300+#
301+4

852+#
BS52+#
307+
308+

738+
738+

108+

738+
738+

Pmskléd

4037
4038
34274
34284
2616

2554
2555

Q4+

Pmsk L3

Pmskl3

2553
2554

121+

751+
752+

7640+
740+

740+

753+
754+

36964
36974
39164
39174
301+
301+
742+
762+

36974
36984
39194
39204
526+
526+
744+
744+

855+#4
855+4
301+
301+

858+
858+
526+
526+

855+#
85S5+#
314+
315+

858+
858+
539+
540+
757+

742+
742+

755+
756+

744+
744+

758+

36984
36994

37044
37054

37054
37064

37064
37074

665+#
665+4

673+
673+

681+#
681+4

689+#
689+#

665+#
665+#

673+
673+

681+4
681+4

68G+#
689+4

678+4
679+4

686+
687+

694 +4

702+4

760+

762+

770+

746+
746+

759+

748+
748+

761+

756+#
756+4

756+4
756+4

695+#
TE9+4

787+#4
787+#4

787 +#
787+#

703+#
800+#
BO1+#

TRUE

Pmsk
4

TSTED_BNK

&
Pmsk

L TSTAMS

5289
5290
989+
969+
089+
989+

Pmsk
2

Pmsk (3

Pmsk L4

TYP

Pmsk (2

868+#
869+#

871+
872+

54944
54954

55C4#
5505#

1002+
1003+

Pmsk
4
TWO_MSG

—_—

Pmsk
&

. TRT

B6S+#4

866+#

(o AV,]

4
Pmsk

837-4
838+#

829+
830+

viLn

TRE

821+#
B22+#

Pmsk(3

UAM

7+
7+

N ONNNN

wud
i

b
b

i
b

o
b

e
e
e

4+
+
4+
+

—

Pmsk
4

PN
= = =3 =
NS
= i d

wul

Pmsk (3

Pmsk
2

TYPE

ad cid anld cnl

4
Pmsk

7+
7+

0+
1+

Pmsk L2
Pmsk L3
Pmsk L4

UNC

Pmsk L4

UNC_CHIP_MSG

Pmsk L4

UNC_ERR_MSG

Pmsk L4

UNIT

Pmsk L2

Pmsk(3
Pmsk
4

UNIT_SEL_MSG

Pmsk L4

UNS

Pmsk L4

UNX_DRV_ERR_MSG

Pmsk L4

VALUECBIT

Pmsk (2

Pmsk (3
Pmsk L4

803+
803+
803+
803+
816+
817+

2408
2409
301+
301+
301+
301+
314+
315+

R4+

804+
804+
804+
817+
818+

2446
2447
787+
787+

787+

800+
801+

2459
2460
824+
824+
824+
824+
837+
838+

2495
2496
852+
852+
852+
852+
865+
866+

2508
2509

SEQ 0307

551 5 14
551164

5574
5575

5607
5608

5620
5621

e
——

R—

————

| VECADD

Pmskl2

|
|
|
|

Pmskl3

669+

669+
669+
682+
683+
5619

684+

685+

684+

685+

2405
2406

4638
4639

684+
684+
697+
698+

SEQ 0308

685+
685+
698+
699+

Pmsklé

668+
668+
681+
682+
5211+

VER_ERROR_MASK

Pmsklé

5289+

Pmskl4

17664

wCE

Pmsklé

WC_PRINT

Pmsklé

2079%#

WC_REG

Pmsklé

17314

2240

2267

2377

2438

2487

WRD

Pmskl4

1701#

2305

2306

2307

2352

2641

WRD_CNT

Pmskl4

2209

2303

Pmsklé4

| VER_BLAST

668+

WRD_ INDE X

Pmskl4

5212«

5290+

17674

1744#
1745¢

20804

173248

1702#

2210

5620

5621

2386
2387
2174

2175

2241

2306

2304

4810

4819

3033

3081#

4811

3034

3811
3812

4820

3082#

38464
38474

1968

22044

Pmsklé

2356%

4617

WRT_PROM_MODE

Pmsklé4

21344

5135

WRT_RH

Pmsklé

WRT_BUF

Pmskl4

WRT_CHK_TRANSFER

1969
2641
2642

2357«

21354

2349

2352

3083

3169

3084

3892
3893

22054

2352

2353

32084

2642

2657

2658

4619

4648

2658

4747

4756

2659

2658

2659

3210

3215

3941
3942

3949
3950

3216

4620

4748

3227

4649

4757

3228

3229

2306

2307

3170

3209#

3211

22064

2213

2297

2298
4648
4649

2306
4651
4652

2307
4756
4757

2308
4788
4789

3928
3929

22064
2661
2662

22074
3077
3078

3937
3938

2214
4618
4619

2305

3953
3954

5136

2133

2135

2137

2139

2141

4080

40N

5156

5157

5185

5186

5254

5272

5491

21094
2147
2148
2270
2271
2380
2381
4081

2417+«

WT_CHK_XFER_MSG

Pmskl4

2054%#

Pmsklé

2136

2418+

2053#

2123
2149
2150
2305
2306
2437
2438
4092
2447

2460

20554

2391

Q7+#

G7+#
97+4

5157

2661

2642

2448

2150

2124
2239
2240
2306
2307
2438
2439

2641

20544

S}zg

4651

4652

4779

4788

3233

3234

4780
3234

2341

2342
4819
4820

4789
3235

4618

2128

Pmsklé

Pmsk(3

2351

2353

2488

2123

WRT_XFER_MSG

Pmskl2

2348

2308

2439

2122

Pmskl4

XSALWAYS

2307

2378

21084

WRT_TRANSFER

22054
26584
26594

2268

2390

2137

2138
1265+
1265+
1265+

2129
2240
2241
2307
2308
2439
2440
5158

2134
2241
2242
2342
2343
2440
2441
5186

2136
2242
2243
2343
2344
2441
2442
5187

2138
2243
2244
2344
2345
2486
2487
5255

2140
2266
2267
2376
2377
2487
2488
5273

2142
2267
2268
2377
2378
2488
2489

2143

2145

2144
2268
2269
2378
2379
2489
2490

2146
2269
2270
2379
2380
2490
2491

2147

2148

5492

2662

2461

2409
2410

2138

2139

2140

2140
2141

2141

2142

2144

2145

2146

2147

2148

2149

Pmsk L4

X$F
AL SE

SEQ 0309

Pmsk
2

3
Pmsk
Pmsk L4
XSOFFSET

Pmsk L2

Pmskl3
Pmsk L4
X$TRUE

Pmsk
2

85+
99+

Pmsk(3
Pmskl4
XSXFER_SKIP

Pmsk
2
Pmsk (3
Pmskl4

XFER

Pmsk
2

Pmsk (3
Pmsk L4
XFERF

Pmsk 2

Pmsk(3
Pmsk L4
Pmsk L2

Pmsk(3
Pmsk
4
X_MSG

Pmsk L4

X_PRINT

Pmsk L4

X_TMP_BLST_TBL

Pmsk L4

X_TO_REM_TBL

Pmsk L4

YES

Pmsk L2

Pmsk L3

1547
1547

XFERT

——

Pmsk L4
ZERO

Pmsk L4

2636
2637

3067
3068

3077
3078

3078
3079

3083
3084

3192
3193
3892
3893
4238
4239
4450
4451

15534

4978
4979

ZEROES

Pmsklé4

3205
3929
4319
4320
4462
4463

3210
3211
3937
3938
4323
4324
4703
4704

3216
3941
3942
4336
4337
4704
4705

3465
3949
3950
4365
4366
4717
4718

3509
3953
3954
4369
4370
4895
4896

3580
4074
4075
4381
4382
4897
4898

3676
4126
4127
4405
4406
4904
4905

3680
4235
4236
4409
4410
4910
4911

3861
4236
4237
4422
4423
4935
4936

254

2554

2569

2570

2585

2599

2613

2790

4592

4596

4602

4642

4723

4918

5136

4979
4980

4996
4997

5002
5003

5019
5020

5025
5026

5042
5043

5048
5049

5061
5062

5067
5068

3875
3 _SEQ 0310
4237
4238
4446
4447
4974
4975
5078
5079
3764

2614

2791

3765

5137

5244

5454

5243

5453

| PSECT Storage Map

$OWNS
$PLITS
EXXX$

034224

073262
077712

037036
004430
000324

$XYZ$

100236

000010

ABS.

100246

000000

File

Module

Ident

002000
002200
002474
002542
002704
003034
003352

000200
000274
000046
000142
000130
000316
030652

PMSKL2
PMSKL3
B16ROT
B16PG2
B16PG4

BSKELZ
BSKEL3

073262
073724

000442
003766

PMSKL3

BSKEL3
BSKEL&

077712

100010
100116

000076
000106
000120

B16SAV
B16PN1

100236

000010

LSTAD

B16MUL
PMSKL&

PMSKL4&

RANDOM

B16ROT

B16PG2
B16PG4
B16MUL
BSKEL4

RANDOM

Length

032224

/Start

< NSO
<

002000
002000

Length
000000

RONNON
D 0

! $CODES

LoC

Mes
o

Name

SEQ 0311

Map of Global Symbols
Name
Value
PSECT
Module ABS value
$SAVE2 000000 $xxx$ B16SAV 100010 $CCODES

$SAVE3S 000014 $xxx$

$£SAVE4
$SAVES
BLSDIV
BLSGT1
BL$GT2

000032
000052
000224
000000
000000

BLSMOD 000236
BL$PU2 000000
BLSSHF 000250
L$SAU
000264
L$AUTO 000240
LSCLEA 030642
LSDESC 000036
LSDLY
000116
L$DU
000252
L$DVTY 000000
L$HARD 000070
LSINIT 027776
LSLAST 0CO004
LSRPT
000226
L$SOFT 000214
LSUNIT 000012
RANDAT 000074

$xxx$
$xxx$
$CODES
$xxx$
$CODES

B16SAV
B16SAV
B16MUL
B16PN1
B16PG2

$CODE$ B16MUL
$CODES® B16PG4
$CODES B16MUL
$CODES BSKEL3
$CODES® BSKEL3
SCODES BSKEL4
$CODE$ BSKEL3
$CODES$ BSKELZ2
$CODE$ BSKEL3
$CODE® BSKEL3
$CODES BSKEL3
$CODE$ BSKEL4
$xYZ$ LSTAD
$CODE$ BSKEL3
$CODE$ BSKEL3
$CODE$ BSKELZ2
$xxXX$ RANDOM

RANGEN 000000 $xxX$

SEED1
SEED2
SEED3

B16SAV 100024 $CODES

000066 $xxXxX$
000070 $xxX$
000072 $XXX$

100042
100062
003260
100116
002542

003272
002704
003304
002464
002440
034214
002236
002116
002452
002200
002270
033350
100242
002426
002414
002012
100006

$CODES
$CODE$S
$CODE$S
$CODES
$CODES
$CODES
$CODES
$xxx$ ,$CODES
$CODES
$CODES
$CODES
$CODES
$CODES
$CODE$S
$CODE$
$CODE$S
$CODES
$CODES
$CODES
$CODES
$CODES
$CODES

RANDOM 077712 $CODE$

RANDOM 100000 $CODES
RANDOM 100002 $CODE$
RANDOM 100004 $CODES

T$PTHV 000000
LSTAD
000000 $CODE$
T
030530 $CODES® BSKELS 034102 $CODES

SEQ 0312