Digital PDFs

MAINDEC-15-D1C0-D

June 1970

98 pages

Original

3.1MB

Document:	PDP-15 Extended Memory Test
Order Number:	MAINDEC-15-D1C0-D
Revision:
Pages:	98
Original Filename:	http://bitsavers.org/pdf/dec/pdp15/diag/MAINDEC-15-D1C0-D_PDP-15_Extended_Memory_Test_Jun70.pdf

OCR Text

IDENTlrICATfON
pRODUCT CODE.

MAiNOEC~1'·D1COwO

PRODUCT NAMEI

POP.15 EXTENDED MEMORY TEST

OATE PROOUCEO'

JUNE 1,197'

MAINTAiNEA'

DIAGNOSTIC GROUP

,UTHOR,

KOL~[R

'I\~

~V
~

(

'<."'1

PAGE 1
L,

ABSTRACT
THE PDP-15 EXTENOED MEMORV TEST C~ECKS rOR CORRECT OPERATION
nr T~E SySTEM WHE~ OPERATING WtT~ EXTENDEO MEMORY, T~E
PROGRAM CAN TEST A SySTEM WIT~ A MAXIMUM CO~rIGURATION
or 32K Of CORE STORAGE, fOR EACH PIE~O/p'GE (4K) Or STORAGE
IN THE SySTEM THE PROGRAM CHECKS POR CORRECT OPERATION Of
KEY iNSTRUCTIONS. A~O rOR CORRECT OPERATION or T~E
INTERRUPT SySTEM, API SYSTEM. ANO AUTOeINOEX fEATURE,

REQUIREMENTS
- .
....

!,1

_----- ... _-

EQUIPMENT

- .----.,--~

A.
B.
C.
~.2

STANOARD POPe15 WITH AT ~EAST SK Of CORE ~TORAGE,
PROGRAM LOAD DEviCE (ASR3J/35 TELETyPE OR ~IGH SpEEO
READER),
THE PDP~1' TELETYPE MUST BE OPER.TloNAL AS IT IS REQUIRED
rOR pROGRAM TYPEOUTS~

STORAGE
~---

.. --

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

ALL PROGRAMS REQUIRED TO INSURE CORRtCT O~ERAT%ON Or
tHE BASIC PROCfSSOR MUst HiVE BEEN RUN SUCCESSrU~LY.
LOADING
PROCEOURE
..
p----~---~---~--~

LOAD THE OBJECT tApE IN T~[ TELETYPE REAOER, OR IN
THE HIGH SPEEO READER If T~£ SYSTEM HAl SUCH AEAC~R.

SET ADDRESS SWItCHES TO 11700,

SET BANK SWITCH TO ON POSITION,

PRESS "RESET"

PRESS "REAO IN"

THt ~ROGRAM WILL LOAO AND HA~T WITH AO-17'777 ir
PROGRAM LOADED CORRECTLY, Ir PROGRAM H.LTS WIT~ AO,0,
A CHECKSuM ERROR HAS OCCURRED, REPEAT THE LOAOINC
PRocrOURE.

PAGE 2
4.

uSE PROCEDURE
- __- ----!I'--.--

tHE PROGRAM IS MADE uP or INDIVIDUAL TEST RouTINES
NUMBERED fROM 00 THROUGH ~61 (OCTA~). THESE TESTS
iRt RUN THROUGH SEQUENTIA~LYt EACH TEST IS REPEATED 4096
tIMES BErORE THE PROGRAM PROCEEDS TO EXECUTE THE fOLLOwING
TEST ROUTINE.
TH£ sUCCrSSfUL EXECUTION or THE SET or ROUTINES IN THE
PROGRAM CONSTITUTES A PROGRAM PASS. COMPLETION Of A pROGRAM
PASS IS INDICATED BY A SINGLE RING or THE TELETYPE BELL.

THE PROGRAM IS CONTINUOUS RUNNING, T~AT IS, AT THE
COMPLETION Of A PROGRAM PASS THE PROGRAM REPEATS ITSE~;,
UNTIL STOPPED BY TME USER,
RErER to SECTION 9.3~ tEST ROUTINES DESCRIPTioN, rOR THE
NUMBERS ANO DESCRIPTIONS Or T~E T[STS THAT MAKE uP THE
PROGRAM.
~HE USER MAY CONTROL EXEcutION or THE PROGRAM WITH THE
AC SWITCHES (ACS) AT ANY TIME, AS PO~LO~SI

ACS0=1

ROUTINE~ENO~HALT. WITH Aese SET TO A 1 THE
PROGRAM HALTS AT LOCATION e0516 APTER THE ROuTINE
CVRRENT~Y BEING EX£CUT~O IS COMP~£TEO, THE
AC DISPLAYS THE NUMBER Of THE OOMP~ETEO ROUTINE,
THE PROGRAM wILL NOT HALT IP ACS1 IS SET TO A 1.
APTER PRESSING CONTINUE, THE PRoGRAM PROCEEDS
TO EXECUTE THE FO~~OW1NG ROUTINE. THE AOUTIN[@
ENO~HALT fEATURE IS US£PUL IN 'iNOtNG OUT ~o~
rAR THE PROGRAM HAS PAOGRESSEO. OA T~ ADVANCE
THE PROGRAM ONE ROUTINE AT A TIME ~RIOR TO
~OOPING ON A ROUTINE.

AC51=1

LOOP-ON~ROUTiNEt iHE OURRENT ROuTINE IS
REPEATEO CONTINUOUS~Y UNTl~ 405. IS TURNEO Ofr,
ACS1 MUST 8£ orr B[PORE THE AOUTINE~ENO~HA~T
OPTION (AC50) Is A6CEPTED BY THE PROGRAM~ THE
LOOF~ROUTINE OPTION CAN BE USEfU~ WHEN rROU8LE~
sHOorlNG HIGHLV INTERMlyrENT ERRORS,

1C52=1

SCOPE-LOOP, THiS OPTION CAUSES tHE ERROR TYPEOUT
ANO HA~T PEATURE TO BE eYP.SSEO TO PERMIT SeePING
wHEN A rAI~URE OCCURS, T~%S OPTION S~OU~O NOT BE SET
uNTIL A~TER AN ERROR HAS OCCURRED, W~EN t~E OP~ION
IS SET, T~E LOOP~ON~ROUTINE OPTiON (A091) SHOULD ALSO
BE SET TO PREVENT THE PROGRAM rROM ENDING THE rEST
ROUTINE AfTER 4096 TESTS ~AVE 8£EN PERPORMED.

HAAOWARE ERRORS ARE INCICATED BY ERROR P~INTOUTS rOLLOWED BY
A HALT, ~E'ER TO S~CTION 6, ~RRORS. 'OR • COMP~ETE
OEseRI'TtON 0; ERROR REPORTING AND T~E PROOEDURE TO FO~LOW
WH.N [RAOR OCCURS'.'

PAGE 3
4.1

~TARTING ~ROCEOURE

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

A.
It

SET ADDRESS SWITCHES TO ~0210
pRESS REsETJ ~RESS START
THE pROGRAM TYPES THE fOL~OWING MESSAGE AND THEN HALTS,
"PO~;1' EXTENDED M[~ORY TEST
SET ACS 3-5 TO NUMBER Of AOOITIONA~ EXTENDED MEMORy PAGES
(ONE ~AGE-4K). If SYSTEM HAS APt, SET ACS 6 TO A 1,"

SET THE AC SWITC~£S ACCORCING TO TYpED INSTRUCtIONSANO PRESS
CONTINUE. If you WISH TO BYPASS STEp C P~INTOUT, PERfORM
STEP 0, AND START PROGRAM AT ~OC Ze2m3,
••• NOTE •••
SET ACS 3-5 TO THE EXACT NUMiE~ Of EXTENDED MEMORY PAGES,
SETTING THE SWITCHES TO A NUMBER ~~SS THAN THE ACTUAL NUMBER
or PAGES WiLL Noi +EST THE SySTEM CONCLU5IVELY~ sEtTING
A LARGE~ NUMBER wILL CAUSE THE PROGRAM TO rAIL.

THE PROGRAM ~EAOS AND OHECKS T~E AC SWITCHES. If ACS 3~5
4~f SET TO 110 THE ~ROGRAM TYPES THE rOLLOWING MESSAGE
AND THEN HALTS. If ACS 3-5 ARE NOT 0 PROGRAM GOES TO
STEP G,
"AOS 3~' INCORRECLTY SET, OR SYSTEM DOES NOT HAVE AT LEAST
or CORE.

r.
G.
H.

if STEP [ tYPEOUT OCCURS, SET ACS 3~5 CORRECTLY ANO PRESS
CONTINUE. STEP E WiLL BE REPEATED,
THE PROGRAM RUNS CONTINUOUSLY UN~ESS ERRORS OCCUR. AT THE
ENO or EACH PROGRAM PASS THE TELETYPE BELL RINGS ONCE,
AC SWITCH OPTIONS MAY BE SET AT ANY TIME,
CAUTiON' 00 NOT sET SCOPE~~OOP OPTION UNLESS T~E ~OOP~
ROUTiNE OPTION IS A~SO SET,
THf PUNCT!ONS Of T~E AC SWITCHES ARE REPEATED ~ERE rOR
QUICK REfERENC£1

ACS0=1
-0

ACS1=1
-0

AC52=1
=0

HALT AT END of ROUTtN~
00 NoT HALT AT END or ROUTIN[
LOOP ON ROUTINE
00 NoT ~OOP ON ROUTINE
SCOPE ~OOP
NO SCOPE LOOP

ACS3;5

sET TO NUMBER or AODITIONA~ fxTEND~D MEMORY pAGES

AC56-1
-0

API IN SYSTEM
NO API IN SYSTEM

PAGE 4

OPERATING PROCEDURE

',1

PRQCRAM ANO/OR OPERATOR ACTION

5 .. 1.1

NOR'MAL HALTS ANO

OESelfipfION

loe 00511

COMMON HALT. THIS HA~T IS USED rOR THE ROUTINEENO~HAlT OPTION, AND ArTER AN INSTRUCTION
TYPEOUT. TO PROCEED ArTER A ROUTINE-ENO-HALT,

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

PREss gONTINUE,

w~EN

THE HALt OCCU~S APTER.

AN INS'RUCTtONA~ MESSAGE. ~ER'ORM THE REQUIRED
ACTION AND PRESS eONTINU£.

(RRORS
ERRORS DETECTED BY THIS P~OGRAM ARE INDICATED BY ERRoR
PRiNTOUTS. AFTER AN ERROR PRINTOUT T~E pROGRAM HALTS
AT A CO~MON ERROR ~ALT AT LOC 00602.
ERROR PRINTOUTS CAN TA~E ONE OF THE FO~LOWING FORMS:
"ERROR LOC XXXXXX AC=YYYYYY TEST Z00~~~"
OR
~CALERR LOC XXXXXX Acayyyy~y TEST 000~~~"
AN "ERROR" TyPE PRINTOUT OCCURS WHEN A TEST ROUTINE DETECTS
A PREDtCTAB~E ERROR fOR w~iCH IT IS TESTING.
A "CALERR" TyPE PRINTOUT OCCURS WHEN DURING A TEST RoUTINE
A FAILURE OCCURS WHICH CAUSES THE SYSTEM TO "CAL OUT".

iN 80TH PRINTOUT CASES THE PRINTOUTS HAVE THE POLLOWING
MEANINGS.

LOC xxxxxX

ACayyYYYV

INDICATES THE ADDRESS Of A CAL~ TO SUBROuTINE
"ERR" IN T~E CASE OF AN "ERROR" PRINTOUT. OR
THE AODRESS FROM WHERE THE pROGRAM "CA~ED OUT" IN
THE CASE Or A "CA~ERR" PRINTOUT.
INOIDATES THE CONTENTS 0' THE AC AT T~E TIME THE
OCCURRED. THE CONT£NTS OF THE 4C MAY OR
MAv NOT BE MEANIN~rU~, O£P~NOtNG ON THE tEST

rAI~URE

ROUTtN£~

TEST 000~l2

INDICATES THE NUMBER Of THE TtST ROUTINE BEING
EXECUTED AT THE TIME THE fAi~URE OCCURREO.

WHEN AN "ERROR" TYPE PRINTOUT OCCURS,
A.

iN THE PROGRAM'S ~iSTING, RErE~ TO THE LOCATiON s~EcirtEo
BY THE PRINTOUT. OPPOSITE THAT ~OCATI0N THE STATEMENT
"ERROR" OR "ERRORA" WIL~ at PRINTED. Ir THE "ERRoRA" STATE~
MENT APPEARS, IT SP£CI~tES THAT THE CONTENTS or THE
AC P~tNTEO OUT ARE MEANINGPUL.
DOUB~E

CHECK THAT THE LOCATION PRINTED IS WITHIN THE TEST

~O~TJNE S'EClrlEO BY THE "TEST 00BI~!" p~RTION Or THE

pRINTOUT.

THE COMMENTS PORTION Of THE "ERROR" STATEMENT WIL~
CONTAIN THE OESCRIpTIO~ POR THE eRRoR.

AT THE BE~lNNrNG or THE T£5T ROUTINE A DESCRIPTION Or
THE TEST WIL~ 9E P*lNT£D.

(6, CONTID)
~HEN

A.
B.
C.

A "CA~ERR" TVPE PRINTOUT OCCU~S,
IN T~E PROGRAM ~ISTtNG, RErER TO T~E TEST ROUTINE
REFERENCED BY T~E "TEST 000~~l" PORTION OF THE PRINTOUT,
AT T~E TOP or T~£ TEST ROUTtNE A DESORIPTION OF THE
TEST WI~L BE ~RINTEO.
ANALySIS Of THE ROUTINE, AS WE~L AS STEPPING T~RoUG~
tHE ROUTINE IN "S!~G~E INSTRUOTION" MOOE S~OU~O GIVE
CLUES AS TO ~OW THE ERROR IS OCCUR~ING,

PACE ..,
7.

RESTRICTIONS
.
-

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

AT LEAST DURING INITIAL TESTING or T~E SYSTEM, ACS 3-' MUST
AE 5[T TO CORRESPOND WiTH THE ACTUAL NUMBER or ADDITIONAL
~XTENDED MEMORY PAGES (1 MEMORY PACE • 4K). SETTING THE
SWITCHES To INDICAT£ A LESSER NUMBER OOES NOT PROV[ THE
SYSTEM CONCLUSIVELY, SETTI~G A LA~GER Nu~BER WILL CAuSE
THE PROGRAM TO fAIL.
THE PROGRAM WILL NOT RUN ON A ~K SYSTEM, IT ASSUMES A
MINIMUN Of 8K O~ CORE STORAGE,

MISCELLANEOUS

S.1

£X[CUTiON TIMES

-,..--------- ...

-- ..

--~------

.. -...

THE fOLLOWING EXECUTION TIMES ARE GIVEN ~OR A SINC~E
pROGRAM PASS, ASSUMING A MEMORY CYCLE TIME or 800 NANOSECONDS,
8K,NO API
8K AND API
12K,NO API
12K AND Aft,
16K,NO AP'
16K AND API
201(,NO API
20K AND API
241(,NO API
24)( AND API
28K,NO API
28K AND API
32K,NO API
321< ANO API

- ., SECONDS
SECONDs
~ 14 SECONOS
- 15 SECONoS
'" 24 SECONDS
'" 26 SECONDS
~ 32 SECONDS
~ 35 SECONOS
- 42 SECONDS
- 46 SECONOS
53 SECoNOS
- 8

l'"

56 SECoNOS
- 63 SECONOS

'!t

6" S£CONOS

PAGE 8
9.

OESCRIPTIONS
...--------~--

.9 1
1

TERM O[F"lNITIONS

,.--.-.--- .... _-- . .,

F"lEL00 .. L.OCATIONS 00000 T~ROUG~ 01777
F'IEL01 .. L.OCATIONS 102100 T~ROUGH 11777
rtELo2 .. l.,OCATIONS 20~00 T~ROUGIoi 2"777
F'IEL03 ... 1..0CATIONS 3021210 T~ROUG~ 31777
F'IEL04 .. LOCATioNS 4021210 T~ROUG~ 4'777
rIfl05 .. L.OCAT!ONS 50010 TIo/ROUGH "777
F'IEL06 .. L.OCATIONS 621~00 TIo/ROUGH 6'777
rIEL07 ~ 1.0CATiONS 7002121 TMROUGIoI 117"
locr0 ,.. Loe 061021
LOeF'l ... Loe 1~21210
~oct2 .. LOC 260021
Loer:! - LOC 36000
Locr4 ... 1..0C 46211821
locr5 ... I.oe 562100
LOCF'6 .. Loe 660121
LOCF'7 ... Loe 1618210
F'0LOC - LOC IN F'IEl,.D 0 TO INOJREC'fI.Y REF'ERENCE LOCP0
F'lLOC - LOC !N F'IEL.D 21 TO iN01~ECTLY RErERENcE LOC,1
F'2LOC - LQC IN F'IEL.O 0 TO INDIRECTL.Y 'U:F'EREN~E LOC'2
TO INOIRECTl.Y REF"ERENCE I..OCPJ
;31..0e - 1..0(: IN ;IEI.O
F'4LOC ... l.OC IN F'IEL.O Ii TO INOSA[O'I..Y R£F'EREN~E LOCF'4
F'5LOC ... lOC iN r:'IEI.O 21 TO iNO!AECTt.y RErER£NCE Loer5
l.QC IN F'1£1.0 21 TO t NO I REon. y R£"[R£N~E 1.0e'6
f"6l.0C
TO INDIRECT!..Y REF'ERENCE LOC,y
F'7L.OC .. Lee IN F"IEL.O

I!'!'

PAGE 9
1,2

PROGRAM STATEMENTS DEFINITIONS
_

---------.---~-----.-"---~---~

THE fOLLOWING STATEMENTS APPEAR THROUG~OUT THE PROGRAM'S
TEST ROUTINES. THEIR MEANING 15 OESCRIBEO HERE,
ERROR ~ CA~l TO AN ERROR SUBROUTINE WHOSE 'URPOSE IS TO
GENERATE AN ERROR PRINTOUT ANO HALT, T~E SUBROUTINE
R~TURNS TO NExt INSTRUCTION APTER THE SUBROUTINE
CALL,
CHAIN ~ CALL TO CHAINING SUBROUTINE WHOSE fUNCTION IS TO
CONTROL PROGRAM S[QUENCE, ANO ~ONOR ACS OPTIONS. If
ROUTINE HAS NO; BEeN COMPL[T£O. THE SUBROUTINE
RETURNS TO THE NEXT INSTRUCTION APTER SUBROUTINE
CALL.
TF2

Tf3

SAME AS T~2,
SAME AS Tr2,
~ SAME AS Tf2,
- SAME AS T'2,
SAM[ AS TP2,

TF3

tF5
TF6
TF'
CKAPI

STPN

CALL TO SUBROUTINE WHOS! rUNCTION IS TO DETERMINE if
MEMORY rIE~D 2 IS PRESENT, IP THE rIE~O IS PRESENT
THE SUBROUTINE RETuRNS TO THE NEXT INSTRUCTION AFTER
THE SUBROUTINE CALL, If THE PILLO IS NOT PRESENT THE
TEST ROUTINE II BYPASSEO.

BUT CHECKS POR fl£~O 3.
BUT CHECKS rOR PIE~O 4,
BUT CHECKS PCR fIELD ,.
BUT CHECKS 'OR ~IE~O 6,
BUT CHECKS rOR PIElD '.

CALL TO SUBROUTINE WHOSE rUNCTloN IS TO DETERMINE IF
API IS PRESENT IN THE SYSTEM, IF API IS PRESENT, THE
SUBROUTINE RETURNS TO TH£ INSTRUCTION AftER THi
SUBROUTINE CA~L. If '~I IS NOT pRESENT, THE TEST
ROUTINE IS ByPASSEO,

• CALL To SUBROUTINE WHOSE PUNCTION IS TOI
A. StT EAC~ AVAl~AB~f ExTENDEO MEMORY fIELD TO 0'S.
(FIELDS 1 THROUGH 7),
Bt ~ERO OUT LOCATIONS 06010 T~ROUOH 01771 OF rIE~O 0,
c, SEt lOCATION 6000 or EACH MEMORy tlELD TO ITS OWN
NUMBER, (6e00 Of rlELO 1 IS SET TO A i. ETC,,),
UPON COMPL(TION THE sueAOUTINE RETURNS TO THE
INSTRUCTION rOLLOwiNG THE SUBROuTINE CALL,

MOVE

- CALL TO SUBROUTINE WHOS£ fUNCTIoNS IS TO MOVE A
vARIABLE LENGT~ WORD STRING PROM ONE AREA 10 ANOTHER.
THE SUBROUTINE CALL FORMAT IS;
MOVE
xXXX
yyyy
.. i~li
NSf

IJMS To MOVING SUBROUTINE
IINITIAL ACORESS TO MOVE "fROM",
IINITIAL AODRESS TO MOVE "TO",
/NUMB[A or WOROS TO MOVE (COMP~EMENTED)
IINSTRUCTION T~AT SUBROuTINE RETURNS TO,

PAGE 1"
9.3

TEST
DESCRIPTIONS
- _ROUTINES
..
....
..

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

EACH or T~E TESTS DESCAIBEO Bt~ow IS CONDUCTED ON ONE FIE~O
AT A TiME, IT IS IMPORTANT TO BE AWARE or T~£ STATE or THE
OT~ER MEMORY P!E~OS WHEN A TEST 15 BtING CONQUCTED.
EXCEPT
rOR TESTS T0 THROUGH T6, T~E POLLOWING oPERATIONS ARE PER~
rORMED BE' ORE A TEST Is AUN,
A.
B.

ALL EXTENDED MEMORy fIELDS ARE SET to e's,
LOCATIONS e6000 THROUGH 01777 or flELO 0 ARE SET TO 0'5.
LOCATIONS ~6000 Or EACH MEMORY PIE~O IS SET TO ITS OWN
MEMORY FIELD NUMBE~ CE;G, ~oc 16110 Of rtE~D 1 IS SEt
TO 0001S1)','

EXCEPT WHtRE tPECI'IED, ALL ROUTINES RUN IN l ' MODE

(INOEX~

MODE),

ROUTIN(S T0 THROUG~ T~ TEST T~'T PERrORMING A OAC IN A ~O~
CAtiON IN AN EXTENDED PIELD DOES NOT A~TER THE CONTENTS OF
THE rQUIvA~[NT LOCATioN iN F!ELD e.
ROUTINES T7 THROUGH T~' TEST THAT THE ALL 1'5 DATA STORED
iN AN ExtENDED 'rE~D CAN B~ rETOHED BACK COR~ECTLY, I' THE
OATA IS NOT ALL 1'S, T~[N THE NUMBER IN THE AC INDICATES THE
NUMBER or THE 'lE~O THAT WAS 'NCORAECT~Y AOD~ESSED.
ROUTiNES T16 THROUGH T24 TEST THAT AN XCT* OF A NOP INSTRUC~
TION IN AN EXTENDED PIE~O DOES. NOT GIV[ CONTRO~ TO THE EX~
TENDED rl~1.0t
ROUTiNES T25 THROUGH T33 TEST THAT AN XCT* OP A LAC 61e0
iNSTRUCTION IN AN EXTENDED '1[~O P[TCHES OAT4 IN THE E~~
TENDED rt~LD AND NOT ~ROM rtE~O 0.
ROUTiNfS T34 THROUGH T42 TEST AN XCT* Or A LAC* 6111 INSTRUCTION IN AN EXTEND ~IE~O. THE ~AC. 6111 INSTRUCTION
SHOULD AE'ERENCE THE EXTENDED 'ItLD IT IS IN TO OBTAIN
THE iNDI"fcT POINTER.
ROUTINES T43 THROUGH T'1 TEST AN XCT* Or A JMP. 6~e1 INSTRUCTION IN AN EXTENDED PiE~Dt THE JMP. 6101 INSTRUCTION
SHOULD oeTAIN irs INOiRECT POINTER PROM THE rlELO iT IS
iN, AND THEN JUMP TO FiE~O 0.

(9,3 CONT'D)
~OUtfNES

T'2 THROUGH T60 T[ST THAT A JMj* 6001 INSTRUCTION
IN AN EXTENDED rIE~D CAN SuccESSrU~LY JUMP BAC~ TO rIE~D 0.

ROUTINES T61 THROUGH T67 T[ST THAT A SK~ INSTRUCTION OPERATES
CORRECTLY IN AN EXTENOED rfE~C.
ROUTINES T70 THROUGH T76 T[ST POR COR~~CT OPERATION Or THE
SAO iNSTRUCTION WHEN EXECUTED IN AN ~XTENorD PIELO.
ROUTINES T71 THROUGH T105 TEST THAT A JMS INSTRUCTION IN
AN EXTENOEO PIELD CORRECT~Y S'ORE! PC 3~5 AT T~E ~OCATrON JMS'ED TO.
ROUTiN!S T106 THROUGH T114 TEST THAT A CA~* INSTRUCTION
IN AN EXTENDEO PIE~O REr£RENcts 'I[~O 0, AND THAT PC BITS 3 THROUGH
5 ARE CORRECT~Y STOR£D AT THE ~OCATION INDIR[CTLV CALEO TO.
ROUTiNES T115 THROUGH T123 TEST THAT A JMP. 1~ INSTRUCTION
iN AN EXTENDEO flELO R[PER£NCES AUTO-INDEX REGISTER 1~ IN
riflO 0. ALSO BY PRIMiNG AUTO-INDEX REG 1e TO A LOCATION
POtNTING TO PIElO m, CWECKS THAT THE JUM~ CAN BE SUCcESSPUlLY
COMPLETED TO rlELO 0. INSTEAD OP TO THE EXTENDED '!ELO,
ROUTiNES T124 THROUGH T132 TEST THAT AN INTERRUPT CAN rAKE
PLACE PRoM AN EXTENDED rlELD, AND THAT PC BITS 3 THROUGH 5
ARE CORR£QTLV STORED IN Loe 0 0' P1E~D 0.
RoutiN!S T133 THAOUGH 1141 T£ST IN 9 MOoE, THAT WHEN 'ERrORMING AN xcT. or A ~AC INSTRUCTION IN AN ExTENOEO rl£LO,
THE LAC INSTRUCTION R~PEA~NCE& THE EXTENOEO rIE~D IT IS IN,
ANO NOT rIE~D 0.
ROUTINES T142 'HROUGH T1,B TEST IN 9 MODE, THAT WHEN
PERrORMING AN XCT' OP A JMpl IN AN EXT£NOEO PIELO, THE
JMP, INSTRUCTION GETS iTS iNDIRECT POINT£~ r~OM TH£ £Xe
TENO£O Fl[~D IT IS IN, AND NOT 'ROM 'IE~O I.
ROUTINE T1'1, 9 MOOE. TESTS THAT OATA IN rZELD 1 CAN BE
5I~£CTLY ACCESSED 'ROM rlELD 0.
ROUTINE

T~'2. 9

MODE. TESTS TMAT OATA IN PIELD e CAN BE

OIRECTLv ACCESSEO PRoM rlELo 1.

PAGE 12
,9 ;,3

CONT'O)
ROUTINE T~'3. 9 MOcE. TESTS TMAT OAT4 IN fIELO ;3 CAN BE
DIRECTLY ACCESSED PROM rlELO 2,
ROUTINE: T1'4. 9 MOD£. TESTS THAT OATA IN rlELD 2 CAN BE
DIRECTLY ACCESSED 'ROM rI£I.,D ~I

RoutiNE ;01". I) MODE', TESTS THAT DATA IN fiELD' CAN BE
DIRECTLY ACCESSED PROM fIELD ~.

ROUT i NI ;'1'6', 9 MODE. TESTS THAT OATA IN rlELo 4 CAN Sa:
tiIRECTLy AOCESSED 'ROM'IE(D ,.

RoutiNE T~'7, 9 MODE. TESTS THAT DATA IN PIELD 7 CAN Ba:
5I.f~TlY iOCESSED 'ROM PIE~D 6,

ROUTtNt f161. 9 MODE. TESTS THAT DATA IN flEL.D 6 CAN Bt
51A£~TLv iCCESSEO rRoM 'IELD 1.
ROUTINES T161 THROUGH T161 ARE OPTIONA~ T[STS FOR SVSTEMS
wITH APl~ THE APt BAEA~ !S GENERATED IV A SO"WAAE BA£A~
THAT BREAKS;O LOC.~ ot rllLO I. THI RoUTINES TEl' THAT
iN i~1 S.'AK CAN TA~£ PL.ACE PROM AN EXTENDED 'I£LO, AND THAT
PC BITS 3 THROUGH' ARE CORRECTLV STOREO AT THE L.OCATION
jHstD 10 '-~M L.ce 41~

EXM15
IPnP-l~

EXTENDED MEMORY

TE~T

ANa EXTENOEn MEMORY API TEST

ICOPYRIGHT 1970, DIGITAL EQUIPMENT CORP,. MAYNARn, MASS,
I

006000
13060130
13160130
13260130
13360130
0460013
0560130
066000
076000
000001
131013131
13200131
030001
1340001
0500131
13601301
070001
00001313
0000130
0100130
0213000
0200130
0300130
1351313130
1360000
0713000
130013113
000010
010010
02013113
030010
1340010
1351313113
136013113
137013113
0000?0
01313020
13113020
13213020
0313020
040020
050020
0613020
070020
0013040
1300040
010040
0213040
030040
040040

,ASS
LOC=6e00
LOcFe=LOC
LOC F 1=LOC+100e0
LOCF2=LOC+20eee
LOCF3=LOC+30000
LOCF4=LOC+40000
LOCF~=LOC+C:;0000

LOCF6=LOC+60000
LOCF7=LOC+70000
Ll=l
L1 F l=100el
L1 F 2=20001
L1 F 3=300131
L1 F 4=400131
L1F5=50001
L1 F 6=601301
L1F7=70001
L0=0
L0F0=0
L0F1=10000
L0F2=20000
L0F3=20000
L0F4=300130
L0F5=513000
L13F6=600013
L0F7=70131313
Lle=l13
L10F13=001310
L10Fl=1131310
LlelF2=2001e
L1eF3=30010
L10F4=401310
L10F5=513010
L10F6=60010
L10F7=701310
L20=2e
L20F0=20
L20Fl=10020
L20F2=213020
L20F3=30020
L20F4=40020
L20F5=50020
L20F6=60020
L20F7=7e020
L40=40
L4Ci'1F0=40
L40Fl=113040
L40F2=20e40
L40F3=30040
L40F4=4004~

PAGE

EXM15
9150040
060040
070040
010000

L40F5='509140
L40F6=60040
L40F7=7004V1
K1V1K=1V1000

0200~0

K20K=2~000

030.000
040000

K30K=30000
K40K=40000

0500~0

K50K=500~0

060000
070000
404000
742030
707762
707764
707761
735000

K60K=60.0C?10
K70K=7Ci'000
K404 K=404000
SWA=742030
EPA=707762
EBA=7el7764
EXBA=707761
CLX=735000
.EJECT

/SWAP AC HALVES
/ASSERT 15 MODE
/ASSERT Q MODE
/SKIP IF 15 MODE
/CLEAR XR

PAGE

EX'-115

00HJ0
~010e

006~Hl0

0~101

016000
02601010
036000
01460"'0
056000
066000
076000
010001
020001
0130001
040001
050001
060001
070001
000000
010000
020000
020000
030000
050000
060000
070000
000010
010010
020010

00102
00103
00104
0010'5
00H1J6
00107
00110
00111
00112
00113
00114
00115
00116
00117
00120
00121
00122
00123
00124
00125
00126
00127
00130
00131
00132
00133
00134
00135
00136
00137
00140
00141
00142
00143
00144
00145
00146
00147
00150
00151
00152
00153
00154
00155
00156

0300H~

0412HH0
050010
060010
070010
000020
0H'l020
020020
030020
040020
050020
060020
070020
001162
000000
000000
000000
000000
000000
000000
000000

F"'LOC
F1LOC
F2LOC
F3LOC
F4LOC
F5LOC
F6LOC
F7LOC
F1Ll
F2L1
F3L1
F4L1
F5Ll
F6Ll
F7L1
F0L0
F1L0
F2L0
F3L0
F4L0
F5L0
F6L0
F7L0
F0L10
F1L10
F2L10
F3L10
F4L10
F5L10
F6L10
r7L10
F0L20
F1L20
F2L20
r3L20
F4L20
r5L20
F6L20
F7L20
KSTART
NXTST
CURTST
TEMp
CTRA
cTRS
EAC
ELOC

.LOC
LOCF0
LOCFl
LOCF2
LOCF3
LOCF4
LOCF,)
LOCF6
LOeF7
L1F1
L1F2
L1F3
L1F4
L1F5
L1F6
L1F7
L0F0
L0Fl
L0F2
L0F3
L0F4
L0F5
L0F6
L0F7
L1(l1F0
L1~F1

L1Q1F2
L10F3
L10F4
L1rt!F5
L10F6
L1Vlr7
L20F0
L20F1
L2Q1F2
L20F3
L20F4
L20F5
L20F6
L20r7
T0
0
0
0
0
0
0
0
.EJECT

100

PAGE

4
00177
00177
00200
00201
00202
00203
00204
00205
00206
00207
00210
00211
00212
00213
00214
00 2 15
00216
00217
00220
00221
00222
00223
00224
00225
00226
00227
00230
00231
00232
00233
00234
00235
00 23 6
00237
00240
OO241
00242
00243
00244
00245
O0246
00247
O0250
00251
00252
00 2 5 3
00254
00255
00256
00257
00260
00261
00262
00263
00264

EXM15
.LOC
~00000

100657
001101
100576
75~004

505215
740200
600 21 3
100657
001050
100576
600203
200147
040150
100 2 5 4
100301
770000
707762
735000
620151
000000
700002
707762
205216
040021
140020
140000
750004
740010
741100
62 0 223
44015 3
620223
750004
740100
600245
200177
100576
2° 01 5 0
345217
750200
600215
205220
1 00 567
600213
000000
220150
040177
44"H50
200150
040152
440150
200150
04~151

RTNNO

START

177

TYPE
P0 MsG
JMS
LAS
AND

CHLT
(K70K

ITHA~

GETRnY

IMOR[ THf..N 4K?
IYES.
INa TYPE ERROR MESSAGE.

S~A

GETRDY

CHAINN

JMP
TYPE
MEMERR
JMS
JMp
LAC
DAC
JMS
SETA
770000
EPA
CLX
JM'P*

IS~

FORWD

CHLT
START
KSTART
NXTST
FORWD

~E"'ORY.

IHALT.
IGrT 1ST RTN ADDRESS
1ST ORE AT NXTST
IGO SET UP FOR NEXT TEST
ISET CTRA TO
1-4096

cURTST

IASSERT 15 MODE
ICLEAR XR
IGO TO NEXT TEST.

IOF
EPA
LAC
DAC
DlM
DlM
LAS
RAL
SPA
JMP*
CHAINA

ITypE TITLE AND
I1 NSTRUCTIONS
IHALT
ICHECK THAT CPU HAS MORE

JMP*
LAs
SMA
JMP
LAC
JMS
LAC
TAD
SlA!CLA
JMP
LAC
JMS
JMP
0
LAC*
DAC
lS2
LAC
DAe
IS2
LAC
DAC

IASSERT 15 MODE
(JMP CALERR
21
20
0
IREAD ACS
CHAINN
CTRA
CHAINN
. +3
RTNNO
CHLT
NXTST
(1
GETROY+2
(207
TTOUT
GETRDY
NXTST
RTNNO
NXTST
NXTST
TEMP
NXTST
NXTST
CURTST

ILOOP ON ROUTINE?(ACS1)
IYES.
IDONE N TIMES?
ING.REPEAT TEST.
IREAD ACS
IHALT AT END OF TEST?(ACS0)
INa.
IYES.GET TEST NUMBER.
IHALT,TEST NUMBER IN AC.
ILAST TEST?
INO.PROCEED TO NExT TEST.
IGET BELL CODE
IRING TELETYPE BELL
ISTART OVER.

IGET NEXT TEST NUMRER.
ISTORE AT RTNNO.
IGET cURRENT TEST NUMBER
ISTORE AT TEMP

IGET CURRENT TEST ADDRESS,

PAGE

EXM15

00265
00266
00267

~4V'150

22e152

0027C!1

00~000

00271
00272
00273
00274
00 2 75
00276
00277
00300

220270
040152
440270
220270
0601'5 2
440270
754000
620270
100270

00301
00302
00303
00304
00305
00306
00307
003112l

000000
220301
040307
440301
100270
000153
000000
620301
100301

00311
0031?
00313
00314
00315
00316
00317
00320
00321
0121322
00323
00324
00325
00326
00327
00330
00331
00332
00333
00334
00335

000000
220311
040333
440311
220311
040334
440311
220311
04121335
440311
220333
060334
440333
440334
440335
600323
754000
620311
000000
000000
000000
100311

620254

TEMP
LAC*
NXTST
ISET NEXT iEST ADDRESS.
DAC
IE XI T.
FORWD
JMP*
ISUSROUTINE TO SFT A LOCATION TO SPECIFIED VALUE.
STCTR
0
STCTR
IGET LOC ADDR AND
LAC*
TEMP
ISAVE AT TEMP.
DAC
STCTR
IS~
STeTR
IGET VALUE AND STORE
LAC*
TEMP
IAT DESIRED LOCATION
DAC*
STeTR
lSi!
ICLEAR AC,LINK
CLA!CLL
JMP ..
IEXIT.
STCTR
SETLOC=JMS STCTR
ISUSROUTINE TO SET CTRA TO SPECIFIED VALUE.
STCTA
0
STcTA
IGET DESIRED VALUE.
LAC ..
. +4
OAC
ISET uP TO EXIT.
STeTA
Is~
ICALL ON STCTR TO
SETLOC
15ET CTRA TO
CTRA
ITHIS VALUE (VARIABLE).
0
IEXtT
STCTA
JMP*
SETA=JMS STCTA
ISUsROUTINE TO MOVE VARIABLE LENGTI-l FIELDS
MOVVE
0
MOVVE
IGET AND STORE "FROM"
LAC ..
FADOR
IAOORESS
OAC
MOVVE
IS2
MOVVE
IGET AND STORE "TO"
LAC"
TAODR
IADDRESS.
OAC
MOVVE
lSi!
IGET AND STORE "MOVE COUNT"
MOVVE
LAC*
MCTR
DAC
MOVVE
IS~
IGET "FROM" WORD
MOVE A
FADDR
LAC*
ISTORE AT "TO" LOCATION
TADOR
OAC"
IUPOATE "TO "AND "FROM"
IS~
FAOOR
TAOOR
IAOORESSES.
IS2
MCTR
IOONE MOVING?
lSi!
IND. GO MOVE ANOTHER WORD.
JMP
MOVEA
CL/d CLL
JMP ..
MOVVE
IYES.OONE.EXIT.
0
rAooR
TADOR
0
MCTR
0
MOVVE
MOVE=JMS
.EJECT

PAGE

6
liH!) 336
121121337
1210340
121121341
121121342
121121343
0121344
1210345
0121346
121121347
121035""
00351
1210352
00353
0121354
00355
00356
121121357
0121360
121121361
00362
0121363
1210364
0£1365
121121366
0121367
121121370
1210371
121121372
0121373
00374
00375
00376
0121377
121041210
0121401
121121402
121041213
121041214
0121405
1210406
12112141217
0121410
121121411
1210412
121121413
121121414
0121415
121121416
121121417
121121420
0121421
121121422
1210423
121121424

EXM15
012112112100
11210474
6121121354
11210467
61210363
11210462
60V1l372
11210455
61210401
112112145121
612112141121
11210443
61210417
61210426
165215
11210311
1217000121
07012101
770001
21215221
12160107
165222
1121121311
1216£100121
06Q10V1l1
77012101
21215223
060106
165224
11210311
1215012100
050001
770001
21215225
060105
165226
1121121311
030000
0312112101
770001
21215227
0612111214
16523121
10121311
12121211210121
02121001
7712112101
21215231
1216011213
165230
11210311
1212012100
121201211211
7712112101
21215232

S8FNUM

srF7

0
JMS
.JMP
JMS
JMP
JMS
JMP
JMS
JMP
JMS
JMP
JMS
JMP
JMP
D~M*

MOVE
L0F7
LI2IF7+1
-7777
LAC
DAC*
STF6

D~M*

MOVE
Lf21F6
L0F6+1
-7777
LAC
DAC*
STF5

O~M*

STF4

MOVE
L0F5
L0F5+1
-7777
LAC
DAC ..
DlM*
MOVE
L0F4
L0F4+1
-7777
LAC
OAC ..

STF3

D~f'h

MOVE
L0F3
L0F3+1
-7777
LAC
DAC*

STF2

TSTF7
STF7
TsrF6
STF6
TsrFr:;
STF5
TSTF4
STF4
TSTF3
STF3
TSTF2
STF2
STF1
(L0F7

ISUS TO ~ET FlrLO NUMBERS.
IFIElD 7?
IVES.
IFIELD 6?
IVES.
INO. FIELD 57
IYES.
INa. FIELD 4?
IYES.
INO. ~IElD 37
IYES.
INa. FIELD 27
IYES.
INO. GO SET FIELo 1.
IrERO OUT FIELD 7

(7
F7LOC
(LQlF6

/7 TO LOCF7

(6
F6LOC
(LIt'lF5

16 TO LOCF6

(5
F5LOC
(L0F4

15 TO LOCF'5

(4
F4LOC
(LQlF3

/4 TO LOCF4

IlERO OUT FIELD 6

IlERO OUT FIELD 5

IlERO OUT FIELD 4

IlERO OUT FIELO 3

OrM ..

(3
F3LOC
(L0F2

IrERO OUT FIELD 2

MOVE
Lf21F2
L0FZ+1
-7777
LAC

/2 TO LOCF2

13 TO lOCF3

PAGE

EXM15

00425

06Vll0.2
165233
100311

0~426

00427
00430
V'0431

00432
00433
00434
00435
00436
00437
00440
("0441
00442

S TF l

~H~0c;,0

0HH~c;,1

77~0~1

205217
~6c;,101

DAC*
ntM*
t-10VE
L0Fl
L0Fl+1
-7777
LAC
DAC*

F2LOr:
IrERO OUT

(1
F1LOC
LOCFV'

11 TO LOC F 1
I~ERO

1460~0

D~M

10c;,311

MOVE
LOGF0
LOCF0+1
-7776+LOr:FV'l
SBFNUM
JMP*

IEXIT

0
JMS

TSTFX

IFIELD 27

TSTF2
TSTF2

IYES.

TSTFX

IFIELD 31

TSTF3
TSTF3

IYES.

TSTFX

IFIELO 4?

TSTF4
TSTF4

IYES.

TSTFX

IFIELO '5?

TSTF5
TSTF5

IvEs.

TSTFX

IFIELD 67

TSTF6
TSTF6

IYES.

TSTFX

IFIELD 7?

TSTF7
TSTF7

IvES.

~06000

006001
776002
620336

~IELn

( LrFj

TO LOCF0

00443
00444
00445
00446
00447
00450
00451
00452
00453
00454
00455
00456
00457
00460
00461
00462
00463
00464
00465
00466
00467
0047:tJ

00471
00412
00473
00474
00475
00476
00477
00500
00501
00502
00503
00504
0~505

00506
00507
00510
00511
00512

000000
100501
020000
440443
620443
0000c;,0
100501
030000
440450
620450
00~HHl!0

100501
040000
440455
620455
000000
100501
050000
440462
620462
000000
100501
060000
440467
620467
000000
100501
070000
440474
620474
000000
750004
505215
740,001
345217
360501
440501
741300
440501
620501

TSTF2

20~00

IS~

JMP*
TSTF3

TSTF4

TSTF5

JMS
30000
1St
JMP*
0
JMS
40000
1St
JMP*
0
JMS
50000

1St
TSTF6

TSTF7

JMP*
0
JMS
60000
1St
JMP*
0
JMS
70000
IS~

TSTFx

INO.

JMP*
0
LAS
AND
CMA
TAr)
TAD*

ISt

INO.

IND.

INO.

IND.

INO.

(70000
(1

TSTFX
TSTFX

SP,4:SNA
TSTFX
1St
TSTFX
JMP*

IFIELD IN SYSTEM?
IYES.

INO,

PAGE

el0513
00514
eJ~515

'10516
00517
00520
00521
00522
00523
00524
00525
00526
00527
0053~

00531
00'532

00533
00534
00535
00536
00537
00540
00541
00542

EXM15
100 33 6

STF~:JMS

el000~0

CF?

100443
620513
600240
000'100
100450
620517
600240
000000
100455
620523
600240
000000
100462
620527
600240
000000
100467
620533
600240
000000
100474
620537
600240
100513
100517
100523
100527
100533
100537

CF 3

CF4

CFr;

CF6

CF7

TF2=JMS
TF3=JMS
TF4=JMS
TF5=JMS
TF6=JMS
TF7=JMS

SRFNUM
0
TSTF2
JMS
CF" ;:>
JMP*
SKIP

IFIELO 2?

lyES,
INO,

JMS
JMP*
SKIP
0
JMS
JMP*
SKIP
0
JMS
JMP*
SKIP
0
JMS
JMP*
SKIP
0
JMS
JMP*
SKIP
CF2
CF3
CF4
CF5
CF6
CF7

TSTF3
CF;t,

IFIELO 3?
IYES,

INO.
TSrF4
CF4

IFIELD 47
IYES,
1"40.

TSTF5
CF5

/FIELO 5?
IYES.

INO.
TSTF6
CF6

IFIELO 6?
IYES.
I~O.

TSTF7
CF7

IFIELO 7?
IYES.

INO.

I
00543
00544
00545
00546
00547
00550
00551
00552
00553
00554
00555
00556
00557
00560
00561
00562
00563
00564
00565
00566
00567
00570

000000
750004
505234
751200
600240
703304
140040
100311
000040
000041
777741
620543
100543
000000
700401
741000
620557
700406
700401
600564
620557
000000
700406

CAP!

0
LAS
AND
(4000
SNA!CLA
SKIP
OSK
40
DtM
MOVE
40
41
-37
CAPl
JMP*
CKAPI=JMS CAPl
STFLG
0
TSF
SKP
STFLG
JMP*
TLS
TSF
JMP
. -1
STFLG
JMP*
TTOUT
0
TLS

/REA(l ACS
IAPl PRESENT?

INO
ISET LOCATIONS
/40 THROUGH 77
ITO ALL 0'S
IEXIT
ISUB TO SET TELEPRINTER FLAG
/FLAG SET?

INO.
IYES. EXIT
1ST AR T P R I "-iT E R
IWAIT FOR FLAG.
/EXJT.
/PRINT CI-lAR

PA{,t

EXM15

00571

700401
600571
700402
750000
62111567
0000"'0
740040
620576
000000
740040
620MH
0000(.?10
040155
200604
040156
1006S1
620604
100657
001021
100627
6206r?14
040 1 55
200020
040156
100651
620151
100657
001025
100627
62~H 51
000000
200156
505235
345236
040156
100751
000156
001033
100751
000155
001040
100751
000177
001045
100657
001031
100601
620627
00000'1
750004
742010
740100
44 0 651

~~'57?

00573
vH15 7 4
0057S
00576
00577
00600
00601
00602
00603
00604
00605
00606
00607
00610
00611
00612
00613
00614
00615
00616
00617
00620
00621
00622
00623
00624
00625
00626
00627
00630
00631
00632
00633
00634
00635
00636
00637
00640
00641
00642
00643
00644
00645
00646
00647
00650
00651
(.?I0652
00653
00654
00655
00656

62~651

TSF
JMP
TCF
CLA
JMP*
CHLT

CALERR

CETYP

Csr.OP

ICLEAR FLAG.
IClEAR AC
IEXIT
ICOMMAND HALT

CHLT

HLT
JMP ..
ERR

TTOUT

'HLT
"
JMP*

CEHLT

IWAIT FOR rLAG.
. -1

CE-HLT

ICOMMON FRROR HALT
IEXIT

1(1

oAC
LAC
oAC
JMS
JMP*
TYPE
ERRMSG
JMS
JMP*
DAC
LAC
oAC
JMS
JMP*
TYPE
CALMSG
JMS
JMPo
0

LAC
AND
TAD
OAC
JMS
ELOC
ALoe
JMS
EAC
AACA
JMS
RTNNO
ARTN
TYPE
CEMSG
JMS
JMP ..

EAr
ERR
ELOC
cScoP
ERR

ISAVE AC
ISAVE ERROR CALL LOCATI01\J

CETYP
ERR
EAr:

ICOMMON ERROR TYPEOUT ANn HALT
IEXIT
ISAVE AC
ISAVE CAL CALL LOCATION

ELOC
CSCOP
CURTST
CETYP
CURTST

ISCOPE LOOP?
IYES, EXIT
INO. TYPE "ERROR"

ISCOPE LOOP?
IYES.
INO. TYPE CAL ERR
ICOMMON ERROR TYPEOUT ANO HALT.
IGO To START OF TEST

[LOC
(377777
(-1
[LOC
OCNV

ICONVERT ERROR CALL LOCATION
ITO PRINTARLE ASCII

OCNV

ICONVERT AC CONTENTS TO
IPRINTABLE ASCII

OCNV

ICON VERT TEST NUMBER TO
IPRINTABLE ASCII

ITYPE COMMON ERROR MESSAGE
CEHLT
CETYP

IGO TO COMMON ERROR HALT.

LAS
RTL
SMA
IS~

JMPo
.EJECT

IREAo ACS
CSCOP

cscop

ISCOPE LOOP?
INO.
IYES. EXIT.

EXM15

00657
00660
00661
00662
00663
00664
00665
00666
00667
eJ067f'1
00n71
00672
00673
00674
00675
00676
·00677
00700
00701
00702
00703
00704
00705
00706
00707
00710
00711
00712
00713
00714
00715
00716
007 1 7
00720
00721
00722
00723
00724
007 25
00726
00727
00730
00731
00732
007 33
00734
00735
00736
00737
00740
00741
00742
00743
00744
00745

eJ00000
220657
040747
141i'1746
440657
220747
742010
742010
742010
740010
100703
220747
742020
742020
742020
100703
220747
100703
440747
600664
000000
5·05237
040750
200746
740200
600720
200750
741200
600716
100727
620703
440746
6 2 0703
140746
200750
741200
620703
545237
6 20 6 5 7
600714
000000
545240
600742
545241
600744
345242
741100
345243
345244
100567
620727
760215
600740
760212
600740

PAGE

TYP

LAC*
DAC
Di!~

IS~

TSC 1

TSC2

TyPAT

TYPSP

PRINTA
PRINTS
PRINTC

LAC*
RTL
RTL
RTL
RAL
JMS
LAC*
RTR
RTR
RTR
JMS
LAC*
JMS
ISf
JMP
0
AND
OAC
LAC
Si!A
JMP
LAC
SNA
JMP
JMS
JMP*
IS2
JMP*
OrM
LAC
SNA
JMP*
SAO
JMP*
JMP
0
SAD

JMP
SAO
JMP
TAD
SPA
TAO
TAD
JMs
JMPo.
LAW
JMP

LAW
JMP

TYP
TEMQ
FLAG
TYP
TEMQ

IGET AND STORE STRING

TSC2
TEMQ

ITYPE FIRST CHARACTER

TSC2
TEMQ
TSC2
TEMQ
TSC1

ITYPE 2Nn CHARACTER

(77
TEMR
FLAG

IMASK OFF EXCESS SITS

TYPSP
TEMR
.+3
PRINT
TSC2
FLAG
TSC2
FLAG
TEMR

A')flRr-SS

ICLEAR FLAG.
ISET UP [XIT A8DRESS.
IGET DATA WORD

ITYPE 3RD CHARACTER
IUPOATE nATA ADDRESS.

ISPECIAL CHAR FLAG SET?
IYES.

INa. GET CHARACTER
115 IT 0?

lyES. SPECIAL CHARACTER
INa. GO PRINT CHARACTER.
IEXIT TSC2.
IGET SPEcIAL CHAR FLAG.
IEXIT TSC2.
ICLEAR SPEcIAL CHAR FLAG.
IGET CHARACTER
10?

TSC2
(77
TYP
TYPAT
(45
PRINTS
(43
PRINTC
(-40
(100
(240
TTOUT
PRINT
21:;
PRINTA
212
PRINTA

IYES.

IGNORE IT. EXIT TSC2.

1771

IYES. EXIT. TYP SU8ROUTINE

INa.
1451

IYES.
IND. 431
IYES.

INa.

ITYPE CHARACTER
IEXIT PRINT SUB.
/TYPE CR
ITYPE LF

·PAGE.

EXM15

~~746

00~000

100657
00747
vHP50
00751
0075?
00753
00754
00755
00756
00757
00760,
00761
00762
00763
00764
00765
00 7 66
00767
00770
00771
00772
00773
00774
00775
00776
00777
01000
0HHH
01002
01003
01004
01'1'05
01006
01007
0UH0,
0UH1
0HJ12
01013
01014
01015
01016
01017
01020
01021
01022
01023
01024
0102'5
01020
01027
01030
01031
0103?
01033

000000

TE~Q

00vHHH~

TEMR
OCi\JV

000000
220751
04 1 0 1 3
440751

TYP

TYPE=JMS
FLt>G
~

2207~1

LAC~

041014
440751
221013
742030
100767
441014
22HH3
100767
620751
0000"'0
041015
505221
041016
20HH5
742010
740010
505245
041017
20HH5
742010
742010
742010
505215
041020
341016
341017
345246
061014
620767
000000
0,000"'0
000000
000000
000000
000000
454305
222217
224040
400077
454303
011405
222240
400,077
141703
404000
404040

nAC

OC~V

WASC
OCI\iV
OCNV
SASC
OCNV
WASC

ISl
LAC~

SWA
JMS
1St
LAC*
JMS

CNV
SASC
WASC
CNV
OCNV

JMP~

CNV

WAse
SAse
ASr,T
01
02
03
ERRMSG

ISUB TO CO~VERT CONTENTS OF
ITO PRINTARLE A SC I r

LAC*
OAC
ISt

0
OAC
ANO
OAC
LAC
RTL
RAL
AND
DAC
LAC
RTL
RTL
RTL
AND
OAC
TAO
TAr)
TAO
OACo
JMp*

ASCT
(7
01
ASCT
(70,0
02
ASCT

<70000
03

01
02
(6060,60
SAse
CNV

0
0
0
0
(21

.SIXBT '%#tRROR

@?'

rALMSG

.SyXRT

'%#rALERR

CEMSG

.SyX8T

'LOC

ALOC

,
.SIX8T

WORO

PAGE

EXM15

IH034
0103'5

404040
404040
01c;,375
400000
404040
404040
404040
240523
244040
404040
404040
007700
454301
032340
635565
401116
031722
220503
241431
402305
245440
172240
233123
240515
400417
052340
161724
401001
260540
012440
140501
232440
701340
170640
031722
055600
770000
454340
200420
556165
400530
240516
040504
401505
151722
314024
052324
454343
230524
400103
234063
556540
241740
162515
020522

01~3f

01037
01040
01041
01042
01043
01044
01045
01046
01047
0H~50

01051
01052
01053
01054
01055
01056
01057
01060
01061
01062
0U:l63
01064
01065
01066
01067
01070
01071
01072
01073
01074
0107'5
01076
01077
01100
01101
01102
01103
01104
01105
01106
01107
01110
01111
01112
01113
01114
01115
01116
01117
01120
01121
01122

.SIXBT 'AC= ,
AACA

.SIX8T

.SIXAT 'TEST
ARTN

.SIXRT

MEMERR

,SIXBT '%#ACS

@?'
~-5

INCORRECTLY SET, OR

.SIXBT 'SYSTEM DOES NOT HAVE AT LEAST

,SIXBT '8K OF CORE.@?'

p0MSG

.SyXBT '%# pDp-15 EXTENDED MEMORY TEST'

.SIXBT '%##SET ACS 3-5 TO NUMBER OF ADDITIONAL

PAGr-

EXM15

01123
01124

4017~6

~1125
~1126

01127
0113~

~1131

400104
041124
111716
011440
053024
0516"'4

01132

~5Q\440

~1133

~1144

150515
172231
402001
07Q\523
405061
402001
070540
754064
135100
454311

~1145

~64023

01146
01147

312324
051540

01134
01135
~1136

01137
0114~

01141
01142
01143

0115~

10~123

~1151

400120
115440
230524
400103
234066
402417
400140
615600
770000

01152
01153
01154
01155
01156
01157
01160
01161

.SyXRT

tEXTENoro MfMORY PAGES (1 pAGE

.SIXRT

'%#IF

.EJECT

SYSTE~

= 4K)'

HAS ApI, SET ACs 6 TO A 1.@?'

EXM15

01162
01163
01164
01165
0 11 66
01167
01170

000000
001173
146000
205236
060101
5460"'0

01171
01172

100223
601164

01173
01174
.01175
01176
01177
0 1 200
01201
01202

000001
001205
100513
146000
205236
060 1 02
546000
100604

01203
01204

100223
601176

01205
01206
01207
01210
01211
0 1 212
01213
01214

000002
001217
100517
146000
205236
060 1 03
546000
100604

01215
01216

100223
601210

0121 7
01220
01221
01222
01223

000003

PAGE

~1224

1006~4

0~H231

100523
146000
205236
06~104

01225
01226

546000
1130604

01227
01230

100223
601222

01231

000004
001243
100527
146000
205236
060105
546000

~1232

01233
01234
01235
01;?36
01237

IDAC* F1LOc (LOCF0 SI-IOULO
T0
0
Tl
OlM
LOC'F0
( -1
LAC
F1LOC
DAC"
LOCF0
SAD
ERROR

~OT

RE MODIFIED)
10 TO LOCF0

ITRY TO SET LOCF1 TO ALL l' S
ISKIP IF LOCF0 ! S t\iOT ALL l'S
IERROR. LOCF0 MO()I~IfO BY REFERENCE
ITO F!EU) 1.

CHAIN
JMP
T0+2
INOT DONE. REPEAT TEST,
IDAC* F2LOC (LOCF0 SHOliLD t\jOT BE MODIFIEn)
Tl
1
T2
IRUN IF FIELD 2 AVA.ILARLF
TF2
D2M
LOCF0
10 TO LOCF0
( -1
LAC
ITRY TO SET ALL l'S IN LllCF2
F2 LO C
DAC"
ISKIP IF LOCF0 NOT ALL l'S
LOCF0
SAO
IERROR. LOCF0 MODI~IEO BY REFERENCE
ERROR
ITO FIELO 2.
CHAIN
JMP
T1+3
INOT DONE. REPEAT TEST.
IOAC* F3LOc (LOCF0 SHOULD NOT CHANGE)
T2
2
T3
TF3
IRUN IF FIELD 3 AVAILA8LE
OtM
LOCF0
10 TO LOCF0
( -1
LAC
ITRY TO SET ALL l'S IN LOCF3
F3LOC
oAC"
LOCF0
ISKJP IF LOCF0 NOT ALL l'S.
SAD
ERROR
IERROR. LOCF0 CHANGED Ry REFERENCE
ITO FIELD 3.
CHAIN
JMP
T2+3
INOT DONt. RFPEAT TEST,
IDAC" F4LOC (LOCF0 SHOULD NOT CHANGE)
T3
3
T4
TF4
IRUN IF FIELD 4 AVAILARLF
DlM
LOCF0
10 TO LoeF0
(-1
LAC
OAC~
ITRY TO SET ALL 1·S IN LOCF4
F4 LOC
LOCF0
ISKIP IF LOcr 0 NOT ALL 1 'S,
SAO
ERROR
IERROR. LOCF0 CHANGED AY REFFRENCE
ITO FIELD 4.
CHAIN
JMP
T3+3
INOT DONF. REPEAT TEST,
loACo F5LOc (LOCFe! SHOULD NOT CHANGE)
T4
4
T5
TF5
IRUN IF FIELD '5 AVAILABLE
D2M
LOCF0
10 TO LOCF0
LAC
(-1
ITRY TO SET LOCF5 TO ALL '. IS.
F5LOC
DAC·
LOCFV!
ISKIP IF LOCF0 NOT ALL 1 S.
SAO
f

PAGE

EXM15

0124111

1IlH~6~4

01241
01242

100223
t-01234

01243

000005

Vl1244

~01255

01245
01246
01247
01250
01251
111125?

100533
146000
205236
060106
546000
100 6 0 4

01253
01254

100223
6fiH246

01255
01256
01257
01260
01261
0 1 262
01263
01264

000006
001267
100537
146000
205236
0601ffn
546000
100604

01265
01266

100223
601260

ERROR

IERROR. LOeFV' CHANGED RY REFFRFNCE
ITn J:"IELn I:; •

CHAIN
T4+3
INOT DONF. REPEAT TEST.
JMP
IDAC* F6LOc (LOCF0 SHOI)Ln NOT CHAtvGE)
T5
5
T6
TF6
IRUN IF J:"rELfi 6 AVAILARLF
LOCF0
Dlt.1
10 TO LOCFV'
LAC
( -1
ITRY TO SET ALL 1 'S IN LOCF6
OAC ...
F6LOC
ISKIP IF LOCFIII NnT ALL 1 ' S.
SAO
LOCFIII
ERROR
IERROR. LOCF0 CHANGEr 8Y REFFRI=""NCE
ITO FIELn 6.
CHAIN
JMP
INOT DONE. REPEAT TEST.
T5+3
IDAC'" r7LOc (LOCr0 SHOULD NOT CHANGE)
T6
6
T7
IRUN IF FIELD 7 AVAILABLr
TF7
D~M
LOeF'"
10 TO LOCF~
(-1
LAC
ITRY TO SET ALL 1 'S IN LOCF7
F7LOC
DAC'"
ISKIP I r LOCFel NOT ALL l'S
SAD
LOCr'"
IERROR. LOCF'" CHANGED 8YREFEREf\ICE
ERROR
ITO FIELD 7.
CHAIN
JMP
T6+3
INOT DONE REPEAT TEST.
.EJECT

PAGE

EXM15

01267
01270
01271
01272
01273
01274
01275
01276
01277
01300

000007
0013Vl3

T1~

100336
205236
060101
750000
220101
545236
741000
HH'!604

STFN
LAC

( -1

DAC~

F1 l 0C

IAll 1'5 TO L OCF 1

Fl l0 C
(-1

ITRY TO GET C(LOC F 1)
ISKIP IF AC NOT ALL 1 ' 5
10K.
IERR. AC NOT ALL 1'5. nACo F1L n C
1010 NOT REFERENCE FIELD i. OR
ILAC* F1LOr DIn NOT REFERENCE FIELO 1.

01301
01302

100223
601272

T7+3

INOT DONE. REpEAT TEST.

01303
01304
01305
01306
01307
01310
01311
01312
01313
01314
01315

000010
001320
100513
100336
205236

01316
01317

100223
601307

01320
01321
01322
01323
01324
01325
01326
01327
01330
01331
01332

000011
001335
100517
100336
205236
060103
750000
220103
545236
741000
100604

01333
01334

100223
601324

01335
01336
01337
01340
01341
01342
01343
01344
01345

000012
001352
H:'l0523
100336
205236
060104
750000
220104
545236

06~102

750i1J00
220102
545236
741000
100604

IT[ST
T7

lAC~

FiLOC

ISET FIELDS

CLA
LAC~

SAD
SKP
ERRORA
CHAIN
JMP
ITEST
T10

LAC~F2LOC

10
Tl1
TF2
STFN
LAC
DAC ..
CLA
LAC*
SAD
5KP
ERRORA

IRUN IF FIELD 2
15ET FIELD5
(-1
F2LOC
F2LOC
(-1

CHAIN
JMP
T10+4
ITEST LAC .. F3LOC
Tl1
11
T12
TF3
5TFN
LAC
(-1
DAC ..
F3LOC
CLA
F3LOC
LAC"
(-1
SAD
SKP
ERRORA
CHAIN
JMP
T11+4
ITE5T LAC .. F4l0C
T12
12
T13
TF4
STFN
( -1
lAC
OAC ..
F4LOC
ClA
F4lCC
LAC"
(~1
SAO

AVAILA~LF

IALL 1'5 TO LOCF2
ITRY TO GET C(LOCF;?)
15KIP IF AC NOT ALL 1 '5.
10K.
IERROR. DAC" F2LOc· OR LAC* F2LOC
1010 NOT REFERENCE FIELD 2.
IREPEAT TEST.

IRUN IF FIELD 3 AVAILABLE
ISET FIELDS
IALL l'S TO LOCF3
ITRY TO GET c(LOcF3)
15KIP IF AC NOT ALL l' S.
10K
IERROR. DAC .. F3LOC. OR LAC* F3LOC
1010 NOT REFERENCE FIELD 3.

INOT DONE. REPEAT TEST

IRUN IF FIELD 4 AVAILA8LF
15ET FIELDS
IAll l'S TO lOCF4
ITRY TO GET· CClOCF4)
ISKIP IF AC NOT ALL l'S

PAGE

EXM15

~1346

7410~0

v'll 347

100604

SKP
ERRORA

10K

IERROR. [lAC* F4LOC' OR LAC* F4LOC
RrFF.Rr~CE FIELD 4.

1010 NOT

(.11350
~1351

01352
01353
01354
01355
01356
"'1357
01360
01361
~1362

01363
01364

100223
601341
000013
001367
100527
100336
205236
~60Hl!5

750000
220105
545236
741000
100604

CHAIN
JMP
T12+4
ITEST LAC* F5LOC
T13
13
T14
TF5
STFN
LAC
(-1
F5LOC
DAr~*
CLA
F5LOC
LAC*
( -1
SAD
5KP
ERRORA

INOT DONF.. RFPEAT TEST.

IRUN IF FIELfl
15ET F" IE LOS

AVhILA~LF

IALL l'S TO LOCF5
ITRY TO GET C(LOCF~)
ISKIP IF AC NOT ALL 1 ' S.
10K

IERROR.

nAC~

F5LOC' OR lAC* F5LOC

1010 NOT REFERENCE FIELD 5.

01365
01366

100223
601356

01367
01370
01371
01372
01373
01374
01375
01376
01377
01400
"'1401

000014
001404
100533
100336
205236
060106
750000
220106
545236
741000
100604

01402
01403

100223
601373

01404
01405
01406
01407
01410
01411
01412
01413
01414
01415
01416

000015
001421
100537
100336
205236
060107
750000
220107
545236
741000
100604

01417
01420

100223
601410

CHAIN
JMP
T13+4
ITE5T LAC .. F6l0C
T14
14
T15
TF6
STFN
(-1
LAC
oAC ..
F6LOC
ClA
F6LOC
LAC*
(-1
SAO
SKP
ERRORA
CHAIN
JMP
T14+4
ITEST LAC .. F7l0C
T15
15
T16
TF7
STFN
LAC
(-1
F7LOC
OAC"
ClA
lAC ..
F7LOC
SAO
( -1
SKP
ERRORA
CHAIN
JMP
.EJECT

T15+4

INOT oONt. RrPEAT TEST

IRUN IF FIELD 6 AVAILA8lE
/SET FIELDS
IAll l'S TO LOCF6
/TRY TO GET C(LOCF6)
ISKIP IF AC NOT ALL l'S
10K.
IERROR, DAC* F6LOC' OR lAC~ r 6 LOC
1010 NOT REFERENCE FIELD 6.
/NOT oONF. REPEAT TEST.

IRUN IF FIELD 7 AVAILABLE
ISET FIELDS
IALL l'S TO LOCF7
/TRY TO GET C(lOCF7)
ISKIP IF AC Nor ALL 1 'S
10K.
IERROR. OAC" F7l0c, OR lAC* F7LOc
1010 NOT REFERENCE FIELD 7.

INOT DONE. REPEAT TEST.

PAGE

EXM15

~1421

liHlJ0016
001440
100336
100311
001435

01422
~H423

01424
01425
01426
01427
01430
01431
01432
01433
01434
01435
01436

01437

0160~0

777775
420101
100223
601424
100604
601431
740000
626002
001433

01451
01452
01453

000017
001460
100'513
100336
100311
001455
026000
777775
420102
100223
601444
H'0604

01454
01455
01456
01457

601451
740000
626002
001453

01460
01461
01462
01463
01464
01465
01466
01467
01470
01471
01472
01473

00002 0
001500
100517
100336
100311
001475
036000
777775
420H'I3
100223
601464
100604

01474
01475
01476

601471
740000
626002

01 4 40
01441
01442
01443
01444
'H445

01446
01447
0145~

THAT XCT* OF NOP AT lOeFl nOES NOT TRANSFER cONTROL TO FIELD 1.
16
T17
STFN
ISET FIELDS
MOVE
IMOVE TEST WORDS TO TEST AREA
T16W
lIN FIEln 1.
lOCFl
-3

T16A
T16B

XCT*
CHAIN
JMP
ERROR

F1LOC

IXCT* OF NOP IN LOfF1
INOT DONF. REPEAT TEST,
IERROR. PROGRAM DIn NOT RETURN TO
ITO T16A. INSTEAD, INSTrHiC T I0N
IAT LOCF1+1 WAS EXrClJTElJ.

JMP
T16A
NOP
ITEST WORDS
LOC+2
JMP*
T168
ITEST THAT XCT* OF NOP AT LOCF2 DOES NOT TRANSFER CONTROL TO FIELD 2.
T17
17
T2Q!
TF2
IRUN IF FIELD 2 AVAILABLE
STFN
ISET FIELDS
MOVE
IMOVE TEST WORDS TO TEST AREA
T17W
lIN FIELD 2.
lOCF2
-3

T17A
T17B

T17W

XCT*
CHAIN
JMP
ERROR

F2LOC

IXCT* OF Nap IN lOCF?

T17+4

INOT DONE. REPEAT TEST.
IERROR. PROGRAM DID NOT RETURN TO
IT17A. INSTEAD. INSTRUCTION AT
IlOCF2+1 WAS EXECUTED.

JMP
T17A
NOP
ITEST WORDS
lOC+2
JMP*
T17B
THAT XC T* OF Nap AT LOCF3 OOES NOT TRANSFER CONTROL TO FIELD 3.
20

T21
TF3
STFN
MOVE
T20W
LOCF3

IRUN IF FIELD 3 AVAILABLE.
ISET FIELDS
ITEST WORDS TO TEST AREA
lIN FIELD 3.

-3

XCT*
CHAIN
JMP
ERROR
JMP
NOP
JMP*

IXCT~

T20+4

OF NOP IF lOC F 3.

INOT DONE. REPEAT TEST.
IERROR, PROGRAM DID NOT RETURN
ITO T20A. INSTEAD. INSTRUCTION
tAT lOCF3+1 WAS EXfCUTED.

ITEST WORDS
LOC+2

PAGE- 19

EXM15

01477

001473

~1500

12J0~12I?1

~151211

01511
01512
01513

1210152121
10121523
1121121336
1121121311
01211515
121461210121
777775
42121104
1121121223
61211504
1121121604

1211514
01515
1211516
1211517

61211511
74121121121121
6261211212
1211211513

121152121
1211521
01522
01523
1211524
01525
01526
1211527
0153121
1211531
1211532
01533

000022
1210154121
11210527
10121336
100311
001535
121561210121
777775
4212111215
1121121223
61211524
1121061214

01534
01535
1211536
1211537

601531
741211211210
6261211212
12101533

01502
~1503

0151214
01505
01506
0151217
0151~

121 1540
01541
1211542
01543
1211544
1211545
01546
01547
121155121
01551
1211552
01553
1211554

T208
ITrST THAT XCT~ OF NOP AT LOCF4 ODES NOT TRANSFER CONTROl TO FIELD 4.
T21
21
T22
IRUN IF FIELO 4 AVAILA~LF
TF4
STFN
ISET FIELDS
ITEST WORDS TO FIELD 4
MOVE
ITEST ARFA.
T21\o1
LOCF4
-3

T21A
T218

IREPEAT TEST.
IERROR. PROGRAM DID NUT RETURN TO
IT21A. INSTEAD INSTRUCTION AT
ILOCF4+1 WAS EXECUTED.

-3

T22A

T228

T22W

vHHH~23

4201~6

601551

T21+4

JMP
T21A
ITEST WORDS
NOP
JMP*
LOC"'2
T218
THAT xcTa- OF NOP AT LOCF5 DOES NOT TRANSFER CONTROL TO FIELD 5.
22
T23
IRUN IF FIELD 5 AVAILA8LE
TF5
STFN
ISET FIELDS
ITEST WORDS TO FIELD 5
MOVE
ITEST AREA.
T22W
LOCF5

12101560
1121121533
1121121336
10121311
1211211555
1216600121
777775
10121223
601544
10061214

XCT*
CHAIN
JMP
ERROR

T23A

XCT*
CHAIN
JMP
ERROR

F5LOC

IXCT* OF NOP IN LOCF5

T22+4

IREPEAT TEST.
IERROR. PROGRAM DID NOT RETURN
ITO T22A. INSTEAD, INSTRtJCTION
IAT LOCF5+1 WAS EXECUTfO.

JMP

T22A

Nap

ITEST WORDS
lOC+2
JMP*
T228
THAT XcT* OF NOP AT LOCF6 DOES NOT TRANSFER cONTROL TO FIELD 6.
23
T24
IRUN IF FIELD 6 AVAILARLE.
TF6
STFN
ISET FIELDS
ITEST WORDS TO FIELD 6
MOVE
ITEST AREA
T23W
LOCF6
-3
/XCT* OF NOP IN LOCF6.
XCT*
CHAIN
JMP
/REPEAT TEST.
T23+4
/ERROR.
PROGRAM DID NOT RETURN TO
ERROR
/T23A.
INSTEAD, INSTRUCTION AT
/LOCF6+1 WAS EXECUTEO.
JMP
T23A

·PAGE

EXM15

01555
01556
01557

7 4 0000
626002
001553

01560
01561
01562
01563
01564
01565
(.'11566
01567
01570
01571
01572
01573

000024
001600
100537
100336
100311
001575
076000
777775
420107
100223
601564

01574
01575
01576
01577

601571
740000
626002
001573

H~0604

T23W

NOP
JMP*
T238
IrEST THAT XCT*
T24
24
T25
TF7
STFN
MOVE
T24W
LOCF7
-3
XCT*
T24A
CHAIN
JMP
ERROR
T248

T24W

JMP
NOP
JMP.
T248
.EJECT

ITEST WORDS
LOC+2
OF NOP AT LOCF7 [lOES NOT TRANSVER r.ONTROL TO FIELD 7.
IRUN IF FIELO 7 AVAILA8LE
ISET FIELDS
ITEST VOIDS TO FIELD 7
ITEST ARFA.
F7LOC

IXCT* OF NOP INLOC F 7

T24+4
IERROR. PROGRAM DID NOT RETURN TO
INSTEAD INSTRUCTION AT
I T 24A.
ILOCF7+1 WAS EXECUTED.
T24A

ITEST WORDS
LOC+2

PAGE . tJ.l
V11600

EXM15
000025
001614
100336
205247

01601
(111602
01603
01604
131605
01606
01607
01610
01611

750000
420101
545247
741000
100604

01612
01 6 13

1 00 223
601603

01614
(ilI1615
01616
01617
01620
01621
01622
01623
01624
01625
01626

000026
001631
100513
100336
205247
7501300
420102
545247
741000
100604

v.l1627
0163l'J

100223
601620

01631
01632
01633
01634
01635
01636
01637
01640
01641
01642
01643

000027
001646
100517
100336
205247
060H"3
750000
420103
545247
741000
100604

01644
01645

100223
601635

01646
01647
01650
01651
01652
01653
01654
01655
01656
131657

000030
001663
100523
100336
205247
060104
75013013
4201{IJ4
545247
741000

0601~1

0601~2

ITST XCT" OF LAC IN LOCF1 (DATA IN FIELD 0)
T2'5
25
T26

STFN
LAC
DAC ..
CLA
XCT"
SAD
SKP
ERRORA

(LAC 6Vl130
F1LOC
F1LOC
(LAC 60130

ISET FIELDS
ITEST WORD TO LOCFl
IXCT* OF LAC AT LOCF1
ISKIP IF AC DIFFFRENT FROM (LAC 610013
10K

XCT .. OF LAC AT LOCF1.
IERROR.
ILAC 6000 DID NOT REFERENCE FIrLD 1 •

CHAIN
JMP
IREPEAT TEST.
T25+3
ITEST XCT .. OF LAC IN LOCF2 (DATA IN FIELD 0>
T26
26
T27
/RUN IF FIELD 2 AVAILARLE
TF2
STFN
/SET FIELDS
ITrST WORD TO LOCF2.
LAC
(lAC 6rt100
F2LOC
DAC"
CLA
XCT ..
IXCT .. OF LAC AT LOCF?
F2LOC
/SKIP IF DIFFERENT FROM (LAC 6000
SAD
(lAC 6000
SKP
10K.
/ERROR. XcT" OF LAC AT lOCF2.
ERROR A
ILAC 6000 DID NOT REFERENCE FIFLD 2.
CHAIN
JMP
T26+4
IREPEAT REST.
/TEST XcT .. OF LAC N LOCF3 (DATA IN FIELD 0)
T27
27
T30
TF3
IRUN IF FIELD 3 AVAILBLE
STFN
/SET FIELDS
(LAC 6V100
ITrST WORD TO LOCF3.
LAC
F3LOC
DAC"
ClA
IXCT" OF LAC AT LOCF3
F3LOC
XCT"
/SKIP IF AC DIFFERENT FROM (LAC 6000
SAD
(lAC 6rt100
SKP
10K.
ERRORA
/ERROR. XcT .. OF LAC AT LOCF3.
/lAC 6000 DID NOT REFERENCE FIELD 3.
CHAIN
/REPEAT TEST.
JMP
T27+4
/TEST XcT .. OF LAC IN LOCF4 (DATA IN FIELD 0>.
T30
30
T31
IRUN IF FIELD 4 AVAILABLE
TF4
STFN
ISET FIELDS
(LAC 6V100
ITEST WORD TO LOCF4
LAC
F4LOC
DAC"
CLA
XCT ..
IXCT .. OF LAC AT LOr:F4
F4LOC
ISKIP IF AC DIFFERENT FROM (LAC 60130
SAD
(LAC 6000
SKP
10K

PAGE

EXM15

0 1 66'''

10e60 4

01661
01662

100223
601652

01663
01664
01665
01666
01667
01670
01671
01672
01673
01674
01675

000031
001700
100527
100336
205247
060105
750000
420105
545247
741000
100604

01676
01677

100223
601667

0170~

01701
01702
01703
01704
1.31705
01706
01707
01710
01711
01712

000032
-001715
10.0533
100336
205247
1.360106
750000
420106
545247
741000
100604

01713
01714

100223
601704

01 7 1 5
01716
01717
01720
01 7 21
01722
01723
01724
01725
01726
01727

000033
001732
11.30537
100336
2 0 5247
060107
750000
420107
545247
741000
100604

01730
01731

100223
601721

ERRORA

IERROR,
XCT* OF lAC AT LOrF4.
/lAC 6~00 nIo NOT REFERENCF FlrLo 4.

CHAIN
JMP
T30+4
/REPEAT TEST.
/TEST XCT* OF LAC IN LOCF5 (DATA IN FIELD "t>
T31
31
T32
/RUN IF FIELO 5 AVAILAHLF
TF5
STFN
/5ET FIELDS
(LAC 6000
LAC
ITEST WORD TO LOCF")
OAC*
F5 LO C
CLA
F5LOC
/XCT* OF LAC AT LOC F 5
XCT*
SAO
/SKIP IF AC DIFFfRENT FROM LAC 600~
(LAC 6:~00
SKP
10K.
ERRORA
IERROR, XCT* OF LAC AT LOCF5.
/LAC 6000 DID NOT REFERENCf FIFLD 5.
CHAIN
JMP
/REPEAT TEST
T31+4
/TEST XCT* OF LAC IN LOCF6 (DATA IN FIELD 0)
T32
32
T33
IRUN IF FIELD 6 AVAILA8LE
TF6
STFN
15ET FIELDS
(LAC 6000
LAC
ITE5T WORD TO LOCF6
F6LOC
DAC*
CLA
F6LOC
XCT*
/XCT* OF LAC AT LOCF6
ISKIP IF AC DIFFERENT FROM (LAC 6000
SAO
(LAC 6000
SKP
10K.
IERROR, XCT* OF LAC AT LOCF6.
ERROR A
ILAC 6000 010 NOT REFERENCE FItLO 6.
CHAIN
JMP
/REPEAT TEST.
T32+4
ITEST XCT* OF LAC IN LOCF7 (DATA IN FIELD 0>.
T33
33
T34
TF7
IRUN IF FIELD 7 AVAILA8LE
STFN
ISET FIELDS
(LAC 6000
ITEST WORD TO LOeF7.
lAC
f7LOC
DAC*
ClA
F"7LOC
XCT*
IXCT* OF" lAC AT lOCF7
/SKIP IF AC DIFFERENT FROM (LAC 6000
SAO
(lAC 6000
SKP
10K.
ERRORA
/ERROR. XCT* Of LAC AT LOCF7.
IlAC 6000 010 NOT REFERENCE FIELD 7.
CHAIN
JMP
T33+4
IREPEAT TEST.

.EJECT

PAGE

EXM15

"'1 7 32
1211733
1211734
01735
01736
01737
0174121
1211741
1211742
1211743
01744
01745
01746
01747

~00034

0017')4
100336
10121311
001752
01612100
777776
205250
1214612101
7501211210
420HH
545251
741000
10121604

01750
01751
01752
1211753

100223
601735
226001
016000

01754
1211755
01756
01757
01760
01761
1211762
1211763
1211764
1211765
01766
1211767
1211770
1211771
1211772

000035
001777
100513
100336
100311
12101775
026000
777776
205250
121461211211
7512100121
42121102
545251
741000
1012161214

1211773
1211774
1211775
1211776

10121223
601760
226001
121260121121

01777
02000

000036
12102022
100517
10121336
100311
01212020
036000
777776
20525121
04601211
750000
420103
5452?1

1212001

1212002
02003
02004
02005
02006
1212007
02010
02011
121212112
02013

/TrST XCT· OF LAC· IN LOCF1 (DATA IN FIrLD ~)
T34
34
T35
STFN
ISET FIELDS
12 T[ST WORDS OF FIELD 1.
MOVE
T34W
LOCF1
-2
(LOCF0
LAC
LOCF0+1
DAC
CLA
XCT.
F1LOC
IXCT* OF LAC* AT LOCF1
ISKIP IF AC OIFFERFNT FROM (LAC* 6001
SAO
CLAC· 6001
10K.
SKP
IERROR. XCT. OF LAC· AT LOCF1.
ERRORA
/LAC. 6001 OrO NOT REFERENCE FIELD 1.
CHAIN
/REPEAT TEST.
JMP
T34+3
ITEST WORDS.
T34W
LAC.
61211211
LOCF1
/TEST XCT. OF LAC. IN LOCF2 (DATA IN FIELD 0)
T35
35
T36
/RUN IF FIELD 2 AVAILABLE
TF2
ISET FIELDS
STFN
12 TEST WORDS TO FIELD 2
MOVE
T35W
LOCF2
-2
CLOCFI2I
LAC
LOCF0+1
DAC
CLA
XCT.
IXCT. OF LAC. IN Locr2
F2LOC
ISKIP IF AC DIfFERENT FROM (LAC* 61211211
SAO
(LAC· 6001
10K.
SKP
IERROR. XCT* OF LAC. AT LOCF?
ERRORA
ILAC* 6001 OrO NOT REFERENCE FIELD 2.
CHAIN
/REPEAT TEST.
JMP
T35+4
/TEST WORDS.
T35W
LAC.
612101
LOCF"2
/TEST XCT. OF LAC* IN LOCF3 (DATA IN FIELD 0)
T36
36
T37
IRUN IF rIELD 3 AVAILABLE
TF3
/SET FIELDS
STFN
/2 TEST WORDS TO FIELD 3
MOVE
T36W
LOCF3
-2
(LOCF0
LAC
LOCF0+1
DAC
CLA
F3LOC
/XCT* OF LAC* IN LOCF3
XCT*
/SKIP rF" AC OIFF"ERENT FROM <LAC" 6001
SAO
(LAC" 61211211

PAGE

EXM15

02014
02015

741000
100604

02016
02017
02020
02021

100223
602003
226001
036000

02022
02023
02024
02025
02026
02027
02030
02031
02032
02033
02034
02035
02036
02037
02040

000037
002045
100523
100336
100311
002043
046000
777776
205250
046001
750000
420104
545251
741000
100604

02041
02042
02043
02044

100223
602026
226001
046000

02045
02046
02047
02050
02051
02052
02053
02054
02055
02056
02057
02060
02061
02062
02063

000040
0020,70
100527
100336
100311
002066
056000
777776
205250
046001
750000
420105
545251
741000
100604

02064
02065
02066
02067

100223
602051
226001
056000

02070
02071
02072
02073
02074

000041
002113
100533
100336
100311

SKP
ERROR A

10K.
IERROR. XCT* OF LAC* AT LOCF3.
/LAC* 6001 DID NOT REFERENCE FfELD 3.

CHAIN
JMP
/REPEAT TEST.
ITEST WORDS.
lAC ..
lOCF3
/TEST XCT .. OF LAC* IN LOCF4 (DATA IN FIELD 0)
T37
37
T40
TF4
IRUN IF FIELD 4 AVAILABLE
STFN
/SET FIELDS
MOVE
12 TEST WORDS TO FIELD 4
T37W
lOCF4
-2
(lOCFe
lAC
DAC
LOCF0+1
CLA
/XCT* OF lAC. IN lOCF4
XCT.
SAO
/SKIP IF AC DIFFERENT FROM (LAC* 6001
lOK,
SKP
ERRORA
/ERROR, XCT. OF lAC* IN lOCF4.
IlAC· 6001 DID NOT REFERENCE FIELO 4.
CHAIN
JMP
T37+4
IREPEAT TEST.
/TEST WORDS.
T37W
LAC.
6001
lOCF4
/TEST XCT. OF
T40
40
T41
TF5
IRUN IF F'IElD 5 AVAILABLE
STFN
ISET FIELDS
MOVE
12 TEST WORDS TO FIELD 5
T40W
LOCFe;
-2
(lOCFe
lAC
DAC
lOCFe+l
CLA
XCT.
F'5LOC
/XCT* OF lAC. IN lOCF5
SAO
(lAC· A0e1
/SKIP IF AC DIFFERENT FROM (LAC* 6001
SKP
10K.
ERRORA
IERROR. XCT* OF' lAC. IN lOCF5,
IlAC* 6001 DID NOT REFERENrE FIELD 5.
CHAIN
T40+4
IREpEAT TEST.
JMP
LAC.
6001
T40W
ITEST WORDS.
LOCF5
/TEST XCT. OF LAC* IN LOCF6 (DATA IN F'IELD 0)
T41
41
T42
TF6
/RUN IF FIELD 6 AVAILA8LE
5TFN
/5ET FIELDS
MOVE
12 TEST WORDS TO ~IELO 6

PAG~

EXM15

02075
02076
02077
eJ2100
02HlJ!
02102
02103
02104
02105
02106

002111
066000
777776
205250
046001
750000
420106
545251
741000
100604

02107
02110
02111
02112

100223
602074
226001
066000

02113
02114
02115
02116
02117
02120
02121
02122
02123
02124
02125
02126
02127
02130
02131

000042
002136
100537
100336
100311
002134
07MH!!0
777776
205250
046001
750000
420107
545251
741000
100604

02132
02133
02134
02135

100223
602117
226001
076000

T41W
LOCF6
-2
LAC
DAC
CLA
XCTo
SAO
SKP
ERRORA

(LOCF0
LOCF0+1
F6LOC
(LAC* 6001

IXCTo OF LACo IN LOCF6
ISKIP IF AC DIFFERENT FROM (LAC* 6001
10K
IERROR, XC To OF LAC* IN LOCF6,
ILAC* 60~1 OrO NOT REFERENCE FIELD 6.

CHAIN
IREPEAT TEST,
JMP
T41+4
ITEST WORDS.
T41W
6001
LAC*
Loer6
ITEST XcTo OF LAC* IN LOCF7 (DATA IN FIELD 0)
T42
42
T43
IRUN IF FIELD 7 AVAILABLE
TF7
ISET FIELDS
STFN
12 TEST wORDs TO FIELD 7
MOvE
T42W
Loer7
-2
(LOCF0
LAC
LOCF0+1
DAC
CLA
IXCTo OF LACo IN LOCF7
XCTo
F7LOC
ISKIP IF AC DIFFERENT FROM (LACo 6001
(LACo 6001
SAD
10K.
SKP
IERROR. XCTo OF LAC* IN LOCF7,
ERROR A
ILACo 6001 DID NOT REFERENCE FIELD 7.
CHAIN
IREPEAT TEST
JMP
T42+4
ITEST WORDS.
LACo
T42W
6001
LOCF7
.EJECT

PAGE

EXM15

02136
02137
02140
02141
02142
02143
02144
02145
02146
02147
02150
02151
02152
02153
02154
02155

000043
002156
100336
100311
002154
016000
777776
205252
046001
420101
100223
602141
100604
602150
626001
002150

02156
02157
02160
02161
02162
02163
02164
02165
02166
02167
02110
02111
02112
02173
0 21 ,4
02175
02116

000044
002177
100513
100336
100311
002175
026000
777776
205253
046001
420102
100223
602162
100604
60 21 7 1
626001
'1102171

02177
02200
02201
02202
02203
02204
02205
02206
02207
02210
02211
02212
02213
02214
02215
02216
02217

000045
0022"20
10'11517
100336
100311
002216
036000
717776
205254
046001
420103
100223
602203
100604
60 2 212
626001
002212

02220

'1100046

ITEST XCT" OF JMP .. AT LOCF1
T43
43
T44
STFN
MOVE
T43W
LOCF1
-2
(T438
LAC
DAC
LOCF0+1
F1LOC
XCT"
T43A
CHAIN
JMP
T43+3
ERROR
T438
JMP
T43A
JMP ..
T43W
60 0 1
T43A
ITEST XCT .. OF JMP .. AT LOCF2
T44
44
T45
TF2
STFN
MOVE
T44W
LOCF2
-2
(T448
LAC
DAC
LOCFeI+1
XCT ..
F2LOC
T44A
CHAIN
JMP
T44+4
ERROR
T448
T44A
JMP
6001
T44W
JMP"
T44A
IrEsT XCT" OF JMp" AT LOCF3
T45
45
T46
TF3
STFN
MOVE
T45W
LOCF3
-2
(T458
LAC
DAC
LOCF0+1
XCT ..
F3LOC
T45A
CHAIN
JMP
T45+4
ERROR
T458
T45A
JMP
T45W
6001
JMP"
T45A
ITEST XCT" OF JMp .. AT LOCF4
T46
46

(JUMPS TO FIELD 0
ISET FIELDS
12 TEST WORDS TO FIELD 1

IXCT" OF JMP" IN LOCFl
IREPEAT TEST
IERROR. JMP .. 6001 AT LoeF1 REFERENCED
IFIELD 0 INSTEAD OF FIELO 1.
ITEST WORDS.
(JUMPS TO FIELD 0)
IRUN IF FIELD 2 AVAILABLE
ISET FIELDS
12 TEST WORDS TO FIELD 2

IXCT .. OF JMP .. IN LOCF2
IREPEAT TEST
IERROR. JMP" 6001 AT LOCF2 REFERENCED
IFIELD 0 INSTEAD OF FIELD 2,
ITEST WORDS.
(JUMpS TO FIELD 0)

IRUN IF FIELD 3 AVAILABLE
/SET FIELDS
12 TEST WORDS TO F"IELD 3

IXCT .. OF JMP .. IN LOCF3
IREPEAT TEST
IERROR. JMP" 6001 AT LOCF3 REFERENCED
IFIELO 0 INSTEAD OF FIElO 3.
ITEST WORDS.
(JUMPS TO FIELD

P AGlII'" 2 7
~2221
~2222

~2223

02224
0222'5
"'~226

02227
lt~2230

02231
02232
"'2233
~2234

02235
0 223 6
02237
02240

EXM15
002241
100523
10(71336
100311
002237
046000
777776
205255
17.146001
420104
100223
602224
10(71604
602233
626001
002233

02261

000047
002262
100527
100336
100311
002260
056000
777776
205256
046001
420105
100223
602245
100604
602254
626001
002254

02262
02263
02264
02265
02266
02267
0227'"
02271
02272
02273
02274
02275
02276
02277
02 3 00
02301
02302

000050
002303
100533
100336
100311
002301
066000
777776
205257
046001
420106
100223
602266
100604
602275
626001
002275

02303
02304

000051
002324

02241
02242
02243
02244
02245
02246
02247
02250
02251
02252
02253
02254
02255
02256
02257
0226~

T47
TF4

IRUN IF FIFLn 4 AV~ILAHLF
STFN
ISET FIELDS
12 TEST WORDS TO FTELQ 4.
MOVE
T46W
LOCF4
-2
(T46R
LAC
LOCF0+1
DAC
F4Loe
XCT.
IxeT* OF J~P* IN LPCF4
T46A
CHAIN
JMP
T46+4
IREPEAT TEST
ERROR
IERROR. JMP* 6001 AT LOC F 4 RFFF~ENrEO
IFIELD
INSTEAD OF FIELn 4
JMP
T46W
JMP.
ITEST WORDS.
T46A
ITEST XCT* OF JMp* AT LOeFS (JUMpS TO FIFLn (71».
T47
47
T50
IRUN IF FIELO '5 AVAILARLE
TF'5
STFN
ISET FIELDS
MOVE
12 TEST wORDS TO FIELD 5
T47W
LOCF5
-2
(T478
LAC
LoCF0+1
DAC
XCT.
F5LOC
T47A
CHAIN
JMP
T47+4
IREPEAT TEST
ERROR
IERROR. JMP* 6001 AT LOCF5 REFERENCED
IFIELD 0 INSTEAD OF FIELn 5.
JMP
T47A
6001
T47W
ITEST WORDS.
JMP*
T47A
ITEST XCT* OF JMpo AT LoeF6 (JUMPS TO FIELD ~)
T50
50
T51
TF6
IRUN IF FIELD 6 AVAILABLE
STFN
ISET FIELDS
MOVE
12 TEST WORDS TO FIELD 6
T50W
LOCF6
-2
(T508
LAC
DAC
LOCF"+!
XCT~
F6LOC
IXCT* OF JMP* IN LOCF6
T501A
CHAIN
JMP
IREPEAT TEST
T50+4
ERROR
IERROR. JMP* 6001 AT LOCF6 REFERfNCEO
JMP
T50A
IFIELD 0 INSTEAD OF FIELO 6.
T50W
6001
ITEST WORDS
JMP*
T50A
ITEST XCT~ OF JMp* AT LOCF7 (JUMpS TO FIELD 0)
T51
51
T52
17.1

PAGE

EXM15

02305
02306
02307
02310
02311
0231?
02313
02314
02315
02316
02317
02320
02321
02322
02323

100537
100336
100311
002322
(JI7MHHil

777776
205260
046001
420,107
100223
60230,7
10060,4
60 231 6
626001
002316

T51A
T518
T51W

TF7
STFN
MOVE
T51W
LOCF7
-2
LAC
DAC
XCT*
CHAIN
JMP
ERROR
JMP
JMP*
T51A
.EJECT

IRUN IF rIELD 7 AVAILARLF.
15ET FIELDS
12 TEST WOROS TO FIELD 7.

(T518
LOCF0+1
F 7L Oc
T51+4
T51A
6001

IXCT* OF Jt-'P* IN LOCF7
IRFPfAT TEST
IERROR. JMP* 6001 AT LOC F 7 RFFFRENCEn
IFIELO 0 INSTEAD OF FIELn 7.
ITEST WORDS.

PAGE

EXM15

~2324

~00052

0232'5
02326
02327

~0?34~

0233~

002336
01f.0(i'\0
777776
620101
1002?3
60?3?7

02331
0233?
02333
02334
02335
02336
02337

10~3~6
10~311

6260~1
~023~4

~234(i'\

~00053

02341
02342
02343
02344
02345
02346
02347
02350
02351
02352
02353
02354

002355
1 005 13
100336
100311
002353
026000
777776
620102
100223
602344
626001
002351

02355
02356
02357
02360
02361
02362
02363
02364
02365
02366
02367
02370
02371

000054
002372
100517
100336
100311
002370
036000
777776
620103
100223
602361
626001
002366

02372
02373
02374
02375
02376
02377
02400
02401
02402
02403
02404
02405
02406

000055
002407
100523
100336
100311
002405
046000
777776
6201~4

100223
602376
626001
002403

/TrST OF J"'1P* TO LOCF1. ANr) FROM LOCFl RACK TO FIELD v'
T5)
'52
T53
STr-t\J
/SET FIELOS
"lOVE
/2 TEST wORDS TO FJEUi 1
T52w
LOtTi
-2
/JUMP TO FIELD 1
F1LOC
JMP*
CH4IN
T52A
JMP
T5?+~
/REPEAT TEST
JMP o
/TEST WORDS
T52W
~~01
T52A
/TE5T JMP o TO LOCF2 ANn FROM LOCF2 BACK TO FIflD 0
T53
53
T54
/RUN IF FIFLD 2 AVAILARLF
TF2
STFN
/SET FIELDS
MOVE
/2 TEST WORDS TO FIELD 2
T53W
LOCF2
-2
/JUMP TO FIELD 2
F2LOC
JMP*
CHAIN
T53A
JMP
T53+4
/REPEAT TEST
/TEST WORDS
T53W
JMP*
6001
T5~A

ITE5T JMP o TO LOCF3, At\JD FROM LOCF3 RACK TO FIELD eJ
T54
54
T55
/Rur~ IF FIELD 3
TF3
/SET FIELDS
STFN
MOVE
/2 TEST WORDS TO FIELD 3
T54W
LOCF3
-2
/JUMP TO FIELD 3
F3LOC
JMP*
T54A
CHAIN
/REPEAT TEST
JMP
T54+4
/TEST WOROS
T54W
60~1
JMP*
T54A
/TEST JMP o TO LOCF4, At-.JD FROM LOCF4 BACK TO FIELn V)
T55
55
T56
/RUN IF FIELD 4 AVAILABLE
TF4
STFN
ISET FIELDS
MOVE
/2 TEST WORDS TO FIELD 4
T55W
LOCF4
-2
IJUMP TO FIELO 4.
F4LOC
JMP*
T55A
CHAIN
/REPEAT TEST
JMP
T55+4
JMP ..
ITEST WOROS
T55W
6001
T55A

PAr.E

EXM15

02407

00~056

0241~

0024;>4

~2411

10~527

0241?
02413

100336

~2414

002422

ITrS T JMP* TO
T56
'56
T57
TF"i
STFN
MOVE
T56W

02415
02410
02417

0560~0

l.OeF5

0242~

02421
l/12422
02423

1~W311

777776
620105
1f(H' 223
602413
626~01

002420
000057

02424
02425
132426
02427
02430
02431
02432
02433
02434
02435
(il2436
02437
02440

100533
100336
100311
002437
066000
777776
620106
100223
602430
626001
002435

02441
02442
02443
02444
02445
02446
02447
02450
02451
02452
02453
02454
02455

000060
002456
100537
100336
100311
002454
076000
777776
620107
100223
602445
626001
002452

002441

LOCF~

ANn FROM LOe F 5 BACK TO FIELD 0.
/RUi\i IF FIFLQ 5 AVAILARLF
15ET FIELOS
12 TrST WORDS TO FIELO 5

-2
F5LOC
IJUMP TO F TELD 5
JMP*
CHAIN
T56A
JMP
T56+4
IREPFAT TEST
ITEST WORDS
T56W
JMP*
6001
T56A
ITEST JMP* TO LOCF6 ANn FROM LOC F 6 BACK TO FIELD "-'
T57
57
T6Vl
IRUN IF FIELO n AVAILBLE
TF6
STFN
ISET FIELDS
12 TEST WORDS TO FIEle 6
MOVE
T57W
LOCF6
-2
F6LOC
IJUMP TO FIELD 6
JMP*
CHAIN
T57A
JMP
T57+4
IREPEAT TEST.
ITEST WORDS
T57W
JMP*
6001
T57A
ITEST JMP* TO LOCF7 ANn FROM LOCF7 BACK TO FIELD 0
T60
60
T61
TF7
IRUN IF FIELD 7 AVAILABLF
STFN
ISET FIELDS
MOVE
/2 TtS T WORDS TO FIELD 7
T6~W

T60A
T60W

LOCF7
-2
JMP*
CHAIN
JMP
JMP*
T60A
.EJECT

F7LOC

IJUMP TO FIELD 7

T60+4
6001

IREPEAT TEST
ITEST WORDS

PAGE

EXM11j

02456
02457
02460
02461
02462
02463
02464
"'2465
0246A
1,32467
'-"2470
02471
02472

000061
002473

ITr5T OF 5t<P If\: L(lr'rl
1~"'336

61
To?
STr:N
T61W
LOrr1
-3
JMP*

1~W2?3

T614

60;:>461
741000
002466
626001

JMP
SKP
TolA
JMP*
ITE5T OF 5KP IN
T62
62
T63
TF2
STFN
MOVE
T62W
lOCF2
-3
jMP"
CHAIN
T62A
JMP
SKP
T62W
T62A
JMP ..
ITE5T OF 5KP IN
T63
63
T64
TF3
5TFN
MOVE
T63W
lOCF3
-3
jMP*
CHAIN
T63A
jMP
5KP
T63W
T63A
jMP ..
ITE5T OF SKP I~
T64
64
T65
TF4
STFN
MOVE
T64W
LOCF4
-3
jMP*
CHAIN
T64A

000062
002511
100513
100336
100311
002506
0261300
777775
620102
100223
6132477
741000
002504
626001

132511
02512
02513
02515
02516
02517
02520
02521
02522
132523
02524
02525
02526

000063
002527
100517
100336
100311
002524
036000
777775
620103
100223
602515
741000
002522
626001

02527··
02530
02531
02532
02533
02534
02535
02536
02537
02540

000064
002545
100523
100336
100311
002542
046000
777775
620104
100223

15fT FIELDS
ITEST WORDS TO t:""IELLJ

~OVE

lel(i}311
VJ02470
016000
777775
62C11HH

02473
02474
02475
02476
02477
02500
02501
02502
02503
025134
"'2505
02506
02507
0251'-"

0~514

T61

fll0r

IGO TO FIELD 1

T61+~

IREPEAT TEST
ITEST WOROS,

CH~IN

T61 W

f0(iI 1

lOrF;:>
/RUN IF FIElO 2 AVAILAQLF
ISET FIELDS
ITEST WORDS TO FIELD 2

F2l0r.

IGO TO FIELD 2

T62+4

IREPEAT TEST,
IT[ST WORDS

60r1
LOCF3
IRUN IF FIELD 3 AVAILABLE
15ET FIELDS
ITE5T WORDS TO FIELD 3

r3l0C

IGO TO FIELD 3

T63+4

IREPEAT TEST
ITEST WORDS

6001
LorF4
IRUN IF FIELD 4 AVAILARlE

15fT FIELDS
ITE5T WORDS TO FIELD 4

F4LOC

IGO TO FIELD 4

PAGE

EXM15

~2541

602533

02542
02543
02544

7410~0

02545
(112546
02547
02550
02551
02552
02553
02554
02555
0255t-

02557
02'560
02561
02562

T64W

002540
6260~1

000065
002563
HH~527

100336
100311
002560
05MH'!0
777775

JMP
SKP
T64A

T64+4

~JMP*

6~~\ 1

ITEST OF SKP IN LOrF"i
T65
65
T66
TF5
STFN
MOVE
LoeFS
-3
JMP*
CHAIN
JMP

100223
602551

T65A

741(210(21

T6'5W

002556
62M301

T65A
JMP*
ITEST OF SKP IN
T66
66
T67
TF6
STFN
MOVE
T66W
LOCF6
-3
JMP*
CHAIN
T66A
JMP
SKP
T66W
T66A
JMP*
ITEST OF SKP IN
T67
67
T70
TF7
STFN
MOVE
T67W
LOCF7
-3
JMP*
CHAIN
T67A
JMP
SKP
T67W
T67A
JMP*
.EJECT

000066
002MH
100533
100336
100311
002576
066000
777775
100223
602567
741000
002574
626001

02601
02602
02603
02604
02605
02606
02607
026H'I
02611
02612
02613
02614
02615
02616

000067
002617
100537
100336
100311
002614
076000
777775
620107
100223
602605
741000
002612
626001

620H~6

IF FIFLD 5 AVAILARL'
ISET FIELDS
ITEST WORDS TO FIEL.D 5

/RLJN

T6~W

6201~5

02563
02564
02565
el2566
02567
02570
02571
02572
02573
02574
02575
02576
02577
02600

IREPEAT TEST
/TEST WORDS

F5LOC'

/Go TO FIELD 5.

T6"5+4

IREPEAT TEST
/TEST WORDS

SKP

6001
LOCF6
IRUN IF FIELD 6 AVAILABLE
ISET FIE"LDS
ITEST WORDS TO FIELD 6

F6LOC

IGO TO FIELD 6

T66+4

IREPEAT TEST
ITEST WORDS

6001
LOCF7
IRUN IF FIELD 7 AVAILARLF
ISET FIELD NUMBERS
/TEST WORDS TO FIELD 7

F7LOC

IGO TO FIELD 7

T67+4

IREPEAT TEST
ITEST WORDS

M:W1

PAGE

EXM15

~2617

~0V'070

~262~

~026~4

""2621
02"22

100336

~2623

02631
02632
02633

002631
A0(il10
777775
620101
100223
602622
546000
00?627
626001

02634
02635
02636
02637
02640
02641
02642
02643
02644
02645
02646
02647
02650
02651

000071
002652
100513
100336
100311
002647
026000
777775
620102
100223
602640
546000
002645
626001

02652
02653
02654
02655
02656
02657
02660
02661
02662
02663
02664
02665
02666
02667

000072
002670
100517
100336
100311
002665
036000
777775
620103
100223
602656
546000
002663
626001

0267[11
02671
1i'2672
02673
02674
02675
02676
02677
02700
02701

000073
002706
100523
100336
100311
002703
046000
777775

02624
02625
02626
02627
0263~

H'l0311
'~1

/TrST OF SAD IN
T70
70
T71
STFN
MOVE
T7ti1W
LOCFl
-3
JMP*
CHAIN
T70A
JMP
T7~W
SAO
T70A
JMP*
ITEST OF SAD IN
T71
71
T72
TF2
5TFN
MOVE
T71 W
LOCF2
-3
JMP*
CHAIN
T71A
JMP
T71W
SAO
T71A
JMP.
/TE5T OF SAD IN
T72
72
T73
TF3
STFN
MOVE
T72W
LOCF3
-3
JMP.
CHAIN
T72A
JMP
T72W
SAD
T72A
JMP.
/TEST OF SAD IN
T73
73
T74
TF4
STFN
MOVE
T73W
LOCF4
-3

JMPo

62~H04

H"~223

T73A

CHAIN

L.OC'Fl
/SET FIELDS
/TEST WORDS TO FIELD 1

F1l0C

/GO TO FIELD 1, AC IS

T7(11+3

/REPEAT TEST
/TEST WORDS

f,~W0

(11 •

60V11
LOCF?
/RUN IF FIELO 2 AVAILABLE
/5ET FIELDS
ITEST WORDS TO ~IELD 2

F2LOC

IGO TO FIELD 2. AC I S (/I.

T71+4
6000

/REPEAT TE5T

6001
LOCF3
/RUN IF FIELD 3 AVAILABLF
/SET FIELDS
ITEST WORDS TO FIELD 3

F3LOC

/GO TO FIELD 3. AC IS

T72+4
6000

/REPEAT TEST
/TEST WORDS

(/I.

6001
LOCF4
/RlJN IF FIELD 4 AVAILABLE
/5ET FIELDS
ITEST WORDS TO FIELD 4

F4LOC

IGO TO FIELD 4. AC Is 0.

PAGE

EXM1?

02702
02703

00?674
546000

T7,1oJ

JMP

T73+4

SAD

6000

~2704

"'027~1

T73A

02705

6260°1

JMP*

02706
02707
02710
02711
02712
02713
02714
02715
02716
02717
02720
02721
02722
02723

000074
002724
1005?7
100336
100311
00?721
056000
777775
620105
100223
602712
5-46000
"'02717
626001

ITrST OF SAD IN
T74
74
T7'1
TFs
STFN
MOVE
T74W
LOCF5
-3
JMP*
T74A
CHAIN
JMP
T74\o1
SA[)
T74A
JMPo

000075
002742
100533
100336
100311
002737
066000
777775
620106
100223
602730
5460Pl0
002735
626001

IT[ST OF SAD IN
T75
75
T76
TF6
STFN
MOVE
T75W
LOCF6
-3
JMPo
T75A
CHAIN
JMP
T75W
SAO
T75A
JMP o

LOCF6

02724
02725
02726
02727
02730
02731
02732
02733
02734
02735
02736
02737
02740
02741

000076
002760
100537
100336
100311
002755
076000
777775
620107
100223
602746
546000
002753

ITEST OF SAD IN
T76
76
T77
TF7
STFN
MOVE
T76W
LOCF7
-3
JMP*
CHAIN
T76A
JMP
T76i-1
SAn
T76A
JMPo

LOCF7

02 7 42
02743
02744
02745
02746
02747
02750
02751
02752
02753
02754
0275'5
02756
02757

6260~1

.EJECT

IRfPEAT TEST
ITEST WORDS

n0 V1 1

LOCF?
IRUN IF rrFLn ~ AVArLARLE
ISET FIELDS
ITE5T WORDS TO FIELD 5

F5LOC

IGO TO FTELD 5. AC r s 0.

T74+4
6000

/REPEAT TEST
ITrST WORDS

600.1

IRUN IF FIfLn A AVAILABLE
ISET FIELDS
ITEST WORDS TO FIELD 6

F6LOC

IGO TO FIELD 6. AC Is

T7'5+4
6000

IREPEAT TEST
ITE5T WORDS

01.

6001

IRUN IF FIELD 7 AVAILARLE
ISET FIELDS
ITEST WORDS TO FIELD 7

F7LOC

IGO TO FIELD 7. AC r S 0,

T76+4
6000

IREPEAT TEST
/T[ST WORDS

60~1

PAGE

EXM15

0276~

~00077

02761
0276?
02763
02764
02765
02766
02767
02770
027 7 1
02772
02773

0030~3

777773
6201"'1
505215
545233
741000
100604

02774
02775
02776
02777
03000
03001
03002

100223
602763
106001
000000
206001
6260"'4
002770

03003
03004
03005
03006
03007
03010
03011
03012
03013
03014
03015
03016
03017

000100
003027
100513
100336
100311
003022
026000
777773
620102
505215
545230
741000
10060 4

03020
03021
03022
03023
"'3024
03025
1331326

100223
603007
106001
00013013
206001
626004
003014

03027
03030
03031
03032
03033
03034
03035
03036
03037
03040
03041

000101
003053
1013517
100336
100311
003046
036000
777773
620103
505215
5452?6

100336
100311
Cil02776
0160~0

ITrS T THAT JMS IN LOCF"1 STORES
T77
77
T100
STrN
MOVE
T77w
lOeF"l
-5
JMP(t
F1 l0 C
(K70K
AND
T77A
(K10K
SAD
SKP
ERQORA

Pr~-5

CORRECTLY

ISET FIELns
ITrST WORDS TO FIELD 1

IGO TO FIELD 1
IISOLATE AC 3-5
IAC3-5=001?
IYES.
JMS IN FIEln 1 nIn
INO. ERRQR.
INOT STORE PC3-5 CORRECTLY,

CHAIN
JMP
IREPEAT TEST,
T77+3
T77W
ITEST WORDS
JMS
60~1
0
LAC
61301
JMp*
6004
T77A
ITEST THAT JMS IN LOCF2 STORES PC3-5 CORRECTLY
T100
100
T101
IRUN IF FIELD 2 AVAILARLE
TF2
IS(T rIELDS
STF"N
MOVE
ITEST WORDS TO F"IELD 2
T100W
LOCF2
-5
IGO TO FIELD 2
F2LOC
JMP*
(K70K
AND
IISOLATE AC3-5
T1V'10A
(K20K
SAO
IAC3-5=010?
IYES,
SKP
INO. ERROR, JMS IN FIELD 2
ERROR A
1010 NOT STORE PC3-5 CORRECTLY.
CHAIN
JMP
T100+4
ITEST WORDS.
6001
T100 W JMS

""LAC

6001
JMp*
61304
T100A
IT[ST THAT JMS IN LOCF3 STORES PC3-5 CORRECTLY
T101
101
T102
IRUN IF" F"IELO 3 AVAILABLE
TF3
STF"N
ISET FIEL.DS
ITEST WORDS TO FIELD 3
MOVE
T1v'l1W
LOCF3
-5
IGO TO FIELD 3
F3LOC
JMP*
(K70K
/ISOLATE AC3-5
AND
T101A
(K30K
SAO
IAC3-5=011?

PAGE

EXM15

03~42

7 4 11(}li"~
10060 4

SKP
ERRORA

1002?3
603033
106001

CHA I ~J

03043
03044
03045
03046
03047
03050
03051
03052

206001
626004
f.?l03040

03053
03054
03055
03056
03057
03060
03061
03062
03063
03064
03065
03066
0 3 f.?l67

000102
003077
U!J0523
100336
100311
003072
046000
777773
62Vl104
C;05215
545261
741000
10060 4

03070
03071
0307?
03073
03074
03075
03076

100223
603057
106001
000000
206001
626004
003064

03077
03100
03HH
03H!!2
03UJ3
03104
03105
03106
03107
03110
03111
03112
03113

000103
003123
100527
100336
100311
003116
056000
777773
620105
505215
545224
7410f.?l0
10060 4

03114
03115
03116
03117
03120
03121
03122

100223
603103
106001
0000t1l0
206001
626004
003110

vHHiHH"0

T101\oJ

JMP
JMS

'LAS
"

IYES,
INO. ERROR, JMS IN FIELD ,", 010
INOT STORE PC3-5 cnRR[(~TL Y ,
T1V~1+4

6 '" ~~ 1

IREPfAT TEST.
ITE5T WORDS.

60111
JMp*
6004
T101A
ITE5T THAT JMS IN LOcF4 STORrS PC3-5 CORRECTLY
T102
102
T103
TF4
IRUN IF FIELn 4 AVAILA8LF
ST~N
ISET FIELOS
MOVE
ITE5T WOROS TO FIELO 4
T1V'12W
LOCF4
-5
F4l0C
IGO TO FIELD 4
JMP*
AND
(K70K
IISOlATE AC3-5
T1Vl2A
(K40K
SAO
IAC3-5= 00?
SKP
IYES.
ERRORA
INO. ERROR. JMS IN FIELD 4 oro
INOT STORE Pc3-5 CORRECTLY.
CHAIN
JMP
IREPEAT TEST.
T102+4
JMS
ITEST WORDS.
T102 W
6001
0
lAC
6001
JMp*
6004
Tlf.?l2A
/TEST THAT JMS IN LOCF5 STORES PC3-5 CORRECTLY
T103
103
T1Ci'4
TF5
IRUN IF FIELD 5 AVAILA8lE
STFN
ISET FIELDS
MOVE
ITEST WORDS TO FIELD 5
T103W
lOCF5
-5
IGO TO FIELD 5
F5LOC
JMP*
AND
(K70K
IISOlATE AC3-5
T103A
(K'50K
SAO
IAC3-5= 011
5KP
IYES.
INO, ERROR. JMS IN FIELD 5 DID
ERROR A
INOT STORE Pc3-5 CORRECTLY,
CHAIN
JMP
/REPEAT TEST,
Tl913+4
JMS
ITE5T WORDS.
T103101
60li'1
0
lAC
6001
JMp*
A0Vl4
T103A
ITrS T THAT JMS IN LOCF6 STORES PC3-5 CORRECTLY

PA(..[

EXM15

~3123

vHHiH~4

(A 31 24

03137

V103147
100533
100336
100311
003142
066000
777773
620106
50')215
54'5222
741000
10V1604

03140
03141
03142
03143
03144
03145
03146

HI0223
603127
106001
0000013
206001
6261304
003134

03147
0315V1
03151
03152
03153
03154
03155
03156
03157
03169'
03161
03162
0 31 6 3

000105
003173
1130537
100336
1130311
003166
076000
777773
620107
505215
545215
74HH'10
10060 4

03164
03165
03166
03167
03170

100223
603153
106001

0312">
(~3:' 2 fJ
03127
0.313"

0.3131

.13132
~3133

03134
3313')
~313f,

~3171

03172

T1(714

104
T 1'5

T104A

TF I.,

IRUN IF FIFLn 6 AVAIlARLr

STt="N

15FT FIELDS

MOVE
T104W
lOCF6
-5
JMP*
AND
SAO

ITEST WORDS TO FIELD

r;6l0C
('<70K
('<~0K

SKP

rRRORA

IGO TO FIELD 6
IISOlATE AC3-5
IA C3-">=110?
/YES.
INa. ERRnR. JMS If'. FIllU 6 DID
INOT STORl Pc3-5 cnRREcTLY

CHAIN
T1Vl4+4
IREpE"AT TEST
JMP
f.001
JMs
ITEST WORDs.
T104W
0
6 {'\~, 1
lAC
60v4
JMp*
T104A
ITEST THAT JMS IN LOCF7 STORES PC3-5 CORRECTLY
T105
105
T106
IRUN IF FIELD 7 AVAILARLE
TF?
/5ET FIELDS
STF"N
MOVE
ITEST WORDS TO FIELD 7
T105W
LOCF7
-5
JMPi)
IGO TO FIELD 7
F7LOC
(K70 K
IISOLATE AC3-5
AND
T105A
(K70K
SAO
IAC3-5=1117
SKP
IYES.
rRRORA
INO. ERROR. JMS IN FIELD 7 oro
INOT STORE PC3-5 CORRECTLY
CHAIN
IREpEAT TEST
T1V'15+4
JMP
6001
JMs
T105W
ITEST WORDs.

(J!00000

206001
626004
003160

LAC
JMpo
Tlel5A
.EJECT

6001
6004

PAGE

EXM15

~3173

0'HH~6

03174
03175
03176
03177
03200
03201
03202
03203
03204
03205
03206
0 32 07
03210
03211

~03214

205262
040020
143204
620101
000000
203204
505215
545233
741000
100604

03212
03213

100223
603176

03214
03215
03216
03217
03220
03221
03222
03223
03224
03225
03226
03227
0323 0
03231
03232
03233

000107
003236
100513
100336
205230
060102
205263
040020
143226
620102
000000
203226
505215
545 23 0
741000
100604

03234
03235

100223
603220

03236
03237
03240
03241
03242
03243
03244
03245
03246
03247
0325Pl
03251
03252
03253
03254

000110
003260
100517
100336
205230
060103
205264
040020
143250
620103
000000
203250
505215
545226
741000

100336
205230
~60HH

ITrST THAT CAL*
10A
T106
T1 (~7
STrN
LAC
DAG-It
LAC
[lAC

DrM
JMP*

T106A

IN LOeF1 REFERENCES FIELn

(GAL*
FiLOC
( TH~t.A
L 20
T1V'16A
F1 LO C'

ANn STORES

P~3-5

CORREcTLY.

15FT FIELDS
ITEST wORD Ttl LOCF1

ISET INDIRECT POINTER IN LOG 2rA
ITO T1V16A.
/tfRO OUT T1061\
IGO TO FIELD 1 TO nO CAL{,

LAC
ANn
SAn
SKP
ERRORA
CHAIN
JMP
ITEST THAT CAL*
T107
107
Tl10
TF2
STFN
LAC
DAC*
LAC
DAC
D1M
JMP*
eJ
T107 A
LAC
AND
SAD
SKP
ERRORA
CHAIN
JMP
ITEST THAT CALc.
11(.'1
T110
Tll1
TF3
STFN
LAC
OAC*
LAC
DAC
D1M
JMP*
T110A
0
LAC
ANI')
SAO
SKP

T106A
(K70K
(K10K

IGET C (T106A)
/ISOLATE AC3-5
IAC3-5=00 1 ?
IYES.
INO. ERROR. CAL* IN LOCFl
1010 NOT STORE PC3-5 CORRECTLY.

/REPEAT TEST.
T106+3
TN LOCF2 REFERENCES FIELD VI ANn STORES PC3-5 CORREcTLY.

cCAL*
F2LOC
(TH2J7A
L20
T1eJ7A
F2LOC
T107A
(K70K
(K20K

IRUN IF FIELD 2 AVAILABLE
ISET FIELDS
ITEST WORD TO LOCF2
ISET INnrRFCT POYNTER IN LOC21lJ
ITO T1~7A
I1ERO TO T107A
IGO TO FIELD 2 TO no CAL*

IGET C(THnA)
IISOLATE AC3-5
I AC3-5=01!i'l?
IYES.
INO. ERRoR. CAL* IN LOCF2
1010 NOT STORE PC3-5 CORRECTLy,

TH'!7+4
IREPEAT TEST.
IN LOCF3 RErERENCES rIELO 0 AND STORES PC3-5 CORRECTLY.

(CAL*
F3LOC
CT11eJA
L20
T110A
F3LOC
T110A
(K70K
(K30K

IRUN IF FIELD 3 AVAILARLE
ISET FIELDS
ITEST WORD TO LOCF3
ISET POINTER IN LOC20 TO T110A

12ERO T110A
IGO TO FIELD 3 TO 00 CAL*
/GET C (T110A)
IISOLATE AC3-5
IAC3-5=011?
IYES.

PAGE

EXM15

,~3 2 55

1006~4

03256
03257

100223
603242

03260
03261
03262
03263
03264
03265
03266
03267
03270
03271
03272
03273
03274
03275
03276
03277

00?lii
~03302

100523
100336
205230
~6~104

205265
040020
143272
62~H04

00"'000
203272
505215
545261
741000
100604

03300
03301

100223
603264

03302
03303
03304
03305
1333136
03307
0331",
03311
03312
03313
03314
03315
03316
03317
03320
03321

00"'112
003324
1013527
100336
2135230
0MH05
205266
040020
143314
620105
000000
203314
505215
545224
741000
100604

03322
03323

100223
603306

0332 4
03325
03326
03327
0333003331
03332
03333
03334
03335

000 11 3
003346
100533
100336
205230
060HII6
205267
040020
143336
620106

ERRORA

INO, ERROR. CAL* IN

LOCF~

1010 NOT STORE Pr3-5 CORRECTLY.

CHAIN
IREPEAT TEST.
JMP
T110+4
ITEST THAT CAL* IN LOC!="4 REFERENCES FIELn 0 AND STORrS PC3-5 CORREcTLY.
111
Tl11
T112
TF4
IRUN IF FrELn 4 AVAILARLF
ISET !="IF.LDS
ST!="N
ITEST WORD TO LOC!="4
LAC
(CAL*
F4LOC
DAC*
ISET POINTER I r--I Lor20 TO Tl11A
LAC
(Ti11A
oAC
L20
12ERO T111A
olM
Tl11A
IGO TO FIELD 4 TO [10 CAL*
JMP.
F4LOC
0
T111A
IGET C CT11iA)
LAC
T1i1A
(K70K
IISOLATE AC3-5
ANO
(K40K
IAC3-5= 00?
SAO
IYES.
SKP
INO. ERROR. CAL* IN LOCF4
ERRORA
1010 NOT STORE PC3-5 CORRECTLy.
CHAIN
IREPEAT TEST
JMP
T111+4
IT[ST THAT CAL. IN LOCf5 REfERENCES FIELD 0 AND STORES PC3-5 CORRECTLY.
112
T112
T113
IRUN IF fIELD 5 AVAILABLE
TF'5
ISET FIELDS
STFN
ITEST WORD TO LOCF5
(CAL.
LAC
F5LOC
DAC·
ISET POINTER IN LOC20 TO T112A
(T112A
LAC
L20
oAC
12ERO T112A
T112A
olM
IGO TO FIELD 5 TO no CAL*
JMPo
F5LOC
0
T112A
IGET C (T112A)
LAC
T112A
(K70K
IISOLATE AC3-5
AND
(K50K
IAC3-5=101?
SAO
IYES.
SKP
INO. ERROR. CAL* IN LOCF~ DIn
ERROR A
INOT STORE PC3-5 CORRECTLY.
CHAIN
IREPEAT TEST
JMP
T112+4
ITEST THAT CAL* IN LOC!="6 REFERENCES FIELD 0 AND STORES PC3-5 CORRECTLY.
T113
113
T114
TF6
IRUN IF FIELD 6 AVAILABLF
15ET FIELDs
STFN
ITEST WORD TO LOCFA
LAC
(CAL*
F6LOC
DAC*
ISET POYNTFR IN Lor2~ TO T113A
LAC
cT113A
DAC
L20
T113A
li ERO T113A
DlM
JMP.
IGO TO FJELD 6 TO no CAL*
F6LOC

PAGE

EXM15

03336
(.lJ3337

00~(H'\0

0334Q!

~05215

~3341

545222
741000

03342
03343

10V'6~4

03344
03345

10V'223

03346
03347
0335?
el3351
03352
03353
03354
03355
03356
03357

~0e114

603330
0033H'J
100537
10V'336

03361
03362
03363
03364
03365

205230
060107
2 0 5270
04"'020
143360
620107
000000
203360
505215
545215
741000
100604

03366
03367

10"0223
603352

0336~

T113A

?0~336

'"
LAC
ANn
SAO
SKP
ERRORA

CHAIN
JMP
IT(ST THAT CAL*
T114
114
T115
TF7
5TFN
LAC
DAC*
LAC
OAC
D~M

JMP*
T114A

LAC
AND
SAO
SKP
ERRORA
CHAIN
JMP
.EJECT

T113A
(K70K
(K60K

IGET C (Tl13A)
IISOLATE AC3-5
tAC3-'5= ~?
Iyrs.
INO. ERRnR. CAL* IN LOCF6
1010 NOT STORE PC3-5 CORRECTLY.

IREPF:AT TEST,
T113+4
IN LOCF7 REFrRENcES FIELD 0 ANn STORrS Pr3-5 cnRRECTLY.

<CAL*
F7LOC

IRUN IF FltLO 7 AVAILA8LF
15ET FIELDS
ITEST WORD TO LOCF7

(T114A

15ET POINTER IN LOC20 TO T114A

L20
T114A
F7LDC

I~ERO

T114A
IGD TO FIELD 7 TO no CAL*

T114A
<K70K
(K70K

IGET C (T114A>
IISOLATE AC3-5
IAC3-5= 111
IYES.
IND, ERROR. CAL* IN LOCF7
1010 NOT STORE PC3-5 CORRECTLY.

T114+4

IREPEAT TEST

PAGE

EXM15

(ij3~70

00011'5
003412
1121121336
100311

03371
~3372

03373
03374

12112134~7

03375
03376
03377
03400
03401
03402
03403
03404

0160~0

ITEST THAT AUTO-INnEX FROM FIELD 1 RFFERFNr,E5 FIELD ~ ~Nr POINTS TO FIELO 0
Tl15
11'5
T116
15ET FIELDS
STFN
t-iOVE
ITEST WORDS TO FIELD 1
T115W
LOr: F l

777775
21215271

-3

LAC
OAC
LAC
DAC
JMP ..
ERROR

~460Q!l

205250
12140010
62etHH

10061214

0341215
03406
121341217
03410
03411

121034~4

03412
1213413
1213414
1213415
1213416
03417
03420
1213421
03422
03423
1213424
1213425
1213426
03427

01210116
01213435
1121121513
10121336
11210311
12103432
1212600121
777775
205272
046001
205250
0401211121
6212111212
10121604

1213430
1213431
03432
03433
03434

100223
603416
62001121
626002
003427

03435
03436
03437
0344121
03441
03442
0 3443
1213444
1213445
03446
03447
03450
03451

000117
00346121
100517
100336
10121311
003455
121 36 1210121
777775
21215273
121461211211
205250
0401211121
62121103

100223
603373
62001121
62612102

(J~P T1158
LOCF0+1
(LOCF0
L10
F1LOC

CHAIN
T115+3
JMP
1121
T115W
JMP"
JMP ..
6121~2
T115A
THAT AUTO-INDEX
116
T117
TF2
STFN
MOVE
T116W
LOCF2

1 5 ET

LOC1~

IN FIFLn r

IGO TO FIELD 1.
IERROR. AUTO-INDEXING FRGM FIELD 1
IPOINTErr TO FIELD 1 INSTEAn OF FI£LD

121

T1158

IREPEAT TEST.
ITEST WORDS.

IRUN IF FIELD 2 AVAILABLE
ISET FIELDS
ITEST WORDS TO FIELD 2

-3

T116A

LAC
DAC
LAC
DAr:
JMP ..
FRROR

(JMP T1168
LOCF0+j
(LOCFe!
L1Ci1
F2LOC

IRE TURN INSTRUCTION TO LoCF0+1
ISET lOC10 IN FIELD 0

IGO TO FIELD 2
IERROR. AUTO INDEXING FROM FIELD 2
IPOINTED TO FIELD 2 INSTEAD OF FIELD 121.

CHAIN
T116+4
IREPEAT TEST
JMP
1121
ITEST WORDS.
T116W
JMP"
JMP ..
612102
T116A
ITEST THAT AUTO-INDEX FROM FIELD 3 REFERENCES FIELD 0 ANa POINTS TO FIELD 0
117
T117
T120
IRUN IF FIELD 3 AVAILARLt
TF3
IsET rIELDs
STrN
ITEST WORDS TO FIELD 3
MOVE
T117W
Locr3
T1168

-3

LAC
OAC
LAC
DAC
JMP ..

(JMP T1178

IRE~URN

INSTRUCTION TO LoCF0+1

LOCF~+1

(LOCF0
L lIi'

r3LOC

ISET LOC10 IN FIELn

IGO TO FIELD 3

PAGE

EXM15

03452

Hl0604

T117A

ERqOR

0345~

100223
603441
620010
6260V112
0034t)2

T117R

CH A I f\;

03454
0345t)
03456
03457
V1I3461
03462
03463
03464
03465
03466
03467
03470
1213471
03472
03473
03474
03475

000i2Vl
003503
10V11523
Hl0336
100311
0035Vl0
0460V110
777775
205274
0461211211
20t)250
040010
620104
HHl!604

03476
03477
03500
03501
03502

100223
603464
620010
626002
003475

03503

000121
003526
100527
100336
100311
003523
056000
777775
205275
046001
205250
040010
620105
100604

Vl3460

~3504

03505
03506
03507
03510
03511
03512
03513
03514
~3515

03516
03517
03S20
0352 1
03522
03523
03524
03525

100 223
603507
620010
626002

03526
03527
03530
03531
03532

000122
003551
100533
100336
100311

0035~0

T117w

IERROR. AUTO: INDrXING FRiiM FIFLO 3
IPOINTEn Tn FIELD ~ I~\STFArl (iF FIELD 0

J~p

T117+4

J~P*

1 't

IREPEAT TEST
ITEST WORDs

JMP*
6002
T117A
IT(ST THAT AUTP-INGEX rROM FIELD 4 RrFERFNrES FIELn VI AlIJn POli\iTS Tn FI(L{I
Tl?0
12v
T121
TF 4
IRUN IF FIFLD 4 AVAILARLF
5TFN
15ET FIFLDs
~O'JE
ITEST WORDS TO FIELD 4.
T120W
LOCF4
-3
LAC
(JtvlP T1208
IRE TURN I NSTRUCT I 01\1 TO L(iC r el+l
DAC
LOCF0+1
(LOCF0
LAC
ISET LOC10 IN FIELD I')
DAC
L10
F4Lor;
JMP*
IGO TO FIELD 4
T120A
ERROR
IERROR. AUTO-INDEXING FROM FIELD 4
IPOINTED TO FIELD 4 INSTFAD OF FIELD 0
CHAIN
)121218
JMP
T120+4
IREPEAT TEST,
JMPo
ITEST WORDS.
T120 W
10
6002
JMP*
T120A
ITrST THAT AUTO-INDEX FROM FIELD 5 REFERENCES FIELD 0 AND POINTS TO FIELD
T121
121
T122
TF5
IRUN IF FlfLO 5 IS AVAILABLE
STFN
ISET FIELDS
MOVE
ITEST WORDS TO FIELD 5
T121W
LOCF')

fZI

-3

T121A
T1218
T121W

LAC
DAC
LAC
DAC
JMP*
ERROR
CHAIN
JMP
JMP*
JMPo

(JMP T1218
LOCFfZI+1
(LOCF0
L1V'
F5LOC

T1?1+4
lel

IRE TURN INSTRUCTION To LnCF0+1
ISET LOCH' IN FIELD 0

IGO TO FIELD 5
IERROR. AUTO-INDEXING FROi'-1 FIELD 5
IPOINTED TO FIELD 5 INSTFM) nF FIELD

fZI

IREPEAT TEST
ITEST WORDS.

6002

Tl~lA

ITEST THAT AUTO-INDEX FROM FIELD 6 REFERFNCEs FIELD 0 ANf' POINTS TO FIELD 0
T122
122
T123
TFf>
IRUN IF FIELD 6 AVAILAfjL:
STFN
ISET FIELDs
MOVE
ITEST WORDS TO FIELD 6

PAG~

EXM15

V'3533

03537
03540
03541
03542
03543

e!03546
066etetet
777775
205276
046001
205250
040010
620106
100604

03544
03545
03546
03547
03550

10 0 223
603532
620010
626002
003543

03551
03552
03553
03554
03555
03556
03557
03560
03561
03562
03563
03564
03565
03566

000123
003574
100537
100336
100311
003571
076000
777775
205277
046001
205250
040010
620107
100604

03567
03570
03571
03572
03573

100223
603555
620010
626002
003566

03534
03535
~3536

T122A

T122W
LOCF6
-3
LAC
DAC
LAC
DAC
JMP*
ERROR

(J~P T1228
LOrF0+1
(LOCF0
LUI
F6LOC'

IRE TURN INSTRUCTION TO LnCF0+1
ISET

LOCH~

IN FIELD 0

IGO TO FIELD 6
IERROR. AUTO-INDEX FROM FIELD A
IPOINTED TO FI(Ln 6 INSTEAD nF FIELD 0

CHAIN
T122+4
JMP
IREPEAT TEST
10
T122W
ITEST WORDS
JMP*
6002
JMP*
T+22A
ITEST THA AUTO_INDEX FROM FIELD 7 REFERENCES FIELo '" ANO POINTS TO FIELD 0
T123
123
T124
TF7
IRUN IF FIELn 7 AV'AILARLE
STFN
ISET FIELDS
MOVE
ITEST WORDS TO FIELD 7
T123 W
LOCF7
-3
LAC
(JMP T1238
IRE TURN INSTRUCTION TO LoCF0+1
LOeF0+1
DAC
(LOCF0
ISET LOC10 IN FIELn 0.
LAC
DAC
L10
JMP.
F7LOC
IGO TO FIELD 7
ERROR
IERROR. AUTO-INDEX FROM FIELD 7
T123A
IPOINTED TO FIELD 7 INSTEAD OF FIELD 0
CHAIN
T123B
T123+4
JMP
IREPEAT TEST
10
ITEST WORDS
T123W
JMP*
JMP.
6002
T123A
.EJECT
T1228

PAGE

EXM15

03574
03575
03576
03577
03600
03601
03602
03603
03604
03605
03606
03607
03610
03611
03612
1213613

V'l0V'1124
V'l03626
HH'l336
100311
003620
0160Q10
777772
?05300
100557
620101
200000
505 21 5
545233
741000
10121604

03614
03615
03616
03617
03620
03621
03622
03623
03624
03625

100223
603577
100604
603614
700042
740000
740000
700002
626005
003616

03626
03627
03630
03631
03632
03633
03634
03635
03636
03637
03640
03641
03642
03643
03644
03645
03646

000125
003661
100513
100336
100311
003653
026000
777772
205301
040001
100557
620102
2000010
505215
5452310
741000
100604

03647
03650
03651
03652
03653
03654
03655
03656

HHl223
603632
100604
603647
700042
740000
740000
700002

0400~1

ITEST THAT INTERRUPT FRlW FIEL[)
T124
124
T125
STFN
MOVE
T124\o/
LOCFl
-6
(JMP T124A
LAC
OAC
1
JMS
STI='"LG
F 1l0C
JMP*
LAC
T124A
V'I
ANn
(K70K
(K10K
SAD
SKP
ERROR A

T1248
T124\o/

ITEST
T125

T125A

T125B
T125W

CHAIN
JMP
T124+3
ERROR
JMP
.-3
ION
NOP
NOP
IOF
60Vl5
JMP*
T124B
THAT INTERRUPT FROM FIELD
125
T126
TF2
5TFN
MOVE
T125W
LOCF2
-6
(JMP T125A
LAC
DAC
1
JMs
sr FLG
F2LOC
JMP*
LAC
0
(K70K
AND
SAO
(K2e1K
SKP
ERRORA
CHAIN
JMP
ERROR
JMP
ION
NOP
NOP

tor

T125+4

STORES pC3-5 CORRErTLY

ISET FIELDS
ITEST WORDS TO FIELD 1

ISET INTERRUPT RETURt-J
ISET TTV PRINTER FLAG.
IGO TO FIELD 1
IGET CONTEt\lTS OF LOC0
IISOLATE AC.3-5
IAC3-5=001?
IvEs.
IND. ERROR. INTERRUPT FROM FIELD 1
ISTOREO PC3-5 INCORREcTLY
IREPEAT TEST
IFAILED TO
IINTERRUPT
ITEST WORDS.

2 STORES PC3-5 CORRECTLY.
IRUN IF FIELD 2 AVAILA8LE
15ET FIELDS
ITEST WORDS TO FIELD 2

ISET INTERRUpT RETURN
IsET TTY PRINTER FLAG
IGO TO FIELD 2.
IGET CONTENTS OF LOC0
IISOLATE AC3-5
IAC3-5=010?
IYES.
IND. ERROR. INTERRUPT FROM FIELD 2
ISTOREO pC3-5 INCORRECTLY,
IREPEAT TEST.
IFAILED TO INTERRUPT

. -3

ITEST WORDS,

- PAGE

EXM15

03657
0366'"

626005
0036'51

03661
03"6?
03663
03664
03665
03666
03667
03670
03671
03672
03673
03674
03675
03676
03677
03700
03701

000126
003714
10"'517
100336
100311
003706
036000
777772
205302
040001
100557
620103
200000
505215
545226
741000
100604

03702
03703
03704
03705
03706
03707
03710
03711
03712
03713

100223
603665
100604
603702
700042
740000
740000
700002
626005
003704

03714
0371'5
03716
03717
03720
03721
03722
03723
03724
03725
03726
03727
03730
03731
03732
03733
03734

000127
003747
100523
100336
100311
003741
046000
777772
205303
040001
100557
620104
200000
505215
545261
741000
100604

03735
03736
03737
03740
03741

100223
603720
100604
603735
700042

JMP~

60?15

T1258
ITEST THAT INTERRUPT P~OM FIELD
T126
126
T127
TF3
STFN
MOVE
T126 W
LOCF3
-6
(JMP T126A
LAC
DAC
1
STFLG
JMS
JMP~
F3LOC
LAC
0
T126A
(K70K
AND
(K30K
SAO
SKP
ERRORA

T1268
T126W

/TEST
T127

T127A

T1278
T127W

CH.IN
JMP
T126+4
ERROR
JMP
.-3
ION
NOP
NOP
IOF
JMP.
60"'5
T1268
THAT INTERRUPT FROM FIELD
127
T130
TF4
5TI="N
MOVE
T127W
LOCF4
-6
(JMP T127A
LAC
DAC
1
STFLG
JMS
JMP~
F4LOC
LAC
0
(K70K
AND
(K40K
SAD
SKP
ERRORA
CHAIN
JMP
ERROR
JMP
ION

T127+4

3 STORES PC3-5 CORRECTLY.
IRUN IF FIELD 3 AVAILA8LF
ISET FIELDS
ITEST WOROS TO FIELD 3

ISET INTERRUPT RETURN
ISET TELEPRINTER FLAG.
IGO TO FIELD 3
IGET CONTENTS OF LOC 0
IISOLATE AC3-5
IAC3-5=011?
IYES.
INO. ERROR. INTERRUPT FROM FIELD 3
ISTOREO pC3-5 INCORRECTLY.
IREPEAT TEST.
IFAILED TO INTERRUPT
ITEST WORDS.

4 STORES PC3-5 CORRECTLY.

IRUN IF FIELD 4 AVAILA8LE
15ET FIELDS
ITEST WORDS TO FIELD 4

ISET INTERRUpT RETURN

ISET TELEPRINTER FLAG.
IGO TO FIELD 4
IGET CONTENTS OF LOCe!
IISOLATE AC3-5
IAC3-5=1et0?
IYES.
INO. ERROR. INTERRUPT FROM FIELD 4
ISTORED pC3-5 INCORRECTLY.
IREPEAT TEST.
IFAILED TO INTERRUPT

.-3
ITEST WORDS.

PAGE

EXM15

1213742
1213743
03744
1213745
03746

74121121121121
740121121121
712101211212
62612105
1211213737

1213747
0375121
03751
1213752
03753
1213754
1213755
1213756
1213757
1213760
03761
1213762
1213763
1213764
1213765
1213766
1213767

121121121130
121121412102
10121527
1121121336
1121121311
01213774
121 5612l12112l
777772
21215304
121401211211
100557
62121105
21211211210121
51215215
545224
741121121121
112112161214

03770
1213771
1213772
03773
03774
1213775
1213776
1213777
1214121121121
121412101

1121121223
603753
11210604
6121377121
7012112142
741211211210
74121121121121
71211211211212
62601215
1211213772

12141211212
041211213
12141211214
121412105
041211216
041211217
12141211121
121412111
1214012
121412113
121412114
121412115
1214016
121412117
12l412l2121
1214021
121412122

121121121131
00412135
1121121533
1121121336
10121311
121121412127
1216612100
777772
2121531215
12141211211211
1121121557
6212111216
201211211210
505215
545222
741000
10061214

0412123
04024

10121223
6041211216

NOP
NOP
IOF
JMP.
6121f(J~
T1278
ITEST THAT INTERRUPT FROM FIELD
T130
130
T131
TF5
STFN
MOVE
T1312!W
LOCF5
-6
LAC
(JMP T1312lA
DAC
1
JMS
STFlG
JMP.
F5LOC
LAC
T13121A
(K7I21K
AND
(K5I21K
SAO
SKP
ERRORA

CHAIN
JMP
T130+4
ERROR
T1308
JMP
.-3
T13121 W ION
NOP
NOP
IOF
JMP.
6005
T131218
ITEST THAT INTERRUPT FROM FIELD
T131
131
T132
TF6
STFN
MOVE
T131W
LOCF6
-6
(JMP T131A
LAC
DA.G
1
JMS
STFLG
JMP.
F6LOC
LAC
T131A
121
AND
CK7121K
SAO
CK6121K
SKP
ERROR A

CHAIN
JHP

T131+4

5 STORES PC3-5 CORRECTLY.
IRUN IF FIELD 5 AVAHLABLE
ISET FIELDS
ITEST WORDS TO FIELD 5.

ISET INTERRUPT RETURN
ISET TELEPRINTER FLAG,
IGO TO FIELD 5
IGET CONTENTS OF LOC,,",
IISOLATE AC3-5
IAC3-5=112l1?
IYES.
INO. ERROR. INTERRUPT FROM FIELD 5
ISTORED PC3-5 INCORRECTLY
IREPEAT TEST.
IFAILED TO INTERRUPT
ITEST WOROS.

6 STORES PC3-5 CORRECTLY,
IRUN IF FIELD 6 AVAILA8LE
ISET FIELDS
ITEST WORDS TO FIELD 6

ISET INTERRUpT RETURN
ISET TELEPRINTER FLAG
IGO TO FIELD 6
IGET CONTENTS OF LOC0
IISOLATE AC3-5
IAC3-5=11121?
IYES.
INO. ERROR. INTERRUPT FROM FIELD 6
ISTORED PC3-5 INCORRECTLY.
IREPEAT TEST.

PAGE

EXM15

~4"'21)

1006~4

04~2"

6040?3

04027
04030
04031

7eJ~042

04~32

04~33

04034
~4035

1'14036

0411737
1174040
1174041
04042
04043
04044
04045
04046
04047
0405'"
04051
04052
0405 3
04054
04055
~4056

04057
04060
04061
04062
04063
04064
04065
04066
04067

740000
740000
700002
626005
004025
000132
004070
100537
100336
100311
004062
076000
777772
205306
040001
100557
620107
2012'000
505215
545 21 5
741000
1012'604
100223
604041
100604
604056
700042
740000
740000
700002
626005
004060

Tl~lq

rRROR
J"';:'

Tl~lw

rOf\J

. -"

IFAILEO TO

I~TrRRUPT

ITE5T WOROS,

~OP

IOF
JMP~

(-'005

T1318
ITEST THAT INTERRUPT FROM FIELD
T132
132
T133
TF7
STFN
MOVE
T132W
LOCF7
-6
(JMP T13?A
LAC
DAC
1
STFLG
JMS
F7LOC
JMP*
LAC
PI
T132A
(K70K
AND
(K70K
SAO
SKP
ERRORA

T1328
T132W

CHAIN
JMP
ERROR
JMP
ION

T132+4
.-3

NOP
NOP
IOF
JMP.
T1328
,EJECT

6005

7 STORES Pc 3-5 CORREcTLY
IRUN IF FIELD 7 AVAILAQLF
/5ET F I ELDy
ITEST WORDS TO FIELD 7

15ET INTERRUPT RETURN
ISET TELEPRINTER FLAG.
IGO TO FIELD 7
IGET C(LOCl~)
IISOLATE AC 3-5
IAC3-5=111?
IYES.
INO. ERROR. INTERRUPT FROM FIELD 7
ISTORED PC 3-5 INCORRECTLY.
/REPEAT TEST
IFAILED TO INTERRUPT
/TE5T WORDS

PAGE

EXM15

(l)4~70

(1)00133

M0DE ,TEST XCT* OF LAC IN LOCF1 (DATA FETCHEr IN FIELD 1 ALSO)
133

T1~3

0041~'5

TL~4

04077
04100
04HH
0410?

100336
205307
06(1lHH
750000
707764
420HH
545307
741000
100604

STFN
LAC
OAC*
CLA
ESA
XCT*
SAO

04103
04104

100223
604073

04105
04106
04107
04110
04111
04112
04113
04114
04115
04116
04117
04120

00('1134
004123
100513
100336
205247
060102
750000
707764
420102
545247
741000
100604

04121
04122

100223
61214111

04 1 23
04124
04125
04126
04127
04130
04131
04132
04133
04134
04 1 35
04136

00 01 35
004141
100517
100336
205307
060103
75001210
707764
420103
5453V'!7
741000
100604

04137
04140

100223
604127

04141
04142
04143
04144
04145
04146
04147

000136
004157
100523
100336
205247
060104
750000

04071
0407?
04073
(1)4074
04075
0407f>

SKP

ERRORA

(LAC 160(210
F1 LO C
F1LOC
(LAC 16000

ISET FIELDS
ITEST WORD TO LOCF1

/XCT* OF LAC AT LoeF1
ISKIP IF AC NOT:(LAC 16000
10K.

IERROR, XCT* OF LAC IN LOCF1 wHILE
lIN 9 MODE 010 NOT REFERENCE FIELD 1.

CHAIN
JMP
IREPEAT TEST.
T133+3
19 MODE, TEST XCT* OF LAC IN LOC F 2 (DATA FETcHED IN FIELo 2 ALSO)
T134
134
T135
TF2
IRUN IF FltLD 2 AVAILA8LE
STFN
ISET FIELDS
fTrST WORD TO LOCF2
(LAC 6~00
LAC
DAC ...
F2LOC
CLA
ESA
IASSERT 9 ~ODE
F2LOC
IXCT ... OF LAC AT LOCF2
XCT*
ISKIP IF AC NOT:(LAC 6(1100
SAD
(LAC 60100
SKP
10K.
IERROR. XCT'" OF LAC IN LOCF2 WHILE
ERRORA
lIN 9 MODE DID NOT REFERENCE FIELD 2.
CHA P.J
JMP
T134+4
IREPEAT TEST
/9 MODE, TEST XCT'" OF LAC IN LOCF3. (DATA FETCHED IN FIELD 3 ALSO).
T135
135
T136
TF3
IRUN IF I="IELD 3 AVAILABLE
STFN
ISET FIELDs
LAC
ITEST WORD TO LOCF3
(LAC 16000
F3LOC
DAC ...
CLA
ESA
IASSERT 9 MODE
F3LOC
IXCT* OF LAC AT LOCF3
XCT*
(LAC 16000
ISKIP IF AC NOT=(LAC 16000
SAD
SKP
10K.
IERROR. XCT'" OF LAC IN LOCF3 WHILE
ERRORA
lIN 9 MoDE DID NOT REFERrNCE FIELD 3.
CHAIN
JMP
/REPEAT TEST
T135+4
19 MODE. TEST XCT'" OF LAC IN LOCF4 (OATA FETcHEO IN FIELo 4 ALSO) .
T136
136
T137
TF4
IRUN IF F lEU) 4 AVAILA8LE
STFN
ISET FIELDS
LAC
(LAC 60100
ITEST WORD TO Lor:F4
F4LOC
OAC ..
CLA

P AC~r

E~,M15

~415~

7'lJ77f,4

ESA

04151
,",,415?
'""415:)
,",,4l54

420104
54'5247
7410.00.

XCT*
SAr)
SKP
ERRORA

~4155

1 0Vl 2?3
604145

04156

HH~6"'4

0. 4 1 57
Vl416V'1
0.4161
04162
134163
0.4164
0.4165
04166
04167
0.4170
04171
04172

0.eVl137

04173
134174

100223
6134163

0.4175
04176
04177
0.4200
042131
134202
04203
042134
13420.5
042136
1342137
04210

13130140
0134213
10.V'l533
1130336
205247
1360106
750000
707764
420106
545247
741131313

134211
134212

1013223
604201

~4213

000141
(l!el4231
1130537

~04175

100527
1130.336
20.53~7

060105
750.0.0.13
707764
42010.5
545307
741130.0.
1006134

1el0.6~4

04214
04215
04216
134217
134220
04221
04222
(l!4223
04224
04225
134226

205307
06el1(1!7
750000
7137764
4201V17
545307
74 1 000
100604

04227

10V'1223

lel~336

F4LOC
(LAC 6000.

IASSERT 9 MOOE
/XCT* OF LAC AT LOrF4
/SKIP IF Af: NOT = (LAC 600Vl
10K.

IERROR. XCT* OF LAr IN LnCF4 hHILE
lIN q MonE DID NOT REF~RENCE FIELD 4,

CHAIN
JMP
IREPEAT TEST
T136+4
/9 MODE, TEST XCT* OF LAC IN LOCF5 (DATA IN FIELD '5 ALSO),
T137
13 7
T140
IRUt\J IF FIELfi '3 AVAILABLE
TF5
STFN
/SET FIELDS
ITEST WORD TO LOCF,)
LAC
(LAC 16000
F5LOC
DAC"
CLA
IASSERT 9 MODE
ESA
IXCT .. OF LAC AT LOCF5
F5LOC
XCT ..
(LAC 161300
ISKIP IF AC NOT : (LAC 160~e1
SAO
10K.
SKP
IERROR, XCT* OF LAC IN LOCF5 W,H I LE
ERROR A
lIN 9 MODE DID NOT REFERENCE FIELD 5,
CHAIN
IREPEAT TEST
JMP
T137+4
19 MODE, TEST XCT .. OF LAC IN LOCF6 (DATA IN FTELD 6 ALSO)
T14e
140
T141
IRUN IF FIELD 6 AVAILABLE
TF6
STFN
ISET FIELDS,
ITEST WORD TO LOCF6
(LAC 6?10.el
LAC
F6LOr.
DAC"
CLA

ESA
XCT ..
SAO
St(P
ERROR A

F6LOC
(LAC 6Vlelel

IASSERT 9 MODE
/XCT* OF LAC IN LOCF6
ISKIP IF AC NOT:(LAC 60130
10K

IERROR. XCT* OF LAC AT LOCF6 WHILE
lIN 9 MODE DID NOT REFERENCE FIELD 6.

CHAIN
IREPEAT TEST.
JMP
T14e+4
/9 MODE. TEST XCT* OF LAC r N LOCF7 (DATA IN FIELD 7 ALSO).
T141
141
T142
TF7
IRUN IF FIELD 7 AVAILABLE
ISET FIELDS
STFN
ITEST WORO TO LOCF7
(LAC 1A000
LAC
F7LOC
DAC.
CLA
IASSERT 9 MODE.
ESA
XCT.
IXCT* OF LAC IN LOCF7
F7LOC
ISKIP IF AC NOT=(LAC 16000
(LAC 16000
SAO
SKP
10K.
IERROR. Xc T* OF LAC IN LOCF7 WHILE
ERROR A
lIN 9 MODE DID NOT REFERENCE FIELD 7.
CHAIN

PAGE

'5~

EXM15

?4?30

604217

JMO

.EJECT

T141+4

IREPEAT TEST.

PAGr-

">1

EXM15

04231
04?32
04233
"'4234

00~142

19 MODE.

~4?35

004252
10Vl336
10Vl311
004250

04236
04237
04240
04241
04242
04243
04244
04245
04246
0 4247
04250
04251

777776
205310
046001
707764
420101
100223
604234
100604
60 4244
636001
004244

04252
04253
04254
04255
04256
04257
04260
04261
04262
04263
04264
04265
04266
04267
04270
0 4 271
04272
04273

000143
004274
100513
100336
100311
004272
026000
777776
205311
046001
707764
420102
100223
61214256
100604
60 4266
626001
004266

04274
04275
04276
04277
04300
04301
04302
04303
04304
04305
04306
04307
04310
04311
04312
0 43 13
04314

000144
004316
100517
100336
100311
004314
036000
777776
205312
046001
707764
420HJ3
100223
604300
100604
60 431 0
636001

T142

~16000

T142A

TEST XCT* OF JMP* AT LOCF1 (JUMP TO FIELD 0)
142
T143
STFN
ISET FIELDS
MOVE
ITEST WORDS TO FIELD 1
T142W
LOCFl
-2
(T1428
LAC
ISET TRAP
DAC
LOeF"'+l
IPOINTER IN FIELD 0
EBA
IASSERT 9 MODE
F1LOC
/XCT* OF JMP* AT LOCF1
XCT*
eHAI~

JMP
IREPEAT T[ST
T142+3
ERROR
IERROR. JMP* 16001 AT LOCF1 TOOK ITS
_3
JMP
IINDIREcT POINTER FROM FIELD 0 INSTEAD OF FIELn 1
16vHH
T142W
ITEST WOROS
JMP"
T142A
19 MODE. TEST XCT" OF JMP .. AT LOCF2 (JUMPS TO FIELD 0)
T143
143
T144
IRUN IF FIELD 2 AVAILABLE
TF2
STFN
ISET FIELDS
MOVE
IT[ST WORDS TO FIELD 2
T143W
LOCF2
-2
(T1438
ISET TRAp POINTER
LAC
LOCF0+1
lIN FIELD 0
DAC
IASSERT 9 MODE
EBA
XCT ..
/XCT .. OF JMP .. AT LOCF2
F2LOC
CHAIN
T143A
JMP
IREPEAT TEST
T143+4
ERROR
IERROR. JMP" 6001 AT LOCF2 TOOK ITS
T143B
JMP
IINDIRECT POINTER FROM FIELD 0 INSTEAD OF FIEln 2.
,-3
6001
T143W
ITEST WORDS
JMP"
T143A
19 MODE. TEST XCT" OF JMP .. AT lOCF3 (JUMPs TO FIELD 0)
T144
144
T145
IRUN IF FIELD 3 AVAILABLE
TF3
STFN
ISET FIELDS
MOVE
ITEST WORDS TO FIELD 3
T144W
LOCF3
-2
(T144B
ISET TRAp POINTER
LAC
lOeF0+1
lIN FIELn 0
DAC
IASSERT 9 MODE
EBA
IXCT .. OF JMP .. AT LOCF3
F3LOC
XCT*
CHAIN
T144A
JMP
IREPEAT TEST
T144+4
ERROR
IERROR. JMP* 16001 AT LOCF3 TOOK ITS
T1448
JMP
IINDIREC T POINTER FROM FIELD 0 INSTEAD OF FIELD 3.
.-3
JMP.
ITE5T WORDS
T144W
16001
T1428

P'AGE

EXM15

04315

V'04310

04316
04317
04320
04321
04322
04323
04324
04325
04326
04327
04330
04331
04332
04333
04334
0 43 35
04336
04337

000145
004340
100523
100336
100311
004336
046000
777776
205313
046001
707764
420104
100223
604322
100604
60 433 2
626001
004332

04340
04341
043'42
04343
04344
04345
04346
04347
04350
04351
04352
04353
04354
04355
04356
0 4357
04360
04361

000146
004362
100527
100336
100311
004360
056000
777776
205314
046001
707764
420105
100223
604344
100604
60 4354
636001
004354

04362
04363
04364
04365
04366
04367
0437Vl
04371
0437?
04373
04374
04375
04376
04377
0440''11

000147
004404
100533
100336
1'110311
0'114402
066000
777776
205315
046001
707764
420106
100223
'604366
100604

T144A
/9 MOOE. TEST XCT. OF JMP* AT lOCF4 (JUMPS TO fIELD 0)
T145
14'5
T146
TF4
IRUN IF FIEln 4 AVA.ILABLE
SH'N
ISET FIELDS.
MOVE
ITEST WOROS TO FIELD 4
T145W
lOCF4
-2
lAC
(T145B
ISET TRAp POINTER
OAG
lOCF0+1
lIN FIELD [?I
IASSERT q MODE
ESA
F4LOC
IXCT* OF jMP* AT LOCF4
XCT*
CHAIN
T145A
JMP
IREPEAT TEST
T145+4
ERROR
IERROR. jMP* 613131 AT LOCf4 TOOK ITS
T1458
_3
JMP
I{NoIRECT POINTER fROM FIELD 0 INSTEAD OF FIELD 4
T145\rJ
6001
JMP*
/TEST WORDS
T145A
/9 MODE. TEST XCT* OF JMP* AT !-OCF5 (JUMPs TO FIELD 0)
T146
146
T147
TF5
/RUN IF FIELD 5 AVAILABLE
STFN
/SET FIELDS
MOVE
/TEST WORDS TO FIELD 5
T146W
LOCF5
-2
(T1468
LAC
/SET TRAp POINTER
OAC
LOCF0+1
/IN FIELD 0
E8A
/ASSERT 9 MODE
XCT.
r5LOC
/XCT. OF JMP. AT LOCF5
CHAIN
T146A
JMP
T146+4
/REPEAT TEST
ERROR
/ERROR. JMP. 16001 AT LOCF5 TOOK ITS
T1468
JMP
/INOIRECT POINTER FROM FIELD 0 INSTEAD OF FIELo '5.
.-3
T146W
16001
JMP.
/TEST WORDS
T146A
/9 MODE. TEST XCT. or JMP* AT Locr6 (JUMPS TO FIELD 0)
T147
147
T150
TF6
/RUN IFF I ELO 6 AVAILABLI:
STFN
ISET FIELDS
MOVE
/TEST WORDS TO FIELD 6
T147\o1
LOCF6
-2
(T1478
LAC
ISET TRAP POINTER
OAC
LOCF0+1
lIN FIEU) {1\
FBA
/ASSERT 9 MOOE
XCT.
F6LOC
/XCT* OF JMP* AT LOCF6
T147A
CHA P-J
JMP
T147+4
/REPEAT TEST
ERROR
T1478
IERROR. JMP* 6001 A.T LOCF6 TOOK ITS

PAGE

EXM15

~4401

6'14376

"'4402
el4403

6260~1

04404
04405
04406
04407
0441'"
04411
04412
04413
04414
04415
04416
04417

000150
004426
100537
100336
10"'311
004424
076000
777776
205316
046001
707764
420107
10'1223
604410
100604
60 442 0
636001
004420

0442~

04421
04427
0 4423
04424
04425

~04376

IINOIRECT POINTER FROM FIELO el INSTEAO OF FIELn 6.
JMP
-~
6vH~ 1
ITEST WORDS
JMP*
T147A
19 Moor. TEST XCT* OF -!P-1P. AT LOCF7 (JUMPS TO FIELn 0)
150
T150
T151
IRUN IF FIELD 7 AVAILARLF
TF7
STFN
ISET FIELDS
ITEST WORDS TO FIELD 7
MOVE
T150W
LOCF7
-2
(T15Q1B
ISET TRAP POINTER
LAC
LOCF0+1
OAC
lIN FIELD '"
IASSERT 9 MODE
E8A
IXCT. OF JMP. AT LOCF7
XCT.
F7LOC
CHAIN
T15'1A
IREPEAT TEST
JMP
T150+4
ERROR
IERROR. JMP. 16001 AT LoeF7 TOOK ITS
T1508
_3
IINoIRECT POINTER FROM FIELO 0 INSTEAD OF FIELD 7
JMP
16001
ITEST WORDS.
T150W
JMP·
T150A
.EJECT
T147W

PAGE

EXM15

04426
04427
04430
04431
04432
04433
1214434
04435
04436
04437
04440

000151
004443
100336
205236
060101
750000
707764

04441
04442

100223
604431

04443
04444
04445
04446
04447
04450
04451
04452
04453
04454
04455
04456
04457
04460

000152
004466
100336
205236
046000
100311
004463
016000
777775
707764
620101
545236
741000

04461
04462
04463
04464
04465

100223
604446
206000
636002
004456

04466
04467
04470
04471
04472
04473
04474
04475
04476
04477
04500
04501
04502
04503
04504

0001 53
004512
100517
100336
205236
060103
100311
004507
026000
777775
707764
620102
545236
741000
100604

04505
04506

100223
604472

2160~0

545236
741000
100604

1121061214

19 MODE. TEST THAT DATA IN rIELD 1 CAN AE ACCESSED DIRECTLY FROM FIELD 0
151
T151
T152
STFN
ISET FIELDS
( -1
LAC
1-1 TO LOCFl
F1LOr.
DAC"
CLA
ESA
IASSERT 9 MODE
IGET C(LOCF1) DIRECTLY
LAC
16000
SAO
(-1
IAC=-l?
SKP
IYES. OK.
INO. ERROR. nIREcT ACCESS TO LOCF1
ERRORA
1010 NOT FETCH CORRECT DATA.
CHAIN
JMP
IREPEAT TEST.
T151+3
19 MODE. TEST THAT DATA IN FIELD 0 CAN At ACCESSED DIRECTLY FROM FIELD 1.
T152
152
T153
STFN
(-1
LAC
1-1 TO LOCF0
LOCF0
OAC
MOVE
ITEST WORDS TO FIELD 1
T152W
LOCF1
-3
E8~
IASSERT 9 MODE.
F1LOC
JMP*
IGO TO FIELD 1
SAD
ISKIP IF AC NOT to
T152A
(-1
SKP
10K.
ERRORA
IERROR. DIRECT ACCESS TO LOCF0 FROM
IFIELD 1 FETCHED INCORRECT DATA
CHAIN
JMP
IREPEAT TEST
T152+3
6000
ITEST WORDS
T152 W LAC
JMP ..
16002
T152A
19 MODE. TEST THAT DATA IN FIELD 3 CAN 8~ ACCESSED DIRECTLY FROM FIELD 2
T153
153
T154
TF3
IRUN IF FIELD 3 AVAILABLE
STFN
15 f T FIELDS
LAC
(-1
1-1 TO LOCF3
DAC ..
F3LOC
MOVE
ITEST WORDS TO FIELD 2
T153W
LOCF2

-3

T153A

ESA
JMP ..
SAD
SKP
ERRORA

CHAIN
JMP

F2LOC
(-1

T153+4

/ASSERT 9 MODE
IGO TO FIELD 2
/AC=l?
IYES. OK.
IN~. ERROR. DIRECT ACCESS TO LOCF3 FROM
IFIELD 2 FETCHED INCORRECT DATA
IREpEAT TEST.

PAGE

EXM15

04507
04510
04511

216000
626002
004502

04512
04513
04514
04515
04516
04517
04520
04521
04522
04523
04524
04525
04526
04527
04530

000154
004536
100517
100336
205236
060102
100311
004533
036000
777775
707764
620103
545236
741000
100604

04531
04532
04533
04534
04535

100223
604516

04536
04537
04540
04541
04542
04543
04544
04545
04546
04547
04550
04551
04552
04553
04554

000155
004562
100527
100336
205236
060105
100311
004557
046000
777775
707764
620104
545236
741000
100604

04555
04556
04557
04560
04561

100223
604542
216000
626002
004552

04562
04563
04564
04565
04566
04567
04570

000156
004606
100527
100336
205236
060104
100311

206rz100

636002
004526

16000
/TEST WORDS.
LAC
6~02
JMP*
T153A
/9 MODE. TEST THAT DATA IN FIELD 2 CAN SF ACCESSED DIRECTLy FROM FIELD 3
154
T154

T153W

T1~5

T154A

TF3
STPJ
LAC
OAC"
MOVE
T154W
LOCF3
-3
E8A
JMP ..
SAO
SKP
ERRORA

(-1

F2LOC

F3LOC
(-1

IRUN IF FIELD 3 AVAILABLE
ISET FIELDS
1-1 TO LOCF2
ITEST WORDS TO FIELD 3

IASSERT 9 MODE
IGO TO FIELD 3
IAC=:'l?
IYES. OK.
INa. ERROR. DIRECT ACCESS To LOCF2 FROM
IFIELD 3 FETCHED INCORRECT DATA

CHAIN
T154+4
IREPEAT TEST.
JMP
600rz1
LAC
ITEST WORDS.
T154W
JMP.
16002
T154A
19 MODE. TEST THAT DATA IN FIELD 5 CAN BF ACCESSED DIRECTLY FROM FIELD 4.
T155
155
T156
IRUN IF FIELD 5 AVAILABLE
TF5
ISET FIELDS
STFN
(-1
1-1 TO LOCF5
LAC
DAC.
F5LOC
ITEST WORDS TO FIELD 4
MOVE
T155W
LOCF4
-3
IASsERT 9 MODE
EBA
JMP.
IGO TO FIELD 4
F4LOC
SAD
(-1
IAC=-l?
T155A
SKP
IYES. OK.
INO. ERROR. DIRECT ACCESS TO LOCF5 FROM
ERRORA
IFIELD 4 FETCHED INCORRECT DATA.
CHAIN
IREpEAT TEST.
T155+4
JMP
LAC
16~00
ITEST WORDs.
T155W
JMP ..
6002
T155A
19 MODE. TEST THAT DATA IN FIELD 4 CAN 8t DIREcTLY ACCESSED FROM FIELD 5
T156
156
T157
TF5
IRUN IF FIELD 5 AVAILABLE
ISET FIELDs
STFN
1-1 TO LOCF4
LAC
(-1
F4LOC
oAC.
/TEST WORDS TO FIELD 5
MOVE

PAGE

EXM15

04571
0457('
04573
04574
04575
04'576
04577
04600

056000
777775
707764
620105
545236
741000
100604

04601
04602
04603
04604
04605

100223
604566
206000
636002
0.04576

04606
04607
04610
04611
04612
04613
04614
04615
04616
04617
04620
04621
04622
04623
04624

000157
004632
100537
100336
205236
060107

04625
04626
04627
04630
04631

100223
604612
216000
626002
004622

04632
04633
04634
04635
04636
04637
04640
04641
04642
04643
04644
04645
04646
04647
04650

000160
004656
100537
t00336
205236
060106
100311
004653
076000
777775
707764

~4651

04652

T1561-1
LOCF5
-3

0046~3

UH~311

004627
066000
777775
707764
620H~6

545236
741000
100604

6201~7

545236
7410~0

10"604
100223
604636

ESA

T156A

Tl'56 W

JMP~

F5LOC

SAO
SKP
ERRORA

(-1

CHAIN
JMP
LAC
JMP~

T1'56+4
6000
16002

IASSERT 9 MODE
IGO TO FIELD 5
IAC=-l?
IYES. OK.
INO. ERROR, DIRECT ACCESS TO LOCF4 FROM
IFIELD 5 FETCHED INCORRECT DATA.
IREPEAT TEST.
ITEST WORDS

T156A
19 MODE. TEST THAT DAT~ IN FIELD 7 CAN BF ACCESSED DIRECTLY FROM FIELD 6
T157
157
T160
TF7
IRUN IF FIELD 7 AVAILABLE
STFN
ISET FIELDS
(-1
LAC
1-1 TO LoeF7
DAC~
F7LOC
MOVE
ITEST WORDS TO FIELO 6
T157W
LOCF6
-3
EBA
IASSERT 9 MODE
JMP~
F6LOC
IGO TO F'IELD 6
SAO
T157A
(-1
IAC=-l?
SKP
IYES. OK.
INO ERROR. DIRECT ACCESS TO LOCF7 FROM
ERRORA
IF'IELD 6 F'ETCHED INCORRECT DATA.
CHAIN
JMP
T157+4
IREPEAT TEST.
T157 W LAC
16~00
ITEST WOROS
JMP~

60~2

T157A
19 MODE. TEST THAT DATA IN FIELD 6 CAN BE ACCESSED DIRECTLY FROM FIELD 7.
T160
16 0
T161
TF7
IRUN IF FIELD 7 AVAILABLE
srFN
IsET FIELDS
LAC
(-1
1-1 TO LOCF'6
DAC~
F6LOC
MOVE
ITEST WORDS TO FIELD 7
T160W
LOCF7
-3
ESA
IASSERT 9 MODE
JMP~
F7LOr.
IGO TO FIELD 7
SAO
T160A
(-1
IAC=-l?
SKP
/YES. OK.
ERROR A
INa, ERROR. DIRECT ACCESS TO LOCF6 FROM
IFIELO 7 FETCHED INCORRECT DATA.
CHAIN
JMP
T160+4
IREPEAT TEST

PAGE

EXM15

Ql4653
Cil4654
04655

6360Ci1?
004646

2060~0

T 16VH.J

LAC
JMP ..
T160A

.EJECT

6000
16~02

/TEST WORDS

PAGE

EXM15
/OPTIONAL API TEST
/

04656
~4657

0466['
0466'1
04662
04663
04664
04665
04666
04667
04670
04671
0467?
04673
04674
0467~

04676
04677
04700
04701
04702
04703
04704
04705
04706
04707
04710
04711

?00161
004715
1005 4 3
100311
004707
016000

-6

0411'040

OAr:'

144673
205320
620101

[lt lvl

(JMS AT(!lA
L4(?
AT ')A

LAC
JMP*

F1LOC

6047131

705504
740000
7413000
7413000

04713
04714

626005
0.04705

04 71 5
04716
04717
0472Q1
04721
04722
04723

000. 1 62
(;lJ04755
100543
100513
100336
100311
(;lJ04747
el26000
777772
2053?1
040040
144733
20532v.l
fl2 0 1 0 2

04725
04726
04727
1714730
04731
1714732
04733
04734
04735
04736
04737

LAC

AT0A

0011'000

204733
505215
545230
741000

ANn STORES Pr, 3_'5 rORRFCTLY

(~1104K

/8REAK HANDLER TO LOC4 fil
/GET API BREAK REQUEST DATA
/GO TO FIELD 1

LAC
ANn
SAn
SKP
ERRORA

204673
505215
545233
741000
100604
703304
703302
100223
604662
100604

F IFUl 1.

IRLIN IF AP Y AVAYLA8LE
ISET FIELDs
/TEST WORDS TO FIELD 1

777772
?05317

000eJ~(i1

P~OM

Tl~2

CKAPr
STFN
MOVE
AT r~ W
LOr,Fl

1.003~6

134712

~4724

/TFST THAT API CA'; gqEAK
T161
161

AT0A
(~70K

( "1 ep<

/GET JMS INFO
/ROTATE AC 3-5
/AC3-5=0011?
/YES.
IN~. ERROR. PC3-5 INCORRECTLY
/STORED.

DBK
CAl="
CHAIN
JMP
IREPEAT TEST
T1A1+4
ERROR
AT08
/API FAILEI1 TO BREAK
.-;;;
JMP
AT(i1W
ISA
ITEST WORDS
NOP
NOP
NOP
JMP*
6005
AT'~B
ITEST THAT API CAN BREAK FROM FIELD 2 AND STORES Pc 3-5 CORRECTLY.
T162
162
T163
IRUN IF API AVAILABLE
CKAPI
TF2
/RUN IF FIE"LO 2 AVAILABLE
STFN
/5ET FIELDS
MOVE
/TEST WORDS TO FIELD 2
ATH4

LorF2
-6
LAC
DAC
Ozz,"1
LAr:

JMP*
AT1A

(JMS AT1A
L40
AT 1 .A
("'4a4K

r 2L C)c

IBREAK HANDLER TO LOC40
/t ERO ATtA
/GET API BREAK REQUEST DATA.
/GO TO FIELD 2

LAC
ANr)

AT1A

SAn

(r<20 K

SKP

(o<.70~

/GET JMS INFO
/ISOLATE Ar 3-5
I AC3-5=(;lJ1 ~q
IYES.

PAGE

EXM15

~4740

10~604

FRRORA

04741
0474?
04743
014744
04745

703304
703302
1001223
604722
100604
604741
70'5504
74"'121010
74000121
740000
626005
0104745

08 K

~4746

04747
047501
04751
0475:;>
"'4753
04754
04755
1214756
04757
04760
04761
04762
04764
04765
04766
04767
04770
04771
04772
1214773
04774
1214775
04776
04777
050013
050101
01501212
1215003
05004
05005
05006
05007
0501 01
015011
0501:;>
0512113
051211 4

000163
1211215015
1001543
100517
1001336
1130311
1210512107
f1!360121121
777772
205322
0401040
144773
205320
620103
000000
204773
505215
545226
741000
1121061214
703304
703302
100223
604762
100604
605001
7055014
740000
74000121
740000
62601215
0121501215

05015
05016
0512117
0502'"
050 21
05022
05023
1215024

000164
01215055
1001543
1005?3
1elVl 33 6
100311
005047
046000

~4763

AT18

CAr
CHAIN
JMP
ERROR

JMP

INO. ERROR, PC 3-5

TU'2+5

I\CO~qE~TLY

STORED.

IREPEAT TEST
IAP[ FAlLEn TO BREAK

-I:;

ITEST WORDS
ISA
NOP
NOP
NOP
f-,0,A5
JMP*
AT18
ITrST THAT API CAN BREt.~ FROM FIELD 3 ANn SToRES p,. 3-'" C-ORRECTLY,
T163
163
T164
IRUN IF API AVAILA8LE
CKAPI
IRUN IF rIELn 3 AVAILABLE
TF~
STrN
ISET FIELDS
ITEST WORDS TO FIELD 3
MOVE
AT?W
LOCF3
-6
IBREAK HANOLER TO LOC40
(JMS AT2A
LAC
L40
DAC
12ERO AT2A
AT2A
DrM
(K404K
IGET API BREAK REQUEST DATA
LAC
JMP.
F3LOC
IGO TO FIELD 3
AT2A
0
AT2A
IGET JMS INFO
LAC
(1<701<
IISOLATE AC 3-5
AND
(1(301(
SAD
IA C 3-5=1311?
SKP
IYES.
INO. ERROR. PC 3 - 5 INCORRECTLY STORED·
ERROR A
OBI(
CAF
CHAIN
JMP
IREPEAT TEST.
T163+5
ERROR
IAPI FAlLEr) TO BREAK
AT2B
JMP
-5
I SA
ITEST WORDS
AT?W
NOP
NOP
NOP
JMP.
6~W5
AT2B
ITEST THAT API CAN BREAK FROM FIELD 4 ANn STORES PC 3-5 CORRECTLY
164
T164
T165
IRUN IF AP I AVAILAqLE
CKAPI
TF4
IRUN Ir FIELn 4 AVAILA8LF
STJ:"N
ISET FIELDS
ITE5T WORDS TO FIELO 4
MOVE
AT3W
LOCF4
AT1 W

PAGE

60,

EXM:15

~5025

777772
20,5323

~5V126

05027
(71 50, 3 V'I
05031

~4V'1040

050,44
"'5045
0,5046
0,5047
0505(11
05051
05052
0,5053
0,5054

14';033
?05320
62V'1104
eJ0V'1eJV'l0
20,'5033
50,'5215
54'5261
74HHlleJ
100604
7033V'14
703302
10,0223
60,5022
100604
605041
70550,4
7400,00
740000
740000
62600,5
005045

05055
05056
05057
05060
05061
05062
05063
0,5064
05065
050,66
05067
05070
0,5(;)71
05 07 2
05 07 3
05074
05075
05076
05"'77
05100
05HH
05102
05103
el5104
05105
05106
05107
05110
05111
05112

000165
005115
100543
100527
100336
100311
00510,7
056000
777772
205324
Pl4el040
145073
205320,
62°1°5
O00000
205073
505215
545224
74 1 000
100604
703304
703302
100223
605062
100604
605HH
705504
740000
7400el0
740000

05~3?

05"'33
05034
Vl5035
050,36
~5037

0,5040
V'l5041
Vl5V'142
~5C1143

AT3A

AT3B

AT3W

-6
LAC
oAC

(JMS AT3A
L41'

rtt~

AT~A

LAr
JMP*

(K4~4K

/8REAK HANOLtRS TO LnC 4 ft1

F4LOC

IlERO AT~A
IGET API BREAK REQl!EST OAT A. •
IGO TO FIELD 4

AT3A
(K70K
(K4",K

IGET JMS INFO
IISOLATE AC 3-~
/Ar:3-5=lV'1V??

(71

LAr:
ANfJ
SAfl
SKP
ERRORA
OBK
CM"
CHL\IN
JMP
ERROR
JMP
I SA
NOP
NOP
NOP
J~P*

IY~S.

ING. ERROR,

T164+5

Pc 3-5 INcnRREr:TLY STORED

/REPEAT TEST
lAP! FAllEn TO 8REAK

.-5

/TEST WORDS

MH~5

AT38
ITEST THAT API BREAK FROM FIELD 5 STORES Pc 3-5 CORRECTLY,
T165
16'5
T166
CKAPI
/RUN IF API AVAILA~LE
TF~
IRUN IF FIELD '5 AVAILABLE
STFN
ISET FIELDS
MOVE
/TEST WORDS TO FIELD 5
AT4W
LOCF5
-6

LAC
DAC
DrM
LAC
JMP*
AT4A

e
LAC
ANO
SAD
SKP
ERRORA

(JMS AT4A
L40
AT4A
<K404K
F5LOC
AT4A
(K70K
(K~0K

/8REAK HANDLER TO LOC40
/rERO AT4A
/GET API 8REAK REQUEST o ,t., TA
IGO TO FIELD 5

IGET JMS INFO
IISOLATE AC 3-5
IAC3-5=101?
IYES,
INO. ERROR. PC3-5 INcORRrcTLY STORED

OBI<

AT48
AT4W

CAF
CHAIN
JMP
FRROR
JMP

ISA
NOP
NOP
NOP

T165+5

IREPFAT TEST,
IAPI FAILED TO BREAK

,-5
ITEST WORDS

PAGE

EXM 1 5

051.13

62fl005
0,0"'1C'\5

f,~W5
JMP*
AT4R
ITrST THAT API C A (i ~PE!\K

05115
051.16
05117

YH~~166

T166

0512~

1~H'I5~3

(115121
0512?
05123
05124
05121)
05126
05127
£'1513'"
05131
05132
05133
05134
05135
05136
05 1 37
05140
05141
05142
05143
05144
05145
05146
05147
05150
05151
05152
05153
05154

10(11336

05114

05155
05156
05157
05160
el5161
el5162
05163
05164
05165
05166
05167
05170
05171
0517?
05173
05174
05175
05176
05177

T1A7
CKAPI
TFI.,
STFN
MOVE

~~~1."'~
1~H'543

1~H~311
c;,V'!~147

AT~W

Vl6f,0~V'!

LOeFA

777772

-6

?0~3?5

LAC
OAr:
DiM
LAr
JMPo
0
LAC
ANn
SAO
SKP
ERRORA
OBI<
CAF
CHAIN
JMP
ERROR
JMP
ISA
NOP
NOP

c;, 4 V'! 040
145133
201)32V'!
620106
~0(110"'0

20'H33
5052:15
545222
741000
100604
703304
703302
100223
605122
100604
605141
705504
740000
74"'0~0

740000
626005
005145
000167
777777
1001543
100537
100336
100311
005207
076000
777772
2053?6
040040
145173
205320
f.20!1~7
00~000

205173
'50'5215
545215
741000

AT5A

AT58
AT5W

F qo~

rIFLD

ANn ST()RF5 Pr ,) - '-) CilRPErTLY

16fl

IRUN IF API AVAILA8Lr
IRUI\J IF F IF Ln n AVAILARLr
15ET FIELDS
ITEST WOROS TO FIEL[) 6

(JMS AT5A
L4v'
ATI)A
(K404K
F6LOc
AT'SA

(K70K
(K601<

T166+5

18PEAK HANDLER T('1 LOr40

ItERO AT'5A

IGET API BREAK REQUEST DATA.
IGO TO FIELD 6
IGET JMS INFO
II50LATE AC3-5
IAC3-5= 10 7
/YES.
INO. ERROR. PC 3-5 INCORRECTLY STOREO·

IREPEAT TEST
IAPI FAlLEr] TO BREAK

.-5

ITEST WORDS

Nap
600,5
JMP*
ATI)B
ITEST THAT API CAN BREAK FROM FIELD 7 ANn STORES PC3-5 CORRECTLY.
T167
167
777777
IRUN IF API AVAILABLE
CKAPI
/RUN IF FIELO 7 AVAILABLE
TF?
STFN
ISET FIELDS
MOVE
/TEST WORDS TO FIELD 7
AT6W
LOCF7
-6
/BREAK HANnLfR TO LOC40
(JMS AT6A
LAC
DAC
L40
AT~A
I~ERO AT6A
D~M
(K404K
/GET APr RREAK REQUEST OAT-\
LAC
IGO TO FTELD 7
JMP*
F7LOC
(II
AT6A
AT6A
IGET JMS INFO
LAC
(K70K
ANn
/ISOLATE AC 3-5
{K70K
SAn
IA C3-5= 11?
IYES.
SKP

PAGE

EXM15

(iJ520~

10060 4
703304
703302
10"'223
605162

05201
052e1?
"'521213
05204
05205
05206
05207
0521(i1
05211
"'5212
05213
"'5214

10~604

605201
70551214
7400V'10
74012100
740000
626005
(iJliPi2(iJ5
10061214
100604
60024121
10'0223
0000(110
05215
05216
05217
05220
05221
05222
05223
05224
05225
05226
05227
05230
1215231
05232
05233
05234
05235
05236
05237
05240
05241
05242
05243
1215244
05245
05246
05247
05250
05251
05252
05253
05254
05255
0525A
05257
05260
05261

F:RRORA
OSK
CA~

CHAIN
JMP
T167+5
ERROR
AT68
JMP
.-5
AT6W
ISA
NOP
NOP
NOP
JMPo
6005
AT6B
ERROR=JMS ERR
ERRORA=JMS ERR
SKIP=JMP CHAINA
CHAIN=JMS CHAINN
.END
~L
070000
~L
600616
0~H:'l001
*L
*L
0121021217
0000~7

060000
000006
0500121121
000005
12130000
000004
0212101210
1210001213
000002
010000
004000
377777
777777
000077
000045
000043
777740
00°1°0
00024Ql
0QlQl71210
6060"60
20600Ql
006000
226001
(iJ02152
O02173
002214
(1102235
(1102256
002277
(iJ02320
121 400(iJ0

*L
~L
~L

*L
~L
~L
~L

~L
~L
~L
~L

~L
~L
~L

*L
~L

*L
*L
oL
~L

*L
*L
*L
*L
*L
*L
*L

IREPEAT TEST.
lAP! ~AILEO TO BREAK
/TEST WORDS

PAGE

EXM15
05262
'15263
05(>64
05265
05266

"'0320 4
"'03226

ll-I

~032~V'

itL

1?1032 7 2

*L
*L

eJ5~67

003336
003360
603405
603430

0~3314

05270
05271
1215272
1215273

6034~3

eJ5~74

~0.3476

6035?1
05275
61213544
05?76
fll2!3567
05277
603607
05300
603642
0531211
603675
0531212
603730
05303
603763
0531214
604016
0530'5
61214051
0531216
21612100
1215307
1Il04246
05310
004270
05311
12104312
1Il5312
004334
05313
004356
05314
01214400
05315
01214422
05316
104673
05317
40412100
05320
11214733
05321
104773
05322
11215033
05323
105073
05324
05325
11215133
105173
05326
SIi!E=05327

ol.

*'*1

*L
*L
*L
*L

*L
*L
*L
*L
-oL
*L
*L
-oL
*l
*L
-oL
*L
*L
*L
*L
*L
*L
*L
*L
*L
*L
*L
*L
*L
*L
*L

NO ERROR LINES

PAGE
AACA
ALOC
ARTN
ASCT
AH~A

ATeB
AT0W
ATiA
AT1B
AT1W
AT2A
AT2B
AT2W
AT3A
AT38
AT3W
AT4A
AT48
AT4W
AT5A
AT5B
AT5W
AT6A
AT6B
AT6W
CALERR
CALMSG
CAPI
CEHLT
CEMSG
CETYP
CF'2
CF'3
CF'4
CF'5
CF'6
CF'7
CHAIN
CHAINA
CHAINN
CHLT
CKAPI
CLOF'
CLON
CLSF'
CLX
CNV
CSCOP
CTRA
CTR8
CURTST
01
02
03
EAC

EXM15
01040
01033
01045
01015
04673
047Vl5

04707
04733
04745
04747
04773
05005
05007
05033
05045
05047
05073
05H~'5

051(lJ7
0.5133
05145
05147
05173
'05205
05207
00616
01025
00543
00601
01031
00627
00513
00517
00523
00527
00533
00537
100223
00240
0(lJ223
00576
100543
700004
700044
700001
735000
0"767
00651
00153
00154
00151
01016
01017
01020
00155

PAGI
FBA
rE~

ELoe
EPA
FRR
ERRMSG
ERROR
ERRORA
[X8A

FAODR
FLAG
FORWO
FellOe
°FelLel
F0L1el
F0L20
F1Loe
F1L0
F1Ll
F1L10
F1L20
F"2LOe
F"2L0
F"2L1
F2L10
F2L20
F"3LOC
F"3L0
F"3Ll
F"3L10
F3L20
F"4LOe
F"4L0
F"4L1
F4L10
F"4L20
F"5LOC
F"5L0
F5L1
F5L10
F5L20
F6Loe
F"6L0
F6Ll
F6L10
F6L20
F7Loe
F7L0
F7Ll
F"7LH~

F7L2el
GETROy

KRB
KSF"

KSTART

EXM15
707764
7077V'12
00156
707762
006ft14
01021
1006V'14
100604
707761
00333
0V'1746
00254
00100
00117
00127
00137
00HH
00120
00110
00130
00140
00102
00121
00111
00131
00141
00103
00122
00112
00132
00142
00104
00123
00113
00133
00143
00105
00124
00114
00134
00144
00106
00125
00115
00135
00145
00107
00126
00116
00136
00146
00213
700312
700301
00147

PA,GE

EXM15

Kl~K

010000

K20K

~20000

K3~K

03~000

K40K
K404 K
K50K

040000
404000
050000
060000
070000
707704
006000
006000
016000
"'26000
036000
046000
056000
066000
076000
0000.00
000000
010000
020000
020000
030000
050000
060000
070000
000001
010001
020001
030001
040001
050001
060001
070001
000010
000010
010010
020010
030010
040010
050010
060010
070010
000020
000020
010020
020020
. 030020
040020
050020
060020
070020
000040
000040

K6~K

K70K
LEM
LOC
LOCF0
LOCFl
LOCF2
LOCF3
LOCF4
LOCF5
LOCF6
LOCF7
L0
L0F0
L0Fl
L0F2
L0F3
L0F4
L0F5
L0F6
L0F7
Ll
L1Fl
L1F2
L1F3
L1F4
L1F5
L1F6
L1F7
L10
Ll~F0

L10Fl
L10F2
L10F3
L10F4
L10F'5
L10F"6
L10F7
L2~

L20F"0
L20Fl
L20F2
L20F3
L20F4
L20F5
L20F6
L20F7
L40
L40F0

[XM15

L4"'F1
L4111F2

111100 4 0
02004111

L4P,F~

03~040

L40!F4

04012140
050040
"'6004121
0701214121

L4~F5

L4"'F6
L40F7

MCTR
MEMERR
MOVE
MOVEA
MOVVE
NXTST
OCNV
PCF
PRINT
PRINTA
PRINTB
PRINTC
PSA
PSB
PSF
P0MSG
RCF
RR8
RSA
RSB
RSF
RTNNO
SAse
SBFNUM
SETA
SETLOC
SKIP
START
STCTA
STCTR
STFLG
STFN
STF1

STF2
STF3
STF4

STF5
STF6
STF7
SW4

TAODR
TCF

TEMP
TEMQ
TEMR
TF2

TF3
TF4

003~5

01050
10121311
00323
00311
012115121
0121751
7121121202
1210727
012174121
121121742
1210744
70021214
70121244
712112121211
I2I1HH

712112111212
7121121112
701211C?J4
7121121144
712112111211
121121177
121112114
00336

1121121301
112112127121
612112124121
12112121213
12112131211
12112127121
1210557
1121121336
1210426
121121417
12112141121
12112141211
1210372
121121363
121121354
7421213121
121121334
712104"'2
121121152
0121747
12112175121
H'J12I513
1121121517
1121121523

PAGE
TFS
TI="6
TI="7
TLS
TSCl
TSC2
TSI="
TSTFX
TSTF2
TSTI="3
T5TI="4
TST!=""5
TSTI="6
T5TI="7
TTOUT
TYP
TYPAT
TYPE
TYP5P
T0
T1
T10
'Tle0
T100A
T100W

,,8

EXM15
1~2'527

10~533
10~537
70~4V'6

~~664

'H"7~3
70~4~1

et~5?1

00443
00450

0et4'5'5
00462
0~467

00474
00567
00657
~0714

100657
00720
01162
e1173
01303
03003
0301 4
03022

T1~1

03027

THHA
THaw
T102

0304~

TU~2A

T102 w
T103
T103A
T103 W
T104
T10~A

T104W
TH~5

T105A
T105W
T106
T106A
T107
T107A
Tl1
T110
T110A
Tl11
Tl11A
T112
T112A
T113
T113A
T114
T114A

030416
03053
030641
03072
03077
03110
03116
03123
03134
03142
03147
03160
03166
03173
032"'4
03214
03226
01320
03236
03250
03260
03272
033~2

03314
03324
03336
03346
03360

pAGE

Tl15
T115A
Tl15R
T115W
T116
T116A
T116R
T116W
Ti17
Ti17A

T117R
T117W
T12
T120
T120A
T1208
T120W
T121
T121A
T121R

T12'lW
1122
T122A
T122R
T'122W
T123
T123A
T1238

T12'3W
T124
T124A
T1248

T124W
T125
T125A

T1258
T125W
T126
T126A
T1268
T126W
T127

(XM1C:;
0337~
034~4
~34~5
034~7

03412
03427
03430
03432
03435
034C:;2
034C:;3
03455
01335
03460
03475
03476
035~0

03"'-03

03~20

03521
03523
03526
035'43
03544
03546
0-3551
035-66
03567
03571
03574
03607
03616
03620
03626
03642
03651
03653
~36'61

T1278
T127W
T13
T130
T130A
T1308

03675
03704
03706
03714
03730
03737
03741
01352
03747
03763
03772

T130W

03774

T131
T131A
T1318
T131W

~4002

T127A

T132

04'016
04025
04027
04035

PAGT

T132A
T1328
T132 W
T133
T134
T135
T136
T137
T14
T140
T141
T142
T142A
T1428
T142W
T143
T143A
T1438
T143W
T144
T144A
T1448
T144W
T145
T145A
T1458
T145W
T146
T146A
T1468
T146 W
T147
T14iA
T1478
T147W
T15
T150
T150A
T1508
T150 W
T151
T152
T152A
T152 W
T1'53
T153A
T153W
T154
T1'54A
T154W
T1'55
T155A
T155W
T156
T156A.

EXM15
04051
04060
04062
04070
041"'5
041:?3
04141
04157
01367
04175
04213
04231
04244
04246
04250
04252
04266
04270
04272
04274
04310
04312
04314
04316
04332
04334
04336
04340
04354
04356
04360
04362
04376
044"'0
044(;112
01404
04404
04420
04422
04424
04426
04443
04456
04463
04466
045"'2
04507
04512
04526
04533
04536
04552
04557
04562
04576

PA.GE

T156h
Tl.157

T157A
T15710t
T16
T1f.A

T168
Tlf'~

T160
T160A
T160~

T161
T162
T163
T164
T165
T166
T167
T17
T17A
T178
T17W
T2
T2e
T2P,A
T2~B
T2~W

T21
T21A
T218
T.21W
T22
T22A
T228
T22W
T23
T23A
T238
T2itW
T24
T24A
T248
T24W
T25
T26
T27
T3
T30
T31
T32
T33
T34
T34W
T35
T35W

EYM~5

04603
0146016
04622
04627
Vl1421
01431
01433
01435
04632
·04646
04653
Vl4656
04715
04755
05015
05055
05115
05~155

01:-440
01451
01453
01455
0121i!5
014·60
01471
01473
01475
015'00
01511
0.1513
01515
01520
01531
01533
01535
01540
01551
01553
015"5-5
01560
01571
01573
01575
01600
01614
01631
01217
01646
01663
01700
01715
01732
01752
01754

01175

PAGrT36
T36W
T37
T37W
T4
T40

EXM15
01777
~?~?0

~20?2

02043
01231
0?~45

T4~W

~20(-16

T41
T41W
T42
T42W
T43
T43A
T438
T43W
T44
T44A
T448
T44W
T45
T45A
T458
T45W
T46
T46A
T468
T46W
T47
T47A
T478
T47W

02070

T5
T50
T5eA
T508
T50W
T51
T51A
T518
T51W
T52
T52A
T52W
T53
T5~A

T53W
T54
T54A
T54W
T55
T55A
T55W
T56
T56A
T56W

02111
02113
02134
02136
02150
02152
02154
02156
02171
02173
02175
02177
02212
02214
02216
02220
02233
02235
02237
02241
02254
02256
02260
01243
02262
02275
02277
02301
02303
02316
02320
02322
02324
02334
02336
02340
02351
02353
02355
02366
02370
02372
02403
024V'5

02407
02420
02422

PAGE
T57
T57A
T5 7·W
T6
T60
T6?,A
T60lW
T61
T61A
T61'W
T62
T6?A
T62W
T63
T63A
T63W
T64
T64A
T64W
T65
T65·A
T65W
T66
T66A
T66W
T67
T67A
T67.W
T7
T70
T70A
T70W
T71
T71A
T71W
T72
T72A
T72W
T73
l·73A
T73W
T74
T74A
T74W
T75
T75A
T75W
T76
T76A
T76W
T77
T77A
T77W
WASC

.EOT

[XM1'5
0;;>424
V'l24:~5

0;;>437
(121)5
02441
02452
02454
024'56
02466
02470
V'I?473
025V'l4

02506
02511
02522
02524
02527
02'~40

02942
02545
02556
02560
02563
02574
02576
02601
02612
02614
01267
02617
02627
02631
02634
02645
02647
02652
02663
02665
02670
0·27V'l.1

02703
02706
02717
02721
02724
02735
02737
02742
02753
02755
02760
02770
02776
01013
00000

PAGE
L~
L~F0

.EOT
L1
L1V'!
L10F0
L 20L20F0
L4V'!
L40F0
F"0LOe
F"lLOe
F2l0C
F3l0e
F"4l0e
F"5LOe
F6LOe
F7LOe
F1Ll
F2L1
F"3Ll
F4Ll
F5Ll
F6Ll
F7Ll
F"0L0
F1l0
F2l0
F3L0
F4L0
F5L0
F6L0
F7l0
F0L10
F1L10
F"2L10
F3L10
F4L10
F5L10
F6L10
F7L10
F0L20
F1L20
f"2L20
f"3l20
f"4L20
F5L20
f"6L2V'!
f"7L20
KSTART

NXTST
r:URTST

EXM1C;
000000
~0~0~0
V'!V'!0~0
~0V'!0V'!1

0000H'J
0'00010
0.00020
V'!00020
0'00040
0.00040
00100
00101
~HHV'!2

vH'J103
001V'!4
00105
00106
00107
00110
00111
00112
00113
00114
00115
00116
0"'117
00120
00121
0'1122
00123
00124
00125
00126
00127
00130
00131
00132
00133
00134
00135
00136
00137
00140
00141
00142
00143
00144
00145
vHH46
00147
00150
0~151

TE~P

0~152

CTRA

00153
00154

eTR8

PAGE
FAC
ELOC
RTNNO
START
GETROY
CHAINN
CHAINA
FORW O
STCTR
STCTA
MOVVE
MOVEA
FADDR
TADDR
MCTR
SBFNUM
STF7
STF6
STF5
SH"4
STF3
STF2
STFl
TSTF2
TSTF3
TSTF4
TSTF5
TSTF6
TSTF7
TSTrX
CF2
CF3
CF4
CF5
CF"6
Cf7
CAP}
STFLG
TTOUT
CHL T
C£HLT
fRR
CAL ERR
CETYP
CSCOP
TYP
TSCl
TSC2
TYPAT
TYPSP
PRINT
PRINTA
PRINTB
PRIN-TC
flAG

EXM15

00155
t:HH56
0~177

00?~3

00213
~0223

00240
00254
00270
00301
eI~311

00323
00333
00334
00335
00336
00354
00:363
00'372
004~1

00410
00417
~0426

00443
00450
00455
00462
00467
00474
005(111
00513
00517
00523
00527
00533
00537
00543
00557
00567
00576
006:Al
00604
00616
00627
00651
00657
00664
007(113
00714
00720
00727
00740
00742
00744
00746

PAGE
TEMa
TEMR
oeNV
CNV
WAse
SAse
ASCT
111

02
n3
FRRMSG
CALMSG
r.EMSG
ALoe
AACA
ARTN
MEMERR
P0MSG
T0
T1
T2
T3
T4
T5
T6
T7
T10
T11
T12
T13
T14
T15
T16
T16A
T168
T16W
T17
T17A
T178
T17W
T20
T20A
T208
T20W
T21
T21A
T218
T21W
T22
T22A
T228
T22W
T23
T23A
T2J.8

EXM1~

00747
~~75~

~"'751
0~767

0U'J13
01014
01015
01016
01017
01020
01021
01025
01031
01033
01040
01045
01050
011"11
01162
01173
01205
01217
01231
01243
01255
01267
01303
01320
01335
01352
01367
01404
01421
01431
01433
01435
01440
01451
01453
01455
01460
01471
01473
01475
01500
01511
01513
01515
01520
~1531

01533
01535
01540
01551
01553

PAGE
T23W
T24
T24A
T248
T24W
T25
T2A
T27
T3~

T31
T32
T33
T34
T34W
,135
T35W
T36
T36W
T37
T37W
T4~

T40W
T41
T41W
T42
T42W
r43
T43A
T438
T'43W
T44
T44A
T448
T44W
T45
T45A
T458
T45W
T46
T46A
T468
T4'6W
T47
T47A
T478
T47W
T5~

T50A
T508
T50W
T51
T51A
T518
T51W
T52

EXM15
01555
015f10
~1571

01573
01575
016~0

01614
~1631

01646
01663
01700
01715
01732
(iH 752
01754
01775
01777
0?fJ20
02'022
02043
02045
02066
02070
02111
02113
02134
02136
02150
02152
02154
02156
02171
02173
02175
11J2177
02212
02214
02216
02220
02233
02235
02237
02241
02254
02256
022f10
02262
02275
02277
023~1

02303
02316
02320
02'322
02324

PAGE"
T52A
T52w
T53
T53A
T53W
T54
T54A
T54W
T55
T55A
T55W
T56
T56A
T56W
T57
T57A
T57W
T6t?l
T6elA
T6t1!W
T61
T61A
T61W
T62
T62A
T62W
T63
T63A
T63W
T64
T64A
T64W
T65
T65A
T65W
T66
T66A
T66W
T67
T67A
T67W
T70
T7V'1A
T7V'1W
T71
T71A
T71W
T72
T72A
T72W
T73
T73A
T73W
T74
T74A

EXM15

02334
~23~6

02340
02351
02353
02355
'123t>6
02370
'12372
024~3

0;:>405
02407
024?Vl
02422
02424
'12435
02437
02441
02452
02454
02456
02466
"2470
02473
025t1!4
02506
'12511
02522
02524
02527
02540
02542
02545
02556
025"0

02563
02574
02576
"26911
02612
02614
02617
02627
02631
02634
'12645
02647
02652
026"3
'126t>5
02670
027t?l1
02703
027P.6
02717

PAGE
T74W
T75
T75A
T75W
T76
T76A
T76W
T77
T77A
T77W

EXM15
02721
02724
02735

02737
0?742
02753
02755
0?76~

17!2770
0?776

Tl~~

03~Q!3

T HH'lA

03014
03022

Tl~0W
Tl~l
T1~1A

T102
T102A

03027
03040
03046
03053
03'064

Tl"'2 W

03072

T103A
T1Q!3W
T104

T1~1W

T1~3

Tl~4A

03077
03110
03116
03123
03134

T104 W

~3142

TIQ!5

~3147

T105A

03160
03166
03173

T105W
T106
T106A
T1~7

T107A
T110
T110A
Tl11
TlllA

T112
T112A
T113
T113A

T114
T114A
T115
T115A

032~4

03214
03226
03236
03250
03260
03272
03302
03314

03324
03336
03346
033~0

03370
034~4

T1158

03405

T115W
T116
T116A
T116A
T116w
T117

034~7

03412
03427
0343171
03432
03435

T117A

03452

T117R
T111W
,T120

03453
03455
03'460

PA(',"t

T120A
T1208
T120W
T1:?1
T121A
T1218
T1:?1 W
T122
T122A
T1228
T122W
T123
T123A
T1238
T123W
T124
T124A
T1248
T124W
T125
T125A
T1258
T125W
T126
T126A
T1268
T126W
T127
T127A
T1278
T127W
T130
T130A
T1308
T130W
T131
T131A
T1318
T131 W
T132
T132A
T1328
T132W
T133
T134
T135
T136
T137
T140
T141
T142
T142A
T1428
T142W
T143

EXM15
03475
03476
035~0

035(1l3
~3520

03521
03523
035;;>6
03543
03544
03546
03551
03566
03567
03571
03574
03607
03616
03620
03626
03642
03651
03653
03661
03675
037~4

03706
~3714

03730
03737
03741
03747
03763
03772
03774
04002
04016
04025
04027
04035
04051
04060
04062
04070
04105
04123
04141
04157
04175
04213
04231
04244
04246
04250
04252

PAGE
T143A
T143R
T143\o1
T144
T144A
T1448
T144\o1
T145
T145A
T1458
T145\oj
T146
T146A
T1468
T146W
T147
T147A
T1478
T147W
T150
T150A
T150B
T150W
T151
T152
T152A
T152W
T153
T153A
T153W
T154
T154A
T154W
T155
T155A
T155W
T156
T1156A
T156W
T157
T157A
T157W
T1('0
T160A
T160W
T161
AT0A
AT08
AT0W
T162
ATiA
ATiB
AT1W
T163
AT2A

EXM1~
~4266

04270
04272
04274
043H3
~4312

04314
04316
04332
04334
04336
04340
04354
04356
04360
04362
04376
04''''00
044'02
04404
04420
04422
04424
04426
04443
04456
04463
04466
04502
04507
04512
04526
04533
04536
04552
04557
04562
04576
04603
04606
04622
04627
04632
04646
04653
04656
04673
04705
047~7

04715
04733
04745
04747
04755
04773

PAGE
AT28
ATI>W
T164
AT3A
AT38
AT3W
T165
AT4A
AT48
AT4W
T166
AT5A
AT58
AT5W
T167
AT6A
AT68
AT6W
laC
lOCF0
K10K
l0F1
llFl
L1eF1

EXM15
0521215
05007
2152115
215033
052145
052147
215055
2152173
2151(115
05107
215115
05133
215145
215147
215155
215173
215205
2152217
0~600eJ

V'l0621021
(11121212121
012121(1121
(111212101
PJ1eeJ1eJ

l2~F1

~121eJ221

l40Fl
lOCFl

(1119)21421
(1116212121

K2~K

~20ePJ2I

leJF2
leJ F 3
llF2
l10F2
l2AF2

2129)219)21
022121210
022121211
02212110
2122121221
9)22121421
02621021
030212121
032121(1121
032121211
(113021121
(113021221
032121421
03621210
(1140212121
0402101
04"'21121
214021221
214210421

l4~F2

lOCF2
K30K

l0F4
llF3
l10F3
l20F3
L40F3
lOCF3
K40K
llF4
L10F4
L2~F4

L40F4
LOCF4
K50K
LV'lF5
LiF5
l10F5
L20F5
L4eJF5
loeF5

046~e21

05021021
052121"'0
0502101
05"'21121
"'5021221
050040
056212121

PAGE

K60K
L0f"6
Llf"6
L10f"6
L20f"6
L4Plf"6
LOCF6
K70K
L0F7
L1F7
L10F7
L20F7
L40F7
LOCF7

CHAIN
SETLOC
SETA

MOVE
STf"N
TF"2
TF3
TF"A
TF5
TF6
TF'7

CKAPI
fRROR
ERROR A
TYPE
K404K

SKIP
CLSF"
CLOF

CLON
RSF
ReF
RSA

RRB
RSB

PSF
PCF'
PSA

PS8
KSF'
KR8
TSF
TCF

TLS
EEM
LEM
ExBA
EpA

EBA
CLX
SWA

EXM15
(il60000
"'Ml!000
0691001
060010
060020
060040
066000
0700910
"'70000
9170001
9170010
9170020
070040
076000
100223
100270
100301
100311
100336
100513
100517
100523
100527
100533
100537
100543
100604
100604
100657
404000
60-0240
700001
700004
700044
700101
700102
700104
700112
700144
700201
700202
700204
700244
700301
700312
700401
700402
700406
707702
707704
707761
707762
707764
735000
742030

MAINDEC EVALUATION REQUEST
After sufficient familiarization with the operation and documentation of this MAIN DEC,
please indicate your assessment of the following areas and return this form to Digital Equipment Corporation.
IDENTIFICATION: MAINDEC NO. _ _ _ _ _ _ Program Title _ _ _ _ _ _ _ _ _ __

0 Production 0 Other
Frequency of Usage: Daily 0
Weekly 0
Monthly 0

USAGE: Used by: Field Service

SUGGESTIONS FOR IMPROVEMENT
1. Are the program loading and operating instructions: clear?
follow?O

0, incomplete? 0, difficult to

2. Do the error reports and program documentation provide sufficient diagnostic information.
in all cases?
in most cases?
in very few cases?O. Suggestions for improvement:

3. Is the program effective in isolating malfunctions: in all cases?O, in most cases?
in very few cases?
Would additional Scope loops or Switch Register control be helpful ? _ _
Suggestions for improvement:

4. Does the program ever fail to detect malfunctions exposed by other software?_ _ _ _ _ _ _ __
Were Margins used?
Please describe malfunction in detail:

5. Does the program ever report non-existant malfunctions? _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ __
Please indicate erroneous report and any pertinent operating conditions:

6. Does this MAIN DEC ever expose malfunctions in the Central Processor or other peripheral units not
detected by the appropriate MAINDEC?_~~~~~~~~~~~~~~~~~~~~~_
Please describe malfunction and MAINDEC(S) used:

7. Does the document~ovide a general understanding of the functional programming requirements of
the system? Good
, FairO,
Nonen. Would a general description of programming requirements increase t e effectIveness of thi's;;AAINDEC ? _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ __

Remarks:

......................................................................................... Fold Here .............•..........................•.................................................

................ ......... .......... .... .................. ............. ...... Do Not Tear - Fold Here and Staple ................................................................ .

FIRST CLASS
PERMIT NO. 33
MAYNARD, MASS.
BUSINESS REPLY MAIL
NO POSTAGE STAMP NECESSARY IF MAILED IN THE UNITED STATES

Postage will be paid by:

mamaama
Digital Equipment Corporation
Diagnostic Programming Group
146 Main Street, Building 12
Maynard, Massachusetts 01754