Digital PDFs

DEC-12-UW2A-D

December 1970

106 pages

Original

8.8MB

Document:	dec-12-uw2a-d
Order Number:	DEC-12-UW2A-D
Revision:
Pages:	106
Original Filename:	https://svn.so-much-stuff.com/svn/trunk/pdp8/src/dec/dec-12-uw2/dec-12-uw2a-d.pdf

OCR Text

ADTAPE
AND

ADCON

(

DEC-12-UW2A-D
June, 1970

@ 1970 by Digital Equipment Corporation

The material in this handbook, including but not
limited to instruction times and operating speeds,
is for information purposes and is subject to change
without notice.

The following are trademarks of Digital Equipment
Corporation, Maynard, Massachusetts:
DEC
FLIP CHIP
DIGITAL

PDP
FOCAL
COMPUTER LAB

The equipment described herein is covered by patents
and patents pending.
For additional copies order DEC~12-UW2A-D from Program
Library, Digital Equipment Corporation, 146 Main Street,
Maynard, Mass.
01754
Price $^.00

Table of Contents

Foreword

ADTAPE
1.0
1.1
1.2
1.3
1.4

Usina ADTAPE
Introduction
Hardware Requirements
Initial Starting Procedure
Responding to ADTAPE

1-1
1-1
1-1
1-1
1-2

2.0
2.1
2.2
2.3
2.4
2.5
2.6
2.7
2.8
2.9
2.10
2.11
2.12
2.13

Initialization
Message 1
Message 2
Message 3
Message 4
Message 5
Message 6
Message 7
Message 8
Message 9
Message 10
Message 11
Message 12
Message Sequence

2-1
2-1
2-1
2-1
2-2
2-2
2-2
2-2
2-3
2-4
2-4
2-4
2-4
2-5

3.0
3.1
3.2
3.3
3.4
3.5
3.6
3.7
3.8

Data Commands
Channel Display
Store Mode
Visual Mode
Pause Mode
Continue
Rerun
Return
End of Experiment

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

4.0
4.1
4.2
4.3

Using ADCON
Introduction
Hardware Requirements
Initial Starting Procedure

4-1
4-1
4-1
4-1

5.0
5.1
5.2
5.3
5.4
5.5
5.6
5.7

Initialization
Message 1
Message 2
Message 3
Message 4
Message 5
Message 6
Message Sequence

5-1
5-1
5-1
5-1
5-2
5-2
5-3
5-4

ADCON

Appendix A

Tape Format

A-1

FOREWORD
Using the programs ADTAPE and ADCON, data sampled at rates up to 1000
points/second on up to 16 analog channels can be stored by individual
channels,
ADTAPE is used first to collect tie data and store it as

sampled in four block units on tape. ADCON then takes all the stored
data and places it on tape by individual channel. The two programs
function separately and may be used independently.

ADTAPE is described in section
described in sections 4 and 5.

through

of this manual and ADCON

ADTAPE

1.0

USING ADTAPE

1. 1

Introduction

ADTAPE permits up to sixteen AD12 A/D channels to be sampled consecuOne or two channels can be displayed on the scope at any time
tively.

during sampling simply by typing the niiraber(s) of the channel (s) on the
(R)
Sampling rates up to 1 KC (1000 points/second) and a
Teletype
.

maximum time per point of up to A0 seconds/point are acceptable. The
signal to begin or end sampling can be by means of a Sense Switch, exIt is also possible to begin sampling
ternal level, or clock channel.
after a predetermined delay from the sync signal and to terminate the
sampling after a requested number of points have been collected (up to
a

maximum of 10,000),

A save or non-save mode provides the option of

storing the data on LINCtape.
ADTAPE functions in two parts; the first part, initialization, displays a series of scope messages requesting user input of the reThe main section of
quired parameters for the given experiment.
the program, part 2, controls the actual experiment until its conclusion.
1.2

Hardware Requirements

PDP-12A with KW12A clock and 4K of core memory
1.3

Initial Starting Procedure
1.

Mount a LAP6-DIAL"^ tape containing ADTAPE on tape
unit 0.
(Unit 0 is indicated by setting the tape
channel indicator to 8 on TU55 transports)

Mount another tape on unit 1. ADTAPE uses tape 1
to store data and will replace any previous information on the tape with incoming data if that space
is needed.
(This tape need not be mounted until
parameter initialization is completed.)

Set the switches of both tape units to REMOTE and
set unit 0 to WRITE ENABLE.

'Teletype is a registered trademark of Teletype Corporation.

LAP6-DIAL is hereafter referred to as DIAL.

1-1

Set the mode switch to LINC mode and press I/O
PRESET.

Set the Left Switches to 0701 and the Right
Switches to 7300 by pushing down the back portion
of the switches indicated by
and pushing down
the front portion of those indicated by ^ in the
following diagram.

Left Switches

Right Switches

Press the DO console switch.

When the tape has stopped moving, press the START
20 key.

Press the LINE FEED key, type LO ADTAPE,^
and press the RETURN key.

1.4

Responding to ADTAPE

When responding to display messages that expect a numerical reply,
the number of digits acceptable is indicated by the number of dashes
on the display.
dash.
a

As each digit is typed in, it replaces the leftmost

Any remaining blanks are ignored; supplying no digits assumes

value of

Each display includes a vertical cursor located to the left of the
dash that will be replaced next. The cursor moves to the next dash
as each is filled in on a line.
Each response line in a display is terminated by pressing the RETURN
key.
The cursor is moved to the beginning of the next line in the
display.

If the cursor is currently located at the last line of the

display, press LINE FEED to advance to the next message.
If a change
is required in the value typed in for the current display, pressing

RETURN when the cursor is located at the last dash in the display
will move the cursor to the first dash of the current message. Press

RETURN until the cursor is located at the correct line, then type in
the corrected value.
Press RETURN until the cursor is at the last
line then press LINE FEED to proceed to the next display.
Note that
skipping lines that already contain values by pressing RETURN saves

those values.

At any time while typing in values. Sense Switch 0 may be depressed
to return to the first message and to erase all values typed in up to
that point. New values can be typed in by the above procedures.

1-2

2.0

INITIALIZATION

The first part of ADTAPE is a series of displays requiring answers by
This sequence of messages aid acceptable responses follows.
the user.

Refer to section 2,13 for a chart illustrating the sequence of mes-Any errors detected in a user^s response cause the message to
sages.
be redisplayed when LINE FEED is pressed.
ted in the message must then be retyped.
2.1

Message

All the parameters reques-

PROGRAM
A-DTAPE
TYPE C TO CONTINUE _
This message requires only that C and then LINE FEED be typed to ad-

vance to the next message,

2. 2

Message

STANDARD EXPERIMENT?
IF NO, TYPE N
IF YES, TYPE Y
REPLY
Any previously defined^ stored set of parameters may be used for this
experiment if their location on tape is known. If a new set of parameters is to be used for this experiment, type N followed by LINE
If a stored
FEED.
Continue at message 6 which is displayed next.
set of parameters

tinue at message
2. 3

Message

to be used,

type Y followed by LINE FEED.

Con-

PARAMETER LOCATION
TBLK NO
UNIT _
'

The location on LINCtape of the previously stored parameters to be

used in this experiment are defined in this message.
tape block location (TBLK), 0-777, and press RETURN.
number of the tape unit holding the tape.
specified.

Type the octal
Then type the

Only unit 0 or

Terminate the response by pressing LINE FEED.

2-1

may be

2.4

Message

NEW START TBLK?
IF NO, TYPE N
IF YES, TYPE Y
REPLY
When a previously stored parameter set is being used, it may be desirable to store the incoming data at a new tape block so that the previously stored data is not overwritten.
Type Y, press LINE FEED and
continue at message

if a new storage location is to be used.

Type

N, press LINE FEED and continue at message 12 if the stored data is

to be overwritten.
2. 5

Message

TBLK NO.

If a new starting tape block was requested in message 4, the desired
starting block must be specified.
Type the octal block number (J0-776)

and press LINE FEED.

2. 6

Message

Continue at message 10.

STARTING CHANNEL
NUMBER OF CHANNELS
*

The first channel and the number of consecutive channels starting with
the specified first channel to be sampled are requested by this mesThe starting channel must be in the range 0 to 37g and the
total number of channels to be sampled can only be 1, 2, 4, 8 or 16^-.
Ij0
If some other number of channels is typed, the next largest acceptable
sage.

value is assumed.

A request for 12 channels, for example, will cause
sixteen channels to be sampled. Be sure that the number of channels
to be sampled does not exceed the last available channel, i.e., STARTING CHANNEL+NO. OF CHANNELS < 4 g
JZI

2.7

Message

STARTING TBLK
RATE
U OR M OR S? _
DELAY
X RATE
'

2-2

The tape block at which data storage is to start is requested in the
first line of the display.
Acceptable values are 0-776 8*
The second
line asks for the time lapse between samples and must be a multiple
of 100 microseconds.

Remember, that a maximum rate of 1000 points/
second and maximum time of 40 seconds/point can be sampled"^.
The
units of the rate are designated by the response to line 3 where typ-

ing U indicates microseconds

M, milliseconds and S,

seconds.

Because of the manner in which the clock operates, if a rate is entered in milliseconds that is greater than 4j2f95 and the unit's rightmost digit is not 0, the tens digit is increased by 1 and the unit's
digit is set to 0.
For example:
rate requested

calculated rate

4,100 M

9999 M

10,000 M

4j2f96

error
.097
•

010

A delay after the SYNC pulse may be specified in line 4 of message 7.
Decimal values between 0 and 999 that are a multiple of the rate are
acceptable.
^* ^

Message

1.
2.
3.

SYNC ON:
SENSE SWITCH N
EXTERNAL LEVEL N
CLOCK CHANNEL N
'CODlT"^

—

•

CODE is requesting a choice of sync device, specified as 1, 2, or 3
in the display.
N refers to the choice of one of the following parameters for the specified device.

Device code

Parameters

0- S

2
3

1- 3

Type the code number, press RETURN

type the parameter

and press LINE

FEED.

ADTAPE will try to perform the specified operation, but may produce unacceptable results when more than 1000 pts ./sec. are requested.
If ADTAPE detects that the samo
the Teletype and the experiment is terminated.
2-3

2.9

Message

1.
2.
3.
4.

END SAMPLING ON:
SENSE SWITCH N
EXTERNAL LEVEL N
CLOCK CHANNEL N
TOTAL PTS PER CH N
CODE
N
*

The signal to terminate the sampling is defined in the same manner as
the sync pulse in message 8.
Type the device code number (1 to 4),

press RETURN, lype the parameter for that device and press LINE FEED.
The parameters used in message 8 apply here also; the range for choice

Note that the response to messages 8 and 9 can not be
identical; the same device may be used, but a unique parameter is required.
4

is 0-9999.

2.10

Message 10
SAVE PARAMETERS?
IF NO, TYPE N
IF YES, TYPE Y
REPLY

The parameters specified by messages 4 through 9 can be saved for
future use by typing Y.
If N is typed, all parameters must be respecified for the next experiment.
2. 11

Message 11

TBLK LOCATION?
TBLK NO
UNIT
*

The tape block in which the parameters are to be stored is supplied by
this message specified as the tape block, which must be an octal nximber
from 0 to 777, and its unit number, 0 or 1. \
2. 12

Message 12

MOUNT DATA TAPE
ON UNIT 1
TYPE C TO CONTINUE
Mount the data tape on unit

and then type C to start the experiment.

2-4

MESSAGE SEQUENCE

2. 13

PROGRiy^

A-DTAPE
TYPE C TO CONTINUE
STANDARD EXPERIMENT?
IF NO, TYPE N
IF YES, TYPE Y
REPLY _
-"Ho

Yes

PARAMETER LOCATION
TBLK NO
4 UNIT

NEW START TBLK
IF NO, TYPE N No
IF YES, TYPE Y
REPLY
\

TBLK N 0

STARTING CHANNEL _
NUMBER OF CHANNELS

STARTING TBLK
RATE
U OR M OR S?
X RATE
DELAY

1.
2.
3.

1.
2.
3.
4.

SYNC ON:
SENSE SWITCH N
EXTERNAL LEVEL N
CLOCK CHANNEL N
CODE _
N
END SAMPLING ON:
SENSE SWITCT! N
EXTERNAL LEVEL N
CLOCK CHANNEL N
TOTAL PTS PER CH
CODE _
N
±1-

SAVE PAR/iMETERS?
IF NO, TYPT^ N
•IF

Ys<S,

TYPE Y

REPLY
Ye',

TBLK I '"^CATION?
TBLK r,o
UNIT
C

MOUNT DATA TAPE
ON UNIT ]
TYPE C TO CONTINUE

2-5

Yes

3,0

DATA COMMANDS

Once the experiment has been started, ADTAPE is in visual mode.

The

data being received on the active channels can be displayed on the
Incoming data can also be stored by requesting
scope at this time.
store mode.

Any of the following actions are implemented by typing

the appropriate character.

If the end of tape is reached before samp-

ling is finished, the Teletype bell rings and TAPE is printed to alert
the user to this condition.

Note that when data is being written onto tape

no check is made be-

cause the sampling rate is too fast for a write and check operation.
3.1

Channel Display

Any of the channels requested in message

program is in visual mode.

can be displayed when the

The active channels are called relative to

the starting channel, as follows:

to display channel

(starting channel)
n+1

n-i-2

n4-8

n+9
n+10

n+14
n+15

F
G

Thus, if message

was answered as

STARTING CHANNEL 3
NUMBER OF CHANNELS

Then
to display channel

type

3
4
5
6
7
8
9

1
2
3
4
5
6
7
8

3-1

Remember that eight channels will be sampled if
are requested.

channels

The data's spectrum is tr-aced across the scope by a single dot.

two channels are requested,

they

two dots are displayed on the scope;

are always seen at the same X axis location.

The most recently reques-

ted A/D channel is displayed on scope channel 1; the second most recently requested A/D channel is displayed on scope channel 2.
The
channel indicator knob must be set to the desired scope channel.
The
indicator knob may also be set to display both scope channels; that
is the

recommended setting.

is displayed on the scope ^

Before choosing a channel, a moving dot
but does not represent incoming data.
The

dot only represents the current value of the display buffers and is of
no interest to the user.

3. 2

Store Mode

- S

The program starts in visual mode.

must be typed to collect and
store data.
Data is then displayed and collected in IK buffers in
core.
When a buffer is filled, it is written out on tape and another
S

IK buffer continues to collect the data.

3.3

Visual (non-store) Mode

If the initial visual mode has been exited at any time during the ex-

periment, it can be reentered by typing V.
This mode allows the data
from up to two A/D channels to be displayed on the scope. No data

will be stored in core or on tape in visual mode.
Storing will be resumed after store mode is entered.
(Refer to section 3.2.)
3. 4

Pause Mode

Typing P temporarily stops sampling and/or writing onto tape.
3.5

Continue

After entering pause mode, only typing C will continue the experiment.
3 . 6

Rerun

The experiment can be restarted using the last set of parameters supplied.
All data previously collected with these parameters is lost.

3-2

3. 7

Return - X

Typing X causes the program to return to DIAL."^
3*8

End of Experiment

When the terminating signal defined in message

is received, the re-

maining locations of the buffer currently accepting data are filled
with 4000 and the buffer is then written onto tape.
The header block
is modified to accommodate the new data (refer to Appendix A)
When
all tape writing is completed, the bell on the Teletype rings and END
.

is printed.

Return to DIAL

(X)

or rerun

(R)

the experiment.

If the end of the assigned LINCtape is reached before the terminating

signal has been received, TAPE is printed on the Teletype and the data
collected up to that point is saved.
END is then printed; return to

DIAL

(X)

or rerun the experiment

(R)

The DIAL tape containing the ADTAPE program must be on unit 0 and unit
0 m.ust be set to WRITE ENABLE and REMOTE before the RETURN command can

be used.

3-3

ADCON

4.0

USING ADCON

4.1

Introduction

The ADCON program takes the segmented data collected by ADTAPE and

stores it in contiguous blocks on a formatted LINCtape by channel number.
ADCON can be used for any or all of the sampled A/D channels.

Like ADTAPE, ADCON functions in two parts; the first part is a series
of scope messages requesting user information required for part two.
The second part transfers the segmented data and stores it in contiguous blocks on the formatted LINCtape.
In this discussion, only those parts of ADCON that differ from ADTAPE

are detailed.

If not specified, an operation is performed in the same
manner as in ADTAPE.

4.2

HARDWARE REQUIREMENTS

PDP-12A with 4K of core
4.3

INITIAL STARTING PROCEDURE

The starting procedure is the same as that for ADTAPE except step 8
where ADCON is substituted for ADTAPE; the command is -*-L0 ADCON, U

Responses to ADCON are made in the same manner as for ADTAPE.

4-1

5.0

INITIALIZATION

5. 1

Message 1

ADCON
DATA FROM THE DATA TAPE IS TRANSFERRED
TO A NEW TAPE IN CONTIGUOUS BLOCKS
TYPE C TO CONTINUE
*

This message requires only that C and then LINE FEED be typed to advance to the next message.
5. 2

Message

LOCATION OF DATA
TO BE TRANSFERRED?

STARTING TBLK
UNIT

