Digital PDFs

DEC-12-UW4A-D

December 1970

48 pages

Original

3.8MB

Document:	dec-12-uw4a-d
Order Number:	DEC-12-UW4A-D
Revision:
Pages:	48
Original Filename:	https://svn.so-much-stuff.com/svn/trunk/pdp8/src/dec/dec-12-uw4/dec-12-uw4a-d.pdf

OCR Text

ilH a
t

pop
p(QQ

SINPRE

pdp
pdp
p(QQ

III

pdp
pdp
pdp
pdp
pdp
pdp
QXOQ

DEC-12-UW4A-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-UW4A-D from Program
Library, Digital Equipment Corporation, 146 Main Street,
Maynard, Mass.
01754
Price $5.00

TABLE OF CONTENTS

1.0

GENERAL DESCRIPTION

2.0

MINIMUM REQUIREMENTS

3.0

STARTING PROCEDURE

4.0
4.1
4.2
4.3
4.4
4.5

SETUP MODE
MESSAGE 1
MESSAGE 2
MESSAGE 3
MESSAGE 4
MESSAGE 5

5.0

ERROR CONDITIONS

APPENDIX A

3
3
3

4
4

MODIFYING SINPRE

1.0

GENERAL DESCRIPTION

The SINPRE program will cmvert a LINCtape based double precision file

such as that from the Signal Averager program (DEC-12-UZ1A-D)

into a

LINCtape based single precision file.

The user is asked for the first and last tape block number of the double

precision file and the tape unit number.

The single precision file is

defined by the first tape block number md the tape unit number.

The values of the double precision file are scaled to -8 bits

(scope

limits) by first searching the double precision file for the maximum

absolute value.

This value is then shifted right until it is within

the required limits and the number of shifts

recorded.

It should

be noted that if the maximum double precision value is initially within

the required limits, no shifting is performed.

Now each value of the

double precision file is shifted the above number of times and written in
the output file as single precision numbers.

When the conversion is completed, the unfilled locations of the last
single precision data block are filled with zeros and written on tape.
The user then has the option to convert another file.

2.0

MINIMUM REQUIREMENTS

PDP-12B with 4K of core.

LAP6-DIAL

tape containing the SINPRE program.

The order of the double precision words is low/high.

LAP6-DIAL is hereafter referred to as DIAL.

3.0

STARTING PROCEDURE

Load the DIAL tape with the SINPRE program,

(Refer to

the LAP6-DIAL Programmer's Reference Manual, DEC-12-SE2B-D.)
2.

Load SINPRE by typing
•>L0

4.0

SINPRE, 0^

SETUP MODE

The SINPRE program displays a series of scope messages which the user

answers by typing the appropriate characters on the keyboard.

All scope

messages are presented using the QANDA subroutine (refer to DEC-12-FISA-D)
It is assumed that the user is familiar with the conventions of QANDA.

Any of the following conditions initialize the setup mode:
1.

Loading SINPRE from DIAL.

Depressing Sense Switch 0 during Setup Mode.

Responding with R to message
tion 4.5).

Pressing STOP, I/O PRESET and then START 20

(refer to sec-

when the program has been loaded from DIAL.

In the following messages, unfilled QANDA blanks are interpreted as zeros.

all leading zeros and trailing blanks are ignored.

For example:
1

000
1

001

Also,

4.1

MESSAGE

When the setup mode of SINPRE is initialized, the following message is
displayed:

SINPRE

CONVERT A DOUBLE PRECISION FILE
TO A SINGLE PRECISION FILE
TYPE C TO CONTINUE _

Typing C causes message

4.2

MESSAGE

to be displayed.

DOUBLE PRECISION FILE
FIRST BLOCK
LAST BLOCK
UNIT _
The user is asked to define the double precision file that is to be con-

verted.

FIRST BLOCK is the starting tape block of the double precision file;
LAST BLOCK is the last tape block of the double precision file.

Both

must be octal and in the range 0-777 and the value of LAST BLOCK must be
greater than or equal to FIRST BLOCK.

UNIT is a single digit octal number in the range

ja-7

describing the tape

unit on which the tape containing the double precision file is or will
be mounted.

4.3

MESSAGE

SNGL PRECISION FILE
FIRST BLOCK
UNIT

Here the user is asked to describe the single precision file that is to
be created

f rom ttie

double precision file.

FIRST BLOCK is the starting tape block of the single precision file.
It must be octal and in the range 0-777.

UNIT is the single digit octal number in the lange of 0-7 which describes
the tape unit on which the single precision file is to be created.

The SINPRE program will not allow the single precision file to write over
the double precision file.

Therefore, if the double precision unit is

equal to the single precision unit, the single precision FIRST

BLOCK cannot be in the range double precision FIRST BLOCK to double precision LAST BLOCK.

Other checks are made while Ihe files are being con-

verted.

4.4

MESSAGE

MOUNT TAPES
ON PROPER UNITS
TYPE C TO CONVERT _

At this time the user should check that the data tapes are mounted on
the correct units and that the units are set to REMOTE and WRITE ENABLE.

The requested conversion is performed after C and a terminator are typed.
CAUTION:
4.5

DIAL is not protected if data is converted to that tape.

MESSAGE

After the specified double precision file has been converted, the following message is displayed:

REQUESTED DATA
HAS BEEN CONVERTED
TYPE R FOR ANOTHER JOB
REPLY

Type R if another file is to be converted.

Message

will be displayed.

Typing any other character will cause the program to halt.

If the program detects an error in the user's response to any of the

above messages, the message is re-displayed.

It should be noted that

the program does not interrogate any of the replies to the displayed

message until the message has been terminated according to the QANDA
conventions.

Also, the user may initialize setup mode at any time

(while he is in the setup mode) by depressing Sense Switch 0.

5.0

ERROR CONDITIONS

There are three error messages that can be printed out on the Teletype

while the file is being converted.

They are:

NO DATA
The SINPRE program assumes that zeros are used to fill the last

block of the double precision file once the last data point has

been accumulated.

A search for the last data point is performed

and if no non-zero values are found, the NO DATA diagnostic is

printed on the console printer and the setup mode is initialized.

OUTPUT OVERFLOW
This diagnostic is printed on the console Teletype if the single

precision file has reached block 777 of the tape before all double

precision values have been converted.

After the message is printed,

setup mode is initialized.

DATA OVERFLOW
If the single precision and double precision files are defined
to be on the same tape unit and if converted data

(single pre-

cision) is about to be written over the first block of the

double precision file, the DATA OVERFLOW diagnostic is printed
and setup mode is iritialized.

APPENDIX A.

MODIFYING SINPRE

It is possible to revise SINPRE to

(1)

accept double precision words
as high/low rather than the
low/high convention for which
it is programmed, and,

(2)

to scale to -11 bits rather
than -8 bits.

To implement these changes, the binary version of SINPRE must be revised

using the PATCH program {DEC-12-YU2A)

The revisions are as follows:

High/Low format
Change Location 530 to 3101

Change Location 535 to 3100

Change Location 614 to 3100

Change Location 616 to 3101

Scaling to -11 Bits
Change Location 105 to 4000

Change Location 264 to 0013

Yes

FBLK3 - FIRST BLOCK

UNITS - UNIT

MAX - 0
MAX+1 = 0

XOINP =
XOB VALUE
FOR INPUT

SET RDC
AT R2

L L_
XOOUT =XOB
VALUE FOR
OUTPUT
SETUP WRC
AT W2

CR/LF
TO

TELETYPE

^ SEARCH ^
START AT END
OF INPUT FILE
AND SEARCH
FROM FIRST
NON ZERO VALUE

IS THE!

A NON-ZERO
VALUE
Yes

CONTINUE
SCANNING FILE.
NOW LOOKING
FOR THE LARGEST
ABSOLUTE VALUE.
\f

THE LARGEST
VALUE IS
LEFT AT
MAX

Yes

SET CR
TO 17

No
\f

SHIFT MAX
RIGHT UNTIL
MAX =
MAX+1 £ 377

COUNT EACH
SHIFT AND
RECORD THEM
AT "CTR"

TRAN

TAKE EACH
VALUE OF THE
DOUBLE PRECISION
FILE AND SHIFT
IT RIGHT CTR TIMES

STORE THE
LOW ORDER PORTION
OF THE RESULTS
IN THE OUTPUT
FILE

Error Conditions,

Piles, 1

High/Low Format,

Messages, 3
Minimum Requirements,
Modifying SINPRE, 6

Scaling, 1, 6
Setup Mode, 2
Starting Procedure,

0000
0001
0002
0003
0004
0005
0006
0007
0010
0011
0012
0013
0014
0015
0016
0017
0020
0021
0022
0023
0024
0025
0026
0027
0030
0031
0032
0033
0034
0035
0036
0037
0040
0041
0042
0043
0044
0045
00 4 6

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

• 20

/SINPRE
/PAGE 0

PMODE
»10

0010
0011
0012

0000
0001
0002

0020

6141

0021
0022

0602
6020

XR0,
XRl,
XR2,

0
1
2

«20
-LINC

LMODE
LIF 2
JMP BEGIN

PMODE
»50
0050
0051
0052
0053
0054

0000
0000
0000
0000
0000

FTB,
LTB,
ITU.
OFTB.
OTU.

0070
0071
0072
0073
0074
0075
0076
0077
0100
0101
0102
0103
0104
0105
0106
0107
0110
0111
0112
0113
0114
0115
0116
0117
0120
0121
0122
0123
0124
0125

0700
0704
0000
0000
2377
2000
0265
0304
0000
0000
0000
0000
0000
7400
0000
0000
2377
2777
0000
0777
1000
0010
1015
0736
0000
0000
4000
5000
0323
7400

C700,
C704,
RT8LK.
STSW,
BBUFA,
TBUFA.
READA.
WRITEA,
INWORO.

0200
0201
0202
0203
0204
0205
0206
0207
0210
0211

7300
3102
3103
1052
7110
3120
1070
7430
1115
3277

0
0

0
0
0

#70
700
704
0
0

TBUF-f377

TBUF
READ
WR ITE
0
0

MAX,

PTR.
C7400,
CTR,
OTBLK.

0
0
0

7400
0

OBUFA,
OEND,
TCTR,
C777,
TTYOA,

08UF»1
OBUF+377

cix,

777
TTYO

CRLF
CRLFA,
ALDONE. OONEAL
0
XOINP,
0
XOOUT.
4000
C4X,
5000
C5X.
RSTRTA, RSTRT
= 400
M4X.
«200
CLA CLL
XEGIN*
DCA MAX
DCA MAX+1
TAD ITU
CLL RAR
DCA XOINP
TAD C700
SZL
TAD CIX
DCA R2

mil
0100
(6101

^102
0103
0104
010t?

0106
0107
0110
0111
0112
0113
0114

0212
0213
0214
0215
0216
0217
0220
0221
0222
0223
0224
0225

/
/

/THIS ROUTINE WILL SHIFT THE
/MAX DP VALUE TO 8 BITS
/THE NUMBER OF SHIFTS IS IN CTR

0iit>

0116
0117
0120
0121
0122
0123
0124
012t?

0126
0127
0130
0131
0132
0133
0134
013t?

0136
0137
0140
0141
0142
0143
0144
0145
0146
014 7
0150
0151
0152
0153
0154
0155
0156
0157
0160
0161
0162
016 3
0164
0165
0166
0167
0170
0171
0172
0173
0174

TAD OTU
CLL RAR
DCA XOOUT
TAD C704
SZL
TAD CIX
DCA W2
DCA CTR
TLS
JMS I CRLFA
JMP I .+1
SRCH

1054
7110
3121
1071
/430
1115
3316
3106
6046
4516
5625
0400

/
/

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

7300
1102
7004
7660
5241
1103
7440
5241
1264
3106
5663
7200
1102
7740
5253
1103
0105
7650
5663
/100
5256
1102
7010
3102
1103
7010
3103
2106
5226
0600
0017

S4i

CLA CLL
TAD MAX
RAL
SZA SNL CLA
JMP S3
TAD MAX+1
S^A
JMP S3
TAD C17X
OCA CTK
JMP I S4
CLA
TAD MAX
SZA CLA CLL
JMP SI
TAD MAX+1
AND C7400
SNA CLA
S4
JMP
CLL
JMP S2
TAD MAX
RAR
DCA MAX
TAD MAX+1
RAR
OCA MAX+1
ISZ CTR
JMP SHIFT
TRAN

C17X,

SHIFTi

S3,

Sli

S2,

/
/

/READ OR WRITE 1 BLOCK TO
/THE SPECIFIED UNITS
/
/

0265
0266
0267
0270
0271
0272

0000
1072
0113
1122
3300
6141

READ,

TAD RTBLK
AND C777
TAD C4X
DCA Rl
LINC

LMODE

2120

Ann

00 01

Ay
An
M
U

0011
M XX

0175
0176
0177

0273
0274
0275

02 76

06
f W 41
"T X

0000

0277
0300
w
0301
W X
tC/

0011
WwXX

n
ULR

02 04

03
2
%J CtJ <J 0

0002

PHP
rUr
p
r M
nn
Un
Ur
L

%J %J

0201
020 2
IP IL. KJ

M £.

IC/

It/

K/ K-' K/ C.

0 206
V/

0 30 3

56 65

02 0 7

0
3 04
^
E> O

0
f0
K/ 0 W

0210
0211
0212
0213
C XW
0C
214
i~
0215J
K/

iL/ fcy

0 ^05

110
X
X 7
/

0306w

0113
wXXw
1123
XX^o
3317
614
U X i

t/ \J IC

03 0 7

0310
W X
0 311
OX X
KJ

iU
10'

kJ O X 2

21 7
c. X /

icJ

oXo

MU
Awn

TAn

r5y

ic;

*t 1

Dl-f\

1 c.

C X C X.

A n n
A
UU

Vt) x

AAu

wX~

00 1 1
0
iw 641
w "t X

0000
0000

0224

0316
0317
wX
0320
OC
K/

001X X1

ur
u nr
0
0
PI
n
U L, R

02
25
^
^cc

03
21X
IC

0002

p
r n
r
UP

C \J
022
C C 7/

032
WC 2

5 7 04

02
u C 21^
Cw

nr
A u
1
nX
uUM
IMP
M nn r

0 315
vJ X ^

IC'

pr An

02
1 A
u
C X

0220
0221
CCX
0222

UR Tr

lU C- JL

tC/

C tJ

iC/

nrr
uu
1

R1 .

iC/

IC/

iLl

%J iJ tj tJ

Ui 1

TU tJ \(J C,

1
1

PJ
1

'U *J \u %J

yn
A
UU
un

1
X

P
r
r Mn
u t.
Un

*J C~

K>'

(MP

WR T T r

"^0
02
lU K> w X/

/ALL FRROR PHNniTTDNS F Nn UP urRr
/RFTURN Tn M^^n 1 OF *5FT UP

0231
02 32

0233
C
0234
*J

\J \J

0323

6141
wXtX

RSTRT

02 35
w^
0 2 36

0-^24
U c. ~

06
^ C?I9
c.

0237
CW
^240
0 241

0325
wC

6020
V ^

un
ur
nn
LM
t.
T r
2
I

It/

K,/

It/

IMP prn
PMOnF

02 42

/
f

0243
0244

02 50
V

INPUT
FTI
F FOR
run TWF
JLiNfUi
riut.
int.
/THF MAX U Al IIF
AR^HI TF
rp
/TF AA WVMU.UC
A UF iO
^ M
MAk^F
/ir
»>lL.b»
nArNL ilT PHQ
rUO
/^FARPWF^ FRHM IMF FKin HF IMP
r
A M n
/TKiPtlT
QkTPQ
f
iviv
riLLr AINU
J^rxlro TUT
inL

02
c 51X

y r
M n TI M
p
/
nib
lImU

/<^FARPH
f«jc,«r\wn IMF
inc

45
02 46

(

0247
K-'

It/

C Jc

/Tur
/Inc

2r
q
nn
r
U0
Ld
MAy
nAA v/Aiiir
VALut

QDPU

PI A

tc
io

i&i

It/

0 25 5
0
<j 2 56
^ \f

025^ 7
0
C 260
Ww
f

%J tL

C-

7
C IP 0
/ 2!?i

105 1
^0 72

ic/

0402
0 40 3

7/ 001X

0 40 4

^0 7 3

0 «26vJ 1X
0 26
c, u 2
c,

0 40 5

026
3
^UO
K/

040 7

0 2A
^
O4

0 40 6
ly *T It/ /

1 C.
2
*T X
lU 4
0 41X w
(71

7 6 RC?!

561

52 41 4

0270
0271
0272
0273

0 414

0415
0416
0417

76 4 0

5241

TA
A n
U
n
P
A
UUA
n
0
J
T A n
AU

p
Ur A
DR
D iir
P
n
r TR

c iM
MA
A
0
IMP
jnr

PIL A
A
u
T AUc
AP2

JMS
TAD
SZA
JMP

GETWRD
INWORD

4323
1100

X04
n

0
K> 2 66
OW
0 267

S 1 ly

XVJ / O

16'

{TP
L u

np
DL f\
UU AA Rr\ T Rl
T AP
1 A U
nr
A
Q
0 T <sUi
On
UUA
Tap
A
1

04
*T 11
XX

T AU
A f : 1X t*

4 476

Id c.

T AU
A n

1L» ifl

T X IW

jc:/

40 0

0 401

£?l

TAG4,

)

0c
25
^3

0 25
T
C^ 4

{

n L AU

c
ri
0 TQ
0U
1

TAG3

iptt
may
nAA
LCrl tm
iIN

0274
0275
0276
0277
0300
0301
0302
0303
0304
0305
0306
0307
0310
0311
0312
0313
0314
0315
0316
0317
0320
0321
0322

0420
0421
0422

1101
7640
5241

TAD INWORD+1
S2A CLA
JMP TAG3
/

/CHECK FOR TOP OF BUF
/

0423
0424
0425
0426
0427

1104
7041
1075
7710
5214

TAD
CIA
TAD
SPA
JMP

PTR

TBUFA
CLA
TAG4

/CHECK FOR START OF

0430
0431
0432
0433
0434
0435
0436
0437
0440

1072
7041
1050
7650
5317
7040
1072
3072
5205

TAD
CIA
TAD
SNA
JMP
CMA
TAD
DCA
JMP

RTBLK
FTB
CLA
TAGA

RTBLK
RTBLK
TAGl

03 23

0324

/HERE AFTER FIRST NON

0 \j P 5
J

%-i

0326
0327
0330
0331
0332
0333
0334

0441
0442
0443

03 3p

04 45

0336
033 7
0340

0446
0447

2104

TAG3,

3073

OCA STSW

/NON ZERO VALUES
/

0444

4323
1100
7700
5260

TAG2,

/IF NEG
/

03 41:?

0346
0347
03 b0
03 51

0352

JMS GETWRD
TAD INWORD
SMA CLA
JMP TAG5

0342
0344

PTR

03 41
03 43

IS2f

ISZ PTR

2 104

0450
0451
0452
0453
0454
0455
04 56

0457

MAKE POS
TAD INWORD
CMA
DCA INWORD
TAD INWORD+1
CIA
SNA
ISZ INWORD
DCA INWORD*!

1100
7040
3100
1101
7041
7450
2 100
3101

0 3 53

03 54

/COMPARE TO MAX

0355
0356
0357
0360
0361
0362
0363
0364
0365
0366
03 6 7

0370
0371
0372

0460
0461
0462
0463
0464
0465
0466
046/
0470
0471
0472
0473

1102
7161
1100
7530
5300
7640
5274
1103
7141

TAGS,

11 01

7620
5300
/

TAD
CLL
TAD
SZL
JMP
SZA
JMP
TAD
CIA
TAD
SNL
JMP

MAX
CML CIA
INWORD
SPA
TAG6
CLA
FMAX
MAX + 1
CLL
INWORD+1
CLA
TAG6

« 7/ 0
IPO
/* 4,'! A
0/^

/REPLACE MAX IF INWORD
/IS LARGER (OR EQUAL)

/
f

^ < "7 A

cat

n Ai A

w
04A 1/t>

1X00
3102

A7A
0^/0

IX 01

T[ "7 ~7

kyw

f;s

FMAX,

TAD
OCA
TAD
DCA

3103

04 01

INWORD
MAX
INWORD+l

MAX*1

/
ni
ni
ki

n| T
^
4i00
ni
4
*
4 10 ^

/TOP OF BUFFER CHECK
/

D0 0

110 4

0b01
ni cr o O

/ 0 4 1

li^

fA A 0^ A.
/•>

j<l

nj "7

0O
c>
0t? 04
01;?

0411

r>i >i

TAG6,

107 b
f f

PTR

TAD
CIA
TAD
SPA
JMP

1\D

b244

TBUFA
CLA
TAG2

0410
A ^ A

4 14
04 lt>
04 lO
( Ti

/END OF TAPE CHECK
/
ni

1072

0P 06

/0 41

A X1
t}H
/

(r rx

i7i

0 4^0
^Oi

0 D 10

c
X0b0
/ 6b0
i ni
-7

<7i

cr 01

/9I

/DONE

X
0 AO
4t: 0
tA
'A

'1 A
A
H <:
4

04 io
>{ O 7
d: /
04

k3 *?

0 ly

vdf

4
t04
*f

b/1

05lo

1072

0 bl 4
0D1b

OH} f 0
c

0b 1

i75

D c ^ c;
b
Dl 9 0 A
c^0
f5s

fcl

X /

4 0 9
xo^^:
1

TAG7
TAGA,
,

A^ A A
4bl4
VJO C.X

RH0 ^

NDAT,

0400

04 41
f>S

«7I

KO?

0000
1X0 n

044p

0b26

4
0104

rti

0 bdi /

1 b0 4

c
0bo0

3100

0bv51

04P1

0b o2
0 bo o
0 bo 4

70 40
11 04

^f
i'^
jc?

/TE

C -7 C

0b0b
V? 0

idlJ

310 4
1 b0 4
ol 01
^ f CO

4
HR
yA
0
/[ w 7

GETWRD

^Ai

0464
A /L IZ.

0 4 65
A0
A
0 /!4 0

0467
0470
0471

PTR
PTR
PTR
I
INWORD + l

/TRANSLATES EACH VALUE OF THE
/INPUT FILE TO A SINGLE PRECISION
/NUMBER
/IT CONSTRUCTS THE OUTPUT FILE
/STARTING AT OFTB
/DOES NOT LET THE OUTPUT FILE
/OVERLAP THE INPUT FILE IF THE UNITS
/ARE COMMON

0 4o 0
CI,

PTR
PTR
PTR
I
INWORD

04 00
fiff

CMA
TAD
DCA
TAD
DCA
CMA
TAD
DCA
TAD
DCA
JMP

04 4 7
04 b0

GETWRD*

04 0

^ H M *T

M /i 5s /!

INWORD

/
0 b^c 4
0
0

0 4b
0 4t? 0

NODAT'l

/DECREMENTS PTR AND LEAVES DP WORD
/AT

0 4 A*^
4^:
^
40
4 /I
0^

fk A

JMP
TAG7
CMA
TAD RTBLK
DCA RTBLK
JMP TAGl
SHIFT
TAD NDAT
JMS I TTYOA
JMP
RSTRTA
I

1 01

70 40

0*t OO
iw

ENO OF FILE

0
f;;^

TAD RTBLK
CIA
TAD FTB
SNA CLA

0600

7200

TRAN.

»600
CLA

0472
0473
0474
0475
0476
0477
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
0;>33

0534
0535
0536
0537
0540
0541
0542
0543
0544
0545
0546
0547
0550
0551
0552
0553
0554
0t)55

0556
0557
0560
0561
0562
0563
0564
0!565

0566
0567
0570

0601
0602
0603
0604
0605
0606
0607
0610
0611
0612
0613
0614
0615
0616

1050
3072
1053
3107
1110
3012
4476
7040
1075
3011
1411
3101
1411
3100

TRl,

TR2,

TAD
OCA
TAD
DCA
TAD
DCA
JMS
CMA
TAD
DCA
TAD
DCA
TAD
DCA

FTB
RTBLK
OFTB
OTBLK
OBUFA
XR2

READA

TBUFA
XRl
XRl
I

INWORO*!
XRl
INWORD
I

/NO SHIFT

CTR

IS 0

0617
0620
0621
0622
0623

1106
7450
5237
7041
3112

TAD CTR
SNA
JMP TR6
CIA
DCA TCTR
/

/SHIFT RIGHT TCTR TJMES
/

0624
0625
0626
0627
0630
0631
0632
0633
0634
0635
0636

7100
1100
7510
7120
7010
3100
1101
7010
3101
2112
5224

TR3i

CLL
TAD
SPA
STL
RAR
DCA
TAD
RAR
DCA

INWORD

INWORD
INWORD*!

INWORD*!

IS2 TCTR
JMP TR3
/

/LSB TO OUTPUT BUFFER
/

0637
0640

1101
3412

TR6#

TAD INWORD*!
XR2
DCA
I

/CHECK OUTPUT BUFFER FULL
/

0641
0642
0643
0644
0645
0646
0647
0650
0651

TAD
CIA
TAD
S2A
JMP
JMS

1012
7041
1111
7640
5310
4477
2107
1110
3012

XR2

OEND
CL

TR5
I

WRITEA

ISi OTBLK

TAD OBUFA
OCA XR2
/

/CHECK TAPE LIMIT
/

0652
0653
0654
0655
0656

TAD
CIA
TAD
SMA
JMP

1107
7041
1113
7700
5273

OTBLK
C777
CLA
TR4

/NO MORE

INPUT IF AT LIMIT

P/ 1
R "7 Q

rTi

IDD / O

K 7 <d

fTf

}u
i7{

r?,

/
AK7

^
X ^5
4020

A A
0
0
AA
1
0X
1^0

7
A Kffi
/ 0 P0

4 02 7
7 A cm

fil

fTi
ic?

A OC
K?0
&I

W7A

mA
0A
0w

A
0 id
*f
0A
A
A
K
i^O

(7S

fJI

171

\0OKf\u

rts

'J^

K5A
A
00
->5 1

AAA
icIOO
0
f?l

r» fi^ ni

i?i

t'^

'.Pi

»'/.

f?i

{do 0 /

AA7

4014

rTi

A 7

K 0 >i

r5l

A "7 i

1043

<x
15

0
A
/ c
0 7

X0 04

r5i

0 k; 7/
7A 1

/CHECK FOR OVERFLOW IF UNITS
/ARE EQUAL

Ai i

7 A ^

A A 7 <

!60 / H
A •? K

A7A

7/0 /I i

A 7A
b 6 /0
7 A 7 "/

/ 0 40

j'?

f?1

A 00
]a

A '3 "2
'X A.

0 /i

iTI

A
0A
0c
0

f?^

A07

c0
1052

0 /0

160

CIBF
CLA
ERROR
CIPT
CLA
ERROR
ALDONE
I
ERROR,
OUTOVA
TTYOA
I
RSTRTA
I
OUTOVA, 0UT0V»1
OATOVA» DATOVsl
/

7 A

JMS
SNA
JMP
JMS
SNA
JMP
JMP
TAD
JMS
JMP

/ iov

TR4,

CI A

1054

TAD
S2A
JMP
TAD
CIA
TAD
S2A
JMP
TAD
JMS
JMP

5010
1107
/ 041

M 'J

/ loo

(A1 (A A

/o 40
->ol0

u
07 0t:>

1272

7MA

<7(

4 Dl 4
U Q yt

/a -7 r*

f?!

TAD ITU

y P24
E*.

OTU
CLA
TR5

OTBLK
FTB
CLA
TR5

DATOVA
TTYOA
RSTRTA
I
I

/CHECK FOR END OF INPUT
/
A 70
r5»

00 •t

0710
0/11
0 / 1
M71 1

1 0n
4020
AC
/ 050
y|

TR5,

rtf

7c10
1/ 0 4
A
0
(Tk

A ^7
ly 0 0 /
ry[

f5i

f?)

A
On^ 1i

-4.

0/XD

SR i1 7/
0

Q (A

W
T 7
/
0 7/ 1

k3o DkO

AD1
0
A 0
«3 0 P

(Tl
itJ

ffl

f5!

ex fa fi

t'X

1011
7041
10/4

0 7^:0

07*: 1
T00

iTs

-1

0 /L
H
0 / id
rtt

-7

CIBF,

OA
0/^0
/>-7

7/ A
K
050
rji

01
10

i9l

AAQ

AA
1^0
00
i'/

rti

A
AA
*T
00

0665
0666
0667

CIBF

/
/

/CHECK STATUS OF INPUT FILE

i:;.

fTI

K7
''ifA
5/20

A
0 e;
D 7/

^0A Ofe?ni
A Ai
k30 ol
Di

AC
JMP

fTi

0 0 -) y
A ^0
RA
lyo

TAD XRl
CIA
TAD BBUFA
SNA CLA

/001H

A c; ^

ALOONE

/CHECK STATUS OF INPUT BUFFER

7 01
ni

/
/

A 0
1.
0 *t
A
^
^
10 OH *t
A y1 R
(A
10

C A c

CIBF
CLA
TR2
CIPT
CLA

ISZ RTBLK
JMP TRl

0 d\Q /

laO

(Ik

JMS
SNA
JMP
JMS
SZA
JMP

/
*7

-7

'J
/
0 /C
O! 7
M
0 / O0
ra "7 7: i
0 / ol
7 'J
^:
0 7/ 0
"Z

rji

0733
0734
07 35

m
0000
rji

f/i "If

10 72
7
W
/0
41

1051
7650
7001
5727

CIPT,

TAD RTBLK
CIA
TAD LTB
SNA CLA
lAC

JMP

CIPT

0670
0671

06 72
06 7v5

/FILL REMAINING PORTION
/OUTPUT BUFFER WITH ZER
/ T UC W
UlDTTr
AM TAPr
WK lit IT
Art
/ HL
11 U

0674
067P
0676
n
067 /
0700m

n n Ki r a

0/0 0
0 / O/

"J "7

<7(

"7 y1

0 / *tiy
m
07"7 ^*!i

nt "7

0 / *to
0 / *t
/a *7

H 1

11 25
A C
/o
50
Po 5o
0^ lid

n
nMc o *
UUNc.2

m
A

0716
0717
0720
0721
0722
07231
rx "7 rs
-7

rti

O >1

0 / <:4
n^
0726
r;

fJi

"7 '1 "7

07u0
0731
0732
Dl "7 "7 "4

0 73 3

0734
m "7 "T C

073i?

0736
07 3 7

0740
0741
0742
0743
0745
0746
0747

0750
0751
0752
d
0753
0754
0755
0756
0757
0760
/Ti

7
A A
/0
41

07 4/
M
5k5
07"7 K

1111
A 40
/O

O
beJ AA

rx "7

5044

MD n
M o
Jnr
UUlNLc

{Ji

44 77

6141

/ 0*1

r?i

IMC
jn
b
nn c 1
UNt
i

UWrTTA
wn 4 L

L i No
ki
n r*
1

/Ti -7

AMO
SO 0 W c
A
1 A
&1
0 "J
0

L IF

JMP n5
/
/
/
o kA rs r\ c

PMUDL
<>1 000
A fn f%

n
10 00

0k? 00

X\0Y)X

0 iy 1
1->

10k)O
lk3 W

A
A
0 W«»
1

/3I

•«

f?l

TT vn

0
UUA

10 0c

Jnr

1000
100mi7
A n A
1010
A
1011
1012
1013
A
A A
1014
A
A ^
1015
1010
A
A 1
101/

A 41
/I i
00

Tcr
r

O (A

Pel /

1021
1022
1023
102 4
1025
1026

00 46
/2 00

JMr
TLS

10 <: /

f% '\

fit >t

t'A

A (A

IMP T(It
T9
Jnr
T C
Lb
P A
UL A
M D Tf T 11
jnr
IMC
JHo PDI
UKUrr
T TU
JMr 1
J

1 T
5203
fit

7 215
a n

5000
Mm
0000
1^01
rji

ts.

fj»

CRLr »

0
T AU
A n
1

fTt

TAD
TC
b £7
r

5224
6046

JMr
T C
TLS

t'Tl

0212

fJS

A fH 1 t!Z

wD
JMr
1

0016
001/

103 5

041 4 0

10 OO

0004
0301
0324
0301

1037
1040
1041

'*1

UL AA

i?^

c 1 !P

Lrr 1

1 11

/
/

1
10OO

r^i

1031
1032

/ <C 0 0
'1

,»1

CL AA

1232

p
CUp

60 41

1 }y 0x3

XfA

An0

/Tl

R
A
5015

A lA

CM
A
0«N A

/4 50
5^:10

A n iw

Tc
orr

TT1
1
1

0762
^
0/00
0764
0765
0766
"z

AU UlNU
PI A
LU A

"7 °7

"7 £i "I

C IA

>l ^71

07 61
"7

T
V
Do
AHid
1
VDo

0/46

A (A 3*1
'i

f;i

n
UOAA
T A n

1012

rji

0 / 1 ->

LL AA
JMr UU NL

0 /lO
\o

OM
A
biN A

/I Si

0751
Co
0752
m
0/53

07l4:f

UL NU
AU n4 A

ffl

An c

u I A
AU

mi
i

07 45

/7!

0710
0711

1
iA A A
/0

07 01
0/
0 / 0O
07 04
07 0b
07 06
07 07

NOOAT

316
317
240
304
301
324
301

?
I

P
D C*
uKUr
1

1 £^ 1

1 04 if

ffl

1
/\o

(7i

10 40

f?i

-1

f> "7
la /
f^t

7 "7

n /I ^
H
10^
^ CI
i
10^D

'7 -J

104 0

r> "7 "7 /!

SO f

i 0

mi
0 7/0
"J

10 44/7
-I

f>1

^'^i

/Ti

fil

0
7
C\b 7

0000
0 01/

(9s

(Ji

ic>

0
n
UUn T nU yV #

7
0 11/
0Q
c^
0^

0^: !:>

M H O /I
TO
0u<£0
OR
f?l

0 01
O^L
0
Tf

f-?{

T0U
0c
10 4
A
0^

165 Dl

iwO i£:4

0^: 40

fH I'A

10 ->o

0O 1 /

01 /

10 01

1 0 -> ^

O A

0 0P

^Q
0
0
CA
7 fA R
>
00
"X 0 0

\d7 77

•1

rj*

(71

-4

ffl

{T;

C; K.

0U4d <i

10 04

0
0DA
1 {>
i /a K 7
10 5/

00 0o

00 0

1 00D

100

0 1 *t

014

1000
1007
1010
1011
1012

10 ol
10 0^:O
10 00
10 o4
m 05
A U%
10
10 0 0
10 0/

0^1/

01 /

M "2 O

107

1 00 O

10 lo

1014
101^
10 lo

1017
1020
1021
^

r*.

O "2

i (/

QR
P

ItJ

•i

•1

^
7
10/0
10/1
rx

^
7o
1 07 d
r» 7 '?
fit

0C 0 /

20 7

ni rs ni f ji

0000
00 04
X OA
00^4

02 4

0 0 01

0 01

0iC H0

fi "<

ici

0 X /

00 ^ /

1027

110i£

10 00

1100

fTi

16;

<£:

1 1

"2 r;>i

1101

320 A6
P
O0 R
"ZOO
02
2
7 00
A
0

0326
M
1; M A
00
00
w 0 1 *t

r?*

01/7
7: i

0 ol 7

i
7A
k> / 0
1
i
77
f/^

001

00 05

rj!

r?i

ox/
^0 7/
Ot
0M7
7
20

0m7
Hi tH m

10ol

•1

Tt Wl 4
*t
00

10/0
1074
t
7K
10/5
-4

HA
T U V #
DA TOW

X fA
0001
Ot

/ T WPI IT

10 v54
10 ot?
J.

^2 00 0
o
w
c:0 00

r>i ffl

V)YJV)]C

rj?

"7 "7

1 k5 u /

UH
//n
UTD
r UIT

(?f

A 'J
0 4^:
1n
i

r?i

f]?!

ffl

00 00

HQ IC

nn
Un
U c"
L
LM
C C P M Kt T

104 6
104 7
D1
i
Ko
Ik^

i"5i

^ (A

0 0^1
(7 O Q
OO0
\byjc
"?

102 0
l?i ifi

1^M U

•1

fy.

0 0 D 7/
n. Pi

CT ART

fi^

iTi

40 00
40 01

K
A
Pool

JMr

0<C 00

r>
O
0 0 0 <:

A
00
^11 A0

0033
0034
0035

0057
0000
6666

Ml,

IMP MR
nP
Jnr
SET 17

MIA,

JMP QAINIT

-1

1065

1*1

L n UU t
"<C

10 64

fTi

10 ol

1063

r n UU L

10 DO

1037
1000

/SET

Jn r n
Jn r V\C
J r r no
IMP
D
no
r Ur

*>
A
0<L 0 11

{A fJi l7i

t
I

Ot3 0 0
f>5
It/

Lun AA
1

0
rQr

f>.

A
0 R
IP0
A
011 ^OAH

f/»

1-^

aO
*2 0!
0

(9(

i'/

D ur r t. ri

ILL
i?!

10 4 4
10 4p

94
* <i
*t 10 10

1041
1

L uo

•i

TD
IC
bUr

PRESET

1066
1067
1070
1071
1072
1073
1074
1075
1076
1077
1100
1101
1102
1104
1104
110i>

1106
1107
1110
1111
1112
1113
1114
111b
1116
1117
1120
1121
1122
1123
1124
112b
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

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
0070
0071
0072
0073
0074
0075
0076

0342
0656
6322
0070
0656
1330
1420
0300
6017
6035
0057
0000
6666
0434
0656
6322
0070
0656
1020
0010
1040
0266
0017
4260
6231
0467
6052
1000
0332
6325
4334
6231
0467

00 77

60 52

0100
0101
0102
0103
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

1000
0332
6325
4335
1000
0334
1120
7776
0017
2335
0451
6052
6231
0467
6052
1000
0332
6325
4336
6017
0057
0000
6666
0503
0656
6322
0070
0656
6231

MESSl
ANSWER
JMP CHKSNS
SET I 10
ANSWER
10
LDH
SHD I
0300
I

M2,

JMP 17
JMP MIA
SET 17
0

M2A,

JMP QAINIT
MESS2
ANiiWER

JMP CHKSNS
SET I 10

ANSWER
LDA I

/SET UP FOR
/OCTAL INPUT
/TO OCTAL

STA

MULWO
COM
STC UPLIM
JMP CHAR
SKP
JMP M2A
LDA
OCTAC
JMP ZERO
STC FBLK2
JMP CHAR
SKP
JMP M2A
LDA
OCTAC
JMP 2ER0
STC LBLK2
LDA
FBLK2
ADA I

/CONVERSION

/FIRST BUK NO

/LAST BUK NO

-1

COM
ADD
APU
JMP
JMP
SKP
JMP
LDA

LBLK2

/LSTBLK>rSTBLK?
M2A
CHAR
M2A

OCTAC
JMP ZERO
STC UNIT2
M3,

JMP 17
SET 17
0

M3A,

JMP QAINIT

MESS3
ANSWER
JMP CHKSNS
SET

/NO
/YES

ANSWER
JMP CHAR

/UNIT NO

1165
1166
1167
1170
11 71

1172
1173
1174
1175
1176
1177
1200
1201
1202
1203
1204
1205
1206
1207
1210
1211
1212
1213
1214
1215
1216
1217
1220
1221
12 22

1223
1224
1225
1226
1227
1230
1231
1232
1233
1234
1235
1236
1237
1240
1241
1242
1243
1244
1245
1246
1247
1250
1251
1252
1253
12 54

1255
1256
1257
1260
1261
1262
1263

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
0175
0176
0177
0200
0201
0202
0203
0204
0205
0206
0207
0210
0211
0212
0213
0214
0215
0216
021 /

0220
0221
0222
02i^3

0224
0225
0226
0227
0230
0231
0232
0233

0467
6126
1000
0332
6325
4337
6231
0467
6126
1000
0332
6625
1040
0340
1440
0336
6177
1000
0334
0017
2337
0470
6126
0451
6177
1000
0337
0017
2335
0470
6126
0451
0467
6126
6272
6017
0057
0000
6666
0541
0656
6322

SKP
JMP H3A
LDA
OCTAC
JMP ZERO
STC FBLK3
JMP CHAR
SKP
JMP M3A
LDA
OCTAC
JMP 2ER0

/FIRST BLK TEMP

STA

/UNIT3 TEMP

UNIT3
SAE
UNIT2
JMP OK
LDA

/UNIT3
/YES

FBLK2
COM
ADD FBLK3
AZE
JHP M3A
APQ
JMP OK
LDA
I

FBLK3

OKp
H4,

COM
ADD
AZE
JMP
APO
SKP
JMP
JMP
JMP
SET

LBLK2
I

M3A

/NO
/YES

CHARLY
17
17

M4A#

JMP QAINIT
MESS4
ANSWER
JMP CHKSNS
10

00 70

SET

0656
1330
1420
0300
6017
6203
6666
0577
0656
6741
0070
0656
1330
1420
2200
6020
0000
0056
0000
0011

ANSWER
LDH I 10
BHD
0300
JMP 17
JMP M4A
JMP QAINIT
MESS5
ANSWER
JMP QARFSH
SET I 10
ANSWER
LDH I 10
SHD I
2200
JMP BEGIN
hlt
SET 16

M5,

CHAR,

CLK

/NO

/AN R?

/STOP

UNIT2?

1264
1265
1266
1267
1270
1271
1272
1273
1274
1275
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
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
1360
1361
1362

0234
0235
0236
0237
0240
0241
0242
0243
0244
0245
0246
0247
0250
0251
0252
0253
0254
0255
0256
0257
0260
02 61

0262
0263
0264
0265
0266
0267
0270
0271
0272
0273
0274
0275
0276
0277
0300
0301
0302
k;303

0304
0305
0306
0307
0310
0311
0312
0313
0314
0315
0316
0317
0320
0321
0322
0323
0324
0325
0326
0327
0330
0331
0332

4332
1330
1420
7400
6016
1420
3400
6016
1420
0000
6235
1120
7717
1040
0333
1120
0001
0451
6320
1120
0000
0471
6320
1000
0332
1260
0000
2333
4332
6235
1000
0000
4317
0055
0341
0640
1000
0334
1075
1000
0335
1075
1000
0336
1075
1000
0337
1075
1000
0340
1075
0000
0236
6016
0440
6741
6023
i460

LOOPl,

/E 0 ANS.F,

/E 0 M?

/A BLANK?

JMP LOOPl
ADA
•60
STA
NUM
ADA I
I

/A DIGIT?

APO
JMP XIT
ADA

/NUM IS NONNEG?
/SHOULD BE

/IS NUM LESS
/THAN 10?

UPLIMi

APO I
JMP XIT
LD A

OCTAC
MUL

HULHDi

ADD NUM
STC OCTAC
JMP LOOPl
CHARLYi LDA
0

STC RTNl
SET 15
INPTR
LDF 0
LDA
F8LK2
15
STA
LDA
LBLK2
15
STA
LDA
UNIT2
15
STA
LDA
FBLK3
15
STA
LDA
I

UN IT3

STA
RTNl.
XIT#

CHKSNSi
ZERO,

77 77

0467
0011
6000
0000

STC OCTAC
LDH I 10
SHD I
7400
JMP 16
SHD
3400
jMP 16
SHD I

OCTAC,

16
XSK
JMP 16
sns 0
JMP QARFSH
JMP START
SAE
7777
SKP
CLR
JMP 0
I

/SHOULD BE

1
lobe
't

£^ ~2

03 33
03 34
03 35
03 3 6

lv5 64

nn
0000
0000
0000

NUM
FBLK2f
LBLK2#
UN IT2#

0
0

FBLK3#

UN T3

.71

;7i

1367

0337

00
00 00

10/1

0 340
0 3 41

0000
204 7

0342

0 64 0

0 343

4040

03 4 4
0 34 5

4 04 0

0346
0347

2311
1620

0350

0351

T
4347

13 7 5

0352

1375
1375

03 53

4347
4310
4040

IsiOO

1372
137 2
1372
1372
13 72
13 72

1373
—~
1373
1374
1374

ffi

iM r/^ t%

0
0

INPTR*

2047

MESSlf

TEXT

4 04 0

SINPRE

2205

035 4

13 75
13 75
13 75
13 75

0 3 60

0522
2440
0140
0417
2502

0 36 4

03 65
03 66i

14 05

m
A
0374
V
0375
"7 u:

0543

03 /6i

10 40
40 40
A rn A ft
40
40
A (A A
40 40
24 17

0367
03 70

0371
.

16 26

A
4020
2205
0311
2311
1716
4006
1114

'X '7 Z.

1375

1375
1375

0317

ff.

13 75
.1.3..Z5

40 40

0356
035/
03 61

1375
1375

"7 U' C:

0362
i
0363

13 75

03 55
z';!

1375
1375
1375
1375

0..3..7...2

(At "7 "l

\do7 0
~7 -y

13 75

1376

/•j*

r/ "7 '7

13 76
13 76
13 76
13 /6
13 76

04 00
04 01
04 0<d

1376
1376
1376
1376

0403
0404
0405
0406

13 76

04 07

? Tf "7

CONVERT

DOUBLE PRECISION FILE

f 'A

4001
4023
1116
0 714

0410

0 01 0 0

13 76
13 7 6

04 11

^0^)0

0 412

1376
1376
1376
1376
1377
1377
1400
1400
1400
1400
1400

0413
0414
0415

112 3
1117

1640
0611

0416

1405

0417
0420
0421
0422
0423

4347
4306
2431
2005
4003

SINGLE PRECISION FILE

A fA('A

"
M
494
k3 *T c

4
T 01 9
c4
4

04 c-?

1 7
/ 4&1
X
4i£;
1 7
O
Iw
/
X

16?

* «c 0

O 94
XA
4:4

044 9c/7
A A H (A
^010
1

A (A (A

A lACA

•A

A {A'\

A0
XM
10
M
0M4 -zOXi

1 1 1 A
XX0
X

Oi
kO *t

fyl

it;

0 (C

"?4
A1
OX 04

C'^
k:;

d
4
*T 0 *T

(AA

C?!

FTYPE
^

A CA

1^01

.OJ

^0
4
^A
T0
O

{'A

14 01

1401
14 01
14 01

4 0/
0 A'ly
44
*4
16

ffl
jiu

{71

A (AO

0 4 *t X
(A A A O
0^ C

)f£)

04 40
A A

XXX /
1 A j1
X 0 40

ffl

0444

00A 11 X1

k3 *T *?

{A A

HESS2.
4
4A
*t " u

(71

4
47
*t n /

4<
"
«J 4
*T 7
/
4
A
4OM0

14A (A
0O

4
4R
9

4
4

1400

/7.

"Z.

14A 0v52
14 00

ici

k:»

It-'

A
4 91
0 A^
CAA K Q

ici

4i^
4
'/All
01
(>1

icJ

5tl

cLc OX
do
"Jf'J

94
* 4
c
4

ky^ 9

"
4
h4
*T 9

fc)

"
M
9X
1 4
Iw c

4^
1^00

iii
iCJ

1 " sy 0

'i S
DJ
^4

X '

W *7 ^ u

171
1
^ *t sC(
i. v>

M4
S 7/
*T

7
" A"^
/ 4
oo

4A
u

^O o
4
4 4
4

O
4

14wO
1 ^ 0 *T

id)

^ 0 /I
1 i3

I? *T
16

14 04

0 4 01
<7 4 A Q
40C

A (A A

1404
^

l£j

A fA
04A

r?i

fA A
*t
*f
1A

fyl
!6/

14
'\

!jy

A A (A A
04
14

1404
04A
14A Di

iLJ

A^
*t 0 0
04
fTi
Ic'

4
O4
*T
4A

4A
0^
9
il

04^ A00A

4
4

{?!
Ici

f?l
scJ

4
X4
1

wX90
9 4 4 01
01 1

M9
1 4
ky c X 4

4A
0 7/
4 7M

7/ 4
4 A
OO^

ryi

71
*t / X
04

4
^wA
40
O

C?I4 7

" su 4 ky

ltl*t

LAST BLOCK <3

1404
•1

14 01?
A

A (Ad.

1 4 09

A~7 '\

H ]u ^ \u

04/4
Al W
0 4/9
A
0 4/0

4 4 ly
A
A (A
ky 4 0
4 (A

(/All
164 / /

1^11
O XX
X

9
c4
4 4
4 k3
7 4
4A
/
0 1X

CACi

140P
140P

14 0t?
1
4 0D
1
14 0D

f5<

fTI

1 40P

rji

f/i

(7i

f»

i
16 X
0 9 C/
(7

l6>

f-1

o c;

fTi

o
9 s6 c

O4
4 16

it?

U
"X
9 C« O

WOc0

StJ

9 1' 4

Xw /
1
H4
X4
4

f;i

14 09
1

fj^

A~7 A

A
14
0y
i

FIRST BLOCK <3

StJ

i/1
16)

X 7/ 177
0u
1 < 4
X 0 40

•?!

!CJ

UNIT <1\Z

C-4

1H^9
1 A
14
00A
<7t

X 410 0
i zi
A
14 0
1 A
14
WoA
r5l

fTi

/7I

4 Of A

1400A
1406
1406
1406
•1

f>)

icf

R
9
9 iw S
K CI A
o
ky 9

//
lei

r;f

14^ 00
1
i

TEXT ZFDBLE PRECISION FILE

l£}

1 *t

TO CONTINUE <1\Z

(7 i4 Zl 1

1401
^

A
u 4
*t
l4 9 1 4
(Tj

ici

9 iw /
16/

--^

16'

09XX

0912
0313

iCI

(71
lei

9M
c 99
cc
Ic;

(7i4
"X
16*9 (71
k;0

tfl

1117
XXX/
1640
0611

MESS3,

TEXT ZFSNGL PRECISION FILE

1407
1407
1410
1410
1410
1410
1410
1410
1410
1410
1410
1410
1411
1411
1411
1411
1411
1411
1411
1411
1411
1411
1411

0514

1405

0515
0516
0517
0520
0521
0522
0523
0524
0525

4347
4306
4040
0611
2223
2440
0214
1703
1340

0i326

7463
4306
4040
4040
4040
4040
4025
1611
2440

0527
0530
0531
0532
0533
V0534
0535

0536
05 37

74 61

0540

3400

0541
0542
0543
0544
0545
0546
0547

0640
4040
4015
1725
1624
4024
0120

0550
0551
0552
0553
0554
0555
0556
0557
0560
0561

0523
4306
4040
1716
4020
2217
2005
2240
2516
1124

0562

2343

0563
0564
0565
0566
0567
0570
0571
0572
0573
0574
0575
0576

4743
0624
3120
0540
0340
2417
4003
1716
2605
2224
4074
6134

0577
0600
0601
0602
0603

0640
4040
2205
2125
0523

FIRST BLOCK <3

UNIT <1\Z

14 11

1412
1412
1412
1412
1412
1412
1412
1412
1413
1413
1413
1413
1413
1413
1413
1413
1413
1413
1413
1414
1414
1415
1415
1415
1415
1415
1415
1415
1415
1415
1415
1415
1415
1415
1416
1416
1416
1416
1416

TEXT ZF

MESS4,

MOUNT TAPES

ON PROPER UNITS

FTYPE

TO CONVERT <1\Z

1416
1416
1416
1416
1417
1417
1417
1417
1417
1417
1417
1417
1417
1417
1417
1417
1420
1420
1421
1421
1421
1421
1421
1421
1421
1421
1421
1421
1421
1421
1421
1421
1421
1421
1421
1422
1422
1423
1423
1423
1423
1423
1423
1423
1423
1423
1423
1423
1424
1425
1426
2402

0604
0605
0606

2405
0440
0401

0607
0610
0611
0612
0613
0614
0615
0616
0617
0620
0621

2401
4306
4010
0123
4002
0505
1640
0317
1626
0522
2405

0622

0443

0623
0624
0625
0626
0627
0630
0631
0632
0633
0634
0635
0636
0637
0640
0641
0642

4743
1040
4040
4040
4040
4040
2431
2005
4022
4006
1722
4001
1617
2410
0522
4012

MESS5,

REQUESTED DATA

TEXT if

HAS BEEN CONVERTED

TYPE

0643

1702

0644
0645
0646
0647
0650
0651
0652
0653
0654
0655

4347
4306
4040
4040
4040
2205
2014
3140
7461
3400

0656

0000

ANSWER*

1554

0000

AAAEND>

REPLY <1\H
0
^>.+7

NOLIST
0

FOR ANOTHER JOB

13000

ERKOKS

AAAEND
ALOONE
ANSWER
BBUFA
BEGIN

55b4
0117
46t)6

0074
4020
1031
CC
4231
CHAR
CHARLY 4272

CHKSNS
CIBF
CIPT
CKLF
CRLFA
CTR
CIX
C17X
C4X

C700
C704
C7400
C777
DATOV
DATOVA
DONEAL
DONEl
D0NE2
ERROR
FBLK2
FBLK3
FMAX
FTB
GETKBD
GETWRD
I NPTH
INWORD
ITU

4322
0 72 0

0727
101b
0116
0106
0115
0254
0122
0123
0070
0071
01055

0113
106!3

0672
0 73 6

0753
0744
0666
4334
4337
0474
0050
5407
0523
4341
010 0
005i;

4335
1032
LOOPl 4235
0051
LIB
MAX
0102
4342
MESSl
MESS2 4434
4503
MESS4
MESS4 4641
4577
MESS5>
MULWD 4266
HI
4033
4035
MIA
M2
4050
4032
M2 A
M3
4124
4126
MiA
4201
M4
4203
M4A
M4X
0125
MS
4216
0522
NDAT
1033
iviOOAT
4333
NUM
2400
OBUF
OBUFA 0110
OCTAC 4332
0111
OENO
0053
0FT8
4177
OK
OTBLK 0107
0054
OTU
OUTOV 1044
OUTOVA 0671

LBLK2
LF

PTR
QAB
QACA
QACHAR
QACKLF
QACNTR
QAD
QAE
QAEXIT
QAF
QAG
QAH
QAI
QAINIT
QAJ
QAK

QAKRB
QAL
QALEGL
QAM
QAN
QAO
QAP
QAQ
QARFSH
QAT

QATLS
QATPE
QATSF
QATY
QAU
QAV
QAW
QAX
QAY
QAZ

READ
READA
KSTRT
RSTRtA
HTBLK
RTNl
HI
R2

SHIFT
SRCH"
START
STSW
51
52
53
54

TAGA
TAGl
TAG2
TAG3
TAG4
TAG5
TAG6
TAG7
TBUF
TBUFA
TCTR

0104
4672
4703
55j43

5507
5472
4714
4736
5523
5404
4750
5002
5017
4666
5024
5173
6036
5063
5463
4767
5111
5117
5130
5151
4741
5156
6046
5532
6041
5424
5374
5204
5400
5312
5300
5167
0265
0076
0323
0124
0072
4317
0300
0277
0226
0400
4023
0073
0253
0256
0241
0263
0517
0405
0444
0441
0414
0460
0500
0516
2000
0075
0112

0600
0607
0613
0624
0673
TR4
0710
TR5
0637
TR6
1000
TTYO
TTYOA 0114
1003
TTl
TT2
1013
UNIT2 4336
UNIT3 4340
UPLIM 4260
WRITE 0304
WRITEA 0077
Wl
0317
W2
0316
XEGIN 0200
4320
XI T
XOINP 0120
XOOUT 0121
XR0
0010
XKl
0011
XR2
0012
4325
ZERO
IRAN
TRl
TR2
TR3

READER'S COMMENTS

Digital Equipment Corporation maintains a continuous effort to improve

publications.

SINPRE
DEC-12-UW*+A-D

the quality and usefulness of its

To do this effectively we need user feedback - your critical evaluation of this manual.

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?

DEC also strives to keep its customers informed of current DEC software and publications. Thus, the following periodically distributed publications are available upon request.

Please check the appropriate boxes for a current issue of the

pubHcation(s) desired.

D Software Manual Update,
O

a quarterly collection of revisions to current software manuals.

User's Bookshelf, a bibliography of current software manuals.

O Program

Library Price List, a list of currently available software programs and manuals.

Please describe your position.

Name

Organization

Street

Department.

City

State

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
Maynard, Massachusetts 01754

HOW TO OBTAIN SOFTWARE INFORMATION
Announcements for new and revised software, as well as programming notes, software problems,
and documentation corrections are published by Software Information Service in
the following newsletters.

Digital Software News for the PDP-8 Family
Digital Software News for the PDP-9/15 Family

PDP-6/PDP- 10 Software Bulletin

These newsletters contain information applicable to software available from DigitaPs

Please complete the card below to place your name on the newsletter

Program Library.

mailing list.

Questions or problems concerning DEC Software should be reported to the
Software Specialist at your nearest DEC
regional or district sales office. In cases where no Software Specialist
is available, please send a Software Trouble
Report form with details of the problem to:

Software Information Service
Digital Equipment Corporation

146 Main Street, BIdg. 3-5
Maynard, Massachusetts 01754

These forms, which are available without charge from the Program Library, should be
fully filled out and accompanied by teletype output as well as listings or tapes of the user program to
facilitate a complete investigation An
answer will be sent to the individual and appropriate topics of general interest will be
printed
in the newsletter.

New and revised software and manuals. Software Trouble Report forms, and cumulative Software
Manual Updates
When ordering, include the document number and a brief description of

are available from the Program Library.

the program or manual requested. Revisions of programs and documents
will be announced in the newsletters

a pnce list will be included twice yeariy.

and

Direct all inquiries and requests to:

Program Library
Digital Equipment Corporation

146 Main Street, BIdg. 3-5
Maynard, Massachusetts 01754
Digital Equipment Computer Users Society (DECUS) maintains

as well as the

a user Library and publishes a catalog of programs

DECUSCOPE magazine for its members and non-memberc who request

it.

please write to:

DECUS
Digital Equipment Corporation

146 Main Street
Maynard. Massachusetts 01754

Send Digital's software newsletters to:

Name
Company Name.
Address

My computer is a

PDP-8/I

LINC-8
PDP-9
PDP-IO

My system serial number is

(zip code)

PDP-8/L

PDF 12

PDP-I5

OTHER
(if known)

^'^^^^ ^P^^^^y

For further information

Do Not Tear - Fold Here and Staple

FIRST CLASS
PERMIT NO. 33

MAYNARD, MASS.

Digital Equipment Corporation
Software Information Services

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

Digital Ec|uipmenf Corporation

Maynard, IVIassachusetts

printed in U.S.A.