12606 9001_12606A_Diagnostic_Jul69 9001 12606A Diagnostic Jul69

User Manual: 12606-9001_12606A_Diagnostic_Jul69

Open the PDF directly: View PDF .
Page Count: 97

Download
Open PDF In Browser	View PDF

..........--------...:..-- HEWLETT

j

PACKARD------------.

MANUAL SUPPLEMENT
DIAGNOSTIC PROGRAM PROCEDURES
for

12606A
DISC MEMORY INTERFACE KIT

12606·9001

HEWLETT.PACKARD COMPANY
11000 WOLFE ROAD, CUPERTINO, CALIFORNIA, U.s.A.

Printed: July 1969

12606A

Table of Contents

TABLE OF CONTENTS

Section

II

III

Page

GENERAL INFORMATION
1-1. Introduction . . . . . . . . . . . . . . . . . . . .
1·3. Equipment Required . . . . • . . . . . . . . .
1~4.
Instruments • . . . . . . . . . . . . . . . . . .
1·5.
Accessories . . . . . . . . . . . . . . . . . . .
1-6.
Diagnostic Tape and Programs ......

1-1
1-1
1·1
1-1
1-1

PREPARATION
2-1. Introduction . . . . . . . . . . . . . . . . . . . .
2·3. Printed Circuit Cards . . . . . . . . . . . . . .
Punched Tape Reader Card . . . . . . . .
2·4.
2-6.
Teleprinter Card . . . . . . . . . . . . . . . .
2-8.
Disc Controller Cards ...•........
2-10. Cables . . . . . . . . . . . . . . . . . . . . . . . .
2-11.
Interface Cable . . . . . . . . . . . . . . . .
2-13.
Power Interconnecting Cables .......
2-15.
Main Power Cable . . . . . . . . . . . . . . .
2-17. Disc Memory . . . . . . . . . . . . . . . . . . .

2-1
2·1
2·1
2·1
2·1
2·1
2-1
2-1
2-1
2-1

TEST
3-1.
3-3_
3-5_

Section

Page

Core Requirements for Test Program ....
Octal Notation . . . . . . . . . _ ......•.
Looping Read or Write Routines .......
Varied Test Patterns .....•....•...•
Execution Message Suppression .......
Reading or Writing Blocks . . . . . • . . . • .
Parameter Split Between Lines ......••
Counting Errors Without
the Teleprinter . . . . . . . . . . . . . . . . .
3-28. Returning to
"BINARY TEST PATTERN'?" ..•.•..
3-30. Glossary of Diagnostic Messages . . . . . •.
3-59. Switch Register Control Settings . . . . . . .

3·7.
3-9.
3-11.
3-13.
3·15.
3·17.
3-21.
3·25.

IV

INFORMATION
Introduction.................... 3-1
Number of Tracks . . . . . . . . . . . . . . . . 3-1
Data Transfer Block Sizes . . . . . . . . . . . 3-1

TEST PROCEDURE
4-1. Enabling and Loading . . . . . . . . . . • . . .
4-3. Track-Protect Test . . . . . . . . . . . . • . _ .
4-5. Track Address Test ............••.
4-13. Read/Write Test . • . . . . . . . . . . . . . . .
4-32. Sector Timing Test . . . . . . . . . . . . . . . .
4-34. Power Failure Tests . . . . . . . . . . . . . . .
4-36. Power Failure, Read Cycle . . . . . • . . . . .
4-38. Power Failure, Write Cycle _ .. , _ ..•..

3·1
3·1
3-1
3-1
3·1
3-2
3·2
3-2
3-2
3·2
3·3

4-1
4·1
4-1
4·1
4-3
4-3
4-3
4-3

LIST OF TABLES

Table

Title

Page

3·1. Table of Disc Memory Tracks . . . . . . . . . . . . . 3-1
3·2. Table of Core Memory Data Transfer
Block Capacity . . . . . . . . . • . . . • . . . . . . . . 3·1
3-3. Table of Core Requirements for TestPrograms .. 3-1

Table

Title

Page

3-4. Table of Control Settings for
Looping Routines .....•.•.... _ .....•• 3-1
3·5. Table of Switch Register
Control Settings . . . . . . . . . . . . . . . .. . . . . 3-3

i/ii

Section I

12606A

SECTION I
GENERAL INFORMATION
, 1·1.

INTRODUCTION.

1·2.
This is a diagnostic test program. It contains a
series of routines that test the reliability of all program·
mabIe features of a Hewlett·Packard 12606A Disc Memory
, Interface Kit and either an HP 2770A, 2770A·01, 2771A,
or 2771A·01 Disc Memory.

c. Data Channel Interface Card, HP 12606·6001.
d. Command Channel Interface Card, HP 12606·6002.
e. Interface Cable, HP 12606·6003.
f. Main Power Cable, HP 8120·0078.

1·3.

EQUIPMENT REQUIRED.

g. AC Power Interconnecting Cable, HP 02770·6003.

1-4.

INSTRUMENTS:

h. DC Power Interconnecting Cable, HP 02772·6003.

a. Computer: HP computer with DMA option.
1·6.

DIAGNOSTIC TAPE AND PROGRAMS:

h. Teleprinter: HP 2752A or equivalent.

a.

Diagnostic Tape, HP 20346B.

b.

SIO Buffered Teleprinter Driver:

e. Punched Tape Reader: HP 2737 A or equivalent.
d. Disc Memory: HP 2770A, 2770A·01, 2771A, or
2771A·01.

4K Memory - HP 20322A
8K Memory - HP 20323A
16K Memory - HP 20330B

e. Disc Memory Power Supply: HP 2772A.
1·5.

ACCESSORIES:

a. Teleprinter Interface Kit, HP 12531B.
b. Punched Tape Reader Interface Kit, HP 12532A.

C.

SIO Buffered Punched Tape Reader Driver:
4K Memory - HP 20303A
8K Memory - HP :!!;::306A
16K Memory - HP 20319A

12606A

Section II

SECTION II
PREPARATION
2·1.

INTRO·DUCTION.

CAUTION

Do not connect the AC Power Intercon·
necting Cable (02770·6003) to a power
source other than the disc memory power
supply (connector J2).

2-2.
This section contains instructions for assembling a
complete disc memory system of Hewlett-Packard
components.

2-3.

PRINTED CIRCUIT CARDS.
CAUTION

Turn off computer power before removing or inserting cards to prevent
damage to cards, computer, or both.
2-4.

PUNCHED TAPE READER CARD.

2-5.
Insert punched tape reader interface card into an
appropriate I/O slot in the computer.
2-6.

TELEPRINTER CARD.

2·13.

POWER INTERCONNECTING CABLES.

2·14. Connect the DC Power Interconnecting Cable
(02772·6003) and the AC Power Interconnecting Cable
(02770·6003) between the disc memory and the disc
memory power supply.
2·15.

MAIN POWER CABLE.

2·16.
Connect the Main Power Cable (8120·0078) from
the disc memory power supply to 115 volts ac.

2·7.
Insert teleprinter interface card into an appropriate
I/O slot in the computer.
2-8.

DISC CONTROLLER CARDS.

2-9.
Insert the data channel and command channel in-·
terface cards into any two adjacent 1/0 slots with the
12606-6001 card in the higher priority location of the two.
The track'protect switch will be located between the inter·
face cards when they are correctly inserted. Interrupt
priority to the disc controller interface cards is not
necessary.

2-10.

CABLES.

2-11.

INTERFACE CABLE.

2·12.
Connect the Interface Cable (12606·6003) from
the interface cards to the disc memory.

2·17.

DISC MEMORY.

2·18. Turn on the disc memory power supply and the
computer.
2·19. Adjust the helium pressure to the disc memory as
follows:
a. Read the low pressure gauge on the regulator, visible
from the right side of the disc memory; pressure should be
1/4 psi to 1/2 psi, cold.
b. If necessary, adjust the helium pressure by bleeding;
bleed by pulling down on the plunger valve located on the
chassis, above and in front of the low pressure gauge.
Helium pressure will rise as the disc warms up.

2·1/2·2

12606A

Section III

SECTION III
TEST INFORMATION
3-1.

Table 3-3. Table of Core Requirements for
Test Programs

INTRODUCTION.

3-2.
This section contains general instructions and
tables to be used with the test procedures in Section IV.

3-3.

LOCATIONS

All Sizes
All Sizes

000100 - 001726
002000 - 005737

NUMBER OF TRACKS.

3-4.
Data is stored on the disc in parallel on doublecircle tracks. Each track contains 90 (132 octal) sectors and
each sector 64 words. Each word has 16 bits plus a parity
bit. To determine the number of tracks in a given disc
memory, note the HP Model number on the back of the top
plate, next to the pressurized housing, and compare it to
those listed in table 3-1.
Table 3-1. Table of Disc Memory Tracks
HP MODEL NUMBER

NUMBER OF TRACKS

2770A
2770A-01
2771A
2771A-01

32 (40 octal)
64 (100 octal)
64 (100 octal)
128 (200 octal)

3-5.

CORE MEMORY SIZE

PLUS ONE OF THE FOLLOWING
4096 (4K) 16 bit words
8192 (SK) 16 bit words
16,384 (16K) 16 bit words

3·11.

I

DATA TRANSFER BLOCK SIZES.

3-6.
Table 3-2 lists the capacity of various core memories to store data en bloc. This characteristic of a core
memory limits the quantity of data that can be written into
the disc memory or read out of it in a single block.

Table 3-4. Table of Control Settings for
Looping Routines
SWITCH REGISTER
BIT SET
TO LOGIC "I"

REACTION UNTIL
SWITCH REGISTER
BIT SET TO LOGIC "0"

Bit 2

Read routine loops

Bit 1

Write routine loops

Bit 0

Both read and write routines loop

DATA TRANSFER BLOCK SIZE

4096 (4K) 16 bit words
11 (13 octal) sectors or 704 words
8192 (SK) 16 bit words
74 (112 octal) sectors or 4,736 words
16,384 (16K) 16 bit words 90 (132 octal) sectors or 5,760 words

3·13.

3·1.

CORE REUUlREMENTS FOR TEST PROGRAM.

LOOPING READ OR WRITE ROUTINES~

3·12. Since some errors may not appear until after the
disc has been running for several minutes, both read and
write routines should be set to loop for at least 10 minutes
when conducting any test (see table 3-4). The status of
both read and write routines is shown by indicator lights on
the computer. Indicator lights 6 through 15 in the B-register remain on steadily durin:; a writ€, routine. Indicator
lights 6 through 15 in the B-regis::er blink on and off during
a read routine.

Table 3·2. Table of Core Memory Data Transfer
Block Capacity
CORE MEMORY SIZE

007235 - 007677
017235 - 017677
037235 - 037677

VARIED TEST PATTERNS.

3·8.
Table 3-3 lists the core locations that will be used
by the diagnostic test program.

3-14. Several binary test patterns should be tried during
the read or write routines; for example, all ones, all zeros,
an even number of ones, an odd number of ones, etc. The
total test running time should be at least 30 minutes.

3·9.

3·15.

OCTAL NOTATION.

3-10. While this diagnostic test program is running, all
numbers contained in input parameters or output messages
are expressed in octal notation.

EXECUTION MESSAGE SUPPRESSION.

3-16. During execution of the read or write routines,
switch register bit 3 set to logic "1" suppresses all execution error messages except "DISC NOT READY".

3-1

. 12606A

Section III

3·17 •.. READING OR WRfTING BLOCKS.

If it is d~rable to read or write selected blocks of

a·18.

tracks or sectors, they may be specified in the following

manner:

3·19. The above statement would read or write the fol·
lowfng octal track addresses:
M,02' 021022 023 024 025 026, 040
f141042 043044045046047,070071
3·20. Sector block S020·004 would write the following
sector addresses:

CP2' 1p21 022 1p23
3·21.

PARAMETER SPLIT BETWEEN LINES.

3·22.
A virgule( I ) is used to continue a statement on
the next· 72 columll line. It must appear prior to or in
col\lmn 7~.No ·parameter may be split between two lines,
as shown in the following example:
.

T001p·~1·

....•••••••... Tlp60-/

001 etc.

3·28.

RETURNING TO "BINARY TEST PATTERN?".

3·29.. After the messages "OMA OCTAL CHANNEL #1"
and "HIGH PRIORITY OCTAL ADDRESS?" have been
initiated, address 002042 can be used at any time to return
the program to the point where the teleprinter prints
"BINARY TEST PATTERN??'.

3·30.

GLOSSARY OF DIAGNOSTIC MESSAGES.

3.31.

"DISC NOT READY"

3·32. After this message is printed, the rout~ne halts and
allows the user to ready the disc memory for data transfer.
If RUN is pressed before the disc memory is ready. the
teleprinter will continue printing the message. This message
usually indicates a malfunction of the "disc ready" status
bit. This message has the same meaning for both the write
and read routines.
3·33.

"ERROR BUSY STATUS BIT DURING WR/RO"

3·34. After this message is printed, the routine does not
halt and the current operations are completed normally.
'rhe "busy" status bit is checked just before the initiation
of a write or a read operation for a "not busy" condition. If
either condition is false at the appropriate time, this
message is printed.
·.··:t-.:

3-23".' If such a split is encountered, the following meso
sage is printed:
"WJUTE PARAMETER INCOMPLETE".
3·24.. The correct format for continuing a statement on
the next line is as follows:

3-35.

"WRITE (or READ) ABORT-TRACK"
02~ (1j)~~.177)

3-36. This message indicates one or more of the
following: a malfunction of disc power, overheating of the
disc unit, helium pressure low, a power failure has occurred,
or a write or read was attempted on either a protected or a
nonexistent track address.

TIp00-CP01· • • • • • • • • . . • • • . T061p·001 /
Tp61·~3 etc.
3·37.

3-25. COUNTING ERRORS WITHOUT THE TELE·
PRINTER.
3·26. To run the diagnostic test program for long periods
with the teleprinter off and still keep a record of ac·
cnmulated word errors, it is only necessary to set switch
register bits 0 and 3 to logic "I". Bit 0 set to logic "1"
enables read and write routines to loop. Bit 3 set to logic
"1'" inhibits the teleprinter and enables each word error to
increment an error counter, comprising memory locations
001700 and 001701. After 65,536 increments location
001700 overflows and each subsequent word error in·
crements location 001701. When the total count of word
errors is 131,072, the counter is reset and counting
continues.
3·27. When switch register bits 0 and 3 are reset to logic
"0", the teleprinter prints "BINARY TEST PATTERN?".
The error counter (locations 001700 and 001701) must be
read before entering a new binary test pattern. Entering a
new· pattern will reset the error counter.
3·2

"WRITE (or READ) INTERRUPT MiSSING"
"DMA WORD COUNT = " 167777

3·38. This message indicates that, after a write operation
is initiated, no interrupt occurred within approx.imately
100 ms. By inspecting the DMA word count, the user can
determine whether any words were transferred and, if so, ..
how many prior to time·out. The DMA word count is
output in 2s complement form. The routine does not halt
after printing this message.
3·39.

"READ PARITY ERROR"

3.40. This message indicates that a parity error occurred
while reading a word.
3·41. "READ (or WRITE) SECTOR BUFFER. OVER·
FLOWED'"
3.42.
This message occurs when more than 92 entries
into the write or read sector buffer are specified for anY'
series of "S" parameters.

12600A
3·43.

. Section III
"REAli} PARAMETER INCOMPLETE"

.. ,3·44. This message occurs if an illegal character is used
in, or a character is missing from, any read parameter.

3·45.

3·57. "ILLEGAL CHARACTER IN TEST PATTERN
PARAM"
3·58. This message occurs when a binary test pattern
parameter contains a syntax errOl.

"WR/RD WORD COUNT EXCESSIVE"

3-59.
3·46. This message occurs jf a data transfer block size
greater than available core memory is specified by single
"S" parameter.

SWITCH REGISTER CONTROL SETTINGS.

3·60. Table 3·5 lists the various switch register settings
that control execution of the diagnostic test program.

3·47.· "IMPROPER CHARACTER IN WR/RD PARAMETER"

Table 3·5. Table of Switch Register
Control Settings

3·48. This message occurs when a character in a write or
a read parameter is missing or has been replaced by an
illegal character.
3-49. "CHARACTER IN OCTAL PARAMETER IL·
LEGAL"
3·50. This message occurs when any character other than
numerals 0 through 7 is used in an' octal parameter. One
example of an illegal character is the symbol @.

BIT
LOGIC
NUMBER SETTING

REACTION

0

Input from teleprinter

1

Input from punched tape reader

0

Normal sector burfer input

1

Preset sector buffer input

0

Bypass or exit track address test

1

Loopont~ckad~test

0

Execute write/read test error printout

1

Bypass all write/read test error printout

0

Normal ex~'Uuon of read test routine

1

Loop on read test routine

0

Normal eXe.;:, the teleprinter
prints the following initial message:
"BINARY TEST PATTERN?"
4-19. At this point th~ user can form either of two
64·word sector buffer options described in paragraph 4.15,
option "a" or option "bn. The answer input in response to
this message is contah'led in an l8-character field, as shown
in the following example:
11~011~0l1~11~C

4·20. The first sixteen characters are any combination of
logic "Os" and "Is". The last two characters can be either
"Cs" or blanks, In the example, the first "C" (character 17,
indicates every alternate word of the 64·word sector buffer

4-2

4·25. With a computer that has an 8K (8192 words)
memory, one possible answer input is SOOO.100, SlQO.()32.
This will write sectors 0 through 77 octal, and then sectors
100 through 131. The character "S" identifies the Instruction as a sector location. The first and second groups
of three digits carry the same information as they do in the
response to ~40

0~403

"5~1""1

~l1dfl4

t151P'1

~fL!4f)5

~'4f)5~5

(HU6t'l B521 {15
".~ 4 6 7 0 !5 1 C?; 4 0

~1i117

~~47fl

~44514

~~471

0461~5

004}2 043~01
. "1d473 "4o~413
0047.4 000047

~078

o\6 4 7 5

~V179

~~80

(;.H1I22 OCl

47

CHAR. COUNT
A8-At5 MASK

~8:31

oct

0~47t'l

1 77 4 ,~ 'J
(HH'040

sa~2

(jCl

13"'477

000~54

S8~3

OCT 54

COMMA

e~81

V,:J5I-H" 00"'~'57

S8~4

(iel

SLASH

(II'~82

~"'S.tll

01i1~QI!:>5

S8~5

nCT 55

k)?R3
0H84

1t.)3S'.:)~

004557

AwlBf

LEF

WTHlJF"

IC0'5tJ3

0~4557

~A~T~

IJEF

ltiTRUF

008">

l1~50d

0~4757

,.

~A\t-SB

liEF \l.SRUF
ARll:if nEF F1TBUF

WORKING ADDRESS

~

17741A0
40
57

BL At-Jl<

WORKING ADORESS

S!:Sf 11Ef WS8Uf:

"{Hs6
87

0V15~5

1304757

,,~)

~0~~6

0~5247

(II~88

""AltTe nEF RT~UF"
ARSBF r:Ef RSnUF

WORKING ADDRESS

~;~90

0~5Q17 0k15:?47
IIH151Q1 1d~5447
0iJ511 0~5447

i'tAFtSti nEF RSRUF

WORKIt-lG ADDRESS

~091

0~512

~01t.l124

S6~6

r.CT

124

4 SC 1 t

~t192

V'~513

0130123

S837

(jCT

123

ASC J I S

~09J

0L1'514 00\"1515
fclVlS15 9144515

0tHi9

0~Q4

lA[23 OEf/lse

~ES23

T

MES2~
19,IMP~OPER

CHARACTER

","'516 05"'122
"'0~17

ro4752Q1

'lhJ~2~'
it"'~21

042~22
02~q03

0~!)22 04 4 101
l»1d523 051101
",.~ f, 2 4 0.4 1 52 4
1d\1~25 042522
01iJ~26 kJ20t11

00~27

0471'140

\11:\53r;t
~(l5J'

1t53522
027522

"~5.32

04204~

10"533 05\1101

ot' ~ :s lIS

~1.3~35

It-) 5

1 1~ 1

0465~5

0Vi:'l36 052105
"~337 05112140

""'95
0f\96
0\"97

.,098

k)\15 4 ~ 00 til (1 Iti I:.)
IhP541 000000

0'i542

00~1j43

0~543

0!'.l3522
016544 "'44524
00545 04244@

0(6*146 050 Hl1

00547 051101
005:50 046505
00551 0521tC5

584Ct;1

GCT '"

5a41 DCl
I A[ 24 un
MES24 ASr.

~
f-AE~2.i

13,w~rTE

CHAR. STO~AGE-ST. TRACK
SEQ. TRACK VALUE-CHAR. STORAGE
BUFF~P ADOR.
PARAMETER INCOMPLETE

PIG~

#01

000~

bPECIAL

~uc

rlSC DIAGNOSTIC FOP 2115/2116

o~ ~6 2 e5 te' 4 0
el4~53

~44516

005541 f'!41b17

0099

'HHc:1
0HH

00!1S5 ~4652~
00556 0461kJ5
0"'557 05~1f!15
0"'560 ~0~~1:5?

00!)fll 000502
011:7"\6~ 053522
0~'"i"3

044524

0e.~b4.
'·0'" ~ 6 5

0 5? 1 2 2

CH'24 UCl 32
CHAR. COUNT
IAL25 nf~ fES?~
BUFFER ADDR.
MES25 ASC 15,wwITE TRACK 9UFFER OVtRFLO~ED

04;24-416

00566 04()51G3
00567 04544"
0W:'!7e (;41

1~5

0_~571

VJ43H'6

~'1:i72

042522

I'H1~)13

'"'211117
tH1!'> 7 4 ') 5:3 1 ~ 5
13~:>75

0511"'6

"V1~7ti

~46J17
~53505

CHJ577

t.Hlh<-'t-1
"'0/01

\142~4kl

01~2

00~035

CH/l25

OC'

rll~3

00~i-)2

58412

LeT 17777'5
lIeT 177775

0104

006V'i3

177775
177775

t(ll~5

"..,604

0"0NH~

LA~TB

~q~6

~0bt15

lIQO'IPlll0

LA~St3

!ill~7

~06"'6

0~H"'~V;7

IAI:26

r.108

£H16 1.:)7 053522

~ES26

~id61"

5843

35

SHAR.

cnuNT

-3 COIJNTER
-3 COIINTfR-WORKTNG
GC 1 Vo
LAST TRACK W~lTE BUFFER ADDIf.+1
eCl e
LAST SECTOR WRITE RUFF. ADDR. +1'
DEF Io',ES2f..
BUFFE:R AOnl-?
ASC 15,Wf.l1TE SECTOR RUFFER OVERFLOWED

044524

kl0eill

04244~

~0"12

V1515!a5

00613 041~24
00614 047522
00~15
~lhi1

0109
0110
01 11
0112
0113
0114

tI

020102
052506

0"/')17

~431kl5

0~620

~511140

0~h21

e47'526

0\jfl22

~42522

~;Jb23

f(j43t14

0~624

0.47527

0~1'!25

0425e4

0idtl26

0~W0l36

"~627

e:f00~~6

~ ~ f\

J 0 0 ~ IiHl f(j 2

00631

fc10~HH'I3

00632 0\'HHHH)
0~633

100377
00634 100V'1Pt0

CH.26 llCT
ro'ASK6 UCT
I'IAS6A OCT
~AS1A eCT

36

CHAR. r,OUNT

6
2

DI'1A .ADDR.

.3

I'iCCMt' OCl "
S8~4
OCT HH~377
~CCM ... (lCT IMH))"'0
wnl-Alft OCT 02(;.H'I t4 0

0115
0116

0~b35

0117

~'1ft3h

'H'I0t;HH~

WDJR

0118

'-1\3037

0~0"00

0119

~Hj640

177M~~

IJjDCNT eCl 0
584f>
(JCT 1176\.i"

0129
0121

0tJe41 000Ui)0
00042 000000

02001eH'

LCT 0

SCCMP OCT
5847 OCT

~

QI

M~R/WCR AnOR. FOP CHAN.6
MAR/wr.R ADDR. FOR CHAN.7
wRITE COMPLETE FLAG
TRACK MASK
TRACK/SECTOR AnORESS
H.P. nlSK ADDR. AND CLC BIT
STARTING ADDRESS
2'5 COMPL. WD. COIJNT
SECTOR MASK
SECTOR STRING COMPLETE FLAG
2'S COMPL. ~ UF SECTORS

PAG~

~~07

#~1

SPECIAL DUL rIse D1AGNOSTtc

tl122
0123

~~643

0tafHH10

0l1t;44

11{1~645

~124

0~F)45

~5J'522

~~o4f>

~27')22

(6 .. t 6 4 7

U 4 2 C1 4 0

I.1~6~e

1::153!'i17

FO~

2115/2116

5848 uCT 0
~ST. OF AVAILABLE MEM.
IAL27 VE~ ~ES27
BUFFER ADDR.
~E~27 Ase lJ.WW/RD WORD rOUNT FXCEsstvE

16k1651 ~511k'!4
IIhl652 \'121(1 t P'3
~'d6:>3

1{1475?"S

0ilfll)4 041124
"0655 162H105
~0"~t> 054 H\3
0t:t657

~42523

0~660

0l.H.l61

~51511
~531~5

~125

~,,~r,62

00~H'!32

Vlt26

~H(}"fl3

124664
003~32

ocr 32
.IMP S850.1
S8e~
DEF WAITt.!
HUFLG CeT ?
CH~27

S849

1(1127

0066d

0128

0'0665 VJ0(i.HHH'

~129

0~666

~iOV,667

IAL28

0131tl

t.142'522
l'H1670 051117

~ES2o

0~6f,7

0v:J671

liEF

Asr

CHAP. COUNT
RETURN FROM INTERRUPT
RETURN ADDRESS
DISK BUSY ERROR FL~G
MES2~
BUFFr:R ADnR.
17,ERROR BUSY STATUS BIT OURING WR/Rn

~51~4"

00f-!2 041125
0111673
013674

~515Jl

~0"'5

'1521~1

02~112.3

00676 052125
00£)77 0511140
007~0 041111
~07V11

052'''40

"07(12

~42125

(10703 ft151111
kHJ 7 VI 4 16 4 7 1 0 7
0~7('5

02t11127

~07~6

0510157

007~7

~lJl

111132
~\

l:n

05111.14
00710 00M:J42
014711 000712

00712 1642111
00713 051503
0i171~

uCT 42
CHAR. COUNT
lA'29 DEF ~ES2Q
BUFFER AnOR.
~FS29 ASC 7,Dl s C NOT REAOY
CH~28

02"'116

0~715

e47524
00716 02~122
0itt717 042501
e£l72C'! e42131
£I~7 21

013~vJ16

0~722

00"'723

e~723

1:l511~5

16
CHAR. COUNT
LEF MES3~
RU'FER ADryR.
ME:30 ASe 7,READ TRACKS?
CH~29

uCl

IA[3~

k>0724 0.H~504
1.10725 1!.2kl124
"("'2111 0!)11~1
~1J727 £141513

007JP-

~5144e

£10731

£137440

0137

£l1d732 000015

~138

007 33

~(iHH'I00

CH.30oel

BUFF

15

HS5 36

CHAR. COUNT
INPUT SUFFER

PAGE
"139
,~ 140

0~V.8

0:6117

q.~1

Sf:>ECIAL D ur: [ISe DqGNOST I C FOR 2115/2116

001~0r.

o Hl.10 351

H~5

01"'td1

040~"4

01~02

02~12"

JAIll r, E Fo I'IESJ'
8UFFFR AnDR.
MES31 ASC 13,RJ;AD PARAMETER INCOMPLETE

010"3 040522
01\1/'44

040515

010~5

042~24

010"'6

e42~22

01\'1167 020111
011:410 t>4711i'3
01011 047515

01 '" 12

0lett
0142
0143
fi144
"145

0~0114

0111113 "'42~24
0h>14 042440
141 tH 5 000"'31
01\1,16 000000

GCT 31
LAI1TB LCl e
LAf\SB eel 0

CH.A31

"'lVll7

kl0w(.i..,~

~102ft

H01r:}~1

J A[ 32

jJ E F

~ES3~

01~21,051f~5

~ES32

ASC

14,R~AD

C~A32

DCl 34

IU33
MES33

fiEF
A SC

CHAR. COUNT
TRAC~ REAO BUFFER ADDR.+1
LAST SECTOR REAO BUFF. ADDp.+1
AUFFF:P ADOR.
rQACK RUFFER OVERFLOWED

l AS1

01022 04.""5'" <4
It'Illr123 e20124
01V124

0511~1

e1025 041513

0102{'1 101201f02
052506
01"30 043t05
01"31 051U40
01032 047526
~lvt33 042522
"1-i1J4 £14311.1
01~27

"1;.135 047~27
01"'36 (:}425P4

t1146
10147
13148

01~L37 000034
01k'J40 001~~41
01041 0~1105
01 ~14 2 1340504
"1>~43 02"123

CHAR. COUNT
BUFFER AonR.
7,READ SECTORS ?
f"IES3·'l!

01V144 0425~J
01\-.)45 052117
01~46

051123

~1"47

020~17

1.1149

01~50

01t'1yJ~16

(.\1513

01V151
0H'I1I)2
131"'53
01054
01·l55

001V152

ac, 16
lA[34 nEF f'1ES3A

'='511135

MES34

~t51

~1056

134"'5"'4

02Zl123

kl42503
052117

01\1151 051A4V1
01 ~H10 041t25

0hJ61

0431~6

161V,62

"-142522

01£163

2120117

a1~b4

0531165
01"'65 e51 U.16
01066 046117
01067 053505

CH633

ASC

15,R~AO

CI-IAR. COUNT

BUFFER AODR.
SECTOR BUFFER OVFRFlOWED

P AGE

iO 0 '~9

#

01

S P EC I AL U11 C rt S C DI AGNOS TIC

F' 0 R

2 11 5/2 11 6

(U rVl7 ~ 042 Ql4 ~

, 01 ~2
"153
~) 154

IH071

00~~35

hl7 2

~f/HHlv\n

~ 1 " 7:3

IQ

~155

,01~74

0 0 k'i VII?, 0
125(.\75

01b6

kil.}7~

(,103744

"157

i1Il~7"

e0fJ~00

,i;l158
0159

011/177
01 U:H~
0111111
~ 1102

16161!)
9161
toil 62
t\lb3
1:1164

0~HH:Vl0
t\e~(\",~

~~'HH1IC'
"Hi'l0~00

Ct-U34 OC' 35
RCCMP UCl ~
R'CCMR OCI

sae2
sse3

JMF

OEF
CHoCK oct
CSt.CT OCl
CHEri ~CT
SEr.D
UCT
SECTC eCT
see4 OEF
RDJR r.Cl
S8~6
r.EF

"'11~13

fl03125

~110A

000~~0

\ill bl!'i

~0?574

0165

011~1'l

~01t~7

lAL35 /ofF

0166

~1J(17

~421"5

to1tSJ~

Ase

CHAR. COUNT
READ COMPLETE FLAG
~
TRACK/SECTOR AOO~ESS
5853.{
RETURN FROM INTERRUPT
~AJT~+l
RETURN ~DnRESS
~
TRACK VALUE OF INPUT BUFFER
0
STARTING SECTOR VALUE OF INPUT
0
ST. AOOR. OF INPUT BUFFER
~
wORO # WIT~IN SECTOR
0
2'5 COMPL. # OF SECTORS
5743
LOOP loeN.
e
STARTING ADDRESS
~RIT~
LOOP CONTROL
MES3"\
8UFFER ADDR.
6,nEr.ODE fRROR

B41517
01111 042Ht5
01112 02V1105
01113 &15l122
~1114 047522
0111~

Qllf.l7

0166
0169

QI 1 1 15k' 0 0 ¥.1 1 4
01116 0~1117

C~AJ50Cl

14

IAt36 nEf

MES3~

01117
0112Cl!
\(\1121
e t 122
011),3
01124
01125

~ESJ6

9,RE~D

floll"5

JSC

CHAR; COUNT
BUFFER ADOR.
~ARITY

~RROR

~4((!504

\()20121t4
"j411522
044524
0544.40
042522

0112(' 051117
k1170

111127 051040
"'113" ~"H'021

0171

011:51

0172
0173

01132 001133
0lJ3J 052122
icH 134 04051!13
f, 11 3~
i!l113b

00fi'~0'"

OU36 OCl 21

sae7

OCl

IAt37 [iEF
~E~37

v

f'lES~57

ASC 16,TwACK

CHAR. COUNT
TEMP.
RUFFER ADDRESS
SECTOR
WORn NO.

045440
0~!.H14i1

01137 . 020~'40
'''1 1.40

~~15~5

01141 "41524

01142 047522
~1143

02~04(i1

01144 "20040

01145 020127
01146 047522
"1147 042;1140

011se 047117

0,1151
0174
~115

0176

1/127~40

rlJ~2

020~40

01153
01t!Sd

000~40

CtoU31

OCl

4~

0011~5

JAt38

"EF

MES3k

0115!l

~47525

01156 tdts2120
~1157 052524
011"0 td20~4'"

CHAR. COUNT
BUFF~R ADDRESS
fooIES38 ASC 14,OIlTPUT
INPUT

PAGE 00'0 #01
.01161

SPECIAL Duc

r[sc

D14GNOSTJC FOR 2115/2116

02"'040

t~H

162 02~040
&11163 02tH'40
01164 02~111
0116~

047120

~116"

062~24

01167 fd20040
01179 020040
01171 kl2t1040
e-1172

~2~"'40

0177

01173 00"R34

~17S

01174

09~~t2ti

CH~38

0179

01175 IchH574

1743
PRCT

91·18\:1

vol17': 003506

18~5

0181

01177

~t'J3"~7

S8~8

('1182
0183
0184
0185
0186
0187
"188
0189
"'190
01Q1

kl120~

003572

01201

~H13'570

SSe9
S8t0

~1202

002~.c12

S8~1

012~3

1:11 2 ~l AS

004;'25
17 75 7 7

~1?;:I5

177'577

1776

OCl 34
tiEF S743+1

CHAR. COU'4T

CEF PROTr.

I fliD •.

OEF 5855
liEF S7"QA
nEf 5769
IJEF

S769-w

OEF T4
DEf S7~6

01;>116177"43
li'12\"7 177643

cll7777

SAc9

()Cl 177643
OCT 71777

1.11211 001457

$870

nEF S9Cl3
fJEF

OCT
DCl

1176~3

5q~4

01212 1i'l(11464

S871

01Q3

01213 000CHH'I

PFLAG OCl e.

0194
~195

·01214
01215
01216
01217
01220
.a1221
01222
01223
01224
01225

IAr43 liEF t'ESd.'
~ES43

ASC

01227 020"'40
1t'12:UI "~0(125
fill?.3J 0{l!1?32

CH~43

OCT 25

fill~32

0~1105

~E544

012·~3

040St14

~

0196
0197
0198

001215
053522

122"

-1 2 9 W0 R I< I N G
-129
.. 93 WORKING
-93

177577

0192

•

•

u C 1 17"577

S8 t 2
S8t3
SBtA
S865

i0121~

Jt~n

INO.
IND.
IND.
IND.

It,W~ITE

INTE~RIJPT TIME-OUT CONSTANT
WRITE TNT. MISSING
READ (fliT. MISSING
SUPPRESS PRINT FLAG
flUFFE"q ADDR.
ABORT-TRACK:

~44524

042440
04"'5~2

047522
052055
~52122
e4~503

04b440
1i12~H~A0

IA[44 LEF MES..

ASC

10,R~AO

CHAR. COUNT
~UFFER ADDR.
ABORT-TRACK

01234 02~101
01235 041117
01~jt)

051124

01237 026524
01240 12152101
01241 ~41,)13
01242 0201"140
01243
0199
02~0

~20040

01241 000~24
01245 V774il0

CHA44 eCl 24
S8}2

DCI

7740~

'H~4"

~l04217

TRV

00n:~Hh"

~203

fU247
01?'50

~A3510

S 5110
s!)e7

rEF TRVEw
Gcr 0
I"lEF PEAD

02V>4

01~51

0040204

S~!l9

liEf

0201
02f12

56"'3

~

CHAR. COUNT
BIT 8 TO BIT lAMASK
IND. ATlDR.

ACTJVE TRACK COUNTER
rND.
fNn.

AnnR ..
AnnR.

PAGE

~01

SPECIAL DUe lIse DIAGNOSTIC FOR 2115/2116

~2~5

~1252

177577

951Q1

nCT

177577

61?5~

~2~nec

!)8e~

eel

.. 2~H

~?06

2~Ii'""rA

IJPPEP BLANK

02~1

012~4

1770e0

5881

eCl

1776111?J

wORK1Nr,

~~08

01255

1776~n

saa2

GCT

02~9

~125~

0H4~20

1775

17761<10
rEF S775

~2t0

01257

004~12

1773(

il E ~

0211

012n0

103~1~

READl LE.F READ.I

~212

01761
e1162

06~206

S883

LDA

S812

~77

Bt~111

A~r

CARR~+t

RfTAIN M.S. DIG rT

~12~~

e~17~7

~1264

~70~el

~216

~1265

~b~d75

~217

01266

01~t12

~218

~12~7

0~1727

0219

~1270

~300~1

ALF,AlF
ST. 1
LDA 5831
ANt CARR'+~
ALF,AlF
10h 1
STA ~ES4~+Q
lD~ SA12

B?13
0214
C215
.

0~tl

S773r.

nCTAL
-1;>8

-t2~

IND.
I"'D.
DOUBLE INn.
TO A

1774~\'~

Tf' A

~ETAIN

HIDnLE DIGIT

01271 071226
SETUP PRINT MESSAGE
0221
01212 ~6A2~6
377 TO A
M222 01273 01~11?
AN[ CARRv+2
RETAIN LOW DIGIT
0223 01274 0~1727
ALF,ALF
e224 01275 ~71227
STA MES4~+1~ SETUP PRl~T MESSAGE
0225 01276 125277
JMF see •• !
0226 01277 003r.~5 5884
OEF SR85.J
0227***** INPUT SUBROUlltIIt:. ... lTY OR PR ••• **
0228 ~1300 00~~~~ SQe~ ~OP
RETURN-ENTERED ~tTH S8A4 SETUP
0229 01301 060173
lDA S8~1
BUFFER AODR. TO A
0230 013~2 01~172
Sij 5800
REST~RF BUFFFR ADDR.
~231
013~3 ~64174
LDR S8?2
R-FULL BUFFER COUNTER
~232
H13~. ~60175
LD~ S8G3
AD2 .... SCII RLANKS
D233 013"5 17~172 S7£rn fiTA Sd0~.t
FILL LOCN. WJTw RLlNKS
0234
01J~h 034\72
IS1 S8~0
INCR. RUFFER A:nRfSS
013A7 ~340Ml
152
~2J5
JNCR. BUFFFR cau~T
0236 01310 02~305
JMP S7~0
LOOP
~237
@lJl1 0064~0
CL~
CLEAR R
0236 ~1312 074176
STR SEXT
CL~AR EXIT FLjG
~239
~1313 102501
l.IA t
sw ... REG. TO A
e240
01314 00~~66
CLf,ElA
DEC. HIT TO E
0241
c.:l1315 064173
LOf! S8~1
BUFFER ADDR. To R
0242 ~lJ16 06~177
lOA S81J14
INPUT CHAR. LENGTH T~ A
r.243 01317 002~41
SEi,RSS
E=l,PR INPUT
o2 4 4 0 1 J 2 ~ (d 2 5 3 2 3
.1 MF .. + 3
E:a~,TTY INPUT
~245
01321 1141~1
JSH l~lB.I
PR INPUT
0246 01322 025324
JMP *+~
COMPLETE
0247 01323 1141~4
JSP 1~4R.I
TTy PIPUT
0248 MIJ24 07~20l
STA S8~7
SAVE INPUT CHAR. COUNT
0249 ~132~ ~~13~~
WAR
LSB TO I1SB
0~50
~13260Y2e20
SSA
SKIP IF CHAR. COUNT EVEN
0251
U1327 0~2~~4
INA
IF,NOT-ADO ONE
~7.52
0133V, 01~2~2
ANr. S8~8
RETAIN A0-.14
U253 ~1331 ~4~173
ADA SB~l
ADD 1ST WORD BUFFER ADDRESS
02~4
01332 0702~3
STA S8PQ
LAST WORD BUFFER ADDRESS
~255
~133J ~60173
I Uj Sfl~1
~256
~1334 07~J72
STA SR~0
RESTORE BUFFER ADDRESS
B257 01335 ~6M2ij5
lOA 5811
UPPER/LOWER CHAR. MASK TO A
0258 01336 07a2~4
STA S8l0
WORKTNA U/L CHAR. MASK
0259 ~13J7 0602el
I OA S8~7
ACTUAL INPUT CHAR. COUNT TO A
0260 HIJ4~ 125300
JMP S9~~.t
EXIT-ACTUAL INPUT CrlAR.CCUN1-A
Q!261* •••• GET A CHARAC1Ek ~tIHROIJTll\lE •• ***
~220

PAGE 0e12 -01

0262

0263

SPECIAL DUC nlSC

01341 000~~0
01342 ~64204
01343 160172
91344 ~e602~

5911

Dt~GNOSTtC

~OP

LVP
LOA

FOR 2115/2116

RETURN
S81.~

WO~KrNG U/L CHAR. MASK TO Q
PICKUP BUFFER WORD
SS~
SKIP JF LOWER HALF CHAR.
0266 ~\J45 0~1727
ALF,ALF
ROTATE A LEFT 8
RETAIN A0-A7
7 01 346 0 1 '" 2 0 6
A N[ S 8 t 2
026S 01347 ~06021
8SE,RSS
SKIP IF UPPER CHAR.
02~9
0135~ 034172
IS1 S8P0
I NCR. RUFF'fR ADDR.
0270 01J~1 0~52~0
~8L
ROTATE UPPER-LOwER MAS~
0271 01352 074204
~T~ S810
RESTORE UIL CHAR. MASK
0212 ~1353 ~702~7
STA 5813
SAVE CHAR. IN TEMP. lOCN.
0213 01354 060172
LDA S8~A
CURRENT BUFFER ADDR.
0214 0135~" 050.'-03
CPA $8019
CO~PARE WITH LAST BUFFER ADDR.
0275 0135~ 025361
J~F S7~1
YES,SET EXIT FLAG
~276
·01J57 0602e7 S7~2 lDA 58t3
RESTORE C~AR. I~ A
0277 ~lJO~ 125341
J~P S9~1.1
'EX1T-CHAR. IN A~-A'
0278 01361 034176 S7Ql
lSI SEXT
SET EXIT FLAG
0279 0136~ 025357JMF 5702
REtURN
02B0***.* ASCII-OCTAL ~ERIFtCATION ROUTINE *.***
0281
01363 0000~0 S9~2 ~OF
E~TEREO WITH CHAR.

~264
~265

S8~0.r

-2.'"

0282

01364 064234

02~3

~1365

~500~1

0284
8285

~13&6
·~1367

025~05
00~004

~286

054446
002001
025365

JMP

010~01

STA 1

~

000A75
010450

0294
fl295

011.11111 064447

1.06 8831
AN[ ~ES2'
JO~ 1
STA MES2'
lDA CHA2~
lO&!f IA02~

A8-Al~

029~

01370
'1311
01372
01373
01374
01375
01376
01377

0287
0288·
0289
0290
0291

0292

0300~1
~70450

01400 060A74

lD9 $819
CPA 1
JMP S902A
'N~
CP~

wss.

5830
59~2.'

~296

01402 1141~2
JS~ 10?B~I
0297 01403 102001
"LT 01
0298 014~4 125363
JMP S902.1
~~99
01405 035363 S9~2A 15i 5902
0300 01406 025404
JMP S9026-1
0J~1* •• *. OCTAL TO ASCII CON~ERSION -

ASctl

~

TO A

COMPARE A TO 8
CHAR. LEGAL-E"XIT
B.00A07~?

F1NtSHED-CHlR. ILLEGAL
~OT

FJ~ISHED

TO R

MASK
RETAINA8-A15

80-87 TO 4
RESTORE MESSAGE
NO. OF CHAR.-39

ST. ADDR. OF PRINT BIJFFER
OUTPUT ERROR MESSkGf
TURN SW.15 OFF IF ON
ERROR RETURN
INCR. EXIT ADORESS
EXIT

••

~ DIGITS .~*
~302
014~7000~00
CO~Vl ~OP
OCTAL TO ASCII CONY.
03~3*ENTE~EU WITH a-6 rlGl1 eCTAL NUMBER
~3~4
0141A 060120
lnA CHARy
0305 01411 07~121
STA CHAR~
RESET ARRAY ADDRESS
0306 01412 ~601t6
LOA M~SKA
Ascn A TO A

0307
0308
0309
e310
0311

006020
060117

0312
0313

01413
01414
01415
01416
01417
01420
01'21

~314
~315

01422 13~121
el'23 '170121

0316

01424 034121
01425005723
01426 06~114

0311
031&

17~121

005700
060114
010A~1

030115

sse

MS8·~n

LDA ~A~K~
STA CHAR~,I
RtF
LOA ~ASK~
ANt 1

ASC I t t TO A
1ST DIGIT COMPLETE
ROTATE 4 LEfT
77 TO A

lOR
tOR

~ASK~
CHAR~,J

8TA CHARw,1
IS2 CHAR~

ALF,R8R
lDA

~ASK~

80-82·ro ~
6X If.! Aa-A.,
COMPLETE 2ND DIGIT

RESTORE !ST WORn
INCR. ARRAY AUDR •.
ROTATE :3 LEFT
71 TO A

SUBR.

PAGE

~!.lJ

~

#~l

SPECIAL our rise DIAGNOSTIC FOR 2115/2116

~llQ

~14l7

~lo~~l

ANt

1

Bc/!-B2 TO A

0320

AldJe

0J~115

10h

"'ASK;~

~321

~14Jl

~~1727

ALF,~L~

6X TN A0-A7
ROTATI: A LFFT R

~322

014J2

17~121

ST' CHARw.l

0323

~14~3

~05723

HU , kBR

e.324

01 4 34

06~114

LD"

A~25

~1~3~

~lA001

AIH

1

~326

~1436

~J~115

10"

t'lASK~

0327

~14J7

13~121

~328

~144~

17~121

10'" CHAR"',I
ST' CHARw,I

~329

01441 034121
~1442 000723
01A43 0b~t14

~3J~

C3Jl
~332
~J33

01444
01445

IS1
~U

r.A~K?

CtHR--

, RBR

t

"'ASK~

~1r.~~1

DA
ANt

~3~110

~OFi

MASK:-<

1

0336

~1~5~

00~723

ALF,ALF
STII CHAR.-I,t
kLF,RBR

~337

01 4 01

06~114

In''

~338

014~2

01~~01

ANt 1

0339

~1453

030115

lOti

e34~

014~~

13Ut~1

~341

014b~

17~121

10" CHARw,1
ST' CHAR'oI,I

0334
~335

01446 001727
01447 17~121

"'ASK?

t',ASK.<

~3~2
~145~ 125407
.IMP CONV',I
0343 ••••• INTERRUPT ERROR ~UBR(1UT J r.JE
0344
~ld57 ~U0~00
S9Q3 "'OF
r,3A5
~146~ 061~41
lO" CHA4&A
LDIol !An4J1
0346 01461 065524
0347
01462 11 4 102
JSio1 1028.1
.1 MF S c;H~5
0348
01463 025471
0349
014~4 0000~~
59,,4
tIIO!"
I.DA CHA4,
~35~
01465 061556
~J51
01466 065542
l DR lAfl4'
~~52
01407 1141~2
.1 S fo 1 0 2 B • 1
0353 ~147~ 025473
.1MP S9\116
~304
01471 010470
JSI!' 59017
,J~F
59(113. I
~J55
01472 125457
~356
01473 010475
S91l6 .JS~ 5907
~357
~147d 125464
.tM~
S9~4.1
0358
~1475 ~~~VJe.0
~O~
S9~7
~359

01476 064123

036~

~1477

~361

01~~~

0362
0363

~15~1

~15~2

00 4 627
B2550J
064631
M25504

~364

~150~

~646j0

e365

~1504

~366

'DE
CP'"

DMADI<
t'ASK,o.

JMF *+3
I

D~

fl.AS7-

06~107

f"A36A
t4ASKt

01~05

011510

ANt

S9~8

~367

01~~fi

030~01

tOFi

1

0368

~1~e7
0151~

07'~10
10o~~G

ST" 59"8

I$; e
JSP CONV.I
l Db CARRV'

L

0372

01511 114tl3
01512 ~6~110
~1513 071570

STA

MES4~H,8

~373

01~14

IDA

CARRY+1

0374
0375

015\5 071571
01~16 060112

&TA

I'1ES4'.)+9

~37~

0371

0o~tlt

6X:

IN

AQI-A7

COMPLETE dTH DlGIT
RESTORE iNn WORD
lNeR. AR~AY ADDR.

ROTATE

;5

LEFT

77 TO A
80-B2 TO ..
6X IN A~-A7

A LEFT f\
5TH ntGIT COMPLETE
ROTATE. :3 LEFT
77 Tn A
ROi~TE

fH11-B? TO A
6X IN Art'-A,7

6TH DIGIT cnHPlETE
RESTnRF :WD WORn
RfTllq!>j

-**-*

wRITE INTERRUPT ERRQP
NO. OF CHAR.=23
ST. ADDR. nF PRINT BUFFER
OUTPUT MES~U.GE
CONTINUE

NO .. OF CH 6,p.. "22
ST. AOnR. OF °Pl~T 9UFFER
OUTPuT MESS"::;::
CONTiNUE"

DMA ~ORD COUNT
RETURN FROM WRITE INT. ERROR

G~T

GET

D~A

wu~u

C('Ij~lT

RETURN FROM READ INT .. ERROR

DMA OCTAL ADDR. TO
D"'A Cl-!AN.-~?

q

YES
NO-fbDR. -3

JMP ,*.2
LDB
L.DA

~369

3RD nIGIT COMPLETE
ROTATE 3 LEFT
77 Tn A
~QI-B' TO A

LDA CARRv+2

AODR.-2
1777~0 TO /:.
RETAIN A6-A15
lOR wCR AnnRESS
RESTORE S9~8
tNPUT WORD COUNT
OCTAL TO ASCIi eONVEPSION
SETUP PRINT MESSAGE

· P.GE 0d14
.0376
031"7

-~1

SPECIAL DUC

r01S1l 071572
01520 0Ft1573

~ISC

STA

P'lES4~+JP

t DP

lAn4:)

1029.1

tn- cru 4.,

~:S18

~1~~1

0379
0380
"-3·8 1

161522

1141~2

JS~

fOl~13

125475

Jf'tF

~Ja3

0384
e385

~65'S57

001525
IA[40 IlEF
01525 053522 MES4~ Ase
it! 526 ~44!)24
~15'2' VJ42440
'11'530 04451*1
~15Jl 05210501532 051122
01533 052520
01534 052"40
01535 046!511
kJl~36 kl51523
~1524

0382

.

~1537

U44!,)16

01540

04344~

01~41

00~027

01!5d2
01543
01544
01545
161546
@1547
1.:11550
015!'>1
01552
01553
01554
1(11555

0~1543

~51t05

12,W~lTf.

LC1 27
CHAR. COUNT
JAC4l CEF ~ES4t
RUFFER ADOR.
~ES41 ASC 11,RFAD INTERRUPT MISSING

C~A40

047124
042522
051125
05~124

020115
044523
051511
0471'-"7
00kt~26

~15"57

001~60

0388

e.156Q! 042115
01~/)1 134('4440
01562 053517
"1563 051104
01564 020103
01565 047525

0391
0392
0393
0394

S9~7.I
t-'ES4~

02~tl1

~155f1

~1566

04712A

015~7

~36440

CH~41

OCl '6
JAL42 fiEf P'lES4~
ME542 Ase !1,OMA

01570 020040
11!';7! 020"'40
~1572 020040
01573 000~26

~39a* ••

CH~42 oct 26
·* PROTECT SUSRCUTINE *****

~1574

000~00

PReTC NOF

CHAR. COUNT

BUFFER ADDR.
COUNT-

~ORD

CHAR. COUNT
PROTECT CHECK SUBROUTINE

I. OA

0396
0397
0398

01575 002400
01~7~ P.71663
01577 071662
tH60Y 0612!)5
01601 0712b4
01602 064122
016.3 00b004

0399

01fi~4

0601~7

I-D'

MASK.

0400
0401

016A5 011616016~6 030001

AN~
JO~

5911.2
1

0395

NO. OF CHUt ~ -22

ST. AO~R.OF PR'NT BUFFER.
oUTPUT IiESSAGE
EXIT
BUFFER ADDR.
tNTERRUPT HtSSI~G

"40504

0386
0387

0389

DfAGNOSTIC FOR 2115/2116

tLA
STA 5912
Sri 5910
S882
ST' 5881
lOW DAORi
IN8

ClfA
CLEA~

TRAC~

-12a TO

ADDR.

COUNT~R

It

RESET COUNTER
H.P. D]SK ADOR. TO S
SET TO t.p. ADD~.
1177(14." TO A
RETAIN A6-A15
8 TO A

PAGE

e~15

#01

SPECIAL

Du~

rIse

~'AGNnSTIC

02

fd16~7

071616

ST" 5911.2

~4~3

06L11~7

10"

MASI( t

04Q'14

tJl"lP.
01hl1

~11(-o17

ANt

S9' 1+3

",H' ~

01612

~3lH"01

(Qfi

1

,j.Hjb
~~ 4 ~ 7

~1()13

"71~17

~16\4

0616t2
001727

STA
I.DA

5911+3
S91V'

~\4

~416Q

~1"15
~lb1"

~'.ilG

"'U·1?

VJ4~)1l

~4

t1

e412
0413
0414
Vl4t5
0416

0417
~418

04\9

'''420

0421
0422

5911

ALF,ALF
(JTA e
l p
~

102M'0
14125V10

FOR 2115/21\6

RESTORE SQl1+2
1777'l:~ Tn A
~ ETA "~ A. 6 - A 1 5
B TO A
RESTORE" SY11+3
T~. ADDR. ~OUNTFR TO •
A~-ACI; TO Aa-A13
TRACi< ADDR. TU DISK
INPUT STATIJS
91T2 TO BlT0

Olb2Vt 0""1323
nlb21 0~~V'11

WAI'i,RAR

SL",HSS

\ltRITf

01f,22 035663

IS~

035662

lSI

NO-PROTECT COUNTER
INCR. TRACK ADDRESS
12~ TRACKS FINISHED?
NO-LOOP
ACTUAL PROTECT COIJNT
CONVERT OCTAL TO ASctI

~lt"123

011:>24 "'3~254
01625 025fi14

lSi S881
5911
59t2

J/1r
lDf!.
.lSP

01f>?6 06b663
t?1627 114113
01h30 0602'16
01631 011'1111
01ti32 031253
01633 ~71657
~H)j4

~424

Vld25
0426

k11"35 071M,{'?
~1""36 E61661
01637 065t\42

0427

~164e

114102

~428

~1641

125574

~.629

01#)42 0V11643

kl430

016113 047117
101(;44 027~140
. 011",d5

CONV.!
LDA SH'2
ANf CARRv+1
10 ..

S8SVt

STA I'IESA'"'+l?
Lf\A CARRv+?

06~112

Via23

5912
5910

STI foIES4">+t3
I. DA

r:tH4"i

LDi:! IADA'"
JSH
JMF

102B. I
PROTr', J

EN~BLEal?

377 TO A

PETAIN M.S. DIGJT
RLA~JK

A8-A15

SETUP P~INT ~ESSAGE
PICKUP ASCI I COU~~T
PREP/tPE ~ESSAGt
CH A p. COlJl"H:c? 8
ST. AODR. OF PR!~T SUFFER
OUiPlJT MESSAGE
RE TUP'~

IAt4S tJE.F I"E5""\
BUFFFR "nOR.
MES45 Ase 14,NlI. OF PROTECTED TNACKS-

0471)~6

0164" ~j2(!112~
01647 051117
~1650 0521\:15
ep',51 17/41524
e'l1fJ52 0425~4
(11 6 5 3

0 2 91 1 24

~lh'54

0511101

01f155

04151~

~1656

051455

1(11657

t~2~040

0166e

~2~H1413

0A31

01~61

0")13034

CH,645 OCT 34

~432

016;'2

00Vl~~0

5910

00QHH~

5912

OCl

f'i

OCT

~

LRG

1700~

0433

01 1'\63

10434

017~0

13435
0436

1317'10

000~00

017')1

00~~H:)~

~.d37

\l}17;h2 1301703

JAt!'S2 LEF

0438

""17~3

~E~~2

13

~41111

~17~4

"47101
01705 13511;51

£11706 020120
~17f{1,7

04~522

~1710 134-'515
1111711 1342524

131712 042!5?2

SQC;Q

"'OP
~OP

CHAP. COUNT
TRAer ADDRESS COUNTER
PROiF:TT CO'JNTER
ERROR COUNT
ERROR COUNT OVERFLOW

I'IES5:l
BUFFFR ADDP.
ASC lQ,BtNARY PARAMETER EXCEEDS 72 CHARACTERS

PAGE

~016

#01

SPECIAL Due tISC D1AGNOSTIC FOR 2115/21'6

.
01113 0216105
01714 054103
01715 042505
~1716 042123
017f7 020067
0172~ 031040

0439
0440
0441

0'1721

12141510

0$722
01723
01724
1'11725
01726

040522
040503
052105
051123

000"46

t'2t1100
02"00 06014.3

0442
0443
0444
0445
0446

064127
""2101'02 114'02
02003 1360125

0447
0448
"449

02'~0b

0.4513

02Al1 "'50145

0451
0452
0453

02c:l12 026"'14

0.454

CHA52 (JCT 416
ORG

sr.t'H lO" CHAl'

02~01

LVB lADlt
J$H 1028 .. 1
lDA

Sl~0

02~0A

064124

LOB AROMA

02!b~5

1141164
060123

JSQ UJ4B .. J
lDA DMADIo(

~20"'7

05~144

02~10

026014

CPA DMA0F.
JMF 5300
CPA DM401

0,,1(113 026000
02014 010114
02VJ15 070123
~2016 060170

S31l0

JMP S3e0
JPiP START
ANI: "ASK~
STA lsMAUI(

0456
0457

02v)17 064146

LDA
LOi!

02112'" 114102

JS8 1028 .. 1

0458

12121321 060125

LDA 51"0

0459

02V122 064126
02kJ23 114104
02k124 060114
02025 AH1122
021il26 070&'1"'1
~2027 060122

t

"455

0460

0461
0462
0463
0464
0465
0466

0467
0468
3469
0470
0471
0472
0473
0474

9475
0476

JSP

DIAn
10.:1B-I

t...DA

MASK~

02033 03011'01
02Q!34 0713122
02035 115175
02036 102501
~20J7 001700

002020

SSA

T4

JS8 TRV,.
LDA AWTBf"
eL8

0477

02044 174000

0478

02(1}45

00201U

INA

0479
0480
0481

05lt106
02047 026R51

CP,6
JMF
JMP
8T8
BTA
STi

0482
0483

0484

02~46

02050 026044
02f1S!51 075213

02052
02033

17~103
076~74

~

STA 1

0;2032 001723

~2040

lAn1~

LDA DADRt
ALF,ALF
ANt I'IASK::;'
ALF,RAR
lOR 1
STA DAnRt
J5Q PROT~t
LIA 01
ALF

0HH14

t:l2041 115246
02042 06"502
02043 006409

CHA1~

ANt DADRt

02030 001727
02'~31

oA

CHAR. COUNT

20'H'~

NO. of CHAR.a1iS
ST • • nDR. OF PRINT 8UFF£R
OUTPUT MESSAGE
NO. OFCHAR.-2
BUFFER ADO!?
INPUT (lMA ADDR.
ASCiI (lMA ADDR. TO A
EQUAL "'6

YES
EQUAL 01

YES
NO-GET GOOD ADDRESS
A0-A2 MASK
RESTOR~ OCTAL DMA ADDRESS
NO. OF CHAR.a2l'
5T.. .A DYlR. OF Flo( PH BUFFER
OUTPUT MESSAGE
NO .. OF CHAR.-2

SUFFER ADDR.
INPUT H.P. DISK ADOR.
40-1.2 M~SK
RETAIN 1('11"42
A TO 8
ASCII ADnI~. TO ~

LEFT 8
RET~N

LEFT

A0-1\2

~

B TO A
RESTORE OCTAL ~.p. DISK ADDRESS
CHECK PROTECT FE-TURE
SW. REG. TO A
BIT11 TO RIT15
SW.11-0?
TRACK ADDR. CHECK SUAR.
START OF SUFFER AREA

STR 0,t
H'68

*+2
T4+2

PFLAc.l
8854.!

WRIT,:'

LAST ADOP. OF BUFFER AREA
F'NISHED
NOT FINISHED
CLEAR FLAGS

~AGE

~485

0~\7

r

#~1

SPECIAL

our

02'(1:;4 077102

rlSC OIAGNOSTfC FOR

STP
STij

561(11
HEAD

0486
0487

0205·~
~ 2 ~~ S 6

~77510

1 7 ':) 2 b 1

ST(.

S5~9.t

(11486
Vi489

02~')7

102SI?!1

LP

~1

1il2~j~~

(001

~490

02"~1

~Ql2P2~

0491

~

~492

~2"""3

1025~1

Q\493

021-164

0il2~\2""

~494

02~65

02n~71

"'t\95

02Ci6(.,

1I6~225

JM'lOA

CHAl':'

~496

rtl2~67

1d64211

lD~

lAD1'"

0497

02070

0498

~~0

2 (1 f) :? (12 4 2 7 0

114102
021ri'71 1U6@2"''''

JMP Sd24
LI' Pt1
SSj

"UNUAL PRESET
TO A
SW.RE'G.
BIT 15-1111
NO-PR INPUT
NO. OF CHAR.-21
ST • • nDR. OF PRl~T BUFFE~
OUTPUT MESS1GE
CHAR. COUNT.72
SETUP INPUT CHA~. LENGTH
CALL INPUT SU8ROUTINE
ADO -7J TO CHAR. COU~T
POS.-=ERROR
NO ERROR
CHAR. COUNT.38
ST. RUFFER ADDR.
OUTPUT MESSAGE
TURN sw.t5 OFF IF ON
RETURN FOR NEW INPUT

Si'AJ

JSIf 1028. T
l Dj 58(.15

02~72

e7~177

'I

~

~ Ie 1
-.15"2

02~74

04k1226

ADA

0lft75

A"2~2(O

5SA

~TJ

58~4

.ISS S9"10

1 53 (1 ~

5816

~'j~3

02.~76

~261

1351114

'~2~77

061726

L

DA

CHA5~

0505

021~"~

l~657~2

lAn5~

16'5~6

'12101

114102

lDP.
JSB

0r:,07

021 Ql2 1 ~ 2 ·:'10 1.
o211t.13 026 a7 1

1028.1
'-'LT 01
J~F 57if13

"509

1i'21~4

~024\:.A

CLA

"5tA

"2105

~7i/J227

STA PWORn

~51l

021~6

07023~

ST' CWORn

"~12
0513
0514

021917 070231
02110 06"233
021tl A7~232

flTA CHUFF

r515

02112
"'2113

01~341
~50476

CPA 5832

0517
0518
0519
05:?0

02114

k102~H!11

ff

\'}4

.IMP 57"4

t DIt

.ISP

sg~l

SS

02115 021'1122

JMF

02116 064176

02117 006Al1

l.Df! 5EXT
SUI,RSS

0521

"212" 02tH12

•JMF

--6

~522

.JMF

S7~-4 .. 5

0ti24

02J21 02MI!77
02122 064176
02123 0~4V10

0525

~2124

026('177

0526

~2125

1302~01

0527

02126

01b3 d

0528

02127 4:i50234

Cp. 5819

~529

i62130 026140

.IMP

~530

02131 05~235
"'2132 026140
~2133 060265

CPA 58?0

02134 064236
£12135 1141~2

LDH IADt'"

0534
~535

02136 102001

"'LT 01

0~}36

02137 026(.)66

0537

"2140
02'41

.IH~ SlCIJ3-3
CL9,INR
ANt 1

0531
~532
0~33

fl538
~~39

l

e~64(l14

0100~1

.Jf'I~

590!1

5106
S1~b

IIUCHA1A
JSE

10'-Bp I

LDR pwORn

fit540

02142 064227
02143 0H1200

J'Al

~541

02144

WBl

0052~0

571'14A

lDe SEXT
SL9
JMF 5704-5
RSS
JSP.

15-Ql?

CLEAR qINARY PATTERN WORD
WORK COMPLEMENT FL4G
COMPLE~ENT BUFFER wORD

SA18

ST.6 5tHi'

S7V4A

1~

8IT

02 1<17 ~

~~23

~

SSA

U500

~516

NOP'S
SW. REG. TO

CLE~Q

BIT t4 TO RIT

\1)499

0508

2115/21t~

SET

COUNTE~

TO -t6

_GET A CH,AR.
CHAR."BL1~K?

HORE BLANKS-TAPE LE4DEH
8LANKS FI~15HEn?
EXIT FLAG TO B

FLAG-t1
NO-GfT ANOTHER CHAR •
PRINT ERROR MESSAGE
EXIT FLAG TO B
FLAG-??
NO.PRINT ERROR MfSSAGE
BLANKS FINISHED
GET A. CHAR.
CHAR •• ~
YES
CHAR.at

YES
ERROR-CHAR. COUNT-43
ST. AODR. OF PRINT BUFFER
OUTPUT ERR0R MESSAGE
TURN SW. 15 OfF IF' O~
GET NEW PATTER~ FROM TTY
R tU.SI(=-"000~1

RETAY,..,

A~

PATTERN WORD To B
A LEFT t
B LEFT 1

PAGE 0018 #01
~542

0543
0544
0545
0546

0547
~548

. 0549
855e

SPECIAL DDC nlSC DJAGNOSTJC,OR 2115/2116

~2147 034232
02150 026126

02151
02152
02153
1'2154
021'"

JMP 81015
lDA PWORIl

06"227
"01308
070227
015341
050416
002001

0551

0215~

0552

02157 £13423&

05'3

02168 0153041
02161 050476

8554
0555

lOR 1·
ITA PWORn
IS1 5811

02145 0300lH
02146 e702:l7

itA"

ST' PHORn
JS8 5901
r.PA 5832
ASS

lSI CWORil
JSIJ S9Al

CPA 5832
kSS
tS2 caUFr:

8557
0558
9559
0560

02162
02163
02164
02165
02166
H2161

0561

~2170

~562

02171 87037.11

STA 6828

0563
0564

02172
£12173
02174
02175
02116
02177
0221lt"

lDA PWORn

RESET SECTOR SUFFER ADDR~S5
WORD FLAG TO II
A0 TO f"
-64 TO A
RESET WORKING COUNT
8IN. PATlEQN WORD TO A

SEI

E-01

0556

0565
9566

0!'J67
0568

"92001
034231
0t)(11261
070266
06"230
801500
£169375

INCL. OR B TO II
RESTnRE PATTERN ~ORD
tNC~. SIT COUNTER
16 8tTS NOT FINISHeD
PATTERN WORD TO II
ADJUST WORn RIGHT 1
RESTORE FINAL 8JN •. PATTERN ·WORD
GET A CHAR.
C.,.AA.-AlANK?
YES
SET COMPLEME~' WORD FLAG
GET A CHAR.
CHAR.-SlANK?
YES
SET COMPLEMENT BUFFER FLAG

060221
002040
00J00f'
11"266
034266

lD' 5823
ST' 5622

·lD' CHORn
FRA
l D' S829·

S1e"

c.-u

STj 5822.1
lSI S822

034~74

lSi S828

CO~PL.

NO-COMPl. EVERY WORD
STORE IN BUFFER
INCR. AUFFER ADDRESS
INCR. WORD COUNT
SUFFER NOT FINJSHED'~
~EGJN~tNG OF WRITE PROCESSOR
ST • • DDR.-8UFfE~

0571

026173
~22el 0000660
02202 060502

eS72

02203 00b400

0573

02204

174~160

JMP 51<'11
t.OP
lOA AwTBF
CLA
8T9 0,1

0574

0220~

0515

022~6

00201t!4
050506

CPA ARTBF

LAST ADDR.+t

0576
0517
057&

.JI1F
.HlP

FINISHED
Nor FINISHED
CL£AR ERROR COU~T
CLEAR ERRO. COUNT OVERFLOW

0586

.,2207
02210
02211
02212
02213
02214
02215
0221.6
02217
02220
02221

9587

9569
0570

0579
0~60

0581

0582
0583
0584
k'b85

0588
9589
0590
Wl!>91
0592
0593

0594
0595
0~96

0597
0598

Slee

HU

026211
02620'0751ee
015701
060502

• +2

5108 ... 3

!H9 5999
STi 599~f"'1

LD' AWTS'"

0705tr'3
0612~5

ST' ftAWT~
LDA 5863

~71204

9T'

S8~2

01

10250·1

l. fA

002~20

!iSA

026225

02222 060406

JMP S1~9
LD" CHAlu

02223 064376

LDi!

IAD1~

0222.6 114102
02225 060200

J58
l Dol
STA
JSI!

1028 .. (
58015

02226 070117
02221 015300

ij2230 040226
02231 882020
02232 02624e
02233 060445
022J4ee>4421
~223!) 114102

S1i 9

IESET APRAY ADDR.
-65 TO A
-65 TO WORKING

JHP 5110

SW. REG. TO A
SIT 15-01
NO-PI? INPUT
NO. OF CHAR.-1A
ST. ADDR. OF PRINT BUFFER
OUTPUT MESSAGE
CHAR. COUNT-12
SElUP INPUT ChAR. LEH&TH
CALL INPUT SU8ROUTINE
ADD -13 TO CHAR. COUNT
POS.-EPROR
NO ERROR·

l.O" CHA21

CHAR~.COUNT-3'

IDA tAD2'

ST. AnDR. OF PRINT BUFFER
OUTPUT MESSAGE

5804
S9A0

'DA 58t6
MSA

JSM 1028 .. 1

PAG~

~019

.~1

SPECJAl Duc rISC DIAGNOSTIC FOP

r

0599

02236

l02~Ol

~L

·0600

~22~7

0202~2

~6tH

0224Vt 01~341

P602

S 71 1
5833

~W03

02241
02242
02243
02244

JMF
.1S"
C:PA
.r MP
CPA

~')04

~224~

JMF
r:PA

5711
5834
S7~9

~~01

~~02

S710

"5~476
"-'261'~6
~5~H77
0262~6
05~500

01

TURN SW. 15 OFF tF ON

57"8"'1
59"'1
5832

GET NEW TR.CK PA~EM.
GET A CHAR.
IS CH.P. A BLANK?
YES-CHECK EXIT FLAG
IS CHAP. A COMMA?

0Q1ld5

02246 026225

.IMP

\H106

02247 0510512

r.PA" 5836

0V'07

ij225~

02hl'65

""'~8

022.,1

~6"'445

.IMP 5112
I·DA C... .A2t.

0n09
.."H 0

02252 1it64!l14
~2253 11411J2

ft1~11

ft122tl4

1C-~2fJ;-'

0~12

~22!:)5

026~~2

"'(113

1

~~14

1b2256 ~64t76
"2257 0"6iH 1

0~15

0226~

~2624n

0~16

1&2261

06~5~2

017117

~n22

05f1lS(13
£.1221;3 027125
"'22"4 ~2b376
"'2265 061('1602
02266 07et.¥'I3
02267 0~24"i~

01023

0227~

0/(\24

(12271 9115341
02? 72 00101 4 7 6
02273 0263V17

0018
"'~19

0020
0021

~1i.I25

itJlb26

0027
0028

0034
~035
~~36

~~37

0038
C039
"'l~"0

5712

'~1

I DB SEXT

S7.43

.J,.,F 5720-3
LD' 5842
~TA

58'3

rHA
JSfI

S8t1({j
5901

r:PA 5832
JMF 5713
.JSH 59"2
JMP S7CH\ ... t

t.lC

YES
ANY Ef\.;TRIES?
~IO-JU"'P TO RE:: AD PROCESSOR
YES-GET ~RITE S~CTOR PARAMERS.
-3 TO A
RESET CHAR. COUNTE~

10k

J

8T4 5840
IS1 S8A3
JMP 5712.4
JMF 5715

SEXT
RSS
JMP 5712"'4
l tu ~.tiA2.d.

0{.J142

02.U3 064542
02314 114102

t.Dh.

lAD24

.JSP

t0~B.l

0231~

102~01

"'Ll 01

~2316

0262~2

5714

.IMP

S1"~"'1

~Q47
~\1'48

02321 026325

.1MJ;

. '049
0050

CPA 5835

0"~1
ttWJ~2

02322 0505~1
162323 026331
02324 026312
02325 064176

0003

02326 il04"10

5715

.158 59" 1

CP4 5832
5116

Jt4F 5717

.l,.,P S714
5116

CHEC~

LEGALtTY-~-7

EXIT FLAG-I?

kLF,RBR

5713

CLEAR CHAR. HOLO
GET", CH.AR.
IS CHAR. A RLAN~?
CHECI( EXIT FLAG

SU~,

I'IA.SK?

ANt 1
tDQ 5840

((1.2317 lill ~:J41
il232f1 05~476

.

TT~

LD8

LDB

02J12

1d044
0L14!:)
0"'46

YES-CHECK EXIT FLAG
IS CHAR. A SLASH?
PROCESS CONTINUATtON
IS CHt.H. AT?
YES-PROCESS PAPAMETER
CHAR. rOUNT-37
ST. ADOR. OF PRINT BIIFFER
OUTPtlT MESSAGE
TURN SW. 15 OFF IF ON
GET NEW TRACK PARf~. FROM
EXIT FLAG TO B
EXIT FL~G.t?

TTY

GET NEW TR~CK PAREM. FROM TTY
7 TO B
RETAIN A0-A2
PARTIAL TO P
ROTATE LEFT 3
lOR R TO A
RESTORF RESULTS
TRACK ADOR. FINtSHED1
NO-6FT ANOTHER CHARACTER
CONTJ~lIE PARAMETER
EX!T FLAG TO a

0041

A~43

FRO~

CLA

It.l~3b3

~6~ItjMl

... Ll

JMF

~7((\540

02302 f&}30IiHi\ 1
~2303 070540
02J~4 034603
02J~"'!i 026271
023ldb 026317
0231217 064176
0231'1 006"11
02311 026271

102B. t

LOA AWTBF
CPA wAWT~

02275 (:<3262'""2
"',",29· 02276 "'64114
0C30 02277 01V1~01
"031 ~23k)fl ~64540
"032 023~H 0'~~723
0~33

lAD2:4·

JS8

SLtoi,RSS
.1MF 5710

~2262

02274

loe

.1 MP 5 7 018 ... ,

5711.

2tJ~/21t6

LOB 5EXT
SLP

NO-GET A CHAR.
CHAR. COUNT=26
ST. ADUR. OF PRINT BUFFER
OUTPtlT fRRnR MESSAGE
TURN SW.15 OFF IF ON
GET NE~ TRACK PAREM. FROM TTY
GET A CHAR •
IS CH'R. A BLANK?
YES-CHECK EXIT FLAG
IS CHAR. A - ?
Y·ES
NO-PRINTOUT ERROR MESSAGE
EXIT FLftG TO B
EXIT FLAG-C'?

P~GE

0020 #02

SPECIAl Due rISe DIAGNOSTIC FOR 2115/2116

00~5

02327 026311
02J3~ 026317

~0b6

02331

0~57

fd2332 070603
023~3 002400
02334 070541
02335 015341
02336 A5~476
02J37 026~!)1
02340 1015363
02341 026202

"054

£HH58

0059
0~60

0061
0fd62

0063
0064

06~602

~2342

0066
0067

02343 01~a01
02344 064541
02345 005723
023'6 0311l~01
02347 ~'7~541
02350 ca·34M'3
02351 k"126335
02352 kl263!:>7
~2353 1364176
0235iS 00M!Jl t
"2~' e»!5 "26335
tI~3S6 026312
02357 ~6~~41
023f>V. 003004

0069
0070
0011
0~72

~"73
0~74

~075

0076
0~J77

0078
e"79
0080
~fl81

0062
0083
0~~a4

BTA S843

CLA
STA Sa41
.IS8 5901
c:p~ 5832
JMf. 5118
JS8 5902
JMP 5708+1

064114

0065
0\~68

S711

Jt1P 5714
.,IMP 5715
lOA 5842

LDR

MASK~

ANI: 1
I.D8

51)41

8LF,RBR
tOf;

J

STA 5841
'51 5843
JMfO 5117.4

9718

JMP 5719
SEXT

l Dr!

SU~.RSS

JMP

S717~4

.JMP 5714

5719

1d23,,1 070541
02362 060540
0l3t.i3 17d503
02364 0J4'5~J
~23M) 001201114

lDA 5841
CMA,lN4
ST' 5641
IDAS8£t0

STA

"'AWT~,1

lSI "'AwT~
tNA
IS1 5662

13085

023~6

0086

02367 kl26371

.JMF

*+2

"087

02J70 ~2"4el
02371 034541

JMP

S72~

02372 026363
02373 064176
02374 1d~6011
02375 026240

5719.4
lDH SEXT

0088
0~89

""'90
0091
01392
0093

Ql352~4

ISl S841
JM~

8LP.,RSS
.IMP

5710
WAIIITR
LAW1~

8721

0~94

02377 "'706134

lDA
STJ

0~95

024~0

0264~6

.IMP

Pl096

02A~1

~6~6~1

0~9'

024~2

064561

LO~

0098
0099
-01 ''0
01''1

02403

1141~2

JS9 J028.1
toIll 01

fd102

eu,;s
0104
011115
&106
0107
~108

0HI9
0110

~2376

06"'5~3

57~0

lDA CHA211i
JAn2~

NO-ERROR PRINTOUT
SET A CHAR •
-3 TO A
RESET CHAR. caUNTER
CHAR. HOLn
6ET A CHAR.
tS CHAR. A BLANK?
CHECK ~XIT FLAG
CHECK ~EGALtTY-Q-7
GET NEW TRACK PARE"'. FROM TTY
7 TO 8
RETATt-.:A0-A2
PARTtAl TO B
ROT~TE LEFT 3
lOR B TO A
RESTORE RESULTS
TRACK SEQ. CHAR. FINISHED?
NO-GET ANOTHER CHARACTER
CONTINUE PARAMETER
EXIT FL~G TO 8
EXIT FLAG-l?
NO-~ET ANOTHER CHAR.
OUTPUT ERROR MfSSAGE
CLEA~

SEa. 14
2'5 COMPL.

BLOCK SEQ. FOR TRACKS
ST. TqACI( APDR. OF BLOCK
STORE TRACK ADDRESS
tNCR. ARRAY ADDQESS
tNCR. TRACK ADDR£SS
64 ADnR. ENTfRED?
NO
YES
INCR. # OF TRAC~S
NOT FINISHED
EX IT FLAG TO 8
EXIT FLAG-I?
GET ANOTHER WRITE TRACK PAREM.
GET W~JTE SECTOR PARAMETERS
... CHAR. COUNT-29
ST. ADDR. or PRINT BUFFER
ERROR PRINTOUT
TURN SW. 15 OFF IF ON
GET ~EW TRACK PAREM. FROM TTY

024~4

lw2001

024015

0262~2

024M6
024"7

06~~04

"705~5

STA WAWSR

RESET ARRAY ADDRESS

02410

~61207

LOA 58"5
ST. 586.
l IA P1

-86 TO A
-86 TO HORKING

SSA

81T 15-0?

02411 071206
02412 102501
020413 002"'20
024t4( 826'20
02415 06~420
0241" 064iS07
02417 114 H'l'2

.JMP
S7~1

S7AS.l

l Dj AWSBIi

.IMP

5722

lD~

CHA2£l

LOA [A"2'"
JS~ 1028.1

SW.

REG. TO A

NO .. P~ INPUT
NO. OF CHAR.-t!)
ST. ADDR. OF PRINT BUFFER
OUTPIJT MESSAGE

PAGE

~~21

#~2

111

~2l\2~1

R60?0~

l. Di

SA0~

·~112

~2421

~7~177

ST!

58".4

01 13

024 22

~ 153~H'

~

(12423
02424

~4kl226

JSIo!
ADA
SSA

SQ"'Ql
5816

.1 MF

5723

SPECIAL

DU~

rlSc D1AGNOqTIC FOR 2115/2116

~

~

lId
v' 1 15

~"}2Q!20

~'117

02425 ~2b433
ll2.d2F.. 1060445

~

.t116

S7~2

... Ll 111
JHP 5721
lDP SEXT

CHAR. COUNT:a72
SETUP INPUT CHAR. lE~GTH
CALL INPUT SUBROUTINE
ADO -73 TO CHAR. COUNT
POS.-ERROR
NO ERROR
CH A~.. CO U NT. 3 7
ST. AOnR. OF PRINT SUFFER
OUTPllT ERROR MESSAGE;
TURN SW.15 OFF lF ON
GET N~W SECT. PAREM. FROM TTY
GET b. CHAR.
IS CHAR • • BLANK?
YES-CHECK EXIT FLAG
IS CHAR. A COMM~?
YES-CHFCK EXIT FLAG
IS CHAR. A SLASH?
PROCESS CONTINUATION
IS C"'AR. A 5?
YES-PROCESS PARA~ETER
Ct-IAR. COUNT-37
ST. ADnR. OF PRINT BUFFER
OUTPUT ERROR MESSAGE
TURN SW. 15 OFF IF ON
GET NEW SECT. PAREM. FROM TTY
EXIT FLAG TO B

SUi,RSS

EXIT FLAG:a1?

JMF 5723

NO

.}MF 5733-3
l D~ S842

YES-JU~p To
... 3 TO A
RESET CHAR.

02427 V,64421

IDA CHh2\
tOI! IAD2\

~119

H243~

JSi!

lfil2A.l

"J 20'

1(12431 102VlCl

~L

~1

118

~111

e122
~123

~124

1l41~2

02432 0264U6
0153 4 1
02A3A ~50476
0211J~ rJ26401

~2433

T

JMP
S7~3

S7~1

Jse SQi1Il
CPA SB32

0125
012'>

t124J7

~26451

JM~ 5724
CPA 5833
.IMP 5724

~121

"'2-1~0

1d5~J.500

CPA

S8~4

~128

U2441

~2642~

.IMF

5722

~5kl513

CPA S837

v) 2 d 3 (, '" 5 4A d 7 7

0129

~2442

131 3 \~

02443 026455

.1 MF

0131
0132

~2444

tOA CHA21

~133

111244t':

()134
0135
013t>

02447102lH11

0137

006r:ll1
0:l453 026433
02454 026563
~2455 061i16C2
0245t 07Ql1)~3

~138

0139
fll·HI
(I)

141

060445

((.2445 064514
1141~12

0~45(.j

(1126406

~2451

1d64176

57':4

~2452

S7~5

S 7 '- 5

lD~

lAD2:\

.15(.;

1"'28.1

sr-

SR"3

0142

02457

00241tHiJ

CLA

0,43

~7~540

{11~341

STA S8d0
JSP 59Al
CPj 5832
.1MF 5726
.1SR 59~2

0145

0246ti1
102461
02462

e14b

02.-163 ")26477

014~

05~476

~ld7

02464 015363

e148

02465

~26406

JMP

5721

0149

024~6

tD~

MASK?

015~

024~7

064114
01N'IQll

ANt

1

0151

I DP.

S8dQ!

"'158

02470 ~()4540
1t:12471 0~5723
t;2472 030~Ol
02473 070540
02474 ~34~03
tl2475 026~61
02476 026507
02477 064175

0159

kl25·"tiI

0160

~2~Qll

11
0264t>1

011\1

t

~l

JM'" 5721
57;;8

.158 59'" 1
r,PA

5832

WRt~t

OPERATION

COU~TER

CLEAR CHAR. HOLD
GET A CHAR.
ts CHAR. A BLANK?
CHECK EXIT FLAG
CHECK LEGALJTY-0-7
GET NEW SECT. PANE~. FROM TTY
7 TO R
RETAIN A?I-A2
PARTIAL TO B
POT,\Tf LEFT 3
lOR E\ TO A
RESTORE RESULTS
SECTOR AODR. FJNISHED1
NO-GET l~OTHER CHARACTER
CONTIN~E PARAMETER
EXIT

FLAG

TO

3

EXIT FL~G.l?
NO-GET A CHAR •
CHAR. COUNT-26
ST. _DOR. OF PRINT BUFFER
OUTPUT ERROR MESSAGE
TURN SW.t5 OFF IF O~
GET NEW SECT. PAREM. FROM TTY
GET A CHAR •
tS CHAR. A BLANK?

PAGE

0~12

-~2

SPECIAL DDe elsc DJAGNOSTIC FOR 2115/2tt6

0lba

025'11 026515

~169

02512 050501
02!513 "2M~21
02~14 026502
02515 064176
02516 004010
02517 026'502
02520 0265!?J7
02521 06\41')02
0252~ 070603.
02523 0024"'0
02524 070541

0170
kj171

0172
0173

0174
0175
0176
0177
"178
0179
&;l180

0181
0182
0183
0184

0i65
0186
0187

0168
0189

~2525

0195

~2!i44

0196
0197

02545
02546
02547 06~540
02550 170505

02~40

LOA 5SA2
ST" SlS43

el"
ST.
.fS8
r.Pl
JMP
JSi
JMP

~2"406

02541
02542
02543

SE~T

JMP 5728
S7~0

Itlle>363
""4114
010N.'ll
064541
1d05723
030001
070541
034603
026525
0265'47
064176
006011
026525
0265t'2

Op

I

JMP 5727

02526 050416
02527 026543

02:')30
02531
02532
02b33
02534
02535
02536
02537

S729
5835
5730
5127

su~

015:541

0190
0191
0192
0193
0194

0196
0199

871:9

JHP
CPA
JMP
JH'-

5841
S9tH
S832
5731
5ge2
5'21

LDB MASK'
UH

1

L.DP. 5841
Rlfo,RB~

10" 1

STA S841
lSi S843

JMP 5730+4
JMF 8732

57:!!

LIlR SEXT
SL9,RSS
JMP 5130 ...
JMP 5727

S7'~2

LDA S840
ST~

~AWSR,r

0200
0201

02~!)1

"'J45"~

lSi

wAWSIi4

~2552
J2~o3

0M'l'541
170505

LDA S841

0202
0203

02554

0J"5~5

025-;;5

0352~6

tS1 .. AW$w
IS1 5864

0204
0205
0206
0207
~208
~209

0210
0211
0212
0213
0214
0215
0216
0217
0218
0219
~22"

0221
0222

0223
~224

aTA

~AINS~,I

YES-CkECK ExtT FLAG
IS CHAR. A - ?
YES

NO-PRINTOUT ERROR MESSAGE
EXIT FLAG TO 8
EXIT FtAG-9I?
NO~ER~O~ PRINTOUT
GET A CHAR.
.. 3 TO

~

RESET CHAR. cauNTER

CLEAR CHAR. HOLD
GET A CHAR.
tS CHAR. A BLA~K1
CHECK EXIT FLAG
CHECK l~G.LITY-0-7
GET NEW SECT. PARE~. FROM TTY
1 TO B
RETAIN U~-A2
PARTIA.L TO B
ROTATE LEFT J
lOR ~ TO A
RESTO~F RESULTS
SECTOR SEQ. CHAR. FINISHED?
NO-GET ANOTHER CHARACTER
CONTtNUE PARAMETER
EXIT FLAG TO 8
EXIT FLAG-1?
NO-GET ANOTHER C~AR.
OUTPUT ERROR ME'S.SE
STARTING SECTOR ADDRESS TO A
PUT IN WRITE SECTOR ARRAY
INCR. ARRAY ADDRESS
NO. OF CONSECUTIVE SECTORS
PUT iN WRITE SECTOR ARRAY
INCR. ARRAY ADDRESS
85 ENTRIES IN SECTOR WRITE BUFF.
NO

02!5!5t') 026560

J,.,P *+2

e2'557 026!566
02~60 064176
02561 006011
02562 026433
02563 060505
"2564 ~706~5
02~65 026'S7"
02!'66 06~626
02567 i'J646lA6
~2~70 11411112
02571 192"01
02572 026406
02573 126574
~I 2!5 7 4 000000
02575 1t.l64t23
02576 0601'17
02577 1d13001
026"'0 039001
02MH 073001

JMP 5733
'Dii SEXT
SU! ,RSS

EXIT FLAG TO 8

JMP 5123

GET ANOTHER SECTOR WRITE PARE".

S7~3

LDA

WAWS~

STA
JMP

LAWS~

I. DA

CHA2f1

~RITF

lD8 lAD2'"
JSQ 1029.1

01
JMP 5721

~ll

S6~0

.IMP "RITF,!

wRITE "OP
l DR DI1A D~
lDA MASKt
AN[ \IIR~
10Ft 1

STA hR2

YES
EXIT FLAG-i?

L_ST BUFFER ADDR.+1
WHITE OPERATJO~
NO. OF CHAR.-30
ST. A.OOR. Of PRINT BUFFER
OUTPUT ERROR MESSAGE
TURN SW.1S OFF IF ON
GET ~EW SECT. PARE~. FROM TTY
RETURN JUMP
IND. RETURN
DMA OCTAL _DDR. TO 9
PERF~RM

177700 TO A

PETAIN A6-A15
lOR DMA ADDRESS
RESTORE WR2

PAOE

0~2J

#02

SPECIAL Duc rIse DfAGNOSTIC FOR 2115/2116

0225
"226
"'227

1?t2602

~.16Hl~7

02f)~J

013010

026~4

03~3"'1

022~

\f),2f)1Il5

~73"'10

k1229
t:i2J0

~260~

~54627

~26~U

~2Jl

0232

1

~26612

10h
5TA
r.Ptl
.JMP

\IIR7
I'1ASKr"'+3

02·'>1" 064fJ3t

LOP.

~AS7A

~2611

[1126613

JM)l

.+2

1IJ6463~

I Ok

"'~S6A

IDA

"'ASKI

~233

k"I2~12

1.1234
"2 J';
tl236

~2613
~2614

kl601b7
013002

L(l2~15

03~~fVll

b237

~2~16

~~2 ,~8

LOA ~Asr<1
ANi: IIIR7

ANC kRJ
IOH 1
STA . . R3
l[JA "'ASKt
ANl wRA

0730P2
~ 2" 1 7 "6'" HJ 7

0239

\il2"2~

Vl24~

112021

0~41

02622 013004

02<12

~26~3

e73~~y17

STt. IoiR4
STA \loRn

~243

~2f.,24

;a6111Vl7

I.DA

lf244

k:l2~2b

IH30~5

ANC

e245

021'126

B30"'~1

I O~

MASK1
iliR5
1

'll246

02627

1!1730~5

STt.

iotR5

0247

0250

~2"30 064122
02631 06fJli17
02td2 013011
1a2633 0J00~1

0248
fl249

"13~04
e30\ll~1

10k

I

1

Diol DAnRI

tOA MASKI
ANt

~R~

~251

k1~~J4

073c;,11

1
STA hR8

0252

~2635

~06C111'\4

INti

02!>3

tVA I"1ASKt

~2!)6

ll26;~6 [1601 ill 7
02ftJ7 012777
ll26lie 0300~1
02641 072777

~257

~264:?

';258

1,12643 (1131115

02!)9

02044

0260
E261
0262

02t>45 lo173015
02h4fl 073040
02647 072764

tDII MASK!
ANt wR9
10k 1
STII i\R9
sr .. WRi1
STA I'IR1A

0~54

"255

1010

ANt kRl
J 0" 1
STA

0601~7
03'iHH~1

~263

02f1~l'

tHl2400

CLA

~264

")2~51

STA

02"5
6266
0267

~2652

070632
070641

~268

02653

1!J7~665

~265.4

\16f.l5f'212

ltiRt

WCO/"\P

STA SCOHP
STA BUFLr.;
LnA Af'iTBI=
STA ~AwTR

0269
"270

i;2655 (a70~~3
02656 060504
02057 0705~5

~271

02 6 MI

16 4 5 ~ 3

~272

()2fl61
02662

03.45~3

151 WAwTR

~273

06"5~3

LnA

"274

~2b63

S7.!4

lD~

;.ws~r;

STA

V.AWSH

ID9WA~Tg,I

Ir-AWTk

CPA lAWTk

TO A
RETAIN A6-A15
lOR O/-IA
ADDRESS
RESTORE" wR7
DI'lA CHAN.-t'
YES
NO .. Ay)DR.-3
1111·(li~

ADOR.III?
171'~~

TO

A

RETAIN A6-A15
lOR MAR ADDRESS
REST()RE
1117r~

I1R:~

TO A

RETAIN A6-A15
JOR MAR
ADDRESS
RESTrRE IHR4
RESTORE WR6
2777f}(~ TO A

RETAIN Af,-A15

lOR WCR ADDRESS
RESTORE WR~
H.P. rISK ADOR. TO 8
1777fltflt TO A
RETA Pl A6-A15
lOR n I-SK ADDRESS

RESToRE hRF\
L.P. DTSK ADOR. TO A
1777~~ TO A
RETA!N Ati-A15
IO~ DISK ADDRESS
RESTORE iliRt
1777~n TO A
RETAIN A6-A15
lOR DISK ADDRESS
RESTO~E WRq
~ESTORE WR11
RESTORE WR!A

CLEAR r;LAG
CLEAR FLAG
CLEAR FLAG
RESET WRITE TRACK BUFFER ADOR.
RESET WRITE SECTOP SllFFER ADDR.
PICKUP TRACK AnDR.
INCR. ARRAY ADDR~SS
CU~RE~T ARR~Y ADDR. TO A
LAST BUFFER ADDR.+l?
YES-~ET WRITE COMPLETE FLAG

I. OA

TRAC~

0278

fc:l50""14
026~A V'l34632
02~65 13613633
02666 0101;34
fc:l2f.n7 0135727

0279

02570

03"H~~1

to,"

028~

02671 ~7~b34·
fc:l2672 16450!)

RETAIN A15-A14,A0-A7
l"'-A~ TO A~-A13
TRACK ADDR. TO A
RESTORE wCOMW
PICKUP STARTING SECTOR ADDR.

0275
~276

'/1277

0281

lSi WCOMP
5844
ANt ~COM""
RLF,BLF
1

ST' wCOMw
S7~4A

LPB

~AWS~,J

HASK~140377

PAGE 0024

#~2

SPECIAL ouc rIse DIAGNOSTIC FOR 2115/2116

0262

02673. 034'505

191

"2a3

02()74 IllM1640

LOA S8of5

!HCR. ARRAY ADDRESS
SECTOR M.SK~1776~0

02e.4

02075 010634
02"76- 030~01
02b77 07~"34
027021 1645r.5
02701 i6345~~
027~2 060505

ANt ,,"COM""
lOft 1

RE't.\

028~

E2A6

0287
0288
0289
0290
0291
0292
0293
0294
0295
0296
0297
lD2~8

"21~3

~26502

0271(17
027H'
02711
0271?
""2713

0740160

JMF 5727
Sl~ V

001727

ALf,ALF

~H'1323

~HI,RAR

04V'1ft15
003004
040111!'l6

ADA

tD2721 1301323

0305
0306

~2722

id309

0J10
9311
0312

0313
0314
0315
0;'U6

0317
0318
0319
0320
0321

0322
0323
0324
0325
0326

('1327
.0328
0329

t058

CHA,INA
ADA 1069

SSA

00202~

0303

,t

S2Q,RSS

1tf21~F>

16304

0301
03'06

WCOMw
WA~S ..

CPA LAwSA
IS2 SCOMP

~5'~"'~5

02716 026754
02717 074000
"'272tJ 0(,) 1727

0302

STA

IDI!

lSI WAWSA
LOA IIlAWSR

027t:lA 1/)3.11641
02705 00"003

0299 . ~2714
('1300 1t)2715
0J~1

~AWS~

S7~5

JMF

5738

ST!oI ~
ALF,Al.F
RAk,RAR
CMA,INA
~TA wDCNT
CLA

00J"1b4

02723 ~70fi37
02724 0024013

r~

40-A5

SECTOR AODR. TO A
RESTORE -COMW-TR./SECT. COMPLETE
PICKUP
OF CON5EC. SECTORS
INCR. ARRAY AOORESS
CURRF~T ARRAY ADDR. TO A
LAST DUFFER ADnp.+l
YES-SfT SECTOR STRING COMP. FLAG
SECTOR VALUE >01
NO-EPROR PRINTOUT

*

B TO A
MUL.TIPLY BY fl4
ADD tST AVAIL. LOCN. VALUE
2'5

CO~PL.

SUBTR. LOWER FROM UPPER
ERROq-RUFFER LENGTH EXCEEDS MEM.

Goorl MEH. FIT

MUL.TIPLY BV 64
2'S COMPL. OF TOTAL WORD COUhT
WORD COUNT REAflV

02725 030105
02726 070636
02727 0V'17004

CM~,INR

027.3~

074642

5TB

S~47

lOR START ADDR. OF AVAil. HEM.
OUTPUT ANO ST. ADOR. READY
2'S CO~PL. _ OF SECTORS
RETAIN # OF 5ECTO~S

02731
1(:2732
02733
kl2734
02735
02736
02737
0274'"
02741
02742
"2743
02744

1i16~105

LOA
STA
LDA
STA
LDA

105S
5848

ST. OF AVAILABLE MEH.

070643
06 01 2(')7

J Oli

57~6

070266
060375
~70J74

16ta2b6

1 ~ 58

STA wOIR

S7~7

170643
kl34266
034643
034374

S8:'.3
5622
5829
ST •. 5828
lD" 8822.1
ST; S848.J
5822

's,

02745 034642

lS;' 5828
JMF 5737
JSl S847

02746 026733

Jf1P 5736

02747 060375

LOA S829
ANI': WDMlw·
lOR DADRt

~10ftJ5

'-"2751

030122

033~

02752 07~635
02753 026761

0331

02154 060662

tD332
0333
0334
0335
0336.
0337

k'l2755 064"44
"215ft 1141"'2

0338

02763 070ft907

97J8

STA

~tPUw

.JM"

5739

LDA CHA27
lOt'} IAD21
JS910?B.J

t-Il.t 01
JMF 5708+1

02757 102001

02760 026202
.,2161 06"'663
02762 070"'06

RESET -604
PICKUP PATTERN ~ORO
STOPE IN OUTPUT BUFFER

152 S8~8

02~731

0275r

RESET SECTOR PATTERN ARRAY ADDR.

S7~9

l DA S849

sr ..

6

RTA 7

SECTMR COMPLETE?
NO
ENT)RE 8UFfER COMPLETE?
NO
YES
RETATIIJ At'--A15
tOR ~.P. DtSK ~ODR.
RESTORE HDMAW
OUTPUT TO DISK
CHAR. COUNT-32
ST. ADDR. OF PRINT BUFFER
OUTPUT ERROR MESS.GE
TURN SW. 15 OFF IF'ON
GET NEW WR!TE PARAMETERS
RETtJRNJUMP
(NT-. LOCN.
INt. LOCN.

PAGE

0~2~

VI:S~9

~,

H;~40

~2160

27h4

*02

SPECIAL

ope rISe DIAGNOSTIC FOR 2115/2116

Hl 2 ~'Hl 0

lJA

0.342

SSA
.1M'"

~34S

o 2 7 7 r: " 6 ~ 7 2 1

ln~

0344

"2771

"3<11

~J49

,~2776

~J50

1iJ2777

0':';51

~300\)

0352
fi3~3

.3 (I 0 1
03:.102

0354

~

HS55

0.5004

"'~S56

~

3 ~~ '.1 .3

064711

o,:H' ltj 5

fO.:s~'13

~36.:s

11)364
'~3t 5
l!:lJ6b

t:ll 0 fl 6 5
1 U25 e '"

03vq b

0~2~

0.3'~

wR1A

WCOMtoi

Ln_

WD~A

IDA

It.DIR

OTA 0

STI: e
LDA

"'DCNT

OTA e
ETC

Ii1,C

~Tc

0-

STF e,
CLA
STA bUFLr.
l

fA

V.

SLA,RSS
IS J H UFL I~

11

17 0 J 4 66 5

~n67

~:;W2\,7\

0~121(l

IDA

~3~'21

0~2~}f16

tN.o,SZA

0369

~

0370

03,123 1 "'25~ 1
~ J ~) 2 4 VI ~ 1 :3 2 .3

L

0J~25

kAFt

3 ~12;> 027 (.121

J..

*-t

e1

li:IJ~127

027032

03~13~1

10311.1~

.3 ,,\ .3 t i l 5 2 1 1
1 0 3.1 0 0
030033 1"'2!'vJ1
~

.IMP wATT,.1
ClF 0
I'<

Al T 1 ,lSI! 5870.1

{~ .3 ;;1 J t'

CU,

~

L IA

e1

~3;')34

001323

~Ak,RAR

~380

0,Sill3ti

~\-113V.0

lolA"

i 1381

"-l3~36

000010
02711'!66

SlA

Vl382
~1384

~J,il37

oJ\J41ii

U}2~(lH:J

~386

031ti41 0PJ~~1Q!
0:'h112 ~3df.l65
"'3;143 061323

0387

0J~44

0388
0389

~

~..s

~390

03"47 061245

"385

J

l~

",Rl1

0013160
4 5 13 ~ 20 1 1

146

DMA CHAN.
to4AR ADOR.

#6/7
#')/3

STAPTING ADDRESS-SIT
MIlR ADOR.

15~~

"'2/3

WCR AnDR. tl.2/3
2'5 CO~PL.-WORD COUNT
wCR ADOR.

t:f2/3

DMA Crl4N. #6/7
H.P. nJSK ADDRESS
TUR~ON

INTERRUPT

CLEAR FLAGS
L.P. DISK ADDRESS
RlJSY BIT"l?
ERROR ... Sf.T FLAG
77777 TO A

TIME-OIlT LOOP
SW.

REG.

BIT

:3

Tn

A

TO BIT 0

NO SIJPPRESS?

(;1379

0383

TURN.OFF INTERRUPT SYSTEM
TRACK/SECTOR Ann~ESS
L.P. DtSK ADDRESS
H.P. nISK ADOR. AND CLC

~Ah,RAR

3~1300

~374

WJ77
b373

.JM~

$869

031d26 i-HHH,11e

V,375
fJ376

...

UTA V
ClC ~

0368
0371
Y·372
eJ73

I

OTA 0

GQ!~4~"

o 3 r., 1 4
o os ,1 1 5

1~28.

'elF v
l DII

1 02 n, 0

~362

0,360

JI'4F
S7~9A

kl60635
1 02 '> ~ ~
H'67160
0 6 tJ 6 3 6
102MH1

"'361

~308

Vl3'5Q

.JS~

'''IT P1

06f"634
l1il26l:0

0.3'H16 !i.1M1 637
0S0v\7 102600
~ J t~ 1 0 1 ~ 3 7 0 0
03n 11 1027l1ltj
03012 li~2100

'}357

S7~9A

CrlA2u
I OH 1 A 02u

~J4')

0277'2 1141V12
~;S46
02773 1tJ2~01
1d:3~7
~2774 02&764
0J.48 , ,~2 7 J ~ H131 Ill,£"

0

AL",,\LF

t'01727
{I) 21 6 b 0 tl 2 ~, 2 VI
912767 02tJ75

1d27i.1M~

I

.1 MI- S 7 41
P v.

BIT 3 TO BIT"
~O SUPPRESS?
SUPPRESS PRINT
L.P. OlSK ADDRESS

Sl~

BUSY BIT-0?

lSI

8UFlr.
~A .. ,PAR

NO-ERROR

"Ak
SLA,PSS

STATUS SIT 3 TO BtT 0
BITClI.l?
NO .
A6-AlJ HASK
RETAIN TRACK ADDR.
MOVt TO Ae-~,I\
A TO B
CONVfRT OCTAL TO ASCII

JMF 5740

LOA 5R72
ANI wCOt04-H
ALF,ALF'

~391

I.1,H':>~1

01~634

0392

03"'51

0~1727

~393

i670",~q

RT.o

~J94

03(-152
o S~· ~ J

.IS,",

0'395

~,5054

11 4 , 1 3
0252r, 1

sse5

BYPASS PRINTOUT
TURN-OFF INTERRUPT
MISSJNG JNTE~RUPT
TURN-OFF INTERRUPT
SW. REG. TO A

JMf

1
CONV.I
5883

~AG!

0~2b

#02

SP~CIAL

DUC rrsc DIAGNOSTIC FOR 21'5/2116

.

DA CHft 4~

0396

~3~55

"'b1230

I.

0397
0398
0399

0J~5f,

~65214

lOS

0.100
~401

03057 114 H~2
03~60

0bU665

I~D4~

JSP 10?B. J

S740

LOA

5741

SlA,RSS
JHfoI 5741
tDA CHl2R
I 0& I A D21'.
JSi:i hJ2B.'
r.LA

03Y161 "Hl2(,03
03062 027066

CHAR. COUNT-20
ST. AODR. OF PRINT BUFFER
OUT'PIJT ER ROR "'ESS AGE

BUFU.

0402
tJ40J
0404
0405

03iJlb3 ~6"'710
03kl6A 061\6b6

W406
0407
0406
W:).409
e410
0411

03»67

07~665

S TA

03~1"

0J{:I71
03rt72
03073
03074

LOj SCOMP
Slj,RSS

0412

0,3075

060641
002003
020672
002400
070641
06"'632

~413

03076
03077

~~2003

~41A

0266~6

.1 MF

0415

031~0

002400

eli

YE5

0416
-'d17

03101

07~n32

bTA wCOMP

031~2

00~~00

~418

031~J

lkt2b01

~419

03104 0013V'10

CLEAf( FLAG
JUMP RF:TuRN
5W. PFG. TO A
8IT 1 TO BIT 0

042'"
0421
0422
0423
0424

e31~5

03;H;'J5 114102
0J~66 002400

S6it

07037.a

0311.4

0b~267

00128

03115 07C'1266
0J116 Ib02b6
03117 0030t.10
"'3120 170266
03121 034266
03122 034374
03123 027116
0312d 026654
@3125 ~0~~00

5734

"'OF
l t A 01

wAH
SLA,R5S
.lMi"
LDA

060231
03110002Yll1
03111 ~26654
~3113

0433
0434
0435
0436
0437

ST. 5COMlo>

~J107

0426
0427

5734A

lOA l*iCOMJ.1
SZ.,RSS

133106 027125

03112 060375

B lJFLr;;

CLA

0~2~11

04:t5

0429
0430
0431
0432

.IMf

5742

SECTOR STRfNG

CO~PLETE

NO-CONTINUE SECTOR PROCESSING
YES
CLEAR FLAG
TRACK WRITE COMPLETE FLAG
FL AG>~"?
NO-GET NEW TRACK VALUE

8IT 1-17

CHUFF
SLA,RSS

COMPL. PATTERN BUFFER

.IMP; S734-2
I Dj 5829
sT" 5828
iDA S823
STA 5822
LVA 5822.1

NO-WRITE SAME PATTERN BUFFER
YES
-64 RESET
SECTnR BUFFER ADDR.

STJI

5822.1

IS2 5822
IS1 5828
.f HF- 57 A 2

JMP S734-2
"'OF

RESET

PICKUP WORD
COMPl. WORn
RESTORE WORD
JNCR. AODR.
64 WORDS FINISHED?
LOOP
WRITE COMPL. PATTERN
BEGINNING OF READ PROCESSOR

"'J12t:. 06"'S~6
163127 070S07

LDA ART8F

8TA WARTIo\

RESET ARRAt ADDR.

ki440

14313(.\ 0612e5
03131 071204

-65 TO A
-65 TO WORKING

~441

031:32 HJ251H

lDA 5863
ST" $862
l IA 01

~442

03133 002020
03134 027140
~313!) 06"'732
0.3136 064722
1.13137 114102
03140 ~6~2~0
03141 070177
03142 015300
03143 040226
113144 002020
03145 0271S3

0438

"'439

0443
~444

kj445
044{)

0447
0448
0449
04!:l0
0451

0452

Fl4G

FLAG>~1

5743

eMA

S7~3

COUNT-.i9
ST. ADOR. OF PRINT SUFFER
OUTPUT ERROR MESSAGE
CHA~.

~SA

SW. REG. TO A
BIT 15-0?

.IMP 5744
l DA
I.D~

CHA31f1
1"031A

JS8 102B.l

5744

LDA S6~5
ST" S8(.ot4
JS9 S900

ADA 5816
SSA

.J'1P

57.8 5

1110. OF CHAR.-1J
ST. ADOR. OF PRINT BUFFER
OUTPIIT MESSAGE
CHAR .. COUNT-72
SETU~ INPUT CHAR. LENGTH
CALL INPUT SUBROUTINE
ADD -73 TO CHAR. COUNT
POS.DERROR
NO ERROR

PAGE

#~2

~PECIAL

Doc

rISC D1AGNOSTIC FOR 2115/2116

0453

0Jldn 060445

lDa CHA2t

0~'j4

V,J147

l O~
.ISP

t16A421

\'1455

~131~QI

11~1't2

t'1 45f)

eJl;;l

1"2V1"1

0457

"'3152 027126

V14~e

~J153 015341
03154 165"476

Q\45Q

V'.4F,2

03155 027171
'r>315f"l 050477
It"H57 027171

04bJ
0464

tl316" (l505~0
03161 '42714~

~465

~\.:!t:>0

I!) 4 /)1

.

~0~7

I A021
lQJ26.1

"'Lf el
.IMF 574;,s+1
57"5

J5.-

59tiJl

CP~

S832

.lr1F S746

cp. S633
.lMP
CPJI

5746
5834

JMP 5744

"'4~b

0031,,2 (l\5Q1!1)12
03163 0\272~0

~d67

031f:l4

"6""445

I D.A CHA2t

0t68
12'469

Ii)Jl~5

~64C:;ld

lUi!

'93166

114\~2

I A02:'(
JSIi 1028.1

kl47~

w31t>7

1~2fHl1

~Ll

6471

~3

e472

t 7" ~j27126
v1317.1064176

cpa 583"
JMF 5747

S7A6

vt

.IM~

S743 ... '

l D~

SEXi

CHAR. COllNT-37
ST. ,AODR. OF PRINT 8t1FFER
OuTPUT MESSAGE
TURN Sl>l. 1~ OFF IF ON
GET NE~ TRACK PAREH. FROM TTY
GET 4 CHAR.
IS C~AR. ~ RLANK?
YES-CHECK EXIT FLAG
IS CHAR. 4 COMMA?
YES-CH~CK EXIT FLAG
15 CHA~. A SLA~H1
PROCESS CONTINUATION
IS CHAP. AT?
YES-ppnCESS PARA~ETER
CHAR. COUl--jf.,37
ST. A"nR. OF PRINT BUFFER
OUTPUT MESSAGE
TURN SW. 15 OFF IF ON
GET NEW TRACK PAREM. FROM TTv
EXIT FLAG TO B

0-173

13.3172

~06011

SL~,hSS

0474

103173

027153

J~P

\'l47!';
~476

\13174 0605"6
03175 !?'5~507

(P.A

\oOART~

YES
ANY PHRJES?

.1MF-

fA

NO-R~-ENTf.R

0477

\1,S17~

l!'478

03177 027311

S745

tn' ART8i'

~2M"42

5755-3
LD' 5842
5T_ 5843
JMt-

~iH\1

0321'1'" 060M'2

Pl002

It ;S 2 ~'!

0;H'3

\il32fil2

0024~0

0V'k34

~

~ 7 (t 5

r. ~H15

~32i1.i

015341

.1 SF!

S 901

'Hl~6

~3;(05

k'J3~!)~

051:"1476
027222

cp~

l"0~7

JM~

$832
5748

JSf!i

S9~2

~(\\18

01/)09
~'I.'1~

3 ;? ;(1 3

57.7

~~ 7(:l 003

LL_
!)TA S8.d0

4~

032~17 e 15363
03?11? 1cl27126

\tl3211

JMF 5743+1
lDr !"ASK")
ANl 1
lDP 5840
RLF,Rt3R

Vl64t1A

vHHl

o .s 2 1 2

13 1 ~ t' ~ 1

0012

1?-3213
io1321d

~645A~

kllol3
V'014

~3215

03\tl0~1

101.

1

0~15

03216

07~'540

~Tj

584A

klJ217

034(1~3

lSi

5B.43

.lMF

5747+4

0018

0322V; 027204
03221 027?32

JMF

S75~

01019

~JJ222

064176

~v!20

~3223

~06\-111

0272~4

0~"

16

~H1l7

~"!)723

0,121

0Jl2t1

~022

0J22!'i 06HH5

"'V'23
0~)24

03;>2" 064777
03227 1141e,2

"~25

0J2.'S{I1

1~2;;)~1

l1~:26

~3231

027126

0"27
0028

0J::?32 010341

0(.129
f1l130.

1ttt")31

163233 I8tn)476
~J234 M27240
0~235

0t1~1501

£J2~t'I

027244

S7c8

109 SEXT
SLI",wSS

.1MF S747+.4
1.0A CHA3t
LDB IAf\31

.lSI,! 1D?B.1
"L I 01
.IMF 5743+1
JS" 59"1
C:PA 5832
.1",F S751

CPA 5835
J"'P S7~2

~lAG-l1

EXIT
NO

FROM TOP
YES-GET READ SECTOR PARAMETERS

-3

TO

A

RESET CHAR. COUNTER
CHAR. HOl:::
('HAR.
IS CHAR. A ~LA~K?
CHECK EXIT FLAG
CHECK LEGALI~Y-'-7
GET NEW TRACK P4R£M. FROM TTY
CLEA~

GET

l

7 TO b
RETAIN AI?I-A2
PARTIAL Tn H
ROTATE LEFT :3
lOR ~ TO A
RESTORE RESULTS
TRACK ADDR. FINISHED
NO-GET ANOTHER CHARACTER
CONTINUE PARAMETEN
E. x.,I T F LAG T0 13

E>MT FLAG"'1?
NO-GET A CHAR.
CHAR.

rOU~H

-25

ST. ADDR. OF PRINT BUFFER
OUTPUT ERROR MESSAGE
TURN gl,ll. 15 OFF IF- ON
6fT NEW TRACK PARAMETEN F~OM TTY
GET A CHAR.
IS CHAR. ~ BLANK?
YES-CHFCK EXIT FLAG
rs CHAR. A - 1
'1ES

PAGE

~~2a

#03

SPECIAL DUC else

03237
0324ft)
~t34 . 03241
0~35
1113242
0036 03243
03244
00'37
"W38 03l4~
003'1 03246
0040- 03247

021225
16417"

0~41

01f>341

0'032

e~33:

032!s~

9L@

JMP 5149
JMP 57!>0

027232
0606R2
010603

l DA

03251" 050415

032!J2 027266
03253 .,153"303254 027126

SR42

STA 5843
ClA
S.TA 5841

002400
07\6541

~"'42

0"44
0045
0046

JMf S749

lDJl SEXT

004010
027225

"043

D'A~NOSTIC

S9P!1
CP·. 5832"
.lSi'

.IMP S753
.1$8 59012

JHP 5743"1

0J2~5
~J2!S6
~J257
0J26~

~64114

IQ""7
0048
11)049
0~50

0·3261

030~k:ll

LDB S8"1
R.lF , RBR
J 0" 1

032~2

0'7.ftl!'i41

STA S841

""51

064541

005723

0"'~2

03263 0346£13

0053-

03264 027250
03265 027272

00~4

0P55
0[156

03266 "'6'4176

S0b7

0.5270
03211
163272
03273
03274
93215

\h~5a.

~'~59

006~

C061
~062

00b3

03267

lDS
ANC

010301

0012
~\iJ7J

0074
0075
01$76

0l;}17
"076
0..,79
+2&80

.4d\tf81
'(II~82

"~a3

".,84
0085
f1086

0987
008&

1

(SA 5843
JMP 5152+4
JMP 5754
57~3

"A6~11

02725A

l08 SEXT
SL9,RSS

061!t5.tl

JHP S752+4
5149
1.0. 564!

0030~"

f.11i, INA

027225

.J",?

070541

STA

Sad!

~tle540

t.

DJ

sa4~

.0327f> 1705\17
ij3277 034e07

5TA WART"','
152 WART'"

0064
0065 03300 0"20(114
0066. 03301 035204
0061 0331d2 027304
0,,68 0J303 027314
0069 ..,3304 0"345"1
0U7f1
0330~ 027276
0fd71

I'!ASI(~

INA
lSI 5862

JMP .+2
.JI1F

5755

rSi 5641

JMF 57'54+.
lDQ 5EXT
SL8,RSS

~33~6

064176
163307 006('111

03310 027153
033 11 ~MJ507
03312 071f!16

.IMF

03313 027321
03314 061037
03315 065~20
03.316 114102
'3317 1020161
03320 027126
03,321 060510
03322 070511
03323 061207
03..524 071206
"3325 102501
.. 3326 002020
03327 027333

.IMF

5745

lDA wARTk
ST. LART~
57b5

5756

1.0A CHAJ?
l Db

lAD3~

JSji 1028. t
I;LT 01

JMP 5143"'1
57~b

I

Dj

~

RSSr:

5TA

lIiARSA
l DJ 5865
.R·T j S 864

tlA 01
55.
J,.,P 5757

FOR 2115/2116

NO-PRr~TOUT ERROR MESSAGE
EXIT FLAG TO B
EXIT FLAG.0?
NO-ERROR PRINTOUT
GET A CHAR.
-3 Tn A
RESET CHAR. COUNTER

CLEAR CHAR. HOLD
GET A CHAR.
IS CHAR. It BLANK?
CHECK €XIT FLAG
CHECK LEGALITY-0-?
GET NEW TRACK PAREM. FROM TTY
1 TO B
RETAtN A0-A2
PARTIAL TO R
ROTATE' LEFT 3
lOR B TO ,.
RESTORf' PESULTS
TRAeK SEQ. CHAR. FINISHED?
NO-GET ANOTKER CHARACTER
CONTINUE PARAMETER
EX IT FLAG TO 8
EXITFLAS-1?
NO-GET ANOTHER CHAR.
OUTPUT fRRORHESSAGE
SEQ. 1/..

2,5 COMPL.
·BLOCK S!Q. FOR TR_CKS
ST. TR~CK ADOR. OF RLOCK
STORE' TRACK ADDRESS
·-[NCR. ARRAY AOD~ESS
tNCR. TRACK ADDRESS
64 ADDR. ENTERED
NO
YES
INCR. # OF TRACKS
NOT FINISHED·
EXIT F'LAG TO B
EXIT FlAG-1?
GET ~NOTHER READ TRACK PARA~ETER
LAST TRACK RE~O BUFFER ADDR.+1
LAST TRACt( READ SUFFER ADDR.+1
GET READ SEC10R PARAMETERS
CH4R. COUNT-28
ST. ~DDR. OF PRINT BUFFER
ERROR PRINTOUT
. TURN SW.t5 OFF IF ON
GET NE~ TRACK P4REH~ FRO",TY
R£SETARR4Y ADDRESS
-85 TO A
RESET WORKING COUNTER
SW. REG. TO A
811 1'-(it7

NO·PIt fNPUT

PAG~

~02~

#~3

SPECIAL

nvc rlsc DIAGNOSTIC FOP 2115/2tt6
IDA CHA3:1

~(il89

0.J33~

~H}9~

1.;1

\J ., 9 1

~3J3?

114102

LiH3
.1 S P

~l192

\()j;D3

06'112~0

I D~

1\1 2 B • J
SM'S

c; 3

~J.3J4

J7~177

5TA
JSR

SIH'l4
S91-10

~10

3 J ;) 1

k)6105V'
~6504~

:3 ~ 0 1 5 :5 0 ~

IAn3,~

~W94

~ ::L~

~~95

0J3"sb 04r1226

IIDA S816

~')9b

f£l3337

01?;2'l12tt'1

S5A

~~'19J

~3:-54'"

\127346

.JMF

S7'iR

0J3.!! 1 "'nl1445

IDA

CHA2'

'~~1913

Ilhl99
0Hhl
VlHH
0H)2
01V13

i(L~3

42

~1)4421

LDB

lAP2'

0S;H31141"'2

J SIo'

1 ~~ ~B • I

03J44

t~2V1~1

... LTC, 1

~JJ4!)

~27321

.IMP

S7~6

JSfl

S91'1

r:PA

S832

0H~5

03346 111!':!341
id33d7 ~50476
t:i -3 3 5 ~j 02 7 ;:, 6 4

JMF

8759

\?ttAo

~3351

~5~477

CPA S833

~ltA7

~3,.,52

027364

~1~8

VJ -5353 05~500

rpA S834

0109
1U110
\} 1 11
V,112
0113
\(j 11 A

03354 027333

.II'lF

~3361

1141~2

~115

~i3362

1 ~2~H" 1

0116

~~n63

H27321

~117

io13364 0.64176
133,'51)5 ~l1o(-l11
~J36t (327346
~3.3"7 027476
o .3 3 7 ~, ~ 6 0 6 ~ 2

~104

0118
01 19
~12~

0121
"\122
~,

123

.IMF

5759
S 75 7

(03J55

~5v)51J

r.PA 5837

IS CHAR.

~3356

027370

.1 P.1P

~33?7

06~445

IDA CHA2'
l.O'" IAn2~
.JS~
1028.)
klT el

SU~,RSS

YES-PRrCESS PARAMETER
CHAP. cnUNT=37
ST. AOnP. OF PRINT HUFFER
OUTPUT ERROR MESSJGE
TURN sw. l~ OFF IF ON
GET NEW SECT. PAREH. FROM TTY
EXIT F'lAG TO 8
EXIT FLAG-1?

JMF" S758

NO

03360 064514

~3371

S7!:9

S7t0

e7ro6~3

~ .~ ;S 7 2

" 0 2 40 ~
0.,337307<1"i4"

S 7 6 (II

JMF 57'56
5E"XT

lD~

.1MP

5768-3

I 0STII

5842

S843

01~6

~5"476

STA $840
JS~ S901
CPA S632

0127

~3316

027412

JHF

$7151

0128

03.577

VJ1~363

k:ll?9

0,3400

f.Il27321

JSIoI
.IM'"

S9iil2
5 ;756

0130

~34~H

lDH

t'lASK.)

S8d0

k'>1?~

A.

51

YES~JUHP TO REAr OPE~ATION
-3 To A
RESET CHAR. COC~TE~

CL~

'1J374
03375

\-'1124

NO. OF C~AR •• 14
ST. ADOR. OF PRINT BUFFER
OUTPUT MF.SS~GE
CHAR. COUNT-72
SETUp INPUT CHAR. LENGTH
CALL I~PlJT SU8RQUTINF:
ADD -73 TO C~AR. COUNT
POS.-ERROP
NO ERROR
CHAR. COUt-lT-37
5T. APOR. OF PRINT BUFfER
OUTPUT ERROR MfSS.GE
TURN SW.15 OFF IF ON
GET NEW SECT. P4QfM. FROM TTY
GET A C~4Q.
IS CHAR. A BLANK?
. YES-CHECK EXIT FLAG
IS CHAR. A COM~A?
YES-CHECK EXIT FLAG
IS CHAR. A SLASH?
PROCESS CONTl~U.TlON

~15341

CLEAR CHAR. HOLn
GET A CHAR.
IS CHAP. A BLANK?
CHEep( EXIT FLAG
CHECK LEGAltTY-~-7
GET NEW SECT. P,PEM. FROM TTY
7 TO B

\-1131

Vo64114
o .3 ,H'12 11 1 k1 Ii"l' 1

~132

~S4\13

~64~41J

UH
lOi:!

~133

133-1 1,14
03405

0QJ~723

kLF,RRR

ROTATE LEFT 3

k:}30"ltl

I O~

IOR,)TOA
RESTORE RESULTS
SECTo~ ADDR. FINISHED?
NO-GET ANOTHEH CHARACTER
CONTINUE PARAMETER
EXJT FLAG TO 8
EXIT FLAG-1
NO-GFT A CHAR.
CHAR. COUNT-25
ST • • nDR. OF PRINT BUFFER
OUTPUT ERROR MESSAGE
TURN SW.15 OFF IF ON

~134

135

V>138
f1139

l13411l6 ~70540
034,'7 0346~3
0J410 027374
03411 027422
~13412 064176

~140

03413 006011

~'

~113h

~137

1

1

STA S640
IS1 $843

S7C 1

.J MF

S, ""., ... 11

JHF"

S763

l n~

SEXT

SL~,RSS

~lAl

~34111

~142

o.3 4 1 5 0 e 1 ~~ 1 5

0143

~3.116·064777

LOP.

IADJ'

0144

03417

11.41~2

.)S~

102B.I

~t45

{et342~t

IItl2~!61

"'L 1

~,

JMFo 5760 ... 4

"'27374
S7~2

I.D~

CHA31

1

RETAJN A~-A2
PARTIAL TO B

PAGE
0146
0147

161"8
0149
~1~0
0~~1

0152

~030

0J42l
03422
03423
0342A
\:13425
0J426

#03

SPECIAL

027321
0153 41 1

Dv~

tISC DIAGNOSTIC FOR 2115/2116

JMf 5156

S7tJ

05t1476
1027-.130
1050501
027434
1d3427 027415

Slot 5843

GET NEw SECTOR PARAHF.TER FROMTT
GET A CHAR.
tS CHAR. A BL~NK1
YES-CHECK EXIT FLAG
IS CHAR. A -1
YES
NO-PRtNTOIJTfRROR MESSAGE
EXIT FLAG TO 8
EXIT FLAG-~?
NO-ERROR PRINTOUT
GET ~ CHAR.
-3 TO A
RESET CHAR. COUNTER

r:LA
STA 5841
J5f! S9~1
C:PA S832

CLEAR CHAR. HOln
GET A CHAR.
tS CHAR. A RLANK?

JSk 5901
CPA 5832

JMF 5764
5835
JMP 5165
JMP 5762
LDS SEXT
cP~

S7E4

0153

0343(,4 064176

0154

0158
015Q
0160

03431
03432
03433
03434
AJ435
834S6
03437

01~1

ij344~

0162
0164
0165
0166

03441 1i'50.t76
163442 l!t27456
030143 1015363
~J444 027321
03445 064114

0167

0344h

~168

tD~

0170

03447 064541
03450 k'~5723
034~1 030001

,"1171

iilJ-152 b7,'541

~172

0177

IOJ4!'!3 0J46~3
034S4 (l!2744~
0'3455 ~27462
03456 064176
03457 006~11
~346~' 027440

STA 5641
151 S.:)43
JMF 5765.4
JMF 5767

0155

0156
0'157

{blb3

11'169

~173

0174
~Jl75

0176

0~4010

SLR

027415
027422

JMP 57"2

e6~fl02

070603
002400

070541
k)15J41

~178

03461 027415
~J462

~180

k'J4ISJ 17~511
\itJ4b4 034511
03465 060541
034b6 170511

~181

06054~

l DA S842

.H1J1 5766'
59A2

.IS~

JMP 5156
lDt!

~10"'ti1

0179

0182
0183
1"184
16185
0186
0187

JM? 57tl3
5765

MASI(~

'Nt 1
5841

ALfO,R8R
lO~

Sle6

1

tDB SEXT
SL~,RSS

JMP 5765+4
JHP 5762

S7t7

I. DA

584ft)

STA WARSR,t
rs~

WARS;:t

LDA

5841

ST' "'ARSArt

03467 034511

IS1
lSi

035206
03471 027473
l1J472 1d275~1
0347~

\otAr;lSA
$8t\4

JMP *+2
J"lf

571'18

l DI!i SEXT

0189

0J47J 064\76
03474 0~6~11

019~

163475 e27J46

J,.,..

5758

0191

03476 060511

I VA

~4RS~

0192
~194

03477 071017
035CHl 027511::t
l:1J50J tJ61071

STA LARSk
.JMf.' READ
tDA CHA3d

~195

03~HJ2

065051

lDP IADJ.

1819~

03~~3

114 U)2

JSP 1028.1

0197

1d3tH,4

102~111

03lS?t!\ 021321
0350.6 "'27570
0;S5~1 125260

'''IT e1

0198

5622

03510 000000

READ

0188

~193

0199
02160

0201
0202

03511 964123

SL~,RSS

S7E8

sses

JMP S7~6 ...
.IMF 5769-2

JMF READ',I
l\OP

LOA

DHAD~

CHECK EXIT FLAG
CHECK LEG4LITY-0-7
GIT NEW SECT. PAREM. FROM TTY
7 TO a
RETAIN A~-A2
PART!Al TO B
ROTATE LEFT 3
lOR R TO A
RESTORE RESULTS
SECTOR SEQ. CHAR. FINISHED?
NO-GET ANOTHER CHARACTER
CONTINUE PARAMETER
EXIT FLAG TO B
EXIT FLAG-I?
NO-SET ANOTHER CMAR.
OUTPUT ERROR MESSAGE
STARTING SECTOR ADDRESS TO A
PUT IN READ SECTOR ARRAY
INCR~ ARRAY ADDRESS
NO. dF CONSECUTIVE SEC10RS
PUT IN READ SECTOR AkRAY
INCR. ARRAY ADDRESS
85 ENTRIES IN SECTOR REaD BUFF.?
NO
YES
EXIT FLAG TO B
EXIT FLAG:at?
GET ANOTHER SECTOR READ PAREM.
LAST SUFFER ADDR.+1
PERFORM READ OPERATION
NO. OF CHAR.-29
ST. ADOR. OF PRINT RUFFER
OUTPuT ERROR MESSAGE
TURN SW.15 OFF IF O~
GET NEw SECTOR PAREM. FROM TTY
BYPASS READ PARAMETERS
RETURN JUMP
IND. RETURI'1
DMA OCTAL ADDR. TO B

PAGt
1i1:! "-~ 3
~ 2fJ.:1

0~31

r

\131-;12

#~3

~PECIAL

Dur

[t~c

DIAGNOSTIC FnR 2115/2116

itH.'\Al~\7

In.

~ASKI

1" 7 7 CJ.~1 TO

.. Nf
10 fi

Rll~

R£T4tN A6-td5
lOR DI-'A ADDRESS

~D?

~J~13

A

Cl2~5

•.l1J713
0J"J!4 03.HH'l

1l12~6

~~')1~

073713

STA

~2~7

~j~lt>

Plo~1~7

I

~2:J8

~J?17

HJ[

112~9

~LS~2'1

vl13722
"'J"'~~' 1

10'-

1

02Hl

~.j'21

e.13722
03522 054627

STA

~212

"'.j~23

~213

\-13~241

~646..51

.1MF
L OF!

RD7
to·ASK'"
*+3
MAS7A

~214

~J~2~

027~27

iil215
[(1216

V'217

03"'26 Iiln463Q1
~ J "i 2 7 ~H~ I-l 1 fl 7
iAJ~3'" 013114

~218

030;31

~3"~H1t

~219

~3~d2

>/173714

""22£1

Vi224

0.5533 0f;>P1""7
03'134 013716
0.5535 ~3"iI!Iil1
1:1J~3h 073716
i03~J7 073721

U220

03:54C'1

"6Vil~)7

STA "'Df,
LilA ~ASKI

0226

~)J541

013717

~Nr

1t1227

~3542

~3VH1l1J1

10"

1

l1228

STA

R!J5

"'231

163543 ~73717
03544 064122
Ii! J 5 4 5 06 0 1 '~7
t:J3546 0137(>3

LDP
lDA
ANI

DADRI
:-1ASKI
kJ)1)

~~32

~3:;47

~~HHljV'l

I Ott'

lOR ntSK

"'233

03~50

~7j723

0.23,1

(H1f,~Vl4

fiESTOPf ROB
L.p.nrSK ADDR. TO R

~235

V;SS51
03552

STA
'NFl

06Vjl~7

LDA MASK'

17"7~H!'

~230

ilI35~3

013711

ANC FiD1
10k 1

RETAIN Ao-A15
lOR fllSK AI1l:lRESS

STA
to;'

RDt

'-ESTORE RDt

~ASK\

1777V. rlt TO

IINL
101\
f:,TA

RD9
1
RU9

~ <:!

11

~:221

~222
~12?3

0229
02~H1

~';t37

1035544

V13tJ0~1

0238

i:1J55~

~73711

~239

035~6

~f>~H17

024~

i:J3!"i57

~13727

0241
0242

ItJ:1I)~

C301('l!!Jl

RESTORE RD2

D' ,,"A.SKI

CP~

~27526

1

R07

RETAIN A6-A\5
lOR DHA ADDRfSS
RESTORE RD7
DMA CHAN."'''
YES
NO-AnnR.-3

JHP *+2
lD~ MAS6A
I DA
Af'./t
10...

I'l A S~
RD3
1

AtlOR.=?
1777V.t~ TO A
RETAIN A6-A15
lOR MboR ADDRESS
kESTORf. RD3
1777rJ,I' TO A

1

STA RD3
LDA t-IA~KI
ANr P04
10k
ST~

A

1777(1,(1, TO

RETAIN Ae,-A1S
IO~ !'lAC AODREDD

1
RLJ4

RESTOf..lE ~n4
RESTI"RE RDb
1770~ TO A
RETAIN A6-A15
lOR wCR ADDrtESS
RESTnRE RU!i
H.P. D1SK ADDR. TO

RLl5

RETAIN

FeDM

A6-Al~

.\T)DRf:')S

T(1

A

A

~243

fJ73727
b3562 073752

STA RUll

RETAIN A6-At5
lOR DISK ADDRESS
RESTORE RDq
RESToRE RDll

0244

IOj~63

STII RD1A

RESTORE RnlA

~245

03h64 0{124(60

~246

03!:>65

1c171~72

sT"

RCOMi-'

0247

035"~

V'7'0641

STII

SCOMP

~13~61

t~73616

~

1777r7J'lo Tn A

rLA

1t'!248

035~7

1(17::1665

ST /I

eUFLr'

0249

~Jr.;7U

eJ605~)6

~250

~~~')71

~70507

"A~T~

0251

~JS72

ldb~51~

L[JII
STII
lD"

S7€9

ART8!="

RESET READ TRACK BUFFEw ADDR.

ARSB"-

"252

OJ:>73 "7a'S11

ST4 IIoARS1-4

02~3

Ir:L~574

164~P7

I DM

Io.ART~,

0254

!ilJ~75

U345Vi7

lSI

\\ART~

:.1255

~J576

06C15~7

I DII \otARTK

"'256

03;'j77

051016

CPA

LART~\

02:;7

1:)3h~0

\135072

lS1

RCOMtJ

02:>8

0JtJ&tl

07~076

5TH

eTRek

~?59

~~S60~

~t-0fl33

I

v~

CLEAR FLAG
CLEAR FLAG
CLE"~ FLAG

3A44

I

RESET READ SECTOR BUFFER ADDR.
PICK PPACK A!)DR.
INCP. ARR_V AnDRESS
CURRENT ARRAY ADDR. TO A
LAST RUFFER ADUR.+J?
~Es-gfT READ COMPLETE FLAG
TRACK

MASK-14~377

PAGE 0032

#~J

SPECIAL DuL ttSC UJAGHOSTfCFOR 2115/2116

,.
0260
0261
0262
0263

036~3

036¥l4

011013
tHH)727

036~!, 03016ilfl
036.a6 ftj7!073

02b4

~36~7

0265
0266
0267

0361r 00t)4~0
03611 114000
03612 k!020~4
0Jb13 \:150106

~268

0269
~210

. "271
e~72

0273
0274
e21S
"'276

~t>0210

1d36~1

02.79

0·3h~6

0280

03627 060511
03630 051017
03631 i034641
03632 0"'6~tb3

~281

0282

0283

IO~

1

STA

PCOM~

r.LA
INA
CPA It.'168
Jf1F *+2

.1M" 57694+2
l De "'ARS~, I
STP. CSF.:CT
lS2WARS*"
lDA 5845
ANt RCOMw
rOlf

1

!liTA RCOM'"
lDH WAPSk,t
1&2 "'ARS"

~34511

I. Dj

WAR$Q

CPA LARSI:I
IS1 SCOMP

stB,kSS

0284
t)285

"'3633 1d21415
/d3h34

07400~

0286
0287
0288

03b3~

001727

0363" 0~1323
03637 041J105

~A",RAR

~289

03b4r 003'H14

CM.t,INA

0290

03641 (14P11~6
031')42 ~02~20
03643 021662

5S"

0:>91
0292
k!293
0294
0295
0e96
0291

1i!3644 1674r.l~0
163645 "01727
"3b46 0~1323
~3641 003"'fC4

~'298

03M510i624~4

9299
0300
0301
0302
0303

03652 ItJ0 t 31i\0

S770

10f,8

JM .... 5771
STR ~

r.'U,tNA
8T .. WDCNl
CLA,INA
NAH

03~54

071104

03655

1I''''~04

$TA RDtR
CM9,INR
STS SECTr.
LOA

sr,

S771

064(t44

1059

JMP S712
lD" CHA27
lDH

IAD27

(13664

1141~2

JS8

lta2B.I

1162"~1

t1Ll

~1

.IMP

1743.1

W3666 125174

0314
031S
0316

03612 010635
03613 061014

FI~ISHto

NOT FINISHf'D
PICKUP STARTING SECTOR
IhCR. A~RAY ADDP~~S
SECTOR HASK-t776A0
RETAJN

A1"Al~

SECTOR ADD~. TO A
RESTnRE RCOMR-TR./SECT. COMPLETE
PICKUP
OF CONSEC. SECTORS
INCR. ARRAY ADDRESS
CURRE~f ARRAY AOOR. TO A
LAtT RUFFER ADDR.+!
YES-SET SECTOR STRING COMP. FLAG
SECTn~ VALUE >e?
hO-ERROR PRINTOUT
e TO 4

*

MULT1PtY RY 64
ADD 1ST AVAIL. tOCN. VALUE
2'S COMPL.
sueTR. LOWER FROM UPPER
ERROR-BUFF. LE~GTH EXCEEDS MEM.
GOOO.MEM • FIT

S112

LDA 5829
ANt kPMAw
101it DAntu

STA WOMAw
I DA

MULTIPLY J:JY 6.
2'5 COMPL. OF TOTAL WORD COUNT
wORn COUNT READY
BIT1~·1

lOR START ADDR. OF AVAIL. MEM~
OUTPUT AND ST. 4DUR. READY
2'S COMPL. _ OF SECTORS
RETAIN' OF SECTORS

lIrH58

S848

~3665

03667 0M1J75
0J61~ 010635
03611 030122

LAST AnDR. OF RUFFER AREA

ALF,ALF

HA",RAR

tOti

~3h63

0313

ADA

1058

03"1~5

030&

0309
0310
0311
0312

AOA

03653

0307

03~4

0305
0306

JMP 51(012

STk! e
ALF,ALF

03659.1 010~37

"3656 01511i'2
03b~7 0601Qt5
0366" 070643
03661 027661
03662 06@662

RETAIN A15-Al~,.~-A7
A0-A5 TO A8-A13
TRACk "DDR. TO A
RESTORE' RCOMR
ST. ADDR.-RUFFE~

AlB 0,Y

0t»0f140

0218

~CO"'1ol

Slf9A l.OA S814

faJb14 027616
036 Hi 021611
ta3616 164511
I/Jl6 17 015~11
03"20 03·4511
03622 011073
03623 03g~01
0362t1 ~7H'73
0362!l 16 d 5!1

~~71

aNt

ALF,BLF

S815~

ST. OF AVAILABLE MEM.
.CONTI NUr:

CHAR. COUNT-32
ST. ADDR. OF PRINT BUFFER
OUTPUT ERROR MESSAGE
TURN SW. 15 OFF JF ON
GET NEW RE_O PAR4ME!£Rt
177.700 ·TO A
RETArN A6-A15
fOR ~.P. DtSK ADb~.
RESTORE WDMAW
RETURN JUMP

PAGE \10131 »03

SPE.CIAL 1.1!)r. lIse OtlGNt)STTC FOP 2115/2'16

0.317

~JF,74

e70~~t-

STA6

U318

0Jf)'!5

tl70~1'17

S T II
l}A

k.i319

"'J67~

102~"0

~J2\.1

03~77

0~1'727

RDIA

INT. LOCN.
INT. lC"CN.

7

e

"L~,ALF

IIIJliHl "w2"'2~~

["JPUT STATUS
8tT 7 TO 91T 15

SSA

BIT

~324

it1373
"354

!olLA
.1 M~

~

r.Lf

~

.JS~

$371.1

NO SUPPREsg?
BYPASS PRINTfJUT
TURfIi.OFF INTERRUPT
~ISSJ"J~ INTERRUPT
TURN-OFF INTERRUPT
Sill. REG. To A

C359
03b0

"J 7 cal 12) 0 iHH 0
o .}7 d 1 '" 2 7 7 11 4
0Jll.1? 1~311h0
0J743 11!:>212
~3744 1""3100
03745 102~lol
0374t- ~(II1323
0J747 0013lt)12)

0361

057591

0wH}01~

0362
r.3f>J
0364

~J751

125256

~375?

lB25~0

031~3
~J7~4

00(.101"

SlI 51

0Ji\t

"'34665
03755 0161727
il)37t>6 IhH700
0:.s/S7 0711J1
oJ 7 h 0 ~ \-, 21?11 1
03761 027765

0311
@312

Idl7 b?
037;,3

~b 1115
06~ H16

~373

0J76A

1141~2

~3~5

0356

0357
0358

Q!365

03b6
~Jb7

\!368
03M~

J

IIIAIT2

~1

4 1 T~ + 1

ClF {'
l fA 01
kAlof,RAR

~

fa 1

TIM E - 0 II T L 00 p
SW. REG. Tn A
3 TO BtT

,~

WAtt

BIT 3 TO (-\tTrt'l

~LA

NO SIJPPRESS?

JMF

1775.1

I.IA

li,
BUFLr~

ALF,ALF
AlF
~TA

S8~7

f;LA,RSS

.PiP 5773/0.
l. OA
LDH
.J Se

CI-!A3~

SUPPRf:SS PRINT
JNPUTSTATUS
BUSY GlT-0?
NO-ERROR
~JT 8 TO RIT ~

BtT 4 TO BIT
SAVE

~

Il.EconE BIT-I?
NO

IAD3'"

CHAR. COUt'-!T-12
ST. ADOR.

1 ~2B. I

OUTPllT MESSA Of

PAGE 0034 #03

SPECIAL Due tlSC

577:3 A l DA S 8 5 7

E374

~3765

061131

~,J75

03766

0~1222

HAl,R4L

0376
0377

~3767

"~2021

SS4,RSS

03770
03771
03772
03773
03174
0J77b

027774
061130
065116

JMF

0378
~379

0380
~3tS1

e3'8'2
0383

S773~

l DA CHA 3"

tDti14D3"
JSI; S32B. I

11.41kj~

0611J1

DIAGNO~TtC

S77JB

002021

to'

51\11\7
SSA,RSS

FOR 2115/2116

STATus TO A
PARITY BlT-l?
NO
CHAR. COUNT-!7
ST. AODR.
OUTPUT MESSAGE
STATUS TO A
8IT 3-11

~J776 1252ti7
03717 "60076

JMP 1773(:,1

"'385
0386
0387
0388
0389

0400C11 114113
-'602V,6
04'1020HHJl

JS8 CONV.}
LOA S812

A:-..r CARRY+1

RETArN M.S.

04(.103 031253

JO'; S880

8LANK TO A8-A15

~139~

04(J~~

"391

04~~6 e71243
04f1lli:i7 061244
It14:.t10 065231

~J84

~J92
~393

t 013

04"~1

STA t1ES4.t+8
LDA CARRV+2
'ST. "'ES4.4+<)

04"04 071242
0b~112

0394
0:595

04V,11

1141~2

04~12

06~6b5

0396

04t.il13

002~~3

0397
{1398

10 4 ~" 1 5 0 6 0 7 1 ."

0399

04~16

04~0

~4V117

114102

~401

1t)4~20

0024~0

CTRCI<

'-DJ CH44.4
LD" IA04.:1
.JSt! lii'2B.1

S71JC lDA BUFU::
t4ZA,RSS
5774

064666

LOA CHA2>t
'-DN

t Afl2A

JS2 102B.I
5775

04V}21 070665

STA

BUFL~

04~22

lO.

t11'58

(11404

04023 071100

STOl

Cf"1EM

0405

o 4 f1 2 04

06~1(j5

~1406

~4A'25

0e24~0

(11407
ki408
0409
0410
0411
0;112

04~.l26

ki711~1

V'J413

S6fi3
5776

0403~

"'OF
CLh

ST" SEwn

040:27 060375

l [U

07~374

04(.J31 06"'261
04032 07i!'26()
04:333 160266
04Vl34 151100

5777

LDA 5623
sT" 5822
I.DA 5822.1
CP~

CHEM.'

kSS

0403b 016120

G1416

~4~~37

"417

04;14003~1~1

lSi SEwn

0A18

04~41

lSI 5822
tS2 5626

0419
~420

~421

034266
04042 034374
04~43 026't33
04~U4 0359177

035102

Jse PRINT
5778

IS,

CME'M

JMF 5777

J51 CSECT
IS1 SF.CTr.

0422
"423
0424

04V14~
04~47

06~641

JHFi
I D~

0425
0426

04"'50

~~2003

8lA,RSS

04051

125177

.IMP

El427

Cl.A

0428

040-52 002400
~4"'5:3 07"641

r!429

04~54

13430

04055 002003

04046 125203

061~72

DI~IT

SETUP PRINT MESSAGE
ASCll TRACK VALUE
SETUP PR!NT MESSAGE
CHAR. COUNT-20
ST. AnpR. OF PRTNT BUFFER
OUTPUT ERROR HESSAr.E
BUSY ERROR FLAG TO A
FLAG-1?
CHAR. COUNTING.~9
ST. AU~. OF PRtNT BUFFER
OUTPUT ERROR MESSAGE

CLEAR FLAG
START OF INPUT ;UFFER
ST • • ODR. OF l~?UT BUFFER
JUMP J:.'ETURN
CLEAR WORD

#.

ST. 5828

k}02~~1

035t 00

A

5829

0414
0415

04035

T(l

rUI

'i'402
04"'3

"

377

JMF 5775

1t14't!1402tHJ2'"

(1 0 ~ 0 0

NO

CURR. TRACK VALUE TO 8
CONVfRT OCTAL TO ASCII

J776.J
SCaMP

S858. I

&TA SCOMP
LOA RCOMP
SIA,RSS

RESET SECT. HUFFER ADDRESS
PICKUP GOOD WORD
COMPARF TO TEST WORD
GOOD
ERROR
INCR. INPUT BUFFER ADDN.
INCR. SECTOR WORD #
INCR. GOOD WORD ARRAY ADDR.
6~

~OROS

FtNISHF.D?

DO ANOTHER WORD
JNCR. CURRENT SECTOR COUNT
ARE ALL, SECTORS COMPLETED?
NO

YES-SECTOR STRING COMPLETE FLAG£
F'LAO,,~?

~O-CONTJNUE

SECTOR'PROCESSING

YES
CLEAR FLAG
TRAC~ READ COMPLETE FLAG
FLAG>"?

PtG~

~~'i

'C3

SPFCIAL DUC

rISc nTAGNOSTIC FOR 21151211b

~

~4J4

VI 4 .} 'j r. 12 OJ 2 ~1 ~
~1 4 ,j 'j I
~H) 2M: 0
~ 4 :" f) v; 0 7 t 117 2
£14v)Al 1025~1

0/lJ5
04Jo

11.14 ,I h

~'43

1
0432
tl43.5

V"41'.~6"

STA

~

F2

041103 ~7(n74
41 \1 4 (16 V':2 67
041 (~!') ~Hi:i2f.6
041.16 16~266
e 4 1 :1 7 k) kJ 3 itl ~ ~
041 H1 17vJ2bb
~14111
1134::;>n6
04112 034~14
Y.!4113 02!)iU6

~. 4~7

045;3
~459

Vl.d6C'l

S8~6.

~

~411.t1

0462
"463

\') 4 1 t 5 (HI 2 4 tj 0
('I41161711r:;,3

NO-WRITE SAME
YES

STA

S8~8

-54

tDA

5.'>23

5ECTnQ RUFFER AnDR.
RESET

i

D,o

5822. t

eMA
~TA

P~TTERN

BUFFER

RE~ET

PICKIIP

~ORD

COM P '_. W0 R0
5822.1

58??
IS2 S328
.JMF 5779A
.ltl P S 5 5 6 • I
C:L.6
!'ITA 5854. J
.1 ~ I- 5 8 f, 1 • J
1$1

S7eV!

CI'IECK SW.'!l
YES
BYPASS RlAD PARAMETERS
RETUR~ Tn WRITE PROCFSSOR
BIT14 TO BIT 15

S7';Q\-1
S829

STA S822
S7'l9A

125105

1c:J4td

J

fiAt.

026114
06V:;S1!)

r4!)1
'-14 !)4

lilTA 5854.1
57lY

LOOP ON READ PROCESSOR
8 I,T 1 -1 ?

5779
1855.1

SLA,~SS

04:'0

0455
0450

~SA,RS8

~\()t!~'11

041U0
icl41·n

0453

S86~.1

RESTORE WORT)

INCR. AODR.
64 wn~ns FJNIS~ED?
NO-LOOP
RETUR~ TO ~RIT£ PROCESSOR
NOP TO

$74~

VJ466

04117 12!>2V'2
e412V1 e0(A~(il~
1<14121 ~3:'7~0

~14 ~ 7

~4t22

,,",468

04123 IclJ57 V!! 1

lSi

~.469

i!l41~.d

0~f.HHH~

",OF

~4Hl

04125

HJ2~V')1

llA "'1

Vt471

19 4 1 2 6

~ Itl

I(-l6

I lJA

~478

~41,'55

010111

5812
AN[ CARRy+1

371 T(1 A
RETAIN HIGH ORDER

~47Q

.04136 001/27

0480

0485

~4137 07121N'l
04140 0(,~H75
104141 0HH12
~'4142 001727
04143 ~3\1iH'1
04144 1071136

048f:>
V,487

e.4145 1060206
04146 01~t12

f1464

Vl4b5

0481
Lt482
r.483
Voll8d

k)02~~1

1323

JUMP Tn

EXEC.

~AtN

PRINT "0'lSI 5999

INCH. ERROR COUNT

HSS
5999.1

JP-1P PRTNT,l
eTRC!\.

INCR. FRROH COUNT OVERFLOw
SW.

RfG.

TO

A

BIH~

B~P.SS

CURRo TRACK

nlD~GtT

ALF,.ALI='
STA 1
IDA

5831

ANt CARRv+t'
ALF,AlF
10" 1
STb MES37+3
LDA

5812

HII'

CARRv+~

17740e TO A

RETAIN MIDDLE DtGtT
A8 .. A1~ TO A0-.7

SETUP PRINT MESSAGE
311 TO A
RETAIN LOW DIGIT

PAGE 1036 #03

SPECIAL Duc rIse DIAGNOSTIC FOR 2115/2116

r

0488

04147 001727

0489

~41~~

03~A76

tOR S832

0490

04151

Y71137

041~2

~65077

04153 114113

MES31+A
lOR CSfCT
JSB CONV.J

~4154

~b~476
00~727
~6~2~6

LD~

01~111
03~0~1

ANt
10"
ST'
LDA
STA
I

P49!
0492
0493
0494
0a95
0496

0497

04155
04156

04157
041h~

0498 ~4161
0499~41b2

ALF,ALF
ST4

$832

RLF,SLF
lO- 5812

071143

CARRW+l
1
MES37+8

BLANK TO 40-A7
SETUP P~INT MESSAGE
CURR. SECTOR VALUE TO 3
CONVERT OCTAL TO ASCII
ASClr BLANK
A01A7 TO A~-A15
377 TO A
RETAIN LOw DIGIT
BLANK TO A
SETUP PRINT MESSAGE
SECOND HALF
SETUP PRINT MESSAGE
CURR. WOND # TO B
CONVERT OCTAL TO ASCII
LOw ORDER nlGITS
SETUP PRINT MESSAGE

04163

~b01t2
~71144

~501

~4t~4

005101

0~02
V.5~4
~505
0~0b

04165 114113
041b6 060112
04167 H711~2
04170 164266
04 t 71 114113

.ISte

CONV. I

CONVERT OCT Al TO ASC J 1

~~07

04172

IDA

CARP'"

05~8
~509

04173 071161

ST~

~ES3R.4

0500
0503

D~

CARRY+2
MES37+Q
SE~O

JSk CONV.I
lO~ CARRY+2
STA ~ES31+1~
lOI-! 5822.(

OUTPuT

WO~D

TO B

0512

0.176 060112
04177 071163

LDA CARRY+2
STA ~ES3~+6

1ST WORn
SETUP PRINT MESSAGE
2ND WOAD
SETUp PRINT MESSAGE
3RD WORD
SETUP PRINT MESSAGE

0513

kl42tHi

L Drt

lNPllT WORD TO 8

0~14

165Hl0
04201 114113

JSM CONY.I

CONVERT OCTAL TO ASCll

"'515

t14202 0b0110

10.0 CMHO'

0516

04203 071170
04204 060111
~42~5 071171
04206 06~112

~TA

1ST wORD
SETUP PR}NT MESSAGE

0~10
~511

H517
~518
~519

1060110

04174

~6~111

04175

~71162

LDA CARRv.,
STA

LD4
~TA

071172

"421~

~522

04211

LDA
LDS

0523
0524

~4212

~fi1153
~65132
1141~2

~4213

061173

t

0525

0421A

~65154

lD~

JS~

OA

~526

~421o 114102
JSP.
04216 126120
JMF
wJ!,2S*.*** TRAC~ ADDRESS \If:.kIF
0529 04217 ~00000 TRvER ~OP
0530 04220 002400
CLA
~527

CARRv+~

0536

04226 070177

0537
05J6
0539

~4227

~1~J00

0423~

060602

~4231

0706~3

LDA 5842
STA 5843

0540

0423?

002400

eLA

05~1

04233 070540
04234 ~153.1

0542'
W543

0544

9T4 S8A4
JS~ 5900

STA S640

05~476

S901
CPA 5832

04236 026262

JHP S549

~4235

55.8

JRD WORD

SETUP PRINT MESSAGE
CHA31
N~. OF CHAR. -32
IAD37
ST. ADn~. OF PRINT BUFFER
1028.1
PRINT MESSAGE
CHA3A
NO. OF CHAR. -28
lA03A
ST. ADDR. OF PRINT BUFFER
10"S.1
PRINT MESSAGE
p~rNT,r
EXIT
ICATJIlN SUBROUTU4E

LDA CH.A4A
lDP lAD4R
JSi 1028.1
lDA 5805

U6~200

2ND ~nRD
SETUP PRINT "ESSAGE

MES3~+lJ

8T4 TOPT'>

~4221 070171
04222 062465
~42~3 066464
04224 114102
~4225

~ES3A+Jl

STA MES3M+12

~4207

~531

CHEM. I

LOA CARRY.1

H520
0521

0532
0533
0534
0535

~ES3A+5

JS~

.*...

CLEAR INFO
NO. OF CHAR.-13
ST. ADDR. OF PRINT 8UFFER
OUTPuT MESSAGE
CHAR. COUNT-72
SETUP INPUT CHAR. LENGTH
CALL INPUT SU8ROUTINE
-3 To A
RESET CHAR. COUNTER
CLEAR CHAR. HOLD
GET It CHAR.
IS CHAR. A BLANK?
CHECK EXIT FLAG

pjGE

0~~7

#0J

SPECJAL Due rISC DIAGNOSTIC FOP 2115/2116

~~45

04237 015363

JStI

S9~2

~546

~4?4~

02~220

TRVEio!+t

CHECK LE~AlITY-~-7
RESTART

~5d7

~4241

~b4114

JMI'
I Db

t1ASII.~

7 TO

~548

04242

~1~~01

U>I[

1

~~49

~4243

~645~O

I. D~

5840

~~~~

b4244 0~,j23

RL~,RRR

RETAIN A0-A2
PARTJAL TO B
ROTATE LEFT ~

V551

04245

030~01

0552

~4246

~7~540

10k 1
STA 5840

B TO ft
RESTORE RESULTS

~55j

~4247

P34~~3

IS1

FT~tsl-1fn7

~5~4

U4l~V

~~6234

.J HI"

~555

042~t

001727

~5~6

042~2

e70171

~557

~4?5J

0~1727

~S58

042~4

~02M03

ALr,ALF
STJ TOPT~
ALF,ALF
SZA,RSS

~~59

042j5

U2622~

~,~~

~42~~

041252

~~nl

~4~~7

~~2~2~

~5b2

042~W

026266

SSIo
.1 MF

~5bJ

04261

~26220

JMF TKVEIo.+l

~564

~426~

~64176

~565

042~3

~~~~11

SL~,"SS

~~66

~4264

~262J4

JMt"

S5<18

YES-RESTART
EXIT FLAG TO B
EXIT ElAG=17
NO-CONTINUE

~~67

~4205

~26220

JM~

lRVE><+t

YES-RESTART

~568

CLj

056~

042b6 0~24f0
04267 071247

0~7~

~4270

~7~632

~TA

"'CO~iJ

0~71

04271

070641

SCOM~

~~72

04272

071~72

STj)
STb

~573

~427~

070231

!';TA CBlIFi-"

0574

~427~

17~504

STA

ANse~,t

~575

~4275

17~~10

ST~

ARSSO:,I

~~76

04276

0028~4

ZI'.A

~o77

~4277

1724~5

STA S5e'l1.I

~~78

~4J00

1724~6

STA

~579

~4~01

0624~5

l

0~80

~4~~2

~020~4

INj

0~81

043~3

~7~6V,5

~582

S8dJ
S5 4 8

.J1;fF TRVEw+l
llDti 5510

~549

tf'~

55.! 9+ 4

SEXT

STA 55(.10

DA

RCI"lMP

SflCii2.i
S5()11

F>

NO-GfT ANOTHER CHAR.
Af!.-A7 TO A8-A15
SAVE TRACK # IN BINARY
A8-A15 TO A~-A7
VALUE :. 01
NO .. ktESTART

ADD -\~1
POS.?
I-tO"CO'H 1 NUE

CLEAR ACTIVE TRACK COUNTER
CLEAR WR. TR. FLAG
CLEAR WR. SECTOR FLAG
CLEAR RD. TR. FLAG
CLEAR rOMP. PATT. FLAG
SET ~RITE SECT(~ ADDRESS
SET QEAD SECTO~ .DnRESS
SET CONSEC. ft o~ SECTORS
SET C(I~ISEr,. '# c=- I,RITE SECTORS
SET CONSEC. # r=- READ SECTORS
LAST )nnR.+l OF SECTOR BUFFER
SET TERMINAL ADDH.

e4Jd4 062456

STA LAI'ISH
tDA 5502

0583

~43~5

002~04

JIIIA

~5B4

~43J6

071017

ST" LARS'"

0~85

~4307

06~5~2

LOA

H586

~431~

002004

INA

0587

~4311

e7~6~4

~TA

LAWTH

0~88

~4J12

06~506

tDA

ARTS!="

~589

INA

LAST ADDR.+1 OF TRACK RUFFER

STA LARTM
LDA S~~.4.1
STA S505.t
LnA S501~
ALF,ALF
STA AWTB~,r

SET

TEP~I~AL

J~P

WRITE,!

AwTB~

0095

04313 002004
04J14 ~71~16
0431~ 162460
~431b 172461
04317 0612d7
04320 001727
04J21 17M5H2

0~96

~4322

~6~315

0597
0598
Hb99

~4323

~70374

SlA 5828

04324

060~67

l OA

~600

04J~6

061247

06~1

04~27

17~266

eo~0

0591
0~92
~~93
~594

S5~~

tDA 5829

04325 073266

LAST ADOR.+1 OF TRACK BUFFER
SET TERMINAL ADnR.

ADDR.
TO A

SETUP RETURN JUMP
PICKfjP TR./SECTOR ADDHE-5S
A8-A15 Tn A0-A7
PUT TRACK ENTRy IN RUFFEH
-64 TO A
RESET WORKING COUNT

S8:?3

STi S822
LOA S5CHi
S5~1

LAST ADDR.+l OF SECTOR BUFFER
SET TERMIN~L ADDR.

STA S822.1

RESET SECTOR BU~FER ADDRESS
PlC~UP TR./SECT. ADDR.
STORE IN BUFFER

PAGE
0&"2

Uoc:.:s
0604
06f65
~6(tt6

~6~7

1t1608
tlJf)09
0610

0~38

_03

SPECIAL Due [ISC DTAGNOSTIC FOR 2115/2116

04330
043J1
04332
04333
04,i34
04335
.04336
04337

034266
0.s4l74.
»26327
116"!)7
061247
042462
071247

0434~

02634,2

0'4341 026317

fl612

04342 002400
04343 172457
04344 112461
~4345 071247
04.546 162463
b4347 171251

411611
411618
"619
0620
0621
0622
10623
~~24

~f.25

04.350 ~612A7
04J5t 001727

JMJ"

1551~0

04360 0020161
04361 ~264t6
104362 035100
04:~63 034374
~630
04J64 "26357
0631
~4365 061247
~632
04366 042462
WJ4367 071247
0633
~634
04370 05"171
0635
04571 1626373
111636 04372 "263~e
0637 . 04373 102501
04374 001700
A6J8
0639 04375 002020
0640
04376 026315
0641
04377 0(l124~A
@642
044tHI 171250
"643 044~1 171251
0644 04402 .,,62467
0441113. 06b466
0645
044;14 1141k)2
0646
1U647
044~5 126217
V'64f\
044~6 005727
0049 04407 114113
0650 0441~ 06~206

cp,

06~1

t'441l 010111
04412 070001

TOPT~

JHF *+2

JMP 5550

cLA

STA 55015.1
STA 5500
lDA 5508.1

ST' S5C1t9.t
55~2

tDA 55"'16

ALF,ALF
ST' ARTBF,!
.1 S~

5507. I

ST' 5828
5509

1 D~
S5~J

r.p~

CMEM.I

~S~

.IMP PHOUT
151 CI'IEM
tSl S8?R
JMF 5553

55e4

lOA 55£.'l10
ADA S5~6
ST" S5!.'l0
CPA lOPT~
.IMP *+2
.1MP 5552

tlA e1
ALF
aSA

SETUP RETURN JUMP
PICKUP TR./SECTOR ADDRESS
A8-A15 TO "'0-A1
PUT TRACK ENTRy IN BUFFER
READ ON.E TRACK

J/"tP

S55~'-2

RESET -64
PICKUP TR./SECT. PATTERN
COMPARE TO RECO~D
GOOD
ERROR
I NCR. t NPUT BUFFER AOOR.
64 ~ORns FINISHED?
DO UWTHER WORD
PICKUP CURR. TR. VALUE
ADD 1 TO TRACK ADDR.
STORE TR./SECT. AonR •• t

LAST ~nDR.+l
YES-FINISHED CO~PlETE PASS
NO-ho ANOTHER TPACK
Sill. F\'EG. TO A
9IT11 TO BITU>
9ITI1-0?
NO-lOOP CHECK

CLA
STA 5507.1

STA 55P9.1
tD' CHA4u
I [Ie

14D4Q

.JSi!

lfiiJ2B.I

JMf TRVEP,I
PRCUT HLF,9lF
.J S P

CII /II V• I

CLEAR NOP'S
NO. OF CHAR.-2s
ST. A~nR. OF PRINT
OUTPUT MESSAGE
EXIT CHECK

CONVERT OCTAL TO ASCII
377 TO A

AN [

kETA1N

C A~ R y + 1 ,-

1t'14414 010112
04415 001727 :

AlF,ALF

0656
0657

0441h 000127
04417 0300\61
04420 .72~04

~LF,BLF

IO~

1

STA

I'IE5'51+8

~UFFER

68-815 TO 80-87

lD' S812

, rt.654
0655
06~8

CLEAR IoJOP'S
CLEAR ACTIVE TRACK COUNTER

LDA 5829

foIT" 1
tDj 5831
ANt CARRv+2

04413 860475

INCR. ~UF'ER. ADDRESS
INCR. WORD COUNT
BUFFER NOT FINISHED,
WRITE ONE TRACK
PICKUP CURR. TR. VALUE
'*DD t TO TR. ADDR.
STORF TR./SECT. ADDR.+l
lAST ADOR .... l?
YES
NO-DO ANOTHER TRACK

ST' 55Q13.t

0626
0621
0628
8629

0652
0653

5551

lD' 5500
'DA 5506
5TA 550'"

04352 170506
04J53 115250
164354 060315
04355 07~374
.04356 06!>?47
t'4~o7

S~22

J5e 5503.1

050111

0611
P6l3
0614
"615
0616

'51

151 5828

1174C:S~
.qOO~

".$.

DIGIT

MASK
DIGIT

SETUP PRINT

~ESS1GE

~A~E

~0JQ

#~J

uur lIse

SPECI~L

0659

~4·12106~2'~6

\tl660
~l f)6 1

~44~2

0666
~1)67

1/;14431

~;b~2~6

ll)j

l66tl8
0b#;9

~44J2

~116111

A~r

~1bb2

~"6.1

0664
"665

~hn

CARf75

211~r2t'6

AL~,"LF

1-344.33 ftt70U'" 1
~4a..s4 061.1475

01';7..5

FOR

377 TO A

ANr

01~112

727
1£144.2" 03V1476
.\(; 4 A 2 ~ 07 2 5 r 5
~4~l6 16511(10
1.14427 0~)~727
04·13.,'· 114113
~4423

D'AG~OSTIC

~H~112

5831

ALF,ALF

377 TO A

RETAIN

"'.S.

101'

177.49P MASK

MIDDLE DIGIT

1

ST. MES5'+17

0bl~2tOf>

I flA

S812

CARRV+2
ALf,ALF

V,67Q

sr.

~ES'51+18

Q'6blO

~4446

'l~24/1

ID~

CHA5~

tibSI

04447

VlM;.41~

lD~

lAD5~

0682
0683

~44~r

114102

JS~

102B.1

(;4451

062473

I J).

CHA51

"6A4

04452 B66472

~b85

04403

114102

A/H

IAI151
JSH 1028·1
lD~

SETUP PRINT MESSAGE
377 TO A
F88

tb 4 4 '56 i10 0 4 ';c.~

S5~2

~E'"

RSBU~+l

IND. AOOq.

~689

~44!)7

1.1~?'574

(I}446C

0~2~73

S51t3
'55"4

liEF

~b9"

wRITF
S600

IND.
INn.

iJlfl91

04401 093h)2
04402 ~0v.J4~1tI

S5~5

LE~

55126

tel

0t>q3

04lth3

~H~3!)107

it14464
f04dfJ5

1tI~4517

S!)118
IAt4rl

nEF

~694

S5~

1

.IHFS554
[IEf y-$RUF+1

~EF

nEf

~4466

OtJ4~27

CHAA8 LCt
1 AI 49 UEF

01)97

1t144h7

0"1.'H~:~4

CH~49

P~98

!O447~

l(!?'d~45

"699
~7~0

04471 010,""23
04472 k'I~4c174

~7~1

04473

I!H10~45

~702

04474

~4l530

"'695
0696

~0l1017

~4475

050105
1tJ447b ki41524

t44417 0"2511'14
t64Slt10 02~124
04511 @olt01
04""'~ 041513
04~v.l3 026440
04"l~~

02N'I4Vl

04505

v)2~"'40

~4~iII" 040503
04!)id7 l152J25
~4f,UI

04£514

041Hl 02"'124

DIGIT

RLF,f.lLF

1t14443 010112
16 4 4·4 4 '1 ~ 1 727
04445 072516

0h92

i:J~-87

CONVERT OCTAL TO ASCII

1 A r 5~)
CH,.50

lA t 51

eCT
rE~

CCl
~EF

OCT
"'ES51 ASf

CH.451

INn.

AnDR.

ADOR.
ADDR.

tND. AnnR.
TRACK I~CR.
S6r2
IND. ~DnR.
~[S4A
RUFFER AODP.
17
CHAR. COUNT
MtS4u
BUFFER ADOR.
34
CHAR. COUNT
MESS'"
PUFFfR ADDR.
23
CHAR. COUNT
MES5'
BUFFER ADOR.
45
CHAR. COUNT
19,ElPECT~n TRACKACTUAL TRAC"' ..
S6~1
4~~

PAGE

0~~~

#~3

SPECIAL DUC rlSc OIAGNUStIC FOR 2115/2116

04512 0511:"1
04~1:5·041513

07e3

04514 1626440
0-4n15 02{10410
~45 J 6 ·Y'l20~40
~4517 047117
04!:i2~

~ES48

I

lSL S,NO. OF

TRAC~S

?

~27040

04521 0475lt!6

04522 "20124
"4~2:S 051 H)-1
~4524

041513

kl4525 05144rfl
0704

04526 0J7440
04~27 052122
0·453~ 040;03
fi}4~:$1 045440
04512 04t15~4
rl45J3 \,142122
04oJ.d 042523
04535 051440
k145.}6 041510
04537 0425"-'3

MES49 Ase 14,TRACK ADDRESS CHECK

CO~PLF.TE

04!'i4"., ~45440
04541 041517

04'542 040520
.,4543 046105
~71iJ5

04544 0"2105
04545 052122
0454fo {140503
"'4~47 0-45440
04550 0405~4
045::>1 042122

~ES5~

Ase

10,T~ACK

ADDRESS ERROR

1I14!':i':l2 0425~3
~4!;'j3

051440

"'4!=i!5.~

~42522
~51t17

e4555

••

It!455~

Iill1'"

051040
04!'i57 000000
{14757 ~00"'~0
05247 00A!;l00
05447 000V1V10
05737 00~Vl00

~711

001V!!;

~712

'-'01'15 "0~737

l'l7~f)

0707
07~8

07"9

...

wTEUF

SSE

ItIiseUF HSS
RHWf HSS

NO ERRORS.

128
184

RS~UF

HSS

sew.:0

PSS 1
ORG 1~5A
LE~

FN[

0113

128
184

S&'·00

WR ITf TRACt( BUFFf'\l

WRITE

~ECTOR BUFFER
REA.D TRACK BUFFER
READ SECTOR BUFFER

DOC DISC DIAGNOSTIC

BINARY TAPE

HP20346C

SOURCE TAPES

HP20f)82C
t;lP20583C
,",P21)f)H4C

SOURCE LISTIN(;

HP20346CL

C (1 ~ 1

.*

A ~. t H , A , 8 , L
~lJ

ttH-WtiS*

PAGE

0~a~

#01

SPECIAL DLt DISC

8~04

001~7
0~1~7

t7lllt0

~A~l(l

01h16!)

00110 00fJ0t.t0

Cjfik'y

0006
iHJ07

'b~11J

0~'08

"011~

16i>.,oJ

010114~7

00114 000(1l17
0"'''~b0

0ta 116 030000

e.., 10

"'''117

0011

0012t'1 0iJ01 hl

0304~0

~l612

\;101;(!1 0UtJ110

0013

0w122

0"15
0016
0bI7
IUB8

.HH25

~k)0002

"'H9

1614 1111J 1042115

' ')"14

FOR

2115/211~

"Sf'S,A,8,L

0001

ee03

DIAG~OSTIC

co~v

CRG 1147B
eCl 1177~0

t1A~K2

eeT 7
fo!4!K3 eel 60
f'\A~K4 eel 300~0

"'1\~Kti

leT 3040~
C.. Hn [:EF CARRY
Ct-I1RIv tEF CARRY

0~t6J00

DAcrRl teT n

b"1~3

0'HHHH~

DfoI.~Dk

I/HU2A

kliJ0123

AN!MA tEF DMAOR
SHU CC T 2

Id"llb 000122
'tHoU 27 00~lJ~
I6t'lJl

ADIAlJ

A6-A15 MASI(

foSS 3
lJEF COfl;Vl

eeT

~

tEF liADRl

A0-A2 !'.ASK
ASCII CONSTANT
Ase 1 I

~

ASC I I

t

HUFFER .ADlJf~.

HUFFER ADUR. ~dRKt~G
HIbHEST PRIORITY DISK .UDRESS
UMA ADDRESS lh ASCII
HUFFER AODR.
CHAR. CUU'H

J~Il1
ME~11

ADUR.
bUFfER AOUR.
,\sc 11,DMA OCTAL C~ANNEL # ?
HUFFE~

CEF f'1ESll

~4~440

0ldlJ2 0415""3
~lilj3

0~2 H~ 1
"~1.'4 "'40("40
bkll..i~ £14101\1

0W1J6 0-4\"516
-'iH 37 k'l471~n
1il1il140 046~49
"HH41

02144'~

thH4~

"'37440

0014 ~i 0{1fi'1J25
160144 Ii) J"r) 06

L."'~11

leT 25

0-i121

D/P.~106

.ASC

0022

00145 030~67

01r}23
0t>24

00146

.ASC 1,C7
IAl12 rEf" I"E512
tiUFfER ADllH.
"'E·~ 12 ~s(' 17,l'1lGH PRIORITY OCTAL DISC ADDHfSS ?

002~

0~0147

00141 044111
i/)dl~1I! 043510
.aa151 020120
0141:52 051111
rD~1:"3 047522
~~154

~44524

~tt11:)5

054440

CHAR. COUNT

1,~1b

J,;r.~07

"ldl:'>6 ~4l5io:J3

0\!i157 05l1fH
016160 04613414
'tH:Jlbl 042111
00162 051f>~3

fGlOlo3 0201~1
rDk'Jlo4 k'l42104
0iH65 0511k'5
lhH66 ~51523

-'tH07 020077
0025 . \htl70 000042

''-'120

'''27
0028

0029

0"171 000e00
"'0172 000733
00173 0S"7a3
IhH74 177734

C"~12

eel 42

TOFT2 C(.l
Sltv 0
rEf~8q

1

S3~2.

J;EF

e

f:!lJFF
~UFf

01d30

S8i3

eCT 177734
eCT ~20040

0031

Sf>T

eCT

\HH75 02lctU40
0"'176 000f1'00
0032 . 00117 00".0.,0

se~

4

.(1

eeT 0

CHA R.

C OlHlT

TEST OPTIO~ l~ ASClI
lNPUT HUFFER ADDR.-WORKthG
INPUT BUFFER AtDR.

BUFFER WOHD COUNT-36'
,6.SCIl

EXIT FLAG

BLAlJkS

INPUT CHAij. LENG1H

p AGE.

~h1.53

(l0J4
ihljb
kH'ij6
00.57
13~) J 6
l}U39
~\14 U
~hj A 1
~H.J.il2

004:5

~ ~I

0,)16.3

1

J P c. CIA ~

0~V:J~ ~Hj0!2~j
~ ~ ~ !ti 1 IHHH, 10 II!
0ah1t! itJ71777

[Ill C (11 feD I A.l'''' fJ S TIC FUR

:, tH?·~

5tH 7

eeT

12l
(C T q

eeT

e
e

LAST ~U~~ gUFFE~
(I 0 i~" I i. GUll
(H A R.

12C::2~)2

UPPE~/LOwER

77777

0~~113

~:H)~>10\1

StH 9

~~~j ~h ~ \10

~81~

~J.::\~~

1~,)252

S ell

LeT
(eT
LeT

01!t ~ 1:1 (1
lOil:!il7
"HP1P
00,121l

leHtI" .3 I 7

:;812

eCl

:'77

iihH!lvl~Pl

381.3

(" c r

V

~H:l!J741

~e14

U.il0212

I H 1~
fJ F. ~ 1 t)

lE.F S ~Hh"j
rEF ~ E S 1 t)

~ucl?

041111
10 -4

~.t214

~o11.~1

~.121j

ASC

1 1 , 8 I N A~

Cr.Ut~T

t-\ETAll-, AVr-A\a

1 E. ,1 p.

ST.

t. H A

lhA~.

!'.

ADOR.

AOD~c.SS

!) A 'w

~F

~i

A~ K

~~S~

t:

eLFf~w

ARlA-k/~

~.lJFFEH
~

ArIlR.
PATTER:-4

fE-ST

7

7 1 (l 1

it)bll~4

it tl

t.:J 4

fa til ~ 1 7

((l 'j

~ 16

b 0 C H A h:. CO U ii T
ACfut>L ll\pur c .... ;.I-<.

Se~d

"w ~ ;} 4

.hl 2 l:~

2 t 1 5/2 11 /)

2 j 2 :3
:>. ;" 4 (1

0i122C' l1~ehJ1
I.H.12dl 052124
1002~2

~42522

~vl2?,;3

t.i.1 ~ t.
kh0l47
e,,;tJ d

1047.1421
10 11 ~ ~ 'l ~, 3 I L1 4 i~
" . .LU~ 1cli10\',25
~ ~, :2 2 (,
1 7 7 ~ t· 7
~H:"!! i 7
~.H:U VJ ~1
~."':\ 2 j ~1 tl it) \10 ~ ~j
~ 0 i .~ 1 11 \~ 0 i1l1lC'

~[\49

~ ~i ~ j

~(14

<1

~U4'j

tl h

~-'

o,j j

e

(.:I.

2 1 7 7 7 6 (j
I£l :1 ;;> J ~, 1 7 7 7 f-o it'l

1

~ ~L?

iI ~I J l
t\i~S

~O~4

5(
o ~, 2 -3 ~

ilhH:l:" t ~.~
kj ;;, '0 l 0 1

r,

~H' \IJ ~ .) 7
"'44014
", d ..24 Il \) 4 b H; 5
1::1.' 2 .l 1 ~ ."1-) ~ Ii. 1
~1 ~I\ ; j

~v!l.il

C('tit) eCT 25
Sl:llb
p ",( f.i I;

eeT 177667

eeT

(HM·:.

-73

COliNT

(,H~t\.

COUNt

~

hI~'IAf.n

\'

CUM P L E. t'. t f" T A. L 1 E f-' r, .A T t II U k 0 F L A (,
COIl P t ~ A L T E R ,'J AlE ~ l ; F F t. j-( S f L A (j
- 16
if ~) r; 1<, I '.j G

C",(KLJ

( eT

L'='lFIS E 17

(C T ~'
leT 1 7 7 7 <) [1

5~18

eeT

17776~

C C T f::
::, a ~ ~) eer 61
lId] 0 I: f F I" E S 1 b
5819

f'1E.·~lb

ASC 2?,iLLEGAL

-16

PATTERI~

Y L F FER 4 t ii r~ •
C~ARACTEri

1\

lE~T

PATTEH~

PAHA~

\'.I:u242 1J4oiJ40
0J:?d3 \j41:5H1
o.!i 2 

0521414

002~)6

042~22

0L:l!57

L.147 .~40

002M~

L.15111~1

\10201 0:;111i;1
0U2ti2 04b5~:l5

0,,)263

0ol:1~5

e 51(1 <1 ~

~\~~5

'" (1 2 6"
~0265

01d0f1~3

C.h~lb

eer

~3

00~6

"'11%66

1'HH~271

Se~2

[EF

St3\.,FF

""'67

~0;':'67

001!t271

5e~3

[EF Si3l.FF

~ECTu~

BUFFER

V,1l!:l8

0iJ.27~

lfd20~1

St!~4

t-LT el

~ANUAL

BUFFER PRESET

L: i4 A R. C 0 U In
SlC1QH BUFFER

ADURE5S-y..Of./r.lhG
Aou~ESS

PAG~

0804 #01

SPECIAL DDe DISC DIAGNOSTIC FOR 2115/2116

£llt1bl

0d211 000~"8
0U371 lru2vt01
~Oj72 124373

0~b~

\HtJ73 1002201

01dtl9
0~o0

0ibbJ

IhJJ74

0064

",0J75 1777t0
00376 000317

0~"5

01.166

~~J77

17771:1{1

05J522

SECTOR HUFFER
SAFElY FACTOf<
RETUR~ TO MAIN

StHFF fOSS "4
se~ 5
I-ll 01
sec6 JMP S827,1
~8;;7
rEF S708
S8t8 eel 177700
S8~ 9
CCT t 77700
1/11£19

rEF !-ES1Y

~cS1Y

~sc

~RCCESSOR

MA I ~l PROGR.A M

-64 WORKING
-64

BUFFEt< ADDf.I.
7,wRITE T~ACKS ?

01d4kj0 044524
1004,,11

042440

0~411l2

0~2122

004kJ3 "4',H,~3

i)!jt404

04~54!3

01h405 0201077

0il!67

0164~6

0210016

C~~19

eeT 16

10068
0069

khJ4\17

0~0410

J/III20

~EF

~ES2~

~~E2~

ASC

8,~RITE

0i341~

05J~22

kJ0411

~44524

00.112

04244~

01(1413

001~05

Ct-AR. COUNT
BUFFfU ADDH.
SECTORS?

~}\1414

041024
kh:'415 ~47522
i,.0416 051440
0f)70

ItH1411
0~ 4~\:1

037.4413
000(117

~~71

0~.d21

00~i422

l!H.:t12

00422 056:522

C~P2~

(CT l7
CH~H. COU~l
tA[;! rtF ~~S21
~UFFER ADDR.
~~E21 ASC 19,Wk/Rr PARAMETER ExCEtuS 72 CHARACTERS

l()il423 l421522
6:10424 042~4t1

0",,1250501"11

Vlld426

05tl~1

0~427

04b5ldO

~04Je

052t~5

013431 051040
lh143('

0425~V.}

~0433

k'415~15

1£I1d4J4 04251t14
ftHj4J5 051440
tltdilJfl 033462

0liJ437 0201~3
IIJd440 0441k>1
01£14 4 1 1£1 b 1 HI 1
0~442

0073

041~24

00443 1642522
001444 10514413
0044~ 00(041)

"~75

000£i'10
00447 'H1045P1

ChA21 CCT 45
S8;,!1O
ceT 70
1 A'l22 rEF I"ES22

0P76

0~450

020!340

~6f22

00451

~2"'11t13

0~4t)2

~441~1

aW4t)3

""~1.101

""'74

0\()446

004"4 041524
004~5

042522

0Q4!)b

~2tH

11

0;34':)] 647040

160460 0475163

ASe:

2~,

CHAR.

COUNT

ASCII Ii
HUff-ER ADlJR.
C~ARACTEW IN OCTAL PARAMETEH
h

ILL~GAL

IrHj.l61 . ~"2l\: 1
0t<)462 "'~bd411
"'~

{.fJ:~ 1 k:!5
Htlhl40
1I'1t1410 "'44514
k)flI<171 kl4hl1l'5
0i1472 1d4J5vl
~~473 04b'J40
khl474 001dif147

CH22

reT

47

~IO!j

khHl7~

ss~

(ef

1774~H.!

0k/79
0k1d0

liH147~

177d0CA,
kl0Vtl.:l4 ,,.,

00·417

~id~H1

!:I 4

~8~3

01i1bl

"'1i)~'0Y,

IIH'~W~7

:'8~4

~~~.2

~i3::>~1

5·8:: 5

~~8J

~11():j

.,2

0kH:H1 0 5

LeT c1;J
tel !:4
LeT ~7
tel 55

0~4~b7

p.~1(j/-

rEf'

~TRUI-

0i'Jb4

00"i((;j

id\14~f;7

l'tH lb

f.EF

1>1?'JF

fCIoo5
kJ H {\ 6
0,HS7
0 ..l63

0"'~Ji1

IrH14 7tJ 7

A~~!H

0~~H}ti

0(H7b7

rEF " seUF

t-lAld)t;

fE.f

r.S~!.JF

t

it:H' ~., ). :, 7

In

klbUf

16'J~17

0'1~;

·~'.~t.9

~ld~lf;,1

1rH)~

A;;i18f
I- Af. T ti
l H.~ I:l F
~ A ... ~ i-

0~~o7

~vj7

7

(]::> ~~ I;

57
4tl7

':t kl

k11c1:lil

~0~t1t>7

1

0\:?~12

\}.o1;t2

10 ~1 ; ~ 1 ,~

013\1124
0~HH 2;S

t./u<;J
~! ')9 4

~0!')

\H:JId';)15

~,..)

~

,J l;

14

0.J':l1"1

iL144::;1,)

fO~"lf\

iJ~~J122

iih1~

•

1

S8~2

rE.!-

hT~Uf'

rEF

... SHLof

•

CHAk.

cOuln

AS-Al~

MASK.

blAt,;".
COMMP.

SLASt-l

'" a ~!\ 1 ;.~ r,
~ o:~

1"

ADDRESS

f\ I r, G A (lOR f S S

CH K I ~; r; A j) DR c. S S

n.F ~,~f:j ut:
r 0 R" J 1'1 (; Ad1J~tSS
r.CT 1;';4
ASGI! T
C C , 12:3
~8;:'7
i4SCJ! S
1 ~ L 2 j lE.f' t'ES2J
I"!U2,i ASC 1'1, I i'iP~CPf:ti Ct1At~.\CTER ! N
S t·~ 6

.",',

. ;, If.< l'

PARAfo'tTi:.k

17 0475£0

~ }':l2~1

042!)22

0>..1:)21

e2\tt IltJ3

01£1")22

1J441~1

"'·iJj2~

l1~11t.l

lIH1?~4

V!41':.'J24·

~t.1:)2~

U425~2'

0~')?h

ilJ2!.1111

fa;1 ~J 2 7
fO 1d~)M-:

04704~

0J':l~H

0275~2

10 oJ .) :s ?

\-)5$522
t!J4£ii.l4~

ktl,:b3~

0"01~1

~~~,14

~511

.bJJ~'5

\34t>5~5

~\~~;S6

002 t

~H1ti.s

v: 1
'~5

7 ,,:151 U41J1

C~:9~

01& ~ 4! ~1

0~;,;6

~1t1541

oliHchl 1c?0

0;~il)7

~l-1~42

0@~~43

~\J98

~H'tJd3 itl5J,)22
ki3044 044~;(4

tiHHh'0~

kH'h4~

04244G\

~\1;)4h

05011.11

h. t

t:\'~'47

~51

\)lj~~~1

M46!H.:5
")52105

1O~~51

Se.H~

&8'1

(C T (,

l C1
lAl24 tEf
t'U:24 ~sc

e
I"E524

1.-"wRllt

STORAGE-&T. T~AC~
SEU. TRACK VALLE~CHAR. SlQRAij~
HUFFER ADlJR.
CHA~.

PARA~ErER

IN~UMPL~I~

PAGE

0~06 #~1

SPECIAL DDC DISC DIAGhOSTIC FOR 2115/2116

8~ti:)2

051~40

0~O:)3
0~5~4

041~H7

0d4516

160555 k'4hj~rd

0"550

04bl~5

rth~!)57

th1.CJ9

kHj21 t.i5
0lJo6", iHHl0J2

CH~24

GCT 32

8.10D

"0~"

1

000~i()2

lA[2~

14"101

00~6~

rEF

v)5J522

~sc

00!:>I)J

~44524

M6S25

C~~25

(Cl 3~
eCT 177775
eel 177775

~ES2~
l~.W~JTf

CHAR. COUNT

SUFFEN ADDR.
TN'CK 8UFFEH OVERfLuwEO

0~5tl)404c440

0ldti65 052122
tnt36'6 0405~l3
"0067 04:>440
k)t1b7V1 \jt1125
0~:J'1

~4Jli16

Irhl!) 7 2 fil42522
0~'!'J13 1.12"117
00->74 k)~Jl*!l5
~0~lb 01)11",6
~0"7t1 046117
tU02
0HtJ

.,Hu

ihi~77

053!H~5

0~OVtI.1

"42~J41b

0et)~~

1 000~35
0\;'602 177775
00b~3 177775

S8'2
58£3

tHAI? COurH
-3 COllNTFH
-3 COUNTER-~UW~l~~
LAST TRACK WkITl RUFFEH ADOf<. +J
LAST ~ECTOR ~HJT~ ~UFF. AlJOri.+l
BUFFEk ADO!?
SECTON ~UFfER UVEhFLO~ED

1it131)~4

0Ci~fOVJiit

o ~t;~1 ~

fbtJ0~Hh'

\;101

0~tHH'

~~0607

LA!'Sb (CT e
JAI26 rEF l"J:S26

~l"a

0Jh01

0~J522

MEE2b

~~G

0~t>10

k144'524

CfH26
K,.

eCl 36
eCl 6

CHA~.

M~S6A

eCT 2
teT 3
eel e

MAR/hCR AO~R. FOR CHAN.6
MAR/wCR ADuR. FO~ CHAN.1

\1'11115·

o }\1()

LA"Ta eCl e

l~,JiI!-:1ft

0~611

042.440
IcH'b12 ttJ51!:>\J5

00()13

l'J415~4

i'I~614

047522.

0~ti15

02riH:2
052 :, ~ 0

Q:hH> 1 f

00617 04J105
,,~, u 2 0

k'J 0 10 4 11)

001')21 047526
01b622 U42~22

ttu623
00024

161'"'9

01u1

'U 11
e.112
0113
0114
0115
0116
1611.7
~118

iH19

~43114
047~27

~~625

0425104

0~-H)2o

000eJ6

01i'n27 01301(906
"-'63'" 000(HJ2
0a6Jl 0~0~~3
0~6J2

"00~01/l

~

I\()

f"iM.7A
WI Ot Mf'

013033 14lf1177
041b34 1000f6e
0iln')5 ij20000

8844

0~ItJ'cH60

irItlR

00636

00637 0f!H!f!6V>0

00640 1776ca0
0120
09641 0U01/l00
0121 . tl0042 000000

eel

140177
kClMw eCl 1000o,
wDI' Aw reT e20~00

eCT .~
hDtNT (cr rl
58" 5 eeT 177~A0
SeCM., t C1 "
S847

~CT

0

lJMA

COUNT

ADDR.

WRITE COMPLETE FLAG
TRACK t-IASK

ADDHESS
H.P. DISK AOUN. A~n CLC BIT
T~ACK/SEC10~

S Tl'RT r NG ADDRESS

cu~~t

2'5 CeMPl. wU.
8ECTOH Jl4ASK
SEC10f( STWINl:i

2'5

CU~PL.

#

CCrlPLETE FLAG
SECTORS

Uf

P/lbf_

vl12?
~ll j)J
~l 1 'i 4

If) ~H17

1 ~b
0127

[, I SC DIAut-.OSTIC FOR 2 t 1 !i , 2 1 1 t)

~~u4J

i(HHh11/l~

58lCl

leT e

~1tl"o45

!AL~7

[Et f"F.S21

I",Ui7

A~C

~u,.'.1~

t!'J..)522

0U')4f.

k)'l,1:l22

1111.1 f, 4 7
k1 tj /.1 !) ;c

kl4c!~14iU

[.HP: ~ 1

~~1l\,4

100i)::2

02~11V3

~;,1,J~J

U~7'j~~

ItH'I:'):, 4

~411.!4

\1~"'~~

e2~1\(::'

lh1o!;(j

u54103

IJ,Wi'?/I<'I'

C... t27 ( c r 32
J ,..,p S3:)~,1
Stl'4

0k;'~"LL~

~8t0

0~Hh'HH.l

bULl;,

eel

1.t.i'l

i1~\1ot>7

1~L21:!

rfF d. :i;2 Q

~1.30

If)~j667

\.1.42522
-,:.1117
05 1 ~I t'i?

ME~28

A SC

Cht2b

~lJ2

0lH ~;7 ~'7>1 \11)4
kHJ71t 0'b 0~, 42
~11tJ 1 t 1 ~, Id,J 112

lId 2(,j

V1;,)3

l!)\:J712 l!42111

f'l8~29

~sc

kl

_.H.I' ~

fOvo71
0Vif·72
73

~,..It

C(.;UNl

EXCESSIvE

~42'i23

k)ido6tJ
"H,HJf) 6

~;

\'1 1I ~ lJ

~H:l1::;

0JI)t4

~12d

ST. uF AVAtLABLE HE 1-1.
JUFFfR ADDk.

~O.):'17

11
khlbb1 00J 1~: 5
k't1oo2 000;1J2
kJIIl663 124f:b4
\1Jo6e

~J

Due

0idh44

.aiO"I~7

"12~'

SPEC I At

/,I~l

l!:.f-

CI'iA;.'.

RE

Hdrl+l

TlI~rJ

COL';~

r

FROM I '" 1 E ~ " 1.1 P T

17,E'7

Ul\'J/" kll'iJ7~7
ill I l' 7 t' 0 0 ~ d ~ (l
1l1',)7 7 01~0:tli!"~

U:.h-l7~)

S8~~
~

B·t 3
C H C,",
CSEcr

(eT

~5

JMP
[EF

[au.n

CHAr...

eeT C
eeT ~

~EAIl

CN~PLFTE:

5853, I

k:£TliI-UJ FROM

"'A[L~+l

I(E. T()·H.

fLAG

ADPHE:SS

TRACk/S~CTUR

IrvlEF;1 r M p, ::; ELl 0 R
2 I S C () ~ PL. 11- li F- S t- l: T0 k ~

eCl '"'
LCT ~

,. 1 ~8
1.,1:'9

Id 1 1,; ::1

VI ~HhhH!

Cf'lfl'1

t

t'l11Ul

I/!~"v.~~

5E::~C

leT v
rCT v.

l:lf;(.TC

(c

S~t4

TfF 5'43

LOUP L llCIIl.

CC T ~

STARTING AUI)"?ESS
l.OOP CONTf{UL

ll.q~

L; 1 00

(611 _' .. j,);.4~hH~t1
.,; 1 1 \1 ~ \1 \1 J 1 ~ 7
n 1 1 \;! t\ \'HH) VI eo vJ
~ 1 1 <\:, ~ IJ:C ~57 4
o 1 1 .:t h 0 ~~ 1 1 ill 7
lU 1 1 "70 4 ~ I .J::;
IUl11. LJ41,">17
It 1 11 1 Id 411 ~; 5
;£)l1l2 ~2~nv;~
It 1 1 1 3 il 5 1 1 ~ 2
vIII 1 4 I.' 4 / 52 2

I"t·L'5o ASr: t::,I'ECOllE ERRUR

~n D

1

"lb2
~loJ

It.lo4
'" 1 {, b

10([

1~

T V.

S6~6

LEF l'I~lH:
1" I :3 ~ L E F I' t. 5 J~

rer

tlcl

~111~

00n~14

Cht3b

V16&

~111b

~~1117

Llh~

bIll7

0ti110~

lAl3b lEF
~t~36 ASC

14
~ES3b
~,REAu

RUFFf....

ADnR.

ChA~.

COUNT
AVOR.
PARITY tHROR
dUFFF~

i.:lll<.fl. 1;4,j~w4
Vi 11 L 1 VI 2 ,21 1 2 ki
lDl122 ~.l4U"':~2
vJ1123 ~"44'i24

~111 ~

0171
I,' 1 "12
~173

~1l124

0::>4<\4\11

,111?5
~1 1 1:.? t;
~) 11 27
~.lll ,H:
V:11 L~ 1
o1 1 .~ t!
(111':>3
l111.34
~ l1·.Hi

>,142522
0 0 1 1 17
kl ~ 1 t! 4 U

16 4 b 4 4 e

~

11 36

~2~h14~

\,'J11.57

~2~tJIl0

~0V1ft);21

CI-~3tl

~S~7

teT 21
lei (i:

CHA.R. r:OLNT

~~~ ~ ~~ 0 ~1

lAL31

rEF

f,uFF£}-( AliDRESS

lU w;

1 1J 3

e52122

I'·E537

MbS37 A5C 16,TNACK

lEMI-'.
S~CTOk

ki4(tj5~,J

1i11 1 5 1tJ47525

~~tJij

kl1156 0e.212'-~
'" 11 ':l 7 \i 5 2 5 2 .~
~11"1tI

142~e40

Ch~J7

~0

C1-4AH. COUNT

"'E~38

8lIFFE.1< ADDRESS

ASC 14,QUTPLT

I "IPllT

~r~D

hG.

PAGt

~01~

#01

SPEClAl UDC nlSC

DIAG~OSTIC

FOR 2115/2116

01161 02 \1 (HI 0
IUl1t1~

0211~40

klllb3 02."g41tl
~1164

~20111

~11 o~

~4712~

~116o

k)52524

01167 02\:.104¥.1
11 7 ~~ ~}2ttH';~t!l

{II

~ 1111 kl20n40
01172 020;.j4~
"'117 '3 001r:'H'JJ4
01I7l! 00J13t'
01175 01b1574
01176 003:510
01177 00.5612

safe

~lt!~~

0~J~74

S8e9

"1()3

~12<11

0\13572

S8t0

rEf' S769-{

0184

~12\l2

~0~042

rEF

~j

01;;'03

~H141:l3li1

SSt 1
1776

0177
~1178
~179

0180
\.ltd!
0182

185

0192

177577
~1.::'(li5 177'577
tll 2., 0 177b43
kl1207 111043
k'1~~10 077777
~H211 kH:,) 1407
111212 ltliJ14tl4

"'193

01£13 0lcHHH10

g194

1:11214 11'1121 h
01215 0!)J:'522

iIlIB6

0167
~188
~189

01Q0
~141

~195

~12~4

~1216

Cf1.e3B

eel

34

Il~3

rff

~7~3+1

PRCl
lae5

rEF S8'55

r.Ef PROle
u:~

~769A

rEF S7t9
14

S8E4

';;;776
177577
177577
eCl 177643

S8tb

tCT

S8£:9

ccr 77777

SM 2
58tJ

~8hl

CHAt<.

COU!~l

IND.
IND.
IND.
IND.
IND.
IND.

lEI-

eeT
eel
rEF

1771')43

SQl<13

Se i 1 IfF S9W'4
e
"'f-LAli
IH43 l.EF /'ES43
I'lES43 ~sc 11,~.-lITE

eeT

-129 WORk.ING
-129

-93 wOkKING
-93
INTEH~UPT lIME-OUT

CONSTA~T

wRITE INT. MISSI~G
REAU I~T. MISSI~G
SUPPRESS PHlhT FL_~
8 UF H. '"

A 0 'J fi •

A f-l 0 R 1 - T RAe !\

("445£4

~l:217

04244t1
"122w,'\ ~4"'5~2

01221

'~47522

"'12~2
~1122~\

052122

1Q52~55

01224 1cJ4f.15w3
~122tJ \il4:>44r;j
~1226

~2"'lt:Iilili

01227 02':'H'l40
0196

13197
tl19&

~12j~

£:1~H,lt,125

lH 231 '" 0 1 2 3 2
0 0 1 1~ 5

o 1 2 ;s 2

CH~4J

eeT

25

lA[44 rEF 'ES44
~E!44 ~sc 10,ktAD

CHAke

couln

bUFFER ADDR.
4~ORT-TRACk

~

1 ~ ~~ 3 It:I 4" 5 Vl4
"'12..54 02kiUl1
~1235 041117
014!·H) 051124
~12J7

~:2b524

~1t!40

id511~1

~lc41

d41513

01242

021(l~4~

~1t!43

"2~~40

02J1

01244 000024
\11245 03/6k10
01246 004222

~202

id1247 IiH:l0f1"'0

02103

012ti0 003512

0204

01251

0199
02{iJ0

~04kl27

CI-'44 eCT

24

S872

eeT 37600

H/\
S5(10

eeT e

S5~

7

S5~9

rEF lRvER
rEF FiEAD
rE.F S()"3

CHAR. COltNT
BIT 7 TO HIT 13 MASK
tND. ADDH.
ACTtVE THACK COUNTt~

IND. ADDR.
JNII. ADOR.

r- .l. : ~_

1,:1 ~

1J

r: ','

1

~: t> i: l.

J ALOn (

D~0~

L12~~

1/7~77

::'51~

~2u6

U12j3 u~~~u~
~ 1 2:)" 1 7 I iJ l~ 0

~eHI

~

2 (.17

b2~6

·,121119
021~

~12jb l'7h~~
1l112'")~· 0~4~~J
~l~~7

~

eel

n 1 S C fJ I A(. ~. i) S TIC F IJ R 2 11 ,,/ 2 1 t 6

leT

eel

177~77

.. 2;bl UCTAl

2~0~~

lJPPf~

c. C 1 1 7 7 6:ft r~

~w4~15

(C T 1716H~
r.Et- ~77:i
177 3C [EF ~773L

NU

~8e2

-128

[77::

~12~~

1~J~12

~l~ol

ij~~~~6

~~lJ

~l~~?

~lWl11

AND CARRY+!

~214

~1~6J

~~1727

~LF,~LF

III
S8f3

I

ri t' ..

IND.

rEF READ,!

~211

0212

blANK
-t28

"Ofo

F 'f.

RETU~"

wORK I I(~ I·/L CnAf(. MAS ...
PICK1lr' bL~FEIo( .. eRD

~265

81344

0~b~~0

~S~

0266
a267

elJ45

0~1727
~1~2~6

-Lf,.LF

~OfATE.

AkD Sd12

e2~8

Wlj47e0b~21

SSM,~SS

~269
~210

~1350 i34172
81351 e0b2~~

RET.lI\ A'I.-A7
SKIP [F lJPPER C"'AJ.c.

~~l

~271

~lJ52

!T8

~1346

0742~4

8212

W135J 07~2~7

9273

~lJ~4

06~172

~214

~lJ55

1275

0131b

021b

~IJ57
~IJ~~

U~~203
~251hl
~6~2~1
12~J41

0271
8218.
8279

~lJ~l

01Jo2

e2'~.····

lsi

~J4116
02~J~7

57i2
S7it

ASCII-JCTAl

S6V~

~~F~~R

'.; P t-> E t:( -

WESTOW~

STA S813
lUA S80P
CPA Sae9

SAVE

J~p

S7~(

LDA 5813
JMP S9~1,1
ISZ SEXT
.JMP Sl~2

ArrH.,
L(~ ...

twA~.

l~

lf~P.LOCN.

ADDH,
LAST HUrFf;f<

8UFFEk

CC··iP.l~'

lI<:fH

YES,~l~

EXIT flAG
ChAR. IN •

~~lT-CHAw.

SET

£x!i

IN

A0 w

~283

~llb5

0500~1

~284

~lJ6ft

0254~5

02~5

~1Jb7

t2Bo
e287
U:£ 8 8

e~6~04
&~4446

01J70
"'lJ71 802M'1
., 1 J I' 2 02!:> J 6 5
01 J I' J 070 ''''' 1

CPS 5830

h.0~P~7P1

~SS
J Mp' 59 v. 2 + :>

~INIS"Er-C"'Ai-/.
r J C' T F I ~. ISH €ft

LDA S831

e9

~UP

f..~.·TEHt;;

lDB 5819
CPA 1
JMP S~P~A

,. SCI 1

~.

C[il'!f'A~F
LI-'~~.

'" I J t ChA, ...
T:) A
~
TO H

d·GlL ... fxIT

IhA

~1~

1

~2~0
~2~1
~292

01J7.

0293

01377

~6~47~
01~4!:>~
03~~~1
07~4!:>~

~294
~295

~1400
014~1

0b"'474
064447

lD~

lAn22

tl'2S16

~14~2

1141~2

J!B

19~8,r

0J91

014~3

1~2~01

~Lr

il

~~98

"'14~4

12~l~3

JMP 5982,1

~299
0J~0

01.~5

~lJI'~
0137~

A7

kEiH'1r-.
RIJLTtr.;E ... 4t .. *

M1J63 0~~~0~
01J64 ~642J4

ijjl

Af'lk.

~:LA{;

~282

0261

E R H ~ S"

L/L ChAR. MASK

CU~Rft·.T

RESTn~E

.C"'Ah.

e.

LEFT

A

lheR.

~ALF

L lwEi-(

IF

ROT A H.

S61~

\E~tFIC'llCh

Si~2

SI\IP

lu H

AND

~ES22

rOR 1
5TA ~ES22
LDA tHA22

A

ILU:.GAl

Tn H

A8-~15 MASK
~tT'IN A8-At5
~~"a7 TO A
~EST0~E ~ESSAGE
~0. OF C""p .• 3~
ST. ADCP. OF PRI~T ~UFFEk
(,TP;'T Efo'UI{ Hf.SSA.(.(
TuR~ S".l~ OFF IF o~

fHW0R PETuR~
0J5Jb3
~9~2A lSI S9~2
l~lR. EXIT ADDhESS
01406 025404
J"P 59~2A-l
E~lT
tJ~l.*··· OCtAL TO ASCII CChvERS10N - tJ i,}e.;}rS ... - ••
03~2
01407 0~0000 tC~V1 ~OP
OCTAL TO Asctl c~~v. sueR.
0J.JJ*Ef'tTEI'tE. iJ l1li1 T,.. H-b ,[ IGI 1 oel Al t1U"'SER
~3~4
~1.1~ ~b~120
LDA CH.HY
0305 ~1.11 010121
STA CHARW
HESET ARRAY AUDR~SS
~3~6
01412 ~60116
LDA ~ASK4
ASC II ~ 1 n /It,
0307
~1413 00be20
sse
Mse·~?
~30B
~1414 0b~111'
LDA ~ASK~
ASCll 1 TO /It,
~JHY
0141~ 170121
STA C~AR~,1
1ST DIGIT rnMPLETE
831~
~141600~110
elF
ROTAH A LEFT
~~11
01417 06~114
lOA ~ASK2
77 To A

1

~312

~1420

01~~el

.~D

0313
8314

01421

03~11~

~1422

lJ~121

eJ~5

01413

17~121

01414 03.121

lOR ~ASK3
JOR CHARW,l
STA C~A~~,1
ISZ C~AR~

0142~
~142~

LOA

031b
0317
0318

i~~7i3
~60114

eLF,R~R
~AS~2

eg-e~

TO

A

6X It.. .i~.-A7
CO"PLETE 2NU

el~rT

RESTQRf 1ST wC~G
lhC~. ARRAY ADr~.
ROTATt :3 U.Fl
77 T(I A

PAG~

0~lJ

#Hl

~PftJAL

DOC DISC

DIAG~~STIC

FC~

2115/2116

. ",31 9
10.13,. ~
\~ J21

01427
k.l14JV.

~U.Hhl1

"ND 1

03~'115

1 OR ,.. II S K,~

~14Jl

""'11:l7

"LF,ALF

~322

b14j~

17~1121

STA CI1ARI'I, I

BO-R2 TO 0\
tX 1"1 A0-A7
kOTAT£ A LEFT f,
~'R[) ilfGIT COMPLETE

·e323
,; ~5 241

~lo.lJ3

K>0o}23

P.LF,Rbk

'?OlATE

"'~S25

i&l3Z6

V,327
CJ28

fIl143t1 HtI~114
/(I 1 4 J 5 ~H vl vllti 1
ItJl04.)6 0310115

l TlA

I"ASI\2

J
77 Tn A

~ND

1

~e

1!:l14.31

lOR
STA

!;I"L~~o"i,

CHAfCrl

~14J~1

13\(11411
1716121

tHAkl~,

~j?<)

"J}4.11

li~4121

IS1

~.3

.h1
0331

fIl1442

0iO~7t!3

eLF,ftBR

~14i1J

~()~114

LDA

"ASJ<~

e;;J2

fl:!1441
~ 14 4 e·

1U10~~1

(} 3lll 1 5

~Nr

1

trl333
~.jJ4

~144F,

t;J35

10 1 4 4 7
If 1 4 'j i1

03~6

"337

16 1 4 51

~~i3H

\(}14~(I

CJ3<;,J
IlIJ4.a
\ilJ41

14 ..142

.. R' Tu A

6 X 1 r!

J
I

A 0- A 7

4TH DIGIT
I-1fSTOKE 2ND 1'I0k[;
I~CR. AR~AY AOUH.

CO~PLETE

kOTAT!::. 3 Lf.FI
77 To A
B0-e2 TO 0\

JOH "'ASK3

6X

\HH7~7

~LF,ALF

kOTATE A U:FT b

1 7 oJ 1 l 1
! ~3
~ r,) ti 11 4

STA lHAR~, I
El,.F,kliR

10k CHAR.·., I

5TH illGll Cui"lPLETE
HOlAT/: 3 LEFI
77 TO A
H0 .. A'·TO .!\
t-X IN A~"'-A7
hTH nlDIT CO~PlETE

~TA

HESTOH~

~hH)

LDA

iJHUl\l
~14"3 03vil 1':>
1014:'11 1301£1
~, 1 4';i:J 1 7 I~I 1 2 1
~145b 120411.it

~J43*****

.

!ul-? flASKS

Lt:FT

t'ASt<~

ANP 1
!OF-

"'ASK.S

ChAi-o', I

J N AfIt-A7

~RO

~ORO

JMro CONV1,I
SlJriHCUTINE 'It*"'.*

l~TEKHUPl

0J44

M14j7

~~0~~0

I'OP

!C:.S4~

~61~)dl

lUA

111.346

lIJlt1"n
"'11461

"6~5;C4

lUf:\

~~A7

~1462

1141~2

JSI~

~J4a

~14b3

U2~471

Ji1F-

Sg,,~!)

~34~

014h4

0~~~~e

"Of'

~35U

~146~

061b~~

LDA

CH~41

~3~1

~1466

b65~4~

llil;l

lAD41

~~52

~1467

1141~2

JSH

ltj2B,1

ST. ,nrR. OF PRJ~T duFFER
OUTPUT t-IESSAGE

~353
C3~4

~147A
~14/1

U2b473

J~if'

59\16

CONltt-.Uf.:

01~475

JS~

5907

e~55

~1472

12b457

Jl'1P 5903,1

0356

01473

01541~

JSA

~J57

0147~

12~404

0358

91475

000~~0

JMfoIS90i1,1
I'OP

GET OMA WORn COUNT
RETUR~ FROM wHIrf INT. ENRo~
GET UHA WORD CCUhT
R~rUQh FROM N~_D Ihl. ~PRCH

~Jo9

Wb4123
U1477 0ti4627

eJ6~

fIl147~

S9~7

~~ITE
CHA4~

INTERR~PT

~RHOk

~!(l.

PF

IAU4V\

ST~

_rnR. OF PHI\T

1'ti28,1

TPuT i"I:.SS~bt.
CO/llT1NL;E

S~07

LDB DNADR
CPS I"ASKo

Ct-1~fJ.=26

~ufFE~

(;lJ

NO. t)F

Ch~R.=22

UMA OCTAL ADOH. TO B
DMA CHA!'\.-o?
YES

D361
0362

01~~e

~250~J

JM~

~1~01

064531

LDB t'tA57A

~Jb3

01~02

~25~~4

JHP *+2

0364

~15~3

~646~~

l Da f"·A 56 A

~365

015~4

~6~1~7

LDA

~ASKI

1777"W TO A

0366

~1~~5

~11510

AND

5908

RETAIN A6-Alo
lOR wCH AODRES~
HESTORE S~V.8
INPUT HORD COUl\l
OCT~l TO ASCii CONVEkSlON"
~ETUP PRINT MESSAGE

"+3

~3b7

01~06

03~e~1

JOR 1

0308
0S69
031A

~1~~7

07151~

01~1~

1065~0

STA
ltl:!

~1~11

114113

JSB CONV,l

~371

~1512

06~110

~~12
~373

~1513
~1~14

a71~70
~60111

lD.4 tARRY
STA. "'ES4~+8

0374
0375

~1~15

~11511

~1516

06~112

S9~8

e

lOA CARf?r+l
STA t-£SA2+17 071:;72
01:.>2(6 '361573

lD~

CHA4~

"J7&
16379.
0381:1
r.381

0i!>21

~tl5557

l Db

lAD42

t1382

S T_ "'ES42+1e

~ 1 ~ 2 2 114 t b 2
ul:l23 120475
01~24 001525

l~LA~

tEF'

,.,ES4~

~lti25~5J5~2

M£f4~

~sc

12,ht41

~0v)~27

C~'4~

eeT 27

k'lJ~4

\.11 ,4(1 (HH 543

IAtAI

iUJa5

~1543

1601105

I" e ~ 41

[Ef I'ES41
AS C 11, k t:. A 0

~1"44

~4l1t504

CHAR. COUNT

BUFFEr< ADIlR.
I

1,/

T E R Ii tj P T ,., ISS 1 N G

01 b 4 5 to 2 ..: 11 1

"l!)4.t
"1~47
l:J 1 ~5'~
101~~1
V\1~S2
~1~~3
~11554

1D41124
~42522

1D5112!:i
1t)5t11~4
02~115
~.44!j23
~51511

l11b55 04711217
~JMi

ral!l~f.

eeT

26

CHAk.

"1!>~17

000f1'd!6
001560

CI-'&41

OJ87

1~[42

rEF

~ESt2

8UFFE~

V,368

01~b0

1tJ4~11~

i'I£;~42

jlse

COVin

ADDR.

11,01·',&, ~O~D (;OllNT=

"'1061 "4~~40
'>1!)62 (153'511
~15t1J

1(J~lt"'4

IH bo4 021(11 it 3
v 1 ~~5 U475:t5"
',1!'166 041124
01~61

0Jf)44~

~157~

'=l4!~Hl4"

~1';)11

02kl1640

161':>72

02V1~4~

03ij9 01b73 00~~~6 Ck,42 LeT 26
0390***·* PROTlCl S~&RCUTl~E ****.
~391

01~74

00~~~~'

0J~2

01~/5

~~24~0

0393
0394
0J95

dl~76
~1577
~1h.0

&39~

016~1

~71663
0~12~~
~71204

0397
~JY8'

071664

PR(TC

~OP

(LA
STA 5912
~TA

S91~

CHAR. COUNT

PROTfeT CHECk

CLEA
CLEAR TRACK A.oDR. Coo,.TER

LDA 5882

-126 TO A

~lA

SB81,.

RESET COUNTER

~1602
~lb03

064122
~D8
0~b~041N~

llADRl

H.P.

0399

01004

0681~7

LDA

~ASKI

040~
~401

01oa5

011~17
0J~0~1

~NV
lO~

S91t+3
1

016~6

SU~kUU1IhE

DISK

AUDR.

10 8'

SErlO l.P. ADOH.
17770~ TO A
ftETAlN 1\6-A15
R TO A

~

PAG~

~~l~

#~l

~PECIAL

... ,ry2

01t1 117071617

~'H)3

~lf'll('\

c:l6Ul~7

~

~P~ll

0115;':~

k14".5

~

1 f- 1:2

V!4tJ6

e;

It'd.~

kl j \) \' IJ 1
'-17 t 6 ~ ~

li ..\ i~ 7
v:403

~lllllL'

061663

.?l1.'10

0~)17't.7

~;' 1 l1l:Jl:~23
~ 1 t) 2 2 0 ~ 2 ~ 1 1

.:H;4

11411
~412

G ,ll J
(l,;14

1b 1h

0418
~419

~1fdv.l

(~416

(;117

eTA
LLA

Aj\j j,
10H

S(Jll

S9J1+3
t'ASK!
S gil + 4
1

STA 5911+4
lDA S9UI
ALF,ALF
JiAR
eTA k'

l P

'J

lHo23 i.130604
Ii~ 1 t ? 4 " J ~ 6 b 3
IHi':l2~ itl35254
o 1 tJ 2 fl )' 2 :" 6 1 4
1010?.7 06~b64

t'141j

DOC DISC DIAGNOSTIC FOR 2115/21\fi

Q

~AR,kAH

SLA,hSS
IS] 5912
1St S9U)
lSI S881

RES Tell, E S q 1 1 ... 3

TO

1777'l!1I

A

RETAIN A~-At5
~ TO A
RESTORF S911+3
TR. A~DR. COUN1~H TO A
A0-"'''\ TO AI1-A13
ADJUST TO A7-A13
TRACK ADDR. TO DI~K
INPUT STATUS
BI12 TO Hl1l1
... R I TEE III A~3 L E :: \ ?
i';O-Px(JTfCT CGtlt-.Tt"

LDH

S~12

INCR. TRACK ADUHlSS
120 TRACKS FINISHtU?
NO-lOOP
ACTUAL P~OTECT CUL~T

JStl

CO~,V,1

LONVI:RT

JMP 5911

lDft 5612

~tl21

11"113
(:) 1 6 ~~ 1 0 6 I.J 2 ~: 6
~'1 t) :i 2 ~ hI 1 1 1

~ND

CARRY+l

RETAI~

" 422

~ln,33

IiJj12~3

TOR

S8b~

tiLA~K

A8-A15

"423

t11 tJ.34
01t..3:1

iH 1 boG
06&j1l2

~TA

~ES4b+t2

SETUP

PR1~1

\J424

l II A C Ak K Y... 2

,., 1 C KI J PAS C 1 J C l' !J f';

~4~~

~?lCd6

STA
L i; A

~fS45+t3

PREPARE MESSAGE

C H "4 S

C H A R.

L DPIA r 4 S S T .

~.4

2,,)

~426

ral~J7

071661
061602

('427

\11;"4",

VJtl~')43

U4?8

\1 1 t' 4 1 1 1 4 1 0 2
(11 ,j 4 2 1 2 0 ~ I 4
~ 1 () J 3 0 1.11 6 /I 4
J 1 c-' 4 A 0 4 7 1 1 7

\j4;?9
~4;)~
\').It

j

1

~'1"'4:::
~

11) 4 6

JSB

1~2B,I

JMP PRU1L:,I
lA14~
~E54b

UCTAL

Tt' "SClI

377 TO A
hE~SAGE

r

C () U fH:oI ~ 8

A DlH?

CUTPUl

nIbIl

~.g.

(1

F P R I ,,1

~

UF FE rI

MES~AGt

RE'ClJRt-J

rES45
8UFFE~ AVDR.
ASC 14,NO. CF PRGTECTEL T~~CrS[E~

0271(14.;'
1-1 4 7 5 ~i 6

tllb47 02:..112\1
~lho0

~51117

(jih'S1 052185
101()~)2

041~~4

~1(:,j3

i042504

kl1b!)4

kl2fd124

Ulb55 051101
U16:)6 i041~13
icH657

~51455

020040
V. 1 6 1 0 2 "" 0 4 0
~ 1 () t> 2 IchH1\:1 J 4
~16t)0

~J

":> 2

I,

Ch~4b

eeT 34

~\1ItHHHII

S911t

eel

~

flHHHHHi

5912

eeT
lRG

~

~430

016h3
ill t {) 64
U 1l1..H1

(1436

01

Hl~

00t1000

$9<;9

'iLl37
043b

01701

~0000tIJ

0171<12

0(J17~3

0439

r.11l~3

~41111

'-lc33
t'.434

1(;1704 041U'1
~17~'5

051131

017.J6
017J7

02Vl12~

01'1~

0410515

~1711

~:1425~4

rJ4~}522

"op

CHAR. COUNT
TRACK ADDRESS cnUhTER
PROH.CT COUNTER

t7~16i3

ERROR COU!>,!T
ERRCR COU~T OYER~LOW
IAr5;: [EF to'ES52
BUFFER AfiUR.
~E~52 ASC 19,BINARY PARAMETER EXCEEDS 72
hOP

C~AKA~TERS

PAGE 0Jlb Nwt

SPECiAL ODe DISC

UIAG~OSlIC

FOR 2115/2116

.

\11/12 042522
IIi 1 J 1 3 0 ~ 0 1115

\.11714

G541~<~

tl171~

iJ42505

\.11716 11421;:3
01117 1..:\20007
~1720
~n121
~11:?2

041510
164tJi:i'2

031~4~

~1123

1d4!05~J

044~

01124 1')::>211':5
itl! 725 lr:.Io1123
~17lfJ 0"-10046

0441

1i.120~0

tRG

~A42

1d200r.

0b~143

Vj44J
ta444

~2~1£l1

0b4127

~445

02~H1J

U446

0447
0448

Cl-tt52 lCT.t6
ST~IH

W2002 114102
06k': 125
02W'4 (064124
~2~0~ 1141144
020 ,j 6 0 6 ~I 1 ~ :3

lOA CHAll
LDR IAOll
JS8 1'128, I
l nA SHHI

LDP AKDMA
JSB 10.40,1
lDA DMAUt?

CPA

1(l44Y

02~H:\7

05~144

kt4!;)"

., .2 liJ 1 "

0 .2 6 vl 1 4

~4!)1

1:12011 05t!1145

CPA tMAC;

0452

~2\J

JMP S."3flVl
Jr-1P START
Hil) l"ASK2
~ TAU I~ A DR
LOA Ct1A12

~4:J->
~4~4
{l~

o!:l

\J4~6

1t1457
(401)

12 ~12h\H 4
02013 026~H;H:I
\5 2 ~11 4 !O U~ 11 4
~;'\if15

[K.40b

J MP S:HJ0

S3Q0

07~123

kl :2 tJ 1 6 0 6 ~1 1 7"
~2017 1c?64146
020201141")2

CHAw. COuNT

-

~I1N11;)

LDK IADI:?
JSB P~:?B, I
LDA SlrJit
lDI-< ADlAD
JSB 1048, I

NO. OF CHAR.=14
ST.

~

DDf.<.

nF

EQUAL 07
YES
~O-GET GOUD ADLRfSS
AVI-A2 MASI(
kfSTJHE OCTAL DMA AunRtsS
.~

o.

C ~ A h: • ::I 2 fj

(1 F

ADDR. OF P~l~T
OUTPUT ;'1ESSAGE
~T.

10217121

1:12022 064126

0.cj61
€4b2

l12t123 1141114
k:l~U24

~60114

0463

~2~'25

~1~122

[1464
0Ab5

t.1i026

~700(.jl
~601~2

51A 1
LDA DAURl

A TO H

tj2~27

0466
0467

"2~30

001727

~LF,ALF

1021131 01"'114

ANl! I"ASK2

0468

~21(lJ2

001723

ALF,RAR

LEFl 8
RETA[N AItl-A2
LEFT 3

0469

~2~33

03,Ht01

04 7 ~J
11471

l12klJ407k1 122

"21.:'1:..55

11~175

e472

02~~36

102501

~47J

~2t:l37

0017~0

0474
0475

~204~

\12\:)41

0021J20
11b246

'147b

02042 06ldoiJ2

C477
1.1478

02,,)43 00041a0
l1 2 ~) 4 4 1 7 40 0 ~

14

t-IEG. Tn A
SITit TO AiT15
SW .. l1"W?

0l' 2 0 L14

'filA

"2{1}46 0513106
l12VJ<17 (1201(101

CPA

04(\2
l1483

0213:;0

~484

"10 A

llA Pol
.6LF

10 2 ~ 4 5

\:121:151 11175213
02~52 17blI(J3

ADDR.

RESTORE OCTAL
CHECK PROTECT

~1i.l79

4

ASCII

U TO

04tH:'
0401

112bt~4

NO. OF CH4R.=2

lOR 1

JSli lRY,1
lOA AII/TAF
( LA
~Tb t!,I
1~M3

A

DISK

AtD~~S5

FE~TUHE

TRACK

ADDR. CHECK SUBM.

STAin OF BtlFFEr< ARI:A

LAST ADDR. OF BUFFER AREA
FII\jIS~ED

JI1'" 14+2

NO

r

F PI

I SHE D

PFLAC,

STi:) 5854,1

~.p.

SIN.

JMP *+2
~T!-I

~UFFER

!3UffF.R AnDR.
INPUT H.P. OIS~ AUDH.
A0-A2 MASK
RETAiN 10 .. A2

ST,A DADRl
JSB PROT,1
SSA

't l , F rEI-(

bUFFE:R AlJOR •.
INPuT nMA ADDK.
ASCII UMA AaDk. TO A
EQUAL 06
YES

0459

l.DA t-:ASK2
~NO tANH

r i~ r

ChAR.=~

"'0. uF

~460

06~125

P fI

OUTPUT MESSAGE

(.Lf;.AP? FLAGS

~AG~

kJ4tl5
~14 d 6

e~17

#~1

SPECIAL UDt DiSC DIAGNOSTIC FOR 2115/2116

b21!J::>3 {176514
021t1:'4 {1771J14

~Tli

i'RITE

STH SflOl

e487

~2~o5

1..177512

STf:!

READ

k;4b8
ki4f:19
eel'll)
04'11

02.\'156

1702~1

1",2IJ~7

1025\11

e1

~2il100

0012~~

5T8
LIA
FiAL

l12061

0~2k-121J

sst.

S5~9,I

NOP'S

(;LEA~

SW.
HIT

REG.
14

TO

A
HIT

TO

15

HIT 15"W1

\:,492

~2~J62

~2421t1

1.1493
13494
1d495
0496

1£l2i.~63

1 ~25 ~11

JI1P 5824
L I" '.: 1

MArWAl PREStT
SlIj.REG.
TO A

~2~t'J4

0L12~'2~

SSA

tilT

u2,)6~

0261371

JMP 57113

NO-PR INPUT

",2U66

06L"22'5

"497

~2067

064211

NO.
ST.

0498
"499

~2!j7e,

1141~2

LDA CHAIt>
lDI:I IADlo
JSt:l 1028, I

LOA

Se.~5

CI-lA!-l.

STA

S8i~4

SETUP INPUT

JSfl

Sypilt
S816

CALL

57174

t.o

~2011

~ti((Jl

l1b 02 v) 0
07'11177
l12"17 3 G 15,3v.J 0

5:i~t:HiJ

SMJ

~21112

0~1J2

f(}~"7 4

k}4l1226

(15tAJ

~l""'75

1dl.:}2'.1;!llJ

SSA

"5>14

02(170

\12tJl~4

JMP

€:::HJo

I,.Lh177

{4f)17~6

LDA (t-1.652

2 1 ~~,

0o!:l71U2

LD8

Po t> lLH.I
~~07

0">\:P~

~

. 1J2 u:J 1 1141f<12
1J21"12 l\1t2~H';1

U:n;9
~1 :.. 1 L1

~ll':3

0200/1

~.21k)4

11
12

U21 ,"J 5

IdVl24,oO
!tI7~' 227

~210?

13 i' Ii' 2:3 0

,,~o

k.l~l

~DA

~::l13

~j.2

"~14

1 i17

~H12j

SH4

OF CHAR.=:n
Al1DR.

CF

PRI~~T

t(1)FFEi~

OUTPuT HESSAGf:
COlJIH=72
CHA~.

LE~G1H

I fJPUT

StJHROU1l NE
ADO -73 10 eriAl-(. CllUNf

POS.IC[RROf~

f.RROR
C t-f A K. C 0 U t~ T = ~ 8

ST.

IAli52

U U T P I JT

JMP

~

S71(.3

CLA
STA fWUkJJ

AfJOR.

~UFFER

JSR 1112b, I
I-LT 11:1

STA
STA
LOA

1

t5"~?

ME. S S A r; E

TURN $o>J.l'1 OFF
E rUt<·>J F 0 t-< :\J E ~
BI~A~Y

CLEAk

(;}j(;RU

"lO~K

[duFf

r. 0 MP I. E /'! E N T

IF ON
T1-; PI) T

PArTl~N

WLRO

FL~G

CllMPLft":-'NT

b ~_ F F F: '"

... II '" D

\::!:l15

\:1211v. 06\:)23.3
b2111 l17'.12.J2

STA S817

SET r.OUNTER TO

\151b

ilJ2112

~1!:>341

JSB 59"t

GET A CHA/.?

0517

10211,3 050476
G 2114

(PA 5332
fcSS

CWAR. -eLA

~:"lo

~o19

t:' 2115 k126122

JMP S7(A4A

8 LAN K S F I rJ 1 S H t D ?

052~

'-12116 1:)04176

l~

LDB SEXT
SLB,hSS

0022

\,12117 16" 0 ~~ 1 1
02121£' fl'2b112

~523

~12121

0024
€525

~2122

JHP S704-5

EXlT FLAG TI) B
FLAG:sl?
NO-GEl ANOTHER ChAR.
PRINT ERRO ... r1ESSAGE
E:.XIT FLAG TO B
FLAG".e?
NO-PRINT ERROR ~ESSAGE

f.SS

8LAf'H('S

JSEI S911

GET A

CHAR.alli1

521

iiW2"iH:ll

S618

MnRE

Jr.P .. -6
JHP SlQ14-5

026~77

LDB SEXT
SLB

,,~,,?

~LANkS-TAPE

\O~28

"'64176
2123 0~4010
\12124 026~17 7
Vl212!:l ftH) :t '10 1
b212t kJloJ41

0!.'i29

02127 05<12J4

CPA S819

05JO

~21-lk)

JI'IP SH'6

YES

0':131

t' 2 I J 1 165'l235

CPA

5H2~

CHAR.=!

\1532

02 LS2

Jt1P

S7~~6

"l~JJ

~21JJ

LDA CHA18

ERROR-CHAR.

~t.34

060265
1::l21J4 064236

ST.

UoJ5

ki2135 114102

lDH
JS8

l~?B,

Ct'>J6
1I}5J7

~21J6

I-LT el

TURh

k121.57 026IJo6

GET

~538

~l ~

FiET/lotN
P~TTER~

l:)h26
~h21

~)

~2b140
~2b140

102~01

SlV5

lEAnE~

FIII/ISHED
CHA~.

YES

lACll(i
I

1 .$ VI

"'0()4~4

0539

~1

21 4 1

o HHHo 1

JMP S7~3-3
CLP,}N8
AND 1

054~l

~21.d2

064227

lDt'!

0541

~2143

0012H_~

RAL

PIIII}RU

-1~

ADDR.

OF

CUU~1=43

PRINT BUfFER

OUTPl'T ERROR MESSAGE
S~.

15 Cff IF ON

NEW PATrtR~ FROM TTV
& !1ASK=0t1IHHJl

A LEFT

Art.
wo~o

1

TO

H

PAGt

0~lij

#~l

SPECIAL DDe DISC DIAGNOSTIC FOR 2115/2116

0542

02144 0135200

~BL

V,::t43
ltlo44
0b45

162145 03tHH:I1

JOR 1
5TA PWORD

02147 l!134232

lSI 5817

0~46

1il21,)~

026126
102151 0M1227
0~ 152 011.!1.3k>0
~2153 !671d227

JMP 57"'5
LDA P~ORlJ
FiAR

"'2154 ~15341
02155 050476
021:>6 0~2001
1d2157 034230

JS8 59"'1
CPA 5832

0047
0548
t:I!)49

0550
k1551

1I.!552
\.l053

0214(, U70227

~

STA PWOFw
RSS

lSi ChOHU
JSB S9~H
CPA 5832

~b50

010)41
kJ2161 1350476
02162 0~2~W!1

05~7

02163 034231

ISZ CHUFF

~0~8

060267
1t:121b5 t17fd266
02166 060230

L DA

tool

02167 0015160

fRio

W~62

0217Vl 06\(1375

LDA

C?563

021/1

~70374

STio Sij28

'->:)64
t'1565

02172

06~j227

l r;A

~2173

00204~

~554
0~55

C5~9
0!;)6~'

021b~

RSS

0216~

57~7

INCH. 8IT COUNTER
16 BITS ~Ol FINISHED
PATTERN WOHD TO A
ADJUST ~ORD RIG~T 1
RESTORE FIN4L eth. PATIEH~ wORD
GET A CHAR.
CHAR.-RLANK?
YES
SET COMPLEMENT ~GRD FLAG
GET A CHAR.
CHAR .. =-SlANK?
YES
SET COMPLEMENT HLFFEk FLAG

5823
Ci~ORIJ

RESET SECTOR BUFfER ~DURESS
COMPL. ~o~o FLAG TO A

5829

-64 TO A

S.TA 5822

LDA

LEFT 1
• INCL. OR B TO A
.. RESTORE PATTER,.. v;O~D

Af'l

PioojORlJ

, 0 E

RESET WORKING COUNT
8rN. PATTERN ~ORO TO A

SEl

f:,m0?

( MA

NO-COMPL. FVERY
STORE IN RUF'FER

fa b'fll

02174 0~J~0~
02175 1702tJ6

'IOT FI~ISt1ED
CLlAR ERROR COUNT

07~701

S TI~ 5999+ 1

CLEA~

~60502

LOA AwTAf'

02214 0705103

STA 'IIAwTd
llJA 5863

07!>1f60

\:l58l1

0.G212

05H1
0002

~2213

1.126211

kl22101 ('.l2b2{1'"

05BS

kJ2215 0612tl5
10221(l 0712\:14
02217 H}2~1£11

10566

0222~

STA

S~62

0:;,b7

~2221

~26225

llA 01
S5A
JMP S71t9

05/j8

02222

0b04~6

LDA CtiA19

'-5b9

02223 064,il6
1il2c24 1141162

~51J4

LOR IAD1Y

JSH 1028,1
LDA S805

~602~0
07~177

STIo

~2227

1i:l1!)J(()0
U4W226
002H:C0
f126240
06U44!)
064421

JS8 59o"
~DA SB16

0~97

165':i8

~2234

0596

~02L120

102225
0222'"
10223f<1
Lj2231
kl.l232
02233

e5':io

ST. ALDfI.-HUFFER

LAST ADDR.+1

102211

\1091

FrNIS~~t

OF wRllE PROCESSUP

FINISHED

~S79

0592
"0<;3

ADo~tSS

COli~r

JMP *+2
JMP S708+3
STB 5999

02~W7

051J~

~UFFt~

I'IOrtO

CPA ARTBr

16577
Gt>78

\,i5b3
,; 5{; 4

I~CR.

JNCR.

~O~D

b7f9

Sll0At

SSA

JMP 57J'"
LiJACHA21
l D8 lAD21

ERROR

COU~T

OVtAfLO~

~ESET ARRAY AUDR.
-65 TO A

.-65 iU
S~.

\IIO~KING

REG.

TO

A

BIT 15.01

NO-PR INPUT
NO. OF CHAR.=14

ST. ADDR. OF PRI~T
OUTPUT MESSAGE

~UFtER

CHAR. COlJNl-72

SETUP INPUT CHAR. LENGtH
GALL INPUT suaROUTINE
ADD -73 TO C~AR. COUNT
POS. -ERR(:R
NO E~ROR
CHAR. COUNT-37
ST. ADDR. OF PRINT SUFFER

PAGE

~~lY

e';)99

1il2235

0MH~

~22J

#01

SPECIAL

11.4U'2

~6v,1

6 1 kl 2 (HI 1
02237 ~262L12

"6 ~12

0224~

~lb~~Al

kl603

02241

05l1.:!76

0~01

~l~42

!d2b2~6

'tHH~2

S71~

DDC DISC

JSR
rLT
JMP
JSH
CPA
JMP

DIAG~OSTIC

1028,1
",1
57~8+1

5yel
5832
S711

~2243

CPA 5833

0tJ~6

\iJo0477
tJ2244 .,2b206
02245 e5'W:'S0A
0224tl 02b225
~2247 050512

0fH~7

0225(:1 026265

CPA 5834
JHP SI~9
CPA 5836
JMP 5712

"iI!~&

~2251

~HH19

~22ti2

n60445
064014

LDA

0~lllb

02~:)3

11411lJ2

JS~\

iH'l1
"kil2

b2254 1020I!J1
02255 0262'12
022'56 064176

"1(103
.:H.104
0~05

~I:H

J

&:::1"'14
~n15

102201 ~oVlok12
02262 ~~~~"3
022t13 t:l27127
0226~ 02b376

01o!\2~

~226~

v.l606~2

"~21

022b6

~7kJ6~3

0~122

5711

LDA CHA2l
IAD2j
Hj2H,1

t-LT til
JMP S708+1
5711

LIlt;) SEXT

SLB,HSS

02257 0~Jt.011
0226lil 026240

0017
0t11tl
\:l~' 19

0\a16

JMP

JI"IP 57116

LIlA
CPA

AHTH~

~A"TR

JMP S743

JMP S72~-3
LOA Sd42

FOR 21J5/2116

OUTPUT MESSAGE.
TURN Sw. 15"OFF IF ON
GET ~~~ TRACK PARE"'. FROM TTy
GET A C,,"AR.
IS CHAR. A BLA~K?
YES-CMECK EXIT FLA&
IS CHAR. A COMMA?
YES-CHECK EXIT FLAG
IS CHAR. A SLASH?
PROCESS CONTINUATION
IS CHAR. A T 1
YES-PHOCESS PARAMETER
CI-1AR. COUhJT,.37
ST.

r

0 F P R I!H !:It' F F E H

II D R.

OUTPuT MESSAGE
TURN Sh. 15 OFF IF UN
GET NEW TRACK PAREM. FRO~ TTY
EXIT flAG TO B
EXIT FLAG=l?
NO
YES
ANY ENTRIES?
t'lO-JUMP TO READ PROCESSOR
VES-GET ~~ITE S~CTOH P~RAMERS.
-3 To

~

51343

RESET

CHA~.

\32267 00241110

STA
(LA

€H123

0227~

070t;40

STA

~84~

ClEM< CHAR.

lihl24

fc:)2271
"2272
1el2273

~lo341

0~047b

JSH S9V,1
CPA 5032

G~T A CHAf~.
IS CHAR. A

02b3~7

JMP SilJ

JMP 5715

CHEcl<. EXIT Fl~t:
CHECK LEGALITY-0-7
GET NEW THACK PaRE". FHOM TTY
7 TO B
RETAIN AeJ-A2,
PARTIAL TO B
ROTATE LEFT ;:5
lOR B TO A
RESTORE R£SUlTS
TRACK ADD~. Fl~lSHEO?
~O-GET ANOTHER CHAR.CT~R
CONTINUE PARAMETER

LOB SEXl

EXIT FLAG 10 I:)

SLB,loISS

EXIT FLAG:1?
NO-GET A CHAR.

~h:;2~

0026

5712

0\'127

02274 01h3fl3

JStl S9((;2

0"28

~227b

JMP S7:..)8+1

C~29

02621)2
02276 064114

"030

02ir?77

IH00Y}1

.AND 1

~0Jl

02,h1"

~l64540

0"1.32

~23i;il

0~o72J

LOA St.l40
ELf,RBR

~U33

023~2

0J0~01

0l;34

02.303 0705410
02J04 034b~3
02';0~ 1626271
1.12J06 020317

e~135

kl 41 J 6

016J7
0~1J8

0039
0~4!O

(::1,,141
~totJ42

02j07 t164176
162310 006011
02,S 11 02b271
02312 06tJ560
(62313 064!i.3
02341rf IOlO.;bJ

~~!>6

'hit!) 7
01j')8

0~bJ

"~64

0005
0~b6

''''1&7

e<--I 68
0k;69
loHn0

S~4J

STA S841
JSti SQ~1.

CLEAR
GET A

HOLD

CHA~.

CHA~.

CPA 5832

15

JMP

5716
5<')~2

CHECK EXIT FLAG
CHECK LEG~LIT'-~~7
GEl ~f~ THACk ~AHEM.

""AS~2

7

JSH
JMP S7@8+1
lOH

C~~H.

~

8LA~Kl

~NIl

1

RETAIN A(I-A?

LDB

~841

PARTIAL

6LF,t'SR

~2J4n

ROTATE LEF·T

lOH 1.

lQR

l:IJ~~Iis1

f02J51

STA 5841
ISZ 5843

f~OM

TO H
,~

t~

Hi A
RESTpj.(E RESULTS

JMP S719

TRACK SEQ. CHAN. Fl~'ShED?
NO-GET ANOTHER C~Aq.CTER
CONTINUE PARAMETER

lfJB SEXT

I:,XIT

00hll111

Sl~,!o<3S

~2bJ3S

JMP 5717+4

LXIT FL.\G=l?
NO-GET ANOTHtN

JMf' S714

OUTPUT EWkUH

lDA Sts41
(MA,l~A

SEQ. #
2*5 COr-:Pl.

{lj7cil~41

STA 5841

qLUCK SEn. FUk

~6 2

JMP

0263~7

\1h~541

Sllb

S7J9

5717+4

S6·H)

FL4G

'P240

~09.:s

~2~S7 t;

0605~3

LDA ltiA;.Jiti

ihi~4

02377

~70b~4

SlA LA . . . lt1

011';#5

024tH!

020406

J"'P 57;21

bET

0e96

024~1

LDA CHA25

0097

.12 4~':?

CHAR. COU:H=29
~T. AfHIR. (lfPRflllT IjtlFFEI<

~lJ9802.J~3

"606ft 1
tbb4e>t-l
1141 ~2

JStj h l 2B, L

ERROR PHINTOLT

0~99

~24~4

o 1"'10

la:l~01

.. L 1 f!' 1

TU~N

024~J5

02b2"2

JI1P 57178+1

bET NEW

0101
01V'tt!

"'2·HI6 k1tif.1!H.'I4
1tt2407 0705"5

0~~6tJ

" ~91

034541

01ft13

0241~

0104

"'2411 0712"6

01~5

0107

02412 10:itH." 1.
02413 0"2e2(~
162414 02642Ql

o H'9

02415 06",420
ij;2416 .,64407

'-ll~b

o HH}

0612l~7

TRACK

ADL~~&S

J NP 572V1
lSI 5641

YES

5719+4
LUH SEXT

f>,IOT

EXIT FLAG TO B

SU~,RSS

EXIT

Jf1fJ 57 Hi

GET ANOTHER hRITt

LDB

5741

*+2

l DA

iAD20

ITY

fO fl

0234J 0Ut~bl
"20$411 0b4541
02J4!i "'''\!)723

0ldl2

Ii! ~j 8 1
\i'lUu2..

5TA

0lJ41 '-'2b2(12
0;,?.542 16b4114

02.~47 0716541
32350 16346r.J

,wald

Ll1A S842

eLA

1(}1~341

~..r71

"~'!79

5717

# OF TRACKS
f lN1SI"II:.O

INC~.

FL~G.l?

~RITE

Sw"

TRAC~

PAKEM.

SECTOR PARAMETERS

15 OFf

IF UN

TRACKPAR~H.

FN0" TT)

AI'ISBf

S TAW" W5 B :-

kESET ARRAY AllUR£SS

LOA ~865
STA 5864
LI A V 1
55A

-86 TO A
-e~

TO i'/OR"lN6

Sw. REG.

TOA

JMP 5722
LOA CHA2'"

f 1
LDB 5EXl
SLd,ftSS

~l453

CO U:"oJ T '" 3 7

TURN S \oj

JMP 5721

't12441t:1
\12441
LJ2442

~t27

I

tl

=ERRO~~

ER~OR

•

1~ 0 F F 1F

Gf'r

tIE 'i

1:1 I::. CT.

P A " E 11

~14~

~24!J5

LDA S842

YES".J l:'" PIG wR 1 r t
.. 3 TO A

RESET

0b~b1t,2

141

1024::;6

07(;6C3

51A 5843

024:')7

00241110

(LA

k114J

e24i)i<1

117&1~40

S'fA

"144

~~

01 !)~S.41

U145
1U146

\:')2 4 :')2

fr15~~476

JS859\)\1
CP.A 5832

~1:'UI63

0264/7

JMP S7;>e

'-J147

~2464

~H)3b3

JS8 S9lt2

CHEc~

'l1-18

i:J246!) 92641116

JMP 5721

GET NEw SECT.

\:!149

~24b6

LDri

t'ASI\2

7 TO 8

1

f.lETAIN A\?I .. A2

S8~H

PA!{TiAl

HI!

S84\~

CHA~.

CLEAR CHAK. HGLD
GET A CHAK.
IS C~AH. A BLA~K1
CHE.C", E)(IT FLAG
LEGALllY-~-7
PAkE~.

~15~

1J151

~2d70

0645410

AN l)
l.DI!

~152

02471

~0~723

I:'lF,RBR

ROTATE LEFT

~1~3

102472 1d30ii'01

lUf.<

1

lOR

01~4

01473

~156

162474 IOJ46~3
C2475 026461

"1157

02476

STA
lSI
JMP
JMP

Sa.ie
Sti43
5725+4
5728

I6

~~b5~7

064176
02~00 t1i3ov) 11
'" 2 :) ~I 1 0 2 " 4 6 1
102'j~j2

~2')~)3

060!'500
"'6 4 542

10 2 OJ ,'14

114 1 ~ 2

02~it1~ 102~.H? 1
10 2 ~ ,~ ~ 0264 kl6
02:-''''7 01t>.341

S7t6

LDI; SEXY
SL!.;,kSS
JMP S72~+4

IDA CHA24
LDP.
JSf3

lA024
10;>P,1

.. LT (';1

SIt8

'J PEr-< ATIC N

COu~r[R

t164114
10 2 .1 6 7 e HhH1 1

~710540

1 Ty

NO

~142

~'

F K 0 ;1

EnT FLAG=11

J I<1P S 7 ~ 3
JMP S733~3

139

•

tX!T "-LAG Tu 8

026433
.024:)4 020503

~J

I) '"

GET NEW SECT. ~AR~M. FHOM lTY
GET A CHAR.
IS C~AR. A BLA~K?
'ES-CH~C~ EXIT FLAG
IS CHA~. A COM~A?
YES-CHECK EXIT FLAG
IS CHAR. 4 SlAS~1
~RUCESS CuNTINuAIIUN
IS CrlAk. A S?
YES-PROCESS PAKAME1~R
C~AR. CQUN1",J7
SoT. ADPR. OF PRII'ItT liuFFE.R
uUTPUT ERROR MESSA~E
TURN S~. Ib OFf IF O~

[3

FKOM TTv

h) B
~1

TO A

SECTOH ADUk. FINIS~En?
NO-GET ANOTHER ChAHACTtH
CONTINUE PARAMETER
t.X IT FLAG TO :3
EXIT Fl.AG-11
f\lO ... GET A ChAR.
CHAR. COU~T=;6
S 1. AnD R. 0 F P R I t\ T IH: F F E. R
OUTPUT ERRUR ~ESSAGE

JMP 5721

IURN ::)i·~.1'i OFF IF UN
';El (\£-, SECT. PAREf1. FWOM TTl'

J Sb S q(" 1

l>E:T

t.

CHAr<.

PAG~

\-Jlb7
0168
.fH69

.:;

1l~

~;

j

71

':J172.
0173
~174

~J22

#02

~PECIAl

DOC DISC

1!)2~ltd 000476
02011 "'26015
o 2~) 1 2. r, !:l <>5 v~ 1
02~J13 0.2b5cl

o 2.!:It 4

CPA

JMP 5731"

JMP 5727
~7~9

LVii S€XT

02:'>2t
02522

07~61oJ

l DA
STIo

\)178

\12~2J

0!d~4"'0

LL4

"179
~ld2

1(12524 ~7~541
02525 015341
02'.;26 ~50476
02!:,27 1020043

~lb::S

\12~).34:j

0164

02:).310264(.16

0UH~

Cd! <) 1

~6~6i32

~

ll64114

~lS6

02~J3

1111!Hi~

"167

lil2o.34

Cl{Hl

~25.)~

!dId9
1:l191-:1

~j2~J6

030"'~

SH42
S8.:1.3

STA S841
JSB

JI'IP 5731

JSH 59"'2
JHP 5721
I. lJ R ,.." S K·~

1

/lr-;L

1

11645'.1

L[)4

S8~J

idHt>72J

'?2t.J7 "-l7fJ'541

elF ,H3R
10k 1
SlA 560($1

el<11

~2~4'"

lSi. 5843

-, 11);.2

0193

t12;.J41 kJ2b525
1:12 ;, 4 2 VI 2 C5 47

~1'J4

102:)-13 064176

0195
(i 190
tIl y 7

~2~4tl

~lqa

1

"'J4~b3

02112
(j~~j3

~2b~4

{121C1 4
\1205

t}2~!.)5

0.3b2~6

iil255f1

~2t>5bl3

"2~!

:a

~21iJ1

t'I~0e

~2t'l61

£1209
e210
[1211

kJ~~62

02!lb3 060505
02'>04

07t.1"'~5

~2.12

~12b05

~2t>57 <4

')213
(1214
£1215

02566 06"626
U2,)67 064606

ROTATE LEFT
lOR H TO A

3

RESTORE RESULTS
SEcro~ SEQ. CHA~. rIhISHEC?
~O-GEl ANOTHER CHAkACTtH
CONTINUE PARAMET~H

~73~1+4

S732

EX{l FLAG 10 B

S/':!2

J MP S 13~) -+ 4

~O-GET

ANUTHER

JMr 5727

OUTPuT

ERRG~

LL/I
5TA
1St
t.DA
STA
lSi

S8.d1

SlART)NG StC10~ hDUN[~S TO A
P0T Ih ~RITE SECTCH A~~AY
INCH. ARRAY ADL~~SS
NO. OF CONSECUTIVE SECIORS

~AwS13,1

PUT

S8·Hi
14A't/Si:l,1
~A""SR

JMP *+2
JMP

IN

~RlTE

C~Ak.

:'1ESS,! •..;E.

SEClOR

5733

lDH SEXT

EXIT fLAG TO B

13001111

SU?,RSS

EXIT

~2b4.)3

JMP S7~3
lDA I\AwSH
STA lAwSH
JMP ~RITE.

GET ANOTHEH SECTUR

S7·~3

l UA

luB
JSB

"2~7e

114Hl2
02071 at2001

ST.

t-lT 01

02b4~6

~2f'173

126574

S6i0

02~74

0ki0000

~RITt:.

e22.d

0221

(J2:575 064123
~2:)76 0601167

LDtI DHAD/-<
l DA ,..ASK1

0222
l1223

02;>77 C.H3002
02M'0 0300~ 1

AND

~R2

10k

1

JHP $721

JMP
"Of->

~HITE

AODR.

OF

Pfo:lt~T

PAHE~.

IjtJFFEk

QUTPur EkQOR MESSAGE
TURN SW.15 OFF IF UN
GET NF~ SECT. PARtM.

1028,1

~2572

FLAG"1?

LAST BUFFER AD~R.+1
PERFOR~ WRITE OPERATIO~
NO. OF CHAt-<.=Jl3

CHA26
lAD26

"217
(i21 B
10219

'~~AY

INCR. ARRAY ADDRESS
85 ~N1RIES IN SECTOR WRITE BUFF.
NO
YES

I'tAwSli
ISl S864

t12::>~7

J26566
02:'60 1064176

7 T(l Ii
REfAJ"i A~j"A2
~ARTIAl.TOB

Sl~,t- :12652ti
ii.l2::>46 U265L12
~2~47 0btJ'54M
02'50C 17~5tt·5
02b~) 1 034::;05
102552 06~541
~2t>j3 17J5f'5

0199

CLEAR CHAR. HOLD
GET A CHAP..
IS CHAR. A HlANK7
CHECK t-.XIl FLAG
CHECK lEGALITY-~-7
GEl NEW SECT. P~~EM. FROM lTY

S9V'1

(P4 SBJ2

153b3

'-l185 . 025.52

NO-fRROR PRI~TOUT
GET 4 CHAR.
-3 TO A
RESET CH6K. COu~TEK

JMP &728
S7o~e

211~/2116

EX IT FLAG TO B
E.X IT FlAG::l(.!'?

SLh
JMP Sl'27

ro265~7

FO~

IS CHAR. A SLANK?
YES-CHECK tXIT FLAG
IS C~AR. A ... '1
YES
NO-PHI~TOUT ERROR MESSAGE

CPA 5635

02020

fJ17'5
0176
e 117

S832

JMP e,729

kt:2 b 5 ~l2

\12515 064176
v:t201h 00401"
02!J17 \12651'12

DIAG~USTJC

~RITl,1

RETLJI-H;

JUMP

11'11.). f~7 020612
162·u U:o 1-364631

10232
02.33

1I2611 £'20613
~2n 12 06"6JId

LDd

02,~4

~2013

LOA "ASKi

1777AI1 TO

U2J5
0230

~i 211 1 4

06"'1~7
0 1 30 Li; 3

~Nl'

~20

~3kHHt

~2J7

t!J2h 1 b

l12J8

"2017 0M)1\17
""2620. 01 ,~0"5

HETAJN Ab-Al~
lOR MAR AIlDRi::SS
RESTORE k~3
1777iAit TO 1\

0228

0229
~2J0

0~39

0240
"241

15

\12021

VoR7

(PB MASK6
JMP *+3
LO~

i~AS7A.

JMP *+2
f"AS6A

.. k3

1

lO~

1

~~7 3~~3

STA
l.DA

\l.RJ
"'ASKl
JrjR.d

03~ftjfljl

llMA CI-IAN. 1II 6
YES
•
II.Q..ADDR.-J

A~IJ

A[)OR."2
A

AtJ"'Al~

H£TAlr,

lOR 1

lOR "'AR

02 h 2 2 07 3 ~H1 5

~TA

It3

1d2nJtl0601\(;7

lIiA

""A~Kl

1777w/ TO A

A ~di

"R 1

kETAIN A6-A15

~1~o6

\126.Sl ~H 3'J0~'
021i40 03~HHH
U~641 1i17Jt(H1(1

lOR 1
STA t,R1

1J2~7

",2 h .t2116\1107

I.DA

102!l8

02043 "'13016

ANtl f'iR9

h'ETAP-I

lOR £lISt< AlJDKESS
RESToRE ~RQ

6249-

02~tt

"~55

0259

~~/')4d

0JQHH.ll

ti26~

0~"45

073016

0261
10262

~26-47

0263

"26 5 0 'Hl24iH'

~r<~

101-< 1

~AS!\l

~2b4

~26~1

07~6J2

lOR 1
STA ~~9
STA 10,1-<11
STA "KIA
CLA
STA ~COMP

!d265

e;!t'o2

~71c)641

5T" SCOMP

u2646 07.5041
072765

RET A I ~ A6-A itl

10k niSK ADOP.I:..SS
RE:..ST0HE WRA
L.P. DISK ADUk. TO
1011

a

DISK AO!HH:.SS

RESTURE WRl
1777l-'11t4 T(1

A

A6-A15

RE~TORF

~Rl1

RESTO~f.

wP t A

- CLEAR FLAG
CLEAR FL~G
CLEAR FLAG

~266

026tlJ

07~660

STA BUFLG

1)267

026~4

~6051c)2

llJA

0268

k12h!)5

07~:;tOJ

STA wAr.TB

RESET

~RITE

~269

~12bt>6

"60~H14

THACK BUFFtR

LDA AWSBF
STA hAwSR
lDB I'IAI'oTBrJ

RESET

~IRITf.

SECTuli IiIlFF-ER ADDR.

AViT8F

0270

02057 070505

b271

0266~

1f)4t1~3

C272

f{l2661

0345~3

lSI kAWfl:i

0273

0~b62

060503

LDA

~AriTB

0274
"275

02663 05061114
026£)4 0311632
02605 (160633
02666 0h1634
02b67 (IH'5727
0267& 00~30'"
02071 03"001

CPA

LAtJT~

ISZ

~COMP

~276

0277
0278
~279

02d0

PICKUP TRACK ADDR.
INCR. ARRAY ADUR~SS
CUHRE~T ARRAY AD~~. 10 A
lAST B~FFEH AVDR •• l?
YES-SET ~RITE CCMPLETE FLAG

1.0A 5844
J,ND ~COMIi

HETAIN A15-A14,A0-A7

~Lf,eLF

10-A~

lRACK

MASK-14~377

TO A8 ... A1J

ft6k

lOR 1

~DDR.

TRACK ADDR. TO A

PA~(

0J24

#~2

5PECJAl DDe DJSC

DIAG~OSlIC

PiCCMW

02·/'1 1

t1261'2

"'7~6J4

\12b2

~l 2i:> 7 0

16 4

~283

~2614

t-)J45~5

UiB wAWSB,l
lSI lttA"'SR

~284

02675

061t)S4~1

lDA 5845

~28,)

tl286

Hl6J4
02.b77 Id,HHH11

~2b7
~288

16289
0291d

~27U2

0345~5

1St "'A',.,51;

0211£)3

kJ()~5~'5

lt1~91

0271d4 051!:15rl5
t)27"'5 \134641

l DA i'iAWSB
CPA LAIoISH

ft2f)76

:; ~ :5

~TA
S7.~4A

FOR 2t15/2116

RESTORE weol'lw
PICkUP STARTING SECTOR ADDR.
JNCR. ARRAY ADDRESS
SECTnR MASK-1776~~

/lNT,
J OR

1'1(';01"0'1

RETAJ/Io A0-A6

1

021'00 e70tlJ4

~TA

\liCO~ti

~2

tDB

~AVjS8,I

V,

027£'17·

0~6t)~2

JMP S727

SECTOR ftDOR. TC A
kES10RE WCOMW-lk./SfCT. CO"PLE1E
PICKUP # Of CO""3E:.C~ SECTOI1S
INCR. ARRAY ADDRtSS
CURR£~T A~RAY ADDR. TO A
LAST BUFFER AUV~.+l
YES-SET SECTOR STRING COMP. FLAG
SECTOR VALUE >iIJ'l
NO-ERROR PRl~TCUl

074\:H1l!l

STU r

!:! TO A

0~1727

~297

02710
{(I2711
02712

ij2~8

02713

~4I1U:i5

AL.f,ALF
RAR,IHR
~DA leSB

~;299

~2114

t'1ULTIPLY i:1Y 64
ADD 1ST AVAIL. LeeK. VALUE

0Ci,HHl4

l1;HH:l
t3271t>
OSk.il . 02716
ilJ02
ItJ 2 7 17
0303
"'272J

0401"6

0292
029,,'
~291
\1Gg~

\12<.1b

(i 3: l\ 4

, vJ 1 1 6 4 5 J :;

02706

lSI SCUMP

\HH)td~3

~ZB,f2
"1 ~ '0.3

0.51001

~6~635

0J~~~

U1260Q1

S7·~9A

I'i" 1
,..Ri
~ ..,:.'

elF e
l D.~ ~CGMW
(·1 A

e

H.P.

STARTING ADDRESS-BIT

2'S COMPL.-wORD (DUN'
~CR ADDR. #2/3

03\1k13 100700
k13i:H~4

061t'lf),S6

~J56

\:'J3v.1lb

1\1~6L111

~f(.t

"'h~

lDA ... DIR
eTA It
STC"

",FH

luA I'>OCrljT
eTA v

0J'~M~

H127(!0

~31j8

~JtJ07

Vi61b,,37

~.':.s., ~

~}.j'11 VI

U'26~'"

0360

1!l3illl

lfJ.37i1~

"~I

sTC ",e

~361

0Jd12 1027~0
1..1 J vJ 1:3 1 ~ 2 11.1 ~
10 J ~n 4 (/) 0 2 4 tlid

)l,H

sTC

~

~TF

~

~302

r13b3
vJ 36 4

0;;65

TURN-OFF INTERRUPT SYS1EM
TRACK/SECTOR ADDRESS
L.P. nISK ADURtSS

LOA i-Ur'Aw
eTA ~
CLC e

"-354
'';$ !)b

0..357

INT. LOCN.

llA Il
ALF,ALF

0b07C!1

10Jlla~

INT. LOCN.

tll'4A

DISf( AOllR. J.tJll CLC
#6/7
#2/3,

Cl-IAN.
ADDR.

MAR

MAR AlJUR.
t; C RAn DR.

t2/3
#2/ 3

UMA CHAN. fi6/7

H.p. DISK ADDKcS~
TURN-ON INTERHUPl

(LA

\;31..11 b 1.'7 ~6b5

5TA
llA

8lJ~Lu

CLE:.Afot FLAGS
L.P. DISK ADDRESS
BUS"' B1T-l?
ERROR-SET FL.¢.J
77777 TO A

0;~~l1b

102t)'iJ~

0306

0,5U17

o ,,Hl 2 ~

002i'111
~J 3 .1 " 6 5

SLA,~SS

~1367

1'\30<1

~I J~;

IlJ 6

lUA

0,,H,<;i

~3(tl22

~02~H16

INA,SlA

":~7l1

03[{)23 027~22
1:13024 1 VJ:l51'11
03025 €01323
It)J(12e 00 13~0

JMP *-1

rIME-OUT

LUC?

l. J A ~ 1
kAk,f;Af<
f

'J .s~H)

S8E5

2115/2116

A TO B
CONVERT OCTAL TO ASCI!

JSB 1028, I

CHAR. CUUi4Y-2C11
ST. ADDR. OF PRiNT RUFFER
OUTPUT ERROW MESSAGE

e~2~~3

LOA f:uFLli
SlA,J'SS

FLA(;=1?

k.l270/0

JMf:! 574!

. 03,,)60 06!:>214
"J~61

JMF-' 5883
LOA CI-1A4J
LOA IA'04J

~OR

111.11l"2

0401
04k,2

03i6n2 "'o~665

0J063

~,

4 fa 3

1Il3~64

"4~14

O:Whb

06~7

Hi

LDA

C~A28

CH AR.

~405

tjj0b6

~)64666

JAl128

ST~

04'~0

0J~t67

114 hl2

tOB
J SH

1 t,29, I

~4"17

0J~'7~

C LoA
STA

~l;FLG

t360641

LOA

seQ!>!p

002~03

SlA,t1SS

F LAG>~1?

JMP S734A

NO - CON TIN i j ESE CTO k PRO CES SIN b
YES
CU.. AR FLAG
TRACK ~RITE CO~PlETE FLAG

0o\!;8

002400
II1J:17 1 1070065

0411&

IOJi!J7~
03~73

0411
"'412

kJJ~17 .. ~2b673
llJIJ75 01324110

~413

e3~76

0414
0,Q 'j

~31cq7

07to,,41
06l1b32

"3 tkH'

~(12vH~3

~.11b

lDJ HH

tiI~0'J

0417

0l66b6
IJJ102 l'024id0

041ti
i!i41 Y

0.5103 ~7~632
0J1 ~'A 00kH'J\1"J

S7.0

S70tl

eLA
5T.A

~CQM"'.

lDA hCCMP
SlA,.kSS
JMf' 5734
(LA
STA ... CO,....,

"op

ij42~

\i)3Hl~

\1<421
041.4

031M, 0013lth1
I&J1..17 01J21H 1
It'lJllr. ~21127
1/13111 \1l6l!l~31

Ud2::>
1d42o

~)3112

1il02ioil1

~J113

102b65t1

SLA"f-SS
JHP Sli1J
lD.A CHUFF
SLA,RSS
JMP 5734-2

(j427

faJ114

04~ti

tlJl!5

~b"'J75
1tJ7~J74

lDA 5829
STA S8~8

0429

1&3116 111610261

LDA 5823

~4J'1

1i17~266

~431

0311i'
0.i12l:l

.,432

~.H21

fHl 3>'1 00

etu

(j.

l J A "" 1

57;;2

STA $822
LOA 5822,1
S~22,I

ISZ 5b22
ISZ 5828
JMP 5742
JMP 5734-2

03124 1ll34J74
"31~!) "'27120
03126 "'26654

1.14J8

~Jl~7

0~0000

t\QP

1Q43'l

031311

06~ti1d6

lDA /lRTHf.

044\1

0Jl~1
~3132

~7"'5~1

5TA "AIHH

06120~

l DA

~441

041.\2
~4"43

0444
044;;'

"4.10

f863

C 0 U fJT :I 4 9

AOOR. OF PRI~T BDFfEN
OUTPUT ER~OR MES5A(;E

SECTOR STRINli

NO-G~l

NE~

CLEAt< FLAG
JUMP RETURN
Sw.

RE.G.

TO

a IT

BIT 1 TO
bIT lD1?

RESTORt

wORD

HESET AQRAY ADOR.
-6e> TO A
TO

PIT

lb-fO?

0J13t (0127142
0J137 k'6~1 32

JMP

lDA CI1A31o'J

0J14~

lDB

foJ142

~26~200

04b0
ki451

0J143

~70111

0J14A t1153~0

lAD3J

LDA S8tt5

!iTA

wORt<. I NG
To

A

5744

JSB h12B,1

57.4

SUFFER

(fliCk. ADIlR.
64 WORDS FJNISHFD1
LOOP
hR1TE COMPL. PAllEHN
BEGINNING OF READ PROCESSCR

kEG.

~449

P~TTERN

SECTO~ BUFfER ADDR.
HESEl
PICJ(UP WOIHt
COt1?L. wo~n

Sloti.

03141 1141k:.2

{I)

... 64 RESE.T

.. 65

064722

A

NO-WRIlE SAME
YES

l IA

1/'447
0446·

THACK VALUE

YES

STA Sdt-2

5SA

FLAG

"LAG>'~?

tl31J3 1J712ki4
03134 If125~1
~3135 002020

e1

LO~PLETE

S8~4

Jsa 5900

NC. OF CIi"~.1I13.

51. AUPA. OF PRI~T sufFER
uuTPUT MESSAGE
CtiAR. COIJNT::72
tEl~P

I~PUT

C4LL INPUT

CHA~.

LEhGT~

SU8ROUTl~E

PAG[

~J~7

#O~

~PtclAl

DOC DISC DIAGhOSTIC FOR 2115/211b

Cc.52

IJJ140

~40;?:c!6

~DA

~4~3

~

Id ~ ~ I/l(! ~,

S SA

tl454
k14~~

ij,H<17 "'2715~
0-'150 06U445

~456

t:lJl~l

3 l 46

J~p

ADD -73 TO CHAR. CUUNT
POS.=ERROR
NO ERROR

57.:15

r. HAR.

LUA lhA21
lDtl JAU21

~64421

1~

5816

t~ 4 ~l

\:)3

2

JSI-1

1~28,1

~4~8

IJjl~3

l"'.!i.H~l

I-Ll

~1

~4~9

03154

~211J0

~460

.,.5155

t:ll~Jill

0461

e,4b2

0Jl:J(i 11:,'''176
'" J 1 j7 k:127 11 3

~4o;S

fdJ16(!

464

~.a65

15 ?

1 14

511.5

..iMP 5743+1
JS~ 59,",1
CPA S8:l2
JI"P

~146

CO UIn 10137

Hl. ADLR. O~ PRt~T RUFFER
OUTPUT MESSAGt:
lUHN SW. 15 OFF lf ON
GET NE~ TRACK PA"EH. FHO~ TTl
GEl

A

C~.AR.

IS CHAR. A HLAhK1

0!:i~477

CPA 51)33

~3161

~27113

~J 16~

USI-J51c11J

JMr- 571'1(::
CPA SS!;;4

~46b

~Jlb3

i:l2714~

JMP 5744

~467

0.3164
0Jt65

U'"j0~12

CPA 5836
J.t.-:P S1a7

YES-CHECK EXIT FLAG
IS CHA~. A CuM~A7
YES-CHECK fxtT FLAG
IS CHAR. A SLAS~?
PROCfSS CONTINUATIOh
IS CHAI'<. A r ?
YES.PHOCES& PARA~lrER

1b6!t1445
IUJ167 li64514

LDA fHA21

C1-44R. CCUNT=,-U

0411
li47:?

\1J17~

1141~2

OllTPl'T 11ESSAGE

Vl317 1

0<173

~J172

H.l 2'il I.!' 1
0271Jii1

JS8 H128,1
toLl £1

JMP 5143+1

111474

1!l •.H7.,3

k:l641/6

GET NEw ThAC~ PAR~~.
rXlT FLAG TO t3

~47tl

"JJ174
0J170

01:.~6Ull

SL~,hSS

E).lT fLAG=l?

\1~71b5

Jf"'P S745
lD~ ,A IH tH'

!'to

k~

,"1468
'-3469

047tj

41476·

~,72(1!2

~Jlt)6

(11') t-t 51(, 6

~47a

U j l/ii
'tlJ177

114/1.)

"J2~h~

02b~42

~4t1~l

ibJ2.Jl ~27.H3
o J 211 2 \.16 ~ b ¥.i 2
~j2G3 lO70Ml3

f/!t:Io17

t:\ 0 \:.1 1
16I'Hti 2
IO~~"'J

Ii! .10 4
~

ej;':;J~

~~0tl

f."'J ~ 7
(:h1 V; 8
~1t09

0~'

113
0>:111
o i~ 12
01t13

S7t6

IJ~OtH'J7

IdJi04 et,240Wi
IIlJ205 1i}711':>40

0\15

lOH

571.'

5 T:

Sf:.XT

fl.AKTS
14

JMP

~755-3

D~

ANY

5842

STA S843

IF

~

IJ F F E 11

ON
F~OM

TTY

£~n

0J245 027~34

JMP

S75~

012137

fdJ~4b

~6ld61:12

LDA

5842

(1)036
01tJ3l)

. "J~41

0706YJ3

th)J2
0\IJ33
1tl034

e~4~

S7!H
St!35
5752
S74Q
LDA 5Exr
SLrl
57419

5TA 584.5

0320P 01324"0

CLA

03251 1.:17"541

STA S841

1d37.5~ \11b341

JSf.4 5901

0i1l42

0:i2~3

05~476

e~4..s

0J.l~4

CPA Sd~2
JI'1PS753

\h144

03~55

!1272}0
"1b363

0~45

0J256 1ri27130

Jf1P 5743+1

\:hl) 4 6

I6J257

~JC>4114

IIlb47

fdJ26~

OJftJ~~l

lDH t-J1SK2
ANl.l 1

~(148

011149

032(;1 dt:>4:-;41
03262 0"~723

0~~i:l

0.3263 0 ..hhi01

lD;; 5'.1.11
ftLf',FlRR
10k 1

0i)!;) 1 . 0·' 2 6 4 011d 5 4 1

STA 5841

0"41

J$R 59.-12

~j2bt>

0346\1;3
dJi:!oe ~272~~

152 5b4,3

~0tlJ

0ki54

I1j~1')7·0~12}4

Jp;,p S7~2+4
JMP &754

uu::>~

~:i~7~ 064176
"S;2/1 r,HH?f411
iii J;2 1 2 ~~ 2 7 2.02

\.H.H:>:C!

0;,;·j6
'H1~7

lDB SEXl

YES-CHECK EXIT FLAG
IS ChAR. A - 1

yes

NO-PRINTOUT ikROR MESSAGt
EX IT fLAG lOS

EXIT FLAG-01
~Q-~R~nR PRINTcur
GET A CHA~.
-3 TO A
H£SET CHAR. COUNTER

CLE.611 CHAN. HOLD
GET ,. CHA~.
IS CHA~. A BLA~K?
CfJECI', EXIT FLAG

CHECK L£GALI1Y·~·7
GET NEw T~ACK PAhEH.
7 rc B

1Qt-C

~

4

~LH,,,SS

F.:XlT FLAG:.!?
",0-(;£ T ANnT Hf:KCMA1<'.

liUTPuT
SE Q. t;

0~~~8

k1,J~7~~

~127227

Jt-.f Sld9

0J~7.4

0Mi541

t1~H)YI

0J~75

(103f1~4

lOA Sij41
CMAr INA

(lhJb 1

0Jl/lJ 070541

STA 5641

HLUC~

~lIto2

b3277

t

S84~

ST.

~Af4
. 08t,5

ft)

kt.S10RE RESUI.TS
(RACK SEQ. CHAW. F1NtS~101
~O-Gfl A~UTHEH ChAkACfER
CONTI~UE PARAMETER
lXIT FLAG TI) t.i

JMP S752+4

{JA

10.53";\6 1705b7

~TA

!!JS:S~t

lSI itoIARTB

ER!~Oi~

fooESS!H:>t

2,5 CO""'PL.
S~g.

1 RAe I(

FOR
A fJ fl R.

rR&CKS
G F tH 0 C K

IN~

lh.1bo

~J3f)3

IOJ~2C14

STORE lR~CK ADDRtSS
JhCR. ARRAY ADDRESS
JNCH. THACK ADDRtSS

lSI 5862

i;k)o7

b4 AI.JUR. EtvlEREfl

16330" 027306

0l'!68

0.$3J~

JMP .+2
JMP 5755

iii 0
YE S

0~lt, 9
0\':'7':l

0J311:10 "34!)41
03307 0;21JV\\i
\::tJJ10 1d64170
1/l3Jl1 00~fdl1
113.$312 fl27105

JSZ 5841

J~CR. ~ OF THACKS
NOT FJr~St'l£O

lD~

06~1507

STA

LART~

JMP

5756

0~l7

1
0072
0\')7 J
16 ..-,"74
'=1075

1 V,345~ 7
"'33t.'12 1c"'~~(04

"J-S 13

\J21J16

~076

oJ S14 ~ 7 hH 6
0J315 ':)27323

0~77

10331 () ~6 hJ37
fij6~·,";C~

JHP S7"4+-'
SE.~l

E XlT FLAG

TU 8

SlB,F22 0271J0

JMP 5743+1

GET

1~26,1

0082

0J3l3 06"b.10

LilA AkSBf

0fo83

163324 070011
IOJJ~5 06121C7
03326 0712~6

STA

t'iMi$ti

l[lA

5865

0tl84
0u8!J

T1,

RETAIN Ae-A2
PARTIAL 10 e
ROTATE LEf'T 3

~ebV

1J6ltJ540

FHO~

STA 5864

ST.

AlH1R.

NE~

PAR~~ETERS

Of PRtNTBUFfER
IF UN

TRACK PAREM. FHOM Try

~E5ET ARRA, AD[M~SS
.. 85 TO A
~ESET WORklNG COUNTER

~AG~

~~~9

#~3

SPECIAL UDe DISC DIAGhOSTIC fOR 2115/211b

o S ., ? 7 1 " 2 ~ '" 1

LIA el

Sill. HEG. Tn A

SSA

1311

~088

002020
\dj3Jl 1c'27;'3?

JMP 5757

(0.)SI

~J3J2

\161~oVl

lUA CHAJ3

NO",PR INPuT
NO. OF CHA~.=14

'" ~\ 9 ~\

0JJ.3J

\16~1!.l4Vl

LDS

4' \1 tI f-;
\1.107

~\{;

'; t

., ~{.FI2
t; i~ 9;'
10 \j 9 4

~3J.j1,j

U,3JJ4114H'2
~JJ3~

MbO~~0

033Jb

(j7~177

s7t7

lAD33

JSI:3 102B,1
LOA S FH~ 5
STA S6~:'4
JSB 5900

15=1!l1

PRl~T

ST. ADDR. OF

CHAt(. COUNT-72
SETUP INPUl ~HAR. L£NGfH
CALL Ii\!PUT SU8HouTlNE
AOD -13 TO CHAk. COUNT
POS •• ERRU~

oI.;i (j ")

~JJ:37

01::>3"'0

1u334{;

H 41.'12 26

ABA S816

~01J!J

~Jj41

0id2i.1~0·

~'~97
0\148

~.3:.5

kl3 ~~ 4 ~~ " b ~ 4 4 5

SSA
JMP 5758
LDA CHA21

CHAR. COUNT=J7
ST.

-'12 02 7 J'~~'

~~FFER

OUTPUT M[SSA.GE

litO ERRCR

~H99·

~.334.1

~644~1

lOH

k1) lIh1
fJ 11,l 1

~jJ4tl

114U,2

JS& 11J2B,1

~JS46

lG:.:!"HH

rLT t!1

T UHN t5 \Ol

".il~Q

~3j47

027323

JMP S756

GET NEW SECT. PAkEM. FWOM TTv
GET p. CHArt.
IS CHA~. A HLA~~1
YES-CHEC~ EXIT FLAG

k; ltd

~JJ,~

~1~141

''1 ~j 4
o HJ:>

o j ,S ') 1

051:1 4

~:LS:i2

~1\106

&:;]3'13
0JS:i4

S7ea

lAD21

~9(l11

OF PRINf 811Fff.R
MESSM;E
1~) 0 F f
It- (1 "l

A[lDR.

OUTPUT tAHOR
•

JSb
CP,4

S8J2

~27S66

J rH'

~

"~1t1417

CPA Sd33

IS

1~27J06

JMP

YES-c~ECK

A CGM~A1
EXIT FlA~

0..5..5:;5

050~~~

CPA Slj34

IS l;HAR.

A SLAS ... ·/

((\J3':>6

0273J~.

Jr1P

~ J .5 j 7 "" ~ Itl 5 1 ;3
1,"53!')\-; '/)27372

CPA

58~7

IS CI..jA'<.

~

JMP

&7tv.

t..1JS(lt

I,

~l1J

033h;! U64!.i14

k',114
lJ 11 :)

~3J63

riJ36A

~;ll()

~,~31)t'l

YES-PM0CESS PARAMEltH
CHAH. COli~T"'.57
ST. AODR. OF PRI~T dUFfE~
uUTPUl EkHUR ~~SSAGE
TURN SW. 1~ tiFF iF \IN
GET NE~ SECT. P~kEM. F~OM TTV

tIll 7

~J366

064176

Hi18

~J367

~hJb\>311

Sll-i,t-SS

~; 11 '"

I(1J37V

L)27J~~'

JMP

~12d

03371

"J275~0

1.112 t

~3J72

06~602

l1122
li1;C3
~~ 1 ~ 4

03,373 t1706vJ3

JMP 5768-3
LOA 51342
STA $843

klHH
1 ,18
£ 1 f:·'~

e

~

11 ~,

111
01 12

~J374

I (,

Il1bVl44:;

7'59

S7~9

S7'57

DA C ti A 21

lDB
JSB

IAD2.>
h 12h,1

1l120~q

rLT

~1

It);O 3:23

JMP 5756
LOti SEXT

114 H'2
~7e9

&7t~

~758

CL-

W02411H.I

t..1,sJ75 01\.1540

STA 5640

fl12tl
l!126

~.D7n

JSH

~121

~jl~0~

"H2Ci

0J4~1

027414
01t>36;5

~-:9

~3402

~2732J

£1 1.

fllt>J41

bJJ77 W5'j476

S9~H

(PA 5832
JMP SH.,t
JS£l S9v.2

JMP 5/56

C~AR~

PROCfSS

CONT1NUA1IU~

EXIT FLAG

A 5?

TO B

EXIT FLAG'"'!?
HO ;
YE5-JUMP Tn REA~

UPERATIO~

-3 TO A

HESET CHAR.

COL~TER

CLEAR CHAR. HOLD
GEl A CHAR.
IS CHAP. A BLA~K1
CHf:.Ci< EXIT FLAG
CHECK LEGALITY-0-7
GET NE~ SECT. PAREM.
7 TO i:i
RETAIl'i Po0-A2
PARTtAL TO 8
ROTATE LEfT 3
lOR b TO A

F~OM

~~Jb

\/I J 4 \., 3 ttl 0 4 11 4

l.OB t'ASK2

~'

131
132
~ 1 J,3
01"H

0J4~4

010t1111

~"i

liJAt~b

[J64~40

03/1\16

00J;)7~3

1i134U7

~3kl,'ltll

AND 1
lD8 5840
el,..F,FcBR
lOR 1

iH35
0}36

Ic}J41~

071.154",

STA

\:13411

0346~3

V,137
k'138

03417 ~27Ji'6
li J 4 1 3 '12 7 4 2 4
el414 ~64176
\1J415 0\H"''l1

lSI 5843
JMt' ~76iH4

Sf:.CTOR AD~R. FINISHED?
NO-GET ANOTHER CHARACTER

JMP 576.5

JMP Slf,0+A

C{)NT I Nt E PARMH: fER
I:)([T FLAG TO B
E.XIT FlAG-1
1'-40-GET L\ t,;t'iAR.

LDI> CMA31

CHAr.. rOl!NT-25

~i39
1(1:4 \(l

1·.1

OJ41t'

lil-12

~J417

Q

~27J76
~61015

~7tl

lDB SEXl
~U~,

S7t2

S!:S~0

h:; S·

HESTORE RESuLTS

lTY

PAGE eaJB #03

SPECIAL UDe DISC

DIAG~OSlIC

FUR 2115/2116

.
0143

0342'-1

~64777

~144

03421

11411a2

014::>
1114b

0J42?

102~Hll

0147
~14<'

"'149
fi 1 ~0
l1I51

1': 1 ~2

LIlt; IAD31
JS8 1028,1
"'LT 161

0J42~

\1'27323
\1J424 Vl15j4t
t;j425 0bJ4/6
~ J 4 2 to ~l 2 7 t1 ~ 2

JMf-' S756

!,;7tJ

JS8

S9~q

CPA S832
JHP 5764

0J127 1O!:)V'b01
10 J a .J L'J ~., 2 7 d 36

CPA S835
JMP S765
~LH

EXIT FLAG .. Ql?

JMP S76'l

NO-ERReR PRII\tTOUT
GET A CHAR.
.. 3 TO A
RESET CHAR. COUNTER

1ol154

03433

"-'155

03434 oti27c11,

01~6

l::J4J~

"'27424

JMP S763

t-'157
U158
lcllblJ

t>J4.36 06\:161(2
103437 1.17061('3
~Jr.40

~0j(400

010\1

\13441

"'1 b 1

(l.~442

k'l71i\541
01b341

~162

flJ443

~:'->041o

LOA 58&2
~TA S84J
tLA
STA 5841
JSH S9ltll
CPA &ijJ~

1-;103

~

'" t! ,. 4 tH}

JMJ.J 5766

~164

~344ti

\:j

1 () ~

0160
0167
0168

:3 4 4 d

i!llbJtl3
k'l j 4 46 "J 27 ;S ~ 3
(-\30447 \1641.14
I:) J.1 ::;r1 I(} 1 ~tHll
~

J

11 ::.

~)34!J2

ft)~~J;.!J

i"109
[')1 7 !;
v.171

ij

~J~j4

"i'~5<11

~,

~3·155

t134t,!/I3

")J4~6

~~744~

172
t'llJ

\iljtloQ;

,,64176

~:ll

~~H61

0~6dll

76

0177

J/IlP

~7~6

tOI-/

",7"b4

~)457

v17~

S9~',2

eLf,fd;~

J 4 5 3 (1.3 kHH? 1

\::174

JS8

lUG r-ASK2
"/liP t
LOM S841

1 064 (j4 1

57E6

A -1

CHAI<.

JMP 57(:'2
LDh SEA r

~J4Jl 027417
iJ343:! \1641/6

0'il4~10

IS

YES
NO-PRINTOUT ERkOR MESSAGE
EXIT FLAG TO 6

~1!:>3

S7,f 4

ST. AilDR. OF PRINT BUFFER
OUTPUT (RROR MESSAGE
tURN SW.15 OFF If' Ul\t
611 ~Ew SEeTON PARAMETER FRO~ IT
GET A CHAN.
IS CHAR. A BLANK?
YES-CHECK EXJT FLAG

1

CLEAR
A

(;ET

Ctu~.

HOLD

C!-iA~.

IS CHAR. A 8LANK?
CHE.er:

EXIT FLAG

CHECK LEG4LIIY·C-7
GET Nt~ S~CT. P6HE~. FHOM TTy
7 1[' 8
I
AP- .. A~
PARTIAL TIJ 8
I<'OTATE LEFT J
lOR 8 T') A
;.? ETA

r.

~Tf.

5,,41
ISl 5843

HI::8Tn~E

JMP 5765+4
JMP S767

NO-GET

SEQ. CHAR. FINIS~fD1
A~OTHlR CH. ArliR
CONTI~UE PARAMETER

lliP

~E)(T

RF;SUL IS

SE~TOH

t:XlT

~LAG

TO 8

5U3,RSS

t:.XtT fLAG:l11

JMP S7fl5+oi

0179

0J462li)27442
03463 ~17417
0-5464 06t:104e

k1 UHl

\1j4r.lb17ta511

'-'161

~J406

~J4e>ll

ISl

01d2
0183
b lti4
l:)!ti5

03467

kltJ~o41

~J.1711

17th:>11

LOA 5841
STA \<.ARS~,(
1St 5$64

NO-AET ANUTKlR CHA~.
UUTPUT ERROR ~EBSa~~
STARTING SECTOR ADDRESS TO A
P~T I~ READ SECTON ARRAY
INCR. AR~AY ADDWf:SS
~O. OF CONSECUTIvE SEC10W8
PUT I~ REAr SECTflR ARRAY
!~R. ARRAY ADDRESS
85 ENTRIES IN SECT0H HEAD BUfF.?

0186
0107
0188

i1J473 "'21473

J/'IP

fIIO

~'J474

JHP S768

~1713

01bARSb

0a~206
0275~;3

*+2

YES
EXIT FLAG TO B

I:>J475 004176

lD8

03476 00h011
0J477 {iJ27.3b0

SLfI,~SS

EXIT

JMP 5758
lilA io. At< S 13

GET

STA LAt02

l~

k13!:>(.l3 061071

194

S7·t 7

JMP S7t.J2
lDA ~d40

027~1~

0195

\(JJ~ta4

0b5~51

Cl1)6
"197
01Y8

~J;)~5

114102

0J.:H~6

H.i.l~rtl

0J~07

027.3;(3

~11j9

r.?JSH~

027572

SH8

S!:.XT

LOti IAflJ4
JSl1 1028, I
toll el
JMP S756

S8t5

Jt-:P

S7~9-2

FLAG la 11
ANOTH~R

S~CTOR

RE4D PAREM.

ouTPUT Elmo~ MESSAGE
T\J~N 51'1.15 OF~ IF UN

6[T NEW SEeTeR PARE~. FR~" TlY
bYPASS READ PAkAMETERS

~AGE

U~Jl

#03

5PEC1AL ODC DISC

l;2~~

~3~11

125260

ki21(11
kl2 ~12

~J::>12

~hHH10~

"'3':>13 06414:!3

~2103

IOJ~ll1

L"6~1~7

JMP kEAUI,1
"OP
LOB [;MAU~
LOA t'ASKl
AND ~V~

v.;l~4

~:ihl~

i31J716

"'?0:,

~Jjlb.

03{HI~1

~2~6

"'3~17
"'J~20

;"'73716
~b01~7

kl3')~1

(:)13725

0:.2~Y

0Jtl22

~JElf601

0~1!.:J

"-l J :J 2 .,

07372 5

STA hD7

0211
wI 212:

lUJ~)24

~5i1t:27

CPS

liLS':>25 (127530

~213

~3~2fl

U214

~1.5J27

0~vJ]
~2t18

.

JOR 1
STA RD2
LOA "'ASK!

.'>lll R07
lOR 1

l1J~Jra

ki2l b

113'"1] 1 itlbk'l

0217

IdJ:JJ2 ki13717

C21tl

Ii;JjJ3 lU3~~01

"21~

~ASl(b

JMP *+3
Lilt; ~AS7A

0640"31
021531
I1CJ4630

ll215

DIAG~OSTIC

Jl~P

H!7

FOR 2t15/211b

RETURN JUMP
INiJ.

RETURN

UMA OCTAL ADDR. TO B
11770e TO A
RETAIN A6 .. A15
lOR D'-IA ADORfSS
RESTORE Rll2
1777"V, TO A

RETAIN Afl-Alo
lOR fJf'lA ADDI3.4 Q73717
lOJ:.>J5 ~jbtI)1~7
163::>36 ~lJ721

k12£2:

1'3~37

0:'HHHll

lOR 1

~ot!23

~J'::t4t:J

103721

224
U225

~1.);:)41

U7J7~4

Sf A Rli4
STA Plio

i£)j:J42

klo~)hl7

LDA

f'lASKl

kESTORE RfJb
177t11(1 TO A

~220

~i J :.l 4 3

'·1 1 J 7 ~ 2

~Nn

IocD5

~tTArN

e;(27
\:: 22
~14! ~ 6
VJ2:57
1J238

1:13')':)2

022~

~J

1

/lND "U4

1

lOR 1

/J737~6

STA

fd18

~ESH)fH

HOII

Ab-Al~

lOR weRA 11 DR r. S S

-

1777f1o~

Rib
TO

A

lOR nISK .\DDf.;:ESS
RES TOkE R D6

~J~S3

0ri6\J~l4

IN8

~J55~

06011(17

LDA t:ASKl

L.P.DISK ADOR. T0
17770i!> TO A

wJ~5~

~13714

~NLI

HETAIN A6-A15

l:JJ5b6 \()31O~~1
tiJ~:;7 1<.173714

ROt

1;.1239

w:1J~o~J

~601V17

lOR 1
STA RU1
\.DA "'ASK1

02411

163001

013732

ANtJ

~241

~1.3062

i13{iHH'i 1

lOR 1
STA kO~

RESTORE R[11
1777~H TO A
RETAIN A6"A15
lOx DISI< AD:JRESS
RESTORE RU9
RE:;TOFIE
kESTrJRE

'~2 4 2
0243
0244
0245
1cJ24b

111247
1)2<'18
~l49

02!)H
0251

kiJ~

"13~63

0737 J2

Ir:\J-:)04

1073755

1d3!>65

07J7~1

STA f\ull
STA kUlA

~J:5i)o

0~24~0

[LA

~J~67

~7

'-COMP

Ht72
~Jb7U 1c17t"1641
03571 070665
~ 3 ::> 72 06 t1 ~ Ii1 6

STA SeeMI"'
STA BUFLl:i

lull

~RTBF

.:n51~

STA

\'tAWT"

~TA

07w)~07

02~2

"3:'74 0o~510
tI J ;) 7 5 0 7 (15 1 1

e~~3

k>.]576

02~4

t!2b5

03577 034507
036J0 06"~07

02!:16

"JM11 051016

164~l17

SH9

10k DISK

~

ADfJRt.SS

RJ..111
RIJ1A

CLEA~ FLAG
CLE.AR FLAG
CLEAk FLAG

RESET READ TkACK BUrrEH ADOR •

lOlA ARS8F
STA

\l(A~Sb

L{JfI \!oAf/18,t
lSI V.ART~

LDA wARTd
CPA LARTB

R~SfT READ SECTO~ BUFFER
PlCK PRACK ADUR.
IHCR. ARRAY AD~RESS
CU~RE~T A~RAY AVDR. TO A
LAST HUFFER ADCR.+t?

ADD~.

PAG~

~~J2

#~J

bPECIAL UDe DISC

DIAG~OSTIC

FOR 2115/211b

0207

03u02 0301.172

151 fi-1
NO-ERROx PKINT(,IJ

£1 J 6 :3 7
icLJo4ij 0J 1727

~ T~

H TO A

1tJ~1.<7

t:l28B
412(19

03')41

~~

toJt)42

1.14~U15

~DA

u2~0

~3b43

0j{)JI6~4

r.M~,Ii\jA

0291
"292

IdJ04.d

104~)

1 f.l6

A(JA

03045

fcH'2~12~

SSA

\.1293

03046 w27665

0294

fOJA.t7 "74!ll~0
laJOt)(1 1301727

0270
~2JY

"..!
d \f~
C)
~61

Co!!82

1I2 'J 5

t.l J 6 2 7 \17 1.~ 1 :3
lo4jl1

fTA

0£l96

IOJ651

0297

hc.;eMt<

LDH i'lAQSr'o,1

l03631i'
k1JtJJl

ISl

~Ato(St'l

tGA

y,l\~St3

CPA LA"bt1
lSI 5COMF'
(-l

ALF,ALF

1 ~~'.,3

i.;Af-<,w.4H

sne

0U13~3

lJ56
It16B

5U!HR. LUi'>t::R FROI" UPPER

EXCEEDS MEM.

2'3 COMPL. OF TOTAL wORD
~ 0 R 1) C 0 U I'd K E A JJ Y

"'A~

03:.-,11

V3b:.>o

~3e11j,j!)

lOR

1"'5B

U;)~j2

~

0711

STA

~DIR

Vi ..il(J J

\1Jtl6'" 0070114
0J061 075102

(,MB,INB
~TB

SECTC

fdJ05
~ 3.00

(6Jo6~

061c:11~5

o3 b 6 3

LDA

1~5B

Itl 7 rJ 6 4 3

7

~30b4

Y.l27672

STA 5848
JMP 5772

GOOD MEM.

LE~G1H

FIT

COU~T

(LA, INA

~~4

HIT15=1
lOR START ADDR. OF AVAIL. MEM.
RETAIN

ST. OF AVAILABLE

l. VA

('!·u,,~7

IaJ666 "'64644

LDB

IHI27

".510
0311
0312

03667

114102

JSB 1l:128,1

I6Jo71t'

lla2~Ht11

... L 1 f 1

TURN SW.

JMP

bET

'f:J7,}2

LDA 5829

~EM.

CONTINuE

0.5665 la616662

1743,1

II

UF SEC1GRS

#

0~n9

5771

ST .. A01.!t<. iH:AD't
OF S[('TI)R:'

(tUTPUT HP1
2'~ COMF't.

GJ~B

l1313

VALUE

f"IULTIPLY flY tl4

001J0~

klJ67l 120174
"'3072 06VJ:S75

L~CN.

~AR,RAR

to.J:lb5

~jJ0

ADD 'SI AVAIL.
2'5 CDMI-'L.

t.MA,lNA
STA "DeNT

~2~Y

031.:~4

Y ti 4

EHRUH-RUFF~

0300

jb!>7

t~

'6771
ST8 f
ALF,ALF

JMP

1031');)2 0030e4
r>3bo3 tOi''-~637
~J654 0iJ24k:4

0;t93

MUL T J PLY

CI-'AR. COl.'NT::t32
~T. AODR. UF PRI~T
OlJThlT
NE~

fRROR

\5

au~FEH

MESSAGE
OfF IF OM

kEAD PARAMETERS

1777r;.{; TO

A

P~GE

~,;:, 1 4
IJ ~\ 1 '5
r :~ 1 6

0A3J

#~J

oS," 07 3

~J1)74
'{J

J 6 7 5'

I~

,3 t., 7 6

SPECiAL Due DISC

(-; 1 fa 6 .3 5
;v30122

17

\J.3

lt~

~Jl>77

~7IcH'~6

J 19

0.37v.!~

~7~:HH~7

~ji~

k~ 321
0322
~l,~ 2 J

0.57.11 1~~~1Ol('J
IOJh:'2 0k)1127
~ .:s 7 ;'3 3 0 ~ 2 ~~ :2 Iil

\lUMA;t/

lOR fA[lfd

~ 7 \,J 0 J 5
l1 6 1 i!J 1 4

i;~
\:~

AND

UIAG~OSTIC

~TA

\IIUMA,..

LuI.

S~~~

STA 6
ETA 7
h 1: 1 A

l 1A

e

2115/211~

FOR

RETAINA6-A.15
lOR H.P. DISK ADDR.
RESTORE Wnl',Aw
RET URN J U ~1 P

INT. LOCN.
INT. LOCN.
INPUT STAfUS

~LF,ALF

HtT

'7

SSA

Jill

15=01

eJ~4

d37tl4 027712
..; j 7 J!> '" M\ 7 2 1

JMP ~773
lDA CHA29

NO. OF CH,AR. =14

k1J25

~Ji'(l6.

t1b4111

ST.

~J707

1141102

LD8
JS8

IAD2Y

0326
0J27

1~211,t

OUTPUT MESSAGE

0J71~

lk)2~i/Jl

rLT el

~328

\1J711

~277"'1

JI'IP

~329

'-13/12

103hH}

0.53t1

0J713

\161~/3

1

~J32

7 1 <'I H} 2 61il ~
't3J715 06rl635

~;j33

~371~

~1,~;)

~j

S77J
k[;l

tt01A

eLF e
LOA RCOtH~
eTA It.
LOA VI OM A.'I

TO

BIT

15

DISC NCT READY
ADDR.

l'iAKE DISC
KETUI0

0j74~

Hl310~

0307

03746

11ti~12

~:508

03747 1031"'0

SLA
JMP ~AIT2+1
elF ~
JSti 5871,1
elF e

l~309

~J7tic;,

II A C 1

"'36;1

OJ1!51 tHH323
",3752 Oid131ti0

~;

~355

0J74.1 'i:J27747

'-1361
klJb2

102~161

'f/A}T2

PEG.

TO

A

fiAR,RAR

1~25kH)

Ji'1tJ J775,I
l I A ("

\hH1~UJ

SLA

SUPPkE:SS PRihT
INPUT STATuS
BUSY ~lT.n?

lSi BUFLl7

NO-t::kt1ftj6
I6J767 1141t12
\l371~ ~ol131

CHAR. COUNT:z12
S1. ADIH<.

~.J7b

'I6J771 {(hH222

"377

VJJ172

0378

dJ773 'J27777

~J79
~J6U

. '<'3774

oJ 7 7 5

tJJ7!61141'12
~J177
164~Hl'"

0363
O,Hs4
I'\J~5
0~66

SSA,ftSS

JMP S773H

~13~
();~ 11 (,

~:S~2

~611al

&:l02id:i 1

OUTPUT MESS~GE
STATUS Ttl A

IfAl,loiAL

0tJ2~i21

I(~J81

I 4D3~

JSI:t 1028, I
Sli3A LDA S~57

l OA

(.~A36

PAkITY BIT=ll
NO

e H A R.
ST.

JS81l12&,J

OUiPllT MEsSAt:.E

S7'Je lO.c. 813~7
SSA .. tcSS

16 4 j 7

J"/p

tl4i1"'~
~ 4 ,1 vj 3

ld6:>t-I16
11 4 1 1 3

lDH CYRe ...

lOA

5812

~NII

CAHR)+l

I773C, [

J S;.' C ld'V , 1

AUOt?

ST AT!JS

/'110

TRACK V'lUE 1U 13
OCTAL TO ASCII
377 TO A
k£lAJN ~.J. DIGIT
dLAr.." TO A8-A15
SETUP PRINT MESSA~E
ASC 11 TRACI< "ALUE:
SETUp P~J~l M~SSAGE
tO~VE~T

1/}4~ijd

!()6~2~t>

~

W1 ~ 111

0,HiY

~4

~3Y0

~4\'1")7

~LS91

u 4~) 11.'1

B 0 VJ 1 1 2

iO.392

I!' 4 .1 11

117 1 i 4 3

~lA

\:1 b 1 2 4 4

I.DA Ct1A.4A
I D~l 1.11 044
JSh 1~2t1,I
LOA t!uFLb
SZA,kSS
J"'p f,775

CHAI-l.

U3CJJ

o4 ~l 1 ~

~S1j4

tl4VJ13

tt)oO~jl

~.i 9!>

\)4~114

11411!12
060t65

0,)96

10k sase
STA t,t,544+8
lOA CARkY+2

~4JL~

~71JC

t'ES44+1.i

CU'JNT-2U

51. ADDR. UF
HUbY

~J96

~

0.:S99
tl41r.1Vi
\l :D

C:i4~9

04~)J2

LOA

S8:?9

0410
0411
1c.i41l
f"H3

04033 070314

'-l414
~415

1I14ti37 1511k10
111404'1 0~2\l01

10416

k14(1J41

$TA S828
lDA 5d23
STA $822
5777

LUA

S~22,t

C·PA CMEM,l

fi'161~3

.6PDk.

~ESET

6~FFER

l~PIJT

(;f

AUFf~H

-64

~ESET SECT. 8~FFER aPDRESb
PICKuP GOuO WO~O
COMPARE TO T£ST wORD

l077.

0423

""(ttie

lSI CSECT

VJ4f(J51

030102
12b2.U3

SECTOR COUNT
APE ALL SECTORS CCMPlETEDl

04a4

IS7, SECTe
JMtI t77b, I

~42b

04"-'52

~btc)641

0426
'-1427

04~53

"02003

04~54

12~177

lDA SCOMP
SZA,kSS
JI'tP 5858,1

l~CR.

CU~RE~T

NO
YES-SECTOJi
flAG>0?
~O-CUNTINUE

STRI~G

CO,",PLETe

FLAb

SEcTOR PROCESSING

PAG[

0~J~

#~J

SPECIAL DDe

DI~C

DIAGNUSTIC

i428

~4M~5

0024~0

£42~

~4U~6

~7~641

CLA
STA SCOMP

04J0
04Jl

040~7

~o1012

lDA

04U~~

~02e03

U4J~

~4001

12~20~

SZA,RSS
JMF S8b9,1

0433

~4~62

~024~0

(L~

040AJ H71072

~TA

8464

\-(COMP

kCOMP

'0 4 :3 5

. U 4 10 b 4

1 0;(, 5 e 1

l I A '" 1

04J~

~4~65

~01J23

f'Ai<,RAR

~4J7

~4~66

00~~10

SLt.

04.)8

~4nt)7

12~)2\(jl

J~\p

~4Jg

(14t17f1 11021tJ21

0440
~14 41

(.14:.171

F~K

2115/2116

YES
CLEAR fLAG
TRACK READ CGMPLE1E FLAG
F L Al~ > VJ?

NO - Gt: T

N E;'j Tf\ ACK
YES
CLEAR FLAG

Hlr2"~?

S8oe., I

LOOP UN

·SSA,ftSS

IHTl:::!':

JMP 5779
LDA 1805,1

~442

o4 11 1:3

17 1 1~ J

5TA S8tJll;t

CHt.CI< S~.kj
YES
BYPASS READ

0443
0444

II 4 \I 7 4

1 2 h H: 5
~ 4 t'.l 7 5 " ~) 1 2 \H'

J"1F'S8!J6.1

wETUR~

l1!T14 10 B1 T

TO

1.:i4045

11~;oJ16

0446
~447

10 4 ~! 7 7 0 2 b 1 21.1
lj41li~ 161176

k1448

1041'"'1

171U:3

5TA

i{:449

~41V'2

lH.ll(12.)1

l DA CtWFF

\r:!4Ml

(j4:'>3

0410;) "'ki21'.111
~} <1 1 ,1 ;:1 ~) 2 b 1 1 7
€I 4 t (\ 5 !O 6 ~) 3 7 5
04H16 ti17~j74

~.4!.)4

041 id7

~6H2b7

LDt. 5823

SECTo~

04'.)5

10411iiJ

~7k1.?b6

STA
LDA

RESET
PICKUP ":ORD

') 4'.)

t

~452

1 1 1 1 M~ 2 f.) 6

~4~o

~4

~4~7

1..14112

k:,~!J8

l'J411~~

V!4hY
Vl4t-0
~J 4 t> 1

04114

k1411E- 034J74
,":;4116 1r.l2bl11

0462

({I4117

~4f)J

~412'"

~~.,

64

4t5
[466
\~ 4 67
io

04122

';;)71914.

S1122
5322,1

1St SS22
1St 5828

S7E~

PHINT

JMP S119A
JMP 5856,1
CLA
STA 58"14,1
jMP S861,I
,..OP
lSZ 5999

1G412b 1O..5t>701

[S7 5999+1

~412

~0khHH'"

I\OP

1il4 1 :5 " 1 ~ 25 ~ 1

LI A

~.d131

001323

kAR,ilAk

~472

~

041J2

"li;lJ~1t)

RAt<:

IoHHH'Il0

!:LA
JMP FHINf,I

r479
0480

04t33
04134
,,41 j ~
04130
041.j7
~ 4 1 4~)
041.41

",e1727

~481

~4142

~716'3i!Jl

~T.A

1

~4b2.

~4143

0!)~4/5

l DA

5831

04n3

1r:l414123
£.16 b ~17 6
114113

LDB CHICK

1ll61::l2lJ6

LDA

~

f,.Nv CARRf+l

1~ 1 1 1

~HH

727

SAME

FA1TERN huFfER

-64 RESt.T

BUFfER ADVk.

COf'lPL. wut{fJ
I-iE5TURE I'ilWiJ

INCR. ADDK.
64 wuPOS FINiS~~Dl
NO-lflOP
kETURN

TO

""R 1 fE

PROCESSOR

NOP TO S743
JUMP 10 MA}N EXEC.
INCR. ERRUH COUNT
I~CR.

1

tJ474
k147~

d lJ f f E. R

PAn E to: to;

~ss

0473

k}476

•

NO-~~lTE

~47~

4 71

11? L

YES

V!469
v.',

C0

S8?9
S821:>

8

7

YES
BYPASS READ PARAMETERS

S7tH1-1

STA S1)22,1

12~2t.i2

.1

NO-Extl T4

JMP

IHH:l',HHJ
1J41;24 03;,71OC)
~ 4 1 2 5 ~ ~ 2 ill 1

£:j 4~)

Hrn~=t?

IDA
STA

( MA

120 U~5

~4123

PkUCfSSGR

1~

SLA,I.SS

0vLHHH)
171(1:!66
I!lJ42bt)

0li'J2400
1t;l4121 171103

PA~AM~rERS

WRIT~

f

JS!J COr-..v,I
S612

fRROR

~EG.

COU~T

OVERFLO~

TO "

HIT J 1" 0 8 I T ~j
8 I T 3=:.-n

BYPASS PRINT At"t: SIIP.~OL'TIl\E.S
CURRo TRAC~ VALGf TO J
CONVERT OCTAL TO ASCII
377

Tu

RETAr~

A
HIG~

uRrER

DIP~Gl1

ALF,ALF
1771Hlv~ TO A
kE1AfN MIDDLE fIGIT
AFj-Al"l TO Alj--A7

PAG~

0JJo #03

SP~CIAl

DDC DISC DIAGNOSTIC FOR 2115/2116
lOR 1

~486

04146 ~3~~~1
04147 071136

STA

~48i

~41S~

06~2~6

LDA S812

0488

~4151

~41~2

01U112
&01727

AND

~489

~490
~491

04153

~3~476
~71137

10k
S1A

~485

0492
U4~J

~41~d
~41~5

~ES3/.3
~ARRY+2

~Lf,ALF

~8J2
~ES37+4

(:'494

JSH CUNV,l
lDB ~832

0495
H49b

041D~
04t~1

ElF,PLF
lDA S812
_~n CARNr.1
ION 1
~ T A '" E S J 7 + 8
LOA CARHY+2
STA ~ES37+9
lDh SE~~
JSb CO~V_l
lVA CARRt+2

00~727
~6U2~6

04~7

~4lb2

010111

041~3

\:1 499

04 1 /:).tI

~~0~

~41~b

030~~1
~ 7 11 4 3
~6d112

0501
~5w2

841bb
H4167

~7114.
Y6~lVl

~~~J

~4L7~

114113

~~~4

U4171

~b~112

~4172

071152

~505
~oue.
L~07

0508
,; 5 W)
~bl~

~LANK

TO A0-A7
MESSAGE
CURR. SECTOR VALUE TO J
CONVFHT OCTAL TO ASCII
ASCl t BLArIK
A0.A7 TO A8-Al~
377 TO A
RfTAlN LOw DIGIT
~LANK TO A
SE r u p P R lIn "E S SAG t:.
bECOND HALF
SETUP PHI~T MESSAGE
GURk. ~ORD # TO ~
CO~V~HT OCTAL 10 ASCII
lO~ OkDER 01611S

SETUP

LDR CSECl

ij65077

04156 114113
041b7 0044/6

0498

SETUP PRINT MESSAGE
377 TiJ A
RE1AIN LOw DIGIT

1£14173 1642t>6
~4114 114113
~417b U60110
k:i4 11 t, P 7 116 1
04177 ~6Ul11

P~lNl

rlESSAGE

STA
lOt::

I'E:.S37+1!J

SETUP PRII'll

S822,J

JS~

CU~V,1

IlUTPuT wO~lJ 10 q
CONVlRT OCTAL TO ASCII
1ST wURD

LOA CARHY
S T A /"< f:. S J

c. + 4

SET IJ P

CARH~.l

P PIN T

Mt. S ~

A

Gt

2ND ~ORU
SETUP PRINT MESSAGE
3RD ~UHn
SETUP PRI~T ~FSSAGE

~bl1

~42U~

~711b2

LOA
ETA

~b12

042Jl

~6~112

lilA CAkHY+2

~513

042~2
1:142:'~J

~71103

STA

~£538+6

0014

165100

lDI:1

CMFM,l

INPUT

~~15

~4~04

114113
000110

JS~

tU~V/I

CONVERT OCTAL 10 ASCII
1ST U:ORO

llJA CAJIRY

1:1516

~42'-"5

'" 5 1 7
0~18
U~19

~l4 2 016

0421e 071111

e~20

~4211

~b~112

~~21

"4212

Cj22
eS23

~71172
~bl1b3

04214 060132

lDA
STA
LVA
STA
tVA
LDO

~524
~~2~
~!:i26
~~27
~j2d

M4~W7

~4213

~ES3b+5

~ TA

fll7 1 170
Ob~lLl

TL.

f'1 E S;' R + 11
CAWRY.1

S £ T U P P kIN T ~,E S S A {j E
2~D kOkD

~ESJe+12

SETUP PRINT HtSSAGf

CARRY+2

J~D

M~S3S+13

CHAJ7
lAD37

SETUP PRINT MESSAGE
~O. OF CHAR. =32
~T. ADOR. Or PRINT SUfFER

~QRD

~4~l5

114102

JSB

102~,1

PRINT MESSAGE

0421t

0~1173

CJ4l17

065154

LUA
1 OJ.;
JSB
JMP

CHA38
JADJ8
IM28,1
PHIN1,1

~O. OF CH~~. =28
ST. AIJDR. uF PRthT BUFFER

04220 114102
04221 126123

~~29*.*.*

TRACK

AODNES~

VE~IFICATION

lR,Ek

05J0

04~~2

~00~00

0~31

~4223

002400

elA

0~32

~4224

~7~171

0~3J

04225

~62475

5TA 1 UP T2
LDA CrlA4E:S

~5J4

~4226

~66474

LOU

IAD48

~535

~4227

1141~2

JS~

1~2B,I

~5J6

~42JC

0602~~.

~537

~42Jl

070177

561"5
58114

0~J8

04~32

0153~0

~539

04233
04lJA

~606~2

~42J5

0~240~

LDA
EJA
JSH
LDA
STA
tLA

0540
M541

iAiUR{J

~706~3

PRI~T MESSAGE
EXIT
SUBROUTINE .*.**

~OP

$9130

58J2
5843

CLEAR

INFO

NO. OF CHAF-'.=13
ST. ADOR. OF PhlNT 80FFE~
OUTPIJT MESSAGE
CHAR. CUUNT-72
SETUP INPUl CHAR. LENG1H
CALL INPLT SUBRO~TINE
-3 TO A
~ESET CHAR. COUNTE~

~AGt

';~42

1iJ'S43
r;544

~J.~7

#~3SPECIAl

1J423ti \l7i1540
042J7 ~1t>J41
~14

2 4ft 0t)lo4} 6
~2t>2b6

¥l545

\J4.l41

~546

\14142 \I1Hdb3

\.It>47
\1046

~

~4;':44

~J549

4 24.'

2 f, 2 2 3

DDe DISC

DIAG~USTIC

STA Sd4.,
S5tt!

JSb 5901
CPA Sij32

JMP 65d9
JS8

591.1~

2l1~/211b

FOR

CL£AR ChAK, ~GLr.
GET A CHARw
IS CHAR. A rlLA~Kl
CHECK EXIT FLAG
CHEC~ LEGALI1Y-0-7
RESTAl-?T

~64114

JMP lKVEtht
LOH I"'A!;K2

fJl ~ Ii) 0 1

.AND 1

RET A 1 ~I

~55~

kJ 4 ~ 4:,
"4240

roo4~4!1

LOB S840

PAIHIAL TO 8

Wlb!>l

,,4;47

0W)b7~J

eLF,hbl~

ROtATE LEFT

~552

~42~~

tl55-J

042:H

0·J'Hl~ 1
~7d54("

fOK 1
5TA 5840

f.(ESTf]kE RE'SULTS

FINISI-'ED?

10::

7 TO 8

6 TO

A I:! ... A 2

A

~5:)4

~4(;:=>2

0J46~J

JSl

l:1~~5

~4:?~iJ

~12b2J7

JMP S548

e5S6

0f117;C7

,4LF,ALF

{;~!)7

04?54
lo42!::>!)

001J~ll

j;AR

(1056

o 4 ~ :; 6

{) 7 ~l 1 7 1

STA TOPT?

":5~9

~L1.:!:'7

0~1727

~LF,ALF

A8-t15 TO

~~b0

04l6~

002UtdJ

SZA,kSS

VALUE.

do61
2

l142:51

02b223

JMP

l~VEIHt

(~~6

k14~62

~412~2

.AOA

Sol~

kJ~oJ

~"42tJ3

kHJLl-l ;(0

~SA

~1564

~4cb4

~2oZ/2

JMP 5549+4

11~65

042"'5

~2622J

J~IP

~:!)b6

1ll4~bf,

064176

LDU

Iii~J67

1.:14/07

~~M111

SLh,RSS

lfl:>b3·

~4l7y'

~2ti237

J~p

O~b9

W4(!71

;.)2b2~3

Vl~71J

~4j(7£'

0571

i142lJ

f1\'24~'0
~) 712 4 7

JMP If82

04 S~'tl ab~4b5
\:14.506 0V12~~4
04J07 ~70biQ5
i04J1t?o 0bltl66

LDA

5501

1t~63

0-;>84
€.585
w586
U587
l&t>68

Ob89
0SIJ0

ki591
eib92
~1593

f3594

0!l95
0596
0:)97
0598

04J11 C/ll'2~04
04."S1 2 '171...,17

INA
STA LAWSH
LOA
INA

S~£o12

srA LARSt;

104313 06\1002

LDA AwTBF

0~~01/)4

INA
STA LAWTH

1t14.Q 4

NO-GET

A~~1HER

ChA~.

TO AH-Alb
r TO A7-A 13
SA" E T f( A C K # I '" ~ I ;~,~ h Y
A0-Al
ADJllS

>

A~-A7

Iii?

/l.O-RFSTART
ADD -1'.11

pes.?

STA \\COi'1P
51A SCI)MP
~TA RCOI'IP
~ TA CIWf F
STA AI"IStH,J
STA

j

NO-Cq~fI/IIIJE

YES-PESTIdH

EXIT FLAG Tn t3
EXIT f-LAG:al?
,,: U - c n "j T J NIJ E.
YES-RESTART

CLEAw ACTIVE TPtC¥
CLEAR ~N. TR. ~LAG
CLEAH WR.

SECTC~

CLEAR qD. TR.

cnu~Tt"

FLAG

~LAG

CLEAR COMP .. PATT. ;"LA(;

5£T ~PITE SEeleR ADDRESS
SET READ $ECTOk AUORESS
~ET COhSEC. # OF SECTUkS
SET CONSEC. # CF w~lTE SECTO~S
SET CJNSEC. # OF R~_D SECTORS
LAST ADDN •• 1 OF SECTOR
SET TERMINAL AUDk.

~UfFEk

¥

LAST ADOR.+1 OF SECTuR auFFlk
SET TERMINAL ADDR.

LAST ADDH •• 1 Of TRACK
SET TER~INAL ADOH.

~UFF£R

04.515 07"'6ki4
04.)16 06kJ5l16

UlA ARTBF

04J17 002"'L!14
04"i2~ 071016

SlA LAlnt!

LAST ADDK.+1 Of TRACK BUFFER
SET TERMINAL AOOH.

LDA

JHP

kl4321 162470
172471
0432J 061247
~4322

JNA
S5~A,t

S T.A 5 ~ ~1 5, 1
l DA

S ~H' ~

l14.)l4

0~17~7

~LF,ALF

k)c4~25

\101200

J;Al

04j2ti

1705"'2

STA AnTBF,t

w~ITF.,

I TQ A

SETUP RETUWN JUMF
PICKUP TH./SECTOR
A8-A15 TO AI/J-A7

Aon~ESS

PUT THACK ENTRY IN SUFFER

PAGE.

00,~,,'

#"3

~PECIAL

lIDe DISC

DIAG~OSllC

FllR 21,lo/211t-

04j27 (.100375
0599
"0\10 , '" 4 J ~H1 0714 ;5 7 4
0tilt!
043.'\1 0b0207
tlt)U2
k'4,D2 010266

LDA 5629

-64

S lA S826

RESET hOkKING tOUkT

LOA 55"'0

L UA S823

STA Sd22

C6163

043]3

~61;'U47

k!fHt4

04~\j4

17162I'J6

0b ... ti

~4J35

STA 5822,1
JSl 5822

04J31 t:l2b~S34

Jt-IP Sti51

Ub06
'1o~7
t4b~8
UO~9

"'013
0614

i1434f. 02b:}47
i64J46 ~26J23

\1615

~434J

002MJ0

~b16

\14J~H'

17~4b7

IIIb17

U4j51 172 04 71
04JtJ2 ~71247
"43:)3 162473
04:S:i4 1712:>1

'-'It 19

14 6 ~~,
\1021
eb22

t14.~

04~'Jt'

061247

JSti

S503,I

;;RITE ONE

l DA
,.DA

S!)~0

PICKUP CIJRi1. Tft.

55~6

ST).

S5~f.1

sr.

Sb~~,

lOA
&TA

S!H~8,J
S5~19, 1

LOA

S~0("

YES
No-no ANOTHEH

1 HJ '31tl 6

PUT

11~~00

JSf;4 S51707,t

t 1
04~o2

~1b~J/~

lDA S829

kHI;l7

(14:.$63

~J7~j~H

tlo28

164.)04

~60241

S T A S 828
l lJM S5~~0

4

l~·',)~9

ld4J6~

lo51~9

0\"130

~43hh

0020~1

~'{'l31

~4.5b7

~20414

hSS
Jt-1P PROUT

IQob32

k'J4J7ft.

fb3b10~

lSI CM£M

~b33

U4JJl

1!l34314

IS l

0634
1303::;

~4~72

~26J65

~4S13

fUb1247

T(l

A 0 .. A 7

THAC"

f:.iIIlfO
H:ACK

~5e3

cpp CMEH,I

$l)28 .

Jf1P S553
~e.~4

ti4.S74 fb42472
071247

LDA S50fc1
~DA S5r6

ERHO"
INCR. INPUT ~UFFtR ADOk.
64 WORD~ FINIS~En1
00 A~UTHE~ wORD
PIC~np C~HH. lk. VALU~

ADD t TO TkAtK

STA S5e0

STURE

CPA

L.ST At)OH ••q

0639

04J76 0tliH 11
04.U7 02b4~11

0b40

044iiH~

~h41

0042

1d44tH 10251C1
044"2 0e170~

kltJ43

0440:5

~t.121d:!~

4

"'44~4

k"26321

Jt-1P 5550"2

t-IO"Loap CHECk.

U045
C646

.,44135

0~24it0

(LA

0b48
~~649

fr.b50

02b355

10PT2

JfIlP *+2
JMP 5552
LIft el

:; w.

~LF

BIT11 TO HIT IS

SSA

BIT11:11~n

Y~S-¥INlS~ED
NO-~O

~nDH.

TH~/SECT.

RE G.

ADOR.+1

COMPLETE PASS

ANUThE~

l~AC~

TO A

0440(, 1712b0
~44v.7 1712bl
1d441~ 0()2477

~TA 5507,1
5T.4 S5[19,1

CLEAN NOP'S

LLJA C HA4Y

NO. Of' Ci'"AR.a28

0.4411 k1bn416
~441~ 1141(12
U4413 12b222

LDI3 JAD4~
JSe lt12B,I
JMP lRVEf(,l
eLF,BlF

ST. AUDH. OF PHI""
O\JTPuT ME '35A(;E

14651
0652

1d4414 t!HJo727

~bti3

\14415 0002kH~

f(&L

0654

\)4416 114113
04417 fll6021i16

JSB C.ONV,1

CONVERT

LOA 5812

177

1I:6b5

1 N IWFH:.rf

RESFT -6~
PiCKUP T~./5f:.CT. P4TTEHN
COMPARE. Ttl t{ECCRf!
GOOD

04,~7~

\"647

crU~TER

Eo:

~b0!6

~\()4

lRlC~

SETUP wfTuR~ J~HP
PICKUP Tk./SECTOk ADDRtSS
" 8- At 0

k16·a4·

VAllIE

CLEAR NOP'S
CLEAR ACTIVE TRACK

AL
STA ART!.iF,I

0(>25

l~AC/I.

ADD 1 TO FR. AbD~r
STONE T~./SE~T. AnUR •• !
LAST ADDf;' .+1?

.LF,ALF

0ilJl~~'"

v,636
Ic)bJ7
ri!oJ8

1

5TA ssv.i1!

::SM:2

HESET SEcTOR ~UFFE~ ADDRESS
PICJ(IJP TR./SEC1. ~DOfl.
STOHE IN tiUFFER
IhCR. HUFFER ADDRESS
INCH. wORtJ COUt.T
tW F F El~ NO f F I f.I ISH Ell

CPA lOPT;?
JMt-> "+2
JrtP S550
CLA
STA ~5~3,1

04-.):-.)6 0tl1727

1J4J57

~t)2J

JSZ 5828

.04J41:) 110407
04..)41 061247
42 ~424} 2
kl4.S43 i'u 1247
~4 ..'44 0.501/1

~o18

S5el

e34:(b6
04336 ""34374

'0-61 ~
~"11
\1Q12

to A

PIHOT

auFfEH

U<1 T CHECI(
88 .. Bl0 Tn 801-1:17
TO A

OCT~l

TO ASCJI

PAGt

~~JY

#~J

SPECIAL vue DISC

DIAG~OSTIC

FUR 2115/211b

~t~o

~44l~

01~111

_NIl

CAR~Y+l

~6~7

64421

~70~~1

1
58,31

1774~0

tARRY+2

MIDDLE nIGIT

H~~6

b4A22 ti60475

STlt
LOA

~o59

~4423

01W112

~Nll

~6b~

~442J

U~1727

~lf·,ALF

425 III k1 ~ 7 (;' 7

fLt-;f!LF

{l Q

b1

~'4

RETAIN M.S. UIG[l
MASK

~6b2

~4426

~J~~~l

lOR

~b63

~4427

~7251'4

STA f"ES51+8

~bb4

'44J0

0602~6

LDA S8'2

0bb5

~44Jl

~1~112

AND

~b06

b4432

0~1727

~Lf,ALF

0667

~44JJ

~30476

~ob6

~44J4

~7~515

~66q

~44J5

Ib~lya

lOR SB32
STA "'£S51+9
lDP eME~,1

067~

044J6

0~~2~0

~BL

~b71

044J7

~~~7~7

On72

~444~

114113

ELf,BLF
JSh CONV,1

BB-B1t; TC 80-B7
CONVF.RT acrAL TO ASCII

~olS

~4441

0ti0~~6

lDA 5812

377

~b74

~4442

010111

e675

~4443

~7~O~1

AND CARRV+l
STA 1

R676
M677

044~4

~b~4/5

LDA SiD1

~4445

Ul~112

/-Nil

1

tARfO+2

CAR':n+~

SETUP PRINT MESSAGE
377 TO A

RETAIN LOw DIGIT
SETUP P~IfH MESS".Gt.
PICKUP ERROR TR. VALUE

10 A

RETAIN M.S. DIGIT
1774~VI

MASK

"'IOI>LE DIuIT

~67B

~4446

'H17~7

ALf,ALF

D67~

~4441

00b727

P.LF,bLF

60tHI

044~i~

"300l:l 1

~bAl

044~1

07l~2~

lOR
STA

"'ES~1+17

SETUP

~Q62

~44~2

~b~2k16

LUA

&~'2

377 TC A

~Q83

~4453

~10112

~N[!

~bh4

04404 001727

U~b~

0d4~5

~72526

0b~b

~4456

~6~5~1

~bb7

~44j7

0~b~~0

~688

U44b~

1141~2

~6H~

~44bl

062bH3

lDP IAD5~
JSB l~~B,1
LDA CHA51

0b9U
Co9l

~4462

~6b5~2

l lJ B 1 A 051

~4463

114t~2

JSA lH28,1

~692

04464

~2bJ/J

Ub9J
ObY4

~446~

~04710

~44hb

~0~4b~

~h9b

04467

~g~574

e69b
U097
0696
b69Y

~447~

e0~j73

04471

1

CAfiI1

"'4';)14
04:')15

020~4e

04016

~4"'5~3

104517

1b~2125

~452~"
'64.:)2~

04~514

"4~~2

0511101

02004~

~2il124

\".t4~~3

tUHi13

~4024

!J2oA4G

04bt!e, "2UV\40
ij 7 \)9

194:;.)26

~~iIt~4d

~4';J<'7

047117 .

~£~48

ASC 8,NO. OF TRACKS?

~ES5~

~SC

l14~"Ht

,,)2/!J40
lI.I4tlJ 1 k.l47::)\lJo

lii4bJ2

:d2tll~4

~o!4·).j;S

~1511\Jl

"'4:>.54 U41b13
k140~b

lj7!1d

k:;blA40

ID4:>J6 ~37440
104037 052122

idA ;:JAk'1 ta 4kJ5~; J
10 45.41. t;4!)44~t
L-l4..J4" i94 l-,:i \II 4
iJ4~":J

042122

~4~44

~4264!3

kl4~45

C5144C

~4j46

041510

1-.J4041 ir.l4.l503
f04~5~ 04tl440

kl711

~4~:l1

~J41!H

~l4052

't'46~~0

aa4')"~~

1Il4blt5

i04tl:.'>4

0521~5

7

",4:>55 11b21 :t2
,,405(-

10,TKACK 4DDMESS

ER~OR

IJ 41d~ l" 3

1445"7 045440
t)4:lfiC \1405"4
ki4~6l

~42122

w4562 0425:23
~4~t.)3 051440
040b4 042522
v14~65

(;51117

\!I4bb6

~51040

~112

l,;4~67

0~0VJ00

.. T.t: lJ f

f:. 5S 128

WRITE TRACK BUFFER

0713
\)/14
C715

1c147t;7

0U01r10~

~St:U"

WRITf SECTOR SuFFEH

k

ESS 184
FSS 128 .

READ TRACK BUFfER

~SS

READ

"'ib
~717

'-71U

~52::i7

0~0l'l00

"'04:')7

~t60000

H lJf
kSE UF

~S747

000~00

5~Hitt

'JleU ~O
101& h)5 00t>747-

~719
",

..

F.SS 1
(HI)

l~'jB

rEF

S0~0

END
1'90 ENi-iOKS.

1~4

S~To!~

bUFFER

TABLE 6-3.
CO.DE LIST OF MANUfACTURERS
'fhe folh)wing code numbers are from the Federal SUPf,ly Code for 1IIanllfacturers Catalogl11g Handbooks 114-1
(:'l~rne to C;,)de) and 114-2 (Code to :-;ame) and their latest supplements. The date of revision and the date of the
suVplcn",,,ts used appear at the wttom of each page. Alphabetical codes have been arbitrarily assIgned to
sllpplle "5 not "ppeanng In the 114 HandbOoks.

Monufocturer

(j!)~":J{i

U. S. A.

'I]£'
iHUl3

),j~{'

~(Coy

Co~,non

E!eetHI!lleS

~,Utf

GG1~~

Hl:i:lldIJI

Gl:i:H MIClotfon Co

G!)]i J

No.

Manufacturer

Any suppll" 01 U. S.
Mount Holly Springs, P a.

OS391

Union Carbide COlD .. Linde 0, •.

Rochesl", N. Y.
Darlletson, Cono.
Collo" Cal!f.
Valley Shearn, N. Y.
Cherry HIli, N.J.
New Bedlor1, Mass.
HarllSburg, Pa.
Boonlon, N. J.

05593
0\616

Burl!ngtorl, Viis.

0600:

Address

EleCl'Jf'I(5- COlD
ecr:tcl) !r'(
Inc.

Gar:ock Ir;c

Aelr)V,(H. Corp,
G,}71'j Ail',; Inc.
:;0731 AHcrJ'~t Radio Corp.
"il.;bl) r'(H~beln Engineering LaburatofteS, Inc.

1)1;06

),l[lgamo Elec.tllc Co.

IJl C02

;.. ;IHJ9

Dllli
I:: 2))

, 1781
r,!29~

,)]H9

:d:Jc9
JI91U
: j';

h!

,'n 1~
U2Il,
:~nb6

OnCfJ
a2735
(lnll

D27Jl
0.1SQB
03 ;(J~
0]/91

0]877
('3363
"3914

0'(109
"'01]
04061
04112
a43\4
04·tD~

045)1

0\621
05725
05129
OJl83
05820

Pldens Dr'J.

PIC,ens, S. C.
Clly of IndusllY, Cal.
los Angeles. Calif.
MIi;n!ab lllc.
liVIngston, N. J.
G.£'nera! [Icctrlc Co. CapaCttorDepl.
Hudson Falls, N. Y.
·Atll!'-n PrrJducts Co.
Blocklon, Mass.
Milwaukee, Wis.
Allen Brec!e) Co.
Litton Indu<;trlfS. inc.
Beverly Hills, Colif.
TIn,' Srml::unJ:;ctors. Inc.
lawndale, Calli.
Texas InstrUfTlellts., Inc.,
11,,0515%11: PlodllttS Drv.
Dallas, Texas
The Alliance Mig. Co.
Alltance. OhiO
Pittllic Relays, Inc.
Van Nuys, Calif.
A1I:e,,'c,. COlp.
Racklold, III.
f)1)15(, EJlgIfH~€rlf1g. Cu.
Santa Clara, Calif.
F erro((ube C(rp. ot America
Saugerties, N. Y.
WheeIGC'. $I&nals, Inc.
long Blanch, N.1.
Cole Rubber iHlct Plashcs Inc.
Sunnyvale, Calil.
ArlJpt!enol·(tnfg Electronics Corp.
Chicago. III.
RJill0 Corp. of Am&ilCa, Semiconductor
:wd M:i!('I!als Ol~.
SomerlJille, N. J.
VUcalllle Co. 01 Amenca, Inc.
Old Saybrook, Conn.
Hr)p~I[\S Englneellng Co.
San Fernando, Calif,
G. t:.. Semiconductor Prod. Dept. S~racuse, N. Y.
fq.{',( M,'chille & 1001 Co.
Daylon, Ohio
EId,,,,a COlp.
Com plan, Caltl.
TranSillOn Electllc Corp.
Wakefteld, Mass.
Pyrohlm Hesistor Co., Inc.
Ced31 Knolls, N. J.
Singer Co. DtehID,..
F,nderne Planl
Sum.lVIlle, N. J.
AIIO'N. Harl and Hegeman Elecl. Co.
Harlford, Conn.
T.1"lU5 COlp.
lambertville, N. J.
Areo ElecllOnlC Inc.
Gleal Neck, N. Y.
HIQ DIViSion 01 Aerovox
Myrtle Beach, S. C.
PreCISion Paper Tube Co.
Wheeling, til.
Oy\llcc Division of Hewlett-Packard Co.
Palo Alto, Calif.
SylvJalJ ElectriC Products, Microwave

o>,!; Gae Englnecflng Co.
liC ~"Il Catl E. HGI''''s Corp.
:,1.;'} ;,)

Code

Code

Code
No

DeVice OIV.

OJ713

Mountain View, Calil.
',lotorlda, Inc., Semlconduclor Prod. Oil/.

04732

FdtlOIl Cc . Inc. Weslern Dill.

06090
06175
06402
G6540
06115
06666
06751
06311
06980
01088
07126
011]1
0.1138
07149
0723]

om I
0716 ]
01322
07381
07397
07700

07910
0193]
01980
08145
08289
08]IS
08S14
08664
08117
08718
08192

Phoenix, Arizona

:;·It 1) AutnnratH; Elector Co.
047% Sequoia Wife Co
llBii PIPCISlon Cod SprIng Co.
04r,JD P. M. Motor Company
D·lj 1~ Compollent MIg. Service CO.

Culvor Cily, Calil.
NOllnlake, III.
Redwood City, Calif.
EIMonle, Calil.
Westchesler, til.

08984
09016
09134
09145
09150
09569

W. BlIdgewater, Mass.

10214

T'tientH!th Century PlastiCS, lllc.
los Angeles, Calif.
')~117

05341

Wc>tlllgh'Just> [fectr!e Corp
S~ml·C()n(ju(IOI Dept
U1!r'llll", Inc
.

Kemet Depl.
C tevetand, OhiO
Illulnilroulc Engineering Co.
Sunnyvale. Calr!.
Cosmo PlasllC
IC (l ElcctllCli Spec Co.)
Cleveland, OhiO
Barber Colman Co
Rocklord, III.
T,llen Opltcal Co
RoslYIl Helghls, long Island. N. Y.
Melro·Tel Corp.
Westbury, N. Y.
Stewart Englfle(;tlng Co.
Santa Cruz, Calif.
Wakelleld Englneer:ng Inc.
Wa~efleld, Mass.
8asstCk Co., DIV. 01 Stewa;1 Warne! COlp.
Bsidgeporl. Conn.
;"ych"" CO'l>'
Redwood City, Calif.
Gallsch and lomb Opllcal Co.
Rochesler. N. Y.
c. T. A. Producls Co. 01 Amellca
ChICago, III.
I\mato!l\ [lectlOlllc Harc't'oare Co .. Inc.
New Rochelle, N. Y.
Geede Electllcal Insllumenl Co., Inc.
Penacook, II. H.
Gene,,1 DevICes Co. Inc.
IndianapoliS, tnd.
~emcor OIV. CCIi:ponents Inc.
Phoenl~. Ariz.
Torllnglon Mig. Co. Wesl DIV.
Van Nuys. Calif.
Varian Assoc. E1P1ClC OIV.
San Carlos, Catd.
I(elvill Elecillc Co.
Van Nuy'. Cal,i,
Illg,l"n Co.
Pasade"" Calli,
Tlanslslor ElccllO",cs Corp.
Minneapolis, Minn.
Westinghouse ElectriC Corp.
Electronic Tube DIY.
Elmlla. N. Y.
Filmohrn Corp.
New YOlk. N. Y.
Clnch·Graphlk Co.
City 01 IndustlY, Ca!ll.
Culver C,ly, Calt!.
Avnet COIP
F alfchlld Carnefa & Iflsl. Corp.
Mountarn VIew. Calif.
Semiconductor DI',!
Ulnnesota Rubber Co,
Minneapolis. ~,llnn.
Bdlchel Corp. The
Monlerey Park, Cnl"
Svlvanla Elect. Plod. Inc., Mt. View Qperat:ens
Mountain VIC..,.. Caljf.
Technical VJlre PrGdL'cts Inc.
Cranford. N. J
Hawthorne, Said.
Conllnenlal DevlCc COIP
Raylheon Mig. Co.
Mountain V,e'J>, C,l.d.
Semiconductor OIV.
Hewlell·PackJld Co., Boonlon Radio DIV.
RockJW3j N.J.
U.S. Engineering Co
Los Angeles. Cai·'
Bltnn, Delbell Co.
Pomona, CaLf
Burgess Battery Co.
Nlagala Falls, Onlallo, Canad,
Deutsch Faslener Corp.
Los Angeles, CaLL
Blisiol Co., The
Walerbu,y, Conn.
Sloan Company
Sun Valley. Caltf.
ITT Cannon Elecilic Inc. Phoenix 0 ...
PhoenIX. A""ona
CBS Electronics SelTllcanductof
Ope,,"ons, Dov 01 C. B. S. Inc.
lowel!, Mass.
Indianapolis, Ind.
Mel·Ratn
Costa Mesa, Ca!!f.
Babcock Relays Dlv.
Houston, Texas.
Te<3s CapaCilo. Co.
Burbank, Ca!d.
TeCh. Ind. Inc. Atohm Elecl.
ChICago, Iii
Eleclro Assemblies, Inc.
MaHOlY Balle.y Co. 01
Canada, Ltd.
Toronto, Onlallo, Canada
Genelal Tlao;lslor Wesle" Corp.
.
las Angeles, Calif.
Ber,eley, Calif.
T,·Tal, Inc.
Niagara FallS, N. Y.
Catborundum Co.
Berne. Ind.
eTS 01 Berne, Inc.
ChIcago Telephone of CalifornIa, tnc.
So. Pasadena, Calil.

No.

Manufacturer

11141
11]12
11314
115H

Bay Slat' EleclronlCs COlp.
Wall;a~,
Teledyne InC. MICrowave DIV. Palo Alto.
Nall'J,,,1 Seol
Downey,
Duncan ElectronICs Inc.
Cosla /lesa,

11711

Generallnstru':l€nt Corp.

Srptembe-I. 1%]

Address

Mass.
Calli.
Calil.
CallI.

Semiconductor

OIV., PlOdl/cls Group
Newark, N. J.
1I7l7 Impenal EleclrCllic, Inc.
Buerta Palk, Calif.
11810 Melabs, Inc
Palo Alto. CallI.
121]6 Phlladel~h" Handle Co.
Camden, N. J.
Ill,1 GlOve Mig. Co., Inc.
Shady GlOve, Pa.
12514 Gullon lad. Inc. Dala System OIV.
Albuquerque. N. M.
12691 Claroslal Mig. Co.
Dovel, N. H.
VI. Haven, Conn.
12728 Elmar Filler Corp.
Nippon
Eleclric
Co.,
Ltd.
11859
To,yo, Japan
1288 I Metex ElectrOlllcs Corp.
Clark, II. J.
11930 Delta Sera lconductu{ Inc.
Newport Beach, Caltl.
12914 Dickson Electronrcs Corp.
SCoI1Sd.le, Arizona
1310] The/molloy
Dallas, T • .as
1]]% Telefunken (GmbH.
Hanovef, G~f1'1any
138]5 ~ldland.Wllghl DIV of Pacthc Industries, Inc.
Kansas City. Kansas
14099 Sera·Tech
Newbury Park, Calil.
14193 CallI. ReslSto, ~o,p.
Sa,'la Montca, Calif.
t4298
11133

Ame:lcd,\ Components, Inc

Consho.hof.ken, Pa.

IH93
i4555
146/4
11752
14960

ITT Se"lCondClcIGi. A OIV. 01 Inl. Telephone
& Telegraph Cur:1.
West Palm Beacn, Fla.
Hewletl·Pacl',Jl',j C"IEpany
Loveland, Cnlo.
Co-rnel! Outl!ief E rHlnc Ccrp.
Newark, N. J.
Cornrng Glass W(;'~'S
Corning, N. Y.
Electro Cube Inc.
San Gabllel, Calil.
Wtlilams Mfg. Co.
San lose, Calif.

15203

Webster Electr:J!i'CS Co.

New York, N. Y."·

15287 Sflonlcs Corp.
15291 Anluslable 8.,,·· '. Co.
15158 MICron Elecl!.·.

NUllhlldge, Calil.
N. Hollywood, Calil.

~n;~~

15>&6 Amplobe 1·'5,
156]1 Can!el",,'"
11111
1150l
15018
15037
15179
l&352
16688

17145

Framingham, Mass.

Ill. View. Calif,
Spruce Pine, N. C.

DetrOIt. lit.
lodl, N. J.
!!lC.

Brooklyn, N. Y.
Delco RadiO D;v. of G M. Corp.
Kokoll\a, Ind.
Thermonetlcs Inc
Calloga P~Hk, Calif.
Tranex Cc(rq.'?,.\~
~~ou"taln View, Caltt.
De Jur Metei:

16758
11109
17474
116/5

City. Long Island, N. Y.

lynbrook, N. Y.
Costa Mesa, Calil.
C0il Spring Co.
Sanla Clara, Calil.

Fenwal E··:c·
A~el(Q Inc
Spruce hili:! ,',I ,] Cu
OrnOt·Specl,.
Campuler Dlo:!e ~::,~p
Ideal Pree. tAch'! Co
[jIV.

Ha:lllln Metal PIOQUC!S Corp
Arlgstrohrr. Prec. Inc.
No

Akron, Ohio
Hollywood, Cald.

17870 McGlo.·EdtS0o C'l
Mancheslel, N. H.
1B042 Power DeSign PJC'!,( inc.
Palo Alto, Calif.
18083 C!evlte Corp .• Ser:i ~::cnd!.ic!cr OiV.
Palo Allo, CallI.
18324 S:gl1ettcs Corp
Silnnyvale, Ca!rf.
1a476 Ty·Cal Mfg. Co . Inc.
H!)j!'s!O'n, Mass.
lSH6 TRW ~ieCl Cr:·111P. OIV,
Dt:s Plaines, lit.
13583 Curtis l!1'struf"!"Ii:llt. Inc.
Mt. Kisco, N. Y.
18873 E. L DtPo1i! and Co. lilC.
Wilmington, DeL
18911

Durant Mfg. Co.

19315 The BendIX CJlp .•

Mrl"h3Ukee. WIS.
N.a'./~g3h1{'1

& Control DIY.

T.t"~orG, N. J.
EG;~J,l !nc;stfifS, Oi11. of
McGrew E(i),,,,i]!) LL
West Orange, N. J.

19500 Thomas A.

19589 Concaa
19644 lRC EI.'''on;c5
19101 Electra rn;:: Co

From: FSC.
H4-1

0r1DlS-H

ReVised

Youngwood, Pa.
San Mateo, Caltl.

10411
1064.
112],
11137

Address

H4-1

S,lctwln Pall(, Calli.
HOlSeheads, N. Y.
(ndependen.te, Ka.nsas

Handboo, Supplemeols
Daled AUGUST 196.
Dated r,Qv. 1962

TABLE 6-3.
(ODE LIST O. MANUFACTURERS (Cont'd)

Code
No.

Cod.
MOAufacturer

Address

10163 General Atron,cs Corp.
Philadelphra, Pa.
becutone, Inc.
Lone Istand Cily, N. Y.
1133, falnlf SeallnE Co .. The
New Sillain, Conn.
11510 fansleel Melallu.rEICal Corp.
N. ChIcago, III.
13183 Brrt.sh RadIO Electronrcs LId. W~shlnglon, D. C.
14455 G. E. Lamp DIVision
Nela Park. Cleveland, OhIO
24&55 General Rad,o Co.
West Concord. Mass.
Hunlinglon, Ind.
24681 !.!r,mcor Inc .. Camp. Div.
16365 Grl"!S Reproducer Corp.
New Rochelle. N. Y.
264&1 Grobel File Co. 01 America. In.c.
Carlstadl, N.J.
16992 Hamilton WalCh Co.
l ancasler, Pa.
28480 Hewlett·Packard Co.
Palo Alto, Calil.
Kenllworlh, N. J.
28510 Heyman MIg. Co.
33171 C. E. ReceiVing Ttlbe Dept.
Owensboro. Ky ..
ChICago, III.
35434 l e tI fO h r.1 Inc.
3619& Slanwyck Cool proc",!s LId.
Hawkesbury, Onla"o, Canada
36287 CU111Illlgnam, W. H. & HIli, Ltd.
TOlOnl, Onlario, Canada
37~l;> P. R. Mallery & Co. Inc.
Indianapolis, Ind.
39543 Mechan,cal lodusl"e, Prod. Co.
Akron, Ohio
11116

40920 Mtnlafure PrCCJsiOll Bearrngs. fnc.

411S0
439%
44&\5
4£lEi

Keene, N. H,

Mute' Ce.
Ch.cago. III.
C. P.. Nurgre. Co
Englewood. Colo.
Oomlle WE Co.
Skokie, III.
hnn Eng. & Mig Co'p.
Ooyleslown, Pa.
479(J~ 1'0laro,,1 Corp.
Cambrrdge, Mass ..
48&2[1 PrecIS,,,,, Bermomeler & Insl. Co.
Southamplon, P •.
49955 M,clowa,,& Powe, Tube D,v.
W.ltham. Mass.
52U90 R""." Conlroller Co.
Westm,nster, Md,
52983 $anbor" Company
Waltham, Mass.
54194 Slrall"oss Mig. Co.
Selma, N. C.
55016 S,mps"" Eleeille Co
Chreago. III.
55933 Scnolo". C,.,p.
Elmsford. N. Y.
559Jl Raylh.eo" Co. Comnrerc,.1 Apparatus &
Systems 0"
So. Norwalk, Conn.
56131 Spauld,ng r,bre Co. Inc
Tonawanda, N. Y.
56789 SIHague Eleeilic Co.
North Adams, Mass.
59446 Tele, Corp.
Tulsa, Okla.
59730 Thomas & Belts Co
Elizabeth, N. J.
60141 rrrplefl Electllcallns!. Co.
Blutnon, OhIO
61115 Un,on Sw,tCh and Signal. Oiv. of
West~i1ghouse Au .Brake Co.
P,lIsburgh, Pa.
Owosso, M,ch.
61119 Un'versal fleclflc Co.
63143 Wald·Leon.,d EIcelllc Co.
M!. Vernon. N. Y.
New York, N. Y.
64959 westenl E.lectnc Co .• Jnc.
65091 Weston IJlst. Jnc. Westo·n·Newark
Newar', N. J.
Chicago, III.
65295 \V'lIek Mig. Co.
66346 Mllinesot. M,ning & MIg. Co. Revere Mtncom Dlv.
St. Paul, Minn.
10216 Allen Mig Co.
Harl/ord, Conn.
103U9 Alt.ed Gunl'ol
New YOlK, N. V.
I031S Allmeial Screw P,oducl Co., Inc.
Garden Ci.ly, N, Y.
Chicago, HI.
1048~ Atlanl,c. IndIa Rubber Works, Inc.
Un,on City, N. J.
10563 AClpellle Co .. Inc.
Minneapolis, Minn.
70614 ADC Products Inc.
10903 Belden Mig. CO.
Chrcago, III.
10998 aHd Elenronlc COlp.
Cleveland, Ohio
11002 SHnb.eh Rad.o Co.
New York, N. Y.
11041 Boslon Ge" Walks D.v. 01 Murray Co.
01 Texas
Quincy, Mass.
11118 Bua Rad,o, Inc.
W.lloughby, OhiO
71186 C.mtoc faslener Corp.
Paramus, N. J.
IIlt3 Cardwell Condenser Corp.
LlndenhulSl L./', N. y,
11400 Bussmann Mfg. D.v. of McGraw'Ed,son Co.
SI. Louis, Mo.

00015-44
ReVIsed: Septembe/, 1967

No.

Code
M(JI1ufoctu,.r

IIll6 Chrcago Condensel Corp.
Chicago, III.
Pico·Rivera, Calif.
71447 CaW. Spring Co., Inc.
71450 crs Corp.
Elkharl, Ind.
71468 IT T Cannon Electric Inc,
Los Angeles, CallI.
71471 Cinema, OIV. A&/OVOI Corp.
Burbank, Calif.
11482 C. p, Clate & Co"
Chicago, III.
7lS90 Centralab Div. 01 Globe Union Inc.
Milwaukee, Wis.
Chicago, til.
71616 Commercial Plastics Co.
11100 Cornish Wire Co., The
New York, N. Y.
71701' Coto Coil Co., Inc.
Providence, R.1.
11144 ChICago M,n,.lure Lamp Works
Chicago, II!,
71785 C.nch MIg. Co,,, ·Howard B. Jones O,v,
Chicago, III,
11984 Dow Corning Corp.
Midland, Mich.
71136 Electro Motrve Mig. Co., Inc. Willimantic, Conn.
72619 Dralighl Corp.
Blooklyn, N. V.
11656 Ind.ana General Corp., Electronics Div;
Keasby, N.J.
72699 General Instrumenl Corp" Cap, Div.Newark, N,J,
72765 Dra~e MIg. Co.
Harwood Heights, III.
Hugh H. Eby Inc.
Phll.delphia, Pa.
Chicago, III.
12928 Gudeman Co.
12964 Roberl M. Hadley Co.
los Angeles, Calif.
72982 Erre Technolog.cal Producls, Inc.
Erie, Pa.
Princeton, Ind.
13061 Hansen Mfg. Co., Inc.
Chicago, III.
7307S H. M. Halper Co.
73138 Helipol D,y. 01 Beckman tnst., Inc.
Fullerton, Ca!il.
13293 lIughes PlOducts Oi.,sion 01 Hogh~s
Airelalt Co.
Newporl Beach, Calif.
73H5 Ampere, Elect Co.
Hicksville, lot., N. Y.
73506 Bradley SemIConduclor Corp.
New Haven, Conn.
7JSS9. Carling fleclrre,lnc.
Hartford, Conn.
13586 CIrcle F MIg .. Co.
Trenlon, N.J.
736.82 George K. Garrett Co., Diy. MSL
Induslries Inc.
Philadelphia, Pa.
13734 F~deral Screw Producls fnc.
Chicago, III.
73743 FIScher Spec.al Mfg. Co.
Cinc,nn.ti. Ohio
131S3 Generallndustrres Co .. The
Ely"a. Ohio
73846 Goshen Slamping & Tool Co.
Goshen, Ind.
73899 JFD (Iechonres Corp.
Brooklyn, N. Y.
73905 Jennings Radro Mfg. Corp.
San Jose, CaH.
73951 G100V'P in Corp.
Ridgefie la, N. J.
14276 Signaille Inc.
Neptune, N. J.
14455 J, H. Wlnns. and Sons
Winchester, Mass.
14861 Indusl ... 1 Condenser Corp.
ChICago, III.
74868 R. f. Products Division 01 Amphenol·Borg
ElectronICs Corp.
Danbury, Conn.
14970 LF. Johnson Co.
Waseca, Minn.
15042 Internallonal ReSlslance Co.
Philadelphia, Pa
75378 CTS Knighls Inc.
SandWich, HI.
75382 Kul~a Eleclflc Corporalron
MI. Vernon, N. Y.
15818 lenz Electric MIg. Co.
Chicago, :I:.
15915 llttleluse, Inc.
Des Plaines, II!.
16005 Lo,d Mfg. Co.
Eli •. Pa.
16210 C. W. Marwedel
San FranCisco, Caltl.
76433 General Inslrumenl COlp., Micamold O.vision
Newar" N.J.
IS4a7 James Millen Mfg. Co" Inc.
Malden. M>ss.
IS493 J. W. 1.1111 .. Co.
los Angeles, Calif.
76S30 Clnch·Monadnoek, Oiv. 01 United Calf
Fastener Corp.
San Leandro. Calif.
16545 Mueller Eleclric Co.
Cleveland, OhiO
7S703 Nallonal Union
Newar'. N.J.
76854 Oak ManufactUflng Co.
Cryslal lake, III.
11068 The Bend" Corp., ElectrodynamiCS Div.
N, Hollywood, Call/.
1107) Pac,f,c Melals Co.
San Francisco, Calif.
11211 Phanostran Ins!rument and Electronic Co.
Soulh Pasadena, Calil.

11m

No.

Manufacturer

Add,.,u

77252 PhIladelphia Steel and Wire Corp.
Philadelph,a, Pa.

11342 Amer,can M"h,ne & Foundry Co. Poller
17630
77638
77764
17969
18189
18783
18290
18457
18411
18488
18493
785S)
IS 790
18941
19136
19142
79251
79121

& Brumlteld D.v.
Plinteton, Ind.
TRW Eleclron,c Components Dlv.
Camden. N.J.
Gene .. 1 Instrumenl COIP., Recl,her Oiv.
e.rooklyn, N. y,
Resislanc. Products Co.
Halrrsbu'g, Pa.
Rubbercrall Corp. of CallI.
To"anc., Calif.
Shakeproof O,v'Sion ollll.nois Tool Works
Elgi., Ill.
S'gnal IndlC.lor Corp.
I/ew York, II. Y.
SI'othelS·OJnR Inc.
PHman, N. J.
Thompson·Bremer & Co.
Chicago, III.
T,lIey MIg Co.
San FranCisco, Catil.
Slackpofe Carbon Co.
51 Marys, Pa.
Standard Thomson Corp.
Wallh."" Mass.
Tlonerman Products, Inc.
Cleveland, OhIO
Tra-n-sIOfme-r Etlgineers
San Ga~rrel, Cal'/,
UCf!l!te Co.
Newtonvilfe, Mass.
Waldes Konlfloor fnc.
long Island City. N. V.
Veeder Root. Inc
HarUord, Conn.
WencD Mig Co.
Ch.cago, III.
Cootinentat·Wrr! Elecho-nics. Corp.
Philadelphia, Pa.
Zleli" Mfg. Corp.
New Rochelle. N. V.

19963
80031 Meilco DiVISIOn. of SessJons Ct.oc!ot Co-.
MOlflslown, N. J.
80110 Schn,tzer Alloy P,odu,ls Co.
Elizabeth, N. J.
80m EloclronlC Induslfres Associ.lron. Any brand
Tube meoling EIA Standards·Washinglon, DC.
8010) Unnnax Swdch', D1\1. Ma~on Elecflonics Corp.
WaHinglord. Conn.
80123 United Trans!,JI'ttf!' Corp
New York, N. Y.
80248 O;do-rd Electnl":
ChiCago, Ill.
80794 Bourns Inc
RIverside, Caltl.
80411 Aero Di", (if P,;:;
'~",a", Ca:,ltrMs Co.
Columbus, Ohio
80485 Air Slar pjl.:ctv;;~5 t!1C.
Oettance, Ohio
80509 Avery latJel Co
Monrovia, Calif.
B0583 Kammarlund C)
~C.
New Yorl<, N. Y.
80540 Stevens. A",'~ Co., Inc.
80ston, Mass.
81030 rntern~tiortJI ir,1;rt.:menls Inc.
Olange, Conn.
81013 Grayhlll Co.
LaG.range, III.
81035 Tnad Transformer Cor;.
Venice, Calif.
8l3l2 Winchester [let. DiV. liHon. tad., Inc.
Oakville, Conn.
81349 Military Speclficatlon
fl Segu"do, Calif.
81483 InternallOnal Rect,!,er Corp.
81541 Airpax flecko.,es, Inc.
Cambridge, Maryland
81860 Barry Con Ire Is. Dlv. Smy WHg!>! Corp.
Watertown. Mass.

82C41 Carlel Precision [fectric Co.
Skokie, lIf,
82047 Spelh Faraday Inc .• Copper H€'wiU
Eleclric Div.
Hoboken, N.l.
81141 Jefters Electronics Oiv,S,o" of Speer
Carbon Co.
Ou Bo", Pa.
82110 Failchrld Camera & Ins!. Corp. Space & Oelense
Syslem [ii..
Paramus, N. J.
8lZ09 Maguire fnd:lstries. Inc.
Gfeertwich, Copn.
Sylvani.
Electr,c
Prod.
Inc.
81219
Emporium, Pa.
Efeclron:c Tube Division
82])6 Aslran COlp.
Easl Newark, Hallison, II, J,
82389 SWitch".ft. Inc.
Chicago, 111,
82641 Metals & ContrOlS: !nc.~ S~enCef Products
Attleboro, Mass.
81168 Phill.ps·Ad,,",e Control Co.
Joli.I. lit.
Madison, Wis.
82866 Research Products Corp.
82877 Rotron MIg. Co .• Inc.
Woodslock, ". Y.
Clendale, Calif.
81891 Vector Elec:tronit Co.

From: fSC.
H4-1
H4-2

Handbook Sopplements
Daled AUGUST I96S
Daled NOV. 1962

TABU 6-3.
CODE LIST OFMANUFAC1URERS (Cont'd)

Cod.
NoJ.

Add",ss

Manufacturer

83058 Call Faslener Co.
Cambridge, Moss.
83086 New Hampshlle Sail Bearing, Inc.
Peterborou&h, N. H.
83115 General Instrument Corp., CapaCitor Di •.
OaIlington, S. C.
Los Angeles, Calif.
a3W ITT Wire and Cable Div.
Springfield, N. J.
81185 VICtory Eng. Corp.
Red Bank, II. J.
8lBS Bend .. Corp .. Red Bank Div.
Hubbell
Corp.
Mundelein, III.
ams
Broo~lyn, N. Y.
sma Smith, Herman II., Inc.
Palisade's Park, N. J.
8333l Tech Labs
Chicago, Ill.
83335 Central Screw Co.
BlIO[ GaVitt Wire and Cable Co.
Oiv. 01 Ameracrr Corp.
Brookfield, Mass.
81594 Burroughs Corp. Eleclronic Tube Oiv.
Plainfield, N.J.
83740 Union Carbide Corp. Consumer Prod. OiY.
New York, N. Y.
Huntington, Ind.
B3717 Model Ena. and Mfg., Inc.
Festus, Mo.
83821 Loyd Scruggs Co.
83>42 Aaron,utical Inst. & Radio Co.
Lodi, N. J.
Great Neck, N. Y.
HIll Arco Electronics Inc.
84396 A. J. Glesen.r Co .. Inc.
San FranciSCO, Calif.
Ogallala, Neb.
81411 TRW Capacitor Oiv.
Bloomington, Ind.
84910 Sarkes Ta",an. Inc.
8\·:51 800nlon Molding Company
Boonlon, N. J.
8)~1l A. B. Boyd CO.
San FranCiSCO, Calif.
81CI R. M. Bracamonte & Co.
San FranCiSCO, Calif.
Hamden, Conn.
8",0 Korled Kords, Inc.
8191 I Seamless Rubber Co.
Chicago, Ill.
a~rSl Clifton Precision Products Co.
tnc.
Clifton Heights, Pa.
8';;;9 Precision Rubber Products Corp.
Daylon, Ohio
S6684 RadiO Corp. 01 America, Electronic
Compo & Devices Div.
Harrison, N. J.
SIDl: Marco Industri.s
Anaheim, Calif.
871" Philco Corporalion (Lansdale Division)
Lansdale, Pa.
'81413 Western Fibrous Glass Producls Co.
Sti1 francisco, Calif.
87664 Van Waters & Rogers Inc,
San franCiSCO, Calif.
87930 Tower Mfg. Corp.
Pro,idence, R. I.
88140 Cutler·Hammer, Inc.
Lincoln, til.
BanO Gould·National Batteries, Inc.
SI. Paul, Minn.
SSS98 Ceneral Mills, Inc.
Buffalo, N. Y.
8n31 Grayba! Electric Co.
Oakland, Calif.
89413 G. E. Oistllbuting Corp.
SchenecladY,II.Y.
89665 United 1r.ansformer Co.
Chicago, III.
90179 US Rubber Co., Consumer Ind. & Plastics
Prod. O,V.
Passaic, N.J.
S0970 Bearing Englneellng Co.
San Francisco, Calif.
91146 ITT Cannon Elecl, Inc., Salem Div. Salem, Mass.
91260 Connor Spring Mfg. Co.
San FranCiSCO, Calif.
91345 Miller 0131 & Nameplale Co.
EI Monte, Calil.
I

Code
No.
9\41B
91506
91637
91662
91737
91827
91B86
91929

Manufocturer

Add", ••

92702
92966
93332

RadIO Mate",I, Co.
Chic'ago, III.
Aug.t Inc.
Attleboro, Mas •.
Dale ElectronICs. Inc.
Columbus, Nebr.
Etca Corp.
Willow Grove, Pa.
Gremar Mfg. Co., Inc.
Wakefield, Mass.
K F Development Co. .
Redwood City. Calif.
Matco Mfg. Co., Inc.
Chicago,llI.
Honeywell Inc., !.lrcro Switch Diy.
Freeport, III.
N.hm-Bros. Spring Co.
Oakland, Calif.
Tru·Con neclor Corp.
Peabody. Mass.
E Igeel Optical Co. Inc.
Rochester, N. Y.
Tensolde Insulated Wire Co., Inc.
Tarrylown, N. Y.
tMC MagnetiCS Corp. Wesbury Long Island, N. Y.
Hudson Lamp Co.
Kearney, N.J.
Sylvania Elecilic Prod. Inc.

93369
93410
93929
94137
94144

RobbinS & Myers Inc.
Palisades Park.
Stevens Mfg. Co., Inc.
Mansfield.
G. V. Controls
Li'ingston,
General Cable Corp.
Bayonne,
Raytheon Co .. Camp. Di •. , Ind.

91961
92180
92367
92.07

Semiconductor Oiv.

Compo Operations

Wohurn, Mass.

H.J.
Ohio
N. J.
N. J.

Quincy, Mass.

94148 ScientrtlC EleclroniCs PIOducts, Inc.
Loveland. Colo.
94154 Wagner Elect. COlp., Tung-Sol Div. Newark, H. J.
94197 Curtiss·Wright Corp. Electronics Oiv.
Easl Palerson, N. J.
94212 South Chester Corp.
Chester. Pa.
94330 WlleClolh Products, Inc.
Bellwood, Ill.
94682 Worcester· Pressed Aluminum Corp.

Code
No.
91464
97539
97979
97983
98141
98159
98210
98278
98291
98316
98731

Manufacturer

Induslrial Retaining Ring Co.
IlVington, N. J
Automatic & PreciSion Mfg.
Englewood, H. J.
Reon Resislor Corp.
Yonkers, N. Y.
Litton System Inc. Adler·Westre.
Commun. Dlv.
New Rochelle, N. Y.
R·Troncis. Inc.
Jamaica, N. Y.
Rubber Teck, Inc.
Gardena, Calif.
Hewlett-Pack.rdCo., Moseley Oiv.
Pasadena, Calif.
Microdot, Inc.
So. Pasadena, Calif.
Sealect'. Corp.
Mamaroneck, N. Y.
Zero Mfg. Co.
Burbank, Calif.
General Mills Inc. Electronics Oiv.
MinneapoliS, Minn.

98134 Paeco 0,.. 01 Hewlell·Packard Co.
Palo Alto, Catif.
98821 North Hills ElectroniCS, Inc.
Glen Cove, N. Y.
98978 In'ernal,onal Electronic Research Corp.
B.rbank, Ca·lif.
99109 Cclu,b13 Technical Corp.
New York, N. Y.
99313 Vafl.n Assocrates
Palo Allo, Calif.
99118 Allee Corp.
Winchesler, Mass.
99515 Marshall Ind., Capacitor OIV.
MonroY .. , Calif.
99707 Control SWitch DIVISIOn, Controls Co.
of Am·errco
EI Segundo, Calif.
99800 Delevan ['ectronlcs Corp.
Easl Aurora. N. Y.
99848 Wrlco Corro,,\,,"
IndianapoliS, Ind.
999H Renb",dt. !"
B.oslon, Mass.
99942 Hollman ElectronICs Corp.
SemIConductor Dlv.
EI Monte, Calif.
99957 Technology Instrument Corp. of Calif.
Newbury Park, Cali'i.

Worcester, Mass.

94696 Magnwaft Electric Co.
Chita.go, III.
95023 George A. Philbrick Researchers, Inc.
BasIon, Mass.
Dania, Fla.
95236 Allres Producls Corp.,
95238 Continental Connector Corp.
WOGoSlee. N. Y.
952.3 Leecraft Mfg. Co., Inc.
Lo'g IsiOAd. N. Y.
95265 National Coil Co.
Sheridan. Wyo.
95275 V,tramon, Inc.
Bridgeport. Conn.
Blocmfiel-1, N. J.
95348 Gordos Corp.
Rolling Meadews. III.
95354 Methode Mfg. Co.
95566 Arnold Engineering Co.
MaferLD. HI.
Fra~;,IH:, Ind.
95112 Dage Eleclric Co., Inc.
95984 Sie",on Mfg. Co.
Wayne, ill.
Chicago, III.
95987 Weckesser Co.
Sunnyval., Calif.
96061 HugginS Laboralories
O!-ean, N. Y.
96095 Hi·Q Oiv. of Aero,ox Corp.
Mt. Caimel, HI.
96256 Thordarson·Meissner Inc.
Los Angel,s, Calif.
96296 Solar Manufacturing Co.
Chi.:ago, !il.
96330 Carlton Screw Co.
Bu-rJingtc(l. Mas,s.
%341 Microwave Ass.ociales, Inc.
Oakland. Calif.
96501 Excel Transformer Co.

THE FOLLOW::"_ ,~. ',;f~:ORS HAVE NO NUMBER
ASSIGHD I" Tci~
nSf SUPPLEMENT TO THE
FEDERAL SGP?d CODE FOR MANUFAC1URERS
HANDBOOK

ODOOf
OOOOZ

OeGAB
OOOBB

Malca

and Die

los Angeles, Calif.
Newaik. N. J.

WIllow L2'Jthei Products: COfp.

ETA

England

PreCISion Instft.lment COmpGflents

Co.

Van Nuys, Calif.
OOOCS Hewlett·Pacl.,aI1 Co., Colorado Springs
Colorado Springs,' Colorado
OOOMM
Rubber Eng. & CevelJpmenl
Hayward. Calif.
OGONN
San Jose, Calif.
A "r;" 0 Mfg. Co.
OOOQQ
Cooltron
Oakland, Calif_
oQOVI'H Calif"nia Eastern lab.
Burhngton, Calif.
oonv y S. K. Smilh Ce.
Los Angefes, Calif.

From: FSC.
COOI\~44

H4~1

ReVised: September, 1967

H4-2

HandbOOk Supplem.nts
o ated AU GUST 1966
Oal~d NOV 1962



File Type                       : PDF
File Type Extension             : pdf
MIME Type                       : application/pdf
PDF Version                     : 1.6
Linearized                      : No
Create Date                     : 2016:05:20 10:39:47-08:00
Modify Date                     : 2016:05:20 10:51:55-07:00
XMP Toolkit                     : Adobe XMP Core 4.2.1-c041 52.342996, 2008/05/07-21:37:19
Metadata Date                   : 2016:05:20 10:51:55-07:00
Producer                        : Adobe Acrobat 9.0 Paper Capture Plug-in
Format                          : application/pdf
Document ID                     : uuid:f6f50c50-0bb4-9849-b346-0432e02fe2f1
Instance ID                     : uuid:b66251c5-84da-1942-8918-3c4fc8d6e04e
Page Layout                     : SinglePage
Page Mode                       : UseNone
Page Count                      : 97