Digital PDFs

MAINDEC-08-DHRKA-E-D

December 1977

86 pages

Original

3.6MB

Document:	RK8E Diskless Control Test
Order Number:	MAINDEC-08-DHRKA-E-D
Revision:
Pages:	86
Original Filename:	https://svn.so-much-stuff.com/svn/trunk/pdp8/src/dec/maindec-08-dhrka/maindec-08-dhrka-e-d.pdf

OCR Text

IDENTIFICATION

PRODUCT CODE!

MAINDEC'DSUDHRKA-E-D

PRODUCT NAME!

RKSE

DATE

JANUARY:

RELEASED:

DISKLESS CONTROL TEST
1977

MAINTAINER:

DIAGNOSTIC ENGINEERING

AUTHOR:

JOHN

UPDATED

BY!

DON

VROBEL

RICE

THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT NOTICE AND
SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT CORPORATION.
NO RESPONSIBILITY FOR ANY ERRORS
DIGITAL
EQUIPMENT CORPORATION ASSUMES
THAT MAY APPEAR IN THIS
DOCUMENT.

THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED UNDER A LICENSE AND
MAY ONLY BE USED 0R COPIED IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE USE OR
RELIABILITY OF ITS SOFTWAPE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL.

(C)

1972:

1975:

1977

DIGITAL EQUIPMENT CORPORATION

TABLE OF CONTENTS

ABSTRACT
REQUIREMENTS
HARDwARE

SPECIAL
erRAOE
PRELIMINARY

PROGRAMS

REGISIER ssrwxuas

SWITCH

OPERATOR AND/OR PROGRAM ACTION
sTANDARD

TEST RROOEDURO

stxnzss CONTROL rssr
MANUAL

SCOPE

wasr FOR

CHANGE RROORAM

IOT

BIT COUNTER

cooss

ERRORS
USEFUL

ERROR

INFORMATION

NON-RECOVERABLE ERROR HALTS
RECOVERABLE

ERROR

TYPEOUTS

scopz

LOOPS

TYPICAL

ERROR

HALT

TYPEOUTS

RESTRICTIONS
TROUBLE SHOOTING
PROGRAM

INFORMATION

DESCRIPTION

consonz PACKAGE ADDENDUM
APT-9

12.

HOOKS

PROGRAM LISTING

ABSTRACT

THE RKOE DISKLESS CONTROL TEST IS DESIGNED FOR
THE PURPOSE OF CHECKOUT OF THE RKBE DISK CONTROL
LOGIC NOT REQUIRING THE USE OF THE DISK DRIVE.
THIS TEST SHOULD BE RUN WITH ALL FXISTING DRIVES
TO

SET

THE

LOAD

POSITION,

REQUIREMENTS
'0.-.----...

HARDWARE

e/M, 0R 9/? COMPUTER on OTHER
a COMPATIBLE COMPUTER WITH
NECESSARY owes BUS ADAPTER.
909.915,

FAMILY

AT LEAST 4K 0? READ/WRITE MEMORY. AT LEAST BK
NEEDED FOR OPERATION OF THE CONSOLE PACKAGE.

MEMORY

nsnbss

TELLTYPE ca EQUIVALENT
axes DISK CONTROL
axosa on Rxesr 015K onxva(s)

2.2

SPECIAL

DISKLESS TEST CAN BE RUN WITH ALL DPIVES
AVAILABLE CABLED TO THE RKBE CONTROL. HOWEVER;
THE POWER MUST BE SUPPLIED TO THE DRIVES; AND

THE
ALL

THE

LOAD

POSITION.

THE DISKLESS TEST CAN ALSO BE RUN
CABLES TO THE DRIVES DISCONNECTED

wxrn
rpou

THE

RKSE

2.3

MUST

SET

THE

CONTROL.

STORAGE

THE
7377

THE
ALL

DRIVES

PROGRAM UTILIZES OP OCCUPIES LOCATIONS
OF FIELD D AND LOCATIONS 02%? TO 1377

GOOD
OF

TO
FIELD

PROGRAM WILL ALSO TEST DATA BREAK TRANSFER TO
EXISTING EXTENDED FIELDS AS INDICATED BY SWP9-11
THE CONSOLE PACKAGE IS NOT ENABLED,

PRELIMINARY

PROGRAMS

ALL BASIC AND EXTENDED MEMORY
BE RUN PRIOR TO THIS TEST,

DIAGNOSTICS SHOULD

SWITCH REGISTER SETTINGS

ENTER SCOPE
AT LOCATION

SWRCIA

LOOP. AFTER

ERROR

HALT

"ERHLT9” RAISING THIS
sWITCH AND PRESSING KP! CONTINUE
HILL CAUSE A SCOPE LOOP ON THE
IF szzxa AND THE
CURRENT TEsT,
TEST Is STILL FAILING, THE ERROR
BELL SHOULD RING INDICATING AN

ERROR.
SWR1:1

INHIBIT END 0? TEST HALT. AT THE CON.
PLETION OR THE TEST THE PROGRAM
SHOULD HALT AT LOCATIoN ”ENDHLT”.
RAISING THIS SWITCH HILL INHIBIT
THE END or TEST HALT.

SWR2=1

INHIBIT ERROR

SWR3=1

GET ALL REGISTERS AFTER 'ERHLTQ".
AFTER AN ERROR HALT AT LOCATION
'ERHLT9”, RAISING THIS SWITCH AND

BELL ON

SCOPE

LOOP.

PRESSING KEY CONTINUE WILL RESULT
IN THE TYPEOUT OF THE ABSOLUTE CONTENTS OF THE STATUS, COMMAND, CFC:
LOWER DATA, AND SURFACE AND SECTOR
REGISTERS. ONCE THIS SWITCH IS USFD
IT IS NECESSARY TO RESART THA DIAGNOSTIC
AT THE START (LOCATION OZDU).

SWR481

sTOP PROGRAM OR TEST HALT. RAISING THIS
SWITCH WILL HALT THE pROGRAM AT
THE COMPLETION OF THE CURRENT TEST.
IF POSSIBLE THIS SWITCH SHOULD
ALNATS BE USED To STOP THE PROGRAM,

SWRQ-ll

AMOUNT OF EXTENDED BANKS 0F MEMORY.
AT INITIAL START or THE PROGRAM,
SWR9-11 INDICATES THE AMOUNT OF
EXISTING EXTENDED MEMORY FIELDS
AVAILABLE To TEST.

OPERATOR AND/0R PROGRAM

ACTION

-...--.C...-..-...-..--C-D.-..

STANDARD

TEST

PROCEDURE

...-..‘-.-.......-.--..

START As SPECIFIED
CLEAR AND THEN KEI
POPS/M COMPUTER.

THROUGHOUT THIS DOCUMENTATION
CONTINUE ON A POPS/E, POPS/F,

B. LOAD THE PROGRAM INTO FIELD
STANDARD

BINARY

LOADER

USING

TECHNIQUE.

THE

Is
OR

KEY

IS DESIRED TO CHANGE THE IOT CODES
FOLLOW THE PROCEDURE IN SECTION

PROGRAM,

5.2

RUN
THE

RUN

DISKLESS CONTROL TEST
PROCEDURE IN SECTION 5.2THE

THE
SECTION

MANUAL

SCOPE

TEST

PORTION

FOLLOWING

WITHIN

FOLLOWING

TEST

LABELED ”RUN/LOAD" TO THE "LOAD" POSITION
DISCONNECT DRIVES FROM RKSE CONTROL.

SET THE SWITCH
ALL DRIVES; OR

DRIVES

POWER

SET

THE

SWITCH REGISTER

0200

SET

THE

SWITCH

@090.

CABLED TO THE
THE DRIVE(S) IS

RKBE

ARE

CONTROL,

VERIFY

ON,
AND

PRESS

LOAD

ADDRESS.

E. SET SWR9'11 TO THE AMOUNT OF AVAILABLE EXTENDED

SET
OF

SWR481

THE

BANKS

AND

THE COMPUTER

START

SWRISI IF THE OPERATOR DESIRES
TEST HALT AT LOCATION ”ENDHLT”.

PROCEDURE

THE

5.3.

DISKLESS CONTROL

MEMORY

THE

5.4.

SHOULD

ALWAYS

USED

R/w

RUNNING.
T0

STOP

INHIBIT

THE

END

PROGRAM,

PROGRAM SHOULD PRINT THE FOLLOWING MESSAGE AT
CONPLETION OF EACH SUCCESSFUL PASS APROX. EVERY

3.5

MINUTES.
"RKSE DISKLESS

COMPLETE"

PASS

ANY HALTS OR TYPEOUTS OTHER THAN THE PASS COMPLETE
TYPEOUT AND THE END OF TEST HALT MENTIONED ABOVE
WILL BE CONCIOERED AN ERROR CONDITION, IN ALL CASES
ACCESS ”ERRORS" SECTION 6 IN THIS DOCUMENTATION,

OF
MANUAL

THE

PROGRAM

SCOPE

TEST

ALL

J. TOR ABSOLUTE LOCATIONS

KNOWN

HALTS

ACCESS PAGE

LISTING.
FOR

COUNTER

RIT

THIS TEST ENABLES THE OPERATOR TO TEST THE 16 BIT COUNTER
WHICH CANNOT BE TESTED UNDER PROGRAM CONTROL IN THE REGULAR
DISKLESS TEST. TO RUN THIS TEST: SIMPLY FOLLOW THE
FOLLOWING

INSTRUCTIONS.

RUN THE DISKLESS CONTROL
MANUAL TEST.

SET

THE

SWITCH

TEST PORTION PRIOR

@294

AND

PRESS

LOAD

THIS

ADDRESS.

C.
D.

SET

SCOPE

THE

M7106

MODULE

GOING

SIGNAL.

THE
9

SWITCH

THE

CARRY

16TH

THE

UOOO

PRESS

AND

OUTPUT: TEST POINT
CONTROL LOGIC,

ALL THAT THE PROGRAM DOES IN THIS SCOPF
SISTANTLY ISSUE HI MAIN SHIFT PULSFS TO
COUNTER ON THE M7166 MODULE,

CHANGE

PROGRAM DEVICE

IOT

14¢

MICRO-SECONDS

(T1);

FOR

RKRE

SIGNAL SHOULD BE A GROUND
WIDE. OCCURRING AT A

APROX.

START,

THE

POSITIVE

3 VOLT PULSE.
MICRO'SECOND RATE,

TEST

THE

IS TO
1b BIT

CON-

CODES

....-ICIOCOCOCOCC.ICCWIOOOI'.--

NORMALLY

PROGRAM

THE

CHANGE

X74X.

THE

RECOGNIZES PROGRAM DEVICE
PROGRAM DEVICE IOT CODE:

B. SET THE SWITCH REGISTER

SET

SWITCH

3-9

THE

PROGRAM
PROGRAM

THE

DESIRED

THE

DEVICE

OZOS

AND

PRESS

IOT

LOAD

CODE

ADDRESS.

99%“: SET SWITCH REGISTER
CODE, AND PRESS START.

IOT

WILL CHANGE THE
AND THEN HALT.

DEVICE

IOT

CODES

WITHIN

PRESSING KEY CONTINUE WILL RESULT IN A START OF
PROGRA“ AT LOCATION 0266 (SEE SECTION 5.2 FOR
OPERATION INSTRUCTIONS).

THE

ERRORS

USEFUL ERROR

INFORMATION

THE

LOCATION OF ALL
ACCESSING PAGE I‘OF

ALL ERRORS FOUND
CORRECTED BEFORE

KNOWN
THE

HALTS

CAN

FOUND

PROGRAM LISTING.

WHEN RUNNING THIS TEST SHOULD
PROCEEDING ON IN THE TEST,

ENCOUNTERS AN ERROR WHEN RUNNING THIS
IN ALL CASES, READ THE ERROR TYFEOUT
INFORMATION. NOTE THE LOCATION OF THE FAILURE, READ
7§DL THE INFORMATION UNDER ERRORS IN THIS DOCUMENTATION;
AND THEN ACCESS THE PROGRAM LISTING won FURTHER
WHEN

TEST

AN
HE

OPERATOR

SHOULD,

INFORMATION.

BITS

6.2

NON-RECOVERABLE

HALTS

ERROR

NON-RECOVERABLE ERROR HALTS FOR WHICH THERE ARE NO
TYPEOUTS 0R SCOPE LOOPS ARE LISTED AND DEFINED AS FOLLOWS!
ERHLTI

UNDEFINED

INTERRUPT

ERHLT2

SKIP

TRAP

FOR

IOT

”DCLP'

ERHLT3

SKIP

TRAP

FOR

IOT

"DLAG"

ERHLT4

SKIP TRAP FOR

IOT

”DLCA”

ERHLTS

SKIP

TRAP

FOR

IOT

"DRST"

ERHLTS

SKIP

TRAP

FOP

IOT

"DLDC"

ERHLT7

SKIP

TRAP

FOR

IOT

”OMAN”

RECOVERABLE

ERROR

HALT

RECOVERABLE ERRORS. FOR WHICH
ERROR TYPEOUTS. SHOULD RESULT
"ERHLT9'.

ALL
AND

ARE

SCOPE

ERROR

LOOPS

RALT

TYPEOUTS

A RECOVERABLE ERROR OCCUPS THE PROGRAM WILL
PRINT A” "ERROR HEADER" WHICH WILL SPECIFY THE
PARTICULAR REGISTER IN ERROR 0R TYPE OF ERROR FOUND
AT THE TIME OF THE FAILURE.

WHEN

POSSIBLE

“ERROR

HEADERS“

ARE

REGISTER ERROR
STATUS REGISTER ERROR
COMMAND REGISIER ERROR
DISK ADDRESS REGISTER ERROR
DATA BREAK ERROR
CRC REGISTER ERROR
DATA REGISTER ERROR
DISK SKIP ERROR
DISK INTERRUPT ERROR
AC

RECOVERABLE ERROR HALT. READ INFORMATION
TYPEOHT 0N TTY AND ACCESS LISTNG.

ERHLT9

ERROR

THERE
IN AN

FOLLOWS.

THE l'ERROR HEADER" MENTIONED ABOVE IS TYPED; THE
PROGRAM WILL PRINT THE FOLLOWING ERROR INFORMATION
FOUND AT THE TIME OF THE FAILURE, PEPTAINING TO THE
FAILURE. POSSIBLE TYPEOUTS ARE AS FOLLOWS.
AFTER

PC!

PROGRAM

GD:

REFERS
OR

TYPE

LOCATION

THE

ACTUAL

FAILURE,

TO THE DATA EXPECTED IN THE REGISTER
OF TEST SPECIFIED IN THE ”ERROR HEADER".
OF

THE

CONTENTS

ST!

CONTENTS OF THE STATUS REGISTER,

DB!

CONTENTS OF

CM:

CONTENTS OF THE COMMAND

DA:

CONTENTS OF THE DISK ADDRESS REGISTER OF
THE CYLINDER; SURFACE: AND SECTOR BITS.

ADI

BREAK

DTI

DATA

AC:

CONTENTS OF

THE

'60:”
IN

ADDRESS

FOUND

LOWER

DATA

DURING
THE

DATA

INFORMATION TYPED
THE REGISTER IN
THE ”ERROR HEADER”.

EXPECTED
OUT

THE

CRC

CR8

DATA

BREAK,
BREAK,

THE
OF

DATA
ERROR

TIRED

THE ERROR INFORMATION INDICATOR SUGGESTED BY THE ”ERROR
HEADER" (I,E. DA: FOR DISK ADDRESS ERROR. CM: FOR COMMAND
REGISTER ERROR: CR: FOR CRC REGISTER ERROR; ETC.): IS THE
ACTUAL CONTENTS OF THAT PARTICULAR REGISTER, ERROR INFORMATION OTHER THAN THAT SUGGFSTED BY THE ”ERROR HEADER” IS THE
SOFTWARE INFORMATION LOADED INTO THAT REGISTER PRIOR TO
THE FAILURE.(NOTE: "ST!” STATUS ALWAYS INDICATES THE ACTUAL

CONTENTS.)
TO TYPEOUT THE ACTUAL CONTENTS OF THE CFC. STATUS.
LOWER DATA, COMMAND, AND sURFACE AND 5ECTOR REGISTERS.
AFTER AN ERROR HALT AT LOCATION "L-TRHLT9”. SET SWR3=1
AND PRESS KEY CONTINUE,

SCOPE LOOPS

THERE

ARE

RESULTING

SCOPE
IN AN

LOOPS
ERROR

AVAILABLE FOR
HALT

ENTER SCOPE LOOP: INHIBIT ERROR
ERROR HALT, AFTER AN ERROR HALT AT
AND PRESS KFY CONTINUE.
TO

IF
IS
IO

ALL

ERRORS

"ERHLT9'.
TYPEOUT, AND INHIBIT
"EPHLT9", SET SWRB=1

SCOPE LOOP IS WORKING CORRECTLY AND
STILL FAILING THF TTY HELL SHOULD PING.
INHIBIT THE TTY BELL.

THE

TYPICAL

ERROR

SET

THE TEST
SWR2=1

TYPEOUTS

THE FOLLOWING IS A TYFICAL EXAMPLE OF AN "ERROR HEADER”
AND TYPEOUT THAT COULD HAVE OCCURRED IF A DIS“ IOT
FAILED TO CLEAR THE AC REGISTER.

PCIISQI

ERROR

60:630O AC3fi1DZ

FOLLOWING IS AN EXAMPLE or AN "apnop HEADER" AND
TYPEouT THAT COULD HAVE OCCURRED WHEN READING THE

THE

COMMAND

PC32100

FOLLOWING IS AN EXAMPLE OF AN ”ERROR HEADER"
TYPEOUI THAT COULD HAVE OCCURRED IF THE DISK
SKIP IOT FAILED TO SKIP.
THE

DISK SKIP
PC83332

ERROR

THE FOLLOWING IS AN EXAMPLE OF AN “ERROR HEADER"
TYREOUT THAT COULD HAVE OCCURRED ON A WRITE DATA
DATA

AND

BREAK,

BREAK

PCI4453

ERROR
6035252 CMI4OOO

AD:7777

DT:525“

RESTRICTIONS

THE
IF

PROGRAM

ONLY

OPERATIONAL

FIELD

DRIVES ARE CABLED TO THE RKSE CONTROL LOGIC,
AC POWER TO THE DRIVES MUS'I BE ON AND THE DRIVES
MUST BE SF? TO THE LOAD POSITION,

THE

TROUBLE SHOOTING

FUNCTION

IOT

6741

INFORMATION

OS"?

"SKIP" SKIP IF TFANSFFR DONE
ERROR FLAG Is SET.

FLAG

6742

DCLP

“CLEAR“
AC

BITS

FUNCTION
1"A

AND

11.

REGULATED BY
AC 15 THEN

THE

CLEARED.
ACIE

AC1!

CLEAR

THE

CLEAR

THE

AC.

AND

STATUS

CONTROL! AND MAJOR
THIS INSTRUCTION WILL
STOP THE CONTROL EVEN IF IT IS
WRITING A HEADER. THIS IS THE ONLY
INSTRUCTION THAT WILL CLEAP

REGISTERS.

MAINTENANCE MODE.

6743

DLAG

CLEAR AC.
AND CLEAR
”LOAD

RECALIBRATE DISK
STATUS REGISTER.

DISK

ADDRESS

AND

GO"

DRIVE:

LOAD

THE

DISK CYLINDER, SURFACE, AND srcwop
FROM THE AC, CLEAR THE AC, AND DO
THE COMMAND IN THE COMMAND REGISTER.
AC

9-6

CYLINDER

SURFACE

8-11

SECTOR

5744

DLcA

"LOAD

UPPER)

(0‘

LOWER)

ADDRESS" LOAD THE
ADDRESS FROM AC, THE AC

CURRENT

CURRENT
IS

(1=

THEN

CLEARED.

CURRENT

not:

6745

DRST

ADDRESS

”READ STATUS” CLEAR THE AC AND
PEAD THE CONTENTS OF THE STATUS
REGISTER INTO THE Ac.

TRANSFER DONE
READY TO SEEK,

J-‘Owfloubwh‘fi

READ,
USED
SEEK FAIL
DISK FILE READY
CONIROL BUSY FHPOP
TIME OUT FPROP
WPITF LOCK ERPOP
CFC ERROR
DATA RATE ERROR

WRITE.

NOT

DRIVE STATUS EPPOP
CYLINDER ADDRrss FPROF

6
1

6746

DLDC

"LOAD COMMAND" LOAD THE COMMAND
REGISTER FROM Ac, CLEAR THE Ac.
AND CLEAR THE STATUS REGISTER.

9-2=D
v-2=1
E-2=2
v-2=3
6-2=4
9-2=5
0-2=b

READ DATA
READ ALL
WRITE LOCK
SEEK ONLY
WRITE DATA

D-2=7

NOT

fi-‘O‘IO‘WOU

WRITE ALL
USED

NOT

USED
ENABLE INTERPUPT
ENABLE SET TRANSFER DONE
HALF BLOC? 129 WORDS
EXTENDED MFMOPY ADDRESS

SEEK

DONE

EXTENDED

MLNOPY ADDPESS
EXTENDED MEMORY ADDRESS
UNIT SELECT
UNIT SELECT
EXTENDED CYLINDER ADDRESS

6747

DMAN

"MAINTENANCE IOT” LOAD THE
MAINTENANCE PFGTSTFR FROM THE AC. THE
FUNCTION Is RFGULATED BY THE AC BITS,
MAINTENANCE MODE CAN ONLY BE CLEARED
BY DCLR ”CLEAR CONTROL".

MAINTENANCE MODE
ENABLE SHIFT TO LONER BUFFER
AC BIT 1». CRC REGISTER, AND THE
LOWER DATA BUFFER ARE CONNECTED AS
A SHIFT REGISTER, AC 811 10 DATA
SHIFTS TO THE CRC. THE CRC SHIFTS
ENTER

”‘3

THE

LOWER

SHIFT COMMAND

DATA

DATA BUFFER.
REGISTER To

THE

LOWER

BUFFER,

SURFACE AND SECTOR REGISTER
LOWER DATA BUFFEF.
SHIFT AC 10 DATA To THE UPPER
DATA BUFFER. THE UPPER BUFFER
sHOnLO SINK IN THE SILO NHEN

SHIFT THE

THE

FULL.
SINGLE CYCLE BREAK PEOUEST.
DIRECTION Is PEGULATED B! FUNCTION
IN THE COMMAND REGISTER.

ONE

CLEAR AC THEN READ
DATA BUFFER To THE

3
9

NOT
NOT

USED

PROGRAM

THE

LOWER

AC.

USED.
USED.
As

DATA

WITH

OTHER

THE

MAINTENANCE MODE.

NOT

USED.

BITS

DESCRIPTION

THE RKOE DISKDESS CONTROL TEST IS BASICALLY A STATIC
REGISTER AND 10? TEST ON THE RKBE DISK CONTROL LOGIC NOT
REQUIRING THE USE OF THE DISK DRIVE, SINGLE CYCLE BREAKS
ARE ALSO EXECUTED TO AND FROM THE CONTROL LOGIC.
PROGRAM IS DIVIDED INTO MANY SEPARATE INDIVIDUAL
WHICH WILL TEST DIFFERENT PARTS OF TEL CONTROL
LOGIC. THE SUBTESTS APE ARRANGED IN SUCH A MANNER T0 TEST
THE EASIEST FUNCTIONS FIRST. PRECEEDING EACH SUBTEST, IN
THE LISTING, Is A SHORT EXPLANATION OF THE TEST AND LOGIC
THE

SUBTESTS.

TESTED.

BRIEF

EXPLANATION

FOLLOWS!

SETUP

SURIESTS

AND

PROGRAM

FLOW

SETUP pOINTERS AND RETURNS FOR CURRENT FIELD:
OF EXTENDED FIELDS, AND INTERRUPT SERVICE.

AMOUNT

TSTD-TST3

VERIFY REGISTERS AND CONTROL FLIP-FLOPS WERE CLEARED
BY 'CLP ALL“ AT START or TEST,
(NOTE: 'CLR ALL" GENERATED
BY KEY START 0N MOST POP-8’5 OR KEYS CLEAR AND THEN
CONTINUE ON A PDP-a/E, 8/? 0R SIM.)

TST4

VERIFY

ALL

DRIVES
FROM

DISCONNECTED
D.

ARE SET
CONTROL

"LOAD” 0R WERE
START OF TEST.

TSTS
.‘C.

VERIFY

"USN?”

DISK

SKIP

IOT

DOESN'T

AFFECT

TSTS-TSTO

VERIFY THAT IOTS "DLCA LOAD CURRENT ADDRESS", 'DLDC LOAD
COMMAND“: 'DLAG LOAD DISK ADDRESS”, AND ”DCLF CLEAR CONTROL
FUNCTION” DO CLEAR THE AC REGISTER AFTER THEIR EXECUTION.

TSTIO-TST14

CLEARING. AND
PATTERNS

READING

THE

COMMAND

VERIFY LOADING. CLEAPING. AND READING
REGISTER USING VARIOUS DATA PATTERNS.

THE

DISK

THE

COMMAND

VERIFY LOADING:
USING

VARIOUS

DATA

TSTIS-TSTZS

ADDRESS

TST29-TST3O

VERIFY

USING

LOADING; CLEARING. AND
VARIOUS DATA PATTERNS

READING

TSTJ!

VERIFY

LOADING:
REGISTER.

AND

PEADINO

IOT"

DOES NOT

THE

DISK

ADDRESS

TSTJZ-TST33

VERIFY

K-

CLEARING:

“OMAN

MAINTENANCE

EFFECT

TST34-TST35
.....-...-.

VERIFY

MAINTENANCE

MODE

CAN

SET

AND

CLEARED

CORRECTLY.

TST36-TST40

VERIFY LOADING: READING. AND
USING VARIOUS DATA PATTERNS.

CLEARING THE

CRC

CLEARING

BUFFER

TST410T5T48

VERIFY LOADING, READING, AND
USING VARIOUS DATA PATTERNS

THE

REGISTERS

TST49-TST76

VERIFY SETTING AND CLEARING VARIOUS STATUS REGISTER
BITS, ERROR FLAGS: SKIP FUNCTIONS. AND INTERRUPT

FUNCTIONS,
0.

TST77-TST10O

VERIFY READ AND WRITE MAINTENANCE DATA BREAKS TO AND
FROM CONTROL USING VARIOUS DATA PATTERNS IN CURRENT FIELD.
TSTlQl-TSTIOS

VERIFY READ AND WRITE MAINTENANCE DATA BREAKS TO AND
FROM CONTROL USING VARIOUS DATA PATTERNS IN ALL EXISTlNG
EXTENDED R/W MEMORY FIELDS-

TYPE

PASS COMPLETE

AND

LOOP

T5T4.

an.

CONSOLE PACKAGE ADDENDUM
.‘C..-’...-.-..-C......-

10.1.

DESCRIPTION

THE CONSOLE PACKAGE HAS BEEN ADDED TO THIS DIAGNOSTIC To ALLOW
THE PROGRAM TO RUN WITH No HARDWARE szTCH PEGISTEP AND TO
HAVE COMMUNICATIONS WIIH THE DIAGNOSTIC VIA A TERMINAL. THE
DIAGNOSTIC CAN BE RUN IN Two MODES NITH THE CONSOLE
RUNNING WITH THE CONSOLE PACKAGE ACTIVE
PACKAGE .
I)
THIS ALLOWS THE OPERATOP CONTROL OF THE DIAGNOS1IC THAOUGH
THE TERMINAL. THE DIAGNOSTIC WILL ASK FOR THE VALUE or THE PSEUDO
SWITCH REGISTER.SEEORE CONTINUING WITH EXECUTION OF THE
DIAGNOSTIC. ALL ERRORS AND PASS COMPLETES WILL BE PRINTED AT
THE TERMINAL. NO HALTS WILL BE EXECUTED.
2) CONSOLE PACKAGE NOT ACTIVE-THIS WILL RFSULT IN THE
NORMAL STANDALONE OPERATION OF THE PROGRAM AS DISCRIEED IN
SECTIONS 1 THROUGH 9 OF THIS DOCUMENT,
-

10.2

RESTRICTIONS
.‘.....-m'..

1)
PSEUDO

RUNNING THE CONSOLE PACKAGE
SWITCH REGISTEP BE USED,

REQUIRES

THAT

THE

ONCE RUNNING THE CONSOLE PACKAGE NONACTIVE AND
DESIRE TO RUN IT ACTIVE. 0N5 MUST PELOAD THE DIAGNOSTIC
AND INITILIZE FOR A ACTIVE CONSOLE PACKAGE,
2)

NOW

10.3

INITIALIZATION

FOR

ACTIVE CONSOLE PACKAGE

SET

1.)

LOCATION

EITOxD

INDTCATE

USE

BIT3=1

INDICATE

CONSOLE

PSEUDO

SWITCH

2.)
FOR

1.)

NON

LOCATION

ACTIVE

CONSOLE

SET LOCATION

SWITCH REGISTER.

2.)

SET LOCATION

ACTIVE.

PACKAGE

ACTIVE.

PACKAGE

BTTD=1
BUT

bIT3:O

INDICATE NOT To USE RSEUDD
USE HARDNARE SWITCHES.

INDICATE CONSOLE

PACKAGE

NOT

1n.4

CONTROL

CHARACTERS

.‘C...’........D"

CHARACTERS ARE USED TO GIVE THE OPERATOR THE
TO PERFORM THE FOLLOWING FUNCTIONS.
RESPOND TO THE CONTROL
NOTE: THE PROGRAM WILL
CHARACTER IN FIVE (5) SECONDS OR LESS.
CONTROL
ABILITY

CONTROL

THIS WILL START THE
IN LOCATION 760“.
CONTROL

THAT

THIS WILL
REASK THE
DESCRIBED
CONTROL

LOADER

RESTART THE PROGRAM AND
SWITCH REGISTER QUESTION
IN SETION 10.2.

THIS WILL CONTINUE THE PROGRAM FROM
AN ERROR IF ALLOWED BY THE DIAGNOSTIC
OR FROM A WAITING STATEHENT.
CONTROL

L
WILL SWITCH THE TERMINAL MESSAGES
THE DISPLAY TO A LINE PRINTER.
TO RESTORE THE MESSAGES ON THE TERMINAL
CONTROL L MUST BE TYPED AGAIN.IF
NO PRINTER IS AVAIBLE AND CONTROL L
IS TIRED THE RESULT WILL BE THAT THE
CONSOLE PACKAGE WILL WAIT FOR CONTROL C
THE CONTROL L WILL OUTPUT TO THE LINE
PRINTER AND THE PROGRAM WILL
ATTEMPT TO CONTINUE AS IF A CONTROL E
WAS TYPED IN.

THIS
FROM

CONTROL D
THIS WILL ALLOW THE
THE SWITCH REGISTER

ABILITY

CHANGE

DURING PROGRAM
OPERATION, TYPING THIS CHARACTER WILL RESULT
IN AN INTERIGATION OF THE SWITCH REGISTER
QUESTION AS DESCRIBED IN SECTION 10.6.

CONTROL

THIS
LOOP
WILL
THIS
CONTROL

WILL STOP PROGRAM EXECTUION AND WAIT TN A
FOR A CONTINUE. THE ONLY WAY TO CONTINUE
RE T0 TYPE A CONTROL U,
R OR C .
IS A NONPRINTING CHARACTER.

THIS
5

CONTINUE A PROGRAM AFTER A CONTROL
A NONPRINTING CHARACTER.

TYPEO.THIS IS

10.5

WAITING MESSAGE

THE

MESSAGE IS USED To ALLOW THE OPERATOR
DECISION AS TO WHAT CONTROL CHARACTER
THIS MESSAGE MAY APPEAR AT THE END

WAITING
MAKE

TO TYPE,
OF PASS MESSAGE IF
CHARACTERS MAY NOW

THE
BE

HALT
USED

0N
TO

TIME

PASS BIT IS SET.IHE CONTROL
PERFORM THE NEEDED FUNCTION,

MESSAGE MAY BE PRINTED AFTER A ERROR MESSAGE
ERROR BIT IS SET.HERE AGAIN THE CONTROL
CHARACTERS MAY BE USED.
THE WAITING MESSAGE MAY BE PRINTED IF OPERATOR INTERVENTION
THE WAITING
IF THE HALT

10.6

REQUIRED.
REGISTER MESSAGE

SWITCH

THIS MESSAGE IS USED TO SETUP THE PSEUDO SWITCH REGISTER
BEFORE PROGRANI EXECUTION TAKES PLACE.THF SWITCH REGISTER
IS SETUP WHEN THE FOURTH CHARACTER IS ENTERED OR A CARRIAGE
RETURN

TYPED

Illfi‘!iilil'§{[villlllliifiilifiifififfiiifili§§§i§*§*i§*§i§§fiill§

SR=D900

UNDER

10.7

END

4EOG

SCORING

INDICATES OPERATOR

RESPONCE

PASS

.‘.....--.-

AN INDICATION WILL BE GIVEN WHEN THE DIAGNOSTIC HA5 MADb A
SUCESSFULL PASS. THE PRINT OUT WILL INDICATE THE DIAGNOSTIC
MAINDEC NUMBER THE WORD PASS AND A FOUR DIGTT PASS NUMBER,
A PASS WILL BE A TIME PERIOD RATHER THAN A PROGRAM PASS
OF THE DIAGNOSTIC. THE TIME PERIOD WILL BE IN THE RANGE OF
A PROGRAM
ONE (1) T0 FIVE (5) MINUTES. IF THE DIAGNOSTIC MAKES
PASS IN THE 1 TO 5 MINUTE RANGE THEN THE PASS COUNT WILL BE THE
SAME AS THE NUMBER OF PROGRAM PASSES.IF THE PROGRAM MAKES A
PROGRAM PASS IN LESS THEN ONE MINUTE THEN THE PASS COUNT WILL
NOT BE THE SAME AS THE PASS COUNTER THE PASS COUNTER WILL
REFLECT MORE THEN ON PROGRAM PASS.
THE NUMBER OF PROGRAM PASSES REQUIRED FOR ‘A PASS MESSAGE
CAN BE FOUND IN LOCATION “2‘6.

IF HALT AT END OF PASS IS SET THEN THE PASS MESSAGE WILL BE
PRINTED AND A WAITING STATEMENT WILL ALSO BE PRINTED,
A CONTROL CHARACTER IS NEEDED TO CONTINUE FROM THIS MESSAGE.
THE FORMAT OF THE END OF PASS MESSAGE IS
i§i§fiiiilfii0liilfiiififiiliib§ii!i*i*'lli§i§ll§i§fflifiéiiii

NAME

PASS

0001

in}.GGO‘IQQIIIO'DIHINC.{IGGGHDSOOU‘IOO'IOI‘IOOOOOfili‘ifififi‘fii‘

10.8

ERRORS

THE STANDARD ERROR REPORTS AS DESCRIBED
OF THIS DOCUMENT WILL SE USED-

10.9

SECTION 6

SWITCH REGISTER SETTINGS

THE STANDARD SWITCH SETTINGS AS
OF THIS DOCUMENT WILL BE USED-

10.10

PARAMETER

CONTROL

SECTION

WORDS

THE CONSOLE PACKAGE
FOLLOWING PURPOSES.

LOCATION 20
PSEUDO SWITCH

DESCRIBED

USES

LOCATION
HARDWARE

IDENTIFIER

LOCATION
HARDWARE

22
IDENTIFIER

THE

LOCATIONS

FOR

THE

LOCATION

0O?!

BIT

OCTAL VALUE

FUNCTION

4900

USE

2906

OPTION

lfiflz

OPTION

408

290

OPTION

1ua

NOT

POPS-E

7°11

WHEN

FUNCTION

WHEN

USE

HARUWAPE

HAS

OPTION

HAS

ODTION

SIMULATOR

HA5

SIMULATOR

HAS

OPTION

XOR

PSEUDO

MEMORY

SWITCHES

SIZE

EX.

SWITCHES

SIMuLATOR
SIMULATOR

XOR

POPS-F

CPU

TYDE

TYPE

CPU

1K=OO
7K=01
7K=ab

32K=31

LOCATION
BIT

9322
OCIAL

VALUE

FUNCTION

WHEN

PUNCTYON

WHFN

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

4000

NOT

ACTBA

7009

NOT

0”

ACT

1900

NOT

YET

499

DEACTTVE
PACKAGE

LINE
LINE

ACT

LINE

ACT

LINE

DEFINFD

CONSOLE

ACTIVE

PACKAGE

CONsoLE

10,11

LOCATION

CHANGES

FOLLOWING
NEED

THE

SPECIFIC

FIELD I
LOCATIONS CAN BE CHANGED TO
FOR MODIFICATION OF THE DIAGNOSTIC.
IS THE
NUMBER

9246

PRINT
IS THE
FILLER

1037

11.

LOCATION FOR THE VALUE OF
OF PROGRAM PASSES NEED TO
THE END OF PASS MESSAGE.

LOCATION

SET

CHARACTERS

FOR
AFTER

MEET

THE

THE NUMBER
A CPLF SET

OF
TO

POUR

(4)

HOOKS

APT-R

...........

11.1

DESCRIPTION.
-.----.-.--.

TWO INTERFACES HAVE BEEN PROVIDED WHICH
TO RUN UNDER THE STANDARD APT'B SYSTEM,

ERROR

TIMING

EACH

11.2

DIAGNOSTIC

ALLOW

THIS

THESE

CONSIDERATIONS

ARE:

INTERFACE

WILL

INTERFACE
BE

EXPLAINED

DETAIL.

SET-UP

ONLY HARDWARE CONFIGURATION wORD 2 NEED BE ESTABLISHED
AT PROGRAM START UP. PIT ZERO (O) MUST BE SET TO A ONE
TO INDICATE THAT THE PROGRAM IS TO RUN UNDER APT-8.

11.3

APT-8

11.3.1.

TIMING

(1)

INTERFACES

Is NOTIFIIED OF PROGRAM RUN WITHIN A .2 sac TO
2.v sac WINDOW WHEN uszo WITH A 1.2 MICROSECOND MEMORY CYCLE
TIME. THIS WINDOW wns ESTABLISHED so THAT IF RUN ON THE snowsp

APT-9

11.3.2

nos

MEMORY

THE

ARI-a

was

DIAGNOSTIC

WOULD

nor

CAUSE

TIMEOUT

ERROR

SYSTEM.

ERRORS

0N APT-8 ALL ERRORS APE CONSIDERED FATAL. WHEN
REPORTING AN ERROR ONLY THE ERROR PC TS REPORTED T0 APT. ERRORS
WHICH CAUSE A SYSTEM HALT ARE NOT REPORTED, THESE ERRORS ARE
INDICATED BY A TIMEOUT ERROR 0N APT, THE ACTUAL ERROR CAN BE
DETERMINED BY EXAMINING THE AC AT THE TIME or THE HALT,
WHEN

PROGRAMED

HALTS

DOCUMENT.
12.

PROGRAM

LISTING

ARE

EXPLAINED

EARLIEP

THIS

PALIO

VIAZA

PAGE

13355

7-HAR-77

ans)—
0

:NAINDEC-OB-DHRKA-E-L

Oil

a
0

0001

0022

ZMAYNARD,

SEQ

0023

MASS, 01754.

FIELD

u n

ICONSOL

-V2'99'

SRC

CONSOLE PACKAGE

ILASI CALL CBCKSW OR JMS XCBSH
[THIS WILL READ THE SWITCH REGISTER FROM
IBY LOCATION 20 BIT 0.

[THE

PROGRAN

SHOULD CHECK

FIVEIS)

IEVERY

SECONDS

FOR

THE

CHARACTER

CONTROL

SPECIFIED

PLACE

THE

FRON

TERMINAL

SOONER.

[LOCATIONS THAT NEED TO BE SET UP FOR USING THE CONSOLE PACKAGE,
THIS LOCATION DETERMINDS THE NUMBER OF
ICNTVAL IN XCBPASS
[PROGRAM COMPLETIONS THAT ARE NEEDED BEFORE THE PASS MESSAGE
[THE VALUE SHOULD PUT THE PASS MESSAGE OUT IN THE RANGE OF 1

ITHIS

SHOULD

TYPED

0000

[SETUPI

[PLACE

THE

ISETUP2

XCNPASS

THIS

THE

FOR

MASK

/IN COMBINING THE CONSOL
ITHE CALL TABLE 15 TO BE

PACKAGE
AT

HALT

ASSEMBLY.

END

PASS.

CONSOLIO.
DIAGNOSTIC.

BEFORE
A

THE BEGINNING OF

PROGRAM.

CONSOLIO
PSKEI

6661
6662
6663

PCLFPSKEI

6663
6661
6665

PSTBI

6004
770‘

VIQTA

CQSTRT

XCBERR
THIS 15 THE MASK BIT FOR HALT ON ERROR
CORRECT BIT IN THIS LOCATION FOR HALTING ON ERRORS.

ITHE CALL TABLE 15 A CONDITIONAL
ITO ASSEMBLE THE CALL REMOVE THE

6661
6662

PAL10

MINUTES.

NUNBER.

POSITIVE

THIS IS FOUND IN CNTRL ROUTINE CONTROL R PART
[CBSTRT
[IT IS THE RETURN WHEN CONTROL R 15 ENTERED (RESTART PROGRAM)
/THE RETURN JUMPS T0 XDOSH WHICH CONTAINS CBSTRT SO PUT THE LABEL
INHERE YOU “ANT T0 RESTART THE PROGRAM.

666‘

PSIEC

6665

GTEI
ACLI

6004

CAEI
MOLI

6007

775‘

7-MAR-77

6007
7%:1
7501

13|55

PAGE

1-!

742!»
750!

NOAS
/

0020

'20
I

0020

0021
0027

FISHRp
FTOPi,

IPSEUDO SWITCH
ICONTROL I

FIOPZ;

ICONTROL

IFDEF

9024

0024
0025
0026

442‘
0700
4425

0656

4432

capanr: JMs
casuxrx

I
XCBPNT
JMs 1
JMs I
xcaocr
ans 1

‘43;

cacRLr:

1a23

xcaan
CRECHOI JMS I
xcaacu

‘06?
4435

can”:

1a77

4436
1297
4437
0635
444a

0040

'cql

0041

0337

«441

CEERR!

JMS I
xcaTvP
JMs 1
JNS

CfiCKPA:

JMS I
XCSCKP

JMS

XCBPAU

ROUTINE

SETTING

IFETCH

CONsOL CHAR

[CHECK

ron

CONTROL

CHAR

Ica

[SET

BUFFER

PSEUDO

REG

sw.

[CONVERT

ASCII

AND

/DO

CARRIGE

RETUR

LINE

FEED

[CHECK

xuqu CHAR

CHAR

ICE

ICR

ERROR

HANDLFR

lboox

FOR

OPERATOR

[CHECK

ONE

xCaINo

CSPAUS=

REG

XCBERR
C81NOU=

COMPLETION

/CHECK

xcspsu
CBOCTA:

PASS

ICB
.

XCBCNT

tag?

443‘

0037

XCGPAS
JMS I
XCBsw
xcsrwv
JNS I

0031

0036

JMS

CSCKSHI

JMS

9303

0035

CRPASS:

COCNTRI

0030

0034

O24

CBTTYI:

54oo
443a

003)

4427
0027

0032

CONSOL

0262
4426
9212

$431

INTERVENTION

CONTROL CHAR

CONSOL PACKAGE RETURN CALL PLUS ONE
NOT USING CONSOL REPLACE CALL NITH

/IF
/IF
IA

HLT

AND

THEN

THE

HALT

/.I.I"‘IO.UOII§I§.IOIIIII'IIIii.OIIiiDICIIIIIIGIOISIOOOCIOIOOI.‘NII&.OI
/PSEUDO SwITCH REGISTER
/v2a
I»?!

l4000=USE

Iaona=uSE
110

SEQ

gRKSE DISKLESS CONTROL TEST

l'27

[HARDWARE INDICATORS
FRONT PANEL SWITCH nEstrER
THE psanno SWITCH REGIsTER LOC.20

/SYSTEM

CONFIGURATION

PAL10

VICIA

PIGE

13155

7'MAR-77

1-?
PACKAGE

llDflICONSOL

SEC

0024

SEC

«025

sET ACTIVE
SET DEACTIVE

[0000ECONSOLE PACKAGE

IRESERVEO

IP23

FOR

FUTURE usE

0300

0200
I‘OIOQOOIOO0.00.0000...000000.DOOIOOO0I‘i‘fii0.0.00.000000....iil'00000

ICBPASS
ITHIs Is CALLED
/THE VALUE Oroa

THE END OF EACH PROGRAM COMPLETION
CNTVALII HILL BE DETERMINED BY THE TIME IT TAKES
THIs MANV COoAss To BE IN THE 1 To 4 MINUTE
AT

To COMPLETE

ITHE PROGRA”

IRANCE

CRPAsEans

/Ex.

XCOPAs

CALL

CRPAss

/HALT

UMP

START!

/RETURN TO LOCATION
/IF CONTINUE To RUN

CALL PLUS

ONE

THE

HIT"

ACID

NON

THEN RETURN To CALL PLus2 AC:O
LOCATION SETUP2 Is THE MASK BIT FOR THE HALT AT
ICHECK THAT IT Is CORRECT FOR THE CURRENT PROGRAM

XCBPAS:

CONsOL

END

ITHE

[CALLS UsED BY XCOPAC ARE

NON

CONsOL

PACKAGE

ICONTINUE RUNNING THIs PROGRAM

PAcKAGE

AND

HLT

RAss

CHKCLA-XCCCRLF-xCaoCTA-xcesw-XCORNT-xcaINO-

CLA
JMs
JHP

CHKCLA

JNE

CIGET
XCIIW
(‘00

JMP

152
0M8
ans
HEaRAs
TID

EETURz,

CBBVI
PASCNT
XCICRLF
XCSPNT

RUNNING

PROGRAM

ICaPAas COuNT DONE

sET

COPAss COUNT

ICORRNT BUTTER
/

PRSCNT

[GET NUMBER
[CONVERT IT TO ASCII
A CARRIAGE RETURN

ans

xcasw

IGET ALL REGIsTERs.
ICHECK A HALT AT END OF cepAss

AND

tone

[MASK

[DO

CLA

Iaz
I

0
TAD

13155

FOR

INPUT

ICHECK Tr sET UP NEEDED
IO-EET UP caPAss COUNT VALUE

CLA

T-MAR-77

BIT

IHALT :1 No CKIP CONTINUE no
IBTOP PROGRAM EXECUTION-LOOK
/BUMP RETURN

XCBINo
XCBPAs
XCIPAC
DosET

SZA

V142A

HALT

ICONTINUE

JMs

J"?

CKCOUT:

IGO

/CLA55 CHECK CRPACE COUNT
ICOPAss COUNT NOT DONE REDO PROGRAM

XCBCRLE
CNGET

sEA
JNE

COBVI,

[FOR HALT 0N END or COPAss
l1- HALT 0 CONTINUE

XCBOCTA

JMS
JNC

CONsOLET

/DEACTTVE CONsOL CHECK sR EETTINC

JMC
AND
flzk CLA
4MP I
XCDPA:
JMR
COBVI
JME
CKCOUT

DOPACK:

P1010

/Ts NORD 22 BIT 3 ACTIVE
lls CLASSIC
IGET ALL REGISTERS.

DOPACK

PAGE

1-3

IA-CBPASS COUNT VALUE OK
0235

52‘?

ON?

NOEET

CNTVAL

0736

1752

TAD

0237

7040

CNA

02G0
0241
0242
0243
0244
0245

OCA

DOCNT

Isl
Taz
JMR
DCA
Isz
JMR

DOSET

0206

3247
7251
2247
5230
3251
2232
5632

0247

0000

0250
0251

0000

0152
0253
0254
9255

0000

0256

0000
0410

NosET,

DocNT.
PACCNT,
DosET,
CNTVAL.
MESPAS:

ICOPAss COUNT VALUE ON
IGET COUNT VALUE FOR THIS PROG
IsET To NEGATIVE
[STORE IN HERE
IINDICATE VALUE EET UP
ICOUNT THE NUMBER OF PAssEs
IEXIT FOR ANOTHER RAss
(SET TO CCRRNT caPAss
/BUMP RETURN TOR
ICORAss CRTVPE ouT

DOCNT
CEBVI
DOEET
CKCOUT
CKCOUT

TEXT

'DHRKAE

PASS

2?!)
0105
4040

0257
0260

7001

0261

4000

2323

102
163
10‘
195
106

[.5060COCO...IOOOOIUIEOIIOOOOIODDDDUOOEOOIOOIIOIOOOOIODOODOODID-nun...

187

ICOCKSN

180

109
190

[THIS ROUTINE Cl" BE USED INPLICE OF I READ THE SWITCHES LAS.
IHOUTINE THAT HILL CHECK WHERE TO PEID THE
ICE SWITCHES FROM 1E. FROM PANEL ON PSEUDO SHITCH REGISTER
ITHE SELECTION IS DETEFHIHED BY THE STATE OF BIT 0 IN LOCATION

191

192

193
194

ICFCKSWE
[RETURN

JHs
HITH

JHS XCESN
XCBSH
THE CONTENTS

LOCATION FOLLOWING CILL

WITH

THE

ICE

ANY

CONTRL

195
196

IEX.

197
198

/RETURN

ICALLS

USED

XCSSH.

VALUE

21-

/READ THE CBSNIT
SWITCH REGISTER
OF

CQSHIT

199
200
701
702

ARE-XCBCKPA-

703
200
705

0262

0000

0263

4771‘

IGO

CHECK

0264

7000

JHS
NOP

XCOCKPA

106
707

9265

1021

TAD

IGET

208

0266

7710

SPA

709
210

0257

761‘

021a

TAD

71'

9271

1020
5662

JMP

CLA

100
T

[CHECK
Lls

/PSEUDO

XCBSN

[EXIT

THE

FOP

INDICATOR
FRO" DANE! 4000

IND

SKIF

SWITCH
STATUS

WITH

GET
HIT

FROM
[M

PhNFL

WITH

LAS

AC.

212

?13
?14

IOOOGOOiociiuhnflihcuniuIII..-OI.inn.Iuin.OiOIOOOODOIOOOOOOOOIOOOOO‘Oi

SETTING

PALIO

7-MAR-77

V142A

13155

PAGE

1-4

SEQ

0026

215
[CRTTYI
[THIS ROUTINE WILL LOOK FOR A INPUT FROM THE TERMINAL
[AND REMOVE ANY PARITY BITS: THFN MAKE IT 8 BIT ASCI.
[

CBTTYII JMS

[EX.

JMS

XCBTTY
[READ

XCETTYI

FROM

CHAR

THE

[CALLS

-NONE-

USED

BUT

CBCHAR

OFF

PAGE

[LOOK

FOR

AND

CONSOL DEVICE
[RETURN TO

ROUTINE

CALLED

CALL PLUS ONE AC CONTAINS THE CHAR

XCSECHO

[
[

0272
0273
0274
0275

0000
6031
5273
6036

0276

0277
0300

3766'
1766'
5672

0301
0302

XCBTTY:

KSF
J“?
KRB

.-1

0370

AND

1367

TAD
DCA

(177
(200
CSCHAR
CBCHAR

TAD
JNR

[GET CHAR
[MASK FOR
[ADD

XCBTTY

FLAG

BITS

EIGTP BIT

THE

[STORE

KEYBOARD

[EXIT

[QOIOGOIOI.'.IOIOno».aIt'll[.0000onlouilfiuolinifinhubilaulunanoclilnovn

[COPRNT

[THIS ROUTINE WILL TYPE THE CONTENTS OF THE C9 PRINT BUFFER. THE LOCATION
[OF THE BUFFER WILL BE IN THE ADDRS FOLLOHING THE CALL.
PRINTING OF THE
/WILL STOP HHEN A 00 CHAR IS DETECTED, CHARACTERS ARE PACKED 2 PER «0RD.
/

CSPRNT:

JMS

/EX-

JNS
NESS77

XCBPNT

[

XCSRNT

[CBPRNT THE CONTENTS OF THE FOLLOWING BUFFER
[LOCATION OF CBPRNT BUFFER

[CBRRNT HILL USE THE LOCATION FOLLOWING THE CALL
[CORRNT ROUTINEnRETURN TO CALL PLUS TWO HTTH AC!
[CALLS

0303
0304
0305
0306

0311
0312
0313

5793

0310

769

PAL10
270

0310

1300
1733
3336

2303
1736
0365
7459

0307

V142A

C8001,

CLA

CLL

TAD
DCA
Isl
TAD
AND
sNA
J“?

0317

7001
7012

0320

EA:

7012

RTR

0321

7012

0322

4764'

0323

1736
0363
7450

RTR
JNS
TAD

0327
0330

0331

0332
0333

0334
0335
0336

[GET COPRNT BUFFERS STARTING LOCATION
[STORE IN PTSTOR

PTSTOR
(7700

XCBPNT

[BUMP

PAGE

1-5
[IS AC MINUS
[MAKE CHAR A 300
[MAKE CHAR A 200

AND

(0077

1361
1360

(3740

TAD

(100
(240
XCBTYDE

TAD

4764'
2336

OMS

5310

JHP

182

PTSTOR,

XCBPNT

TAD
SNA

SEQ

AFTER

RDTATE

AFTER

ROTATE

[PUT CHAR IN BITS 4-11 MAKE !T
[CORRNT IT ON CONSOLE
[GET DATA HORD
[MASK FOR RIGHT BYTE
[CHECK IF 00 TERMINATOR
[[EXIT
[ADD FUDGE FACTOR TO DETERMINE
[OR 300 IS TO BE ADD TO CHAR
[ADD 100
[ADD 200

XCBTYPE
FTSTOR

SNA
JHP

7500

RETUR"

[GET DATA WORD
[MASK FOR LEFT BYTE
[CHECK IF 00 TERMINATE
[EXIT

SMA

5703
1362

0000

13155

CML

0324
0325
0326

XCOPNT
PTSTOR
XCOPNT

7-MAR-77

7500
7020

0315
0316

AS THE POINTER FOR THE
0

ARE-XCBTYPE-XCBPNT

USED

XCRPNT,

9900

BUFFER

PTSTOP
CHDOI

ICBTYRE ONLY BITS

4'11

[BUHP POINTER
[DO AGAIN

[STOR

FOR

BIT

“SCI!

200

WORD

CBPRNT BUFFER

/0OI..0II0.00.0...OQDIDIIIIDOOOCI0.0.000...000.06.000.00IDOCOHIOIODOIDOIIOI
[CBPAUS
[THIS ROUTINE WILL CHECK IF THE CONSOL PACKAGE IS
ACTIVE,IF ACTIVE
[IT HILL RETURN TO CALL PLUS ONE ACI
0. AND DO THAT INSTRUCTION.
[IF THE CONSOL PACKAGE IS NOT ACTIVE THE CALL WILL
BE REPLACED
[WITH A 7402 HALT AND THEN RETURN TO THE HALT.
\

CBFAUS:

JNS

XCBPAU

\
x

xMx

JNS

ANYTHING

XCBPAUS

[CHECK

[RETURN

HERE

ACTIVE CONSOL IF NOT
IF 0N ACTIVE CONSOL

[CALLS

0337

9092

0340

0344

7309
4777'
5350
7040
1337

0345

3337

0346
0347
0356

1357
3737
5137

0357

7002

0360

0740

0361

0100

0341
0342
0343

374

XCBPAU,

USFD

ARE

-CHKCLA-

CLA

CLL

JNS

CHKCLA

[CHECK

LDC

J“P

C9D03

[GO

CONSOL

TAD

XCBPAU

[DEACTIVE CONSOLE PACKAGE PUT
[GET CORRECT RETURN ADDFS

DCA

XCOPAU

CMA

TAD

C8003,

DCA
JNP

I
I

(7402
XCEPAU
XCSRAU

BIT
PART

CONSOLE
RETURN

BIT

CALL

RETURN
[GET CODE FOR HLT
[PUT HALT 1N CALL LOCATION
[GO TO HAL! OR RETURN TO NEXT
[SET

HLT

CALL

LOCATION

HALT

HERE

0227

PAL10

V1424

PAGE

13155

7-MAR-77

1-6

EEO

0362
0363
0364
0365

0370

7700
1075
0290
0177

0371
0372

0635

0373
0374
0375

0400

0376

0624

0366
0367

0377

0020

3740
0077
1077

1041
10.0

1023

1200
9490

PAGE
[00.00000000600400066.400000006000I00000000000606006660066666000660004

ICRCNTR
ITHID ROUTINE HILL CHECK POR THE PREsENCE or CONTROL CHARACTERS
IIT HILL CHECK FOR THE POLLOHING CHAR C-R-O-L-s
I

CSCNTRI 0M5 chCNT

/Ex.

ans

XCRCNTR

ICHECK

UMP

ILOC ROLLONING CALL Is FOR CONTINUING THE PROGRAM

J"?

ANYTHING
ANYTHING

EOR CONTROL

CHARACTER

13 FOR RETURN

/LOC.

INMODE

SET

AND

NOT CNTRL CHAR

IRETURN

To CALL

PLUS

ONE

Ir CONTINUE

/RETURN Is To CALL PLus THO Tr INHODE SET AND NOT CONTROL CHAR
IRETURN Is To CALL PLUS THO Ir INRODE :5 NOT sET AND NO
ICONIROL CHIR ..THIE HILL PRINT THE CHARACTER AND A T
[CLEAH THE AC AND RETURN CALLoz.
/CALLE UEED ARE-CHKCLA-XC8TYPE-XCICRLF-CiGET-UPAROu-XC8711-XClP6H/
/

0400
0401

0000
3777'
4776'

I
XCICNT.

ACsAVE
CHKCLA

IEAVE THE AC

JME

5206
1777'

JNP

.oJ

ION

TAD

0405
0406

5600
6004

IExxT NOT ON

0407

3775'
7501

JHP
GTE
DcA

ACOAVE
XCOCNT

0402
0403
0404

0410

0411
0412
0413
0414

DCA
OCA

1257
3256

TAD

1556

0416

7450

0417
0420

5226
1773'

V1424

[CHECK LOC.22 EITJ FOR CONEOLE BIT
ACTXVE CONEOLE
IDEACTIVE CONOOLEGET AC TOR RETURN
ACTIVE CONDOLE

ELIAVE

NOA

3774'
3255

0415

PAL10

OCA

MOEAVE

DCA

REDOA.

TAD

IaAvE THE HO
IEET DIEPLACEHENT INTO TAELE a
[GET ADDRs OE TAELE A
ICONTAINE POINTER TO CONTROL CHAR
IGET CONTROL CHAR PROP TAELE
ICHECR FOR A 0 END or TAELE
IEND or TAELE No CONTROL CHAR
ICONPARE CHAR To CONTROL CHAR

INDEXA
XTADLA
I

RNA
JMP
TAO

GETOAT
GETDAT
DONEA

COCHAR

1-HAR-71

13:55

PAGE

1-1
sEO 0029

379
360
301
302
303
304

305
345

7650

DNA CLA

0423
0424

5243
2255
2256

0425

5215

OMP
In
181
ONP

0426
0427

7640

0421
0422

1772‘
5240

393

0430
0431
0432
0433
0434
0435
0436
0437

394
395

0440
0441

2200

396

5600

397

0442
0443

395

0444

399

0445

400
401
402
403
404

0446
0447

405
406

0453

1366
3773'
1260
1255
3254
1654
3254
5654
0000
0000

387

305

389
390

391
392

0450

0451
0452

407

0454
0455

DONEA.

TAO

TAD

an:
JND
IEE
JHP
Is:
TAO
JMP
TAD

5600

EXITA,

1773'

GOITA,

ICET CODE EOR

XCICNT
XCOcNT
XCOCNT

TAD

OCA

CDCHAR
XCOCNT

[BUMP RETURN
IPDT CHAR IN
IExIT

CRCHAR

/GET THE CONTENT: or CHAR

TAD
OCA

JHP

IAOO

400

0456

0000

0457

0461

0460

0471

411
412
413

0461
0462
0463

7575
7557

7557

414

7556
7555

410

0470

7577
7574
0000

7573

417

0464
0465
0466
0467

MAIN

PROGRAM

CHECK

TORM

GOOD

AsCII

CHARACTER

INDExA
GOTOA
COTOA
GOTOA

GOTOA

/ADDRs or TARLER
ICNTRL c BACK To

ICNTRL L
ICNTRL o
ICNTRD R
ICNTRL

ICNTPL

[CONTROL

7514

MONITOR

293

szTCH ERROR PRINTTTNG DEVICE 214
sTART DISPLAYING CHAR. AGAIN 221
TO REGINNING OF PROGRAM
STOP SENDING cHAR To DISPLAY
BACK

CONTXNUE
D CHANCE

WITH

205
REGISTER on

sHITCH

0000

0471

421

422

0472
0473

0551
0537
0500

423

0474

0511

CNTRLC
CNTRLL
cNTRLO
CNTRLR

424

0475
0476

0521

CNTRLs

0545

0477

0600

425

426
427

TABLE.

CNTRLE
CNTRLD
/

426

ICONTPOL

429

[START

430
431

/THIs

432
433

SENDING CHAR.

THE

HILL RETURN CONTROL
ITHE CALL FOR CONTROL 5.
0500

3772'

CNTRLOA

DCA

INMODF

DISPLAY
CALL THAT HAs

ISET

SOFT

SET

FLAG

FOP

272
NATT

PROGRAM

419
420

or CHAR

Ac.

IREsTORE COFFECT CHAR

7575
7554

7564

1am

POR

IGET ETART or TAELE a
IGET NON FAR INTO TABLE
[STORE IT
/GET THE ROUTINE STARTTING ADDREss
/sTORE IT IN HERE
IGOTO CONTROL CHAR ROUTINE
[ADD or CNTRL ROUTINE To EXECUTE
/OstLACEMENT INTO CNTRL TABLE
/LocATION or ADDRs or CONTROL CHAR.
IADORs or TARLEA

0000
ROOO
0000
TAELA
TIBLB

COTOA,
INDExA.
GETDAT.
XTARLA.
XTAELE,
TARLA,

'1'

[BUMP RETURN
IEXIT CALLoz

(100
COCHAR
XTABLB

OCA

410

416

ICOPRNT CHAR

XCOCRLE

TAD

409

415

[No MATCH NOT END or TAELE REDO
IRUNP INDEX TOR EXIT HHEN CONTROL POUND
[BUMP GETDAT FOR COMPARE OE NEXT CNTRL CHAR.
ICHECR Ir PROGRAM EXPECTs CHAR
/1:CHAR EXPECTED
O- NO CHAR EXPECTED
ICHAR EXPECTED
IGET CHAR . NOT CONTROL 0 NOT EXPECTED

ERITA
COCHAR
XCOTYPE
(271
ACRTyPE

UNP
TAD

ONE

I! HATCH

/HATCH

81A CLA

1713’
4771'
1370
4771'
4767'
2200

1713‘

GOITA
INDEXA
GETDAT
REDOA
INMODE

UNEXPECTED

CHIP

FOR

CNTRL

223

PAL10

V142A

PAGE

13155

7-MAH-77

1-8
SEQ

434

0501

1335

TAD

435

0502

7640

SEA

436

0503

5306

an?

437

0504
0505

4765"

JMS

438

439
440

441

0506
0507
0510

5500
3335
4765’
5736

JWP

JMP
I

44!

441
445
446

0511

447
440

0512

449

450
451
452
453
454
455

0513
0514
0515
0516
0517
0520

3764‘
3335
3772'
4763'
3762’

/CONTROL

5720

CBGET

[RESTORE

REGISTERS

CERETR

IEXIT

ADDRESS

DCA

CBSETS

DCA

INHODE
[PRINT

THE

[CLEAR

FLAG FOR CNTRL D OR

XDOSH

[GO TO

ADDRS OF CBSHIT

[DOSW

TAD

460
461
462

0521

1335

0522
0523

5327

463
464
465

0524

7001

0525
0526
0527

1200
3336

0530
9531

4761'

0532

4200

JMS
JNS
JHS

0533
0534
0535
0536

7200

CLA

5321

JMR

413

LAFEL

CNTRLSI

7640

2335

FOR CBSWIT

QUESTION

0000
0000

CBSETS.
CBRETR.

CBSETS

/IF1

C9007

[DONT

DISPLAY

‘0 IS RECEIVED

NOT STORE 1N CERETR

UP CERETR
[MAKE RETURN CALL PLUS 2
[GET RETURN FOR THIS CALL
[STORE IT HERE FOR USE HE CNTROL
[SET FLAG TO SAVE CALL
[LOOK FOR THE INPUT

XCBCNT
CERETR

DCA
ISZ

CBDOT.

UNTIL

CLA

SEA
J"P
IAC
TAD

4765'

474
475

COSETS
XCOTTYI
COGET
XCOCNTR

SET

[GET REGISTERS
[CHECK FOR THE CONTROL

CNTRLS

[IF

NOT

CNTRL O R C

CHAR
REASK

0
0

[

476

[SNITCH OUTPUT FROM ONE OUTPUT DEVICE TO ANOTHER
[CONSOLE AND THE PRINTER WITH DEVICE CODE 66,

477

419
479

0537

1764‘

TAD

TTYLPT

480

0540

7040

481

0541

3764'

CHI
DCA

TTYLPT

402
483

0542
0543

4763'

JMS

4765'

JHS

454

0544

5600

JNP

THE

THO

OUTPUTS

ARE

THE

[

CNTRLL,

[GET PRESENT CBSNIT
[COMPLEHENT
'

UPAROH
CBGET
I

XCOCNT

[

486

487

[CONTROL E
[CONTINUE RUNNING FROM A

486

[

PAL10

V142A

7-HAR-77

13:55

INDICATOR

[STOR NEW CBSHIT
[CBPRNT
AND CHAR ON NEW
[RESTORE THE REGISTERS
[EXIT

485

DEVICE

INOUIRE OR ERROR

PAGE

1-9
SEQ

499

[

490

0545

4763'

491

0546
0547
0550

3762'

DCA

4765'
5600

JMP

492
493

COCHAR

[

412

AND

[

459

470
471

‘

UPARON

[CLEAR THE TYPE FLAG SET TO TTY
[CLEAR SOFT FLAG FOR CNTRL S

CSSHST

[CONTROL 3
[STOP SENDING CHAR.

463
469

CONTROL

SET

DCA
to? CI?

458

467

JMS

456
457

466

J“?
BGN

XDOSN,

TYPED

XCBCNTR
CGSETS

[CONTROL R
[GO TO THE QUESTION CBSWIT
DCA
TTYLPT

CBBY4.

494

CNTRLE:

OHS

UPAROH

JHS
I

CBSHST

[PRINT
[CLEAR

CBGET
XCBCNT

[RETURN

CONTROL CHAR

THE

FLAG.

[GET THE

REGISTERS
CALL PLUS

ONE

[

495
496

497
499
499
500
501
502
503

[CONTROL C
0551
0552
0553

0554
0555
0556

3764'

DCA
DCA

TTYLPT

JNS

UPARON

6203
6007

5760

[
/

0272
0745
0615

513
514

0565

0624

515

0567
0570
0571
0572
0573

511

516

517
518
519
520

521

[CLEAR THE LPT FLAG T0 PRINT ON
[CLEAR FLAG.
[CDPRNT A‘ AND LETTER IN CHAR
[60 To a FLD
[CLEAR THE NORLD
[GO TO DIAGNOSTIC MONITOR

DISPLAX

0560
0561
0562
0563
0564

510

JMP I
(7600
[000.000.I..00.00.InilQOOOIOOOOOOOIOIODUOO.Chill...OOOIIOOIIQUIIIGOOII

506
507

512

CONTROL

COSHST

CDF CI?
CAF

505

508

I4ONI'I'0R

[RETURN

CNTRLC.

3762’
4763'

504

509

0566

7600

1121

0100
1023

0777
1977

1075
1075

0574

1345

0575

1347

522

0576

573

0577

1200
1345
0600

PAGE

524
5?5

526
527

IconrvoL

[CHANGE

THE

529

[THE

swlrc"

PROGRAM

RUNNING.

RETURN

ANYTIME

529

530
531

0600

4715

532
533

0601
0602

1213

TAD

7640

SZA

534
535

0603

JMP

0604

5707
1777'

TAD

XCBCNT

536

0605

3214

DCA

2213

CORETO
CBSETD

537
558

0606
0607

530

0610

540

0611
0612

541
542

0030

/NO CONTROL S TYPED PREVIOUSLY
[LEAVE VIA CNTR ENTRY ADDRESS
[CLEAR THE SOFT FLAG

CNTRLR:

6203

0200

BYRETR
CBGET

TYPED

CONTROL 5

JMS

442

ICHECK

CLA

DCA

BYRETR.

CBSETS

4256
3213

4224
5614

CNTRLD,

UPAROW

J05

ISZ
CROOll.

/CHFCK

CBDOII

[DO

XCEPSW

JMS
DCA
JMS
J"?

CSSETD

THE

ADUPS

SAFE

CLA

NOT CHANGE THE RETURN
[GET THE RETURN AODRS AND

ADDRS

SAVE

[SAVE THE RETURN HERE
[INDICATE RETURN SAVED DON] DISTFOY
[GO CHANGE THE SWITCH REGISTED

Caszrn
CBGET

[CLEAR

CBRETn

[RETURN

THF

[RESTORE

FLAG

THE
TO

THE

LINK

PPOGRAV

ETC

CNTRL

AND

RETURN

0031

1-10

PAGE

13:55

VI42A

7-MAR-77

0614

0000
0000

CBSETD,
CERETD,

0615

0000

UPAROH,

0616

1376

TAD

(336

[CODE

0617
0620
0621

4775'

JHE
TAD

XCETYPE
CBCHAR

[CRTYPE THE

0627

JHS
JNS
J"?

XCECRLF

0623

4773'
5615

0624
0625

0000
7200

0626

1772'
7421

TAD
TAD

0632

1771'
7004
7200

0633
0634

1770'

TAD

5624

JNP

PAL10
0613

[THIS

SEQ

0032

SEQ

0033

0
0

TYPE

WILL

ARROW AND THE CHAR

1774'

4775‘

CBCHAR.

[CBPRNT THE

"'"

AND

THE

CHAR

CBTYPED IN

FOR

CHAR

XCBTYPE
UPAROH

[EXIT

[II-Divinuolibnolblbiaiduvdinnsl400nliuloO.4uuivuninwubluIIlUinililuruin

0627
0630

0631

CBGET:

CLA

HGSAVE
[RESTORE

MOL

FLEAVE
[RESTORE THE LINK

RAL

CLA
IRESTORE THE AC
[GET THE REGISTERS

ACDAVE

COGET

II..000.00.0000.I.0.0.0.00.00.00.000.000...I0005000600000000000...!!!

ICIINOU

[CBINOU ROUTINE

HILL PRINT A WAITING
[AND THE PROGRA" IE EXPECTING A CONTROL CHAR INPUT
[IF CONTINUE FROM CONTROL CHAR RETURN 15 CALL PLUS ON!
[IF NO CONTROL CHAR ENTERED THEN WAITING Is REPRINTED
[AND PROGRAM BAITS FOR A CONTROL CHAR AGAIN.
I

CIINDU

lEX.

JHS

0000

0636

7300

0637
0640

4767‘
7410
5635

0641
0642
0643

PAL10

V142A

4765’

599
600

0645

601
602
603

0647

4224
4771'
5635
5236

0650
0651

0652

2701

0654

1124
1116
0740

0655

0000

0653

USED

XCBIND:

ARE

CLA CLL
J‘s
SKP
J"?

4766'

0644
0646

ICALLS

[CHECK LOC 22 EXT 3 CONSOLE
[ACTIVE CONSOLE PACKAGE
CONSOLE LEAVE

BIT

[NOT

IINOUIR

13:55
JNS
J"S
0H5
JMP I
J"P
TEXT

WAIT FOR INPUT
CONTINUE

~CHKCLAOXCOPNToXCDTYI-CBGET-XCBCNTR-

XCQING
XCBPNT

7-HAR-77

HATMES,

ICE HILL PRINT A NAITINGAND
IRETURN 15 CALL PLUS ONE AC

CHKCLA

JHS
NATHES

0651

59B

XCIIND

JHS

XCBINO
DO ANYTHING

0635

PAGE

HAITTING

1-11

XCSTTYI
CBGET
XCBCNTR

[GET CHARACTER

XCBINO
XCBINOO!
"WAITING

[CHECK IF CONTROL CHARACTER
[EXIT AND CONTINUE
[REASK
'

[Inlhvnoincl.00006000000.In.60'0....0.06.6'066IibfiODCIOiIDOGuOOOICdOIC
[CBSWIT
[ROUTINE

HILL CHECK

CONSOL

ACTIVE

QUESTION . IN NOT ACTIVE IT WILL NOT
[RETURN TO CALL PLUS ONE ACIO,
[CBSHIT HILL SET UP THE PSEUDO SWITCH
[SN

[REGISTER

WITH

THE

NEW

DATA

ENTERED

GM!

XCBPSN

IF IT IS ACTIVE DISPLAY
PRINT THE SN QUESTION BUT

/
I

CBSNIT

/EX.

JMS

/ON
ICALLs USED

0656
0657

0660
0661
0662
0663
0664
0665

0666
0667

xcapsw.

4767'
7410
5656
1345

TAD

7640

szn
JNp

2345

4766'

ceRDPs.

15:
Jus

CHKcLA
1

xcepsu
cssuar

CLA

XCBPNT

0747

MESA

1070

TAD

4763‘
1367

JMs
TAD

XCBOCTA

0673

4775'

Jus

XCBTIPE

0674

7761'

Isz

INMODE

(40

0675

4760'

ans

XCBECHO

0676

4315

J“S

0677
0700

1774'

TAD

TSTCHA
CRCHAP

3020

urn

0701

1357
3346
4760'
4315

0704

TID
DC

GETcux,

ONE

JVS
JMs

Loc 22 BIT 3 CONSOLE BIT
[ACTIVE CONSOLE
IDEACTIVE CONSOLE PACKAGE
[RETURN WITHOUT ASKING PSEUDO swxrcfl
/Is THE 5071 FLAG sFT rop suchnz
ICHECK

IF ONE ENTRY AT ATIME 0K
IsEcouo ENTRY utru OUT A EXIT 60
[FIRST ENTRY SET FLAG
[CBPRNT sw:
[SKIP

C8314
Csswsv

0671
0672

0703

IF
PLUs

JNs
SKP
JMP

5764'

THE

ARE -CHACLA-xcaPsu-xcavN1-xc30cTA-XCBTYP:.

0670

0702
649

0000

[SET UP PSEUDO CBSNIT REGISTER
CONSOL PACKAGE. RETURN 15 CALL

XCBPSN

[GET CONTENTS or sw
ICONVERT IT TO ASCII
/GET SPACE
[SET FLAG ron CHAR FXECTEn
/Loox FOP XNFUT
[NOT content TEST 1T xs LEGAL
ISTORF

NEH

(-3

/GET

rnchT
xcsecuo
TSTCNA

/5Tnps IN
IGET err
[CHFCV IF

umus 3
TEMP
CRAP

COUNT

coon

CHAR

REG

CHAR

QUESTION

PAL10

V142A

13355

7-MAR-77

649

0705

1020

TAD

650

0706

7106

651
652
653

0707

7004

0710
0711

654
655

0712
0713

1774'
3020
2346

RTL
RAL
TAD

656
657
658
659

0714

660
661
662

663
664
665
666
667
668

669
670

671
672
673
674
675
676

5303
5342

TSTCHA:

PAGE

[GET

CLL

[GET CHAR

[SAVE

152

TMPCNT

[BUMP COUNT

JNR

GETCH1

JNP

ENDIT

[JMP HACK 4
[END 4 CHAR

7041
1356

CIA
TAD

(215

7650

SNA CLA
an?

ENDIT

TAD

CBCHAR

SEO

0035

CONTENTS

GET

CRTYPED

CHAR
1N

[CBERR

TAD

CICHAR

[GET CHAR

AND
DCA

[MASK FOR RIGHT BYTE

CBCHAR

[STORE IN
[GET CHAR

[EXIT

TAD

TSTCHA
(277

0724

7710

SPA

0725

5336
1774'

J“?
TAD

(-260

1354

TAD

7700

SNA
J"?

5336

1774‘
0353
3774'

CLA

ERR!

CLA

J"?

ERR1:

[SKIP

4775’

JNS

XCGTYPE

0740

4773’

ans

XCOCHLF

[

5266

JNP

600

0743

601

0744

3345
5656

CORDPS
XCRCRLF
CESHST

[EXIT

679

0741
0742

662

0745

ENDIT,

0000

CISHSTI

0746
0747

0000

TMPCNT,
MESA:

0750

7540

0751

0000

660

0752

0277

6'9

0753
0754

0007

260

THE"

LESS

CHAR

7
IN

NOT

THEN

RANGE

CHAR
1”

[CBPRNT

676

JMa
DCA
J“?

THEN

CSCHAR

677

4773'

(-270

TAD

0737

ERRI

1355

0736

ADD

NEW CONTENTS

[CMPL CHAR IN AC
[TEST IF IT IS A CARRIAGE RETURN
[SKIP 1" NOT CR.
[HA3 CARRIAGE RETURN
[NOT CR. GET CHAR
[CHECK IF IT IS IN RANGE
[IF NOT POSITIVE CSERR CHAR SNALLER
[CBERR
CHAR 100 SHALL
[GET CHAR
[GET A -270 4 CHECK IF IT IS LARGER

5342
1774'

5715
1352

0034

0721
0722
0723

0735

SEO
REGISTER
3 PLACES

LEFT

CBCHAR

0000

0727
0730
0731
0732
0733
0734

DCA

0716

0726

CBSNIT

[ROTATE

0715
0717
0720

1-12

o ASK AGAIN
[DO A CR LF
[CLEAR THE PSH ENTRY
[EXIT ROUTINE

KCSPEH

FLAG

693
694
695

2322

"SR:

TEXT

606

687

690
691
692
693
604

0755

7510
7520

0756

0215

0751
0760

7775
1063
1076
0040

0761
696
697
690

0762

699

0761
0764
0765

700

0766

701

0767

PAL10
702
703
704

1000

0515
0272

0303
1200

V142A

705

0770
0771
0772
0773

706

0774

1075

707

708

0775
0776

0336

709

0777

7-MAR-77

13155

PAGE

1-13

1345
1347
1346
1023
1077
0400
1000

PAGE

710

711
712

/CIOCTA

713

[OCTAL T0 ASCII CONVERSION
[THIS ROUTINE HILL TAKE THE OCTAL NUMBER IN THE AC
RESULT HILL BE PRINTED ON THE CONsOL TERMINAL
I
CSOCTAI JHS XCBOCT

714
715
716

[THE

717

[

710

[EX.

JNS

719
720

[

RETURN

721
722

[CALLS

723
724
725
726

USED ARE

soon

7106
7006

CLL
RTL

3121

DCA

CSTHRI

1377

TAD
DCA
TAD

(-4

cewupx

AND

(0007

TAD

1006

731

1007
1010
1011

xcsocr,

3222
1221
0376
1375

cano¢.

CHAR

CHANGE

aus

(260
xceryp:

TAD

CETMPl

735

1013

736
737
738

1014
1015

7006
7004

RAL

ron

ppxurrnc

HERE

[NASK
[ADD THE PRINT CONSTANT
zrypa 1H: nunasa
[

RTL
[PUT

3221

DCA

CBTNP]

[STORE

ASE

[DONE

5206
5600

JMP

CBCKP
C8004
xcaocr

1021

5000

1022

even

carupx.
cncxv.

1020

rxnsr

[STORE COUNTER IN
zczr FIRST NUMBER

2722

1016
1017

THE

CORRECT POSITIONED HORD HERE

[SAVE

CECKP

1721

740
741
742

19051710»

ONE

pry

4277

739

TO ASCII

1012

733
734

[AC CONTAINS NUMBER
ACSO

-XC6TYPE-

1001

730

732

CALL PLUS

1000

729

728

CONVERT

1002
1003
1004
1005

727

XCOOCTA
IS

AND

sup

[NOT
100":

NUMBER

YET HlTH FOUR
YET DO MORE
eru

POSITION
NUMBERS

roup

a
n

743

744
745

IDIOIOIOIII000...”.6‘00!000000.00000006000'00000IO.00.00.000.000000506

746
747

[CECRLF

748

[CBTYPE CR

749

[

750

761

[

752
753

[EX.

754
755

[CALLS

AND

WITH

CDCFLF=

JMS

0N5

XCBCRLF

FILLERS

USED

ARE

FOLLOWING

EACH

AND

XCSCPL

-XCSTYPF-

ICBPRNT
[RETURN

CR AND LF WITH
CALL PLUS ONE

FILL

PAL10
156
151

V112A

1024
1025
1026

0000
1300
1314
0211

1021

1231

TAD

162
163
161

1030
1031

1040

CNA

165
166
161

160
169

110
111

1032
1033
1034

1035
1036

1031
1040

3240
1313
1211

112
113
111
115
116

SEQ

0036

SEQ

0031

[GET CODE FOR CR

TAD

(215

JMS

XCBTYPE
FILLER
[STORE

(212

[GET

JNS

XCRTYPE

JNP

NON PRINTING CHAR
[EXIT
[FILLER SET FOR 4 CHAP
[COUNTER FOR FILL

[TYRE A

XCOCRL

HERE

[CHECK UN FILLER CHAR

FILCNT
CEDDZ

IS!
JNP

000‘

FILLER:
EILCNT.

FILLER IN
CODE FOP LF

FILCNT

TAD

DCA

C0002;

22A0
523)
3033

0004
0000

1-14

XCBCRLFI”
CLA CLL

150
159
160
161

1023

PAGE

13155

1-MAR-11

I/0000|0000.00.0000I000000000.000000000000000.00000000000000000

[COCKPA

ROUTINE HILL CHECK IT A CHARACTER NAS ENTERED FROM
[TERHINAL. TFTHE FLAG 15 SET AND THE CONSOLE PACKAGE IS

THE

[THIS

111

[ACTIVE A CHECK IS MADE To DETERMINO IF IT
CONTROL CHAR.
[IF IT HAS A CONTROL CHAR THEN 1T8 CONTROL FUNCTION [0 PERFORMED.
[IF NOT A CONTROL CHARACTER OR A CONTROL E.O-L-O- IT HILL 00
IS A

11'
119
100
101
102
193

[THE CONTROL FUNCTION
[A

NON

104
195
106

101
100
109

AND

RETURN

TO CALL

PLUS 2'1'

CONTROL CHARACTER HILL 0E PRINTEDAND A

[CALL PLUS 2.
[IF NO FLAG 10
[CALL PLUS 1.

SET

THE

WILL

RETURN

CONSOL IS NOT ACTIVE THE RETURN IS TO

[

COCKPAI JHS

XCOCKP

191

[EX.

JNS

192
193

[RETURN IF NOT FLAG OR NOT CONSOLE ACTIVE
ANYTHINGtOKIF)
ANYTHINGtJHP EXIT SKXP CHAIN)
[RETURN IF NOT CONTROL 0R CONTINUE

190

[CALL

XCOCKPA

TO CHECK

IF CONTROL CHAR

SET

191

CONTROL

195

196
191
190
109
000
901

002
003
000

005
006
001
000
009

010

[CALLS USED ARE

1011
1002
1043
106‘

1015
1016
1041
1050
1051

you.
3111'

XCOCKP:

'XCRTTVT-XCICNTF-CRGET-

THE

FLAGS

ACSAVE

6000

GTF

[SAVE
[SAVE

:11:1501
3110'
coax

DCA
HOA

FLSAVE

[SAVE THE

DCA

HOSAVE

DCA

FLAGS
HO IN AC
[SACE THE MO
[CHEC' THE xEYBOARD FLAG
[EXIT TO CALL PLUS!
[CHECE LOC 12 BIT 3 CONSOLE
[ACTTVE CONSOLE PACKAGE
IPUT

KSF

C8513

5261,

41:1-

JHP
JHS

1052

1412

SKP

1053
1050

5261

JHP
ans

CBBY3
XCOTTYI

JHS
OHS
NOP
Isl
JMS
J"?

COGET
XCBCNTR

[GET THE FLAGS
[CHECK 1F CONTROL

XCECKP

[BUMP RETURN FOR CALL PLUS
[GET REGISTERS
[SAY GOOD BY

PAL10

4165-

V141A

1055

6163'

1.56
1001

1164'

1060

2201

1061

4105'
5641

1062

CHKCLA

1-NAR-11

1000

CORY}.

13155

CALL
[GET THE CHAR
[EXIT

PAGE

BIT

1-15

[RETURN

CGGET
XCICKP

PLUS

CHAR.

CONTINUE CHAR.
2

IIIICCI'CDOOCOIUCOIIDIIOI..0...O..CEIE...E.....Q.....E.E&.0.IN0.0.000.“
[CEECHO
ROUTXNE HILL
[CHECK IF IT HAS A

[THIS

CCECHO

IE1.

JNS

[CALLS USED

LOOK FOR A CHAR FROM THE KEYUOARD.
CONTROL CHARACTER

JNS

SET

INNODE

STORE

LOCATION

CHAR

PRINT CHARACTER

XCIECH

XCOECHO

ARE

[LOOK FOR CONSOL CHAR COPRNT IT
[RETURN CALL PLUS ONE AC I CHAR CBTXPED

-XCRTTYIIXCOCNTR-COGET-XCOECH-XCSTTYFE

1063
1061

0090

xcsECH.

1065

4166'
4165'

1066

2216

1061

4164'

JHS
IS!
ans

1010

5663
1211

JKs

1011
1012

xcarrvx
COGET
Inuoot

ans

J"?
DCA

1013
101‘
1015

3216
1215

5663

an?

0000

CICHAR.

1016

0000

INHODE,

[WAIT FOR CHAR FROM KEYBOARD
[RESTORE THE REGISTERS
13:1 XNHOD: XDENTIFTNG THIS As A EXPECTED CHAR
IGo cHEcx IF IT IS A CONTROL CHAR
IHAS A CONTROL CHAR
CONTINUE RUNNING

xcocurn
I

XCIECH

XCOTXPE

TAD

INNODE
CBCHAR

CONTROL CHAR CBPRNT 11
[CLEAR FLAG THAT CHAR EXPECTED
[GET CHAR 1N AC

xcaacu

15x11

[NOT

’EDEEDI'UUCE.‘DI.....C‘..I.E..0000.D.OIDIOQCIOOIEOOIOIOCDbOI00.00000I.

[CRTYPE
[THIS ROUTINE

WILL CSPRNT ON

THE

CONSOLE

THE

LPT

01TH

THE

DEVICE

CODE

66,

CALL

PLUS

[

CBTYPES JHS XCGTYP

/EX.

JNS

XCBTXDE

/COPRNT THE CHAR
[DO NOT CLEAR

THE

LXNV

ICALLS USED ARE -C8HANG-XC8CNTR-XCOPNT-XCECPLF-XCH1N0“.

1011
1100
1101

1102

0000
3320
1321
1600

xceTYP.

PNTBUF
TTYLPT

DCA
rln
SlA

[STORE

CHAR

[CHECK

0:71!

1171=LPT

CLA

1103

5312

Jun

XDOLPT

1104

TAD

Puraur

1105

132'
6046

1L5

1106

6011

TSF

[DO

AC,
[RETURN

our

PUT

LPT

THXS

ROUTINE

ONE

NEEDED

zonau

PYCBOCT

PAL19

V142A

11o7

5396

1119

6912
5316

1111

1111
1111
1111

1329

13:55

7-MAR-77

XDOLPT,

JMP
TC?

.01

JMP

CSBY5

PAGE

PCLF

JNS

CBHANG

6666
4322
6662
7699
5677
9999
9999

COBYS,
PNTBUE.
TTYLPT,

1122
1123

9999

CBHANG,

7299

CLA

1124
1125

1316
3329

TAD

CBBYS

[GET CONSTANT 7699

PNTBUF

1126
1127
1139
1131

6661
7419

DCA
PSXF

[PNTBUF IS NON A COUNTER
[SKIP ON PRINTER DONE
[NOT DONE YET

CBHANG
CBCONT

1115
1116
1111
1120

1121

1136

[CLEAR
I

THE

XCGCNTR
COHANG

[SAVE IT

3321

DCA

TTILPT

[ALLON

4763'

XCOPNT
JNS
MESHANG
JHS
XCBCRLE
JNS
XCSINOU

1429
2469
9522
2217
2299

992

9635
9393

993

9‘99

994
995
996

962‘
9272
1299

997

1306

999

1317

999

1345

919
911

9212
9215

912

9269

913
914

9097

IS!

J"?

CBCONT,

9939

DCA

4762'
5722
9999

SEQ

[EXIT

XCBTYP

JMP
ISZ
J"?
TAD

2329
5331
1764'
3322

9938

HUNG

[SAN FLAG DONE
[FIRST COUNTER FAST ONE
[CHECK IF FLAG SET YET
[MADE 4996 COUNTS 0" EAST COUNTER
[KEEP IT UP FOR 5 SEC
[GET THE RETURN ADDRESS IN CONTROL

5722
2345

1166
4223

999
991

7699

SKP
JHP

5326

1135

PCLF

[CHECK KEYBOARD
[CLEAR THE FLAG

J”?

SEQ

/GET CHAR
[COPRNT IT

PNTBUF

TAD

PSTB

1-16

.-4
PNTBUF

.-3

[LPT

HANG

PRINTING ON TTY

ERROR

WAITING
[CONTINUE TO SAVE ADDRESS
[COUNTER FOR TIMER
[PRINT

CSHANG

'LPT ERROR'

HESHANG.TEXT

7774

129'

PAGE
IOIISQIOOIIII.9099.09'99999999999I9I.9|9IA.9d*‘9.IfiOQCOOIOOOOOIO‘OOOOS

V142A

7-HAR-77

915

PAL19

13155

PAGE

1-17

IOIOOI9OI5..9....G.i.iI9I.DI.9I9’iIIIII.O‘DOUIGIGGDGDIQICUUGQIII}...
[THIS ROUTINE WILL CHECK LOCATION 22 THE HARD NARE CONFIG WORD.
[TO SEE IF THE CONSOLE BIT 3 )499) IS SET IE SET THEN RETURN
[TO CALL PLUS TWO PO A ACTIVE CONSOLR PACKAGE ACI9
[IF NOT SET THEN TO CALL PLUS ONE FOR A DEACTIVE CONSOLE PACKAGE.

1299

9999

1291

7299

1292

1922

1293

1294

9377
7659

1295

2299

IS!

1296

5699

J“?

CHKCLA,

CLA
TAD
AND
SNA

[GET THE COTENTA OF LOCATION

(499

[MASK
I

CHKCLA

[ACTIVE CONSOLE PACKAGE RETURN
[CALL PLUS ONE (1) FOR ACTIVE

CHKCLA

[DEACTIVE CONSOLE PACKAGE RETURN

CLA

FOR

BIT

[CALL PLUS TWO

(499

(2)

[CBERR
[THIS ROUTINE HILL DETERMINE WHAT TO DO WHEN A CBERR IS ENCOUNTERED
[HILL CHECK IF CLASSIC SYSTEM, HILL CHECK CSSNIT REGISTERS.
/
CSERR.
JMS XCBERR
JHS
XCSERP
[GO TO CEERR CALL IF NOT CONSOL
[EX.
/
[RETURN IS CALL PLUS ONE AC l9999

[CALLS USED ARE -CHKCLA-XCBCRLE-XCSSW-XCEINOU-XCBPNT-XCBOCTA-

1297

9999

1219
1211
1212

6992
3345

1213
1214
1215

3347

1221
1222

7349

1217
1229

1223
1224

9
10?

DCA
GTF
DCA
HGA

6994
7591
3346
7349
1297
3364
6291

1216

XCSERR,

DCA

ACSAVE

[SAVE

FLSAVE

/SAVE

THE

MOSAVE

[SAVE THE MO
IsunwnACr A 1 FOR TRUE LOCATION
[GET RETTURN LOCATION
ISAVE ADD 0F CSERR CALL

CLA CLL CMA
TAD
XCBERR
DCA
PCSAVE
CDF
CLA CLL CMA
TAD I
(CLASIK)

1776
3316
6211

REAL

FLAGS

PC.

DCA

REALPC

4299

CDF
JNS

CHKCLA

[CHECK

1227

7410

8“?

1239
1231
1232

5279

JMP

NTCLAS

/ACTIVE CONSOLE PACKAGE
[NOT CLASSIC SYSTEM

4775‘
4774'

JMs
JMS

CSGET

1233

9373

AND

(0090

1234
1235

7669

szA

5262
4772'

JMP

1225
1226

SETUPl,

[SAVE

XCBsH

L0:,22

JNS

3 CONSOL EXT

[GET ALL REGISTERS.
/CHECK SWITCH REG FOR BIT THAT INDICATES
[NO ERROR MESSAGE
/MAsK FOR BIT FOR NO ERROR PRINTING
THIS aawon MESSAGE Is TO ALWAYS
IBE PRINTED LEAVE AND VALUE AT 0999
[SKIP 1F BIT IS a PRINT ERROR MESSAGE

[IF

1236

BIT

CLA
ceDoie
XCBCRLF

[DO

NOT

PAL10
1237
1240
1241
1342

1243
1244
1245
1247
1250

V147A

13155

7-MAR-77

PAGE

1-18

4771'

1320
4771'

EPRMES

1330
1316
4770'

NESPC

4771'
1333
1345
4770'
4771'

JMS

1336
1346
4710'

MESMG
TAD

4771’

JHS

1341
1347

NESFL

4770'

JMS

REALPC
XCSOCTA
XCBPNT

HESAC

[PRINT THE

[CONVERT 4

DIGIT

[PRINT

THE

IPRINT

[RRINT

0041

ASCII

MESS

JMS

NOSAVE
XCBOCTA
XCBPNT
FLSAVE
XCBOCTA

TAD

5300

JMS
XCBCRLF
J“$
CSGET
JNS
XCSSH
5K? CLA
JMF
C9372

4767'

JNS

XCBINO

[GET ALL REGISTERS.
[CHECK SWITCH REGISTER
[SKIP IF BIT 0 SET
[LEAVE
[GO TO THE INQUIRE ROUTINE

5300

JMP

CODY!

[LEAVE

JMS

CBGET

IGET

4774‘

JHS

XCBSH

[CHECK PSEUDO SWITCH REGISTER
[CHECK THE CUSHIT REGISTER

7610
5507

5K? CLA
JNP I
TAD
DCA u

CSDO10,

7610

NTCLAS:

1366

3144,
1115-

5144
4115'
5601

ISO

STSTEMENT

ACSAVE
XCBOCTA
XCSPNT

TAD
JMS

4774'

4775‘

0040

[PRINT THE ERROR MESSAGE
XCBPNT

TAD
JMS

4772'
4775'

SEQ
XCBPNT

J05

CGBYII

JNS
J"? H
J"!
J“? K

ALL

REGISTERS.

[SKIP IF
[NO HALT

HALT
CONTINUE

XCIERR
(7402
PCSAVE
CDGET

[CODE FOR HLT
[PUT IT I" CALL LDC.

PCSAVE

[EXIT

CCGET

[GET THE REGISTERS

TO CALL AND HALT

XCIERR

7402
7000
3317

1014
1015

ROUINI;

6201
1020
3765
1776
3315

HLT
NOP
DCA
CDF

TAD
DCA
TAD
DCA

[PUT

HTAC

INSTRUCTION

EXECUTE HEHEIIII

[HAVE AC.

SNR
u

1317

TAD

6202
5715

CI!
J“? I

(BUR)
(CLAIIK)
CLRTRN

[MOVE 0HITCHEO DOWN.

HYAC
0

CLRTRN

[RETURN

FIELD 0.

0000
0000

CDRTRNI

REALPC:

0
0

0000

“VAC:

9410

ERRMESI

[
1024

TEXT

'DHRKAE

FAILED

2213

V142A

7INAR-77

13155

0105
4040
0401

11:4
0504
1025

4000
4040

MEBPC.

TEXT

4040
0103
7100

MEIAC.

TEXT

4040

MEBMO,

TEXT

HESFL.

TEXT

2003
1200
1026

1027

1521
1200
1028

4040

0614
7200
1029
1030

7711
1111

PCBAVEI 7777
ACBAVE, 7777

1031
1032
1033

1771

MOSAVE:
FLSAVE:

1034

0020
7407
0635

1035
1036
1037
1039
1039
1040

7111

7777

1000

0303
1023
0000

1041

0262

1043
1043

0624

1044

0400
0000

5732
FIELD

PAGE

1-19

P1510

V1411

7-HAR-77

13155

PAGE

1-20

0000

00000000

11101111

11111111

11000000

00000000

0100

00000000

0300
0300

11111111
11111111

11111111

11111111
11111111

11111111

11111111
11111111

11111111

11111111
10000001

11111111
11111111

0400

11111111
11111111

11111111

1111111”

11111111
11111111

11111111

11111111
11111111

11111111

11111111
11111111

11111111

11111111
11111111

11111111

1100

11111111

11100000

1200
1300

11111111
11111111

11111111
00000000

0500
0600

0700

11111111

1000

SEQ

0042

SEQ

0043

11111111

11111111
11111111

11111111
00000111

11111111
11111111

1400
1500
1600

1700

2000
2100
2200

2300
2400
2500
2600
2700

3000
1100
3100
3390

3100

1500
3500

1700

PAL10

4000
4100

4200
4300

4400
4500

4600
4700

5000

5100
5200

5300
5400

5500
5600
5700

6000

6100
6200
6300
6400

6500
6500
6700

7000

7100

7200
7300
7400
7500
7600
7700

V1421

7-MAR-77

13155

PAGE

1-31

94919

V1421

1947
1949
1949
1959

1951

1952
1953
1954
1955
1956
1957
1959
1959

7-M4R-77

13155

RAGE

1'22

9945

1499
1491
1492

6931
6142

6115

ERHLTJ
ERHLT4

1493
1494

6194

1495

6126

ERHLTG

1496
1497

6151
6726
5716

ERHLT7

1419
1411
1412

6979

IUNDEFINED INTERRUPT
ISKIP TRIP FOR DCLR
ISKIP TRAP FOR DLAG
[SKIP TRAP FOR DLCA
ISKIP TRAP FOP DRST
ISKIP TRAP FOR OLDC
[SKIP TRAP FOR OMAN
IRECOVERABLE ERROR HALT

ERHLTI
ERHLT2

ERHLT5

ERHLT9
ENDHLT

[END OF TEST HALT
IHALT FRO” 5wR4I1
IIOT CHANGE HALT

STPHLT

CHNHLT
DSKPl6741

1964

6741
6742
6743
6744

1965
1966

6745
6746

DRSTI6745

ISKIP 0N TRANSFER DONE OR
DISK CONTROL LOGIC
ADDRESS AND GO
{LOAD CURRENT ADDRESS
IREAD STATUS REGISTER

DLDC=6746

[LOAD

1967

6747

DMANI6747

[LOAD

1969
1961

1962
1963

1969
1969

DCLRI6742
DLAGI6743

ERROR

[CLEAR

ILOAD

DLCIl6744

COMMAND

4495

1979

4424
4425

1971

1972
1973

4423

1974

PAL19

SETEJMS I
TICKIJMS I
AERROIJMS 1
RPTSAIJNS
LAB-9M5 1

XSET
XTICK

XAEan

4494
4496

CLASICIJMS

xavran
I

XLAs
XCLAs

v1421

7~MAR-77

1975

5426

IOTCHNIJHF

XCHING

1976
1977
1979

5439

MANUALIJMP

MANTST

4444

ENHANllJMS
ENHAN2IJMS
NERRORIJKS

H
n
H

XMAIN!
XMAIN)
XNERRO
XERRO

4445
4435

1979
1999

13155

1991

4436
4437

XXONNT

4449

IONWATIJHS
ACCMPllJMs

1992

XCOMP!

1993
1994

4441

ACCMPZSJHS

4442

1995
1996

4443
4446

RDSTATxJMS 1
RDCNDIJMS 1

XCOMP?
XRDST
XRDCM
XRDAD

1997
1999
1999
1999
1991
1992
1993

4427
4452

1994

1995
1996

1997
1999
1999
1199
1191

ERROR-J98

RDADDtJMs I
LDBUFIJMS I
LDIDDIJMS I

OCTELIJHS I
TWOCTIJMS 1
TYPEIJHS 1

XFROCT

4462

CRLFIJMS

XCRLT

LDCURIJMS 1
I

RDCRCIJMS

LDMINIJMS
RDBUFIJ"S

XLDMN

XRDBF

PRNTERSdMs

XLDAD
XSDKP
XLDCM
XLDCA
XCLDR

DSKBKPIJMS I
LDCMDIJMS 1
CLRALLIJHS

PAGE

XUPPER

4447
4459
4451
4453
4454
4455
4456
4457
4469
4461
4434

XRDCR

XPRN

XTOCT
XPRINT

1192
1193

O9
/

1194
1195

9999
9991

9395
5991

5991

1195

9992

1197

395

9993

1199
1119

9994

5764

XLISy

9995

7940

XSET,

SETUP

1111

9996

5732

XCLAS,

CLASIK

1112

9997

one»

SAVEND,

9919

019

9999

AUT019:

9929

1199

9993
/

1113

MYLAS

1114

9919

1117

1119
1129

9929

9999

~20
/
sun,

1121
1122

9921

4999

0P1,

4ano

9922

9999

0P2,

1119

1123

1124

9921

7299

1125

9924

1126

9925
9926

7229
7241

1129

SEQ

7914

1127
1129

9944

"LTSc

[ALL KNOWN

7126

1115
1116

SEQ
/

1945
1946

9927
9939

XAPTBA, APT!
XTICK.KTICK
XAERRDINAERRO

7191

xcnnuc,

7955

xuppan,

5723

MANTST,

CHANG
uppen
MINUL

[REV

V142A

7-MAR-77

1130
1131
1132
1133
1134
1135
1136

P4610

0031
0032
0033

6011

INTADD
ENDTST

0034

6463

INTRO,
XEND,
THSFLD,
XPPINT,

0035
0036
0037

7000
6600

XNERRO,
XERRO,

NERRO

6000

1137
1130

0040
0041

6033

XIONWT,
XCOMP1,
XCOHP2,

1139
1140
1141
1142
1143
1144
1145

0042

1146

6044
6063

RUST

0045
0046
0047

6760
6200

RDCM
MAIN1
MAINZ
RDAD

6135
6263

XMAINI,
XMAIN2,
XRDAD,
XSDKP,
XLDCH,
XLDCA,
XLDAD,
KCLDR,
XRDCR,

6144

XLDMN,

LDMN

6226

XRDBF,

RDBF

6423

XPRN,
XFROCT,

PRN

1155

0062
0063

0060

6400

0061

6314
6331

0260

0064
0065
0066
0067
0070

0002
0003
0004

1162
1163
1164
1165
1166

0071

0006

0072
0073
0074

0007
0010

0075

0037

1167

0076
0077
0100
0101
0102
0103

1159
1159
1160
1161

1160
1169
1170
1171
:1}

5:7
ii)

1175
111;
11!?

0104
0105
0106
0107

0110
0111

0000
0001

0020
0040

0100

0200
0207
0400
1000
2000

3777
4000
7000

7776

1196
1197
1190
1199
1200
1201
1202

1203

0200
0207
0400

1000
2003
'

K7775,

0077

K0077,

0377
0177

K0377,
K0177,

K2525,
K5252,
K3737,
K7717,
K4100,
K7600,
K5000,

0124
0125
0126
0127
0130

7717
4100

7600
5000
5777

7774

0131

7771

0132

7777

K5777,

K7774,
K7771,
K7777,

13155

2525
5252
3737
7717
4100
7600
5000

S777
7774
7771

7777

DECIMAL
l

0133

7774

0134

7773
7771
7764
7760
7720

0135
0136
0137
0141
0142

7600
7501

7401
7324

M4,
M5,
M7,
012,
M16,
M40,
M120,

-4
'5
-7

'12
'16
-48

-120

M191,

'191

M255,
H300,

'255
-300

OCTAL
l

0145
0146
0147

0017
0215
0212

6201

1219

0150
0151
0152
0153
0154

1220

0155

1221
1222

0156
0157

1223
1224
1225
1226
1727
1220
1229

0160

0161

K0017,

0017

K0215,

0215
0212

6244
3741

K0212,
KCDF,
KRMF,
M2685,

0000

R561,

0000
0000

R552,
SBCNTI,
TCNTRI,
TCNTRZ,
TCNTR3:
TCNTR4,

0000
0000
0000
0000

0162
0163
0164

0000
0000
0000

0165

1230
1231

123a
1239

0040

3737

0144

1234
1235
1236
1231

0037

0122
0123

1200
1209
1710
1211
1712

1233

0007

7-MAR-77

0143

1732

0003

V1421

1207

1219

0002

2525
5252

0140

1214
1215
1216
1217

0001

0120
0121

1204
1205
1206

1213

0000

0100

K7700,
K7740,

1193
1194
1195

0260

K0207,
K0400,
K1000,
K2000,
K3777,
K4000,
K7000,
K7776,

K0070,

1190
1191
1192

UPONE

K0100,
K0200,

0070

1169

FFDCT
TOCT

0010
0020

0114
0115
0116
0117

CDF
RM!

-TSTB5

’SQG‘BGS
0

0000

GDREGI,
GDREGZ,
CRREGl,
CRfiEGZ,

0166

0000

571156,

0167
0170
on:
9172
0173

0000
0000

9174
0175

1mm

9176

new
2200

DBREG,
CHREG,
mass,
ADREG,
DTREG,
ACREG,
HOMEHA,
rLDMAx.
STCON,

0177

one

one
one
Moo

0047

RDCR

K0010,
K0020,
K0037,
K0040,

1101
1182

SEQ

CLDR

0006

7740

PAL10

LOAD

K0006,
K0007,

7775
7700

1105
1106
1197
1180

LDCA

0004

0113

1104

LDCM

K0004,

0112

1103

SDKP

XTOCT,
XCRLF,
K0260,
K0000,
K0001,
K0002,
K0003,

1179
1160

1170

0046

COMP:

6256

6075
6106

SEQ

EFRO
IONHT
C0”?!

XRDST,

6130
6117

3-1

XRDCM,

0050
0051

PAGE

PRSFLD

6240

0052
0053
0054
0055
0056
0057

1157

0210

0043
0044

1147
1148
1149
1150
1151
1152
1153
1154

1156

5670

13155

0
0
0

0
0
0
0

0
0
0

2 200

PAGE

3-2

PAL10

V142A

PAGE

13155

7-MAR-77

3-3

0048

SEO
I

1210
0200

1241

6200

1242

1243

ISETUR POINTERS FOR AMOUNT OF EXTENDED
IBANKS OF MEMORY: INTERRUPT SERVICE. CURRENT
IFIELD . AND TESTS 00R CLASSIC PACKAGE OR APT SYSYTEM,
II!“ CONSOLE IS ACTIVE APT TUNTIONS OR NOP,

1244
1245
1246

1247
1240
1249
1250
1251
1252

1253
1254
1255
1256
1257
1253
1259

1260
1261

1262
1263
1264
1265

0200

5203

0201

5430

MANUAL

ITO

0202
0203
0201

5126
6224

IOTCHN

/T0

0205
0206

RIF
DCA

3175
1175

HONEMA
HONEMA
KCDE

TAD
TAD

1150
3210

7640

0214
0215
0216
0217

5217

JNP

1532

TAD

3007
4423

DCA

0220

0212
0213

7402
4105
1176

0221

4406
4431

1261

0222

7000

1260
1269
1270

0223

4401
0072
7010
3176

0224
0225
0226
0227

0230
0231
0232

RRSELD,

DISKLESS.

IRUN

PRSF‘LD
DCA
NLT
SET
TAD
FLOMAx
SEA CLA

0207
0210
0211

1266

1271
1272
1273
1271
1275

.+3

.1017

RGN.

MANUAL SCOPE TEST
IOT CHANGE ROUTINE

[MAKE HOREDE

.13

IMAKE DE."
ISETUR FIELD 0
ICET rIRST PASS POINTER
I15 IT FIRST PASS
I110, MUST BE A RESTART

K7777

IGET

LAST LOCATION
ISAVE IT FOR A RESTORE
INOP CONSOLE 11‘ ON APTBA
ICHECK FOR CONSOLE CLASSIC
ICHECK FOR SHITCH SRI.

SAVEND

APTOA
CLASIC
CSSWIT

NO?
LAS

K0007

IMASK 9-11

DCA
TAD

ELDMAx

ISAVE

AND

K0400

AND

C011

1022
0102
7640

6007

AMOUNT OF EXTENDED MEMORY

SSA CLA

ION

6007

IVES,

CLASSIC.
THEN CLEAR

1276

1277
1270
1279
1200
1201
1202
1203

THE DISK ROTOR IS Orr. THE
ISTATUS REGISTER SHOULD ONLY CONTAIN NOT READY
OR
URITE AND NOT 01511 TILE READY.
ISEEK. READ.

0233

3153

1261

0234

1177

1205

0235

3163

ALL

FLAGS.

IVER“! THAT

IINITIALIEE SHOULD HAVE CLEARED ALL OTHER BITS
I

DCA
TAD
DCA

REG!

TAD
RDSTAT

REGI

STCDN

IGE’I' EXPECTED STATUS
ISETUR TEST HANDLER

GDREG:

1206
1207
1200

0236

1219
1290

0240
0241

1410

ACCMR1

1135

NERROR

1291

0212

4136

ERROR

1293

0203

1291

0211

0236
500'

TOTO
5000

0237

1153
1442

TSTO:

IGET AC VALUE
IREAD STATUS REGISTER
ICHECR RESULTS
/AC 0.11. 1096 LOOPS
IERROR. “INITIALIZE‘ CLEAR
IREGISTER FAILED.
ISCOPE LOOP POINTER

1292

PAL10

V112A

STATUS

ITEXT POINTER

7-HAR-17

13155

PAGE

3-4
SEO

1295
1796
1297
1296

IVER"! THAT SKIP CONDITIONS HERE CLEARED
I3! 'INITIALIZE" ON START 01' TEST.
I

1299

0245

1147

1300

0216

4435

NERROR

1301

0247

4436

ERROR

0250
0251

0245
0006

TST1.

DSKSKP

IISSUE 'DSKP" IOT
IDSKP 0.11. 4096 LOOPS
IERROR, "INITIALIZE" CLEAR
ISKIP CONDITIONS
ISCOPE LOOP POINTER
ITEXT POINTER

1302

1303
1301
1305

T821
0006
I

1306

IVEFIFY

THAT

1301

ICLEARED

1300
1309
1310
1311

0252
0253
0254

1312
1313

0255

1314

0256

4437
1135

T512:

INTERRUPT REOUESTS HERE

"INITIALIIE'

IONNAT
NERROR

IGO

0252
0007

TEST
0111‘

T517
I

1316
1317
1310

IVERIFY THAT COMMAND REGISTER NAS CLEARED

1319

1320
1321
1322
1323
1324

"INITIALIEE'

START

[REGISTER WITH "OMAN"
0257
0260

3163
4143

0261
0262
0263

7650
4135
1136

0264
0265

0260
4201

DCA

1513:

GDREG?

RDCND
CLA
NERROR

SNA

ERROR

1325

1326
1327
1328
1329
1330
1331
1332
1333
1334

TST!
4201

TEST. READ COMMAND

(MAINTENANCE 107‘)
ISETUP COMPARE REGISTER
IREAD COMMAND REGISTER
IAC SHOULD BE 0
IAC 0,11. 1096 Loops
IERROR. "INITIALIZE‘" CLEAR
ICOMMAN” REGISTER
ISCOPE Loop POINTER
ITEXT POINTER

IVERIFY THAT ALL DRIVES ON CONTROL ARE on.
ITHE STATUS SHOULD BE 2200 WHEN DRIVES ARE SELECTED.
I

0266
0267
0270

1335

0271

1336

0272

1337

0273

1330

0271

1339
1340

0275
0276

1341

0277

1312

0300
0301

1343

1117

TST4,

3163
1301

4153
1153
1150
1412
1440

TAD

STCON

DCA
CLA CLL

GDREGz
IAC

CLRALL
TAD

REG1

LDC’W
RDSTAT

ACC’QPl
NERROR

4435

RESULTS

I0.K. 4096 Loops
IERROR. STATUS

TST4
5000

5000

/OCLR 'CLR ALL”
/CET AC VALUE
ILOAD COMNAND
/READ STATUS

ICHECK

ERROR

1136
0266

[EXPECTED STATUS
ISETUP COMPARE REGISTER
IENAELE CLEAR CONTROL

ISCOPF LOOR POINTER
/TEXT

001MB:

1!“

1315

IVERIFY THAT 101' "DSKP' DOES NOT AFFECT
[AC REGISTER, TRY ALL COMBINATIONS 1N AC.

1346

1347
1310

1349

INT.

[SCOPE LOOP POINTER
ITEXT POINTER

0007

1315

I51

FOR

IINT. 0.11, 1096 1.0095
IERROR, "INITIALXEE' CLEAR
IINT. CONDITION

ERROR

1436

START or

0302
0303

1153
3163

T5151

TAD

R661

DCA

GDFEGZ

IGET Ac VALUE
ISETUP COMPARE

0019

PAL10

V142A

13155

7-MAR-77

PAGE

305

SEQ 0050
1350
1351
1352
1353
1354

1153

1713‘

4447

DSKSKP

0306

7000

4440
4435

1356

0307
0310
0311
0312

4436
0302

1357

0313

4010

1355

REG!

0304
0305

1350
1359
1360
1361

NOP

NERROR
ERROR

[CHECK AC, COMPARE TO GDREG2
[AC 0.K. 4096 LOOPS
[ERRORp 'DSKP" CHANGED AC.

TST5
4010

[SCOPE LOOP POINTER
[TEXT POINTER

ACCMPI

[

1363

0315

1364

0316

3163
1153
4451

1365

0317

4440

1366

0320

4435

1367

0321

1366

0322

4436
0315

1369
1370
1371

0323

4010

DCA

GDREG?
REGi

TAD

TST6;

[SETUP COMPARE
[GET AC VALUE

LDCUR
ACCHPI
NERROR
ERROR

[LOAD CURRENT ADDRESS ”DLCA"
[CHECK AC. COMPARE T0 GDREG2
[AC O.K. 4096 LOOPS

TSTG

[SCOPE

LOOP

4010

[TEXT

POINTER

[ERRORo

1153
4450
4440

0324
0326

1377
1370

0327
0330

4435
4436

1379

0331

0324

1300
1301

0332

4010

0325

TST7,

REG:

ERROR

[GET AC VALUE
['DLDC' LOAD COMMAND REGISTER
[CHECK AC, COMPARE T0 GDREG2
[AC O.K. 4096 LOOPS
[ERROR, DLDC CLEAR AC

TST7

[SCOPE LOOP

4015

[TEXT

TAD

LDCMD

ACCMP1
NERROR

1303

"DLAG" CLEARS THE
[TRY ALL COMBINATIONS IN AC.

1384

[

[VERIFY THAT

1365

0333

1306
1307

0334
0335

1359
1359

0336
0337

1390
1391

0340
0341

13?

0342

13%

0343

7301
4453
1154
4452
4440
4435

TSTB:

133.1

ALL

[TRY
/

0344

0345
0346

1153
4453
4440
4435

REC:

TSTSI

CONTROL

[CLEAR

[GET DATA
0st ADDRESS
[CHECK RESULTS
[LOAD

NERROR
ERROR

[0.K.

’3'“)

[SCOPE LOOP

409s

[ERROR;

LOOPS

DLAG, CLEAR Ac

POINTER
[TEXT POINTER

I
[VERIFY

13?;

IAC

ACCMPI

0333
4010

1397

CLA CLL
CLRALL

LDADD

4436

135

10T 'DCLR' CLEARS THE
COMBINATIONS 1" AC

AC.

REG1

TAD

CLRALL
ACCMPl

"CLR

[DCLR

ALL"

0350

4436

ERROR

[CHECK AC; COMPARE TO GDREGZ
[AC 0,K. 4096 LOOPS
IERRORI DCLH CLEAR AC

0351

0344

0352

4010

TST9
4019

[SCOPE LOOP POINTER
[TEXT POINTER

0347

PAL10

V142A

1405
1406

NERROR

7-MAR-77

13155

PAGE

3-6

SEO 0051

[

[VERIFY THAT THE COMMAND REGISTER CAN BE LOADED
[AND SHIFTED INTO THE LOWER DATA BUFFER WITH
[THE MAINTENANCE IOT. USE DATA PATTERN 0000 v 7777.

1407
1400
1409

[

0353
0354
0355
0356
0357
0360

0361
0362
0363

1419

0364

1420
1421

0365
0366
0367
0370

1424
1425

POINTER

[

1302

1422
1423

7301
4453

TST10.

CLA CLL

IAC

CLRALL

IDCLR "CLR ALL"

1153

TAD

7110
7630
7240
3163
1163
7040

CLL RAR
51L CLA
CLA CMA

4450
1163

LDCMD

[SET

GDREG2
LnCMD

[SET COMMAND

0371
0372
0373

4436

1427

0374

4201

REG:

DCA
TAD
CMA

[DATA

GDREC:
GDREG2

1717

[SETUP

LINK

T0 VALUE EXPECTED
/READ COMMAND REGISTER
[CHECK RESULTS
/0.K. 4096 LOOPS
[ERRORg COMMAND REGISTER
[SCOPE LOOP POINTER

RDCMD
ACCHPI
NERROR
ERROR

0353

rswio
4201

[TEXT POINTER

1429

[VERIFY THAT THE COMMAND REGISTER CAN BE LOADED
[AND SHIETED INTO THE LOWER DATA BUFFER WITH
[THE MAINTENANCE IOT. USE DATA PATTERN 2525 4 5252
/

0375

7301
4453

CLA

CLL
CLRALL

IAC

0376
0377

1153

TAD

REGl

0400

CLL

TAD
TAD

1437

0401

7110
7630

1430
1439

0402

1120

0403

1120

1440

0404

1441
1442

0405

1443

1444
1445

1446
1447
1443
1449
1450
1451
1452

SET

COMMAND To 0908115

1428
1430

COMPARE REGISTER

TAD

4450
4443
4440
4435

1426

1431
1432
1433
1434
1435
1436

POINTER

[CLEARS THE AC.

1376

1415

DLCA CLEAR

”DLDC' LOAD COMMAND REGISTER
TRY ALL COMBINATIONS IN AC,

[VERIFY THAT

1374
1375

1412
1413
1414
1415
1416
1417

[

1372
1373

1411

[

0314

1410

IOT

[VERIFY THAT ‘DLCA' LOAD CURRENT ADDRESS
[REGISTER CLEARS THE AC. TRY ALL COMBTNATIONS

1362

1390
1399
1400
1401
1402
1403
1404

"DSKP"

[ISSUE

0406
0407

0410
0411
0412
041!

TSTlln

RAR
82L CLA

3163
1163

DCA

K2525
K2525
GDREGT

TAD

GDREG2

7040

CMA

4450
1163

LDCMD

4450
4443

LDCMD
RDCMD

[DCLR

"CLR

ALL"

[DATA

5252

[SETUP

[SET

TAD

LINK

COMPARE

COMMAND

SET

OPOSITE

GDREG2

4440

ACCNP1

COMMAND TO VALUE EXPECTED
[READ COMMAND REGISTER
[CHECK RESULTS

0415

4435
4436

NERROR
ERROR

/O.K. 4096 LOOPS
[ERROR, COMMAND REGISTER

0416

0375

TST11

[SCOPE LOOP POINTER

0417

4201

0414

[SET

4201

[TEXT

POINTER

[

1453

[VERIFY

1454

[BE

1455

[DATA BUFFER.

1456

1457
1458

0420

1459

0422

0421

1154
4450
1153

THAT

LOADED

T5T12,

THE

AND

COMMAND REGISTER

THEN

TRY

SHIFTED INTO THE
ALL COMBINATIONS.

TAD
LDCMD

REG2

TAD

REG!

[GET
[LOAD

LOWER

AC VALUE
COMMAND

PAL10
1‘60
1‘61

0‘23
0‘2‘

1‘62

0‘25

1‘63

0‘26
0‘27

1‘6‘
1‘65
1‘66

V1‘2A

13155

1-MAR-77

PAGE

SEQ

0‘30

“35

0‘31

“36

0‘32

0‘20

0‘33

‘201

TAD

1‘69

[LOAD COMMAND
[READ COMMAND

LDCND
RDCND
ACCNPi
NERROR
ERROR

[SCOPE LOOP POINTER
[TEXT POINTER

TST12
‘201
[

[VERIFY THAT DCLR DOES NOT CLEAR COMMAND
[REGISTER NNEN AC1030 AND A11l0

1‘72

[

1‘73

TAD

REGI

1‘7‘

0‘3‘

1153

1‘75
1‘76

0‘35
0‘36

“50

LDCND

115‘

TAD

1‘77
1‘73

0‘37
0“0

3163

DCA
TAD

1‘79

0“1
0“2
0“3
0“‘

‘450
“53

1‘05
1‘06
1‘07

0“5

TST13:

115‘

‘436
0‘3‘
‘701

[REGISTER “HEN

[SCOPE LOOP

TST13
I

[VERIFY THAT DCLR DOES CLEAR COMMAND
[REGISTER NNEN AC10I0 AND AC11l1

1‘91
1‘92
1‘93

0‘51
0‘52

149‘

0‘53

1‘95
1‘96

0‘5‘
0‘55
0‘56
0‘57
0‘60
0‘61

1‘90

1‘99
1500
1501
1502
1503

0‘62
0‘63

1153
“50

GDREG2
REGl

DCA
TAD

TSTI‘J

ACIIID

7301

CLA CLL

“53

CLRALL
RDCMD

“‘3
“35

SNA CLA
NERROR

“36

ERROR

7650

[LOAD COMMAND nacxawan
[ENABLE CLEAR cournon
[DCLR "cu: ALL'
[READ COMMAND REGISTER
[CHECK Ac. SHOULD EQUAL 0

IAC

[AC 0.x. LOOP toss
i:nnon. DCLR CLEAR connAuo
[REGISTER uuzu AC10I0¢AC11I1

TST1‘

0‘52
‘201

COMPARE REGISTER

[SETUP

LDCND

[SCOPE LOOP POINTER
ITEXT poxnrtn

‘201
/

1506

Inzcxswzn. us: DATA PATTERN oo

1507
1500
1509
1510
1511

1513
151‘

[

3163

150‘
1505

1512

ACID-0

POINTER

‘201

1‘09

1‘90

[LOAD COMMAND REGISTER
[DCLR 'CLR ALL“
[READ COMMAND REGISTER
[CHECK ACI COMPARE TO GDREG2
[AC O.Kp 4096 LOOPS
[ERRORA DCLR CLEAR COMMAND

CLRALL
nocnn
ACCNPl
usanon
ERROR

“‘0
“35

0“7
0‘50

[SETUP COMPARE

R062

anup

“‘3

0“6

[LOAD COMMAND REGISTER

REGZ
GDREG:

1‘00

1‘97

0052

[COMMAND REGISTER

1‘70
1‘71

1‘00
1‘01
1‘02
1‘03
1‘0‘

COMPARE

[SETUP

GDREG2
REGl

DCA

3163
1153
“50
“‘3
“‘0

1‘67

1‘60

"’

3-7

[VERIFY THAT DLAG DOES LOAD THE SURFACE AND SECTOR

0‘6‘
0‘65

7301
“53

0‘66
0‘67
0‘70
0‘71
0‘72

1136

PAL10

CLA CLL

TST15:

1153
7110
7630

TAD
DCA

M12

TAD

REGI

37.

[ENABLE CLEAR CONTROL
[CLEAR CONTROL

CLRALL

3156

V1‘2A

IAC

TCNTR1

[SETUP

RAR
SEL CLA

SIT SHIFT COUNTER

CLL

7-NAR-77

[DATA 00

3777

13155
SEO 0053

0‘73

73‘0

CLA CLL CMA

[371

0‘7‘
0‘7!

6‘52

LDADD

[LOAD

0‘76
0‘77
0500
0501
0502

1171
0075
3163
‘4‘5
1100

TAD

DAREG
K0037

AND
DCA

DISK ADDRESS

[MASK EXPECTED
[SETUP COMPARE

GDREG2

ENNAN2

'DLAG'

VALUE
REGISTER

K0200

‘455

LDMAN

[ENTER MAINTENANCE
[ENABLE SHIFT LONER BUFFER
[LOAD NAINTENANCE

0503
050‘
0505

2156

ISE

TCNTR1

[COUNT 12 SHIFTS

5302
7300

JNP

.-2

CLA CLL

0506
0507

107‘
“55

TAD

0510

3171

0511
0512
0513

1171
“‘0

DCA
TAD

051‘
0515
0516

TAD

K0020

[ENABLE READ LOWER

LDMAN

“35
“36

0‘6‘
‘102

[LOAD

DAREG

BUFFER

NAINTENANCE

[SAVE VALUE FOUND

DAREG

ACCNPI
NERROR

[CHECK

ERROR
TST15

[ERRORA

‘102

[TEXT POINTER

RESULTS

[0.K. ‘096 LOOPS
SURFACE AND SECTOR SHIFT
[SCOPE LOOP POINTER

[

[VERIFY THAT DLAG LOADS THE SURFACE AND
[SECTOR REGISTER. USE DATA PATTERN ALL

[COMBINATIONSu
[

15‘3
15“
15‘5

15‘6
15‘7
15‘!
15‘9

0517
0520
0521
0522

7301

0523
052‘
0525
0526

1153
0075

0527

0530

TST16:

“53
1136

3156

CLA

CLL
CLRALL

IAC

TAD
DCA

M12

TAD
AND
DCA

[ENABLE CLEAR CONTROL
[CLEAR CONTROL

TCNTR1
REG1

[SETUP

K0037
GDREG2
REG!

[NASK EXPECTED VALUE
[SETUP COMPARE REGISTER

BIT SHIFT COUNTER

3163
1153
“52
“‘5

TAD
LDADD

1100

TAD

“55

[LOAD MAINTENANCE
[COUNT 12 SHIFTS

[SAVE VALUE FOUND

[LOAD

ENMAN2

DISK

ADDRESS

0531
0532
0533
053‘

155‘
1555

0535
0536

1556

0537

“55

LDNAN
IS!
TCNTR1
ON?
.‘2
CLA CLL
TAD
K0020
LDMAN

1557

05‘0

3171

DCA

DAREG

1550

05‘1

1171

TAD

DAREG

1559

05‘2

“10

ACCNP1

[CHECK RESULTS

1560
1561
1562

05‘)
05“

NERROR

[0.K, ‘096 LOOPS

05‘s

4‘35
“36
0517

1563

05‘6

‘102

2156

5332
7300
107‘

K0200

[ENABLE SHIFT LOWER

[ENABLE
[LOAD

ERROR

SURFACE AND
[SCOPE LOOP POINTER
POINTER

1565
1566

[VERIFY

1567

IIOT.

1568

/SHIFT

1569

lREGIsTER. SHIFT THE LOWER CYLINDER

THAT

THE

BUFFER

SECTOR

SHIFT

[TEXT

156‘

USE

READ LOWER
MAINTENANCE

lERROR;

TST16

IAND SHIFTED

'DLAG"

[ENTER MAINTENANCE

1550
1551
1552
1553

THE

DISK

LONER

DATA

ADDRESS
DATA

BUFFER

PATTERN 0000 o
SURFACE AND SECTOR

NIT"

CAN
THE

LOADED
MAINTENANCE
BE

7777
FROM

THE

SURFACE

BITS

AND

SECTOR

FROM THE CRC REGISTER.

PAL10

V14“

13155

7-MAR-77

SEQ

1570
1571

1572

0553

7301
4453
1153
7110
7630

0554

7240

0555
0556
0557

0547
0550

1573
1574
1575
1576
1577
1578
1579

0551
0552

1500
1501
1502
1583

0560

1504

0564
0565
0566

1585

1586
1507
1500
1509
1590
1591

TST17,

CLL

CLA

IAC

CLRALL

ALL"

CLL RAR
SZL CLA
CLA CMA

[USE DATA 7777

3163
1163

DCA GOREGZ

[SETUP

7040
4452

[SET

DISK ADDRESS TO
[READ DISK ADDRESS
[CHECK RESULTS
[0.K. 4096 LOOPS

EXPECTED

DISK ADDRESS
[SCOPE LOOP POINTER
[TEXT POINTER

0561

1163

0562
0563

4452

LDADD

4416
4440
4435

RDADD

ACCMPI

0547

NERROR
ERROR
TST17

4102

4436

COMPARE

LINK

ADDRESS

DISK

OPOSITF

[ERRORI

THE

[VERIFY THAT
[AND SHIFTED

DISK ADDRESS REGISTER CAN

LOADED

1593

1594

“REGISTER.

1592

SHIFT THE LOHER CYLINDER BITS

CLL

7301

0572

4453

CLRALL

0573
0574

1153
7110

TAD
CLL

0575
0576
0577
0600
0601

7630
1120
1120
3163
1163

SZL

CLA

0602

7040

1606

0603

1607
1600

0604
0605
0606
0607
0610

4452
1163
4452
4446
4440

1599
1600
1601
1602
1603
1604
1605

1609

1610
1611
14-17.
161:
161'1615
1611'

0611

4435
4436

0612
0613

0571
4102

TSTlfi,

CLA

[USE DATA 5252

1624

0616

1153

PAL10
1625
1626
1627
1620

0617

1629

GDREG2
GDREG2

1646

1647
1640

1649
1650

DISK ADDRESS T0 OPOSITE

[SET

GDREGZ

LDADD
RDADD
ACCMP1

[SET DISK ADDRESS T0
[READ DISK ADDRESS
[CHECK RESULTS

NERROR
WWW!

THE

THAT

DISK

ADDRESS

V142A

TAD
DCA
TAD

TST19,

REG1

[GET AC

GDREG2

[SETUP COMPARE

VALUE
REGISTER

REG1

7-MAR-77

13155

PAGE

3-10
SE O

LDADD
RDADD

[LOAD

4440
4435

ACCNPI

0622

0623

4436

ERROR

[CHECK AC, COMPARE TO GDREG2
[AC 0.11., LOOP 4096 TIMES
[ERROR] LOAD OR READ DISK

0624
0625

0614

TST19

4102

[ADDRESS REGISTER
[SCOPE LOOP POINTER

4102

[TEXT POINTER

[VERIFY THAT

DCLR DOES NOT AFFECT THE SURFACE

0620

0621

[READ

NERROR

DISK
DISK

ADDRESS REGISTER
ADDRESS REGISTER

[

[AND SECTOR

NHEN

AC10I0

AC11I0

[

0626
0627
0630

1153

151211.

REG1

[GET 1c

DCA
TAD

GDREG!
REG2

[SETUP COMPARE REGISTER
[AC VALUE, COMPLIMENT 0F
[LOAD 13st 1093555

0635

3163
1154
4452
1153
4‘52
4453
“46

0636

4446

AchM

0637
0640

«as
4436

NERROR

0641
0642

0626

0631
0632
0633
0634

LDADD
TAD

LDADD
CLRALL

max

[LOAD
[DCLR

ADDRESS

TST20

4102

[TEXT POINTER

mun

ERROR

1652
1653

[VERIFY THAT 'DCLR" DOESN'T
[REGISTER WHEN A10-0 4 AMI]

1654
1655
1656

CLEAR SURFACE

AND

SECTOR

0643

1153

TAD

REGI

0644
0645

3163

DCA

GDREGZ

1657

0646

1659
1660

0647

TAD
LDADD
CLA CLL

REGt

1650

1153
4452
7301
4453

CLRALL

[DCLR

1661

0651
0652
0653
0654

4446

RDADD

4440

ACCMPI
NERROR
ERROR

[READ DISK ADDRESS
[CHECK RESULTS

1665
1666
1667
1660
1669

0650

4435
4436

0655

0643

0656

4107

1679

AC VALUE
[SETUP COMPARE

ILOAD DISK ADDRESS
[ENABLE 'CLR ALL“ BIT

IAC

"CLR

ALL"

[AC

O.K. LOOP 4096
[ERROL LOAD, READ,

CLEAR

ADDRESS
LOOP POINTER
[TEXT POINTER

15121

[SCOPE

4102
[

[VERIFY THAT

THE

CRC CAN

LOADED BY

'DLAG"

[AND 'DLDC". USE DATA PATTERN 0000 4 7777.
[THIS WILL VERIFY THAT THE CRC CAN BE LOADED
[BY THE EXTENDED CYLINDER BIT IN THE CO“MAND REGISTER

1672

1677
1678

[GET

IDISK

1670
1671
1673
1674
1675
1676

TST211

REG1

ICLR ALL'
pxsx Annaass
[CHECK Ac. COMPARE TO GDREG2
m: 0.1. LOOP was 111425
[ERROR, LOAD 0R READ DISK
[ADDRESS 0R DCLR CLEAR
[SCOPE LOOP POINTER

ROAD!)

4102

vnuu:

REG1

1663
1664

EXPECTED

[0.K. 4096 LOOPS
[ERRORy DISK ADDRESS REGISTER
[SCOPE LOOP POINTER
[TEXT POINTER

‘

1651

1662

SET

4452
4446

1634

1643
1644
1645

COMPARE REGISTER

[SETUP

1630

15‘?

LINK

[

1153
3163

1639
1640
1641

LOADED AND SHIFTED INTO THE Loam:
BUFFER. TRY ALL COHEINATIONS IN Ac
[SHIFT THE SURFACE AND SECTOR FROM THE SURFACE AND SECTOR
[REGISTER. SHIFT THE LOHER CYLINDER BITS FROM THE CRC REGISTER.
0614
0615

1635
1636
1637
1638

ALL"

K2525
K2525

CNA
LDADD
TAD

'CLR

[DCLR

REG!

[DATA

1623

1631
1632
1633

IAC

TAD
TAD
DCA
TAD

I
[VERIFY
[CAN BE

1617
1618
1619
1620
1621
1622

FROM THE CRC

[

0571

1598

SET

GDREG2

TAD

CMA
LDADD
TAD GDREG2

0567
0570

"CLR

[DCLR
REG1

TAD

LONER DATA BUFFER RITH THE MAINTENANCE
NOT. USE DATA PATTERN 2525 9 5252.
[SHIFT THE SURFACE AND SECTOR FROM THE SURFACE AND SECTOR

1595
1506
1597

0054

[BY

THE

'DLAG"

IOT.

[

0657

7301

0660
0661
0662

0663

IAC

4453

CLA CLL
CLRALL

1153

TAD

REGl

7110
7630

CLL
SZL

TST22,

RAR
CLA

[DCLR

[USE

DATA

7777

LINK

SET

0 055

PAL10

3-11

K7740

DCA
RAL

ODREG2

0667

[SETUP COMPARE V 1
[LINK FOR EXTENDED BIT

0670

3162

DCA

1167

TAD

GDREG1
GDREG1

[SETUP

0671

0672

4450

LDCMD

0665
0666

SEQ

0056

SEQ

0057

CLA CMA
AND

0664

1681

1654
1665

PAGE

13155

7-MAR-77

7240
0113
3163
7004

1660
1602

V142A

COMPARE

[GFT DATA
[LOAD

CRC

GDREG?

0673

1163

TAD

0674

0675

4452
4454

LDADD
RDCRC

[LOAD CRC
[READ CRC

0676

4441

ACCMPZ

[CHECK RESULTS

0677

4435

"ERROR

0700
0701
0702

4436

ERROR
TST72
6004

[0.K, 4096 LOOPS
[ERROR; CRC REGISTER

0657
6004

[SCOPE LOOP POINTER
[TEXT POINTER

[VERIFY THAT THE CRC CAN BE LOADED BY "DLAG'
[AND 'DLDC'. UsE DATA PATTERN 2525 o 5252.
[THIS WILL VERIFY THAT THE cnc CAN BE LOADED
[BY THE EXTENDED CYLINDER BIT IN THE COMMAND
13y

THE

'DLAG“

(OT,

[

0703

7301

0704

4453
1153
7110

0705
0706
0707

0710
0711

0712
0713
0714
0715
0716

0717
0720
0721

0722
0723
0724

0725
0726
0727

TST23:

IAC

CLA CLL

CLRALL

[DCLR

REGI

TAD

CLL RAR
SlL CLA

7630
1‘20
1120

TAD

K2525
K2525

0113
3163

AND

K7740

DCA

GDREGZ

7004

RAL
DCA

3162

LINK

IS SET

COMPARE 4 1
[LINK FOR EXTENDED BIT
[SETUP COMPARE REGISTER
[GET DATA

CRC

[LOAD

GDREG2
[LOAD CRC

RDCRC

[READ

ACCMP2

[CHECK RESULTS
[0.K. 4096 LOOPS
’ERRORI CRC REGISTER

NERROR
ERROR
TST23
6004

0703
6004

5252

[SETUP

GDREGl
GDREG1

TAD
LDCMD
TAD
LDADD

1162
4450
1163
4452
4454
4441
4435
4436

DATA

[USE

TAD

CRC

[SCOPE LOOP POINTER
[TEXT POINTER

[

[VERIFY THAT THE CRC CAN BE LOADED BY "DLAG"
[AND DLDC". USE DATA PATTERN ALL COMBINATIONS.
[THIS WILL VERIFY THAT THE CRC CAN BE LOADED
[BY THE EXTENDED CYLINDER BIT IN THE COMMAND REGISTER
[BY

THE

"DLAG"

IOT.

0730
0731
0732
0733

7106
7006
7004

0734

0113

PAL10
1735
1736
1737

1730
1739
1740

1741
1742
1743

V142A

0735
0736
0737

3163
7004

0740

1162
4450

0741
0742
0743
0744

TST24.

TAD
CLL

[GET

REGI

VALUE

RTL

RTL
RAL
K7740

AND

7-MAR-77

3162

13l55

PAGE

DCA

GDREG2

RAL
DCA
TAD

GDREG1

3-12
[SETUP COMPARE REGISTER
[LINK FOR EXTENDED BIT
[SETUP COMPARE REGISTER

GDREG:

[GET DATA
COMMAND

LDCMD

1163

TAD
LDADD

4452

[LOAD

GDREGZ
DISK ADDRESS
CRC REGISTER

[LOAD

4454
4441

RDCRC

[READ

ACCWPZ

[CHECK

NERPOR

[AC

0747

4435
4436

ERROR

0750
0751

0730
6004

/ERF°RI CRC REGISTER
[DLAG 0R DLDC.

0745

1744

0746

1745
1746
1747

1749
1749

1153

TST24
6004

COMPARE

AC,

O.K.

LOOP

GDREGl
LOAD

[SCOPE LOOP POINTER
[TEXT POINTER

1750

[

/VERIF¥ THAT DCLR DOES NOT AFFECT
[LOAD CRC WITH DLAG t DLDC.

CRC

[

0752

1154

0751
0754

7:05

TAD
CLL

1756
1757
1758

0755
0756

7905
7994

RTL
RIL

1759

0757

0113
3153

DCA

GDREG2

[SETUP

1760

0760

7004

RAL

1761
1762

0761
0762
0763
0764

3162
1162

DCA

GDREG1

[SETUP

CONPARE REGISTER
FOR EXTENDED BIT
COMPARE REGISTER

TAD

GDREG!

case
1153
4452

LDCMD

[LOAD

COMMAND

1763

1764
1765
1766

0765
0766

TST25,

REG2
RTL

AND

K7740

[LINK

LDADD

1770
1771

0772

1772

0773

4435

NERROR

1773

0767

1769

0770
0771

GDREG2

TAD

1154
0111
4053
4454
4441

1767
1769

GDREG2

1751
1752
1753
1754
1755

4096

TAD

[LOAD stx

REG2
K7775

AND

[DON'T DO RECAL.
IDCLR 'CLR ALL"
[READ CRC REGISTER
[CHECK RESULTS: COMPARE

CLRALL
RDCRC

ACCEPZ

[AND

0774

4436

ERROR

1775

0775

0752

TST25

1776
1777
1773

0776

6004

ADDRESS

1774

GDRE61

GOREG2

[0.K. 4096 LOOPS
[ERROR] LOAD, READ,

CLEAR

CRC

[REGISTER

[SCOPE LOOP POINTER

6004

[TEXT

POINTER

[VERIFY

THAT THE

1779

['DLDC',

"DSKP‘I

1780
1791
1782
1783

[USE DATA

PATTERN

CRC

NOT

'RDBUF",

"DRST',
2525

AFFECTED BY

"DLCA",

5252.

[

0777
1000

7301

CLA CLL
CLRALL

IAC

1784
1785

1001

1153
7110

TAD

REG!

1786
1787

1003

1709

1005

7630
1120
1120

1789

1006

0113

52L
TAD
TAD
AND

1002

1004

4453

T5126:

CLL

[DCLR

RAR
CLA

[USE

K2525
K2575
K7740

DATA

5252

LINK

SET

PAL10

V142A

PAGE

13:55

7’MAR-77

3-13
COMPARE

[SETUP

1007

3161

1010

7004

1011

3162

1012
1013

1162
4450

TAD

1014

1163

TAD

1015

445?

DISK

1154
4447
1154
4447

LDADD
TAD REGZ

[LOAD

1016

RDSTAT

[READ

STATUS

1017
1010
1021
1022
1023
1024

1025
1026
1027
1030
1031

GDREG?

DCA
RAL
DCA

SEQ

0059

GDREG?
ADDRESS

REG?

TAD

DSKSKP

/'DSKP"

NOP

4456

RDBUF
TAD R562

[READ

BUFFER

anUR

[LOAD

CURRENT ADDRESS

[LOAD

COMMAND

REGZ

TAD

LDCMD
REG1

TAD
LDEUF

1032
1033

4441

ACCMPZ

1034

4435
4436
0777

NERROR
ERROR

[LOAD URPFR BUFFER
[READ CRC REGISTER
/CRECK RESULTS
/0.V. 4096 LOOPS
[ERROR, CRC REGISTER
[SCOPE LOOP POINTFR
[TEXT POINTER

FDCRC

TST26
6004

6004

0058

BIT

7000

1154
4451
1154
4450
1153

SEQ
REGISTER

EXTENDED

[SETUP COMPARE REGISTER
[GET UPRER DATA
[LOAD COMMAND

GDREGI
GDREG1

LDCMD

4427
4454

1035
1036
1037

FOR

[LINK

[

[VERIFY THAT WRITE
[WHEN IT 75 SET.

LOCK

INHIBITS

ADDRESS

LOAD

[

T5127.

CLA

CLL

IAC

1040
1041

7301
4453

1042

3163

DCA

GDRE52

[CLEAR
[SETUP

1043

1153

REGl

[GET

1044
1045

4452

TAD
LDADD
TAD

K2000

CLRALL

110‘
4450
1154

LDCHD

1050
1051
1052
1053

4452

LDADD

4446

RDADD

4440

4435

ACCMPI
NIPPOR

1054

4436

ERROR

1055

1040

1056

4102

1046
1047

REG?

TAD

CONTROL
VALUE

[LOAD

DISK

[SET

WRITE

[GET

AC
TO

[TRY

COMPARE

ADDRESS

LOCK
VALUE
LOAD DISK

ADDRESS
DISK ADDRESS
RESULTS
[0.K. 4096 LOOPS
[ERROR LOAD DISK ADDRESS
[SCOPE LOOP POINTER
[READ

[CHECK

T5127
4107
[

/V£RIF¥

[0R

THE DISK
'DCLR”.
USE DATA

IRA?

/AFFECTED

'RDBUF'.

ADDRESS
"DLCA'I

IS NOT

'DRST',

"DLDC'I

PATTERN

ALL

'DSKP'

COMBINATIONSu

[

[GET

1057

1153

TAD

REG]

1060

3163

DCA

GDREG?

1061
1062

1‘53

TAD

REGI

4452

LDADD

1063

1154

TAD

REG2

1064

0127

AND

K5777

PAL10

V142A

TSTZB.

7-MAR-77

13155

AC VALUE
[SETUP COMPARE

PAGE

[LOAD

DISK

[MASK

OUT

WRITE

1845

1065

4450

anno

1066
1067

1154

TAD

4451

LDCUR

1848

1070

1154

TAD

1849
1853

1071

4447

nsxsxp

1072
1073
1074
1075

7000

NOP

4442

nosrnw

[READ

STATUS

1154

ran

4427
4456

LDBUF
RDBUF
CLA CLL

[LOAD

BUFFERS

[READ

LOWER

1852
1953
1954

1076

1955

1077

1856

1100

1857

1860

1101
1102
1103
1104

1858
1859

1861

1105

1962
1863
1964
1865
1066
1967
1868
1869
1870
1971
1572

1106

1873
1874

1114
1115

1875

1116
1117

1876
1977
1878
1879

7300
4453
4446

[LOAD COMRAN

[LOAD CURRENT

ADDRESS

are:
REGZ
IDSKP

RFGZ
BUFFER

CLRALL
RDADD

/CLEAR

4440

nccnpi

[CHECK

4435

nanaon
canon

[AC

TSTZB

[SCOPE

LOOP

41g:

[TEXT

POINTER

4436

1057
4107

LOCK

3-14

1946
1&47

1851

ADDRESS

[READ

STATUS
ADDRESS

DISK

AC: cOMPARE T0 GDREG?
D,K. 4096 LOOPS
DISK ADDRESS AFFECTFD

[ERROR,

POINTED

[VERIFY

THE

THAT

COMMAND

NOT

/‘DLCR'. 'DbcA': 'DRST";
'DSKP"'
[USE DATA PATTERN ALL COMBINATIONS.

AFFECTED

'RDBUF".

[

1107
1110
1111

7331

1112
1113

1120

1121

15129,

CLA

CLL

11c

4053

CLRALL

1153

TAD

REG]

[GET

3163
1153
4450

DCA
TAD

GDREGz

[SETUP

1154
1452
1154
4451

TAD
LDADD

REGZ

TAD

REG2

[CLEAR

CONTROL
VALUE
COMPARE

REG1

LDC“D

[LOAD COMMAND
ILOAD DISK

anun

1154
1447
7909
4442
1154
4421
4456

ADDRESS

[LOAD CURRENT

ADDRESS

REG?

TAD

DSKSKP

1894

1122
1123
1124
1125
1176
1127

1885
1986

1130
1131

7309
4453

CLL
CLPALL

1887
1‘88

1132

7326

CLA

1133

44s;

CLRALL

[RECALIBRATF

1R89

1134

4443

ancHo

[READ

1490

1135

444a
1435
4436

ACC“P1

AC. COMPARE T0 GDRFG2
/AC 0.K. 4096 LOOPS

1107

75129

ISCOPE

LOOP

4201

4701

[TEXT

POINTER

1899
1991
1882
1983

1891
1892

1136

1893

1137
1140

1994

1141

1:95

NOP

RDSTAT

[READ

STATUS

[LOAD

URPFR

BUFFER

[READ

LONER

BUFFER

REG2

TAD

LDBUF
RDBUF
CLA

CLL

STATUS

[CLEAR

CML

RTL
COVMAND

/CHECK

NERROR

ERROR

[ERROR'

COMPAND REGISTER
POINTER

1396

[VERIFY

1897
1899
1R99

[DSKP

THAT

RECALIBRATE

INHIRITS

LOAD

COMMAND

1142
1143

7301

4453

TST30,

CLA

CLL

CLRALL

IAC

[ENABLE

[CLEAR

CLEAR CONTROL
CONTROL

PAL10

V142A

13:55

7'MAR-77

PAGE

3-15
[ENTER

1144
1145

4444

7326

ENHANI
CLA CLL

1992

1146
1147

4453

CLRALL

7326

1150

CLA cLL CML RTL
CLRALL

1152

4453
3163
1153

1153
1154

4456

anuo

ITRY

4443

RDC"D
AchP1

IREAD

COMNAND

[CHECK

NFRPOR

RESULTS
409s Loops

/o,K,
Iannon,

1933
1904

1905
1986
1907

1998
1°09
1910
1911
1912

1913
1914

1151

1155
1156
1157
1169
1161

4440
4435
4436

1920

1921
1922
1923
1924

1162
1163
1164
1165

7331

1166
1167

316!
1163

1172

4452
7326
4453

1926

1172

1927

1173
1174
[175
1176
1177
1290
1291

1933

1934
1935

1202

TST31I

4453
4444
1153

POINTER

IENTER

MAINTENANCE

TAD
DCA
TAD

REG1

[GET

GORE62

[SETUP

VALUE
COMPARE

cones?
CNL

IENABLE

RTL

[LOAD DISK ADDRESS
[READ DISK ADDRESS
(CHECK RESULTS
IO.K. 4096 LOOPS
IERROR ON INHIBIT
ISCOPE POINTER

4452
4446
4440

4435
4436
1162
4102

(DLAG)

POINTER

[TEXT
I

IVERIFY

THAT “OMAN” (FATNTENANCE) DOES
AC WHEN ACOIO AND AC7”! OR 0,
CLA

CLL
CLRALL

IAC

TAD

REGl

1207

BIG!

DCA

K3737
GDREG7

1944

1210

1163

TAD

GDREG?

1945

1211

0455

1946
1947
1949

1212
1213
1214
1215
1216

4440

LDMAN
ACCMPI
NERROR

TST32,

AND

4435

1203
name

NOT

ICLEAP ENABLE BIT
IDCLR 'CLR ALL"
OUT

[MASK

COMPARE

ISETUP

MAINTENANCE "OMAN"
ICHECK AC, COMPARE TO GDREG2
IAC O.K. 4096 LOOPS
IERROR. 'DMAN" AFFECTED AC
ISCOPE LOOP POINTER
/LOAD

ERROR
TST32

4439

1951
1952

4010

ITEXT

POINTER

1953

/v:n1ry THAT 'DMAN' 0055
IAC7=0 AND Acwsl on a.

1954

PALIO

1957

1217
1220
1221

1958
1959
1966

1223
1224

1222

V142A

7-MAR-77

7391
4453

T5733,

13:55
CLA

CLL

Now

PAGE

AFFECT

CLRALL
TAD
AND

REG1
K7717

DCA

1163

TAD

GDREG?
GDREGZ

[CLEAR ENABLE BIT
IDCLR 'CLF ALL"
[GET AC VALUE
IVASK

BIT

OUT

4455

LDMAN

1226
1227
1236

4446
4435
4436

ACCMPI

1964
1965

1231

1217

TST33

[SLOPE

1966

1232

4010

4u1u

[TEXT

COMPARE

[SETUP

1225

1967

HHEN

3'16

IAC

1153
$123
3163

1961
1962
1963

NERROR

ILOAD MAINTENANCE
[CHECK AC. COMPARE T0 GOREG?
/AC O.K., 4096 LOOPS

ERROR

/ERROR:

DMAN

AFFECT AC

LOOP POINTER
POINTER

”OMAN“

[VERIFY

IDCLR

THAT
NOT BY

ONLY GETS CLEARED
ANOTHER OMAN,

1233
1234
1235

7391
4453

T5134,

CLA

CLL

11c

/CLEAR ENABLE BIT

CLRALL

1153

"CLR

IDCLR

ALL"

REGl

TAD
ocn
TID

1974
1975

1236

3163

1237

1976

1240

1977
1979
1979
1960
1981

1241
1242

1153
4450
1136
3156

1243

4445

1244
1245

1102

TAD

4455

LDMAN
ISZ
amp
CLA CLL

1988
1989
1990
1991
1992
1993
1994

(DLAG)

IRECALIBRITF

1943

1995
1986
1997

ADDRESS
RECAL.

ILOAD DISK

CLL

1°41
1942

1983
1984

9061

POINTER

/ENABLE CLEAR CONTROL
[CLEAR CONTROL

7301
4453
115!
0122

1931

SEQ

11)

Lona

ITRXT

11c

1203
1294
1205
1296

1969
1969
1976
1971
1972
1973

IDLE

/scopr

1154

1955
1956

COMMAND

CLL
CLRALL
ENHAN!

CLRALL

/AFFECT

1959

LOAD

CLA

1938

1949

YNHIBITS

LDADD

1936
1937
1939
1940

RFCALIBRATE
IRECALIBRATE
COMPARF REGISTER

1171

1932

IENABLE
[SETUP

IVERIFY THAT RECALIBRATE
ILOAD DISK ADDRESS DLAG

1925

1929
192°
1930
1931

REG;

4201

1915

1919

Tnv

4201

9066

RECALIBRATE

IRECALIBFATE

couficz

ERROR
15130

IENABLE

RTL

DCA

1142

1916
1917
1918

CML

SEQ

MAINTENANCE

1990
1901

cones;

CONPARE REGISTER

ISETUP

was;

anNo

[LOAD COMMAND

TAD
DCA

ISTORE

K049”

[ENTER MAINTENANCE Hana o
[GET ENABLE COMMAND REG.

ENNAN2

SHIFTS
couwran

1N0.

xnono

2156

1250
1251

7390
4455

1252
1253
1254
1255

1974
4455
3167
1167
4449

110
LDMAN

Keoza

DCA

DBREG

Tao

osarc

4434

NERROR

ICHECK AC
/AC o_x. 4096

Ennnn

IERROR,

1261

4436
1233

TST34

[SCOPE

1262

44a!

1256
1257
1260

TCNTRI

us4=1

MAINTENANCE

1246
1247

5245

M12
rcnrn:

ICOUNT

SHIFT

,-2

annw

I'DMAN'

ACCMP\

CLEAR

TRY

[ENABLE BIT FOR READ
IRFAD BUFFER
ISAVE FOR PRINTER

MAIN
LOOP

MAIN

FLOP

BUFFER

LOOPS
FLIP FLOP
POINTER

44v5

1995
1996

1997

IVERIFY

1998

I'CLR

THAT

"DMAN'

GFTS CLEAFEF

DCLF

AL L'

1999
CLA CLL

2900

1263

7361

2601

1264

4953

2902

1265

1974

TAO

K6926

2903
7904

1266

3163

DCA

GDREGZ

1267

1153

TAD

REGI

2805

1276

445a

anMD

2806

1771
1272

1136

TAO

M12

2907

TCNTR1

177‘

3156
4445

DCA

7998
2flfl9

I274

1132

TAD

TST35,

IAC

CLRALL

IOCLR
ISFTUP
ILOAD

ENMAN?
h04¢¢

”CLR

ALL'I

COMPARE

COMMAND

REGISTFR

COUNTER

/SHIFT

IFNTFR

”AJNTENANCF

"ONE

DR4=1

PAL‘B

V1§2A

7-MAR-77

PAGE

13355

2”10
2011

1275

4‘55

LDMAN

1276

2156

TCNTRI

2012
2013
2014
2015

1277
1320
1301
1302
1303
1301
1305
1306
1307

5275
7301

152
J”?

CLA

CLL
CLPALL

IAC

TAD

KVMZW

2916
2917
2918

2019
2620

2021
2072

1310

4‘53
1074

u'2

/12

0‘.“

TST3§
4210

ICRC

THAT uAClG DATA"
REGISTER- THEN READ

ITRY

ALL

7338
2339
201a

1314

1315
1316
1317
1329
1321
1322
1323
1320
1315
1326

7301

AND

1's

TSTBS:

CLA

CLL

1153

CLFALL

1153
1110

TAD

ALL

CRC

PEGISTFR,

SHIFTFD

SEQ

"963

CLL

IAC

IDCLH

RAF
CbA
CLL CMA
GDREG:

saL
CLA

3163
1163
9115

DCA
ran

AND

kfi617

3162

can

cnnrc1

1137

tap

M16

3156

DCA
ENMAN1

TCNTF1

110

REG!

1111
1153

1327

7191
9066
1193

1332

2015

CLL

ALL"

"CLF

RFGI

7310

133”
1331

ISKIP
IALL

IF ALL “'5 DATA
ONE'S DATA
COMPAPE REGISTFR

ISETUP

GDPEG?
CONPARF

ISFTUP

ISHIFTEP

FOR

REGXSTER

CRC

MAINTENANCE

IENTEW

MODE

EAL

AND

K9602
K1006

1155

TAD
LDMAN

1333
1334

2156

ISZ

5332

JVP

TCNTR1
.-2

2918

1335
1336

1151
1111

Rncfic
ACCNP)

2919
2250

1337
1312

1135

unanow

1136

ERROR

7951

1301
1302

1311
6001

15136
snot

2052
ZVSS
2M5‘

CAN

“'5.

7639

2011

2917

1311
1312
1313

2912
2013
2311
2016

GDPFG2

2021
2025
2976

2936
2637

"DCLR"

ALL

MAINTENCE
ICHECK AC. COMPARE TO
[AC 0.1. 1995 LOOPS
IFRROP. UMAN AFFECTED
ISCOPE Loop POINTER
117x: pnxuwaa

IVEPIFY

2033
2931
2035

0962

ILOAh

NEFROF
ERFOF

4435
4436
1263
431%

SEQ
"OMAN”

COUNT

ICLEAD

LnMAN
ACCHP1

4455

MAINTENAKCE

[Lonn

7923

2077
2a29
2029
2330
2031
2632

3-17

[ENABLE

ILOAD

BITS

MAINTENANCF

[lb COUNT
[READ CFC

REGISTEF

ICOVPARE PESULTS
/AC 0,K. 4096 LOOPS
IEFFOP: CFC REGISTER
lSCOPF LOOP POINTER
ITEXT POINTER

[VERIFY THAT "AC 1% DATA" CAN BE SHIFTED
PEGISTEP: THEN READ CRC REGISTFR_
11R! PATTERN “125252“

2055
2956

[CFC

1ns1
2058

2051

2a69
2061
2flb2

2063
2a61

PAL1U

V112A

7-MAR-77

13:55

PAGE

3-18

2065
2066
2067
2fl66

2969

1343

7361

1314

4153

CLA CLL
CLRALL

IAC

237?
2271

1345

1121

TAD

K5252

2072
2273

1316

3163

DCA

GDREG?

1317

1163

TAD

GDREG?

T5137:

IDCLR
ISETUP

'CLR

ALL"

CoupARE

PAL10

V142A

13155

7‘MAR-77

0145
3‘63

DC)

GDREGI

ISETUP

COMPARE

M16
TCNTRl

/SETUP

16 COUNT
MAINTENANCE

1350
1351

2076

1352

1137

TAD

2071
2019

1353
1354
1355
1356
1357
1360

3156

DCA
ENMANl
CLA CLL

2279
2000
2001

2092
2083
2004
2005
2036
2007
zone

1361
1362

T37R;

1156
7004
0066
1193
4455

K0017

2074
2075

4444
7300

PAGE

AND

IENTEP

TAD
RAL

TCNTR!

AND

K0002

ISETUP

TAD

Kxoaa

IENABLE

LDMAN

ILOAD

SEQ

0064

SEQ

0065

“ODE

BIT

DATA

BITS

MAIN1ENANCE

1363
1364
1365

2156
5355
4454

152
J"?
RDCRC

TCNTRI

1366

4441

ACCMPZ

/CHECK

4435

IA:

4436
1343
6004

NEPROR
ERROR

lERRDR.

cue

LOOPS
REGISTER

TST37

/scopr

LOOP

POINTFF

2093

1367
1370
1371
1372

6004

[TEXT

POINTER

2994
2095
2096

1373
1374

T37R

116 COUNT
[READ CPC

REsuuts

2089
209a
2091

2092

5774

JMP

ITO

.41

TEST

TST3E

1400

2097

4095

0.1.

1400

2098

PAGE

2099

2100
2101
2102

[VERIFY TRAT "AC10 DATA" CAN BE
ITO CRC REGISTER, THEN READ CRC

SHIFTED

2103
2104
2105
7106

[TRY PATTER

2107

"052525"

1120

CLL
CLFALL
TAD

K2525

3163

DCA

GDREG?

2100

1400

7301

2109
2110

1401

4453

1402

T5130,

CLA

IAC

2111

1403

2112

1404

1163

TAD

GDREG2

2113
2114

1405

0145
3162

AND

K0017

DCA

2115
2116
2117
2110

1407

1137
3155

TAD

M16

DCA

TCNTRI

1412

4444
7300

2119

1413

1156

2120
212!
2122

1414
1415
1416

0066
1193

2123

1417

4455

2124
2125
2126

1420
1421

2127

1422
1423

2156
5212
4454
4441

1120

1424

4435

1406
1410
1411

PAL10
2129

2130
2131

1425
1426

1427

CLA
TAD
CMA
AND

2132

COMPARE

ISETUP COMPARE

TCNTR1
K0002

ISETUP

K1000

[ENABLE BITS

TAD
LDMAN
Isl

TCNTR1

JMP

T380

ILOAD

7-MAR-77

l0,x.

13:55

DATA“

COUNT
IREAD CRc

ICHECK

ERROR
TST3G
6004

”AC

MAINTENANCE

I16

NIRROR

1400
6004

ISETUD

RAL

RDCPC
ACCMP2

4436

ALL

116 COUNTFR SHIFTER
lENTER MAINTENANCE MODE

ENNANI
CLL

T38R:

7944

V142A

GDREG1

”DCRL'

ICLEAR

PAGE

5-1

CRC REGISTER
LOOP POINTER
POINTER

/ERROR:
ISCOPE
ITEXT

2133

2134
2‘35
2136

2137

IREGISTEF.

2138

2139

2140
2141

2142
2143
2144

2145
2146
2147
2143
2149
2150
2151
2152
2153
2154

[VERIFY

1430
1431
1432
1413

7301
4453
1153
3163
1153

TST39:

THAT ”1010 DATA' CAN BE SHIFTED
TRY ALL COMBYNATXONS.

CLA CLL
CLRALL

IAC

TAD

REG!

DCA

GDPEG?

1434
1435
1436

TAD
AND

REG1

0145

3162

DCA

GDREGI

1437

7301

CLA CLL

IAC

1440

3156
1137

DCA
TAD

3157

DCA
ENHANI
TAD

Icurnx
M15
TCNTR?

1441
1442
1443
1444
1445

1446
1447

4444
1153

T39Ry

0156
7640
1066

AND

SZA
TAD

4455
130a

LDMAN
CLA CLL

1453
1454

1156
7004

TAD

2160
2161
2162

1455
1456

3156
7630

FIRST SHIFT COUNTER

MASKEP

MODE

1457

5254

2163

1460

2164
2165

1461
1462
1463
1464
1465
1466
1467

2157
5244
4454
4441
4435
4436

[WAS A 1
[ENABLE BITS

ILOAD

MAXNTENANCE

TCNTFI

RAL

[ROTATE BIT MASKER

DCA

TCNTRI

82L CLA
JR?
152
J”?
ROCRC

1430
6004

BIT

ISETUP

ISKIF
K1000

2150
2159

2170
2171

COMPARE REGISTER

ISETUP

IENTEP MAINTENANCE

K0002

2157

2169

ISETUR

RFGI

CLA

TAD

2166
2167
2160

ALL"

COMPARE REGISTER

TCNTF1

1103

2156

“CLR

/SETUD

x0017

1450
1451
1452

2155

IDCLR

cpc

u-3
TCNTR?

IRESET

FOR FIRST LINK THEN
BIT 11 IN MASKER

T39R

ILOOP

BACK

/PEAD

CRC

[WAIT

ACCMPZ

ICHECK

NERROR
ERROR
TST39

/0.K,

4096

6004

[TEXT

POINTER

RESULTS
LOOPS
lERROR; CFC REGISTER
IEPROP: CFC REGISTER

THAT ‘DLAG‘ CLEAFS ALL OF THE
REGISTER. TRY ALL COVBINATIONS IN CRC.

/VERIFY

2172

ICRC

2173
2174

2175

1470

7301

2176

1471

4453

2177

1472

3163

DCA

GDFEG?

2170

1473

3162

GDREG]

ISETUP

CUVPAPE

2179

1474

2100

1475
1476
1477
1500

7301
3156
1137
3157

DEA
CLA
DCA
TAD

YAC
TCNTR1

ISETUR

PIT

ISFTUP

FIRST SHIIT COUNTLF
MAINTENANCE ”005

2161
2102
2193

4444

TST40.

CLA

CLL

IAC

CLPALL

CLL

DCA

ENHANI

IDCLR

"CLP

ALL"

REGISTERS

MASAEP

“16
TCNTR7

IENTER

PAL10

2184
2185
2196

1501
1502

2193
2194
2195
2196
2197
2198
2199
2200
2201
2202

2203
2704
2205
2706
2207
7209
2209
2210
221l
2212
2213
2214
2715

LDMAN

7300

CLA

1511
1512

7004

PAL

3156

DCA

1513

7630

SZL

1514

5311

amp

,.3

1515

2157

152

1516

5391

JMP

TCNTR7
T40R

1517

4452

LDADD

1520
1521
1522

4454

PDCRC

4441
4435
4436

ACCMPZ

1525

FOR

/WAIT

FIRST LINK

IRESET

RIT

ILOOP

BACK

TRY

CLL

CLRALL

1530

1153
7110

TAD

1531
1532

lERROP,

CDC

lERROP,
/TFXT
CAN

SHIFTED

CLL

RAP

52L

CLA

CIA

CMA

1542

2224

1543
1544

4405

IAC
/"DCLR”

DCA

GDREG?

TAD

GDREGz

NERROR

[GET VALUE T0 LOAD
[LOAD UPPER BUFFER
lPEAD LOWER BUFFER
ICHECK AC. COMPARE T0
IAC O.K. 4096 LOOPS

ERROR

IERROR,

TST41

ISCOP LOOP POINTER
[TEXT POINTER

LDBUF
RDBUF

ACCMP1

1576

4405

TVA?
'JC10 DAV“ CAN BE SHIFTED TO
bINK TO LOWER DATA
DAT;
‘«”FER TREK
7P:
PATTERN
7575 4 5252
InuFFFR.

IVEFIVY

?9w.

IUPPER

222%
2729

2230

CLL

1545

7301

1546

4353

CLRALL

1547

TAD

1550

1153
7110

1551

7630

1552
1553
1554

PAL10
1555
1556
1557
1560
1561
1562
1563
1564

TsT42,

CLA

XAC

I‘DCKR”

CLL

RAR

52L
TAD

CLA

1120
1120

TAD

12525

3163

DCA

GDREG7

1163

TAD

GDREG:

4427

LDBUF
RDBUF

V142A

K2525

7-HAR-77

4456
4‘40

13155

INHAT

DATA????

IDATA

5252

COMPARE

[SETUP

PAGE

VALUE

IGET

napnon

EDROF

uopsn

Isnpow.

TsT42

15:09?

44a5

/TEXT

DATA

IVERIFTY THAT "AC10 DA'I‘A'I CAN BE SHIFTED TO
IUPPEP DATA BUFFER THEN SINK TO LOWER
IDATA BUFFER, TR! PATTERN ALL CO MBINSTIONS

2752

BUFFERS

LOOP POINTER
POINTER

2751

LOAD
BUFFER
/AEAO LOWER DATA BUFFER
ICHECK Ac. COMPARE T0 GDREGZ
/Ac o,x, 4096 LOOPS
ILOAD

2249
2250

5-3

ACCVPl

4435
4436
1545
4405

ALL"

"CLR

PEG;

224a

1565

7301

1566

4453
1‘54
3163

1567
1570

1571
1572

2759

1573

2760
2761

1574

7262

1576
1577
1600

1575

TST43.

CLA

CLL

IAC

CLRALL

I'DCLF" 'CLF ALL"
IGET VALUE TO LOAD

REG2
GDREGZ
GDREG?

TAD
DCA

COMPARE

ISETUD

1163

TAD

4471
4456
4440
4435

LDBUF
RDBUF

ILOAD
[PEAD

UPPER

ACCMP1

ICHECK

NRRPOR

IAC

4436
1565

ERROR

IERROP.

TST43
4405

ISCOPE

4405

2765

2766

IVERIFY THAT

2267
2769
2769
277a
2271
2772

ITO

227;

GDREG2

REGISTERS

DATA

277~

7264

ALL"

“CLR

REG]

7740
3163
1163
4427
4456
4440
4435
4436

1540

CLA

15141.

7630

1541

2763

/GET

CAN

BUFFER
DATA BUFFER

LOWER

4096 Loops
DATA REGISTFRS
LOOP POXNTEP

0.K.

POINTER

[TEXT

"AC10 DATA"

SHIFTED

DATA BUFFER THEN SINK T0 LOWER
BUFFER, TRY ALL COMBINATIO NS-

UPPER

[DATA
I

1601

7301

1602

445!
1153

CLRALL
DCA

1603
1604

15144,

CLA

CLL

TAD

IAC

REGt
GDREG?
REGl

ISETUP COMPARE REGISTER
[GET VALUE TO LOAD
ILOAD UDPEH BUFFER

7774
2275
2776

1605

3163
1153

1606

4427

1607

4456

2277

444a
4435

ACCMPI
NFRPOF

2779

1610
1611
1612

4436

FRROR

COMPARE To GDREGZ
LOOPS
0.x,
lERROR. DATA REGISTERS

72R0

16l!

1601

7781

1614

4405

TsT44
4405

[SCOPE 1009 POINTEP
ITEXT POINTER

777$

2282
2783

2792
2791

7792
2293

TAD
Lneur
FDBUF

DATA

IREAD

[CHECK

BUFFER

Ac,

4096

IAC

[VERIFY THAT ALL DATA BUFFEPS :A N
IAT ONCE. TRY ALL COMBINATIONS

7284
2795
2786
7787
2299
2799

CFC

4453

1537

2255
2256
2757
2750

CLEAP

AND

LOOPS

4096

/O.K.

THEN

MASFER

BUFFER THEN SINK To LOWER DATA
ALL 1's AND 6's.

7301

2222
2723

7753
2254

ILOAD DISK ADDRESS
IREAD CRC REGISTER
[CHECK RESULTS

"AC10 DATA"

1527

2720
2221

2245
2746
2747

MASKEP

BIT

/FOTATE

TCNTR1
CLA

1526

1536

2241

DATA

IBUFFER.

1535

2743
2244

0067

BITS

MAINTENANCE

ILOAD

NFRROP
EVROP
TST40
oue4

IUPDER

2219

2742

SEQ

IENABLE

1534

2240

0066

TCNTPI

IVFPIFY THAT

1531

2239

[WAS

SEQ

CLL

TAD

147a
6094

ISKIF

4455

1523
1524

5-2

K0002
K1000

TAD

1156

PAGE

CLA

1506
1507
1510

2217
2216

2731
2232
2733
2234
2235
2236
2737
7738

TCNTR1

TAD

2216

2775

REGZ

AND

SEA

2169

2192

T40R;

TAD

1066
1191

1503
1504
1505

2191

1154
0156

13155

7OMAR-77

7640

2187
2188

2190

V142A

FULL

1615

7301

1616

4453

CLRALL

1617
1620
1671

115!
3161
1133

TAD

REG1

orA
TAD

TCNTRA
M4

1622
1621
162!

3160

DCA

TcNTRa

TAD
LDBUF

TCNTR4

1161

4427

TSTAS,

T45P1.

CLA

CLL

IAC
IDCLR

"CLR

/COUNTER
lLOAD

ALL”

FOP

URPFP

BUFFER

BUFFEPS

PAL10
2296
2295

1625
1626

2296

1627

V162A

13155

7'MAP077

7301

CLA CLL

IAC

TAD

Tcurka

DEA
13:
OM?
TAD
DCA

TCNTF6

TAD

DOA

TCNTP:

2297

1630

1161
3161
2160

2298

1631

5723

2299
2300
2391
2302
2393
2304

1632

1153

1633

3163

2305
2306
2307
2308

1660
1661
1662
1663

730°

1666

2160

152

2310

1665
1666
1667

5236

JMP
NPRRon

2311
2312
2313
2314
2315
2316
2317
231!

1636
1635
1636
1637

1650
1651

1131
3160

5267

RDBUF
ACCMPI
SKP CLA
UMP

2163

Isz

7000

NoP

6456

T45R3,

6660
7610

6635

6‘36
1615

145E:

6605

TCNTRJ
T65F1
REGl

/‘

GDPEG?

ISETUF

IERROR.

TSTOS
6465

ISCOPF

THE SILO BUFFERS ARE NOT AFFECTED B!
‘DLAG“: ‘DLDC‘, 'DLCA", 'DSKP". 0R "DRST"
PATTERN ALL COMBINAT10NS

I'DCLR';
IUSE DATA

6627

LDBUF

1662
1663
1666

2156
5260
1151

Isl

TCNTR!

JMP

T66A1

TAD

REG1

1665

6652

1666
1667

REG1

1671

1153
0451
1153
0105

LDADD
TAD

2331

1672
1673

445a
1153

2333

1676

4447

2339
2340
2311

1675

2362

1700

Tana
6‘62
1300
6653

2343
2366

1702

2:45

1703

2346
2367
2:09

1706
1705
1706

1670

1676
1677

1701

PAL10

TST66,

3163

1133
3156
1300
1076

T66A1.

CLA CLL
CLRALL

IAC

TAD
DCA

REG?

TID

DCA

TCNTR1

TAD

GDREG2

AMOUNT OF
IGET VALUE TO LOAD
[LOAD UPPER BUFFER
ICOUNT AMOUNT
[MORE To LOAD

REG!
K3777

IREAD

ICLEAP

STATUS
COUNTER

TAD

DCA

TCNTR!

ISETUP

K0020

IENABLE

CLL

TAD

LDMAN

3167

DCA

13:55

7-MAR-77

5-5

PAGE

1712

5316

1713

2156

ISZ

TCNTRl

/READ

2356
2355
2356

1716

JMP

T46A2

ILOOP

2357

1711

5303
6635
6636
1652

2358

1720

6605

1721

3156

2365

1722

7301

2366
2367

1723

6653
1156

1726
1725

1726
1727

2377

1736

2375
2379

1737
1760

2380

1761

7650
7001
3‘56
6636

2381
2392

1762

6636

1763
1766

1722

CLA

6MP

1156

TAD
CLL

7106

IGET VALUE

LOAD

BUFFER
LONTR BUFFER
ICHPCK RESUITS
/DATA O.K,

ILOAD
IREAD

T67E

UPPER

IERPOR

TCNTRl
RAL

IAC
DCA
NERROR

T67E,

6605

ISET ONE TO LEFT
ILOOP 6096 TIMES
IFRFOR SILD BUFFERs
[SCOFV LOOP POXNTEP

TCNTR1

ERROR
25267
6605

POINTER

ITFXT
THE

ITHEN SINK T0
/O's PATTTRN,

UPPER

LOWER

BUFFER

BUFFER.

CAN

USE

LOADED

FLOATING

2389

1765

3156

2396

1766
1767

7301

1750
1751
1752

1753

2396

1756
1755
1756

239°

1757

2600
2601

1760
1761
1762
1763

2603

COMPARE REGISTER

ISETUP

SNA

IVERXFY THAT

2602

CONTROL

ICLEAR CONTROL
IGET VALUE T0 LOAD

TCNTR!

7610

2338

AT 6
IENABLE CLEAR
ISTART

IAC

TCNTR]
GDREG2

5362

2396
2395
2396
2397

CAN BE LOADED
USE A FLOATANG

BUFFER

TCNTR1
CLL

RDBUF
ACCMPI
SKP CLA

2385
2386
2387

2393

UPPER

LOWER BUFFER.

TAD
DCA
TAD
LDBUF

2396

2391
2392

BUFFER AFFECTED
ISCOPE LOOP POINTER
ITEXT POINTER

CLRALL

1156
6627
6656
6660

2375
2376

2383

FOUR

/ERROR;

DCA

15747.

3163

1730
1731
1732
1733
1736
1735

2373

ALL

/O,K. 6096 LOOPS

THE

THAT

0.x,

IERROP

7366

2376

IDATA

NEFPOP
EFFOP
TST66

[THEN SINK T0
I1'S PATTERN.

RESULTS

ICHECK

6605
/
[VERIFY

BUFFER

RESULTS

ISAVE

2352
1353

2359

READ

IDMAN

DBREG

DBREG
TAD
ACC"P1
BKP CLA
JMP
166E

2360
2361
2362
2363

STATUS

CLL

CLRALL

T46E:

ADDRESS

/D5KP

RDSTAT

1167
6660
7610

1715
1716

ADDRESS

RFG1

TAD
DSKSKP
NOP

CLA

6653

15143.

DCA

TCNTRI

ISTART

CLA CLL

IAC

IENABLE

CLRALL

7777
CLEAR CONTROL

/CLEAR CONTROL
VALUE

1155

TAD

7340

CMA

3163
1163

DCA

1421

LDRUF

[LOAD

c455

Rnaur

2440

ACCMPI
SKP CLA

[READ LOHFR
(CHECK RESULTS
/nATA 0.K,

7610
5367

TCNTR1

JMP

1156

TAD
CLL

715a

SNA

IGET

IINVERT

GDPEG2
GDREG?

TAD

7154

BUFFERS

IMASK OFF WRITE
ILDAD COMMA“D REGISTER

LDCVD

T46A2.

DISK

ILOAD CURRENT

TAD

ICDUNTER FOP

ILOAD

AND

CLA

COMPARE

ISETUP

LDCUR

6655

V162A

IDCLR

GDREG2

1707
171a
1711

2370
2371
2372

0069

1075.

1660

2369
2369

SEQ

IVERIFY THAT

1661

2350
2351

BUFFEPS

DATA BUFFERS
LOOP POINTER
ITEXT POINTER

2326
2327

2369

10.x, 4z9e LOOPS

ERROR

1133
3156
1163

2333
2336
2335
2336

FULL

CNMPARE

TCNTR3
T65R3

2325

2332

BUFFERS

0068

aurran
CHECK

[ERROR DATA

T655
GDPEG2

1156

2328
2329

WHEN

FIPST

SEQ

[CHECK

7301
6653

2330
2331

5“]?

FOR

[READ

1652
1653

2326

COUNT,

10.x.

1656
1655
1656
1657

23:3

5-4

2319
2322
2321
2322

PAGE

T69E

TCNTR1
RAL

ISETUP

IGFT

FOR

VALUF

[ERROR

UPPFR

LOAD

0'5

COMPARE
TO

FEGISTER
LOAD

BUFFER
Hurrru

PAL10

V147A
7001

11c

1765

3156

DCA

2406
2407

1766

4435

1767

4436

2408
2409
2410

1770
1771

1746
4405

T485:

1772

2412
2413

1773

2000

/VER1FY

[EMPTY.

2437
2438
2439
2440

CLA CLL
CLRALL

IAC

1177

TAD

STCON

2003

3163

DCA

2004
2005

1153
4442
441a
7610
5232
1177
1070

GDREGZ
REG!

2006
2007

2010

2011

TEST

WHEN

BUFFEE

2012
2013
2014
2015
2016

TST49.

TAD

/'DCLR" CLEAR ALL
[GET EXPECTED BITS
[SETUP (OMPARE REGISTER
[READ

ACCMP1

[CHECK

SKP

RESULTS

[0.K.
[ERROPu

CLA

STATUS

RDSTAT

STATUS REGISTER

749E

TAD
TAD

K0004

IGET EXPECTED

315;

DCA

GDREG2

[SETUP
[ENTER

STCON
BITS

COMPARE REGISTER
MAINTENANCE

MODE

4:44

FNMAN1

1103
4455

TAD

LDMAN

[LOAD

MAINTENANCE

2017

7240

2020
2021
2022

4442
044a

CLA CMA
RDSTAT

[READ

STATUS REGISTER

ACCMPl

[CHECK

K1000

CLA

SIP

5232

JMF

T49E

1177
3169
4453
1442

TAD

STCON

DCA
CLRALL
RDSTAT

GDREGZ

4440

2446

2032
2033

4436
2000

2447

2034

5000

2449

T49E.

STATUS REGISTER

REGISTER
[DCLR "CLEAR STATUS"
[READ STATUS REGISTER
[CHECK RESULTS
[STATUS 0.K-I 4096 LOOPS
[ERROR, STATUS REGISTER
[SCOPE LOOP POINTER
[TEXT POINTER

COMPARE

[SETUP

ACC0P1

4435

RESULTS

/O_K.
lERPOR,

7610

2030
2031

NERPOR
EPROF
T5T49
500?

SUFFER FULL CAUSES

[VERIFY THAi

3449

IDRLI.

245C

2459

00?

2027

2452

POINTER

4453

2443

2453
2454
2455
2456
2457

OCCURES

7301

2442

2451

"DRL"

THAT

2001
2002

2441

2445

ITO

.41

2000

2023
2024
2025
2026

2444

EUEFEPS

PAGE

2417

2431

4405

[TEXT

15749

2416

2432
2433
2434
2435
2436

[ERROR SILO
[SCOPE LOOP

an?

5773
2000

2415

2424
2425
2426
2427
2429
2429
2430

ERROR
75748

2414

2423

NERROR

[SET ONE TO LEFT
[LOOP 4096 TIMFS

TCNTR1

2411

7418
2419
2420
2421
2422

5- 6

SEQ 0070

1764

2404
2405

PAGE

13155

7-MAR-77

2035
2036
2037

2940
2041

7301

TST50.

4453

CLA

CLL
CLRALL

IAC

TAD

STCON

DCA

GDREG?
REG2

TAD

RDSTAT

[READ

4440

2044

7510

ACCMPI
SKP CLA

[0.K.

7~MAR-77

STATUS REGISTER
[CHECK RESULTS

4442

V142A

ALL"

COMPARE

[SETUP

2042
2043

PAL10

'CLR

[DCLR

1177
3163
1154

13155

PAGE

5- 7

SEQ
2045
2046
2047
2050

5274

JMP

1140

2051

2464

2052

2465
2466

2053
2054
2055

2459
2460
2461
2462
2463

2467
2460

2469
2470

2471
2472
2473
2474
2475
2476
2477
2478
2479
2480

2401
2482
2483
2404
2485
2406

2056
2057
2060
2061
2062
2063

2064
2065
2066
2067

[ERROPs

TAD

750:
M49

3156

DCA

TCNTR1

4444

ENNAN1

1077

TAD

[48 COUNTER
[ENTER MAINTENANCE
[ENABLE BITS

4455
2156
5252
7300
4442

LDMAN
ISZ

TCNTR1
.-2

J”?

CLA CLL
RUSTAT
ACCMPI
SKF CLA

4440

7610
5274

[LOAD

MAINTENANCE

[SKIP

WHEN

BUFFERS

JMR

750E

TAD

Raina

LDMAN

STATUS

/EPROR.

"DEL"

[CAUSE

TAD

SICON
K0004

[BIT

3163

DCA

Gnfiaaz

[SETUP

DMAN

REG1

EXPECTED
COMPARE REGISTER

1153
4442

TAD

RDSTAT

[READ

4440

ACCHP1

[CHECK

2073

4435

NFPROR

2074
2075

4436
2035

2076

5000

4096 LOOPS
[ERRORp STATUS REGISTER
[SCNPE LOOP POINTER
[TEXT POINTER

207a

750E;

STATUS

ERROR
7575a
snow

RESULTS

[STATUS

O.K.'

2077
2100

2101

7301
4454
4444

2492

2102

2493

2103

2494
2495
2496
2497
2498
2499

2104
2105
2106

1103
4455
7300
4447
5314

2107

4447

2110
2111

2500

2501

TST51,

"DSKP'

THAT
CLA

CLL

sKIPS

'D PL'

CLRALL

IDCLR "CLR ALL"
[ENTER MAINTENANCE

ENMANI
LDMAN

”DMAN'

'DRL'

[SET

CLL

DSKSKP

I'DSKD"

T515

5314
4453

DSKSKP
JMP
CLRALL

751E

2112

4447

DSKSKV

2113

4435

NERROR

['DSKR' SKIP
ISKIP 0.K. 4096

2502

2114

4436

ERROR

/ERROP.

2503

2115

2077

2504

2116

0006

2505
2506

751E:

MODE

K1000

TAD
CLA

ERROR

IAC

JHP

[ERROR,

”DSKP”

/‘DSKP'

[ERROR.

[CLEAR

TST51
0006

'DSKP'
STATUS "DCFL"
LOORS
SKIP 0N
POINTER

"DSKP"

[SLOPE

LOOP

[TEXT

POINTER

"DRL"

IVERIFTY

THAT

2507

[ENABLED

2500

2511
2512
2513

FULL

2071
2072

[VERIFY

2510

ARE

CLL

1177
1070

2488
2409

250°

"ODE

STATUS REGISTER
[CHECK RESULTS

4455
7300

CLA

[READ

1077

2487

2490
2491

K0100

STATUS

"DRL'

"ENABLE

DOES CAUSE
INTFRRUPT"

DISK
E17

"INTEPRUPT" 1F
conunnn FEGISTFR.

2117
2120
2121

7331
4453

1152

TAD

2122

445»

LDCMD

ISET

2123

4441

ENHAN1

[ENTER

T5752.

CLA

CLL

IAC

CLRALL

I'DCRL'

'CLP

ALL“

K0400

INT,

FNABLE

"LOAD

"AlNTENANcr

MODE

COMMAND

REG,"

0071

PAL10
2514
2515
2516

2517
2519
2519
2520
2521
2572
2523
2524

V142A

TAD

2125

4455

LDMAN

stat

2126

4437
7610
4435
4436

IONWAT
SKP CLA

[WAIT

2127
2130
2131
2132
2133

2117

ERROR
15152

0007

oao7

2526

2531
2532
2533

2534
2535

2536
2537
2533

0072

SEO

0073

LOOP POINTER
[TFXTPOINTER
[SCOP

[

[VERIFY THAT
[

2530

SEQ
”DMANI

URL"

FOR INTERRUPT
[ERROR. No INT. no.
10.x. INT. OCCURRED
IERDDD, INT. nsouasr

NERROR

[WHEN

2529

5-3

K1090

1103

2525

2527
2529

PAGE

13155

7'MAR-77

2124

2134
2135
2136

"INT.

TST534

CLA

I'DF‘L"
ENABLE

CLL

2140
2141

LDHAN
IONHAT

2142
2143

SKP

2144

TAD
LDCND

T53E
K0400

110!

LDMAN

4435
4436

AND

CLEAR

INT.

INT.
INT,

1N1.

no.
OCCURED

[SET 'DRL' "DMAN'
[WAIT INI.. SHOULD

1515!

0007

0007
I

INT.

Itnnon, no INT.
/0.x. INT, OCCURRED
[ERROR11 INT. so
/scop: LOOP POINTER
[TEXT POINTER

ERROR

2134

JMP

K1000

IONHAT

5762
2200

FOR

(ERROR.

T53E

SKP CLA
NERROR

T53E:

INT. ENABLE

[SET

[WAIT
/o,x.

CLA

4455
4437
7610

2550
2551

INT.
10.x. no INT.
Irnnon, INT. OCCURRED

[WAIT FOR

IONWAT
SKP
J"?
TID

OMAN

'DRL'

[SET

CLA

JMP

2147

MODE

K1000

TAD

2544

[DCLR "CL: ALL"
[ENTER MAINTENANCE

EMMAN1

2145
2146

INT.

IAC

CLRALL

2137

2543

SHOULD CAUSE INT, R0. own!
BIT IS SET. DOES LDC”D CLEAR

[TO

.91

TEST

TST54
I

2553

2200

PAGE

2554

2555

[VERIFY THAT

2556

[

TST54:

"LDCHD'

CLA CLL

2557
2550

7301

4453

CLRALL

2559

1177

2560

1070

TAD
TAD

2561

3163

DCA

2562
2563
2564
2565

4444

ENMAN1

STCON
K0004
GDREG2

1103

TAD

4455

LDNAN

7300

CLA

2566
2567

1154

TAD

4442

RDSTAT

2568

4440

ACCMP1

PAL10
2569
2570
2571

2572

2214
2215
2216
2217
2220

V142A

CLEARS STATUS REGISTER

IAC

K1000

[DCLR

'CLR ALL"

[SETUP
[ENTER

COMPARE

[ENABLE
[SET

'DRL’

OMAN

CLL

REG2

7-MAR-77

[READ STATUS REGISTER
[CHECK RESULTS

13155

7610
5225
4450

SKP CLA
JNP
LOCND

1177

TAD
DCA

PAGE

5-9

[0.K. CHECK CLEAR
T54E

[STATUS
[CLEAR

STCON

2221

3163
1153

2575

2222

4442

RDSTAT

[READ

2576

2573
2574

MAINTENANCE MODE

GDREGZ
REGl

TAD

COMPARE

[SETUP

STATUS REGISTER

2577

2223
2224

4440
4435

ACCMPI
NERROR

2578

2225

4416

2579

2226
2227

2200

ERROR
T5154

[CHECK RESULTS
[STATUS O.K. 4096 LOOPS
[ERRORI STATUS REGISTER
[SCOPE LOOP POINTER

5000

[TEXT

2500

254E;

5000

2581

[

2592
2593

[VERIFX THAT RECALIBRATE DOES SET
[ERROR IN THE STATUS REGISTER.

2584

2585
2596
2587
2598
2589
2590
2591

2592
2593
2594
2595
2596

2597
2590

CLL

IAC

CLRALL
CLA CLL

[ENABLE CLEAR CONTROL
[CLEAR CONTROL

IAC

4453

CLRALL

[ENABLE CLEAR CONTROL
[ENABLE CLEAR CONTROL

1177

TAD
DCA

7351

2234
2235

2245

TST55,

3163

CLA

4440
7610

1326

5252

JNP
CLA

1177
3163
1325

DCA
CLA

2247

2601

2250

445!
4442
444a

2602

2251

4435

2603
2604
2605

2252

4435

2253

2230

2254

5009

STCON

GDREG?

RDSTAT
ACCMP1
SKP CLA

4442

2599
2600

2606
2607
2608
2609
2610

2246

STATUS

4453
7301

2230
2231
2232
2233

2236
2237
2240
2241
2242
224!
2244

POINTER

DRIVE

STATUS

[CHECK

T55F

[STATUS 0.K.
[ERROR' STATUS

CLL CML RTL

TAD

STCON

GDREG2
CLL CML RTL

CLRALL
RDSTAT

EXPECTED COMPARE
RECALIBRATE
[RECALIBRATE
[SETUP

[ENABLE

[READ STATUS
[CLECN RESULTS

ACCNP1
TSSEI

EXPECTED COMPARE
REGISTER
RESULTS

[SETUP

[READ

NERROR
ERROR
TST55
5000

[0.K.

4096

LOOPS

STATUS
[SCOPE LOOP POINTER
[TEXT POINTER
[ERROR'

[VERIFY

"LOAD DISK

THAT

ADDRESS CAUSES"

"DRIVE

STATUS

ERROR"

[

2255

7301

2256

TST56:

CLA

CLL

Inc

[ENABLE CLEAR CONTROL

CLRALL
LDADD

2611
2612

2257

4453
4452

2260

1177

Inn

STCON

2613

2261
2262

«use
3163

TAD

2614

DCA

2615
2616

226!

1153

TAD

K2202
GDREG?
REG!

2617
2610

2264

4442

ROSTAT

[READ

2265

4440

2619

2266

4435

ACCNPI
NERPOR

2620

2267
2270
2271

4435
2755

ERROR

TSTSb

[CHECK RESULTS
[STATUS O.K. 4096 LOOPS
[ERRORI STATUS REGISTER
[SCOPr LOOP POINTER

5030

5900

[TEXT

2621
2622
2623

STATUS

POINTER

PILID

VIOZI

7-MAR-77

13355

PAGE

5-10

550 0074
2624

IVERIEI

2625

2631
2632
2633

2634

2272
2273
2274

2275
2276

2277
2300
2301

2635

2302

2636

2303
2304
2305
2306
2307

2637

2638
2639
2640
2641

7301
4‘53

'DOES LDC’4D CLEAR

15TH.

1102
4450
4452

4435
4436

CLA CLL
CLRALL

IAC

TAD

K0400

INT, ENABLE "LOAD COMMANnK
ISET "SELECT"; LOAD DISK ADDRESS
IwATT FOR EXPECTED INT.
IERRor-x, ND INT.

LDCMD
IONWAT
NERROR

"LOAD

INT,

ICLEAR

26757
0007

POINTER

ITEXT

[VERIFY THAT "LOAD DISK ADDRESS"
I'DRIVE STATUS ERROR“, TEST 01TH

CAUSES
DISK SKIP

2310
2311
2312

7301

CLA

TSTsa.

CLL

CLRALL

2313

LDADD
OSKSKP

2314
2315

5320
4441

JNP

2651

2316

2652

2317

5320
4435

2653

2320

2654
2655
2656

2321
2322

4436
2310

IAC
IDCLR
ILOAD
IDsKP

Tsar

JHP

TSOE.

"CLR

ALL"

DISK
DISK

AND

SKIP

IERROR, No SKIP
IDSKP DISK SKIP
IERROR, No SKIP

T593:

OSKSKP

0006

2651

NERRoR

ISTATUS

ERROR

IERROR,

T6750

ISCOPE

0006

ITEXT

SELECT ERROR CAUSES

THAT

IVEPIFY

2659

STATUS REGISTER

Loop POINTER
POINTER

"05“"

SKIP

7301

4453

CLRALL

IDCLR

'CLR

2325

4452
4447
5333

LDADD
OSKSKP

ILOAD

DISK

2326
2327

IDsKP

”SKIP

2330

4453

2666

2331

266":

2332

2660'
2669
2670

4447
4435
4436

2334
2335

2333

CLA

TST59.

CLL

T595.

IAC

T59E

JMP

2323

CLRALL

ICLEAR

SKIP

DSKSKP
HENRI)"
ERP'W

IO.K.

4096

POINTER

man
LOOPS
IERROR. 'DSKP SKIP"
ISCDPE LOOP POINTER

2613
2674

ITHEN

2676
2677
2670

IVERII'I THAT SELECT ERROR CAUSES
INTPRRUPT

2336

PAL10
2679

2337

2600

2340

2341
2342
2343

7301

TST60,

V142A

7-RAR-77

CLA

CLL

13155

CLFILL

3356

DCA
TAD
LDCMD
LnADD
DSKSKP

TAD

1102
4450

2344
2345

4452

2346

5354

4447

160542

JMP

TSOE

TAD
DCA

K0007
1601347

26139

2351
2352
2353
2354
2355
2356

4437
7610
4436

5760

2400
2400

IERROR,

JR?

1N1,

0.x,

DSKP OR INT.
(SCOPE LOOP POINTER
IMoDIrIED TEXT POINTER

.41

TEST

T5761

IVERIFI

'DFL"

TNAT

CAUSES

INT.

THEN

SKIP

2400

7301

2401
2402

4453
1072

2403

3222
1107
4450

2404

2405
2406
2407
2410
2411

2412
2413
2414
2415
2416
2417
2420

2421
2432

TST61.

4444

CLA CLL IA:
CLRALL
TAD
K0007
DCA
T616292
TAD
K0400
LDCMD
ENRANI
no

7103
4455

5220

LDMAN
IONNAT
MP

1071

TAD

3222
4447
7610
4435
4436

DCA

4437

SKP

2400

ALL"

TEXT POINTER
ENABLE

ISETUP

INT,

IENTEP

MAINTENANCE

IERROR.

K0006
T61E¢2

cLA

INT.

ISETUP TLXT POINTER
I‘DSKP“ SHOULD SKIP

IERNOR, No SKIP
NJ. 4096 LOOPS
IERpoR, SKIP on INT.

ERROR
TST61

ISCDPE LOOP POINTER
[MoruF'IED TEXT POINTER

IVERIH
I

IDRIVE

THAT MAINTENANCF‘ DOES
STATUS ERROR SKIP

CLL
CLRALL

7301
4453
4447
7610

2729
2730

2427

5744

SKP
JHP

7430

7326

2431

4453

2732

2432

4447

CLL
CLRALL
DSKSKP

CML

2731

2733

2033

5744

JMP

762E

CLA

INHIBIT

2423
2424
2425
2426

TST62.

Mans

ISET 'DRL'
INAIT FOR INT.
T611:

0007

new

ISETUP

OMAN

NTRRDR

T61E,

new

K1000

DSKSKP

2724

2720

AND

PAGE

2722
2723
2725
2726
2127

ISKIP

ERROR

2720
1721

SKIP

2357
2360

:700

2719

SKP CLA
NRRROR

0006

IERROR,

ISETUP TEXT POINTER
[:4an TOR INT.
IERROP. NO INT. OCCURRED

TST60

0006

2695

2710

T600,

2336

ALL"

TEXT POINTER

ISETUP

IONRAT

4435

'CLR

15:1 TNT. ENABLE
ILOAO DISK AND co
IDSKP
DISK SKIP

1072

2717

5-11

K0400

3356

2715
2716

PAGE

IDCLR

2350

2712
2713
2714

ERROR

K0006

2630

2709
2710
2711

SKIP oN

SE0

4453
1071

2347

2706

'DsKP"

IAC

2687

2702
2703
2704
2705
2706
2707

SKIP

2675

2696
2697
2693
2699

ALL"
ADDRESS AND
ON ERROR"

IERROR.

TST‘Jk
0006

0006

2671
2672

2690
2691
2692
2693
2694

ERROR

2323
2324

2605
2656

101

0.14.

2660
2661
2662
2663
2664
2665

2603
2684

GO
IOT

7650

2602

INT.

POINTER

ISCDPE LOOP

4452
4447

2661

COMMAND"

IO,K. INT. WORKED
IERROR, SELECT ERROR

ERROR

T57E.

2272
0007

ALL"

"CLR

IDCLR

T57E
K0400

TAD

4453

1650

R0.

ISET

SUP

4437

2644

2640
2649

INT.

CAUSES

INT."

LDADD
IORWAT

5305
1102
4450

2643

2647

ERROR"

LDC’4D

4437

2642

2645
2646

STATUS

2626

2627
2628
2629
2630

"DRIVE

THAT

CONTROL

ICLEAR

DSKSKP

InIsK SKIP
10.x. N0 SKIP
IERROR. SKIP

CLA
T6252
RTL

/RECILIBRATE§
IDIsK

SKIP

IFHRO";

SKIP

m fl 7 5

PAL10

V142A

13155

7-MAR-77

PAGE

5-12
SEQ 0076

2436

4444
4447
7610

ENNAN1
DSKSKP
SVP CLA

2431

5244

JVP

7326

CLA

4453
4447
4‘35
4436

CLRALL

2734
2735

2434
2435

2736
2737
2739

2740

2440
2441
2442

2741
2742

2443
2444

2743

2145
2446

2739

2744
2745
2746

0006

NERROF

[0.K.

ERROR
TST62
0006

IERRORI

4096

LOOPS

DISK SKIP
[SCOPE LOOP POINTER
[TEXT POINTER

THEN DCLR DOES

SET BUSY

7301

CLA

4453

CLL
CLRALL

IAC

2450
2451

1177
3163

TAD
DCA

STCON

4442
4440
7610

5304

RDSTAT
ACCUPI
SKP CLA
J"?

4444

ENNANl

7326

ELA CLL CML RTL

1177

TAD
DCA

2452

2462

3163

2761

2762

2463
2464

7326
4453

2763

2465

4442

2764
2765
2766
2767

2466

2768

2472

2769
2770
2771

2473

2467
2470
2471

2474
2475
2476

2477
2500

TST63,

RESULTS

0.K.

[STATUS

STATUS

[ERROR;

MAINTENANCE

[ENTER
STCON

[EXPECTED STATUS
[SETUP COMPARE REGISTER

GDREGZ

[READ

[STATUS

0.x.

5304

JHP

T63E

[ERRORI

STATUS

1153
0110
4453

TAD

REG:
K7776

CLA

AND

1177

TAD

STCON

1877
3163

TAD
DCA
TAD

K0100
GDREGZ
REGT

1154

2503
2504

4435
4436

2505

2700

2506

2447
5000

T63E,

IVERIFY

2784
2785

7301
4453
1177
3163

V142A

[BUSY BIT
[SETUP

RDSTAT
ACCMPI
NERROR
ERROR

TST64:

CLA CLL

[STATUS] O.K. 4096 LOOPS
’[RROR' RECALIBRATE
[SCOPE LOOP POINTER
[TEXT POINTER
THEN

"DRL'

RESULTS

DRL:

AND TRANSFER DONE
IAC

CLRALL
TAD

STCON

DCA

Gauss:

7-MAR-77

COMPARE REGISTER

[READ STATUS REGISTER
[CHECK RESULTS

'RECALIBRATE'

THAT

[DRIVE STATUS:

2510

[MASK OUT CLEAR CONTROL
[DCLR

5000
[

2752
2783

DCLR

STATUS
RESULTS

TST63

2791

2507

['RECALIBRATE'
[CHECK

CLRALL
CLA CLL CML RTL

7326

4442
4440

PAL10

[CHECK
T63E

4440
7610

2501
2502

2511
2512

[CLEAR CONTROL
[EXPECTED STATUS
[SETUP COMPARE REGISTER
[READ STATUS

GDREG:

CLL CML RTL
CLRALL
ROSTAT
ACCMP1
SKP CLA

2779

2756
2787
2798

[RECALIBRATL
[DISK SKIP

2447

2760

2772
2773
2774
2775
2776
2777
2778

SKIP

[ERROR,

[VERIFY THAT 'RECALIBRATE"
[AND DRIVE STATUS ERROR

2758
2759

2757

10.x,
T62E
CNL RTL

SKIP
N0 SKIP

2453
2454
2455
2456
2457
2460
2461

2756

[DISK

DSKSKP

T62E.

2423

2747

2748
2749
2750
2751
2752
2753
2754
2755

CLL

MAIN

[SET

13:55

PAGE

[CLEAR

courpon

[SETUP

COMPARE

5-13
SEQ

2769

2513

2790
2791

2792
2793
2794
2795
2796
2797
2798

4442
4440
7610
5344

RDSTAT
ACCHP1

4444

ENHANl

7326

CLA

sxp

2801

2802
2903
2804
2805
2806

2807
2005
2809

2810
2811
2812

[STATUS 0.x.
T64:

CLL

STATUS
RESULTS
sTATus

[ERROR'
[ENTER

CML

MAINTENANCE

RTL

TAD

STCON

IEXPECTED

3163

DCA

Gonzo:

[SETUP

7326

CLA

CLL CML RTL
CLRALL
RDSTAT
ACCMDT
5x? CLA

4453
4442
4440
7610

2000

[CHECK

CLA

JNP

1177

2799

[READ

sTATus

COMPARE REGISTER

[DCLR
[READ

ICHECK

STATUS
RESULTS

[STATUS

0.x.

IERROD,

STATUS

5344

JMP

T645

7326

CLL CML RTL

1177

CLA
TAD

1106

TAD

1070
3163
1103

TAD
DCA

4455
1153

LDMAN

ILOAD

sHTTT
MAINTENANCE SET DRL

4442

RDSTAT

/READ

STATUS

4440

ACCMP1
"canon

[CHECK

srcou

K4000
Kenna

[EXPECTED

sTATus

GDRE62
K1000

TAD

[ENABLE

REGI
REGISTER

ERROR

RESULTS
xo.x. 4096 LOOPS
zapnon, STATUS REGISTER

2315
2616
2917
2818

2507

T5164

[SCOPE

5000

saga

[TEXT

2819
2820

2600

2821
2622

2600

2513
2914

2523
2824
2825
2926

2827
2828

2929
2830

2631

4435
4436

164E,

LOOP POINTER
POINTER

[

5750

any

.+1

ITO

TEST

TST65
[

PAGE
[

[VERIFY THAT 'RECALIBRATE" THEN
[DRIVE STATUS AND BUSY ERROR IN

"DLCA'

SETS

STATUS

2600

7301

4453

CLA CLL
CLRALL

Inc

2601
2602

1177

TAD

STCON

2603
2604

3163
4442
4440

DCA

GDREG?

7610

75165.

[CLEAR CONTROL
[EXPECTED sTATUS
[SETUP

RDSTAT

[READ

AECMPl

[CHECK

COMPARE
STATUS
RESULTS

2832

2605
2606

2033

2607

5233

2934

2610
2611
2617

4444

7326

sKP CLA
JMP
T653
ENNANl
CML
RTL
CLA CLL

1177

TAD

srcou

[EXPECTED

3163

DCA

GDREC:

[SETUP

7326

CLA

CML

2839

2613
2614
2615

2335
2036

2837

[STATUS

/EPPOBI
[ENTER

O.K.
STATUS
MAINTENANCE
STATUS
REGISTER

COMPARE

4453

CLL
CLRALL

2840

2616

4442

RDSTAT

[READ

2841

2617

4440

ACCMPI

[CHECK

RESULTS

2342

2620

7610

[STATUS

O.Ka

2843

2621

5233

SKP
JMP

[ERR0R1

STATUS

2830

CLA
T65E

PTL
STATUS

0077

PAL10
2844

2622

2845

2623
2624

2846
2847

2648

2625
2626
2621

V142A

CLL

CLA

1111

3163

TAD
DCA

4451

LDCUR
TID

2850

2630

1154
4442

2951
2852

2849

2631

444a

2632
2633

4435

2853
2854

2634

4436
2600

2355

2635

5000

K0100
STCON

IEXPECTED

/o_x.
[SCOPE

LOOP

5190

ITEXT

POINTER

[DOES SET BUSY
2636
2637
2640

2641
2642
2643
2644

2867

2645

2866
2669

2646
2641
2650

2615
2876

2877
2878
2019
2890
29.1
2862
2883
2884
2085

268m
288‘
28“:

2389
249a
2891

2392
2993
2894

2395
2996
2891
2898

2651

2652
2653
2654
2655
2656

2901

ERROR

7301

CLA CLL

T5166-

4453
4444
7326
4453

IAC

CLRALL

[CLEAR

ENHAN!

IENTEF

CLL

7326

CLA

1077
1117
3163

TAD

4450
1154

LDC“D

4442
4440

FDSTAT

CHL

K0100
STCON

DCA

GDREGZ

NERROR
EHROR

4436

2636

TST66

5000

5000
THAT RECALIBRATE THEN
AND DRIVE STATUS ERROR.
CLA CLL
CLRALL

IAC

7326

2663
2664
2665
2666

1077
1117

TAD
DCA
CLA

2661

3163
1326
4‘53

1670

4452

LnAnD

[LOAD

DISK

2671
2612
2673
2674
2615

4442

RDSTAT

[READ

STATUS

4440

ACCNPI
NERROR

ICKECK

ERROR

IERROR.

2676

ENHAN1
CLA CLL

51L

CML

4435
4436
2657
5000

4096 LOOPS
BUST OR DRIVE
[SCOPE LOOP POINTER
[TEXT ROTNTER

5000

STATUS

[VERIFY

V142A

SKIP

THAT

7-MAR-71

OCCURRES

13155

PAGE

BUSY

ERROR

5-15

2671
2700

7391
4453
4447
7610

TSTGB,

5315

CLA

cLL

TAC

CLRALL

ICLEAR

DSKSKP
SKP CLA

IDSKP
ISKIP

168E

JNP

4453

CLRALL

2797

4451

LDCUR

2909
2910

2110

4441

2711
2712
2113

5315

DSKSKP
JMP

4441

DSKSKP

5316

2114

4435

2115

4435
2677
0006

2116
2117

IERROR,
/ENT£R

DISK SKIP
MAINTENANCE

RTL

IDCLF

TST68

[LOAD CURRENT ADDRESS
DISK SKIP
IERROR. No SKIP
IDSKP DISK SKIP
IERROR
10.x. 4096 LOOPS
IERROR, DSKP
ISCOPE LOOP POINTER

0006

ITEXT

JMP
NTRROR

TSSE,

CONTROL

0.x.

/nSNP

168:
TSBE

ERROR

POINTER

[VERIFY THAT DCLR CLEARS ALL OF STATUS

2915

2919

2920

2120

7301

15269.

CLA cLL

2921
2922

2122

4444

ENNANI

2923

2723

CLA CLL

2924

2124

2925

2726
2126
2121

1326
4453
7126
1171
1194

TAD

1130

191a

TAD

2131

3163

DCA

2732

1103

TAD

2931

2733

2134

4455
1153

LDRAN

2932

2933

2735
2736
2137

4442
444a
7610
5350

RDSTAT
ACCHPI

44s!
1111
3153
1154

CLRALL

4442

RDSTAT
ACCMPI
NERPOR

2121

2740
2741
2142

2141
2744
2745

4453

2145

4440

2943

2741

4435

2944

2759

2945

2151

4436
2724

2946

2152

sane

2947

IAC

CLRALL

ICLEAR CONTROL
MAINTENANCE

IENTER

CML RTL

CLRALL

IDCLR

CLA CLL CML

RTL
STCON

K4000
K0004

SKP

K1000

T698.

URL

10.x
T69E

IERROR

IDCLR
STCON

GDREG2
REGZ

coMpARE

/SETUP

IREAD

STATUS

ICHECK

RESULTS
4096 LOOPS

10.x.

ERROR
TST69

[£20081 STATUS REGTSTER
ISCOPF LOOP POINTER

5000

[TEXT

INTERRUPT OCCURES ON

THAT

POINTER
ERROR

RUSV

2753

1391

2951
2952

2754

4453

CLFALL

2755

1102

TAD

2953

2756

4450

LDCMD

TSTTD.

SET

[READ STATUS REGISTER
ICHECK RESULTS

cLA

TAD
TAD

STATUS

IENADLE SHIFT
ILOAD MAINTENANCE

REG]

JNP

DCA

IEXPECTED

GDREG2

TAD

/
IVERIFY

2949
2649
2950

ADDRESS

RESULTS

10.x.

TST61

2908

2940
2941
2942

IEXPECTED STATUS
ISETUP EXPECTED COMPARE
IENABLE RECALIBRATE

P71

CLRALL

ENHANI

7939

RTL

K0100
STCON
GDREG?

TAD

CONTDOL
MAINTENANCE

ICLEAR
IENTER
CML

CLA CLL CML

2939

2662

TST671

4444

2937

DLAG RESULTS

7301
4453
4444

7326

2934
2935
2936

[READ STATUS REGISTEF
ICHECK FESULTS
IO.K. 4096 LOOPS
IERROPT STATUS NEGISTER
ISCOPE LOOP POINTER
ITEXT POINTER

ACCHPI

4435

STATUS

REGZ

TAD

2705
2106

2921
2928
2°29
2930

/EXPECTED

ILOAD COMMAND

1144

2926

RTL

TAD

2651
2660
2661

2191

2911

CONTROL
MAINTENANCE

CLL CML RTL
CLRALL

[VERIFY

2702
2703

2913
2914
2915
2916
2917

0079

'DLDC'

2903
2904
2905
2906

2912

THEN

STATUS

CLA

IBUSY

2902

2907

POINTER

PAL10
2999
2900

4096 LOOPS
STATUS REGISTER

IERROR,

2866

2971
2872
2813
2874

SEQ

STATUS REGISTER
ICHECK RESULTS
[READ

IVERIFY THAT "RECALIBPATE'

2010

ADDRESS

REGZ

RDSTAT
Accupx
NERROR
ERROR
TST65

2851
2858
2859

2964
2665

0018

STATUS

[LOAD CURRENT

2060

SEQ

GDRFG?

2856

2661
2862
2063

5-14

CML RTL

TAD

T655:

RAGE

13155

T-MAR-77

7326
1071

OLA

CLL

IAc

CONTROL

ICLFAR
K0400

/ENABLE

ILOAD

INT.

COMMAND

HIT

PAL19

V142A

2954
2955

2757

4444

2769

7326

2956

2761
2762

4453

2957
2959

2763

7619
5374

2959
2969

2764

13155

7-MAR-77
ENHANl
CLA CLL

PAGE

JMP

FOR

[WAIT
T79E

INT.

5374

JNP

4453

CLRALL

2771

IONHAT

/wAIT

2965
2966

2772

4437
7619

CLA
NERROR
ERROR

/INT. 0.x,

[SCOPE LOOP POINTER
ITEXT POINTER

2967
2969
2969

2767

2753

T6179

2776

9997

aao7

4435

2777

7391

3999
3991
3992

4453

3993

TST71:

4444

7326
4453

CLA CLL IAC
E LRALL
ENMANi
CLA CLL CML

[DCLR

[ENABLE SHIFT
[LOAD MAINTENANCE

1979
1196
3163

TAD
K1999
LDNAN
CLA CLL CML RTL
STCON
TAD
TAD
K9994
TAD
K4999
DCA
GDREG2

4456

RDBUF

1153

TAD

4442
1154
4451
1153

RDSTAT

3994
3995

2991

3996

1193
4455
7326

2992
2993
2994

3997

1177

3919
3911
3912
3913
3914
3915
3916

4447
7999

NOP

4452
1153
4427

LDADD

3925

TAD

3929
3921

3922
3923
3924

[EXPECTED STATUS
[SETUP COMPARE REGISTER
[READ BUFFER

REGl

TAD
LDCUR
TAD
DSKSKP

3917

[CLEAR CONTROL
[ENTER MAINTENANCE
RTL

CLRALL

2979
2999

2994
2995
2996
2997

TAD

STATUS

[READ
REG2

[LOAD CURRENT ADDRESS

REG1
[DSKP
ILOAD DISK
[LOAD

BUFFER REGISTER
STATUS

3926

1154

3927

4442

RDSTAT

IREAD

2999

3039

4449

[CHECK

3999

3931
3932

7619
5241
4453
1177
3163
4442

ACCTP1
SKP CLA
JMP

T71E

CLRALL
TAD

STCON

3992
3993
3994
3995
3996

3933
3934
3935
3936
3937

3997

3949

3999

3941

PALIO
3999

3919
3911

3942
3943

REG!

DCA
RDSTAT

4449

4435
4436

T71E:

V142A

7-MAR-77
TST71

5999

5999
[VERIFY

[TRANSFER DONE
[OF

3944

7249

3945
3946

7391

3924

3953

3925

3954
3955
3956

DCA
CLA

3933

3934
3935

3964
3965
3966

1977
4455
2169
5263

3936

3967

3937
3939

3979
3971

3972
3973
3974
3975
3976
3977
3190

ENHAN1

[ENTER

[FOR

K9199

[ENABLE BITS TOSHIFT SILO

162

TCNTR!

[LOAD
ISKIP

OH?
ROBUF

.-2

ACCMPI
SKP CLA

[CHEC'
T72E

Isl

TCNTR2
T72R

1977
4455
2156

TAD

K9199

Isz

3193

7619

SKP

3194

5315
7339
1177
3163
1977

JMP

4455

LDMAN

4442

ROSTAT

4449
4435

3959

3115

3959

3116

4436
3944

3969

3117

5999

3129
3121

5721

"12

BIT

WORDS"

CLA CLL CML RIR
TAD
sTCoN
DCA

GDPRG?

TAD

K9100

[SETUP

NERROR

[STATUS
[ERROR.

ERROR
TST72

I
TST73

0K
12

BIT

[SCOP LOOP
ITEXT POINTER

5999
J”?

COMPARE

[SHIFT TN LAST WORD
[READ STATUS
[ONLY TRANSFER DONE

ACCMPI
172E.

n+1

"DRL'

[STATUS ERROR

T725

CLA

HORD

MAINTENANCE
EVERY "12 BIT WORD"

IREAD STATUS
[CHECK REsuLTs
[STATUS 0.x.
/ERROR. STATUS

ACCMPI

BIT

[T0

NFXT

TEST

NORD'

_.2

TCNTRI

[THIS SHOULD PREVENT
IGET STATUS
RESULTS

[

3299

EACH

[COUNT 255
[ENABLE stFr SILO
[LOAD MAINTENANCE
[BIT COUNTER
[COUNT 11 BITS

LDMAN
JNP
RDSTAT

3113

"LAST

TCNTRJ

JNP

3114

FTNAL "0901

[FOR ONE LESS THAN
MAINTENANCE MODE

TAD

JNP

3955

DCA

5269

3956
3957

COMPARE

M12

2157

3119
3111
3112

[SETUP

TAD

5276
4442
4449

3196
3197

TEST

PER

'CLR ALL"

[FOR

RDSTAT

761M
5315

PASS

[THO

LDMAN

4456
4442
4449

[DCLR

M12

3191
3192

3195

FOR

STCON

TCNTR2

T72Ro

[SET

GDREG2
CLL CML RTL

TCNTRl
M255

3169

3963

SHIFT

TH.

IAC

DCA

3962

3949

R861

TAD

3961

3961
3962

SHOULD SET ON THE 11
WORD.

TAD
DCA

3931
3932

3954

[SCOPE LOOP POINTER
[TEXT POINTER

1136
3156
1143

3939

CLA CMA
DCA
CLA CLL
TAD

7326

1136

3963

TST72:

3163

3969

3953

TH.

CLRALL

3957

3952

256

4453
1177

3929
3929

3951

THE

3153

3157
4444

3941
3942
3943
3944
3945
3946
3947
3949
3949
3959

5-17

3947
3959
3951
3952

3927

PAGE

THAT "WORD COUNT“ OVERFLOHS AND SETS
[TRANSFER DONE ONLY AFTER 256 (12 BIT COUNTS).

3919
3929
3921
3922
3923

3926

4996 LOOPS
STATUS REGISTER

10.x.

IERROR.

3914

3919

[SETUP COMPARE REGIETER
[READ STATUS
[CHECK RESULTS

GDREG2

13155

2777

RESULTS

[STATUS 0.x.
[ERROR, STATUS
[CLEAR STATUS
[EXPECTED STATUS

ACCMPl
NERROR
ERROR

3912
3913

3915
3916
3917

ADDRESS

REG1

LDBUF

2999

3991

INT.

[

2975

2992
2993

T1OE,

FOR

10.x. 4095 LOOPS
/ERR0R. INT.

[VERIFY THAT 'RDBUF'. 'DLCA', 'DHST'; 'DLAG'
[OR 'DSKP' DOES NOT AFFECT STATUS REGISTER.

2974

2995
2997
2999
2999
2999
2991

SKP

4435

2972
2973

2995

T79E

2773
2774
2775

2979
2971

2976
2977
2979

CLRILL
IONWAT

4437

9991

TNT,

2779

4453

SEQ

[DCLR

[1NT. 0.K.
IERROR, DISK

2964

2765
2766

9999

RTL

[CLEAR STATUS
INAIT FOR TNTERRUPT
IERROR. no INT.
IOCLR

2961
2962
2963

SEQ

MAINTENANCE

[ENTER
CML

CLRALL
IONWAT
sxP CLA

4437

5-16

COUNTER

PAL10

V142A

13355

T-MAR-77

PAGE

5-15

SEQ 0082
3064

3200

3065

3066

PAGE
/

[VERIFY THAT DCLR

3067
3068
3069

3200

3070
3071
3072

3201
3202
3203

DOES CLEAR

HIT COUNTER

PAL10

7240
3153

TST73.

CLA

CNA

TAD

3161

DCA

V142A

T-MAR-TT

3204

7301

TT3R1,

3205

4453
1161

[SET

REGI
M255
TCNTR4

DCA

1143

13155

FOR

PASS

PEP

TEST

[SETUP COUNTER

PAGE

SEQ 0083
3073
3074
3075
3076
3077
3078
3079
3080

3001
3002
3083
3084

3085
3086

3087
3088
3009

3206
3207
3210

3211
3212
3213
3214
3215
3216

3211
3220
3221
3222
3223
3224

3090
3091

3225
3226

3092

3227
3230
3231
3232
3233
3234

3094
3095

IAC

CLRALL

3166

1136
3157
4444

CLA Chh

T73R2.

TAD
DCA
TAD

/DCLR "CLR ALLI
TCNTR4
TCNTRI
N12
TCNTR2

DCA

Eunnni

4456

LDMAN
131
J"?
noaur

2156

IS!

TCNTRI

5210
7301

an?
CLA

TT3R2

CLL
CLRALL

IAC

11D
DCA

STCON

113

M12

0:1

TCNTRI

[FOR FINAL WORDI

TAD

M255
TCNTR2

[FOR ONE

4453
1177
3163
1136
3156
1143
3151

-'2

ENNANI
TAD

DCA

1511

TAD

K0100

LDMAN

3160

3100

3237

3101

3240
3241

4456

1S2
JMP
RDBUF

3242

4442

RDSTAT

3243

4440

ACCNPI

3244
3245
3246

7610

sKP

5266
2157

any

T73!

3247
3250

5233

IS!
an?
CLA

TCNTR2
T73RJ

3251
3232

1177
3163

TAD

STCON

7330

[THIS SHOULD

10109

3256
3257

4442

RDSTAT

444a

ACCNPI

3119

3260
3261
3262

3120

3121
3122
3123
3124
3125

4436

T73E.

3200
5000

3126

3121

"URL"

[STATUS ERROR

ICOUNT 255

'12 BIT

WORDS"

[SETUP

COMPARE

ISHIFT

LAST

TCNTR!
1-2

152

J“?

Is:
a"?

CLL CML RAR
GDREG2

2161

PREVENT

RESULTS

CLA

Lnnnn

5204
4435

WORD"

[GET STATUS

TAD

3264

"LAST

[FOR EACH 12 BIT HDRD
IENABLE BITS TOSHIET SILO
[LOAD MAINTENANCE
ISKIP ON EVERY '12 BIT WORD"

/CHECK

DCA

3263

THAN

LESS

MAINTENANCE "ODE

1'2

1011

svp
amp

ISETUP COMPARE REGISTER

TCNTR)

4455
2156
5251

7610
5266

[ENABLE CLEAR CONTROL
[AND CLEAR THE COUNTER

[ENTER

3236

T73R3.

[ENABLE SHIFT
[LOAD MAINTENANCE
[COUNT SHIFTS
[MORE TO GO
[PREVENT URL
[DO IT 12 TIMES
[MORE 12 BIT COUNTS

GDREGZ

DCA

4444
1136

TCNTR2

3235

3265
3266
3267
3270

WORD COUNTER
MAINTENANCE MODE

4455
2151
5214

K0100

4455
216a
5236

311a

BIT

[ENTER

110

N12
TCNTRJ

3253
3254
3255

[12

1911

CLA

ISTATUS

T735
TCNTR4

T73R1

[READ

STATUS

[ONLY

TRANSFER

DONE

O.Ka

STATUS
[UPDATE SPECIAL COUNTER
/N0RE T0 TEST
[ERROR]

NERROR

ISTATUS OK

ERROR

TST73

[ERROR, 12 BIT COUNTER
[SCOP LOOP

5990

[TEXT POINTER

PAD10

V142A

13155

7-MAR-77

SEQ

0084

SEQ

0085

BIT 0,K. H DOES INHIBIT
[SETTING DB CONT1I1, THIS IS WHAT STOPS
[HALF BLOCK DATA BREAKS ON A READ BREAK.
12TH

[VERIFY THAT

3120

3129
3130

3131
3132

7301
4‘53

3133

TST74.

1077

313‘
3135

4450
7340

3136
3137
3130
3139
3140

CLA COD IAC
CLRALL
K0100
TAD
LDCMD
CLA CLL CMA

3153
1141
3136

TCNTR1

FOR

[SETUP

PASS

[COUNTER FOR 120 NORDS
[ENTER MAINTENANCE MODE
[SETUP COMPARE REGISTER

GDREG2

T74R1A:

TAD

M12

TENTR2

[12

T74R2,

DCA
CLA CLL

1077

TAD

K0100

4‘55

LDMAN
IS!

[ENABLE SHIFT
[LOAD MAINTENANCE

3163
1136

3143

3157

3144
3145

7300

T74R1,

2157
5307
4‘56

3140
3149
3150
3151

M128

DCA

[HALF BLOCK TRANSFERS
[LOAD COMMAND

ENMAN!
DCA

4444

3141
3142

3146
3147

REG1

DCA
TAD

CONTROL

ICLEAR

JNF

WORD COUNTER

BIT

TCNTR2
.-2

RDBUF

[READ

4440

ACCNPl

[CHECK

LOWER BUFFER
RESULTS

7610

SKP CLA
T74E
JMP

[DATA

O.K.

5340

2156

162

3154

5302

3155

1141

JMP
TAD
DCA

3156

TCNTRl
T7‘R1
TCNTR!

3157
7326
1077
4455

LDMAN

T74R3.

2157
5326
4456
4440

[COUNT 120 HORDS
[MORE TO GO

M120

TAD
DCA
CLA CLL
TAD

1136

[ERROR

[SETUP

COUNTER

[SETUP

BIT COUNTER

N12

TCNTR2
CML

RTL
K0100

161

TCNTR2

JMP
RDBUF
ACCNP1

.-2

OLA

[ENABLE

SHIFT
[LOAD MAINTENANCE
ICOUNT 0176
/MORE TO 60
[READ Louun aurrun
[CHECK stubrs
[DATA

0.x.

7610
5340

SKP
JMP

T74E

[ERROR

2156

162
JMP

TCNTR1

[UPDATE COUNTER
[TEST 120 TIMES
[TO NEXT TEST

5322
4‘36
3271
4405

T74R3

NERROR
ERROR

4433

T74E.

T§T74

120 HORD
[SCOPE LOOP POINTER

4405

[TEXT

[ERROPa

POINTER

I
5744

JMP

.91

[TO

NEXT TEST

T6T75

3‘00
[

TRANSFER DONE "ALONE" CAUSES
SKIP.

[VERIFY THAT
IDSRP TO
[

3102

3400

PALIO
3183
310‘
3105

3400

PAGE

7340

TST75,

V142A

7-NAR-77

3153

DCA

7301

CLA

3403

4453
1143
3156

CLRALL

3‘05

3‘06

1136

3407
3410

3157

3191

3196

3‘11
3‘12
3413
3‘14
3415
3416

1136
3160
1077
4‘55
2160
521‘

3197

3‘17

4456

3190

3420
3‘21
3‘22
3‘23
3424

4447
7610
5234
2156

3425
3426

1077
4‘53
2157

3139
3200
3201
3202
3203
3204
3205

13155

3401

3404

3195

CLL CMA

3‘02

3106
3107
3100
3169
3190
3192
3193
3194

CLA

3206
3207

3‘27
3430
3‘31

3200
3209
3210
3211

3432
3433
3434
3435

3212

3436

T75R,

T75Ec

[ONE

TCNTRZ

[FINAL WORD
[ENTER

TAD

M12

DCA

TCNTR3

TAD
LDMAN

K0100

zsl

TCNTR3
,-2

LESS THAN

["12 BIT"
[LOAD

T75E

151

TCNTRI

JMP
TAD

T75R

[COUNT

DSKP
255

WORDS

K0100

ISZ
J"?
DSKSKP
SKP CLA
NERROR
ERROR

[LOAD MAINTENANCE

TCNTR?

,-2

ONE non: WORD
[DSKP "SKIP"
sznon. DSKP DID NOT
/n,x, case LOOPS
sz9
[SCOPE LOOP POINTER
/00

[ERROR]

0006

SKIP

POINTER

[TEXT

[VERFIFY

THAT TRANSFER DONE CAUSES

"INT.

RO."

CLA CLL
DCA

CMA

321!

3441

7301

CLA

CLL

IAC

3219
3220

3‘42

4453

CLRALL

3443
3‘44

1143

wnu

H255

3156

DCA

[ONE

3443

1136
3157
1102
4450
4‘44
1136

TAD

TCNTRI
M12

TCNTR2

IFINAL

3230
3231
3232
3233
3234
3235
3236
3237

MAINTENANCE

IERROR:

7340

3228

WORD COUNTER

10.“-

JMP

3153

3229

WORD"

[COUNT 12 BIT WORDS
[PREVENT 'DRL'
[SHOULD NOT SKID HERE

3440

3221
3222
3223
3224
3225
3226
3227

"LAST

MAINTENANCE MODE

3‘37

3216
3217

TEST

[DCLR “CLR ALL"
TCNTR1
H12

TST75

3‘00
0006

PER

H255

LDMAN

4435

PASS

TAD

RDBUF
DSKSKP
SKP CLA

5226
4447
7610

DCA
TAD
DCA

J“?

5211

3213
3214
3215

[SET FOR

IAC

ENMANI

444‘

4436

REGl
CLL

3446
3447
3450

3‘51
3452
3‘51
3‘54

TOT76:

DCA
TAD

REGI

K0400
[ENTER

ocn

M12
TCNTR3

1077

TID

K0100

3455

4‘55

LDMAN

3456

2160
5255
4456

Is:

rcnwna

amp
RDBUF

,-2

4437

IONWAT

3460
3461

3462
3463
3464

T76R;

PASS PER TEST
"CLR

CLA

sxp
any

175a

2156

Isl

TCNTR1

WORD"

INT.

BIT

[LOAD COMMAND REGISTER
MAINTENANCE MODE
/"12 BIT" WORD COUNTER
[ENABLE SHIFT SILO
[LOAD MAINTENANCE
Irounw
[WAIT

7610

"LAST

WORD

":2

[PREVENT

5275

ALL“
THAN

LESS

[ENABLE

LocMD
ENMANt
TAD

FOR

/Dan

3160

3‘57

[SETUP

row

BIT"

wopus

“DRL”

INT.
/o,K. no INT.
[ERRORI xMT. OCCURED

PALID

V16ZI

13155

T-MAR'V'I

PRGE

7'3

SEQ 0066

32311
3239
3240
3241

3465
3466
3467
3470

5252

J“?

1761?

1077

TAD

K0100

4455

LDMAN

2157

151
J“?
IONMAT
SIP CLA
NERROR

3262
3243

3671

5267

3472

3244

3413

4437
7610

3245

3474
3475

3246
3247
3246

3415
3477

4435

“36
3437
0007

3249

T7612;

3250

/
/

3251

3252
3253
3254

3255

3500

3257
3256
3259
3260
3261
3262

3501
3502

3263
3265
3266

3267
3268

3269
3270

3503
3594

3565
3506
3507

3510
3511
3512
3513
3514
3515

7301
4453

TST77.

MAINTENANCE

[LOAD
Ion

.-2

ONE.

CLL

INT.

lscOPE

LOOP

ITEXT

POINTER

IDCLR

ENMAN1

1175

TAD

HOMEMA

1106
“50

TAD

K4000

LDCMD

7340

CLA

3163
1163

DCA

POINTER

IAC

CLRALL

CLL

LOOPS

4096

/O_K.

/ERROR.

4444

1153
7110
7630

WORD

lHAIT FOR EXPECTED INT.
IERROR. INT. DIDN'T OCCUR

ERROR
TsT76
0007

CLA

wORDS

TCNTR7

IVERIFI -DATA BREAK' FROM CURRENT FIELD LOcATIDN
[USE DATA PATTERN 0000 AND 7777. "DO A "RITE"

3256

3264

ICOUNT 255

MAINTENANCE MODE
ICURRENT FIELD BITS

IENTER

IENADLE WRITE"
ILOID COMMAND

REGI

TAD

RIR

ALL CLA
COD

TAD
DCA

3000
7340

CLA

CMA

IMAKE IDATA New"

GDREGZ
GDREG2

/SETUP COMPARE

ISTORE OUT BOUND DATA

CLL CMA

3516
3517

4451

LDCUR

4451

LnCUR

3272
3273
3274

3520

1676

TAD

3521
3522

4455

LDMAN
RDBUF

-BREAK~
ILoAO AND GO
IREAD DATA BUFFER

3275

3523

4440

3276

3524

4435

ACCNPI
NERROR

ICHECK RESULTS
10.11. 4096 LOOPS

3277
3276
327*?

3525

IERROR,

T8T77

IscoPE LOOP POINTER

3527

4436
3500
4263

ERROR

3‘2:

4263

[TEXT POINTER

3271

3526

4456

T772,

ISET

CURRENT

ADDRESS

7777

ILoAD CURRENT ADDRESS
110040

IENABLE

DATA

BREAK

3217 x

[VERIFY ‘1”“21‘ "DATA BREAK"

32va
3265

[OF

32136

3297

3530

3266
3269
3290

3531
3532
3533
3534
3535

3291
3292

CURRENT

IPATTERN

PAL”

FIELD.

6‘53

CLL
CLRALL

4444

ENRAN1

1153

TAD

7110
7630

CLL

7301

V142A

16'1":

CLA

51.1.

AND

I2525

NORKS

LOCATION 0

FROM

WITH

USE

AND

DATA

5252'

IAC
IENTER

IDCLR "CLR
MAINTENANCE

ALL"
MODE

REG1
RAR
CLA

13155

7-MAR-77

PAGE

7-4

SEQ
3293

3294
3295
3296
3237
3296
3299

3536
3537
3540
3541
3542

3543

1120
1120
3163

TAD
TAD

K2525
K2525

DCA
TAD

GDREC:
0

/ST‘ORE OUTBOUND DATA

HOMEMA

1126

DCA
TAD
TAD

IGET CURRENT
ICET "WRITE

4450

LDCMD

1163
3000
1175

GDREG2

3300

3544
3545

3301

3566

1154

TAD

3302
3303

3547
3550
3551

4451

LDCUR

4451

LDCUR

1076

TAD

3552

4455

MW“
RDDUF

3304
3395
3306

3553

4456

3307

3554

3301!

3555
3556
3557

4440
4435

3.109
3310

3311
3312
3313

3560

4436
3530

3321

3322
3323

REG2
ADDRESS

7777

/LOAD CURRENT ADDRESS To
IDATA BREAK ENABLE BIT
AND

ILOAD
ICHECK

7577a
4263

IVERIFY THAT "DATA BREAK-I wonx FROM
/OF CURRENT FIELD, Do A NRITE AND
10000 AND 7777.

IREAD DATA BUFFER
RESULTS
/o_l<I 4096 LOOPS
IERRDR. DATA BREAK
ISCOPE LOOP POINTER
ITEXT POINTER

LOCATION

7777
USE

DATA

PATTERN

3561

1301

3562

4453
4444

3563
3564
3565
3566
3567

TsT79,

CLL
CLRALL
CLA

IAC

ENMAM

1153
7110

IENTER

'7630
7360

CH.

RAR

SZL
CLA
DCA
TAD

CLA

DCA

CLL

CMA

[MAKE DITA WORD
/SETUP COMPARE REGISTER

GDREG2
GDREGz

3571
3572

1163
3532

3320

3573
3574

1153
4451

3329

3575
3576
3577

7340
4451

CLA

3430
3331
3332
3333
3334

1175

3602

1076

TAD

3335

4455

LDMAN

3336

3603
3534

4456

RDAUF

333"

3605

4440

333:

3666

333%

3607

4435
4436

3441
3341

3610

3561

3611

4763

ISTORE OUTBOUND DATA

K7777
REG1

TAD

LDCUR

ISET

CLL

CURRENT

3600

1106

TAD
TAD

3601

4450

LOCMD

HOMEMA
K4000

CURRENT ADDRESS
ICuRRENT FIELD BITS
IHRITE ENABLE
ILOAD COMMAND REGISTER

K0040

/RnEAK

ILOAD

ILoAD

ACCMPI
NERROR

ICHECK

ENABLE

AND

BIT

IPEAD DATA BUFFER
RESULTS
/O_K. 4096 LOOPS
DATA

BREAK

ERROR

IFRRDR.

T5179
4263

[SCOPE LOOP POINTER
11'sz

3362
3343
3444

3345
3366

ICURRENT

FIELD.

[PATTERN

2525

3347

IVEPIFI

ADDRESS

(HM

LDCUR

1791:.

IDCLR ”CLR ALL"
MAINTENANCE MODE

REG1

TAD

3163

3326
3327

CURRENT

ERROR

3570

3324
3325

ISET

K0040

NERPOR

T78E:

FIELD BITS
ENABLE 1313'"

ILOAD COMMAND REGISTER

3315
3316

3320

K5000

ACCMP1

4263

3314

3317
3314
3319

ITAKE DATA NORD
IsETUP COMPARE REGISTER

“DATA

BREAK" FROM LOCATION 7777 OF
DO A 'WFITE' AND USE DATA
AND 5252.

POINTER

7777

0087

PALID

3346
3349
3356

3612

3351
3352

3615
3616
3617
3626
3621

3353

3354
3355
3356
3357
3359

3613
3614

7361
4453

TSTEO.

1153

TAD

cu. RAR
“L CLA

3624

3532
1175

3627
3636

3631
3632
3633
3634

1676

TAD
LDMAN

3371

3641

3372

3642

3612

3643

4263

3366

3396

3391

ITEXT

HORKs FROM

CURRENT

3651
3652
3653
3654
3655
3656

7361

16331,

CLA CDL

IAC

4453
4444
1154

CLRALL
TAD

REG2

3163
1163
3666
4451

OCA
TAD

GOREG2

DCA
LDCUR
TAD
TAD

IOCLR

EMMAN1

1175

1166

ISTORE OUTBOUNO DATA
ISET CURRENT ADDRESS To 6
ICURRENT FIELD BITS
IHRHE FUNCTION
lLoAD COMMAND

3395
3396

3662

4446

3663

7616

ACCMPI
SKP CLA

3397

3664
3665

UMP

381E

TAD
MA

3666

5272
1666
3173

3667
3676

1173
4446

TAD

DTREG

ACCMPI

3671

4435

NERROR

3672
3673
3674

[SETUP COMPARE REGISTER

HOMEMA
K4666

R660!

PAL16

V142A

7-MAR-77

4436
3644

THE,

4263

ALL"

GDREG2

LDCHD

4456
1616

"CLR

MAINTENANCE Mon:

/ENTER

4456

K6646

IDATA BREAK ENABLE BIT
ILOAD AND GO
IREAD BUFFER
ICMECK RESULTS
[ERROR

DTREG

/5AVE

ICHECK

CASE 0!" ERROR

RESULTS

IO.K. 4696 LOOPS

13155

PAGE

7-6

ERROR

IERROR,

TETRI
4263

ISCOPE LOOP POINTER

DATA

BREAK

[TEXT POINTER

3466

3467
3466
3469
3416

[VERIFY

"DATA

BREAK-

FROM

LOCATION 7777

DO A "WRITE" AND USE ALL COMBINATIONS.
VERIFY THAT OUTBOUNO DATA IN LOCATION 7777
[DOESN’T ORANGE HMEN DOING A WRITE BREAK. (NOTEI DATA FROM
ILOCATTON 7777 PUT IN INDICATOR 'DTI')

ICURRENT FIELD.
/ALSO

3411
3412

3413
3414

3675

7361

3415

3676
3677

4453
4444

C664“:

3416

1153
3163
1163

TAD
OCA

1‘51"“,

CLA CLL

IAC

ENMANI

IDCLF "CLR ALL"
MAINTENANCE MODE:

IENTER

3417
3416

3766

3419

3761

3426
3421

3762

3422
3423

3763
3764
3765

3424

3766

3425

3767
3116
3711
3712

3426

3427
3426
3429
3436
3431

3432
3433

3434
3435
3436
3437
3436

3439
3446

3713
3714

3715
3716
3117
3726
3721
3722
3723

3724
3725
3726

REG1

3532
7346
4451
1175

ISTORE

TAD
TAD

HOMEMA

K5666

4456
1676

LDCMO

4455
4456

LDMAN

K6646

TAD

4446

ACC‘IPA
3K? CLA
MP

5324
1532

TAO

TOZE

K7777
DTREG
DTREG

DCA

TAD

ACCMPI
TSZE:

/VER1FI

ISAVE

INCASE OF ERROR

ICHECK

IO,K.

15192

IscoPF LOOP POINTER
ITEXT POINTER
CLEARS CURRENT ADDRESS
BREAK PROM LOCATION 7776

'DCLR'

THAT

3446

3727

7361

3736

4453

3731
3732
3733

4444

3451
3452
3453
3454

3455
3456
3457

3734
3135

16383:

4696 LOOPS
DATA BREAK

IERROR,

/FIRST DO A DATA
/THEN "DCLR' FROM LOCATION 6666. DO
[AND USE DATA PATTERN ALL COMBINATIONS.

3447

RESULTS

NERFOR
ERROR

3445

3443
3449

1777

/ERROR

4263

3442
3443
3444

DATA

ILOAD AND GO
IREAD BUFFER
/CHECK RESULTS

RDBUF

7616

OUTEOUND

135T CURRENT ADDRESS To
/CURRENT FIELD BITS
IRRITE FUNCTION
ILOAD COMMAND
IBREAK ENABLE BIT

LDCUR

1126

3173
1173
4446
4435
4436
3675
4263

/SETUP COMPARE REGISTER

GDREGZ

TAD
6613662
DCA I
K7777
CLA CLL CMA

3441

3456

6669

POINTER

FIELD

3644
3645
3646
3647
3656

3661

3465

5:6

’ERRORI DATA BREAK
[SCOPE LOOP POINTER

36196
4263

3394

3464

7777

10.11. 4696 LOOPS

ERROR

TAO
LDHAN

3463

IREAD BUFFER
[CHECK RESULTS

4455

3399
3466
3461
3462

/LOAO CURRENT ADDRESS
IBREAK ENABLE BIT
ILOAD MAINTENANCE AND

ROBUF
ACCMPI
1413613011

3393

3396

CURRENT ADDRESS

K6646

3657
3666

3392

ISET

AND USE ALL COMBINATION PATTERN
[ALSO VERIFY THAT DATA 1N LOCATION 6 DOESN'T CHANGE
[ON A NRITE BREAK. (NOTE: DATA FROM LOCATION 6 PUT
/IN INDICATOR 'D'l'l')

3376
3376
3319

3365
3366
3397
3333
3369

REG!

3377

3394

/CURRENT FIELD 3115
IFUNCTION WRITE"
ILOAD COMMAND

IVERIFY THAT "DATA BREAK"
/LOCATION 6. DO A ‘HRITE'

3375

3363

VIDEO

OUTBOUND DATA

/6TORE

LDCUR

”DE;

DATA

[SETUP COMPARE

HOMEMA
K5666

TAD

LDCUR
CLA CLL CMA

4435
4436

3391

TAD

3646

IMAKE

K7777

4451
7346
4451

3376

3362

K2525
K2525
GDREG!
GDREZG?

TAD

1154

3366
3369

3373
3374

TAD

LDCMD

4455
4456
4446

6636

"CLR ALL"
MAINTENANCE MODE

IENTER

1126
4456

3635
3636
3637

3367

SEO
IAC

R661

DOA
TAD

DCA

7-5

IDCLR

7116

1163

3625
3626

CLA CLL

4444

3623

PAGE

13155

CLRALL
ENMANl

3622

3361
3363
3364
3365
3366

7-HAR-77

7636
1126
1126
3163

3359
3366
3362

V1423

CLA CLL
cLRALL

1153

ENMANI
TAD

3163
1163

DCA
no

3516

WRITE"

MC
[ENTER

IDcLR "CLR
MAINTENANCE

ALL"
MODE

REG!
GDREGz
GDREG:
K7776

ISETUP

COMPARE

ISTORF

OUTBOUND

DATA

BREAK

DATA

BREAK 2
TIELO

3736

1154

TAO

REG:

3737

3666

3746

1175

TAD

HOMEMA

/sTORE OUTBOUND
ICURRENT

3741

1166

TAD

K4666

IHPTTL

FUNCTION

BITS

PAL10

V142A

7-HAR-77

13155

PAGE

7-7

SEQ 0090
3458

LDC*D

7344
4451

CLA

CLL
LDCUR

CMA

K0040

3459
3460

37“

3461

37‘s
3746

1076

TAD

4455

LDMAN

3747
3750
375!

4456
‘440
7610
5371

RDBUF

3462
3‘53
346‘
3465

[LOAD COMMAND

4450

3741
37‘)

[READ

3‘67

3753
375‘
3755

7391
4‘53
44“

CLRALL

3756

3172
1175

DCA

3471
3472

3757

3473
3474
3475
3476

3761
3762
3763
376‘
3765

3477
3478
3479
3480

3‘01
3482
3493

3484

3760

3766

4‘56

3767
3770
3771

‘440
4135

3772
3773

3727

4436

T83E
IAC

RDBUF

[READ

Ace"?!

[CHECK

NERRDP
ERROR
78183

[ALL

4261

[ALL COMBINATION.

RESULTS

WORKED

4096

LOOPS

THAT CURRENT

ADDRESS DOES INCREMENT FROM 7777
HRITE DATA BREAK AND USE DATA PATTERN

[

377‘
3775
3776
3777
4000
4001

1301
4453

4002

TSTB‘,

CLA

CLL

TAD

REGl

3000
1154

DCA

3532

DCA

K7777

CLA

CLL

CMA

4010
4011
4012

1076

TAD

4013
401‘

4455

LDMAN

2156

ISZ

3507

4015
4016

5213

GNP
CLA

3499

4005

3500

4006
4007

4017
4020
4021

4022

PAL10

LDCUR

V142A

CONTROL
OUTBOUND

DATA

[STORE

OUTBOUND

DATA

[LOAD CURRENT ADDRESS
[ENTER MAINTENANCE NODE

ENHAN!

K5000
HOMEMA

TAD
TAD

[NRITE

CLh
DCh

CMA

FUNCTION

[CURRENT FIELD
[LOAD COMMAND

LDCH“

7300
1154
3163
4456
4440

[CLEAR
[STORE

REG!

TAD

3302
3503
3504
3505
3506

3498

IAC

CLRALL

1153

73‘0
4451
44“
1126
1175
4‘50
734‘
3156

4003
4004

3508
3509
3510
3511
3512

BUFFER

[ERRORr DATA BREAK
[SCOPE LOOP POINTER
[TEXT POINTER

[TO 0900.

3501

[BREAK ENABLE BIT
[LOAD AND GO

3460

3‘97

WRITE

[SETUP COMPARE

3487

3493
3‘94
3495
3496

ADDRESS“

COMMAND

K0040

[VERIFY

3492

[FUNCTION

GDREG2

3491

[CURRENT

LDHAN

3486

3490

CURRENT

MODE
ERROR PRINTER
FIELD BITS

MAINTENANCE
[SETUP FOR

[LOAD

3‘95

3409

REGI

TAD
DCA
TAD

4263

“CLEAR

[DCLR
[ENTER
ADREG
HOMEMA
K5000

TAD
TAD

183E.

7776

BUFFER

RESULTS
TPY LOCATION
[ERRORr DATA RREAK

LDCMD

1076
4455

BIT

[0,K.

ENHAN‘

1126
4450
115‘
3163

ADDRESS

[CHECK

SKP CLA
J"?
CLA CLL

3752

3469
3470

[LOAD CURRENT
[BREAIf ENABLE
[LOAD AND GO

ACCMPI

3466
346%

RAL

[2 BREAK COUNTER
[ENABLE BREAK BIT

TCNTRl
K0040

[LOAD

TCNTR!
1'2

MAINTENANCE

[COUNT

BREAKS

[DO 2

CLL
REGZ

TAD
DCA

GDREGZ

[SETUP

RDBUF

[GET

ACCUP1

[CHECK

13155

j-MAR-17

PAGE

COMPARE REGISTER
WORD

FIRST
IT

7-D

SEQ

3513
351‘
3515
3516
3517

3510
3519
3520
3521
3522

3523

‘02!
4024

7610

sxp

CLA

[FIRST 0.x,
Iannon. FIRST HORD

5233

an?

TB‘E

4025
4026

3172

DCA

TAD

ADREG
REG1

zstrup

1153

‘027

3163

DCA

GDRE62

[SETUP

4030
‘031
4032
4a33

4456
4440
4435

anauv
ACC“P1

4436

4034

3774

4035

4263

7845;

annou

[CHECK

usaaon
:nnon

[0.K. 4096 LOOPS
[DATA BREAK

15161
4263

[SCOPE LOOP POINTER
[TEXT POINTER

3524
3525

3526

[VERIFY THAT CURRENT ADDRESS DOES INCREMENT
[ADDRESS TEST FROM 0200 TO TSTES OF CURRENT
[FIELD, DO A WRITE DATA BREAK.

[

3527
3520
3529

3530

4036

7301

3531

4053

3532

4037
4040

3533

4041

3534

4042
4043

3535
3536
3537
3538
3539
3540
3541
3542
3543

4044

4045
4046
40‘7
4050
4051
‘052
4053

75795.

CLA

CLL
CLL

1109

TAD

K0200

3157
1139
1451
4144
4452

DCA

TCNTR?

TAD

K0200

1557
3156
1157

REG!

7119

CLL

RAR

7630
7240

SZL
CLA

CMA

3163

DCA

3547

4057

3546

4060

1163
3551

3549
3550

4061
4062
‘063
4064

1175

1076

TAD

4065

4455
7399

LDMAN
CLA CLL

3552
3553

355‘
3555
3556

4066
4067
4070

1106
4450

TCNTR2
TCNTR1

TAD
1

71D

710

3557

DCA

1157

TAD
DCA

/srona ouraouno DATA
Icunnanr FIELD axrs
Iwalrz FUNCTION
[LOAD COMMAND REGISTER
[BREAK ENABLE BIT
[LOAD AND GO

TCNTR1
TCNTRZ
TCNTR?

[GET INSTRUCTION
{REPLACE INSTRUCTION

ADREG

[ADDRESS OF

3172
4456

407‘

4440

RDBUF
ACC“P1

4075

3562

4076

7610
5305

JMP

TESE

3563

4077
4100

1157

11D

TCNTR?

1157

TAD

MTSES

4101
4102
4103

7650

SNA

5395
2157

JMP

TRSOK

152

TCNTRZ

CLA

REGISTFR

TCNTR7
HOMEMA
K4000
K0939

7777

[SETUP COMPARE

4073

3567

TEST

0200

vusrnucrron
[SAVE INSTRUCTION

[USE DATA

3560
3561

SKP

ADDRESS

PER

GDREG?
GDREG2

4071
4072

3565
3566

[GET

LDCUD

1156

PASS

CLA

3557
3555
3559

356‘

[START

TENTH?

110

DCA
TAD

[SETUP FOR

[LOAD CURRENT ADDRESS
[ENTER MAINTENANCE MODE
[KEEP WRITE INHIBIT CLEAR

ENHAN!
LDADD
TAD
DCA

ALL"

CMA

LDCUR

Tssnx,

'CLR

[DCLR

CLA
DCA

405‘
4055
4056

3551

IAC

CLRALL

7340
3153

3545
3546

354‘

PRINTER

COMPARE REGISTER
[GET SECOND WORD

BREAK

[GET DATA
[CHECK RESULTS
IERPOR:

DATA

RREAK

[SPECIAL POINTER
[THIS 1551.

CLA
/TFST

0-K.

FOP

START

0091

PAL10

V142A

3569

4104

5246

3569

4105

3570
3571

4106
4107

3572

4110

4435
4436
4036
4263

3573
3574
3575

4111

5712

4112

4200

13155

7'HAR-77

7-9

[THIS

NERROR
ERROR
TSTOS

ADDRESS

NORKED

[T0

.01

3500

3590
3591
3592

4200

4201
4202
4203
4204
4205

4206
4207

4210
4211
4212

3593

4213
4214

3594
3595

4215
4216

3596
3597
3598

4217

3599
3600
3601
3602

4222

3603
3604
3605

3606
3607

4220
4221

4223
4224
4225
4226
4227
4230
4231

4200
7340
3153
1143

PAGE

T5T86,

3156

7301

Teeni.

CLA CLL CMA
OCA
REGT
TAD
DCA
CLA CLL
TAD
DCA
ENNANI

TCNTRI
TCNTR2

TAD

HOMEHA
K4000

TAD

TBSRZ.

DCA
CLA

4456

R000!

4440
7610
5276
2157
5214
7301
4453

ACCNPI

4232
4233

3609

4234

3610

4235

7340
1143
3157

3611

4236

7300

[LOAD COMMAND
[LOAD CURRENT ADDRESS

CLL

Our

186:

151

TCNTR2

JNP

Tasnz
IAC

[DATA
[DO 0-255

CLA CLL
CLRALL
CLA CLL CMA

T56R31

TAD

M255

DCA

TCNTR2

DCA

DCA
ENHANI

GDREG2

4451
1126

LDCUR

TAD

K5000

1175
4450
1076

TAD

HOMEMA

4247

3522

4250

PAL10

3623

4251

/256

3624

4252
4253

3625
3626

3627
3628

4254
4255

RDBUF

7-MAR-77

13155

5276

JMP
152

TCNTR2

JWP
TAD

T86R3
K7000

[DO

DCA
CLA

TCNTR3

[CLEAR COUNTER

CLL CMA
0
DCA
LDCUR

[STORE

K0040

[LOAD

BKP

CLA
T365

4260

7340

3631
3632

4261
4262

4451

3633
3634
3635

4263
4264
4265

4455
4456

TAD
LDMAN
RDRUF

3636

4266

4440

ACC"P1

3637
3638

4267

7610

SKR

4270

TEGE

4271

5276
2160

JMP

3639

TCNTR3

3640

4272

5260

3641

4273
4274
4275
4276
4277
4300

2156
5204
4435
4436

ISZ
J“?
152

3644

3645
3646

3649

T06R4,

3000
1076

CLA

T365:

4263

[CHECK RESULTS
[WORD 0.x,
[DATA ERROR
256

"RITE BREAKS

NOT DUTBOUND DATA
[LOAD CURRENT ADDRESS
[ENABLE BREAK BIT

[CHECK

"SHOULD NOT
[GET DATA
IT

[DATA

0.11I

[ERROR]

BREAK"

DATA

BREAK

TNHIBIT

[DO

”1000

FAKE"

TB6R4

BREAKS

TCNTRT

JMP
NERROR

4200

3647
3640

7-10

ACCMPI

4257

3643

PAGE

4440
7610

3629
3630

3642

BREAK COUNTER

[WRITE FUNCTION
[CURRENT FIELD
[LOAD COMMAND
[ENABLE BREAK BIT
[LOAD NAINTENANCE
[GET "0RD

LDHAN

5236
1107
3160

4256

COUNTER

[MAKE DATA PATTERN
[STORE OUTBOUND DATA
[SETUP COMPARE REGISTER
[ENTER MAINTENANCE MODE
[LOAD CURRENT ADDRESS

K0040

TAD

2157

ERROR

BREAKS

CONTROL AND

[CLEAR

LDCHD

4455
4456

V142A

SIT

CLA CLL

3000

4246

ENABLE
60

5!? CLA

3163
4444

3621

DATA

[LOAD AND
"0RD
[CHECK RESULTS

4240
4241
4242
4244
4245

COMPARE
[BREAK

[GET

4237

4243

OUTBOUND

[SETUP

K0040

LDHAN

3612

3616
3617
3610
3619
3620

[STORE

CMA

GOREG:

OCA
TAD

TEST

[CLEAR CONTROL

LDCUR
CLA CLL CMA

3000
7340
3163
1076
4455

PER

[AMOUNT or BREAKS TO DO
[ENTER MAINTENANCE MODE
[CURRENT FIELD BITS
[WRITE FUNCTION

LDCHD

7340

PASS

IAC

1156
3157

1106
4450
4451

ISPECIAL COUNTER

TCNTR1

CLRALL

4444
1175

FOR

[SETUP

M255

4453

3600

3613
3614
3615

0093

TEST

[VERIFY THAT 5 LAST BREAK SETS AFTER 256 WRITE DATA BREAKS
[AND VERIFY THAT DCLR CLEARS "RITE INHIBIT COUNTER.

3507
3508
3509

SEQ

[TEXT POINTER

J"? 1
TSTDG

3577
3570
3579

3505
3506

0092

[

3503
3504

TRY

[ERROR] DATA BREAK
[SCOPE LOOP POINTER

4263

3576

3551
3502

SEQ

0200 TO T5T60

[LOOP DO

TBSRI

JMP

T550K,
T05E:

PAGE

T06R1

OVER 01TH ONE
[To NEXT TEST

[START

ALL

ERROR
T5106

LESS

BREAK
[ERRORT
[SCOPE LOOP POINTER
DATA

4263

[TEXT

POINTER

[

4301
4302

5702

J"?

4303

3650
3651

.41

[TO

TEST

TST87
[
/

[VERIFY THAT 3 LAST BREAK SETS AFTER 120 BREAKS 1F
[HALF BIT IS SET, ALSO MAKE SURE LOAD DISK ADDRESS LOADS
[THE INHIBIT COUNTER CORRECTLY.

3652
3653

3654
3655

I
4303

7340

4304

3153

CLA
DCA

1111

TAD

REG1
H255

[SETUP

4305
4306

DCA

TCNTR1

[SPECIAL

4307

3156
7391

4310

4453

CLRALL

4311

1156

4312

3157

TAD
DCA

4313

4444

ENHAN1

4314

1077

4315

1175
1106
4450
4451

TAD
TAD

4316

4317

4320

15107,

TavRi.

CLA

CLL CHA

CLL

TB7R2:

7340

CLA

[AMOUNT
/ENTER

K0100

[HALF

TEST

COUNTER

3000

DOA

7340

CLA

3163

DCA

GDREG?

4325

1076

TAD

K0040

4326
4327

4455

LDNAN

.456

RDBUF

4330

4440

ACCVPI

BREAKS

MAINTENANCL

MODE

BIT

[CURRENT

HOMEMA
K4000

CLL

PER

PASS

CONTROL

[CLEAR

LDCHD
LDCUR
CLL CNA

4321
4322
4323
4324

IAC

TCNTR1
TCNTR?

TAD

FOR

FIELD

HITS

[WRITE FUNCTION
ILOAD COMMAND
[LOAD CURRENT ADDRESS
[STORE

OUTSOUND

[SETUP

COMPARE

DATA

cMA

REGTSTER

[BREAK ENABLE BIT
[LOAD AND GO
[GET WORD
ICHECI RESULTS

PAL10

V142A

13155

7'MAR-77

PAGE

7-11
SEQ 0094

3678

4331

3679

4332
4333
4334
4335

3680
3681
3682
3683

3684
3685
3686
3697

5320

JMP

4452

LDADD

4336
4337
4340

1141
3157
7300

TAD
DCA
CLA

4341

3000
3163
4451

DCA

ISTORE

DCA

GDREGZ

[SETUP

1076
4455

4342
4343
4344
4345

3694
3695

3696
3697
3698
3699

TB7E

2157

3689
3691
3692
3693

CLA

5!?

JNP
182

3683
3690

7610
5374

4346
4347

4350
4351
4352
4353
4354
4355

4356
4357

T87R31

TCNTR2
T87R2

[DO

TCNTR2

[128

BREAK

INAKE

DATA

BREAK BIT
MAINTENANCE
[GET WORD
[CHECK RESULTS
MOPD

0.x.

[DATA

ERROR

”7!:

JMP

T87R3

[Do

1107

3160
7340

DCA

new
TCNTR!

[CLEAR

TCNTR2

CLA cu.

CMA
o

1076

4455

LDMAN
Rnaur

4364

4456
4440

ACCMPI

4365

7610

5x9

4366

5374
2160

JMP
zsz

rave

5356

JMP
Isz

T87R4

JMP

137m

4360
4361
4362

4451

3704
3705

4363

2156

5307
4435
4436
4303

129

WRITE BREAKS
COUNTER

[STORE NOT ouraouw DATA
[LOAD CURRENT ADDRESS
[ENABLE BREAK an

K0040

"SHOULD NOT BREAK"

11.0w

[GET DATA

CLA

[CHECK

11‘

[DATA

0.x.
DATA

IERROR.

IDO

INHIBIT

"won FAKE"

BREAKS

'rcum
mun-r

ALL OVER um ONE
no NEXT TEST

ERROR
15197
4263

4263

BREAK

TCNTR3

NERROR

137:.

WORD

ou-raouND DATA

[ENABLE

CLA

SKF

107M,

INHIBIT COUNT

wow

JR?
152

3000

AND

COUNTER

COMPARE REGISTER
now CURRENT ADDRESS

K0040

LDMAN
RDBU!‘
ACCMPI

5374
2157
5340

MANY BREAKS
ADDRESS

CLL

LDCUR

4456
4440
7610

[LOAD

ERROR

M12!

DCA
LDCUR
up

4367
4370
4371
4372
4373
4374
4375
4376

[DATA

LESS

IERROR, DATA BREAK
[SCOPE LOOP POINTER
[TEXT POINTER

[

"DATA

[VERIFY THAT

4377

7301

4400

4453

LDCND

7110
7630
7240
3163
1163
4427

RAR
CLA
CLA CMA

4411

PAL10

V142A

"READ'I
USE DATA

[DCLR

TAD

4450
1153

4406

CLRALL

1175

4402
440!
4404

4407
4410

WORKS WITH

[TO LOCATION 0 OF CURRENT FIELD.
[PATTERN 0000 AND 7777.
[
CL. cub IAC
TST88,

4401

4405

BREAK"

HOMEMA

TAD
CLL

'CLR

ALL'

[CURRENT

FIELD
[LOAD COMMAND TO

REGl

SZL

GDREG2
GDREG!

DCA
TAD

[SETUP COMPARE

7-MAR-77

13155

[GET VALUE TO LOAD
[LOAD UPPER BUFFER

LDBUF

PAGE

7-12
SEQ

3733

4412

1076

TAD

3734

4413

3735

4414

4455
7300

LDMAN
CLA CLL

3736

4415

3172

DCA

ADREG

3737
3738
3739

4416
4417
4420

1000

TAD

3173

DCA
TAD

DTREG
DTREG

3740

4421
4422
4423
4424

ACCNPi

[CHECK

4435
4436

NERROR
ERROR

[O,K,

4377

TSTBB

4767

4763

[SCOPE LOOP POINTER

3741
3742
3743
3744
3745
3746
3747

4425

1173
4440

3751

4426

3753
3754
3755

4427
4430

4431
4432

7301
4453

CLA

TST89,

CLL

POINTER

BREAK’I UORKS
FIELD USE

K1000

1175

TAD

HOMEMA

4450
1153

LDCMD

4436
4437

3762
3763
3764
3765

4440

3766

4444

3767
3768
3769
3770

4445

4455

LDMAN

4446

7300

4447

1532

CLA
TAD

4450

3173

3771
3772
3773

4451
4452
4453

1173

ACCMP1
NERROR

3774

4454

3775
3776
3777

4455

4440
4435
4436
4426

4456

4263

4441
4442
4443

IAC

TAD

3760
3761

TAD
CLL RAR
SlL CLA
CLA CMA
DCA
CLA CMA
LDCUR

7110
7630
7240
3163
'7240
4451
1163

TAD

LDBUF

1076

TAD

[CURRENT FIELD
[LOAD COMMAND FOR

READ

REG!

GDREG!

[SETUP

COMPARE

K0040

[ENABLE BREAK
[LOAD AND GO

K7777
DTREG

[GET

DCA
TAD

DTREG

"WORD"

[SAVE

INBOUND

/CHECK

[0.K.

4096

[ERROR;

4263

LOOPS
DATA BREAK

[TEXT POINTER

[VEFIFY THAT
[CURRENT

/5252

3781
3702

"DATA BREAK"

FIELD

7301

4460
4461

4453

CLRALL

1175
4450

TAD

3786

4462
4463

3707

4464

LOCATION

HITH A "READ"
USE

DATA

PATTERN

2525

4457

T5190;

CLA

CLL

IAC

IDCLR
HOMEMA

LDCMD

115!

TAD

7919

CLL

NORD

[SCOPE IOOP POINTER

[

3780

BIT

CLL

ERROR
TST89

3779

[LOAD CURRENT ADDRESS
[GET VALUE TO LOAD
[LOAD UPPER BUFFER

GDREGT

4427

3778

3705

LOOPS
DATA BREAK

C LRALL

1103

3759

3784

PRINTER
WORD

4096

[ERRORI
[TEXT

4433
4434
4435

3783

[

3752

3758

AND

[ADDRESS FOR
[GET INBOUND
[SAVE IT

[VERIFY WITH A l'READ" THAT "DATA
IFROM LOCATION "7777' OF CURRENT
[DATA PATTERN 0000 AND 7777.

3749
3750

3757

[LOAD

3748

3756

K0040

[LOAD

REG!
RAR

[CURRENT

FIELD
COMMAND TO

READ

0095

FAL18

V142A

PAGE

13155

7'MAR-77

7-13
550

3788
3789
3798

4465
4466
4467

3791

4478

3792

4471
4472

3793

TAD

4448

ACCMRA

ICHECK

4435

NERROR
ERROR
TsTOO
4763

/ERROR. DATA BREAK
ICCOPE LOOP POINTER
[TEXT POINTER

7388
1888

4436
4457
4263

DTREG

IsAVE

4518

4511

1175

3814

4512

3815
3816
3817
3818

4513

4458
7248
4451

IO,K, 4096 LOOPB

7381
4453

CLL

HOME":

TAD

1153

7118

3819

4517

3828
1821

4528

7638
1128
1128

TAD

4521
4521

1163

4524
4525
4526

4427

4527

TAD
DCA
TAD
LDBur
TAD
LDMAN
CLA CLL
TAD I
DCA
TAD
ACCMPT
NERROR
ERROR
TBTPI

1876
4455
7388

3832

4538
4531
4532
4533
4534

1532

4448
4435

3833

4535

4436

3834
3835
3836

4536

4587

4537

4263

3837

4548

3838

4541

5741
4688

3173
1173

ILOAD CURRENT

szAT
IDATA

K2525
K2525
GDREC:
GDREG:

DATA

ISETUP COMPARE REGISTER

[GET VALUE To LOAD

K0840

ILOAD

MAINTENANCE

[SAVE

FOR ERROR

K7777

DTREG
DTREG

ICHECK

/O.K.

IscopE LOOP POINTER

4263
JHP

ITEXT ROINTER
I

ITO NEXT

.41

TEsT

18192
I

84518

V1424

7-MAR-77

3843

18 OF

3844

3845

13:55

CURRENT

FIELD.

CLA

IAC

4680

PAGE

3846
3847
3848

4688
4681

7391

T5T92,

4453

CLRALL

4682

4683
4684

4444
1133
3156

ENMANT

3849
3858
3851

4685
4686

3157

4687

1175

3863

1153

4610
4611

1106

4612
4613
4614
4615

4451

4450

TCNTR1
8861
TCMTRz
HOMEMA

TAD

K4880

IFDR TOUR MORDs
IDATA START
/DURRENT FIELD
IHRITE FUNCTION

LDCMD

T9231.

/LoAD COMMAND
/LOAD CURRENT ADDREss TO

LDCUR

ISTDRE OUT BOUND DATA

K8840

/ENABLE

7ooo
2156

4624

5212
1133

4625

3156

3868
3869
3878
3871

4626

1153

4638
4631

3872

4449

4632

7610

3873

4633
4634

5241

3875
3876

4635

7DDD

4636

3877

4637

3878
3879

4648

2156
5239
4435

4641

4436

3888
3881

4642
4643

460a

3163
4454

BREAK

ILOAD AND

BIT

TCNTRz

IUPDATE DATA

u:
UMP

munl
T92R1

IrILL BUFFER

TAD

DCA
TAD
DCA
RDBUF
ACCMPI
sKP
JMP
15:
N09
152
JMP

TCNTRT
REG:
GDREGz

NORD

NOP

T92R2,

2163

T92E,

CLA

T92:

GDREG2
TCNTR1
T92R2

NERROR

l0.K.

ERROR

lERPOR, DATA BREAK
IscopE LOOP POTNTER

TST92
4263

4263

3882
3884

DEA
TAD
DCA
TAD

/DcLR "CLR ALLl
MAINTENANCE MODE

3867

3883

DCA
TAD
LDMAN
CLA CLL
Isz

4455

4627

IENTER

TAD

SEQ 8087

808518811085.

Jose
1876
730a
2157

4623

7-14

TCNTRz

4617

4622

ILL

TAD

4616

4628
4621

cLL

PAGE
us:

1157

3864
3865
3866

3874

4096 LOOPS
DATA BREAK

/ERROR.

[VERIFY THAT “DATA aurrERs- CAN BE FILLED
ION A wRITE DATA BREAK rRoM LOCATION

3868
3861
3862

’

IGET BREAK NORD
PRINTER

3841
3042

3858

usE

ILOAD UPPER BUFFER
[ENABLE BREAK BIT

3848

3858

5252

3839

3856
3857

ADDREBB

REGi

CLA

BEL

3163

4523

/CURRENT rIELD
ILOAD COMMAND

LDCMD

4516

4514

IAC

CLRALL

4515

3855

"READ"

CLA

18191,

CLA CMA
LDCUR
TAD
CLL RAR

3853
3854

DATA

4581

3812
3813

3852

TO O

A
[VERIFY THAT 'DATA BREAK" MORD WITH
/To CURRENT rIELD LOCATION LOCATION 7777.
IUSE DATA PATTERN 5252 4 7525

3811

3831

[GET VALUE To LOAD
ILOAD UPPER BUFFER
ILOAD CURPENT ADDREss
IENABLE BREAK
ILOAD AND GO

3887
3888
3889
3818

3825
3826
3827
3828
3829
3838

KOD4D

8896

ISETUP COMPARE REGISTER

GDREGZ
CDREC:

1888

1876
4455

3822

5252

4581
4582
4583
4584
4585
4586

4475
4476
4477

3823
3824

DDATA

/DATA

3173

4451

4474

3882
3883
3884
3885
3886

IMRAT

4588

4473

3881

TAD

4427

3796

3788
3799
3888

K2525
K2525

TAD

DCA
TAD
LDBUT
LDCUR
TAD
LDMAN
CLA cLL
TAD
DCA

3794
3795
3797

cLA

BEL

7538
1128
1120
3163
1163

ITEXT

4896

LOOPS

POINTER

4644
4645

5645

JMP

4646

.41

ITO

TEST

TBT93

3885
3886

3887

[VERIFY THAT "D878 BREAK“ HORKS WITH
IR "READ" TO CUHRENT FIELD LOCATION 0
[TRY ALL COMBINATIONS

3898
3889
3898
3891

4646

7381

3892
3893

4647
4658

4453

CLRALL

1175

TAD

3894

4651

LDCMD

3895
3896
3897

4652
4653
4654

4458
3172

TAD

80856
REG?

[SAVE

1154

3163

DCA

GDPEGZ

ISETUP

T5T93,

CLA

DCA

CLL

IAC
HOMEMA

IDCLR "CLP ALI"
ICUFHENT FIELD
ILODD COMMAND FOR READ
ADDRESS

COMPARE

PAL10

V1424

7-MAR-77

13155

7-15

PAGE

SEO
3098
3899
3900

3901
3902

4655
4656
4657
4660

4661

1163

TAD

4427

LDBUF
K0040
TAD
LDMAN
CLA CM;

1076
4455
7300
1000

3903
3904
3905

4552
4663
4664

1173

TAD
DCA
TAD

3906

4665
use
4667

4440
4435

NERRoR

3900
3909

4670

4646

3910
3911

4671

4263

3991

3173

DTREG

[CHECK

IO.K. 4096 LOOPS
IERROR, DATA BREAK

ERROR
T5T93

ISCOPE LOOP POINTER

4263

[TEXT POINTER

IVER"! THAT A
IUHEN FUNCTION

3912
3913
3914

READ DATA
I
2

4672

3916
3917
3910

4673
4674
4675

3919
3920
3921
3922
3923

4676
4677

7301
4453

CDA CLL
CLRALL

IAC

1153

TAD

REGl

3163

1163

DCA
TAD

GDREG2
GDREGz

4700

4427
1163

LDBUr
TAD

GOREG2

4701

7040

CMA
DCA
LDCUR

T5094,

4702
4703

3000

4704

TAD

HONENA

TAD

K2000

3920
3929

4707

1175
1104
4450
1076

4455

LDHAN
CLA Club

4705
4706

3932

4710
4711
4712
4713

3933
3934

4714
4715

3935
3936

4716
4717
4720
4721

3931

3937
3939

4451

TAD

DTREG

TAD

DTREG
IDID

NERROR

[ALL

°.K.

ERROR

IERROP,

10394
4263

ISCOPE LOOP

[VERIFY THAT A READ DATA BREAK DOES OCCUR
NHEN
I

FUNCTNN

10195,

CLA

3944

4723

4453

CLRALL

3945
3946

4724

1154

TAD

R062

4725

3163

3947

4726

GDREG:
GDREG2

3940

4727
4730

1163
4427
1163
7040
1000

DCA
TAD

4731
4732
4733

PAL10

3957
3959
3959

CHANGE
DATA BREAK
POINTER
POINTER

ITEXT

7301

3955
3956

ISAVE FOR ERROR PRINTER

ACCMPI

4722

3953
3954

/ENA5LE BREAK
IGO

3943

3952

COMMAND REGISTER

ILOAD

DCA

3942

3951

ADDRESS TO 0
HELD

ICURRENT

K0040

1000

4672
4263

4734
4735
4736
4137
4740
4741

IDCLR

COMPARE

ISETUP

Low!

[LOAD

UPPER

ISET

CURRENT

BUFFER

GDREG2

TAD
CMA
DCA

4451

V142A

OLD XAC

LDCUR

7-NAR-77

13155

1175
1103

TAD
TAD

HOMENA
K1000

1104
4450

TAD

K2000

1076

TAD

4455

LDNAN
CLA CH.

PAGE

ADDRESS TO

5“

[CURRENT

LDCMD

FIELD

ILOAD COMMAND REGISTER
IENABLE BREAK
[so

x0040

4742

7300

4743

1000

TAD

3961

3173
1173

DCA
TAD

DTREG
DTREG

3963

4744
4745
4746

4440

ACCMPI

IDID

3964
3965

4747
4750

NERPOR

mm,

0.1:,

ERROR

3966

IERROR,

4751

4415
4436
4722

3967

4752

4263

T5195
4263

IECOPE LOOP POINTER
[TEXT POINTER

4753
4754

5754

3960

3969

3970
3971

T955,

5000

JMP

.41

3975
3976
3977

IHHEN FUNCTION

ITO

TEST

IVERIEY

THAT

DATA

BREAK DOES OCCUR

5000
5001
5002

7301
4453

5003
5004

3163
1163
‘4427
1163
7040
3000
4451

5005
5006
5007

5010

3946

5011

3997

3996

5012
5013
5014
5015
5016
5017
5020
6021
5022
5023

3997

5024

3995

DATA BREAK

TST97

3900
3999
3990
3991
3992
3993
3994

CHANGE

PAGE

3973
3974

3904
3995

FOR ERROR PRINTER

ISAVE

5000

3972

3979
3979
3900
3901
3902
3903

7-16

3960

3962

CURRENT

ISET

TAD

T943,

LOAD

COMPARE REGISTER

/5ETUP

3173
1173
4440
4435

4436

IDCLR
IGET VALUE TO

LDCMD

7300

3939
3942
3941.

3949
3950

DOES OCCUR

ILOAD UPPER BUFFER

3925
3926
3927

3930

BREAK

3915

3924

/GET DATA UORD
FOR ERROR PRINTER

ISAVE

DTREG

ACCHP1

4436

0099

IGET VALUE To LOAD
ILOAO UPPER BUFFER
IRREAK ENABLE 811'
ILDAD AND GO

GDREGZ

18197,

1153

CLA

CLL
CLRALD

IAC

TAD
DCA

REGT

IDCLR

GORE62
GDREG:

Lnaur
TAD

ISETUP

DCA

LDCUR

ISET

HONEMA

TAD
TAD

CURRENT ADDRESS

ICURRENT

1104

TAD

LDCMD

1076

3173

TAD
LDHAN
CLA CDL
TAD
DCA

1173

TAD

4440

ACC‘1P1

IDXD

NERRDR
ERROR

IALL 0,11,
IERPOR, DATA BREAK

TST97

ISCOPE

4263

ITEXT

4455

7300
1000

3990

5025

4435

5026
5027

4436
5000

4001

5030

4263

1'97E,

4002

4003
4004
4005
4006
4007

[VERIFY THAT A
IRHEN FUNCTION

ILOAD COMMAND
[ENABLE BREAK

K0040

T5198,

CLA CLL
CLRALL

[Go
0

DTREG

FOR

ISAVE

ERRoR

PRINTER

DTREG

READ
=

DATA

BREAK

DOES

CHANGE

LOOP POINTER

POINTER

own

7301
4453

FIELD

K4000
112000

4450

3999

5032

BUFFER

690062

CMA

1175
1106

4000

5031

COMPARE REGISTER

ILOAD UPPER

IAC
IDCLF

“99

V142A

13:55

7-MAR-77

PAGE

7-11
SEQ

4008

1154

TAD

REG!

4009
4010
4011

316]

DCA
TAD
LDBUF

GDREG2
GDREG2

TAD

GDREGZ

1163

4427
116!

4012
4013
4014
4015

4016
4017

7040

3000
4451
1175

DCA
LDCUR

TAD

1106
1103

TAD

1104
4450
1076
4455
7309

TAD

HOMENA
K4000
K1000
K2000

[SET CURRENT ADDRESS

[LOAD COMMAND REGISTER
[ENABLE BREAK
[GO

K0040

LDMAN
CLA CLL

1173

TAD
DCA
TAD

4440

ACCMP1

[DID

NERROR

[ALL

0.x.

ERROR
TET98

[ERRORy

1000

3173

4435

4436

T9DE:

5031

DTREG
DTREG

[SAVE FOR ERROR PRINTER
CHANGE

DATA BREAK

IOCOPE LOOP POINTER
[TEXT POINTER

4263

TO 0

[CURRENT FIELD

LDCMD
TAD

0100

[LOAD UPPER BUFFER

CMA

TAD

[SETUP COMPARE

[
ALL DATA BUFFERS CAN BE FULL
USE A READ BREAK AND PATTERN
[ALL COMBINATIONB.

[VERIFY THAT

[AT ONCE.
[

7301

T5T99:

4453
1154

CLRALL

3161
1133

3160
1161

CLA CDD [AC

T99R1,

TCNTRJ

LDDUF

4045

7340
1161

CLA

4048

[LOAD
TCNTR4

TCNTRA
TCNTRJ
T99R1

[SETUP FOR FIRST CNNPARE

1154

TAD

3163
1133

DEA

REG2
GOREG2

TAD

3160

DCA

TCNTRJ

1175
4450

TAD

HOMEMA

4056

4451
1076
4455
7300
1000

4057
4056

4059

4060
4061

PAL10

V142A

CURRENT ADDRESS
[GET ENABLE BREAK
[LOAD MAINTENANCE

TAD
DCA

[GET DATA
[SAVE FOR PRINTER

DTREG
DTREG

TAD

7-MAR-77

SKIP WHEN BUFFERS FULL

[LOAD

K0040

LDNAN
CLA CLL

317!
1173

4062

LDCUR
TAD

COUNT,

[CURRENT FIELD
[LOAD COMMAND

LDCND

TPDRZ'

or BUFFERS

CLL CMA

4051
4052

UPPER BUFFER

TAD
DCA
ll!
JMP

4050

4053
4054
4055

[COUNTER FOR

TCNTRA

4427

4049

'CLR ALL”

TCNTR4

4044

3161
2160
5271

IDCLR

REG!

TAD
DCA
TAD
DCA
TAD

13l55

PAGE

7-18
EEO 0101

4063
4064

5115

4065

5117
5120

4440
7610
5526
7340

5121

116!

TAD

4066

5122

4069
4070

5123
5124
5125

316!
2160

DEA
152
J"?

4066
4067

4071

5116

5306
4435

ACCHPl
EKP

[CHECK

CLA

JNP
T99E
CLA CLL CHA

NERRDR

GDREGZ
GDREGZ
TCNTR3
T99R2

[0.K. CHECK NEXT
[ERROR DATA BUFFERS

[BETUP FOR NEXT

[0.K.

4096

LOOPS

PAL19

4972

5126

4973

5127
5139

4974

V142A

7-MAR-17

4436
5963

T995,

4263

IERROR: DAT“
ISCOPF LOOP

4263

/TFXT

4916

4917

IVERIFY A

HRITE

THEN

4979

ILOCATTONS 7777
ICURRENT FIELD.

THEN

4902
4993
4994

USE

BREAK
OF

PATTERs

SEQ

9192

SEQ

9193

BUFFFRS
JINTER

POINTER

FROM

THE

9-7777.

5131
5132
5133
5134

7391
4453
4444

T6T199,

CLL

CLA

CLRALL
ENHANl
CLA CbL
LDCUR

1349

4996

5135
5136

4451
1154

4997

5131

3532

DCA

498!

5149

1115

5141
5142
5143
5144
5145

4995

TST99

4975

4979
4999
4991

PAGE

13155
ERROR

IAC

CONTROL

ICLEAR
IENTER

MAINTENANCE

CMA

ADDRESS

ILDAD CURRENT
REGz

TAD

OUT bOUND
/CURRENT FIELD

DATA

ISTORE

TAD

K7777
HOMEMA

1196
4459

TAD

K4999

1976

K9949

INRITE FUNCTION
IDDAD COMMAND REstTEn
/ENABLE BREAK

1399

TAD
LDMAN
CLA cDL

HOMEMA

49.9
4999

4991
4992

4993
4994
4995
4996

LDCND

4455

5146

1115

TAD

4997

5147

5159

4459
1976

LDCHD

4999
4999

5151

4455

LDKAN

4199

5152
5153
5154

7399

CLA

2112

161

1999

NOP

5155
5156
5151

1154
3163
1999
3113

TAD

4191
4192
4193
4194

4195

4199

5169
5161
5162
5163

4119

5164

4111

5165

4112
4113

5166
5161

4114

5179

4115
4116
4117

5171
5172

4196

4191
4199

[LOAD COMMAND REGISTER
IENADLE BREAK
IISSUE MAINTENANCE TOT

CLL
ADREG

REG2
GDREGz

DCA
TAD

ISETUP

COMPARE

DCA

DTREG

TAD

ISTORE DATA

ACCMPl
NERRoR

4435
4436
5131

ERROR

4263

4763

1391
1176
7659
5432

CLA CLL
TAD
SNA cLA
JMP I

5173

5774

4119
4129
4121

5174

5191

FDR

PRINTER

10.x. 4996 LOOPS
IERROR. WRITE 0R REID
ISCOPE POINTER

TSTTOB
IAC

FLDNAx
11

/15

TEST EXTENDED MEN.

XEND

/No.

END

.+1

ITO

TEST

JMP

TEST

EXTFLD
I

5299

PAGE

4122

4123
4124

IROUTINE TO CHECK IF CONSOLE PACKAGE ACTIVEIIF 59A THEN INHIBIT EXTENDED MEMORY TESTS.

4125

5299

PAL19

5679

TSTLAS:

V142A

7-MAR-77

4121

5291

1922

EXTFLD'

412!

5292

4129

5293

9192
1649

4139
4131

5294

5699

ENDTST

13155

PAGE

9-1

TAD

AND
K9499
52A CLA
JMP 1
TSTLAS

[MASK CLASSIC
ION

BIT

CLASSIC SYSTEM?
EXT. TESTS.

lBY-PASS

4132

THAT DATA BREAK NORKS WITH A “RITE FROM
/LOCATXON 9999 IN ALL EXISTING EXTENDED FIELDS/USE DATA PATTERN 9999 O 7777.

[VERIFY

4133

4134
4135

4136

READ

ICHECK RESULTS

4119

4126

TOT

FUNCTION
/CURRENT FIELD
[READ

K9949

TAD

1999
4449

IISSUE MAINTENANCE

5295

7391

5296
5291

4453
4444
1159
3232

IENTER

MAINTENANCE MODE

TAD
DCA

KCDF

TOFDD:

ISTART

FIELD

1176
3156

TAD
DCA

IFTELDS To TEST

1433
3234

TAD
DCA

FLDMAX
TCNTR1
THSFDD

1153

TAD
CLL RAR
52L CLA
CLA CMA
DCA

TST191:

CLL

CLA

IAC

4131
4138
4139

4149
4141
4142

4143
4144

4145

CLRADL

4147
4149

5213

4149

5214

4159
4151
4152

5215
5216
5211

4153

5229

7639

4154

5221

7249

4155
4156

5222

3163

5223

4451

4157

5224

1232

TAD

4158

5225
$226

7941

CIA

1234
7659

TAD
sNA
JMP

4146

4159
4169
4161
4162
4163

5227
5239

7119

TTDTR.

5247
1163

7492
3464

TOFLDT.

4164

5231
5232
5233

4165

5234

7492

RTELDT.

4156
4167
4163

5235
5236

1232
9114
1196
4459

RTFLOZ
CLA
NEXFLZ

TAD

GDREG:

HDT
DCA

K9900

HLT.

ICURRENT FIELD
IVES: NOT THIS ONE
IOUTBOUND DATA
/MOD1FIED CDF
ISTORE DATA
/HOME CDF

LDMAN

(Go

RDBUF
ACCMPI

IGET RESULTS
ICHECK RESULTS

4456
4449

5245

7619

4175

5246
5247
5259

5251
2156

1619
5256
1232
1973
3232

TAD
AND

SK?
JMP

NExEL2.

Isz
SKP
JMP
TAD

IF LINK

TOFLD2

4455

5244

5254

LDCUR

7777

ISETUP COMPARE REGISTER
ISET CURRENT ADDRESS To

K9949

5243

4179
4139
4191

xuss DATA

GDREGz

-1

FTELO CDF

LDCMD
TAD

4173
4114

5251
5252
5253

[RETURN

1916

4172

4171
4178

RTFLD2
REG:

TOFLD2
K9919
K4999

4171

4176

TAD

5237
5249
5241
5242

4169
4179

IDCLR

ENHANl

5219
5211
5212

CLA

INRTTE
ILOAD COMMAND
IENABLE

/0.K.
T1a1E

NRTTE BREAK

TRY

WITH

ALL

[ERROR

TCNTR1
CLA
7191D

/DoNE

TOELDz

TAD

K9919

DCA

TOFLDZ

[SET

NEXT FIELD

SET

9999

PAL10

4182
4133

4184
4185
4166

V142A

5255
5256

5223

5257
5260

4436
5705

5261

4263

4435

9-2
[TRY

T101R

JNP

T1010:
TI01E;

PAGE

13155

7-MAR-77

[VERIFY THAT DATA BREAK WORKS WITH A WRITE FROM
/LOCATION 0000 IN ALL EXISTING EXTENDED FIELDS.

[
[

4191

[USE DATA

4192
4193

5265
5266

5267

4200
4201
4202

5270
5271

7301
4453

4204

5274

1153
7110

4205

5275
5276

7630
1120

5277

1120
3153

5300
5301

4210
4211
4212

5302
5303

4213
4214

5305

4215
4216
4217

4210
4219
4220
4221

4222
4223
4224
4225
4226

4227
4228
4229

5304

5306
5307
5310
5311
5312
5313
5314
5315

4451
1313
7041
1312
7650
5325

1163
7402

2525

DCA

TOFLD3

T102R.

[RETURN FIELD CDF

TAD

CLL RAR
SZL CLA
TAD

K2525

TAD

K2525

DCA

GDREG2

[USE DATA

SNA
JHP

CLA

TAD

TOFLD3,

HLT

RTFLD3,

DCA
HLT

[YESI

K0000

[STORE DATA
[HOME CDF

AND

TAD

1076

TAD

5320

4455

LDMAN

5321
5322

4456
4440

RDBUF

5323
5324
5325

7610

SKP CLA
JMP

K0040

[GET RESULTS
[CHECK RESULTS

1073

TAD

5332
5333

3310
5301

DCA

T102D
TOFLD3
K0010
TDFLD3

JMP

T102R

0435

T1020:

NERROR

IS!

T102E
TCNTRI

[ERROR

[DONE WITH ALL

[SET

[TRY

SKP CLA

JUP
TAD

V142A

7-MAR-77

5335
5336
5337
5340

4436
5262
4263
5741

T102E.

5341

5400

13155

4263

[TEXT
I

PAGE
[VERIFY THAT DATA

[LOCATION 7777

5400

4249

5401
5402

4254

5403
5404
5405
5406

4255

5407

4256

5410
5411

4261
4262
4263
4264

4265
4266

4267
4268
4269

4270
4271
4272
4273
4274

5412
5413
5414
5415
5416
5417

5420
5421
5422

5423
5424
5425
5426
5427

5430
5431
5432

4275

5433

4276

5434

4277
4279

5435
5436
5437

4280

5440

4281

5441

4282
4253

5442
5443

4234

S444

4265
4296
4207

5445
5446
5447

4295

5450

4209

5451
5452

4278

4290
4291

BREAK

NORKS

WITH A

"RITE

FROM

ALL

[

4248

4259
4260

EXISTING EXTENDED FIELDS.
[USE DATA PATTERN 0000 0 7777.

4247

4257
4255

POINTER

.41

Tswloi
[

4246

4252
4253

9'3
[ERRORI DATA BREAK
[SCOPE LOOP POINTER

TST102

4245

4251

PAGE

ERROR

JHP

FIELD

10.x 4096 LOOPS

4244

4250

TRY NEXT

[O.K.

5331

5400

[WRITE
[LOAD COMMAND REGISTER
[ENABLE HPITE BREAK
[GO

ACCMPI

NEXFLJ,

ONE

[OUTBOUND DATA
[MODIFIED CDF

TOFLD3
K0070
K4000

TAD

LDCMD

4242
4243

[CURRENT FIELD
NOT THIS

NEXFL3
GDREG2

4233
4234

4240
4241

SET

RTFLD3

TAD

5327

4239

CIA

1106

RADIO

IF LINK

TOFLD3

TAD

5330

4237
4236

5252

[SETUP COMPARE REGISTER
[SET CURRENT ADDRESS TO 0000

LDCUR

4459

5334

TEST

[FIELDS TO

4232

4236

MODE

TCNTRl
THSFLO
RTFLDJ
REG1

5316
5317

5326

[START FIELD

FLDMAX

TAD

DCA
TAD
DCA

MAINTENANCE

[ENTER
KCDF

4231

4235

5252-

[DCLR

TAD

5335
2156
7610
5334
1319

4230

IAC

ENMANI

3464

7402
131a
9114

CLA CLD

CLRALL

1176
3156
1433
3312

4203

4209

T5T102:

4444
a15n
3310

5272
5273

4206

PATTERN

5262
5263
5264

4199

4207
4206

0105

POINTER

[TEXT

4190

4196
4197
4199

SEQ

DATA BREAK
[SCOPE LOOP POINTER

[ERROR;

TST101
4263
/

4135

0104

[0.x 4096 LOOPS

NERROR
ERROR

4107
4109
4109

4194

SEQ
IT

5453

7301
4453
4444
1150
3226

TST103,

CLA CLL
CLRALL
sunny!

IAC

TAD
DCA

Kcur

[DCLR

MAINTENANCE MODE

[ENTER

TOFLD4
FLDMAX
TCNTR!
THSFLO

[START FIELD
[FIELDS

DCA

RTFLD4

[RETURN

FIELD CDF

TAD
CLL

REG!

DCA
CLA

GDREGD

1226

TAD

TOFLD4

7041

CIA

'1230
7650
5243

TAD
SNA CLA
JMP

1176

TAD

3‘56
1433
3230
1153

DCA

TAD

7110

RAR
sun CLA
CLA CMA

7630
7240

3163
7240
4451

11033,

1163

7402
3532
7402
1226
0114

[USE DATA

can
LDCUR

TAD

TOFLD4,

HLT

RTFLD4,

DCA
HLT
TAD

NEXFL4
GDREG2
K7777

AND
TAD

K4000

1076

TAD
LDMAN
RDEUF

LDCMD

2156
7610
5252

F0040

SKP

1226
1073

1103E

[STORE DATA
[HOME CDF

[WRITE
[LOAD COMMAND REGISTER
[ENABLE WRITE BREAK

/cuscx

RESULTS

/o.K.

TRY NEXT

xzpnoa

CLA

TAD

DCA

3226
5216

[CURRENT FIELD
IVES! NDT THIS ONE
[OUTBOUND DATA

TCNTRi

ISE
SKP
JMP
TAD

ADDRESS

[GET RESULTS

CLA

JNP

NEXFL4,

CURRENT

[GO

ACCMPl

7610
5253

LINK

[MODIFIED CDF
I

1106
4450
4455

RTFLD4

TOFLD4
K0070

4456
4440

7777

JMP

T1030
TOFLD4

K0010
TOFLD4
TIDJR

[DONE

SET

COMPARE REGISTER

[SETUP
[SET

TEST -1

HITS

ALL

FIELD

[SET

[TRY

4096 LOOPS
DATA BREAK

4435

T103D,

NERROR

/O,K

4436

T1035,

ERROR

[ERROR,

7777

PAL10

4292

5454

4293

5455

V142A

13155

7-MAR-77

4296
4297

[
[VERIFY THAT DATA
[LOCATION 7777 IN
[USE DATA PATTERN

4299

4300

CLL

5456

7301

4302

5457
5460

4304

5461

4305

5462

4306
4307

5463
5464
5465
5466
5467

4453
1441
1150
3305
1176
3156

CLRALL

4303

1433
3307

TAD

4311
4312
4313
4314
4315

4316
4317
4318
4319
4320
4321
4322
4323

4324
4325
4326
4327

TST104:

CLA

KCDF

TOFLDS

DCA

1153

TAD

7110
7630

CLL RAR
SZL CLA

1120

TAD

5473

1120
3163

TAD
DCA
CLA

T104R,

1451

1305

TAD

5500

7041

5501
5502

1307
1650
5322

CIA
TAD

5503
5504
5505
5506
5507

SNA

7402

3532
7402

TOFLDS,
RTFLD51

4450
1076

LDCMD

4455
4456
1410

LDMAN

4335

5515
5516
5517
5520

7610

nosur
ACCMDA
SKP CLA

4336

5521

amp
Isz

5522
5523

7610

SKP

4339

5524

5331

4340

5525

J”?
TAD

4341
4342

5526

1305
1073

5527

3305

4343

5530

5275

4344

5531

1435

4345

5532

4346

5533

4436
5456

PALIO
4347
4340
4349

5534
5535
5536

4350

V142A

NEXFLS,

T1040,
T104E:

GDRE02

[OUTBOUND DATA
["ODIFIED CDF

K7777

[STORE DATA
[HOME CDF

10070
x4000

[ERROR

IDONE WITH ALL

11040

rornns

TAD

K0010

DCA
JMP

TOFLD5

1331 TO
[TRY IT

1104a

NERROR
ERROR
TST104

4263
JMP I
TST105

PAGE

9—5
[TEXT

PAGE

4355
4356

5600

1150

TAD

KCDF

4357

5601

3221

DEA

4350

5602

1176

4359

5603
5604
5605
5606
5607

3156
1433

TAD
DCA

TOFLDx
FLDMAx
TCNTR1

5610
5611
5612

7301

4365

4366
4367
4369
4369

TAD
DCA

1153

TAD

3163

DCA
CLA

1105R.

RTFLDl
REG1
GDREG2
CLL

1221

TAD

5614

7041
1245

CIA
SNA

[ENTER

4373

5621

0000

4374

5622

4375
4376

5623

3554
1221
'0114

TAD
AND

1106

TAD

4450

LDCMD

1154
4451
1076

TAD
TAD

K0040

LDMAN
CLA CLL

IAC

TAD

REG?

5624
5625
5626

5627

4380
4331

5630

4392

5632
5633

4455

5634

1154
3172

4393
4304

5631

NExrbi
GDREGZ

TAD
0
I

REG2
K0070
K4000

DCA

ADRFG

1221

TAD

TOFLD1

AND

K0070

4308

5640

4450

LDC"D

4369
4390
4391

5641

1076

TAD

5642

4455

5643

7300

LDMAN
CLA CLL

4392

5644

1572

TAD

4393

5645

0000

4394

5646

3173

4395
4396
4397

5647

1173

5659

4440

ACCMP1

5651

4399
4399
4400

5652

7610
5265
2163

JMP
152

4401

7000
2156

[SETUP

BREAK

ADDRESS

/MASK FIELD BITS
/LOAD COMMAND

10040
[LOAD MAINTENANCE

[GET DATA

DCA

DTREG

[STORE

TAD

DTREG

[CURRENT

CLA
11055

GDREC7

NOP

Isl

3115

[LOAD CURRFNT ADDRESS
[ENABLE BREAK

ADREG

SIP

NEXFLI,

[GO

0114

5653
5654
5655

IMASK

REGZ

5635
5636
5637

RTFLDI.

[MODIFIED CD?
[STORE DATA WORD

[LOAD COMMAND

4387

4385
4306

[IS IT CURRENT FIELD
[YES] BYPASS

TOFLDI

LDCUR

7301

MODE

RTFLDI
CLA

JMP

DCA

MAINTENANCE

TOFLD1

TAD

TOFLDI.

[DCLR

FNMANI

4444

5613

[SETUP COMPARE

IAC

CLRALL

4453

7650
5255
1163

4370
4379

LOCATIONS

THSFLD

5615
5616
5617
5620

4377

ALL

[

4371
4372

4370

POINTER

.41

[VERIFY THAT DATA BREAK WORKS FROM
[IN ALL EXISTING EXTENDED FIELDS.
[USE DATA PATTERN ALL CONSINATIONS

4364

NEXT FIELD

4096 Loops
[ERROR, DATA BREAK
Iscora LOOP POINTER

10.x

13155

3245

7777

TCNTR!

[

4362
4363

[CHECK RESULTS
/o,x, ray NEXT

4352
4353

4361

0107

COMMAND REGISTER
[ENABLE WHITE BREAK
1G0
[GET ncsunrs

4351

4360

SEQ

SET

CLA

7-HAR-77

TST105,

/LOAD

1101:

5736
5600

4354

LINK

[WRITE

K0040

4263

5600

5252

TOFLDS

TAD

4337

-1

[CURRENT FIELD
[YESI NOT THIS ONE

NEXFLS

9114

4330

TEST

RTELD5

HLT

5332
2156

FIELD CDF

[SET CURRENT ADDRESS

CLA

5512
5513
5514

4334

[RETURN

TOFLDS

5511

4332
4333

[FIELDS

MODE

[SETUP COMPARE

GDREG2

TAD
AND
TAD

1106

FIELD

[USE DATA

HLT
DCA

MAINTENANCE

[START

K2525
K2525

JMP
TAD

1163

TCNTRl
THSELD
FTFLDS
REG]

CHA
LDCUR

5477

[ENTER

FLDMAX

TAD
DCA

5470

7210

[DCLR

TAD

5471
5472
5474
5475
5476

IAC

DCA

1305

4331

BREAK WORKS WITH A WRITE FROM
ALL EXISTING EXTENDED FIELDS.
2525 4 5252.

ENHAN!

5510

4328
4329
4330

0106

[

4301

4310

SEQ

[

4298

4309

9-4

[SCOPE LOOP POINTER
[TEXT POINTER

4294
4295

4308

PAGE

TST103
4263

5400
4263

TCNTR]

READ
FIELD CDF

FOR

PRINTER

[CHECK RESULTS
[THIS FIELD O,K.
[ERROR
[UPDATE WORD

PAL10

[

4402
4403
4404

4405
4406

4407
4404
4409

4410
4411
4412
4413
4414

4415
4416
4417
4418
4419

4420
4421
4422
4423

V142A

5656

7610

5657
5660
5661
5662
5663

5264

5664
5665

5210
4435

5666

4436
5600

5667

4263

5670
5671

4405
1007

5672

3532
1022

5673
5674
5675
5676
5677
5700

5701
5702

5707

4429

5710

4430
4431

5711
5712
5713
5714

7004

5715

4439

[ALL

DONE

T105R

[TRY

5716
5717
5720

5721
5722

ENDTST,

SET
TAD
DCA

nzxr

SEQ

0109

FIELD

[TEXT

POINTER

[SETUP FIELD 0
SAVEND

[REPLACE BINARY

K7777

TAD
AND
SNA CLA
J"?

152
JMP

SKP

7562
4404

K4000

[TEST ran
[APTTT

.03

IND.

PCOUNT
ENDHLT41

[LOOP PROGRAM

APT

NORMAL nun

[CHECK FOR CONSOLE CLASSIC
[CHECK FOR PASS COMPLETE TYPEOUT.

CLA

JMP

[BYPASS

CPL!
PRNTER
TEXEND

[PRINT END
[POINTER

NORMAL TYPEOUT.
OF

MESSAGE

TEST

LAS

5317

RAL
SPA CLA
JMP

4406

CLASIC

[“0 STOP.
[CHECK FOR CLASSIC.

4437
7402
7301
4453

caINOU

[ROUTINE T0 EXECUTE.

7710

ENDHLT:

HLT
CLA

.44

5722

5MP

TEST

[END

CLL

IAC

CLRALL

[DCLR
[LOOP ON

.41

PROGRAM

TST4

0766
[

4442

[MANUAL

4443
4444

TEST FOR 16 BIT COUNTER.
[SET SWITCH REGISTER TO 0201 AND PRESS
[LOAD ADDRESS. SET THE SWITCH REGISTER TO

4445

[THEN

4446

[SCOPE THE 16TH CARRY OUTPUT TEST POINT
[FOR A GROUND T0 43 VOLT SIGNAL-

4447

4443

PRESS CLEAR AND

0000.

CONTINUE.

[

4449

5723

7301

4450
4451

5724

4453

5725
5726

4444

4453

5727

1077
4455

4454

5730
5731

5327
5327

4455

0100

zsnnon. DATA BREAK
[SCOPE LOOP poxurax

CLASIC
CDPASS

4440
4441

4452

SEQ

10.x. NEXT ADDRESS

TST105
4263

2371
5311
4406
4424
7610
5310
4462
4457

4420

4435
4436
4437
4435

T105D
TOFLD1
K0010
TOFLDl

ERROR

7650

5706

4433
4434

JMP
NERROR

5301

4427

4432

DCA

0106

5703
5704
5705

4425

TAD
TAD

T105D.
T105E:

9-6

CLA

[

4426

4424

SIP
JMP

1221
1073
3221

PAGE

13155

7-MAR-77

MANUL.

CLA CLL
CLRALL
ENMANI

IAC

TAD

K0100

LDMAN
JMP

JMP

ITIRST, CLEAR CONTROL
[ENTER MAINTENANCE MODE
[ENABLE SHIFT PULSES
[ISSUE MAINTENANCE IOT AND
[CAUSE HI
[INPUT OF

u-l
u-2

MAIN

THE

SHIFTS TO THE
16 BIT COUNTER.

4456

PAL10

V142A

[SKIP

4460

5732

4462
4463

5733
5734
5735
5736
5737

4468
4469
4470
4471
4472

4413
4414
4415

4476
4477
4478

0000
3363
1732

9-7

INSTRUCTION FOR SYSTEMS WITHOUT CLASSIC
THE NEXT INSTRUCTION IN FIELD 0 AND THEN
AFTER THAT ONE.
SKI?

INSTRUCTION

SAVAC

TAD

ISZ
TAD
AND

CLASIK
OF?
(400)

0377

5741
5742

7640

SZA CLA
JMP

5345
1363

TAD

5744
5745

5732

JNP

2332

5746
5747

6211
1020

152
CDF
TAD

5750
5751
5752
5753

3776

DCA

1021

TAD
DCA

3775
1022
3774
1362
3773

5760

6212

5761

5773

5756
5757

CLASIK

2332
1022

5740

5743

CLASIK.

ROUTNP

4403
4454
4485
4406
4407
4408

TAD
CIF
JMP

[IS
.43
SAVAC
CLASIK

CLASSIC

THIS

THE”

RETURN

ROUTMP.

SAVAC,

(50R)

[MOVE

POINTERS

ISAVE

ROUTINE

FIELD

(0P1)
0P2
(0P2)
ROUTMP
(ROUINS)
SAVAC

FIELD

10
I

(ROUINS)

GET

SWITCHES.

[GO

EXECUTE

ROUTINE.

0
0

[ROUTINE
[

5764

0000

4492

5765

4406

4493
4494

5766

4425

5167
5770

7604

MYLAS,

CLASIC
COCKS“
7604

5764

J”?

[CHECK

MYLAS

5771

0000

4499

5773

4500

5774

1302
002?

4501

5775

0021

4502

5776
5777

0020

PCOUNTp

[EXIT

0400
PAGE

4504

4505

[SUBROUTINE T0 WAIT FOR INTERRUPTS
[IF INTERRUPT OCC"RES GO BACK +1

4506

4507

[

IONWT,

4508

6000

0000

4509
4510

6001

7300

CLA

6002

1112

TAD

CLL

K7700

CLASSIC.

SWITCHES.

[NOD

[

6000

[GET

[

4490

0P1

[

4491

PROGRAM.

[

5762'
5763

SYSTEM?

[YES.
[NO

SHR

TAD

DCA

[SAVE CURRENT AC,
[GET INSTRUCTION
[SAVE THE CLASSIC ROUTINE.
[BUMP AETER THE CALL.

CLASIK

TAD
DCA

1363

4489
4490

4503

PAGE
A

EXECUTE

DCA

5754
5755

4496
4497

WILL

3362

4479
4480
4401
4482

4495

THE

WILL SE

[

4461

4466
4467

13155

ROUTINE
[OTHERWISE IT

4459

4464
4465

7-MAR-77
[THIS

4457
4455

APT

PADl0

V142A

PAGE

13155

7-MAR-77

9-3

SEQ 0110
4511

4512
4513
4514

4515
4516

4517
4518
4519

6003
6004

6005
6006
6007
6010
6011
6012
6013

4520

6014

4521

6015
6016

4522

4523
4524
4525
4526
4527
4528
4529

6017
6020
6021

6022
6023

6001

ION
IS!

COMP!

an?

.-1

6002
5600

10F
J"?
ISZ

2200
4447
7410

4542
4543
4544
4545

4546
4547
4548
4549
4550
4551
4552
4553

CLA

CMA

/EXIT.

IONHT

/RESET

22
K04aw

[MASK CLASSIC.

7640
6031

SEA

CLA

5201
4406

CLASIC

4436
7402
5221

CRERR

ERHLTi:

ION

RETURN

[NO

.43

ADDRESS.

CLASSIC?

IIF SO

KSF
JMP
KCC
JMP

6032

OCCURED

IONWT

TAD
AND

KEY

ALLOW

FLAG.

KEYI

[WAS CLEAR FLAG.
IONHT

[RETURN

HLT

a“?

.-3

COM RARE

WAIT.

AND

ICHECK FOR CLASSIC.
IROUTINE To EXECUTE.
[ERRORI ILLEGAL INTERRUPT

lNON-RECOVERABLE ERROR.

[ROUTINE

GDREGZ

6033
6034
6035
6036
6037
6040
6041

0000
3174
1174

COMPI.

7041

1163
7640

DCA

ACREG

TAD

ACREG

CIA
TAD
SZA

GDREG2

2233

ISZ

6042

4424

TICK

6043

5633

J"?

ISAVE AC

CLA

[SKIP 1r 0.x.
Iranon. DON'T COMPARE
IGENERATE TIMING 1r NEEDED

COMP1
I

conp1

COM FARE CRREGI

[ROUTINE

IGDREcl

AND

GDR :02.

a
CLA

CLL

AND cnnaaz

6044

0000
7300
1162

comaz,

4554

4555

6050

4556

6051

4557

6052

7640

szA

4558
4559

6053

4560

6055

5260
1165
7041

JMP
TAD
CIA

4561
4562

6056
6057
6060

1163

TAD

4565

IONwT

DCA

6045
6046
6047

4563
4564

INT

IOT

1022

4537

4541

IDISK SKIP
/ERPOP

3200

6032

4540

OFF

IONNT

sKP
JMP

0102

4534
4535
4536

4539

1T
INO

TAD

6030

4530

IONWT

1200

4532
4533

6031

[TURN
I

DSKSKP

5600
7240

5227

4531

INTADD:

ITURN

2233
5205

6024
6025
6026
6027

4530

COMPl

DCA

3233

6054

6061
6062

PAL10

AND
CIA

7041
1164

7640
2244
4424
5644

V142A

GDREGi
K0017

TAD

0145

CRREGl

TAD

szu

CRERR:

CLA

CRERR

THE

/NOT

SAME

CRREG2
GDREG2
CLA

COMPZ

ISZ
JMP

ITIMING
I

7-MAR-77

NOT THE SAME
IF NEEDED

IERRORo

TICK

APT

FOR

CONPZ

13155

PAGE

9-9

SEQ
I

ISUBROUTINE TO

READ

STATUS REGISTER

I
6063

0000

FDST'

6064

6745
5272
4406
4436
7402
5266

IOTSI

DRST
JMP

6065
6066
6067
6070

6071
6072
6613
6074

IREAD

.65

I0.K.

[CHECK

COERR

EFHLTS,

3166
1166
5663

HLT
J"?

.-3

DCA

STREG

TDD

STREG

J"?

STATUS

IOT

SKIP.
CLASSIC.
[ROUTINE T0 EXECUTE.
ISKIP TRAP

CLASIC

FOR

INON-RECOVERABLE ERROR.
ISAVE RESULTS

RDST

IEXIT

[SUBROUTINE T0 LOAD CURRENT ADDRESS REGISTER
I

6075
6076

6077
6100
6101

0000

LDCA:

DCA

ADREG

TAD
DLCA
ON?

ADREG

IOT4:

3172
1172

6744

6102

5675
4406

6103
6104

7402

6105

5302

ISAVE

LDCA

CRERR

ERHLT4;

ADDRESS

HLT

ISKIP

ON?

ADDRESS

IOT

IEXIT
ICHECK FOR CLASSIC.
IROUTINE T0 EXECUTE-

CLASIC

4436

ILOAD CURRENT

TRAP

ERROR

lNON-RECOVERABLE ERROR.

.-3

I
I

ISUBROUTINE

LOAD

D!SK

ADDRESS

6106
6107
6110
6111
6112
6113

0000
3171

6114

0436

6115

7402

6116

5313

DDAD;

IOTJI

DLAG

1171

6743
5706

DCA

DAREG

TAD

DAREG

J"?

[SAVE

LDAD

ICHECK FOR CIASSIC.
IROUTINE TO EXECUTE-

CRERR

ERHLTJ:

HLT
JMP

DATA

ILOAD DISK ADDRESS
IEXIT

CLASIC

4406

OUTBOUND

ISKIP TRAP ERROR
INON-RECOVERABLE

.-3

ERROR.

ISUBROUTINE

T0 LOAD COMMAND REGISTER

4609

6117
6120

0000
3170

4610

6121

1170

LDCM,

CMREG
CNREG

DCA
TAD

DLDC

6122

6146

4612

6123
6124

5717

JMP

4613

4406

4614

6125

4436

CLASIC
CBEPR

4615

6126

4616

6127

1492
5324

4617
4610
4619
4620

ERHLTD.

OUTBOUND

IEXIT

LDCH

ICHECK FOP CLASSIC.
[ROUTINE To EXECUTE.
[SKIP TRAP ERROR.

HLT

[Non-FECOVERABLE

,-:

J"?
I

ISUBROUTINE
I

6130

0000

SDKP;

DATA

[LOAD COMMAND REGISTER

4611

1076.

/SAVE

ISSUE

"DSKP'

015K

SKIP

IOT

EPROP.

0111

PAL10
4621

4622
4623

4624

6131
6132
6133
6134

V142A

7-MAR-77

6741
7410
2330
5730

TOTT.

[SUBRDUTINE

[DISK
[DID
x

SDKP
SDKP

SKIP

IOT

NOT

SKIP

SEO

0112

SEQ

0113

[EXIT

ISSUE

CLDR

CLEAR

~DCLR'

101

6135

0000

6136
6137

6742

4630
4631

6140

4632
4633
4634

6141

4629

sxp
Isz
J"?
I

4625

4626
4627
4620

9-10

PAGE

13155

DSKP

6142
6143

5735
4406
4436
7402
5340

CLDR,
1012.

DCLR
GM?

csERR
HLT
UN?

ERHLTT.

"CLEAR

[DCLR

IoT"

IExXT

ICHECK

CLASSIC.
[ROUTINE To EXECUTE,
[SKIP TPAO ERROR
[NON-RECOVERARLE ERROR.

CLASIC

.-3

FOR

4635

4636
4637
4638

/SUBROUTINE
0000

4640
4641

6146

5744

4642
4643
4644

6147
6150
6151
6152

4406
4436

4645

ISSUE

LDMN

4646

6747

LDMN,
IOT7'

['DMAN'
[EXIT

DMAN

JR?

CLASIC
csERR

7402
5347

ERHLT1.

6200

PAGE

INON-RECOVEPABLE ERROR.

.-3

4646
4649

ISUBROUTINE To

4650
4651
4652

6200

0000

6201

6202

TAD

4654

6203
6204
6205
6206
6207

4445
1134
3155

ENHAN?

4653

DCA

SBCNT!

1103

4658

SHIFT, THEN
/ADDRESS TNTo DATA BUFFER.

TAD

K1000

1100

TAD

K0200

4455

LDMAN

2155

3155
1103

TAD

6215
6216

4455
2155
5215
7300

LDNAN

6211

4661
4662
4663
4664
4665

6212

4666

6211

4667

6220
6221
6222
6223

6213

5206
7300
1135

DISK

SHIFTS

IENTER

6214

6210

4660

READ

161
SBCNTi
JMP
.-2
CLA CLL
H7
TAD
DcA
SBCNTl

4659

4668
4669
4670

RDAD,

107

[ROUTINE To EXECUTE.
[SKIP TRAP ERROR,

HLT

J"?

MAINTENANCE

[CHECK POP CLASSIC.

4656
4657

IOT

4647

4665

MAINTENANCE

'DMANu

[
6144
6145

4639

DB4I1

SECTOR

[LOAD MAINTENANCE
[FOUR SHIFTS
[MORE To Go

[SNTFT CRC
[LOAD MAINTENANCE 10T

Klona

Isz

SBCNTI

UMP

CLA

MAINTENANCE MODE

COUNTER
[ENABLE SHIFT CRC
[ENABLE SHIFT SURFACE AND
[SETUP

[SHIFT

.-2

BITS

CLL

K0020

1074

TAD

4455
3171

LDMAN

[READ
[SAVE

DAREG

DCA

DATA BUFFER
RESULTS

4671
4672
4673
4674
4675

6224

6225

4679
4690
4681
4622
4603
4664
4665

4666
4607

DAREG
1

RDAD

[EXIT

PALIO
4676
4677
4676

TAD
JR?

1171
5600

V142A

1-MAR-77

13x55

ISUBROUTINE To READ DATA

PAGE

9-11

BUFFER

[

6226
6227
6230

6231
6232
6233
6234
6235
6236
6237

0000
7330

RDar,

MACMIHLIH
LDMAN

4455
1074

TAD

4455

LDMAN

3167

DCA

DBREG

1167

TAD
DCA

DBREG

3173
1173
5626

MAINTENANCE MODE
[LOAD

Rnsr

[EXIT

4638

[

4609

ISUBROUTINE TO SHIFT COMMAND
REGISTER
[DATA BUFFER THEN REID DATA BUFFER

4690
4691
4692
4693
4694
4695
4696

4697

4696
4699
4700

4701
4702
4703
4704

4705
4706
4707
4708

6240
6241

6242

0000
4445
1136

RDCM,

ENMAN2

[ENTER

M12
SBCNT1
K0400

TAD

6243
6244

3155

DCA

1102

6245
6246

4455

6247

5245

6250
6251

7300
1074
4455
3170
1170

TAD
LDMAN
151
SBCNTI
JMP
.-2
CLA CLL
TAD
K0020

6252

6253
6254
6255

2155

J"?

0000

7330
4455
7300

6262

5656

4714
4715

MAINl:

SHIFT COMMAND

ISHIFT

[ENABLE

READ

BUFFER

[LOAD AND GO
[SAVE IT

RDC"

[EXIT

CML

FAR

[ENABLE
[ENTEP

MAINTENANCE

BIT

NA1NTENANCE MODE

MAINI

\
\

4716

4719

[SUBROUTINE T0 SHIFT CRC
[BUFFER THEN READ IT.

4720

[

4719

4722

0000
4445

4723

1136

4730

[ENABLE BIT FOR
AND GO

ENTER MAINTENANCE MODE

Chi CLL
LDMAN
CLA CLL
JMP I

4717

4728
4729

D8431

6256

4726
4727

SHIFT

IROUTINE

6257
6260
6261

4724
4725

BIT

[LOAD

CHREG
CMREG

DCA
TAD

MAINTENANCE MODE
[12

LDMAN

5640

4710

4721

[

4709
4711
4712
4713

MAINTENANCE

DTREG
DTREG

TAD
JMP

[ENTER

K0020

3155
1103
4455

2155
5270

7300
1n14

RDCR,

DATA

ENMANZ

[ENTEF

MAINTENANCE

“ODE

TAD
DCA

M12

SBCNT]

[12

TAD

K1000

[ENABLE SHIFT
[LOAD AND GO

LDMAN
152
JMP
CLA CLL
TAD

D5431

SHIFTER
CFC

SBCNT1

BIT SHIFT

.-2

/12

K0020

[ENABLE

PEAD

BUFFER

PAL10

4731
4732
4733
4734

6275
6276
6277

4735

6300
6301

4736

6302

4737
4738
4739

6303

4740
4741
4742

4743
4744
4745
4746

6304

6305
6306
6307
6310
6311
6312
6313

V142A

LDMAN

3165

DCA

4445
1136

ENMAN2
TAD

M12

3155

DCA

1103
4455
2155
5303

TAD

SBCNTi
K1000

7300
1074
4455
0145

LDMAN

4755
4756

4757
4758

4759
4760
4761

4762
4763

4771
4772

4773
4774

6315
6316
6317
6320
6321
6322
6323
6324
6325

6326
6327
6330

[12

K0020

[ENABLE

0000

TOCTI

6332

0072
1063
4434
1155
0072
1063

SBCNT1

AND

K0007
K0260

TAD

5714

[PRINT SECOND BIT

0MP

0000

UPONE,

CLL

[EXIT

TOCT

C ELF

7300

1146

CLA
TAD

6334
6335

4434

TYPE

1147

TAD

6336

4434
4434
5731

TYPE
TYPE

6400

JflP

K0215
K0212

[TYPE ONE NULL
I

UPONE

PAGE

IROUTINE

FROCT:

FOUR OCTAL

6400
6401
6402
6403

0000
7006
7006

3777'

RTL
RTL
DCA

UPONE

6404

1130

TAD

K7774

DCA

TOCT
U?0NE

0072

TAD
AND

K0260

6405
6406
6407
6410
6411
6412

V142A

7-MAR-77

3776'
1777'

13155

1063

TAD

4434
1777'

TYPE

EAL

4799

6422

6417
6420
6421

3777'

DCA

J"?

['11

1261

TAD

K0240

4434
5600

TYPE

UPONE
TOCT

152

JMP

9-13

UPONE

2776'
5206

4800
4801

PAGE

K0007

TAD
RTL

FROCT

[

[SUBDOUTINE

4802
4803

6423

0000

4804

6424

4805

6425

7300
1623

4806
4807

6426

PRINT TEXT

4808

6427

4809

6430

4810

6431
6432
6433

PRN;

0
CLA

CLL

TAD

2223
3200
1600
0112

Is:
DCA

7450

sNA

5257

TAD
AND

6434

7500

any
5M1

6435

7020

CML

6436

7001

11c

6437
6440
6441
6442
6443

7012
7012
7012
4434

6444
6445

4823

6446

4824

6447

4825

6450
6451
6452
6453
6454

PRN

FPOCT
I

FROCT
K7700

EXIT

nrn
PTR

TYPE

1600
0115

TAD
AND

7450

sNA

5257
1262
7500

JMP

FROCT
K0077

TAD

EXIT
K3740

sMA
TAD

K4100

1261
4434

TAD

K0240

2200

ISZ
CLA

1124

TYPE

6455

7300

4831

6456

5230

4832

6457

2x11.

4833

6460

7300
5623

6461
6462

0240
3740

xazoo.
x3740.

4834

FROCT
CLL
PRNOS

JMP
CLA
sup

CLL
3

4837

[

4838

[ROUTINE

4839

«24a

3746
TO

6463

PRN

FTR

4830

4840

[SAVE AC

TYPE

4434

7004

4836

HALF

[PRINT FIRST BYTE

TAB

7006

4835

OTHER

OCTAL

THO

TYPE

6414
6415
6416

4827
4828
4829

BUFFER

K0007
K0260

TAD

6413

4826

SBCNT1

4793
4794
4795
4796
4797
4798

4822

SBCNTI

6333

PALIO

4820
4821

[EXIT

TAD
PAR
RTR
AND

[

4819

[SAVE

RDCR

DCA

4818

CRREG1
I

1155

4780
4781

4815
4816
4817

READ

K0017

3155

7010
7012

477!
4779

4812
4813
4814

0115

SHIFT

4777

4811

BIT

\ ROUTINE

6331

6340

4790
4791
4792

SEQ

DB4I1

6337

4789

\
\

4775

4786
4797
4788

MODE

SHIFTER

4776

4782
4703
4704
4705

u'2

CLA CLL
TAD

J"?

0114

SHIFT CRC
[LOAD AND GO

J"?

ISUBROUTINE

6314

4764
4765
4766

4767
4768
4769
4770

[12 BIT
[ENABLE

SBCNT1

5663
/

MAINTENANCE

152

3164

4748

4754

[ENTER

SEQ
IT

[SAVE

CRREG?

AND
DCA
[

4752
4753

9-12

LDMAN

4747
4749
4750
4751

PAGE

13155

7'MAR-77

4455

0000

PRINT;

TYPE

PEN

Idhr poxuran

PALI8

V142A

4841

6464

4486

4842

6465

4435

4843

6466

7418

4844
4845
4846

6478

6846

6471

6841

5271

4848
4849
4858

6842
7288
5663

SK?
JMP
TLS
TSF
JMP
TCF
CLA
JMR

4851
4852

/
[ROUTINE

4853

PRINT
ALL

4484
8182

4857

6581

7658

SNA

CLA

4858
4859
4868

6582
6583
6584

5676

JMP

4861

6585

4862

6586
6587

7388
1136
3263
1188

6511

4455

4866

6512

4867
4868

6513
6514
6515
6516
6517

2263
5311

J"?

7388

CLA CLL

1874

TAD

4455

LDMAN

3171
4454
4443
4462

DCA
RDCMD
CRLF

1125
2276

TAD
161
JMP

4874

4875
4876

6528
6521

6522
6523
6524

4877
4878
4879

6525

5676

6576

4888

6577

6314
6331
6688

6688

8888

6681
6682
6683
6684
6685
6686
6687
6618
6611

7388
4425

PAL18
4895

6612

4896
4897
4898

6613

M12
PRINT
K8288

[12 BIT COUNTER
[ENABLE SHIFT SECTOR

[12

AND

BIT

SHIFT

K8828

[ENABLE READ

DAREG

[SAVE

BUFFER
[LOAD MAINTENANCE
SURFACE AND SECTOR
[READ CRC

COMMAND

[READ

DUMP
I

DUMP

[REPORT

PAGE

SCOPE LOOPS,

AND

CLA CLL

LAS

V142A

4986

7-MAR-77
CLA

SERRO

[NO

TYPE
8"?
152

ERRO

CRLF
anr

1688

TAD
1N0

K0017
HEDTAD

DCA

.41

HLT
DCA

4989

6638

4918
4911
4912

6631
6632

anr

4913

4462
4457
7488
7348
1288

4468

OCTEL

1688
7184
7428
5257

TAD

6641
6642
6643

Enno

TAD

3231
4457
7482

4918
4919
4928
4921

LOOP

SWITCH 2

[INHIBIT ERROR BELL
[YES

7482

6637
6648

5888
IT SCOPE

PAGE 9-15

SERRO
K8287

6627

4915

[Is
[NO SCOPE

6626

4916
4917

.018

13155
SPA
JMP
TAD

4987

6634
6635
6636

ERROR T0 AFT IF NEED BE.
[GET SCOPE LOOP POINTER
[SAVE FOR RETURN
[GET

[GET

4988

6633

[REPORT

ERRO
SERRO

RTL

7710
5748

8145
1346
3226

6614

ERRO:

4484
7886

6622
6623
6624
6625

[MAKE

[GET TEXT POINTER
[MASK 8-11
ERROR HEADER TAD

[MODIFIED

HEADER

TAD

.42

PRNTER

[MODIFIED HEADER POINTER

HLT

PRNTER

TEXPC
CLA CLL

[PRINT PC!
CMA
ERRO

[GET PC

ERRO

IPRINT PC
[GET TEXT

SNL
an»

NTGD

/u07

ERRO

TAD
I

POINTER
STORED
POINTER

CLL RAL
GD!

4922
6644

3200

DCA

6645

4457

PRNTER

6646

7482
1700

TEXGD

6647
6658

4928

6651

4929
4938
4931

6652

4932
4933
4934
4935

6653
6654
6655

6656
6657

TAD
SMA
a“?

7700
5254
1162
4461

[PRINT Go:
ERRO

CLA
.43
GDREGi

TAD

100C!
110

4460
7610
3288

OCTEL
NTGD,

SKP
DCA

OCTAL

[PRINT

FOUR

OCTIL

CLA

ERRO
ERRO

1200

TAD

7104

CLL

4937

6662

7428

4938

6663

577a

SNL
8"?

NTCRC

4939

3288

DCA

ERRO

4948

6664
6665

4941
4942

6666
6667

1157
7484

RRNTER

1165

110

4945

6678
6671
6672

1164
4161

11»

4943

OCTEL

4946

6673

4468
7510

4947

6674

4948
4949

6675
6676

BIT

[PRINT rwo OCTAL

6668
6661

3208
1347
3315

[WAS IT A 6
[NO
[GET DATA

603362

1163

4936

4944

8117

SURFACE

MAINTENANCE

[LOAD

K7688

DCA
LAS
SMA CLA
JMP

1181
4434

4923
4924
4925
4926
4927

SEQ

GET ALL

[GET STATUS
[READ BUFFER

RDCRC

AERRO
TAD I

5748
2288
4462
4462

4914

SWITCH
IT

[NO

.‘2

3348
4484
7788
5217

6615

4984
4985

Isl

1688

6616
6617
6628
6621

4899
4988
4981
4982
4983

[WAS

4885

4892
4893
4894

'ERHLTQ'

[MASK

DUMP

[SUBROUTINE FOR ‘ERR0R51'
[ERROR TYPEOUTS-

4886

4898
4891

AFTER

4883
4884

4889

TYPE,

4881
4882

4887
4888

REGISTERS

RDSTAT
RDBUF
CLA CLL
TAD
DEA
TAD
LDMAN

6518

4878

[INHIBIT

K8488

AND

4864
4865

4871
4872
4873

8116

8
LAS

6588

4869

6476
6477

4442
4456

SEQ

[CHECK FOR CLASSIC.
[ROUTINE TO EXECUTE,

GET

4856

DUMP,

9-14

.-1

4854
4855

4863

8888

PAGE

CLASIC
CBTYPE

5663

4847

13155

7'MAR-77

[GET

TEXT

POINTER

RAL

[PRINT

cps

TEXCR
CRREGI
[PRINT

TwoCT

SKP

NTCPC.

cnazez
/PPINT

CLA

DCA

ERPO

TAD

XTEXT

DCA

PCNTRZ

FOUR

OCTAL

BYTE

PAL10
4950
4951

V142A

6677

1343

TAD

XFEG

6700

3010

DCA

6701

1131

4953

6102

3344

4954

6703
6704
6705
6706
6707

1200

4952

4955
4956

4957
4959

4959
4960
4961

4962
4963
4964
4965

4966
4967
4969
4969
4970

TAD

DCA

PCNTP!

[COUNTER

TAD

ERRO

IGET

TEXT

POINTER

NOTEX

/No1'

THIS

ONE

501

7104

CLL

3200

DCA
TAD

1345
2345
2345

6714

JMP

PCNTR2
PCNTR2
PCM'RZ

3315

DCA

.42

4457
7402
1410
4460

WINTER

STRAUT
SAVEND
K7777

5303

JMP

TAD

3532

DCA

4406

CLASIC

6726

6717

4741

JVS

4975

6730
6731
6732
6733

5740
5257

UMP

4976

4981

6734
6735
6736

4982

4900

7104

2010

6737

5320

4904

6740

0000

4985
4906
4987
4968

6741
6742

6476

6743
6744
6745

0165
0000

6746

1347
7424

4999

4990
4991
4992
4993

NOTEX.

3200
2345
2345

4993

/GE'I

To EXECUTEHH
RECOVERABLE ERROR HALTS
[CHECK FOR GET ALL REGISTERS

SERRO
NTGD

[GET

ITRY

BAKPNT

JMP
/

6747

6750
6751

7406

0000

SERFO.
XDUMP.
XTEXT,
XPEG:
PCNTRI.
PCNTRZ;
HEDTAD.
HEDLST,

DUMP
TEXST

CPPEGZ
0

HEDLST

ERTX1

EPTX?
ET”!
EPTX4

7437
7453
7471
7502
7514

EPTX6

4997
4996
4999

6755
6756

7526

ERTX7
ERTXB
EPTX9

6757

EPTXS

7536
7551

5000

5001
5002
5003
5004

IROUTINE TO ENTER MAINTENANCE
mm 034:1 TO ENABLE SHIFT 1'0

MODE AND
LOWER 511.0

PAL10

V142A

7-MAR-77

5005
5006
5007
5008

6760
6761
6762

0000

MAINZ,

7331‘
4455

CLA CLL
LnMIN

6763

7010

RM?

5009

6764

4455

5010
5011

6765
6766

7300

LDMAN
cm cm.

5012

5760
7000

13155

PAGE

9-17

JVP

CML

RAR

[ENABLE SET MAINTENANCE
[LOAD MAINTENANCE
[ENABLE SET 004:1
ILOAD MAINTENANCE

MAIN2

5014
5015

ISUBROUTINE FOR "NO ERRORS" AND SCOPE
ILOOPS. UPDATE UP COUNTER "REGl' AND
IDOWN COUNT "REG?" on EVERY ENTFY.
I

7000

0000

7001

4°06

7002

4440

700)

7004

7000
4404

7005

0100

7006

7650
5215

7007
7010

NERRO,

CLASIC
CBCKPA
L15
AND
SM CLA
no

DCA

4406
4437
7402

CLASIC
cnlNoU

5033

7017

5034
5035

7070

7021

7710

5036

7022

5637

SPA
UMP

5037

7023

I52

5033

7024

2153
7610

5039
5040
5041
5042
5043
5044
5045
5046

7025

5233

7026

1153
7140
3154
4424

a»?
TAD

7030
7031
7032

7033

STPHLT:

Is:

1600

3237

TAD
DCA

4404

LAS

SKP

CLL

a"?

7034

2200

7035

5600

am:

5049

7036

0000

70781,

5050

7037

0000

SNERRO,

5048

5057
5050
5059

suncu

EXECUTE.

nus

/REPLAcE
[CHECK
[WAIT

11Fop cuss”.
FOR OPERATOF.

PROGRAM HALT
IUPDATE pc smut
[GET SCOPE LOOP POINTEF
ISTORE row RETURN
[cm sun-ca e

ISTOP

NEPRO
SNERRO

CLA
I

mo DON'T HAL'I'
IGET BINARY END

K7777

NERRO
I

nusx

IENTEP

SNEPPO

SCOPE LOOP

IYLS

REGI

IUPDATE

UPCOUNTEP

NEX‘rsr

IEND or

PARTICULAR

CLA

ISUBROUTINE

REG?

DOWN

ISETUP

[REPLACED wITH
I

COUNTER

TIMING

HACK

SNERFO
Name

/UPDATF

NEPRO

IUPDA'IE

NEFRO

SAVE

0000

7041
7042

SETUP;

SETUP

FIELD

1433

TAP

[GET

HOME

3757
1151

DCA

BAKFLD

7043

TAD

“PM?

IGET

EMF

FOP

INT.

7044
7045

6701
3465

CD?

[SWITCH

FIELD

DCA

THSF‘LD

K0001

AFT
57mm

STORE

SEOUFNTIAL

1057
pc

7040

11:57

11661
CMA

5053

5056

CLASSIC,

5051
5052
5054
5055

NEXTST,

K0200

TICK
152
152

5047

DCA

NEXT,

1051

HLT

2200

5637
2200

[ROUTINE

STPHLT
SAVEND

1007

3532

5031
5032

7027

FOP

[CHECK

N0?

7011
7012
7013
7014
7015
7016

5030

MODE

PAGE

5013

5019

AGAIN

TEST

PCNTR?
PCNTR?
AU7‘010

6754

5028

SAME

REGISTERS

EPRO

4996

5027

ALL

RAL

6753

5026

0119

IALL

6752

5020
5021
5022
5023
5024
5025

500

XX:

IROUTINE

1
I

4994
4995

5016
5017
5018
5019

ICHECK FOR NEXT
CONSTANT SAVED

XDUMP

HLT

UMP
CLL
DCA
152
152
151

POINTER

[REPLACE LAST LOCATION
[CHECK FOP CLASSIC.

CBERR
ERHLT9,

MESSAGE

IPRINT FOUR OCTAL

1007

4974

HEADS

AUTO!0

PCNTR1

4436
7402

151-0911 FOR PFNTER
IPRINT XX!
IMODIFIED TEXT POINTER

Isl

6724
6725

4970
4979

TEXT

OCTEL

4971
4972
4973

4977

HLT

TAD

0118

EFRO

IS!

BAKPNT:

FOR

SEQ

RAL

152

2344

9-16

AUTOW
F7771

7500
5332

6710
6711
6712
6713
6715
6716
6717
6720
6721
6722
6723

STRAUT,

PAGE

13155

7-MAF-77

RETURN

71:57

PAL10

V1421

7046

1254

7047
7050

3466

7051
7052
7053

3467
BAKFLD,

9-19

K5403
I

K9092

INTRO
K0003

FOR

LOC.

[JMP

[GET

ADDRESS RETURN

[HOME DP

HLT

JMP

5640

PAGE

SEQ 0120
110
DCA
TAD
DCA

1031

7402

13155

7-MAR-77

SETUP

[

7054

5403

K5403,

5403

[ROUTINE

LOAD UPPER FUEFER

7055
7056

9000
3236

7057

7301

7060
7061

PAL10

UPPER.

DCA

1136

7-NAR-77

13:55

DATA

[SAVE

10151

CLA Cbb XAC
SNERRO
DCA
M12
TAD

3237

V142A

[SETUP

PAGE

SHIFTER

MASKER

11
SEQ

7062

3200

7063
7064

4444

7065

0237
7640
1066

7066
7067
7070
7071

1236

UPPF1;

1077

DCA
ENHANl

NERRO

TAD
AND
61A CLA
TAD
TAD

70757

7072

7300

LDNAN
CLA CLL

7073

1237

TAD

7074

7104
3237

CLL
DCA

7077

2200
5764

7100

5655

Isz
0MP
J"?

7075

7076

4455

susaio
K0002
K0100

[SETUP COUNTEF
[ENTER MAINTENANCE MODE
[GET DATA
[MASK
[A ONE OR lER07???
[A ONE111I
[ENABLE SHIFT

MAINTENANCE

[LOAD

snzpno
RAL

SNERRO
NERRO
UPPR!
UPPEP

[COUNT BITS
/MORE TO GO
[UPPER BUFFER

LOADED

[ROUTINE

CHANGE

PROGFAM

DEVICE

CODES

CLASIC

7101

4406

7102

4431

casWIT

7103

7000

NOP

7104
7105
7106

4404

LAS

0332

AND
DCA
TAD
DCA
run
DCA

3236

1334

7107
7110
7111

3255
1333

7112

3237

7113
7114
7115

1655
3240
1640

7116

0331
1236

7117

CHANG,

7120
7121

3640

7122
7123

2237
5313

7124

4406

7125
7126
7127

4436

CHANGR,

DCA
TAD
AND

19770
70151
UPPER

CCNTFI
I

svsnan
unpza
SETUP

SETUP

‘

IOT

CODE

[ADD

SETUP
UPPER
snznno

/UPDATE POINTEP
[UPDATE CHANGE COUNTER

DESIRED

[CHANGE CODE

/CHECK FOR CLASSIC.
[ROUTINE TO EXECUTE,
[DEVICE CODES CHANGED.

HLT

JMP

POINTERS

ADDRESS POINTER

10151

CLASIC
caana

5730

FEW

[SAVE IT
[GET OLD

CHANGE

amp

CHNHLT,

[GET

17007

och
Isl
152

[SAVE DESIRED

cunpor

TAD

2255

7402

TAD

[CHECK FOR CLASSIC[ROUTINE T0 EXECUTE.

XBGN

[CONTINUE

PRESS
CONSOLE

IPACKAGE HIT CONTROL F.
/

7130

0200

XBGN,

BGN

[
7007

A7007:
A0770,
CCNTRI:

0770
7771

CHNPOTI

CHNPOT

7134

7007
0770
7771
7135

7135
7136

6131
6136

1071

5127
5120

7137

6111

IOT3

7140

6100

IOT4

5129

7141
7142

6064
6122

IOTS
IDTE

7131
7132
7133

5130

IOT?

0121

PALIQ

5131

7143

5132
5133

V142A

7290

9999

5149

7291

5141

7292

5142

7293
7294

1922
9196
7659

5151
5152

7295

APTB.

TAD

9264

7219
7211

7212
7213

1197
3663
1299
1979

7214

3299

TAD
DCA

7215

1921

TAD
RTP
JNR

7216

7012
5699

IAPT

5158

5169

7221

1922

TAD

5161

7222
7223
7224

9196

AND

5166

7225
7226
7227

5167

7239

5169

7231
7232
7233
7234

5174
5175

9999

KTICK.

K7377

/MAKE SURE CONSOLE DISABLED

SNA

2266
5629
6992

6214

TAD
DCA
HLT

1159

3233
7492
6272

INOP

XMXLAs

7235
7236

4777

7237
7249

3266

K9994
APTE

IGET MEMORY SIZE
ISET UP MEMORY SIZE
RETURN
INOH 0N APT.

21
I

APTa

THE

JMP

5629

IAPT

5179

K4999

[SEE

lEaTABLIsHEs

ROUTINE

IADOUT

HILL

NOTIFY

ART

ERROR

TAD

AND

K4999

/SEE

SNA CLA
JMP I

NAERRo

INO

NAERRD.

7-MAR-77

13:55

7251

1775
3265

5199

7252

6214

5199

7253

1774

TAD

5191

7254
7255

3256

DCA
TAD
NLT

SAVPC

1265
7492
6272

5196

7261

5773
7299

5197

7262

5641

5199
5199
5299

7261

5767

7264

7377

7265
7266
7373
7374
7375

6529

5293
5294
5295

HILL

IFIELD 0F

UVPROM

/NOTIFIEs

APT or

NAERRo

NYLAsoa
7377

9999
5991

CLKCNT;

~2777

9159
6699
5991
6599
200!

TEXPC'

TEXT

TEXGD-

TEXT

‘GD:“

TEXCR,

TEXT

“CFI‘

PAGE

“PC1'

5269

7402
7463

5210

7404

237?

5211

7405
7466

2324

TEXST,

TEXT

"STI'

7796
I4¢2

TEXDB’

TEXT

"D31"

0315

TEXCM.

TFXT

'CM;'

7200
D49!

TEXDA,

TEXT

"0A1”

TEXAD.

TEXT

"ADS"

TEXDT,

TFXT

'DT:'

TEXAC,

TEXT

"AC1"

TFXT

"STATUS

5215

7415
7416
7417

7209

7200

7200
0104
7290
9424

5276

7429
7421

5217

7422

7200
0‘83

742)

7200
/

5218
7424

7425
7426

2329
0124
2523

7427

4022

7439

M597

7431

112!

7432

2405
2249

7433
7434
7435
7436

"527

7217

2290

FRTXI,

DATA

/RERLACED

7209
F704
7700

5219

IGET PC

7401

7414

ART

(6529

7490

5214

XMYLAs,
K7377,
SAVRC,

7400

IGET CURRENT

529'

5213

AND

FIELD

(KCDF
.42

7376
7377

5212

sEND

TESTS

11-2

7497
7410
7411
7412
7413

MOST

sAVPC

CIF
J"?
CLA
JMR

PAGE

(ERRO

5297

5296

/D16ADLE INTERUPTS

CLA
TAD
DCA
RDF

5195

sEC

IDF

7299

7256
7257
7269

1.5

1922

V142A

FIELD

SYSTFH

9196
7659
5641
6992

7247
7259

DATA

KTICK

7243

RAL19

CURRENT

IRERLACED uITH CURRENT DATA FIELD
IFIELD 7. LOCATIoN OF UV FROM

7242

7245
7246

ART

IGET RREsENT DATA FIELD

.41

7241

7244

KCDF

5192
5193
5194
5195

9999

/NOT ON APT
/INCREMENT COUNTER
/N0
IDIsADLE INTERUPTS

5191

5292

5199

5291

PLUS

TIMING REOUIRED 91

CLA

TAD (-2777
DCA CLKCNT

1376

5179

5194

SWITCH

APTO

CI! 79
096 I (5599

/
[THIS

5193

9123

K7999

J“? I
KTICK
Is: CLKCNT
JMP I KTICK
IOF
RDF

5177

5192

SEQ

PROGRAM

7659
5529

5176

5186
5197
5199

ART

ACT.

7229

5173

ACT
MAIN

5159

5171
5172

(RETUFN TO

ROUTINE WILL GENERATE

/THIS

5157

5169
5179

[SKIP

APT9
22

5156

5165

K4999

DCA 22
TAD
DCA I
TAD

3922

7217

/HARNARE CONFIGURATION

AND
sNA CDA
JMP I
TAD
AND

7296
7297

5153

5164

FUNCTIONS

5699
1922

5154
5155

5162
516]

SYSTEMs,

l
7299

5149

FOR BEING ON THE ART OR ACT
PACKAGE AND szTCH REGISTER

5139

5159

9122

[ARE NDP's.

5136
5137
5139

5146
5147
5149

SEQ

PAGE
ITHIs RouTINE TEST
[IF ON APT CONSOLE

5135

5144
5145

11-!

PAGE

1077
/

5134

5143

13155

7-MAR-77

6145

FEGISTEF

ERROR"

CURRENT DATA
ERROR

FIELD

93510

!1-3

PAGE

13155

V1422

7OMRR-77

0317

EFTXZ,

TEXT

"COMMAND

ERTXJ.

TEXT

“DISK ADDRESS

ER2X4,

TEXT

”DATA

:R'rxs.

“x1

'CRC

ERTXG:

TEXT

'DATA

13155

PIG!

SEQ
5220

7437

7440
7441
7442
7443
7444
7445
7446
7447
7450
7451

5221

5222

0124

ERROR"

1515

0116
0440
2205
0711

2324
0522
4005

2222
1722
0000

7452
7453

0411

7454

2313

7455

4001

7456
7457
7460

0404

ERROR"

2205

7461
7462
7463
7464

2323
4022
0507
1123
2405

7465
7466
7467

0522
2217

7470

2200

7471
7472

0401

7473

REGISTEF

2240

BREAK

ERROR"

2401
4002
2205
0113
4005

2222
1722
5223

7502
7

0000
0322
0340

2205
0711

2324
0522
4005

2222
1722

0000
5224

0401

ERROR"

2401
4022

7521

7522
7523

7524
7525

Plbll

0507
1123
2405
2240
0522

2217
2200

V1424

7'KIR-77

7526

0411

ERTX7:

TEXT

“DISK SKIP ERROR“

7527
7530
7531

2313

ERTXB,

TEXT

'DISK

ERTXS,

TEXT

“AC

TEXT

"FKBE DISKLESS PISS COM°LETE'

11-4
SEQ 0125

5225

7532

5226

7533
7534
7535
7536

7537
7540
7541
7542
7543

7544
7545
7546
7547
5227

4023

1311
2040
0522
2217

2200
0411
2313
1624

4005

2222
1722

7550

0000

7551
7552

0103
4022

7553

0507

7554
7555

1123

2405
2240

7556
7557
7560
7561

0522
2217
2200

7562

2213

7563
7564
7565
7566
7557

7005

7570
7571

7572
7573

4004

1123
1314
0523
2340

2001
2323
4003

7574

1715

7575

2014

7576

0524
0500

7577

TEXEND:

5230

5231

ERROR“

0522
2225
2024

5229

INTERRUPT

4011

SSS

PIL10

V1420

7-MAR.17

13155

PAGE

11-5

11111111
11111111

10000000
11111111

11111111

0100

11111111

0200

11111111

0300

11111111

11111111
11111111

11111111

11111111
11111111

0100

11111111
11111111

11111111

11111111
11111111

11111111

11111111
11111111

11111111

11111111
11111111

11111111

11111111
11111111

11111111

1300

11111111

11111111
11111000

1100
1500

11111111
11111111

11111111

11111111
11111111

11111111

11111111
11111111

11111111
11110000

2000
2100

11111111
11111111

11111111

11111111
11111111

11111111
11100000

00000000

2200
2300

11111111

11111111
11111111

11111111

11111111
10000000

00000000

11111111
00000000

00000000

0000

0500
0600

0700

1000
1100

1200

1600

1700

11111111
11111111

11111111

2400

11111111

2500

11111111

11111111
11111111

11111111

10000000

2600

11111111

2700

11111111

3000
3100

11111111
11111111

11111111

1 111 1111

1 1111111

11111111

11000000

00000000

3200

11111111

3300

11111000

00000000

11111111
11111111

11111111

11111111
11111111

11111111

3700

11111111

PAL10

4000
4100

V1421

11111111
11111111

7-MAR-77

13155

PAGE

11111111

11111111
11111111

11111111

11-6

11111111

11100000

00000000

11111111
00000000

11111111
11111111

11111111
11000000

11111111

00000000

11111111
11111111

11111111

11111111
11111000

11111111

00000000

11111111
00000000

11111111
11111111

4200
1300
4100
6500

11111111
11111111

11111111

4600

11111111
11111111

11111111

4700

5000
5100

11111111
11111111

11111111

5200

11111111

5300

11111111

11111111
11111111

5100
5500

11111111
11111111

5600

11111111
11111111

11111111

11111111
00000000

11111111

00000000
11111111
11111111

11111111
11111000

11111111

11000000

00000000

11111111

11111110

00000000

00000090

00000000

11111111

11111111
11111111

11111111
11011111

6000

11111111
11111111

11111111
11100000

11111111

6100

90000000

11111111
00000000

11111111

10000000

00000000

11111111
00000000

11111111

11111111
00000000

11111111

00000000

““000000

00000011

11111111
11111111

5700

6200

11111111

6300

11121111

11111111

11111111
11111111

6100
6500

6600
6700

7000

7100

11111111
11111111

11111111

11110000

00000000

11111111
00000000

11111111

11111111
00000000

00000000

7200

11111111

11111110

00000000

7300

00000000

00011111

7400

11111111

7500

11111111

7600
7700

0127

11111111

3600

SEQ

11111111

3100

0126

11111111
11111111

11111111

3500

SEQ

PALID

V1424

40770
47007

7132
7131
4440
4441

13155

7-MAF-77

PAGE

11-7
SEO

ACCHP!

canYI
CBTYPE

4426
4435

ENHANZ

4445

ERHLT1

CIF

6007

ERHLT2

5031
6142

CCNTR1

7133

ERHLT3

6115

7101

7113

ERHLT4
FRHLTS

1200

ERHLT6

7126
7134
0232
4406

ERHLT7

ACCHP2
[Ch
ACREG

0174

ACSAVE
ADREG

1345
0172

CHANG
CHANGE
CHKCLI
CHNHLT

AERRO

4425
7200

CHNPOT
CKCOUT

4423

CLASIC
CLASIK

APTE
APTGA

AUTO10
BAKFLD

7701

0010

5732

ERHLT9
EFF!
EFRMES
ERFO

IOT4
1015

6100
6064

IOT6
IOT7
IOTCHN

6122

6104
sava

K0000

0064

6125
6151
5725

K0001

0065

K0002

0066

K0003

0067

0736

1320
6600

K0007

4436

K0010
K0017

0070
0071
0072
0073
0145

K0020
K0037
K0040

0074
0075
0076

K0070
K0077

0114

CLDR

6135

ERROR

CLKCNT
CLRALL

7266

ERTXl

7424

ERTXZ
EPTXJ

7437
7453

0230

CMREG

4453
1315
0170

CBBYZ
CBBY3
56014

1300
1061
0515

7471
7502

7514
7526

C8015

1116
1075

CNTFLC
cNTRLD
CNTRLE
CNTRLL

EPTX4
ERTXS

BGN
BYRETR
C3011

CBCHAR
CBCKP

CLRTRN

4440

CICKIH

4425

CICNTR

4427

C'CONT
CBCRLF
55001

1145
4433
0310

0600

CNTRLR
CNTRLS
CNTVAL

0511
0521

ERTX6
ERTX7
ERTXB
ERTX9
EXIT
EXITA

0252

EXTFLD

5201

coup:
COMPZ

6033

F10P1
F10P2

9921

6044

consob

0000

F150R

9920

CNTRLO

1022

CSCKPA

0551
0545
0537
0500

6145

5426

K0004
K0006

7052
6720
0200
0506

BIKPNT

7536
7551
6457
0440

anzz

K0100
K0177
K0200

0115
0077
0117
0100

K0207
K0212
K0215
K0240

0101
0147

K0260
K0377

0063
0116

0146
6461

FILCNT

1040

K0400

0102

1262

CRERR
CRLF

6060

050010

4462

K1000

0607
1033

CRREGI

0164

FILLER
FLDMAX

1037

C60011
58002

0176

0103
0104

CRREGZ

1347

0350

DAREG

0165
0171

FLSAVE

55003

FROCT

6400

03004

1006

DBREG

0167

0162

C3DO7
CEECHO
CBERP
COGET
CSHANG
CBINOU

0527

DCLR
DLAG
DLCA

6742

GDREGI
GDREGZ

K2000
K2525
K3737
K3740

6743

GETCH1

0163
0703

K3777
K4000

0105
0106

0456
0443

K4100
K5000

0124

0454
6004

K5252

K5403

7054

CIOCTI

6741

K5777
K7000

0127

K7377
K7600

7264

4434

4436
0624
1122

6744

GETDAT

DMAN

6746
6747

GOITA
GOTOA

4437

DOCNT

0247

4432
4424

DONEA

CBPASS

0426
0212

GTF
HEDLST
HEDTAD

COPAUS

4441

HOMEMA

4430
0666

DOSET
ans!
DSKP

0251

CBPRRT
CBRDPS

6745
6741

CBRETD

0614

DsKaKP

4447

INDEXI
INMODE
INTADD

CBRETR
CBSETD
COSETS
CBSVIT

0536

DTREG
DUMP

4431

ENDIT

0173
6476
5716
0742

CBSHST

0745
1021

ENDTST

CBTHPI

DLDC

DOPACK

0613
0535

V142!

ENDHLT

ENHANI

7-MAR-77

5670
4444

13155

PAGE

6746
0175
0455

0120
0122

6462

0126
0121

0107

1076

K7700

0125
0112

INTRO

6011
0031

K7717
K7740

0123
‘0113

IONHAT

4437
some
6131

K7771
K7774

0131

IONHT
1021
IOT2
10T3

K7775
K7776

0130
0111
0110

K7777

0132

0225
7037

T715
T725

3041

0177
7014
6703
0166

T72R
T73E
T73R1

3060

0020
5256
5257
5223
5334
5335

T73R3
T74E
T7431

6136
6111

0129

11'8

SEQ 0129
0150

7220

NTCLAS
NTCRC
NTGD

4404
6106
4452

091
OF!

4427

PISCNT

0250

6075

PCLF

6662

6117

PCNTRI
PCNTRZ
PCOUNT

6744

PCSIVE
PNTBUF
PRINT

1344
1120
6463

PPN

6423

T102R
T1030
11035

PFNTE“
PPSFLD
PSIE

4457
021»

T103R
T104D

5416

6665
6663

T1045

5532

T74R3
T75E
T75F
T765
T76R
T770
T765

0151

4450

4451
4455
6144

0136
0141
0137
0142

0143
0144

DCTEL

0140

PSKE
Psxr
Psta

0134

PTSTOR

0135
6256

RDAD
FDADD

6760
0030

PDBF

5430

FDCM
RDCMD

0133

SETUP2

6674
6657

SNERRO

4460
9021

STPHLT
STRAUT
STREG
SWR
T1010
Tl01E
T101R
T1020

0022

6745
5771

STCON

11025

5301

5452
5453

5531

T73R2

T74R14
T74R2

6661

T104R
T105D

5475
5664

T79E
780E

6664
0336

2105E
T105P

5665

6200

137R

131E
TEZE
TBJE

4446
6226

T3BP

139R

4456
6240
4443
6263

T400

T45E

T45R1

4454
6063
4442

T47E
T480

REG2
POUINS

1316
0415
0153
0154
1302

PDBUF

5723
0747

RDCR

1333

PDCRC

1341

RUST

1146

FDSTAT
PEALPC

1336

1270

5610
1355
1412

3115
3266

3204
3210
3233
3340

3302
3303

3305
3322
3434

3411
3475

3452
3525
3556

3607
3641
3672

3724

1444

104E
T85E

3771
4033
4106

1501

TBSOK

4105

1647

THSRI
T86E

T4641

1623
1636
1660

TB6F2

4046
4276
4204
4214

T4612

1703

TB6R3

T460

T66R4
T87E
T87R1

T495

1716
1742
1767
2032

T502

2074

T51E
353E
T545
T55E

2114
2156

T87R4

T92E

4641

2225

T9291

4612

2252

4630

T57E

2305

TSBE
159E
T605

2320

T92R2
194E
T95E
T97E
T985

5060

T61?
T62E

2429

T99E

5126

2444

T99R1

5071

2504

T99R2

5106

2544

TABLA

T45R3

T66R1

4236
4260
4374
4307
4320
4340
4356

0253
1330
7501
7421
1346

REDOA

ROUTMP

5762

0152
1317

PTFLDl
RTFLDI

5645
5234

5764

RTFLDJ
FTFLD4

5312
5430

PTFLDS

5507

SAVAC

5763

sBVEND

uao7

5443

sAvpc
sacflrx

7265
0155

5522

soup

6130

T63E
764E

7031

SERFO

674a

T65E

2633

TABLE

0471

7033

srr

4405

T6RE

2715

0242

SFTUP

704a

SETUP!

1733

2750
2774

0156
0157

6737

169E
T705

TCNTHI
TCNTR7
TCNTF3

7000

4435
5655
5247
5325

REG!

2333
2354

Tfl7fl2
18703

4717
4750
5025

0461

0160

83510

V142A

TCNTR4
TEXAC
TEXAD

9151

15130

1142

15131
15132

1162
1203
1217

TEXCR

7422
7416
7412
7494

TEXDA
TEXDB
TEXDT

1414
7419
7429

TEXEND

7552
7492
7499
7495

TEXCM

TEXGD
TEXPC
TEXST
THSFLD
TICK
1MPCNT
TOCT

107L01
TOFLD2
TOFLD3
TOFLDI

TOFLDS
10151
1510
1511

15110

15133

1311

15183

15137
15138
15139

1343

15184

1400

15185

1430

1514
15140
15141
15142

0266
1470
1526
1545

15143
T5144

1565
1601

15186
15197
15188
15189
1519
15190

15145
15146
15147
15148

1615

15149
T515

2000
0302

15197

0236

15150

2035

15199

9245
0353

15151

2077

15152
15153

2117
2134
2200

TSTCHA
TSTLAS

9933
4424
9746
6314

5621
5232
5319

5426
5595
7036

15158
15159
1516

9494
9517
9547
9571

15162

15119

15180

15182

5999
9375
9429
9434
9452

15118

1518

1263

151106

15116

15178
15179

15181

5499

15117

11.9

1233

151103
151104

15115

PAGE

15134
15135
15136

5131

15114

18154

5205
5262

15155
15156
15157

5456

15160

15161

15163
15164
15165
15166
15167
15168
15169

15191
15192

1652

15193
15194
15195

1722
1746

15198

TTYLPT
THOCT

2230

TYPE

2255
2272

UPAROW

XERRO

9936

4303

XFROCT

4377
4426

xlowwr
XLAS
XLDAD
XLDCA

9959
9937
9994

0344
4457
4507
4600
4646
4672

4722
5000
5031

5063
0715
5200

1121

4461
4434

XLDCM

9959
9955

XMAINX

9944

XMAIN2
XMYLAS
XNEPRO

9945

7263

XPRINT

9935
9934

XPRN

0057

XRDAD
XRDBP
XRDCM

994a

0056
9943
9054

xRDsr

9942

XREG
XSDKP
XSET

6743
9947
9995
9457
0460

0023
7130

XTOCT
XUPPEF

0061
0027

2507
2600

XCBCKP

104!

XC8CN1

0400

2636
2657

XCBCRL
XCBEC"

1023
1063

2677

XCBERR

1207

2720
0324

XC8INO

0635
1000

XBGN

9739

15171

9752

15126
15127
15128

9777

15172
15173

2777
3044
3200

1949

15174

3271

XCUBH

1957

15129

1197
0260

3400
3437

1513

15175
15176
15177

XCETTY
XC8TYP
XCHANG

PAL10

V142A

XCBOCT
XCBFAS
XC8PAU
XCOPNT

2753

XCEPSH

3500

13155

PAGE

XTABLA

0131

9951

XLDMN

XRDCR

SEQ

9952

XTABLB
XTEXT
XTICK

9793

CORE USED

0032

1112

0025

15123
15124
15125

115

9529
e741

0651

1517
15170

SECONDS

0062

XDOLPT
xDOsw
XDUMP
XEND

0130

9949

XAERRO
XAPT8I

0643
0657

4036
4200

9941

XCRLP

WATMES

18121
18122

RUN-TIME!

3727
3774

XCOMP2

SEQ

9996

2400
2423
2447

9925

3644
3675

9953

HIERRO

2310

15120

GENERATEDI

0333
3612

XCLAS
XCLDR
XCOMPl

0315
2336

2323

1512

7-MAR-77

3530
3561

0615
6331
7055
7064
7241

UPONE
UPPER
UPPRl

0614
9252

ERRORS DETECTED!

13155

151100
151101
151102

15111
T5112
15113

LINKS

7-MAR-77

6742
9924

0250
0337
0303

0656
0262
0272
1077
0026

11-10

10770

5098

47007
ACCMP1

5107

10826
1584
2221
2568

2872

ICL

ACREG
ACSAVE
IDREG
IERRO
APT!

38181
AU1010

1289

1339

1610

1627

2762
2576
2892
3337
3677

2260

2592
2934

3512
3906

2088

2127

2166

2200

6583

6584

399

553

642

6614
483

4632
492

4663
560

6972

6601

640

668

996

1003

1005

885

891

897

631
8738
235

3104

SEQ

0132

SEQ

0133

1559
2017

2841

2481
2851

3150

3165

3275

3560

3601

3623

3997

6027

670

672

815

833

4396

961
746
786

886
866
2661
969
534

4982

8416
738

5119

173

815B
881

378
7626

5020
6493
R984
287

9904

C8002
C8803

765.

5386
767

C8004

7306

739

C8007
COECHO

462

3196
4664

886

92'
161
962
871

4532
156
990
9794

CBXNGU
C8OCTA
C8FASS

966

6436

844
726

4623

CBPIUS

986
801

CGBETD
CBBETS
C8SHIT

532
636
826

678
561
465
537
639
1266

CBSHST

650

491

CDTMP1
C8172!
CBTYPE

727

730

6331
536
441

764
906
566
5102

51231
50944

51044
139
1059
5100
147

312
51154
51244
1634

956

1265
5028
1014

1148

46284

5164

5174

10926

5029

5646

4734
539
467
5095
499
734

131

175

176

6422
5094
1111
4630
52021

4433

1335

1386

1703
1956

1768
1972

2287

2321

2588

2599

2362
2610

2769
2951
3288

2786

2798

2956

2960
3369
3847

423

629

4726
680

6826

807

9244

331a
3512
4437
1019
4609

929

931

4600

4492

4531

4572

4587

6463

4465

4471

4672

1411

1434
1856
2028
2620

6613

6631

1541
1899

1572
1902
2211
2510
2731
2901

44616

1399
1713
2591

1820
2016

2366
2523
2327
29s:

2391

1480
1869

1696

1509

1886

2070
2661
2665
2864

2109
2457
2679
2882

1888
2140
2690
2889

2176
2499
2726
2901

3020

3074

3088

3491
4007

3531
4038

3586

4082

3133
3607
4143

4597

467?

4673

4871

2839

2661
2861

2975

2978

3382
3992

3415

3448

3002
3468

3916

3944

397a

4103

6704

45381
4565

6564

6546

4902

4911

2666

2703

4450

10201
6610

4991

5314
4904

4794
4334
4464
4601

471

CNTPLS
CNTVAL

624
1137

4511

4513

1138

45514

4563

CRERF

6558

CFLF

11006
12284

45631
4‘26
4556

4874

4901

4745

4942
4944

1964

464

12294

4559

DIFEG
DEREG

12334

1517

12311

1988

DCLF

10624

4629

4732
1528
1989

6662

4841

4971

5113

COMP!
COMP2
CONSOL

168

666
632
7616

364

1676

12326
420
426
625
621
622

$434
460

5124

1940

4365
1015

599

5112

CLRILL

3783

5114
570

502

1127

10766
5019

5624

4842

CLASIK
CLDR
CLKCNT

CPREGI
CRREGZ

666

3056
3450
3871

397

4588

236
839
729

CNTFLP

3963

3R31

4392

6573
437

868

CLRTFN
CMREG
CNTflLC
CNTRLD
CNTFLE
CNTRLL
CNTRLG

3934

3801

4385

395

4504

CLASIC

3117
3519

3436

4101

387

4951

C8CHAR

CKCOUT

2469

10304

4981

10726
11166

C8875

CHNHLT
CHNPOT

2457
2831

979

6965

1126

1616

CHKCLA

2436
2800

3895
5154

1005!

CHANGR

2625
2790

2776
3947
3464

2766
3037

946

5151

995
809

CCNTFI
CHANG

1990

3736

5149

993
806

CAP

1530

1962

2048

5143

C8812
C8BY3
C8BY4

C8RETD
CBRETR

14a2

1966
2443
2812

1810

800

CBBY1

C8809!

1464

1930

1770

3558

148

C8PRNT

1447

6280

569
3515

4394

CBHING

1423
1909

1743

6560

12496

C8888
C8663

2372

1404
1890
2398

4226

366

146

CIDO11

1389
1859

3430
3772
6334

3401
3740

3670
6387
5139'
1266

436

C8D010

2998

6539

453

C8801

2618

1234'
10711

BYRETR

COCRLF

2304

1376
1829
2350
2754
3006

554

BGN

CBCKP
COCKPA
CBCK6N
C8CNTR
C8808?

1662

12366

50644

BAKPfiT

1365

6108
1690

10836

5056
49674

BAKFLD

1353
1645
2277
2601
2942
3395
3706

3369
3693
4173
1718

3307
3636
6063
ICCMFZ

51221
51214

1529
2348

6987
1557

155a

2369

4683

4596
4684

1597

1663

1660

1904

1919

1926

2232
2529
2739
2921
3185

2254
2558
2750
2924

2271

3219

3257

3661
4195

3723

3753
4302

4249

2586
2762

2937

DLAG
DLCI
DLDC

10634

4598

10644

4585

10664

4611

DMAN

10674

DOCNT

170
377

4640
172
3844
1474

DONEA
DOPICK

140

DOSE?

164

171

DIET
05K?
05K8KP

10654

10614

4570
4621

10894

2685
DTFEG

12354
3932

SEQ

0134

1774

174

1299
2715
3399
3933

1351
2727

4876
44354
6794
44134
1920
2757
3226
3848

3400

3961

1794

1800
2732
3434
3962

1849
2735

4077

4985

3435
3995

1879
2740
3738
3996

2338
2902
3739
4025

2495
2909
3770

2497
2°11

2500
2992
3799

4026

3771
4061

2648
3198
3829
4106

2650
3207
3830

2663
4518
3904

4394

4395

2462
2954
3449

2491
2976

2513

2530

2562

3028

3498

3079
3538

3095
3589

4451

3469
5077

4062

2666
3905
4685

4686

DUMP
ENDHLT

48544
1057

4858

ENDIT
ENDTST
ENHAN1

656

1131

661
4126

10774
2708

3140

3615
ENHAN2

10784

EPHLT!

1049

EEHLT2
EFHLT!
ERHLT4

1050

EPHLT5

ERHLT6
ERHLT7
ERHLT9
ERR1
ERFMES

EHRO
ERROR

1051

1900
2734
3190
3664
1520
45334

45744

1054

46154

1055
1056

46444
49734

665
972

669

10244
48854

4888

4958

4978

5187

10804

1291

1301

1484

1500
1860
2244
2620
2967
3521

1532

2603

2944
3482
4029
4991

52194

4992

52204

4993

52214
52224

4072

ERTX4

4994

ERTX5

4995

52231

ERTX6

4996
4997
4998

52244
52254
52264

4999

52270

EXIT
EXITI

4812

4823
3944

EXTFLD

4119

41274

F10?!
FIOP2
F1508
FXLCNT
FILLER

FLDHIX

634
644
624
763

761

008562

2117

2150

2183

2431

2334

2862

2922

3319

2883
3350

2905

3289

3383

4144

4196

4250

4303

3416
4366

2003

4652

4693

4722

4733

4900

4903

4915

4917

4923

4926

4934

4935

4939

4947

4954

1311
1561
1911

1324

1341

1355

1629

2019
2445

1425
1745
2129
2519

1466
1812
2202

2718
3210

3246

3774

3803

2050
2483
2814
3309
3879

1402
1720
2091
2502
2853

1448

1612
1948
2356
2692
3111
3742

1378
1664

1391

1586

1367
1647
1992
2407
2742

766

1892
2262

4345

4409

2279

1932
2312

2638
3008
3570

2653

2668

3058
3644

3123

4110

4184

3714
4237

4114

4147

566

802

913

4799

4808

987
4809

1712
4929
1333
1577
1710
1960
2239
2454
2337
3267
3510
3822
3983
4315

1271

12264

1684

1685

2145
12274

2178
1285

4553
1320

1492

1519
1715
1944
2218
2430
2807
3141
3452

1546
1735

2796

3111
3451
3764
3949

2874
3371
3936

2546
2894

3403
3965

2578
2914
3438
3999

7704

47814

2422

3339
3908

1773
2168

7694

1153

2217

2778
3278
3833

1692

SEQ 0135

1259

1710
1943

4291

1964
2381

48324

12384

FL5IVE
FROCT
608561

2079

3258
4083
1979

6754

1135

2223

ERTX7
ERTXB
ERTX9

1549

2039
2793

46334
46024
45894

1052
1053

1831

ERTX1
ERTX2
lRTX!

4421

1959
2238

2440
2829

3266

3475

3791

3792

3980

3981
4269

4261

1713
1349
1578

1759
1974
2256
2477
2847

3295
3517

3823
4009

4323

4199
10324
4820
1737

4306

4358

1761

1762

1792

1793

2036

2075

2114

1362
1581
1764
2003

1417
1604

1420
1607

1440

1441

1444

1638

1795
2034

1821
2072

1623
1840

1871

2257
2561
2868
3296
3546
3869

2300

2307

2073
2323

2326

1656
1905
2112
2368

1460
1682
2142
2394

2590
2929
3325
3597
3897

2597
2939

2752

2760

2773

1477
1687
1923
2177
2395
2788

3004
3385
3688
3919

3022
3386

3052

3090

3419
3731

3420
3761

4010
4363

4051

4067

4104

4155

3947
4208

4399

4542

4068
4561

3946
4162

4931

3356

3614
3898

2614
2985
3357
3673
3918

2111

3730
3921

1922

GETCH1

4215
6474

GETDIT

374

4084

380

375
3974

382

GOITA
G070!

402

403

544
4990
4905

404
801

405
947

49914
49904

1254
3724

3259

3298

3331

3359

3389

3424

3456

3471

3500

3549

3590

3755

3784

3813

3853

3893

3925

3953

3987

4016

4054

4088

2689

2711

2957

2961

2964

3234

GT?
HEDLST
HEDTlD
HOHEHA

INDEXA

655

368

12374
3618
4096

1253

372

381
433

3666

401

4074

448

639

4064

8424

INMODE

384

INTIDD

1130

45174

INTRO
IONHAT

11304
10814
3243

5062

1309

2516

2533

2538

2543

2632

2636

IONWT

1136

45084

4516

4517

4520

4522

4523

4530

1071

46214

5125

IOT2

46294
45984

5126

45554

5128

45704

5129

1076

46114

5130

1027

46404
10754
11574
11584
11594

5131

2121

2154

2187

2613

S061

IOTJ
1014
1025

IOTCHN
K0000
K0001
K0002

5127

1251
4164

4217

5059
2042

2082

5081

K0003
K0004
K0006

K0007
K0010
K0017

K0020
K0037
K0040

K0070
K0077

K0100

11604
11614

2429
2680
1269

11644

4180

12124
11664
11664
11674
3674
4093
11814
11824
11684

2035

3145
K0177
K0200
K0207

K0212
K0215
K0240

K0260
K0377

5063

11624
11634

11844
11694
11704
12144

12134
4797
11564
11834
1171'

1526
1515

2476
2687
4233
2074
1555
1545
3304

4730

4742

4869

3427
3025

345:
3959
4339

3476

3504
3928

3552
3957

3598

3900

3991

3620
4021

4057

3042

3053

3080

3098

3112

3134

4328

1772
3203

2845

2866

3229

3239

2885
3665

3031
4452

1521
4897
4773
4771

1550

3534

3536

4656

4864

5023

4827
4757

3334

3366
3766
4277

4381

4789

2009

2511

2536

2629

2634

2682

2706

2952

3224

4128

4525

2122

2155

2188

2563

2709

2808

4655
4019

2514
4136

2541

4018
3989

2492
4725

2531

3954
3955
1601
3790

2432
4663
1708
4206

1787

1788
4313

2110

2236

2237

3293

3294

4207

3457

3550

3591

3667

3854

3988

4017

6141

5161

5182

4087

4371

4325

4415

4970

3926

1439
3789

1602

1707

3820

3821

48364
2335
2805
4168
4826
3299

2927

2984

4221

4275

3260
4329

4377

3390
4417

3360

3425

3472

3499

3617

3698

5147

1758

1789

3332

2071

50674
1844

11764

3628

K7377
K7600
K7700

5145

52004

11904

4875

11794

4510

4010

K7717

11884
11804
1194!

1958
1681

1709

1734

2768
1262

3453
3326

3358

3421

3433

3495

3769

3828

1255

4145

4197

4251

4304

4356

5168

5190

5057
51594
1268

5163

5165

5175

L36

4429

4855

4890

4893

5022

5034

5097

6030

45954

4599

1548
1823
2994

1580
1827
3539

1883
3899

2219
3920

K7777

11934
11784
11774
11954

KCDF

5027
12154

K7775
K7776

KRHF
KTICK

LDKDD

4314

1942

K7000

K7774

4952
4765

1767

1388

1765

1516
1796

1582
1842

1606
1875

1608

1625

1924

1928

2258

2275

3948

3982

4011

2293
4044

1640
2198

1642
2331

1658
2611

1688
2631

1716
2647

2327

2370

2396

2996

3732

1479
2336
3333
3814

1494

1686
2537
3391
3894

1714
2571
3426
3927

3303
3689

3328
3702

4263

4317

LDCM
LDCMD

1337

1375

1419

1421

1443

1475

1794
2683

1996

1825

1907

1976

2005

2707

3135

3225

3393

3668
4169
2848
3497
3986

4222
2908
3537

4330
3270
3616
4085

4388

1877

3619
4097
2333
3460
3952

4378

1847

3261
3756
4276
2990
3593
4056

3300

3551
4055

2869
3592
4092

1845
2953

1445
1873

1462

1763

3271
3632
4156

3302
3669
4209

1945
2464
3081
3423

1961
2473

1981
2493

1985

1987

2010

3113

2532
3161
3553

2542

3099

2515
3146
3505

2016
2564

3194

3204

LOCI

2635

LDCUfi

4586

4612

3473

3501

3990
3363

4020
1804
3365

3794

3816

3856

3423
3924

1522
2156

1527
2189
3032
3335
3734

1551

1556

2347
3043

2433

1364

LDHKN

2890
1853
3824

3682
2240

2684
1808
3793
45824
46084

LDBUF

2980
3305
3704
4171

4224

4278

3054
3393
3796
4332

4726
4641

4731

4737

1542

1977

4694

3155
2076

4723
3683
2115

3026

3071

2290

2301

4711

46394
1510
3227
3138
2037

3367
3767

3901
4453
4870

3929

3958

3992

3621
4022

4058

4094

4657

4669

4680

4602

4697

5007

4664
5009

2006
I734

3024

3029
5075

3077

3091

3096

3142

3157

3108

3191

214a

2181

3093

3186

3220

3583

3609

3658

2324

2343

3849

3866

4041

4052

4713
5011

10284
8994

10274
1814

10254

584
574

370
565

803

2809
3240
3675

3230
3634

3477

6854

152

2084

2710

3860

949

4862

4865

3599

2044

4390

10264

974

4015

3785

3361
3855

3462

4449B

894

3725

2512

4382
4743

4653

50054
11294
1250

1458

3826

2460
4661
47094

986

0137

5082

1980

1438
3355

K7771

SEC

4387

48354

1824

K7740

0136

3633

4761

2979

11924

4701

2472
3193

11854
3354
11874
4824
11744
11754
4091
11894
11914
1186!
5060

4681

4220

2930
11734

K5403
K5777

4668

SEQ

4821

K2000

K5252

1904

2346

2144
2002

2463
3160

2083
3754

K5000

4744

2015

4287
2113
1986

3733

2043

K4100

4788

3703

11724

K3777
K4000

2987

4760
4405
4554

4170

4696

K3737
K3740

2928

4756
4341

3392
3795
4331
4376

3690
4098
4167

K1000

K2525

2806

2704

4223
4274

‘3272

1273
4856

K0400

5150

2560

2713

5083

NGSAVE

371

564

"7885

12174

3564

HYAC

1010

MYLIS

1109
1134
10794
1483
1830
2222
2602
2943

1016
44914

NERPO
"ERROR

50184
1290

804

983

4495
5031

1859

2243

2261

2619
2966

2637
3007

5032
1310
1560
1910

5045

1354

1611

1628
1963

2717
3209
3773

2311

1947
2355

2667

2691

3122
3713

3170
3741
4290

3520

3569

4071

4109

4183

4236

44014

4161

41764

4214

42294

NEXFL4

4268

NEXFLS

4322
50434
5039

42834
43374

4945

4966

NOSET

167

NOTEX
NTCLAS

4956

50454
1724
49774

NTCPC

4938
4920

49474
49344

10974

4916
4476
4466
153

NTGD

OCTEL
0P1
0P2
PISCNT
PCLF
PCNTRI
PCNTR2
PCOUNT
PCGIVE

4932

870

4953
4949
4420

4967

49884

4959
44974

4960

4961

953

1002
963

1004

10294

48404

4844

4850

4863

48034
4427
1256

4805

4591

4909

4912

149
504

859
1133

1152

PRNTER

10964
1132

P5X!
PSKF

534
514
494

B69

10864

1583

1151

10954

46784
1802

4674
1609
4687
1854

3102

3149

3154

3518

3559

RDC“

1140

RDCND

10854

RDCR

1149

46924
1321
47214

3600
4705

ROAD
80400
ROB?
RDBUF

524

277

1422

RDCRC

10934

1689

1717

1139

45694
1288
2591
2933
975
383
1283
1512

4578

10844
2575
2891

REALPC

957

REDOA

3754
12184

1493
1730

8754

4979

4980

882
4831

888
4866
4833

4924

4940

4963

286

2893

2577
2913

3907

3330

3402
3964

SEQ

0139

3437
3998

1661

1828

1857

1929

2241

2259

2276

2303

2986

3035

3084

3306
3692

3368

2371
3394

2397

3274
3676

3336

3429

3635

3705

3870

4172

4225

3463
4279

3478
4333

4860

1446

1463

1481

1497

1889

1908

4873

2480
2850

2567
2871

1742

1769

1809

2047

2087

2126

2165

2199

4872

1338

1798

1851

1881

2340

2456

2617

2753

2763

2775

2811

2830

2468
2840

2941

2939

2998

3005

3036

2435
2799
3055

2442

2600

2424
2789
3046

3103

3116

4859

1350

1363
1622
1870

1398
1637
1906

1287

1335

1344

1544

1547
1822

1573

1598

1839

1841

2141

2143
2574

2151
2615
3320

2213

3327

3757

2479
3262
3786

1374
1624
1872
2233
2810
3351

3851

3868

3917

1457

1476

1639

1754

1766

1874

1478
1876

1927

2997

1878
3301

1882

2989

3362

3384

4103

4374

4379

4384

1797
2184
3454
5042

4695

4698

4724

5085

2453
2836

3217

3726
5040

1387

1846

1848

1852

2849

2870
4039
4481

2940
4050
4484
44864
43934

4086

44874
4969

5026
4665

10084

4480

2040
2423

3290
3817

RTFL03

4202

RTFLD4

4256

RTFLD5
SAVAC
SAVEND
sAVnC
sac"?!

4309
4462

4320

11124
5188
12204

1263
5192
4654

4658

4662

1144

46204

4623

4624

4889
10694
1110
9654

4896

4899

4975

49844

1259
50544

4413
5065

5105

5106

5109

5036
1284
2771
3051
5025

5044

50504

5074

1332
2787
3089

2421

2423

2795
3110

2804

507°
2439
2828

4474

4475

4369
4159
4212
4266
4470

3511

10214

3183

2334
3137
3657
5037
12194

49894

2220
3233

4150

2767

1412
1641

1435
1655

1458

1461

1657

1921

1941

2272
2932

2274

2284

1957
2299

2987

2991

2995

3418
3979

3450

3516

4151

3492
4203

4257

1677
1973
2330
3018
3533
4310

1799

1803

1843

2322

1805
2455

1826

2255

2566

3474

3494

3509

3896

2774
3945

4727

4735

4738

4752

4753

4759

5087

5103

5111

2475
2846

2559

2572
2886

2589

2596

2926

2938

2612
2982

2751
3003

1474
1704

1975
2332
3070
3582
4362

41654
42184

42724
43264
4482
4414

52014

1584
5033

12394
2759
3021

STPHLT

1058

STPIUT

49544

STREG

12304

808

1012

4968
4576
1013

71010
T1015
T1018

4178
4175
41564

41834
41844
4192

T1020

4231

T1025

4228

42364
42374

71028

42094

T1030

4285

T1038

4282
42624

T1038

2545

2873
3370
3935

2501
2952

1465

1894
3197
3622

RTFLDZ

susnno
STCON

1811
2201

2884

RTrLDt

SETUP
SETUPI
5ETUP2

2813
3308
3878

3276
3832

1772

1644

4464
4361

SDKP
sznno
SET

2482

2777

1448
2167

1626

1807

4008
ROUINs
ROUTMP

2444

1424
1744

2128
2518

1401
1719
2090

4479

1784
2029
2337

2004

8562

1390
1691

2049

4746

RDST
RDSTAT

REG1

1377
1663
2018

883
870
266
46514

PTSTOR

4344

5088

12574

264
1143

PBTB

2380

5076
1366
1646
3991
2406
2741
3245
3802
4409

4976
4477
4478
1784
872

11214
11224

PRN

P61!

0138

9964

PNTBUF
PRINT

PFBFLD

5047

1340

1585
1931

3481

NEXTST

5046

1323

4028
4371

SEQ

5199

2278
2652
3057
3643

NEXFLl
HEXFL2
NEXFL3

10314

10224

1300
1531
1891

1499

950

4235
42904
42914

4289

50304

4577
11204

2867

T1040

T104!
T1048
T1050
T105!
T1058
T378
T388

T398

4339
4336
43164
4403
439a
4364!
2079!
21131
21514

43444
43454
4343
44094

4407
2086
2125
2164

21844
2306
22924

2197

2310

T4632

23034
23264
23454

T46!

2352

T47!
T48!

2374
2400
2427
2459

T40!
T45!

T4581
T4583
T4661

T49!

T50!
T51!
T53!
T54!

T55!
T57!
T58!
T59!
T60!
T61!
T62!
T63!
T64!

2496
2535
2570
2594
2633
2649
2664
2681

2705
2729
2756

T68!

2792
2833
2904

T69!

2936

T70!
T71!

2959

T65!

SEQ 0140

44084

23124
2298
2329
2354
23564
23814
24074

2439
2471
2498
2540
25784

24454
24834
25024
25464

26034
26384
2651
26684

26534

2686
2712
2733

2688

26924

2714

27184
27424

2766
2802
2'43
2910

27784

2912

2944i
2962

29674

2737
28144
28536

T72!

3001
3039

30294

3049
3041

30584

T72P

T73!
T7381

3106

3119

31234

30734

T7382
T7383

30774
30964

31714

30084

T74!

3152

3121
3086
3108
3167

T7481

31413

3154

T7481!
T7482

31424

T7483
T75!
1758
T76!

T768
T77!

31444
31570

3299
31914
3236
32271
32764

3169
32104
3202
32464

3238

T78!
T79!
T80!
T81!
T82!

33094

T83!
T84!

3514

T85!
T850K
T8581

3562
3566

35214
35707
35697
3568

T86!

T8681
T8682
T8683
T8684
T87!

T8701
T8782
T8783
T8784
T92!

T9281
T9282
T94!
T95!

T97!
T98!
T99!

T9981
T9992
TABLA
TABLB

TCNTRI

TCNTR2

TCNTR3

29144

33394

SEQ

33714
3397

34334

3432

34384

3466

34327

35384
3603

35854
35934
36114
36304
3679
36604
36694

36854
37004
3873
38564
38704
39364

3625
3642

3638

36444

3708

37144

3605
3627
3640
3695
3712
3681
3697
3710
35793
3865

3877

39654
39994

40294
4065
40434
40564
409

40724
4049
4070
4114

410
12214
2116

1511

2119

4204
1523

1543

2364

2124
2367

2147

2353
3076

3085

3092

3114

3541

3555
4229

3584
4254

3587

2149

2163

2182

1979
2158
2379
3153
365q
4337
3027

3162

3189

3535

3610

3205
3626

3723

3604

3663

3594

12234

2291
3699

2297

2302
9042

3239

3709

2289

2292

7295

4200
12224

3639
12244

TCNTR4
TEXIC

52174

TEXID

52154

TEXCM

52134

TEXCR

4941

TEXDA
TEXDB

52144

TEXDT
TEXEND

52164
4428

TEXGD

4925

52104

52124
52294
52094

2369

4283

4a53
3072

1982
2160

2007

2011

2038

2045

2077

2180
2392

2193

2405

3156

3168

3201

2461
3221

3662

3711

2185
2401
3187
3850

2191

2389

3864

3967

2325
2465
3237
3876

4359
3040
3540
3696
3033

4401

3032
3548

3094
3556

3107

3143

3557

3352
3997

3857

3962

3100

3192

3120

4040

4043

3079

3542

2085
2344

3503
4148

3506

3044

4176

3563

3147
3567

3588

3195

3228

3231

3629

4046

4047

4069

3076

2080
2328
3025

3158

0141

4913
4996

5203!

TEX51

1HSFLD

1132!

115K

1070!

4149
4545

4201
4564

1EXPC

5211!

TMPCNT

646

654

10C1
TOFLDI
10FLD2

1154

4751!

684!
4763

4357
4146

4367
4151

4373!
4163!

4199
4252

4210
4264

4216!

4305
5049!

4319

TDFLD3

10FLD4
TOFLDS
10151
1510

1297!

1511
15110

1299!

151100
151101

4091!

151102
151103
151104
151105
15111

1410!
4136!
4194!
4244

4301!
4349

15114

1433!
1457!
1474!
1493!

15115

1509!

15116
15117

1540!
1571!

15115

1596!

15119

1622!

1512

1309!

15120

15121

1637!
1655!

15122

1615!

15123

15127

1702!
1730!
1754!
1792!
1919!

15129

1939!

15129

1969!

1513

1321!

15130
15131

1999!

15112
15113

15124
15125
15126

15132
15133

5072
1293
1303
1426
4111
4195
4239
424a!
4346

4356!
1450
1469

2027!

15137
15139

2069!

15139
1514

2139!
1332!

15140

2096

2320!

15147

2365!

15149
1515

2390!
2412
1348!

15150

2451!

2494

15151

2499!

2503

15152
15153

2509!
2529!

2520

15154
15155

2551
2595!
2609!

15157

2627!

15159

2645!
2660!

15160

1363!
2679!

15161

2697

15162
15163

2725!
2749!

1516

15164

2785!

15165
15166
15167
15169
15169
1517

2919
2960!

15170
15171
15172

2991!
2900!
2920!
1374!
2950!

2290
2313
2357

2392
2409
2419!

2547
2557!
2604

2654
2669
1369
2693
2702!

2926!
2975
2'95
2915
1379

2969

15177

3256!

15179

3297!

15179

3317!

3340

1519

1395!
3349!

3372

3124
3211

1392
3404

3439
3493

15194

3490!

15185
15196

3575

3522
3530!
3551!

3649
3722!

3656!
3743

15189

2954

2945

15176

1217

2719

2743

2779
2915

3192!
3247
3279
3310

3447!

2579

2621
2639

3172

3381!
3414!

2446

1356

3069!

15197

SEQ

0143

4439

2263

3132!
3176
3216!

15192
15153

4296
4340
5109

4410

2245

3063

15191

4327
5099

4234
4299
4342

4292

2224

3009
3059

15190

4406

4191

2203

2974!
3017!

15173
15174
15175

4404

4179
4232

2130
1342

15145

15159

4795
4396

0142

1502
1533
1562
1597

15146

15156

4786
4375
4166
4219
4273

SEQ

1496

2175!
2210!
2231!
2253!
2270!
2296!

15149

5055

1971!

15136

15144

4360

1955!
2000!

15142
15143

4309

1919!
1939!

15134
15135

15141

4270!
4324!
5079

4255
5043

3571

3645
3715

15199

3775

1519

1403

75190
18191

3904
3934
39461
39911

T5192
15793
75194
76195
26197
13199

SEQ

3380
3909

3937
3966

39771

4000

4030

TSTCHA
TBTLIS
TTYLPT

4073
643
4130
479

THOCT

4930

4943

TYPE

4762

XAIRRO
XAPTOA

4753
462
47691
50711
5089
51901
6031
11261
11241

XBGN

51191

16199

UPAROW

UPON!
UPPEF

UPVR1
HIEPRO
HATMES

6571
481

3521
935
150

XCECNT
XCBCRL
XCBECH
XCBERR
XCDINQ
XCSOCT

640

9441
160
154
1371
3101

674

499

960

4772

4775

5110

490

500

4776
5090

4784

4774
531
4797

5101

5104

5154

5197

7991

XCBCKP

367

8761

5501
4791

155
647

4898

393

394

396

438

464

469

484

493

555
036

677
840

679

7571

769

895

970

999

1000
5911
636
145

595

1006
601

602

096

740

976

980

994
994

938

319
269

290

596

633

893

971

973

991
932

997

554

638

676

733

760

765

2611
6241

627

681

142
2291
276

157
236

2041
467
399

211

963

599

910
552

XCHING

11271

XCLI!
XCDDR
XCOMPI
XCOHPZ

11111

XCRLF
XDOLPT

535

600

11551

315

295

162
318

265

390

991

937

9591

11481
11371

11381
9691
4531
49951

X006"
XDUMP

XEND
XIRRO

4116

11351

xrRocr
xtouur

1001

x115

1073

11091

XLDAD

11471

XLDCA
XLDCM

1099
1091
1090

XLDMN
XMAINI

1094
1077

11590

anxuz

1078

11421

XMXLAs

5149
1079

51991

XPRINT
xpau
XRDAD

1099
1096

11331
11521

1096

xnoar

1095
1095

11431
11511

xaocn

xnocn

1093

11491

xnnsw

1004
4950

11391

XTABLB
xwzxr
XTICK

4828

391
8311

151

XREG
xsoxp
x521
XTABLI

4919

816

538

XCIPAU
XCBPNT

4193

990

XCOPSW
xcssw
XCITTY
xcsrvP

XCDPAS

892
4790
556
4794

914
392

7241
161
316
263

xusnno

0144

1097

1089

1069

11531

11361

11461
11451
11411

11341

11401

49971

11441
11101

373

4091

400

4101
49861

4949
1070

SEQ 0145

11251
11541

xwocr
XUPPER

1093

.L0357
.L0369
.L0361
.L0362

317

.L0163

276

3261

.L0364
.L0365
.L0366
.L0367
.1037»
.L0371
.L0372
.L0373
.L0374
.L0375

276

285

267

232
205

3291
235
3301
3311
3321

160
154
150

3331
3341
155

143

158

.L0376

156

3351
3361
3371

.L0377
.L0560
.L0561

141
139

312

3381

503

467

5091
5091

.h0562

450

491

499

5101

.L0563
.L0564
.stes
.L0566
.L0567

449

482

490

500

446
437

479

481

«93

511'
5121

440

468

4a:

497

399

391

.L051a

399

5141
515»
5161

1097

294
293

291

234
233

11291
3221
3231
3241
3251
3271
3291

5131

.L0571
.1957:
.1057;
.L0574
.1957!
.10516

.1057?
.L0752
.1915:
.L0154
.10155
.L0756
.13151
.60160
.b0761
.b0762
.L0763
.60764
.60765
.L0766
.60767
.L0770
.L0771
.L0172
.L0773
.60774
.L9715
.L0176
.19171
.61162
.L1163
.11154

399

390

394

433

5174
449

5194

379
371
369

307

395

397

5214

364

5224

363

366

671

6894
6994

667

6904

663
659
645

6914

639

637
636
631
599
596
593
569
566

6924
6934
647
6954

633

7004

625
7024
7034

7014

677
642

554
7084
600
9024

912
811
910

.L1167
.1117»
.L1171
.L1172
,inva
.11174
.11175
.L1176

907
904

9914

902

500

9084
9094

764

9104

759
732
731

9114
9124

.11177
.L1365
.L1366
.1135?
.L1370

729
1013
1001

.L1371
.L1372

970

999

.L1373
.L1374
.L137s
.L1376

965
963

10404

962

990

956

1014

.L1371

927

1044a

.L5773
.L5774
.15775

4491
4479
4477

4494
45004
45014

.L5776

4475

45024

.L5177
.L6576
.L6577
.L7373
.L7314
.L7375
.L7376
.L7377
.voaoa
.vaoa7
.voazo
.veoz:
,vaazz
.vooca
.vao77
.V0100
.V0150
.vaa77
.vozaa
.vozaz
.V0215
.vo240
.Vuzeo
.vezez
.vw272
.v9277
.voaaa
.vozas
.V0400
.vo515
.V0615
.voeza

4467

4796

45034
4795

4794

4787

5195
5190

52034
57044
52054

5172
965
671

6994

10344
45014

4479

45004

637

6964

279

3264

293
5190

52044

232

3314

233
764

284
732
963

467
399

596
551
143
631
449
141

666

676

7074

990

9034

933

9044

9054

994

977

999
991

10374
995

10394

1005

19424

10394
997

10414

996
10434

1003

44994

SEQ 0147

49794
4791

4794

731
4475

45024

3244

399

5144

759

9114

997
599

10414
6994

93?

9054

675

6934

7004

993

9024

971

973

977

981

985

10394

3364

535

600

7094

912

935

890

9034

927

10444

490
3374
1003
996
499
636
3354

560

5114
469

493

492

5134

511

915

933

970

999

10394

647

652

48904

9134

3304

9104
6924
3234

9124
991
5094

51:;
633
7394

158

4467

45034

9994

482
156

990

99a

160
450

3331
491

154

3344

150

.V1041
.V1063
uV1075

205
234

155
3324
647
235

670

672

706:

394

433

449

.V1076

7064

7094

.V0635
.V0745
.V1000
.V1023

640

672

52064
52074
10404

1013
4477

659

662

913a
9144

10354
10364
990
973

5173

7054

652
639

10341

994
976
971

5197

679

9014

993

335
915
332
9064

.Ltaes
.L1166

670

6944

6994
6994

7044

551
535
996

5234

6974

564

552

0146

6964

555

553

5194

5204

675

640

SEQ
399

6944
3294

137

440

1005

10424

9914

994

510»
5974

976

990

994

391

5154

555

677

989
679

10374
7054

379

397

395

397

399

5194

51a:

639

6954

nV1077

276

285

3274

388

390

517I

552

554

.V1121

446

479

481

495

.V1200
.V1302
.V1345
.V1346

139

312

364

5124
527'

593

625

7014

4491

900
9071

909'

4494

3384
44994

363

366

5234

569

7024

371

520.

564

7044

904

9044

962

662

666

10364

676
907

9064

7074

.v13I1
.va1Ae
.vsoo:
.vsvaz
.VSJII
.vosaa
.vssoo
.usu
.vseoa
.v1o92
.v1sla
.v752e
.v1seo
.v71oo
.v111¢

369
281

5173
956

4186
4786
5172
5195
5187
317
667
663

$93

521i
325!
5206i
1916
4795
‘787
52910

52030
5255!
322!
690i

691!
5980

'3261
729

9140

566

70]!

802

fiafil
SEQ

10430
‘879!
4791

4794

10$!

1GJSI

4889‘

0149