The location on the data tape where the standard parameters used in
the experiment reside is restated here (see message 2 of ADTAPE.

When LINE FEED is pressed, a delay of a few seconds occurs until message 3 appears.
5- 3

Message

TRANSFER LOCATION?
STARTING TBLK
UNIT
*

The starting location on a formatted LINCtape for output where the converted data in contiguous blocks is to be transferred is requested in
message 3.

Both messages

and 3 require typing the 3 digit octal tape block location (TBLK), 0-777, pressing RETURN, typing the number of the tape
unit 0-7, and terminating the response by pressing LINE FEED.
2

Note that the tape containing the segmented data (e.g., from ADTAPE)
can be used to collect the contiguous data by ADCON.
This method,
however, has the following restrictions:
1.

Much more time must be allotted &r travelling up
and down the tape to gather and store the data.

The starting tape block in message 3 must be less
than the starting tape block in message 2 or it
must be greater than the last block which contains
the segmented data.
If either of these conditions
is not met, message 3 is redisplayed, waiting for
acceptable values.
5-1

^* ^

If insufficient space is provided on tape so
that the contiguous data for a channel will
overwrite segmented data, the message OVERRUN
DATA is printed and the bell rings on the
Teletype and ADCON message 1 is displayed.
Contiguous data is put on tape up to the
block where the segmented data starts, but
the segmented data will not be overwritten.

Message

CREATE FILES FOR

CHANNEL NUMBER
TYPE A FOR ALL CHANNELS SAMPLED
TYPE C WHEN FINISHED SELECTIONS
*

Of the A/D channels sampled, the data for any or all of them can be
converted into contiguous blocks of data. Type in the specific channel
numbers to be converted (octal only) one at a time, followed by a LINE

FEED each tine.
If all the sampled channels are desired, it is not
necessary to type in each channel number; type the letter A followed
by LINE FEED.
As each channel number is typed, it appears in the
spaces at the end of the channel number display. When LINE FEED is

pressed after the value, that number moves from the space at the end
of that line to the space between lines 1 and 2 of the display.
A
list of the channel numbers typed is collected in this space; each
value entered moves from the end of line 2 to the list when LINE FEED
is pressed.
When A is typed, it appears in line 2; when LINE FEED is
pressed after it, all the channel numbers sampled appear in the space
between lines 1 and 2 on the display.

Non-octal numbers or more than sixteen entries are ignored.
No check is made on duplicate channel number entries.
Thus, if a
legal channel number is entered more than once, a file for that channel is made as many times as it is requested.
The letter C followed by pressing LINE FEED must be typed to proceed
to the next message.

5. 5

Message

CAUTION
IF UNIT 0 IS USED TO COLLECT
CONTIGUOUS DATA, REMOVE DIAL TAPE
TYPE T TO BEGIN TRANSFER*

5-2

If the PDP-*12 system used has only two tape transports and unit 0 is

being used to accept the data, it is advisable to remove the DIAL tape
from unit 0, as DIAL could be destroyed, and replace it with an output

LINCtape to be used to accept the contiguous data.
However, if other
tape transports are available, they can accommodate the storage tape*
the DIAL tape need not be removed, and message 5 is not displayed.
The program will automatically proceed to the heading below in that
case.

Typing T followed by LINE FEED initiates part
performs the transfer of data.

of the program which

The Teletype prints out a heading for the data list as:

CHAN

STBLK

As each specified channel is converted,

the Teletype prints the sampfollowed by the block number on the formatted LINCtape where the coxtiguous data begins (STBLK) and the number
of blocks used by the data (NB)
led channel number

(CHAN)

When all requested channels have been converted and the list on the
Teletype is completed, a final message appears on the scope.
5. 6

Message

REQUESTED DATA
HAS BEEN TRANSFERRED
TYPE R FOR ANOTHER JOB
TYPE H TO HLT
REPLY

Typing R followed by LINE FEED causes the program to return to the
1.
Another experiment with segmented data can now be conver-

message

ted.
If no other transfers are needed at this time,
by LINE FEED causes the processor to HALT.

typing H followed

Note that Sense Switch 0 can not be set to one once message
is displayed.

of ADCON

If the last block of tape is used up before the transfer is completed,
the message E.O.TAPE is printed and the bell rings on the Teletype

and message

is redisplayed.

(None of the ADTAPE command actions

can be used with ADCON.

5-3

5,7

MESSAGE SEQUENCE
ADCON
DATA FROM THE DATA TAPE IS TRANSFERRED
TO A NEW TAPE IN CONTIGUOUS BLOCKS
TYPE C TO CONTINUE _

LOCATION OF DATA
TO BE TRANSFERRED?

STARTING TBLK
UNIT

TRANSFER LOCATION?
STARTING TBLK
UNIT

CREATE FILES FOR

CHANNEL NUMBER
TYPE A FOR ALL CHANNELS SAMPLED
TYPE C WHEN FINISHED SELECTIONS

y
CAUTION
IF UNIT 0 IS USED TO COLLECT
CONTIGUOUS DATA, REMOVE DIAL TAPE

TYPE T TO BEGIN TRANSFER

EXIT TO PART

1
REQUESTED DATA
HAS BEEN TRANSFERRED
TYPE R FOR ANOTHER JOB
TYPE H TO HLT
REPLY

5-4

APPENDIX A
ADTAPE TAPE BDRMAT

The tape block (TBLK) used to start storing data by ADTAPE is specified in message 4 or 7.
The first block is used to store the set of
parameters used to control the experiment in the first locations of
the block as follows

Location
1
2

3
4

Contents

Starting A/D channel
Number of consecutive A/D channels to be
sampled

Starting tape block
Value used to initialize the clock control register

Value used to initialize the clock buffer preset register

Delay after sync
Sync code

Sync parameter

Stop code

Stop parameter
Last tape block used to store the data

The actual experimental data storage starts at block TBLK+1 and continues in succeeding blocks until the experiment is terminated.
The data is stored on tape in four block chunks
Each
(2000^ words).
2000 word buffer is divided into a number of equal sections such that
the number cf sections equals the number of channels being sampled.

Remember that the number of channels sampled must be 1, 2, 4, 8, or 16.
A buffer will therefore be sectioned in one of the five following
configurations, depending on the number of channels sampled.
1

CHANNEL

0000

CHANNELS
FIRST

400,

STARTING

CHANNEL

4Wc

CHANNEL

SECOND

CHANNEL
2000,

2000,

0000

*20

/ADTAPE .20
/3/31/70
0003

i^004

/PAGE

0005
0006
0007
0010
0011
0012
0013
0014
0015
0016
0017
0020
0021
0022

PHODE
*0

0000
0001
0002
0003
0004
0005

0010
0011
0012
0013

0000
0000
0000
0000

0000

5)402

JMP

1200
0000
0000
0000

P0P8IN
8ETA3*
8ETA4,
BETAS,
*10

0
0
0

XR0,
XRl,
XR2,
XR3»

0
0
0

i^023

0024
0025
0026
0027
0030

0020
0021
0022
0023

i^03l

002&
0026
0027

5421
0200
0000
1600
0660
1226
1221
7464

0040

0000

0041
0042
0043

0060
1/61
0002

0044
0045
0046
0047

5402
1170
1777
7764

0050
0051
0052
0053
0054
0055
0056
0057
0060
0061
0062
0063
0064
0065
0066
0067
0070
0071
0072
0073
0074
0075

0001
0001
0001
3100
0020
0005
0001
0001
0001
0000
0000
0002
0047
0400
7774
0003
1243
0000
0303
0000
0000
0000

^032
0033
0034
0035
0036
0037
0040
0041
0042
0043
0044
0045
0046
0047
00 50

0051
0052
0053
0054
0055
0056
0057
0060
0061
0062
0063
0064
0065
0066
0067
0070
0071
0072
0073
0074
0075

0024

JHP

,+1

XTART
ENXM,
OKSAMA
ECA,
DPY,
SAMXTA,
M314,
«40

OKSAM
ECHO
DISPLY
TAPEX
•314

LMODE
SET I
LRTN
POP
PHODE
JMP
SAMXIT
1777
-14
I

SMXT,
C1777,
M14,
*50
STCHAN* 1
NCHAN,
1
STTBLK, 1
CLOCKl. 3100
CL0CK2, 20
SYNDLYi 5
SYNCONr 1
SYNNUM, 1
STOPONf 1
STOPNM# 0
0
2

PLIST#
C400,
X4

C3^

TAPEA,
CCXSAVi
C303,
BEFORE.
ENREG,
IXMASK,

STCHANel
400
-4
3

TAPE
0

303
0
0

0076

mil

010i3

^1100

0101

010i^

r.n02

010^
0104
0105
0106
0107
0110
0111
0112
0113
0114
0115
0116
0117
0120
0121
0122
0123
0124
0125
0126
0127
0130
0131
0132
0133
0134
0135
0136
0137
0140
0141
0142
0143
0144
014&
0146
0147
0150
0151
0152
0153
0154
0155
0156
0157
0160
0161
0162
0163
0164
0165
0166
0167

(n04
vU0t?

W106
0107
0110
0111
0112
0113
0114
0115
0116
0117
0120
0121
0122
0123
0124
0125
0126
0127
0130
0131
0132
0133
0134
0135
0136
0137
0140
0141
0142
k:i43
13144

0145
0146
0147
0150
0151
0152
0153
0154
0155
0156
0157
0160
0161
0162
0163
0164
0165
0166
0167
0170
0171
0172
0173
0174

0153
0167
0000
0000
0000
0000
01300

0000
0000
0000
0000
0000
0000
0000
0000
0000
1000
2000
0000
0000
0000
0000
1613
1605
0000
0000
5t?33

STACKT^
STAC,
STACKE*
DISl,
0IS2,
TBLK*
QCTR,
DELTA*
BUFTOPi
BUFFUL*
TOfPTS#

SAMFLG,
STORFGi
SAMINSi
C1000I
C2000#
DISPlf
DISP2i
PUTPTRi
DISCTR,
SAMSTT,
FSAM,
8INIT.
CLKDLi
SJMP»

1000
4t?35

1040
0000
0000
0000
0000
0000
0000
0000
0000
1040
1064
1113
0472
7000
0100
4001
5001
6001
7001
4002
5002
6002
7002
4003
5003
6003
7003

SjMS>

QSTACK-1
QSTACK*i3
0

0
0
0
0
0

0
0

0
0
0
0
0

1000
2000
0

0
0
0

SSTRING-1
FSTSAM
0
0

JMP I
SAMEND
JMS 1
THING

ACf

LI I

BUFLIMi
RET»
CCMASKi
INHASK*
OUMASK*
MONSW.
THINGA*
QSETA,
TIDLEA,
MONA#
X1000#
C100I
QSTACKi

+ 1

0
0

0
0
0
0

THING
QSET
TIDLE
MONITOR
«1000
100
4001
5001
6001
7001
4002
5002
6002
7002
4003
5003
6003
7003

/INITIALIZE MODE FOR ADTAPE
/

PMOOE
*200
/

0175
0176
0177
0200
0201
0^02
0203
0204
0205
02 06

0207

0200
0201
0202

7300
6002
6141

0203
0204

7345
0002

02 05
02 06

0207
0210

7001
1052
3105
1105

02 11

11 52

0<i 11

021^
0210
0214
0215

0216
0 217

0217
0220
0 221
0222
022 3
0224
0225
0226
022/
0230
0231
0232
0233
0234
0235
0236
0237
0240

7700
7402
lo65
3141
1100
3011
3003
7130
3 004
3103
1101

01£

MO
1
ky^: 1

0 220
0 222

022 3
0224
0225
0226
02 2 7

0230
0231
"J

0233
0234
0235
0236
0237

02 40

02 41

0 2 41

0 242

"7 "7

70 41

3102
13 75

3423
3104
7040
3073
7040
1051
7440
5242
1121
5263
1366

0 24 2

0 24 3

0243

0244

02 4b
02 4 6

5247
1120
5263

t'i

02^3

440

02 4 6

02 4 7

13 67

0 24 7

0250
0251
0252
0253
0254
0255
0256
025/

7 540

0250
0251
0252
0253
0254
M1KC
O

f7(

^ CO^

02 61

loco±

0262

O^O

02 ^0 0
02 64

no A

Wd OH
oA

5255
7200
1065
5263
1066
7740
5262
1371
5263
1153
3140
1121

'""5

31 10

026 6

1140

02 66

v c.

0267
0270
0271
0272
0273

0270
0271
0272
0273
0274

7(71

3111
3112
3113
3114
1140

XTART

CLA CLL

lOF

LINC
LMOOE
JMP GOGO
PDP
PMODE
I AC
TAD
STTBLK
OCA
TBLK
TAD
TBLK
TAD
X1000
SMA CLA
HIT
TAD
SAMAN
DCA
RET
TAO
STACKT
DCA
XRl
OCA
8ETA3
STL RAR
OCA
BETA4
DCA
DISI
TAO STAC
CIA
DCA STACKE
TAD ISEOL
DCA I OKSAMA
DCA
DIS2
CMA
DCA BEFORE
CMA
TAD
NCHAN
S2A
+3
JMP
TAD
C2000
JMP
EX
TAD
XI
S2A
JMP
.*3
TAD
C1000
JMP
EX
TAD
X2
SMA SZA
JMP
CLA
TAD
0400
JMP
EX
TAO
X4
SMA SZA CLA
+ 3
JMP
AU
C200
JMP
EX
TAD
C100
DCA
BUFLIM
TAD
C2000
DCA
8UFT0P
TAO
BUFLIM
CIA
DCA
BUFFUL
DCA
TOTPTS
DCA
TOTPTS+1
DCA
T0TPTS*2
TAO
BUFLIM
«

•

7S
1/1

?7S
/ A
O
c7

Oil

"'SI

^ 7 ft
M9 7 7

JX19
9
w 1X 9
C£

vj t? if

O X £; O

£?i277
XJ Cm f f

it/

TU \jtO\L}

w iw i.

O KJ J,
O VJ C.

ft
4
ft
U
*t O
4494

IC/

16'

AU
n p AA
UU
TA
A Pi
U

(7!
iC^

0 <S0 3

0 30 4

XX X
TIM
X0
O^ 1

03 04

03 05

J. ky

ly <J
iu

£.

tCf

K-i

(71

ty U
O 0ft

{Jl"'^

7C^

171
icJ

^
o

1
X 1X

R
9O

7
/

[71
fey

w O J. JL

011/7
XXX/

Wo i<:

?7
"71
0 / /o

0X0

YLi\J VJ f
«J
fey

wXc
OXo
PI"?
If O 1
*t
X4
IC O X

0316
OX
M
ky o ? M
w
tJ \J C X
icJ

UC A

TAD

wo X o

O C X.

41
^1
i5 1 1
O
X X ft
X 0 O *T
O *t 1

O C £_
9

91
117/

T
I

1117
X
/

TAD

O 1 1 K/

UU A

TAD
OCA
TAD
OCA

>o
iu

£^1

^
09
(C

£. t>

f71

X 1 0 /I
*t
1 Ct
Ot4 ik3

o vJ X

9 1X 1
1 A
0

3?
WC

CI
O9
iC Kl

« j5
w
O3
Ow~
M :s B

033 0

ity

0331
wwX

1711
O

Nx #

TAD
DCA

1 1

T AU
A n

!^4
1 l?i
0** Xk3

UCA

033 7
0 340
0341
0342
0343

OX 0 C
wx oo
c;

o1o

AU
P
U TI AA

(^7 4 4

ftl
"^"X
wX0
0

O4
^ 1X

0342
ky

ft 1

O T

79
CI
/
«y W

0345
0346

0346
0347

"^4
61
wXO
*T

0 347

i(y

03!?0

03tj 1

l7i

yVJfX
A

Klvl L/X

w^C
C5
?5 5 .1
K/ O
O
W T
IV O V
0PO
l^3S 7

XO 5 /

fc)

ICf

W U KJ

(71

iOO -? t

00 90

K/O

1
X (7!

o9 /

OOM

CI < ft }6/
k3
(71

"^ft
1
O
OX

ft9

£i'l3 ft 1

R
97
/

"Sft

-7 U
M
7
la

NJUMP

/?!

^51

4
4
"

01
10 *t iiP
/71
icJ

f7<
!cl

7
0
A
O

JMP I
INSSW
INEXF
INCCX

171
16)

03 63

(71^
ft4
J£J

ft 1

0364

US
O ft
^ A ft
KJ v> 0 O
rTi

1
^1
f f I 1

XI #

•1

0366
0367
0370
0371
0372

0367
0370
0371
0372
0373

lilt
0037
0200
0004
1605

X2*
C37,

-2
37
200

0
K
0 710/
4

0362

^
O ft
U vJ
O O"

A
CLOCK-c

«i
iw «y !cJ <!.
(71

oArl AIM #

6141
SAHEN

1
OX4
*t X
171

CLAB
CLA
TAD
C300
CLEN
OCA ENREG
DCA CCXSAV
TAD
SYNCON
TAO
INJUMP
DCA
TAO
SYNNUM

0w7
/ j1
*t

(7!

C100

CL AA

{/j

(6'

(7!"^

{/I

03 44

Itf

f/t (91
!cl

XR0

T AO

9 4T
X^R
7/ w 4
n 11

(/I

o JMP
I

AD
UL AW
r»

1 1
7
1X9
0

P
D
OLLK

!71

INI

^9
u 1o
<:
7
/ 9
to

K
^4
T sy
Sy O

LINCI
XR0
SAM I NS
SAM INS
XR0
C2
XR0
s jms
XR0
oT D P
STOHFG

X X 0£

O ww
oo /

MD
Jrlr

CI
IW

C!3."^
k; w o A
o

fc.

^ c.

0334
0335

c
bra

03 33

tJ \J

FSTA
SAMSTT
vD a
XK0
NCHAN
C
T P D t~ P
b TOKFG

ULA

0^1

t. /
O 97
YJ O 0*J
(71

kil

W09
c
(AID f\

C A T hi C
bAri
I Nb
I

n1 A

7171
i<y

03 23
ky

SAM I NbC

o ky X iv

'"^

Cl 00
O A kA T

T AU
A n

1 l7tP;i
XW9X

OX/
(A < P M
0 d. W

0X9
ICF

^31

AMDU
AN
AU
DC A

p A
tCA
p
o 0{
U<:!^k}0
r*

D
D Ir M
N Ti T
C
AM
b T PU
wn AN
p
UOt: 7/

1 1 9 A
X
x<: 0

W"^ 1 4

f^''; 1

OCA
TAD

ic'

C
A MC
P
oAnr
Lb
n
D
orl
D TI c
n
od o
c
U 1T Or

«^

nn
DEL TT A

Uw A
UU A
Uu A

C200.
C4,

FSTA,

FSTSAM

,+0

0373

03/4

03 74
0 37 5

03 75

kIo00
21 31

0 40 0

04"01

0401

0 4 02

04 02
04 03
04 04
0 4 05
04 06

0407
0410
0411
0412
0413
0414
0 415

04 16

0417

k54 1 /

0 4 20

04 20

0 421

0 4^:^ 1

04 22

0 423

0423

4313
3702
5213
4321
432 6
*7 c
1
1075
mo o
3022
1142
3143
10 60
0317
i
Ur.

0000
562
0426
0431
ffi (ft

04 26

43 13

0427
0430
0431

0427

3 7 04
-7
li o

04 34

0435

04 36

0437
0 440

0 4 41

0441

NCCX

N4 f

Oi Ck

04 34

0 43 5

32 20

0437

0433

Q
C Q iX

04 24

(HA 2 O
32
04
04 ^5o
04 o4

M
C" V C"
NEXT

fin

0425

04 30

T
I

NSSW

^£ 1 3

0425

0 431

37 03

04 24

04 32

IS2 CLKDL

#4 00

0 400

0405
0406
0407
0410
04X1
0412
0413
0414
0 415

300

IS HDL #
/

0376
0377

04 03
04 04

r* *i f7< ffl

JMS
DCA
JMP
JMS
DCA
JMP
JMS
TAD
DCA
TAD
OCA
TAD
AND
TAD
DCA
TAD

SSSET
SSA

EXLSET
EXA

IN4

CCXSET
IXMASK
ENXH
CCMASK
INMASK
STOPON
07

JMPSTI
,+2

STOPNM+2

JMPS T

JMP

OUSSW
OUEXL
OUCCX
IN5

oussw*

52 37

4321
3/05
5237

OUEXL#

43 26

OUCC X

1142
3144
7200
1306
6141

IN5,

044 2

JMS
SSSET
OCA I
SSO
JMP
IN5
JMS
EXLSET
DCA I
EXO
JHP
IN5
JMS
CCXSET
TAD
CCMASK
DCA
OUMASK
CLA
TAD C140
LINC

LMODE

04 4 3

04 4 2

0444

0443

0445

0 4 44

0446
0447
0450
0451
0452
0453

0445
0446
0447
0450
0451
0452

04 54

04 !pi3

0004
0011
2105
4447
0717
0000
0011
2507
0001
0002

EST
CLR
ADD T8UK
STC S8LX
CHK 10

SBLX,

CLR
ADD C110
AXO
POP

0 455

04 54

046

0457

04 62
0 4 63
04 64

04 60

70 00

04 61
04 62

0465
0466
0467
0470
0471

0463
0464
0465
0466
0467

4710
4711
5261
4712
4711

0455
0 4 56

PMOOE
CLA I AC

7201
3145
3106
6001

04 56
04 57
04 60

44 25

5264

MONl

M0N2,

DCA
MONSW
OCA QCTR
ION
NOP
JMS I
SYNA
JMS I
CHTTYA
M0N£
JMP
JMS I
STOA
JMS I
CHTTYA
JMS I DRY
JMP
M0N2

/SSW

/EXL
/CCX

0670
0671
0672
0673
0674
0675
0676
^tll
0700
0701
0702
0703
0704
0705
0706
0707
0710
0711
0712
0713
0714
071b
0716
0717
0720
0721
0722
0723
0724
072b
0726
0727
0730
0731
0732
0733
0734
073b
0736
0737
0740
0741
0742
0743
0744
074b
0746
0747
07b0
0751
0752
0753
0754
0755
0756
0757
0760
0761
0762
0763
0764
0765
0766

0660
0661
0662
0663
0664
0665
0666
0667
0670
0671
0672
0673
0674
0675
0676

0000
6041
5261
6046
3257
1344
6041
5266
6046
1067
6041
5272
6046
7200
5660

ECHO,
TSF
JMP
TLS
DCA
TAD
TSF
JMP
TLS
TAO
TSF
JMP
TLS
CLA
JMP

.«1

KHAR
C212
.•1

ECHO

/PAUS AFTER P UNTIL C IS TYPED
/

0677
0700
0701
0702
0703
0704
0705
0706
0707
0710
0711

6002
6031
5300
6036
1345
7640
5277
1072
4260
6001
5600

PAUS,

KSF
JMP
1*1
KR8
TAD
M303
S2A CLA
JMP
PAUS
TAO
C303
JMS
ECHO
ION

JMP

CHKTTY

/SET

DISPLAY REGISTERS OISl AND DIS2

071^
0713
0714
0715
0716
0717
0720
0721
0722
0723
0724
0725
0726
0727
0730
0731
0732
0733
0734
0735
0736
0737
0740
0741
0742
0743
0744
0745
0746
0747

1257
1346
3257
1257
1347
77l0
5324
1257
1350
3257
1103
3104
1257
7041
3103
5600
7467
7456
7460
7450
7455
7452
7517
7506
0301
7470
0212
7475
7520
7766

OISSET

DISSl,

M311,
M322,
M320,
M330,
M323,
M326,
M261,
M272,
M301,
M310,
C212,
M303,
M260
M12,
,

TAO
TAO
DCA
TAD
TAO
SPA CLA
JMP
TAD
TAD
DCA
TAD
DCA
TAD
CIA
OCA
JMP I
-311

-322
-320
• 330
-323
-326
«261
-272
301

-310
212
-303
«260
-12

KHAR
M260
KHAR
KHAR
M12

DISSl
KHAR
M7

KHAR
DISI
0IS2
KHAR
DISI
CHKf TY

0767
0770
0771
0772
0773
0774
0775
0776
1000
1001
1002
1003
1004
1005
1006
1007
1010
1011
1012
1013
1014
1015
1016
1017
1020
1021
1022
1023
1024
1025
1026
1027
1030
1031
1032
1033
1034
1035
1036
1037
10 4 0

0750
0751
0752
0753
0754
0755
0756
0757
0760
0761
0762
0763
0764

7771
1716
1071
0143
7650
5365
6134
1074
0022
6134
3074
5764
1744

M7#
DI ALAf

076!?

1 7 71

0766

3370
5770
0000
1400

07 6 7

0770
0771

01 AU

TAD CCXSAV
AND INMASK
SNA CL A
JMp

r i< 1

{>!

CI
w W FN
w •«

i;.

AMD FWXH
WW

t»

VMr
i
w w w r\

n
1

^ J.

is*

ei<

.^7&K

n
P\
KJ n
\i A

IMP

0
w

4i 1

«1000
10 00

11 16

1001
1002
1003
1004
1005
1006
1007
1010
1011
1012
1013
1014
1015
1016
1017
1020
1021
1022
1023
1024
1025
1026
1027
1030
1031

7650
5445
2114
5210
2113
7000
7000
2111
5236
4264
4313
7450
5220
3115
5470
3115
7100
1130
1121
7420
7410
1121
3130
1130

1041
1042
1043
1044
1045
104 6
1047
1050
10bl
1052
1053
1054
1055
1056
1057
1060

1033
103 4
1035
1036
1037

2110
5445

1040
1041
1042
1043
1044

0000
3524
il25
1103
7640

1062
1063
1064
1065

1046
1047
1050
1051

1%'S'i.

SA ME NO »

<i«

r «

jMP

Cm XT

JMP

Q A MX

IS?

TDTPTS+I

NOP
NOP

SAM3,

!S2

Rurriii

SAMS
QSET

SAM7,

JMP
JMS
JMS
JMP
Nr

C^AMTKi
O A n & IN
<?AMri r:

T T ni r

DCA
IMP

SAMEN*
SAHll*

TAPTA

ncA
CLL
WW
Tad
TAD
SNL
SKP

SAMPi r:

r Im 1 t

C2000

EMU

DCV MA RQ

?
4

M T4 T
f

TA n

D TM TT

V HA
Ur
TsMu
A n

Q Uir
Tn
r
D
Ur
ri T M
p{
oUruin

fC,;

54 45

•

3 1 j PI

1140
7041
3111

Mu
W SH

CIA
OCA
8UFFUU
JMP I SMXT
"
SAM5,
ISE
BUFTOP
JMP I SMXT
/ROUTINE TO BE USED IN S/
/

•7

THING,

THING2,

DCA 1
PUTPTR
TAD
DISCTR
TAD
OISl
S2A CLA
JMP
THING2
TAD
PUTPTR
OCA
DISPI
JMP
THINGI
TAD
DISCTR

1524
3122
5257
1125

1066
1067
1070
1071
1072
107^
1074
1075
1076

1052
1053
1054
1055
1056

XMl

1053

imi
1060
1061

1104
7640
5257
1524
3123
2125
1124
1107
3124
5640

THINGl

TAD
DIS2
S^A CLA
JMP
THINGl
PUTPTR
TAD I
0ISP2
OCA
DISCTR
ISi
TAD
PUTPTR
TAD
DELTA
PUTPTR
OCA
JMP I
THING

1100
1101

/TIHE (LONGEST 49,5

110£^

1103
1104
1105
1106
1107
1110

nil
1112
1113
1114
1115
1116
1117
1120
1121
1122
1123
1124
1125
1126
1127
1130
1131
1132
1133
1134
1135
1136
1137
1140
1141
1142
1143
1144
1145
1146
1147
1150
1151
1152
1153
1154
1155
1156
1157

1160
1161
1162
1163
1164

1064
1065
1066
1067
1070
1071
1072
1073
1074
1075
1076
1077
1100
1101
1102
1103
1104
1105
1106
1107
1110
1111

0000
1312
1106
1275
7500
5277
1276
3106
5664
7763
0015
7200
1304
3010
5703
1313
1104
0306
0301
0323
0324
0000

QSETi

ML I M

TAD
TAD
TAD
SMA
JMP
TAD
DCA
JMP
-15

LIHX;
TYPAX»

USi

C4X
QCTR
MLIM

TYPAX
LIMX
QCTR
QSET
I

OLA
TAD LT
DCA XR0
JMP I •*!
TYPGO

LTi

306
301
323
324
0
/

1112

0004

C4X,

/CHECKS STATUS OF TAPE'
/

1113
1114
1115
1116
1117
1120
1121

0000
7001
6141
0416
0011
0002
5713

1122
1123
1124
1125
1126
1127
1130
1131

7200
1062
7161
1113
7530
5337
7440
5745
1063
7141
1114
7630
5745
7200
1744
3343

IX'6'I

1133
1134
1135
1136
1137
1140
1141

TIOLE,

lAC

LINC
416
11
2

JMP
TIOLE
/CHECK TOTAL PTS TO ST(
I

TOTP,

TOTPl,

CLA
TAD
CLL
TAD
S^L
JMP
S^A
JMP
TAD
CIA
TAD
S2L
JMP
CLA
TAD
DCA

STOPNM+l
CML CIA

TQTPTS+1
SPA

TOTPl
ALDA
STOPNM+2
I

CLL

TOTPTS+2
CLA
ALDA
I
I
•

STOPPP
+2

HOP

1 X*f C

11 QO

11 40

1144

00 00
14 31

114t?

1^65

ALDA

1146
11^/
1150

1357

£NSEN#

16/

'i.

1171
1172
X1 / H
! T K

llt?l

1176
117 7
1 200

1 lb2
11^3
115 4
1155
1156
1157
4
m
X1O0
1161
1162
110 0

1201
1202

O
t n

/3I

C\u /

fTi

1
1 CA
X
C ±ia

T r> ri n
b T OP rP t
C"

vsr

TAD
OCA
TAD
TSF
JMP
TLS
SHA
JMP
JMP

6041
5351
6 04 6
7 640

5350
5551
X157
0207
0207
0215
0212

i:L

11 0 0

03 04

1 C 4. O

XX0 /

ffl

1 c 1 4

11/0

6X41

rx nj ns

1c x 0

11 /X
1 7 P

?1X 7/
1

!6!

Ic.'

XX / 0

T/^

laii^l 0

•'5

XX /P

fil l9l

Ix / o

5426

0 4*5 0

12 0 2

VXu /

CLA
,-5
1

MONA

LINC
LMODE
XSK
NOP
XSK
NOP
POP

yy «i

,-1

SAMX IT

1215
1
X ii.

207
207
215
212
305
316
304

» ni C

XA 0

ENl
XR3
XR3

116 5

STOPP
ALDONE

r*\

^5013

ii!

£ 1

,*X

1 X /O

•*

JMP

/ 4 0

1(^2

BETA3

BETA4

PMOOE
9A

g p 7/
i «s

fci

IC)

fc-'

1231
COc

JL c

v^'

O
12 05

c 0

1 'J
J.

1
i^OD
9 T 7/
-ICO
40
a.
19£ 41J.
X
1 J A

120 6
120 7

1 1 1 yj

1211
1212

/»<P

1 1

6151
5210
7200
0
/ 200
6131
fT(

ffl

A 1 T

iLi

1214

0X35
K
7500

1 iSX.^

K C* 0

ffl

X C *r 3
1
f ft
Xy
0
t4
1
*t 7
XP
^4
?

i:^

4d 0

P K

113 7
7104

XC Jc

0s
^W
X £-

X <^ c ^

0)6'

12 25

5400

•t

t^'

X?
c ^B
1

1256
12&7
1260
1261
1262
1263

CLOCK,

CM nt

f/i

X £, C ^

61 4i

1230
1231
1232
1233

2X22
0341
0143
0011

C100

JMP
CLOCK
CLA
JMP
TAPE
CLA
6131
HLT
CLSA
SMA
JMP DISAB
CLA
JMP
OKSAMA
OCA CCXSAV
TAD
LI
CLL RAL
TAD
AC
ION
JMP I
0
I

0ISA8#
TAPEXi

1136

61&1

52 4 3
"5?

1 Cl «J

X X /
X £: c 45

RAR
OCA
TAD

''J

0i A
i2JLO

XtH0
"
X

JMP
SAMXTA
/INTERRUPT HANDLER
«1200
POP8IN1 OCA
AC

GOCAT,

OlSPLY*

LINC
LMODE
ADD OlSPl
SCR 1
OIS BETA3
CLR

/BYE BYE

1264

1234

12 65

12 35

1266
1267
1270

1236
1237
1240

2123
0341
0144
0011
0002

1241
1242

5626
7777

ADD DISP2
SCR 1
BETA4
DIS
CLR
POP
PMODE
JMF
DISPLY

1^:71

1272
12 73

1274
1275
1276
1277
1300
1301
1302
1303
1304
1305
1306
1307
1 310
1311
1312
1313
1314
1315
1316
1317
1320
1321
1322
1323
1324
1325
132 6
1327
1330
1331
1332
1333
1334
1335
1336
1337
1340
1341
1342
1343
1344
1345
1346
1347
1350
1351
1352
1353
1354
1355
1356
1357
13 60

1361
1362

MIX,

/TAPE

«1

INTERRUPT HANDLER

1243
1244

1340
6151

1245
1246
1247
1250
1251
1252
1253
1254
1255
1256
1257
1260
1261

7200
1106
7450
5221
1242
3106
i4ii
3337
1337
0341
1105
3270
1337
0342
1343
3266
6141
0000
0716
0000
0002
2105
1105
1152
7700
5311
1011
1102
7640
5305
1100
3011
1115
7650
5221
5541
1322
3010
6041
5313
1^10
6046
7640
5313
5744
132 2
0215
0212
0324
0301

12 62

1263
1264
1265
1266
1267
1270
1271
127 2
1273
1274
12 75

1276
1277
1300
1301
1302
1303
1304
1305
1306
1307
1310
1311
1312
1313
1314
1315
1316
1317
1320
1321
1322
1323
1324
1325
1326

TAPEi

C200X

TAD
6151
CLA
TAD
SNA
JMP
TAD
DCA
TAR

QCTR

TAPEX
MIX
QCTR
T

VP i
Tr
MD
c. n r

U 1/ A
TA
A n
U
A Mn
A\ IN U
TA
A n
U
n
UUp AA

TrMP

UP ? T

TC MP

A IN U
TA n

P7y

O *T iw >N

nr
A
WVW
U.

(71

71 A

WRITE*

V
Oi

Q
C

T PI K
TRI k

T <53l
1

TAD
T AH
9
A
v\ M
0M
vl

A Xvvv
ri
A
VLn

T A pr 1

T An

XRl

STACKE

TAD
SjfA

TAPE3»

TAPEli

TYPGOi

CLA

JMP
TAD
OCA
TAD
SNA CLA
JMP
JMP I
TAD
DCA
TSF
JMP
TAD I
TLS
S2A CLA
JMP
A
JMP

TAPE3
STACKT
XRl
5AMFLG

APEX
ill

.ISTP
R0
.-1

APEl+2
AKE

LISTP,
215
212
324
301

1363
1364
1365
1366
1367
1370
1371
1372
1373
1374
1375
1376
1377
1400
1401
1402
1403
1404
1405
1406
1407
1410
1411
1412
1413
1414
1415
1416
1417
1420
1421
1422
1423
1424
1425
1426
1427
1430
1431
1432
1433
1434
1435
1436
1437
1440
1441
1442
1443
1444
1445
1446
1447
1450
1452
1453
1454
1455
1456
1457
1460
1461

1327
1330
1331
1332
1333
1334
1335
1336
1337
1340
1341
1342
1343
1344

0320
0305
0215
0212
0212
0207
0207
0000
0000
0200
7000
0007
0640
1532

320
305
215
212
212
207
207
TEMP.
C200X^
C7000,
C7Xi
C640X,
ALFAKEi

200
7000
7

640
AL14

LMOOE
1345
1346
1347
1350
1351
1352
1353
1354

0011
3354
0004
0011
0001
0004
6000
0200

GOGOi

CLR
ADO C2X0
EST
CLR
AXO
EST
JHP 0
200

C2X0,

PHOOE
/

**1400
/

14^0
0000 SYNGO,
0
1401
7200
CIA
1402 1206
TAD
JMPSYN
1403 1056
TAD
SYNCON
1404
3205
DCA
1405
0000
0
1406
5606
JMPSYNi JMP I
t*0
1407
1412
SSW
1410 1423
EXL
1411
0752
CCX
1412
7001
SSW,
lAC
1413
6141
LINC
1414
0000
SSWSYN,
1415
0011
11
1416
0002
2
1417
7650
SYNCl,
SNA CLA
1420
5600
JHP I
SYNGO
1421
5622
JMP
CLAD
1422
1744
CLAD,
CLOCKG
1423
7001
EXLi
lAC
1424
6141
LINC
1425
0000
EXLSYN, 0
1426
0011
11
1427
0002
2
1430 5217
JMP
SYNCl
I

1431
1432
1433
1434
1435
1436
1437
1440

0000
7200
1237
1060
3236
0000
5637
1444

/CHECK FOR STOP SIGNAL
STOPP,
CLA
TAD
TAD
DCA

JMPSTO
STOPON

JMPSTO* JMP I
SSSW

/POP

1462
1463
1464
146 b
1466

1 ^1 4 2

X "4 5 n

be. AL

4 62

C
r* P Y
bu
UA
T riTP

'],

1 i,

144 4

7/ M

6141

14 67

14 45
14 4 6

1470

144/

0011

14 71
14 72

14 50

(A fA fTl

i
-1

r;!

iiJ iiJ

fA rP! c;s

Q
o T HP
Ur 1J. >
1

pool

14 75

1*} P'f

/ la

1476
1477
1500
1501
1502

1455
1456
1457

ol*H

14 6 0
14 61
14 62

1506
1507
1510
1511
1512
1513
1514
1515
1516
1517
15i^0

iC.

143 0

1!^05

ooyQTn

w k5 p O

1473
147 4

1^03
1504

014 4
5251

14 65
14 66
14 67
14 70

"i 'I

14 /*t

1475
14/0
14/7

bt AU >
I

nV
OUUA

fcr

c? r»

1140
11 11

ALl

A A
/041
314 0
~f fA

15 01

1 52 4

150 3

5 30 0

lt?2t>

ll3 04

2111

1526
1527
1530
1531
1532
1533
1534
1535
1536
1537
1540
1541
1542

150 5

7 410

15 06
15 0 7

5311

1510
1511

5 27 3

151<£

151
1514
1515
1516
1517

15tc0

3 1 4 j.
R A T/ 0

15 43

15 22

00 01

AL5?

1544
1545
1546
154 /
1550

1 D <S O
152 4

OllP
1106

AL3

•1

1 .1

6002

IDF

U /I T
KC

JMS
JMS
SNA
JMP
OCA
TAD
OCA
JMP

ffl

3115
Xo 70

/ 0 <i k3

1526

->v5

1 c: 1) *?
5<:; /

1
1

f;'s

1531
153<!;

STQPl
JMP
TAO CCXSAV
OUMASK
AND
STOPl
JMP
CLA
CLLR
8UPLIM
TAD
TAD
bufful
SNA CLA
JMP
AL3
BUFTOP
TAD
PUTPTR
OCA
TAD
NCHAN
CIA
BUFLIM
DCA
STL PAR
JHS
TH INGA
BUFL IM
ISH
JMP
AL2
ISZ
8UFFUL
SKP
JMP
.*3
BUFTOP
IS2
JMP
All
I

(71

o
24
K

7/ 0 K
Pit)
u -v o T
->3£ /
o
(Ti

6002
/;! ffl

P00

7/ <i 0!
low

1534
1535
1536
1537

6141
0001
0002
1064

1555
1556
1557
1560

j'T^

A ^ U w IM C

/ X

U' p
r
0 T nP
«^

MP
TAP
IMP

61 32

7650
5324
1110
3124
1051

0^11
Mmo
0002
52 51
10 71

f
A
W» L A

ffl

146 3
1464

1471
1472
A
14/3

Q
A
IN A
OM
IMP

K
QAR
-? £. 0 y

1521
1522
1523

15!?1
C KO
15D2
4 K c: '2
1553

TAP
i AU

C C Q LI

/Tl

A 1

qse:ta

TIOLEA

AL5
SAMFLG
AL5A
RET
TAPEA

ION
SAMFLG
OCA
TAD
QCTR
SZA CLA
JMP
AL3
JMS I
TIOLEA

SNA CLA
JMP
AL6
IGF

CLA
LINC
1

TAD

PLIST

/CLSA

1561
1562

1540
1541

-^010

156 3

154 2

u 107

1^64
1565

1543
1544

1046
3011
1410
3411
2107
5345
7040
1105
3411
7130
1052
3362
6141
0641
0716

1!?66

154!?

1567
1570
1571
1572
1573

1546
154 7
15&0
1551
1552
1553
1554
1555
1556
1557
1560
1561
1562

lt?74

1575
1576
1577
1600
1601
1602
1603
1604
1605
1606
1607
1610
1611
1612
1613
1614
1615
1616
1617
1620
1621
1622
1623
16 24
1 62 5

1626
1627
1630
1641
1632
1633
1634
1635
1636
1637
1640
1641
1642
1643
1644
1645
1646
1647
1650
1651
1

Asy

1653
1654
16t55

1656
1657

(

15 6 3

1564
1565
1566
1567
1570
1571
1572
1573
1574
1575
1600
1601
1602
160 3
1604
1605
1606
1607
1610
1611
1612
1613
1614

DCA
XR0
TAD
M14
DCA
DELTA
TAD
C1777
OCA
XRl
TAD
XR0
DCA I XRl
|S2
DELTA
JHP
al:i0
CMA
TAD
TBUK
DCA I XRl
STL RAR
TAD STTBLK
DCA AL15

1047

0 00 0

0002
1067
3145
5767
1146
1522
0104
2401
2005
1111
0000
2131
5426
1315
3200
6141
0000
0002
7200
1110
3124
7001
3125
0000

ALi0*

LINC
641
716

AL15i

TAD C3
DCA
MONSW
JMP I .1

ENSEN
AL5
0104
2401
2005
7777

AL5A#
ADPTR,

^1600
OKSAM,

IS2

CLKDL

JMP I SAMXTA
TAD
JMPBY
DCA
OKSAM
LINC

rSTSAMi

0
2

CLA
TAO
DCA
lAC
OCA

BUFTOP
PUTPTR

DISCTR

SSTRING
/

1715

5204

JHPBYi

JMP rSTSAM-l

/CALL DIAL "X" FROM TTY
/

1716
1717

6002
6141

1720
1721
1722
1723

7740
0642
00 6 3

2014

^ Q 4

1725
1726
1727
1730
1731

1733
1024
1063
0450
7726

DIALi

LINC
LHODE
JMP
LDP
SET I
2014
SET I
DITAB- 1
LDA I
STA I
A2E
JMP

FIXUP
2

BETA3
BETA4
8ETA4
BETA3
.•3

1660
1661
1662
1663
1664

1732
1733

166t?

•i

1 000
& ^ "7

17v34

1735
1/36
11
/
1/0
"7

0602
6015
0643
0721
7300

OITAB/

*T "7 rjt I'M

/»

r«

/TS

k^i^

IIF
JMP
LDF
RCG I
V
n
7\300

15
3

'7 ft

0
F I XUP

«1

loo/

17 41

wwwl

16 70

1742

00 04

1671

17 43

6000

clR
AXO
ESP
JMP

TAA
1/44
174?
1746
1747
1750
1751
1752
1753
1754
1755
1756
1/5/
1760
1761
1762O

1055
7041

PMODE
/START CLOCK
CUOCKGf TAD SYNDLY
CIA

17<i 4

17631
£
1764
176?
1766
1767
1770
1771
1772
1773

172t>

1774

5774
6040
1^20
6000
5773
3/74
0500
6001
0000
0000

1672
1673
lo74
16/6
1677
1700
1701
1702
1703
1704
1705
1706
17 0/

1710
1711
I7l2
1713
1714
1715
1716
1717
1720
1 /li 1

1722
1723

1726
1727
1730
1731
1732
1733
1734
1735
1736
1737

«l

"7 X.

•1

•t

1/41
1 /4<i

0 03 2

"7 yl "2

0033

1
1/^0
1

"7 >! yl

003 4
m n "7 c:

0035

1 / *tP
T y1 A
1/40

\0\0OQ

1/4/

0037

K Ol

00 40

17d1

0041

X /7c

1753
1754
1755
1756

\j t>

/440
5353
1315
3200
7410
3131
1053
6132
7200

82 A

2 1 45

5551
6002
6141

LRTNi

JMP ,*4
TAD JMP8Y
DCA OKSAM,
SKP
DCA CLKDL
TAD CLOCKl
CLUR
CLA
IS2 MQNSW
JMP I flONA
lOF

LINC
UMODE
STC cc
ADO 40
BSE 1
6000
STC QIT
ADD 22
108
6001
QITf

*20
LDA I
20
ESF
LOA I
QAJNIT-t,
STA
11
ADA
2000
STC 12
LOF 1
LDA I
I

QAlNITol
ADA

«AAA£NO

CO 0

6040
6057
6064
6071

1020
0020
0004
1020
0702
1040
0011
1120
2000
4012
0641
1020
0702
1120
6206
4013
1031
1072
Kf

0043
0044
0045
0046

•

SEGMNT
0020
0021
0022
0023
0024
0025
0026
0027
0030
00ol

1Am

START,

STC
LDA
STA
XSK
JMP
JMP
JMP
JMP

13
I

It
12

,-3
Ml
MA
M2

1757
1760
1761
1762
1763
1764
1765
1766
1767
1770
1771
1772
1773
1774
1775
1776
1777
2000
2001
2002
2003
2004
2005
2006
2007
2010
2011
2012
2013
2014
2015
2016
2017
2020
2021
2022
2023
2024
2025
2026
2027
2030
2031
2032
2033
2034
2035
2036
2037
2040
2041
2042
2043
2044
2045
2046
2047
2050
2051
2052
2053
2054
2055

0047

0051
0052
0053
0054

6105
6121
6135
6151
6203
0002

4055
4056

5656
0200

0057
0060
0061
0062
0063
0064
0065
0066
0067
0070
0071
0072
0073
0074
0075
0076
0077
0100
0101
0102
0103

0057
0000
0601
6020
6017
0057

00 50

0104
0105
0106
0107
0110
0111
0112
011
0114
0115
0116
0117
0120
0121
0122
0123
0124
0125
0126
0127
0130
0131
0132
0133
0134
0135
0136
0137
0140
0141
0142
0143

Ml,

JMP N3
JMP H4
JMP H5
JHP ME
JMP M6
POP
PMODE
JMP I LOCX
200
LMQOE
SET 17

MA,

Lir 1
JMP HIA
JMP 17
SET 17

JMPME,
JMPM6,

LOCX,

0601
6041
6017
0057 M2j
0000
6703
M2Ai
0232
0671
6227
0070
0671
0603
6020
6017
6073
0057
M3,
0000
6703
0262
0671
6227
0070
0671
0603
6141
6017
6107
0057 M4|
0000
6703
M4A,
0331
0671
6227
0070
0671
0603
6231
6017
6123
0057
M5,
0000
6703 M5A,
0421
0671
6227
0070

LIF 1
JMP MAA
JMP 17
SET 17
0

JMP QAINIT
MESS2
ANSWER
JMP CHKSNS

SET

ANSWER
LIF 3
JMP M2B
JMP 17
JMP M2A
SET 17
0

JMP QAINIT

MESS3
ANSWER
JMP CHKSNS
SET

ANSWER
LIF
JMP
JMP
JMP
SET

M38
17

M3A
17

JMP QAINIT
MESS4
ANSWER
JMP CHKSNS
SET
10
ANSWER
LIF 3
JHP M4B
I

JMP 17
JMP M4A
SET 17
0

JMP QAINIT
MESS5

ANSWER
JMP CHKSNS
SET

2056
2057
2060
2062
C KJ U
p cn A 4

>wi

20 66

2067
2070
2071
2072
2073
2074
2075

2077

0144
0145
0146
0147
0150
0151
0152
0153
0154
0155
0156
0157
0160
0161
0162
0163
0164
0165
0166
XW
0167
017 0
0171
0172
0173
0174
Sf

C. 4,

C J,
C X

IcJ

fc.

C J.

c. J.

2111
2112
2113
2114
2115
2116
2117
2
C ipci
J, &

2121
212 2
2123
2124
(c;

2126
2127
2130
2131
2132
2133
2134
2135
2136
2137
2140
2141
2142
2143
2144
2144
2144
2144
2144
2144
2144
2144
2144

0671
0603
6320
6017
6137
0057
0000
6703
0566
0671
6227
0070
0671
1330
1420
1600
6017
1420
3100
6171
6153
6703
0636
0671
6227

01 75

00 70

017 6
0177
02 0 0
0201

0671
0603
6531
6017
6171
0057
0000
6703
0527
0671
6227
0070
0671
1330
1420
0300
6017
6205
0045
0000
1330
0603
0040
0005
6000
0440
6756
6044
0623
2401
2224
1116
0740
0310
0116
1605
1440

0202
0203
0204
0205
0206
0207
0210
0211
0212
0213
0214
0215
0216
0217
0220
0221
0222
0223
0224
0225
0226
0227
0230
0231
0232
0233
0234
0235
0236
0237
0240
0241
0242

ANSWER
IIF 3
JMP M5B
JMP 17
JMP M5A
SET 17

ME >

JMP QAINIT

MEA>

MESSE
ANSWER
JMP CHKSNS
SET
10
ANSWER
10
LDH
SHO I
1600
JMP 17
SHD I
3100
JMP MFA
JMP MEA
JMP QAINIT
MESSF
ANSWER
JMP CHKSNS
SET I 10
ANSWER
I

MP A

LIF
JMP
JMP
JMP
SET

MF8
17

MFA
17

JMP QAINIT
MESS6
ANSWER
JMP CHKSNS

M6Ar

SET

ANSWER
LDH 1 10
SHD I
0300
JMP 17
JMP M6A
SET 5

ANSBUF

LOH
LIF
SET

3
0

CHKSNS

JMP 0
SNS 0
JMP QARFSH
JMP START

2144
2144
2145

0243

4074

0244

6243

2146
2146
2146
2146
2146
2146
2146
2146
2146
2146
2146
2146
2146
2146
2147
2147
2147
2147
2147
2147
2147
2147
2147
2150
2150
2151
2151
2151
2151
2151
2151
2151
2151
2151
2151
2152
2152
2153
2153
2153
2153
2153
2153
2153
2153
2153
2153
2154
2154
2155
2155
2155
2155
2155
2155
2155
2155
2155
2155

0245
0246
0247
0250
0251
0252
0253
0254
0255
0256
0257
0260
0261

4743
0616
2515
0205
2240
1706
4003
1001
1616
0514
2340
7462
3400

0262
0263
0264
0265
0266
0267
0270
0271

0623
2401
2224
1116
0740
2402
1413
4074

0272

6343

0273
0274
0275
0276
0277
0300
0301
0302
0303

4743
0640
4040
4040
4040
4040
2201
2405
4074

0304

6443

0305
0306
0307
0310
0311
0312
0313
0314
0315

4743
0640
2540
1722
4015
4017
2240
2377
4074

0316

6143

0317
0320
0321
0322
0323
0324
0325
0326
0327
0330

4743
0604
0514
0131
7540
7463
4030
4022
0124
0534

MESS2»

TEXT 2FSTARTING CHANNEL

FNUM8ER OF CHANNELS <2\2

MESS3,

TEXT ZFSTARTING TBLK <3

RATE <4

OR M OR S? <1

FOELAY= <3
2156
2156
2156
2156
2156
2156
2156
2156

0331
0332

03 37

21 57

03 40

2157
2160

03 41

4/43

0334
0335
033 6

RATENE

404 0

4040
4023
3116
0340
1716

0OOv5

06 40

M£SS4j

TEXT 2F

SYNC ONJ

c 43

W 06

0O HO

clo0
2160
2160
2160
2160
2160
2160
2161
2161
2161
2161
2161
2161
2161
2161
2161
2161
2161
2162
2162
2162
2162
2162
2162
2162
2162
2162
2162
2162
2163
2163
2164
2164
2164
2164
2164
2164
216 4
2164
2164
2165

J*
*T 4
0^
/X T j1 K
t3
ffl

«y

50 40
O
c
CO
07
'?

i'Tf

A O TT

0350
0351

lo23
0540
2327
1124
0310

0352
0353
0354
0355
0356
0357
^
0360
0ool
0362O
0360
0364

4016
4306
6256
4005
3024
0522
1601
1440
1405
o
Amc
2605
A A
1440

03 65

1643
0663
5640
0314
1703
1340
0310
0116
1605
1440

03^

03 46
03 47

f/.

Ol "T

0366
0367
0370
0371
0372
0373
0374
03 75

037 6
"7

1643

0 400
0401
0402
0403

4743
0640
4040
4040
4040
4003
1704
0540

0 40 4

040 5
0 40 6

0407

SENSE SWITCH N

F2,

EXTERNAL LEVEL

F3,

CLOCK CHANNEL

0377
rtl

Fl,

CODE <1

2165

0410
0411
0412

2165
2165
2165
2165

0414
0415
0416
0417

7461
43 06

4040

W nX 0

4040
4040
1640
7461

2165
2165
2166
2167
2167
2167
2167
2167
2167
2167
2167
2167
2167
2170
2170
2171
2171
2171
2171
2171
2171
2171
2171
2171
2171
2171
2172
2172
2172
2172
2172
2172
2172
2172
2172
2172
2172
2173
2173
2173
2173
2173
2173
2173
2173
2173
2173
2173
2174
2174
2174
2174
2174
2174
2174
2174
2174
2174
2174
2174
2174
2175
2175

0420

3400
F

0421
0422
0423
0424
0425
0426
0427
0430
0431

0640
4040
0516
0440
2301
1520
1411
1607
4017

0432

1672

0433
0434
0435
0436
0437
0440
0441
0442
0443
0444

4347
4306
6156
4023
0516
2305
4023
2711
2403
1040

0445
0446
0447
0450
0451
0452
0453
0454
0455
0456

1643
0662
5640
0530
2405
2216
0114
4014
0526
0514

0457
0460
0461
0462
0463
0464
0465
0466
0467
0470

4016
4306
6356
4003
1417
0313
4003
1001
1616
0514

0471
0472
0473
0474
0475
0476
0477
0500
0501
0502
0503
0504

4016
4306
6456
4024
1724
0114
4020
2423
4020
0522
4003
1056

0505

4016

MESS5,

<1\2

TEXT if

END SAMPLING ONI

Fl,

SENSE SWITCH N

F2,

EXTERNAL LEVEL

F3,

CLOCK CHANNEL

F4,

TOTAL PTS PER CH. N

2176
2176
2176
2176
2176
2176
2176
2176
2176
2176
2177
2177
2177
2177
2177
2177
2177
2177
2177
2200
2201
2201
2201
2201
2201
2201
2201
2201
2201
o
omo
2202
2202
2203
2203

05WO
0507
0510
0511
0512
0513
0514
0515
0516

4040
4040
4040
4040
0317
0405
4074

0517
0520
0521
0522
0523
0524
0525
0526

6143
0640
4040
4040
4040
4016
4074
6434

4347
43 06

CODE <1

N <4\Z

0527
0530
0531

0640
4015
1725

05 32

1624
4004
0124

0533
0534
0535
0536

0140
2401
MESS6.

05o7

o ri rx cr

0540
0541

4347
4306

TEXT HF

MOUNT DATA TAPE

2005

22 03

05 42

40 40

2203
2203
2203
2203
2203
2203
2204
2204
2205
2205
2205
2205
2205
2205
2205
2205
2205
2205
2205
2205
2205
2205
2206
2206
o om
2200
2206
2206
2206
2206

0543
0544
0545
0546
0547

4040
4017
1640
2516
1124

0550

4061

0551
0552
0553
0554
0555
0556
0557
0560
0561
0562
0563
0564
0565

4347
4306
2431
2005
4003
4024
1740
0317
1624
1116
2505
7461
3400

0566
0567
0570
0571
0572
0573
0574

0640
4023
0126
0540
2001
2201
1505

ON UNIT 1

FTYPE

TO C0NTINUE<1\Z

2206
2206
2206
2207
2207
2210
2210
2211
2211
2211
2211
2211
2211
2211
2211
2211
2211
2212
2212
2212
2212
2212
2212
2212
2212
2212
2212
2213
2213
2214
2214
2214
2214
2214
2214
2214
2214
2214
2214
2214
2215
2215
2215
2215
2215
2215
2215
2215
2215
2216
2216
2217
2217
2220
2220
2220
2220
2220
2220
2220
2220
222(5

2220

0575
0576

2405
2223

0577

7743

0600

4743

0601
0602
0603
0604
0605
0606
0607
0610
0611

4743
0640
4040
1106
4016
1754
2431
2005
4040

0612
0613
0614
0615
0616
0617
0620
0621
0622

1643
0640
4040
1106
4031
0523
5424
3120
0540

0623

4031

0624
0625
0626
0627
0630
0631
0632
0633
0634
0635

4347
4306
4040
4040
4040
2205
2014
3140
7461
3400

0636
0637
0640
0641
0642
0643
0644
0645

0640
4040
2402
1413
4014
1703
0124
1117

0646

1677

0647

4347

0650
0651
0652
0653
0654
iQ^5
0656
0657

4347
4306
4040
4040
2402
1413
4016
1756

06b'3

4.^74

MESSE,

TEXT 2r

NOfTYPE

YESiTYPE

REPLY <1\E

MESSF,

SAVE PARAMETERS?

TEXT If

TBLK NO. <3

TBLK LOCATION?

2221
2221
2221
2221
2221
2221
2221
2221
2221
2222
2223
2224
3201
3202
3203
3204
3205
3206
3207
3210
3211
3212
3213
3214
3215
3216
3217
3220
3221
3222
3223
3224
3225
3226
3227
3230
3231
3232
3233
3234
3235
3236
3237
3240
3241
3242
3243
3244
3245
3246
3247
3250
3251
3252
3253
3254
3255
3256
3257
3260
3261
3262
3263

0661
0662
0663
0664
0665
0666
0667
0670

6343
0640
4040
4025
1611
2440
4074
6134

0671

0000

UNIT
ANSWER. 0

<1\H

,*11

NOLIST
SEGMNT

0046
0047
0050
0051
0052
0053
0054
0055
0056
0057
0060
0061
0062
0063
0064
0065
0066

0055
0000
0054
0655
0640
1020
0010
1040
0647
0017
4641
6611
0467
7016
1000
0656
1120
7740
0471
7016
1000
0656
1460
1111
0467
0011
4657
1020
0012
1040
0647
0017
4641
6611
0467
7016
1000
0656
0470

0067
0070
0071
0072
0073
0074
0075
0076
0077

7016
1120
7757
0471
7016
1120
0010
0471
6130

0020
0021
0022
0023
0024
0025
0026
0027
0030
0031
0032
0033
0034
0035
0036
0037
0040
0041
0042
0043
0044
004t3

M28,

SET 15
0

SET 14
INPTR
LDF 0
IDA I
10
STA

MUlWD
COM
STC UPUIM
JMP CHAR
SKP
JMP ERRORX
LOA

OCTAC
ADA
s!

APO I
JMP ERRORX
LOA

OCTAC
SAE I
7777
SKP
CLR
STC STCHTP
LOA
I

12
STA

MULWD
COM
STC UPLIM
JMP CHAR
SKP
JMP ERRORX
LDA

OCTAC
AZE I
JMP ERRORX
ADA I
«20
APO I
JMP ERRORX
ADA I
10

APO
JMP NCH20
I

3264
3265
3266
3267
3270
3271
3272
3273
3274
3275
3276
3277
^300
3301
3302
3303
3304
3305
3306
3307
3310
3311
3312
3313
3314
3315
3316
3317
3320
3321
3322
33 23

3324
3325
3326
3327
3330
3331
3332
3333
3334
3335
3336
3337
3340
3341
3342
3343
3344
3345
3 34 6

3347
3350
3351
3352
3353
3354
3355
3356
3357
3360
3361
3362

0100
0101
0102
010.5

0104
0105
0106
0107
0110
0111
0112
0113
0114
0115
0116
0117
0120
0121
0122
0123
0124
0125
0126
0127
0130
0131
0132
0133
0134
0135
0136
0137
0140
0141
0142
0143
0144
0145
0146
0147
0150
0151
0152
0153
0154
0l5t?

01S6
0157
0160
0161
0162
0163
0164
0165
0166
0167
0170
0171
0172
0173
0174
0175
0176

1120
0004
0471
6133
1120
0002
0471
6136
1000
0656
1040
0660
2657
1120
7737
0471
7016
1000
0657

ADA

APO

NCHi0

ADA

SUMCHN

APO I
JMP NCH4
IDA
OCTAC
STA
NCHTP
ADO STCHTP
ADA I
»40
APO I
JMP ERRORX
IDA

STCHTP

10 74

1000
0660
1074
7017
1020
0020
6112
1020
0010
6112
1020
0004
6112
0055
0000
1020
7767
4724
1020
7223
4750
6662
0467
7016
1000
1203
1040
1370
1120
7001
0471
7016
1020
7765
4724
i020
7235
4750
6662
0467
7016
0602
6220

STA
LOA

NCHTP
STA I 14
JMP NORMX
NCH20,

IDA

NCH10I

NCH4,

JMP SUMCHN
LDA
10
JMP SUMCHN
LOA
I

M3B,

JMP SUMCHN
SET 15
0

LDA I
-10
STC UPLIMl
LOA I
JMP H8TAC
STC MULWDl
JMP CHRTPL
SKP
JMP ERRORX
LOA
LOTAC
STA

/STR STBLK TEMP

STBLK
ADA I
-776
APO I
JMP ERRORX
LDA I
-12

STC
LOA
JMP
STC
JMP
SKP
JMP

UPLIMl
I

M10TAC
MULWDl
CHRTPL

ERRORX

JMP ANSBUF

/STBLK

777?

/NO

/CONVERT RATE 5
/DELAY FROM DECt
/INP TO OCT SUM

3363
3364
3365
3366
3367
3370
3371
3372
3373
3374
3375
3376
3377
3400
3401
3402
3403
3404
3405
3406
3407
3410
3411
3412
3413
3414
3415
3416
3417
3420
3421
3422
3423
3424
3425
3426
3427
3430
3431
3432
3433
3434
3435
3436
3437
3440
3441
3442
3443
3444
3445
3446
3447
3450
3451
3452
3453
3454
3455
3456
3457
3460
3461

0177
0200
0201
0202
0203
0204
0205
0206
0207
0210
0211
0212

0213
0 214

0215
0216
0217
0220
0221
0222
0223
0224
0225
0226
0227
0230
0231
0232
0233
0234
0235
0236
0237
0240
0241
0242
0243
0244
0245
0246
0247
0250
0251
0252
0253
0254
0255
0256
0257
0260
0261
0262
0263
0264
0265
0266
0267
0270
0271
0272
0 27 3

0274
0275

1420
2500
7023
1420
1500
7040
1420
2300
7050
7016
0602
6220
1420
7400
0467
7016
7267
0467
7016
6662
0467
7016
1000
1203
1074
7017
0055
0000
1020
0010
1040
0647
0017
4641
6611
0467
7016
1000
0656
4657
6611
0467
7016
1000
0657
1460
0003
6270
1000
0656
0451
7016
1120
7774
0471
7016
6305
14 60

SHD I
2500
JMP UCHK
SHD I

1500
JMP MCHK
SHD 1
2300
JMP SCHK
JMP ERRORX
RTN*

L IF

/YES
/IS CHAR AN M?
/YES
/IS CHAR AN S?
/YES

JMP ANSBUF
SHD
7400
SKP
JMP ERRORX
JMP CNTREG
SKP
JMP ERRORX
JMP CHRTPL
SKP
JMP ERRORX
LDA
I

LOTAC
STA
14
JMP NQRMX
SET 15
I

M48i

/IS CHAR

/NEXT CHAR
/IS A 74?
/YES
/HAS TO BE

/GET DELAY
/NUM
/STORE SYNDLY

LOA

STA
MULWD
COM
STC UPLIM
JMP CHAR
SKP
JMP ERRORX
LOA
OCTAC
STC STCHTP
JMP CHAR
SKP
JMP ERRORX
LDA

STCHTP
SAE

/CONVERT SYNCON
/NUM FROM
/OCTAL INPUT
/TO

/OCTAL
/SUM

/TEMP STORE

/GET SYNCON NUM
/IS IT CL.CH,?

JMP 8YCLK
LDA
OCTAC
APO
JMP ERRORX
ADA I

/NO
/YES

MINUS3;

-3

/CCH IS NONNEG
/CCH LESS THAN

8YCLK,

APO I
JMP ERRORX
JMP DONE
SAE

/SHOULD BE
/YES
/IS IT EXTL?

0 00 2

0467
6277
1460
0001

SKP
JMP BYCLKl
SAE 1
1

/IS IT SSW?

3462

0276

7016

34 63

02 77

10 00

3464
3465
3466
3467
3470
3471
3472
3473
3474
3475

3543
3544
3545
3546
3547
3550
3551
3552

0300
0656
0301
1120
0302
7772
0303 0471
0304
7016
0305
1000
0306
0307
ii74
0310 1000
0311
0656
0312
1460
0313
7777
0314
0467
0315
0011
0316
1074
0317
7017
0320 0055
0321
0000
0322
6662
0323
0467
0324
7016
0325
7204
0326
1103
0327
6662
0330
0467
0331
7^16
0332
7204
0333
1106
0334
0062
0335
2055
0336
1022
0337
0017
034 0
^1^3
0341 0450
0342 ^347
0343
1022
0344 Ml?
0345
^3110
0346
0450
0347
0467
0350 7216
0351
1000
0352
1105
0353
1460
03^4
0004
0355 0467
03^6 6412
0357
1460
0360 0003
0361
6375
0362
1000
0363
11136
0364
0451
0365
7016
0366
7111

3553
3554
3^55
3556
3557
3560

0 36 7

^^^^27

0370
0371
0372
0373
0374

1000
1201
0471
7016
6412

3 47 6

3477
3500
3501
3502
3503
3504
3505
3506
3507
3510
3511
3512
3513
3514
351^
3516
3517
3520
3521
3522
3523
i524
3 525
3526
3527
3530
3531
3532
3533
3534
3535
3 53 6

3 '5 5 7

35i;^

3&41
33 4 2

JMP ERRORX
BYCLKii IDA
OCTAC
ADA I
MINUS5i -5
APO I
JHP ERRORX
DONE.
LDA
STCHTP
STA I 14
IDA
OCTAC
SAE I
7777
SKP
CLR
STA I 14
JHP NORMX
n5B,
SET 15

/NO

/IS SSi^ OR EKTL
/NUM LESS THAN 6
/NO

/YES

/STORE SYNCDN

/STORE SYNNUM

JMP CHRTPL
SKP
JMP ERRORX
JHP TACMOV
HOTACl
JMP CHRTPL
SKP
JMP ERRORX
JMP TACMOV
NTACl
SET
2
I

20 55

LDA I 2
COM
ADD LOTACl
AEE
JHP ,*5
LOA I 2
COM
ADO NTAC3
AZE
SKP
JMP ERRORX
LDA
LOTACl
SAE
I

SKP
JMP DONEl
SAE I

/SAVE STQPON

/SAVE STOPNO
/ADOR-1 or
/SYNCON NUM
/GET SYNCON

/ADD STOPON
/SYNCON-STOPON?
/NO
/GET SYNNUH

/ADO STOPNO
/SYNNUMsSTOPNO?
/NO
/THEY MUST DIPF,

/GET STOPON
/TOTAL PTS
/PER CHAN?
/YES
/CL»CH,?

JMP 8YCLK2
LOA
NTACl
APO
JMP ERRORX
JMP TPLAOO
SUBT3
LDA
HOTAC
APO I
JMP ERRORX
JMP DDNEl

/NO
/YES

/CLtCHt>0?
/SHOULD BE
/CL, CH,<4I

/NO, SHOULD BE

/YES

3561
3562
3563
3564
3565
3566
3567
3570
3571
3572
3573
3574
3575
3576
'6517

3600
3601
3602
3603
3604
3605
3606
3607
3610
3611
3612
3613
3614
3615
3616
3617
3620
3621
3622
3623
3624
3625
3626
3627
3630
3631
3632
3633
3634
3635
3636
3637
3640
3641
3642
3643
3644
3645
3646
3647
3650
3651
3652
3653
3654
3655
3656
3657

0375
03 76

0377
0400
0401
0402
0403
0404
0405
0406
0407
0410
0411
0412
0413
0414
0415
0416
0417
0420
0421
0422
0423
0424
0425
0426
0427
0430
0431
0432
0433
0434
0435
0436
0437
0440
0441
0442
0443
0444
0445
0446
0447
0450
0451
0452
0453
0454
0455
0456
0457
0460
0461
0462
0463
0464
0465
0466
0467
0470
0471
0472
0473

1460
0002
0467
6404
1460
0001
7016
7111
0432
1000
1201
0471
7016
1000
1105
1074
1000
1106
1074
1000
1107
1074
1000
1110
1074
7017
1111
1111
lllA
1111

BYCLK2, SAE

/EXT LEVEL?

SKP
JMP BYCLK3
SAE I

/ssw?

JMP ERRORX
8YCLK3, JMP TPLADD

SUBT6
LOA
HOTAC
APO
JMP ERRORX

/IS EXTL
/OR SSW<6?

OONEli

LDA

/NO
/YES

LOTACl
STA I 14
LDA
NTACl
STA 1 14
LOA
NTAC2
STA I 14
LDA
NTAC3
14
STA
JMP NORMX
7777
7777
7774
7777
7777
7772
SET 15
I

SUBT3,
SUBT6,

nil
1112
0055
0000
0640
1020
0010
1040
1012
0017
5004
6754
0467
6604
1000
0656
4602
6754
0467
6604
1000
0656
1040
0603
1120
7776
0471
6604
1000
0603
0470
6475
1020

MBB*

/STORE STOPON
/STORE
/STOPNO
/IT
/IS
/A

/TRIPPLE
/PREC
/NUM

/-3

/-5

LDF
LDA
10
STA

0
I

MULWD3
COM
STC UPLIM3
JMP CHRTER
SKP
JMP ERORX
LDA

OCTAC
STC PTBNSV
JMP CHRTER
SKP
JMP ERORX
LDA
OCTAC
STA
UNITSV
ADA I
-1

APO I
JMP ERORX
LDA

UNITSV
A2E
JMP
LDA

.+3
I

/SAVE
/PARAMETER
/TBLK NO.

/SAVE
/UNIT NO,

3e60
3661
3 H 2
3664
366i
3666
3667
3670
3671
3672
3673
3674
3675
3676
3677
3700
3701
3702
3703
3704
3705
3706
3707
3710
3711
3712
3713
3714
3715
3716
3717
3720
3721
3722
3723
3724
3725
3726
3727
3730
3731
3732
3733
3734
3735
3736
3737
3740
3741
3742
3743
3744
3745
3746
3747
37 50

3751
3752
3753
3754
3755
3756

04 7 4

0475
0476
047 7
0500
0501
0502
0503
0504
0505
0506
0507
0510
0511
0512
0513
0514
0515
0516
0517
0520
0521
0522
0523
0524
0525
0526
0527
0530
0531
0532
0533
0534
0535
0536
0537
0540
0541
0542
0543
0544
0545
0546
0547
0550
0551
0552
0553
0554
0555
0556
0557
0560
0561
0562
0563
0564
0565
0566
0567
0570
0571
0572

0010
1120
0700
4^04
1020
4000
2602
4505
0000
0000
6605
0055
0000
6754
0467
6604
1000
0656
1460
7777
0467
0011
1040
2052
1120
7001
0471
6604
6605
0055
0000
1020
0010
1040
0647
0017
4641
6611
0467
7016
1000
0656
4602
6611
0467
7016
1000
0656
1040
0603
1120
7776
0471
7016
1000
0603
0470
6570
1020
0010
1120
0704
4577

ADA 1
RDC
STC TPWROl
IDA I

4000
ADO PTBNSV
STC TPWRD2
TPWRDl,
TPNR02.

0
0

MD8,

JMP NDMX
SET 15

/MBLK = 0 OF
/CURRENT OF

J HP

CHRTER

SKP
JMP ERORX
LDA
OCTAC
SAE I
7777
SKP
CLR
STA

2000+52
ADA I
«776
APO
JMP ERORX
JMP NOMX
SET 15
I

MFB#

/STTBLK

/NO

LDA

STA

MULWD
COM
STC UPLIM
JMP CHAR
SKP
JMP ERRORX
LDA
OCTAC
STC PTBNSV
JMP CHAR
SKP
JMP ERRORX
LDA

OCTAC
STA
UNITSV
ADA
I

APO I
JMP ERRORX
LDA
UNITSV
A2E I
JMP ,+3
LDA I
10

ADA
WRC
STC TAPEWl
I

/SAVE
/PARAMETER
/T8LK NO,

/SAVE
/UNIT NO.

777?

3757
3760
3761
3762
3763
3764
3765
3766
3767
3770
3771
~6772

3773
3774
3775
3776
'illl

4000
4001
4002
4003
4004
4005
4006
4007
4010
4011
4012
4013
4014
4015
4016
4017
'4020

4021
4022
4023
4024
4025
4026
4027
4030
4031
4032
4033
4034
4035
4036
4037
4040
4041
4042
4043
4044
4045
4046
4047
4050
4051
4052
4053
4054
4055

0573
0574
0575
0576
0577
0600
0601
0602
0603
0604
0605
0606
0607
0610
0611
0612
0613
0614
0615
0616
0617
0620
0621
0622
0623
0624
0625
0626
0627
0630
0631
0632
0633
0634
0635
0636
0637
0640
0641
0642
0643
0644
0645
0646
0647
0650
0651
0652
0653
0654
0655
0656
0657
0660
0661
0662
0663
0664
0665
0666
0667
0670
0671

1020
4000
2602
4600
0000
0000
7017
0000
0000
0235
0601
0040
0015
6000
0056
0000
0011
4656
0602
6220
1420
7400
6016
1420
3400
6016
1420
0000
6615
1120
7717
1040
0661
1120
0001
0451
6653
1120
0000
0471
6653
1000
0656
1260
0000
2661
4656
6615
0236
6016
2047
0000
0000
0000
0000
0056
0000
0011
5074
7253
1201
7253
1106

LOA I
4000
ADD PTBNSV
STC TAPEW2

TAPEWl,
TAPEW2^

/MBLK=0 OF
/CURRENT OF

0
0

JMP NORMX
PTBNSV, 0
UNITSVi 0
ERONX,
XSK I 15
NOMX,
LIF 1
SET 0
CHAR*

15
JMP 0
SET 16
0

LOOPli

CLR
STC OCTAC
LIF 2
JMP ANSBUF
SHD I
7400
JMP 16
SHO I
3400
JMP 16
SHD I
0

JMP LOOPl
ADA
«60
STA
NUM
ADA I
I

/CLR LOG OCTAC

/END OF ANS F.7
/YES
/NO
/EOM?
/YES
/NO
/A BLANK?
/YES
/NO
/A DIGIT?

APO
JMP XIT
ADA I

UPLIMi

APO
JMP XIT
LOA
OCTAC
MUL I
I

MULWD#

INPTR,
OCTAC,
STCHTP;
NCHTP*

ADD NUM
STC OCTAC
JMP LOdPl
XSK I 16
JMP 16"
2047

/NUM IS NONNEG?
/SHOULD BE
/YES
/IS NUM LESS
/THAN 10 OR 12?
/IT SHOULD BE
/YES
/MUL BY 10 OR 12
/FOR OCT OR DEC
/CON VERS ION

/BEGIN MESS AGN.

0
0
0

NUM,~

CHRTPLi

SET 16
0

/RTN JMP TO
/CURRENT MESS

CLR
STC NUMSAV
JMP TPLCLR

/CLR TAC

HOTAC
JMP TPUCLR
NTACl

/CLR

T,Pi

REG

4056
4057
4060
4061
4062
4063
4064
4065
4066
4067
4070
4071
4072
4073
4074
4075
4076
4077
4100
4101
4102
4103
4104
4105
4106
4107
4110
4111
4112
4113
4114
4115
4116
4117
4120
4121
4122
4123
4124
4125
4126
4127
4130
4131
4132
4133
4134
4135
4136
4137
4140
4141
4142
4143
4144
4145
4146
4147
4150
4151
4152
4153
4154

0672
0673
0674
0676
0677
0700
0701
0702
0703
0704
0705
0706
0707
0710
0711
0712
0713
0714
0715
0716
0717
0720
0721
0722
0723
0724
0725
0726
0727
0730
0731
0732
0733
0734
Q76b
0736
0737
0740
0741
0742
0743
0744
0745
0746
0747
0750
0751
0752
0753
0754
0755
0756
0757
0760
0761
0762
0763
0764
0765
0766
0767
0770

0064
SET I 4
0000
0
0602 L00P2*
L IF 2
6220
JHP ANS8UF
1420
SHD I
7400
7400
6016
JHP 16
1420
SHO I
3400
3400
6016
JMP 16
1420
SHD I
0000
0
6674
JMP L00P2
1120
ADA
7717
•'60
0450
A2E
6715
+3
JMP
1020
IDA 1
0000
0
1040
STA
0661
NUM
1120
ADA 1
0001
1
0451
APO
6653
JHP XI
1120
ADA I
0000 UPLIMl, 0
0471
APO I
6653
JMP KIT
0224
XSK
4
1000
LOA
0004
4
1460
SAE I
0003
3
0467
SKP
6741
JMP ,+4
1460
SAE I
0004
4
6745
JMP ,+5
1000
LOA
1074
NUMSAV
2661
ADD NUM
5074
STC NUMSAV
1000
LD A
0661
NUM
5110
STC NTAC3
0000
MULWDl? 0
7111
JMP TPLADD
1106
NTACl
6674
JMP L00P2
0056
CHRTER* SET 16
0000
0
0011
CLR
4656
STC OCTAC
0601
L00P3^
LIF 1
6133
JMP ANSBF
1420
SHD I
7400
7400
6016
JMP 16
1420
SHD I
3400
3400
6016
JMP 16
1420
SHO I

/EtOtANStFtt
/EOM?
/A BLANK?

/A DIGIT?

/HAKE *0

/Hon NEG?
/SHOULD BE
/YES
/IS NO<10 OR 12?

/SHOULD BE
/INCR B4
/C(B3)s3?
/NO
/YES
/C(B3)«4?
/NO
/YES
/SAVE SUM
/OF 3RD AND
/4TH DIGITS

/GET DIGIT BACK
/ADD NUM
/TO TAC
/GET NEXT CHAR

4155
4156
4157
4160
4161
4162
4163
4164
4165
4166
4167
4170
4171
4172
4173
417 4
4175
4176
4177
4200
4201
4202
4203
4if04

4205
4206
4207
4210
4211
4212
4213
4214
4215
4216
4217
4220
4221
4222
4223
4224
4225
4226
4227
4230
4231
4232
4233
4234
4235
4236
4237
4240
4241
4242
4243
4244
4245
4246
4247
4250
4251
4252
4253

07 71
07 72

0773
0774
0775
0776
0777
1000
1001
1002
1003
1004
1005
1006
1007
1010
1011
1012
1013
1014
1015
1016
1017
1020
1021
1022
1023
1024
1025
1026
1027
1030
1031
1032
1033
1034
1035
1036
1037
1040
1041
1042
1043
1044
1045
1046
1047

0000
6760
1120
7717
104 0
0661
1120

00 01
04 51

6653
1120
0000
0471
6653
1000
0656
1260
0000
2661
4656
6760
0235
0602
0040
0015
6000
7204
1103
1000
1074
0450
7016
7111
1075
1000
1201
0451
7016
6211
0063
7774
7235
0223
7042
7204
1103
6211

10 50

00 6 3

1051

7771
7204
1103
7111
1100
1000
1201
0471
7016
7253
1201
7111
1103
7235
0223

10 52

1053
1054
1055
1056
1057
1060
1061
1062
1063
1064
1065
1066
1067

JMP U00P3
ADA I
js60

STA
NUM
ADA

APO
JMP KIT
ADA
I

UPLIM3,

APO I
JMP KIT
LDA

OCTAC
MUU

MULW03,

ERRORXi
NORMX,

UCHK,

ADD
SIC
JMP
XSK
LIT
SET
15
JMP
JMP

NUM
OCTAC

L00P3
15

0
0

TACMOV
HOTACl

/LOC OF T,P. NUM

LDA

NUMSAV
AZE
JMP ERRORX
JMP TPUADO
M1000
LDA

/MULT OF 100USE;C
/NO
/YES
/IS NO>=;1000?

HOTAC

MCHK,

SCHK,

APO
JMP
JMP
SET
^3
JMP
XSK
JMP
JMP

ERRORX
RTN
I

M10TAC
I

/IT MUST BE
/YES

/MUl BY 1000
/CHG TO USEC

,-2

TACMOV
HOTACl
JMP RTN
SET I 3

/LOC OF T.P, NUM

-6

JMP TACMOV
HOTACl
JMP TPUADO
M50
IDA
HOTAC
APO
JMP ERRORX
JMP TPICLR
HOTAC
JMP TPLADD

/SAVE T.P. NUM

/NUM<«40?

HOTACl
JMP M10TAC
XSK

/NO

/CLR TAG
/MUL BY 1000000
/CHG TO UwSEC

4254
4255
4256
4257
4260
4261
4262
4263
4264
4265
4266
4267
4270
4271
4272
4273
4274
4275
4276
4277
4300
4301
4302
4303
4304
4305
4306
4307
4310
4311
4312
4313
4314
4315
4316
4317
4320
4321
4322
4323
4324
4325
4326
4327
4330
4331
4332
4333
4334
4335
4336
4337
4340
4341
4342
4343
4344
4345
4346
4347
4350
4351
4352

1070
1071
1072
1073
1074
1075
1076
1077
1100
1101
1102
1103
1104
1105
1106
1107
1110
1111
1112
1113
1114

7066
7204
1103
6211
0000
7777
7777
6030
7777
7777
7727
0000
0000
0000
0000
0000
0000
0053
0000
7172
0002

7115
7116
7117
7120

7100
7510
7060
6141

1121
1122
1123
1124
1125
1126
1127

1131
1132
1133
1134
1135
1136
1137
1140
1141
1142
1143
1144
1145
1146
1147
1150
1151
1152
1153
1154
1155
1156

4011
1011
0452
0017
5153
1031
0452
0017
5150
1031
0452
0017
5167
0071
1201
0067
1202
0066
1203
0011
3167
1206
1020
0000
1207
1020
0000
1211
5153
0474

1157

0017

llv50

1160
1161
1162

5167
1206
5150

JMP i«2
JMP TACMOV

HOTACl
JMP RTN
NUMSAV,
M1000,
H50,

HQTACl,
MOTACl.
LOT ACl^
NTACl,
NTAC2,
NTAC3,
TPLADDi

/LOC OF T,P, NUM

1117
7777
6030
7777
7777
7727

/•1747 OCTAL
/•50 OCTAL

0
0

0
0
0

SET 13
0

P3,

JMP TPLGET
PDP

PMOOE
CLL
SPA
CML CMA
LINC
LMOOE
STC 11
LDA 11
L2E
COM
STC AODHI
LDA I 11
L2E
COM
STC ADDMED
LOA 1 11
L2E
COM
STC AOOLO
SET I 11
HOTAC
SET I 7
HOTAC
SET

LOTAC
CLR
ADD AODLO
LAN 6
LDA I

AOOMEOi
ADDHI,

/AODR OF TPUW
ORDER 3RD
/ADO OR SUBT7
/SUBT, MAKE
/ARC /MID ORDER 3RD
/HI

/LO ORDER 3RD

/PTR TO TAC
/HI ORD 3RD
/PTR TO TAC
/MID ORD 3RD
/PTR TO TAC
/LO ORD 3RD
/CLR LINK BIT
/ARGl *LOTAC
/TO LOTAC

/ARG2*M0TAC

LAM
LOA

/ADO OR SU8T?
/SUBTi SET L «
/MAKE ADDR *

/TO MOTAC

/ARG3+H0TAC

LAH 11
STC AODHI
FLO J

/TO HOTAC
/CLR ACdNOT L.
/OVRFLO ONI HI
/ORDER LAM?

COM

/ADDLO(ERROR FLAG)
STC ADDLO
LAM 6
STC ADDMED

/ yr c

7777

/NO.0 TO ER.FLG,
/L «LOTAC TO LOT
/CLR AC«NOT L,

4353
4354
4355
4356
4357
4360
4361
4362
4363
4364
4365
4366
4367
4370
4371
4372
4373
4374
4375
4376
4377
4400
4401
'4402

1163
1164
116 5
1166
1167
1170
1171
1172
1173
1174
117 5
1176
1177
1200
1201
1202
1203
1204
1205
1206
1207
1210
1211
1212
1213
1214
1215
1216
1217
1220
1221
1222
1223
1224
1225
1226
122 7
1230
1231
1232
1233

4403
4404
4405
4406
4407
4410
4411
4412
4413
4414
4415
4416
4417
4420
4421
4422
4423
4424
4425
4426
4427
4430
4431
4432
4433

1235
1236
1237
1240
1241
1242
1243

44 34

12 44

4435
4436
4437
4440
4441
4442

1245
1246
1247
1250
1251

4 44 3

1233
1254
1255
1256
1257
1260
1261

4444
4445
4446
4447
4450
4451

12 34

12 5 2

1207
5153
1211
1020
0000
02 33

6013
1000
0013
1560

LAM 7
STC ADOHI
LAM 11
LDA
I

ADDUvOf

4012
1012
6000
0000
0000
0000
0053
0000
7172
4012
3201
1052
1000
120 2
1072
1000
1203
1072
0011
0233
6013
1000
0000
5234
7111
1201
7111
1201
7111
1201
0000
100 0
0000
5252
7111
1201
7204
1264
7111
1201
7111
1201
7111
1264
0000
0053
0000
7172
4012
1052
1072
1072

/AC

XSK I 13
JMP 13
TPUGET, LDA
13

BCL
6000
STC 12
LDA 12
JMP 0
I

6 00 0

HOT AC,
HOTAC,
LOTAC^

/L^MOTAC TO MO
/CLR AC^NOT L.
/L5H0TAC TO HO
/ERROR FLG TO
/RETURN
/TO P4.2
/GET ADDR OF
/T,P.WD PTR
/MASK OUT JMP

/PUT ADDR OF
/T,P. WD IN AC

0
0

TACMOV, SET 13
0

JMP TPLGET
STC 12
ADD HOTAC
STA 12
LDA
MOT AC
STA
12
LDA
10 TAG
STA
12
CLR
XSK 1 13
JMP 13
LDA

/MOVE TAG TO
/A TPL WO
/GET ADDR
/FROM AC
/SAVE HOTAC
/SAVE MOTAC

/AVE LOTAC

M8TAC*

/RTN TO

STC M8RTN
JMP TPLADD
HOTAC
JMP TPLADD
HOTAC
JMP TPLADD
HOTAC
MaRTN,
M10f AC?

TAC

LDA
0

STC MULRTN
JMP TPLADD

HOTAC
JMP TACMOV
TEMPSV
JMP TPLADD
HOTAC
JMP TPLADD
HOTAC
JMP TPLADD
TEMPSV
MULRTNi 0
TPLCLRi SET 13
0

JMP TPLGET
STC 12
STA 12
STA 1 12
STA I 12

/SAVE
/RETURN
/JMP
/2

/SAVE
/4

TAC
2

TAC

/8 X TAC

/10 X TAC
/RTN

TAC

4452
4453
44^4
4455
4456
4457
4460
4461
4462
4463
4464
446b
4466
4467
4470
4471
4472
4473
4474
4475
4476
4477
4500
4501
4502
4503
4504
4505
4506
4507
4510
4511
4512
4513
4514
4515
4516
4517
4520
4521
4522
4523
4524
4525
4526
4527
4530
4531
4532
4533
4534
4535
4536
4537
4540
4541
4542
4543
4544
4545
4546
4547
4550
m

1326

0233
6013
0000
0000
0000
0056
0000
0065
7773
1020
136 6
5325
1020
2100
5367
0011
5366
1020
1000
3367
5367
3325
3365
5325
0225
0467
6653
1000
1103
5201
3104
5202
3105
5203
7111
0000
0002

7327
7330
7331
7332

2366
7410
5363
6141

1333
1334
1335
1336
1337
1340
1341
1342
1343
1344
1345
1346
1347
1350
1351
135 2
1353
1354
1355
1356

1000
1201
0451
7351
0450

1262
1265
1264
1265
1266
1267
1270
1271
1272
1273
127 4
127t5

1276
1277
1300
1301
1302
1303
1304
1305
1306
1307
1310
1311
1312
1313
1314
1315
1316
1317
1320
1321
1322
1323
1324
132t>

XSK I 13
JMP 13

TEMPSVi 0
0
0

CNTREG,

SET 16
0

SET

IDA

AODR-3
SIC ADRESS
LDA I
2100
STC CR
TPHERE, CLR
STC CO
LDA I
1000
ADD CR
STC CR
ADO AORESS
ADD A3
STC ADRESS
XSK I 5
SKP
JMP KIT
IDA
HOT ACl
STC HOTAC
ADD HOTACl
STC HOTAC
ADD LOTACl
STC LOTAC
JMP TPLADD
ADRESSi 0
POP

/PTR TO CL.RATE

/UPDATE CR 10

/HI

OR RATE

/MEO OR RATE
/LO OR RATE
/CALL T,P» RTN

PMOOE
IS2 CC

7 3 24

1000
1202
0450
7324
1000
1203
0450
7324
1000
1074
1000
1367
1074

DATA,

SKP
JMP TPH
LING
LMODE
LDA
HOTAC
APO
JMP DATA
A2E
JHP AORESS-l
LOA
MOTAC
A2E
JMP ADR£SS«1
LDA
LOTAC
A2E
JMP AORESS-i
LDA
STBLK
STA I 14
LDA

/CO4096?

/SAMRATE
/HAS GONE
/TO 2ER0
/OR IS

/NEC?

/YES

STA

/CL CONT RATE

4551
4552
4553
4554
4555
4556
4557
4560
4561
4562
4563
4564
4565
4566
4567
4570
4571
4572
4573
4574
4575
4576
4577
4600
4601
4602
4603
4604
4605
4606
4607
4610
4611
4612
4613
4614
4615
4616
4617
4620
4621
4622
4623
4624
4625
4626
4627
4630
4631
4632
4633
4634
4635
4636
4637
4640
4641
4642
4643
4644
4645
4646
4647

1357
1360
1361
1362

1000
1366
107 4
6016

7363

6141

1364
1365
1366
1367
1370
1371
1372
1373
1374
1375
1376
1377
1400
1401

7301
0003
0000
0000
0000
1111
1117
7633
1111
1111
6027
1111
1115
4357

LDA
CC

14
STA
JMP 16
I

PMODE
lINC
IMODE
JMP TPHERE

TPH;

A3?
CCi
CRi

/BUF-PRES REG

/GET SLOWER CL

3
0
0

STBLK?
ADDRi

1111
1111
^144

/«100 U«SEC

7777
7 7 77

-1750

/<»1000 UoSEQ

nil
1115
4357
SEGMNT

/«X0000 UaSEC
1

*>20

0020
0021
0022
0023
0024
0025
0026
m'li
0030
0031
0032
0033
0034
0035
0036
0037
0040
0041
0042
0043
0044
0045
0046
0047
0050
0051
0052
0053
0054
0055
0056
0057
0060
0061
0062
0063
0064
0065
0066
0067

00 47

0000
6703
0142
0671
6127
0070

SET

MIA?

MIAA

JMP QA IN IT

MESSl
ANSWER
JMP CHKSN
SET

0 671

ANSWER

1330
1420
0300
0467
6022
0602

LDH
10
SHD
0300
SKP
JMP MIAA
LIP 2
SET 0
I

NORMXX*

00 40

0007
6000
0047
0000
6703
0201
0671
6127
0070
0 671
1330

MA A?

JMP
SET

0
7

HAAAp

JMP QAINIT

MESSA
ANSWER
JMP CHKSN
SET

ANSWER
LDH
10
SHD I
1600
JMP NORMXX
SHD I
3100
JMP MBA
JMP MAAA
JMP QAINIT
MESSB
ANSWER
JMP CHKSN
I

14 20

1600
6035
1420
3100
6061
6043
6703
0252
0671
6127
0070
0671
0603

/IT IS
/YES
/NO

MBA?

SET

ANSWER
LIF

/AN
N?
/YES
/A

/YES
/NO

4650
4651
4652
4633
4654
4655
4656
4657
4660
4661
4662
4663
4664
4665
4666
4667
4670
4671
4672
4673
4674
4675
4676
4677
4700
4701
4702
4703
4704
4705
4706
4707
4710
4711
4712
4713
4714
4715
4716
4717
4720
4721
4722
4722
4722
4722
4722
4722
4722
4722
4723
4723
4724
4724
4724
4724
4724
4724
4724
4724
4724
4724
4725

0070
0071
0072
00 7 3

0074
0075
0076
0077
0100
0101
0102
0103
0104
010t?

6435
6073
6061
6703
0306
0671
6127
0070
0671
1330
1420
1600
6111
1420
3100
6113
6073
0602
6053
6703
0356
0671
6127
0070
0671
0603
6507
0467
6113
0602
6052

0106
0107
0110
0111
0112
0113
0114
0115
0116
0117
0120
0121
0122
0123
0124
0125
0126
0127
0130
0131
0132
0133
0134
0135
0136
0137
0140
0141
0142
0143
0144
0145
0146
0147
0150

6756
0602
6044
0045
0000
1330
0603
0040
0005
6000
0640
4040
4040
4040
2022
1707
2201

0151

1543

0152
0153
0154
0155
0156
0157
0160
0161
0162

4743
0640
4040
4040
0155
0440
2417
4024
0120

0163

0543

04 40

JMP
JMP
JMP
JMP

MB8
MCA
MBA
QAINIT
M£SSC

MCA,

ANSWER
JMP CHKSN
SET I 10
ANSWER
LOH I 10
SHO I
1600
JMP ,*5
SHO
3100
JMP MOA
JMP MCA
LIT 2
JHP JHPM6
JMP QAINIT
MESSO
ANSWER
JMP CHKSN
SET I 10
ANSWER
LIP 3
JMP HOB
SKP
JMP MDA
LIT 2
JMP JMPME
SNS 0
JMP QARFSH
LIT 2
JMP START
SET 5

/ERROR

/AN
Nl
/YES

MDA#

CHKSNi

ANSBF.

/YES
/N OR

LDH I 10
LIP 3
SET 0
5

JMP

MESSl,

TEXT IF

A -0

TO TAPE

PROGRAM

PLEASE

4725
4726
4726
4726
4726
4 72 6

4726
4726
4726
4726
4726
4726
4726
4726
4726
4727
4730
4730
4730
4730
4730
4730
4730
4730
4730
4730
4730
4731
4731
4732
4732
4733
4733
4733
4733
4733
4733
4733
4733
4733
4733
4734
4734
4734
^734
4734
4734
4734
4734
4734
4734
4734
4735
4735
4736
4736
4736
4736
4736
4736
4736
4736
4736

0164
0165
0166
0167
0170
0171
0172
0173
0174
0175
0176
0177
0200

4743
0640
2431
2005
4003
4024
1740
0317
1624
1116
2505
7461
3400
F

TYPE

TO C0NTINU£<1\2

0623

0201
0202
0203
0204
0205
0206
0207
0210
0211
0212

1604
0122
0440
0530
2005
2211
1505
1624

0213

7743

0214

4743

0215
0216
0217
0220
0221
0222
0223
0224
0225

4743
0640
4040
110 6
4016
1754
4024
3120
0540

0226
0227
0230
0231
0232
0233
0234
0235
0236
0237

4016
4306
4040
4011
0640
3105
2354
2431
2005
4040

0240

3143

0241
0242
0243
0244
0245
0246
0247
0250
0251

4743
0640
4040
4040
4022
0520
1431
4074
6134

2^^101

MESSA,

TEXT 2FSTANDAR0 EXPERIMENT?

NO,

TYPE

YES, TYPE

4736
4737
4737
4737
4737
4737
4737
4737
4737
4737
4737
4740
4740
4741
4741
4742
4742
4742
4742
4742
4742
4742
4742
4742
4742
4743
4743
4743
4743
4743
4743
4743
4743
4743
4744
4744
4744
4744
4744
4744
4744
4744
4744
4745
474^
4746
4746
4747
4747
4747
4747
4747
4747
4747
4747
4747
4747
4747
4750
4750
4750
4750
4750

0252
0253
0254
0255
0256
0257
0260
0261
0262

0620
0122
0115
0524
0522
4014
1703
0124
1117

0263

1677

0264

4347

0265
0266
0267
0270
0271
0272
0273
0274
0275

4347
4306
4040
4040
2402
1413
4016
1756
4074

0276
0277
0300
0301
0302
0303
0304
0305

6343
0640
4040
4025
1611
2440
4074
6134

0306
0307
0310
0311
0312
0313
0314
0315

0640
4016
0527
4023
2401
2224
4024
0214

0316

1377

0317

4347

0320
0321
0322
0323
0324
0325
0326
0327
0330
0331

4347
4306
4040
4011
0640
1617
5440
2431
2005
4040

0332
0333
0334
0335
0336

1643
0640
4040
1106
4031

MESSB,

TEXT 2FPARAMETER LOCATION?

TBLK NO, <3

UNIT

MESSC*

<i\2

TEXT

NO,

TYPE

NEW START TBLK?

4750
4750
4750
4750
4750
47^0

0337
0340
0341
0342
0343

0523
5440
2431
2005
4040

47 51
47 51
47 52
4 7 52

0344

3143

0345

4 7SP

0347
0350
0351
0352
0353
0354
0355

4743
0640
4040
4040
4022
0520
1431
4074
6134

0356
0357
0360
0361
0362
0363
0364
0365

0640
4040
4024
0214
1340
1617
5674
6334

4 7 52

4752
4752
47
*7 /

03 46

47
4 753
4 75 3

4753
4753
4753
4753

REPUY <1\2

47 By
4 7s:?
4 7 'S*'?

YES, TYPE

MESSO,

TEXT IF

TBUK N0,<3\2

0000

ERRORS

AAAENO 5571
0136
AC
7153
ADDHI
ADDLO 7167
ADDHED 7150
7371
AODR
ADPTR 1571
ADRESS 7325
1145
ALDA
ALDONE 1465
ALFAKE 1344
1473
ALl
1545
AL10
1532
AL14
1562
AL15
1500
AL2
1524
AL3
1522
AL5
1570
AL5A
1527
AL6
ANSBF 2133
ANSBUF 4220
ANSWER 4671
7365
A3
BEFORE 0073
BETA3 0003
BETA4 0004
BETA5 0005
8INIT 0130
BUFFUL 0111
BUFLIM 0140
BUFTOP 0110
BYCLK 6270

6277
6375
8YCI K3 6404
cr
7366
B YCLKl

U Wf n M w r\
UUA
YQ
p
UA
O MA WV
Wp

00 71

yOF
r
EL T
Ur
w' A q

05i^ 6

0765
053 7
CHAN
0545
CH AN2
0553
CH AN3
6611
CHA R
PHKSN 2127
rNKSNS 422 7
CHKTT 0600
C CX

r H R T F R 6 754
CHRT PL 666 2
^X X
CHIT YA 0511
CL AD
1422
CLKDL
w
u
0131
CLOCK 1210
XwX
CLQCKG 1744
W WW
005 3
CI 0CK2 00 54
CM TREC 7 26 7
it/

h. rv

Li,

\ 4>

7 36 7

Cl 00

015"^
K/ X
O

C 1000

0120
0507
0574
0506
0525
0046
0363
1354
0371
1340
0121
074 4
0067
037 4
0072

C110
014
C140
C17
C1777
C2

02X0
C200
C200X
C2000
02 12
03

0300
C303

04 X
04 00
"t

111?
X
X X £.

0065

t ly

060
C640X
07
07 X

C7000
C7717
w' /
07737

0571

1343
XWT
0517
1
wT C
X 34P
»J

1341
XUTi

J. r

07 76 3

"567

i?l

07 76 7

07774
07775
DATA
DELTA
DIAL
DiALA

057 6
0575
7351
0107
1716
0751

1220
0125
1226
0122
0123
0712
0724
0103
0104
1734
6305
6412
0025
0024
0660
0074
1146
0022
1157
6604
7016
0263
EX
0503
EXA
1423
EXL
EXLSET 0521
EXLSTO 1456
EXLSYN 1425
0505
EXO
1740
FIXUP
FSAM
0127
0373
FSTA
FSTSAM 1605
GETKBD 5424
GOCAT 1224
1345
GOGO
HOTAC 7201
HOTACl 7103
0406
INCCX
0403
INEXF
INJUMP 0357
INMASK 0143
6655
INPTR
0400
INSSW
0320
INI
0560
IN10
0413
IN4
0437
IN5
0375
IS2DL
IXMASK 0075
JMPBY 1715
JMPME 4052
JMPM6 4053
JMPSTI 0421
JMPSTO 1437
JMPSYN 1406
JUMPS! 0533
0657
KHAR
0137
LI
1076
LIMX
0364
LINCI
1322
LISTP
4056
LOCX
6615
LOOPl

DISAB
DISCTR
DISPLY
DiSPl
DISP2
OISbET
DISSl
OISl
DIS2
DITA8
DONE
OONEl
DPY
EGA
ECHO
ENREG
ENSEN
ENXM
ENl
ERORX
ERROKX

L00P2
L00P3
LOTAC
LOTACl
LRTN

6674
6760
720^
7105
1761
1104
LT
4064
MA
2041
MAA
MAAA
2043
MBA
2061
6435
MBB
2073
MCA
7040
MCHK
2113
MDA
6507
MDB
4151
ME
4153
MEA
2201
MESSA
2^52
MESS8
MESSC 2306
MESSD 2356
4566
MESSE
MESSF
4636
MESSl 2142
4232
MESS2
MESS3 4262
4331
MESS4
MESS5 4421
4527
MESS6
MFA
4171
MFB
6531
HiNUS3 6264
MINUS5 6302
MUM
1075
MONA
0151
MONITO 0472
MONJMP 0476
0145
MONSW
0461
MONl
M0N2
0464
0470
M0N3
MOTAC
7202
MOTACl 7104
MULRTN 7252
6647
MULWD
MULWOl 6750
MULW03 7012
Ml
4057
HIA
2020
MIAA
2022
MIX
1242
M10TAC 7235
M1000
7075
M12
0747
M14
0047
H2
4071
M2A
4073
M2B
6020
M260
0746
M261
0740
M272
0741
M3
4105
M3A
4107

6141
0742
0745
0743
0732
0027
0734
0733
0736
0737
0735
4121
M4
4123
M4A
6231
M4B
M5
4135
4137
MSA
6320
M58
7100
M50
4203
M6
M6A
4205
0750
M7
M8RTN 7234
M8TAC 7223
NCHAN 0051
NCHTP 6660
NCH10 6133
6130
NCH20
6136
NCH4
6605
NOMX
NORMX 7017
NORMXX 2035
7106
NfACl
NfAC2
7107
NTAC3 7110
NUM
6661
NUMSAV 7074
OCTAC 6656
OKSAM 1600
OKSAMA 0023
0434
OUCCX
0431
OUEXL
OUHASK 0144
OUSSW
0426
0677
PAUS
PDP8IN 1200
PLIST 0064
PTBNSV 6602
PUTPtR 0124
P3
7114
4707
QAB
QACA
4720
QACHAR 5560
QACKLF 5524
QACNTR 5507
QAD
4731
4753
QAE
QAEXIT 5540
5421
QAF
4765
QAG
5017
QAH
5034
QAI
QAINIT 4703
QAJ
5041
M3B
M301
M303
M310
M311
M314
M320
M322
M323
M326
M330

QAK

5210
6036
QAL
5100
QALEGL 5500
QAM
5004
QAN
5126
QAO
5134
5145
QAP
QAQ
5166
QARFSH 4756
QAT
5173
QATLS 6046
QATPE
5547
QATSr
6041
5441
QATY
5 411
QAU
QAV
5221
5415
QA^
5327
QAX
QAY
5315
QAzf
5204
QCTR
0106
Q!T
1773
QSET
1064
USETA 0147
QSTACK 0154
RET
0141
RTN
6211
SAMAN 0365
SAMEN
1020
SAMEND 1000
SAHFLG 0115
SAHINS 0117
SAMSTT 0126
SAMXIT 1170
SAMXTA 0026
SAMll
1021
SAMv5
1010
SAM5
1036
SAM7
1013
SBLX
0447
SCCX
1462
SCHK
7050
SEXL
1454
SJHP
0132
SJMS
0134
SMXT
0045
SSA
0502
SSO
0504
SSSET 0513
SSSW
1444
SSTRIN 1614
isSW
1412
SSWSTO 1446
SSWSYN 1414
STAC
0101
STACKE 0102
STACKT 0100
START 4044
STBLK 7370
STCHAN 0050
STCHTP 6657
STOA
0512

QAKR8

STOPNM
STOPON
STOPP
STOPPP
STOPl
STOHFG
STTBLK
SU8T3
SO^Jt
SUMCHN
SYNA
SYNCON
SYNCl
SYNOLY
SYNGO
SYNNUM
SYN15
TACMOV
TAPE
TAPEA
TAPEWl
TAPEW2
TAPEX
TAPEl
TAPE3
TBLK
TEMP
TEMPSV
THING
THINGA
THINGl
THING2
TIDLE
TIOLEA
TOTP
TOTPTS
TOTPl
TPH
TPHERE
TPLADD
TPLCLR
TPLGET
TPWRDl
TPWRD2
TYPAX
TYPGO
UCHK
UNITSV
UPLIM
UPLIMl

UPLIM3
WRITE
XIT
XR0
XRl
XR2
XR3
XTART
XI

X1000
X2
X4
^2

0061
0060
1431
1144
1451
0116
0052
6427
6432
6112
0^10
00^6
1417
00S?5

1400
00!37

0771
7204
1243
0070
6577
6600
1221
1311
1305
0105
1337
7264
1040
0146
1057
1051
1113
0150
1122
0112
1137
7363
7301
7111
7253
7172
6504
6505
1077
1313
7023
6603
6641
6724
7004
1270
6653
0010
0011
0012
0013
0200
0366
0152
0367
0066
1774

0000
0001
0002
0003
0004
0005
0006
0007
0010
0011
0012
0013
0014
0015
0016
0017
00 20

0021
0022
0023
0024
0025
0026
0027
0030
0031
003^
0033
0034
0033
0036
00 3 7

0040
0041
0042
0043
0044
0045
00 46

0047
0050
00t?i

0052
00!>3

*20

SEGMNT
0020
0021
0022
0023
0024
002&
0026
0027
0030
0031
0032
0033
0034
003^
0036
0037
0040
0041
0042
0043
0044
004t>

0046
0047
00b0
005)1

00^2
00^3
0054

b 6

4 ,5 1 25

4061
4062
4063
4064
4065
4066
4067

1020
0020
0004
1020
1001
1040
0011
1X20
2000
4012
0640
1020
1001
1120
6107
4013
1031
1072
0233
6040
0643
6072
6107
6123
6137
6171
0600
6463
0002
7200
6046
7200
6041

BEGIN,

m5b
0057
0060
0061
0062
td063

0064
0065
0066
0067
0070
0071
0072
0073
0074
0075

0070
0071
0072
0073
0074
007^

mn
0103
0101
0102
0103
0104
010i>

0106
0107
0110

Esr
BEGINl, IDA I
QAINIT-i
STA
11
ADA

2000

/CORE
/MOVE
/OF
/QANDA
/TO
/SEGMNT

QAINIT-1
ADA

«AAAEND
STC 13
IDA I 11
STA I 12
XSK I 13
JMP •3
LOF 3
JMP Fl
JMP F3
JMP r4
JMP F5
JMP F6
LIT 0
JMP RESET2
POP
PHOOE
•

START,

/CORE MOVE DONE?
/NO
/YES

CLA

TLS
HEAONG, CLA
TSF
JMP HEADNG*!
TAO I XR2
TLS
SNA
SKP
JMP HEADNG
LINC

t>260

1412
6046
7450
7410
5257
6141

/FLAG SET?
/NO
/GET CHAR.
/PRINT CHAR,
/EOM?
/YES
/NO

LHOOE
0601
6375
0057
0000
7002
0434
0774

L IF

Fl,

JMP NXTCHN
SET 17
0

FIA,

63 77

0070
0774
1330
1420
0300
6017
6074
0057
0000

STC 12
LDF 0
IDA

0054
00!>5

*20
IDA

F3,

JHP QAINIT
FRAMEl
ANSWER
JMP CHKSNS
SET I 10
ANSWER
LON I 10
SHD I
0300
JHP 17
JMP FIA
SET 17
0

/A C?

/YES
/NO

0076
0077
0100
0101
0102
0103
0104
010b
0106
0107
0110
0111
0112
0113
0114
011t?

0116
0117
0120
0121
0122
0123
0124
0125
0126
0127
0130
0131
0132
0133
0134
0135
0136
0137
0140
0141
0142
0143
0144
0145
0146
0147
0150
0151
0152
0153
0154
0155
0156
0157
0160

0161
0162
0163
0164
0165
0166
0167
0170
0171
0172
0173
0174

0111
0112
011^
0114
0115
0116
0117
0120
0121
0122
0123
0124
0125
0126
0127
0130
0131
0132
0133
0134
0135
0136
0137
0140
0141
0142
0143
0144
0145
0146
0147
0150
0151
0152
0153
0154
0155
0156
0157
0X60
0161
0162
0163
0164
0165
0166
0167
0170
0171
0172
0173
0174
0175
0176
0177
0200
0201
0202
0203
0204
0205
0206
0207

7002
0530

F3Ai

FRAM£3
ANSWER
JMP CHKSNS

1(^774

6377
0070
0774
0601
6020
6017
6111
0057
0000
7002
0603
0774
6377
0070
0774
0601
6050
6017
6X25
0057
0000
6402
0074
0657
0073
0000
0072
0335
0071

SET

ANSWER

F4,

LIF
JMP
JMP
JMP
SET

F38
17

F3A
17

F4A,

JMP QAINIT

FRAME4
ANSWER
JMP CHKSNS

F5,

SET I 10
ANSWER
LIF 1
JMP F4B
JMP 17
JMP F4A
SET 17
0

JMP RESTR
14
SET
I

FRAME5*13
SET

SET

QUE"-1

SET

-2

7 7 75

0067
0000
7002
0644
0774
6377
0070
0774
0601
6116
0467
6154
4430
6176
6154
0057
0000
0600
6470
6017
1000
0000
4272
1000
0007
1460
0020
0467
6154
0227

JMP QAINIT

SET

/PTR TO ADOR
/OF Q.F, SPACES
/CTR FOR 24
/LOC OF Q.F,
/PTR TO ADDR«1
/OF Q.BUFF,
/CTR FOR
/TWO Q.F,

F5A,

JMP QAINIT

FRAME5
ANSWER
JMP CHKSNS

F6,

SET I 10
ANSWER
LIF 1
JMP F5B
SKP
JMP F5A
STC TEMPI
JMP OPOSIT
JMP F5A
SET 17

/SAVE CH,N,

LIF 0
JMP F6A
JMP 17
OPOSITi LOA
0

STC RTN2
LDA
7

SAE

SKP
JMP F5A
XSK I 7

/CHK TO SEE
/THAT NO, OF
/CH IS 16,

0175
0176
0177
0200
0201
0202
0 20 3

0204
0205
0206
0207
0210
0211
0212
0213
0214
0215
0216
0217
0220
0221
0222
0223
0224
0225
0226
0227
0230
0231
0232
0233
0234
0235
0236
0237
0240
0241
0242
0243
0244
0245
0246
0247
0250
0251
0252
0233
02^4
0255
0256
0260
0261
0262
0263
0264
0265
0266
0267
0270
0271
0272
0273

0210
0211
0212
0213
0214
0215
0 216
0217
0220
0221
0222
0223
0224
0225
0226
0227
0230
0231
0232
0233
0234
0235
0236
0237
0240

1000
IDA
0430
TEHPl
1072
STA 1 12
0303
ROR 3
1560
BCl I
7770
7770
0470
Age 1
6245
JMP UNOIGT
1120
ADA \
0060
60
4357
STC SVTENS
1000
IDA
0013
13
1460
SAE
0030
30
0467
SKP
6234
JMP ,4.4
1460
SAE I
0027
27
0467
SKP
6240
JMP ,*4
1460
SAE I
0026
26
0467
SKP
6360
JMP RESET
02 41
0233
XSK
13
0242
1000
LOA
0243 0357
SVTENS
0244
1374
STH I 14
02 4 >
1000
UNDIGT, IDA
0246 0013
13
0247
1460
SAE
02':?0
0030
30
0251
0467
SKP
02b2
6256
JMP ,4
0253
1460
SAE I
0254
0027
27
025t>
0467
SKP
0256
6360
JMP RESET
0257
1012
IDA 12
0260
1560
BCL 1
0261
7770
7770
0262 1120
ADA I
0263
0060
60
0264
0233
XSK
13
0265
1374
STH
14
0266
1020
LDA
0267
0054
54
0270
0233
XSK I 13
0271
1374
STH I 14
0272
0000
0
RTN2.
0273
1020
EXIT,
LOA !
0274
Mil
1777
0275 1072
STA
12
0276
0072
SET 1 12
0277
0335
QUE^l
0300
0601
LIT 1
0301
6256
JMP UNITCK
0302 0467
SKP
0303
0237
XSK
17
0304
6017
JMP 17
030:>
4432 ALLi
STC STCHl
0306
0601
LIT 1
I

/STA CHsNi

/TENS DIGIT»0?
/YES
/NOi CHANGE
/TO 6 BIT CHAR
/CHK TO

/SEE
/IF

/STORAGE
/ROOM
/IN
/PRESENT
/Q»F.

/NO ROOM

/STA TENS DIGIT
/CHK
/HERE
/TOO

/NO ROOM
/GET UNIT DIGIT
/CHANGE TO
/6 BIT CHAR

/STA UN I T DIGIT

/STA

COMMA

/DISPLAY FRAME6?
/YES
/NO

0274
0275
0276
0277
0300
0301
0302
0303
0304
0305
0306
0307
0310
0311
0312
0313
0314
031!p

0316
0317
0320
0321
0322
0323
0324
032!?

0326
0327
0330
0331
0332
0333
0334
033b
0336
0337
0340
0341
0342
0343
0344
0345
0346
0347
0350
0351
0352
0353
0354
0355
0356
0357
0360
0361
0362
0363
0364
0365
0366
0367
0370
0371
0372

0307
0310
0311
0312
0313
0314
0315
0316
0317
0320
0321
0322
0 32 3

0324
0325
0326
0327
0330
0331
0332
0333
0334
0335
0336

0357
0360
0361
0362
0 36 3

0364
0365
0366
0367
0370
0371
0372
0373
0374
0375
0376
0377
0400
0401
0402
0403
0404
0405
0406
0407
0410
0411
0412
0413
0414
0415
0416
0417
0420
0421
0422
0423
0424

6000
1040
0433
2432
1120
7776
4431
1000
0432
4 4 30

6176
1000
0432
0017
2431
0451
6154
1000
0432
1120
0001
4432
6316
0000

MP 0
STA
NCHl
ADO STCHl
ADA I
-1

STC SUMl
ALIRPT, IDA
STCHl
STC TEMPI
J MP

OPOSIT

LDA

STCHl
COM
ADD SUMl
APO
JMP F5A
LOA

STCHl
ADA I
1

STC STCHl
JMP ALLRPT
QUEi

0000
0231
0467
6141
0074
0674
0073
0000
6000
0045
0000
1330
0601
0040

SVTENSi 0
XSK I 11
RESETi
SKP
JMP F5*2

00 05

6000
0440
7055
6045
1000
0000
4422
0072
7775
0074
0657
0073
774 7
1020
0040
1374
0233
6413
0232
0467
0000
0234
6411

SET

FRAME5*30
SET

JMP
ANS8UF, SET

0
5

LDH
LIF
SET

CHKSNSi
RESTR,

JMP 0
SNS 0
JMP QARFSH
JMP START
IDA

/SAVE RTN JMP

STC RTNl
SET
12
I

-2

SET

FRAME5*13
LP.

SET
-30
LOA

40
STH I 14
XSK I 13
JMP LP"
XSK I 12
SKP

RTNli

XSK I 14
JMP LP-2

/CTR FOR
/TWO Q,F,
/PTR TO ADOR
/OF Q.F.SPACES
/CTR FOR 24
/SPACES OF Q,F,
/RESTORE Q.F,
/WITH 40S
/Q,F, RESTORED?
/NO
/BOTH Q,F, REST?
/NO
/YES
/STRT OF NXT QF

0373
0374
0375
0376
0377
0400
0401
0402
0402
0402
0402
0402
0402
0402
0403
0403
0404
0404
0404
0404
0404
0404
0404
0404
0404
0404
0404
0404
0404
0404
0404
0404
0404
0404
0404
0404
0404
0405
0405
0405
0405
0405
0405
0405
0405
0405
0405
0405
0405
0405
0405
0405
0405
0405
0405
0405
0405
0406
0406
0407
0407
0407
0407

0426
0427
0430
0431
0432
0433
0434
0435
0436
0437
0440
0441

1032
0601
6000
0000
0000
0000
0000
0640
4040
4040
4040
0104
0317

0442

1643

0443
0444
0445
0446
0447
0450
0451
0452
0453
0454
0455
0456
0457
0460
0461
0462
0463
0464
0465
0466

4743
1040
0401
2401
4006
2217
1540
2410
0540
0401
2401
4024
0120
0540
1123
4024
2201
1623
0605
2222

0467
0470
0471
0472
0473
0474
0475
0476
0477
0500
0501
0502
0503
0504
0505
0506
0507
0510
0511

0504
4310
4024
1740
0140
1605
2740
2401
2005
4011
1640
0317
1624
1107
2517
2523
4002

i4l7
0313

0512

2343

0513
0514
0515
0516

4743
0624
3120
0540

042t?

QUEUE*

LOA I 12
LIF 1
JMP 0

TEMPI,
SUHli
STCHl,

0
0
0

FRAMEl, TEXT if

ADCON

DATA FROM THE DATA TAPE IS TRANSFERRED

TO A NEW TAPE

CONTIGUOUS BLOCKS

0407
0407
0407
0407
0407
0407
0407
0407
0407
0407
0410
0410
0410
0410
0410
0410
0410
0410
0410
0410
0411
0411
0411
0411
0411
0411
0411
0411
0411
0411
0411
0412
0412
0413
0413
0414
0414
0414
0414
0414
0414
0414
0414
0414
0414
0414
0415
0415
0415
0415
0415
0415
0415
0415
0415
0415
0415
0415
0415
0416
0416
0416
0416

0517
0520
0521
0522
0 52 3

0524
0525
0526
0527

0340
2417
4003
1716
2411
1625
0540
7461
3400

FTYPE C TO CONTINUE <1\Z
0530
0531
0532
0533
0534
0535
0536
0537
0540

0640

0541
0542
0543
0544
0545
0546
0547
0550
0551
0552

0143
0640
2417
0540
2422
0116
2306
0522
2205

0553

0477

0554

4347

0555
0556
0557
0560
0561
0562
0563
0564
0565
0566

4347
4306
4040
2324
0122
2411
1607
4024
0214
1340

0567
0570
0571
0572
0573
0574
0575
0576
0577
0600
0601
0602

7463
4306
4040
4040
4040

0603
0604
0605
0606

0640
2422
0116
2306

4 014

1703
0124
1117
1640
1706
4004
0124

FRAME3, TEXT ZF

LOCATION OF DATA

40 02

TO BE TRANSFERRED?

STARTING TBUK <3

4,040

4040
4025
1611
2440
7461
3400

UNIT <1\Z

0416
0416
0416
0416
0416
0416
0417
0417
0420
0420
0421
0421
0421
0421
0421
0421
0421
0421
0421
0421
0421
0422
0422
0422
0422
0422
0422
0422
0422
0422
0422
0422
0422
0422
0423
0423
0423
0423
0423
0423
0423
0423
0423
0423
0424
0424
0425
0425
0425
0425
0425
0425
0425
0425
0425
0425
0425
0425
0425
0425
0426
0426
0426

0607
0610
0611
0612
0613

0522
4014
1703
0124
1117

0614

1677

0615

4347

0616
0617
0620
0621
0622

4347
4306
4040
2324
0122

rRAME4, TEXT 2F TRANSFER LOCATION?

0624
0625
0626
0627

1607
4024
0214
1340

0630
0631
0632
0633
0634
0635
0636
0637
0640
0641
0642
0643

7463
4306
4040
4040
4040
4040
4040
4025
1611
2440
7461
3400

0644
0645
0646
0647
0650
0651
0652
0653
0654

0640
4003
2205
0124
0540
0611
1405
2340
0617

0655

2243

0656
0657
0660
0661
0662
0663
0664
0665
0666
0667
0670
0671
0672

4743
1040
4040
4040
4040
4040
4040
4040
4040
4040
4040
4040
4040

0673
0674
0675

4043
1040
4040

STARTING TBLK <3

UNIT <1\2

FRAME5, TEXT IT

CREATE FILES FOR

0426
0426
0426
0426
0426
0426
0426
0426
0426
0426
0426
0427
0 427
0430
0430
0430
0430
0430
0430
0430
0430
0430
0430
0430
0430
043X
0431
0432
0432
0432
0432
0432
0432
0432
0432
0432
0432
0432
0432
0432
0432
0432
0432
0432
0432
0432
0433
0433
0434
0434
0434
0434
0434
0434
0434
0434
0434
0434
0434
0434
0434
0434
0434

0676
0677
0700
0701
0702
0703
0704
0705
0706
0707

4040
4040
4040
4040
4040
4040
4040
4040
4040
4040

0710

4043

0711
0712
0713
0714
0715
0716

07 2 3

4743
0640
4040
0310
0116
1605
1440
1625
1502
0522
4074

0724

62 43

07 25

4743
1040
4040
4024
3120
0540
0140
0617
2240
0114
1440
0310

0.717

0720
0721
0722

CHANNEL NUMBER <2

0726
0727
0730
0731
0732
0733
0734
0735
0736
0737
0740
0741
0742
0743
0744
0745
0746

011,6

1605
1423
4023
0115
2014

TYPE A FOB ALL CHANNELS SAMPLED

0747

0504

0750
0751
0752
0753
0754
0755
0756
0757
0760
0761
0762
0763
0764
0765
0766

4347
4310
4040
4040
2431
2005
4027
1005
1640
0611
1611
2310
0504
4023

0434
0434
0434
0434
0434
0434
0435
0436
0437
1414
1415
1416
1417
1420
1421
1422
1423
1424
1425
1^.26

1427
1430
1431
1432
1433
1434
1435
1436
1437
1440
1441
1442
1443
1444
1445
1446
1447
1450
1451
1452
1453
1454
1455
1456
1457
1460
1461
1462
1463
1464
1465
1466
1467
1470
1471
1472
1473
1474
1475
1476
1477
1500
1501

0767
0770
0771
0772
0773

0514
0503
2411
1716
2334

0774

0000

TYPE
ANSWER 0

WHEN FINISHED SEL£CT!0NS\2

*t *5

0020
0021
0022
0023
0024
0025
0026
0027
0030
0031
0032
0033
0034
0035
0036
0037
0040
0041
0042
0043

0055 r3B,
0000
1020
0010
1040
0227
0017
4221
6163
0467
6305
1000
0133
6156
4134
6163
0467
6305
1000
0133
00 44
6156
0045
4135
0046
6312
0047
6306
0050
0055 f'^B.
0051
0000
0052
6163
0053 0467
0054
6305
0055 1000
0056 0133
0057 6156
0060
4136
0061
6163
0062
0467
0063
6305
0064
1000
0065 0133
0066
6156
0067
4137
0070 4155
0071
1000
0072 0137
0073
1440
0074
0135
0075
6306
0076
1000
0077 0146
0100
0017
0101
2136
0102 0451
0103
0467

NOLIST
SEGMNT
*20
SET 15

IDA

10
STA

MULWD
COM
STC UPLIM
JMP CHAR
SKP
JMP ERRORX
IDA
OCTAC
JMP 2ER0
STC ST8LKD
JMP CHAR
SKP
JMP ERRORX
LOA
OCTAC
JMP 2ER0
STC UNITD
JMP RDHD
JMP NORMX
SET 15

/DATA TBLK NO.

/DATA UNIT NO,

JMP CHAR
SKP
JMP ERRORX
LOA

OCTAC
2ER0
STBLKN
CHAR

JMP
STC
JMP
SKP
JMP
IDA

/NEW TBLK NO,

ERRORX

OCTAC
JMP 2ER0
STC UNITN
STC TLAG
IDA

UNITN
SAE
UNITD
JMP NORMX
IDA

UASTBN
COM
ADD STBLKN
APO
SKP

/NEW UNIT NO,
/SET C(FLAG)«0
/NEW UNIT NO

/UNITNsUNITD?
/NO
/YES
/IF UNITNsUNITD
/
THEN

/$tblkn>lastbn
/

/stblkn<stblko,

1502
1503
1504
1505
1506
1507
1510
1511
1512
1513
1514
1515
1516
1517
1520
1521
1522
1523
1524
1525
1526
1527
1530
1531
1532
1533
1534
1535
1536
1537
1540
1541
1542
1543
1544
1545
1546
1547
1550
1551
1552
1553

1554
1555
1556
1557
1560
1561
1562
1563
1564
1565
1566
1567
1570
1571
1572
1573
1574
1575
1576
1577
1600

JMP NORMX
6306
0104
ADO LASTBN
2146
0105
COM
0106 0017
ADD STBLKD
2134
0107
APO
0451
0110
JMP ERRORX
0111 6305
LOA I
1020
011^
-10
77 67
0113
SIC FLAG
4155
0114
JMP NORMX
6306
0115
SET 15
0x16 0055 F58i
0
0000
0117
JMP CHAR
6163
0120
SKP
0467
0121
JMP ERRORX
6305
0122
LOA
1000
0123
OCTAC
0133
0124
JMP iERO
6156
0125
CHKCH
JMP
6235
0126
LOA
1000
0127
OCTAC
0133
0130
JMP ZERO
6156
0131
JMP NORMX
6306
0132
0
OCTACi
0000
0133
STBLKDi
0000
0134
UNITO,
0000
0135
0136 0000 ST8LKN,
UNITN,
0000
0137
NUHi
0000
0140
MBLK
0003
0141
STCHANi
0000
0142
NCHANi
0000
0143
QSAVE.
0000
0144
QSAVE2i 0
0000
0145
0146 0000 LASTBNi 0
NUMGRP^ 0
0000
0147
0
TEMP2i
0000
0150
0
TEMP5,
0000
0151
0
DELTA,
0000
0152
P0WER2
0000
0153
GETCHN.
0000
0154
FLAG
0000
0155
SAE 1
ZERO,
1460
0156
7777
7777
0157
SKP
0467
0160
CLR
0011
0161
JMP 0
6000
0162

OTHERWISE

/ERR OR

/SET A FLAG
/FOR LATER ONi

0163
0164
0165
0166
0167
0170
0171
0172
0173
0174
0175
0176
0177
0200
0201

0056
0000
0011
4133
0602
6370
1420
7400
6016
1420
3400
6016
1420
6167

CHARi

SET 16
0

LOOPli

CLR
STC OCTAC
LIF 2
JMP ANSBUF
SHD I
7400
JMP 16
SHD 1
3400
JMP 16
SHD I

/E.O.ANS.F,?

/A BLANK?

JMP LOOPl

/EOM?

1601
1602
1603
1604
1605
1606
1607
1610
1611
1612
1613
1614
1615
1616
1617
1620
1621
1622
1623
1624
1625
1626
1627
1630
1631
1632
1633
1634
1635
1636
1637
1640
1641
1642
1643
1644
1645
1646
1647
1650
1651
1652
16t>3

1654
1655
1656
1657
1660
1661
1662
1663
1664
1665
1666
1667
1670
1671
1672
1673
1674
1675
1676
1677

0202
1420
0203
0100
0204
6275
020b
1420
0206
0300
0207
6273
0210
1120
0211
7717
0212
1040
0213
0140
0214
1120
0215 0001
0216
0451
0217
6233
0220
1120
0221
0000
UPLIM*
0222
0471
022^
62 33
0224
1000
022b
0133
0226
1260
0227
0000
MULWOi
0230
2140
0231
4133
0232
6167
02 33

02 36

SHO I
0100
JMP RAIL
SHO I
0300
JMP REXIT
ADA I
»60
STA
NUM
ADA 1

/AN A?

n c?
/S DIGIT?

APO
JMP KIT
ADA I

/NUM IS NONNEG?
/SHOULD BE

/IS NUM LESS
/THAN 10 OR 12?
/SHOULD BE

APO I
JMP X!T
IDA

OCTAC
MUL

ADD NUM
SIC OCTAC
JMP LOOP!
XSK I 16
JMP 16
SET 6

0234
6016
0235 0046 CHKCH,
0236
0000
0
0237
4144
STC QSAVE
0240 2142
ADD STCHAN
0241
0017
COM
0242
1120
ADA I
0243
0001
1
0244
2144
ADD QSAVE
0245
0451
APO
0246
6305
JMP ERROPX
0247
4145
STC QSAVE2
0250 2143
ADD NCNAN
0251
0017
COM
0252 2145
ADO QSAVE2
0253
0471
APO I
0254
6305
JMP ERRORX
0255
6006
JMP 6
0256
0046
UNITCK< SET 6
0257
0000
0
0260
1000
LOA
0261
0137
UNITN
0262
1460
SAE I
0263
0000
0
0264
0467
SKP
0265
6267
JMP JMPr6
0266
0226
XSK
0267
0602
JMPr6,
LIF 2
0270
SET 0
0271
0006
6
0272
6000
JMP 0
02 73
0602
REXIT.
LIF 2
0274
6273
JMP EXIT
0275 1000
RAIL,
IDA
0276
0142
STCHAN
0277
0602
LIF 2
0300 6305
JMP ALL

/MUL BY 10 OR 12
/FOR OCT OR DEC

/CONVERSION

/SAVE CH.N,

/CH NO

/>kSTCHAN?
/NO

/YES

/CH NO IS
/<STCH*NCHAN?
/NO
/YES

/UNITN
/NO
/YES

1700
1701
1702
1703
1704
1705
1706
17 07

1710
1711
1712
1713
1714
1715
1716
1717
1720
1721
1722
1723
1724
1725
1726
1727
1730
1731
1732
1733
1734
1735
1736
1737
1740
1741
1742
1743
1744
1745
1746
1747
1750
1751
1752
1753
1754
1755
1756
1757
1760
1761
1762
1763
1764
1765
1766
1767
1770
1771
1772
1773
1774
1775
1776

0301
03 02

0303
0304
0305
0306
0307
0310
0311

1000
0143
0602
6310
0235
0602
0040
0015
6000

IDA
NCHAN
LIT 2
JMP ALL*3
£RRORX# XSK I 15
LIF 2
NORMXi
SET 0
15

JHP 0
/FROM DATA TAPE READ STCHAN AND NCHAN
/

SET 13
0053 RDHOi
0312
0
0313 0000
JMP RDHEAD
6320
0314
SET 0
0040
0315
13
0013
0316
JMP 0
6000
0317
RDHEADi IDA
1000
0320
0
0321 0000
STC RTN3
0322 4374
LOA
0323 1000
UNITD
0324 0135
SCR 1
0341
0325
AXO
0001
0326
IDA
1000
0327
UNITO
0135
0330
STC TEMP2
4150
0331
SRO
1500
0332
TEMP2
0150
0333
JMP BITl
6340
0334
LOA 1
BIT0I
1020
0335
RDC
0700
0336
JMP STR
6344
0337
LOA I
BITl,
1020
0340
ROC
0341 0700
ADA 1
1120
0342
10
0010
0343
STC TPWROl
STRi
4353
0344
LOA
1000
034^
M8LK
0141
0346
ROR 3
0303
0347
ADA
1100
0350
ST8LKD
0351 0134
STC TPWRD2
4354
0352
TPWROl)
0000
0353
TPWR02,
0000
0354
LOA
1000
0355
1400
1400
0356
STC STCHAN
4142
0357
ADO 1401
3401
0360
STC NCHAN
414 3
0361
ADO 1414
3414
0362
STC UASTBN
4146
0363
ADD STBLKO
0364 2134
COM
0017
0365
ADD LASTBN
2146
0366
SCR 2
0342
0367
ADA I
1120
0370
0371 0001
COM
0017
0372
STC NUMGRP
4147
0373
RTN3i
0000
0374
/

/SET XQB

/BIT 11«0?
/NO
/YES

/SET BIT

/DETERMINE
/NUM OF

/GROUPS OF
/4 BLKS ORIG
/TRANSFEREO

1777
2000
2001
2002
2003
2004
2005
2006
2007
2010
2011
2012
2013
2014
2015
2016
2017
2020
2021
2022
2023
2024
2025
2026
2027
2030
2031
2032
2033
2034
2035
2036
2037
2040
2041
2042
2043
2044
2045
2046
2047
2050
2051
2052
2053
2054
2055
2056
2057
2060
2061
2062
2063
2064
2065
2066
2067
2070
2071
2072
2073
2074
2075

/PART 2 OF PROGRAM
/GET CHANNEL TO BE TRANS, FROM THE

037b
0376
0377

0042
0147
0002

2400
2401

4420
6141

NXTCHN,

SET 2

NUMGRP
POP
PHOOE
JMS I eUFTRR
L. I

0402 0077
0403 0000
0404
0602
0405 6425
0406
1460
0407
1777
0410 0467
0411
7273
0412
1040
0413
0154
0414
6525
0415
2552
0416
4555
0417
2553
0420
4556
0421
1000
0422 0136
0423
6525
0424
2551
0425
4563
0426
2552
0427
4564
0430
2553
0431
4565
0432
1000
0433 0134
0434
1120
0435
0001
0436 4472
0437
0467
0440
6141
RD4BLK
0441
0222
0442 0467
0443
6601
0444
0643
0445
1000
0446 0135
0447
0341
0450
0001
0451
1000
0452 0135
0453
4150
0454
1500
0455
0150
0456
6517
0457
6514
0460 4474 STORE
0461
0066
0462 7773
0463
1000
0464
0524
0465
4467
0466
1020
*

/SETUP

BIK BUF

LMODE
SET

LIT 2
JMP QUEUE
SAE I
1777
SKP
JMP TRANON
STA

/CTR FOR NO
/OF WRTAPES

/GET A
/CHAN NO,
/ANOTHER CHAN?
/YES
/FINISHED

GETCHN
JMP BUFSUB
ADO TB
STC CI
ADD TC
STC 02
IDA
STBLKN
JMP BUFSUB
ADD TA
STC TBI
ADD TB
STC TB2
ADO TC
STC TB3
IDA
ST8LK0
ADA I
1

STC TBIK
SKP
6141
XSK
2
SKP
JMP TYPOUT*!
LDF 3
IDA
UNITD
SCR 1
AXO
IDA
UNITD
STC TEMP2
SRO
TEMP2
JMP BITN
JMP BITY
STC TAPEWl
SET I 6
I

-4

LDA

MBLK4
STC M8LCK
LDA I

/SAVE CHAN
AND
/ST8LK OF
/TRANSFER
/TAPE
/WHICH WILL
/NO,

/BE

/TYPED
/OUT
/LATER
/ON

/YES
/FIRST BLK
/ON DATA TAPE
/TO BE
/TRANSFERED
/LINC
/THIS CH DONE?
/NO
/YES
/DATA TAPE
/UNIT NO
/SET XOB

/BIT 11»0?
/NO
/YES

/CTR FOR MBLKS
/4,5,6,7

2076
2077
2100
2101
2102
2103
2104
2105
2106
2107
2110
2111
2112
2113
2114
2115
2116
2117
2120
2121
2122
2123
2124
2125
2126
2127
2130
2131
2132
2133
2134
2135
2136
2137
2140
2141
2142
2143
2144
2145
2146
2147
2150
2151
2152
2153
2154
2155
2156
2157
2160
2161
2162
2163
2164
2165
2166
2167
2170
2171
2172
2173
2174

0
MBlCKi
0000
0467
ROR 3
0303
0470
ADA I
1120
0471
0
TBLK,
0000
0472
SIC TAPEW2
4475
0473
TAPEWl, 0
0000
0474
TAPEW2# 0
0475 0000
IDA
1000
0476
TBIK
0472
0477
ADA I
1120
0500
0001
1
0501
4472
SIC TBLK
0502
XSK I 6
0226
0503
SKP
0467
0504
JMP TRANSF
6633
0505
LDA
1000
0506
M8LCK
0467
0507
ADA I
1120
0510
1
0001
0511
STC M8LCK
0512 4467
JMP MBLCK«1
6466
0513
LDA I
0514 1020 BUY,
ROC
0515 0700
JMP STORE
0516 6460
LDA I
1020 8ITN,
0517
RDC
0700
0520
ADA I
1120
0521
10
0010
0522
6460
JMP STORE
0523
4
0004
MBLK4,
0524
1040
BUFSUBi STA
0525
TEMP5
0151
0526
SCR 6
0346
0527
ADA I
0530
1120
260
0531 0260
STC TA
0532 4551
ADO TEMPS
0533
2151
SCR 3
0534
0343
BCL I
1560
0535
7770
7770
0536
ADA !
1120
0537
260
0260
0540
STC TB
0541 4552
ADD TEMP5
2151
0542
BCL
0543
1560
7770
7770
0544
ADA I
0545
1120
260
0546
0260
STC TC
4553
0547
60 00
JMP 0
0550
0
0000 TA/.
0551
0
0000
T8,
0552
0
0000
TC.
0553
8UFTTY, 240
0240
0554
0
0555 0000 Clf
0
0556
0000
C2»
240
0557
0240
240
0560
0240
240
0561 0240
240
0562 0240
0
0563
0000
TBI,
0
0564
TB2,
0000
0
0565
TB3i
0000

/INCREMENT
/TBLK
/NUM
/4 BLKS READ/

/NO
/YES

/SAVE NUM TO
/BE TYPED
/GET HUNDREDS
/DIGIT

/GET TENS DIGIT

/GET UNITS DIGT

/SPACE

/SPACE
/
/
/

"
"
"

2175
2176
2177
2200
2201
2202
2203
2204
2205
2206
2207
2210
2211
2212
2213
2214
2215
2216
2217
2220
2221
2222
2223
2224
2225
2226
2227
2230
2231
2232
2233
22 34

2235
2236
2237
2240
2241
2242
2243
2244
2245
2246
2247
2250
2251
2252
2253
2254
2255
2256
2257
2260
2261
2262
2263
2264
2265
2266
2267
2270
2271
2272
2273

0566
0567
0570
0571
0572
0573
0574
0575
0576
0577
0600
0601
0602
0603
0604
0605
0606
0607
0610
0611
0612

0000
0000
0215
0212
0000
0467
6141
1000
0017
6525
2551
4571
2552
4572
2553
4573
0002

2613
2614
2615
2616
2617
2620
2621
2622
2623
2624
2625
2626
2627
2630
2631

1230
3013
7200
6046
7200
6041
5220
1413
6046
7450
7410
5217
7410
2553
6141

0632

6375

0240
0240
0240

240
240
240
NBl,
NB2,
N83,

215
212

/OR
/LF

SK P

TYPOUT, 6141
LDA

/LING
/GET NO, OF
/BLKS TRANSFD

JMP BUFSUB
ADO TA
STC NBl
ADD TB
STC NB2
ADD TC
STC NB3
PDF
PMOOE
TAD X5
DCA XR3
CLA
TLB
CLA
TSF
JMP ,«1
TAD I XR3
TLS
SNA
SKP
JHP AGAIN

AGAIN,

/TYPE
/OUT
/CHAN &
/STBLK «
/NB

SKP
X5,

BUFTTY-1
LINC
LMODE
JMP NXTCHN

/TRANSFER DATA FROM IK BUFFER(SEG 3)
/TO MBLK 3(SEG 1)AND WRITE ON TAPE,
/

0633
0634
0635
0636
0637
0640
0641
0642
0643
0644
064t?

0646
0647
0650
0651
0652
0653
0654
0655
0656

0064

SET

1000
0143
4150
1500
0150
6645
0224
6640
1000
0004
1040
0153
1120
0340
4656
1020
2000
0000

LOA

/CTR FOR
/POWER OF
/OF NCHAN

NCHAN
STC TEMP2
SRO

TEMP2
JHP POWER
XSK I 4
JMP
«4
LDA

/BIT 11=0?
/NO
/YES

/GET POWER

POWERi

STA

P0WER2
ADA I
340
STC NSCR
LDA I
2000

NSCR,

/ADD SCR
/NUM WHICH
/ROT GIVES

2274
2273
2276
2277
2300
2301
2302
2303
2304
2305
2306
2307
2310
2311
2312
2313
2314
2315
2316
2317
2320
2321
2322
2323
2324
2325
2326
2327
2330
2331
2332
2333
2334
2335
2336
2337
2340
2341
2342
2343
2344
2345
2346
2347
2350
2351
2352
2353
2354
2355
2356
2357
2360
2361
2362
2363
2364
2365
2366
2367
2370
2371
2372

0657
0660

4152
0002

2661
2662

5662
3000

3000
3001
3002
3003
3004
3005
3006
3007
3010
3011
3012
3013
3014
301^
3016
3017
3020
3021
3022
3023
3024
3025
3026
3027
3030
3031
3032
3033
3034
3035
3036
3037
3040
3041
3042
3043
3044
3045
3046

1716

STC DELTA
POP
PMODE
JMP
+1
3000
I

^3 00 0

30 4 7

3050
3051
3052
3053
3054
3055
3056
3057
3060
3061
3062
3063
3064
3065
3066
3067
3070

TAD I P0WR2
TAD JMPC
OCA ,+1

1^:^04

3203
0000
5605
3012
3017
3022
3025
3030
1300
3312
1307
3011
5246
1301
3312
5232
1303
3312
5232
1304
3312
5232
1305
3312
172 2
7041

JMPC,

CHANl,

CHAN2#

CHAN4,

CHAN10,
CHAN20,
CONT,

1720
1306
3313
1307
2313
7410
5245
1715
5240
3011
1411
1277
7450
5271
1311
3410
2314

CHAN2
CHAN4
CHAN10
CHAN20
TAD M2000
DCA
TAD
DCA
JMP
TAD
DCA
JMP
TAD
DCA
JMP
TAD
DCA
JMP
TAD
DCA
TAD
CIA
TAD
TAD
DCA
TAD

/2000 LOC CTR

CTR

A6000

/IST LOC^l OFIK

XRl
NXTl

M1000

/1000 LOC CTR

CTR
CONT

M400
CTR
CONT
M200
CTR
CONT
M100
CTR
I

GETCH

STCH

DELCTR
A6000
ISE DELCTR
SKP
JMP NXTl-1
TAD
OELTAA

/400 LOC CTR
/200 LOC CTR

/100 LOC CTR
/CH NO,
/SET UP
/CTR TO

/LOCATE PTR
/AT START
/OF TRANSFER
/LOCATION

NXTl,

7 410

4421
2312
5246
5662
2440
0000
1310
3010
1303
3314
5663

JMP I •+1
CHANl

JMP
DCA
TAD
TAD
SNA
JMP
TAD
DCA

.«4
XRl
I

XRl

M4000
DONE
A4000
I

/YES
/NO

ISZ

CTR400

SKP
JMS

WRTPE

IS2 CTR

JMP NXTl
JMP I R04BK

RD4BK,
BUFTR,

/END OF DATA
/FOR THIS CH?

/BLK FULL?
/NO
/YES
/FIN BUFF?
/NO

/RDC

MORE 8LKS

RD4BLK
0

TAD
DCA
TAD
DCA
JMP

A3400

/IST LOC«.l TR BU

XR"

M400
CTR400
BUFTR
I

/CTR FRO 400 LOC
/OF TRANS 8UF

2373
2374
2375
2376
^377
2400
2401
2402
2403
2404
2405
2406
2407
2410
2411
2412
2413
2414
2415

3071
7130
DONE.
3072
3410
3073 2314
3074 5271
3075
4421
3076
5723
3077 4000 H4000,
3100
6000 H2000,
3101
7000
M1000,
3102
7001
M777
3103 7400 M400,
3104
7600
M200»
3105 7700 M100,
3106
7777
Ml,
3107
5777
A6000,
3110
3377
A3400,
3111
4000
A4000,
3112 0000
CTR,
3113 0000 DELCTR,
3114
0000
CTR400,
3115
2152
DELTAA.
3116
2153
P0WR2,
3117
2375
NXTCH,
3120
2142
STCH,
3121
2144
QSAV.
3122
2154
GETCH,
3123
2600
TVP,
3200
3201

0000
6141

24 32

12 02

2433
2434
2435
2436
2437
2440
2441
2442
2443

1203
1204
1205
1206
1207
1210
1211
1212
1213
1214
121^
1216
1217
1220
1221
1222
1223
1224
1225
1226
1227
1230
1231
1232
1233
1234

1000
0136
3102
0471
7275
1000
0137
144 0
0133
7226
1000
0155
0471
7226
1000
0136
0017
2134
0451
7317
0237

2445
2446
2447
2 450
2 tbi

2452
2453
24i
2455
2456
2457
2460
2461
2462
2463
2464
2465
2466
2467
2470
2471
,

IS2 CTR400

JMP DONE
JMS I WRTPE
JMP I TYP
^4000

^2000
^1000
^777
400

2416
2417
2420
2421
2422
2423
2424
2425
2426
2427
2430
2431

2' 44

STL RAR
OCA I XR

23 5

1236
1237
124?
.241

=^200

»100
si

5777
3377
4000
0
0
0

DELTA
P0WER2
NXTCHN
STCHAN
QSAVE
GETCHN
TYPOUT
*3200

WRTAPE,

BYPASS

LIHC
LMODE
LDA
STBLKN
ADD H777
APO I
JMP ENDTP
LDA
UNITN
SAE
UNITD
JMP 8YPASS
LDA
FLAG
APO I
JMP BYPASS
LDA
STBLKN
COM
ADO STBLKD
APO
JHP OVERTP
XSK I 17

i k

LDA

0137
0341
0001
1000
0137
4150
1500
0150
7266
7263

UNITN
SCR
AXO
LDA

/BLK TO BE

/WRITTEN ON
/<s 777?
/NO
/YES
/OF UNITO=UNITN
/THEN
/BLK TO BE
/WRITTEN ON
/< STBLKD

/STBLKN

/BLK IS OK?
/NO
/YES

UNITN
STC TEMP2
SRO
TEMP2
JMP BITNO
JMP BITYES

STBLKD

/NO
/YES

/SET XOB

/BIT 11-0?
/NO
/YES

2472
2473
2474
2475
2476
2477
2^00

1242

2t>01

1251
1252
1253
1254
1255
1256
1257

2502
25)03

2504
2S)0b

2506
2^07
2510
2511
2512
2513
2514
2515
2516
2517
2520
2521
2522
2523
2524
2525
2526
2527
2530
2531
2532
2533
2534
2535
2536
2537
2540
2541
2542
2543
2544
2545
2546
2547
2550
2551
2552
2553
2554
2555
2556
2557
2560
2561
2562
2563
2564
2565
2566
2567
2570

12 4 1

1244
1245
1246
1247
1250

5251
1000
0141
0303
1100
^136
5252
0000
J0|?f

1020
0001
2136
41 J6

0002

3260
3261
3262

4420
5600
6141

1263
1264
1265
1266
1270
1271
1272
1273
1274
1275

1020
0704
7242
1020
0704
1120
0010
7242
0600
6505
0002

3276
3277
3300
3301
3302
3303
3304
3305
3306
3307
3310
3311
3312
3313
3314

7200
1313
3014
6046
7200
6041
5303
1414
6046
7450
7410
5302
7410
0424
6141

1315
1316
1317

0602
6020
0002

3320
3321
3322
3323
3324
3325
3326
3327
3330
3331
3332
3333

7200
1335
3015
6046
7200
6041
5325
1415

12 6 7

604 6
7450
7410
5324

SAVE

STC TPWOl
LDA
MBLK
ROR 3
ADA

STBLKN
STC TPWD2
TPWDli
TPWD2,

LDA

ADD STBLKN
STC STBLKN
POP
PMODE
JMS I BUFTRR
JMP I WRTAPE
LINC
LMODE
BP YES, LDA
WRC
JMP SAVE
LOA I
BIT It
WRC
ADA I

/INCR STBLKN FOR
/NEXT ROUND

/SET BITS

JMP SAVE
TRANDN* LIF 0
JMP F7A
ENOTP,
CP
PHODE
C^A
?

T *D

HEADl,

OCA XR4
TLS
CLA
TSF
JMP ,-1
XR4
TAD
TLS
SNA
SKP
JMP HEAOl
SKP
1

TAPE-1
LINC
LMODE
OVERTP,

LIF 2
JMP BEGIN
POP

PMODE
CLA

HEAD2t

TAD X7
DCA XR5
TLS
CLA
TSF
JMP .-l
TAD I XR5
TLS
SNA
SKP
JMP HEAD2

?*b 7 1

7
d 1 01
/ ** X fa

O0OH

s io

CO f O
9 74
?*57
C
Jf S
J
'Phi h

X oo /

X 0 *t iy

SKP

lo^ 41

SNASH-1

6x41

L INC

A d
Q
\0O\O
f\G\0(A

LMODE
LIT 2
JHP BEGIN

C J ( i

SEGMNT

?^
c
0

Sfl /7I
I6J

*i0

y
A
<i 0

(71
ICJ

VD
A
n f
(A iA Ck CA

i5X X
Ok3 0
C>
<i

A
U

CV
PA
^
0

^71

0 k!30 0

4
T

f?!
!6f

>
A
0

16)

icJX

Id)

\0v\0\O

0
0

X R3 #

0
0

w n £r

Od]O\0

oM T n
BUFTR
JD T D
WHTPE

0212

XR22 #

0]£}0O

cOXO

^ O Xt
c O 1 ^
A 1 A
£-010

XR4

\OvCl£>

)0H ^} C

m7
0O03
f?^

CUX /

k3 *T

c o (C |y

0 X k5
ffl •<

/7S

Ap1

p ft
?
c
u?
c <c
P
P O
^
c. ft
\J C

A (A

fi^

k3
f75

?A
Pd
H
0c

0X0
O il

r?f

H l fA
^ A-\
\o

024 0

A i
l6f

T
X0

PA PR

n "7
1

'~i

PAPA
OcO
^

(A A'i
icJ *r

c o^ /

^414
X H

Oils
W Ox A
4

CHA i

IW *T

"^(71

*20
BUFTR
WRTAPE

\odid
0^:12

k3x

'J>

tAm oi

XRl
XR2

o
k5o0<d
ns

0olo

»400
212
212
212
303
310
301
316
240
240
323
T A
o24
302
314
313
240

/LF
/LF
/LF
/C

/H
/A

/SPACE
/

/s
/T
/B
/L
/K

P
C ft
O O^ 1X

iomo

pft Oil
IP
<iO

(AA
Ion iX 7
/

Wil 40

AO (A

24 0

*^
p
c ft
OOO

0016

316
302
215
212

/N
/B
/OR
/LF
/EOM
/LF
/E

? /I

fj')

pft "^4

AO'S

(A'K {"AO

POOR
^

CA
ID

A
OO
HC

yjdxo

c. ft

P
u A
o oA
o

26 37
PAU 4^ PI
C
P
U4
*T 1
C ft
1.
P ft
P
U4
*t £,
C
P u4
~ o

t- ft

(A.

A'^
CO1

A'? A

k5c 1 <i

(A
YJ

AOl
H

\c)

A\ (A

P
A44
<L O *T T

c. /

dDO

0256
0324

PO
A4
*r 7
C
/

04 00
13 40 «

n't n A

Pft ^itl

4 1 ti

0320
WO05

P651
W
Pft
c
o SP
c

Ci4
IW *T O O

Well?

PftS 1

P ft
U *54
V *T

PA
0^
nR
P
PA
0 *T A
0

P ft ^ S
pft
C U SA
«^ O

P AR 7
PA
OA
c
0 ky
P
1
Ui
U ft
C. ft

fyl

pft
P
OA
c
Oc

2663
2664
2665
2666
2667

Itr

40 /
A
AfA
*f *T

4 *t X
CA A A O
(A

A
A OX
*+
j4 /S

44 H

03 01

0£: 12
(A

O rx ~7

m
n rx
0000
fyt

0<:12

0317
0326

04 4

03 05

W^
A
T0
44

0322
0322

A A~7
VJH
^ f
O.

212
305
256
317
256
324
301
320
305
215
212
207

fej

4O1

£1

TAPE

X 01 K
0
p
rR o c: £

^C0

OS
ky

k3kJ ia0

0 45 0

0451
0452
0453
0454

0316
0240
0304
0301

SMASH

317
326
305
322
322
325
316
240
304
301

/SPACE
"

/»

/O
/.

/T
/A

/P
/E
/CR
/LF

/BELL
/EOM
/LF
/O
/V
/E
/R
/R
/U
/N

/SPACE
/D
/A

o i "7 nt

26 70
'1 ^ *?

do/l
2672
2673
2674

k3
fy|

f-^

4 -3 /

0(C l^:

04 61

f/i

r<S fyS

ffl

W4 0d

267 6

W4O0
r/ A A .d

~? "7

''3

fTt

(Ti -t

2702
2703
2704
2705
2706
O
270 /
2710
2711
2712
2713
2714
2715
2716
2717
2720
2721
2722
"7 Ol "7

04 6 7

0471
04/2
[54 /o
Dt yl *7 /)

0 4/4

D
CA (\
Li
0 Vj VJ
(7>

0500

13 30

142 0

0502

2400

0 50 3

6 52 7

050 4
050 5
0506

6472
7002
0640

0 50 7

0 77 4
p; p;
7/ 5
5

ici

i 'J
\OOXC
ni

/A
/A

F7 A

Jnr NOKMXX
JMP P 0 A
iMD OA ^^iTT
JMP
QA N I T

Jrir

UAnr bn

V}]0 /]£}

1X0

0 / f/ A
4

A Ki Q y r o

X
100
0

tUH

O
1d
4<i0

(A '7

ffl

i 4^: 0

c
un
b HU

K
D O 1^
Ko1

10 CA00

''^

^71 (Tt

V
Q
"iC
C 71 d

fc.

y7
K "7 Pi

(Tit; *t 1

rj»

0 Old £

A c/ nt

ffl

2 74 7

05 3 4
t;

05 3 6

fc.j

rtl

6020

p
n 0f

7
1

fJ! (7?

L I r

/AN H f
/C f
/b
TUPn

/NO

JMr DLbiNl
W
nD MY Y
IN UK n A A t
.

00 40
fflCI (717
00 0/

u t: o

wyo y

r< iJ

W50 o
r^Ji

fTI

A w
/y A
IV

i
10
00
HL T
JMP r /
b Nb 0
JMP QAHr bH

o\oco

2 74 6

fji

fTi

70 55

05 2 4
01 K 'J
^ P
0
O *.

fTI

0000
6505
0440

27 Zl

ffl

(71

/NO

A Nb Wt K

^OX f

TO
If

V r* o

FRAME?

(71
ki)

/ Yt b

A
S
0-300

O "7 C Ot

L 1r
C
CT
bt.
1

c
<3I

7
CT A OT4

JMP

L IF

JMP BtbIN

0 04 0
4 0 40

4 04 0

0 54 0

4 00 3

Wy4 1
2 750

0 54 2

01^5
2411

2 75 0

W 94 0

1 /I 0

0544

A ^ A 1

0 54 5

4/4 3

0546
0547
0550

4743
1040
4040

-4

TEaT

27 50

414 0

OT CO

400

2 740
O "7 /I

2753
2753
2753

Clin

0P 1 0

(9!

05 2 2

c
u n Ti
brlU
O
Q f?
<i «: 0 0
IMP
b An X
jn r QTADT1

273t5

27p1
2751
O CO
2752

A M Q Lt r D

0 !? JL 4
K R

2 73 6

2 75 0

ffi

0 501

1(0

2750

Jnr U A N i
CD A M r A

0AA »

c IJ tr
AA M
N b H c. K

2 750

2734

"7
O
Cf >1 A
2/413

0 77 4

"7 "7 "2

O "7 /I <

047 7

-1

ffl

f;*!

2/41

OCT

00 "7/0

ilL

J nr

/Trip

Ant
0
*C

047 6

dtd
r n
U
nr
/TTv ur
Ant MR
nLAUlNvi
/MY
/ nL bL

0505K
r;i

0*7 0*7

clod

r
L Ti r

D "7 O
CO

d7 0\D
27 31

F6A

LUn

yDrQrT

A
t
1
Ln
UA
A n c <1 w 1
1

0/ /4
U o "7
o5£;o

2*t
2/o

clef

/Q r

04 /t>

rj "7

or Q r To

7
k30 7
/ /
i>i

n (A A 7

/ur
/

OR
4A
^

0 470

/ A

X^
o
c Vi 7/

/} <^ A
€5 0
W4

O "7 O 1
2 / 2o

Cl CO

ffl

Ok! 1

i:;

A /I

n
27
01

0t7
C 15

0 4 c3 id

2 6 75
n
7 /
do

0 «: 4

Cl "? (71

CAUT I ON

2753
2753
2753
2753
2753
2753
2753
2753
2753
2753
2753
2753
2753
2753
2753
2753
2754
2754
2754
2754
2754
2754
2754
2754
2754
2754
2754
2754
2754
2754
2754
2754
2754
2754
2754
2754
2755
2755
2756
2756
2756
2756
2756
2756
2756
2756
2756
2756
2756
2756
2756
2756
2756
2756
2756
2756
2756
2756
2756
2757
2757
2757
2757

0551
0552
0553
0554
0555
0556
0557
0560
0561
0562
0563
0564
0565
0566
0567

4040
4011
0640
2516
1124
4060
4011
2340
2523
0504
4024
1740
0317
1414
0503

0570
0571
0572
0573
0574
0575
0576
0600
0601
0602
0603
0604
0605
0606
0607
0610
0611
0612

2443
1040
4040
0317
1624
1107
2517
2523
4004
0124
0154
4022
0515
1726
0540
0411
0114
4024
0120

0613

0543

0614
0615
0616
0617
0620
0621
0622
0623
0624
0625
0626
0627
0630
0631
0632
0633
0634
0635
0636
0637

4743
1040
4040
4040
4040
4024
3120
0540
2440
2417
4002
0507
1116
4024
2201
1623
0605
2240
7461
3400

0640
0641
0642
0643

0640
4040
2205
2125

05 77

UNIT

IS USED

TO COLLECT

CONTIGUOUS DATA, REMOVE DIAL TAPE

TYPE

TO BEGIN TRANSFER <X\i

2757
27 57

2757
2757
2757
2760
2760
2760
2760
2760
2760
2760

2760
2760
2760
2760
2760
2761
2761
2762
2762
2763
2763
2763
2763
2763
2763
2763
2763
2763
2763
2763
2763
2763
2763
2763
2763
2763
2764
2764
2764
2764
2764
2764
2764
2764
2764
2764
2764
2764
2764
2765
2765
2766
2766
2766
2766
2766
2766
2766
2766
2766
2766

0644
0645
0646
0647

0523

0650
0651
0652
0653
0654
0655
0656
0657

2 4 01

24 05
0 44 0

0 4 01

FRAME7;
4306
10 01

0661
0662

2340
0205
0516
4024
2201
1623
0605
2222

0663

0504

0664

4347

0665
0666
0667
0670
0671
0672
0673
0674
0675
0676
0677
0700
0701
0702
0703
0704

4347
4310
4040
4040
4040
4040
2431
2005
4022
4006
1722
4001
1617
2 410
0522
4012

0705
0706
0707
0710
0711
0712
0713
0714
0715
0716
0717
0720

1702
4310
4040
4040
4040
4040
2431
2005
4010
4024
1740
1014

0721

2443

0722
0723
0724
0725
0726
0727
0730
0731
0732

4743
0640
4040
4040
4022
0520
1431
4074
6134

0660

REQUESTED DATA

TEXT ZF

FHAS BEEN TRANSFERRED

TYPE

FOR ANOTHER JOB

TYPE H TO HIT

REPLY <1\Z

0000

ERHOKS

AAAEND 5670
AGAIN 2617
4305
ALL
ALLRPT 4316
ANS8UF 4370
ANSWER 4774
A3400 3110
A4000 3111
A6000 3107
BEGIN 4020
BEGINl 4023
2517
BITN
BITNO 3266
2^14
8ITY
8ITYES 3263
233^
BIT0
2340
BITl
BUFSUB 2525
BUFTR 3063
BUFTRR 0020
BUFTTY 2554
BYPASS 3226
GHANl 3012
CHAN10 3025
CHAN2 3017
CHAN20 3030
CHAN4 3022
2163
CHAR
CHKCH 2235
CHKSN 0523
CHKSNS 4377
3032
CONT
3112
CTR
CTR400 3114
2555
01
2556
C2
OELCTR 3113
DELTA 2152
OELTAA 3115
3071
DONE
OPOSIT 4176
ENDTP 3275
ERRORX 2305
4 27 3
EXIT
2155
FLAG
FRAMEl 4434
FRAME3 4530
FRAME4 4603
FRAME5 4644
FRAME6 0535
FRAME7 0640
4072
Fl
4074
FIA
F3
4107
F3A
4111
FSB
2020
F4
4123
r4A
4125
F4B
2050
F5
4137

F5A
FSB

4154
2116
4171
F6A
0470
F6AA
0472
r7A
0505
GETCH
3122
GETCHN 2154
GETKBO 5523
HEAONG 4057
HEAOl 3302
HEA02 3324
JMPC
3004
JMPF6 2267
LASTBN 2146
LOOPl 2167
LP
4413
MBLCK 2467
M8LK
2141
MBLK4 2524
MULWO 2227
Ml
3106
M100
3105
Ml 00 0
3101
M200
3104
M2000 3100
M400
3103
M4000 3077
M777
3102
NBl
2571
N82
2572
NB3
2573
NCHAN 2143
NCHl
4433
NORMX 2306
NORMXX 0527
NSCR
2656
NUN
2140
NUMGRP 2147
NXTCH 3117
NXTCHN 2375
NXTl
3046
OCTAC 2133
OVERTP 3317
POWER 2645
P0WER2 2153
P0WR2 3116
OAB
5006
QACA
5017
QACHAR 5657
QACKir 5623
QACNTR 5606
QAD
5030
QAE
5052
QAEXIT 5637
OAF
5520
QAG
5064
QAH
5116
QAI
5133
QAINIT 5002
QAJ
5140
QAK
5307
QAKRB 6036

QAL

5177

QALEGL 5577
5103
QAM
5225
QAN
5233
QAO
5244
QAP
5265
QAQ
QARFSH 5055
5272
QAT
QATLS 6046
5646
QATPE
604 1
QATSF
5540
QATY
5510
QAU
5320
QAV
5514
5426
5414
Q AY
5303
3121
QSAV
QSAVE 2144
QSAVE2 2145
4336
QUE
4425
QUEUE
R ALL
2275
2312
RDHD
RDHEAD 2320
R04BK 3062
RD4BLK 2440
4360
RESET
HESET2 0463
RESTR 4402
REXIT 2273
4422
RTNl
4272
RTN2
2374
RTN3
3242
SAVE
SMASH 0442
4045
START
STARTl 0533
STBLKD 2134
STBLKN 2136
3120
STCH
STCHAN 2142

QAW
QAX

STCHl
STORE

44 32

2460
2344
4431
SVTENS 4357
2551
TA
0425
TAPE
TAPEWl 2474
TAPEW2 2475
255^2
TB
2472
TBLK
2563
TBI
2564
TB2
2565
TB3
2553
TC
4430
TEMPI
TEMP2 2150
2151
TEMP5
TPWDl 3251
STR
SUMl

TP W02
TP WROl

3252
2 3i53

TP WRD2 2354
TR ANDNi 32 73
T RA NSF 2633
T YP
3123
T YPOUT 2600
UNO GT 4245
UN TCK 2256
UN T D
2135
UN I TN
213 7
UPL M
2221
I

I
I

D T ADC*

W RIPE
V T T
X
I

XK
XRl
VDO

32 00

002

2233
0010
0011
0012

XRi:2
V
D1
XRO

04 00
001 3

X R4

0014
0015
2630
3313
3335
2156

VD
X
Kt>

X5
X6
X7
HERO

READER'S COMMENTS

ADTAPE £ ADCON
DEC-12-UW2A^D
Digital

Equipment Corporation maintains a continuous
effort to improve the auaiitv and u.^fuu...
To do th.s effectively we need user feedback - your
criticalta^^^^^^^ of this^^^^^^^^^^^^^

puhH.at.ons.

Please comment on this manual's

completeness, accuracy, organization, usability,

and readability.

Did you find errors in this manual?

How can this manual be improved?

Software Manual Update, a quarterly

User^s Bookshelf, a bibliography of

O Program Library

collection of revisions to curren.

software manuals.

current software manuals

Price LisL a list orcurrenlly available

software programs and manuals.

Please describe your position.

Name
^^'^""^

Organization

—

___
—

^^^^'^

—

Department .

•

Zip or Country

"
*

Do Not Tear - Fold Here and Staple

FIRST CLASS
PERMIT NO. 33

MAYNARD, MASS.
BUSINESS REPLY MAIL

NO POSTAGE STAMP NECESSARY IF MAILED IN THE UNITED STATES
Postage will be paid by:

Digital Equipment Corporation

Software Information Services

146 Main Street, Bldg. 3-5

May nard, Massachusetts 01754

HOW TO OBTAIN SOFTWARE INFORMATIOM

Digital Software News for
the PDP-8 Family
Digital Software News for

the PDP-9/15 Familv
^
PDP.6/PDP-I0 Software Bulletin

These newsletters contain information

Please complete the card

applicable to software available

below to place your name on

Report form with details of the

from Digital's Program Library.

the newsletter mailing list.

Specialist is available, please

problem to:

send a Software Trouble

Software Information Service
Digital Equipment

Corporation
146 Main Street, Bldg. 3-5
Maynard, Massachusetts 01754

the program or manual
a Pnce list wi„ be

requested Revisions of nrn^r
ine.udej twice year^

document number and a brief

DrV^irfn^re^lnd"™!: t^'"

Program Library
Digital Equipment

Corporation
146 Main Street, Bldg. 3-5
Maynard, Massachusetts 01754
Digital Equipment

Computer Users Societv npri fc^
r

•

DECUS
Digital Equipment

Corporation
146 Main Street
Maynard, Massachusetts 01
754

Send Digital's software

newsletters to:

Name
Company Name_
.

Address

My computer is a

PDP-8/1

LINC-8
PDP-9
PDP-10

My system serial number

(zip code)

PDP-8/L
PDP-I2
PDP-15

OTHER

. (if known)

Please specify

description of

Fold Here

Do Not Tear - Fold Here and Staple

FIRST CLASS

PERMIT NO, 33

MAYNARD. MASS.
BUSINESS REPLY MAIL

NO POSTAGE STAMP NECESSARY IF MAILED IN THE UNITED STATES
Postage will be paid by:

Digital Equipment Corporation

Software Information Services

146 Main Street, Bldg. 3-5

May nard, Massachusetts 01754

(