1620 PR 033_1620 1443_Monitor_I_Listings_and_Flowcharts_Sep65 033 1443 Monitor I Listings And Flowcharts Sep65

1620-PR-033_1620-1443_Monitor_I_Listings_and_Flowcharts_Sep65 1620-PR-033_1620-1443_Monitor_I_Listings_and_Flowcharts_Sep65

User Manual: 1620-PR-033_1620-1443_Monitor_I_Listings_and_Flowcharts_Sep65

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

Download1620-PR-033_1620-1443_Monitor_I_Listings_and_Flowcharts_Sep65 1620-PR-033 1620-1443 Monitor I Listings And Flowcharts Sep65
Open PDF In BrowserView PDF
COMPUTER
TECHNOLOGY
IBM 1620-1443 Monitor I
Listings & Flow Charts

1620-PR-033(Card)
1620-PR-034(Paper Tape)

40 Saw Mill River Road
Hawthorne, New York 10532
WHite Pwru 9·1900 (Code 914)

International Business Machines Corporation

SEPI'EMBER, 1965
Til" •

ADDRESS CHANGE:

ANY DISCREPANCY BETWEEN MATERIAL RECEIVED AND THE
MATERIAL ORDERED SHOULD BE FORWARDED TO THE PROOHAM
INFORMATION DEPARTMENT, NOW LOCATED AT 40 SAW MILL RIVER
ROAD, HAWTHORNE, NEW YORK - 10532

PROGRAM Th1FORMATION DEPARTMENT

1620-144)

~ONI

TOR

00020
SV$teM CO.MO~
000)0
OORe 402
00040 DIMENT cst
1.0 ..

00~02

ooo~o

00402

OOA FOR LOADER CALLS.

o

00060
00010

000110

DC
-00
OSA

).0

DC

6,0',

00407
OC410

OOOQO
OSC
I
00100 SULOC DC
-00
00110 SFOINT OSC

1, 1"

1.0 ..

00425
SPS. FORTUN. AND DUP CNTL CARD SOURCE.
LADDR

DC

1~ITlAlIZlTIO~

0042.
00421

INDICATeR.

1.0"

LOADER ENTRY CODE AND INPUT DEViCE.

00421

001~0

FSPS

OSC

1,0 ..

LDAO SUP IND.

00429

001~0

HIGH

DC
~,o ••
-0000

HICHEST ACCRESS LOAeED PLUS ONE.

DC

5.0.,

LOADER

esc

1,1 ••

CRIVE COCE FOR SYSTeM MODULE.

o

o

-ooce

INP~T

AND MONITOR CNTl CARD SOUR.

00434
00439

BUFFER VECTOR.

00440

1
TRANSMIT HEACLESS COA-S HUE FOR OVRLAY.
15.0',.
OOOOOOOCCOOOOO'
OVERlAY READ ROUTINE
001~0
H
)(,02.
RESET ANC SIlRI UPON OVERLAY EUOR.
00200 HAL T
SEEK ANO REAO OVERLAY ING PROGUII.
18-MOD,701,t
00210 OV"LAV )4
)6
I B".OO • 102.0
00220
HALT IF INC. 1900.
00230 8N I
81
'''IT.19CO,,
8RANCH 10 I IS FIRST LOCATICN.
00240
B
18""00+11..6.
DORG --9
00250
OSA
20
00260
00110 OLOCA

-0000
6

00422

DISK SCRATCH AREA DEFINER.

001)0 LOINPT OSC

00110 18MMOD

]

5 X

OD41S
00421

).e

o

00160 LADDR

-0000

D041S

-eeeo'

00120 CINIT

, x

00407

OSA

OSC

.1( ..

00441

004"
004"
00410
004U
00504
0050.
00510

NI
)4
l'
4.
49

COOOO
00101
00102
01900
OCOOO

5 •

OO~IO

00270
00280 ••••••

-0000
00440
00440
00456
0045L

-0020

MAIN 10RT ROUTINE.
ENTRIES ARE
IOR8C. ICPT. 10SO. AND 10GT.
FilE OHCRI'IOR AND REIUAN AoaRESS VECTOR IS IOU.

002QO •
00300 •

OOHO
00)20
00330 REPOS
00140

CRIVE REPOSITION TA8LE
CORG 8N ".20

DC
-0

2, a

00512
0051)

00)50

OC

2. a

00515

00360

-0
DC
-0

2, G

00511

00310

DC

2.0

1620-1443 MONITOR I

VERSION 2

SUPERVISOR ANO I.O.R.T.

PAGE
00519

-0
00380
OO)~O

10.8C
00400 10PT
00410
00420
00~30 10SK
00~40 10CT
00450
00460
00410 ERRET
00480
00490 INOS
00500

ENTRY SEC TION
010P.,.7,1,l1,
PUT ENTRY wiTH READ BAC", C~ECK.
CFILE+ll.TTI+l2.8. PUT ENTRV.
IOCT+12
DORt --I
SF
•• XX ..
SEEK ONLY ENTRV.
TF'" OFllE+ll.TT1 ..
GET ENTRY.
TFM
8KPT • .I01,.
TURh OFF ANY I/O INCICATORS.
AI
ERRCRoI900.11
WHITHER WANCEREST THOU. WAYFARER.
8
8KPT •• 16.
CORG --4
ERROR INCICATOR TABLE.
DC
2,06"
-6
2,01
DC
10M

TF"
8

00520
00532
00544
00"4
00554

15
16
4'

02061
0193)
00518

OOOOJ
OJ164
00000

12

DO'"

16
16
46
4R

00554
01'3)
00467
00632
0046P

00000
-17S2
-1162
019000000

00511
005.0
00602
006C.
00610
00612

-1

00510
00520
00521

DC
J6
DC
J1

2,16

00614
00616

2.17
PRI NTH

DC

0061'

K5
005)0

DC

OOUO

L6
00622

00540

DC
L1

00550
00560

OC
LB
OSC

1,'

00561

CSC

1.0

00562 INUUT

CSA

C~ECK-12

00570 ••••••
00580 EIIROR
005.0
00600
00610
00.20
00.40
00.50

00 •• 0
00610 ••••••
00. . 0 0
00. .0 lOCAL
00100
00110

00720
00130
00140
00150
OOUO

o

00624
00625

5 X

00631

oo.n
ERROR INO ICAfOR SCANNER ROUTINE.
I NI TlALIZE FOR CURRENT INOICATOR.
e+21,JNOS.'.
e+24.XX ••
TEST iF INDICATOR ON.
YES -SET FLAG INDICATOR.
SF
ERROR.l1".,
ADVANCE ADDRESSING.
AM
ERROUll.2.10.
TEST IF FINISHED
BD
ERROR.ERRORoll.ll.
YES -SET UP CAll TO THE EIIROR aOUTlNE.
TR
OLDDA .ECALL"

-125'

IF

OO'U

BNI

00M4
00'"

26
41
J2
11

00 ••0
00 • . ,
OaJ04
00'"

..

I

OVRlAY."
CORIO 116

CALL LINK ANO CALL LOAD ENTRY
SIMULATES AN IOGT ENTRY FOR SPS -CALL- 'IUEDO-OP.
DFILE+ll.TTI..
SET RUD INDICArOR.
TR
CNT~O.IOXl.Il.
MOVE 'Ill DESCRiptOR.
TFM IKPT.X01+U"
'UIICH THI TIllE CLOCK.
AM
10......
COIIPUTI RETURN ADDUSS.
8NF EUET-12.CNTWD+l

Don.
Don.

TFM

AM

DO. . .

00140

00111
00764

oon.

10",~

UECUTE ANY INDICATOR CHECK.
8
EAAET.. 12 •••
OORIi 0-)
00110 ••••••
liON ITOR CALLER !THROUGH !lDIIITOR RETURN IUIUTlNE.1

00"1

00196

2

41

II

,.

II

l6
11
..
11
••

0065)
00. . .
00.4L
00'4)
00.12
00441
004. .

OIUJ

02110
.0461

00'"
00"0
Oot"
00"0

-0610
00000
00000
OC0-2
0064l

01l0li
00000

-lf52
00''''

-1'"
-010.
olin

-000'
00100

00710

oono

b

00100
U0l10
00120 DIU
00110
001'0

DCRC .-]

TO

001"
DOlO.

G'WlT,K03'f

PUNCH THt:

00060
00910
00.80
00"0 XO)
01000
01010
01020
01010 C~lC.l
010'0

)b

~A"'fNT,10l"

8/1i1R

lO~O

SECI0~

CCUNT

10,20,40.60.801.

(-OOll

TI"'£: ClceK.
"fAO THE OESIRED ",,,P fhTRY ..
EXECUTE flUOR reST ..

DIlly,"'APE"'T"

WO.f(I~G

SLOT ..

TEST IF 'lAUe 01,. ENTRY"

fR

"'''PENT,CNT.O.b,ll,

"'0 Vt::

004

'!o

OD

,)IC'I",rJlOP+1"
MJJ.PEf'ojT+),SRElOC,.

TEST

FO~

SECrO;\l.

"4'Pf~T>S~ElOC-'"
"+4~.:U)":tt
IO~J('H
~KiJ~,lCl1.Xt

111,

YES

.a~I(JNG

-COMPUTE

SLOT.

SCR4TC~,

AElOCATILN ..

SEeTeR AOOIUSS.

A8SClUTE

t..ET lTS lOGICAL DRIv!: CGDE.
Tl::sr IF SEEK ONLY DESIRED ..
YfS -CLEAR THE I"'CICATOR.
PERFOR" THE:: seEK A~C fXIT.

01080

OlOQ2
J i i.04

0112u
01110 OlUl

w.. r

:;H-)1.DFllf+8,.

~LJ

DIOP+ll,CNTiIIO+l ..

011"0

HM

'l1<.0'-,O!OP"

OORG

S EI: K
.- i

(Jill

MAf'ENT+t3tIiS9<;~"

011,0
01160

CoTEST

I, I

01180
01190

't

A",F
TR

o 12CO

o Il10

:-~JR

+;' ...

TEST IF

~flCCATA8LE

lCADEfI: RfC:UIRf'C.

NO -lEST

IF

SPS SUPERVlseR RHUIREO.

YES -AE:AO AN£: EXECUTE (ALlER

e

C ,,-:<

t"l

00 . . 1
00 . . .

011'1
00000

25
25
H
25

01021
00861
00861
02021
01020
021"
01150
02150
021U
01"6

OI.lL
02110
02112
00600
0211)
01107
02116
02176

4"
)j

21
21
U

'"

a 1112
011l'
01116
all . .
0la6
01156
01168
01160
{lll ~?
IJ Lt ~;'"

11
"S

••
11
H

21
2S

••
I.
••
••25

II

16

".

-OHI
00000
02150

0211'
e21 so
00'67
021 . .
005.0

-0'"
00102
00000

021"
01061
006'2

0211N
021 . .
00000

021"
01061
02141

02170
02021
0042S
00422

021 ......

01112
OO~54

COOO-

OOSS.

oeooo

011'1
01"6

-Q~6N

o 1.l5t1

01930
01171
-2020

0/011
01141
014t?b

02151
Dlln
G til'"
{)o~'"

1

00468

OCOOO

oeooo

02L!.'
Ol8i1.0RJH,il

() l}l U

r.l.~PFNT"2

0132u

~'A",FNT"~t('lRI

,,-' l J iO

"'f_~'f!'. .

'IE d l
!!TtMP-5"

01212

0122'
0123.
Oil . .
012.0
Ollll

0128'
01296

o IHa
R;ESTORE

TNt lCG[CAl CRIVE CODE CJc.JT

a lHe

Jj

..
••15

Oli II
01HO

00000
01.10

cecoo

11
25

0206J
00S6N
0216'
021H
021H
all . .
02141
021414

.."q

01092

00000

...

OIH.

Olon

It.
2\
••
II

OOH2
01401
00"1

~q

OO~68

••
16

01210
00462

1t1
U
14

CO!t65
01236

II
I'
2>

n

02110
-161R
0000011."

ocoao
021·\10\

cza "

PACE
Ol HO
G t 3SQ
01 )bu C.-I'll
,,1 ~ fO

01380
01390 Cl-!lC.l

014CO
01410
01420
01lt30

a IIt~O

co~

(,

1

~,NF-

If
A.
BkF
TR,
G

:tfj~np+l~.
j-l,,;"~i'1"~''':'~H-1·i'i

t·!GH-2,A:l(pf:Nr ..

TEST IF HIGH
'ff S.

!~OICATCR

Te BE UPLAreO.

~

c.t-K"'~SPS~LP,.

OLC!")B.,SUPREf ..

TEST IF $PS WAIN LI~f PRCGrc"fII.
Yts. -CfT ROtjftNE TO HANUlL

OVRl.l ..

CORG .-3
C~tt:'"

xO~.2«tfCfl1rwO.l"

IF

H.lll'+b,[Q)(X"
H.lXX,"'APf:1IIT+18, Hi
,W."24,H"'ENT+14

TP"

01..,60

Hiiilt

010\10

r:.~

HJl(J(,IoIiAP€~r.l].711

01..,80
OlltQO

G

XOl!+14

01500
015,10 •
U1 'SlO •

01530 S"OI
01 ~.O
01550
01560 SEEK
01570
015.0

o l ~qO

01600
01610
01620
01.10
01 •• 0
01650 S<02
01660

01610

oueo
01690

o I'OS

rES! "
[X((LTION DESIRED.
YES -SEI cP THE ExiT.

01410
01 ", 2

014H
Oil\!)6
0!468

CeRG .-1
SEE. ROuTINE
-SEEKS WHEN NEceSSARY, COMI'IJTES PHYSICAL
Dor" COO!. COUESPOND1NG TO USER SLPPLlEO DRIVE CODE. UO
LPOAH:; c.URRe;,,*'I' tIC CYllr.oe,. POSITION INfJICATOR.
fO
TEM~-~~MAPEN'I'
INSERT SUPPLIED DRIVE CODE.

o

~K

02

OORC *- 3
IFM
fEMP-5,O.10,
tF
HMP,""PENH5

CO.PUlE

CYLINOER FOR THIS CALL.

CF
r F.~p. TE"P

•BD

TE"P~TE"'P
S!(Ol,~APEJ>.;irf ~

rEMP .... StHMP-5,.

lEST FOR SPECIFIEG DRIVE CODE.
NO -.USf aE CO.PUIEO.

rr;,..p-') , l ~ lC
CR I 'tiE .EQlIt \I"

+.

COM'UTE

LOCATION OF PHYSICAl DRIYE CODE.

l':;1f:ereN;p">~

~,t.;>f:N;~u_%VE,J.l.

l2 f "APfNT"

REPLACE lOGICAL ORIYE CODE 6Y PHySICAL.
EUO. IF NO PHYSICAL IlllYE CODE.

'u(?r,~K.02

f.~"Q1h·b!h

TELL THE OPERATOl •

IHINO OR

r~c.

011eO
01110
01120
01130

O.He,OLOC.,-EOUIV .. GEl OLD CYlUIOEA 'OSITION.
H •• - . . . .
COMPue ~II" DESIRED CYLINDER.

OIHO
01
S.03

HIlltP-"lID~iYEtll
S~04~ llOC~h.

01760

14Ii1PtfMif,1tH ...
OR
!, n:f\'II'~·!f"

no

01170

01180
01 r.o
01'00 e,U4HIH.
01110 TTl
01120

....

J"

01'16
01'"
01 •••
01496
01501
01520
OIS]2
DISH
01561
01510
015'2
DUO.
0161'
01611
01640
0lU2
01 . . .

co •• e

01613
00000

02111
005b5

-216K
01158
-215'
00000

H

00S6S
012)6

15
••

010 I"
0160'

021"

\6

020 l '
0201'
02015
0201.
0/01'
0201'
0141'
0201.

000-0
02149

16

H
21
21

21
H
21
II
U

21

0201.

all"

OCOOO

I.

ocooo
020
01010
021'9

021"
0201'
000-1
-2121

02014

U
U

0216'
021H
01672
00U7

.9

00692

oeooo

II
U
l4
U

02169

-0001
00000
021"
01200
00701
02016
00000

n

021._

021"
-160'

01672

~~

lBT IF THE SEEK IS "fCESSU',
YES -PERFO." THE SEE',
uPCATE OLO CYLINDER I'OSITION.
'EfUl .. TO CALLER.

01612
01 . ..
01 . ..

onot

DIUO
OUU
011.4
01751

auu
on,.
au,.

01640

02151
02152

01"6

o 15~6

TfM?,fJ'A.!lfNT+5

OR

0. lJiJ8
01400

OOO.KING COA.

02".

oooceo ce Ceooooocc a 00 a
UC
5.0"
-0000

VfClOR 10 .UDUlE TA81ES.

OZl.9

O)C

~TO.AGf

OiS60

C~

OH1U
02SeO
02S9U
oaoo
02b1u
02620
oa30
02"0
02UO
02 . . 0
02610
oalo
02no
02700
02710
02720
02730
02140
02750
02760
02770
C2780
02790
02800
02SSU
Ol860

XX

os

IU~'

OS

IWO

VERSluN 2

2.0

11,c ••

FOR

CALLI~G

SEQUENCE REeGRD.

21

02170

cooceooccoooo

BKP I
D~
SHORC cs
SYSeAL OS
~O~B
OS
SPS"LP os
RMI
CS
os
R"2
SUPE~I

COMM
MCO.M
M"BUF
Men
CSACO
aSAOI
aSA02
OSAO ..
OSAOb
OSA07
aSA08
OSAOO
OSAIO
OS'll
as"b
aSAl7

02820 OSAll
02830
OlB"O
02BIO
illS ru
01880
U1890
Ol9CO
01"10
01020
020JO
02040
020S0
02060

OSA'"
OS" S
USAI2
aSAI8
aSAIO
OSAlO
OSA21
aSAH
aSA40
CSASO
OSA51

INDICATES USEC FIELD OR U~DEFI~EO SYMBOL
CALL ANU R£I~R~ vECTOR.
I~OIRECI REII"R~ 8RiNCH ADDRESs
OBJECT PROCRAO STANCARO ORIGlh.
SYSTE" PROGRAM COM.UNICATICN 01(;11.
~ON-EXEeUTf INC. SET 8Y SPS. erc.
SPS SUPERVISOR FLAC ~HEN OLP LeAO REQUEST
INDIRECT vECTCRS TO SET RECORD .AR.S
FCR THE SPS SUP. AFTER .LP LCAD.
ENIRY TO THE ~PS SUPERVISOR.
lOCAlI CN OF CO.o SECIOR IN .ONIICR.
.0hIIOR INas. I~ THIS seeTeR
_Uhl lOR "II CORC READ 8UFFER.
.ON I TOR r. HI NCER
FIRST SECICR Ih .(NITOR CYllNCER
LOADER REllR' A~AlYlER
SIAGE 2
AM IIHME II C TA8LES.
eo •• c~ A~O OvERLAY REAt ROUIINE
.Alh 10RI
RElUCAIA8LE LCAOER CCRE SAVE AAEA
OOh IIOR
NA.eu LOAD ROUT I ~E
S IAGE
ERRCR -aUIINE
SIAGE a
ERRCR ROUIl NE
STACE I
LOADER LAlLE_
STAGE 2
SP S SUPE R VI SOR R E1URN ANAL VlE R
EArtCR ROUTI"'E STAGE 3
SIAGE.
ERReR RUUIINE
SPS SuP ANU lOACER CALLER
SIAGE
ERROR ROUIINE
STAGE 2
LOADER REllRN ANALYlER
STACE I
.ONIIOR ANO O~P SI"P. LOADER SUSR.
NAMED LllAO RllUIINE
STA<.E I
ERRCR ROUT! Nf
SlAG> a PLUS
SYSTEM COM.lNlCATlO~ SEUOR.
SYSIEO OOA SEC lOR.
SPS SUP.Rvl SUR
"EU1CATABLf LOADER
CO~IROl TU >RIIE ON CISK.

0,0 ..
0.10S"'+11"
O.t-oAlT+ll,.

0,2402 ••
OtO~RlA.Y+1

..

O.t-'LTtl ..
Q,Q'VRlAV"

0,2210"
Q,ol2IS,.
O,2Q3"t.

OS
OS

Q,SVSORG."CQ"

OS

0,CO,IIU"'50"
0.13000"

os

os

o,qa"

CS

O,2CO."C.YL ••

OS

C,DSAOO.3I5o"
O,US",01.1 ..
0,05"'02+1.,
O,OSAO"'+I"
0,OS",0'.'6"

OS

OS

os
OS

as

O,OSA07+3"

DS

O,OSA08+85"
0, OSA09+S"
0,OS"10+12"
O,USA11+b ..
0,D51116+) ..

as
CS
DS

US

as

O,CS411+2.,

os

Q,DSAI3+S"
0,OSA1"+6"
O,OSAlllj+3,.
e,eSA 12+6.,
O,OSA 18+3"
0,OS419+3"

US
OS
D~

ell)

us
DS

O,l)SAOl-~"

OS
CS

us

O,OSA08+"'"
Q,OSA08+84.,
0,1102". ..

('$

0.OS400"

noqc

1"1182.
1 tl

D~C

o

oeooo

o
o
o
o
o
o
o
a
o
a
o
o
a
o
o
o
o

00565
00'61
02.e2

00475
00'"

00'"
02210
02215
02U.
01lC2

02152
\3000
00091
19.00

1'615
lUll>
19639
19ue
19U.
19659
1974.
10749
19161

o
o
o
o
o

o
o
a
o

191U

o

19170
IQ712
19177
IHI)
19116
19192
191QS
ln98
IOU"

o
o
o
o
o
o

o
o
o

1066]
19143
1702.

o

19600
19082
19982

I

OlOro

CSA

cc

0;,;'0:.,80

USAO'

19081

5

], Ie

19981
19990

J9UO

10096

6

7

-20

1620-IH3 .ONIIOR

I

VERSION 2

]

SUPERVISOR AND I.C.R.T.

DC.
b, "02'
-04C2'

x

PAGE

U )000

U JOI 0
C 302U
C103C

ow.c.o

G30SU
o 30bO

OJ010

IORT SURROUTlNES WHICH

01080
03000
01100
U 1120
03130
c 1140
03160
011 7~
03180
012"0 wATeT
0]/50
03260
01210
03280
03200 BIGTR8
01100
OHIO
033Z0
U1BO
U3HO MESI

03350
03360 GOGO
03370
OH80

03390
01400
OHIO
03420

01"30 ME 52

CORG .- 3
)..
IB .... RT,701...

38
BI
B
CORG
RCTY

18M.n.70Z...
BIGTRB.1900
CD GO
.-3

03450

01'90

alSK FCLlCw

SEEK

THE

ERROR COUNT

WRITE THE ERROR

COU~T

•• 12.700

B
fEXII'll
OORG .- 3

DC
as.

..
11
11
11
U

OOU6

-0'10

OO.U

000-1
000-2

00U2

n

0101'

oc •• O

0010'

••

0073.

00716

'9

00866

OOHS
OCOOO

J4
JI

0102'

00101

0102'

00702

00161
00 . . .

01900
OCCOO

006 ••
0065.
00 . . .

00680

OOU.
00724

00136
D07U

u I SK oRI TE ERROR .ESSAGE

00110
001tZ
oc.o.

L,l

(0 IN MESSAGE
10lNDICAlOU

.9
"

olin

001050

000-2

00612

0064L

).

00000

19

008n

••
U

00000

00102
00100
OCOOO

001H

oeooo

00'1\
27 •

OO'U
00 •••

oon.
001t0
aa.02
00914
oo.u

I.

00461

-1162

••

00'"

14
.6

00.61
00"6

JI

OOUI

..

OOUO

01100
-119'
01100
01031
00000

00'1)

II x

oont

,

RCTV
w.TV MES2...
"NIV INOS-I...
RC TY

Bl

006)2
OOb32

00160
OC1. .

8
"R TeT
DORe .-'"
OAC
27.8AO DIS. WRITE.RBEI START'
8AO DISK WRITf.RESET SURT'
MESSAGE IF ENlfRING 10RT EUOR
C.
8.PT.XOI..
reST IF CALLEO AT ENTRY
8E
"ESSG
CM
B.P'.XOI>36
8E
"ESSG
TA
OlOOA.JOFF..
NO-CAU IQRI ERROR
B
OV RlAY>U...
ELIMINATE SEEK
OORG .- ..
Cat
II. E~T EUOR •

00"•
00 . . .
OOtiO

OO.U
0100.
01016
0101'

OIU.

OSAIOH

olon

1. I

01019
01012

ERROR +seo

alan

-01
OU40

O~

0076'

WATY MES1 . . ,

03500
03510 18MWI:' OC
J
OSA
03520
035)0

RESIDE

H

ENT fRRO,.

03 .... 0 • eSSG
01'60
03470
034'0

~ORMAlL'

OVERLAY ERROR ROUTI~E
saGE 0
SAVE ERROR COUNT ROUTINE
CORC ERROR
TEST
RNF
NOERR.INCS.I.
lEST INO TABLE
AJII1
C.Ol.. .... T,Ol.lC..
UP THE EIUCK COU~l
NnEAR
aM
IESI+II.02010..
.MOOlfY ERROR TEST
AM
TE~1+18.02010..
MODifY ERROR COU'I lCCATICN
BO
IEST.TESI.Il.Il.
TEST LAST INDICATOR
.RIIE ERROR COUNT 10 DISK
10
IBM.nolaMOOO...
Sfl ceRRECT MODULE
• 'a ERROR CDUNI TO DISK IF fULL IRACK
B~F
_RICT.12.010CA."' .. WRIIE EAROR COUNT ~e FlA'
B
GOGO

J'

00000
). 00915
II 0060.
)4 • 00000
"I 01016
4, a I6S0

,

00102
00100
00100
00102
00100
00000

.
•

1620-1441 MON I TOR I
0]~50

JUFF

OlHO
a lS70
015ao
Q3SQQ

03610 •
01620
03610 (OUNT

VERSION 2

SUPERVISOR AND I.O.R. T.

PAG!
OIOH
01011
01042

-1112
0
, x

010~2

J9610
3

as
OSA

Q,·+1
OSA21

OC

1.5

010~5

OSA

EUOR

01050

I.'

01050
01051

-as
OSC

ROt.. TINE TO TVPE OLT AND RE STORE
2 t CC, , •

06

5 X
-0632
I

THE ERROR CCUNTERS T( lERO

OOR.G ERROA.+SQO

DC

9

01132
01133

-0
03640

DC
-0

2 ,CC,.,

03650

oc

2.

01660
01661
01670
01680
O]bQQ

OHeo
0)110

03720
U3730
03HO
01750
03760
03170
03780
031QO

03800
0180 I
03810
03820
0)8)0

a )8""U

-0
OC
-0
OC
-0
CC
-0

r,c

C7

OlllS

ce."

16

011 H

2 ,CC '"

17

2,

ce ...

o 113~
25

01141

2, 0e,,,

16

01141

29CC."

11

0110'

-0
CC
3 ,ee' '"
-0'
OORG ERA.OA;+'524
RCTY

o 11~8

18

wNT'!' "6" I
TR
4b.l20"
38
]2,102"

01156
CALL IN 8Y ENTERING
34000120070 I
3bOOO3200702
.900070011975000 I 000.6

0115b
o IIb8

01110
01192
01200
o 12C6
01207

H
OORG *"" ':,
NOW .... SN-T THAT NICE
OC
2. c
-0
CC
2.0
-0
OC
2.0
-0
DC
2.0
-0
DC
2.0
"0
OC
2.0
-0
OC
2.0
-0
OC
3 to'
-0 •
THIS ROUTINE REJlfAINS INC ORE .1 TH ALL ERROR ROUT INES

03850

aURa ERROR+6CO

03860 88UFF

00

H

00000

18

OOO~b

31
11
H

00046
COO32
00000

00102
00100
00120
OC702
00000

00

00000

OCODO

01209
01211
01213
01215
01217
01219
01222
01212
01212

U

1620-1") MONI TOR I

VERSION 2

SLPERVISOR AND l.e.R. T.

0)810

OSC
8, C'
0000000 •
0)880 SIOH OSC 6,0'
00000'
OHIGlO
•• 23. U~OSt.
IF"
IF
03900 C.~fCK
*+33.XX r 7
O]q 1 0
CF
.- L, ,6
*+)6,XX
G3920
BNI
039)0
SF
C~ECI(+1l .. 6
039 .. 0
SF
C"EC.'S
03950
C~ECK+11.2,lO
A"
o )Q60 C.-.EK 1 CM
CHECK+ 11, I NOS+ 14,8
OHIO
8N I C"Et •• 1300
03980
BNF OTfST,CHE(.k+8"
0)990 C"EK2 BO
RETRY,STEPS, •
0'000 HOLLER RCTY
WA TY EMSGI
04010
0.020
SPTY
WNTY SIO'.
0'030 HOI
0404tU
SPTV
NOP "0'
04050
WNTY INOS-I
04060 HO}
SPTY
0'070
H
EAROR+8
0'010 HO'
04090
TF" 81-5.81,711.
RNTY BBl..FF" •
0'100

...

0"'110

spry

04120
04130
0'100
0'150
00160
0'170 81

81
Sf
S
B
OORG
os.

*-24,400 . .
88LFF".

01252
ROUTINE

to

OETERII'INE ERkOR INOS.

OISTINGUISH IF OVERFLOW.
IF fljOT, GO INTO RETRV LOOP.
TVPE ERROR MESSAGE.

ON UISk ERROR,

81. ,6.,

INI TIAUZE INDIRECT 8RANCH.
RHO THE OPERATORS ENTRY.
IF ssw•• AllOW REENTRY.
COMPUTE 8RANCH AOCRESS.
PERFORM INDIRECT eRANC.H.

EE. IT

041QO

os.
OSA

11

H
32
32
II
14

H
~O

11
)~

n
)~

0142'

)1

OI~JI

H
41

31
34
~I

16
)'

H

46
J2

22
~9

01211
01303
0128J
01330
0121J
01278
01211
01281
01270
00761
01044
00000

-0610
-oooe
OCOOO
oeooo
00000
00000
000-2
0-62~

01)00
01278
01200
00102
CCIOO
00101
00100
00101
00000
00100
00101
00000
-ISlJ
00100
00101
00'00
00000
01233
00000

onll

00000
01252
COOOO
0141'
00609
CADDO
OOhO
01576
01232
00000
01510
01232
01576
015IJ

5 X

-lUI

RElRV

01511
01516

-IO'~

,PHASE

0151.
015'1

-1114
5 X
-1602
, x

0.200

OS.

AJOB

Olnl
01596

04210

oSA

RET"

015.6
01601

TOM
04220 uoa
0'2)0 APHASE TOM
TFM
O~240
NOP
O~HO EEl IT
TR
0'260
TFM
0~270
0~1I0
a
04no
OOR'
RNn
04100 RETN

b

16
26

0141~

01450
01.62
01474
01016
014"
01510
01522
01534
01546
01551
01570
01577
01511

,
0"'180

012"
01270
01212
01294
01306
01118
01330
0lH2
OI3H
01366
01318
olno
01~02

BI-5.BBUFF'1

.-.

PAGE
01240

e+23.0, •

SET MONITOR RETURN INDICATOR.

SYSCAl.~

aKP T .IIONCAl
MlPENT.SAVODA ..
OLCOA, ••••••
OLDC YO I,MC YL ,I 0,
OVRl""12

RlSTORE IIORlING DCA IP DIU 110 URO_.
ReSTOR! IIIAiM ROUTINE A. InUIN.
RESTORE MONITOR NODULE CUIIIOIi 1110.

0& . .2

01614
016"

e-),

II&.IFf •••

01601
01602
01614
01626
OIUI
OlltO

RUD OPUUOU ENTU.

111

ota"

,

x

5 x

IS
II
16
61

-"12

016n
00475
006"
01144

00000
0000'
-0796
01171
01117

11

004~1

••"

DUU

OOORI

00410

00000

Dun

00100

JI

10

~ONIIOR

1620-1")
OHIO
OH10
OHlO

61
SF
IF
IDM
CF
CF

O~Hu

U~150
O~UO

04370
0')80

8

O~)90

OhOO EMSC I
O~ .. O

SUPflV 150M AND 1.0 ••• 1.

.... 2~ ... OO. ,

ALLU. IffNI •• IF SS.~.
INIIIALlIE FOR RnUIN.

881.FF •• ,

olno

811l.PT .BIUFF ••
010P>47,O
10SK
010P+98

01741
0lU4
01'"
0177.
OU"
01117

eel"

DOle . - ]
CAC 9,051( EAR

os.

01".
0110.
OUU

"

EAIl •

..
J4

U

It
I~

n

JJ

all II

4'

OUlI

U'

02144
I

fiII.Pf~T,702,O

1,',

01104
01116

ERRe

OS
PSA

0,. +1
OSAOo+1

01111
01121

a
J'6~1
)

04~~O

0'460

DC
-I)
DSA

3.11
EIRE T

OIU.

~

1,',

Dill.
01110

-0602
I

OH70

esc

CORe 19982.
esc 1,1
I
OSA CSA 10

O~"O

UHOO

CO~TROL

TO .RITE CN CISK.

DC
-12
OSA

3,12

ERROR

. . . .5

O'HO

osc

I,'

UOJ95
19.96

o.. ~ .. o

OVERLAY ERROR RQUTi
UORe ERROR
TF
SIOxx .... IOX)(,.
CM
HI(~"X03"

0~5'0
0~600

00610
CoOlO
0~6)0

04&40

Olte-50

8":F

BNI
RNR
IF"
TR
B
DC
-06
OSA

EQ070 ,CNrWIl+5.,

flif

EOO50,tNTWO+ittll,
UVMLAV+ 12 ,OSl14 ••

006ll
00632
0064~

006"
006 . .
00610
00692

TEST IF CNIL CARC TUP.
YES -SEI PRCPER AETU.~ PCI~I.
LOAu AND EXEC~TE ERROR ROUTINE
STAGE ••

0070~

00H6
OOHO

), b

ER.OR

OOH'
00H5
007U

04tJflU

OSC

I,'

04070 HOoO

C"

8KPT,X04"

J9H'
)

5 •

-0612
I

STAGE 0 pu.S

MOVE Rf T~.N ACDRESS FOR nPE-CUI.
THREE POSSIBILITIES FOR THIS •
B"~CH IF CIS' JlO.

EC040,I200
8KP1,10 ..... 111.
OlUDA,-.l", ,

.
.

5 •

I.."

UH10

0'550
OH60 ECO)O
00570
OHao

2
OC702

U91l
1"12

UU7
1'''0

OHIO

~

OIUI
01124

OhiO

OC101
OC400
00000
01l)6
CCOOO
OCOOO
00000
OCOOO

,

)6
OSC

04440

II

PAG!
00000
01 . . 1
OUll
004U
020U
00554

SlOP

OH20
O~HO

¥ERSION 2

SPTy

TEST IF ERRCR AT

~ON-OIS'

110 TIME.

16
14
44

"16
H

11
40J

0125.
00U7
001"0
0071.
oo.oa
00467
00"'1
00<010
3

CC"S

-0'_
021n

01200
0117M
-as ...
0072)
IU77

5 •
-0632
I

0071.

I'

00467

47

00.08
00467
004"
004.0

-lliZ

II
1~2C-IOH
O"~.O'

00690
OHOO
04710
04720
OHIO

OvA.lA Y+ 12 ,OSA 12 ••

DC
-06
CSA

),6
ERROR

00lC5

0~170

8

O'I~O

0419U

PACE

I.C ••• T.

BKPT,lOP+2'"
OleCA,-.1", ,

osc

04no
O'UO Eooeo
oono
0'''0

A~O

8

Rcn
wAfY EfI'SG2l •••

00810
0'820
0<01 )0

SVEAVISOA

00150
00762
00174
00716
OOICO

04140

O~IOO

VERSIUN 2

EOO~O,1200

(;4750 E0050
OH60
OHIO
04790 E0070

-ONITaR

BNI
rF"
TR

LOAD ANO eMeCUTE ERROR ROUllNE
STAGE 2.

.. ,
I,'

IMPCSSIBLE ERRCR -MACHINE FAILURE CR
I NCoRMECI 10RT CALL IN(; SEQUENCE.
TER.INITf THE CUUE"T PHASE.

AP..,ASE •••

OOR& . - )
EOICO,1200, ,
81
aKPT, X04,.
1111 EOO'O, 1200
IF" HO'" t6.ERROR .zo ••
TO
OIlJP+12,SloP+1l
TR
SIO',OIOP
TO" OIOP+Il,"
TR
OlDDA.··19 ••
O¥RLU+Il,DSA II ..
B
DC
306
-06
OSA ERROR

c"

TEST IF AT MAP SECTOR RUO TI~E.
NO -TEST IF AT DISK 110 TIME,
YES -INIIIAlIz( FOR CISK ERROR.

LOAD AND EKECUre EaRO. ROUT INf
SUCE I,

H

49

CM
81
CM
INI
IF"
TR
8
Ot
-05

8J(PT.AIOl. ,
tOO95,1200

TEST IF ILLEGAl NAME LOAD .EQUEST.

8 .. 'T,5K02 ••
EOO!lO, 1200
"04.' ,ROYeD,.
OLODA,_.l9"
OVRLU+12 ,DSI I) . .
3,5

NO -IE Sf IF ILLEGAL DRIVE CODt.

04"0

DSA

ERROR

010"
01049
01010

0'000

DSC

I,'

01010 10100

INI

EQa80,MAPENT, ,

DIaZO

TPM

•

I t

OOIlC .-J
O~040
0'0'0 IMSGU DAe
lilli',
I'" lilli'
DOIIG 19'12.
0'0'0
Dse 101
0'0'0

I

010.0

CSA

U

'"u

4f
16

II

I~

JI

••

YU -SET UP FOil EARDII PROC!DUU.
LOAO AND EXECUTE UIIOII 1I0UTlNE
SUGE 3.

CAn.

TIST ., EMPTY ~AP ENTIIY
YIS -SET U' CALL TO THE UROII ROUTIN!+

'01'"

CONfIIOl TO Itlll n

00'"
00"0
00.12
00"4
01006
0101.
01010
01044

Olota
010••
010"
010 ••
01011

"."

ON OISII,

00000

olon
01614

010$2
00467
00"1
01492
020)2

alto"

Olou

OOUI
00410

12

"."

01100
~1212

01200
-0652
01816
02OZ0
00004
0094)
197.1

J

-OUl
I
14
U

It
U

.
16
II

00467
01011
00467
Dalal
01492
OOUI
00410
I

J09U
01100
-1604
OUOO
-100.
Dian
Itn2

,

~o.u

..
••

u

1
00914
014.2
01011

01144
-OtlO
00000

••

I ....

DUll

00102
00100
00000

, x

00'"
00'"

04910 t0090
0"20
04UO
0"'40
049.0
04"0 !OO"
04970
04 . . 0

"'0".'
,ME."
tccn

19

00955

I,'

19J . .

5 •

ooao.

osc
,

OC,"

-06)2
I

00U2
00140
00.40
00n2
00 . . .
00a76
ooa . .
00900
00912
009Z4
00'"
009.0

ootZo

-1912

J

00105
00106

O. . CO

OMIO

16
11
49

01200

S

12

1620-144)
O~OqO

CC
-05
OSA

05100

~ONITO~

I

VeRSION 2

SUPE~VISOA

ANO

I.C.~.T.

3.5
ERROR

19q.S

I.'

19qq5
19q"

05110

OSC

05120
051)0
0"40
05150
05160
OSI70
05110
051QO
OS200

OVERLAY ElIOI ROUTI NE
STAGE I
CORG ERROR
8
... 0 .... 6 •• 6
BU~CH AS PRESer •
CORG
)
TO. NIOP+ll •• , t
01 SABLE ANY REAO C~ECK.
TO. EElIT,)"
INI T1AlIlE EARCR RETURN.
TFM EEKlTU2.0VIUY
TR
"'IOP,SIOP, •
MOVE THE 1/0 INSTRUCTION.
TO. NIOP·12.~ ••
C LUR THE RECOlO MAU.
TR
SAVCO .... MAPENT ••
SAVE THE .OAKING CCA.
BNF •• 20.I~OS.1,
DETERMINE IF NON-CYLINDER OVERFLDN ERROR.
8
NO.
RE u .... " •

.-

0~210

05Z20 NTEST
052]0
05240
05250
05260
OS270
OS210 DTEST

OOAe

AM
CM
8101
8101
052QO
SF
8NF
05300
05310 CnOVF TFM
05320
TO
OSHa
80
TFo
053.0
TFo
053'1
053S0
A
TF
05360
05370
S
TF
05310
05390
S

.-

)

.TEST+II.2
.TEShll.INOSti.
.re Sf 01100
•• 2.,)800
INCS+I'
eeXlToINDS+I'
YE S -COMPUTE ACDRESS OF TOP OF

NE" T. 200 ••

~EX

•• 24,TEETH
HE Xl .100
NEIltOUA+ll.O
Nf.'-2."'PEN'+)
NE.CDA+S.NEXT ••

"'EX',.APENT.5,.
NE .. OOhll.NE Xl
N(ll ,JIIIA'ENT ••• t

CO. PUlE NUMBER OF HerONS PRCCESSEO.

o~.oo

~~F

RETRY,~EX'.,

O~'IO

CM

0.,I\1E,99.610.,

COMPUTE NUMBER OF SECTORS YET TC
~USI IElaY IF 0 OR LESS.
TEST IF DRIVE OVERFLON.

0~'20

"I

OOVFL,1200
~E I( T."

NO -SET

05450

CF
OS
SF

O~'60

TF

O~4TO

SF

05430
O~"O

NEXT

0~'80

0~'9C
o~soo
D~510

RETRY

OH20
os~

.sa

."
I'

T~

H

NIOP

D~5'O
O~550

0",.,60

NE~

P~OCESS.

SECTOR COUNT.

O••
NEXT-2
,..u,Do •• a,fIIIE Xl
CO~PUTE NE. CORE ACCRESS.
NE"OO •• 9" ,
NE.CO •• 1 3.'IlIAPENT+l]
OR 1 \If ,1.610,
UPDATE cYlINOER POSITION INDICATOR.
MAPE~H.1,fIIIE"OOA.+l,,"'OVE fIIIE ... OtA TC MCRKlhG SLCT.
Ct-EIC.2.11.CHEK1+11,11.REDUCE A:FTAY COUNT.
MAPEN T, 701, •
liE SEEK.

)0
ANF
Tn
JO

ulls-ra

7 CYl.

··23,JIIIAPENT+1

PHI

05580

...

•• 36,OIOP+47.,
.'23d'IOP'47, •
"'APEN!,7nO
E E x IT, 1 '100, •
INcur, ,6,

IIC INSTRUCTION GETS ~OVEP ~fRE.
TeSI IF ALSO READ s.c. CHEC"
YES -GET HOOE DICIT.
SEE IF ANY TRounE

T~IS

TIOE.

13

PAGE
1 . . 11
19qQO

00U2
00U2
00640
0064C
00U2
00664
00."
00 . . 1
001CO
00112
00124
00132
00132
0014.
0015.
00761
00710
00n2
00104
0011.
OCl21
00140
00152
00164
ocn.
00 . . 1
00900
00912
00924
00936
009'1
009.0
00971
00972
00 . .'
00996
o IOC8
01020
010)2
01044
01056
01068
OlOIC
0109;;
CliO'
01116
01128

J96)O
)

S X
-06)2
I

4q

0149.

00000

15
15

01011
OIUI
01610
010.1
01010
01111
00132
01044

OOOOq
OCOO)
-0"1
01104
00004
02144
-0610
00000

007U
0012]
00112
00n2
00624
01638
oonl
OOUQ
00152
00'11
olin
009"
olin
oonl
olin
00971
01044
021 . .
0113.
00971

-0002
-OU4
01300
0).00
COOOO
OOU'
-0200
02147
01211
-0100
-0000
02147
OC911
02149
oonl
02152
OC971
00019
01200
00000

"

JI
15
JI

..
44

11
14

41
41
J2

••

16

25
4J
16
1&
21
2&

22
16
12

..
.-14
J3

32
26
12
21
II
31
~~

14
)0
4'
25

u

.7
49

a

CO\.

00969
01110
01171
olin
021"
02145
DIl89

0'01)

00"1.
00000
02157
000-1
01161
OU8R
OC701
00000
02067
02067
00100
01900
00000

02!""
00000
0111.
01115
021'4
0lU8
OOUJ

13
162C-I44) MONI TOA I
05590
0~600

OOHl

05610
05620
0~630

VERSION 2

SUPEAV ISOR AND l.e.I. T.

DURG .- 3

E.SG2

TF

EMSG 1+12 ,e Jl4SG2.4"

K

~OLLER

o

INITIAliZE FOR CRIVE OVERFLOW TYPE-OUT.

DURe • -1
CAC 3 .OFt,
Oft

056.0 NEwCDA osc
1"5.0'
Oooooooceooooo'
05650 SAveDA DSC 20.C
ooooocoe cco 0 e DO ec ceo
05660 STEPS OSC
10.1234567890.1200.UP. UP. UP AND --WHOCPS.

......

I21H678~0

05670 TEETH

OAC

0~080

DORC I'CJ82.,

OSC
I
OSA

056QO
0~7CO

0~710
0~720

05HO

......

05140
OS150
05160
05710
0"10
05190
05800
05810
05120
05130
05140
051.0
0.151
05lU
01151
OlU'
oun
05lU
05ln 105
01151
0'''0 lOll
091"0
0'"0
0'''0
ostoo
05910
01"0
OltlO
01."0

5.··,++.1211

PAGE
ell )6
DIU.
011'1
0115 •
01l~7

1

15

01117

20

01200

10

x

1'''2
19912

101
OSAII

19911

DC
-06
OSA

3.6
ERAOR

199"

OSC

I.'

199"
I....

OVERUY ERROR ROUTI NE STAGE 2
OORG ERROR
TFM C>EK2-6.EEXI ToI2 •• INITIALIZE ERROR CHECK EX IT.
TOM C>El2+1.1
TFM 81·,.IOPA ..
SET RETRY ACORESS.
TO
IOP+12.SIOP+I2"
~OVE THE 110 INSTRUCTION.
TR
S 10P.IOP
TR
10P4,.IOP
TOil IOP·12,4"
CLEAR THE RECO~o ~IUS.
TOM IOP'+12.4
SF
lOP.' .. ,
INITIALIZE FO~ DEVICE CO~PARISCN
TOM 10P+10.0
CIII
IOP.10.90.10.
tEST If 'RINT EUO~
INI ZOIIt 1100
EIIISGI+ •• EIIISC;I+4, •
SIT UP U~O~ MUSAGE
TF
~O . . . ,IOl_Ol"
MOOI" Nap TO IUI1CH III HOLlU
I
HOLLU
oORG '-J
I
fE.lhU.,O.
MOOIFY . . . IICH
DO~G '-1
til
10P+IO,IO,10.
OUERIII111 i f A nJE e . .OR
101,12on
1111
tM
10pol.I.,IO,
'tf S -aITIR'IIIE IF I RUO.
II
'-16.1200
tM
10P-I.I1.10
1111 EUIT-U. UOO"
Ulf '" I ~RITI.
EIISGI-•• IIISGl04, ,
SIT UP UROR "ESSAGE.
HOLUR
I

"

"

01161
00000

5 •

01211
CONTROL TO WAITE ON CISK

01799
01390

01162

199n
19990

DO~G

2.
49

.-J

I"

00612
00612
0064.
00n6
00 . . .
00 . . 0
00. .'
OOlC ..
oonl
00711
onu
00712
ani..

"7"

00"1
00100
00.0 •
0010.
00116
00. . .
00. . .
00...0

DOli.
00. ."
00'"
00. . .
OOtOO
00. . .

J91U
)

-0.,2
I

"

I'

01'"
au"

-1610
00001
-1016
01116
01951
01951
00004
0000 ..
00000
00000
000110
01200
OllIS
00."
00000

II.

01610

00000

01 •••
00"'
0 . ., .
0011.
01'"
01610

OOOJO
OUOO
OOOLI
01200
000L7
01200
all'"
00000

15
16

n

II
II

U
U
II
II

'4

u

It

".
u'4

......
'4

'"
6'

It

01312
01319
015 . .
01910
01104
01016
olno
01011
01 . .7
01 . . .
01 . . .

00...

anti

ontl

·OUtO

I'

Ib:lC-IH)
OS9S0
OS960
OSHO
OS980
OS990
0.000
0'010
Oo02J
OoOlO
0.0'0
O'OSO
0'060
06010
,)6080
0'0'0
06100
06110
06120
06110
0'''0

101

C"
fF
""
8

OO~I

TOR

YfRSIO~

SUPERVISOR AHO I.C ••• T.

2

JOP.l0,2Q,10.
102.12CO

TE $T If PIT

E~SG1.~,EMSG6.4.,

VES -SET uP EUOR "ES5A(;£.

ERRCk

P~~C~

Hell f R

CORG '-l

L02

10l

c.

IOP'IO,lO,lO.

.,1
fF

10l.1i00

B

"'OlLER

DaRe '-l
C.
IOP'lO.~O,LO.
ij'I
10"d200
TF
EMSC1+4,EMSG4'4 ••
tiP'llF

10<

0~150

0.160
06110
06110 EMSGl
00190 EOSC<
062.00 E"SG~

Ooll a EMSGo

,",OllEA.I"-IOS'2,.

lOP ..... ,
0
CORO '-1
TF
EM SG 1.4 IE MSG Jt ...
8~F

IOPA

10
ONI
fFM

...

t

"'OllER.~JNOSI'

EElIIlT·12.1900,.

Ct-lU:l+ll.I~Ds.a.t

YES -SEf UP ERRCR "ESSAGf.
IE 5 f I f CUD

P"~C"

fUCA

YE S -Sf! UP E.ROR "ESSAOE.
IE S T IF .RI fE CHECK.
vn -01 YE FREE RETRY.

alan

01044
01052
OIOU
0106.
01016
01011
01100
01112
01120
01121

SET UP ERROR OESSACE.
fE S T IF RtAe 'MeeK.
NO~-O 1 SA 110 INSUUtTlON,
EX II IF NO ER.OR.
NO -GI VE TME Leop ... WHIRL.

CHCK-12
caRC .-3
CAC l.CDR,
COR
CAe 1.CCP,
CCP
OAe 1, PTR.
PTA
3. P IP,
CAe
PfP
~

o.no

EMSG 7

UAe

3. lVP,

ob221

EMSG8

TYP
OAe
PRT

3, PR

r,

Ob240

00"0 lQ982,
usc 1.1

0'2,0

CSA

OollO

IE S f IF PIT "E ACEA E•• Ok

E\III.SG1H"EMSGIIj+4 ••

(C""OL TO .RITE

CISK.

O~

U

PAGE
0090.
OOHe
00912
00944
00952
00952
009"
00916
00.11
009.6
00996
0100.
01020

01961
00952
01791
01190

oeOKO
01200
01141
00000

01961
009"
01791
013.0

OOOlO
01200
01117
00000

14 01961
47 . 01052
2b 01191
u
011.0
49 010'6

000110
01200
OIlJl
00612
CCOOO

2b

01125
00610
00000
01900
-0011
OCOOO

I~

4'
26
49
14

41

a

4'

44

)0
H
I~
4~

01191
01190
00000
OIUO
01153
01251
3 •

01127

3 •

olin

1 •

.

U1I1~

l

OII'S

)

01151

3 •

I

19982
19'82

I

CC

06.2'bu

CSA12

199"

J, I>

1.911
199'0

ERMOR

1 "Glq.~

~

1••• S

-OUl
I

5 •
J.UI>
1

-uo
uSA.

Obl70

I,'

Ob280

CSC

Oo2QQ

S TACE ;
E•• Ok "OUTI~E
••. Decss.s INVAliD ') T fIO~, t
cnq,r:, ERROR

OtdOO •

a.110
:JolZO

19996

"

H04.6, ,b,

Ob]40

1 FJIIII

a i.RNAIII ••

O.HO

f'
fu-

E~SG 1+4,EMSGll+4
H01·l.9

f

PRUGRAM NA"'EO LOAtS ANa DRIYE CODES

00611

.A~(

t.;rE n.01REcr e.ANCH.

OOUl

00640
00 •• 0
00652
00064

If;:';'-: ·-1

ub310
06]60

.

1 NIT ULILE FO. 1 LLEOU NAOE CALL.

••

0149K

00000

10
26
U

OUII
01191
0146)

-0720
01091
0000'

16
25

01461
0()247

-OlJS
OIUb
-0111
oecoo

H

012))

U

OOllO
0lU2

Z6

00Z~5

00100
OC101
00400
OCOOO
01243
00000

I;'
1620-1"300NITOR
00310
Ob 180
Ob]QO

00<00
00<10
0 . . 10
0'''0

R~A'"

"'03+o,AA02"'+6
AA02A·18.SIUP·12
bl.o;,ROIM

"CORG
RATv

.- !
88LFf+lt ••

SP IV
01

Ob4t""O

SF
IF

ObltSQ
Ob460
Ob470
Ob480
0"9~

TFM
TO
TFM

e

RtlM

OOSOO
OoSIO
06S20
OoHO RelMI
CJ6540

0.550
0.500
0'51~

ObSIO "'EMR

0'5'0
01>600
0'61~

06620
0.610
066.0
06650
0.660

VERSION 2

SUPERVISOR AND I.O ••• T.

"OLLER

.-1'" 400, •
BBLFF
t

RE AU THE TYPED NA.e.
ALLC. RE-EN JRv IF ssw ••

AA02A.16,BBUFF+ U

HX If+12

DORC .-;
RNTY DBLFF •• ,
SPTV
*-24.,.00
HI
SF
88lFf
",OP RJIIAP+ZO" ,
TF
AA04+' ."UFF+ 3
TFM 8I(P,."0'.24, •
8
EEl IT' 12
OOIlC .-1
JtMAP-l,e,n.o ••
TF
TFO
TF" 81+5,RMI'
TF
fMselH.fllselOH
HI! UPhOIO·.O
..
OH6 •• "A_-S
TF"
..OLLER
8
DORe
DC
5.0'
-000'
TOM IIDIIOI+I.9
8
.0110

"UD THE TYPED 0

NOPIBUNCH

S~I

I~

NU~IER.

TCH.

ooa'l

SET RE 'URN PCI ~T,

00160
OOIU
00110
00 . . 0
0089Z
00.C4
DC'"

81.""A'

.q 0""
01190
I.

)4
46

OOCOO

.9 olno

.
U

)4

]2

~I

2b
16
~9

26

II>

oun

00100
00101
00400
00000
00000
0123'
Jllll

01116
-096'
-C96'
01015
-on6
-0'"
00000

00000
00'"
01212
0091.
00291
0046'
01650

oeooo

00940
009SZ
oon.
009"

"
""

16
49

00962
01511
01516
01791
00461
01461
OU.O

IS
49

0013'
00'"

00009
00000

2.

02116
01610

OUlt
00000

01'11

-Oll'

OItl1

DO •• '

00100

0000.
01071
00000

oaol'

OUIZ

00.21

.-.

06610 .M"
06610
06690
00100
06110
06720
061J0 ROYCO
06740
00150
06160
06170
06710
061.Q Dcce
06100
OUIO
0.,20 f"S~IO

PACE
00616
00611
00100
00712
00120
00120
00H2
00744
00150
ocr. .
00110
001"
00111
00100
00112
00824
OOeJb

16

5

tAe

3,M ... ,

00964
00916
00914
00. . .
00. . .
0100.
DIDO.
0101.
·olon
010'0
OIDH
010.0
01060
01012
010.0
01011

06130 '"SCI I CAe.

)'~"'tJII,

olon

J I

2

),MOOt

01091

I

2

o..~o
0,.,0
0"60
06no

oo.e

.-)

TF
CNhO ••••• U".3
EUIT·U ...
CORC '-3
TFIO 11,.0111 ..
TF
,,,5G1+4 •• 1I1G20+4
TIl'I ~OJ-II.9
H
110 III 1 . . ,O'Df. II

8

B

CO TRY ACAIII IIITH NE_ 10"

NU .... II.

INI rUlllE fOR IllEGal OIlIVE C;ODE ,1111011.

."' .... 20

VORe .- 3
TO
1 EII'-' .IIUfF .0

t

1I0lle

...,

tEaIr'12
.-}

"'~IO

'''SC;20 OA'
1100

oo_c

19~e2

OS.:
I

1.1

OSA

OSAn

0

CONUOL vo

~.nf

ON DISK.

••
16

,."
••
IS

..
IS

on..

OUI1I1

01650

00000

J I

I."Z
I".Z

15

....,

1 I

2

1620-1403
0688U

CC
-05
CSA

06890
06900
OUIO
OU20
069)0
OU40
OU50
OU60
OU10
06980
06no
07000
07010
07020
07030
07040
07050
07060
07070
07080
07090
07100
07110
07120
071 ]0
07140
07150
07160
07170
07180
07190
07200
01210
07220
07230
072.0
07250
07260
072 70
07280
07200
onoo
onlo
07320
07]]0
01140
on50
07360
07170
07380

OSC
•

YOO

10M

••

BNR

••AN.

YOlA
'OIA

Y02

Y06

Y01
VC7.

PAGE

SUPERVISOR AND 1.0.a.T.
JQ712

~

fO.OR

1999~

~

I.'

I qQq~
IQQ96

-0632
I

3.

..23,CNTWO ... "
EEXIT+12tl,7
OVRlAY+IO.l,ll.

.-l3,l ..
VOIB.--25dl
e- 31.1
YC1B.--49,11

TOM

DVRlAV+1O,l.,

A
6NR
A
RN.

• +23,102+ 1St,
Y06.2,7
•• 23,--1
VOb.2,7
vo 1', ..

OORt
A
A
10
I.
IF"
,M

2

19917
IQ990

10. SVSCAl.O ••
10M QVRlAY+IO.O"
RClY
WATY EM SG 13
B
AP"'ASE+12, ••
oa.G .- 3
10
yO 7i 9 .C~T"D.4 ,I L.
A
•• <~,CNT"O.4. t
BNR EEKIT+12,2.7
10
vC 1+11,--1 t 11,

K

VERSIO~

I

EUOR ROUII NE
S flGE
MON I lOR CONTROL CUD
OO.G ERRO.
Ie
YCo+e,FSPS"
'I'00+11,IOP.Q
10
yec+e
CF
CF
YOO+ II
C.
-+titXX,110
AN I eexiT+12.1200
C.
IOP,t1,31,lO"
BI
Y0201200
CM
(OP.l. 36, 10 ••
BNI eexlI+12.1200

•AN.

YOI

.O~ITOR

TRAP PROCESSOR
re S I IF FRCo

CC~I.CL

00632
006)2
00644
00656
00661

CARD SCURCE.

OObiO

YES -IESI IF
NU -TESI IF

ALP~AME.IC
~UMERIC

00U2
00104
00716
00728
00740
00752
007 . .
00H6
0011.
00800
00812
00824
00U6
00141
00860
00172
00884
00892
00192
00904
00916
00928
00940
00952
00964
00976
00.88
01000
010C8
01008
01020
01(;12
0104.
01056
01068
01080
01092
0llC4
0111.
01128

.EAO.

RflU.

.ES -IESI FOR SEceNe RECORD IIIIA"K.
VE S -SE I I~UICATOR.
IE S I IF ENO OF JOB CARD.

'E S -SE I ENO OF J08 INC IClIO ••
CLEAR CO~I.CL RECtRC IRAP INO.
TYPE lRAP MESSAGE.
011 10 IHE MON ITOR.
MOVE INITIAL R.M.
IES I FO~ HCCNe RECe.o "AAK.
YE S -MOVE SECOND ••••
SET INOlenOR.
TESI IF ENC OF Joe tARO.

VE S.
MOVE IHE CO ...TRCL CARe TU nE
BUFFER.

~eNIIOR

--b,2

C"

.-18,JrIlCCBUF'161

RNI
IR
IFM
SF

.- 36, 13cOO
JltCCBUF.It,EA.ROR
fIiICC8UF'3,J:x,B
filCCBUF, ,2.

.

4

.- 3

.... 7, V02.,:,1) "
.'18,.+31)"
151,SlOP+1Z.2
ERROR.l,7
MCCRlJF'l,O,lO

]

17

l"I!lAlI ZE FLAGS IN BUFFER,

25'

25

n
n

14
47
14
46

14
47
21
45
15
U
45
11
H

15
I~
)4
)9
49
25

21
4~

25

15
21
4\
21
4~

49
21
21
25
JI
16
II
14
47
H

16
12

eoul
00691
C0611
00691
00688
01650
01959
00892
01959
01650
00775
01650
00411
00775
00860
00n5
00860
0041'
C0478
00000
01209
01626

e0429
01967
OCOOO
00000
-00-0
01200
OCOL 7
01200
000L6
01200
02174
-0001
OOOOJ
-0001
oe71N
-0001
conN
oeooo
CCOOO
00102
00100
00000

01125
00927
01650
01127
00471
00975
01001

0217.
02174
-0002
0092P
00001
00~27

-0002
OC_
-0002
00000

00~99

01001
00816
0105~

00927

01038
-0151
00612
nool
01062
01062
01056
13004
1)00]
HOOD

OlllO
-COOl
000-0
-0002
JH61
01300
00632
0-000
00000

010~~

Ii
162e-I") MaN I lOR I
07390
07400
07410
074Z0

••
CF
AM
C.
6NI

07430
014"0
B
07.50
OORe
07460 E.SGI3 OAt

07490

SUPERV I SO. AND I.C.R. T.

v07"6,1

va 7A'6, fIICCBUF' 160
YC7A.1100
VOlD . . .

PAGE
Oll40
01152
011 . .
01116
01188
012eo
01208
012e9

V01A'6, ,6

GC 10 TYPf-OUI.

.- 3
a,rRP EAR'.

TA.P ERA.

07470
07480

VERSIUN 2

YC1A+b,l

CO~IROL

TO .. RI TE ON CISK.

19982

) .6
ERRCR

19~95

07520

OSC

I.'

19995
19996

07530
015.0

SPS ScPERvlSOR AND RELOCATABLE LOAOER CAllER STAGE I
OORG 0
TFM OlDCY+l,MCVl.1O.
ItE STORE ~ONITOR .DOUlE CVLlNDER IND.
DETERMINE IF NON-TItA DISK LOAD.
07560
B"F lC 40 l,OLOOA' 6.,
IUM LOJNPT,O,l1.
YES -SE1 INDICATOR.
01510
TR
"OVE WORK I NG ODA TO COMMON SLOT.
07~10
OIMENT,"APENJ,.
NO -TEST IF SPECIFIEC LOAD ADDRESS.
07590
BNF .+24,CNT"O+7,.
IF
... , C .... CNT .. O.l1"
.E S -MOVE IT I NTO ThE ~ IGH INDICATOM.
07600
IRANCH IF TU CAll.
07610 ~CAOI BNF LCA06A,LDINPT ••
LCA04,LDJNPT,.
TEST IF CALL FOR DISK LOAD.
BO
07620
TEST IF CAlL FOR SPS SUPERVISeR.
BNF lCAC6,MAPENT+ll"
07630
FSPS •• ,
.£5 -SET flAG.
07640
SF
TEST IF eAU FOR SPS 'SUPERVISOR.
OlUO LClO. INF LCA(w.,FSPS ••
READ SPS SUPERVISOR INTU CORE.
01660 LCA02 IF" 101., •• 2), •
IOGT,~eA08,7
07610
B
IF.
101I,e+21, ,
RESTORe M" TABLE AND EXECUTE SUP.
07610
IOGI.LeA09,7
I
07690
TEST FOR SPECIFIED ENTRV ADDRESS.
01700 LCA06 ANF ·.24,DIMENr+14, •
DIMENT+U,DIMENT+U .. VES -LETS PLn BALL.
IF
01710
OLOOA,LCA07,.
LOAD AND EXECUTE SaGE 2 OF CAUER.
01720 LCAOU IR
OVRLU+12
017)0
I
DO.e .-4
01740
0 ••• 1
07150 LeA07 OS
DSA DSA16
01760
075~O

01790
01100 LeAOI

8 x

5 x

19987

OC
-06
OSA

017.0

11
I'
H
49

00000
00000
00012
00024
00036
000.1
00060
OOOlZ
00014
00096
00101
00120
DOU2
001.4
00156
0016.
00110
00192
00Z04
00216
OOZ21
002U
00227

J9777
)

5 x
-0612
I

16
44

15
JI
.4
26
.4
U

.4

J2
.4
16

u

••"
.,
49
26
Jl

02U2
00012
004Z.
00402
00012
0043.
00Z04
00120
00110
0042'
00110
00565
00566
DO'U
00'"
00204
OQ415
00441
00410

Oa2U

OSC

It'

OOU,
00U6

-0000
1

DSC

2,22

00l1l

Z

It!

-0179
-OZ45
00416
00420
002Z]
00000

J9767
1

0

Z2

-un

0

00227
oono

.

OOORI
00447
0000021.4
02117
Ollil
00421
0042'
all 57
00000
00429
-0155

,

It)

DC
-0]
DSA

-0001
ocooo
-0001
J3i60
01300
00000

1998Z

07510

07170

])

01134
011).
01134
0ln4
01121
00160

t

OORG 19982, ,
OSC
101
I
OS, DSAI'

19981
19990

07~DO

11

, x

II

1620-1443

~O~IIOR

I

¥H510H 2

SUPU¥ ISO. AND I.C ••• T.

OSA

LCAO

00243

,

01120

OSC

I,'

C02H
002H

-02U
I

01130 L CA09

esc
2'

07840

CSA

a II~O

OSC

07160 LCAOZ_ OSC
I
OSA
a 187G

2, -IZ

002H

LCACll

002'1

I,'

00251
00252

1.1

00251

OIACZ

0188~

DC
-02
USA

5 I

00258

5 I

OOZ61

ICC

00Z66
00266
00211

-0100
5 I

OOZlI

-2"3.
I

eSA

SI.PE~T

01~10

OSC

I,'

01920 LCAO)

csc
1

'.I

Ul'Hu

O~A

C S'~O

00211

:3. SC

00218
00261

SYSGRC-2

00186

I,'

00286
00211

oc

01940

J9616
3

),2

01~00

,

I

-02U
I

002,.
07890

19

"'liE

01810

5 X

OOHZ
OOZI]

5 x
JI024
)

- '0

a SA

O19~0

csc

01~bO

r;ORC l'i1'U2,
esc
1.1
1
OSA OS'I~

01910
01980
01990
08000
08010
08010
08030
08040
08050
08060
01010
08080

......

CC~TRCL

TU oRITE eN CIS ••

5 •

·1

-2400
I

19982
19912
1~981

DC
Jd
-0)
DC
6. C'
-0000 •
RELOCAUBLE LOADER CALLeR s IAGE 2
DORC 0
R~F
lc.etZ,,,"oINPT,,
8RA"CH IF TU CALL.
TF
SAVE POSSIBLE RHURN ADDRESS.
C~T""O.b,HAl Tt&"
ltBC1.LOINPr. ,
lUNCH IF NCN-DISK LOAD.
80
Tn_ SKrn+l,9,.
I) I SK -CO"PlTE PHVS I CAL OR IVE CCUE.
TF. Sk04l, •• 20

5 X
J918)

19911
19990
19996
oeoco
00000
0001l
Oe02.
000)6
00041

)

.

-

l6

00200
02116
000'1
0170"
02143

.9

01~'6

00000

25
U

QU.Ol
02176
02164

021.'
OOSU
02014
02164
00'"

H
H

U

C0421
00462
00421
00009

-Don

I !j
1'.le-I44J .ONlTOR I
utt090

U810G
08110
08120
08130 LC801
08140
08150
00\60
06110
OSI BO
01190
08200
OBliO
08220 LCB02
08230
0"2.~

0"2 so
08260
08210
08210 LebO.

08290

"DORC

.-

V1

.... 7

,

,nl7

J'U5

""0

1

I""

6

x

oeoco

00000
0001l
00024
00016
00041
00060
OOOU
00014
000 . .
00101
0012C
00132
001 ••
OCI56

21
21
21
U
U
]I

"

26
II
16
U

16
49

esc

I.'

094QO

esc
I
OSO

1.1

0016.

eSAC9

001"

00462
-OOOJ
C0047

DOOl!
00047
00071
OOOU
0004'
0022'
000.'
00U2
00253
005.,
C0520
00565
00566
2

-oou

00211
-COIQ
coooo
00.62
02170
-0131
-0261
-01S5
-015'

5 X

00162

-0164
I

00162
OOl6l

09.80

0950~

5 •
J9744

00169
DC
-05
OS.

3.5

0011~

1

OQ520

A800

00117

5 •

OQ530

OSC

I,'

00117
00111

OQ540
09HO UOZA

CORG 22'
DSC
32.0
OC cocce CeooooOOOOOOD CDC CCC Cc eeoo
OSC 2.02
02
eSA "1

09~IO

09560 lA03
09510

1620-1443 OONI TOO I

J090l
I

DOll'

00229

3l

00261
5 x

00267

23

VERSION 2

S~PERV

-026'1

OC267

ISOR AND I.O.R. T.

PAGE

09510

esc

I.'

·00261

09S~0

osc
I
OSA

101

00269

0~600

14~C

002H

,
-1.00

).10

0'027.
00211

UQ620

os.

SYSORGo.500

OC212

,

Oq630

OSC

I.'

00282
00'13

JO.02
I

OQ6.0 "04

osc

1.32COOOO·

oq650

esc s,o'
0000'
OORG 19QIZ.
OSC 101
1
OSA OSHO

09610

DC
-10

U9UO

COHRO~

10

~RITE

....,

ON DIS',

1"12
19. . 7

0 . . 10
09160

OSC

.......

O'71U
0'720
Oq710
097.0
0'750
oq760
0'710
09710
09790
09800
09110 MtAOO
0 . . 20
09130
0 . . . 0 MCAO.

•

.

.-.

onco

DU

DDA TO $AU
DF

01S~

tau all

I~'H

C"UNOE.

. StRATtH AaIA

sysa·.G·l~a

JU . .

I....

6

00000
oooeo
OOOU
00020
00020
00011
000. .
ooon
OOOtl
000 ••
OOon
00011

1

I.

••

02U2
00100

000111
00000

16
16

00462
00510
00201

-o.n

00250
Oa·02

OOUa
00000

....
.

-2902

00000

ocon
-0079
I

00079
0001.

5

000"

,

10092

Z"

5 l

1. .17
.... 0

00 on
OOOli

I.'

09170 "CACOA DSC ltOu
0
S, 140O ••
0 . . 10
DC
-1400
0 . . .0
ltln
DC
Jl1

3

001'2

3,2
CC
-02
6,0'
DC
-0000'
MONITOR CALLER SIIIROUfiNE -ALSO PROCESS n AfTIIIlIIS TO THE
OoP SlPEAVISOR FROM ITS CALLS 10 THE R£lOCATABLE tOA!JU.
DORG a
TFM OLOC't+l.MCYL,lO,
SH CYLINDER POSITION.
MCAO)
8
OO~G 20
IF. ~A~T06,M.OOO, ,
SET ENTRY TO TilE OONlTel!.
TF_ IN IOU. """000 Il, 711, RES TORE aVAlAY ROUTINE un.
8
MCAOI
DORe ·-3
ANF MCA06.HALT"
leST IF ~ONITOR AlRfADY IN tCRE.
YES -BUNtH DIRECTLY TO IT.
"1000,. ,
CORG
ose 2.2
02
OSA "CACOA

09690
0'700

x

D02U

)~OOOOOt

091>60
091>70

n

•

00092
CO~IROL

3,1

DC
-01
OC

"GE
000 . .

.1

2.

162t-I443 MO~ITOR I

esc
09920
09910 MC~O)
09940
09950
09960
09970
09910
09990
09991
10000
10010 MCAOI
10020
100)0

1,

JFM

SUPEAVISOR A~D l.e.'.T.

AEPlACE ANV SYSCAl A••• BY O.
TEST IF O~P CALL.
yES -SET SYSCAl AETUA~ COOE.
SAVE eOR[ FOR T"E DUP SUPERVISOM.

10 ...... 21 ..
10ARC .MCA04.1

TFM

10)1., •• 23, ,

8

IOGT.MCA05.1

TFM

~'l

TA

OlOOA ••• l9, •
OVRLlY.OSAOI ••
],4

a

OC
-04

lOAO TME OlP SUPEAV I SOA.

'+b,CHK".12,.

10040

DC

10050 MCA05

-0000'
DSC
).220
220

SET UP EXIT AFTEA 'ESTOAATIC~ CF
AESTOAE AAITM TABLES A~C exECUTE
.CNITOA OA OUP SUPEAVISOA.

Ta8~ES.

00241
00250
0026a
00216

lalla

TR
OlOOA,.t19 ..
RHO IN THE "CNITCA PLUS T.. E 10Rr VIA
8
OVRlAY+!l,DSA06 •••
TME OVAlAY AEAO AOUT INE.
DC
3.10.
JO.
DC
6.502'
-0502 •
CORC lQQ82 ..
CO~TAOl TO wAITE O~ CIS ••
DSC
101

lalla

I
DSA

00415
00000
00415
00005
-Dill
-0011

-oln
-Ol41

-14l0
OOl21

I""

11

00a69

1. . . 0

U

..

00212
U912

Iqua
5 X

DSA 19

DC
-0)
DC

10150

OQ.15
C0052
00475
00165
oo.ao
00."
00"6
OOUl
OOUI
00461
3
6

DC
S. 13'1'.
-119'

10140

oou.

6,0'

10010 MeAOI>
10010
10090

10110

I

OOICO
00100
00112
00124
00136
001 . .
00160
00112
DOli.
00lt6
00201
00220
00n4

10060

10100

-HOl

aDDU
00095·

I

DORG ICO
R~R
•• 24. SVSCAl t.
TUM
SYSClL.O
8NF
"CACO.SVSCAL ••
TOM
SYSC'L,5 ..
8

VEASIO~ 2

),3

b,O'
-0000'

1011>0
10110
10180
10190
10200

MONIIOA

-"AIN ROUTINE

CO."~NICATION

SEtrOR ASSE"BLED PARA"ETERS
DC
I'.t· .CO""+18.
HEADLESS DOA-S FAO" SPS AND FOAlAA~.
-OOOOCCCCOOOCOOOOO'
oc
2.8.eO .. "+41.
STA~DARD SPS MANTISSA LENGT ...
-8
DC
2.2.eO .. "+43,
STANDAAD SPS SUORUUTlNE SET.

10210
10220

-2
102)0

19

Ol . . 5

DSC

I.O.CO".+'"

STANOAAD SPS NOISE CIGIT.

02146

DC

2.8.eo.".....

STA~OARO

FCURAN MANTISSA LENGT ...

021.,

FORTAA~

02150

a

10240

02120
02841

-8
10250

DC
-4

2 ••• eO"". . 8.

STANDARD

10260

OSC

1,1,COMtIII.o49,

NU~8EA

OF

FXC. PT. WOAO LENGTH.

~ODULES

IN 1620

02151

SYSTE~.

I

25
1620-1443 'ONITOR
10210

",Q,"CO~fIII,

OSt

VERSION 2

SUPERVISUA AND l.e.R.T.

'ONITOA STATUS INtICATOAS.

0000
DC
2.1."CO'... 5
-I
CC
2.0."eO""+1

10280
10290

PAGE
OlB52
Ol151
02159

-0
10300

DC

-0
10310

2. a .MCO""+II

OC

-0
10320

02 •• 3

OSC

1,0'''CO''''+12,

LE 60EUF SuA LE TOIT.

02 •••

OSC

1.5.COMM.13..

PRINCIPAL INPLT DEVICE CARD

Oll15

o

10)22

Ol •• 1

2.0."eo'....

5
10)21
10322
10)21

THE PRINCIPAL INPUT DEVICE ~UM8ER WILL BE 5 FOR CARD SYSTO
ANC 1 FOR PAPEA TApE ON SYSTE" DELI VERY.
DC
10I.CO""+16.
OB~ECT SYSTEM SIZE

Olnl

J

10))0
10)l!

DC
5.0.COMM+88.
-0000
DSC
100.CO" ... 13.

LOWEST AOORESS LOADEC BY LOADER.

02190

FORTRAN SUBROUTINE SET

oall'

I
10340
10)50
10)60
10310
10310 •
101'0. •
10400 •
10410 •
10420 •
10430 •
10.40 •
10450 •
10UO
10.10
10•• 0 •
10.90 •
10500·'
10'10 •
105ao •
10510'
105.0 •
10550.
10560
10570 Maoeo
10SIO

lana

10600
10UO
10620

lana

10'.0

DC
5.0.COMM+93.
-0000
CC
5.0.COMM+91.
-0000
o~c

CUUE~T

LOADER RElOCATION

tARO SEQUENCE

NU~8ER

FOR

INCRE~ENT.
LOADI~G,

02195

02900

1,' ,CO .. ,..+99

02901

COLO START ENTRY TO THE MCNITOR
THE FOLLOWIN~ I~STRUCTICNS MUST
340003200101
'600OJ200 102
.902402X
"'6J6IlJOOI02

8£

-CLEAR STORAGE.
LOACEC INTO O.

T~EN

IS THE .. CNITOR CONTROL tARO SOURCE -

WHERE
-I
-3·
-5

TYPEWIIITER
PIT RUDER
CARD AEAOER

IF ANY OTHER CIGIT IS SUPPLIED.
THE "ONITOR WilL. ASSU~E THE
VALUE I ITYPEWRITERI

AND ~~ERE
Y IS THE Dill VE CODE FeR THE pttYSIClL MOCULE
ON WI. t.
CLUR FL'GS FOR COLS. 4.S
12540
DaRe
12550
DC
2.e
-0
3,0 I I
12560
OC
-0'
12510
CF
"'ccaUF +8
CF
12510
.CCIUF+IO
TO_ "'001.0
12590
12600 •
OEcaOE CUNIROL CUU TYPE
C
12UO
fIiICC8UF+11,""'CZ.,. •• TE S T FOR -JC8- ClAD.
12620
81
"JeOl,1200
12630
C
.CCBUF+l1,""Oh6. , IE Sf FOR -TYPE- CUC.
12640
8NI MCROStl200
TO. MeU",1II+3.1, ,
126SC
YES -Sfl INCltATOM.
aT. UTO~ •••
12660
GO TO TY'E·a~T ROUTINE.
12670
8
MCROl-12 •• t
co 10 REAO .NOTHER tARO.
12UO
DORC .- 3
12690 "CkOS C
"(CaUF *11 ..... 0 ...... , t TESI FOR -PA~S- CUD.
BNI .CRC5&.1200
12700
12110
YES -CO 10 TYPE-CUT ~OUTINE.
BT" l. TOt . . .
H
12720
AFIER START. ~UO ANOTHER CARD.
• CRCI- 12
12130
e
121<10
DORG ·-3
"CI(01-12 ... ,0) ••
RE-Reao IF IN JOD CUD 5E.RCH.
127'0 • CROSA "0
12760
8T- \.. 106 . . .
GO TO TY'E OUT THE caRD.
12170
80
JIICROl-12'''001. ,
RHU NElT CAlO IF FORCEU CO~~ENT5 tUD.
TR
I21BO
COJII ... 22.IREC"
INIIUULE SPS ANC FORTMAN PRCCESSOR
TOM CO ..... )9,0.11.
12190
C~TPUI fiELDS.
12100
TO
CO .. IIII,"REC

,,,0 •.

.- .

...

TO
TR
TO_

11810

12820
12830
1l8ltO

H.

128S0
12860
12B 70
12aBO
12890
12900
12910

TO
C
"I
C
81
C
81
C
81

12~20

12930
12940
12950
12'60
12970
12910
12q90

SFO INT ,flleo,.",.)
COM ... 7",KREC ••
COM"'.82,O.11.
~

0lSA8LE COM. SECIOR INOIC'TORS FeR
5'5 'NO FORT . . . SU8ROYTTM Lcaous.

lGti. SYSOAG

J116221).1,.CROll
MCC8UF·ll .... 05.b"

O.. ~H
O~.. U
OHIl

IE S I FOR -FOR- CARD.
TE 5 I FOR -FaRl- CARa.

.F 10201200

OH92
0 .. 50 ..
OHI.
0 .. 521
0 .. , .. 0
OHU
0 .....
0~'72

04572
0~5I~

0""6
0460.
04620
O.. U •
0"621
0 ..... 0
0'052
046"
0 .. 67.
0 .....
04700
04712
0472 ..
04716
0414.

C

MCCRUF·'l, .... O'.b ••

TE S T FCR -CUP- CiRO.

e.. n.

BI

"OPOl0l200

C

JIIcceuF+ll, .. fIIlO •••• TES I FOR -IEO- CAlO.

0 .....
041.0
04 . . 2

"I

.100 I 01 200

C

MCCBUF+ll ..... ll+ •••

81

.XQC2.1200

TEST FOR -'EOS- CARD.

O~.O~

0~91'

31
1020-1443 MONI TCR 1
13000
13010 MC006
130Z0

r,c
xx

osc

13030
130"0
1]050
13060
13070
13080
1)090
IHOO
IlllU
11120
13130
1)1 .. 0
13150
13160
III 10

8
OS

_CROIA OS

VERSION

SUPERVISOR 'NO l.t.R.T.

M(R a1"12. _,caUF. L, 1. cn"fIII~ NT S CARD
O • • -It

2,

-GC TO READ NExT (NE.

)(X

1.'

11

0.011

L5

04621
09140

"9

OJL~2

HOO'
091 .. 2
1300'
11007
00000
00000

n

1300'

00000

n

11001
I JOIO
09H2

00000
OOCOO
oecoo

1)011
0 .. 9H
nOI I
0 .. 572
021"

09191
01200
09905
01200
00001
-0000
OCOOO

u
U
U

O~~~~

o~u.

0 .. 928
04935
04941

J]

I'

...
H

2 ..

.,
H

15
11

0'49~

0"056

2~
~7

...

\JOII
0 .. 61.

17

O....~

4~

O~O,.

.. 3
17

o.. os.

H

H
is
J\
lS

J\

"

...
...
.
.
.
16

n

20

2"

lA

24

2.

z~

~.

H

0991)
01100
-0000
00000
OCCOO

00000

09841
-0000
09142
09170
0000nUl
O,US

0 ......
0 .. 0'.
Oll24
02141
Oll02
00 .. "
02876
Ollh
00414
040'0
1)0 II
06198
1)011
0621.
\Jail
0"'0
11011
06570
IJOIL
0610.
UOIL
06910
nOli
0.942

0910.

coooo.. .,s

-240l
09~11

01200
0992.
01200
09911
01200
09 ... 5
01200
0995)
0120l)
0"61
01200
09969
01200

PAGE
040S6

J]OOI

°2

0494.2

O .... CROItA·U

0'455

a

J08 CUD PROCESSOR
.J801
"JH02

81.
8 T_

lJT07",
LT06 . . .
FO, •• 2) •• I
UTIO,MJft02 •• 7

GO TO J08 CLOSE OUT ROYTI"E.
GO Ie CUNIROl REeORt TYPE-OUT RCUTINE.
OEtODE cal. 1.

."F
.• N.
8NF
14J80Z' Ra

MJ803,F4. ,

.UST RE-REao If ANY ERROR.
EXIT IF R.~.

TFI<

fO,fitJ80], ,

H.

"

MJ830.Fl.,
MJ80 ... MDOl
J11J8C38,JIICOO1"

0~"2

050~O

8
L T ICE
OORC .- 3

.JB02'

osc

0'052
05060
05060

.. ,OlOO

0100
OC
201
-7
OC
201

IHBO
13190

0''14.
0.,.,.
04961
0 .... 0
0500.
05016
050ll

,ROCEEO IF PROPER OIGIT.
NO -TYPE ERROR .ESSAGE.

11
IJ
U
~9
~.

H

4 ..
'3
16

4'

-COOO

OI1IZ
01494

-oeoo

0'13'
05074
OolSO
05142
0'130

-"991
·'060
0 . .02
0,'99
09742
10690
-5074
OCOOO

on ..

on ..

09U2

0'065
a' an

-1

as.

13200
13210
1322u
U230
1)240
1)250
1)260
1)270
112.0
IJ2'O
1)]00
13]\0
1)]20
1)))0

OSC

IJ)~O

nno
1JJ60
UJ10
UIIO IIJUO
UI90
1).. 00
U~IO
IJ~ZD

IHlQ
U.40
lJ'Ito

" . .0
UHO

MJ002X+ II

0'012

I ••

05012
050n

"JaO] RCTY
.J80lA TO" MCO"'"+),l, ,
TO" 111101.1.11.
TO .. I'lCOflli'M.O"
8
MCAOli 12 " .
aoRG .- 3
IIJI038 TO
"'0""+3,"'02,11
MJI10 •••
"JIO' SF
SF
.. J815
TO
"J811+Il.COMMH'

TO

"JI20.',CO"M+~'

T014
T'"
TP ..
TF ..
Tf"
IN'
If.

MJIISh\l, I
"JI U&+.,«OIl ... ,
11.1117+11.4
IIJI50US ••• 10
"JUS&+S, 12, 10
.. .1.12. . 12 ....

8
fM

uno,MoInaa. ,

....'N'

Cf

U

•

00'"

I'O,."Z)"
"J'12"·1el~,

"J'lJ.20 .. '4~ ,
.."4,MCOlt (i
NJll0".
14JU5
OIJIUHLZ

CHANGE SOYat£ INOlt.uoa.
INDICATE JOI ClltO SfAaCH.
INDiCAtE JO. NOT IEGU~.
GO TO C~TL CUD AUG s.uPE.vuoa.
INITULIlE TO scaN REMalNOU Of CUD.

05074
0501'

050 ..
05110
o,uz
aUla
05UO
0'1~2

O'I'~

0""

5 I
-50n
I
]~

IS
15
IS

,.
J5
II
J2
II

olln as
01110

DUal

SIT ,uoa UTua" SIIIT'".
CHICI '01 ANY lalOl.
TIU . , " . 0 'INUHlD.
liS -110 ,unH'. stAll O'flILDS.

on"
DUll
osa.o
OUU
01176

ou.,

32

OliU
06056
OIlSS
012'0

on"
olin

0.0I~

Ott..
011'1'

""" D.".
, 01""
''''1
0.'"

U

it

0....

OIU•
OIUI

0141.

O.HO

OIU.

..... •• .....
o.n.

0''''

.-]

I'
It

00000
01155
0 ••• 1

.... .....
..." 01."
OUI'

IGNOU tllll"O~ CUD 'IUD., StAN ov•••
DICOOI ,untliT DIIVI IClUT¥. FIELD.

JI

OHn
OH"
au . .
OHIO

04112
04114
0"1"
0 •• 01
04120
04112
O. . . ~

IE ST FOR -SPSI- CARO.

• SP02 .1200
fIICCSUF·11 ... fII07 ••••
MFTC1,1200
fIICC8UF.11,fIIfII08+6'f

OH~.

o.. no

TEST F CR -$PS- tARO.

.SPOI.1200
MCC.SUF.ll.fllJII06.6, ,

"GE
04)1'
04)11
O.. ~OO
OHI2
OHH
OHJ6

II
II

Dlno

00102
00001
OOOOJ
00000
00000
on2;
00000
00000
oznl
ozu,
00001

-un
-OOO~

000-.
000.11

Ota.o

-tan
-6"0
00001
o_a
0".2
00000
00000

0000 •

)2

1620-1443
11410
1]41190

I ),eO
IHIO
13520
13530
13HO
13"0
13560
11510
1)'80
13590
13600
1)610
13620
136)0
13 . . 0
1)650
1) . . 0
13610
1)"0
13690
1)100
13110
13120
1)1)0
1)140
13150
13160
1)170
IHIO
13190
13800
13110
13820
13130

BN'

~J

B 11

MJBI2

C.

8.1
TFM
B
DaRe
JrjA T y

~ONI

TOR

VERSIUN 2

MJB12"*12,IIIOOl ••
"'F02.lX.610.
.Jb 130 1)00

NO -TYPE eoReR MESSAGE.

FO,·.20"
LT 10E
.- J

...

~~Il

RC Tv
H
BN I MJB01.400 ••
lolA T V
~JMllA

"JBll

RC Tv
Nap "J815,t,-20 ...
NOPIBRANCH Sol TCH.
TF
MF02,MJB 1 U*b I U 1 t .AllOIII THE ClC EQUIVALENCE TO SUNO.
B
MJBIU+12
OORG .- J
COMPUTE PHYSICAL CRIVE CODE.
"F02 , MFOZ.bll,

,.

"JBllA TF
A.
TF
"JBI5 'N'

TF_

B
10"
BN'
B'~

TO .CO~" EOUIV TABLE.
MJ8U .... 6,Eeu I 'I-"CO"'"-4 I. Move TO I aRT EOUIV TUlE.
MJ8l)'+6,MF02,bl1
"US 15'-20,.,.
TEST IF R. ~. 'lREACY ENCCUNTEREO.
FO,·.Zl ..
NO -EXTRACT CURRENT PAC' NO. FIELD.
ll(.~F02,211.

",TIO,IIIJB55.,7

8

"'JR 20

·'2C.MJ811A+6.11,

.-

~EAO

MJ82l,XX t lO,

lOXX,.'23
IOGT,MJB22.1
MJ.8l7,JIIIJ815.,
MJ8 Il,NOOI.,
MJPll.F4"
14CC'i" ,
14009,MF02,ll
MJU 17, 1200
·'23,MJB23 ..
t.. TO 1. xx

\oj

NU~ltR.

PAC K NO.

E ~RCR. -GET "CCUlE NUMB EA.

1III~16+1§6.UTOl-2

1 ]9JO

139'0
139S0

RelY

119bO

H

1]97C
13Q80

HNI

RelY

MJB1'.iA,40Q"

INAT Y IIIIJIII)I •• ,

.R T"
SF
T'

.

)9
14

41

)9

H
.1

26

00100
OOIOZ
oeooo
00.00
00100
00102
oeooo
O".M
00000
091ZJ
000-1
0912J
-O1]l
on2J
05514
-5609
-6184
00009
09602
09T42
00000
0'54M
00000

45
)J

05658
05514

as".

43
49

as".

0~618

...••

06114
00565
00500
05030

05150
05162
05114
05186
05198
05810
05822
05834

05906
05918
05930
O~94;2

05954
0~966

.9

10035
OOCOO
00000
0.014
10115
00000
0.658
0912J
05 •• 0

0~.46

058Q,,-

READ I~ 01" 5ECTa~ ,c~ '"IS laCICAL
_aDUlE '~O _aVE SECTO" ACoRESS FOR
THIS PACK TO P~OPE~ 01" ENTRy •

LTD'S, •• "
1"CCO".
U 105-1, I)"
L;TOS-l.1400"'d)

••

0'.9.

0912J
OUI.
09"1
09.82

091ZJ
0912J
-0000
0 ••• 4
0554"
0.15'
09.9.
09111
0548)

05858
05870
05882

"AI T FeR OPERATOR.
RE -RE AD PACK NO. IF SSW4 OFF.
TYPF CCNOI T I ON IGNOREC _ESSAGE.

4J
16

091.Z
000-0
01300
-5'10
00000

ZI
II
26
II
16
44
16
49
U
U·

05846

"'''' 17+78,/111"]3'20

44
I'

0.,e6
0 •• 1.
05'1.
05526
05538
05550
0'562
05514
0'516
05591
05610
05622
05614

0~1]8

TF

1)990
1'000 MJ1317
10010
100lO

a••••

05090
051e2
0511'
05120

IGNORe CHECK IF E_O OF CARD, OR
8l'~K F I ElC. OR
IGNO_EC EAROR I~ FIELO.
CO"-PARE THE PACK Nu,..eERS.

"'''''1 7' l2,flllflil 12' t4
wA Tv "''''17

11,0'30

TRACK CONrA I ~ I NG PAC'

A T 't' 101M 16

"

0')54
OB . .
OH7I
OH.O
0'.C2
05410
0'.10
0'422
054).
0".6
054'8
0 . . 10
0"12

05610
05011

)

TF.

RI
TO
B I"
TO

SE T Swl TCH.
CHECK FOR ANY ERROR.
NO -TEST IF CARO FINISHEO.
YES -NO FURTHER SCAN OF PACK NC. FI ELos.
SKI P TO ENC IF "OCUlE NOT ATTACHED.

t ,

R
BN'
ONF
•• F
S,
(

~OVE

JltJB 12'+1.9"
MJ812+20.F4, •
·.2 ....... 001 t t

"J8tS.

"JetSA TO_

13850
13800
13870
1)180
13no
I nco
13910
13920

MFe].1.610

CF
Bo
OO~G

13140

.AIr FCR OPERATOR.
IF 1\0 SS'MI4, SOURCE CHANGES TO TYPE.RITER.
INDICATE THAT CONDITION IGNOREO.

"'"31. t,

PAGE

SUPERVISOR AND I.e ••• T.

I GNCRf A BLANK.
NO -CHECK I' olTHIN CORRECT RANGE.

IS

16

49

l2
24
46
25
11
25
19
26
J9
26
34
48
41
)9

34
11
)2
II
2.

0~410

06026

II

000-0
-511 3
-6126
0551'
091'2
09602
00000
0972J
01200
0613'

0~.30

0'030
1.005
1"009

05HO
05109
01958
10021
09911
10101
10035
10 II 3
00000
00000
05618
10315
00000
08350
14000
0834Q

-"noo
.,

0,
001("
IOH5
oe 100
10 . . 1
00102
00000
00'00
00 100
00102
-oeoo
00000
-0005
1'004

08) .. R

33

1001i
1"040

1'050
10060
14070 MJB10
14080

I'OQO
10100
14110
10120
10130
14140
10150
14160 MJM21
1'110

.".-

l620-1 ..... 3

MO~I

TOR

UTOS-I,I,610.
MAPENT,TEMP-5 ••

I

VERSION 2

SUPERVIsa~

AND 1.0 .A. T.

ADD I TO SEC TOR ACDRESS •
.RI IE II BAC. CUT CN CIS'.

PACE

IORBC.MJ821,1
S_
·+8.\,110.
EXIT IF All "OoUlES FOR THIS
BN I MJIBO.l10Q ••
CCNFIGURATION PROCESSED.
MJH 13A+ 6, MCO"'''''-fQU I Y+6
/IIIIJ13ISA+11.2,lO
""JB 17+11,1
MJB50A+5,l.lO
MJB!:')A+S,5.10
R
MJIi 10, ••
REPEAT FOR NEXT lOGICAL ~OOUlE.
DORG .- J
osc 1 t 2 2

OSQ18
05990
060C2
0601.
06026
06031
06050
06062
06014
06016
06091
06110
06118
06111

2l
OS,

LTD58

0612.

TO

IO)()l~,,·+23

8

.-.-.."••

1.180

OSC

I.'

06124
00125

14190 MJB22

esc
26
OS.

2,26

06126

1<0200

"J823

06132

14Zl0

esc

I.'

061)2
06133

1'220 "J8B

OSC
I
OSA

101

0.n4

14230

198eo

061lQ

3.20

1.250

DC
-20
OS,

06119
06142

140eo

06141

14260

DSC

I ••

14240

TOM

MI03,O, •
8
MCROl-12 •••
DORC '-3
OSC. 4,0100
0100
14310
OC
2.0
-0
14320
OC
201
-I
141)0
OSC 6,0'
00000'
16140 IIIJ855A OSC '.0100
0100
14350
DC
2.0
-0
14360
2.5
DC
-5

14270 MJ&lO
1.280
16290
14)00 "J 850A

11
25

16
.9
12

41
II
II

11
11
II
49

S X

5 X
-on.

I

s X
J~800

3
5 x
HOOD

I

06141
06150
06162
06110

06110

I~

49

091.1
04056

•

061 f5

06111
06111

3

'I

000-1
02014
-6025
-6118
-00-1
01100
-e135
000-2
-0001
000-1
oeo- 5
00000

-8461
I

061~1

OISASLE J08 CARD SEARCH.
CO READ ANOTHEA CNfL CARD.

083.R
021U
00565
00520
06034
06150
055 . .
05689
05941
06115
06189
05250

0611.

0

06U.

2

061'1

2

00000
00000

34

1620-14H • 0101 TOR 1
14370

......

14110
14no "SPOI
.B
14000
• +·20
OORC .-)
14410
14420 "SP02 TO. MCOlt'Mt' , 1.11 t
144)0
10. 1liiie.
14440
roM "CO'.+·\2,5
IF. FO.··2]"
14450
14460
B
UT1C,MSP05A,7
14410
TO
•• 2],$FOIlliT ••
14410
8C
"20.oCaOI
14490
8
\.iT lCE, ••
OORC .-)
10500
8NF MSPO),F I
IHIO
~NF
IH20
Mspel,_COIIIN·l ••
IFM FO.··2l ..
145)0
14540
B
UTIC ,-5'058 01
8Nf MSPOloF I
14550
IH60
IF" FO ••• 21,.
14510
~TlO,MSP05C,T
B
8NF MSPOloF I
14510
IFM fO.·.2)"
14590
~TlC,.SP050,l
141>00
8
JIIR02,SPSOOA. t
146\0 OSPO) IR
BNR MSPC4,MA02. t
14620
TF. POINT,., t
146)0
14640
8
"80eO'

0,.,.. 1••

OO~G

146~0

VERS ION 2

SUPERVISOR

A~D

14 . . 0 .SP04 TCM
~
14"0
OORG
14"0
14690 '" SP 05A OSC
0101
14100
DC
-1
1411 C
ec
-I
os.
14120

OU"
OUIO
01>211
06211
06110
06H2

SET SPSl EhTRY IND.
INDICATE PHASE B!CUH.

o,a.

OfCCUE tel. 1.

OU . .
06UI
06290
DUel
06110
OUIO

TEST IF LEGITI"ATe.
NO -Kill THIS PHASE.

Dun

TEST I~ SPS. c.Re.
YES -OECOOE eelS. 1-'.

ol>n.

OU"
OU"
OUTO
0611l

oec CDe COL. 10.

061'4
0'-06
DUll
0"]0
0"'2
0.-5.
0'-66

DECtDE COL S. 11-12.
MOVE DDA FeR SPS ASSE.elER.
TEST IF VAllO.
NO -TERMINATE CURRENT PHASE.
SE T

SYS'~l

oun
Dun

CCDE.

M80t 1+12
.-4

06"6
0649)

4.010l

ou"

2.1

O.UI

2, I

06500

SF!) INT

06505

U
,~

15
15

15

"

U

n

CSC

OUI9

14180

esc

I,'

06519
06520

14190 MSPOSC

osc

",0101

06521

14160
14110

1.20-1443 .ONITOR I

OOOOl
OCOOI
00005

-6491
oo,u
10"0
00000

DU'0....
OtUI
06101

aUla

Ot4l2

44
44

OU)D
06UO
09191
O'ill
OUlO
0""
09111
OUIO

"4'"

"

4'

U

16

on ..

"

Otlll
09144
064"

)I.
H

16

"
..U

~

ann
olin

-,nl
-nOT

on"

-un
-6121

on..

on"

0""

-6429
-nu
1010l
D.,.'
-DaDe
OCCOO

091U
0]402

oeooo

CCOO'

.
5 l
-0426
I

06S'-

35

VERSION 2

5 I
-211]

I

SUPeRVISOR AND I.O.A.T.

2.10

PAGE

2,\

06528

1.. 820

DC
JO
DC
-I
OSA

COO.+11

06513

14810

OSC

I,'

065)]
OU34

-2en
I

005)5

4

14alo

-un

06512

0101

14800

OlU]

all"

GHOT

0101
;/,8
CC
-8
2,2
DC
-2
os. CO"M'81

I41S0

OOCO)
00000

H

06~06

I,'

4,C1Ol

I414U "SPO'i8 esc

oZln

aUla

"

06505
14710

06~26

14840 MSPOSC DSC 4,0 10 L
0101
cc 2'\ I

on,o

14850

JI

<,2

OC
-2

14860

as.

14870

OoSH

CDMtH 79

06541

06,,,
14 . . 0
1.890
14900
14910
1.9ZU
14930
1."0
14950
14960
14910
14'80
14990
15000
15010
15020
150]0
15040
15050
15060
IS010
15010
ISOQO
15100
15110
UIZO
15\l0
15140
15150

DSC
MFTOI
MFl02

TeM

e+20
.-)

15110

"CmOttl,It,ll.
"COfllM.l ••
MCO'-"+12,5

FO.··l, ••

DeCODE COL. 1.

UTlO,"SP05A.1
• '2].SFDINf t.
.+20'''COOI

TUT IF

B

UT LCE •• ,

NO -KILL THIS PHASE.

.-

DORC
]
8NF Mf10ltF I
TFM FO •• ·2)"
8
UTlC.fOF T058.1
~~F
MF TtloF I
IF. FO ,.'23 ••
~ TlO,MH05C ,1
8
MFTO)
IR
IIR02.FQRDDA ..
8NR MSPQ:It,MROZ ••
Tf" PO INT 01]6
8
M8010A
OORC . - )
"non OSt ~,OIOI
0101

06550
06U2
onTO
onTO
06182
OUt.
0 . .06

SET FORI ENTRY IND.
INDICATE PHASE IIEGUN.

TO
80

B

0 ....
~EGITIUTE

•

066'0
06642
06"4
06. . 2
O. . U
06614
0 ....
0....
alna
anu

DECODE COL. e.
DECCDe COU. 9-10.
MOVE DDA FOI FORT UN
TUT IF YALID.

onJ~

·ta~'ILU.

on. .
061"
067'0
onu
onll

~.8

oun

at

ld

ann

OSA

'0....+.2

DC
-8

-I
15160

fOR ANO FORI CNfl CARD 'AOCESSOR.
SET F OR EN TRY 1100.
"CQ""+1 .4 ••

aORC
TOM
TO"
TO"
IFM

ose;
,

I,'

• U 110 ""05t DSC .,0101
0101

-2881
I

onu

I,'

B

)5

OU'Z

.-)
~OC2,4,

'AGE

I.C ••• T•

eSC 6,0'
COOCO'
·SPSANO.SPU CNTL CARO PROCESSOR
SET SPS ENTRY IND.
TO" MCO ...... ·l.1, •

U

U

"

u

15
U
U

••
U
U

4'
44

u

.
4'
44
'6

II
4t
'6

49

02153
06512

0000'
00000

02153
02152
02 . . .
0'''1

oeOOM
oeool
00005

09131
0665J
06662
09412

- ..at

-6493
OOUI
10690
00000

on..

OUJ4
0. . . .
Ot"l
OUI'
0. . . .

-UTI

Otlll

~6192

OtT44
OU14
0.1.1
0))46

'OIU
09144
-OU6
00000

4

061.0

5

o"to

anti

-2114
I

anti

4

-66"

on..

-61n

]6

1620-1443 MONITCII I
15190

DC

VERSION 2

PAGE

SUPUVISCII AND I.C.II.T.

2,9;

06797

2,2

06799

-9

15200

DC

-2
15210

DSA

esc

15220
15230
I5HO MDPOI
15250
15260
15270
15210
15290
15300
15310
15320
15330
153_0
15350 MIQOI
15360
15310
15310
15390 MI002
15_00
15_10
15420
15_30
15 __ 0
15450
15460
1~470

15410
15_90
15500
15510
15520
15530
155_0
15550
15"0
15510
15510
IH90
15600
15610
IS620
15630
15640
IS650
15660
15610
15680

TOM
TO.
TO.
TO.
TF.

CO"M.15

0610_

1.

06lC_
06105

I

DUP CNTL CAIIO 'ROCESSOR
.CO" •• I,2"
SET PHASE INDICATOR.
OCO".oI"
INOICA,E PHASE 8EGUN.
.COO •• 12,6"
SET DUP INDICATOII.
.002,4"
SET SYSCAL CODE.
FO, •• 23..
CECODE COL. 7.

8

l.T1C,MSPOSA,1

TO
.'2!,SFOINT ..
TEST IF LeGITIOATE.
80
OB080.24,.COOI
8
IJT ICE".
NO -IILL THIS PHASE.
CORG .- 3
lEO AND lEaS CNTl CUD PROCESSOR
CF
FSPS."
SET lEO ENTRY INDICATORS.
TFM .IQ03B.II,l1010
.IQ02.24
B
DORC .- 3
SF
FSPS t t t
SET lEaS ENTRY INCICATORS.
TFM .IOC31.II,3_010
TOM fIICO"''''. 1"
INDICATE PHASE BEGUN.
TO. MCO,..M+1.1,11
TOM MCOJltllM+12.4,.
SE T OBJECT PROGU~ INOICATCR.
8NF •• 20."COM .... 2 ••
TEST IF EXECUTION IS INHIBITeD
B
L r lOF",
VES -TYPE MESSAGE AND FINISH UP JOB.
OORG .- 3
TFM FO, •• 21 ..
DETERMINE IF eOLS. 7-12 leGIT IMATe.
B

BC
BNF

l..tlo,MXQ50.7
JIIIJfOC 7.MOOl
MKOO),MOOl

B
liT loe •••
DORG .- 3
MIQ03 TFM JIIIXQC3A+23, •• Q55 ••
MIQ031 TF. FO ••• 23 ..
lJ flO, xx
a
AM
e-l,14
BNR ·.2C,MD01 ..

8

MXQ04-24,. t
:" ,
F '5,lllX

OORG .-:3

.IQOle

.1004

.IQ05

1~690

0"06
0....
0 . . 30
06142
068'_

c.

BNI .lgClA,1300
80
JIII»CC ll.lOINPT, f
8NF M.IC~11,tO"M.3~ ••
BNF JIIIXQOS.COM"'t]9,.
WAfY ""31, t.
B
~ TleF
DORG . - 3
3T
loT05,COIIII.+39,.
TR
MAG2,lJT05-1~11,

NO -NAMES OUST BE NON-NUOERIC.
INllJAlIlE Te DEeCOE REST CF CARC.
PERFCRO THE SCAN.
TEST FOR R.M.
VE S ·ENO OF CARD.

BIIANCH IF NON-DISK LOAO INPUT.
BRANCH IF PROGAA~ NAME SUPPllEO.
TE$T IF OIM ENTAY PICKED UP.
NO -TYPE ERROR "ESSAGE AND CLCSE JOB.
GO Te PICK UP THE CI_ ENTRY.
MOVE FOR LOAC ROUT INE.

-2117
I
15
15
15
U
16

02153
02152
02164
091_)
09591
D9\31
06901
OU'II
09-'2

OCOOZ
oeool
00006
00004
-6817
·".93
00U6
10690
OCOOO

00429
01157
0.6'1"

00000
OOOK 1
OCOOO

32 '00_29

00000
OCOL_
oeOOl
OCOOJ
00004
02854
OCOOO

0. . . .

_9

06171
06190
06'102
06910

25
43
49

06910
06922
06'13_
06942
06942
06954
06966
06911
06'190
070t2
0101_
07022
07022
0703_
010-.
01051
01070
07011
07011
07090
07102
07114
07126
07138
07146
011 . .
07151
011 10
01182
01194
01206
01218
07226
01226
07211

H
16

-,

16

07151

15
15

02853
0216._
07022
09550.

l' ozna
H

49

095'11
09111
07411
07018
0'1_82

-1045
-711l
09142
09142

16
16
49
11
_5
_9

ClI I l
09598
09131
07113
07146
01170

-1827
-111 >
00000
-COlO
0'1142
00000

1-

_9

09604
07e90
01674
07642
07226
10481
09550

-0000
01300
00428
02837
02HI
00100
00000

21

01350

11

C9744

02141
0134.

U
_4
H
H

39

oeooo

3i
162C-1443
151eo
15110
15120
15130
15140
15150
15160
15110
15180
15190
15800
15810
15120
15130
15140
15150
15160
15810
15810
15190
159CO
15910
151120
15930
159_0
15950
15960
15'110
15980
15'1'10
16000
16010
16020
160.30
160._0
160.50.
160.60.
160.70.
160.10.
160.90.
1610.0.
16110.
'6120.
16UG
161_0.

~O'IITDR

BNR

·'20,fIIIR02. ,

8

MMQ04·12 ...

VERSION 2

S~PERVISOR

AND I.C.R. T.

TEST IF EMPTY.
YES -ERROR.

DORG .- 3
JF

CF
C.
81
.IU06 TF.
8
DORG
.U106A BNF

MFO 1,MR02'11,.

'tUQC6t+6,JII8190.

.- 3
.'24,COMM.8. ,

JF

JIIIB225'11.COIIIM.12

.8225.11

16 ISO.

NO -FOIICE UPClTlNG OF HIGH INDICATOR •
YE S ·MOVE I N LOAD lCCRESS IF ANY.

flUCQ06C+6. M8145

·'2It,tOMM'11"
MR02.I8,COOM+l1
"8195,
.- 3

MOVE IN eNTRV AOOIIESS IF SUPPLIED.

t'

MCC8UFt 14, ••

CLEaR EICESS flAGS IN NAME FIELD.

.ceaUF.16
.ceOUF+II
MeeBUF+20
MCCBUF+22
AaCl+]O,MXQ09, ,

INllJAlIlE FeR EQUIValENCE TAIlE SEARCH.

AB03.50,MI010
ABO!+4),MCt8UF+23
eOM")5 ,MCCBUF+23
AB09l,EOUDDA
·'20,eOUDDA
-+20
·-3
lBO.Ao5,EOUDoh5
.1003A+23 •• 1055'1_

.nQe]A, ••

IETURN TO oeCCDE REST Cf CARD.

fltJll31. ~.
UT10F .. ,

COULD NOT F I NO ·YY'E ERItOR MESSAGE.
FINISH UP.

.·3

·-3

AlOHII,4"
MOVE COIIIIESPOHDING DIM ~Mlell TO
COIOM.39.AI03+11.II. TO THE COMM SECTOR.
MIOC5".
GO 'ICK UP THE 011' ENTRY.
·-3
l802·12 ,EQUooA.,
GO TO. IGU "ILl SURCH IF DOl VALID.
NO -TYPE 1111101 MESSAGE.
MIOIOl
DOIIG .·3
TO
-.23.l0IN" ••
TEST 'DR LEGITIMACY Of INPUT OlVlce.
10
"10130111:00.5
rPM POINT . n •••
unol
•
DOIIG --3·
MR02.MX020 ..
SET UP TO EXICUTE LOADIR CALLe••
Til
0IMENT+14.III:Ro.1A
TO
INF '+2_.COIIMoU
o IMINT+I.,CDJlM+ 17
Tf
INF "2_,COM".1
Tf

16&60. MIOU
16170. .
16110.
l6&'1G
1620.0.
16210. MIOIJ
16220.
l6UG
162"0.
16250

t

• IOC6B

.CF
. fF.
.IQ06B 8NF
H
MlOC6C 8
CORG
.1001 CF
CF
CF
CF
CF
MIooe H.
HM
H.
H
TO
8NR
8
OOIlG
TF
TFM
B
oORG
•• QQ9 WATY
B
oORG
MIQ 10. AM

M101I

DETERMINE IF RELOCATABLE.

.FOI
.FOI,99999
.1006A .1200

8
COIIG
BNII
TFM
I

'01,.,.2 ..

PAGE
07270
01206

0'1144
00000

14
46
16
49

09116
C9116
09116
07331
07416
C1386

R9999
01200
·3710
OCOOO

_4
26

07162
0.4044
0"0 __

16

07416
07410
0.9162
03722

02810
02114
00000
-31Z2
Oll15
02119
0000.0

4'1

nOl_
1301.
nOli
U020
n022
1106_
1101_
11017
02U7
1137'1
07558
07510.

00000
0000.0
OOCOO
00000
00000
·7590.
·1610
H023
11023
108.2
10862
000.00

26
16

Gnu

1131_

U

07090.

10.867
·18_1
00000

10523
0"'0

00100
OCOOG

49

110.45
02841
07U'

-000_
1104N
00000

076. .

'"
16
'9

10...
09"1
GJJ46

10.1.2
·0002
00000.

0167"
0761"
07. . .
016"
0.1710.

Z5
U
&6
".

07697
0.1711
091"
09"12

OO_U
107]0
0.0-27
00000

0.7710

n

0974.
0.0."16

o.n. .
G44n
021&5
0211.
02110

07250
01262
07270
07210
07212
07294
0730.
07311
07330
07338
07138
01]50
07162
01)14
01316
07398
07410
01_11
07_11
074)0
0744Z
01_54
07466
07_18
074'10
07502
07514
01526
07538
075'0
07558
07551
07570
07512
07590
OT,.o
OU02
01610
01610
01U2
0161_

26

n

n

_4
26
49

n

n
n
n

u
16
16
16
26

25

_5

11

26

0'1757

ceooo

07642
01"2
07.,,,

onll
onu II

onu
on,,, ."
u
onee ."

Gn. .
00410
01790

n

1620-144)
IU60
16210
16210
lUQO "'Q20
10300
16310
16120
16330 ""gSO
16140
IOHO
IU60
16]10 "105'
16110

ano

TF

~

8

"81~S

~OHITO~

YHSIO" 1

S~'ElYISO.

077U

onto
on ..
onu

OO.C .- 1
OSC
1.1
I
OSA OS'15

01103

DC
)d
-0)
OC
6.0'
-0000'
OSC 4tlC01"
1001
2,7
OC
-7
2,.
OC

-.

P.OO.'_ ""E.

'.0'

OC
OS.

5 I
J971J

01l1l

6

01113

4

07621
Ol~

NU"BeR.

)

6

01lll
07132
07134

COM ... ' .

07ln

1,'

0713.
0"'0

1"20

LOAO

Aco~ess,

1.... 0

OSC

1.470

OSC 4,0101
0101
2,22
DC
<2

S I

-lUI
I

07141
07146

on ••
07ls)

onS)

1"'0

OJU2

OliO)
0110.

2,~

OSC 4,(.1101"
0101
2,11
DC
J7
2, S
DC
-S
OS. CO~.·ll

If)_~O

I,'

OTIS.
ENTRY AODRESS.

t t

5 I

-2114
I

01l~5

OU60

7.5

OllU

os. eO".+17

07161

,

i'.> ..,

csc

01167
011. .

-211t
I

IOS20

OSC 4.0101 ..
0101
DC
2.21

1·:1 .... .;

DC

-S
16500

I'SlO

I,'

I'SSO

INP~T

DC
-I

3U

os-

~ONI

TOR I

VERSION 2

S~PE.VISOR

07174

'NO I.O ••• T.

PAGE

2.1

07n.

LOINPT

07811
01111

In.u

OSC

IU70

OSt 4,0101.,
0101
CC
2,28

I'S'~

I

0""

SO~RCE.

K7

1'20-1441
\.,.0

oruz

I,'
SUBROUTINe SET IIICEIIT1FIC_"OH FOR FOURA

5 I

-0'21
I

071n
011 . .

K8

16"0

DC

OlltO

201

-I
1•• 00

DSA

071n

CO""+82

1.610

OSC

16620

OSC .,0101.,
0101
DC
2.29

\6.10

I, '
CO~TROL

CUO

COU~T

FOR FORTUN_

-z ...

0""

I

07lH
019t2

••DC

2.2

on04

16.50

-2
OSA

COII"+75

one.
alto.

I, •

16660

OSt

16UO

DSC 4,0101"
0101
2,]1
DC
Ll
DC
2,2
-2

1. . 90
IUOO

OSA

OSC 4.0101"
0101
Dt
2.ll

07910

I

07911

4

0791.

onu

-lin

0''''
011.0

4

n ...
$'5 NDIII CIGIl.

oc

ld

Uti,

IUSO

os.

CO""."

UU,

IU.O

ose

I,'

Oft. .

IUfO

OSC 4.0101"
0101
2,)4
!X
)'4

-I

1.110
1."0

II(

-z

2,2

onn

,n

IlANTI SS6 LIN"".

Oft"

411

S •

01121

L)

LU.O

S
-21n

Oftl.

I,'

OSC

In20
IU10

SPS Sua-CUll Ne SET.

CO"' •• '1

16710

5 •

ann

166.0

1. . . 0

n

01114
00000

J}

osc

1. . 10

00414

07no

osc
00000'
OSC 4.0101. ,
0101
OC
2.1 )

1.410

164.0

.,
U

onll

-4

1'''00

"~E

'IIC l.e ••• T.

I CM ,CO_"+ll

I

,
,

-,n.
•
1

OfM.

Z

Of'"

z

.0

"I

5 l

IUOO

OS...

CO"'II'+l~

lUI a

OSC

1,'

IU20
IU)O •
IU7890

19750
I",~O

lono
19780
19790
19800

19&10

SYSTEM OIM ENTRY sec TOR -THEliE COA·S ARE PICKeo UP
OORG SYSORG'B4QO,
IY THE celD STUT AOUTllle.
SP5CCA OSC
OOA FDA SPS ASSE~IlER.
1.0 ..

DC
-00

es.
OSC

0

10lC7

3,0

108Cl
10110

0,0

10115

1.',

10815
10820
10121

19820 FORCOA OSC
0
10830
056

ltO"

19840

3,0

10121
10UO

C,O

10US

1,'"

IC8I5
101.0
101.1

19850

19160

OC
-00
OSA

,

OSC

1"'70 DUPCDA DSC
0
OSA
19810
19. .0
1. .00

19910

oe
·00
OSA

.

OSC

OD. FOR FORrUM COMPILER.

10822
10121

1.0"

DD~

'0. OU, S~'EAYlsa••

101"

300

101.'
101.0

0,0

1015.

lOll.

"..A
".11

1,',
1,0 ..

0

199.0

3.0

DDA 'OA IQUIYALIMCE TA'~I.

·00

)

5 •

2

~oooo

·0000
I

,

.

·0000
)

5 I

2

·0000
~oooo

I

X
~oooo

J
,

I

-0000
·00.0

1

10• . ,
10. . ,
10."

0'

5 •

·oeoo

101"1

0

19920 EQUCOA DSC
0
19UO
O~A

10

IOB02
10102

a

OSA

.

PAGE

IQ730
19740 "CUll

0
2

1010.

CC

~ONI TO~

'l

J I

10641

6,lceooo

1620-144)

••

10421

ANO CIRTY OIGIT DECODERS.

J 00000
CSC
10,COIOCOOOOO
OOIOOOOOCO
10, C ICIOIO ICO
CSC
OIOIOIOICO
10,COOIOIOCOO
OSC
OOOIOIOOCO
10, COOOCOOCOO
OSC
OCOOOOOOCO
esc
lO.Cl2 ...... "' .... '"
0124" .. "" ....
lC. C""3444444t
OSC
044304.444
10.1357911111
OSC
1]57911111
2.-20
DC

.-

41

lozn

10411

,

FOllO_ING ARE .OHITOR·$
OORC SYSORG.ft288
2,-01
osc
OJ
OSC 8,01010000
01010000
0, •• 1
OS
2, I>
DC
-6
2,8
DC
-8

PAGE

SUPUVISO. _NO l.e ••• T.

"

,

.H

19710

TOR I

"

DC

19620 "CCC]

~ONI

O_C b.REr .. ,· •
HTRY'
o.C
10, E~ECVT ION',
flfCUT IU~'
O.C 21, J08 CARD GROUP .OfrlllY· ,
J>OB CARO GROVP ONLY'
o.c
12,"UST RHo-O',
MUST RELO.O'
O.C
IB,CONOITION IGNOUO',
COHOI T ION IGNOReO'
o_e
• ,COfll".e· •
COMPARE"
OAe
12, ·fNTER tARO',
·f~TER CARD'
OAt
IB,SYSTf" 01" ERROR
SYSTE" C I" ER.OR '
OAC
IB,O~JECT 01. EUOR
"
OBJECT 0 I. EUOR '
OAt
I' ,OBJECT H.Me EUOR
OBJEC T HA"E ERROR '
OAe H,fRROR IN FIElO AT tOL.
ERROR IN FIELD AT COL.
oae
I.,PHASE TU"INUED.
"
PM.Sf TER"INA.TEO.
OAC 3 •• "

4iI

""A

.,0000

J

•

I

1620-1443 .ON lIaR I
199~O

19960
19910
19910
19990
20000
20010
20020
20030
20040
200S0
20060
20010
20010
20090
20100
20110
20120
20130
20140
20lS0
20160
20l1u
20110
20 I 90
20200
20210
20220
20230
20240
20250
20260
20210
202_0
20290
20100
20110
20320
20130
2034Q
20350
20360
20310
20110
20390
20400
20'10

...,..
AIOO
AlOI

IF.

&A02
AlOl

ABO~

A8U6

A801

20020

VERSI

O~

S~PE

2

RV I SOR ANa I.C ••• T.

DC
b, O'
-COOO'
10RI LOAD PROCESSOR FOR "'"EO PROGRA.S SECT ION 2
DORC SVSCRG+8~OO
RNF .805 ..... 02 •• 5 ••
TESI FOR A SPECIFIED LOAO ADDRess.
TF
•• 0 ... 11.,lA02 .... "
VE S -_avE 10 CALLING PUA.E1ER ReCORO.
SF
INITIALIZE SCAN.
B
IF
TO
TO
TF.
B
TF"
BNR
IF"
B
DORG
C
BI
A.
55
A"
8
DORC

''''02'·5
...
IO'X,·.21

IOSK,A808.7
AtlCQA +5 ,JIIIAPENT+!Ii

,seq., TEMP-~

SE T A CROUP .ARO FOR LOOP TESI.
RHU 4 EQ~IVALENCE TABL[ SECTCRS.

AB1C+411,AeOQ"

IOX",·.23t •
IOGT,A808+8.7

&80hll,A810+11 ••

1.IIIALllE 4 SEC lOR SCAN.
IE S I IF TABLE IS EIHAUS TED.

·.32.")(' ,
80.I.ABOI
ERROR+12
'-3

ASC)+ 11'&'02'+11:, b,(O"PAAE CUAAENI E.UY.

'BOb, 1200.,
ABC!+ll.lb"
A8el,ABOl·ll"l,
A8C'U.~, 4 ••
OR02
'-3
TF
AAC2'+16, .... 02&.12
8
ABOI
CORC .- J
A.
A803 .. 1 .....
IF
.. AO".6 •• 803+11.11
BNF ·.2 .. ,.402.+26. ,
SF
AAO.c.".
80
·.24,"02'+26, I
SF
lA04+1, ••
TR
O,AB07, ,
0,. I
B
DaRe .- J

BRANCH IF F OUNO.
NU -AOVANCE ACDRESS ING.
IE S I IF 4 SECIORS ElHAUSIED.
YES -I~C~E.ENI SECTOR ADaRESS.

t

,filUVE

• OVE

NA"E FeR hO LOAC AeCRESS CASE.
FOU~D

01'" ENTN.V •

TE S I IF AE peSI I I Ch I NG CES IRED.
YES -SET IhClcnaR.
IE S I IF EIECLTION DESIREO.
YES -SEI I.Dlcnc~.
OVERLAY SEC TlON I WIlH IERol.nICN
AOUTINE.

IF.

IOX',Zl ..

RESTORE CORE.

B

IF.
IF

IO,GT,.A03.7
OF1LE+ll,TT1.,
IO)l,.,"02A+23

pu",.y uP A GET ENTRV 10 10RI.

TR

CNT"O,AA04

IF"
IF.
rR

OLCC'Hl.JI4CYL"
..,Al h6,X01+36.,
OLUOA.IO)
OVFtlAY,OSAOl ••
J03

B

OC
-OJ
DC

SE I UP 10 RESIORE .PV TABLE AhD
EXECUTE LCAO.
VOU-RE ON VOLA

ow,",

New,

BOY.

b, O'

PAGE
10176
10902
10902
10914
10926
loni
109S0
10962
10914
10916
10991
11010
11022
1I0H
11046
IIOSI
11066
11066
1\018
11090
II1C2
11114
11126
11134
11134
11146
11154
IIIH
III . .
11111
11190
11202
11214
11226
11238
11246
11246
IIH.
11210
11282
11294
11106
1I118
II ))0
11142
IIlS6

.9

6

44

11114

26

0029~

J2

00214

16

OO~6S

0023'
002))
COOOO
JC961
J 1161
021.9
02014
11311
JI021
J 1111
JI40S
00000
JC926
00000

49
26
IS

OOSS'
IIlt4
11119
l5 ' 11805
16 00S65
49 oosu
16 11045
45 11066
16 00461
49 00104
24
46
II

IIO.N
1I1S4
11045
1I0H
11314
10998

00245
01200
-0016
IIOON
-C004
00000

00245
IOU6

00201
00000

II

IIOO~

26

00290
11202
00214
11226
C021S
00000
COOOO

-cOOo
1I00N
002n
00000
00255
00000
112.6
00000

"

II

4~

26
49

44

12
4J

12
]I

49
16
49
16
26

H
16
16
]I

49

00505
OOS66
01933
00565
02110
02132
00462
OOHI
00'68
3

-0023

-0261
-IH2
002~.?

0028"
-0098
-1891
00103
19635

11162

-0000'
2043C A808
20440

20'50

3,220
DSC
220
4.2
OC
-002
DSC
I.'

1620-1"3 'ONIIOR I
20460
20410
20'80 A80q
20.90 ABOCIA
20500
20510
20520

CSC
22
CSA
OSC
0
CSC
I
OSA
DC
-04
CSA

20600

.

20610

OE~D

OSC

SUPERV ISOR ANO -I.O.R. T.

PAGE

11377

a.,

1 ~111

1,

CROUP .ARK FOR lEST.

S I
JI119
I

I131B

101

11319

3.4

1138..
11311

S I

11384

ABIC

OSC

DC
-90
OSA

VERSION 2

ABC~A

00
CORC lQQ82.
OS~
101
I
DSA OSA08

20SBO

11310

11111

20500 ABIO
205S0
20560

20S90

11169

f, ~J

2.22

20530

lO~10

1136J

...

-0000
3
5 x

11192
11192
11393

I.'

REAO BUFFER FOR FOUR SECIORS.
CONIROL TO .RlTE eN CISO.

11394
19982

J 1394
I
00

00000

00000

19982
19917

3,9C

19987
19990

SVSORC

199~S

I.'

199.S
19996
00000

511

S X
J9659
]

5 I
-2402
I

50

Ulo-l~itj

."1-1.', t_
81 G fK B
~'I'llJ'VF

010'"

cUpceA

AbL"

CCJ8G'
00 .. ,,2

Aeo,

C 1 ~'Ii 7

f~)':".

c].(o ...

E~:'(>",':j
'.'G21
EQu CL'

fOR

to'

MULl,.

t: ~

,814J11UC

I t\Jlllwl( T
LeAOZA
lC,'''6'

LOINP'

- I

~ I '

l C.J06

(JPSU8

llj,C; 1

01002
Cl !l8l
0123Z

EOI C;u
fCAll

f.dOl,l

H;)t'jf
fill') (,1

(, 1 to _~ >j
Cd -, _10 I

E.~GZ

OL,r
o liZ I
01121
l.lll)
v Ill.

66\Jf F

81(cq
(HE(I(

CHEt( 1
CHEl(l
CHKl
eH<2

0)~22

CHK'

01~66

C.HK4

000 I'
11000

C 1"1 T

O~"55

r~UNT

","T0508
MFT05C

04444
Q4b28
Ob 718
Oblqz

~J802A

O~ObO

DC Of
OF ILE
Of

np

010

ll2"b

COitb 1

00<92
012/0
0114,
CIHB
01020
OIHe
0lH6
01 .. 08
0042 I
02110
018C2
OIIB
D1060
ol q2~
02020
ODS I "
eooll
a lOba

05028

DID.
Ol(')'t'

~J80U

Q')01:16

0101

ell

III')601B

(;~

OQI/F l

~jtHlA

,")')-'8~

fIIJ81 H
"J61'>'

DIAOO

Olllb
0< I".
1 ,) A
1'1 (\I\j ( Al

: 9bOO
OOb 3,

LOOI
L'A02
LOOI
1 CA,,"

t-'.'-.

'JOB

1,0

1102 ..

t;"O

",CRO}A

/IIIJ8ClZ.II

191~}

LJ 50"1.;
C'lAo, i
EQ010
r 00("0

:

"CRO'"
_eAOH

;.;~",t~

ll19it

ABvllA

C~T"O
COflllfill

.CROIA

l At-CII:

Illbl
Ill19
II)1a

6"1

o 18'!
01H6

l \i 3 ..

l.ljIbn .J

Ae08

Cu2')3
COlO ..

•• PSCT
.eo.o'
OSI10A
oUIOS

~

( \A3q
L\A4t-f)
I

}~

US4al

14i1b)~

O\'OZ

1961.

tG')')(;
F ·:I.)]()
'r:s~

e

E"'~G 3
E~SLo4

f fillS G5
E.~G6

E'~G7

Eo5GB

,eu I v
EU8
ERAEl
ERROR
FO

0l~a

UOO~8

OPOI
"002

09'"

l~'Oi'

(JC L 16

11100&

.uo~

uC26""

~OPO

080"0

09"0"
0'611
00429
00800

~JSl

,

"" )"l.)

t

'" .1,1. j.:

:"t;,I.'H
"·l SG

I CCit

0011.

! CI.T

Q!)':i66

lOP,
r, i,..'

r~'!U 1 f;
",·;.,c',HI

't

''';0') 1 i'

)

I C50

UV~l

4Y

A AD 2 A

'AOi
AAD j
AAlj"o

UJoIo6d

QG1]'I
'co IZG

jJ)A 1 'i

'~:).?td

~JSA2C

C:"''':B''

0'>" 21

.,

"'8'>,,"'.

OOb 10
0()t:dl

;:-).

p-c i.

.8~l~

'j",
;,,~_ .!."!

t

l

05~H

\

,

/"1l1li';';';

O~84

!,I;~'JJ

,.."C ..

o'Uqq
O'lQ01

-"'O~

09QI !:l

~·Oc.

~C,1j'3

:)0'10

., ~ ... 0"
...... J~
Oi!{_ AOh

i.;U,i ':ii..;

"'~o

OCilq:u

OO'j~~

014(.(,01

IC6iJ0

~JIIOIS

0'93"

1 C 7 ()~,
lC 1 i.lI
ItUG
I" lie

''"'0,*

OQ94 -,

""'HI
/'II -"!
1 ~

OQ9td

~I'qo

oCol 91\

/111"11

leOl~

It

:.,c" oli, ~

OS411

:.;76 I
,~\j !1 C

IC:O

OO~b~

IH.('ij,2

o \A I a

i

~"II~

IOU

;,;·,plO

.CCC,

JL ff

0) 1 \) 36

~((jO

1 Q7"Hi
1 ~tdO

J"-EC

u9H:l8

~(GlJj

IOttC

lJ~tlO4

oc~o.

1 C ''''1

1J1C'l8

o~"l')n

Oil}')"

0221~

l.:fO·,
UTQoi

OOQb4

Ur068

OIbZO

2
!.:;,l'·i'l

C~d6b

v:'5t"

O<\(jl'J
(; .. e 1 i,
;;4>1." ~

19144

I(

O~250

05390

C J'I8b

L ... 1bl

t

o Jo'l(.
0111 ()
a"} 12'

f'ilJ!ll
/IIJ842
Jio,!tn 1
I'IIJ61 'S
"'J81 r
_J820

.8no

L''<,.& 1 j
USAt i

O)'ltl

_et .. "

loitl}
D l-.etf.

-8112

o 10'1l0

S lIt> 2

!}

~jb~tI

0"~'6

0S!42

00"1~

_;f":)'>(
3"

H~ C

08100
"8110
""8140

MJeO"
/IIJB 10

004~b

I~Oul

.~

O)HU

o \"'8b

( ~DS

USAl,)

/IIS08l

04944
O~OH

a,)q]o
06026
..::6: 111
,;~ 1.11'-,

19H4t

07410

o lc""

009'6
09716
09721
09741
0.5'0
06,10
06714
091'0
O.... j

o ~,u

~qbS4

J

OlIo'
02111
aH02
OlolO
OJ010
OH2C
Oll"
Ollbl
() 1110
all'"

011'1
OblO,
00 . . 0
00.11
OO~H

oF. SSG
OFOI
of 02
OFO)
"FTOI
of TOl
.F TO)
"101
"103
OJeol
oJe02
"JBOl

Ol~'"

"'B081')

O~lH

1

.8190

DSAOq
DSAtO

l q78b
1...,11.2
l'H1"I
1 ~ 18 ~

.eu
'IE SI
.esl

O"'iJ~

/liB 1 'J'i
/118200
1118210

O:'AOfl

I ..

,..(~(,;o

Oll~.

7

~ ~A

~CRO'

01"2b
o 14b2

i;b;} 1

:.: SA 11

.eon

f11180_~

O~'lC

, Ilt6
;!J,3!'!

oaooo
o'OIC
oe020
0.025
08010

oqf>O 1
,;9602
0960'"

"'S~I:')C

,,7) 86-

.'OB

(j95·qq

"'VJ?~

0./8 j'l

CC",5]

ooall
CHOZ

:)9600

HAL'
HIGH

IotJ

l !tAOt>

.AOIO
.'020

~Ul.v~

ul.~o\")

"OJ.,
oelCC;

L kEt
~uooo

OltH
CII~ I
02123
01811
00602
00b)2
0959.

'f6~b

..... q·":b A
"" .. :.:.JOhP
,.. .. QOo':lf
"tt-. r: I" t:.

M( 0""
""ltU ~
!IICRQl

,.., Yl

lifo)"
190" G

S J 'i

(,(,22 )
OC.dl

C02n
CUo J .
OClIO

(J i, 1!1j~

DSAO,
D5AOt.
0$10.07

~)t>

OColO
.COII

L l AO'i

(.01'16
0" .. 93

~"Q(;

cel20

aelao

10150
10160
10710
IC7t!
Ie I'D
02852
0"001
O"IU
CItojO"
OH12

H.OI
lC8U1
LCI08
l CIO_
l CliO

'I

"tGL
GTEST
HOI
HOl
HO'

.CDO~

't

l--,G',l.~

Fj
>4

FSP~

IIICOOl
oCOQ'

i,iC9o,a
: v l!j

/111'\>10""

\

L(.oe

ottO

~i

F5
F"
F1

~I

~"f

SUPfA.I so. AND I.t.'. T.

11IH
IIIH

j,SOq
"'1:$10

00~l8

"ERSION
i t).,02
! 0920
1 ')q~8

A805
ABOb
A801

C I 08 '>
I GR~_?
101:11..:'
u 1 ~·l')
(."0""'0
Cdt..-l,

all ,4

OCC auF

.eo)

0108 I

"'APE~l

.CAOOA

AiHH

1 ca,,;

EOSGIO
E"SG II
3

.U~I:UM

",\u\ ..
G,,;7t..8

..

1

cqq~5

51
If>10-1"41

1

~

fill""}

l

/It'"

~

~fIIIlt

101

fIII/III1}

10211

1

"'Or~

'Wr RSI UN

If(R

:;..ri-'d.

IifTk"t'

IIIJl.Q()O

CDl"

.01

1
/IIJ,Q06

(.1 ... l8

~"liQC"

C 1~qO

,...~o

C1,1.

"" .. ?,:>

1 n"IF~

1030Gl

.,Q I 0

I

fIIIXQ l i

c 1."Z

MfIIll

1037~

"'.012
"'.'113

Ib 1'1
o11l II
o nqfj

I03~

10"11

fill'" )0
/IIIiM 3

lO.ftl7
10"'51
lO"IH

MxQ20
IUQSO

~/III

) ..::1

105ZJ

NOT

M~~""

~IOP

"'RO.!'

1 O~~ l
1::hlt)',;
; :~!'J "- 1
O'H .. "

fIIIRE(

Oq8Z1

"'SPOl
"'S.P\..:2

Ob 1 qe
GbZl6
06430
OhAt11t

r

"'''''''00
~M"'l

0\P03
"SPO"
"xQOI

SUPERV IIOR A"O 1.0.0.' •

fIIJ(i;;IQ"

111"16
14/1410
14M J2
fllfIII33

e~c

1 ~)ll -~
1 0 1 6 ~~

OXQ~~

NOEO.

C 1bl 0
~~

CIBIl
078<1
C0971
OIOU

".,

AJIII'P
11:1'11"/11"

SEEK
S lOP

>IOu

SKOt
51(02
SoKOl
$KO"

S.AOI
S,MA02

C06tj6
(.o~~ f

5oILt.OJ
S r t PS

OlOCY
GlOOA
OTE Sf
POi ~,

OllH
OC,,1t !
CO lb.

H:fT~

RCALl

01819
0081.
00718

~ONt'"

GQ166

0.'10

001"1
AO I"

IIUQ02

Ot>Q42

ROyeD

OlOO~

"""'03
"'.CO'o

01018

REPOS

Q11Q4

~ErN

COH2
01b82

f€ .. P
TEST

'"

UTOl
UTOH
UTO)8
UTOlC

OlD"
OUIO

"

"Alit-

"n:u

0(..000

..' 'i (.1'.(

DEc, ".

\'--;

C0680
COllI>
CGSbO
CCIte

01496

cr06C

Oa1i"

')".0,

li f

~tiH'

oe 7t..t

QiJ892

0180<
0125"

ri)~

{~r

\)t

064'i,,,

~

l·j5it t .,t',

'( C I
lUi t
L01
iO;:

oor 20
01 .. 76
01604
011'08

\J 1" {J! j'.

;_·Hi1!l'

l.'iO
lif Q ';
li T ! (~p<-

011' 3
00012
OOObO
00152
01200

unul!l
~

01.211
0201>J
00b)2

08Qij6
081 .. 8

utU),
08038

tJTQ5A

oe44b

OF (.lNt .. SS£fII6l'f~

52

Oq} 'it.!
CQ118
(!'h~ ~

J..',;t·
l:7 Df
ur
UT 10
uT ll.li

!!IiU,c
Oq-04tit

LIT II

UQ.l fi

..,,,

019~8

O'H.·~'

Ott [,),(

lO(

to.,

o 11~1

UfO)

Olj~"v

Y () LA
n.llK

i, : l,

OO':,J'Sl
C(J'I96

lO ..

C"tO~2

10'i

::un

::'FlHld

t,;:O"'Zb
10tiCl

O'o;\O\lq~

':..Jltt l0C
S,UPENT
:)\,jPAE T

12"

':!,;8C~

-~,. liO~1 iI,

SF'SOOA
5PS/IIl.1'

(~t

2C,9C8

lC~

(CJ!f,1D

c-'il ~ 1'1

~,ltIOe

OIlZ 8
;.'i, 11!.
r;;.:.Jilc,.

ca4*,8
C'''''i~
O(~·H

0(1)3

wlEST

OelLI

IVSCAl

oo.n

,01
10)
10.

Ollc.l

S If" ~ORG

02402

00.10
c 121l

ul C"Al

oe..o

u l 01'& 1

08~~2

162C-I44)

~ONIIOR

~CNIIOR

PACE

LCAOER

00010 .lblO-14H OONIIO. I YERSION
.C~"O' LeADER
00020
CORC 2~CO
000)0 • wRITE SEC"ENI I OF LOAOER eN DIS ••
00040 TRYI
]4
OCONTI.101
OOO~O
J8
DC aNT 1.702
OOO~O
ONI RIC .. 1\,\900
00010
B
TA: 'Y 1
00010
00090 R IC"II IRl

02~00

01500
02512
02524
025U
025"
02560
02512

"

00100 OCONII OSC 9.1Iq~00009
119600009
00110
oSA CAROIN-IO
00120
00110 FAKE
00 L40 •

INPuT PRO('RAIIII.

8

49

3~

49

OHH

CORC 501
DC
2.e
-0

DISt(

OOISO
001 ~O

.
14
U
4J

IF CARoO INPUT,

8RI~G

I~

00 10 1
OC702
01900
00000
00000
00500
00000

02584
02514
025~0

00000
02500
00000
00000
9

02~9r

~

02597
00S02
005C)

·0~02

.

SEC"ENT 2.
OO~O,

LOADER

CORG .-t.

49

00000

01266

00511

INPUT CONTROL FOR DIS. INP~I.
OOA IS AI CNIL. CYlOV IS LCCUICN
00180 •
UF CYLINDER OVERflOw ROUTINE. LD 1 IS ERROR MESSAGE. C. IS
00 I 90 •
NORMAL EXII.
00200 NORM
DC
1,7

00111.1 •

OOHI

P

00210

CSA

CNTL.CYlOV

00516

00220

DC

2. 7 ~

00521
00S2 )

002]0

P3
DSl

OK

00528

00240

at

1.'

-0920
-0554

0051~

2
5 •

-0630
I

00~28
00~29

00,50 • SECTOR ACORESSES AND COUNTS FOR DISk INPl.f.

OOlbO CNIlI
00270 CNIl2
00280 CNI
00290

•

DC
8.00100200
-0100200
DC
8.C0200100
-0200 ICO
DC
8.ce300COO
-0300000

OC537
00545
OOSH

CYLINDER. OVERFLOW ROUTINE,

00)00 • IF OVERFLOw OCCURRED.
OOHv CYlOV

00)20.
OOHO

AM

00340
00]1)0

API!

OO)~O

BOIS
CORC .·3
Tf
CIS-l ,CNILI
g
CYlOV+24
DORC .- 3

00)70
OOHU MORe
OQ)QO
00400

~o

AR" POS111C_ CCDE FeR 10CS.

~PD4IE

AfU4dtlO

HAD ONE OR Twa SeCTORS
Tf
01;-1 .CNIl2

fRO~

CNTl+i)t1
MORE.CNfL+1)

1620-1"3

~ONITOR

53

I

00SS4

004"

000-1

OOS66
00578
00590
00602
00610
006\0
00622
00630

00933
00925
00610
00914

005H
-COOL
00925
00000

009)3

00537
00000

NEXT CYLINDER. ANa CONTJNIIE.

VERSIUN 2

~ONITOR

oo~ra

LOADH

00410 • NOR~Al EXIT.
INCRE_ENT SECTOR ADOR. BY 3. OEeRE_ENI COUNT By 3.
00'20.
GO TO BECIN PROCESSING INPUI.
004}0 O~
TO
OK.2).DIS-~
00440
AM
CNtL+S •••
00450
SM
MAPENT+a.l.q
OO.~O
B
FIN
00470
OORC .-2
004ao • CONTROL 10 8RING IN SEC_ENI 2.
00490
DC
1.7

PACE

00~30

00642
00654
00666
oo~n

25
II
12

"

006§)
00925
00410
01092

00921
-0000
00-03

oecoo

oo~n

P

OOSOO

OS>

CONT2.CYlOV

00680

OOSIO

OC

p,

2.74

006.0
00615
00687

OSA

CARD IN

00692

00~20

-069"
-05H
2

-0512

00692
OOBO • eCA TO 8R INC IN SECMENT 2.
00540
cc 1,'
OOSSO

OC

DO~60

OSA

00510

oosao
00590

ose
00)
OS>
QSC

TRANS~I

TIED Tt OUT BEfORE USAGE.
00694

CAROAD

00699

3,3

00699
00700

CAROIN-IO

00107

1,'

00707
0070.

00600 • ACDRESS TO BRANCH TO AFTER DISK RUD EUO ••
OOUO
OSA DIS
'
OOUO • LOAD ADDRESS FOR IN'UT.
00630
DC
S,O
-0000
00640 • FOR DISK INPUI. "AS CHARACTER COUNT RUCHED )00 •••
00650
CM
CHARI.100
00660
BHE "32
00610 • I F so. GET MORE I N'UT •
00 •• 0
TFM C ,0
00.'0
B
01 SK
00700
DORC .-)
Dono' IF NOT. ARE ~E RU~Y FOR I NEW 75-CHARACIER 'IOU' •••
OQ720
C
c"U I.C
Dono
BNE IEGIN
007'0
8
"ERE •• 7
Dono
OORG .-]
OO7t.G • INPUT CONTROL FOR CARD IN'UT. 0 IS IN'UT lOCATION. ERR IS ERROR
Dono.
ROUTINE. LO 2 15 nROR MESSAGE. tlND IS NOR'Al EXIT.
00710 REAO
OSC 1.0

o

0069)

5 x

J9.09
3

5 x
-0502
I

007U

5

007U

-0914

x

00711

I'

00"3
00164

-0300
01200

00744

I.

OC7,.

..

00619
00"4

-0000
00000

2.

CO •• 3

"
.9

01164
01116

004)9
01200
-0000

00720

OCTU

.7

007"
00764
0077t.
00711
DOl. .

16l0-IH3 MONI lOR I

VHUON l

PAGE

.CNIfOR LOADER

00190

CS.

o .EAA

OOICI

ooeoo

CC
P2
C5l

2.12

OO'U
00106
OOIC.

tENO

OO'U

I.'

OO'U
DOli'

00810
00820
00810
00140
00150
00 . . 0
OOelO
COIIO
00890
oo.CO
00910
00920
00910
00. . 0
00950
00960
00910
00910
00990
01000
01010
01020

CC

• 10 8A ING IN 5E""ENI 2. IUN5MII INPYI CONUOl 'NC CC"
OYI
10
CONIZ.U'''I
IA
A,Gel
TF" C.O
H
o IS'IZ
OOAG
• CMAUC IER CO~NIf~.
CM.AI OC
5.0
'-0000
• CIS' INPUI •• EIII ~MeN SECTOR tOU~1 IS LERO.
CIS.
C" MAPENT •• ,O,9
aN. SI>
• NOI LERO • IAAN5"11 INPYI CONTAOL A.. O J-SEcrOR ceA.
IR
A,NOUI
IF
OIS-1 ,CNI
8
OIS"Z
OORe .- 3
• CtA FaA CIS' INP.UT. VARIAllE COYNT ANO tORe ACORESS TO HANDLE
•
CYLINOEA OYERHO ••
CNIL
OSC •• 0
000000
~, C
DC
-OOOooCO
• INPYI AOYI INE.' SEU. GH INPUI UEVICE. RUC, eMEtK FOR URCR.
01,$
l4
8,101 ••
.+21,.
Ie
At
3.
8.702.6

00.16
00121
00 •• 0
00152

.-.

oon.

-OOOC
-IOJO
l
5 I
-0556

I

16
'9

'00694
01073
00419
009.,

00465
00675
-0000
OCOOO

14
41

00410
OZZOI

00-00
01100

olon
009U

00511
OOHJ
coooo

H

u

00.6)
00 . . '
00n6
DUll

00900
00912
00.20

.
U

26

00920

'-au•
6

009)3

01030
01040
01050
01060
01010
B~I
E-l.lQOO.6
01080 ANT EA. B I
·+12,ObOO
01090
•• 12,16CO
81
BI
01100
·.12.1700
01110
aI
CIN,noo,.
01120 • euo. RaUl INE. .RI IE lO ., ~ll T, RERUC.
fF
SlOP.q,D
all )0 eRR
WAlY STOP' )
01140
M
5HOO
01150 5 lOP
01160
OORG '-0
01170
OSC s.o~
0000'
DISKI •• ,
01180 8.C.
8
OORG .... ft
01190
01200 • IN'UT CONTAO~, OE·V IcE CODE, (O.oE AOOR. FOR I liI'UT, ERR Rt;UTI ~e,
fRRO. MESse, ~ORM~l EXIT.
01210 •
OC
1,0
01220

009J4
00 . . .

Doni
00910
OOtu

oa. ..
0100.
Olel.
01030
010'2
010'4
01061
01061
010 . .
olon

J.

H.

u

"••

.••

OIOlQ
00"1
OIOlQ
0109-

00101
0101)
00r02
01900
00600
OUOO
01100
03800

0099~

46

01006
OIOU
OIOll

U
1.

0106)
01051
U640

01015
00100

69

OOHl

00000

••

cecoo

olon

55
:"2~-H4)

01230
OIHO CIN
01250
012.0

MONITOR I

VERSION 2

~ONITOR

lOACER

PAGE

DC
5.0
-0000
5.C
CC
-0000
OC
2.e
-0
6,0'
OC

01011
0101l
01015
OIOti

"'0000'

01210
012BO
01290
01300
01)10
01320
OIHO
01)40
OIJSO
0lJ60

aUla

01310
01)90
01400
01410
ul420
014)0
01440

Ol4S0
01460
01410
014ao

OI49C
01100
OU10

• BEGIN PROCESSING _ 15-tHU.CIER GROUP.
TF
FIN
CMARIoC
• IF THIS IS FIRST GROU', tOMPUTE RHeON. UNlU$ UTURNINO FROM ftO.
8NF TO , TCO
RCON
Tf
OElCON, HIGH
$F

• SET
LERO

~o~

IF

FI~

TO F I.ST ACORns ON FIRST CARO'LYS RUCCIii.
LO.,4

2'

00 . . 4
01116
004U

oe004
00416
00_"

u

0042.

00000

.

01250

OOUS
012)1
012S0
00000

01200
OUU
01214
01lJl

••
.,
Jl

16

U
JI
JI

olcn
00816
00'34

OUJI
,

OU16
OU16
OU41

-0116
-0114

2.74

OUU

Z

STARI

012.,

I

CU"
0124'

·0120
I

01110

,

1,'

I' IN'UT IS nOlI talas. lin

"III""

Z.

oun

,..UOI

OUt.

I

OU. .

OUlI

II

n

ou •• .1&

Olloa

$I

on ..
onoo

I

I

I I

01261

I, '

OIUO • LOGICAL STAU C~ LIlAoe ••
tNfl.1
OU10 LIIAOf•. TO
dTA'
OISlO
TO
.."' ... IfAa
A,IIIIT
fR
CI"O
016eo
DIS-II
00_ .. '-4
01610
at6i0 INIf
1,7
DC

•
.

0042.
004]4
00000

01111

,

OSC

004]'

OIl16
004"
010.2

011"

01120 • DCA FOR SEG"ENT "
OIUO CQliIll OSC •.,0 196 UOI2
0IU12012
os. RCOIO-'
0".0
OIUO

00161

01140
0lU2
0116_

·.24
,MAPENhl4
IF
"APENT+Il,lON
• RESET TCO INDICATOR,
TO
SF
leo
• 10 'RI~G IN SEGME~T ], TUNSMIT IIiI'Uf CONTRQ~ AND DO'.
10
CONI3
,AR".l
TR
AtRPRaG
U
O~ T .CO~T3
DIS
ocRG .-4
• INPUT CONTOO~ FOR SEGMENT 1. OUT 15 Coat LD 4 IS ERRDR MESSG,
•
RcON I S NORMAL RETUAlli.
RPROG DC
107
P
CSA O~T ,C '~OV

ac

2t
44

Dill.

B~.

DC
P4
CSA

01092
OliO.
01116

••

.UII
0 ••••
Olon
00. . .

.0....
.....
OUOt
00000

4

1620-144]

~ONI

TOR

PAGE

016)0

OSA

CHTLI.CYLOV

01314

01640

DC
P4
OSA

2.14

013U
01319
OIUI

TRANS

01)26

I.'

01326
01121

01650

OIUO

OSC

01670 CNlll

OSC

1.0

01)21

OSA

HSSCT

OIlU

01610

o

OC
I.lecooo
-OICOOCO
COMM. 14
DilDO TUNS IR
01110
10
001
.IOMEO
01120 • IF INPUI FROM DISK. GET FIRS! SECTOR AOOR. ANO GO TO RUO DISK.
01130
TF
CNIL'5."A'EN,0, ••
DISK INPUI
OI14Q
10
CNH.""EN'
8
DISK
01150
OORG .-)
01160
01110
TCO TRY!

Ulno

01180

OORG 2500
olno • WAI,e SEGMENI 2 OF LOAD!R ON O"K.
34
OCON12.101
0\800 T.Y2
31
OCONT2.102
01810
8NI RIGIIT2.1900
01820
H
0\130
8
UY2
01840
01850 RIGHT2 TRA

01142
01)'4

5 I

JI
41

OIlU

01190
Oil"

OOUO
00816
00915
00920
00164

00401
00402
00000

02584
02514
02560
00000
02500
00000
00000

00101
00102
01_00
COOOO
00000
00500
DC 000

onoo
025CO

02500
OlSl2
02524
02536
02541
OlS60
02H2

onl4

01110
01190

02591
00502
00503

01900
01910
01920
019)0
01940
01950
01"0
01910
01910
01990
02000
02010

5 I
-1342
I

olln

OlS91

OORG

-1321
-OH4
2

01113
OIHI

01160 oeOHT2 OSC 9.11960900,
11960900)
01810
OSA CARO IN-IO

OC
-0
B

5 I

5C2

2,0

LOADER
OORG '-3
• CMO INPUT PROGUM.
• GET INPUT oe .. CE COOE FRO" COM •• AREA.
CARCIN 10
Rue.IOMeD..
CUD OR TAPE INPUT
CF
READ
• TUNSM IT CARD IN'UT CONTROL. AN~ GO TO RUO A CARC.
CAR 0
TR
A.RUD
B
015012
DORG .-]
• IF CARD IN'UT. CHECK seQUtNCE.
IF "'E. BYPASS THIS.
eEND
CM
RUD.5.10

005C4
00512

34
31

41
41
49
)6

49

9

5 •

-0502

49

01266

OCOOO

00196
00196

00421
00000

,.JI

01013
00946

00196
OCOOO

00556

14

00196

000-5

00568
00580
00592
00604
00 . . 6
OOUI

41

01092
01092
00454
00019
01092
00454

01200
00015
-COOl
00'54
01200
-0001

00450
01063
01042

00100
000'1
OCOOO

00512
00524
00536
00541
0055.

57
1620-1443 MONITOR I

VeRSION 2

PAGE

MONITOR lOADER

BNE FIN
02020
BNF FIN.15..
CHECK CARD SEQUENCE NO.
02030
AM
SEQ 01
02040
C
79,SEQ
02050
BE
FIN
02060
SM
SEQ.I
02010
02080 • IF CARD IS O~T OF SEQUENCE. ~RJTE lAST SEQ. NO. 1f~ICH WAS CCRRECT.
02090 •
AND lO I. THEN HALT. AND RUD ANOTHER CARO.
WNTY SEQ-4
02100
TFM STOh9.lIoIO
02110
B
EUo12
02120
OORG •
02130
OC
1.1
02140 GET

,

OSA

02150

CC

02160

O~

T

.C nov

00640
00652
00664
00615
00615

~4

11
24
46

12
31
16
~9

00610

2 .1~

00610
00615
00611

OISK

00692

1,'

00692
00691

-0116
-0554
2

P~

OU

02110

5 •
-0164
1

02110

DC

02190 CONTZ

DC

1.0

0069~

02200

DU

DISKAO

00699

JUDO

3t 3

00. . '
001CO

CARD 111-10

00101

,

-0502

I."

001el
00101
00111

5

02210

OSC
00)
OSA

02220

.

02230

OSC

02240 • ACDaesS TO lUNCH TO
022'0 DISKX OSA

olSon

"If.

DeONTS.fOI

1

Doni
Dono
OOUl

00144
00'"
00114
00"4
01100

14
U

00 . . '
00164

-Don

49

00419
00n6

-0000
00000

U

oOin

004)9

14

01114

00101

.6

01200

onoo

OU60
DOIIG noo
02110 • 1I111T1 SEGM!NT ) OF lOADIII QN DISK.
)~

I

001U

DC
',0
-0000
• FOIl UIlIT RECOIID INPUT. HU CHAUCTER COUNT REACHED 15 •••
CHARI.15
STAU CM
FORK
IIIE "12
• IF SO. IIUD ANO'N'" IIICOIID.
" " C.o
•
CUD
DOIIG .-)
C
C"AIII.e
TCD TIIY2

OUIO ,lin

)

CARD OR TA'E UAD ER.OR.

02UO Rn
02210
OUIO
022'0
OUOO
aUlD
aUlD
Olno
OU40
OU'O

5 •

5S

onoo

1'10-1"3

U2lOO
02_00
02_10
02.20
02. 30 RIGMn

MO~I

38
8NI

CCUNn.l02
R IG.T3,l900

"t!

TRY)

TOR

VERSIO~

2

PAGE

MON I TOR LOAPER

TRA

OZ"O OCONT3 CSC

02460
02.10
"2.80
024QO
025eo
02SiO
OH20
025)0
025.0
025S0
02560
02510
025BO
OlS90
02600
02610
01620
02.30
02 •• U
02650
02660
02610
02.80
02690
02100
U2110
01120
02l)0

CORG RCON
SEG~E~T

3 HA~CLES A~ALYll~G AND LCAOING OF l~PUT •
TFM CNTL-2.01 S.12
• INITIAliZE CUeNTERS FOR NE_ 15-CHAlAe TER GRCUP.
(.,711j
AM
HERE
AM
t ~AA l."
TF
LOC ,CHAA.l, 11
C"'A 1"
BEGIN 8NR ~OTR""CHAR1.l1
tlNF NOFLAG ,CHARl,ll.
RECORe MUK INDICATOR
• FLAGGEO RECORD .ARK - START ~Eo GROUR.
TF
C>ARI.C
A
START
CORG · d
• UNFLAGGEO RECORD .A.K - GET NEo 5-01GI T ACC~.
NOFLAG , .
C"'AA 1, t;
B
... ERJ: .24
•

,.

CORG .-]

• IERO INOICATeR - READ I~ seGME~T
NOJRN
80
NUIERO.CHAK 1.11
SEEK
TC
CONTI
•• RfIII+1
A.PRoe;
TR
6
DIS
CURG .- 3
NOl ERa TFM REL .LOe. ••
BNF FLAC.CHAR 1.11
• FLAGGED DIGIT - 00 NOT RHOCATE.
T.FI' 102 •• IWO
B
02100
00
u,,2150

u2160
02710
02180
02790
02800
028\0
02820
01830
02hO
02850
02860
02810
02B80
02890
Ol900

'J:;9Q

:. < ~~

cJ ~
't·
~

I,

c:

.;. ';

,

J :t ...... C
n

~4

30

,: ~ '. ~o

.".8

~

)0

n

..

~

-1102

DC 102
01900
CCCOO
00000
CC500
00000
l

OIlC.

lb

00918

-09.'

a Ill.
01128
011.0
01152
all . .
01116

II

00.39
008.3
01283
COl63
01228
01108

-C01S
-coo.
0086L
-COOL
0086l
0086L

26
.9

00863
00120

00.39
OCOOO

II

C0863
011.0

-coos

01212
02210
OICl)
009H

e086L
00'"
022 ••
00000

••
,.16

00118
DI1I6

-1283
Dahl

C2024
01388

-1880
00000

21

00118

004"'9

DIll6
01092
DO' ••
00.15
0202.

01092
00000
00 •• 9
00. . 9
-168'
0086l
-0002
0086l
02057
-0001
00863

01296
01308
01116

5!J

VERSION

OZ5~1

01228
01240
01252
0126.
01212
01212
0128.

NUN-lERO INCICATOR

0251.
02UO
COCOO
OlSOO
COooo
00000
9

02591
011 0"

01208
01220
01228

• UNFlAGGED DIGIT - ADO RElCON.
FLAG
A
REL ,MELCUN
• IF RHOCATABlE PROGRAM. ADO "ElC~~ TO LOW ANC ENTRY ADDRess.
tlNF •• 4S,F IN
CF
FIN
A
LO •• RHCON
A
JIIIAPENT+lltRElCOt.l
Tf" 2021t,FIVE
• GET l ENG TH OF OA TA. SAVE AODA. OF FIRST POSITION OF DATA FIElO.
Ie
fEPtIIP .CHAR I,ll
00
AM
C .... Rl.2
TF
N,e"U,I.ll
TF
M.N
AM
Ct-ARltl
TF
TE.P2.CHAR I

TF

02S2"
02536
OlH8
U1S60
02H2

OIlU
OileD
01108

CORe --3

162C-14H MONI fUR I
02.10
.,2920
01930
0294U
01950
U2960
02910
Ul.BU
U2990
0)000
030lu
03020
030)C
01040
03050
03060
03070
03080
0]090
03100
0)110
03120
01130
U3\.u
03150
01160
03\ 10
03180
01190
U3200
0)210
03220
03230
03200
03250
0)160
03210
03280
03290
0))00
03310
0)]20
03330
033.0
03350
03360
03310
03310

38

02H ..

9.119612012
119612012
OSA RCON-2

Ql'50

02~12

01116
01128
OIHO
01)52
0116.
01376

II

.
26
\I

.~

,,~

H

2'
1I
.9
I.

,.
H
21

21
I'

oeooo

01388
OHeO
01.12
01°2.
01'36
0"'8

25
II
16
26
1\
26

OIHl
00863
02057
02061
0081>3
02139

01460

26

01189

00118

02-08

Ocooo

MONITOR LOADER

PAGE

TEMPI.REl
TO PROPER INDICATOR ROUTI ~E •

• U~ANCH
BR
6
2008, .4
OORG *-)
• tHREE INCICATOR - SVM80LlC AUDRf S5U. FLAGGED ANt RHOCATEU 8V seT.
THREE TFM SEJ-l,·.21,.
THRiE IIiDItArOR
se J ,0.8
B
DURG .-1
A.
C~AAI.5
S.
M.~.10
THREE
8P
B
S IGRE
DORO .- 3
• FOUR INOICATOA - NUMERIC ~UN~S.
FOUR
TO
TEMP1.BLANK.6.
FUUR INDICATOR
TEMPl.1
SM
JIll. 1,10
BP
FD~R
A
LaC .N
STARI
B
CORC .-3
• ElA. INE 5ECO~C POSI TlON OF OP ~ODE.
A. C~AR 1.1
0
8NF OO~T .CHAR 1.11
• FlAGGEO - RElOCATE Q F I £lO.
TFM SEJ-l, •• 21
B
SE 1.600 ••
OORG .-1
~ .. aVE TO HE l TINS TRUC TI ON.
C~ARI.l1
DON'
A"
M.12.10
S"
• FLACGED FIVE AND UNFLAGGED ONE INDICATORS - INSTRUCTIONS.
• ARE TMERE LESS THAN 1 DIGITS LeFT •••
FIVE
11',7.10.
FIVE INCICATOR
C"
tiL
NO
ARE
'hERE
LE
55
THAN
ll
...
• ~o - CM
M.12.10
Bl
LESSI2
• NO - E. . MINE FIRST POSITION OF DP COOl.
BNF
,F8.CHARI.1I
• FLAGGED - RELOCATE P FIELD.
IF" SEJ-1 •• ~21
8
SET.200 ••
OORG .-1
• IF FIRST DIGIT OF OP COilE ~AS I. DO NOT fXA~INE SfCCNO DIGIT.
IFa
TO
TE"P.CHARl.1I
TEMP
CF
C.
TEMP.8.10
8NE Q
CMARI.I
B
OONT
OORG • - J
THAN
12 OIGITS lEFT - EMAMINE FlU' POSITION OF ·0' CODE ONLY.
• L ES5
cHSI2 aliF NO,CHAR 1.11
• FLAGGED - RELOCATE P FIELD.
TF" SEJ-l,··Zl

,.

."

Gn

0lH2
01.80

,.

01 ... 0
01.92
015C2
015C2
0151.
01526
01538
015'6

16
.9

02019
02080

-1501
0-000

11

00863
02061
01.80
01892

-ooos

01546
01S5S
OIHO
0158l
01594
01606
OI6H

25

0118R
01789
02061
015.6
01283
00720

01219
-0001
000-1
01100
02057
OCOOO

00863
01660

-COOl
OOUl

16
49

02079
02080

-1659
0-600

11

ol6H
01626
01638
01650
01660

,.
U

'9

II

12
U

21
,,~

11
~,

000-5
01100
00000

01660
01672

12

0086)
02061

-0011
000J2

0168'
01696

I.
41

02067
018.8

000-1
ouoo

ol1oa
0112C

I.
H

0206'

OOOJ2
01300

01732

~,

01166

Q086l

017~.

16

••

02019
02080

-1165
0-200

2S
U
1.
U
11

Olnl
01411

0016L
00000
000-1
01200
-0001
OCOOO

OilS.
01166
01166
01711
017.0
01102

DIU.

DIU'

ol~n

0161.

ODin

DIU ..

••

oln ..

.~

01'"

0086~

OU46

16

0201.

-1161

OU26

01660

Ib2C-IHl
OHIO
OH8U
OH9U
03500
03HO
03520
03530
03540
03550
U3560
03510
03510
03590
03600
03610
01620
03630
01640
01650
01660
01610
Ul680
0)690
03700
OHIO
03720
03BO
03740
OH~O

~ONI

PAGE

MONITOR LOADER

VERSION l

TOR I

SET,200 ••
CORG '-1
• RESET CMARACTER COUNTER TO IEGINNING OF CAU FIELD.
fF
NO
CMARI.fEMP2
• TWO ANO FLAGGED ONE INDICATOR - CCNSTANTS.
A
TWU
CIo-AA 1,111,.
hO INDICATOR
• SAVE olGI T AT END OF FIHO.
SM
STORE
C~'A 1. 1,10
TO
GENUAL STORING ROUT INE
SAVE I.CHAR 1.11.
• SEt A RECORO MAU THERE.
A
TEMP I.N
SM
TEMP 1.1.10
TO
CMAR.,R •••
• TRANSMIT CATA TO lOAD ADDRESS.
TR
REL.fEMP2.611
• REPLACED SAVED DIGITS.
TO
TEMP 1. SAVE 1.6
AM
TEMPltltlO
AM
C~'Rlel.1O
• GO TO UPCAfE LOCATION 'OINTEk.
PLACE R
FOI..R+.I
.XI
P2
OS
0
oORG 2018
xx
8
DORG 0-1
D
hO
OORG '-1
T.Ree
8
DORG '-1
NSTOR
FOlR
~
DORG '-1
MsrO~
B
FIVE
oORG '-1
B
SIX4
DCRe __

.'

03160
03770
03780
031'0
OllOO
03110
01120 • ROUTINE TO seT FLAGS AND RHOCATE 5-QIGIT ACURESSES.
RELOCATING SU8ROUTINE
03UO
DC
5,0"
-0000
03140 • COMPUTE 8EGINNING ANO END OF ADDRESS.
PI ,CHAR I
TF
03850 SET
PI,SET-l,11
03860
TF
P2.Pl
01870
AM
0)880
P2,4
0)890 SF
NOP Pl. ,6
BNF NF,P2.11
0)9CO
0)910 • IF INCIReCT. SUBTRACI RELCON.
5
P2.AELCON,b
03920
0)930
B
88
0)940
CORG .- 3
U1950 • IF ~OT INOIRECT. ADD RELCON.
P2.AElCO~.b
03'60 NF
AM
SET-iol
03970 88
R
sel·1..6
03980
0)990 • SIX INDICATOR ~ END OF DATA TO BE LeAOEC.
04000 • REAe IN SEGMENT 4.
IF. PROG·17.LEAVE
04010 Six

Ib2e-IH) .ONI TOR I

04040
0"050
04060
04010
04080

OItOQO •

041CO •

V~RSJUN

2

.O~

lb

00863

02139

OIB80

21

00U3

02051

018qz
01ge4

12
2S

00163
00968

000-1
0086L

01'16
0192.
01'40

H

0\119
OlIn
0086l

02057
000-1
02262

01'52

31

OOHQ

0213R

01964
01'16
01911

25
II
\I

e 178R
olln
00863

OC,68
000-1
000-1

020eo
02011
02018
02011
0202.
0202.
02038
020)1
02041
020 . .
0205.
02051
02068
02068
02015

49

015'4
0

00000

4'

00000

00000

'9

01180

00000

4'

01480

00000

49

.,

01546

oeooo

01614

00000

4'

02201

00000

26

02201
02201
02011
02011
0220P
02172

00863
0201R
02201
-0004
00000
020lJ

02010
02092
02lC4
02116
02128
021'0

•

B
SEEK
CORe .- J
• STORAGE FOR NlMER I C BLANK 8LANK
DC
2.0
-0
TO
READ
IN SEGMENT 4.
• etA
CONTI
OSC 9.019614005
019624e05
05A NOleRO

01868

61

49

020lJ
02114

0044'
00000

02172
02184
02196

21
II
49

020lJ
0207'
0201R

-0001
OOCOO

02208

u

02261

-IH8

02220
02228

,V

01240

ITOR LOAOEA

04160
04110
04110
04190
04200
04210
04220
04210
04HO
04250
04260
04210
04110
0'290
04100
OHIO
04120
041)0
04140
04150
04160
04310
04110
04190
04400

DC

CARCAC OS
OISUO OS
LOC
OS
OS
N
CS
PI
OS
SAVEl
OS
$Avn OS
OS
TE'"
TE"'I OS
TEMPZ OS
xx
OS
OS
.~"
OS
COMM
C
05
HIGH
os
lOW
CS
10MEO OS
MAPENT os
ItELeON
SEQ
OS
TeC
OS
OS
ITAB
SVSSCT
TeO

"

os

as

OOH'

PAGE
00000

0222~

02230
02243

,

02243

-1212

02149
022,.
02256

2.14
NOlERO

02261

I.'

02261
02262

.19609
• 19600
.NOlERO'1I
."STOh9
,NSTO. . 9
,88+21
,RDtlO

-22)0
-0'"
2

, x
-U12
I

19609
19600
0121l
02061
020n
02201
00 . . .
00961
01471
01119
02U9
00000
00464

~RO+7

.el.'

• IF"2)
• SF'II
5.0
.46,.
,440
,419
,414

0

a
0
0
0
0
0
0
0
0
0
5
0
0
0
0
0
0
0

oouo

00419
00414
00444
00411
00402
00449
00414
00421
00440
1'661

,"44
,428
,0\02

.44'
,454

.HI
,""40
.19~6)

TRY)

04410
DOlt' 2500
04420 • Nit Iff Se'''ENT 4 Of lOAOElt Oli 01 SK.
04430 TRH
34
DCONT4,701
3.
OCONU t 70l
04440

.

LO 4 IS ERRCR .ESSG.
02244

04150 RM

44

22

0224'

os.

11
41

02164
02172

04120

0414P

26

MUST BE PA TCHEO I N ABSOLUTE OfCK.

INPUT CONTROL FOR SEGMENT 4 - CO~TI IS CO"
NUlERO I S NORMAL RnURN.
DC
101
P
OS, CONTl.CYlOV

CC
P4

21

021~2

04110 PROG

04130

Ii

9

02019

•

04020
040 lU

4~

25

02010

0-200

01858
01868

a
0
0
0

0

Oztoo
OZIOO

G%

onoo
onu

i4

II

02'14
02514

00701
00702

10

!tiC-I")
O~"I)O

0 .. 460
QHIC,

0"80

RI4~H

.Q~ITOR

fiNI

R 1l,.ro.1900

"BTR,

I.V.

VERSIU~

1

~C~ITOR

LeAoeR
02520

elSl.
02S'8
015.0
OIS?2
0251"

0"90 OCU~T" csc 9.119624005
11962"005
OHCO
OSA NOHRO

~NF

49

U
49

on91

a.2C,CHAA.l.U

04550 • FLAGGED lERa - 00 NOT RELOCATE.
00560
B
NUl
OHIO
OORG .- 3
UH80 • UNFL AGGEC zeRO - 00 RELOCAIE.
0.590
C... AR 1, ~
A"
8NF AOO.CHAR 1.11
04600
04&10 • ,"OI"eCI ADORess - SUBTRAtT REL'O~.
00.20
S
C_ARI.ReLtON.6
uo.30
NOI+12
B
0 .... 0
OORG .- J
0 • .,0 • NOT INDIRECT - ADO ReLCO~.
A
u.660 Ace
CHRI.RELCON ••
•• 20
0.670
8
0 .. 680
OORG .- 3
o.. no NOT
C~AR1,5
A"
OHOO • PlJT ACORESS IN CO~M. AREA.
TF
OHIO
M'PENT.l.,CH'~ 1,11
0<0120 • SAVE LAST SEC TOR RuO. IF 01 Sk I~PUI,
OH30
80
EX II
.10 MEO
IF
NAPeN '+5.CNTL +5
0"'0
u.,~o
MAPENT+5. )
S"
,..APENT •• , 3, C)
0".0
A"
04770 •
WRI TE Tt-Ree F IELOS ONTO tO~~U~IC.TION seCTOR.
TO
04780 EXI I
eN TLE • .,R". 1
TR
A.E ;(
04790
04800
H
015+12
aORG
04810
04820 EX
1,1
CC
P
04830
OSA CN ILE.C YLOv

-1272
J3
H

00411
01300

00000
OCB&L

01296
01304

49

OU61

CCCOO

o IlCo
Dill.

".

II

001.3
OU ...

-ODDS
0086l

01328
01340
OIHI

II
"9

OOIU
01380

00 .... 9
00000

21
49

0086L
Q13.0

00H9
00000
-0005

0lH8
01)'0
01368
0136.

II

00863

01180

26

00020

0086L

01392
OI"C,
01416
014a

4J

o IHO
CO'07
00.07
00410

00428
CC92S
-0003
00-03
OOob5
01471
00000

2.
12
II

01"'0
01452

25

01~9C

1I

Ol-.64

49

olon
00946

.-.

01471
01411
01416

~

-1490
-0554
2

048,40

cc

2,

7~

04HO

P'
CSA

H"'RL

0\488
014"
01'"

04860

USC

I,'

0.870 CNILE

OSC
0

1,0

04880

OSA

SY S se I

1620-1443

61

~ONIlO~

I

VERSION 2

~O~

5 •

01490

PAGe
01495

5 X

01495
a.QCD
OHIO
0'920
04930
04940
04950
04'16U

04Ql0
0'~8U

04990
O~OOO

050lU
05020
05030
0~0.0

05050
O~O.O

05010

.-.

·

CORe .-4

eCA FOR IURI-S LOADER RelURN SuaROuTiNE.
OSC
14. I H9200 300000'
1979200 3eceoo'
ReAe ANO ExeCUIE eXII SueROUT I NE.
OSiOO •
05110 Nell
IF" !jlO ,0
0~120
TO
eQM".AR"+l
TO
051]0
CO""tl.CNTl3
8
~80
05140
IRY~
0~150
TCO
u~o.o

U5090 CNTl)

0516Q
05170
OSI8U
OH90
05200
05210
05220
05230
05240
05250
05260

•

KEAD

IRY5

DORe 25CC
IN SEGMENT I OF ~QAOU AND BeGIN
34
OCONU.101
oco~n. 702
3'
8NI R IGHS0I9CO
H

8
RIGHTS H

lAYS

LOAoeR
14.019.COO0900S02
DCOlln oSC
01960000900502
DElIO TRYS

X

-1504
I

110. LeAPER

DC
801eocoo
-UICOOCO
THIUJ
IR
84.COM"
TOM AO+l,8
IFM CNILE-2.NEXI
EXII
8
OORG .- 3
INDICA
100 -UPOATe LASI lOCA II eN PLUS O~E INOIC.IOR.
• SIX
LEAve IF
t- IG~ .OEL
•
"OVf 11-£ ENIRY ADDRESS.
TF
"APENT + 18 .MAPE NTtl 3
•
IF NON-OI SK INPUT. ~EAO UNF MORE RECORe.
·.20
.10 MEO
"0
8
EX II
aooG
•• 21
TU
.10 MEO
RNCO
TF. SEa .0
8
EX I I

11

01900
OCOOO
00000
00500
00000

01272
01280

QI47.
01<081
01483

OltdqO

"'E
025.0
00000
Q2S00
COCOO
00000
9
5 l

02591
01212

'04510
aooG ~OZERO
0 .. 520 • l ERO INOICATUR - SET TCO INUICATOR.
00530
CF
TCO
~.,.o

..
H

J9663
8

01~C3
015C~

OUl6
01528
01~'0

11
IS
16
49

00084
00959
01'"
01440

00 ... 0
00008
-16~0

OOCOO

01548
0154.

26

00414

CUAO

26

00420

0041~

~157l

4J
4Q

01592
01 ... 0

OC428
00000

25

0lA13
00000
00454
01440

00'28

01S8.
01591
01592
016C'
01616
01628
01615

If>
16
"9

01635
01650
01662
01.7.
01 . .'
025eo

DC 118

OO~OO

-COOO
eeooo

I'
I.
25
II

.9

00510
00 •• 0
00 •• 1
00480

-COOO
00405
01635
00000

OZU4

00701
00702
01900
00000
00000
OCOOO
DC COD

02500
EXEC~TIO~.

02500

02512
OZS24
0253.
02541
02560
OZSU
02U'
02500

34
36
H

".".

49
49

on14

on60
00000
02500
00000

Oil"
l'

12

1620-1443
ANVE . .
CAROAO
CARDIN
ueONT I
oeONT 2
OeONl)
OCO~14

UCON TS
01 SKAe
lEHI2
lDaOER
UPENT
NOFLaG
"OLERO
RELCON
RIGHTI
IIGHT2
RIGMH
R IGH14
RIGHT.
aDC
ARM
A
BACK
BB

00982
19609
00512

.O~ITOR
~EGI~

BLANK
al
a
CUD
CEND.
CHUI
CIN
CNTLI
CNfL2
eNTLS
CNfLE
CNTLI
CNfL
CNT
CO,.
CONTI
CONTZ
CONn
C
enow
DIS.
DIS . .
DIS
OONT

02~84

02584
OHU
02584
OHI'
19600
01834
01266
00402
01208
01212
004'9
oa60
02560
02560
02560
02560
01348
00464
01013
01066
02184

VERSION
0116'
02229
01' 12
olon
00516
con6
00861
olon
O05H
0054~

016"
014.0
OU28
ooue
005U
00440
02210
C,U6"
01250
0043Q
C0554
00"4
001\3

'AGE

.ONITOR LOADER
00
C
EU
E

EXIT
u
FaKE
FIN
FIVE
FlaG
FORK
FOUR
GET
HEIE
HIGH
IF8
I~IT

ItMEe
IU8
LUWE
Lec
LCw
~ORE

00~34

~

CI660

~STOR

~ElT

01311

Dian

"IF
NoaM
NO
NOTRM
NOT
N
NstOR
DK
OUT

010)0
010"
01440
01411
0050)
010"
0168'
QUI.
001]2
01546
00675
01116
004)4
UI766
01309
00428
00440
015U
Q 1283
00444
00610
02061
02051

PI
P2
PLacE
PROG
Q

RCON
10
RUO
REL
RM
RPROG
SUEI
SAVE2
SU.
SEQ

olno
01112
00511
Oil"
0121.
OU"
020n
02041
00610
oell6
02201
020n
02000
02244
0\614
01104
oe'l"
cie, . .
00111
Ol262
01211
OC"8
OC965
0\240
00U4

stx
START
STOP
SToaE
TeD
to
TEMPI
TlMPZ
TEMP
THREE
THIU
TUNS
TUI
TRY2
TRU
TRV4
TAYS

TIIO

xx

ZUO
SVSStT

ENO OF ONE ASSEMBLY •

65

1620-1443
00010
U0020
00030
00040
OU050
00060
00010
OOOBO
00090
00100
00110
00120
00110
00140
00\50
00160
00110
00160
00190
OOzOO
00210
00220
00230
00240
00250
0026U
00210
00280
00290
00300
00310
OOllO

P~ASE

~ONITO~

I

yeRSIO~

SPS II-t PHASE a

PAGE

A

S TART OF 5, P S CO~~Uf\
OORC 221!
•
SYMBOL TAaLE PAUMnElS
S. BL
OS
sec TOR S PER 8LoeK
• 40 ••
SM.BL CS
SV"etL S PER nOCK
• 235 ••
SV.TBL os
HI-ORDER POS IT ION OF '''BOL TULE
• UOO),
LOSV~H OS
LU-ORCER POSITION OF SV"IOLIC BLOCK
• SVMTBL'S"'8Loll-l.
SBF ACD os
SVMaOLIC 8LOCK DISK AOOIlESS
• LCSV"B-SPBLoIOO·I.
LBLI" OS
LQ-URCER _LOCK LIMIT
• lCSYM'+12.
"ULIM DS
• SVNTBL-6.
MUI""" lllOlT
•
EMPIR ICAL seCTOR aSSIGNIOtNT paRA".TERS
I.TS'B os
11SCO.
I-PASS TOUL SECTORS PER SYM. BLOCK
,600 •
2'TS'8 os
2-PASS TOUL SECTORS PER SVM. 8LOCK
B'20k OS
• 5.
SVMIOLI C ILOC.S PER 20. ceRE
2PRTlO DS
.20COO,
l-'ASS RaTIO--INTeR"./FI~AL SECTORS
•
S.S clse ASSICN"ENT PARAMETERS
AIOAU DS
CONaOL SUTE"ENTS, 'H.A SUeRUUTlNS
• 18600.
AISCT OS
0131
, IHIDO,
A20AD DS
a2SCT OS
.55
A)OAD os
.19252.
TRI, CALL, GET-PUT AhD ASSOC OECL
alSCT os
.l9
A40AO oS
t 11881,
a4SCT OS
.27
a50ao OS
O£NO, ,to, aND SVMIDL TAlLE LIST
.18131.
a5seT OS
.1I
SSTOAO OS
,18'08,
SS TSC T os
.35
lOS TcAC os
.SSTDAO'SSTSCT.
MASTER SYMIOL TABLE
"OSCAO OS
,1'663,
"ONI TOR CO," SECTOR OISK ADDRESS
,18971.
BlOAO OS
P~ISE B INITIALIZATION
oono IlseT OS
.21
INPUT, BRANCH TAllE, SCAN
UO)'O B20ao os
.19200.
00350 USC T OS
.52
00)60 &lOAD OS
0Igeoo.
LI NPIT ,I NSTRN,tt ,OSONI.DU,DORC
00310 user OS
• 69
00310 &lMAD DS
.09100.'H&5E . , ",,,OilY ADDRESS
00390 140ao os
• 19069.
UTR.DAC,A~OIl.D~ES.DSI,DV~c, DIIM
00400 84SCT DS
.53
00410 B5cao os
.19122.
DSA ,MACRO,CDA,TU,DEND
00420 USCT os
.29
004)0 160AO OS
.19151,
CAU LIN.,LoaD.EXlT
00440 BUC T os
.30
00450"
~HASE A INITIUUATION
004.0 110AO OS
.82010,\9 .. , DISK-IIESTORE. PAilfUL
00410 I1SCT os
• 04...
SICTOR cOUNT-RESTORE I uaflAl
00410 . .DaD os
.170010..
DISK-PAGe ono GOODIES
004.0 .... AO DS
,16500..
CO~E AODaus TO INITIAUlf
00500 II 011 A0 OS
,09900 .. ,
COaE ADUnS 0' PAGEOHO
OOSIO 'GCON OS
,IIOIIAD'I
00520 OIMDAO os
,0"100.
01" eNTIIV FOR EQUIV. TAIU
00510 DIMSCT DS
.1
~o,
00540 IlIeao OS
18111 vaUNCE TAIU
,4
00550 III SC T 'DS
00560 PHcoao os

,II."

.

02218
00040
00235
16003
199'1
IS 998
ZCOC9
I5qn

o

o
o

o
o

o
o

Ol5eo
00600
00005
ZOOOO

o

11600
OOUl
UICO

a

ooon

19252
OOOU
L1.11
00021
IIUl
OOOJl
1190.

oeon

11.4)
19.63

unl

00021
IUCD
00052
19000
000. .
0.100
19069

ooon

19122
OOOZ'l
19111
OOOJO

Itn •
00004
11001
16100
0 ••00
0..01
04900
00001
00000
0000_

U.,.

U
SET
SF

o

o
o

a
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
a
o
o
o
o
o
a
o
o
o

o
o
o
II
o
o
o
o

020.0
02121
02201
00120
01054

OUtz
00421

all ,.

01119
02U'
01477
014.0
CLS04
OU42
02100
02100
OZ500
02500
02500

OU'O
oeooo
01140
19663

IHC-IH3 MONI TOR I

VERSiON

SPS II·e

P~ASE

PAGE

A

,26
00510 P.CSC.T as
,04t108.
SPS S~IROUTINE DIM ENTKIE5
Q0580 SUijOAO as
005~0 •
MONITOR COM"UNICATlC~ PAUIIE TEIS
MOSCT PS
t 16(00.
MONI TCR ~QIIM SECTUR MEMORV AOURUS
,MOSC '+2.2.
01 SC O~TPUT CODE
00010 MUUOC us
,fiilOSC. '+23,
00620 MOCTOC OS
CD- TP, OUT" COCE
,M05C'.)I§,
NAME
00610 MO"'AME as
,fIIIQScr+1Q,
00040 MOII)NO as
10 N""eu
,"'OSCT+41.
OS
MANT. LEItj"M
U,O'5~ MOMl
,MOSC T+41,
00600 IIOS8NO US
SUB. SET
,JIIIO SC T .,.4,
NUln.DIGIT
OP·'0 "ONOI5 as
,41b,
HECUH CONTROL A"'O SPS INPuT
U.OUU MOtXEC as
.415.
000~0 MOMAD
os
MtMORV AODR
00100 SV seAL os
,415.
SYSTEM COM"ON ACT ION lOCATICN
,4S1.
00110 NOMX as
NON-E XECuff FOR JOO ERROR
DS
,23t1'
0012U PCK
00130 •
10RT ENTRIES
, ~65
CS
00'7"0 10K T
,532
00150 10PT
as
•
566
IUCT
as
OOhO
,52C
00770 10Roe CS
00780 10SK
as
,!J~"
00190 lOCAL
p~
.cell6
,C0796
0080U MONCAL os
,19183,ADORHs OF TME LOAOER'CALLE~
00110 laC SAO CS
OOllO •
SPS COM-UNICArION AReA
00H30 •
00 ... 0 •
os
I
00850 OUT
r,s
80
008~0
as
2
00870 lEPQ
os
HI
00880
00190
DC
I,'

uu.aD

C09CO
00910

l~TH

as
DC

00026
0410H

0
0

16000
100H
1602l

0
Q
0
0

aon

16039
16041
16043
10044
00426
0041S
00'15
00457
023U

a

OC5U
00532
0056 •
00520
005'00710
00196
IH8)

a

02218

I
HO
2
81
I

0
0
0
0
0
0
0
0
0
0
0
0
0
0
0

0229~

023CO
02381

0238l
02381
02388

I.'

1I,212121l121, ,
OC
-2121212121
21, CO (020)0405060 7ecoo'
00930 TMINGS DC
- 00 1020 3e,c~co01CCCO'
us
19
00940 COLI.
2
00950
O~
DC
00960 ~U~B
-OOCOO' '
00970 JS IBL
OC
11 ol232ll3n2"
00920 AJUST

IN~TRLCTlON

PARITy TABU

"

AlPMA PARITV TABLE

02399

II

02420

21

02<39
02441
02 .. "

19

02459

II

02469

10

2

7

- 32 )l 32 1232
OU980 EvutD
ooqQO •

01000
OIOIV
01020
01030
01040

5 TPCS.
SIT YSW
STPOS.
TY l"'sW
CCI~Sw

aMES PU I TV TABLE
10,CIO\010101, ,
OC
-IOIOIOICI
PRUCE SSOR CONTROL S.I TCMt S--FLAGGEC I'O~, UNfLAG~EO O-CFf
P~NCM snOBOL TABLE
I ..
os
TYPE SVfleOL I A8LE
as
I ..
PKI~T sVI'BoL UHU
I
..
US
atGIN TYPE_RlTER INPUT
uS
I ..
l,L ..
IEGIN CARD I'''UI
DC

02070
02411
02412
02413
02474

Gi
162C-IH3
01050
01060
01010
01080
01090
0110"
01110
01120
01130
U 1I4U
o 1I5u

PTINSW
fOSTSW
IPSSW
KEL SW
LSCCSW
l STY SW
L SPR Sw
PCNUS.
I",TR SW
K I L suo
CIVT

as
as

os

os
OS
CS
as
us
OS
OS

~ONI

TOR I

YHSION 2

SPS II-G PHASE A

I ..
I ..
I ..
I ..
I ..
I ..
I"
I ..
I"
I ..
S ,C

PAPER TAPE I"'PUT
ERROR STOP
TOe PASS "OCE
ASSEM8LE KHOCATABLE
LIST tARO
LIST TYPE_RITER
.LIsT PRINTER
PUNeM IESEQUENetC SOURCe DECK
INTURUPT
NU sLOROL II ~Es

s ..

OHJ~CT ""MINE

PAGE

BEGI~

02415
02476

02477
02478
02419
02 .. 80
02481
02482
0248~

02484
02489

DC
-0000
01160 INCOOE DC
2,5

-,

011 70 08JCRE as
OLl8U PROC~E DS
01190 PR TlIM OsA

02491

I ..

sue

02496

PROCESSOR MACMI Nf SllE

5
I
5 x

02497
025C2

02502
012eo

HClI~

01210

CSA

l~L

OC

I,'

1M

-0000
5 x

025C7
02508

KOC09
I

01220 SltNT

STATeMENT COUNT

02513

01230 MlACO

MIGM AoORESs

02518

01240
01250
u1260
01270
0128U

OC
~,l "
-0001
IlC
5.0"
-0000
L
05
2 ..
NOISE OS
I
sunNO CS
2
5
P I"UP as
nc I'd

025C7

LENGTM OF MANTISSA

02520
02521
02523
02528
02529

J

01290 I STAT

02559

01300 SPSGM
01310 INK_M
U1320

OC
lO,C'
-OOOOOOOCOOOCOOCOOOOCOCOOOOCO'
OCM
as
OC
I,'

013)0 TEMPI
01340

as
OC

02511

01350 IMAo
01360

os

01370 ONH

10.1
DC
-000000001

OC

)0

02560
02565
02566

onu
onn

I,'

O2n.

I,'

01516

10

OUIO •
01390
01400
01410
01420
OIUO
01440
01450

•
•
as
CFF
TFM
8
ij7
CFFOEF OSC
l2

lacs CALI-LOAD PRoeUseR SECTION-NO IlLiC
5

025'1
02592
02604
OZ61.

lou,"n

IOGToCFFPEf,7

CfF"'l t.e.

2,21 ..

oun

A8$O~UT~ DI.SK,IIOT IlIONG UNGTH

GS

5

"••"

-2615

00'"

DOS. .

on.J

2

-un

162C-14'1 MONI TOR I
Ol"~O

CFF"

01<10

VERSION 2

SPS II-C PHASE A

PAGE

OSA

02629

DC

02629
026)0

I,'

01410 MUR I
OS
01490 10 AC OR DC
5,C"FILE AODRESS OF INTERMEDIATE OUTPUT
-0000
015eo SY~T'O DC
I),0260Q"FllE ADDRESS OF SYMIOI TABLE
-2600
01510 saOUT DC
2,0
-0
4,ceOl. 1t
OISlO PGNU" DC
PAGE NUMBER BUCKET
-001
01510 •
01540 •
E~D SPS COMMUNICATle~ AREA
01550 •
01560 TYP IN

olno
01510 TAP IN
01590

OSA
DC
-6'
CSA
DC

5 X
-0000
I

02611
02616
02641
02601
02hl

I~PLT-IO

02652

:3 I 06'

02652
02655

INPLT-IO

02ue

3,OS'

02660
02663

5 X
-2171
3
5 X
-2811
3

-8 '

01600 CARDIN DSA
01610

INPLl-IO

DC
JO'

] t

OlblO SB_ ..

DC
-0
01630 seCNT DC
-0
01640 ACDCOW OS
01650
as
os
01660 ALP ... ,
01610 BElA
OS
01680 DIG I TS CS
01600 Cl fR fR DC
01100
01110
01120 INSAV
01130

026 . .

10'

2. ac

0267]

2,C

02675

5.PICKUP

02521
02616
02616
02696
02699
02100

5
I
10
10
1
I

02701

26

I
10
10
1
I, a

CSC 2b, C
OOOC eoeecccoecccecc ccocooo
OSC 21, t
cooocccecococooccoeecc ecce'
DAS
61
OAe 5,

01740 INPUT
01150
01760
01770

OAS
OA S
OAS

•66

DC

1.•

~11BO

CAS

I ,.

6!.l

1620-1441 MONI TOR I

VERSION 2

02721

27

02155
021n

61

02887
02190
02901
01017

6
4
66 X
I

01030

I X

01880 ACCRS

\I
I,'

032'9
onoo

01900 ERlA8
01010

.

2,·'

onOl
all 15

01920 LOPOUT DC
10. C
-000000000
,
CAe 2,
01030

0)321

019_0 IAe

OllU
OHH

01950
01960 FLCRM
01970
01980
01990
02000
02010
02020
02030
02040
02050
02060
02010
02010

DC

1, • f'

5
5
5
5
I
5

03281

DS
DC

12
I,'

211

Oll81

olnu

os
UC

2
2
2

PAGE
03040
03261
03266
01271
03216
01211
01212

,

5

SPS II-C PHASE A

INPUT 2 DSS 217
SUBENT os
~
OMSV
5
OS
DMSVW
5
os
PLACE os
~
ERROle os
I
S, C
DC
-0000
s,c
0lB60 lIMITS CC
-OOCO
01810
DC
I,'
01700
OIBOU
OIBIO
01820
01830
UIB40
0lB50

UAS
OAC

5 X
-2811
3

026"
0261\

II

6 X
2 X
10
2 X

OH29

12
I

OH4~

FLAGGED RECORD _ARK

SMOOE
OCSV

os
OS
OS
TEMP
OS
CO.M
OAe 22, AE-ENTEA sureMENT.'
RE-ENTER SUTEMENT.'
SAlPHO DAC 5, CCOOO
00000
•
•
READ INPL T
•
P~ASEA TO_
ERMOIG.O
eo
READ2, COl NSN
REAOI, PTINS.
80

I
I
I

03346
Oll41
0]]41
03U]

~

on55

22

03399

~

03401
0)420
034]2

U
4)
U

onll
03640
0)601

X

00000
02414
02415

02090 •

02100 •
0211 0 •
02120 READ]
02110
02140
02150
02\60
02110
02110
021'0
02200
02210
02220

READ TVPENAlTER
RCTV
TFM .+JO,lNPU'+ll, ,
AM
•• 18,2,10,
TFM

OAt
,
CM

BL
TF
TF
TF
TF"

.-., .

OVlRl AV INPUT AAEA Nnw
AeCOAO IIARKS

OJ"IO
OJ""

1,' ,-

.-6,INPUT+140
--36
INP~T-2. CURElh'
INP~T+IO, CLEAEA+II
INPUT+U. CLEREA.?
IOAf,"2)

OJ444
014"
OJ4"

DJ4U
01504

on ..

OJUI
0"40

711

onu

.
J4

00000
OJ ....

II

OJ....

I.

00000

I"

014. .
OJ4. .

00102
-2'0'
000-2
-0000

1 X

'"

..

I. 01. . '
I, onn
I ' 01t0'

00'"

2

-)021
OUOO
0110'
01111
01101

-un

\b2C-l .... 3 _aNI TOR

02210
QZ240

02250
02200
02270
02280
02290
u2300
02310
02320
02330
021-.U
023S0
02300
02370
02380
02390
02'00
02410
02<20

•
•
•
REAOI

.

•
•
REA02

R21lE

D
B7

"NF
DNR
TFM
CM
SE
IF
TO
10
T~

HM
8

•
025\0 •
02~20 •
02530 •
025'0 RSCAN
02550
02500
02570

PAGE

on64

OO§~~

-Z~48

OHII
0]600

49
41
)9
49

0)910
OHSS
OHH

00400
00100

0]608
0)'20
03632

I.
49
49

OOSoS
OOS"
0391.

- 301l
-205'

0),'0

I.
49
44
H
I'
14
46
2'
ZS

005'S
0050'
OU08
0)100
Ola77
02877
Cl808

-3',]
-2'"

O)H~

IORT, •• 23
lOG T,T API N- 4 • 7
PRO ST'"

READ
TFM

10

OZ"O
0,<50
0246U
02410
02<80
02490

SPS II-t PHASE A

READ PAPER UPE

IF"

8

OZ430

VHSIUN Z

R
lULl,TVPIIII- .. ,7
BNC4 PAGST~
WATv CORM
READ)
"7

STATEMENT FRO. CARD

IORT, •• })
IOGT,CAROIN-It,l
RSCAN,PCNUSw
·.2",INPUT-IO
INPLf.., IO,CCtiO
INPLf-lO.I"'tlO
RSCAN
I",PliT-Ol, SALPHOt.
INPLf-C"", :;TCNT
INPLI-O.,STCNT-I
INPll-OS, S TCNI-Z
INPUI-IO,SICNT-)
IORT, •• ])
IOPT,CAROIN- .. ,7

0]'~2

0)'"
0).1.
O).U
o HCO
0)112
0J124
0)1]'
OH41
031'0
0)112
OHS'
0)19"

H
H
2S
10
.~

OUIl
e2881
02819
02877
OOS65
00S32

-]020
- 302 7
00000
2

onlS

u2~OO

02580
02590
02000

FIND RIGHTMOST CHARACTER OF sureOENT ANa PL ACE A
RfCORU fIIIIARK AFTER I T
TFM
TFM
HM
OAC

RS8D-I,INPur+119
RSijU+ll,INPUT.14C

SM

RSBO-l,2,lO
RSHO+l1,2.10
PROST~ •• -.

s.

(J2b \0 .SDC

02020
026)0

OZ482

02811
000-0
OCOJ'
01200
0]401
02513
02512
02511
02510
- 3007
-2'"

80
BO
C"
BH

U2b",,0 •
U2b!lO •

~StS0t11 t

1,

I

,b

,.

PRcsnol,.-.

io($1I0.11,I"'IPUh18
k$(,AN+24
CLEAR FDA.

16
10
10

03819
0)891
0389J
I

03844
0)85'
0)8'8
0)880
0)892

12
Il
43
43
14
'0

0)879
0)891
0)916
0)916
0389 I
038)2

000-2
000-2
OCOOO
00000
-/90S

49

10862
0)9S2
C2909
I

00000
OZ907
-0000
2

0)90~

INTER.EOIAT~

02bt.O •
0<670 P~OSlw
02080
ulb'jU
02700

0
HNR
H"
CAC

PRO CON

02710
U272U
02730
02140
02750
02700

TR
TR
AM
TOM
RO
TeO

INPLT'::, ClE~eR."6
1!I4S,AV-l, 1 IIIPl. T+ 19
STCNT,l,lO
lDAt:\S .... loll
It 3£ , 2P ssw

O~

•

011,'-""

IPW I
OHI'
o)na
0]940

··2"
, I NPUT-20
INPU+22, OCOOO
I,

03808
03820
0)8]2
0)8H

t ,.

.~

16

O]CJ51

0)952
O]9H
0)91.
0)9a8
040CO
04012

INfll T 2.<;9

31

O)O~O

11

02154
02513
08030
0.0).
03139

II
15
43

n

•

02146
02906
OOC-I
OOOOJ
OZ417

00000

71
ItlC-loCt43 .ONITOR I

02170

DC

1. ' ,-

027BO
02790 OE
02800
02810
01820
028]0
u2840

TR
A.
BNR
IFM
H
C.
BE

lNPU2H\, I NPUTINK. R~, 1,10
.·+l",INPUT-IQ
INPl,T-IO,OO.lO
Pl ACE, ADOCOW

u2~~U

C

OIB.O
01870
02tUIu
02890
02900
029 \ 0
02920
02930
OH'O
OHSO •
02960 •

"NH
TF
oNR
87
CO
"NE

02~10

.

02980 RLUP \
029~O

03000
03010
030Z0 RlOP
0303(; •

U3040 E02
03050
030.0
03070
03080
03090
03100
03110
OH2u
031 )0
03140
031S0
OH60
on 10
03180
031 90
03200
03210
03220
032 ]0
03240
01250

8O

80
HT.

IF

BO
TR
BO
C
SE
TF
TfM

•
•
•
•

OU10
0)210 •
03290 aPl
OllOO

HI AOORESS TO HIAOO

I~

0402'

11

0",,0)6
U1tO-'8

1\
4>
I20

14
'0
24
41
20
.~
.~

I41
H
4)

11

0]048
02505
0'072
02877
0)Z16

02528
041'4
0252B
04llt4
02518
0'1"
0428'

02887

02816
000-1
02817
000-0
02528
R9 •••
01200
02518
01100
02528
C2887

04224
04212
OH08
09'86

OOOJ'
0\200
03271
02.11
-3'01

04283
OH83
0'283
0415'
0423.

-2885
000-2
-28Q9
01100
00000

LASH FIELD.

Rl OP.l1, I t-IPUT-2

04124
04216
0.248
0.260

KLOP.~1,2tlO

10
II

14

OH12

'6
'5

OH8'

16

01011
I

KOOOO

21

01112
02197
04144
0)0.1
0119.
02111
0 •• 0.
OHI3
025U

07331
02711
OZ.17
02816
02476
02897
01100
02891
-0000

04401
0446)
0446)
0450.
04416
02905
04500
03041
041 ••

-2191
000-2
-2907
01200
-0000
02101
02411
02nl

0455'
04555

021'"
02"00

OHn

EPRINT ,E'RINT-\
INPl.T+IO. CLEAER>II
• +2"', lPSS.
INPl.Tz+a, INPUT-II
fReaR, ERSTS.
CLERER+ 11, INPUT+lO

0'2'6
OHOI
OHZO
043J2
04144
04156
041"
04310
04392

• + 36
fRLAB-IO oJ NPUH I 0
JNKRM,C

Z6

4J
Jl

..
4J
2'

26
16

PRatt: SS QP CODE

BE

Olao

PAGE

04060
04012
0408'
0409.
04108
04120
04132
04lH
0415.
0416.
0'116
04\88
04200
04212

ADDeo .. , <;qqqq

.+48
AODCOW,HIAOD,.
• +'4
t" 1 ADO, ADOCOw
.'.2C, INPuT
ER 2
INPLT ,14.10
HOP\
.+2"t,ERROIG
P~ASfA, 2PSSW
OL TPUT. PHASEA

CHECK FOR RECORD
TFM
AM
CM

OMOP

P

RlOP+ll.lNPUT.l2
OP
.- 36'
RECORD MARK IN LABlE F IElO.
IFM EVAlER-l. 2eooo
1, • f.
OC

BT

OP

SPS 11-0 PHASE'
04023

CHECK FOR RECORO MARl(
TF.
A"
Co
HE
BNR

VfRSIUN 2

~'U

IN 0' CODE.

R"'(W+l~,lNPUTtlO

04.C.
04416
O"Z'
04440
04452
044"

R.. OP H .2.10
IHW;:;+.1.INPUJt20
0'1

.,..36, •• 0,1
INPLTtI8. CLEAE.>l
• +2", 2PSS.
TR
IN p uT2+ •• I HPUT-II
EA 3
81
lESI FOR ABSOLUTe 0' CODE
TO
.+It'. tNPU1'+U
•• :H f !i-)~!JY t 1)
TD
BNR
TF

80

06411
O'UI

ouoo

7%

I',

li
14
46
45
Z6
4J
JI

...

DUO. '25
ouzo U

•

161C-IH3
0])10
0])20
0]))0
0]]40
0]]50
0]]60
0])10
onlo
0]]90
0)400
0]410
OJ420
0)4]0
03HO
0)450
0)460
01410
03480
0)490
01500
O]SlO
0)520
03510
03540
03550
03560
onl0
01510
0)590

MO~I

TOR

VeRSION 2

04512
04544
0455.
045 ••
04510
04592
041>04

•• 21. 71,10
UfO' _
CLERER<],INPUT12
04684
0469.
04108
04116
0412.
04140
04148
04160
04112
04184
04196
04804
04816
04828
04840

e-.

EP.INT,EPRINT-I
EACOR, ERSTSw
fFM
INPI..T2'1. U.fIl. 'II
INS IRN,LOLU
BT"
LOCATIONS OF SEtTlONS OF OP-tOOE TULE
03.'0 •
03610 OPLCT8 OSA A, B. C. 0
03610
0]640
0].50
0)660

PAGE

SPS II-C PHASE A

CM
8NE
C
8NE
TO
TO
8TM

BT
BO

14

47
24
41
25
25

11
I.
I.
41
49_
26
26
2.

12

49
II
45
4~

24
41
12
12
49
26
24
46
49

045H
04.16
0210]
041>\6
0)040
OJ041
10256

000.1
01200
02905
01100
02899
02901
J01l4

04159
C46l1
04141
C4l41
041\5
04121
04122
04121
04121
04815
04104
04848
02101
_'4660
0 .. 611
04159
04141
02BO
00000
04928
04716

-2905
-4921
02891
00000
04159
04159
-2894
-0000
0411N
00000
01100
CC0-5
000-2
OCCOO
02321
01200

0"4'
04859

16

01011
I

Leooo

04860
04812
0.4884
04896

27
41
16
17

OH12
07196
01041
10256

0133\
02416
00-41
-1414

5 x

04912

J1515
J1612
J1956
J4615

04912
04911
04922
04921
016'90 •

01100
01110
01120
0]730
03140
0)150
(J1160
01170
OH80
OH90
01800

•
•
•
OK

uSING THE LAST OIGI T OF IHE opceOE ENTRY COCU8 IS
"OoIFIEO TO ~RANCH TO THE CORRECT ENTRY IN 8T8L

TF"
TO

A

SF
COU08

B

., Ie

SAVRST, ,,-1
B
OORC ·-1
••• -6
B

\62C-144l MONI TOR
03810
0)82U
U)"O
0]"0
01850
0)860
0)810
0]880
Ol890
01900
0]910
0]920
Ol9)0
0)940
0)950
0)960
Ol910
03980
0]990
04000
04010
04020
040)0
04040
04050
04060
04010
04080
04090
04100
04110
04\20
04110
04140
04150
04160
04110
0411004190
04200
0'210
04220
04210
04240
04250
04260
04270
04210
042.0
04JOO
04)10
04120
o.no
04J40
04150
04160

04921
04Q40
04952
04964
04916
04986

GGOOO<6 ,8 TBL
G0008 190
0'200
05210
05220
05210
05240
0'52'0
052.0
05210
05210
05290
05JOO
OBIO
05120
05330
05140
05350
05360

REI ER
SREI
TOB8
8UCR
•
SI

TF"

BT
Bl
Tp.
CF
81

41

10
I.
16
10
16

Jl
J2
15
IS
IS
Jl
I.
16

...
Jl

32
16
16
49

•
CM
8E

JOb61
J 1060
JOll6
J0816
JO'IO

00000
03299
08035
05)95
02696
02686
102)5
05399
080)1
05891
OS9qJ
02421
05081
05.85
05112
02421
lOllS
05081
05685
05760

00000
OH09
0-000
OOJOO
02586

05628

14

056",0

41

05804

05.52

OSb6"

I'
2.

0~616

Jl

080)1
02419
02418
0
0
051>85
05393
02'22
02422
05HO

I

75

VERSION 2

OS.88
05100
05112
05124
05J]6
OS He
057,Q

II

15
II

.,
I'

B S",O
A5ET+l1.INPUhlQ
AOR),E .... Al .. D-Ll
GE T t • • 12
MLl T ,MUl T-1
ADOR.S,AlP""A,O
RETLRN-ll.AOR$+1
E'VALA()-q.100,9
tiE TA ,ONE 1
MPYS\Ij. 0
AOAS+ld
.'24,RSYMS-.
RClAdtlO
CO/l'lSPC-'.5b
AOURS-4
TOtiB,RElS-.
·'2C,EVALAO-1

10

-cooo
00000
OCOOO
OOOOJ
00001
ce009
02400
000-1
000-0
05397
02400
00 COO
000-1
OCO-O
OOOPO
a I lOa
OCOOO
02901
00000
000-1
00000
02'24
000-1
Dlle'

11

01012
I

051.0

II

02906

01908

05112
05184

H

NCOOO

02901
0000 I

057Qb

15
49

05628
05Q93
0581>0

0580'

4J

06208

02901

0581.

41

05816

02Q06

05828

4"
15
25

051.0
080)1
05961
0589.

OCOOO
02906
05]9]

ObilS"

-5864

0.,9.
03299
05981
05395
02696
08038
OU91
05992
08013
05512
OH95
0.U8
060,8
C.1I8
OIOll
06188
OIOH
06108

0.795
02.8.
05891
OOJOO
0258.
00000
00001
08014
OCO-I
OCOOO
00000
02418
0540)

PAGE
058]6

05848
05860
05812
O~88"

0589.
05908
05920
05932
05000
O~CJS6

05968
05980
05992
0600~

0601.
0.028
06000
060"
0.060
06012
06084
060q6
06108
00120
061 J2
061"
06150
06168
06116
00118
06200

10BB
A.C TR,O, 10

SREL+12
RC TR tl dO

·'24
SREl,AOORS
RCTR,-1.LO
·+24t,AOORS

SREl
RHOCA II O~ ERROR

EVI
RlCJCSliIf.ld1

e ~'LlO-1
EVAlAO-l •• 6
INPl..T+20,2l.10

COM"E R
BSw,O
c~eCR FOR ASTER I S~
INPt.JT+20, 14,10

ASTER
C.ECK FOR DOLLAR $IGN
eM
INPUT+20,IJ,10
OOLLA.
BE
TO" LASL
Bl
COMS'C+20
oSHa DOLLAR 80 .+32,QOl
TFM COl.L •• 10
05310
.+44
OH90
81
CM
05400
DOL tlt10
05410
8~E
OOLLU-20
SF
COll-l
05420
05430
CF
"£0-2
05440
TOM tV .. t.AO-l1.1
05450
TO" lASL
054",'
8CMSP(-12,QCL
80
05410
81
8C"5P(-60

02901

SPS 11-0 P.'SE A

BCM5PC-IZ

EVAlER-2,71110.,
EPRINT.CPAINT-l

OS68~

H

11
21
KI
25
I.
2.
15
15
40
II

49
32
44
H

49
14
O.
14

.,
44
10
44
00
16

21

"

IS

13
49

CHC, FOR COMMA
CM
HE
TO_

10256
loa6
10256
102S6
10250

15 PRESEN7

""

Bl
TOM
TO
BO
8T.
81

05)92
OS4C4
OHI6
05428
05"0
05H2
050H
05416
05488
0550C
05512
05524
05536
05548
05560
05512
05580
05596
056C8
05.20

11
11
11

05681

,. - 2
DOL t1 dO
TO_ E 'VAlAD- 11
(OlL-11,(Oll-15
T'
CM
COll-ll,7.10
B'E ... 2~
SYMBUl I' OPER'~O CONTAI~S .ORE T~AN SI~ CMAUCTERS
UR NL,wSER I~ OPERAND HAS _ORe I.AN Five DIGIIS
0'800
E\lAlER,SOOOO
04810 ERlNfH o 1M
I, ' ,.
u4t82u
CC

04920

11
11

C~ECI(

04.80

CF
OS
as

05H2
053H
05)50
05)68
05)80

FOLLO.ING CLOseD $1I.RQII1I N~ eVALUATES
SUTE~eNI OPEUNO

SPEC

04700
04710
0472u l ABl
(J411Q OOL
0474tO
047')0
{J4160
O~ 7 70
(j~ 780
047QO

':

080H
06144
0611.
07010
01)12
07108
08035
05403
OS'Ol

OOOOJ
00000

06208
06220
06232

10
06

15

02901
05184
01031

OOOK]
01200
00000

06244
00256

14
46

02901
0614.

000J4
01200

14

02qOl
00112
05681
05652
06144
02439

OCOH
01200
00000

•

06268
00210
06292
06100

OUI2

U

06116

000-0
01200
000-1
01200
032.,
OOO-J
03299
01200
PI110
01131

063,.
063J6
06366
OUU
06161
061.0
061.2
06606
06616
06628

46

U

4'
43

16
4'
14
61

JJ
U
15

IS

aUla

05615
062.2
026J6

lOllS
0519J

os 61 7

U' 05760
6'

05712

05685
000-0
000-1
01200
00000
00000
00001
00000
05685

1I

Ib20-I'H _ONI TOR I

OS480 •
Q'j4t90
O~~OO

~USION

PAGE

SPS II-C PHASE A

DOllAR SIGN I"PROPERLY PLACED
010' )6
06441

E ~ALE R t 50000

ERCH" "T"
DC

l, •••

11

01012
I

15

08014
06631
OH22
065 ••
06562
02H9
OH22
02.22
0651.
01566
OH27

12

NOOOG

O~~

10 •
•
10 •
OSS'O
0~5~0 GET

0~~20

CLOSED ROUTINE TO EVALUATE COLLECTEO SYMICL OR INTEGER

O~~

RSYMS"',O

0~~60

OS
TO"
80

0~~10

t"

COll-l7.
loCH"

0~~80

"H
BE
TO"
TR
0~610
0~620
C"
05610
BNE
8NF
0~640 SCHAR
TF
05650
0~b60
R7
8NF
05610 6CHU
SF
05610
SF
OS690
87
O~ lCO
05110 TRNU"B C"
BH
05120
OSHO
TO"
O~,.O
TF"
051S0
S
S
05160
TR
OS110
0~1I0 TRNU" I TO
TR
05190
TF
OS800
BNR
05810
OH20
TF"
0~8)0
A
0~140
D82
05150 .ULT
OS860
SF
TF
0'870

eOlL,a
COlL-l1. COLL-IS
eOlL-ll, 05,LO
.- 36
l8ACO-24, HEO-l
COll-12. Heo
l8ACO
LBACD.

05890
05900 ASIER
OS910
0,920
05Q30
Oljq40 ASR

Be2
80
DT"
8T

OS9')O
O~960

0'910
0'980 TESI)
0~990

06000 TFACC
06010
06020

HEO-2

ERlNTH
NUM8-1, ,It

TRNl"I+ll.COLL-2
TRNlJ" 1+ II.COLL-I 7
TflNI."'l·lL,COLl~Ll

NUM8-5.NUM8-4

NlJ"8-1
COll-17.COLL-15
-.23,--13
TRNU"I-12
Al P"'A
AlP,..A,NUM8-1

.. G
Al PH. ,8ETA
90
AlPt--A,qq
BE TA,qq

,,0
TE5T3 •• VAlAO-11
GE T. ..12
J4Ull.~ULT-l

TF~

EVAlAO-IO.ll.IO

BNF
TO"
BO
61

•• 36,A.ELSW
1 til

JIIIPY Slil ,

SRE L- 32 ,RSYMSW

CQMSPC-!6
TFACD,EVAlAO-1O

eo

S~2,EV"'LAO-q

80
TF
BT
TF"

Al PHA ,Aooeow

MUL T tfi4Ul T-l

ubLOo

VERSIUH 2

I.
H

.6
I~

.
.
11

I.

H

26
.9
32
]2
4"

H

H

15
16

22
2l
11
25
11
26
.S

16

21
M2
H

12
26
26

E~

E VALAD-9

AS'
5
59007

1,' ,.

Al e. "T

061S0

SPTy

WAf V
BO
TFH
8N"
Bl
CH
BE
TR
Bl

EVI
CHRNO
CHK2

eRCOR

COll-12,

t

t

TYPE UHOEF IHEe $V"BOL

eRCOR. eRSTSW
AOORS
INPUT+ZO
T088
IN'UT+20,21010
TOHe
INP~T+ 19.JNPUT+ZI

CI-IK2,

eHKNO.12 . . 2
WATV CORM •••

ERROR CORRECTION ON-LINe

RCTV
TR
INPlT+19,INSAV-I
WATv INPlJT-IO
TF
AOOCOW, PLACE
TO. ERRO Ie, I,ll
S.
INKRM.l.1O
SH
STCNTol,lO
TF" CFFA.NCOCF I
ATH CFF.READ)
NCOCFI OOA ,O.AZDAO,A2SCT,INST.N
OJ8800-55J0256
06)60
OC
I,'
06]70 •
06)10 •
06)90 •

01100
01200
00000
OH2.
000-5
01200
10215
10217

02686
00090
02686
02696

10215
00000
OCOOO
-6060
01100
0000-2431
02422
02422
02.44
OCOOO
02.24
06733
00000
-COOO
02441
02696

00000
00099
00099

Ml
41
11
21

.
16
15

H
49
.]
41

26
27
16

06918
Oblt')4

06196
05]9.
06930
01038
06144
05H2
06962
070]0
02686
06796
05]95

05393
-6810
06195
OOOJI
02478
OOOOJ
010]'
05]94
053"5
02528
06195
000-1

IS
H
4~

IS
.9
.5

OIOH
06144
05572
05395
0689~

OOOOJ
080]8
00000

•

5
2
59007 00000
I •
2

IS THe E_ROR ROUTI HE

EPRINT.EPRINT-I

06160
OU70
06180
06190
06200
"6210
06120
06230
06240
06250
06260
06210
06280
06290
06100
06]10
06320
061]0
06)40
06]50

OOO-~

01~90

01590
02426
02431
01590
02425
051.1
OH41
067ll
067ll
OU33
0244]
02447
02422
06169
06110
02686
02686

Ob 1 30 •

06140

00000
0~681

PAGE
06998
07010
07022
07030
070H
07051
07060
01071

SREl-32 •• PYSW
CO"S'C-56

E~ALER

06562
06SH
06S86
06594
06606
06618
06610
06638
06650
06662
066H
06686
0669'
06110
06122
06714
067 . .
06758
06110
06782
0679.
06796
06808
06820
06832
068"
0".6
06858
06870
06882
068 . .
06906
06918
06930
069)8
06950
06962
069H
06986

~

H

SPS II-C PHAse A

RSYMSWtltll

TO"
BO
81
TCH
81
OAS
8NR
OAC

06110 •
06120 •

77

EI/ALAO-9,l,lO

1620-1"] _ONI TOR
06030
060.0
06050
06060 SW2
06070
06080
06090

06~50

cell-Il
COll-2
l8ACO
COLL-14.60bO

"

TF

O~olO

~nAR

05S90
05600

0~880

0104\2
0645'
06466
010'11
06490
OHez
0651.
06526
06S1H

TRNUM8. LAIL

07072
0108"
07096
01108
07120
01132
011 ••
01152
0716 •
01176
01118
01196
01208
01ZZ0
07232

.

012~.

26

07256
07268
01210
01292

IS
12
12
16

ono.

~9

01132
00000
OH27
07196
0)299
07152
06181

I.

02~01

27
J.
J9

u

16
.5

31
.9
39
J.
31
]~

17

01316

06181
02906
-1132
0)]55
00000
02906
02817
025Z8
OJ277
OZU5
025U
OZ629
02592
I.

onll
00101
00100
OZ'o76
-0000
02901
000R3
01200
02908
00100
00102
0275.
00100
03276
OOOOJ
000-1
000-1

-n16

- ] .... 4

01330

EPRINT PR INTS THE U.O' "ESSAGE AND REFERENCe TO
INO ICATE THE STATEIIENT IN UROR

06400 •

EPR INT RCTV
TF
lopour. INPUT-2
WAn LOPOUT-8
WATv EALA.
WNTV INKR"-J
WHY eVAlER-21
80
·.24.fRSTSW
SF
NONEX" •
KILL AUTO ,xtCUT/ON
882
•
res T IF SIZE OF OIJEC T CORE HAS IUN EXCEEDED.
•
•
LINKAGE
arM CTEST,"U ,lnUIII ADDRESS IF 1110111.
•
065~0
DS
6
ADOCOW,9999.
06550 eTUT c"
06.10
C6HO
06430
06440
06HO
06.60
06.,0
06UO
06.90
06500
06510
06520
DU30

711

onu
on••
0135.
on ..

onlo

onu

01.0_
07~"

01~21

ann

01~J'

J.

Z6
39
39

Ja
J9
U

"

00000
0))21
OUI9
0))03
OZ56Z
07051
07~ZI
oo~n

00102
0211'
00100
00100
00100
00100
02.76

ocooo

U

I.

6
02521

R9999

13

1620-1")
0/,560

~f

06,)10

C
81
10M
B82
00

OUIO
06590 C I 1
0.600
UUIO EOI
U6620
066)0
06& .. 0

06HO
06660
06610
06".0 •
06690 •

.D~I

100

V~.SION

2

PACE

SPS 11-0 PHA$E A
01448
01460
01012
01484

ERI-2
AOOCO ... 08JCRe
eRlollOO
C. T 1 + 10, 00

Ci1496

TF_

DC
BI
10M
SF
81

46
24
46
15
42

·-2.CTl+IO
E VAlER-I. ICCOO
1. I , .

014U
01510
07521

43

EPRI~I.EPRINI-I

01522
01534
07546
01558

27

C T 1 + 10, 01
~O~EX

CTEST-l,,6
IrE S Y"80l TABlE IS SEARCHEO FaA

16

IS
32
4~

074Q6

02528
01491
01494

14

01200
02H6
01)00
00000

01496
07011
I

0149'0
JOOOO

07332
01494
OOHl
0743N

07331
00001
00000

ECUIVALE~CE

061CO •

06110
06720
06730 LSACO
06140
06150 LSl
U6160
06710
06780
06190
06800 lAceR
00810
06820
068)0

ID_
IR
O~F

Call, 0

~Bl

TF

aSH-H,

BI
BNF
AM

8S. SS-I
NIC. EOS ..
tlSBF-l.S.lQ
ALPHA, SS8F-I, II
•• 60, R.EtS ..

Tf
~~F

• .I,a,

call~2

Ob801tO

BNF
BO
10M
CF

06850
0686U N IC
06ti 10
06titiO
06890

"1
CM
SNE
BIM
DC

06900
06910

C_
"Nl
TO
TO

lOSYJIIIS+l
losnllS+l, SPSC_

Idl I TE

OIS'-",~C--SAVE

Ub920

00'30
Obq~O

•

06950
06960
06910

01566
07578
01590
01002
0760.
01616
0162S
01640
01652
07664
01676
01688
01100
01112
07114
071)2
07144
U11S6
07167

COll-17, CULL-IS
L8], EV&lAO-l

TF"
B
fF

I,lPHI

SR.fl .. 32,MPY5W
RSVJrI!Sw.l,11
Al P ... ,

GET-I,d)
seOl T, OQ,10
• +2't
EVAL£R

1,

t

SOCOO

t ,_

BSBF-l. lBq.

07168
071S0
01192
0180'

·-2"
DGS.."

07810
01828

o 1S'-Cj
o 18~2

c 78M.
07816
0188b

.

"
no

BI

01050
01060

s"

01070
010AO
07090 •

01900
07912
0192'
019)6
019.8
01960

IOc;.T,SOfF2,7

8 S, 8 s- 1
lB'NO, EOS.
500.. T, 1.10

8P
RD8lK
RE AD 01 SK-WlRC--OE S roRE CQRE-ER5

1620-1'") "aNI TOR
07100
07110
U7120
07130

IF"
B

10

o 7l4tO

I.
RIM

01150

DC

VERSla~

7!J

1

sps

u724tO

01250
01260
OIL 10

07280
01290
01300
01310
07320
o 7HO
013<00
01lS0
01360
01HO
07380

I,.

658F t

85Bf, LIM
BSBF, lI0-S

A
TF

•BO

Ci7390

0140u
07410
01'20
01430
014.0
011050
071060
07410
OHIO
07490
07500
01510
U1520
015)0
015100
01550
01560

TF
A

AS_
C
"NE
10"

8SNEQ
8SMI

"82
C
BNE
TOM
882
BH
IF
81
Tf

81
EOS ..
8S8F

OS

at

CtEAER+S

BSH. 8SSF
9SBF, BS8F
8S8F t 8S8F

aseF. BSAV
• +2lt, 8S8F
BSI:;F-l, 8.10
8SHF-l. '.10

BS&'-l. L1M-5
·+26
EQSIIiI', 0

8SENI, 8S8F-l,1l
aSNEO
EQSIII,

44
II
26
4.
H

43
U
33
49

I'
41

11

01413
08120
01132
OUIl
026S6
07124
01124
061H
08034
02616
0645l
0264)
01768
01072
I

16

00~65

2.
16
16
11

OQ520
101 ' )
02615
0)282
032S1
1019)

-7839
JOI )9
10111
026'3
J5997
KOC09
-00'0

00565
00566
08120
08040
02615
01888

- H23
JOIH
08119
083S9
000-1
01100

l~

••11>

16
49

21
H
12

••

·

••
2~

11

17

0~0J1

08052

II
26

OB06lo
0&016
08088
08100
08112

16
.9

OSI20
08132
08144
OS156
08168
08180
08192
01204
01116
01228
08140
06252
01264
08216
OU"
01290

onst

6,0

16

oeolS
080"0

OUI4
OU26
OU28
01)40
on 52
OU60
OUU

1.11

onl4

b.O

01580 lI"

-00000
10,0
DC

00565
00566
1.998
01218
01012
I
2
I
1
I
1
1
08183
02686
00~65

H
31

00S66
19998
03218

49

-76b~

1I
26
21
21
26
21
21
21
4)

08)91
0838.
08)84
OU84
08)90
0831'
08314
08)8,
01240

II
12
14
41
U

DC

1~

071>00 8SENl

os

12

811

0'413

02"98

NOCOO

000-'5

083Bl
-8081
J0139
03341
02498

08]8)
08290
08359
08413
01321
OU59

0838l
01200
OOOOJ

08360
01400
01132

01100
01383

oun
onn

42
24

41
15
"2
46

16
49

"

4'

au"

01132
0
6

10

0'401

I

-]995
JOIH
0)3101

0)278
02705
08400
01395
0838'
08]8'
08384
08390
O&lS'
000-8
000-8
OU95
01200
00000

OU90
0'400

-oooooooeo

07590

000-0
01200
NCOOO
KOO09
01300
19998
02500

25

-00000

DC

02431
08119
08359
000-5
083 It
0241S
02686
080)8
OOOOJ
00000

OB38)
01756
0)]47
1'908

I'
.6

080))
080]<0
080)5
080)6

onoz

8Srl
LIM. 8S8F-1
BSC YC
LIM-5, BSIF-I
8SCYC
8SHl-1

07510 &SAY

OCOOO
02424

aHa)

PACE
01912
0198<0
07996
08008
08020
08011

RE lOCAl I eN COUNHR
2 ..
O~ FeR RElCCATASLE SYMBCl
1 ..
OlOCS. OS
1 ..
ON FOR OElOCAT A81E EXPRE~SICN
1 ..
ON FOR R£lOCATABlE SYM80~ 10 TABL!;
1 DABS .. os
ON INCICAIES 8lANK OPERA~O
BS.
OS
1 ..
/ltPYSW
os
1
BSBF-l. S,lO
LBFNO AM
TF
ALP"'A..eS8f-L,ll
•
READ a I SK-"lRC--ReSTO~E CORE
IORT,.+21
TFM
B
10CI.SOEF 1.1
LOSY~8+1 , DGSV
TO
liMITS-q, PRTLI~'
onu
09110
O'l]U

SHIF T SYMBOLS

B S8F-I. BSe"T.
8NF a+1t8.REL5W
SF
AOO.S
00
a.2It,LDABSW
eF
AOORS
IF
•• 30. 8SBF-l
AM
·.18, 5.10
IF
a-a, ADORS
10
SVOGoll. OGSV.6
OTM OliTPUT. PHASEA
AM
82DCFoS. SP8L .10
SeOUT. S8MAX
C
B"L ERI9
A.
saOUT, 1.10
TO
OGS •• LOSYM801
TO
LOsYMBoI. SPSGM
lacs CALL-WRITE DIS. WL_C
JORT,·.23
TF"
D
IO.8C.SOHZ.l
TO
LOSY_B+I. OGSV
TFM PULI_. LlLIII-17
TF. LOU+II. L8LIM-1I
TFM LOT.+ 6.L811M-2I
IF
LOSYM8. CLERE_.S2
TFM 8S8F-I.LllIlI-17
87
LOSOK
TF" EVALU-l. ZOOOO

09394
09406
0941.
09430
09442
09.,.
0....
O•• U
0 . . .0
0....
0910.

1.' ,.

8T
EPR ..n. E'RINT-I
BO
EReOR. USTSII
BTM DUT'UT. 'HASU
RUD OISK-WUC
TF .. lORY ••• ZI
8
IOGT.SDEfI,7
TIl
LIM ITS-9, 'RTLIII-'I
LOSYMI.I. DGSV
TO
TFM EVALU-I. 40000

02897
01200
-3401
00001
02n7
0!]41
0]]42
Oll41

02711
0'4§0
09616
10241
0])41
OU30
08BO
0])43
08474
0)]43
102H
08U6
10241
08626
10243
09491
10241
08631
10248
onu
09491
0841l
0841]
08146
08146
0141]
01404
0140]
01120
09S94
OUIl
090§1
02641
09058
03347
19991

11
U

A

IF

DC;

24
47

81

IOA.t, •• 23
10GT.SOEF 1.1

IF"
0
TO
IFM
SM
e.
BL
fR
TF
AM
TO
IF
fO"
DC

O.UO
0.610
01640
O.UO •
0 . . .0 £_4
0"70
0 . . .0
0 . . .0
08700 U4A

• UK

• +8"

162C-1443 00"1 TOR

01~10

08414
01416
08438
0'4§0
01461
01.14
08416
01491
08510
onl8
C8530
01542

PHASE A .

08170
OBI80
OBI90
08200 LOS_
08210 LeSOK
OB22U
08230
08240
08HO
08260
08210 SV[JG
08280
08290
08JOO

01590
08600 £_21
01.10

SYMBUL TAILE

·.24
O~'PUT.

DIna
08000 •
08010
08020
080JO
08040
080S0
080bO
08010
B1DCF+'S, SP8ldO
08080 \.CCSCY AM
READ 01 S.-OI.C
UISOcaO •
rOAT,.+23
0810U
IF"
08110
a
lOGf.SUH2.7
08120
8T
as. 85-1
081 ]0
00
EA.'" EQSW
S.
08l4~
S8CNT. t,10
UOI§O
ANZ 100SCY
08160 a
lacs 'ALL-REAO DISK WL.C

oneo

I~TQ

tLEREAoIL. I NPUr. 10

onlo
o9ln
09,n
0".'
0""
09no
09lU

8'!

09".

4'
25
\6
12
14
47
1I
2b
II
2~

26
U

12
12
1I
26
44
]2
41
]]

26
II
26
25

17
II

24
U
II
Z5

n

16
.9

n

,.
16

It

2.

It
.9

It

aT

~]408

OOOMO
02673
OUOO
000-1
19998
02560

. ,.... .
43

U

OOS65
on. .

auu

-"
Jail.

JI.

It
l6

D'Dn

02491
DUU
110000

It

17

.

1020-1")

"ONlrO~

I

VERSICN l

SPS 11.[ PHA$E A

PAGE

0811 0

DC

l,' I.

096C5

08120
087)0 ERI9

87
rFM
DC

ER28'12
EVAlER-I, 11900

09606
09614
09625

rOM
NOP
8T
fFM
81

ASTS.ololl
OUTPUT,PHASU
EPRINT,EPRINT·I

O~HO

08750

Dn.o
Olno
onlo
on90
08100
08810
08820
08UO
OHl40
08850
0...0
08810
0'110
08890
08900
08910
08920
08930
08940
01950

•
•
•

1. I ,e

--23.1'.10, '

CHANGE '.OP TO arM

~H

HO

eAze •••

INTfA SEtTCR OVERFLOW

2PASS. 2PSSW

25ft T. INPUT2·99
INPLT2'99, SPSGM
Cl.rOCF+a, 1
01 SK-NO .LRC
•
IORt ••• 21
10Rac ,OUTOF 1,1
0
AM
ourOCF'5, I
01.. TPUT-l. ,6,.
S7
01~60
08910 25ECT rUM OUTOCF 'e, 2
lues CAll-.RI TE 01 $K-NC "LRC
08980 •
TfM
IORT, •• 2J
08990
100SC ,OUTDF I, J
0'000
.M
OUIDtFH, 2
09010 2S
OJ
0,", TPUT-l,. It
09020
090)0 2"SS CM
2PTR.6.I~PLJ'2.20a
0~0~0
·+Z"
"L
TO
rOM
.RI TE
TFM

091U
09194
09106
RETURN

090~0

Br~

2PSOUT,·.l2

0906Y
09010
0.080 2PTlil
09090
091 OU
09110
0912U lP~OUJ
091)0

rR
TO

2P8lF ,INPUT2
2PBlF'l,EUOIG

TO
A.
l'1

'NPl,.T Z .. 8,2PRUF.2
ZPTR+b,8. lO
OLTPUT-l"b

D,

"IFM

10k~C ,OUTOF 2.7
2PTQ+b.INPI."T2+8
2PSOUT"'1. ,b

0924"

DC

091~0

",TFM

rOM
,,~

09290

co

DSA

UL ,PUT-l .. tAS1SWtltll

2.ce"

I~

"11

09918
09990
ICOC2
10014
1002.
10038

10096

PLUS 01 Sk .IIH oRCNIi

SlOCF

PLUS 01 SK .1 TM ORCN(;

l~NGTH

LENGT~

10153

I,'

101S~

PLUS 01 SK Nor oRONG LENGTH

OUTOCF

10161

I,'

101.1
10162

2.00. ,

PLUS 01 SK .1 TH WRONG LENGTH

1020'

,

• On20 xU

'I

09UN
10249
01011

I~

10

21
I.
,9

5 •

5 •
JOll8
1

5 •
JOZOO

I

5 X

I.

14

IOU.

.O,· .... ·.2.INPUT2 ...

10nO

I.

10214

2,0

D~

2

DC

2. 69

101.'

Z

n

1014.

Z

OJ;
L3

I

2,

01BI
OOOM.

JOI12
I

OS
OJ;
-0

0.

ceooo
OOOOJ
Kl000

01332
10013
0968N
2

101Cl

0-0000-02-1041
DC
I,'

CNTR

JOOH
JOIO)
-3041
OCOOO

00~20

14

,

...

0""8
0997P
9

IQU6

.O,·-e.l.IHPUT2
094'Q OUTDCF 00&
0-0000-01-3040
09450
DC
I,'

onoo

I.
49

I,'

10111

0.510

,.

00565

J0220
I

COA
.0 ••- •• $P8L, 51F&00
Q-OCOO-40J592-4

C

saN.olI.1 NP\lT-1 0+2-21
.+36
INPUT-1O'2'Z6.C26+z026

8E

C26'

46

lin.

02885
1112<
11201
11782
02909
1120'
11201
118)0
02909
1l2H
11201
11878
02895
13244
11201
11926
02905
I J264

8S

...I,

41
2~

46
\4
07
24
46

I"

41
24
41
14
41
24
U

.
14
41
Z4

14
41
24
U
14

U
24
U
14

.
..
.
.
..
.
47
24

14

47

24
14
41

24

14

41

24

14

11201
11914
029jS
11320
11101
12022
02911
11376
1120 I
12010
02893
1)420
11201
12118
02~O5

11HO
11201
I2IU
0289'1
11'.0
11201
1221'
02905
1)4aO
11201
11162
02901
U'24
11201
12J10
OZ9ll
U544
IUOI

unl

02199
11720
llZOI
U406
OZ903
1)140
ll201
U4!l4
0,..,
11160
I1Z01
12502
01193

11116
lllOI

-2899
01300
14821
01200
-HOS
01100
14849
01200
-2907
01100
14879
01200
-2899
01100
14~01

DilDO

-2891
DilDO
14921
DilDO

-2911
01100
1.961
01200
-2909
01300
1090]
01200
-2899
01300
15015
01200
-2887
01300
15025
01200
-2" I
01300
15091
01200
-2911
01]00
1512~

012CO
-2b.7
01300
UI45
01200
-2901

onoo

I5IH
OllOC

-2911
01300
1521 ~
01100
-1919
01300
152H
01200
-2895
01]00
15275
01200
-2907
01100
15105
OCoOO

-2901
01300
15]29
01100
-2~01

01)00
15359
01200
-2909
01100
15391
01200
-2913
01100
15421
01200
-2901
OUOO
15451
01Z00
-290'
OUOD
1'419
01200
-2181
OUOO
1'419
01200

-lin

OUOO
In01
01200
-2181
DUDO
1"11
DIlDO
-2UI
DUOO

uu • n uno
usn z. 0,.15
uu.
UII •
11201
12"0 H
usn 41 IU. .
un. 24 Uta. nnl
12'"

U90.

22

000-1
000-1
00000

PAGE

Ilnl

ell

t25P

02~01

14

SPS II,C PHAse A

·.36

IE

12844
IIl01

14
41
2"

VEA$lON

Bi

0290~

H
24
4.
I'

11926
11938
11950
119.Z
IIn4
11986
11998
12010
11022
120)4
110 ••
12058
12010
12082
1209.
121C6
1211B
12110
11142
12154
12166
12171
12190
122C2
12214
122U
12UI
12250
12262
122H

S6NA'II,INPlJT-10'Z'IS
• .36
INPllT-10+2*lolt , CI)'2'14
C IlP

11288
11293
00000
11190
11101
11350
02897
12"'4
11201
II 19&
02901
12724
11201
II ....

14

24
4.
I"
41
24
46
14
41
2.

C"
BL

1I.~8

11710
11121
11134
11146
11158
IIHO
1 t 1'8i

Il

II B06
11818
118)C
11842
1185.
11866
11816
11890
119Cl
11914

SBNA +1 L. JNPUT"10+2.10
• + 36
INPlJT-IO+2.1 9,C.14+2-1 q
C14.
SRNA'II.INPUI-IO.2021

~l

11'10
11412
11'34
11446
114H
11.10
l"e2
1149.
115C.
II ~ 18
II~ 30
11542
115S.
115.6
11518
II ~90
II.C2
11.1.
1162.
11638
11.50
11662
11614
11686

I"4PL T-I0+ 2+1"'.()+ 2+14
C ~p
S8NR+ll t I ~PtJ'-l 0+2.11
•• 1t
INPL 1-1 0+ 2+10 .C4+2
0

SB~R'II,I

IllS.
11210
11282
11294
11302
1131 •
11326
11338
11l5G
11162
IIn4
Ill . .

line

eM
BL
C
BL
C
"E
eM
BL
C
BE
eM
al
C
NOP
CM
8L
C
BE
CM

CONIROL S UIE-elil

I~PL 1-10' 2 0 10.C i'2010
CIP
S8~R'II,1 NPUI-I 0'2 01'

C1lP

BE

lfCOGNI H

PAGE

II-C PHAH A

S8~.

BE
C.
KL
C
oE

CM

SP~

ST~·ll.l"O

1620-14'] MONIIOR I
11100
11110
11120
11110
1114"
III SO
11160
11170
11180
11190
11200
11210
11220

1

STR+btltlO

OIZOO

2)

IbIO-(44) "DNIIOR
IIHO
11 bla
IIb80
l1b90 IOMES
117CO
111\0
11720
11710
IIHO
11750
IITbO
11770
11780
IIHO
11800
11810
11820
11830
11840

CI P

r2P

C2P I
C2P 2

118~0

118bO
11870
11880 ClP
11890
11900
IIHO
11920 ClP I
11910
lliUO

\1950 C3P2
\I 9bO
\1970
IIQ80 c)P3
11990
I~OOO

12010
11020
12010
11040 COP
l20S0
I lObO CSP
12070
11080 CbP
11090
L?lOO C7P
J ? \ l. '"'
I.

~. ! ) (J

cap

i< H
i::'l ... ') l..'1P
~.

\ :11..

12l ')':
121 "d.
12180
12190
IliOO

123~0

CISP

ClbP
CPP
C 11&P
C I8P

C I 9P
C20'
C20P2

C20PI

126~0

12650 C20P4
\2660 SSTCF
12610 C20P)
12610

•• ?4

!F

L ,~O"'l

81
TO
87
TOM
87
TOM
B7
TDM
ST
TOM
87
TO
TO
Ie
TO
TC
~

12)40

12360
12HO
12380
11390
12400
12410
12020
12430
\2440
12450
12460
12470
12480
12490
12S0U
12510
l2520
12530
12540
12550
12560
12510
\2510
12590
12600
12610
1262U
12UO

RN~

f

d

12210 CliP
12220
llno C II AP
12200
1225U C12.
122bO
12270 C 13P
12280
12290
l230U
12310
1<32U C 141'
12330

"ERSIUN

~

12S98
12bl0
12622
12bll

TOM
87
TOM
87
10"

87
TOM
TOM
TO.
TOM
~7

rOM
TOM
TOM
TOM
81
TOM
TOM
10M
87
TOM
87
TOM
87
TOM
87
ONF
TD
TOM
87
TOM

NOISE, INPUT-l0"Z-ll,
P~A

P"'A Sf

C TvT

f

CUTPlT PAPER UPE
aUTPl I CARC

tNPur+a,.

CT"I '~'NN

Chl-l.lNPlJH'6
CTVT-l. INPUT ••
C. T\lT-3, INPUT+2
C T\l1-,., INPuT
C T\lT-t.,
Pt-A Sf

S ~)

1620- ) 4.,~

"01'-;.(

STPCSWd~

I,

PUNCH SY"SCl TA8lE

STPRSW,l.ll,
",",ASE
I~TRS.t 1, L1.
."A IE
CD INswtl.11,
PTINSW.O
TY INSW,Q

PK' NI SYM80l TA8lE

fOR

~ERSlaN

!NTi;IHtLPT

02907

02~22

02'105

02~22

00000

45
~9

2~
~7

\6

13076
13084
13096
1310.
Illl6
1312'
1)116
13148
13160
III 72
13l8~

13196

H
H
25

H
12
10
4J

14
~7

2b
49
25
.9
I~

49
I~
49
15

.

15
.9

...

1 )21t4

INtODE.1j
P,~CR

TAPE INPUT

COINSW,Q
INCODE.)
Pt-IA SE
IYPEII~

IT ER

TVINSW,l,11,
COINSW,Q
PfINSW,O
""ASE

BEGI N

LSCCSW, 1, 11.

LI IT ORO

P"'SE
lSTVSW,ltll,

LI S T TYPEWRITeR

INPUT

02~

11256
13164
112710
11288
IHOO
13312
13320
IH12
13344
Ill56
13368
IlH6
1l)88
11400
11412
11420
11412
IlUO

~9
I~

4q
IS
.9
15
15
15

15
~9

1~616

15
I~

02475
02413

15

02~14

IS

02~91

49

IS

\SU6
OH71

IS

0241~

I~

02415
15blb
02419
151016
02480

49
15
49
15

.q

15616

l SPRSW, I,ll,

15

5 lORE CORe I ~AGe

Mocae .0. II.

1350~

P,",SE

13516
1]524
13U6
In44
\3556
\3568
\3510
U5'Z
\3604
Inl6
\3UI
1)640
1)652
U664
13616
1)611
1)6"

S TORE

MODOC, 1 til,
P~ASE

80
TF
SM
IFM
B
TF
AM
5
TR
S
S
TOM
B1
OSC
22
OSA

P ... ASE .SSTSW •• ,

~ElOADABLE

SYSTEM SYM80L TABLE

SSTDCF+Il.HClIM
5STD~F+\l. SSISC T-IOO+ll

IORT,·.21
IOGT .SSTOF. 7
C 20P 1+11. SS TOCF +Il
(.20Pl+l1.4.10
PRTlIM, __ e

LIMITS-9.PRTLIM-4
LOTR+II.C20P 1+11.11

lOTR. 6.C20Pl+11.11
55TS •• I.t1
p>-&se
2.22 ••

ABSOLUTe

~ISK

NOT

W~ONG

LliNGTH

U701

SSTOCF

'"

.0.55 TOAD. SS TSC' •• -.
12690 SSTOCF OOA
OJ1908- 3'-0000
I, •
\2100
DC

15

02481
\Sb16
15616
OH29
16022
156\6
16022

41

I" 16

26
12
16
49

1;1.,7

.9
4_

25
I;
4"

..,

OOOM~

01100
16041
021;QQ

OOOOJ
OOOOJ
OOOOJ
000002895
028'1
0289 I
02889
02887
00000

Z6
11
Z2
]I

Z2
22

15
49

OOOOJ
OOOOJ
OOOOJ
OOOOJ
00000
00000
00005
OOOOJ

oeooo
00000
00003
OOOOJ
00000
OCOOO
OOOOJ
OOOOJ
OOOOJ
02529
0)345
0000OOOOJ

.5616

1311 •
00565
00566
U639
U6l9
02502
03211
09201
09\96
1)719
15616

2
5 •

U1CI
U702

J310~

Ul04

14

un.
911

02909
02907
00000
000-2
01100

70
IS6l6
02472
15616
02483
\S6Ib
02474
02475
0247J
02491

13UO
: l4 12
U_60
1).... 2

Pt-ASE.lST'T-1Q ••
15TAT-30. FlG~M

02909
01100
000-0
02907

15616

134t1j2

LI 5T PRI NTER

02909

12Q~6

PI-I .. Sf
P~ASE

0290~

02~20

15

25

02907
01\00
000-0

02519
02519
02520
13004
02520
130\6
02520
15bl6
02HI
15616
0247b
156\6
02478
I ~616
160ll
15616
16023

l2
49

25
2S

01907

1561b
12864
12888
LS571
12920
02HO
02520

02489
02488
02487
02486
02 . . 5
02 . . s
156\6

25
lS

-COOO
02899
00000
KOOOO
01300
KCOOO

PAGE
11204
11216
11220
1)2 ]6

BEGIN CARD INPUT

BEGIN

02Sll
U6\6
02Hl

SPS II-C PHASE

2

PI-'A SE

P~A Sf
PT1NSWtl, LL,
TV INSW, 0

2,
49
25
2'
32
49

14

12888
12900
IHI2
12920
12912
12944
12950
12968
12980
11992
13004
110 Ib

11064

ASSE_alE RElOCUASlE

02~ll

~q

H
49

12816

l3024

,

10

)2
14
46
16

24

12b30
00000

47

H

110lb
130H
13056

STOP

SE

RELSW,lt11.
P~A SE
'" DC fOC • 1, 11 f
P,.AIE
Moe fOC ,0, 11,

B1

OC

EA~OR

17000
170 13
I~b Ib
7
01496
02H2
024n
02496
12716
02Ub
15616
12744
12768
15571
12800

126S6
12668
12680
12692
127[4
12716
12724
1271b
12744
127"
121b8
12780
12792
12800
1281b
12844
12n6
12864

NUL SE DIGIT

t

~9

Ib

1282~

P~'IE

1I
I~

12b~~

12812

Pt-'A Sf

ER.STSWtl.ll.

PAGE

SPS 11-[ PHASE A

IR
Kq~AD+5COt IOfllES-l
n'l""ADf.Sll,OOOOO, I
~lANK
TO"
THE G_
87
P"ASE
CAC
flO
I
t
07.
flO) •
TFM ObJCAE.Q ••
OoJE CI CORE N
TO
OBJCRE-4.INPUT-10+2oll
SF
08JCRE- 4
CM
08JCRE.200CO
BNl
• +24
nM 08JCRE-,20000
.7
P>-'SE
·.2e,INPUT-1O+Z e lS ••
SU8ROUII~E ~U~8EK NN
"NR
87
ClP I
C10.INPUT-IO+2 o IS
C
KN. C2P/
TFM
SURNO.OO.IC
TO
su~~m. INPUT-IC+Ze14
PI--A SE
87
TO
SlJONU.INPUT-1O+2e15
TO
SUBIIIO-l.1 NPUT-l C+ 2e14
SF
1"""'0-1
Pt-A SE
.7
BNR
• +20, INPUT-IO-Zett.,.
MANTIISA lENG'" NN
.7
C lP I
C.l0.INPUT-1O+Z-16
C
8N,. ClP2
TFM l ' 00 dO
l, INPUT-lOt 2.1 Jj
TO
87
C 3P 3
TO
L,INPUT-1O+2"lb
L-l.l"1PUT-1O+2.1lj
TO
IF
l-I
l t 2 .10
C·+3b
8L
CM
L, 1t~.lO

I

13119
02507
-1511
,'1601
1:'b~5

13 fl -,
000-0
00000
02498
\36l~

\lUR
OOOOJ

IS

Ib2C-I441
12110
12120
12110
12140
12150
12760
12110
1278Q
12790
12800
12110
12820
12810
128<0
12850
12860
12110
12810
12190
12900
1291~

12920
12910
1290U
12950
1296U
12910
12980
12990
11000
!l010
IIU2U
13010

SSTS.
C21'

Cll'
C2)'

os
TO~

61
TCM
61
TR
H
TF

C2~P

CHP
C26P

CF
81
TO
TO
10
10
SF
B1
(F
61
10M

Bl

~ONI

TOR

SP~

VERUUN

I[

-r

PHAse A

I
lPSSllltl. L1 t
T.O 'ASS .OCE
•• ASE
K Il SU8. 1. 11,
NU Sl8A~lTl~ES
'.A SE
SBNA.+ll.CLEAEA.+ 1. 6,
NAME UUU
INPlT-100205-1
MO".E ,INP~I-10020H205
INPLT-1002oS-1
,.ASf
110 IONO,INPUI-10020902o), ,I o ~u~8U ~~~'"
MO I DNa-I, I NPUI-I 00"902'2
MO 10NO- 2, I NPW I-I 0+20'+2·
1110 I ONO- '),t NPUT-l 0+2."
.OIONO-I
'f'A SE
ISU,T-1O I i •
1I SR
• loA SE
PC.N~S". 1 t 11,
·PUIICI< RESEQUENCED SOURCE CECK
P"'Sf
IN'll-1
INPUI+ II
•• 30.INPU'+17
•• 18,2,10

C·All A2 SF
SF
IF.
AM
SF
0-6 ,(N.UT+ I H
CM
6L
.- 36
IFM
IORT, •• 23
B
IORBe ,MC,OEF t 7
6NF ··Z.,TYINSW·
10M 2P55111.0
0
0
o I S~ SIOUGE SCRATCH SEC.TOA

PAGE
13119
D120
I]H2

~9

15616

IH~O

15

02.a~

11752
1)16C
llH2
1l1"
1H96
13808
13816

~~

15

02~17

11I6~

12

11176
118U
13896

~9

H

15616
1l20J
021 . .
16015
02116
15616
160)9
160]1
160H
16016
16016
15616
02529
15616

IHO~

15

02~82

11916
1l9Z4
11936

4~

119~8

16
II

15616
02116
0289.
D978
D978
00000
11918
11960
00565
00520
10056
02411

IlI28
1l1~0

13152

1)960
11912
11"0
D996
UOCI
14020
100H
14044

26

I

11
12
26
H
~~

IS
U

n

2~

])

12

12
12
I~

41
16
49
44
IS

OCOOJ
OOOOJ
02101
00000
02b91
00000
02901
021n
02891
02895
00000
00000
OOOOJ
00000
00000
-290~

000-2
00000
-lOll
01100
JOOll
J5510
02H3
CCCOO

ASSIC~~E~T

1304U •

11050
11060
13070
11010
13090
11100
11i10
11120
11110
11140
III SO
11IbO
11l1U
11I8e SASC
IH90
11200
11210 SAS!
!l220
13230
13200
11250
11260

IF.
B

IORT.··ll
10"'.0,,111,1

IF
CYlAV,MQSC f+8+20
IotCTV
IF
SCTAV-2.CVlAV,.
A
SCTAV,SCTAV

BO
IF~

c.
BL
RE

AM
A
CM
BL
AM
A.
'M
C
8L
AM
B1

I12QU

1330U SAS2'
UllO
1]]20
Il]]~

13140
11150
IHb~

SASCI

Ill70
1))80
113QO SAS2
11400
11010
11020
11410
13440
1145U SASX2
11060
11410

IF
S

81
IF"
CM
Bl
BE
AM
A
CM
BL
AM
AM
AM
C
~L

AM
81
TF

S
14M
SF
1348~
TF
11490
115tO
10
13510
TO
AM
11520
11530 IVPA$S TF
11540
S
IF
11550
1356U
S
TF
11510
TF
13580
IF
13590
aNF
13600
IFII
11610
TFM
11620
IIUO
TF"
TFM
116~0
nM
13650
11660 DIM
ose
22
OSA
13610

~VL.

~C~JTOA

FAOM

1~116

SAS2',2PSS.
SA SC oil, IPTSPBo SPB l
..Cll",lDlljlll+l116·17
*.48
··lolt
SA SC '11,6' 20U I PI SPI-BP20K .SPBL
SAse+l1,*-1
SCTAY,.-e
SASXI

14128
I~IOO

101 ~2
14\ . .

STSAV,Z*SPlil

S8MAl,l.lO

!iASC.+l1.1PTSPB
SC UV,SASC+II
SA SXI
!'.TSAV.SP8l

!II

SASI

162C-I043 .0NIfOR
13210 SASX I
11280

08TAIN AVAIL

10056
100U
10080
10092
141C4

VERSION 2

SPS 11-0

PMAS~

10116
14188
14200
10212
10224
14216
14248
14260
10212
10210
14296
IH08

IJ6IO

ac

SASCZ+l t, ZPTSP8+SPSL
t--CllM,L8L1fri1.1176el1

1"148

10360
IOH2
141B4
14396

47
H

1~140

•• 48
+2~

SA SC2+II,8' 20K02P1SP8-6PZOuSP6l'
5&5C2+ll,·"1
SC TAV,_-.
SA S'2

10~OB

1"20
14412
10440
14456
14068

STSAV,Z*SP8l

58""A"'. 1. 10
SA SC '11, 2P fSPB
SCTAV,SASCol1
SA S'2
SISAV,SPBL

1~~80

IH92
14SeO
IHIt.
14524
145]6
14HI
14560
10512
14514
10596
14601
14620
14632

SA~2

INTSAV.SCTAV
INISAV,srSAV
INTSAV,2PR"O
90
INTSAV.9011
•• 23.INfSAV
•• 23,AJUST
INTSAV, t 10

SYMUD,StTAV
SV.UO,SISAV
IOAaOR,SV"UO
IOACOR,lNfSAY
810eF05, SY"TAO
ij20CF05,SYMUD
O~TDCF>5.IOADDR

•• Z4,RELSW
A~OCON,"999

A28E+,,41.10.
,ROSfM+,.41,lO .. ,
CFFA.NCDCF I
CFF ,'ROST"
2,22

eHANliE Be TO Nap
CHAN';E 8 fa 1<0,

uno

1,'

C2

J) :r.,Q C~

11 r.oaJF:c. TCOAIE!
OAt
o08JEC flORE
OAe
10. oSUUClUT! NUer
• SUIRQUI IHE5H
OAe
" ••"A~TI SSAUNGfH
."'''lIt'I')$4H EI>.IC'.frH

-ll)~

15600
15b09

16

14431

14

OH01
,4420
10008
14411
IS600
14524
15609
02613

-0640
MCOOI
01300
01200
--Z800
1. . 01
-0000
01100
-0080
000-1

1~223

-ObOO

U60~

14221
01100
-0040

II
ZI
14
~1

II
II
II
24
41

11
49

26
12
13
12
U

25

is

H
26

Z2
26

Zl
26

I~"O

14692
14704

Z6
Z6
44

1~716

16

lUll

16
16

16

n

1~431

14520
15609
I44S6
15614
15610
1561~

00090
15614
14607
14619
15614
02641
02641
02636
02636
10177
10193
10209
1472.
02521

onu
0)917
02629
02592
2

I5bO~

15609
KCOOO
COOOO
00094
15610
02399
000-0
15600
15b09
02601
15614
026U
02641
02636
02418
R9999
000"1
OOOMI
-1116
-]916

5 X

14781

J4184
I

14114

I~

14791

,Z

...

~COOI

01100
Cl200
-7)00
10199
-cOOO
01300
-0080
000-1
-1500
14223
01300
-00'0

15610
15610
14620

106~4

14112

C IMCCF

26
22
49

14656
146 . .

14140
14152
14"4
14'"

,O.OI"OAD.I.MO$CT
O-~'(lO-O IJ6000
1,'
DC

1111Q (I

1~604

10348
10221
02501
14212
14200
1422)
10221
15600
10116
15b09
0261]
10221
15600
14116
15609
14208

J4019
J4116
16028
00102
I S599
IS600
021.' l'

PAG~

14316
14321

•

00565
00S66
IS599
00000
15602

A

OI"DCF nOA

11100

..

INISAV,SCTAV
INTSAV,SISAV
lYPASS

1~112

Ilno

16
49
26
10
26
21
H
16
10
H
06
II
21
14
41
II
11
II
20
41
II

14101

11

lUn

14

141S!

15

x
x

27

162C-I"41 _ONI

TO~

VERSION 2

SPS II-C

P~ASE

IHSO C5
IH.O e.
13710 C1
13780 e8

ZI

PAGE

A

II •

14811

OAe
11"~OISEOIGIT
.NOISEOIGIl
10. -eRROR s rop
CAC
'E~ROR STOP
OAC 20 •• AS SEMBlERfLoeA IABlE
• AS SE"8lfAElOeAIABlE
16 •• QUTPUTPAPEU APE
OAe
'OU TPlI PAPER TAPE
II •• QUTPUTCARD
CAe

1)740 e"

1'903

10 •

14921

20 •

1"9.3

I••

1"995

II •

.OUTPUTC ARC

Dna

C9

OAe

o~,.c.T\lr

15011

5 •

13800

cia

OAe

16"fVPESV.80l TA8lE

15021

16 •

-c TVT

• TYPE SV"80l TABLE

13810 ell
13820 CIiA
1)830 CI2

17 •• PUNCHS V.80llAB lE
OAC
'PUNC'SYMBOl TABLE
OAC
17 •• 'AINTSVMBOlTA8lE
.pA I N I S V"eOlIABlE
10,. INTERRUPT
CAC

15059

11 •

U09)

11 1

15121

10 1

·1~TEARl..PT

11110 CI7

15 t -BEG I ,""CIRC I NPl,JT
CAC
'KEe INCUD INPUT
OAC 20. '8Ee IN"PER TAPE INPUT
'KEe I NPAPE ATAPE INPUT
CAC 21 •• 8Ee I NTVPE wA ITER INPUT
.8Ee INTVPf wA I TER I N.UT
OAC Oq,.lISTCARO
'lISTCAAC
l!),_lISTTYPEWRITER
CAC

13M90 elfA

ellSTfVPEWRITEA
CAe
12. -L I S 'PR I tillER

13'''0 C 11
1)850 C14
1)860 CIS
13810 CI6

1)900 elB
1)910 elq
13920 e20
13930 e21

'1I S TPAINfER
15,'5 TOREeOA f I.AeE
OAe
'SIORfeU"E I.Au~
16 •• SIOAEHlOAOAijlE
CAe
'5 IOREA HOAOUlE
cae 18 •• 5 VS TEIISVMBOl TABLE
• SV S TElOS ,MDDL TABLE
oae 12 •• I wOPA SSODDE

15147

15 •

15111

20 1

15211

21 •

U259

9 •

15211

15 1

153el

12 1

15331

15 •

15361

16 1

15H)

II •

15429

12 1

...

.rwQPA$SMOOE

1)940 CZZ
1)950 e23

OAe
14t, eNOSUBRUU' I HE S
'NOSUeAOLT INE S
CAe 0';. -NAME

llQbO C24

CAe

15453

.

154BI

5 1

15491

9 •

-NAMe

Oq,-IOPIIUMBER

.10NU~BeR

11Ql0

C2~

CAe

1)'80 e2'

CAC

O~

155C9

•• LIRR

~

1

.L I B~

13990 C 70

27 •• PUNeHRE SE QUENCED SCURCEOECK
"UNC~.f Sl QUENCEDSDUACEDEC.
l,70
OC

·v

14000 ·eACEF Dse

27 1

15Sl'

2

15~H

2,22

15514

filCAOCF

155BC

22

14010

CS'

5 •

!I:}

162C-1441

~ONI

TOR 1

VERSIDN 2

SPS II-C PHASE A

PAGE
15580

14020

CC

,

I.'

,0, ... 050'0,1 .... 05oC'
"010 .CACCF COA
O;o661-01J6000
14040
ce
I.'
14050 cn AV
140bO SCrAY
14010 STS'.
1'080 INISAY

5. a

p~Ase

TF"
NUP
Te.
ij7
SF
3'

IORT ••• 21

F~

AI

l~

156C4
15609
1561"
15615
15616
1562.
156AO
UU2
1566U
15672
15684
15696
IUca
15720

IOPT,CO~TR-4.1

*-11,Q ...
"AseA

SET BUNCH eN

FlGRM

A1DCF.00101
A lUCF ,OC102

TAA

14190

CCA
to, A lOAD, A 1 SC T .1E PO
OJ86COJ37-2300
DC
I.'

142CO

ICC

1'180 A1CCF

DOAC
14210
14220
cs
142]0 INSTRN TO
14240
TO
AM
14250
BTM
14UO
BTM
14210
TF
142BO
AM
14290
BT.
143DO
14]10
B1
TF
DO
INST
1"320
I4HO
C
BNE
14340
SII
14350
C
14360
MNE
lAnD
SII
IAlIO
IU90
81
14.. 00 DOAOt TF
14AI0
SF
TOil
14A20
ell
IA430
BNE
1"'.0

14

15~Q9

:!,2C

-20
DC
5.0
-0000
DC
S. C
-OOCO

ec

U582
1~596

-0000
cc
I.'

140.0
14100
14110
14120
1"1 JO
14140
141 SO
14160
14110

ac

15~H1

J5582
I

15660

PRraD
5

10250
10254
10256
10268
10llO
10292
1010A
10]16
10321
10340
10]52
10360
10lU
lOll..
103. .
10.. 0.
10"20
10.. U
104...
lo.. n
104••
10""
10. . .
10500

•• Z3.ADOCOW

·+23.UUST
ACDCDW .. IO
II
II

ACDR S. AOOtDN
AODtDW.lldO
(TEST"+12
INSTRN-l. ,6

INPUU+ I. IEPO+29
INP~T+14. 181-)

·.24
AOOCDN. 5.10
INPUT+ 16.
J
•• 24
ADoeON.IO.IO
LOLBL
INPUU+2. IE'0+29
INPUU+2
INPU12 ••
INPLT+I2. 59.10.
•• 24

00565
D05]2
15629
03401
03]45
15120
15120
00000
00000
14

J5U9
J0273
OC009
COOOO
00101
C0102
00500
OCOOO

ISH4

FLAI

EVll'O, •• 12.
eVAlAD, •• 12 t

I.
AI
,5
49
J2
34
]8
.6
At

'1"-

FUG UP DF _NIC. RAle

9',

25
25

II

11
11

2.
II
IJ
49

at

24

,'".
U

.'"
U

26
II
15
14

'"

5
10Z19
10291
02UI
051104
054-4

OJ299
OU21

OJU.
102511
OlOU
02901
10.. 0.
02528
02901
10......
OU2.
01414
01042
010.2
nOAO
·02'"
Ion ..

02528
02]99
000-0
10]011
103lD
02521
OOOJI
J0352
02]29
U650
01200
000-5
lAin
01200
OCOJO
OUlt
00000
0000.
000119
01200

29

16lC-·I .... l
SF

~ "'-IPI..

1"~60

~1

LOLdL

lltttltO

III

14650 eOK
1460U
10610
10610
1469"
14100
14110
14120 OOSIOC
141)0
14140
10150
"160
"no
14180
.. /00
14ijOO
14"u
14820
10830
14a40

IF"
10
SF
In
Sf

141~0

re"

SI

SF

IF.

c.

IIOR I

I~PLTZ

I~PI. T 2+1.

lEPO'2ti

le

•

INPl. r 2.

INPLT 2+1. /EPc.)e
I£PO'21
IN P lT2+o/t,lfPO'2''l

INPLT2+"
LOL ~L
INPLT2'1.

I ~jPL T2' t

lfPQ.a

J
INPLT2'4,lEPO'Zq

101C4
10116
10128
'0116
10141
10760
IC111
10184
lon6
10le8
10816
IOM21
108.C
10152
108h
10816
10UI
10geo
10912
10924
IOH6
109U
10960
le_I2
10980
10QQl

INPI..T2'4

INPLT2'l,O, ~l
INP!.. r 2'b,

/EPO'Z'

IN"1.12'6
INPLTZ.lt,

/rPO'2ti

INPLTZ'"
INPLll'),

CdL

LOL BL
HPU'22
If\lPL

r 2'1, O"6,Q

·.H:
IFPO+21,4t2, Ie

lEPU.l"',4t24tl,8

liE
ID·

··2"
t

IF"

tNPLT2'4,6C.1Oll
LEPC'28
I"'IPLT1'c,lEPO+Z'l
I I\jPL r 2+b

HI

10~92

lOL Hl
'NPL r 1'1, (..]4,1

Rf

SF

U1512
10544
IOB6
10561
10510
10591
le6CO
IOU2
IOU4
106)6
10648
10660
106n
IQ6Ie

INPI.T2+6.
PO.Z9
I'\IPLT2+6
IPIIIPLTZ.lt,QOdO II

LOLSL

PACE

A
10~12
105l~

c·
DE
c.

IF

P~ASE

SPS n-c

...

lfPU' Zl. It), lC
•• 72'

5'

VCR SIUN 2

r 1+1

'lt4SU

14410 DOAO." TO.
TO
1"6U
10090
TO
10~OO
SF
'0510
·fF"
,0520
Ul
10M
1"'10 CO. I
IH4U
Ie
IH50
SF
IH60
IF
'4HO
SF·
10580
nl
14590 OOItOW In
10.
'4600
1461U
Ie
SF
'4620
14610
Ie"

.O~

\4f'1LJ 2'1,

1

1486U CO 5vA ~
14810

••,,_

lnl til
,\UOUJIIi,12
I "-lPLf }'1, 02

l"titsO
14t;9u

nO

. t ~b.zfPO'lq·

IICC~

Ar.CCOw,11

11016
11021

••

T[;/III

14QCIJ

H r1"'0
HI
149Z"
14930 eoc I SK IC.
Ie
14Q"U
149-;0
IC·
,,,QllU
10·
lct97l)
IC
149!H)
SF

B1

l~qqO

1500U C-.SCL fF.

t1 0

INPL T 2'1,1

c. t( Sf t

... 12

IIO~C

LDltil
II\j~L f2. )
I"'lPl..' 2'1,

LEPO'2t1

INPLT'?'4,
I""PL'}' It

1.11
'.11

INPI, r 2'60,

Ii:.PO.29

INPLT1+b

LlllBl
CFFA,FF IDCF

16,0-14')

!I;,

"G~IICR

I

HRSI\iN

SPS II·C

P~~H

11052
11060
11012
110"
11096
I Ilea
11120
11112
11140

O"I~
0)0~0

12
16
4~

I~

2\
)Z

26
JZ
4~

ZS
U
2'
12

n

49
16
15
)2
l'
]1

15
H

..
.
I~

16
14

I'

14

15
16
12
26

12
0"
II

lb
OJ
Ii
I~
II
H

15
Z5
I>
15
25
32
.~

16

1,000 • CCALl IF •
n I_
15050
cr._
l'lObu A3CCF

11110
11192
11,04

I "'S TA.~

cc

I.'

1I111t

150tiO CG.
15090

10·

INPLT2, 5
[VAtAO, •• 12,

11220
11HZ
112H
11156
11268
11180
11288
113eo
lUll
11124
IIB6

IHIO
I' '20
1 ~ 1)0
I SI'U .ACRO
I ~150
IH60
1~11Q

151HO
UUO'
15200 •

""
••

0"C3-32,85111

rF

ACDCOIII, I
A.OUtO:S, Aooeo.

A1

\lAC l- 32

TO

·.t3.AOOC.OW

TC
A.
SF
IF

··.i!3.'JUST
AOUCOW •• 10
lfPO+Z8
I"PLT2+I>, /fPO+Z9
SE r ONE

0104'

oeoo~

02BO
oecoo
02319
ocooo
02318
CCC03
02319
cceoc
000000-)'
OlJ29
OCOOO
Olla
OOCOO
eecoeoooo
CO-46
ceo.)
01200
0~243

01100
OCO_2
01200
CCOOI
0000oeooo
02329
ocooo

OS41'

02528
01041
110 .. 0

0./528
03041
01416
084"
0)040
03041
03044
03003
01046
0)0"
0841'
02629

OIZ
OQ,
02329
-0011
OCOOI
JIU51
00003
02328
OOOOP
CCOO02129
oeooo
JII . .

11

025_2
10

J0256

16

OZU9

11

O~Sqz

J 120'
J01S6

I'

OJ92~2.2qJOH6

llTM

0)0"6

oeoo ..
02328
02329
OCOOO
000--

11118

CFFA,A30CF

I ~010

1 'Jlou

0)041
0)006
01046
0)044
01414
03040
0)041
02321
0)U44
0]044
0141'
0)041
0)040
0]044
o)e44
01043
01414
01041
0)046
0)046
0)044
0)040
0)0'3
0141'
OlJ2Z
0)041
0212)
10_Z.
021H
10_12
02)23
10_24
03041
C1044
02118

oeooo

PAGE
11152
1116'

t

O)O~I

I~
2~
2~

•

HI. CFF,uECl2
150iO
ISO,U FF I CC F DOA .0, A40AO. 4",)C T. lNS TRN
OJ8881-l1J0256
1 ':)0 h)
I,'
cc
eFF ,.ACR02
10. A30AO,llSC ,

12
49

.

00005
1124.
08QH
-COOl

25
II
32
26

01040
OSM04
12004
02528
0]299
12CO.
11)11
11123
02521
02128
0)006

16
21
U
49

11)18
11)1'
00000
1))01

-H29
02J29
00001

11

051104
02381
02511

11404
012"

15
11

II
26
.9
2~

02~21

02528
OZl99
000-0
00000
02J29

10 INOICATE SUUCUTINE IS RE;UUED

llj210 •

15UO
152)0
15HO
1,150
15260
15210
15280
1,2_0
15300
ISlIO
15320
15HO
1 S)"IJ
15350
1>160
15170
153'0
15190

IF.

'+)0,IST"T-30

·.lB.ZfPO+Z'I
I
87
DSA ... 10 OSA ROuflNE 10 COUNI
EVALLATE LENGIH Of DAS

11148
11)60

A

roo

•
•
CAS

8T.
IF
TF

,

TOM
10
Bl
•
•
•
CAC

1~400

15410
1~420

'S430
15440
15450
15460
15410
U480
154_0 C.CSR
U5CO

e- ••

II 312
N~~8E. O~

OPERANDS

1118'

EVAlAO, •• 12 ,It
L"'H,AODMS

11.392
11404
11'1016
11428
1I440
11452
11464

leMP •• LNIH
TE.P •• lE.PR
INnU. 2
INPUT2'6. /EPO'29
DAC 3

26

16
ZI
15

n

49

02511
01040
03046
120)6

OZJIl
OZ5n
00002
02129

EVAUUE LENGIH OF Die
1011
Tfll
OAe
.1"
IF

c_

INPU2. 0

STC~U+II.
1,'
,_

"

LNTH.lDDRS

114. .
111O.

U

lNftol.51

IIUO

EVALAO ••• 12 ,4

··tc

TF"
IF"

lNI~.

8T
00

15

I""

aN
If"

oc

11472
11484

00.10

fVAlfR-l. 80000 ..
1,

f._

I~"PR.

fA b.

LENGT~

"'~~

'15"

"n6

.00
EPftINT-l

fReer:, UHSW

"

lIua u

JO.O BI~

00050

e"p."n.

"

"I"
"19'
11110

96

16

030'0 OCOOO
1"99 000-0
I •
2
051104
OUIl
021n
11612
070n

I

16
.16

at

U

)0

OUIf

11501
012"
-0051

onoo
oeooo
-00'0

cnn -0100
onu onll
on .. 0,."

11

1620-144) MONITOR
IHIO
ISS20
I ~5)0
15540
15550
1~560

1~570
I~S80

B7
A

H
BNR
07
MNR
fR9CAC IFM
DC

15590
15600

~7

TF.
A
1562U eHVALe TR
! 51:130
BNR
15600 EIOCAe H"
1~650
DC
1~610

15660
07
151>70
BNR
07
15.-0
15690
C15700 STCHa. BNE
Ie
15710
AM
IH20
TF_
I5n~
15740
OC
15150
15160
15710 CACR
15110
15190
15800
1511015120
15UO NOSINE
ISUO
15850
15160

-

1~810

ISM80
15890
15900
1~910

IS920
159)0
15940 oat)
1595U
15960
15910
15910 1~990 16000 16010 DSO
16020
160)0

AO
TR
IF
TC
Te
BNR
TO
TO
AM
TF
A
SM
10
TF
8TM
TOM
87
9T"
HO
TO
B7

VERSI O~ 2

PAGE

SPS II-C PHUE •

CACR
AODRS.AOORS
reMPR .AOOR S
"20.INPUT+20

11604
11612
116H
116)6
1164.
11656
11661

ER~[AC

·.32, INPUT+lZ
EVALE R-I. 9COOO ••

1,' ,.

CONSTA~T

NCT SPECIFIED

·.]!!,INPUT+1Q
e+2). TEM' ..

ULI.2
.+)2. our+]
EVALER-I. 17000 ••

01

s-eO~~T

OF

CC~STUI

LEhGH

I I.

CACER

·.2c,our.s

•• 32
OL IoS.21010
E 10DAC
STC"'R+l1.0Uh5
CHVALOtll.)
e .. VALOtll .. 6 10

1,

I ,_

11748
11756
117,6H
11776
11711
11100
IIIIl
11124
1I1l5

49

ZEPO+Z'
INPU12+4. LNTH
INPL 12+). LNTH-I
CAC3.STCHAR+1I
ADDRESS ASSIGNEe BY PRCCESSOR
INP~T2.6.

•• 23"DOCOW

11901
11920
11912
11'144
119S.
11"'8
11910
11""2
120C4
12016
12028
120J6
12041
12060
12012

"21.JST8L
Aooeow .. IO
AODR S. AooeoW
AoceD •• TEMPR
AceeO •• 2010
•• l4l,IEPO+28

ACORS.ADoeDW
e+t2

INPl.T2tl. Odt

LOl8L
EVAlAO,·.12.5
NOSI~f.ISW

LOABS •• aLOtS.
CAe!- )2

12080

16040

UC

1 •• ,e

12I1S

16050
16060
16010
16080

OTM
IF
BTM

eVALAO. e.12.
lNTH. ADOR S

12116
1212.
12140
12152
12164
12116
12181
12200
12212
12224
12216
12248
12260
12212
12284
12296
12301

I
70000

1620-144) MaN I TOR I

16150
16360
16310
16110
161.0
16400
16410
164Z0
16430
16440
16450
16460
16410
16410
1. . .0
16100
16514
161'0
16no
161.0
161.0
""0
161'0

NASS

JI
4~

16

H
49

14
47
l5
II
16

II
JI
26
25
l5
45

2S

n

II
26
21
II
41

26

11
IS
49

11

4)
H

49

11860
0)299
02HI
11656
11661
11611
07071
I
IISID
11723
1172)
02220
11756
nC7I
I
IISIO
11776
11800
0222)
11736
11799
II 121
1172L
I

03199
0)299
02907
DZ909
ROOOO

-2906
OZ5H
00000
02221
HOOD

02223
COOK)
01200
02223
-000)
000-0

11721
0290.
0)046
01044
0)043
12016

000-1
1112l
OllZ'
Olln
02386
11199

119J1
1I943
on21
0)299
02528
02528
12004
0)299
074)6
0)041
01414
054-4
11908
01036
12004

02S21
02459
000-0
02528
02571
000-2
02321

OJ040
0)046
07071

00004

(..;'!o~8

J2i..l"

000012048
OIOH
08035

VUSICN I

TEMPR. ADDR S

8NF
8T
BD
TFM
RTM
TO
ONF
TDM

•• "'8. BSW
EPRINT. EPRINT-I
ERCDR. ERSTS ..
TEMPR. 00001
EVALAO. "12.5
LOABSW.RLOeSW
DAel-H. IS.

IF

AOCR~.

I~

I.

oeool
poooo

PACE

SPS II-t PMASE •

EVALAO, .tI2.

IF

A
M
A
B7

!17

15

11092
12104

LDA8SW.l,ll

AODCDW
ADDRS. LNTH
LNTh TEMPR
ADUeDW. 99
[ACl-12

11
26
11
26
44

27
4J
16
11
25
44
IS

26
21

n

21
4'1

05004
02311
054-4
02511
12212
07332
01196
02511
054-4
01036
12004
Oa016
OJ299
03299
02181
02528
12004

12128
0)299
12152
01299
080H
07BI
02476
-0001
12224·
010)5

05M04
OJ046
OJ045
02117
OJ040
12460
02)81
12460
01011
I

12128
02329
02321
03299
00000
02)29
-009'1
01100
00000

07))2
On96
02317
054-4
010J6
12004

073JI
02416
-009'1
12472
01015
OIOH

0]299

02521
OOOOJ

olon
OOOOJ
02528
02381
02HI
00099

EVALUATE LENGTH OF DS OR 01118
8TM
TO
TO
TF
TCM
ID
CM
INP
TFM
ce

EVALAO, •• 12,,,
INPUT2<6. lEPOt2~
INPUT2<5. lEPDtze
LNTH.AOnRS
INPLl2. 4.11
.tij4, IEPO+29

8T
80
TFII
BTII
TO
INF

EPRINT. EPlINT-1
ERtOR. ElSTSW
00099
EVALAO. "U. 5
LOABSW. RLotSW
CAO-H. ISM

12U.
U321
12J40
12352
12)64
• i2H6
12JI.
12400
124U
I24ZJ

LNU·,'CJ

.+60
EVALER-I. 8COOO

1.' I .

124Z4
12416
12441
12460
12HZ
124.4

LNT~.

11
25
25
26
15
4)
14
41

16

21
U
16
11

n

44

0

ADDRESS ASSIGNEO BY PROCESSOR

0
0

ONU

OSS
OUIIG

)2

EVAltAIf LENGTH OF oU
INPUT2."
INPUT2+6.
EIJAlER-I.

UIOO
16110
16120
16110
16140)
16150
16160
161/0
.. 110
16190
16200
16210
16220 16210 1.240 16250 OSO~I
16260
16210
16210
16290
16100
IUIO
16)20
16330
16]40

16
49
16
ZI

TO"
TOM
TF"

160~0

H
H

11610
11 . . 8
11700
11712
II 124
11116
11747

11116
11141
11.60
11112
11114
11196

CHVALetlld.IO
INP~T t21.eHVAlOtll .11

CTEST,

21

2.
45

1167~

CACER

L,

H

TF
TOM
A
10
A
17
AM
11
11M
INF
10
T'M

IT

10

124.6
UIIOI

It
U
ZI
IIIIU' 43
IU •• II

AOCIIS. ADOCOII
LDUSII.I .. I
AODCOII .LNTH
OSS.ZEPO+2.
AOOIIS.LNTH
OAt!-U
AOOIIS.I.IO
OAel-U·
EVAUO.o+I2.4

uno

" ••...

...

11111.

9S

U004

au..

000.1

u .." n
11..6 44

12004
0 . .0.
12. .0

02411

071.,

OZ41.

. ..

U,96

u ..o olon
07070 ,.710
n onll OUU

1,..1
I"n

U

1,.••

'II

" .,

IIIlOCUlolII £UO.
I liNCII, ".SOLUTE DUIG

onzi Dun
12564 02111
ou.. oun

II

12 ...

•• ''',AILS"
"12 •• LOCS~
EVALU-2. 71170 ••
EP.INT .EP.INT-I"
EIIeo•• us lS.

01036

))

.~RSIO~

1 e..?C- 1"" \ "'fiN I TC-R
lh"t8u
I.~'V

1 •• 01l
1•• 10
I.'ZO
16.30
16ob .. 0 •
I •• SJ
1 ••• 0
1 ... ,0

··

ltJib80

IF.
B I.
TF
01"

lNPLT2.1,Ob,10,

"'Da

SET
S.
TD"

IF.
DENCC
R I"
Ib120 CASCtF CeA

OCORE IS

OJ8' 31-

1.,.0
lOISO
1.7.0
,.170
Ib180
1.190
11>800
16810
1&820
16810

CC

··

DC

COU~TER

II\IPLT 2,

TC

DC-I.1EPO'18
I"'PLT2H,I, IEPO'29
EVALAO,Ull,4i
\.. NTH, AOOR S
HJiIIPR, -0000 I
HMPR,l
INPLT.l ~, INPUT+21
CCI\I,?-)ta,IIIIPUT+20

C.

TF,,"PR,O

108taO
,6870

B"f
TF"

CC'l
EVALER-I, 9COOO

IblUO

DC

IM90
16.00
16"10
1.920

!H

1.9~0

CC"2

I b'il(J
1"''180

16990
11000
11010 DC'"
11020
ll{)JJ
17040
l/u'JO
11Qb..)

11010
i 'Od0

1210~

1211.
IHl8
12"0
I21S2
IUbO
12112

12
I~

02S28
030_0
121~2

02~28

16

02SH
12016
0262.
02S92

n999

,~

I.
11

OeF I NE

~PEC

I Al CQNSIANI
128C('
12812
1l82~

IS
is
2.
11
lb
I.

12810
128\8
12860
12872
12U,
IZ8Q6
12ge8
IZ91C

.,

IZQ32

16

II
H
'S
I-

12 ... 1
12 .....

21

tKCOR., ERI)TS,.

i2Q')b

b1
C"
8H
Bl
C
Bf.tP

CC",

129U
IZ91.
IZ988
110CO
11012
1,01"

H
49
I"

FPR

T~T,

E"RINT-I

INPl.T+20 t

21010

Cco~·ll

CU:f.t·24
~

PR

lNTtt

f

'.t:r,
E "'''l fR-l,

l1UCO

)(.;~t)

21

"2.

,

["-Iu.. ,

C"

lNh'."'L
.tlt

IIOU
1 )oa ..

If"
loC

t vAL" R- \.

aCQCO

I,

DOH

f'PR:1Nf,6PA.llllf-l
tRe OR, ER ST Sw

tf

8'

.,

~

•HeI

TE/IIIPK

H

.1
H

;0)0.
~ U"- I

I

I,',·

Cl

J218~

JO'20

I~

au

Tl

JZ10~

~~

121~'

1,',·

IF.

000-1
OCOOJ

3~

TO NE' V4lLE

2,11

ONR

lbQo{;

26
11

000-.
-H08
03299

Il "8
A~U

l60840
1 btl~O

IbI.J4J

II

libiO

U

HJf)2'i~

reM

IF
IF.
A.
IR

12.68

03041
0968.
02S2B
01H.

12.92

CfF I"E CONSTANT

B'M

IbQ30

PAGE
Il·~.

•

I.'

rr
CCO~

A$~e.~~

AOCCOw.l,10
INPl..T2tltll
·.2it,AOOCOw
000CO •• q9999
OAC 3- ZO
cn A.CHDCF
CFF ,OfND
JO ,ASOAO,AISSC T, I hS fRN

~NF

1 b 11 u
lbllU

SPS II-L PHASf A

Ul..TPUT,PHA)tA
AOOCO •• AilOR S
C If S'. "12

TF"
81

1 •• 90

1

IN RHCCUUH.f

I H)9b

.,

Illea

I.

I.

1 t1 l'i

l,'"

"I
~c

tP~INY. €.PRINf-l ..
fRLCR. ER Sf SW

IF"

l",H·,

ER 8 Lt"GIH

I~C

e Ie

OOO~O

III lO
11112
Ill"

11
"3
16

Ill'.
~ Htitl.
I] I 00

16
11

030~0

ccooo

1279.

02328
02129

030~6
OS.O~

12B~8

02381
02S 11
02SlI
01906
IZ'H6

01Z99
-CDOJ
-oeol
02·08
OZ901

OZ~11

-ococ

11G 12
01071
I

01200
ROOOO

01132
0119.
11012
02'01
12612
Il8S'
02~ 1l
l3ne4
(j 10 1l
1
01312
0119.
OZ 187
02]81
111.8
01071
I
C 1332

01196
02.Ul

01131
021.tlb

0000
C 1100
01100
02387

o 1I0C
J IVOO

01311
02~ 16
02; 11

-ccS!

a ~ ;laO

oCt 00
G 1) 31
02. I.
-00,0

!l!)

itl/C-I't4J /IIIe",.! fUR

11090
1 new
1 1110

".
fit""
Tr

B~~

l ' 1)0

l Ct-'i

1114U

Tf

111 so

4.

111 fJv

17/20 USA

If

Sf
IF

"'IF.

,\1
TR

11260

AM

11210
11180 CSA2
11290
11300
1711v
tl1lU

ONR

I114Q
11350
17360
\1310
IH80
11)QO
11400
I hlV eRCSA
11420
174)0

17.,.0
I "SO
1"'0
1 7~ 70 •

CC'~ ~ , 8S.
I,. Dt.A 5"". l, 11
A4JLi~ 5, AOfKOilit. ,
A:JORS. t
ACCCU., l"'YH
'.14 f DC- I
~OIH{S , ADOCO.
IfMPR- L
I"'PL r2+~, HJIIIPR
CAt ~- 32
\.."Hr, Ocooo
DSAI

•be

IU3"
11240
112S0 OSAI

PHO

PAGE

5,10
' .. 1b, INPUT'20
I.~T"'t 00,0

L~TI"',

C·

o.s

Iln.

ACURiSS

1121e
11240
11HZ

tUb"
, 12'16
lileu
11300
1:\ lOe

I H2O
l H18
IlHC
IllS2
t U6"
IHI.
IH88
IHOO
11"11

..

ER.)SA

8"
IF

al~

S, 400('(h.
4.0DRS, S. 10
ACrCQw, lNI.
I",.Pl.T 1, \
OACl-12 • IlL" 2

;0
F v.\lAU. ·.12, S
TE MPA:

upe" I ION CODE

11Sl8
135\0
1)552
In"

UBU

114'0 •
17500 A
IHIO
In,o

13H5

DC
Sf" 121O,.
"1210
DC
Sdl~.220n
02220

ADD
S~B

'RAtI

OL

iI). ~)4110t,

~~L

II PL Y

~t~~~90~,

11510
to

lun

01 VIDE

D

115'0

-}.f4J2leO H

r.O~'ARe

c

11595

!1~ ..

BRANCH

13600

CO~TROL

IUOS

N411fJ

11510

DC
ilAltlQO

IlS'O

DC
M 3240

IH'IO

DC

"/.10
i ~"'flO

oc

k!":!/,jli

lifqO"

;;., <;',

~jJ',~.

J 1111

..
2~

.

I

~

Jb
21

H
26
IZ
26

...
\6

~9

H

02~11

-OO~O

O!l"-~

13180
080 l~

OBO]A
1121'
0801.
Oll.9
0\209
02528
11216
Ol2QQ

02HO

o JO".

12 0 0'
02]87
DHO
0290.

08(' 31

aOOOJ
02;28
-OvOI
02381
12799
07S28

cecoo

02S 11
-OCOO
02908

II

OS~O_

I J3SK

II
'5
I'6
26
11
1I
15

02387
IH28
Oll81
IHlb
03299
03299

OCU- '5

II
12
15
II
'9

02S28
01040
01036

oe."

000- S
02381
00001
02)28
CCOJ9
-C005
OcOOJ3508
OCOOO

l_

Ola 71

00000

,.

02Sl8
010'0
1100~
012~q

02907

-OOSO
01100
02~Z8

I

21

16

01H2
011Q6
02381

~9

1l'00

U

01331
02~16

-C050

15

16lC-I443
ITS70

DC

.O~ITOR

I

SPS 11-0 PHASE A

Yl.SIC~

H

'>,"8".10 ••

HAll

5,beooo ..

DUOMY uP COOl

13610

"'ij~e('l

ITS80

DC
aooco

ITSqO
17000
17010
17020
17030

DC

l),beaaO"

aCDOO
DC
5 t'
-DOC'
DC
1."154110"
"154110
DC
7,b21}4120"
0254120
DC
7,541);4130"
"''''-'4130
CC

ADO III"ECIAIE
IU81RACI 1'.EOIAlE

M.

MU111PLY 1 •• eCIATE

81

11053

r CIt;1 r

10

116.1

TR."SfIIIl T FlfLC

IF

llb , ..

IRAhSlI1 T RECORD

TR

IHBI

7,42fT4Qa"

"277490
17050

DC

11660

7,43-;"1"0"

~3'H

17bbO
17UO
17UO
17UO
17700
17UO
17720
177)0

lite
CC
7,td""'250"
0344250
CC
1, b ~4b2bO, ,
U 34.2.0
DC
7,l:3I)QHO ..
0)59310
DC
1.4261270,.
"263270
cc
7,4242420 ••
"242420
DC
7,6146320,.
024b120
DC
7.4346130"
"346330
DC
1,5446710 ..

I.A~IOI

BRANCH ANt

8T

r.A~S.11

BRANCH BACK
13702

IE I FLAG

SF

CLEAR FLAt;

CF

OOYE FLAG

.F

13710

BRA~CH

80

11723

BI

IHIC

N4 .. 611C

17740

CC
JIll 2"""

17750
IH60
17770
IH80

IIHOO
UBlO
17820
17830
17840

DC

1,4244410"

30

7.",;o4Q460,.

M24Q4bO
OC
7."2531]7,.
"253137
nc
7,,,,255137 ••
"255137
DC
7,4248116"
.20e II~
DC
7,,,,257116,.
1'4251116
CC
1,""245126,,
.2HI26
DC
7,4t26Q126"
"2.912.
OC
7,4265146"
"'2651"6
oc
7,42411Q6.,
"'2"11116
DC
1,-4256104"

OIGII

8UNCH I Nt I CATOR'
BRANCH

LO~

SUNC .. NEGATIYE

8L

13737

8N

13144

BRANCH HIGH

HH

I

8RANCH POIIIIYE

8P

13158

BRANCH EQLAl

8E

31~

I

1176~

11112

BRAkCH lEJlO

8Y

13719
1)186

I3IUt.lC"H ANY caTA CHECK

8RANCH OUI. lOAD IRl

BO

13793

OS

13800

CC

11807

"256700

I til

IOlC-14H
17no xes
IU60
17870
17880

OC

"Of" lOR

7,""'blOtS ••

.462015
DC
7,-4443005"
"H300N
DC.
7,-4b410)\ ..
"b4103J
DC
7,-4662021 ..

YE.SIU~

2

DEFINE

PAGE

SP$ II-C PHASE A

OEF I NE SYMBOL
CONsrA~T

FLCATlNG Ace SUB ..

FA

FLUATING SURTRACT SUB.

FS

13821

FLOA TI NG M"L II PL' SUB.

FII

11828

FLOAIING CIYICE SU8.

FO

1183~

LOAC CI YI OENC

LO

"6b202J

17900

DC
7,-4654041 ••
"'61)4Q4J
CC
7,-"6440SI ..
Mbo4t40SJ
DC
7,1)]44280 ..
N34428C
nc
7.441)4190 ••
M454190
DC
7.-6241412 ••
024101K
oc
7,-545261""
N452.1"
oe 7.62S2412 ..
0252412
DC
7.5955160,.

17910

N95,3bO
DC
7,1)941]10,.

178qO
17QOO
17910
17920
17930
17Q40
17950

1799Q

"941370
DC
7,4455]50.,
M455150
CC
7.6655380 ..

IBoeo

0655380
DC
7,6641390"

17980

18010

0641390
DC
7,-"44"26-1,.
"'44426l

OIYIOE IM"ECIATE

011

SELec T ACDRESS

SA

I 38~0

M.

13803

SEEK

S.

1)870

READ NUMERICAllY

RH

IIASK

I~TERR~PTS

13811

13884

RE AC AL 'HAMER I CAl U
CUMP HUMERI CALL Y

ON

IJB~I

WRITE "U'ERICALL'

W"

13898

WRITE ALPHAMERIC'!LY

WA

CEFINE DIS.

co

119\Z
11919

DC
7.6060000 ••
0060000
DC
7,6060000 ••
()06COOO

CU.MY OP CODE
DU ••• OP CODE

IJ9Z6

18040

DC
1,6060000 ••
0000000

CUIIMY OP CODE

119)]

18050

DC
7.6060000 ..
a06COOO
DC
1.'
-00000'
DC
9.6]4654160 ••
034654160
DC
9.63,,454150 ••
03H54150
CC
9,4255U440"

18020
18030

18060
11070

11010
11090

11100
11110
11120

1125540440
DC
9,42",.4.0 ••
1125559450
OC
9,425549470 ••
1125549410
DC
9.425541117 ..
M25541117

11940
U9H

U".

TUNS." FIELC IMMECIATE
TRANSMIT DIGIT 1•• ECIATE

TOIl

U .. 5

lUNCH NO FLAG

INF

U9H

lUNCH Il1O RECORD 114RK

l1li.

U9U

•

lUNCH NO INDICATOR

INI

U992

9

I"H

,.001

9

lUNCH IIIOl HIGH

17

Itl2C-144' "'01111 fOR
q,42~~1)7111"

HHJQ

DC

ltn~()

'" 2 S Ij S 11 11
DC
Q,4211'.145121"

'HASlliN'!

SPS

t)lUN(H NCT

II-C PHASE A
8NP

PQSITJln

100lC

140 19

hRAPolCH NLJ I EQUAL

~2')~4'5121

q~421j1)6q121"

181,)0

CC

18160

-'h42'5I)I)H16"
H2I)S')31 Jt
DC.
<;1,425'51)1)1 HJf t
""')55')1 H
CC
q,4261b''H~b"
Molb 7tJ!:i 1 ')e
l~C
9,""2')1)6':1141,,
~2') ';6" 140 1
DC
'1,4t2'i'i411Q7 ..
""21) 5t., 11 <41
r:t
'1,4(1,)1 4dOQ6"
"'2 'd'tJO'H;
r,(
'1,424371016.,

8RA~CH

NuT

BNI

/fRO

~21)1)6q121

DC

18110

IHl8C
181QO
182CO
H~21u

11:l22C

HRANCH NUT

1_037

lC-..

BRA""(.H IIIOT NEGA' ('IE
B~ANCH

EJl.PC~fN'

BU"'H

~O

(HECK

IXV

OvrRFlO.

8R.U~CI-4

NCT

8RA~Cti

lAST CARC

A~Y

8NV

I_a 13

C.alA (j.'t,CK

Bl C

1"081

8CI

14091

110

101 e(l
1~IOq

Mlolo17101t
l~l}O

Cl
Q,4?437?02b"
)l\l4)1202t
CC
9,424'3730'36"

18240

8IUP"CM [.Oh,SGlE Sl'HI00L
CC
9,1t462blll~"

UO'
NC CPEIoIA1l0N

NOP

OI'IOE

oI V

SW8.

. . IURAl EXP. SUB.

FLOlfl~C

FlUATI"'lei toIATUIUI. LOG.
IU l04D

TIU","SF l R

OH

P~E

SUB.

SPEC! Al

!'llZ

fLN

10181

IRA

101ge

I_I.'

SYJill~(l

~462b2115

16350
IS360 )(CA$

GC
~,-4462431G,)"
"'''62431GN
DC
9,-4044162145"
~44

16370
18180
L8)90

U~flf,jF

SV.~Ol

CAS

14217

ALPHA CONSJAJl.T

OAC

14( 26

DEFI~E

'''~lLlC

os.

"235

aEFINE

IV.BOllC 8LOC'

LQ21-4,"l

r;,c

q, ~"",,~143121),.
~44 14 3l?"J
DC
9,-44':.2410]5 ..
"'4624101"-

I,JEFIN£

~,-44624206""

1.(,

D5C

SPECltlL CJN)'A .... '

DEFINE ALPHA

10lb3

FE x

HORESS

058

~46242CbN

UHCl)

DC
'~,""~5420Q511
"'''SC)4.?CGS

ONS

I

Lb20-1~43

1801 u

ce.

"'C"'UCR

Q,-""471)4Q7')"

\lUI.S-fUN 2

}PS

DEF I ~E GRO\..P

Il-C

P~ASf

II :)

A

PAGi'

~ARK

1_202

~441';l407N

lo"20

OC

9,42'51)41'5'50"

G~Ol;P

BRANCH NO

'URIC.

BNG

14211

~l':i541S')C

184 )0

184'50

I eo.o

rc

9,~HJ4401tlll

(34)44C18
DC.
'1,42S65Q401"
~25b1940 I
CC
q,"+2')<;145411"
"'15445411
C!;
y,lt254")"ll"

fRANSFE~

10 PRutP,S

BRANCH OUIPLT RECCO[ .UK
8RA~CH

ENe UF

RECO~C

42ao

ICC

I.

80R

14289

8H

14298

8.C

,0301

~2'5443421

18470

CC
9,4{4,)59441.1'12495IIHOUI GROUP .'RK
..RITE ulSK TRACK
,.RITE: DISK

NU~.

~IIHCl..T

W/O GP. MK.

GRCUP "'ARK

CHECK 01 SI< IR1CK NUO • • 10

G~

IHH
"HZ

066)55861
ISBa

8(8

SAC

"IN

IH~I

"ON

••••

CIN

14H9

CON

IH8S

036355672

DC.

<;1,434451)632"
"'34455632

Oc.

18510

9,bl.tt6510bO"

03.tt65306C
DC.
9,466251050"
JIIIbb21) 3050
DC.
q, 4662"i9080, ,

(HECK 01

~K

\11.1 tHel.. T CROUP

~ARK

Tfl

I.ANSOII fL01TlNG
FlCAliNG SHIFT

~EFl

9

FSl

IHOb

FSR

14415

~6625qOeC

18590
18000
18ue
111>20

DC.
9,6351}62720"
UlSS6Z720
DC.
Q,e3554b710'f
03550.,30
9,-"'444'41073"
.4444101L
DC
9,'534454180"

0'

NH05_ISO

IlnO

DC

9,-414563Q13~,

~ltf-;630

11 •• 0

DC

TRAN5J1111

0(..

INS

TNF

l44n

CCl

1.. 42

LOAD DIVIDEND 1 •• fOIATE

lOO

IHH

9

loes

RelO

GET

IH.O

9

lacs

.,I! TE

~T

u~.,

•

DTH

10411

~7b"'bl02l

18650

sTlmp

CEFINE OISK ACCRESS

II

q,·~"}l!'J •• ;Ol),,

~UMeA.IC

i;J,-4~t»!iSO~1"

9

""o\bll}~rJSt

IlhO

OC

q,-~iw.J;S2~3,.

" .. olt3~"1't
IUlO

ac

IIUO

M6H!}5l.
0(,.
1.-"""4)&'1~~;~~
,.,,~ 14 \?i !H,

g~'~4ili~3"'13~3r ~

DHINE ,UO
DE~

NU.ER Ie

IHE lYPE •• JTER lLPHA

I

II "

DCN

IHI7

DU

14tt9.

DCA

IUO'

9

11 . . 0

0,

v04

Qt '

-ODOOCOO'
18800
11110

ce

11,"-2'554)71017"
"2554HIO\1
DC
11,42554372021 ..
"2554372021
DC
11,425543130)1"
.25543110)1

BUNCH

CO~SCLE

BNO

146]1

8NC4

1464.

eONSCLE SolTCH
CP~SCU

1"40

OC

~RAHCH

NOI LAST CARC

11860

BRANCH NOT

11

Qff

SolTCH 4 Off

8RA~CH

"2555343091
DC
11,42556765151"
M2556165151
DC
11 ,59556368611"
N955636ij613
DC
11~r)~'55516]6)1.,

11

BNe2

8UNCH

I"~O

11

14626

CFf

DC
11,42'554374041 ••
M2'54)h041
11.4!2'5S'5)It]O'H ..

14615

SWITCH

1883e

18820

eNeI

EXPO~ENT

BNle
C~EC'

RUO

N~ME'IC

TVPEWRITE.

READ

N~.ERIC

PAPER TAPE

11
II

8NXV

14670

II

RNTY

14681

lL
11

aNPT

14692

IU80

DC

1I"66~56368813,,
Ob'i"j,b)6R8 L 3;

.HTV

IUO

11

18no

UC
11,665'5'5763823 ..
06555163823
CC
11,1j45'b36t1S11 ••

"NPT

14114

11
II

18870

N9555163633

Inoo

OU.P NoME,RIC TYPEWRITER

ONTV

14125

OU.P HU.E RIC PAPER TAPE

CNPT

14136

11

RATY

14Hl

11
11

M4S'5b)68'51)
II~IO

DC
11,"45'5'5163'521"
/1114'5'i'ilblC,21

18920

DC

11,I!IQ416368711"

'9416368113
18930
11940

DC
11.5941Cj763731"
N94151631))
ct
11,f:b416368911 ..

READ ALPHA PAPE" JAnE

RAPT

IH58

"R I TE ALPHA IYPEOR I

rE~

WATV

1416~

11

"RI TE ALPHA PAPER UPE

WAPT

14180

11

14nl

1\

148C2

II
lL

UH 16368013

18950
11960

lie

11,tb415763Q23"
06415163923
ce
1l.6641"'4"Q41 ..

". lIE ALPHA CARC

06414344Q43

1115
1620-1"3 .ONI TOR

DC

11,~9H434H53"

VERSION 2

SPS II-e P".SE A

READ ALPHA CARD

RACO

N94"344153

18910
IS990
19000

OC
11,44554144,543"
.4554144543
DC
1I,~65543"8'3"
06554)44843
DC
LI,H55434465l"

OU.P NU.ERIC CARD

UNCO

lUll

wRITE NUMERIC CARD

WNCO

1482'

11

READ NU.ERIC CARD

RNCO

'4835

11

TA8ULATE T'IPE,.RlTER

raTY

, . . 41>

\I

RETURN CURAIGE TVPEWRITER

RelY

14Ul

11

SPTY

14868

11

RTGN

'''lllf

11

N9554344653

19010

DC

11,6342636BI84..

03~2636818'

19020
19030

DC
11,594]6368124"
N9436360124
DC
lL,62516368114"
02Sl6]68114

190'0

SPACE TYPhRlTER
REAO 01 SK

DC

READ DIS' OITH GROUP MAR'

ROGN

14890

11

WRITE UIS' TRACO NU.,',IIGP • • • ,

WTG'I

14901

11

WRITE 01 SK olTH GROUP, MAU

WOGN

14912

\I

erGN

1491]

\I

COGH

149]4:

1\

1l.594 . . 755602"

TRACK ~u".

"K.

lit 59~3411j'j6O\2"
N9634755642
OC

W'G"P.

N9"475~602

19060
19070

DC
1l.~H34l55842..
06634755842
DC
lL,66444755802"

064447~5802

19010

\9100
19110
19120
I~UO

DC
11,4)634755652..
,,363.155652
CC
11,43444155612..
"3444755612
OC
1I,-4256~34411...
M25653441\M
DC
LL ,-461>25859061..
M662585906J
DC
11,-46435662071..
"1>43566201J
DC
11 ,-46624955011..

tHEC' DIS. lRAC'

NU~.

W/GP.

CHECK OIS • • ITH GROIIP MARK

M..

8RANCH OUT, LOAD IRI

Bot 0

14945

1\,

flOATING SQUARE AOOT WO.

FSQR

14956

\I

flOATING COSINE SUB.

feos

14961

\I

,FUN

U9U

11

flOATING SINE SUB,

M66249~50IJ

19140·
19150
19160
19170
1."0

\tuo
"ZOO
I'ZlO

1.,20
\9ZJO

1.2'0

DC
11,-46416)55091..
"64 163~50~J
DC
11,-4645611>3101..
"6456761l0J
DC
11,-46535641121..
"fl5lS64712J
DC
\1,-46625962141..
"66H96214J
DC
1\,-46625362151..
M6625J6215J
DC
11.-6346531>2161..

~~465~~!!:!1444.010,.
101>41 •• 44010
DC
11.46626442020..
M'626442020
DC
1I.4U. .U30JO..
"65464530]0
DC
1\ . . .U4965090..
M6~4'''5090

DC
11,42634653010..
M2U4,6?J010

flOATING ARCTANGENT

SU~.

fLOAnNG EXP. USE 10

fATN

\49.,

\I

sua.

fUT

15~CO

11

flOATING LOG. BASE 10 SUB.

FLOG

1~01l

11

flOATING SHIfT RIGHT SUB.

FSRS

15022

11

flOATING SHIFT LEFTIUB.

fSLS

uo~.

11

TRANSIiIT fLOATING SUI.

rFt1

150.. '

\l

flOATING ADO

FAOO

"on·

II

flOATING SUIUACT

' FSUI

15.0"

\l

FLOAfING I'ULTIPLY

FIlUL

uon

II

. FDIY

110••

II

e"L

11099

\l

flOATING DlnOE

IllANtH AND TUNSI'IT flOAT ING

1{.·'O-I""'3 ~ONI'OI;

pc
tile,

DC

I-I,

6?~3'5Q'1)8t.O,.

1·l,-"t2b1"662171"
t 1J

11t'-"~bl_41~102~,t
"'4tb2414JO~N
DC
11 ,..,.4"~bfj~410'1',.

r:C

M4'S6ij,il410 IN
CC
ii'-"thI)4144U'j"
MIIH.I"18~

DC

5PS 11-[ P_'5E •

11.-b2ltL6'''''OC7"

Ol.h5. ~COP
Cc.
1I,-'jlH2611j9Cll 1t
N9b2td.,Q01P
nc
11, "'Z,151)6S'hOl"
"'11j5I)b~~"O I

'~D

"Oor.

1~1l1

II

15112

11

DEfiNE ORIGIN

OUIG

IHH

II

HE AD

HE'O

151H

\I

SAVE

151U

11

SUB.

SA vf

'.OOLC' A. E A

15116

DC
Il,"2I)S~Q"'5:"ll"
""2'$~S~4S" I \

8R'NC~

NO tNO Uf RECCRU

DC

'''NCH NO MODE

11,41')1}5.4H21"
)421
Il.42I)S4ql)" .... 1,.

~111j$1t44

O~

TPuT OECO'O ••••

S~

8NOI

8~M~

b"~CH

CH'N~H

SIOC

~OT

BUSY

SCN8

~'2")SS'''l461

19180

CC
Il.-b2SH1"4bbZ ..
02'53" 1""661(
DC,
11 ,-'595'5"94t36~1 ..

Rf~D.

oC

~HECT

N.q~~"~"'1'J1j1(

11,-624141$6412"

a20ft 141')f141K

19.00

CC

11",·b?41')b6Z412 ..

02"'~'Ht:2")1(

OC

Il.-o2SHd'tlbll q

Sf,.

\I

I~ZlO

II

15111

11
11

'Hit

IHH

UCO

152.0

II.

PROVIDE OUlPlJT SIG, $.05

15215

11

SPA

I S186

11

1~241

II

NlJMERIC IN'lJT CHAhNH
AODRESS AOU ""ACT OPE".

'OORI.A~O

11
I ~lC4

U.O

INC~E~E",

SHECT ADC .NO

11
II

'~~f

I"

'''''If;l),,q.,\j''41
11."2435S4J461 ..

11

OSAC

T""5.

Off I NE SPECl AL 'LP_, CONS TANT

NO

DC

15IIQ

,BHS

a6.

8"~CH

CC

PACE
SL~N

3')~"J"8bO

~26 'Htlt-}

IHOO

"EASION 1

SHECT 6E60 NUMERICALLY

SHECT lAS

11

02l)H:l" 1611(

llC

Il,-6?Sl"lS4b22"

0253~11j"H1K

DC

11,-bZ 'B f.lJ'tJb4.? ..

SHE" REAL-liME CLeCK

SlYe

U1C8

II

HeB

Ull9

11

OZ5301'j64<
0(.

11 .... b251'tl~1.,2,.

RLC~K

SELECT CONTACT

LJ2'i341~2~1j(

Cr:

11,-62'i3 IH04'ib82"

fi2':;13S,c,l,

oC

U21))49~

DC

1.~500

151~O

11

15301

11

READ ALPHA INPUI r."ANNH

.Ale

11

.NUC

11

}11)t(

GC
11.-f;.bc;f)l)b"38Sl ••
:" t)~5Ijb" 38"1(
DC
11,··htl"l'jb43~~1't
01:141 'j6" 19';1(
DC
11,-Io34,11i)5]013 ..
~,~

I ~51 0

StME

SLlC

ltlSI(

11.··')cHl~9~31'i("

~~414~~

SELfCT .'''UAL ENTOY iWIIC-eS

I.E.eCI INPvT CHANNEL

,)~Mk

Ll,-621))4G14)6~2,.

'WME'I~

WRITE

OlJl>UT C_ANNfL

.. RI TE ALPHA CUTPur '_"'NEL
CAL, 10CS UR EXEC 'KG.

WAOC

ROUTI~E

11

C.LL

15)8~

seeK

15146

II

QPTA

150C7

11

1 '.d~dGll

CC
11,-6(<'')''1}~2043t.
fJ24lj4S'){O'tl
OC
11,-44'>163lt14S3 . .

ICes 5tH

DISK

QUINt PAPER

TAP~

ALPHA

~4576Hl4~l

1\

Iii i
VlA'iIUN 2
1)(..

11"··"I.,)7~>'~~';l5-3t,

M4-;'t\3"':;1~..

r(.

DEFIN~

~PS

II-f PHASE: •

PAPER TAPE NUMERIC

P'CiE

OPTN

l

1l,-·441,5~J~.(o:He5"

UEFINE VARIA8LE LENGI_ CONSTANI

PVl C

1\

OEF INE MESSAGE

CMES

11

""46c;')34)11:t~

DC
11.--4lt'i44'562081)"
"'41i445 6 t08,.,
DC
11,~Z4l4H7q136t"

8R",CH UN CHAN 9

8CH4

ISHI

II

"R.NCH ON CH.N 11

8COV

15062

1\

lSon

II

~243481q~'j1)

IHao

DC
11'''''?'''3'l6b~1Itb",
""Zt,3Stb'D4b
CC
11,44455544008.,
M4"·Cj5544C08
DC
!It-44~1r;q5IHCj' ..

UfFINE ENO

OENO

IS'80

~4'51Sq5S11)l.

DC
~4'i

19610

rc

11,-44lii75941G1S:h.
7.,Q419'il
11.-b2S}lt9510S1 t.

DC
1l.-t2'i2'tl'571 11"
OH2415 H8L

19660

0'0.

155C6

1\

SKIP 'RIIiTER DELAY

SUP

15517

II

19610
Iquo
14690

19100
IqJIO
19110

aHO
UHO

14no

19'.0
14110
19710

DC
11.-bZ51'~5428) t r
OZ574~;'].L

S'ACe 'R! N TER ,MMeDI AT e

O~

11.-01514151381"
0l574151J8L

S'ACE

DC

pa I .lfA

11,-5159'44b2481,.

N154 .... 2.8~
DC.
1l.-S1~q'.itj~258) ••
N15'5501S6L
DC
ll,-571)941b26·S1 ••
" '59'IOl68L
DC
11.60606060606 ••
000Q60.0606
OC
11,6060606060 •••
0060601>OtQ6
PC
11.,60606,'.060. I.
0060606060.

DC
II. 60b06060606 ••
00606060606
DC
11. 6060(l060606 1 I
00606060606
DC
11.60606060606.,
00606060606
DC
ll, to060606060~.,
0060606060.
DC
11,60606060606.,
006060&t66.
DC"II ,t.060Nl.060& ••

pal~TER

DUPP ~O S PACE

Df.

I9no

0:

i i

~ M)~-'!)t>ObObO$ ~ J

OOohOb":'f.;~jifJOt. '

! [, I
- (lOOOOClOt:: ~

SP I ~

1'52.

\I

S,AP

U~)9

1\

PROS

15SS0

11

USU

11

PRINTH .L't" NO SPACE

15512

II
11

OU.My Q' CIlOE

usn
uu.

cooe

\5605

11

DUMMY 0' CODe

1$.1.

11

DUMMY 0' CODe

ltU7

11

DUMMY 0' COOE

nu,

11

~ODI

15609

11

QIIMN. D. CQDI

15•• 0

11

OP CODE

156J1

,Il

DU.MY O' CODe

"."

11

15691

11

CUMNY OP CODe

OUMMY U.

aUM"Y 0'

OUMIIY

OUMIIV 0'

~OCE

OD60bt\.~!O~06

1479Q

OEL.Y

1\

PRJ NIE a NU.fiR I C Nt 5 PACE 'RNS

Q060b06.06Q6

O(
L i., (.d.l~Coi;)ObO'O~ H
1I0bOMi60606
DC
~ j. t b06tib>l60'Ob t J

II

UHINE PRI"IER AL'Y'

(l2'j14~1)708t

I q61Q

1\

O\l"~Y

0' COOf

PR'S

1\

1570.

II

UUI

Il

02

16l0-IHI_ONITOR
I~IIQ

filE

,11

1~120

'RA

1~'10
198~U

FCCF

19850

201~0

lO160
20110
20UO
20190
20200

VE~SION

SPS II-e ' .. ASf .t

I5Ut
l~UI

FOCF. OC702

lU40
157U

"'(!t02 Tf"
TO
A
GOOon a
lUll' 8

15'"

·-·.110
TR.A, t.

8

PCAlL.
.- l

SEEK ••

t.
t

0·1
CCARO •••

l~l'O

'IOlU
'10'04

a

CCA, ••

.7

t •

10Jl~

...

0-1

DO",(JO.

~

~

SPAP, ••

OURC 0-1

20220
202)0
202/00
20150
20260
10210
20210
20290
20]00
101lO
20120
20BO

B

PROS •• ,

UORe 0-1
6

PA.II4S., ,

10,.l
10404
10'16
1042.
10440
lOUt
104~C

..

.)

o~

CORC 0- I
6

I'~AS.i,

DORe 0.1

+6

,

+1

CORe 0-1
PRN,; •
a
CORe 0-1

+8

PR~. I t

'9

B

B

DORe

P .. o ••

•

--

III!)

VeRSIUN

AM
TFM
67
10CET, H"
aT"
see_
TFM
ST"
TFM
PUT
" 8TM
BTM
CM
SNE
BTM
CM
a .. E
nil

• II

.. 11
INP~ f2 •• 01 OPT
EVAlAO ••• ll.4t 11

~ACSHF,PUTSRJ
INPUT+lO,5~,10

4~

49

-~
49

IOU'
10439
104))
00000
125,"

JUO,
02)2~

I lUG)
001)-0
00000
oeooo
oeoco
COOOO
00000
oecoo
oecoo
OCOOO
00000
JO'40
02321
10t)9
000-0
00000

12~"

OCOOO

121140

00000

4~

12U.

OCOOO

4~

11148

00000

4~

12110

00000

4~

12412

00000

..

1216,0

OCOOO

49

11192

00000

49

12424

OCOOO

, PACE

I,'

l0710 CCARO
lO720
lono
20140
20150
20,,0
20170
l07lU
20790
ZOIOO
20. . 0
ZOllO
20no
20,"0
20110
ZO"O
ZOllO DOIIGO

TO,
TO"
A
TF"
UM

INPuU06,nPIl'2.
INpUl05, 0, II
IOIplJr2o.,1 N',UT2 0'
IIIPUT2+1.05.U

I09h 25
n,

u.~.

I'D",
-utf:
'uCla.
'10. .0

EVALlD. -.12,4

DC:ARUo",UW
LD,l8SlIoIILOC:SII
fiIlP.,AOORS
iVALAD,oon,5 11
AllDRS. TEll".
liE U T. DCaROo"
LO~.Sllol.ll ..
'cotOw~ 1.10

-un.

"m::

IlOJ8

UA..

"lllJ"
111111'

Aou~s.aClOCOIl

&OOtOlio JolO
MEXIt
17
rOil '"INPIIU+500,lI

H

u

OJ"OQ.~9J0256

DC

'"

21

...

pU1SRJ
INPUU06,IOllac
• + l3. ADO(O.

20700

TO
IF' ,
ITM
TF
INF
T.PI'
ail
TF

16
25

• 10'952

INP~T2+bolOGT

EVALAD,PUTSRJ.
INPI.J2+o,IUSK
EVAlAD,PUrSftJ,

MAC SHF ,-.20

Tp

"
",

"Zl,AJUST
AQQG(j~.; 10
AliOR S, AOOCOW
AOOCO •• 23,10
INPilTZoI,07,I0
CTEST,"12
CFFA,NCDCF 2
C~F ,lULU
,O,UOAO;AlSC;T,INSTRN

AODCO.,41
INPL.T2+1.50, 10 II
"0 IT

ST~

Bl,
TFM
20600 'VTSRJ TO
TU
20610
AM
20620
TF
lOUO
AM
20640
TFM
Z0650
lO . .O Mun aT"
TFM
20610
8TM
20680
20690 NtOC;F2 CDA

10';'0
104.0
10HO
10410
10480
104'0
10490
104'0
105eo
105eo
10510
10t'10
10510
10520
losio
105)0
10518

,10538
10HQ
10562

AouRS, ADOCOW

s.. e

l05~0

10'"
10)0)
10291
U'
00000
~.
IOHI
I'

IS

10561
l5 1051]
11 02528
10574 26 01299
10586 II' Ol521
10591 U' 01041
10.Ol
10 ,10 H
106U 16 Ol046
IC610 17 051104
10 . . l
Ii. 01046
106,4 11 051104
10666 16 0)046
10678 11 05M04'
10690 11 111111>
l'O'10l 14 0290'1'
_,10714 41 lono
'lOU6 17 Ill ..
leUI 14 Ol901
10150 4l 10110
',,10"2 If 11816
10174 14 01901
10"6 47 10UO
10,'" 17 nllt
lOUO
lOUD
0)046
fOII*
,ICUO l5 Ion)
10842 IS 10165
III." '11, OlS,.
1016. 2.' OU"
ozsn
Itnl
1'/)190 It 01041
10'O'Z ,11 OJH6
10.14 16 '026"
lc." 1.J onu
la'll
i'

PUTSRJ
MAC SHF ,purs. J
INPlJT+lO,42,10
PUTSRJ
MAC S,HF ,PUlSRJ
IN'UTolO,43,IO
'U1SRJ

C~

00701
corOl
00500
CCOOO

I~

SPS II-e PilAU A

TRANSFER I NS TRue TI ON ROUIINE
... 2 J. AODCOW
TC
•• 2.3,AJUST
TO
AM
AOUCOW, .10
TF

~~

)

IOle-",,) _OhITOR I
0
T.'

4~'

00000
00000

..

0·1
08
PRN·'." I
OORC 0-1
'RINTER SRANt .. TASlE AND ROUTINES
TFM PR.~11·6 ,a T8l~
PRNT
TU
PANTI .. I ,lfPO'21
PA~U.S ,PRNTlolI
A
.ANT! S
• ... ·,.10
ITBl4 8
SIl 1 p".
'0
OORC 0-1
SKAP •• ,
+I
8
DORG 0-1
8
PRill Toft." +2 SPI_
UORC .'- 1
d

8

IUt4

.1

'10611
Inlt
IOU4
10)2' ~9 10666
len' '
10nt 49 '11154
10,..
49 10 . . 2
10)'~
lon,
,~
101~
10954
'IOlt'
10164 '9 11142,
lon4
'10)" n
12106
IC1l4
10)a.
'101~2
10392

.,

.

0-1

.~

len.
,IU5'
1026"

OO~C 0-1
0
lOGE' ••• .1
OORC 0-1
PUT .. t
B
'2
DO~C 0-1

OORG
8'
OORC
a
DORC
8
OORC
8
OORe

., It.,.,

'AGE

,1571'

INSlRN
COO08l+6,8J811
COO081011,IEPO'29
COl1081+ 5,GOOOK l+ II

~0210

20HO
lO15U
20160
20]70
20110
l0390
2040U
20'10
20420
lOHO
20HO
20450
20460
2041U
20410
20UO
205CO
20nU
20520
l0510
20540
l0550
l0560
20510
20580

2

FOtF. 00701

OOA ,O,A20AO,'zSCT,lhSTRh
OJ1800·55J02U
no FilE

Dale

1~860

19110
19"0
19190
19900
19910'
19920
i9910
19940
19950
19960
19910
19980
In90
200CO
20010
20020
20010
20040
20050
20060
iOOl0
20080
20090
20100
20110
20120
20130
20140

l~

lilt

""'
11114

11181

11
I,.

"

as
as

It
It

,"

Ol528
OU99
000-0
02528
-C041
OOON-

,,0566
1013-

·055'
iOI3"

-0~12

1069JOalO
000"9
01200
JOll30
OOOlll
OI'~OO

JOnO
OeOM)
01200
40111
'-OUO

~i5'1

oh..

000-0
'outl

OIOU
000-1
JO",

~C.3I ,
·1'414 .-

0)046 02121
01045 , GOOoO')O~.

01041
01110"
10.U
01016
0""
0 .....
OU99
IOt02

:ii,. :10"

,O,lO~6

.00-5

'lun"
0'10)1

,.DIUS

oun

Uot"
OUll

la'"

HOO",

',1111' 000-1

U
4'

11

111299

lIun

•••
01"'

0..-'

01111

~"""

"

·1&2C.-IHl "O~I '0.
10880
10'911
10900
10910

IF"
8T"
10
TO

20"~0.

10930
20940
10950
1096 0
10910
10980
20no

'

TH·Pt\,.Op~~

eVA~'O,"\2,5 II
H'UO"H2,~ II

s.

81

1l0~0

'C.~l

21060
21010
l108,U
ll090
illeo
21\1 0
llilU
l1l30
UI40
211 SO
lIUO
ZI110 • "R
lll80
lII90 'CAlll
21100
21HQ
21220
lIll0
21240
21250
lIlbC PCl'l
lI210
21280
21Z90 PCt
21 300

ZlllO
113JO

1I Jl" .

' lIlO2
IIU_
11126
II'H.
11150
11262
IIH4
1'1216
112'9111)10 .
IIlU

AODR $, "oocg.

AOOCCI., Il,l 0
. ··14,R.SW
ADDeow, '010
COll-lI, I.HI.~GS-2C

8"A
HI

"20,I~PUT+1O

~E

'CAUl
''''lI.lO.H,IO
'.CAl~ I

C~

IN'~r.ZO,OOolO

6E

p·C TA
'COll,INPUI+ZO
COL~-I '
COLL-17,COLL'lS
COll-II,lolO

el<

IF

CF
tR
CM
ee
f•
~1
CI<
8E

rp ..

TR
I.
.SF
TF,
~

...

II)"

MFX IT. '

TR

1114_
IHU
11.366

IIna

II''''

ERH
I~Pl.T.lQ,

INPUftZl

• 'ft"

21360
21 Hy
.11180
1I HO
Z \.00

Of
80

E.RINT;EPRINT_I
E~CU~ , 6AS ISW

T P"
HI!

1~.~TlH.0600C
CF~A,~COCF'

CAl~

Gnu

aU99
02521
IU_.

'DnU

II
'45

10902
02421
11316

49 '

1151~

4~

'OZUI
109H
OOOOJ
·000-1
02UI
COOJl
'OIOH
OCO-'
0'"00
01907

11~41

oocoo

IU4J
01011
I

07200

11698
11110
11122
11134
11146
II I "

.T_JE~fNr

03299
10'02
01016

16

116~2

T4aUI.YfCTOII QF

0~4-4

4~

11606
11611
11630

...

II
44
12

IIl)Q
1125-

054-4

.31

11510
11582
IIn~

KfM "FhS"O'ICO
DAC hl INK
LINK

TBl

,.

oun

OUlI

II"~

11~62

C"
8"l
.(Ol,l-2.·.-.
C
D"E PCLn
AM
.ee·II,50\0
SF
'ce .tI
AI
.~Ctll ...
IFM e V~lH-I, zHOO
OC

15
II

11190
010,)7
OIOH

1161'
II".
11691

1J49~

11506
lIS 14
IU26
11511
11550

eOH;O
eel t-11,COU_ u
• tAlll
COll-1l
. " 'II,Cl UlflC" It
'(CHld.oIO
PCC fll,Cl TB~.IO').I.
eRn

Z.

U

05M04
lonl
0101.

116H

114~6.

II.'.
11410
11.12

'CAll '.12
COll-lh06,IO

16
II
it
it
Z.
If
Il

Q]o-' Olli'
0]041 000-5

02907
11514
02907
46 ' 11494
26 02439
)J, OHU
H OZ4Z2
14 02411
46 116 ••
·31 02906
49 ,113"
14 02422
46 11510
15 02439
II 0242.2
H
IISl4
·32 02<026
16 11641
,II 11641
14 11641
46
IIU6
24 02'31
4T '115,4
II
11601

II)"
11_10
11412
114H

. l.· ,-

1I HO EA22
ZIHO

2l~lo ~l

III~O

AOO_S, UM'_
I~' •• OOA

I J2

.,

PAGE

. lt~
TU'·, ,LI)."~N"LOt $_

'17.10

"1':'0.·
lllOO

".60

SPS II-t PHASE A

OAC

BE
21~50
BU'
21560 (lLlIII< OS
21510 el~aAQ TD
lIS.IO
TO
aM
H'5'0
11600
. IT"
liuo
atll
fF
.21620
AM
211030
lU.~O
8N'
SM
21650
fFM
11'.0
' aT
lI,IO
21UO ('LLU Til
Tf)
lI"O
all
21100
fF
"1110
HII
lIlZO

linD

A5loN 2

c·s.

215 40 '

21740
.HUO CC.
11160

...

w~

11192
1119.

e-Il

z,j4.0,

ll'~Q

I~'

OAC .,l9"0
lOAD
OS • CllQAO

214JO
.21 •• 0

ZIlla

CLL

MONIIOR I

uua:

U. !lU.

n

If

'01.-.
01.-.

un.

02901
02~01

oeo",
01100
02901
01200

OH21
02)99
OCO-O
11940
1195Q
025Z1
OOOLI

olon

000-5
0000'5
02Ue

on..
001)-:0
alSU
000-_
000-6

UUI

..

Daoao
0lOJ7
olon
110000

au ••
U19~

122011

..•.':: 'm:; 00.'H,'4".

I~m If'.' 01....
, I U , ..t 'OIOU
nl99
IUI.I '
1,;50' u Illn

. tzUZ

I·

IUIM

uuo

12U9'

12'106
0,,21

on99'

1020-1441
21'0",
21910
11910
119)0 DeAl
11'40
21950 tuS

A.
IF

"O~IIOA

V.~RSION

.2

1228.
12298
11)1 ..

00010
ADORS. Aooeo ..
AOUtO ... 11010
C.HA.NCDtF 2

A~

IfM
81

.12]12

~E'II

Ot
2iOI
01
DC
2,b6
06
21'70 CUA
OC
~
01
PM INT CO~~ANOS
21980
TD. PANT )+11.1.11,
011 I S I
219'0 PRes
IF.
INPLT2+' ,03S,Q,
OP CODe
12000 PRC
A7
PRNI2
UOIO
22020 PRN5
011 15 I
IP" PR~T).ll, 1.11 t
TF~
220]{' PRN
INPt,.TZ+l,038,9,
UP CCDE
PRNq
87
21040
IDO PANTl+lh 1.11 •.
Oil IS I
22050 PRAS
IF.
INPI.T~.1.03q.9.
OP CODE
22060 PU
PRNIl
81
2201U
•• 23-,iODeo_, t
11010 HNT2 10
~"E ACCCO~ EVEN
10
e,+23,'JUST
22090
A.
Ao.ota .... 10
22100
.8TM EV"l.D,~.12,411
Z211U
8TM (VALlO, •• 12,511·"
SHIFT lEADING CO"~A
22120
IF
AOOA 5. AOotO ..
22UU
AM
AoD·CO~.II.IO
21140
ieST CORE OV£RFlo~
B T~ tTEST, ••
12UU
OOOI.IEII 10 .0vE I 10 011
2210U PRNn 10. INPL.T2+b,O,'1.
..... PlJf2 .... 9,ll,
MOVE 08 AND t9
IO~
22170
TOM
INP~ll.3.00l1
UIIO
RESTCRE "41 N 'P~ASE .• lOAt LABEl
01
MEXIf-, ..
22190
PR INTER CARRIAGE CONtROLS
12200
22210 SK IP
TF" slup.n. SK I PI-I-I O•• OOOIF v TABLE ,READ OUT "OOIF'IEA
TF. PRNT6.+11,OOO12 ••
.001F v UPPER ll.IT 0' OK t FIELO
22220 SUP
.OCIF. T.BlE READ CU~
TFM PRNT1+11, SKAP 1-1"1 O. t
22210
PRNI4
21240
8'
,"001 FY TABLE 'RUD CUT
22250 SPAP
TF" PItN T7tl1 t 5,P."1-1-1 0 ••
•• Z3,AOOCO"IIJ, •
'~"E AOOtO~ EVEIIi
22260 PR~J" 10
10
•• 2 hAJUST
22210
A~
AoOCO .... 10
22280
TESI P OPERAND
U290
BT" EVAl4p ••• ll.ltll t
81~
EVAlAO,·.12,1},
GE I Q OPERAND
22100
IS Q 0' LARGER T~AN ZERO
C.
IOeRS,OeCOO.1.
11310
8H
PRNII>
22320
ERROK S
22))0 PRNT5, JFM EVAlfR"'I' ' .• 'COOO It.
OC
22140
1.' ,-

21"0 t60w

2."

,Z"

22150
~2)00

21370
22)8U PRNJ6
22l9Q
22400
22410

8T' ,
RO
TFM'
C.
8M
IF'"
Sf

EPRINT.e.RINT-1
ERt QR.E RS·J S.
.ODR5.0eOOI ..
"OORS.CCeO], ,

SEI THE ~ FielD TL I
ISO lE H TMAN .. OR I l .OO.IFIED
N~ GO T'O ERROR 5
MOVE OP tOOE

PRflff'i" ..
INPut2+1.014,Q.

lDDR 5-)

I j:1

\620-1 .... 3 ,"OlliITOR. I

VERSION 2

un4
12H2

.

02521
032'1'1
11 OH28
. 02629
n 10901
2

000-0
02521
OOOH
JO']I

U

OOOOJ
00-35

II
20

,

A

r •••

1214'
12348
12360

un.

12110
I2nl
12404
12412
12424
12436
12444
12456
12461
12480
124'12
12504
11516
12528
Il~4G

IH52
12564
1Z'76

10
49

15
10
49
15

10
49
25
25

11

11
Il
U
II

11
. 15
IS
'15
49

12551
0]04\
12444
12551
0]041
12444
12551
03041
12444
124U
U419
U1528
05M04
OS4-4'
03299
02528
07436
OlD".
0)0<04
0)04)
10902

12584 16
IH" 10
12608 16
12UO
12618 16
121>40 2S
12652 25
12004 II
12016 11
126U 11
121CO' 14
12112
1212" 16
I21H

12U3
I2U5
OH28
05M04
OS"-"
03299
li/172
07011
I

127)0
12748
1210C
12172
12784
12796
12806

07332
01196
0)299
032'19
12124
030 .. 1
03296

••

..
11
4)

16
14
61>
10
')2

1261'
121M3
Il84)
12 ... 0

uh]

22510 SUPI
22520

22510
n54D

12550)

DC
PJ'
DC
-R
OC

21
31
20
II

11
49

121.42
0)043
0]299
02528
01431>
10902

12816

"J'

ot
-R
Dt
PK'
DC

3',-71'

128"

2,-09

128'93

\289.

),-41'

2.-09".

CHAIIi 2

128"

3,·12~

.. 12'101

2.-09'

12QC)

]

-R

2256U

DC
MK'

3.-42'

2251U

DC

2,"'09,. ,

Il'lC.
12908

CHAh 3

-R
22580
'22590

DC
Pl'

3.-7)'

12911

ce

2 •.-0'1

129 1)

O[
. ML ~

3, "'1t3'

lUI •

·R

22600
,12610

2.-09,. ,

DC

12'118

tHAlli 4

2

-R

Ue.2Q

3, .... 14·

D~

U921

P~'

12610

"640

DC

-R
PC

2,-'1.09

12 9 Zl

),-1,,.'

12'n

MM'"

l2UO

l,"'O9, ••

ot

1,'21

~HAN5

-R

Z~660

',2. 10
2UIO

DC

,,,.,

~,-t!l'

DC
-R
DC

2,"'09

un.

2

3.-45'

Uti.

I

. t2UI,

MN"

21 . .0

2.~Q9.,.

DC
~R

i2100·
-2'2110

. f~?~,O
"'10

Dc;

.'....0,

'

~,.

.140':
-R

I"'.'

1,-16'

.'0'"

DC

un.

'HA" •

,'1."-0"

,12.'U

'h~""

u ...
a2'41

'~"'.): .{,
2.·"'O9·,.~

CMAN?

,

114

OCOOJ
00- 31
OCOOJ
00- "
02528
02399

000-0
1249K
1250M
02528
OOOJl
J2540
0000OCOOR
0000~2817

-0012
J2882
J.3002
01528
023''1
000-0
IlbaQ
12100
-0000
01100
NOOOO
01))1
02416
-0001
-0003
01100
00-34
00000

PAGE
12820
12832
128"
12.,6
\2868
12.880

-R

ll50u

4'

12344

S'S II-t PMOS'E A

•• 22,1.001$ ••
~QUIF' THE OOVE 8Y 10· tc '120
I~
INPUT1' J. 'PI ~I-I~I C.l. ~OV~ o ~ODIFIER TO INTERMEDIATE
TF
ACCRS.ADOCON ..
SAVE ,THE ACDRESS
AM.
AOOCO~.altiO.
uP TME CURR~NT AC·[RfSS
TesT CORE OVERFlO~
8T. C"'f $
2l4~0
l2"
2241Q
RE~TORE ~AIN PHASE. LOAD LABE~
Bl
filE x ITt"
2248U •• Q ~OOIFIER PRI.NJER CONTROL DEtCDE TA8~ES
2,-09,. ,
tHAN I
22490 .so IPI Dt

ZZ"2U
2l43U PRNn
22440
22450

PAGE

SPS II-.C PHUE A

AOD.tQ~.

2'

2

012,.
J2997
02528
OOOJI
J2UO

49

l'lC-I~U

2lhO

DC'

pp'.

una

,_DC

,

. -R

VE~SION

.'ONIl'OR"

"

VS'

II~t

,,,an a,'

i~nl

2.-09

)1',)

21160

tic
JiIIP'

h""'~7t

22710

DC

2.-09,.,

22190

DC
PO'
UC

n'oo

DC

UUI

2.-09

wiu

)."41'

I".,

-R

"0'

22810

DC

2 ,-Oq t

••

Il'l.'

CHAN'

-R

22820

CC

) ,- 79'

'"PA'

UIlO

DC

·2.-09

-R
22'~O

DC
"NA

:22 no

3.-"9'

1.-09,. ,

12'"

)

12.11

I

1191.

U,,,.

t

DC

CHaN 10

-R

22160

DC

,_.

],-.70'

U"I

UIlO

OC

2, ... 09

l"'ll

),-40'

Il~"

-"

' DC

U880

fIo1:.. .•

22 •• 0

DC

2, ... 09 ....

CHAN II

DC

22',10

,CC

"

I"'''

-R

12'00

)

., 2

li.n

)'-71'

so

)

,in"
CHaN 8

-R

22780

PaCE

),-1f'

],- '!l'

n991

2.-09

: 11.'11'

ll'

-R

H. 2 0

DC

3,-C]'

11996

~l'

2H1O

DC

2.-0'1, ••

CHaN Il

'II'" "

~-R

22940

DC

1.- ~ ...

110CI

2, -09

1l00l

3, -Cit'

iJCC6

l"""

DC

12'~O

2'

,-R

DC

22.60

_.JiII'

2297C 5'1",1
n'80

-.
DC

2.-041, ..

nc

'3,-51 '

n,Del

SPACE I

11011

~J'

22"0 SPAPI

nc

2,':09

IJOll

3,-2l'

11016

-R

2 ]000

~C
~J

2101(;

•

DC

2,"'OQtlt

SPACE 2

I I ;,

-R

..

',OC

23020

"DC

2,]010

Ih2C-IHl _ONI TOR I

V~RSIUN

2

IJO'*

SPS II-C P"ASf A

1,"~2'

'A(;E

l'tD,21

2,-'C'

IJOH

UC

],-'62'

1102.

DC

2.-0q, •. I

·R

23040

0.'

nasa

spaCE

],

'1

DOli

-R

OC
"l'
DC

230'0
23010

3,-1;))'

nOli

2,-09

1)01)

], _\t- l'

UOU

-R

DC
Ol'

21080
210'0 FM
HIOO
21110

11018

14

1l0~0

'II

TAA

110U
I 101~

~6

CDA ,0 .AlOAD ,usc T,I ~STRN
OJ9252-,29J0256
TCD FM

I~08'

l'
]8

HIlO FMOtF
HUO

HI"O •

FMCCF ,00101
F"OCF ,00102

OORC INS TR~
U8l'E FOR DMES.OVlC.HUD
TFM DECll.6 .DEC UI
TO
aE'n ].11. ZEPO+18
A
DECLl+5,OECU+11
l0
OECll B
OECTn IONES."
'0
DOIG 0-1
QVLC, .. +1
8
OORC .- t
B
+l
DORC --I
B
"UOER .. ,-)
DORC .-,
• ANALYZE CPN,TROl eHA . .CTiR, SUI ROUT IIIE AI!IAL
eM IN"Uhl",4,IC, 1ST CHECK IF RIGtlT PAlEN IS 'AUENT,
ANAL
8HE , ANAL I.U .. , NO LEF T "UIII. tUOA
IF
A~iLI_II,INPUT+U""QvE ,HAun,. TO 'IIO'IOIIA LGUnCN
fl
IN'~h",IH'UT+U .. PosnlON IlIfU' AE'IlAO
AiwAL\+II,44,IO,1S IT a 0
'lOT A D. lIn IE GOOD,
A.. ALI IHE A.. aU .. IO,
HII EVALER-lo 17400 .. IT IS A O. ERAtIII
DC
.l .. <~

10,n.

BRANC~

21190 DfClI

lon6

BlOD

10l . .
10210
IOlt2
IIIl04
10114
10114
Inn

lUlO

Ill"O
llHO
HUO
21170
uno
2]1'0
2])00
2)UO

uno

2]))0
UHO
HUO
2n60
lUl0
UUO

uno

_-e ..

. ...

eM
,

23400,
U410

IT

ll4l0

10

U4)0 A..1I4
U440
U4'0

CM
81

nuo

eeoo"

OEf I HE ,t.4(d~;-. fAO" At.PHA fa ~UJl1ERic.
HS'O
2)550
"O"'lfS2".
CHANtl"G FRO'" Nl.JJEAIC TC ALFA
D'l,~r.. .... J
2)5bU
2)570 .~al'J eM
A"NA.l.ltll,'1.1D. eMf( FOR P
U580
HE
ANLI....
LEAVE SUBROUIINE
eM
ANA~1'11.S2.10. (HECK FOR A,S.,I
HS'IO
Al
ANAllt12,,,
EIUteA IF ttRAlltCH
211100
eM
4NALltll,ol,lO.
llolO
8M
A~All'12t"
ERROR If !;tWo.NeM
HUO
8"
A"flU...
(,KAY. A,S. OR or
HUO
llb40 ANAL" CS
,ANAl.'ll
21050 • PHASE A OMES PROCESSOR
ST"
eVAlAD, •• 12,lt. SCAN AOOR£SS UPf-AANO
216bO OM~S
If
OltdlS.CURER+2 .. CLEAR OIGII COlNI
21blO
IF" OlR-I.OMBC .. >EI >wITCH I~ '''N~LE POSSIBLE tiRROR
21b10
AN_ ~.2~tINPur.20'ICHE(K IF 8~EAKEA A R~
·23090
U
OM50M ••• SMEAKER A R". ERROR. INSERT NU~ END MESS.~E
23700
TO" SMOOE ••• INITiALIZE SIARIING MUOE S~JICH
231\0
HNF OM~SI. BSW.. .
PRCGU~OER SPECIFIES ACDRESS·.
23120
231]·0
If
lOORS.Aooeo ••• NC. "OV~ LO~AIJ.ON. tOUNTER INIO AODR~SS lOC
TF~
MOOEI.b.OMSONI ... INIlIlIAlIlE ~UNC~ I~ Su~ROUliNt MOD~
2lHO OMESI
RTfi' fiIIcr:E, •• 12H
FIhO MODE
2]HO
2370u
23770
23780

eM

2)790

CC

23800
B8IO
nl20
1)1]0
2)840
23650
2 )8bO
H87U
Z1880 .OMHA

AI
80
8NF·
10
ID
AM
IF

l3890

239CO rMSAI
21910
l1920

BE

IFM

S"

HM
aIM

IP\I~\..T"20.41"O,

SEE IF ALPHA illUDE:
STAR11~(,i JIIIOUE ALPHA I' HRANCH'.
EVAlER.IoI1JOO .. ILL~GAL STARliNG .UOE CHARAClE~,
1 t' , .

OMSAlF

l ••

fPR INT,fPA.IP\iT-1 "PRINT EAA(.;R fl'ESSAC',E
"'~('OR, fRSTSIII

OM~

SA.BSW..
"23, AOOCO...

SEE OF PROCRAMMER SPEC 'CDRESS
NC. ADJUST AOCRESS + Loe COUNTER'
.

·.2~,JST8L

10~91

01200

10~bb

11841
11002
11218

01200
OCCOO

IOH8
10~'O

ICb70
10414
IObS2
IOU.
10100
10111
101311
1014Z
10154
.10160
10118
10790
10802
10814
10120
108H
IOB18
10850
108b2
10814
10886
108~8

10910
10922
109'4
1094b

,.OUE1 .. tt,OfitS81 . . .

".r-.

SUtiAQUTINE MOCE

"I.

MNF

ANAl,ANAL .. STRAY PAREfli NOf FOUND IF BRANt'"

"AM

ANAL"

IC9~8

DlCoIIS •• ,IQ. IfFT PAREN FO~ND. lPOAIE 01~1I CeUNI ~v 4

10.13
10462
1041 ]
10414
10413
10414
1040Z

I06~8

SEI AOORESS OF "ESSAGE 10 ZNO PIGIf
Acoeo •• 2010. SEf LaC. CUUNIER 10 Loe AEFORE. MESSAGE

AOOR~.AODCO ...

01100
000117
01300
JlOOl

10~9I

10598
10010
IDoll
10614
10040

ADOCO.", ,10

SfT-UP ,:rtANCH IfliST
MOD~.MQr~"SEARCt' FOR teM"A
ol" ,OMf SC " SCAN fIIf SSAGE OPERAND

.M

000H4

10554

10~42

a

11
ZO
10
.~

49
IS
44
20
10

11

10694

026'1'
118']
10742
11.5.
OH40
1077B
0]Z99
1178.
11730

0270Z
JI002
02 .. 07
OCOOO
OCOOO
08031
02528
JI020
J0802
OOOMI
01200
J7100

OZ~Ol

27

C1HZ
07l'lb
10914
10897
10909

44
25
25
11

26
12
III
17
II

OCO~2

01100
0000]
01100
DCCOO

05M04

14
46
10

OJ

OCON7
01200

1086Z
01071
I

OZ~28

07BI
02476
08037
02528
024S9
OCO-O

all99

D2~28

D2~Z8

OOO-Z

11184
11710
11844
02b99
1034Z
10414

Jll'O
JIOOZ
000-'
IC142
COOOO

JC9~8

10910
10982
10994
110e2
11002
11014
11026
110'8
11050
IIOU
11074

...

11
11
11

10958
01)46
11062
0]299
11844
02699

11086
11 098
I.IICb
11105

44
4'1

10142
10414

10342
OCOOO

BI
tPr.i INT, fPHINT-1
INPll.20.7Q .. CHECK TO SEE IF CHAR NUMERIC
24970 OMI'$II C'"
24{JHU
OH
DNS,fR2,..
NO, NU~ERlt, fRACR
CM
2409U
INPUT+20, 6'1, 1 0
~tt
OMS12, .. NUMERIC. IF BRANCH
i4100
INPLr+20.50tlO. tHEtK IF ~OTHAI.; .. q
24110
CM
Kl
D"SERZ ••• NON-NUMERIC IF BRANCH
H12u
·241]0
CM
INPUT+20.59.10
24140
8H
OMSfR2. ,'. NOT NUMERIC If BRANCH
DIGITSoioIO. UPDATE 01~1T COUNI BY ONE
24150 OMSIZ A~
OMSNUO
.
241bO
.
B
24170 • CHECK TO SEE IF ALPHA WILL SlAlU I·N EVEN LCCATION
24180 • LOCATION OMSV CONIAINS LaC OF LAST OIGII SIOREO,
OM~V.DIGITS .. INITIALIZE II wllH DIGIT COUNT.
24 190 CHES2 TF
8NF
OMfSH. 8·SW..
SEE CF PROGAA."ER SPEC '~ORUS
24200
A
·2UIO
·OMS~.ADOCOW .. ~O. ADD LOC tOUNTU
8
24220
U~E S22
24110 DME$21 A
DMS~.ADDRS .. ADO PROG SPEC ADDRESS
SII
DIIS~.I.IO. ADJUST FOR ~UMERIC SURTING MODE
2424"
'+24. SMOQE .. CHECK SURTI NG MODE
2«250
BO
210200
SM
OIlSV.I.IO. ADJUST fOR ALPHA STUTING 1000£
l4l70 CIIUIl 10.
·+23.0M5V
DMSePfD-l,EVOOD., ,
24280
J.C
U"SIII.OMSENO-I . . . ILL SIART IN EVEN
24290
A.O
24]00
ODD ERROR. PRINT .EAAORriUSAGE
1F.M EVALEA-loI7600..
2UIO·
DC·
1,.' ,-

I11Co
11118
111]0
11142
1\154
11166
11178
11190
IIZCZ
11214
IIZZ6

21
14
46
14
40
14
H
14
46
11
49

07B2
02907
11664
02907
11214
02907
1161>4
02907

07)]1

IU18
11250
11262
IUl4
H286
11298
1.1110
IU2Z
11314
1114.
11158
IU10
11181

26
H
21

03260
11280
0]266
IIB4
0126'
0)266
11334
032116
IUU
11429
1095'
01011
I

02699

Of
80
'"
8
20\3$0.
24no PIISEI'jD CM

·11112
IU'.
11406
1141.
11430
11442
114.4
11.611

2]910

.219'0
1]"50. OMESC
11900

lino
l )9BU

ono

COAt

U
10M

ANf
,·M

24009 01l5"UII B1M.
A..
l4010

.-

)

O{LIIt..,2 .•

lJPDAfE OIGIT'COUNf BV 2

l(Jt

D~SRI

SMOOt 01. In. Sfl S.ITCH FOR ALPHA STARTING· oODE
OMSNU ... ES . . . · CHECK IF PROG SPECIFIED ACCRESS
AODOS.l.IO. PROCESSOR ASSICNEO. INCREAse AOURESS
Off!' .U/lft- S11, ,SCAN filESSACE CPfAANO
P.f,... , r~.2.lO, lEff PAREfIa fOUND

52

OOO~I

1041 ]
10'14
1041]
10462
IOU3

10494
10500
10518
105]0

H

11
49
15
44

OZ~99

000-2
00000
000-1
08017
000-1
HIli
OOO-Z

I 17
vERSION 2
ONF

ANAL ,ANAll"

24020
24010
240'0

A
4NAl4
D.URG .-3

l .. 051.J

OC

Cj,

SPS II-C PHASE A

TA AV PARE N NOT fCUflaO IF BA.NtH

1. '.,.

240bO

,

ZU20
24330
24340

EPR INT.EPRINT-I
·ERCOR. ERSTSw
O"I.TS.I.IO.AlLO~ FOR -

OMse·1
urGlTs •• 9. SEE IF NO elGI TS ACC~"ULAJEO

24170

BM

24310 DIISAII
2U'I0

All
0IGITS.100.9
8 .. 010.56111 .... •
ERROR IF BRANCH. HO DIGITS
TFM INPUTZ+ .. 010.9 II
H
INPLU+6. DIGITs
IINF, •• H •.BSW
l.
AODCOW.DIGI IS •• UPDATE LOCATIO CO~NfU BY IIESS·'G' SUE
ifill .CTESf •• +U
Tf" CFu.litDtF

24400
2.410
.4UO
24430
2 •• 40

z.4So

24460
~"'1D NtCtF

-+'6.,.

~o

l~RC.

OKAY

.," .. CFf.LOLIL.

..

2."0

1,..'
""
pC

49

21
12
43

·12
n
25
4)

16

IIUI
U490
11502
11'14
nU6

OUlI
0'436
02619
025"

lin.
Hno

'4

un•
lin.

olli,T$,IOO,", SET OIGIl CCIlNT TO laD

uno

EV.LER~l,.C.OOO •• ER • MUSAGE. OllES TOil LONG

1. •.••

U601

oaOH
02528
00000
03299
000-1
03146
000-1
01266
02469
1142'1
J160D
01331
02476
000-1
00000
00-00
01100
OOJOO

00000
00.7026'19
01037
026'1'1
JI531
J15'l
~'414

16
16

OZ6..
07071
I

00.100
410000'

4'

IIU6

00000

U,Ol

I iii

~0079

01100
00009
01100
OCONO
01100
000N9
11b64 01100
02699 000-1
11062· 00000

07332
011.6
02. . .
10'151
0269'1
11418
02699
11614
03041
0)046
11526

UliU

. CO. • O,AZO'O.uSC T.I NSTRN
OJ"OO- 21J0156

'OC!.' ,'I,"
24.90
24'00
24510

P.GE

5]

162C-IH)

~O~I

TOR I

VU$lON'

5'5 II-e 'HASf

245]0 OllSEa I 'IF"
24540
DC

EVllEa-I.9COOO .. fa9 MHuea. liD DMU
I.·...
PRI~I UIUR ~nUGI

24"0
2.'.0
24'10
24510

EPRINI.EPaIIiT-1
ERtOR. £R SlSM
0"SRIO>2';" CONTINYI
2.0

BT'

80
~"Oll

8
Ot-

-0
2H90 DMSER2 IFM
2'.00
DC
,.610
24620
246]0
H'-O
24"0

E~AlER-I.ll'OO,.

1.' ,.

,AGf

i16l~
1161'

OPEU~D

17
11"'- .,

116'.
11.'0

ALPHA IN NYMERIC FIILt

24 . . 0 "OCE
2.670
b
O~SRfII.,.
2"'0
24'90
CIO
I~PLT+20.2]oI0. SEueH FlfLO. CHECK FDI COIOU
24700 "OCEI ~E
•••
CO.". FOUND. IU"CH
24710
CM
I~PLT'20 •• IO.
CO •• A ~OT FOUND. CHECa PO. Il'~'
24720
BEMOUE...
BlAlj •• CHECI Nur C~AlICIER
24130
IF
"16.IOOOE-I ... ALPHA CHII IN FJELD. RITURN, DR tHECK
24140
B
.. •
NE XI CHAR. ACCORDI NG ro lUNCH
24750 • SUlaO~~INE 5 10 SHIFT ONE CH' . .CIU 10 THE LIFT IN INPUT '~U"ER
24160
14110 OTR
TR
INPLT+19,hPUI+21 .. MOIiE 'OPfRANO LEFt I C..... nuclot
24T80
CIO
DIGITSolOO.9. CHftl DIGIT COUNT
24190,
6H
D"SERI-]6, .. 'BRANCH TC ERIOI RO~T"CE
BNR •• iO"~PUhto, t fOil .. '"
24'00
'24110
B
DMSEND ••• RECORD "ARK FOUNO. SCAN fl"'ISHEO
DORG --)
14120
24110
CM
I~PLT'20.4.10. CHICK Fca SIRA' aT PIIEN
2.,.0
SNE .. " ... ~OT A STRAY PIME~ If ,UNCH
24150
SF
ANAL ••• SET SMITCH FO~ STIA' PIRth FeUNC,
CM
CIR-I.OMESC
24860
24870
BE
DMS81'12
24810
8
OJ'iIISNUM+12.,. ~UII'
DORG .- 3
24890
Z4000
CM
INPLT>ZO.24.10. CMK FOR LEFT P'~EN
ONE
•• 24 .. ,Nor. LEFT PARE,.
24910
2492U
.8
•••
• lEF I PARI~ FP~~C
TF
•• 1B,OTR-l,.
NOT A It
24930
24940
e
MI~N
"9~0 •
14~6U •
24910 •
DEFINE VAA~A9lE lENGTH ADDREsS tUNsr.NT
1""10 •
aTM EVAlAD, •• 12.4
24990 DVL C
TO
HOOO
LOA8S •• Rloes.
TF
DVADS.Ii. AD OR S
HOIO
CF
H020
D~S'I
250]0
RNF OVlC2. RS\III
I J9
10M lOA8SwtldL
25040

~CNITOR

EYALAD, •• L"2,5

2~010

TF

8Nf

OVCKl. AODRS
DVl p. DVSWI

TF

OYAOH+ll, ADDCOw"

AM
S"

OVAOR+lh

25120
251]0
lSl40 OVLP
25150
2>160
25110
25180

~NN

A
BNR'
IFM,
DC

25200
2>210
25120
25130

BT
80
BT"
RNR
81
8TII
I

~52'U

81

Ul'O OVENO
2\260
25210
252.0

INP
rFIO
DC

2~190

C~

25290
25)OU
25110
U120 DVAoe

n

25)4U

•

uno
2~)50

TO"
"10

2H60

nno

ZS)'O oven
ZS390 DYSIII
ZS'OO •
ZS410
U420
2S~)D lOUDER
" . .0
n4l0
"".0

••

nuo
'u...o

"UO
UIOO COIlA
2ISlO
uno·

ZlIJO
21..0

nuo

111160
IIno·

IUIO

aD
TFIO
'FlO
'NF

nil

as

OS

AUDR I S

~o

~I

• -MOST POS OF 1ST CON.

•• 48, INPU'+ZO

1,' ,-

EA 9.

CC~SI'NI

Nor SPECIFIED

EPOINT. EP.INT-I
ERCOA. ERSTS.

•• 20, ."'U'.20
DvEND

EVAlAD, •• 12.5

~',.

JUOO

I

'011"

II

A" ••

H

02906

,

. , . 11062

OUO,
OOCOO
OU07
11710

11.14

26 lin,

11126

••

00000

H
14

02'10.
026"

46
4'

"
'"
11900

14
4T
)2
U

01901
11.61

118.1
III ••
IIn6
11161
11110
1\192
Il9cli
119CD
1191l
11914
119]6
1194,
11960
II'"

45

,,-

.9

Ii 166
II"~

,

11')0

101~2

1114)

.. lana
.~

11014

12016

14
41
'2
26
4'

0-Z901
11004
00000
11022
00000

U021
12040
12052
12064
uor.
UOU

I?
1,5
26
U
..
15

051004
010i6
i240)
12100,
12112
080)6

12100
11112
12124

.
.

12100
0"-'
12111
1220'
12<003
1240)
OU99
12201
124O)
11256
ClOll
I

II'"

119.0
11992
l'lOC'

07.3)1
OZ416
OOo-z
00000

oaol

02901
OCOOO

OOou

OIlOD
000-0
QIlOO
1112'
00000
0"0,
OOJOO
01100
02907
00000
000-.
01200,
00000
JI002
DlzeO
OCOOO
000"
DilDO

000,00 .
11843
oco~_O

12,0,40
OeO)5
Oll"
00000
010)1OOOOJ

PAGE

1214'
12160
121Y2

IlU.
12196
12201
12220

I2no

12UZ
ERI. rOUl LEN"" roo 81G

12

17
26

26
II

12

21

U

16

IU~~

21

.]

11U
.9
11,
21
•9
I.
H
a,

lUIS

EPRINr. EPaINT-1
EReOR. ER S IS II
DVCKL. ,0
AOORS. COOOO
"24. DYSWI
ADIlCOII. DVCKL
INPUrz. ,
CFFA.NCDCF
CFF ,Dlt)-3'
• D~UGN'II
, DVASGN
~uou

07011

14
..
I.
..

12132
U.24.
un6
12261
12210
1221.
IUOO
12312

EVAlAO" •• 12, 5 II

1,

0,.7,
COOOO'

zr ann

U

UUI

DVClL, AD OR S
DVlP
DVtll, 00050
·.60
EVilER-I. 8COOO ••

II."

011.,

11130
1,1742
II?H
11166
ll11i
11190
11'02

III )6

ADDRS. SO
·.24
DVIOS>II. AODAS
EVAlEA-I. 9COOO ..

II?,.

m:r "

Inll
IU. . .41
16
16'
1240~
U
12416 II
12.,. IS
12... 0 16
12'52'
12111,
12100

"

00000
12124
0)299
12100
02521
-0050
-0050
OUOO
032"
02901
RCOOO

07)32

,01331
02416
1'26Q
U,It 02901
uno
0.4-4 Ihoo
12111 0)2~9
1220•
1211'1 -0050
lun 01100
070n QOoOO
_,1

on96
0~4-_

ann

071'. .

12111

'on"
,,~U

01311
02476
-00'0

, ~ODOO
' naoo
12111
0)0.0 0000.
0162' JI. . "
JI004

0251.

onu

II
0

10UTlNE

rFII
TOil
INR
"II
If
TFIII

"ED. 010
HEIDE"?
COMA.INPUT.ZO
INPUU'I. 010.9 II
INPun ... HEO
'CFF'.NCOC:F
.'TII. CFF .SIIID,TtD
CII
,1N,uTtZo.n.10
IfflOEU)A
81
HIAOU O".ANO GRUTU 'H.II ON' CH. . .UIa
flU,HUD,R.l
til
INPUhZO •• 1O
•• '0
til
IN"UT'~O.'O.IO
S!!le r_L CHAItACUR USED AS HUDEI
II
EUI

114'.
12.",

at '10217

000--0
00000
02907
QJOU 00-- ..
O~CI4' ·iou7
014" ' Jl56Z

tl " a2U I
n a.,'4'

,.

12'"
Utoo
"UI -It

....

a.
12'"
lIU, n
-141.
t'''' -A'" II"" ,
01~'

.,

""11;-

.D

a,,,.

au",

1211

ll.lI~

,011011

..."'0.
4i

1I~"

!.~

02~'
aMlt

.,AO.

,II",'

IIlI"

11. .0

u'

llllA.

OUO.

II...

,~

10000

onu oUII

SPs II-C '''ISf A

D~S"

25080
25090
25100

nllo

V-ER 51 ON ,

116"
1161.
II ?CD
II H2

O'CH
I

2

II,. . . '
IIU'

BI
'PRINT.EPRINI-I .. PRINT U.DR "USAGE
ERCOR.USTS.I"
DIGITS.2ol0.
~PD'TE DIGIT COUNT IY 2 FOR E~O CF lOESS
8
D"SNUM
DC
5.0
-0000
IR
INPLI.I9 .. ~PUI+21 .. ~OY! U'Lr af~ORC LEfT I CHAI
SNR "Z4.1NPUT+20 ... ~OT 8lIN~, CH!CK FOI ."

162C-I44)

49

1166'

00

25050 CUSGN SF
8TM
2~0.0 CVlC2

16

a~

0110-0
OOQllO

U

1610-100300NIIOR

lSS90

TO

~fo,IN,.Ur+20

2~610

IC_
IR

2~620

~7

25630 eRII

IFO
at

~eAOEA.. 7. J.
INH I + I ~, ,,,PU 1+21
>-EACtR+20
EVAl'R-I,11I00

2~600

2~6'0

rFM

..,eu t t 10

25660
H610 ER II

B7
1F0
OC

evALER-l d 7200
EPRINI,EPRINT-I
EReOR, ERSISW

HI

t-EAOER+16

H

FlntF,CCIOI

1~1l0

38

25100
25150
25160
2HIO
25110
IH90

TR

F20CF ,0010'2
OLTAR-I, ClER:Elh3,2

A_
So
Co
8L
IRA

15810

12632
126H

·-12H~,t;OtlO

e-It!

CUA
,0 ,A40AO.A4SC T, INSTRN
OJ8881-IIJ0156
Tec Fl

I~

IH~6

U
.~

12720
IIH2
12144
12HI
1216.
12116
12188
12800
12811
11824
118)6
128'8
12860

··23,1dO
Cl.fRER+l. 3" t1 0

26

12668
12616
11611
12 . . .
I21CO
1210ti
12119

1,' ,.

BT
BC

PACE

SPS 11-0 PHASE A

·.20

25690
2570U
25110
25710 F I

15800 F lutF

I

1, ' ,.

2~650

2~680

VE.~ION

U

16

00001
01~0.

J1I00

10231
12120
01071
I

000-0

II
41
.9
34
38
II

07131

07331
0lH6

II

IIU2
11823
02101
12716
00000
00000
14

.~

16

12
14
41

)6
.9

56

02~01

10237
12411
02906
12488
01011
I

H200

01l~6

12500
12860
12860

CCIOI
00102
02103
OOONO
000-1
OOOL.
01300
00>00
00000

J02~6

I1n2

21)820 •

··

,58 )0
25tioO
25850
25860 QUIAR
2~870

25880 Sri II
25890
25900
15910 STIT2
1~920
2~~]O

1~9'0

OUTCL

2~.50
2~960

AliR

25910
H~80 NHe
25990 LNt .1
260eo
2.010
lb020 •
21>010 DENe
2604"

··

IV080l TABLE OuTPLIT PHASt:
OORO INS JR"
CA S 80
CAt
I,'

CAS
l2
OAe
12, SVfIII80L TABL E
SVOBOL TABLE
OA S 3'
CAS
l2
D., BLOC. 01
CAe
ULOC. "1
CA S H
CAS eo
DAC
I,'
OAt
s,ccooo
ceooo
DAS 1
D~

s

DS

2

2bO/lU

<6090
26100
26110
l6120
<10110
26140
261 so
26160
26170
2618U
26190
26200
26210
2.nO
262]0
26240
26/S0
26260
2621U
26280
2.290
26300
26liO
26nO

BT"

TO
TO
BU

INPl.,T2+ I, )0. 10 II
EVAlAO, •• 12,4t

2.,20

121

VERSION 2

s's

1 O'I~
10483

32
12

10'C7
10519
10643

)6
32
9

10661
10n9
1089'

). x
80 •
1

10ge 1

5

10911
109 I.
10918

I
5
2

•
•

80

BII'
"UD STBEGN 811'
wACO
2".0
WACO
"no
8N'
" " 0 Sfl
TFM
"1l0
OAt
2UIO

109]2

•
•

10~~2

11004
11016
11028
11040
11052
1106.
11016
11088
11100
11112
11124
11136
11148
11160
11111
11112
11184
11192
IU04
11216

A 380+ 11, I.tO
A380
•• Zl,HIAOO

·.2l,'JUST
~1'DD,OO.10

_e2l,PICKUP

\1228

•• Z!,AJUST

11240
IU52
IIU4
l12n
11214
11296
11101
11120
IIlJZ
11144
IIlU
IU,",

'IC"U",,10
'+20,ISUT-30
•• 20
JIIIO"'AO,HI'OO
•• 611,KILSU8

A380+II,1SUT-30

•• 44
A380+II,nI0+ n. 6
A380+110l0l0
.... 4'8
AS TOP ,ASTSW
.+84,2PSSW
•• )6.PltNS"

lin,
lUll
11400
11412
11424
1I00J.
11441
11 . . 0

PT20U
"36,CDINSW
CD2MES
STIEGII.STI'CSW
CALlII. STI'UW
SH,STI'CS"
STITt ...
OUTtl
ST20STTYSW

II."

PUNCH TITLE

5Tl11.2-44".

1.' ••

16
11

03041
05004

is

03046
03045

122

OOOl10.44

PAGE
IC9 . .
10956
109U
109BO

........-.

So
B1
TO
TO
AM
TO
TO
AM
8NF
87

10~20

II-C PHASE A

INPl,.T2+b. lEPO+Z9
INPUT2+'i, lEPO+28
++2lt,lEPO+ZQ,.

CHE CK FOR ICO
OLlPur t CSUT
TF. eFFA,NCDCF I
B T. tFF, SNUTCO
tS TAT BNF +.24,2PSSIII
01_ ,PSOUT, ·.12
CM
SBDlY , CO,IO
CALLA)
BE
Te
OGSV, LOS VMBtl
LOSYM!_ I, SPSCTO
•
oRI TE 01 SK-WLRC-OUTPUT PARTIAL BLeCK
TF_
IORT.·.lJ
IORBC ,SOH 1,1
8
TO
lOSY,M8+1. OGSV
tAliAl RtTY
USTRT TFM AJkD+ll.lSUT-l
A300
BO
TOM 1380+11. ,6
1. I , _
CC

enlll

26330
26340
26350
2636U
IF
26310 MACR IN eNF
CM
26110
8N~
2.,90
TO
26400
SM
26410
87
26420
26430
80
8NF'
26440
8NF
26.,0
RClY
264.0
WlTY
26410
8NF
26 . .0
,..90
RClY
WATY
lnoo

26"0

••
••

tiO
1

EVALLATE ADDRESS OF OEND
IFM

162e-l" J "aNi TC.
26050
16060
26010

102~6

10lH
10417

1141.
114,.
11101
11'20
11'11
11.41

H

02129
02328

43

109~2

0232~

17
16
II
44
II

09686
02629
02592
11040
09918
01643
11124
03347

J 1016
-7316
-8438

14
46
IS
2>

19~98

16
4.
25

00565
00520

H

COOOO
11159
11192
1115R
I

16
4)

IS
12

••

15
25
11
25
25
11
44
.9
U

.4
14
41

n

199~ti

11I5~

11141
11215
11221
02511
11251
11263
0252S
IIn4
11296
004lS
1116.
11"9
1I~6'

I

lisa

12

11159

49

IUOI

4)

12961
11460
11424
00000

44
44
)4
).

nOll

44
J4

19

11460
00000
11091
11414
lUll
1I!120
10""

I.

10.01

19
41
44
4.

19 lon9
44 n.oOl
I

02017
JIO"O
000-0
01200
19998
02560
JlllI
J0139
03347
00102
-2~51

00000
00000
000-1
02518
02)99
000-0
02521
01399
000-0

ann
02511
0248.
-2529
01100
11111
000-1
10249
02471
02415
00102
00100
02414
00102
00100

OZ470
OZ.72
02470
00400
00400
02471
-0000
2

•

57

lbIO-l~~1

MONIIOR I

VERSICN I

SPS II-e PHASE A

rf

IbbOO

~c

Ibb 10
/6610

"CTY

Ibb)C

RCTV

2bb4tO SII

e.
BE
IF"

\riA fY

Ibb5U
lbbb,U

S 1111
seOlT ,00.10
OS¥JIIo1H-20. t ,
S8C~T .00.10

OU'P~I

B2DCF .5,8 LOCF.~
S8CN T , 1, 10

2681 Q
26120
2681u
268'0
IU50 COL 0

II1I1

""

16860

26810
26880
16190
26900 •
2691 0
16920
26QlO

lilA Tv

BLOCK

~O.

If _ORE

THA~

EXISI$

t

IF
26670
16UO III QOP A.
Ibb90
TO
10
1670U
2611 0
26720
WACO
26110
"ACO
2b1ttli
""Ace
2615U
WACO
,blbO IT)
BNF
Rely
26110
2618U
~c TV
IF.
2b 190
26800
OAe

SII12HOal,S8CNI
S1111' Ha I, S~C"T-I
5 T 3 t S TPC. Sw

OL ICL
OL ICL
SII12
OUH.L
C"LO, IIIYS.

IF.

STITZ+,,,·2

1,' ,.

S'IT2+41-2,00,10
120CF'S,IPSl
ISCNI,ISOUI'
FLOAO
OG5~,lOSYJIIB'l

119.8~

11996
1200&
12020
11032
12044
11056
1206.
12C 16
12088
12100
12112

••

••

16/0-1"1 _aNI lOR

17190

i 1<00
~12 1'0
21110
27130

TO
f F""

aNF
TF"
BO
IF"

VERSION 2

1212~

123

IlD6
12148

H

H
34
14
46
16
26

00000
00000
10419
00000
00000
0264)
11044
02675
10193

II

Dan

25

10659
10657
117U
1011.
107)9
10579
10119
118.4
00000
00000
10661
I

15
44
J9
39
l'
3'

.
14
14
Ib

J9
l4
J4

16
II

H
~~

25

H
16
4_
Ib
16

H
49
2;
25

..
16
II

2S
II

H
11
16
16
10

II
II
26
2S

fl'

".

IZ'I

00101
00101
00100
00101
00101
000-0
01200
000-0
10177
000-1
0267~

01614
OIHO
00'00
00'00
00'00
00'00
02'1/
00101
00102
-0000

•

I

1051.
00000
00000
10661
10(9)
02675
11912
03341
19991

00100
00102
00102
00q-0
-0040'
02643
01100
19998
01560

005U
00566
03281
012H2
19991
12044
Oll41
19998

KOOO.
J5991
Oll41

00S65
00566
032 I,"
\9H8
Oll82
121 I~
I02S6
10918
12106
COOOO
1210b
0)282
10916
10909

IPS II-e PHASE A

ALIR'6,NAOO-l
AllR' .. ,NAOD-l
ALlR'2,NAOD-]
AL lR'O,NAOO-1t
ALIR'lO,QO.I0
• '~8 ,NAOO
AlIR+lO.59,lO
.+24,RElSW
ALIR+1O,20.10
ALlR.q
AllR+8

CF
CF
CF
21250
All"
fF
STLP+6,AlIR'lO.6
I1HO
AM
STlP+6.18,10
21270
A.
l t /II IT S- 5, 12, 10
2 P28U
~1.1I1_5,LI", IS
<1290
C
1130Q
8Nl
·.36
s. lNCTtldO
ZlllO
BP
SHP
21320
.NF
ll'o,STPCSW
aHO
TF. fORT,.'2l
213.0
27JSO
8
IOPT .OUT'D-~, 1
BNF
27J60 114
TYPE IYSIE~ IY~SCl TAau
STItA,STTYSW
~. TY OUIAR
11310
27J80
ReTY
21390 •• PRINT "EAOING AND IY$TE~ SY080l fAalf
BNF
27400 ST"
ST5.STPR$W ••
SHALL WE PAI~T SY_lelS g.
NOP QFlO. I t
21.10
F I ASf 11 ME fALL T.. IOUGH
1142U
IORT,.,2l"
YEI BAING IN THE HEADING
H4]O
S
10GI,OSKHO.1
21440
10M 5T"'+11.9. ,
.00 I F Y NOP Te ."~CH
27450
SK I P THE OHO TEST
U7
OFLO'Ll.,.
21.60 OFta
STltB.l400 ••
TESI PRINTER CHAN 12
8"1
21410
SO
ONE, PGNUM-I
I.O,PGNUM-I
21480
SO
21490
87
NONU'
10M 810M'O+17",1
21500 ONE
TO~
810"AO_116,7
21510 TNU
27520 "ONU. TO
81CMAO+ 179.PGNUII'.,.
PAGE Nu.aEA
810MAn_177,PGNUM-1
10
27530
10
HlOMAD+ 175 ,PGNUM-2
21540
21S50
J4
.0971 ••
S_,P TO IInUllTE
34
.Oq62 ••
Z1560
DOualE SPACE Anu PRlHT
21510
TO 10RT -PRIHT PAGE HEAD
IF" JOAT.·.2)"
a
10PT ,PAGE-4,1
lueo
21590
PGN~M ,01.10.,
ADD I TO PAGE ~UM8U
A"
TFM IOAf ••• Zl ••
27.00 sr ••
FINAllY '~IHT s"aOL UllE
IOPI,SYMTB-4,1,
llbiO
8
L INITS-5,lIMI TS
e
21620 ST5
8l
21UO
OSY"I
eM
510ur.00,10
21640
CALL 8 I
21UO
IE
e
SICNT, seOUT
21660
21610
aN" sneop
n6lo CALLII 8NF ·+'0.2P55"
8Nf ...... 'T INS ..
21690

21Z'"

11510
115'12
11604
lIbl.
11"1
11640
11652
11664
11676
11681
11700

Ilqc~

A.

nl60
11110
211 80

)9

11916
11928
119'0
11952
119h
"1972

.

11150

11~68

11190
1180.
11820
!l1l2
118 . .
\185.
11868
11880
11892

lOSYM8'l,SPSGJiII
RE:AO 01 SK-WLRC-REAO SVfo180l 8lOCJ
IF.
IDRTt·'ll
R
lOG T, SOEF 1,1
IF" LIM ITS,l8ll"
IF. LIM ITS-S,M'XLI ~
10
lOSYMB·l.OGSV

10
10
10

14

11//.
III 36
IIH8
II 160
11112
II 114
11195

26 . . 0
26950
81
0IY.S-20
26960
16970 FlOAn TO
OGSV,LOSYMD'l
10
16980
lOSYM8'I,SPSGJII
26990
READ OISK-\ojLRC-PAA.TIAL HOCK
IF.
11000
IORT'·'2]
R
10'1 T, SOfF I. 7
21010
10
LIM I T $- q f PR TL I Jill-It
21020
11030
10
LOSYM8'l,DGSV
210.0
lIM I TS- S ~ 1 1, 10
rJ1
IT 5
n05a
IR
DUTAR-l,QUTCL-l
11060 OSY"8
TF. l~C T,OS.10
11010
IF. S TL P. 6 • au TAR. 5.2
1108U
l7QQ:u S flP
IF
---,LIMITS-'J,ll
21100
STLP'b, 14, 10
LIMITS-S,S,lO
21110
TF
NAOO,llflo1ITS-S,ll
11110
Ie
11130
ALIR'8,NAOO

211<0

O"E

IIH4
IIH6

11711

Rely
RC IV
A.
C
B"
10
IU

58

PAGE

RClY

2b~qO

J1927
JOI~7

19998
02S60
J2GI'
JOI I.
02~~H

OIHl
OOOH

lalla
oeo- 5
J0261
0318K

OCOH
000- 5
0328~

10916

PAGE
12160
11172
1l18.
12196
11208
12220
lUll
12244
12256
12268
12280
llln
Ille.
1211.
12328
12140
12152
1216'
12176
12188

2;
2S
2~

2S
16
44
16
41
16

n
H

Jl
26
II
II
24
46

12
46
44

l24eo

16

U41l
12424
(24)6
11448

49
44
39

U"O
11412
124.4
12H,
12501
12510
U5l1
U540
1255Z
12564

.4
41

12HZ

use.

12596
12601
12620
llU2

u.".
U.,.

1l66.
U . .O
12•• 2
Ill04

]

.

16
.9

U
49

4J
U
4J
4.

IS
II

n

25

l5
J.
J4
,6
4.

12111
' Ill.0

"fta

1111.

In . .
12100

12~'O

10257
00000
12716
12511
00565
00566
124Jl
12540
12692
&lUZ
IlS.4
12596
10014
10016
loon

loon

.0015
00000
00000
00565

10915
10.1'
10" 1
10912
000-0
10916
000N9
02418
oeOKO
OouOO
00000
oeooo
10_11
000J8
OOOJ2
03287
01100
000-1
01100
02470
J2423
J3004
0.2411
00100
00102
02H2
00000
J2507
JH25
ee009
03400
026.5
OZ646
00001
00001
02641
02646
02645
009"

oo.U

0I2n

J2."
JUGI
000-1
J21U
JJlU
03217

lI06.
0,.41

OUOO
00000

Il, . .

Gun

01200

H

u

""2

01100
02."
02"15

II
I.

,.••

..
"".

1l1l.

1090/
10905
10.03
10901
10911
12268
10911
12268
10911
10910
10909
10901
12100
1210.
0)282
OUIl
Ill . .
10'18
11100
12424
00565
00512

U

14

u

U

oona

016'"
00565

ooua

"I"
UI.I

GUU

59

IUO-IU)
BIOO
27710
HUU

unu
17740
lH50
l7760

HUG
27710
uno

nloo

nllo

HUO
nno ASIDP
nl40

nuu

21160· .DIIUO

"O~I

IDR I

VER51Uh 2

5PS II-t

PH~S~

•

WAIV 2HMfS

Rcn
to
8N,
8itF
WICO
WACO
•• CC
NOP

"a'
"O~
IF"

al ,"

.'"6."PC5w
.'8<.l SCDh
QUICl
D~ Itl
\ltJlCl
UUICl •••. tHNGE to waCO .10 PUNCH
Du Itl ... tM~GE ID wA~O IC PUNCH
O\JICl, .. tHNG~ to WltQ Ie PUNC"
CFH.u IDCF
CFF .1
21,10

oe

I,'

11Z92

2'.10 " .. ta

OS.

O~IAR

,,,U

OJ89lB-11-2h<~

27950

OC

ln60 PIGt

CS'

lr18 1 . .

Jet

PRI".

i

SY~80L

UOlE LISTING

OS-

28020
.28010. F)
liD A0

2. tZ,"u

22 .

,..

. CC
]~

"
H

J4
J.
4t

~lil~I I NO itA II O~ ANt PAGE NUMIEM

,810 .... 0.· •• O.A

O~

PRI~I

QUT OFlC

nU5
000.00
00000
U944
11944
Ion.
IOU9·
101)9
IOU.
Ion.
lon9

014,0
014'9
00400
00400
00400
oeoqo
OOgOO
00000
H211
-'

3.l8' •• ,
DC
J.'
2798·0 OISItC'C CCA ·,I,UOaO,OO2
IJ 100 1-02-99CO
·OC
27 •• 0
I,'

QSC

It
'9

. U2.91

nq,o

28000 CSKHC

••J.

I Joee
UOIl

2nlU

n;

J'I
J4
41·
4·4

I3J05
IU08

- •• 01

IHIO

I~

3

IlJH
.. PlU DFLO tEFINER FOR SY"'Cl.IIBU

IHn

o I ~"cti.

UUI

I,'

IlJJI
lUll

125

, UOCF .00'01.
A'UC~.oo,ol!

. IhlQ-IH] ~i::~l lOR I
UII50

IRI

U060 I'CCF
28010

COl·· .,0.I~DAo.aHcr;l NSTRN
OJ 813 J- JI J02 56
Icli .F3.

18080 .

OE~O..

YE.RSION 2

5 •
HUO
I

IUJI
In ••

JI
It

U)82
In"

Inn

~.

00000

510S II-C PHISE •

PAGE
., uno

l3)1t

1!3J1

START

10282

us

00101
001.02

19

coooo
10

OO~OO

COOoo

..61

162C-I4O! "O'NIIOR I'
I P ISP B
2PR 110.
2PSO'UI
2 P ISP e
2SIMfS
~AL PHO
AlSTR 1
AtO'(O'~

AL Fl P I
810MAO

CISCO.
2ecco
0'9918
0'0600'
I31SS
01399
111110
CH28
0~660

~(.SPC

0'990'1) .
CH12

(A~DCF

1218~

CALL A2
CAU Al
CALL e I
CAL l EK
"RDIN
CBIOCF
C02M, S
COINS.
CHOfF
CHVAlD
Cl EREA
Cll IN"
lLlOAO
COMMER
COMSPC
eeC TAB
DIGITS
UI.DAO
OI"CCF
OI.SCI
01 SHC
u"E S II
OMeS21

11924
11124
12188
120.26

VERSION

ERSIS" 02~ 16
HALAO D~~C~
EVALER' . 010'12
FF IDCf
Illb~
GO'ODB1 OU"
GCDDS] 10291 .
HEADER
11~H
I NCOOE
01~91
INPUT2
O!O~O
INS TRN IC2'b
INTR S~' 02~8)
I NT$AV 1561_
\UAODR 0'2616
laC SAO 19T8)
OIL SU8 02484
lOABS. C801b
lODScY D892b
LI MilS 03281
lOPOUI OH21
LDSVM" 19991
L SCO S. 02419
lVRSO 0'2411
l S TYS~ 0'2480'
MACRI ~ 112Q6
.ACR02 1025b
MACSHF 111110
.UlI 14 IS991
MCAOCF
I S512
.CAOfF IS514
MCCALL 11110'
"OCTOC 16023
"DElee DD42b
"OIONO 16DlQ
IbOH
"DNA"E
"ONCAl OC19.

02b608

11218
130'9 I
0'24"
C2b23
11112
02100
1189B
11198
0'5184
CS628
10'30"
02699
0"80'0
l1Ct184t

0'00'01
IlllO
11118
1128'

Ol'leS22

Ll:nlt

MONO I S

lbO ....

UMESCl
UMSAl F
OMSENO
0" S ER I
O"S ER 2
""SMN I
OMSNUM

III ~O
ID8b2
11.30.
lib I_
Ilb64
110.16
IICb2
IDB2
110.0
103bC
0.312

MOSBNO
MOSOAD
"STOAO
NCDCFI
N(D(F2
NOSI NE
08JCRE
OPLCT8
al2DCF
aUTDcr
au lOF I
OUTOF2
OUIPUT
PCALLI
PCNUS.
PHASEA '
PHcaAD
PH( SC T
PI C'.UP
PROCON

1100'43
19661
18943
D7ll6
109)8
1190'8
0'2496
04912
1022C

DOBOI'IK

coo I S'
UOINST

ont L Aft.

l.ou .. I .......

OO'SVRS
UVASGN
E IDeAC
tPRINT
ER9Cl(
ERCHAR.
ERl,..fH

ERR 0 I G

l',\!I'lf1

10980
12100
1111.
01132
11bb8
C6Hb
057"8
0'3217

102C~

10155
'1 Olio}
09b8.
1151'
eZ.82
0'3408
I B85S
000'26
0252e
10'882

SPS II-C
PRCCME
P.C$ I.
PRILl.
PT2.ES

P~AH

A
81CCf

O')91b
C2S02
13013
PTlNS~, . CHIS
PUTSRJ 10'8)0
R£TUAN o.'991
RlVSON 110"

82ClO
82C(f
.B1S".1
810AO.
8)14.0'

RlOCS~

080~5

R$YMS.
2 PASS
IPBUF
2PRE
2PSS.
2PTA
~SfC I
25
HHAR
bCHU
Alet
AIOAO

OBC34
09881
100bI
ICCSC
0'2417
09942
09826
09862
PbS6;

UO~F

USCT
AlOAO
A2SCT
HBO
AlOAC
BOCF
AnCT
.. Ole
AHCT
ASeAO
ASOCF
ASSCI
Aec
"CAS
AJUn
ALFLP
ALFOP
ALPHA
AllR
ANlll
ANAL2
ANAL.l
. . AL·
ANAL
ANll4
ACAS
A
ASfl
ASMS
ASP
AS TER
ASIOP
AST S"
Bl OAe

102

PAGE

02~91

liSt!

USCT
B40AO'
B4SCT
B'~AO
8S~( I

B60AO
86SC!
neAe
BlSC!
880AD
89MAO
BUCK

DbSq~

BeTA

IOQl2
18600
15120
DOIH

BI
INI
BOMO
BUOK
B
BUV
BSBF
85CYC
BUNI
8SHI
BSNEQ
8S
BS.
8UL2
8Ull
BTBL4
BTBL
. CID
ellAP
CIIA
CliP
CII
CI2P
tl2
llW
C.11
C I'P

18800

OODH
111~8

19252
11204
00'029
18881
00'0'21
181H
Ill82
0001i
0.5296
01299
0'2199
0471b
D~b16

D2b86
10'901
10~C2

10'494
10'598
10'41_
101"2
ID~b2

Ct.

05896
11515
059Sb
I )20 I

C I SP
CIS
C lb.
Clb
C 11>P
CllA
(lIP

06891t

0.8'1>
12968
10'249
18918

til

10112
ce021
19200'
ICII8
00052
19000
.09100
0'001>9
1'0.9

ccon

19122
CC029
19UI
DCD)C
19l19
CCDO~

11001
IHOP
06200'
02696
OU20
OU2D
DUOB
oe005

U61i
08)9U
OUI.
0'8132
0'141)
0'8)60.
0'8)28
0'8120
0'80)1
DSl9b
IC)O~

tl81'
(II
(,19p
CI9
CIP
CI
C20PI
(20P2
(20Pl
.C20P~

(20P
t20
(21P
C21
CIlP
C22
CllP
(21
CHP
C24
ClSP
05
C26P
C26
C2PI
t2P'
.C2P
C2
(3P I
0'2
ClP)
ClP
C)
C'1l
C4P

ItHD
0'50'58
150'21
1322.
150'93
1120.
150'59
11244
15111
112b_
\51"
Ill20
15111
IB76
15211
IH20
15259
IHbO
ISlOl
IlHO
15211

1l4tO .
15JH

Il'H

15)1>1
126H .'
HIOI
111>2'
11'6.
11101

13U.
I)S44
1519)
U12O'
IS429
1)140
1545)
1)11>0
15~U

1381.
IS4U
lJU4
1.5509
1)'04
15519
IH61
12100
12124
IU2l
12 . . .
12920'
12956

U ...

14151
12146
1302'
14 . . 1
1l0"
1490)
12342
1234_
13064

C4

(5'
(5
C62S

(h.
CloP
Cb

1~_23

ero

1551)

1l0,_

C 7._
C7
( 8P
C8
C 9P
C9
CCNZ
CCN3
cco"
CFFA
CFf
CHOZ
CH'''D

1<961
1 )10_
1~995

13124
15011
13DIZ
IlUb
128bO
02029
0'2592
071S2
CillO.

12i
1~2t-I"1

CLTbL
CNTR

CDLL
COMA
CONTR
CORM
CRl a
C
CsrA T
tTl
( TEST
CTVI
CYLAV
OAO
OACEA
aA(R
OAC
OAS
DC AAO
OCRN
CC
eCA
COAX
DOWOD
CfCl2
DECL 3
OECl
DENac
DENa
OGM
OGSV
DIM
OISK
D.HI
DIOES2
DMHA
DMESC
DMfS
DMS12
OMSII
OMSR14
OMSV
OMSVN
DNB1
OOlOt
DOli
OQK
DIll
DII.0~

Da.G
0
O'UI
OU2
OU
DSI
OSON8

11159
10219
02419
125H
10211
Oll'S
11844
1]951>
lIDlb
0'7484
O143b
02.89
15599
1203b
11580
118bD
11472
11392
1095<
130'72
12800'
1210'6
12)22
11142
10256
10292
051.8
12760
10'920
11220
03)47
IH16
05344
10771
11218
10930
11002
10612
11214
1095'
11.54
03261>
OlZll
12496
10452
10'600
1013.
05615
106 . .
125 . .
IU15
1])40
1331.
IHOI
120'0
IH1I>

~ON

I TUR

OSKHa
OSS
QTA
DVAOS
avcn
DVE NO
aVlC2
UVLC
OVLP
DVS.I
EQOAO
EOSCI
EQS"
ERII
fRI2
EAI9
EAI
EA20
EA22
fR28
EA2
fA 3
ER4A
EA4
EACOA
EAQSA
HUB
EVI
evODO
F2DCF
F2
f)

FOCF
FILE

FlAl
HGR"
HOAD
F"'OCF
FlO
GETI
GET
GOODe
Hell"
HEO
HliDO
IDMES
INau
INPUT
INSAY
INST
lOCAL
IOGfT
lOGY
10"
lOll"

Ion

VERSION
1))25
l25b_
11844
12392
12111
12320'
1211Z
120'28
Il208
121DC
COOOD
0'0'0'0"
D8lS9
12bl.
1210B
09b!4
D149U
10C12
1168b
0949~

0428.
0"48
095q~

095410
0'71911
IlSIb
OllO)
OIlDH
Q24b9
12160'
12152
IHH
15164
IHI6
156.0
0)H5
119U
UOI6
UOH
01 . . 0
06414
04976
02501
10211

onu

12Ul
Dun
02111

onn

OUh
00H6
10611
005. .
C05U

Dono

oou~

SPS 11-0 PHASE A
I(S'
ISUI
JST8l

•lASL

LAS
LAceR
LB2
lBACC
L8COZ
LBFNC
L8LI"
lCl8L
Leso.
LCSA
LOTA
LIM
lNCT
LNTH
l
.ACAD
MEXIT
MOCEI
MOOE
MODOC
_OMAD
"OML

Moser

M"SW
MULT
MURI
NAOO
NASS
NCOCP
IIIC
NMall
liaiSE
NCNEX
NaNUM
"UII'
OFla
OK
ONE
ONU
ap!
0'
DUll.
OUTAC
ouu.
OUYtL
OUT

PAGI
PtAU
pet
"CK
PCVI

61

PAGE
PtlR
PGCON
PGNU"
PHASE
Pl ACE
PAl
PAAS
PRO
PROS
PAN
PANS
PRNTl
PRNT2
PANIl
PRNH
PRNY5
PRNI6
PRNT7
'RNI
PRUO
.ATHe
PUT
R2IE
R3£
RtTR
RCILI(.
ROW
READ I
_U02
IUO)
RELfR
RELSW
Rla'i
RLap
11110'
.IIU
UID
UClN

0055'
OZ559
0245_
CSl56
05.81
0'3)43
Dlb6~

0.11>0"
0'7590'
08S30
0'80'40'
200'09
08414
09D5e
D90~6

0'9190
08400
10918
02181
92520
Illeu
1090l
11778
11110
1602Z
DO'lt
16041
I~OQa

080)8
0'6191>
02631
10916
12460
115o~

anu
11663
02Ul
00451
u5n
02441

$I

Sl~1

SAIP

USZI

UU

04UI

U51a

SAStz
SASC

0'21"
OUO,
04".
UO.4
lJOO,
IOU1
Ion.
OUU
IUOI
IU54

SA $I 1
USII
SICIlY

5111'.
5111.
seOUl
Stuv
sOtf!
SOtfa

snlL

uuq

OU65

SH'
Slat

1159'1

tHo

11"9"
0'9901
02641
15616
C327b
12420

SOAP I

sov

SKIPI
SKIP
SLP
SLPX

12~12

S~OOE

12160
12148
12]92
12110

SMPBL
SPAPI
SPAP
SP8L
SPEC
SPI"I
SPSGM
SRH
$SrUF

10~28

12444
12540
12040
IZ124
12112
12812
10392
le250
loan
10660
01112
040'31>
DIOH
0'1111
os])a
0300U
0)640
01444
06144
0'2411
0'4224
04212
0'44"
Dnn
01110
OJIOI
OUOI

14141
In..

144'.
14420
14lU
141"
14114
02"'5
OU"
111'0
01641
1 . .04

IOU'
10141
I~'U

041. .
0""

SSTS~

STl
S T2L
S T2

so

12891
1259b
12888
12584
11178
11302
Cll46
00235
IlOll
12628
0'0'040
O'j,O~

11008
0'2500
061710
131095
13119
11520
10850
1160~
IIT~I

ST4A
SH8
ST4
ST5
START
STtNT
STI Tl
STI T2
STLP
STR
STSAV
SVBNa
SVUIi
S"2
SY"'''
lAPIN
TEII'II

12460'
12U2
12H4
12716
10212
0'2513
10419
10519
12100
11212
1560.

TEST)

0 . .11
06"2
06\1'
Ion.

U"'

TFlOO
TOil
Ta.
15"Ee
Twa
YYrIN
IDJ

...
III

UJ

117
...2

XOU
IDS
• OSS
.HeAO

onu
09lJO
01010
U291
02 •• 0
oun

out)

l02U
IUI4

DatU

10245
10241

loa4J
10lU

n.n

14lJ6
U2U
1)t00
I.U . .
151$'1

\.

1620-1") .ONITOO

/E'lJ
/.
~lv~-:'l

S BHCO
SHf' C 0
5"CAD
EHt

~F

02300
0"804
0' )"0
IS •••
OBH8
18.0e

VER S I ON

PAGE

S'S II-C ID.-.A'Sf A

SSTDCF
SSTSCI

COOl~

STAln2

10~H

ST.es.
SIPAS.
S Tf YS"

S 18EtN
SICIi.A
5 ILOOP

L 1484

SU80AO

11188

SUBfN!

11.~2

S.,,,fAC

1110'

,V.fBL
SVSC'L
IUFUL
IHINGS
UHUMI
UHUM8

02"0
02' 12
02411
04a08
01261
02641

I. I ~SII
IV,.S,

1600)

O'''h

OQU2
02420

OUll

oun

ONf ASSf.BL' •

I 2 ~l

162C-I"3 .0 ... 1 lOA I
00010
\JCOlO •
00030 SPOl
00040 SM. ~L

ooosa

$V~T8l

00060
00010
00080
000.0
COlao
00110
00120
00110
00140

LOS'"8
SBFoCD
LBLI.
."L I_
•
I.TSP8
2PTS'8
8' 20K
ZPRTlO

as
os
as
DS

us
OS
OS
os
OS
DS

001 SU •

00410 . . . . 0
004.0 "O"AC
OI"oAO
00'00 bIMS~T

aouo

os

."tOAD

00"0 •

'H.'

,5~

.lQ252,

THA, CAll, GET-PUT AhO

• LeESL.

o"es,

,Z.

CHe PAOCESS

000 .. 0
002n
160C)
19997

159 . .
20009

IS •• '

200eo
1.600
OOlll
11100

o
a

19252
00029
18811

o
o

ooon

oe027
117J7

,SSTD'O-SSISC T,
.1'U61.
,18CJ18.
, ZI

MAS TEA SYMBOL TABLE
MONI lOR CO.~ IECTOA DISK AOOAESS
'HASE 8 INlllALlZATION

,19200,

l~PU',

,51
dQCOO.

L 1 NPRT.I hS TAN .ce ,OSD~8t CAS. DORG

BRANCH TABLE,

SC'~

,6'

18901
000)5
11943
(966)

11918

oeoH

19200
00052
190CO

ooon

,OOIOO,PHASE 83 MEMORV AUDRESS
.1 'I06Q,
R S fA.. OAe, 'lOw. Cfo1ES .OS8. OVl.C. ()GM

09100

,$3
.l1U22,
,29
,lea 151,
,30

OOOU
19122

OS • • • 'C'O. CO.,

n., OENO

UO"

0001'
19151
00030

INIIU~llATION

,820AO.\9, ••
,04...

DISK-RESTORE 8 paRTIAL
SEC loa

0I7eo I...

COUHr~RES TOU

CORE lOOAUS TO 1~ITULIZE
coaE lO~.ESS 0' PAGE aHa'
01. INTA~ FO. fOUIY. TAIU

01

.0.
.4

1921.

I PUT IAl

0 I S~-'AGE OHO GOOD If 5

lOUI VALENCI

I"~I

.111"

.26
,0 •• 01.

"ONITO~

S" SUI.OUTtIlE 01" INTAIIS

COMMUNICATION "UMnus

1311

o

a
o
o
o
o
o
o
o
o
o

015CO
00.00
oooe,

00011

,1'908,

016500..

os
os

OECL

,3S

.09900...
.0".00.

OS

.ssec

,21
,111737.
dl

OS

00'40 ."CSCT OS
SUIlOAO

02218

SEC ICRS .ER BLOCK
, .2 35. ,
S .... JIII::HllS PtA BLOC.J(
HI -OROEq '05 \I i O~ OF SV MBCL TAIL £
• 1600].
, S'f'flllt6LtSP4PBle ~ 7-1.
lO-O'CE" PCSITION OF SV~BCLIC ILOCK
1
lCS .... M...... SP8L.10C.l,
5'.OClIC ~LCC' CISK 'CO.ESS
~U-O"OEA BLCCK LIMIT
• LGS .... M&·12.
S .... MTBl ... 6.
M"IM\;M LIMIT
EOP I R IC.l sec TOR '~SIG'MENI P •••• ETe.S
t l SOo.
I-PASS lOTAL SECTURS PER SU. BLOCK
,bCC.
Z-p.SS lOTAL SECToas PER SV •• 8LOCK
,~,
SVMBOLIC BLOCkS PER 20K ceRE
2-PASS AAlIO--I'TE' •• /f IhAL SECTORS
.2ecoo.
S'S DISC ASSIGN"ENT PAOA"ETE'~
, ltl600,
CONrROL sun_E.TS,
SUSROUTINS
tl37
.lti800,
NU •• AL PRCCFSSING--fAEOUEhl ST~TS.

• .. qt'

os

OS
OOSIO fOOAa "95
00120 loset lis

Dono
Dono

SPS II-e PHASE 8

SVfIIIBOL TABLE PAA.AfoIIETERS

OS

00160 .ICAD os
OOITO'lser as
00 lSu A2CAD os
00190 A2SCT
os
00200 neAD DS
00210 A3SCI os
00220 . . OAO DS
0023y A4sel os
00240 .~e'D as
00250 A5 SCI os
00260 SSIC'O as
00210 SSTSCT OS
00280 "STe'D OS
00290 "OSOAD us
0·0300 81CAD as
OOHU BISCI DS
00320 !20AD DS
00]30 82 SC T DS
OO~4U 83CAD
OS
OOBC 835CT OS
OU360 8lMAO os
0037U ~40'D OS
OOUU 84SCI
OS
003'0 no.o DS
00400 8HCT as
00410 UOAO US
00420 86SCI OS
00430" 'HASE
004.0 nOAa os
QQ.'o US(I os

00 .. 60 1I0AO

VERSION

DORG 2218

00004
17001
16500

0"00
04'00
ClOOCI
00000
00004
IInl
0001.
04101

a

o

o
o
p

o
o

o
o
o

o

o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o

a
o
a
o
o
a

'4

oun
14'20

162C-IH) MONI lOR
00';10 ",OSCT
00~80 "OOOC
00590 "OC laC
OO~OO "ONA"E
OO~IO "'01 eNO
00620 "O"l
006)0 MOS8NQ
00 . . 0 "ONOI S
OOHO "OEXEC
OO~~O "U"AU
00610 SY SCAl
00610 NONEl
UO~90 PCK
OOICO •
00110 10AT
00120 10PT

OS
OS
us
OS
os
OS
OS
os
OS
us
OS
os

os

116eoo·,

VeRiION 2

,NUSC '+22.
,Jllosc.,J+ZJ,
.JIIOSC~T,. lS.
,MOSCl.,)".

,Moscr·"l,

,JIIOSc. '+ItJ.
."OSC'.44.
.426,
• 4'5 t
,411S,
,"~1,

,Zl65
(ORI. ENIRIES

, SblS
OS
,II) )2
os
rs
• !)ttl
,I)ZC
OUHO 10Mec oS
,1)514
00150 IOSK
us
00160 lOCAL os
,CC716
00110 "ONCAl os
,CC 1qb
00110 10CSAO OS
,IQlI)'AOORESS OF THE ~OAIlU'CAL~ER
00190 •
00100
SPS CO""UNltArION AREA
00110 •
OOBlO UUI
CS
I
008)0
IlS
80
00840 lIPO
os
2
OOISU
CS
81
008bO
I,'
ac

00110 lNT"
008HO

oono

'fGe

S'S l1-e 'HA$I I

1I0NI TOR CD~' SEtTa. ~E.C.¥ ACORUS
01 St OV"UT COOE
co-" OU'" CODE
NA!'E
I'D N~"U
"ANT, llNGTH
SVI. SET
NUISE DIGIT
ElfC~ IE CONYROl ANa S PS I "pur
IIU'URY aDOR
snull to"'ON acTION /.OUTlOII
NON·uttUTf 'OR Jue £lRO.

0
0,

16022
I'OU
160n
16OJ9
160_1

0
0,
0

e

:'0
0

I"OU

16044'
00426
00415
OIlHS
110451

0

0
0
0
0

ontS

0

OOSU
OOUl
005 . .
OOUO
OOU4

IO~T

OS
ac

l6aco

0

0
0
0

00116

I,'

OOH90 AJUST oc
11,2121212121 ..
INSU~CIIO~ PARITY TABLE
-Z11I21l1Jl
009CO I"INGS rc
ZI, co 10ZO J040506C1CCCO'
-001020 3C405060 ICCCO'
00910 Call
CS
I00920
os
2
00_30 Nu"8
cc
7,'
-OOCOC'
00 •• 0 JS Tlil
DC
11,311nZ3zH"
AL PHA PAR IT Y TA~LE
- )ZlZ32J212
Q09~" Evarc
DC
IJ,C101OlO1Ol ••
O"ES PARItY TARLE
-IOIUICICI
0091.10 •
PliOC E I SOA CONIROL Swl ICHE S--FlAGGEO loON, UNfLACGEO O-OfF
00910 S IPCSW DS
I ••
P~NC" ~~~'OL UBLf
00980 S "YSW os
I ..
TYPE S¥II80l TULt
OOqQU STPRSW us
I ..
PRINI SY~IVl TABLE
OIOCO IY INS. us
I ..
a~GIN TYP~WRIIU INPUT
01010 CC ,"SW UC
8EGI N CARC INPUI
1.1"
J
I ..
U10Z" PTiNSW es
BEGlh PAPU '''E INPUT
01030 E. S TSW CS
I ..
EMROR STOP
0104U 2P ssw OS
I ..
PASS "Cloe

n,o

0

00196

0

1911)

.0

ClllI
021"

I
10

OllCO
02)11
OH82·

II
I

0211J
02388

S
.1

,

Oll99

II

OZ420.

II

02419
02441
02Hti

19
2
I

0245.

II

024'9

10

02470
OZ411
U2472
02H)
024"
02475
02416
OZ411

.31
lblC-I443 "aNI lOR. I
~El

SW
l scesw
l S IV sw
LSPRS.
PCNUS'
I N I~ S.
Olll~ k I l SUB
"Ill" CIVI
01050
01060
U1010
01080
a 10YO
01100

~s

VERSICN

Z SPS II-e PHASE

ASSE~8lE

I,.
I ..
I ..
I ..
I ..
I ..
I ..
~,

os
CS
CS
OS
OS
es
DC
-0000
Z,~
OlllU I NCOOE OC

PAGE

RHOCATARlE

llsr taao
LISI TYPE.aITER
~,sr PRINru
PVN~H 'ESf~UENCEO SOURCE ceeK

INT RRYPT

~O

"

S~laOL TJ ~E$

OHlB
. 02419
CZ4Be
OJ4H1
02482
0248)
02414.
OH89
01491

-~

01140 08JCRE os
011 SO P~(JC. F OS
011 bO P~TlIM DSA

5, •
I ..

GBJECT 'ACHIllE $I'!
p~OtnSOR 'ACHIIjE SIZE

024'6
02491
025C2

5

-0000
5

I
~

01110 HCl I"

VS_

lBlIM

025CZ
02501

01180

CC

I,'

OHC1
025B8

KOO09
I

011 ~O SICNT

OC
5. l ••
-0001
DC
~rU ..
-0000
OS
2 ..
OS
I

STUi_EN' COUNT

onu

5

HIGH AQOAUS

02511

01200 Huce

01210 L
lHGTIt OF _AHUS$A
01120 NOI Se
OlllO SU~NO as
2
0lZ40 PICkUP os
5
aliSO
DC
101
J
01260 ISIH DC
lO.C·
- OQCCOCCCOCOCCO CC'OCOOOG COOCOO'
01210 SPSG" DGMc
01280 INU" OS
01290
DC
I,'
01300 TEMPR
01310

OS
DC

I,'

OIlZO RMRK
013)0

DS
DC

I,'

01340 ONfl

DC
10.1
-OCOOOCCC\

01350
01360
01310
01]10
OU'O
01400
01410
01420

,

•
•
•
CFF
CFFOEF

O2U_

5

z

025Z9

I

02559

30

I

01511

Icr ~

onu
on 15

~ALL-lQAO

,PRDC;eSSOR SECTION-NO

I

AU'.

J
I

025 ••

10

"~Rt

,

oun

5
10RT"Ul
lOGY ,CHOEF. 7
8
BI~ CFF-I ...

2 • .12, •

•

02560
02t'S
02'"

OUU
0260~

0261.

oa."

.UOlUTe DISK NOT ..ao'. lIlIIGTH

22

014)0 CFFA

1
I

onu

OS
rFM

c,c

02520
OZUI

.

OSA

O~U"

IU

U

!IOU, -itll
OOSU

.. ' a
4.·"O"'~

·i.u

,..

l

1620-1'4) OONIIOR I

VERSION

SPS 11-0 PMASE B

OC

O'4t4U

-0000
I

020)~

I,'

OIUO MU~I
OS
010.0 IOarCR DC
I),O .. F IlE AOORESS OF I~IERoEcun OUIPUI
-0000
~,OloOO "f I LE AUURE H
Of SV_SCL UBlE
"lOla svouc DC
-2600
2,e
Ot
UI'.O Stuul
-0
OIO~O 'GNUO
Ot
It. \.leo 1".
P'CE NUMBER BUCKE r
-(l01
01 \CO
END SPS COooUNICArlOh AREA
~IH" •
U 1~20
UIHO IV'I~ OSA
I~PL 1-10

~2bH

026lb
02041
02641

..

02 •• 1

026\2
026~2

01\'0
un~Q

'API'"

OI~oO

•

PAGE
02629

-2183

tC
-6'

], Cf:'

02U~

)

C~A

I"fPL T-1 0

02'6bO

5 •

DC

3.oe'

02000
U2U)

I~PLl-IO

02668

-21B)
)

-ti'

Ul57U CA.CIN OSA
OI~SO

]. lC I
CC
JO'
OC
2 t 1C
" I~QO SSM ....
JO
~
01000 'CCCOW os
UIUO AL.~A os
10
o lola HE fA
Ie
OS
IS,

·;..0 ....... 1 •.•-.

-It64
1
14

Olna

,

02110 ofFOUT oSC ' 2.02'
a~
, GlUO
OS,l , S'~'OIiT

13ft

2
2

01519

2

OUtS

5 •

-C01~
l'~000'

16,C- 1"3 _ON I TOA I
02130

DC

VEOSION 2

SPS 11-[

P~.Sf

1,'

021<0 SUSUUT DOA
,O,·-·,3.PACI(
0-0000-OJ-298<
U21 ~O
CC
I,'

O)5BS
o lS8b

-nil

01~88

14

I

01602

02160 OEf S"

csc

2 tee

OlbO

02110

DO
CIA

I~OI.

Ol~Cq

-]UI

I,'

OlbG.
Ol610
03612

1<

02180

DC

02140 SUHSJIiI

CDA
,O,·-·,SPBL,SSFAOO
0-0000-40J59qS
CC
I,'

Q220U

02/10 MUtt IE L os
02220 INfBuF OIC

q,CCCCOCOO'

02210
02HO

I,'

S x
I

0)626
01611
Ol628

ooooeooo'
011
DC

o 3bll
01828

Iql
I

CAS
DAC
2 I .'
+'
02210 LOPOUT DC
12, C
-OOCCCCLCOCO
0228U
oC
<, '
-00'
022qO ~I"TSP OS
• t-ell M
02300 LI"
CC
10, C
-ooooooceo
0231 0
DC
I,'

01831
01843

·6
2

01851

12

u232u llMSV
023]0

CI
DC

I,'

Ol882
03881

Cd..Hu AL x

DI
CI
01
DC

3

03886

,,1,

03887
018"2

I" I

02250 eOL A8
02260

021~u

HEC

OZ3bO OMES ..
0' 370 7TVS

•

PAil

8

2

2

01861
025C7
OlS 71

0
10

03872

10
, SUO!JT

10
I

02 . . 3

I

-001~

02180 I C

CC

2,0

018"'

I,'

018.'
OJ"C4
C Joe.
OHIO

-0

023"0 FR S TAO 01
,,240U S TKl EN 01
02410 L I TAC
os
U2420 FLGQ.M
GC
02~

30 PACKAC OSA

PACK, PACK+ 715, PACK. 1'>0, PACK+22f:»

,;,
162C-144] "'ON I fOR

I

VERSILN 2

~P~

~

0'9,'1

5

Cl915
OlqzO
C 1925

-2q84
- )05q

-JIH

11-0 PHAse 8

PAGE

a ,. 30
I,'

03931

OSI
26
b,G
02<60
OC
- 00000
02<10 II TTC 0 01
~
02<80
DC
1,'

0]932

Ol .... O

DC

024lju PKMOD

0".0 SFA

02500

01
DC

-)20.
1
26
6

a j"b J
03968
03QbQ

1,0

OH71
OlHB

02510 SLK ACS css
DSA
02520

30

030IQ

SVf'\TRl-6

0<01 J

02530 LlMTSF OSA

SVMTBL+

on~o

I,'

Q~019

02550 BLKCTA OS
5,0
02560 CMPC I G DC
-0000
02570 AeRA
5,0
DC
-0000
02580 FOIT"T DSC
1,0
0
025QO KLRLSW as
1

04021

)0
S •
JSQQ7
S •

0<01)
17.S~P8l"11

0~018

04018

Ol600

CC

•

as

02610 CAROLN OS
02620 VACAN T ass
0/630 COPo~F OSA
U26~0

02650 IN I T I
02660
02blO
02610
02690
02100
02710
02120
02130
02140
02750
02760
02710
02180
02190
02800
OlllO
02820
021]0

DC
JO'
TF

TF"

TFM
TFM
TFM
TF
1M

X

lOO09
I

0~026

0<0 31
0~0J2
O~O])

5

0~0)8

1
140
INPLT2

O~O).

04184

hie'

04184
o~ 187

I
5
I
140
5

O~O~D

EAl AS+IO, ClEAfRtll
"fe, .10
SUSOUT+5,O
I NKAM, 9999Q

-3287
]

26
16

01141
OJ. . .

04224
04Zl6

"

OJ5U

04188
04200
04~12

Dana
000-0
-0000

0lU5

OH . .

2.

o"u
01569

-,.,.

04260
0427Z

~2

OJ569

TFM

SU8IN+5,IOAOOR
SUSIN'5,2,10
AOOCOW,2401

000-1
-2401

8NF

·+2 .. ,~ElSW

042'4

TF~

AcoeON, '99'.
014PO IG-4, PROCAf
OMPOIt: . . . . O
HGRM
. . . 8,1 STA T-29
PK"OO,PAClAO-4

04296
04101
04)20
04HZ
04144
04156
0"'161
04J10
04JU
0",404

TO
S14
Sf
ONR
TR
TfM
8
TR
4"

S~8IN+Il,INr8UF

17vs,75
•• 41
PK"UO,PACUO+l
PKMOO+4,25

laG

16

16

02'"
.-,6 04)01
OZ6U
16

25
12
J2

..

U

11
4'

J1
11

040U
040Z6

01910
04)92

II....

OJU"

.....
Oa411

02497
000-1
01000

02110

OJUa

...11

OJiU

-0075
OCOOO

04421
OJ.U
OJU6

OJ."

-IOn

1610-IU]
02140

Olno
01160
o,nu
01110
02l~O

01900
02'10
02920
01no
01.40
01.'0
02960
02"0

Olno

01990
01000
0)010
01010
0]010

TOA

VERSION 2

S'S II-C PMASf H

HCCEF

PAGE
OHI.
OUU
04440
OHU
04464
04",

16

OIlU

11

0)162
0)617
03911
0401l
OU2.

-0050
02498
OZ641
02641
0)U6
025"0

04514
02647
00565

-4tH

00000
CCOOO
005U
00532

-41»1
009H
00962
-4SU
-4621

26
26
26
25

04."
04500
04512
OU24
04516
04548
04560
04HZ

"fill

U 1040
010~0

~O~I

TF.
HH,~O
TR
L1.-9,LI.ISP-9
Tf
SUBSlh\, SY~UC
TF
Sf A ,SYIIUC
Tf
AI..
,PUQO>4
10
INTlU"200,SPSG~
•••• AOUTINE TO 'RINT FIRST 'AGE I~ICATIO~ FOR LISTING
8~F
ENT>12,lS'RS~"
lEST FOM lISTIN~
TF. PCNL. ,OC01, B
rFM 10"' ••• 21, t
GE T MEAU RECORC
K
IOCI,HO'RI,7 ..
)4
.0911,.
SkiP TO I I~.EOIATE
)4
.C~62 ••
00U8LE SPACE AflER PAI"I
TO 10AI PRI~T PAGE
10.' ••• 2), I
flU
R
IOPI,MOOEF-4,7,
,ONTIIIUE IlIlTULllATICN
•
CALL PMUE 12
" . CHA.O(F82
81. CFF,PMASEB-12
CC.82 CUA
,O,820AO.82SCI,PM&5E8-12
OJ9200-52-411B

04514
045'6
041>01

ct

1.'

041>22

USA

87.AO>1

04627

02411
0-002

oat ..

16
11

I

-460.
-4111

02629
025.2
14

5 •
-6089

1,)]060
01070 HC'.I
01080
UI090

DC
Ja'
OSC
22
CSA
DC

l,lS' •• ,

PAI~T

1,22 ...

DISk DEFINER FCR 1ST PACE

III0rcATlON ANC PAGE NUOBEA
.EAOIN~

.CPATI

04631

I.'

041>17
04638

-4"40
I

04640

14

OHOO HOPRTI CCA
.I,68DAD,015CT,K7.AD ... CDA 1ST PAGE MEADING
IJ1001-04-60BB
UHIO
CC
I,'
03120 •
01l]0 F I
01140
01150

34
18
TRA

J
046)1

04654

LOAO PHASE 81 TO IHE FILE
SL8t,701
SLRt,701

0465"
04668
04 . . 0
046~Z

0)160 SU80
03110

COA ,O,8ICAO,8ISC1,S80~T+1
OJ8978-21-26.4
rec F I

o )l80

COMc i'1I1

01190
01200 P~ASEB
o IZI o 81 •• u
03220
C3ll0
03240 •
01250

8T.
80
US
IFM
.".

11

C4104
04104
00000
00000
14

00101
00102

O~ZIO

OH04

-4200
02417

OO~OO

00000

0465"

2PASS,~P5S.

-RE S TOAE

14
1"
49

041C4

GEET">12 .. CALL PHASE 8l
,P~ASE8-12+1 qeo..

5 •

PARTIAL

~LBIN+llo1NPLI-lq
Sl;~I,.+S.2.LO

04lBH
04IM.
04200
060U
0421Z
04224

16
II

0)517
0)569

-l1H
000-2

04236

\6

005U

-4259

04248
041"0
U4212
04284
04296
OHC4

4'1

-)556
02174
02813
COO~ I

44

00566
03.21
04444
03569
04444
04341

04316
043Z8
0414e

16
49
49

00565
00561>
04)72

-4339
-Z656

OH46
04160
04312
04114
04]9'
0440B

\6
49

00565
00566
OH .. 6
OUIl
0271)
0.,04

-4371
-Z664
02783
000-0
000J4
01200
00001
05743
000-1
01125
02720
OCOOJ

o

READ SOURCE STATEOENI FAUM THE FILE
lFfIt

IOA.f ••• 23

I6ZC-I443 OONIIOR

1~ 7

VERSION 2

SPS· II-C

P~ASE

8

03160
B
IOCT,OEFIN,7
0121C
'"
INIBU' 01 NPUT- ..
OI28U
BNC cal
oINPUT+80 .. CHk.FCR FILE GRP •• Rk
ulZqO
S.
SL81N+501,10
01300
81
GOI
OJ310 2PASS aNF SECRO,PTINS~" CH" FOR CARU OR lAP, INPUI
~))20'
ACCEPT TAPE INPUT
olno
IF. 10RT, .. n
01340
810CT,IAPIN-4.1
03)50
81
FOR_O
on60' ACCEPT CUC INPUT
(;ll70 SECAe TFM
IORl,"Z3
OlllO
~
IOGI,CAROIN-4,l
01)90 FORWD BNR '>24,INPUT-IO
03-.00
TFM
I~PLJ-l0.0.10
OHIO
C.
INPUT-100l4,10
03410
KE
Z"S5
03430
TC~
'-1101
0)440
Bf
RSCA .... SCAN-I
0)4§0 Gal
AM
INUM,I,IO
01460
BT
ClO~T ,tlOUT-1
OlUO
TM
INPLT2+156,CLERU+I ..
CLEAA THE RE~AINS
0)410
TO. kLAlSW,l,l1
01.'0
TR
INP~T2·I,IN'U'-1I
o l~OO
BNF • +24 ,LS TYS.
03510
Rcry
01520 •
03510 •
CHECk FOR COOOENT SIATE"ENT

PlGE

044~O

04432
04444

044\10
04468
04480
0449Z
04504
04516

11
55

12

.9

4~

II>
14
46
I~

04409

II
Zl
1I

0514.
02565
OIU.
03443

n

I~

1I
44
]4

o.on

02415

0]2'6
045U
00000

OUIZ
02410
00102

04541
04160
02793
04160

0219]

0 . . .'

OZ.11

0)540 •

03550 CAS TEA
01560
01HO
C1UO

BNR

·+ZO.INPUT
CHIO
INPUol4,I0
K.. E C... IO
on'lo •••• PRINT CO ••E.. TS STATE.ENT
0]600 PAINU 811' PCHOII- 24.l SPA S••• SHALL liE PAINT CO~.ENTS
lOR' , •• 2l,.
VES .lEI EA GO
016\0
B
IOPl.lSTDEf-4,7
036Z0
TEST PRINTER CHAN 12 OHO PlGE
8NI PC ..COII- 24 ,3400 ••
03610
T,II PUNCHI.6.PRIN" .. ~ODlfY aNF 10 AETURN HUE
OU40
TDM 'tlNtH'+t., ••
~DOlfY INf 10 IUIOCH
01650
CffA,PITAO ..
~ISk COllnOl F IElC PII I"'T DOlO
01660
ACDIlESS TO STAIT DfLO INCICATlON
BTII tF' ,_AGE ••
01610
JtUNCM,+
••
GOCL,
•
1£ STORE INF TO GOeL AOCRes S
01610 "RlNT"
II0Dln BUNCH TO INF
TOM "UNCHI+l,_ ••
01690
onoo
IN' PHASEI.lSCDSlO
lIE VSCfhIEYSCH-1
BT
01110
P\JfICH C.....ENIS caRD
U7Z0 •
o,no PtHCOII IN' 'HUEI.LSCDSIf
OlHO
" " IOIT, . . U
IOPT,COPOfF-4,1
B
onlo
on60
17
'HUn
OJ110 CIC.O IFII RLOhH,INPUI-'
a.
IlO"11,2,10
OJ7IO
on.o
til
IlO'+U.III'U'. . '
OJIOO
IE
RlO"'.
INa e-J •• e-.
OJIIO IlOP
t3!1

BY

CM

"M

""
""

04528
04540
04548
04560

4~

49
14
U

0.512 '4
0451. 16
OU. . .9
04601 41
0 . .20 16

0 • .,2 II
0. . . . . .

00565

00511
046U

121 ••
1211.

n

0261.
025.'
UI.6
lUI.
04200
OlU4

U
16

04200
0016.

0.75'

••

04200

0.112
0.11.
041.'
04101

11 04119
,. 0.".
•• 0611'
U -D.n,

04656 11
0. . . . . .
0 . .10
046U 4.
0.10.

,t

0.116
04UI
04JU

•• oonl

000~4

OUOD
·4601
JUn
OJ.OO
·.66.

oeoo.

J2\l,
·6211
JU. .
0000.
02419

'''!II
01."

-41,.
-4110

o.no '6 au.. -Uta
OO~Z

-Zl05
01200
00000

•

162C-I~4)

0)820
03830

~OI
04 . . .
0499.
05008
05020
050ll

IlMUP+2"

--36,---

~~R

I NPUJ +,8 ,el EREfh 7

IF
8NF
BNF
Te"
81
I"
BN.
IF"

NA~I.2PSSw

•• 32,INT8UFtl

lNTBUF+l,O
··20
INTBUF,INT8uF+S

PLllIO.INIBUf
S1.81"".1].I~rtlUF
SUb IN+O~, 2.10

4"

RfAO

INTEUEOUTf OUIPUT FROM FilE

IOR', •• ,ll

05044

NAsr.lNT8UF+l

05068

lac, ,OfF I""2.7

0~056

IF" EVALER-2.61610
BT
EPRINI.EPRINI-I
WATY "BS2
Re TV
hI
F'USCN.FwoseN-I
TF" IOAf,·.21

10"

IUCiT,T'YP.I
ERA.XI
INPlJf.llt,lO
• +24
INT8UF+l,O

Bl

eASIER-48

.C'

C"

8~E

IYPE OUI

OiltltiU •

0~010

050.2
OSiC.
05116
U~128

f04-"., 7

8

PAGE
OH20
OU)2
04844
04asl>
0481>8

RMOP+ll.2.10
RMOP.ll,' ""PUrt20

04020
IF.
000)0
B
00000 PUlllO K"F
0401>0
04010 ERRU
04080
U4090
OUOO
00110
04110
04130
00140
0'1 so
04160
0"110 •

VEW~IO~

10.eLEAER' II

2~

46

,26

0210)
02130
04810
0]841

10

02110
02803
01100
Oll03
-CCOO
-2103
000-2

U

onu

16
II
14
46

04939
049)9
04U9
0495 2
04692
02811
05220
04996
031>35
05008
03ue
05068
01511
0)569

03.36
031>28
-3628
000-2

00565
00566
05220
016H
08022
01991
00000
OS904
00SI>5

-5()67
-3548
03635
01610
08021
00100
00102
OS903
-S11>3

4~

h
h
44

15
4.
H
H
16
II

..

16

o.
16

27
39
H
21

-281l
01200
OOCOO
02126
02417
031>35
OOCOO

OSI40
0'151
0511>4

.9

00~66

-2~48

O~

051,1~

I'

05100
02793
05212
031>35
04480

00000
OOOH
01200
00000

03851
03286
038H
03298
03851
0]312
03322
00040
03881
09033
05364
02815
I

02191
03848
02.03
038.1>
02811
03850
0281l
02812
00000

05188

~OURCE

26

I~

H

0~2CC

I~

0~212

.9

05220
05232
05244
05150
05/68
05280
0519.

26
31
26

SlAle-HI

Olt.",o •
U~200

NA~T

04210
04220
(42)(;
04240
04HO

u .. nllo

IF
TR

IF
IR
IF
IR
IR

lOPOUT, I NPUI-2
INPlJT2-1. LOPOUI-.
lOPOU1, INPUItIC
INPI.JT2'1l. lOPOUI-11
lOPOUT, INPul>18
INPLl2'2S. lOPOUI-l
INP\... T2.1-;, INPUT+I~

31

20
31
11
31
I~

04lTe

TR

VACANT,INPUftl00
CORe
04650
B
OORe
0' . . 0
0.1>70
0
U4680
OURG
04690
B
04100
OORG
0.710
B
OORe
0'120
041)0 BT8l
0
041.0
OORC
04150
B
DORG
04160
8
04110
04180
DIIRG
04190
B
04800
DOR"G
R
04810
OORG
00820
048]0
B
CORe
0'840
00150
B
OU60
DORC
B
04110
00,,0
DURe
04890
B
DORG
04900
04910 RSClN TFM
04920
~A~

0""'''0

J ;} !I

lall

lOR

VERSI~N

2

0~t,20

05~32

0~"4
O~Hb

,. ie

05H8
0""80
O~ . . O
05'90

MACRO",

'-1
'1

'-1

05853
0]629
03019

II

16
25
21
49
.9

12 •••
120 . .
05014
05419
0S411
cecoo
IH32

031>28
03628
-54BO
03629
05419
OCo-O
OCOOO
OCOOO

44
43

Oq

14916

O~~CO

~q

1490.

OCOOO

05510
05510

49

0010.

00000

.9

1'808

OcOOO

.9

149S2

00000

0~540

49

04104

00000

05550
OS550

O.

14196

00000

II>
25
11
4.
49

05600
05605
05599
00000
14820

-565,
03628
05605
000-0
00000

O~SOO

RSTR ...

'2

'-1
PC"'CO"'-12 ••

.~ 1
CAllEX", ...

1+]

05~20

05520
05530
05530
05540

'-1

"'C2.".S
'-1

PC~COM-12. t

,+6

'-1
lIPottc.SF •• ,+7

0~551

]

GOOO8.I>.BTBL
GOUC.' II.INTBUF
GOOOO.5.GOOOR'11
" It

05558
05510
05582
0559.
05606
OS"616
05616
051>26
05626
05631>
05636
05646
051>46
051>'6
051>56
056. .
05 . .1>

TRA",-!)

'-1
, -4

OSDNB"
'~I

-3

OENC. "
'-1

DC, ••

-2

'-1
OORG ••

4.

058"
05008
12440
05558

Ol~1B

02813
oco-o

PAGE
054C8

GeLOB 2''5 ,GOODB2'11

.-

16

SPS II-e PHASE B

INSIRNoINTBuF
IN5IRN oIttrTBUF
GCr,082'6. 0 IBl2
COLCK 2' 11.1 NIBUF. I

SAVE"" ,

2b

t

'-1
CAC •••

·-1
OSA".
'-1

c.'S ...

'-1
"'EAC •••
'-1
OS8" •
'-1
OGM" ..
'-1
DDA" ,
'-1
OIllES. , t

• ...;·1
'DVI.C •••

-I

a
'1

13332

00000

14856

00000

49

13800

00000

49

UH6

00000

49

14940

00000

49

14844

OCOOO

49

1]540

00000

49

06002 ' OCOOO

49

14114

00000

49

14"0

"00000

49

14161

00000

49

14921

00000

051>16

051>16
05686
05686
051>96
05n6
05101>
051C6
05116
05111>

'2

'J
H

.5
>.

onu

+1
U

--]>
INP~T+ 10~
I t t ,_

09
49

1411

05726
onu.
onl6
05"4
05744
05155

49

,uu

00000

16

02.n

-0000'

1

•

.2

;

,

1620-1441 MONI TOR
04Q]0
0494"

TFM
SM

049~O

Tf

04960
049TO
04910
0'''0

OU
00
HM
CC

CM
0500U
OSOIO
8NE
05010 UCANI 812
050)0 REVStN TFM
0~040
SM
U~U5~
INR
H_
05060
050TO
882
05010 FNOStN TF
TF
050'0
05100
TF
TFM
OHIO
OSl20
AM
051]0
TFM
OAt
051'0
05150
05160
OH TO
05180
05190
05200
05210
05120
052)0
05140
OSUO
05260
US210
05210
OS290
OHOO
OHIU
UHlu
OS)]O
UH_U
OSHU
USJ6U
US310
OHIO
OH'O

CI<
8L
882
•
•
•
HEAO

StAN

TFI<
81
NOP
TF.
H.
TOl<
SF
TF
TU
80
HD
TR
81

·'11.2.10
--12,_-e
--1.0.610
INPlT-2,CLERUH
INP~T>IO.tLUER>11

INPUT+ II.CltRfR.T
. . ]OolNPUhll
··U.l.IO

.-. I.
...·6 ••
. - )6

,..'UT·' . 0

OPtRoIO.IO
RlOCSN, 0000 ....
aSlI,lt 11
SCAN-S
ADIlRS.tlUE'"
I~PUT'19
·.12.I~PUT·ZO
INP~T+ 19.I~P~T+lI

• '44,
e-lb

OS_IO

"~F

··2lt
SAEl. AODRS
AC. fR. -01010

or

H.

RetORO UMk--ALP"A eMPT.

' l P ..... , lHYH""

8~E

05_S0
05_60

CLEAR AEloCATICN CONTRCL AREA

·.24, AOORS

SRH
EVAlER-l.TI 110 ..
[PRINT,EPRINT-I

.ElOtATIC~

rUCK

\6
12
16
.)
4J
L6

OH'I
on'l
OS151
OSIU
05152
on'J
I

-1'U
-0002
00000
osnl
OS150
000-0

14
41

on'l
051. .

-IIU
01100

'6
12
.. 5
'6
.2
26
16
26
16

05119
OS."
OSI. .
0"1.

.J4U
OCO-2
00000
000-0

021'1
OliO)
02111
05'10
05910
00000
I

Ollli

.. I

05Q52
05'"
05915

II
16

05976
OS9U
06000

.. ,
.2

I~E

kF.Il.INT8UF>6
AUURS
ECLAT I

U~400

t.
bNF
KE

0~'40

1.'

ADDRS-'
RtlA, oode
SREL+U
RCIR. 01010

0~440

0582.
05840
05151
0515.
0586.
05111
05 . . 0
onC2
05'e4
onl6
059"

•• J~, I"'PUT 2'160

SF
t.
BE
eM

05430

051"
05110
OH'2
05104
OSI16
05111

'.' ,-

StA~I-2_oINPUT+10

OS.IO

0~n6

RSCA.lt41,INPUh20
RSCAN>H

B~A

SCA~A

PAGE

SPS 11-[ PHASE.

·-2~ •• 'lD

HAOER ROUT
TF

VERSI UN 2

··)!I.INPUT'l"O
.'2 ).2
ASlANI-I
ASCAN I,ASCANI-I
RSCANI,RSCANI-2

06002
0601.
06026
014
o02 0_6
060U
06CTO
060H2
060._
06106
06111
061)0
06142
06U'
06162
U61'"
06116
06198
06210
06222
06214
OU_'
0625'
06270
06282
06294

14

.,
26
16

41
16
U

15
Jl
16
H
-]
-)

H
-9

..
-~
)2

14
I_

41

.14

.6

u

21

12

02no
02126
-2M11
000-2
-0000
2

•

05910
05'52

-29U
OIJOO

01"6
03520
Uln
00000
o,on
01'SO
090_1
060.1
03520
026. .
06161
06161
021U
06118
06))_
0)S16
on. .
06116
019"
06246
06H •
019.8
OUIZ
0611_
C76n
08022

016)4
-0000
00000
OOOJO
0-000
oeOOJ
00000
02128
02UI
01112
0111)
02114
0181)
00000
000-0
OUOO
000-1
01200
03520
OOO-J
03510
01200
Plno
0'021

I'd
162C-1443 MONI rOR
OS410
05480 san
0549U
US~OU

U5SI0
05510 SUN I
055]0
05S40
05S5U
05S60 eVAlOP
U5570
05SI0
055QO
OS600
05610 OIGAlF
U~620

U56)0
056_0
OS6S0
OS660
05610
05680
US690
05100
05110
OH10
OSHa
U51_U
05150
05160
OS110
U5110
OH.O
05800
05110
05820
OSl)O
O§l40
05850
05. . 0
05170
0"80
0'''0
05900
onlo
01920
OS9)O
059.0
05"0
05. .0
05910
0'''0
059.0
06000
o.oao
06010

07
TO~

81
CI<
BE
t.
SNE
rF.
JR

81
CM
8~E

TF.
B1
HNR
07
I<
SF
TF

MOVE

10
81
H
INR
81

C.
8NE
HO
87

IlOP

c.

BE
TO
ACCSU8 20
TF
TFI<
INF
Ta
A"
11
EVALAO SF
SF
TOIl
TF.
Tflt
TR

11
•
COIIS'C

lAIL
OOl

•

'"
Il
TF
tF
OS
as
All
'R
CII

VERSIUN 2

$PS 11-[ PHASE 8
OUO,
0611_
'U6U6
06B_
061 ••
0615.
06110
06J1l
06394
0,_g6
06_14
06.26
06"1
06450
06451
06410
06.11
0'.'0
06S02
06H4
06526
065)4
06546
06551
065. .
06511
0.590
06602
06610
06U'
066J ..
06. . .
066"
06"0
066"
0. . . .
06106
0.11.
0.1,.
06nl
o.UQ
061.2
061'.•
06116
061. .

E~I
KLotS~,I.ll

StAN-I,.6
INPlT>20.2J.IO
SCANA
INP~T+10.IO ,III

..",.

OPEA.IO,IO
INPUl+ I 9.1 NP~T+ 21
EVALAO
INP~T+20.2C.10

EVALAD
oPER>ZO.IO
SCANI>]6
.tilO, ALPHA

.OVE
AlP.A,aEU
90
AlP~A ...
SREI- 12.R SVMSII
I'ove>u
ALP.A.IETA
"ZO.INPUl+ZO
IlOP
INP~"20.1_,10

•• 12
SRft-Jl. RSYMSW
StANI>,.
OPER •• IO
stAN+60
. . n.OPER-I
AOORS.AlPHA
AlP"A.tURER+,
O'EI1I.,lO

")6.RS.IISN
. . u. AoaSU8>1
RtTR. lola
SCAN+60
~Ea-z

OOlLAR
8h.0
lAllol 010
OOl .. IO
COll-II. THINGS-20
ItMSPt
tHECk FOR SPEC Ul CHAUCTER
INPUT.20.10.10
SPEt
tOll.INPUT+20
COll-I

a.".

06106

OUIO
O"U
o. . n

.',--2

a.."

06".

OOL 01.10
COLL-U.COLL-"
COLL-n.l.IO
SyqOL III OPERAND caNTAINS 1l0R' 'M,II Sil CHA. .CUIIS

0. . . .
o.nl

142

.,

..
lS

-~

-6
I_
.7
U
11

..

'"

41
16

4~

...
...
U

n

J2

Z6
U

..

Z6
.5
.9

41
U

.

....I ..
n

20

26
16
....
II

1\
49
Jl
J2
15
16
a.

Jl

••
I"

u

a.
U

U
II
a.

PAGE
01611
019511
060411
01113
0611_
02lU
06.1_
0'041
02112
06126
021U
OUZ6
0.041
06)'4
06."
oun
026. .
000'0
OZ6"
OUIZ
061.6
0""
06566
06610
OZIU
06610
06212
06194
0.041
06106
0 . .41
o)ua
0""
09041

A.".

oual
OTt4.
0610.

ani.

0106.
09041
a ....
0. . . a
0141'
0"21
01111
O"U
0'41'
azUl
a
a
0 . ."
02.az
O'UI

OOOOJ
OOOK)
OUOO
OOOJO
OUOO
OOOJO
0281_
oeOkO
01200
OOOkO
01611
026 . .
00000
00099
01949
026. .
0211J
000J4
01200

07 ....

000-0
OIZOO
090.6
026.1
onu
000-0

07 •• ,

0 .... '
000-1
GOooa
00000
00000
000-1
000-0
01_00
000'0
OUOO
OUU
00000
ooo-a
oz.,.
000-'

U

1bI0-1")
Ob030 •
00000
O'O~O ERLNI ..
0.0.0
0.010 •
06080 BC~SPC
06090
06100
06110 SPEC
0'120
06110
061'0
Ob150 •
06160 SI
06110
06180 •
06190
06200
06210 •

.
.

OR.

BNR
81
BD

80
81
CM
BE

lOR I

VERS I ON 2
HA S MORE

SPS II-C PHASE

("ECO 10 SEE IF OPERAND IS PREHNI
CU~SPC, I NPU I.' 20
. OE I
C"EC_ FOR' OR $'1, INPUT' 20
CHECO fOR 8LANK
GE T dNPUhl9
BC"SPC-12
C"eCK FOR CO"~.
I~PlJT.20t23, 10
GEl
CHECK FOR ASIERI SO

CM
BE

CM
06210
BE
TO~
062AO
0.250
B1
002.0 OOLLU (F
06210
80
TFM
06280
06290
87
06300
C"
Ob31 a
8NE
06)20
SF
CF
06310
Ob14Q
10"
06350
BO
OlllbO
87
06370 GE I
TOM
06380
BO
06390
A
06400
BNF
OlllttO
CM
BNE
06'20
Ot:.410
SF
SF
o
06HO
87
Ob.60
IF"

INPLT+1O.14,lO

AS lER
CrECK FOR OOLLAR SION
fNPuT'20, l), L0

LABl
COMSPC'H
OOLLAR
•• 32,OOL
COll"IO
•• It'"
DOL, 1 t 10

DOllAA.-20
(OlL-3
HEL-2

LASl
BC~SPC-12tDOL

BCM sPC- 56
RSY~SWtO

TRIIIl,.Jtil8,l48l

COll-11.COll-17
lR"""'+2lt,HEO-2
COll-tlt,llOTO

•• "4

(OLL-I
(ULL-1)
l8ACO
... 3C ,COLL- 2
··l8,COlL-IT

S

,to. E C
TRfIII,..M+24
COll-11 ,COll-l '5

IF
81
TR
TR~fooI'"
TO"
GNF
R7
Ob~"a TRNUfi"B LM
06550
BH
10M
0656C
06510
TF"
06580
S

06"80
06490
06500
Ob510
06520
06530

CaLL-ltD
--ZIt,COll-l]

lBACO
COlL-llt,bObO
C~KNO

.. ll
TRNlJM1+ll.C.OLl-2

NL~B-l

TRNLMl+l1,COll-ll

102C-1"3 "ONI TOR
065.0

I 'I J

VERSION 2

41

O'~IO

01200

OO~02

4~

)1

01120
02812

02814

06922
069)4

4~

06806
01190

02813

49

06942

4J

0.914

02813

06954
06966

43

01190
06910

02812

02813
01190

0000
01200

.~

06914
06986

46

0699B
010 10

4b

02813
OHH

OOOH
01100

I'
A6

02813
01066

I~

0'8~1

OOOJ 3
01200
00000

49

0.830
010.6
01110

1A
14

Jl

41
16
A9
I'
47

12

0114.
0.851
010 ••
02436

n

alAe.

15
43

0.853
06910
06866

••15

..
,.
A3

21
I'

AI

32
31

10

Z1

26
H

01 j 3B

11

013'0
07362
07314
07382
07394
0140'
01418
01'10

15
"A
A.
14
46
1,

01 . . 2
0145"

22

l'
22

01Q"Q

073Bl
01'11
01302
02425
012.4
02437
024Z6
08110
01,24
07310
00000
071t:: 2
OtoU
02437
01338
08176
02415
01720
02007
014n
01417

Ob600

J\llJMB-'.tt""U~B-"

NU"B-I

074tbb

25

COll-ll,COll-15

alH8
0/<.0
01502
0151'
07526
QISH
015'6
01558
015·/0
01582
015',
01606

31

•• 23,.-13
TRNOMI-12
BETA,NUM8-1

C I CAL F
DOl,O,lO

GEl
BETA,AOOCOW
.+Zlt. RflSltII

RSYMSW, l , l l
INPUT. 19, I NPUH21

01 GALF

000-1
01200
oecoo
00000
00000
0685\
00000
06853
014U
03"8A
n070
01200
OCOOO
OCOOO
-14)1
02422
03886
02424

OcOOO
02426

-60bO
01100
ceoo-1437
02022

PAGE

Obb20

31

zo
45
26
"9
14
41
26
H

15
11

49

07417
02 . . 1
02'"
02422
Ol~ 13
0745.
02698
0 . . 58
06851
OIHO
02n8
on94
07949
02Ul
06458

024ZZ
02444

00000
alA"
01417
00000
02'"
000-0
01200
02618
02418
OOOOJ
0281"

067"0 •
EVALER IS lHE ERROR ROUTI NE

067S0 •
00160 •

06710
06180
06190
06aoo
06810
06820
06830
0.840
U6850
068'0
06810
06110
06690
06900
06910
06920
0.930
06940
06950
069.0
0.910
0 . . 80
0 . . .0
07000
07010
07020
01030
07040
07050
07060
07070
01010
07090
07100
07110

OAS
eNR
DC

5
5.ce7

1,'

I.

01615
016H
016)5

EVALER 8T
EPAINT, EPAI NT-I
SPTY
WAlY CGLL-12
80
CORER5
,ERSTSw
~V1
B~F
CHKNO,LSTVSW

01636
on48
016.0
07612
01 •• 4
01696
07108
07720
07112
071A4
01152
07164
0711.
07781
07196
01808
01820
01832
011 ••
01U.
07 . . .
07110

RelY

T8 TV
CHKNO TFM AODRS
BN" e+20,INPUT+20
B7
StA"''''I.,6
INPUT020,23,10
C"
BE
5"N-l t,6
TR
INPUT+ 1901 ~PUT+21
87
Ct-'tcNO+12. ,2
CORERS WATV RN"ESS
TF
AODCOW,PLACE
RCTY
TA
INPlT+I~,V'C'NT
WATV INPUT-IO
OOPS
RCTV
BT
FWDSeN' 36, FwOSeNoH
WATV
INPUT-IO
•
OeeEP T eORREe T I ON FROM "PWRI YeR
RATY INPUT'20
8CA OOPS
8T" GEET,.+12
TOM
lNT8UF+?t1 .11
B7
GO 1012

_eTR

os

01892
0790.
01~16

079Z1
019.0
079.,
019.9
01950
079S)

2·

RSVMSW OS
1
RLOeSW OS
1
RNMESS OAe
19, "E-EHTER OPEUHDS.'
Rf-ENTER OPEUNOS'
\6, RE-EHTU HoT'
07120 MESS2 OAt
RE-ENTER S 'MT'

14

00000
06B51
oco-o

02A)~

SPS 11-0 P"ASE B

TRNUM 1_+11 ,COLl-11

TR
06610 TRNUM1 TO
TR
TF
06630
06640
BNR
IF
0.650
87
0.660
06670 ASTER C"
06680
BNE
06690
TF
~NF
06700
06710
TO"
TR
06720
67
06730

008~0

0.910

01022
01014
010'6
01058
010.6
01018
01090
01101
01110
01122
OIIH
071'6
01158
01110
01182
011 90
01202
all l'
01U6
012 ]8
01250
01262
01214
01286
012 ••
01300
01318
07310

OOLL A.

b"''' °

PAGE

THAN FI'IIE C I GI TS

INPl.iT'lqtl~PUT+21

Ob220

Obit 70

~ONI

IN OPE.ANO

• + 20
C"'NO

BNE
81

'"

Nl"M8E II.

I 4 II

079H

45

21
)4
)9
43
H

]4

14
16
45
49
14
46

11
.9
l~

2'

"

11

,.
)9

11

19

n
.6

17
15
.9

5
59007
I

•000002

08022
00000
02421
07796
07120
00000
00000
03520
07752
0604N
02'13
0.04N
02812
-77]2
0195)
02618
00000
02112
02183
00000
05940
02713

08021
00101
00100
0241.
02480
00102
0010.
-0000
0211)

02811
01156
09210
0)615

00100
00400
-1921

a•• ,.

OOOK)
01200
02.14
00100
09033
00102
04040
00100
00102
059)9
00100

OOOOJ

2
1
1
19 X
16

15

1620-IUl "ONITOA I
01110
011 ~O
01UO·
D1I60
01110
01110
011'10
OHOO
01210
OU20
01210
OU~O

PAGE

SPS 11-[ PHAU

•

EPAI~I PAINn IHE fAAOR "ESSAGE ANC REFEAENCE Ie
INUICAlf IHE SUH.fNI IN eUOA
•
EPAlliI AtTV
fF
LOPOUI.I"PUI-l
.lTv LUPOUI-8
.lTV ElLA8
.'orV l .. kAM-)
"Iv EVALfR-21
80
.'24.fR5fS.
SF
"OliB . . . . ILL OBJECT PROG. EXfC~IION IF EUOR IS OffECTEO

e

071'0
01260
01210 ClUUI
OU80
01290

onoo

01)10
01]20 •

B8

OORC e_)
fR
1~'LT2-I.CLEAER
TA
INPuT 2H2,CLUERoi
TA
INPLI2'104,CLEREI'1
IFM
I~PLT2'160,OCCOO .. CLUR FINAL
KA2

01)30 •
On~o

VERSION 1

e

'~E

SYM80l TARLE IS SElOCHEO FOR

08022
UI034
010 ...
08058
0.010
01082
01094
OliO.
OBlIB
08126
01126
OUJI
01150
08162
08114

00000
03151
03149
03ftH
02562
0161'
00451
00000

OCI02
02191
00100
00100
00100
00100
02411>
00000
00000

01216
on39
Oll91
03441

02119
U2120
02120
-0000

04021
03911
01256
04021
03lU
01811
08268
0186Z
oaU2
08316
09003
08152
02643
084.1
03.n
01U4
07616
03911
09003
02691
01"0
08460
C19'9
02698
064S1
OB50)

000-0
02641
01200
000-1
0400.
02501

0 .. 11

EOUIVALE~CE

e

07150 LUtD
07360
01nO

unlo

01]90
01400.
07410
01420 PAR TL
07430
01~40

07450
014.0
01470
01480
07490
01500
01510
01520 GDfil
01BO
01540
07550
01560
01510
01580
075'10
01600 CF II
01610
0762U
U7610
01640
07650
01660 •

fFM
C
8E
AM
fA
Tf

81
fA
al
AO
C
·BNL
CM
BNE
TF
IFM
81
TF
AM
IF
B"F
8"F
TOM
CO
Bl
IF
AM
IFM
fA
.;

BLKCTR.O.lOtlNITIALllE 8LOCk COUNTER
SFA,SVMTAO "CHk.IO SEE IF IHIS IS PARIIAL 8l0Ck
PUlL
BL."R 01, IU
lIM-9·,L IMIS.-Q
L IM.lIMUP
e+20

L IM-9,lIMISP-9
8SEICH.RSEACH-I .. IO 81NARV SEUCH KOUTI"E 10 FIND
GDTII ,EOSW.,WAS SY"BOL IN IAILE
158F-I, L I MlS.
GOlll-lO

~VMBCl

8LK,OdO

LFIL
~FA.SU8SJh5

EVALER-2,15000"CA~NCI

FIND

SY~BCL

IN SVMIOL TAILE

fVAltR.EVALEA-1
S>FA,SUI\S"'.5"SAYf FILE 'OR.OF BLOC.K ",HERE SYMBOL WAS FUUNC.

US"F-I .5,10,
MOVE ~VMaeL ACORESS
BETA,ISIF-Idl.
INTC BETA
•• 1,8, RELS"
•• ]6. BETA

RSYMSkt, l,ll
8EU
D I GALF

•• )IJi.SYMfAO
.. INITIALIZE SUI-INSTR. TO READ FI~ST FILE 8lk
·.21.SP8L
SLB5M.5
L1M-9,II"TSF-Q"INllIALllE FO~ FULL 8lCCk
SU8SM'5,~FA .. CH •• IF IHIS BLOCk HAS AL.~ACV REEN SEARCHED
BE
CMPC"I
~AVE DIGIT lT LOSV~B'I

07610
C7UO

III

01690 •
U1700
07710
01720

REAn AlOC. OF SV.aOL 5 FACM File
TFM
IORf ••• 2-3
n
IOGI.OEFSM,1

IV

MUkl
,lOSYMR+.
lOSVM8+1. SPSGM

162C-14<3 MONIIOR I

TC

08~52

VEASION 2

"T
8SERCH,8SERCH-I
01740
AM
ILOCTR,loIO
01150
BO
GOI IT ,fOSW
01760· CMPCNf C
8L.CTR.8LK
8H
COIIT-,.
Pl770
On80
8L
CFIL'12
C
SFA,SVMlAO
017'10
.,1100
BE
GOlll-)6
IF
SU.SM'S,SVMUO
01BI0
, ,"eVE FILE ACOR.tF PARTIal BLOCk TO SUBIN
TA
L IM-9,llllISP-9
07820
.IF
LIM,LIMTSF
07UO
018~0
B7
CFILH8
8101UV SV~IOL TAllE SURtH SUB~OUll NE
07nO e
01860
&58F, CLERER+S
01810 lSERCH IF
A
8S8F, LIM
01880
8SIF, 1I11-S
01190
8SAV, ISIF
07900
IF
01.,0
A
8S8F, aSIF
8S8F, 8S8F
01920
01910
858F, aSAV
•• 24, BSaF
01940
10
AM
858F-I, 8,10
01'150
~II
ISBf-l, 1.10
01960
B58F-l, L1.-5
07970
C
01980
aNE •• 26
01 •• 0
IDII EOS~. 0
01000
882
C
COll-2,BSIF-I.11
080\0
BNE 8SHEO
08020
10M EOSIo. I, II
01010
01040
"12
BSI11
01616

08~0)

On40

LC!tYMR.+l.lI1l1RI

0 . . .0

08116
08188
082CO
01212
01224
Ollll>
U1248
08256
08268
08210
082.2
08104
08111>
01328
01340
0ln2
onl>'
01316
01188
084CO
01412
08424
01431>
0'448
01460
08468
0&410
U8492
01504
08516
U8528

08564
08S16
U858a
08600
'0861l
08624
08631>
08641
081>60
08612
OU"
08691>
08108
08120
08H2

I.
49
25
21
II
43
24
46
41
24

087'0
08152
08164
Oan6
01118
018CO
01112
08124
0.116
018'"
0 . .60
01"2

41
26
ZI
21
26
Zl
Zl
Zl
H
II
12
Z4

0 . . .4

'"

0 . ."

41>

26
11
2.
4.

.,

0.90• •2
01910 24

00565
005U
199,.
08U2
04021
0811.
04021
01140
01410
03977
08140
03617
038U
OlB7I
01511>

-8581
-31>03
02631
08151
000-1
08919
02643
01100
01100
02641
01200
02641
02491
04011

00000
09004
0'004
0.004
09010
09004
0.004
09004
08. .0
D'I003
09003
0.00)
019ID

00000
02724
0J871
031"
09004
0.004
09004
0.010
0'00.
00a-1
COO-I

0 . ."
UHl

O]lU
OUOO
QOOOO
O.OOL
01200
OOOOJ

0 ••21

4'

0....
01'"

0 . . .0

,.

nl"

01100
0900)

OJ ••,

0.00]

0191.
01'46
019...

.,
U
••

01912

••

019.0
O... Z
0 . .19

.,

09004

Otol0
090lt

0'011

Oton

atOll
OtOIl

Otoll

.t040·
Ot041
Ot047

I.

0 . . .0

OIfU

0"'1
o

•

•,
,
,
6

2

5
5
Z
J

16

162C-I'4)

~ONI

TOR I

VERSION 2

SPS 11-0 PHASE I

PAGl

c;
8S.
082]0 (SA8UX OSC
11, C'
OOOOOOO(CO'
08 ... 0
OS
I
082S0 NMOAL
OS
I
08260 S.UCE OS
I
08210 oMSV
OS
~
;
08280 OIGlfS OS
08290
INSJRUC liONS TO 8llNG IN PHASE 86
08)00
Ct
;,12145
J2)H
H. CFFA,OHOO)
08310 GAl
08)20
RT
CFF,GAT-I
08330 OFOC03 COA ,c. 8bOAO,8bSC. Ttl ~s TRN
OHISI-)CJ2'"
08140
DC
I,'
o~no

o8HO
08100

090'8
09049

II

I
11

09060
09061
09062
09061
09012
09011
0901a
09090
091 C2

02629
02592
14

-9102
09011

16
11

0262Q
02592
14

-9146
09121

II>
Z1

021>29
02592

-9190
0911>5

16

21

09116

INSTRUC r IONS TO 8R ING IN PHASE n
1),1234,5
DC

09121

JZ14!l

H. CFFA,oFOo02
08310 Gil
08180
BT
CFF,GIT-I
08190 CFACC2 OoA
,O,850Ao,A5SeT; INSTRN
OHI22-29J14H
DC
08'00
I,'
08410
08420
084JO
U."O
O.HO
08'60
08410
0 ...0
08490
08500
Ott")lO

08520
085)0

09122
09114
09146
09160

INSTRI.CTlONS fa 8RING I N PHASE 84
DC
5,123H
J2145
HM CFFA,oFAoo
GE"
8T
CFF ,GHf-1
oFACO .ODA
,0 ,hoAD, 84SeT, LI NPR T
OJ9069-5)-92U
I,'
DC
.INSfRUC TlONS TO RESTORE PHASE
501234S
DC
J2345
TFM .C F F 0, OF ADD I
GEEl
TFM X,P~ASEB
8T
CH ,GEE f-I
OFAcel eOA ,a ,8)oAo,B )SC f ,8 JOAo
OJ9000-69-9100
I,'
DC

•
U8550 F)
08~40

H

)8
TR.

Ob')csQ

08S10
08S80 SUBl

09166
0911_
09190

08~90

08600

CORt

092C4
09209
09210
0'1222
09234
09241>

16
16

21

02629
04018
02592

.

-924"
-'200
09209

09110
OHIO
00000
00000

00101
00702

09260
09262
09214
09286
09298
09)10

H
)8

36
~.

a

co~OO

OCOOO

09262

F)
TeE ROUTINE WHICH FOLLOWS TAkES "RE OF

*

14

8)

10 LOAD PHASE 82 TO fHE FILE
SUB]' 101
SUBlo102

OoA
,0 ,82VAO, S2SC T, PHA SE8-12
OJ9200-'2-4188
F3
fCo

OtUtlO

0911>5

09262

'~E

147
162C-1443 MONI TOR I
08620 •
086]0 •
0864U

V~RSlUN

SPS II-e PHASE I

PAGE

OI.IPUT FOR THE PROCESSOR

DC
5,CCOOO
-0000
08650 lINPR T CF
AOoRS-"
081>60
CF
·LN1"-4
08610 •

09266
09268
09280

H
33

0)516
0238)

00000
OOCOO

14
46

09201
1001t

01200

OBt:lBO •

08690
08700
08110
08720
08130
0_140
08150
08160
08110
08180
08190
08800
08810
08820
088'0

CM
SE

LINPlT-I.oOINST
DO I/iST

09292
0930.

SF
SF
B
BTM
BO

LNT~-4

100RS-"
llNPRT-l. ,f)
LS10UT, . . 12
x,INTBUF+6,6

09)16
o9H_

)2
32

o9)~0

~9

09]52
09364

11

Oll83
03516
0926P
11984

H

O~OlQ

II

0)520
0)899
0)909
03899
09023
10111
10254

•
•
8RNC~

COOS
•
•
•

OH8.v

08SS0
08160
08810
U8880
08890
08900 LNT~2
08910 •
08920 •
089]0 •
089~0 PCUN
08950 OOCON
08960
08970
089BO PCONI
08990
09000
09010 LUCK
09020
090)0 pos.
09040
09050
09060
09010
09010
09090 CHSYM
09100
09110
09120
091)0
0'140
09150
09160

GENERATE OUTPUT

••

IF

TF
S

,FM
TFO
BTM
I\J~

87

os

"PUNCH OS UR oN8 LIST CECK CUD
FOR

NU~ERIC

Jooee
00000
OCCOO
00000
-9364
0)614

BLINKS

ACORSoI,lO
FR 5 TAD, AOoR 5
LSUD,AODRS
FRS TAO, LNTH
TYPE,99,IO
DO INST+l]

09Hb
09188
O94CO
09411
09424
09436
09U8
09460
09H2
00000

RELOCG,~,IOII

S lAC", 9ol0

x, ,6

5.CCOOO

26
26
22

16
16

11
11

104)~

~9

040)0
5

11984
0
09522
09522
00000
10254
09710
IOH4
04OJO
11916
11914
OUZ_

000-1
0)520
on20
021Bl
OOOR'
-0000
OOO-M
000-9

PUNCH THE CDNSTANT CARDS
ITM
05

JFM

A

TO
81M
Bo
BTM
B1
8TM
8TM
TF

To

BTM
AM
8NF
SlM
BTII
TFM
TR
8NR
TOil
87

LS1DUT"'12

09~80

,PCO~,

11

09410
09492
09504
09516

16
21

•• 30,OUT+Z
• +18,LNTH

,UHH+l
RflOOG,2,I01I
MESOUT,DNESW
STACKR,9,I0

09528

X.,6

CVACT ,'+12
LSTOUT,.+l2
OUT+6,ZEPO+S
OUT+l,LNTH+1
RflOOG.i,IOIl
nSYM+llolol0
·'24,OS&80X-I
RELODG. ),1011
STACkR ••• IO.

LNr .. ,5
zePO'I.lEPO~6

·.32

,ZEP.O+\
IN18UF .0

X,,6

lh

09S40
09"Z
09564
09572
OtsU
0.596
09601
09620
09612
09644
09U6
096. .
0"10
0969'
09104
09716
0'121

U

.
11

4J

Il

11
Il

26
2S

11
11
44

Il
11
16

II
U

U

u

-9.92
-2220
02381
02)81
OOD-k
0'3887
000-, .
-9'14

-n••

DUOS
.02)18
QOD-II
oun OOD-I
0.66t 09041
102S4 OOo-L
104)4 000--9
-0005· .
02101 On06
091)6 onOI
olUe 00000
040)0

02225
10254

oun

19

162C-IH1.ONITOA
09110

IF
A.
AM

U~IdO

YEASION 2

SPS II-t

P~ASE

PIGE

8

F.~IA",LHAD
l~I'O,~,IO

OQ190
AOOR~,~,10
OQ200 CUtLEY 61
L I'PAI
09210 •
T~E FOLtO_INfo AOUTINE HA~OLes OLTPLT FOA
INPLI2'IOO,UUT'2,Zl,.OVE OMES
U92Z0 MESOUI Ie
MHO
AM
'-6.1 010,
DA fA
O~14"
AM
'-1),1010,
FRO.
09250
~M
LNlhl.lO,
OUT'2
U9160
ONN .esOUT" ,
10 INPLI2+100
0927U DOMESS TF
LSIAO,FASTAo
09280
TA
OUI'2,1NPUTl'100
09290
IFM RANAN'II,INPUT2.9q
OQlOO
~.
Me SUUT+.,Z.lO
OQlIO
IFM LNI~.O
O~)2U
.10 LSIAO,I.lO
09110
AM
LNT".I,IO
09)'u
1M
UANA"'.1l.1.10
09150
C
BANAN'II,MESOUI ••
OQUO
BNL
RANAN'IZ
09}10 BANAN 8NA .- 00
0'1)10
M"'''' .'i4i.8ANI~'11,11

09116
09748
097'0

U
11
II

Oq112

49

09710
09192
on04
09816
09826

25

0~840

OoES

09B'~

U987'

12
1&

onoo
0_9\2

II
11
II

09Q2'

IS
11
11
24
4.
1I

OQq12
09900
09996
OlH7
10434

0~42U

C

BANAN+II,MESOUI"

0'1410

8M
U.

X t ,f>

0999.
100e8
10020
ICO]2
10044

HANAIt'II.lda
DOMESS'~8

OUTPLI AOUIINE FOA

094qO •

09S0U •
09SI0 POINST RIM
UqS20
SF
0~5l0
IF
o.. s.u
IF
09550
AM
0"5'0 NOIYPE 10
0"510
Ie
u",,~tju

rA.

LSIOlJI"'12
AoORS-4
FASlAo
,AOOAS
L S TAO
.AOORS
l S lAO
.12
00INSI'19.lEPO+12
lEPO'll.LNIH'1
ULJ.2

09SqO

IFM
MIM

Oq.OO

tsfflll

OQblC1

,lfPO

STACK~,q.l0

0 .... 20

to

lEPU'12.0UINShlQ

9NR

SECINSoIEPU'12

O~b40

B

",,6

09Ua
OOAG '-1
O.~ba lElOCG 10
IC.R~lODG-1
0~b7U

BNF

.+]6,~lAlS.

0'16180

!=I~F

.+l4,AElSW

oqna

CF

IC

U9700

AO

•• 4&,RELSW

OHIO
0.120

CM
IC.loIOII
HNE' '2'

1 4!J

16ZC-IHl _ONI IDA I
oqno
09HO
U_150
0_100
0971U
on8a
09no
0 .. 800
0 .. 810

~Et

10M
882
INS BI
U
AM

"I"

VEASIO~

2

Fl S TAD ,L S TAD

IIUAG .- I

a~820

12
49

OQ."

10088
10100
10112
IU 124
10.,6
10148
10160
IUI72
10184
101Q.
IQ2CB
1022U
I(2)2
10244
1015"
leZ04
10266
10218
IC290
loe2
lell.

17
32
2'

09~71

000-.
000-5
-2220
000-1
000-1
000-1
01)00
Ol899
OH81

-H"
CCO-2

-0000
000-1
000-1
000-1
OQll6
0.,00
00000
09~lJ

0000000-9
000-1
09116
01100
OQ97J
03909
OCO-I

26

II
H
2S
1I
I'
11

17
2~

.5
.q
Z~

44
44

11914
Ol . . .
03lQQ
Ol909
03Q09
10107
02]12
02220
02387
102S.
IU""
02112
IOl52
04010
0]894
IOl02
IOJ02

JOIOO
00000
01520

03520
-0012
02312
OH8.
OHOO
-0012
OCD- J
000-9
ICI07
02312
00'000
ICZ5]
0'033
02418
ocooo
02418
OOO-J
01200

H

Oll~4

43
..
41

10lSO
Ol894

15
42
21
1I
11
II
26
11
49

Ol8Q4

oeoo.

08126
02300
Ol520
11984

01125
02112
-COI2
Je40C

10]~0

PAGt

lSTOlJT,.+17

OUINSI.~O

Z'

10068
ICOIO

lCH8
IC]50
10]52
1016.
IOll6
ICl88
10400
10412
1042'
IC4]4

IEPO, tEPO.l}

l.STAO,12

1005&

SPS II-t 'HASE 8

ADDRS.lZ

~

0~971

OQQ71

0401Q
02220
03899

1032~

CLOLI.ClOlll-1

IF
AM

4~

03899

Ol~09

01909
10148

-0012
00000

11489
11100

104]3
04012
-0075
01200
01lQ4

09830 •
I~E

09840 •
U~8S0

FaLLOWING RCUIINE AlAANGES IME 08JECI OUIPUI Ie

I~E

FilE

•

OqUO STAtu

TO

09810
0 .. 880
OqaqO
o·,qOO
09910
09920 8ASEO
O_q']O
09940
09950

8NF
tM
SE
80

8RSfQ, Ie, ,CHIC.FOR ICD

81

INDAOl

C
UNE
t
8NE

09'16(,1
09970

TF"
'FM

09~80

Te"
FITS
RNP
S
8NZ
fFM
8NL
fD
COl
8NE
CHKR" 8NR
TO
A"
TO"
SM
TRCATA TA
IINF
87

IE~IAO,FASTAO"IESI FOR SRUK IN AOCRESS ·.HUE~tE
AEMAll
IVPE.IC"IEST FOA KINO OF STATE.fNT
NEolL
TE S T ,0
.. DATA IS
tA.DATA+l1,OUT+2
.. tCNTlG~OU.GO DIRECTLY
OlJT-7,1I
•• Ie SEE IF DATA fiTS
7T'f'S,TEST ..
TEST TO SEE IF AceAS,INO.LEN ETC FITS
SETFRM, •• IIrfO.GO 10 SEr flAG AEC,"IR.
7TYS, LNTH •·...OW SEE IF DlTA FI IS
•• 2.r.
7TY5.15

09990
10000
10010
10020
10030
10040
10050
10060
10010
10080
100'10
10100
101l0'
lOUD
10110
10140
10150
10160
10110
10110
10190
10200
10210

lOUD

lono
lOUD
lono

A

A
A
fF
TF
8D
TO

.1'"

TOIt
8NF
lOUD
TDM
10210
TOIO
10110 RIETRN 8112

S INLCO+ Il. S TAC'.-I
NEoCAR.FAST~I.; GO 10 NEWClA IF IHIS IS
7TH. H •• tHR.IF CARD I S EMPTY
MOOIFI

C"""
•• 22,IC..

FI~SI

ENIRY

NO.JEST

•••• 20000. n.fOR .
SETFRM...
CONSTANT
TROAU,OUT-7
TRDU. . 6.0UT-7.6
AlBA. 1.10
0IlT-l.0
TEnol.IO
ABU .... MOVE OAf. ,PLUS AOOR •• INO.LEN.ETCI TO CUTPUT 8UfFfA
"20.n"
SPL IT
STKLEN.lNT".6.U'OATE LENGTH
A.aBA.TEST
AIIU.LNTH
TEST_O.LSTAO .. STORE AOOR.OF LAST 'OSN •• '
TYPE.IC .. SJORE INOIC.COOE.
. . J6.1C
,IOATh6.FLGRII.6

"".75

20

0]Q09

ANa LlhKAGES

INSTA~CIIONS

LNI"0I2
AELOOGoioIOII

09UO

09~71

OQ971

CQQ84

01

09116
02387
0)Q09
02381

14

StACIlR,q.1C
86'''''''''11.1.10

09410
094'0 •

OQ971

4.
4S

Ol.,fIIP1'11,O.Ll

uut'2,tUNAN'1l,1l
FASTAO,lSTAO

-])87
09786
09191
02]81
097.0
Ol909
02220

OQ~3~

rOM

IF

01520
OQ261

0994B
OQ9'0
09912

IHIIt
AM

SM

12

09888

OQU2

U9)QO

094bO

11

4.
U
11
I'

0.,400
09410

09"40
Oq4S0

II

03aqQ
0]909

FIST"T, I,ll
'.24.0UtN'1+1I .. ,,,.FO. COIIST.IoMOS! UST POSN.IS A
nPE-I • .,II.SEf INO"A(O. TMAT CONST.HAS RECORD IIa••
OUMPI+II

IIC.".".

1511

IC434
10446
iO'58.
ICHO
10482
10494
IOSC2
10514
10526
105]8
IOS50
10562
IC574
10586
IOS98
10610
10622
IOU"
10646
10658
10670
10612
1069"
10106

2~

44
14
46
41
4Q

Z4
4J
24
4J
16
16
15
22
47
22
U

16
46
25
14

41

10191

45
25
11
15
12
Jl
44
49
2\
2\

10110

II

10.22
IOU"
10.46
10'"

H

lUll

lono

IC1"2
1015"
10166
1011.
1011.

10110
10112
10194
10.06
1091.
10910

26
26

IS
16

IS
U

15

IS
4Z

018~2

11108
10502
IOQ31
0902.
1091'
09023
11044
09015
10765
02211
03892
11196
01192
10646

Olltz
10694
10610
10611
11296
10754
1076040Jl
DUll
090"
0401.1
'0116
11564

ono"

040]1
04011
09028
0.023
101.,
107603192
040]2
10. . .
0,022
OJ'41

Dun
01200
03894

01200
-0000
-2220
000110
09015
01100

OUI1
01200
-0015

OUOO
0]194
'0-00
01200

0I2l1
02211
000-1
00000
000-1
00000
03192

DUll
09015

oun

0]909
OJ194
011.4
03.10
-0075
0000.1
03547
0000.1
00000

II

162C-I'<) .ONITOR I
102"0 •
10100 INOACR
1011 a
10llO
10HO

VERSION 2

TON

"U~I+II.6

TOM

"'U81+)S,S

'Flit

"'U82+11.QUr ... .,

10HZ
109H
10.'6
10968

~UBI

81

IGlOO

SET \'P FOR ReC.OR< •• ADPRESS.INDICATOR

IOlSO RE~AIl
10160
10llO
10 100
101"0
10000
10<10
10<20
10<30 NE_IL

PAGE

SPS II-C PHASI B

SfT uP FOR INOICATOR A"O AOORESS--TCD

TO
TO/lll

OUT-7tU~hHl

TOM

"'U81+)S.8

TFM

.... WHZ.ll ,OUT-6

0\,T-2.FRSTAO
""B

DORe e_]

10.

sU LP FOR Ne. INDICATOR AND LENGIH
TYPE-l"II.IURN OFF' INOICATeR

lO"4u

TO'"

HUbl.ll,)

10<~O

TDM

.... UB1.1S,2

10<60
TFIII
t-uBl+ll.OUT-l
B
t-Lb
10<70
DURe . - )
10<80
1o,,~o •
SET UP FOR NEw H-OIGlr A£CO.O- Nh AOOReSS,INO,ANO LENGTH.
I 0~00 NE_C.R TOM "'U01+ll,8
10~1 0
TO.
"'UB1+1S,7
10~20
e
RE"',n+16
OOR C .-]
10SlO
10Ha HUB
10
OUT-loiC
lasso
TFIII
OlJH1,OtlO
IF.
lEST
10~60 HUBI
10HO
TF
SIn EN. ABBA

AM

srKle~,

fFM
TO
CM

TROATA+U,
-+22, Ie
•• e.400co,79

BNE

FII

10610
106"0

A
A

10050
100.0
lao 70

IF
IF.
B7

OLl+l.lNTH
Ol.l+1,OOINSh21
OOINsr+2),LNTH

10~80
10~.0

HUB2

10600
10610
10020

lNTH,O
FIT
SEI A FLAGGED RECORD

10680 •
lObQO

SETFRM

TD

(

jj)l4t"

bN'"

lIY5015.oINITlAlIlE FULL CARD COUNTER
ST~IICOtPKMOD

c·.UtiIN+S,SUBOUT+S
Q'VRli.P

11156
02311
OOOOQ
00008
-2212
03n.
00000

110 ••
1105.
11068
11080
11092
III CO

0.022
11167
111.1
1120]
11112

00000000]
00002
-2217
00000

11100
III 12
11124
11132
II III
IIIH
IllS6
11168
11180
111.2
1120<
11216
11228
IIHO
11252
1120.
11276
IIZ88

11167
111.1
11012

ODOOI
oe007
00000

H
16
16
26

OZ217
0221Q
0.015
0)Q04

03890
000-0
-0000

II
10
25
I.

O].O~

-0000
-0000

or

21
21
26
16

••

IOU5
11220
11224
10586
0221.
022U
10111
02387
10586

0~031

o]n.

MO-OO
01200
02187
10111
02387
-coDa

l07.018.2
O]H2
11476
0356.
11661

03.10
-0015
Ol"37
03.32

I.
49
16
12
15
14

00565
00520
IIH2
11422
00000

H

II'"

II
11

11<04
0359)
0]912

JIJ.I
- ]51.
-3386
000-1
00000
-2.84
01200
000- ]
03.11

II".
11<68

21>
4.

0001l
11 •• 6

01916

15
41

02211
11100
OH68
01.U
107b10810

00000
038.'
03520
0389_
03958

02181
11611
11611
022Z0
0389.

0]892
-2220
02187
00000
OZ]87
00000
02387

TFM

IOAT •• +21
IOIlS(.,OEFOUT,1

I: 168
11180

TFM
SM

*.Ja.rNPUT2+QQ
•• 18,1,10
. - . ,0
*-6,PA(.K

11HZ

o

TOM
C"

BNE

.- 36

A.

SL.HOur+",3,lO
PkM(JO, PACK'O-It

TR

108"0

OC006
00005
-2211

OB.]

01100

wRITE.3 SECTORS -- 4 CUOS -- TO THE FILE

1 0 750 •

10700
10770
10780
10HO
10800
1081 C
10820
I DB 10

1l~0)

02211
11161
11191
1120]
02216
IlIll

IIH6
1110s
11120
11HZ
II!H
liHt>

pt(~OO,PI(MOO+5

1116 7
1I1U

10."
109 . .
11000
1\012
11024
11016
IIOH

TEUIUTING ONE CARO

TRDATA+6,FlGAIIt,6

101CO MOCIFI IF.
'R
101\ 0
aNA
10120
I () 130

~HK

6.

ANCLeNCT~

HUSttll,'

TF
B

15
15
16

1100.
11<1.
11'21
IIHO
11052
t,

1 Nl T 'AlllE BUFFER ACORESSES

1I~22

15 I
1020-1"1 MONITOR I

VERSION 2

PAGE

5PS II-C PHASf 8

10850 STNUeO IF
ABBA,PK"OO" •• ADORESS Of NEW CARD MOVEC TO ABBA
108.0
B
'+8" .eRANCH 84CK UR CCNTlNUE
10870
OORG .- 3
1088u

TO'"

OUT-7tQ

10090
10.Ou
10"10
10.20
10930
10Q"o •
10.50 •
10960 SPL I T
lana
10980
10 •• 0

BD
rF
TO

NEweAR.IC

fR

HtOATA+6, HTTCD-10,e.

Bl
A
rFM

IIU.
110.6
115CO
11520
IIH2
IISH

lSTTCO,ADORS

IS''CO-501C
RfEiRN-bO
ROI liNE 10 HANDLE THE CASE WHERE CATA OveRFLOWS FRO_ ONE
CARD TO ANOTHER
LNlH,lTV5
~OVE PARTIAL

A

rR

•• :!5,OIJT+2

•• 23.lNTH
QUT+2

t.

OA'.
I~'O

OUT+2

llOCO

A

11010
11020
11030
110<0
1I05U
11060
11070
11080
II 0.0
11100
11110
11120
11130
111<0
11150
11160
11170
11180
111.0
11200
11205
11206
11210
IIZZO
11210
11240
11250
11200
lIZ70
11280
I1Z90
11300
11310
11320
11]]')
11)40
IIno
11]60
11370
11380

CF

FRSTAO.LNTH,,08TAIN AOORess OF NEW
IIY5

A
TF

STKlEr-hlNTH.6
LNTH,7T\'5

FI~ST

DICIT

87
"DOlFI
• ERROR ROUTINE -- FINAL OUTPUT HAS OVERLAPPED INT. OUTPUT
OVRLAP TF" EVALER-2.12710
BT
EPRINT.EPRINT-I
67
"ONCAL
•
•
Nu"ERIC TO ALPHA CONVERTER
•

as

Fill

TR
IF"
TO
BNF
TOM
CF
BO
TON
8NG
TFM
BNR
IFM
TF
AM
AM
C

8NH
882

os

tVAeI

S
FIL8UF,FILl-1.11

Fc ... eUF, 10.10
FC"'8UF, Fll8Uf+4, 11
."60, fCH8UF

FCH8UF-t. 2.11
• +2", FCH8Uf

FCH6UF .lt7,lO

115h
11516
11588
11600
11612
1162<
1161b
116 . .
11660

21
16
II
11
21
H
ZI
••

11668
11680
116.2

16
21
••

07634
08022
007.6

IUC)
117C.
11716
11721
111.0

31
16

FCH8UF. 3~.IO
FILBUF+I •• FCHaUF ••
F 1L8UF+4, 1.10

11160

IIIU

F IL8UF+ H. 2.10

u ...

FIl8UF .... FJl8UF+'
Flll+1Z

TFM

A

ACTfll+5.l~TH

11 . .'
11'0'
11.14
11.16

IIU.
11960

8TM FlLL.ACTFll-~
lS
C'VACT-l,,6
OORe; .-)
FllBUF ass
I.
,,"eUf os
l

152

16

2!

5
11960

Iun
lI.n

H
IS
U
H

11.17

15

11'76

55
16

.,

11800
IIn6
11100
IIIH
11971
11841

16

llH1
linN

11

11964
llQT4
11.64
11716

26

II
2.
U
62
16

Zl
17

II." 6'
II."

11 .. 0
11960
11.77

5
THE FOlte.lNC R~\JTiNE UUNGES THE OUTPUT OF THE ~lSfI"G

018~2

03.0M
02387
11]08

IIIZ"
IIU'
11141

... 2/rt ,FCHaUF

5
AC TflL+5.lEPO

os

••

1176"
11776
11111
11100
lUll

-.2"., FCH8Uf

JI

IlH6

1175~

Fc ... eUF-l, 5,11
FCHBUF

Z.
25

o~OOO

o]an

pZ7IO
080Z1

1170L
OOOPO
IU6"
11Q17

OOOON
00000
11.77
OOOOk

11.17
000M7

lun

OOOL.
IU77
000-1
000-2
IUO.

,

01100

12420
12620
11706

-2300
02381
J1411

1191N

00000

16
2
5

22

H20-IAt"]

11190 •
11,00 lSIOUI
11410
11'2u
11430
11'40
IIHO
11'00

f'IIO~ITOR

CECK
10
ICO
'0
UNE
Hf.
of.
"fO
~

Fill •• OAF Il-4

VERSION

I

PA(J£

SPS II-e PHASE 8

t. AonAf 55

11984
11996
120CS
Il020
IlOl2
120 ...

I~Pl.T2*2e61-l+42,7

L I NP. I-I ,nUl NST
L S ICON
FIll ,UPF I L-" •• pP.COOE
FIll.. PF I L- 4 I t P- FIE LO
F Ill.OF Il-'" .O-F IElD

120~6

~7
PA INf
"
' 70 lSICON UfO Flll,lf"HHFL-~
11410
foM
I"'IPlT2+2·67-h42.7
11490
SHAL L _E PRI Nr
II SOil PllNT ONF Pl.NCM1,lSPKS_,.
H.
IORT,.+2l"
ro PAINf lISTlN~ , I oRf I
YES
IISIO
R
IOPT,lsrUff-4.1
II SlO
8Nl Pl..NCM 1 t )400 I I
IE S I pa I NIER CHAN Il OHO PACE
llBU
IF. CF FA, PR. UD.,
OISK ceNrAeL FIEle PRINr oFlO
IIS4U
11550
AUORESS 10 STA~r eFlo INoleATICN
" fM CFf ,PAGE
ceA PAGE OFlO I I HE AND paOGUM
• 1 ,0 tin A0 • ~ ", SC 1 t H 7 "'AD, ••
11500 parAO OUA
IHOOI-C'-boaa
ae
II \70
10'

11580
11590
11600
11610
11620
11610
11640
II b~O
11660
11670
IIUO
11681
11690
11100

PUNCHI eNF
C"
BNH

IF.
8
"I

PUNCH2 U
IF.
GOel

""fR

HM
81
lSTtEF DSA

DC
J8 '
11720 AeAF Il aSA
11710

PINeHZ

12224

PUNCH STATE_ENI ONLY

IN""2

12236
122<8
IU,O
12271
IllB'
11296
12308
12320
12lll
Ill41

3,18'

Ill')
1134b

ClEU CARD CHV .,:tEA
MovE OBJECI COCE
r 1+'" .*21' lQ, •
PUNCH CUIlE -_lY8E S r" E _ENf

I~Pt..'1+l"6.ClERER+l •• CLEAR IHE RE.AlNS
AE -vSC,..+ ,-;, INPUT 2+ Ze'H', t SE I PCI NrER lO. FOR
lSfOUT-l .. 6

P"I~I

It,

~AeRo

ALPHA LISTING

curpul

49

17
IS

,.

...

16

00~6S

41
I_
II

00532
12118
02629
02\92
I'

H

1229b

I'
41

C~88q

Ib
.9

21
11
Ib

••27
11
I'

,.

00~6S

IIq~l

5

5 •
-lSI b
-!S20

l13b7

5
-llOO
-llOI
-3461
I

11140 OPF IL

nSA

IEP(j

,lEPO+l,INPUTZ+Zeb7-J+42

•

-1281
3

Ill51
1215b
In.1
12162

I,'

02479
-1'05
01100
J2247
-4180
08125
0)448
J2295
-4180
081H
02120
-340)

00532
O~ IJ6
0144]
0588q

Ill51

DC

J2427
CC007
02481
J2135
J2139
01400
J2172
-6218

IU60
0056\
00532
0812.
03406

ADOII:S ... C., A[)OR S.1 NPUTl+2 Ud -2+42

11130

J234 7
CCOO 7
J0088
01200
J2163
J2 ]79
J2395

11704
03448
09267
12076
1170'
1170'
11704
IliOO
11704
03<6C
11iU

IllS6
11l8S
I22CO
12212

GOC.L,lSCOS ....
10 PUNCH UR NUl
RE vStN+)~.1 NPIJT 2+2 .~Q ••
yES "'E HUES
lOR r •• +21"
IOPT,COPUEF-4.1
CLULT,ClOUT-l ••
INPl 11+2-"l- l.1 ~Pu
IO~T •• +21t1
IOPT .COPDff-lt. 7
ClI.JLT,CLOUf-1

IlOb8
110 Ib
12088
IllCO
Ill12
Ill24
Ill36
IliU
IlUO
11172

11
I~
14
41
17
17
11

H

- ]It,,q

I

IlnO

ne

I,'

12361
12312
12371
1211.

117.0 PF Il

USA

1£I'U+2 t if PO+tI.1 NPUT2+2 .70-1+'2

12 J~l

5

Ill8 )

-2302

121"S
123q3
Ill94

-230b
-)4bl
I

•

•

I ;, :J

lblC-1441 _ONlrC" 1

11710

ve

I,'

1\180 QF Il

8;A

HPO+1,lEPC;+11,

11190

CC

11800 ACHll CSA

11810

CC

11820 lNI.Fl oSA

DC

11830
11140
11150
11860
11870
111'0
IInO
II 9CO
11910
11920
11910
119.0
11950
11960
11910
11910
11990
12000
120\0
12020
12030
12040
12050
IZO'O
12010
120.0
120.0
UIOO
12110
12UII

.
•
•

VS II-t PHASE 8

5 •

Illq9
120C'
124CQ
12410

I,'
lEPO+l.·-e

PAGE

1239.

INPUTZ+Z.'6-2+"2

-2307
-2lil
-141Q
I
5 •

1241~

• (NPUll.2 .1) ... 2* .. 2

I,'

12415
12420
12425
12026

L N 0"-4 t lNT"', f NPU , 2* 2.67-2 +"2

12'1I

I,'

12411
12436
Il.41
12402

-2)01
-0000
-3413
I
5 •
-218)
-2381
-3461
I

ASSEMBLE IN5 IRUC T 1 ON

INST_N ro
10
AM
IfM
TO
TO
81M
I.
TR
CF

•• 2),AOOCOW
e+Z::J,AJUST

AOOeO_"IO
llNPA T-I ,001 NS r
Z£PO,INraUF
LEPOol,INUUFol
Stu. . . . 12

lE Pcol,tlEA ER. 41
lEPoo"AOORS-4
1EP002

~Nf

.+2~.RLDCSw

SF

LEPO
INPI1+ 19,1 NPUT+21
SCAN,'.12
LEPo07,ADO.S-4
tEPO+?

fa
8TM
TR
tF
8NF
SF

.024,UI)'S~

UPOOI
SU I~£ Q-1OI00IFIUS
•
OptDDE 1FIO! MVflOODo"IEPO.6
,lNTBUFtI
"101 ,H_MODoII
t" _ _ oll,1
AIOI
ACol
CM_""Ooll,IIHaUFol
tIOI
YYPlflS
IE
IO!VEMOO.6, I
AM
,"11100 8NF AOOI
,t~KIOIOOOII,1I
IOIYflOOD TO
tF
12140
MV&MOOo', "

uno

VEkSIUN 2

15',

12444
1245b
12468
12480
12492
IHC.
IHlb
12518
12540
12552
12564
12516
12S18
12600
12612
1262'
126)6
12.48

25
2S
II
16
2S
25
11
H

44

124.7
12419
02618
09261
OHOO
OHOI
060 ••
02302
02302
02302
12588
OHOO
02112
060.,
0"01
02301
12660

J2

02~01

00000
02814
J2612
03516
00000
01950
00000

12660
12612
1261.
1269.
12101
12120
U112
1Z144
12156

12150
12143
1210U
14 12143
U
12176
II 12150
12....
15· 00000
u 1215-

-2306
-1629
-0001
-3615
01200
-0001
00000
121'l
00000

]I

II
44

II

11
If
)I
)3

16
I'
II

...

02618

onn
000-0
JOOaa
0)628
03629
J2528
02762
0)516
00000

onso

25

12150
IJlbO
12110
12110
12190
12200
12210
12220
12210
12240
12250
12260
12210
12280
12190
12100
12110
12320
12))0
12140
Ill50
Ill60
12310
12310
12390
12400
12410
12420
12410
12440
12ltIJO

I'PI~S

Ib2C-14H _CNI lOR

.,
TF

AOO I
'OURS.lDOtO.

C

tINP~I+
__ 81 Ib.882

••

Ao(')~a ...

VIRSION 2

SPS II-t PMASf •

11

12'88

~NI

lOOtO~.IO.IO

SM
81
("_81

FL lCG_

c.

8NE
S.

, INP~TtI4.42!1.1
HlGGR
lOOtO~.s

81

FL ACGR

•
•

·

Sf( I"

SET HAG IF
IC
C"
8NE
C
HI
SF
81

12~10

12S80
12590
12600
12610
12b20 C"AR
U630
12640 IUI ..
JU. .
JUU

n

VERSION 2
14190
1"00
14010
14420
14010

OG"

I"~O

OAe

onc
RSTR
SAvE
OMES

I"~O

"AC2
•
1 . . 7Q F2
1. . 80
14HO
14t~bO

IHOO SUS2

Gf T 1 ,OG~F
GfTT,QVlCF
GfTJ,ASTRF
GE TT. SAvEF
GET' ,O~ESF
GETT,OACF
GAl."AtR1
LOAD PHASE Rl 10 IHE FILE
3"4
)l.ti2.101

1.880

1'891

0'"
MN

SlJ82,702

'RA

ceA

PAGE

SPS 11-( 'HASE B

B TM
5 Till
!H""
B '"
B TJIIl
OH!!

,Q.830Ao,B3SCr,O)".o

11

09166

-9"60

11

091b.

,..Qb16

Oq 166
0916b

J0212
J05 I a
J 11 96
JZ9S0

I4qO~

If

14~

Ib
1.9<8
IH.O
149S2

11
17
17
11

14qH
IH16
1498ti
150tO
15012

)It

H
16
.9

rco

82 •• "

PH.,SE B

A~O

PRI~f

82

,CtS60

DSC

2.0'

06268

OSA

PGARt:A

06111t

14~80
14~90

1....

PAGE

CC~S"NT

OAC
OO,PAGf
PAGE
I

o·

DC
'ACE

Jij'
TO

1~600

TO

1~610

TO
Bo

14610

eo

PGCQN+I0,PG"'-UIII-Z
ONE ,PGNUM-l

li1tb40

87

"'40NLJiII.
PGc..ON+9,7

146~0

O~E

14660 Iwo
1'670 NONU"
1~680

,olD_

8

PRINT INOICATI(N ANO PAGE NU"SER
PGCON+14,PGNUM"
PGCON+12,PGNU_-l

1~6l0

PAGE NU-BE R

)4

peCON·1I,7
,OQ11"

SOIP 10 I I~~EOIAH
DOUBLE SPACE .,FlEA PRINT
10 IORT-PRINT PAGE

34

10962, ,

1~690

TFJIIII

IORT, •• 21 ..

I)

1'710

AM

IOPT,PAGEP-4,7"
PGfIIl,/II,OI,lO,.

APO I JO PAGE NUfIIBE'R

lit 120

TFfi!

CFFA,RENU"

RESTORE

I'JJO
1.140 'ENU

BT"

CFF .PUNCH I..

RE Su"E OUTPUT ROUT I.NE

nOA

tl,M70AD,(}7SCT,81.'Ott,

1<0150

lH.219-C4-60BS
DC
1t •

I' 760
14770 F7
147S0
IH90

LOAD "fADING
14
SLee,'70t
38
$(,80.702
'RA

14S00 suee

DOA
tl,880AO,B1SCT,e}tlIlAD."
IJ7001-04-6088
ICO F 7

06182

PHASE 8 PARTIAL

DCA CCA RESTORE P~'SE

B PARTI.l

5 •

06274
06217
Ob276
06290
0610]
Oblltt
06llb
Obll8
06HO
061Sa
06110

'..,U,PGNUN-l

IHCO

14SI0

oe701
00702
00.500
<;.0000

OvERflew

HEAUfA INFOR!",ATIOfli

1"'SSO PGCO'"

14S7Q PAGEP

J27~.

ISO 12
1S012
00000
00000

F2

1411)20 •••••••••••
PAGE HEADI"If, REC.ORD
14tS10
omrG tilMAO."
'4540 PGAAEA CAS

091U
090111

I'

OJQCOO-6Q-910Q

IHIO

0~166

-60a9
1
2~

H
25
It]

41
.9
15
I~

H

0.261
00165
06263
0634.
0.lS8
06110
06202
06264

toeoo

)It

00000

Ob19~

1b

06ltC6

' .. ~

06'IS
06430
0... "

II
1.
11

00S6S
OOSH
02.'7
02629
02592
14

06454

02647
02.'.6
Ol64S
e2M 5

OZ.4.
00007
oe007
00971
00'.2
-641 7
-.270
OQO-I
-6ltSIt

JZI8a

061t66
PHAS~

10 OISO STORAGE
06410
06482
OfJ4Qlt

065C6
0651S

LOAD

.q'"
36
)6

O.S 18
06S1a
00000
OOCOO
I'

C070.!
00102
OOSOO
CCOOO

Ob410

I ;) ~J

10"0-I44l .0NllaR I
14820

vERSION 2,

PAGE

SPS lITe PHAse S
P9Z66

OORG LINPR'

14830 •

EVALLAlf LENGTH OF OSS

148ltO •

l"EsSO •
14660 OSS'
14870
14880
14a90
14900
14910
14920
1'~lO

14940
l"'flSO

14960
14910 •

STM
TF
T~

8'"

09266
092tiO
09292
OHO.
OHI6
0912.

SCAN, •• t2
lNTH,AQORS
INPLT+lt),INPl,JT+21
SCAN,e.ll

BNF

•• Z4,BSW

TFM

ADORS t

M
SF
TR

UHH,AODRS
95
INPUT. 19, I N!"UT+21

•

IHM
tJNF

SCAN, •• ll
AS tNE .8SW

O~HO

091SZ
09)6'
09176
09US

II
26
31
11

000"
02187
02B 12
060.0

"92aO
01520
e2814
-931.

,It

01} ~ItO

16
2l
)2
II
I!

OH20
OBS7
0009S
02S12
0604.

itft

QQ41b

01520
00000
02814
-HU
09048

0<1048

-coo I

AOORfSS ASSIGNEO BY PROCESSOR

14980 •
149QO

•

15000
I ~D I 0
I ~020

lNltl,AOOCO'"

094CO

Zl

fF

AOORS,L~TH

09~12

2b

A

AOOCOW, C;q

0941.

21

0<3S7
OlS"O
02678

02678
02387
Ot099

26
17

021a 7
09210

00099

..
11
25

02387

-COOl

060~6

-9.a~

0.033

H

095H

11
2.

02678
On20

07950
09048
-0001

IS

0~03l

26
26

03,Qq

1 SO)O •

15040 •
15050 •
IS060 ASINE
I S070
1 -;080 •
1 sOCIa •
1 ~1 00 •
151100CMF
15120
1~1l0

15140
151~0

15160
15170
ISl80
15190
IS200
15210
1~220

15230
15HO
15250
15260
15210
15210
15290
15300
15110
15320
15130

30

ADDRESS ASSIGNED tiY PROGRAMMER
TF

lNTr"qq

STM

GEET,OOOSF

JH24

OEF It;E FILE GROUP "ARK
09~60

TFM
8T'"

lNTH,l
SCAN,."ll

TO
8NF

KLRlS.W,RlOCSW
••• 8,8SW

A,..

IF
TOfill
fF

IF

AM
TO
TO'"
8T"

09472
09 •• '
09496
0950a
0.520
09532
0954.
09556
09568
09580

AOOeOIll,l
AOO~S, AOOCOW
KLRLSIII,l,ll
FRSTAO
,.OORS
l S TAD ,AODR S
LSTAQ .1,710
O~

f+2, SPSG~
DUMPl.ll.l,ll

09592
0'60~

GEET,PtONF

•
•
OEF I NE VAR I ABlE lENG'H ADDRESS CONS UNT
•
8TM
SCAN, .-+'12
OVlCF
TO
KlRl~ .... RlOe sw
IF
OVAOSF+I1, AOORS
SF
OV$w2
CF
OVSwl
8N'F

OVASGN SF

0961.

09Ua
09640
09652
09664
09676

•• 36,e:SW

MACHINE A$5IGNS ADDRESS

OVSkl..-..

15340

TOM

KLRlSW.l,ll

15350

TR

INP~T+19.

15360

Bf~

SCA~~

'.12

15370

fF

l~TH.,

Ar,Ofi:S.

INPUT+21

16H

0961.
09700
09112

11
25
15
11

Il
25
Z.
J2
13
H
12

15
31

09724

17

09136

Zt

03909
0390.
02220
03541
09210

060'(0
o~on

10141
10011
10036
01l1U
10016
040n
0,Z11l
06046

Dun

0261_
OOOOJ
01520
03520
-00-1

02560
OOOOJ
J4760

..,9618
07950

035Z0
00000
00000
0904_
00000
OOOOJ

0211.

-'116
0:t5Z0

n

VERSION 1
IBID

lR

I~HO

IFM
CM

ISOOO OVlP
ISOIO
IS020
I ~'lO

PAGE

IPS II-C .P"'SE 8
09108
091b0
OQ172
09184
09196
uq808
tQ820

CloT I ClEAER.+l
DvlA.+b, OUY+2

lNI". OC050

B~P

•• ~t!

~M

5

lNTi'1.ttO.10
AOORS. lNTN

1~440

IFM

l~,,,,

1~4S0

H~f

B~F.

"H I I2, DV~~2
")6. OVSWL

OQa.3Z

I SOoO
1~410

IF

098~6

IHIO
IHQO

A

OVAOMF + II.AOOCOIo
OVAOSf+ll. lNTH
lSlAD • OVAOSF+II

I~~OO

5
AM
Cf
IP
HM
5
IF

IF

I~HO

I SS20
I~HO

I

~~40

I ~~S0
ISSoO
ISS 10
IH.O
ISoOO

IS"O
ISUO OVSF
15680 OVTR
IS6QO CV'C

0, S_2
IEPD. <;lERfR+2
DV!:.F'b,
O\iSF'b,

CQ~52

D~!\Oql,

0~964

'OORS
INPlT'lQ. INPUh21
SCAN, '.l2
AODRS-"
lEPQ.I)O. AIJO~S

09916
0~98ti

\I
.~

IOO~2

0281J

09

1011b
C2el2
06046
02181
C9112

028\0
JOl16
03520

H
12
22
10

.

00
26
21
26
22
II

n

11
16
22
26
11
11

~CCO

II

10012
10020
IC036

20

.-I,OVSF+e.,lll

IC04~

A"

OVTR+6,

10060
10012
IOC80
10092
1010.
10116
10128
Ie 136

R~R

U1

1~110

IHIO
IHQO
ISIOO
ISILO
IS8Z0
I So 10

RNF

oecco

IR
RI"

SCAN, '.12

A

lNT~t

8'
IF"

OVL p
ACORS,

A

lSTAO • tNh1
•• 21t. DVSWI
ACOCOW, lNTH
lEPG+', OUl+2

1~840

CVS .. I

UTo
OS

1~850

0~S"2

85

1~800

PST"

IU
10
AM
IF
TF

lNPlT.lq,

TR
B I.

AODAS

coooo

10"~

1016e
Itlll
ICU'
1019 ..
102eB
le120
le030
10031
10232
le2"
IC256
10168
IC2be
10292
103e,
1011 ..
1012b
1034C
IOH2
10164
10H"

FM.STAQ.UHH
GfE T ,DOtUNF

O,SF
, OvSF+l
•• 23,AOO(0"" , AUJUS I
·.2J,AJUS,T, •
LOCAIIO~

Acacm", t 10.

CC~'fER

TEtoIP,ADOCO.
FR;STAQ

,AOutaw

ADeco •• 21,t ,",PDATE lOC COl.NTtA BY JIIIACRQ EXPA"'SIC"
lSfAO .AOOC.O~
lEPC,ASIN" MUVE EXPANSION tNTC .OAK RU':F[t<
SCAN,.·.12 .. FINU NU".EAIC E'lJIV OF 1ST OPEPANO
•• 2"- ,f\S\oi

IF

1~91U

INPt,.I'21

HSlAo.uun

A"

1'900
15950

I

'.20. INPUT'20
OYAOSf

A
TP
TF
5

159CO
15910
I S~2U

lEPO'Sl
AOORS

I~

lEPQ'I)O-q
ceCCO •• 2

ISHO
IH20
IS1l0
IHOO
ISHO
I ~100 CV'CKF

I~nu

09868
09AIO
09892
OQ9C4
C9916
OQ926
09900

10

Cf
TF
CF
SF
TR

1~100

15810
lSUO

09.04

lSTAO • lNTH
L S TAD • L

I.
ft T"

1~6S0

•. IjO

02211
10050
OlJ81
OQ812
02181
01520
02181
04921
09180
10.-1
10147
0]909
01909
01909
10031
02100
100'2
10042
10011
02812
0 .. 046
0]510
023'0
02141
-CCOO
-0000
10050

]I

8NF

1~960

IFM

ADURS,80

15910
IS980

eF
IR

AOURS-" •• ,MOVE

1ST

lEPO+2,ADOAS-4t ..

OPER'~O

INTO fIIIaCRO eXPO\NSION.

II

11
11

11

11
21

4_

16
21

~1520

II

0]909
10\84
02618
OHOI
0)899
03899
09210

2~

IOl~5

2'

10261
02618
02118

4.

21
31
26
22

02120
-2220
-OO~O

a liDO

OOONO
02387
-OOSO

10017
1001.
02618
02387
10\41
02387
-0001
00000
02121
-2HI
01~20

OlS20
02 . . .
JCOOO
00000
03S20
00000
COOOO
10Qu

-ccoo

-COOO
02381
10036
C2387
02220
0)909
02381
J4116

C

o
\I

26
26

018~9

II

02b1S

26

.

OHOQ

11

02300
06046
1036'

11

10

0)~20

11

OHI6
02102

11

02618
0239~

000-0
02618
02618
-Cull
02611
IC,,,
J0340
09008
-0080
00000
03516

161
l020-1"3 .CNI lOR I

veRSIUN 2

SPS II-C

PAGE

P~ASf

IS99a
fR
INPLf'lQdNPur+21., (Ie AND G€T
6T. StAN'.'ll .. NU.ERIC EQUIVAlEN1 OF NEXT CPERANO
10000
IF
lEPO+I\.AOORS .. INfO "ACRO E.PANSION
16010
CF
lEPO.1
1.0lO
ONF •• 2lt,RLUC.SW
Ib021
SF
lE~O+1
10025
TF
AODRS.Te:MP
16030
HIM GEET.lINP
16000
160S0 • MACRO EXPANSION FOllO.S
IR
0.0
16060 RSI~
TOJ'll
100.0
16010
CC
1,'
16080
16090 S'VEf.
16100
16110
16120
16130
16\40
16150
16160
16110
16110
16190
16193
161 CiS

16200
1f>210
16220
16230
16200
16250
16260
\6210

10
TO

.'23,AooeoW,.

A"

400(UIII •• 10.

·'23,AJUST,.,

TF
TF

If
lR
6T"
eF.
TR
6NF
SF
IR
8TM
eNF

IF.
If

"

1054 ..
10558
10510
10512
10~90

10606
10618
10630
106.2
10654
10666
10678
10690
10102
1011'
10126
10738
10149

SCAN, •• 12" N'UJIIIFRIC eQUIVALENt OF NEXT CPERANO
•• Z4.f'SW
'AOORS .80
l~PO+23.AOORS .. OPERAND INTO "ACRO EXPANSION
lEPO+19
UPO+11.0 .. MOVE RECORU MARK IN E.PANSICN

1,' ,.

10774
10116
10798
10810

~ ~UaROUTl"E

IU60 ANAL
10170
16 no

10190
16400
16410
16420 ,"Ull
164)0
1644Q
164S0
16460
16470 ANAll

3\
11
26

H

32
26
11

2~

2S
11
2.
20
II
26
11

.
11

13

11

32
3\
11

0 ..

10
26
13
IS

TO PROCESS CONTROL CHARACtER PH'
CM
INPUT+2~.4.10. 1ST CHECK IF U. "UN. IS PRESENT
.NE .,ANAL4 ... NO LEFT PAREN •• EUOR
TI', ,ANALI+11.INPUT+22 .. IIOVE CHAIl TO ANOTHER (OtATlON
TR
INPUT+19.INPUT+2J •• POnHON INPUT RECORD
TfM . . H.CCHAIt .. IEGIN CHECKING CONUOL CHAR. 1ST i.NtTlfI~UE
C
ANAlI-l1...
ADDRESSES. CHECK CHAUCTEAS
SE
ANAlZ .. 10. CHAUC TEA FOUND
CM
ANAlI-I.ctHAR-H .. SEE IF SUACH.. IS FINISHED
Sf
ANAl~...
YES. Ne CONUOL CHARACTEA fOUND
SII
ANAlI-I.JdO. NOT FINISHED. liDO". AODAUS
ANAlI-IZ ... lUNCH lACK TO CONTINUE SEUCH
•
Tf
ANlIC+l1.ANALI-I .. 'AIPARE TO "aVE CONUOL tHARACTU

I&?

lOI12
10824
IOU6
10lU
101.0
10112
10 . . .

10. .6
10.01
10'10
lO.U
10944

02812
060"'6

02111
02307
10460
0230 I
03S20
09210

02814
J04l2
03S20
OCOOO

01950
00000
02718
J4112

00000
00100
I

00000

10SH
10545
02018
02118

02611
02]99
000-0
02018
02018
-DOH
02618
101H

018~9

02018
03909
02300
06046
03SIb
0231'
10660
02)12
02812
00046
10114
03520
02323
02H9
02311

OCOOO

JOOl8
OCOOO

03S16
019S0
00000
02814
JO.90

09048
~0080

03Sl0
00000
00000

I

O]S41

10150
10162

TOM OUIIIPl+ll,l.ll
16280
16290
"
RS IN-20
16100 • ".OCRO EXPANS ION FOLLO .. S
16110 SlVIN 10" Ice.o
TR
16120
'10M 100
16130
DC
1,'
16140

uno

3\

l04Q6

10~14

ZEPO+ 12
INPL1+19.INPUT+21 •• GO + GET

ac

10080

10510
10522

ADJUST
LOtAllON
COLNfER

.+,llt,A,LOCS,W

CF
TOM

.0

105CB

IE"P.AODCO.
FR.S lAO .AOUCO ..
AOOCO ... 1S •• U~OATE COUNTER BV .'CRO EXPANSION
l S fAD .AOOCO.
IEPO. SAYI NO. MOVE .ACRO EXPANSION INTO .. ORK SUFFER
SCAN.0+12 .. flNU NU~ERIC EQUIV OF 1ST OPERAND
AD'OR S-:"',.,. JIIIQve 1 S T
lEPO+H.ADDRS-4 .. OPEUNO I.~TC ~ACRO E'PANSIC~

A.

IC18B
10000
10'12
IC024
IOH6
10448
IC400
10412

10000
IS
3\
15

cOlao
COOOO

00100
I

t.

02111

...

10 . .'

2.

47·

Jl
16

,.

I'

12

•••
26

tlon

02112

10• . ,
10. .'
10944
lOin
11072
lOin
10172
1100)

OOOOJ
00000
CCCOO

00000
00000

000-4
01200.
0211'
02816
Jlt94
00000
012-0
JIt 70
01200
000-)
OCOOO
lOin

u

IbIC-I"l
Ib4tQU

••

16~CO

S.

IbUO
16~10

A~lIC

Ib~20

A~l18

2

SPS 11-0 PHASE B

PAGE

.PUl41,"''''OAl."

IF

"IB.DIGITS .. PREPlRE TO CLEAR LCCAlIC~ PREVIOUSLV SEI wITH 7
" t ClEAIt lOCATlCN
OIGITSololO. SEI
IN NEXT LOCAIION
•• 18.0IGI TS

~D

IbSSO
IUbO ANAll
IbHO
IbS80 ANAL"

Bl
00

Ib~90

VERSIO~

o

TO
C.
OE

A~lIA

16~'0

1

SO

TF

IbSlO

OO~ITOR

DIGI1Solol0. SET AOORESS TO .OVE
•• ;Q.DIGITS"
DIGI' IN'C OLlTPLl 81JFfE-A:
.'
10'68
10910
10"2

11060
11072
IIOU
110"
IIIOB
11120
Illll
lI .. l

.3
26
I~

II
26
IS

11'12

10812
11028
I

1114'
1115.
IIlbB

000-1
09012
000-2
00000
000N4
01200
09061
0'061
00000
09061
0.012
00000
000-1
09012
00000
00000
COOOO

I

IObBO

DC

11110

,1
lbbQO

r;sc

Ibl00

DC
M3

l.

~

11111

3

Ib710

OSC

2.'l

IIID

1,4

1111.

2,42

1111.

4
1~720

DC

M2
OSC
5
DC

167)0

10140

1"

Illn

2.41

1111.

-I

161S0

e

DSC

I.

DC

2.sr;

a

lblf;10

,q

Ib77Q

OSC

16180

CC
02

IliaD
11182

1,7

III H)

2,b2

III e~

1

161qQ

:'SC

Ib800

lb820

CC
OJ
DSC
2
r:C

l,tl

Ilieb

2.6 J

III BII

1.2

IIIH'

1b830

"'

OSC

1.9

1b8lta CCHAR

"CC

2."t;

b

10810

2.54

"b

PAGE
IbBSO • PROGRA. 10 PROCESS OMES. PHASE~
Ib860 O"E5F 8TM SC.AN ••• 12 . . E·VAlUATE ADDRESS OPERAM) TO FI .... U NUfiI'. VALUE:
Ib810
TOM DMfS ..... ll.SET s.. nCH TO REPUtE - "ITH
Ib880
TO. S.ODE ... RE SE T STAM TI ~G "ODE S.ITCH
loe90
TFt
OLT,ClERER"
CLEAR
IbqeO
TR
our.SO,CLERER+l"
OUTPUT 8UFFEI\I:
IbqlO
TFM DIGlTs.aUhl .. INITIALIZE
lono
BNR
.+2".INPUT+20 .. CHECK T~ SEE OF BREAKER A R"
B
DMSER I
10930
Ibq,o
TF\fIo1 MOUE1+6.DMeso .. Fl~O STARTING ,",00£
Ib9S0
8TM
""00£, •• 12
I b9bO
BNF D.ESA.8S .... ALPHA CHAR. IN FiElD. ASSUME AlP.HA HOCE. ~HECK
IbHO
TOM
KlRlS"'tltll
Ib9BO
TO
•• l3.ADDCo .... To see IF ACDRESS CP PflGiU""EA OR 'ftCeES$OR
IbQQO
TO
.. n.JST8L .. ASSIGNED
PROCESSOR IF NO BRA~CH FRO. PREV INST.
1100U
AM
ADDCO .... IO.AOJUS! LOCATION CO~NTER
11010
TF
ADDRS.ADDCO .... SET ADDResS OF MESSAGE TO 2ND DIGIT
11020
s. ADDCO".Z .. O. SET lOC COUNTER TO LOC B;;FORE MESSAGE
11030 OMfSA
TF"
MODE1+b t OMES8"
seARCH FOR cmu",
8T'" .ODh.ODE..
ENDING FlflO
110'0
11050 D"ESa
TOM N.oAL...
SEI SWITCH FOA ALPHA FIElC.
OPE liND
11060 O.SBI 8TM DTR .DMESC .. SCAN MOSAGE
11010
AM
DtGITStl.10.
110eo
TF
•• 18.0IGITS" PREP'RE TC MovE IN 0
TR
.DMS82-2
11090
AH
DIGITS.2.IC. LEFT PA~EN UPDATE DIGIT COUNI BV TW.O
11100
111 10
TF
"le.DIGITS .. AUC" FOR CONTROL CHAR IN OUT Put8UFFER
TO •
••• INSERT EVERYTHING EXCEPT FINAL ceNTACL DIGIT
11120
esc 2.',.-2
11130
O·
111'0 OMsa2 DSC

1l19.
11208
11220
112J2
liZ"
1125b
112b8
112HO
11202

11
IS
15

H
l\
16
45

0604.
018Bl
0906Z
OlllB

onbS

11316
11328
11340
113SZ
I \).~
11116
Illea
II'CO
1 .. 12

H

09012
1129Z
12.96
12610
12616
11400

15

0~033

IIH~

15

Ihl6
IIH8

IIH4

11
II
26
H
II

11~9b

26

11508
11511

15

IllO~

11~60
1I~1l

H

Ib
17

z;
H
II
26
12
Ib

11

lIlb)

11315
02618
03520
02678
12610
12616
09061
12130
09012
1I~78

00000
09012
11514
00000

JI208
OOOOJ
00000
0211'
02120
-12lq
02811
00000
Jlb20
Jillb
0'048
OOOOJ
0261e
02Hq
000-0
02618
000-2
JI'2'
J2610
00000
JI54J
000-1
o'on
UHl
000-2
09012
00000

2

11519

1

11150
11160
11110
11180
111 qo
11200
11210
11220
17230
11240
17250
11160
17210
11280
11290
11100
11310
11320

11])0
In~o

n350
11360
17310

BNF

a
OMESC

ANAL,APIIAl" STRAY

ANAllt,.,

ST~AY

PARE~

NOT FOUND

IF 8P.fItICM

P'REN

OORG ·-l
AM
DIGITS.2ol0. UPDATf DIGIT taUNT BY 2
IF
.oI8.DIGITS •• AlLc .. FOR CHA.AC,ER IN OUTPUT BUFFER
TF
oINPUT+20..
"aVE CHAUCTER FRO~ IhPUT TO OUTPUT 8UH
SM
.-601010. SET UP ADDRESSES TOtLEA. FLAG
fF
•• 18, ..... 18,. + elE'"
CF
B
OHS8 I ... CONTI ~Uf SCAN
OORG .- 3
BNF OMESI.8SW •• IS IT A PROGRAMMEA SPECIFIEr ADDRESS
IF
AODRS.ROOCO .... NO. HOVE LOC. COUNtER INTO ADDRESS LOCo

...

OMESO

AM

O"ESI
TOM
O"SN"I TO"
D"SNUM 8 T"

A"

TF
fOM
OSC
aNF

8

AOORS, 1,10

S"oOf.I.IO. SET SWIICH FOR NU" STAATING MODE
NMoALoloiO. SET SWitCH FOR HU.ERIC HOOE
DT',O"ESll .. SCAN MESSAGE OPERAND
QIGITStltlO. LEFT PUEN FOUND. UPDATE DIGIT COUNT IV 2
• '18'0IGITS .. AllOW FOA CONT.ROL CHAR. IN OUTPUT 8UFFER

,t,

1,' ,.

_ove

TO

BUFFER

llS20

~~

115)2

4'

10812
11012

10812
00000

II

0~012

Zb
26

1IS10
00000
11510
1160.
00000
114)6

000-2
0'012
028\ I
000-1
\1510
00000
00000

11540
IIHO
\l5S2
IISb.
11516
\1588
11600
11612
11620

12

ZI>
])
~q

IIb20

H

11632
II"~
11656
n66'
116'0

26

116'2
1110•

II
Z6

09012

11716

15

00000

IIUB
111.0

••
••

10.112
11072

II
IS
IS
11

11127

ANAL.ANAl •• STRAV PAREN NOT FOUND IF BUNCH
'N'L~"t' STRAY P'~£N

I6"

1165'
03520
0)520
09062
09061

Uno
11112

090~8

02611
000-1
OOO~I

000-1
ll1H
000-1
09012
OCOOO

I
10lU
00000

15

sP~

YER~IC"

1610-1041 00 .. 1 TOA I

II-C PHASf I
IU4.
11148
11760
IIH2
11784
11196
11101
11820
11112
11844
11156
11168
11110
11192
1Igeo
11'100
1\9\2
11"14
11916
11'148
1\960
11'112
11980
IIn2
120e4
12016
IZ028

InlO
'OO~G
171'0 O"tSlI e"
IJ400
8H
e.
11410
8H
17410
174)0
CM
IJ.40
BL
IJUO
CM
8H
IJUO
IJ4JO
~F
IJ410 0"~1l A"
TF
114.0
Inoo
TO
Inlo
8
OOAe
11510
UUO DIISEAl 81"
In40 OIOUZ TF
In50
~
TF ..
In60
R.. F
175'0
A
InlO
I/no
a1
IUOO C"H21 A
SOl
17610
80
11620
SIO
IJUO
1"40 0"ESZ2 TO
Ie
IJUO
80
IJ. . O
IJUO
A"
IF
116111
TOIO
17"0
IHOO
B
nURG
11110
r.C
IH10

'-1
I,,PLhZO,79010. CHECK Ie SEE IF CHAR IS """ERIC
OIOSEAZ", NOT Nu.ERIC, EAAOA

2.-C,·-1

\2052
120"
12076
IlO8M
Illee
12112
IlI08

11110

],Z',.

\2111

OLI.IOO., PcT I" NU.ERIC

121\2
12121

15

eZ11I
I

acaDo

121Z4
121n

I~

02119
I

COOOO

12\16
12148
11160
12172
Illll

49
\6
U

12196
021\9
CZ316
Olll7

00000
0-000
OOOOC
oenoo

12184

15

..

I~PUh20,69,10

OMS12 .. ,IIUIOUIC IF aU ..CH
IN'UT'20,SO,10,.CHEC' IF -OTHAU-9
DIOSEAZ", NON-"u.EAIC IF aAANCH
III'UhZO,59,10
UIOSEAZ,., .. OT NU.EAIC IF HRA"CH
1"'Uh20
OIGITS,I,IO, UPOATE DIGIT COU~T aT O~E
"1I,OIGITS" AUCII FOR OIGI T
,1"'UhlO"
MOVE OIGI T TO OUT PUT RUFFEA
O"S .. UM", 8RA ..CH aAC. TO CONTI"UE SCAN
'-1
UMSR1,O"S"UM" 'LT £ .. U OF MESSAGE I~ CUIPUT aUFFE_
. . 1\.OIGITS" NUMERIC TO ALFA 1000£ CHANGE,
"21.0U7+I .. SEE IF ALPHA SUATS I" EVEN LOCATIC~
O"S~ .. , 1"11. SAVE LaC wi TH DIGIT CCUNT
OMB21.RSW" SEE IF THUE IS A PROG. . . . ER SPEC ADDRESS
O"SV.AOOCOW .. NO, ADD LDC COUNTER FOR LaC OF LAST DIGIT
O"ESZZ
D"S~.ADORS"ADO PRCG AODAESS FCR LOC CF LAST CIGIT
UMSV.I.IO. ADJUST FOR .. U"E.IC STARTI"G .OOE
'.24,5MOOE" CHEC' STARTING MOCE
DMS~.I.IO, ADJUSI FDA ALPHA STARTING I00CE
•• 2hDMSV .. SEE IF CHAA wiLL SUAT I~ EYEN LOC
EYOOO. "EVODO
OlOEsa,EvonU.I .. wiLL STAAT IN EYE" LOCATIC ..
OIGITSoIoIC, I"SERT
·.18.D1GI1S.,·,.11
OMBO

DC.

"I

-Z'
IJ140 O"'RIN TO"

1,.,"0

OC

1,',-

17760
11170

10"
CC

UU.IOI."
1.' ,.

E~D

OF .ESSAGE

IH80
a
17790 OllERIA IFII
11100
CF
11110
roM
17UO
CC

O"E R IC
OCT.IOI •• 8, CLEAR LASI FOUR
OLh9a

17810

O~"IOI
t-

178~0

TnM

·
Ot

11no OlOf'le IF"
17860
K
17810 OlOsrOiC CM

OI~ITS

FCM

E~O

OF MESSAGE

1,' ,e
I,'

CI~ITSolOO

•

0211]
11900
0211]
1\856
OZII]
11900
0211]
1\900
02111
09072

III . .
00000
11610
12514
\1941
11941
09061
11'180
09061
Il021
09067
09067
12021
09061
12051
02410
\14Z4
09072
120.4
00000
11424

120~0

I~

.. SET DIGII

ql~NIfR

121'16
122C8

I t 100

·~6

12220

IF OPEflANC PRESHH

CHECk

J1610
09012
-2219
-0000
0'104'
02678
035Z0
000-1
09062
OCO-I
0.067
024"
02410
000-1
09072
0000OCOOO

I

121q~

Olr>lrS.OUT.t"

000P9
0\100
00009
0\100
OOONO
OUOO
000 ...
0\100
00000
000-1
09012
02811
OCOOO

02319
I

00000

e9"2
12104
09072

-0100
00000
-2219

165
162e-I04l
\1880
11890
Inoo
11910

o.. e

~CNI

TCR I

VERSIU~

2

SP~

11-[ PHASE

PAG~

80
IFM
OC

. . te ... E.RAOA IF .. 0 ~eSSAGE OPEAANC PRESENI
DMSERI,SMOUE .. CHECK ~ODE
OUT.~,,,
MOYE I~ ALPHA ENO OF "ESSAGE
2.' ,--2

12256
1226\

11920

CSt

2,',.-1

12266

11~30

CF
TF"
SM
IF
AM

OU.Z
OIGIIS.OUhIOI
DluITS,OUhl .. SUBTAACT SURIING LOCAl ION OF OlP 8UFFER
UIAO ,01GI IS. ,,,"OVE OIGII COU .. T FOR OUTPUT
L S lAO 01 01 0, ADO I FaA AT LDC • I
D"END I.asw" CHeCK FOR PAO~RA •• ER SPfC IF lEO ADDRESS

12268
Il28C
122'12
IBC4
12116
IB2B
\2140
12152

12212
1224~

41
41
16

l2292
12496

02221

01200
0'1062
-COOO

2

0'

17940
11"'0
11960
11970
11910
11990
180CO

\Halo

~"F

LS1AD

A

ADUCOW.DIGITS" UPOAH LOC COUNTER 10 LAST OIGII OF CCNs"IIT
DMEIIDZ
LSlAD .ADDRs,,· INITIAUZE LEFT MOST IIITH PAOG SPEC ACCRESS
lSTAO 01.10, AOJUST FOR OIUllEAIC STARTING ~ODE
'.l~.sIIODE"
CHECK IF STUlIIIG "ODE AL'H
lSTAD .1,10. UES. AOJUST FUR ALPHA STA.TI"" MODE
FRS TAD ,lsTAD "FO •• LEFT "OST
FRSTAO .DIGITs" AUORESS
LOiTH,nIGITS" IIoiITIALIlE LE"~TH LOC
MF sour H.,. NPUT 2+5
ME SOUlt 11 ,OUlt2
GEeT.PeDNF
UMs.2.,OMs'IoiO.60" .. PUT E"U OF MESSAGe IN CUTPUT BUFFER
5
DIGlIs.l,IO
'.1I.0IGI TS
t't.
INSERT

n

1I0l0 DlOeOlO I A
18010
~M
UO~O

~O

11050
SIO
\8060 C"EIoiD2 TF
11070
5
\8010
TF
il090
IoiUP
18100
NOP
11110
nM
11120 DIIURI BYM
UIlO
OS
18140 OllSA2 AM
ul50
TF
\8160
TDIO
11110
DC

t.DOCOWt,FaR~

Ar

Loe.,

A

12]64

IB16
IBU
12~00
12~12

1242~

]]
16
12
Z6
\1
4~

II

21
4'
21
12

02220
09012
09012
01909
01909
12]16
01.09
01678
l2~Z4

01.09
0190.

4)

l2~Z4

IZ
Z6
Z2
Z6
41

01909
0,."
Ola99
02381
09116
091'1
09210
11514

CCCOO
-2119
-2219
09072
000-1
09048
02618
09072
00000
01'20
000-1
09062
000-1
01909
0.012
09012
03292
OU20
JH60
JZ280

1,' ,.

12416
12448
12460
12412
124,.
12496
12512
125\4
12526
12518
12549

11110
\81.0
11200
11210

AM
TF
TOM
DC

OIGITStl.I.O
. . \8,OIGITS
... I .. SUT
It' t-

1Z550
12562
12"4
Inu

II
26
15

0.012
IUIO
00000
I

000-1
09072
00000

IIUO
IIUO

TF

. . \8 .O"SR Z-I

8·

12586
125"
116C9

"
4'1

12604
00000

125\J
OCOOO

11140
11210

·

·

DC

3.-0'

De

5.0

I.

4\

ar

11

5

\1
U
IS

09012
12544
00000
I

000-1
09072
COOOO

1

IUI4

5

~OOCO

12 ...

n
IIiPloh19.IN,uT."" "aVE I NPI. T RECCRC LEFT I CHAR
III1R •• 24.III'UhZO".~0' IUNII. CHECK FOR All
8·
ON SEND."
CII
III'U.ZO.ZJoIO. SURCH FIELD. CIIEeK FOR COII.A
DE
".
CO ... A FOUND. IUIICH
CIO
IN'I.T.20" 10.
CO~"A IIOT FOUIIO. CHECK FDA IU".
I.
MODf.,.
IlANIl. CHECK NEIT tHARACTIA
. . ".IIOOE-I... AL'HA CHAR IN FIELD • • nu .... O. CMECK
"
I
•••
NflT CHAa. ACCORDING TO laANCH
• SU_IIUJlN! ·TO SHIfT 0111 CHAue TEa TO 'HI u n III IIiPUT 1U. . .a

bS

,

TR

11I,t.hl,.I ..'UT." •• IIOVE oliEUIiD UFT I CHAR. suaCII

11

OZl12

~,

lU56

U

"

olin
00000
olin
~.
12616
16 anal aun

...

12'~0

12611

12".
116 ••
Inoo
12112

uno

unl

\4
46
14

.,

00000

02111
00000
00011)
01200
DOo-O
OlzOO
00000

5

12ua

166

028\~

'26n

11

OllU

D21"

1620-144)

18)80
U).O
I . . CO
11410
18420
11410
IIHO
18450
"460
.. 410
1 . . 80
1 . . 90
18500
18510
18520
185)0
18540
18550
18560
18510
I85BO
185.0
11600
18610
1 . . 20
18610
18'00
18650
11660
18610
11610
18690
18100

TF

5M
tM
8N~

80
8
8NR
RT
CM
aNE
SF
80
81

CM
SNE
SB
TF
8
•
+
+
CAtF

.

B~

.

TFM
OAt

TFM
18110
fF.
18720 CAel
18nO
A
Ul.0 t~VIL 0 TR
18150
BNR
18760
87
BNR
18710
18780
R7
18790
CM
11800 STCHAR BNE
TO
18810
AM
18820
TFM
I B810
18140
DC
CM
BNE
TOM
TF
SM
TFM
oe

IB850
18860
IBB70
186BO
18890
18900
IB_IO

...

·.2~,

TOR I

• LEFT

STeHAI fR
TF
AM
TR
TFM
A

.

SM
CF
CM
8M
BNR

•

NOSINE TO
TO
AM
TF
A
51'
TF
BO
TF
81
CAe)
8TM
BO
TO
TF
TF
CAC.
SM
TF
A

80
TF
AM

(RCAC
CAtS

19360
19170
19110
19190
19400 ERCAt I
1.410
1.420
19430
19440
19450
1.460

TF
S
TF
TF
aTM
TFM
TFM
A
TFM
OAt
SI!
eNR
TOM
81
TFM
TF
SI!
TFM
AM
CM
8NE

5'5 11-0 PHAU •

PAGE

·.18,CfR,-l, ,

PIRE~

FOUND
NeT ... I, .OR EIRCR
RETURN

26

Il
14
41

.21.0 ·H
4.
45

il.02
12114
12126
111)4
U146
UI5.
uno
UU2
uno
l2.e2
12914

"

14
41
JZ
4)
4'
14
H
42

.,
16

090.,
090n
0.061
1l1l4
Ilill
121.1
12134
U220

0.072
-221'
OOJOO
01100
0.061
00000
021n

0211)

000-4
OIlOO
00000
0'061

12190
10lU
11692
11441
OllU
12926
00000
12.44
00000

II

ooou
01200
00000' .

1272.
oeooo

LENGTH OF Olt

• +20

DAL2.INPUT+22
ADDRS.D
eROAt I
INPLT+22

1.' ,e

I~PUT.20.2),lO
I~PU"lq

··23.TEIIIIPR
0~T+2

•• 2C.DUh)

EROAC+12
.'70,OUhlj

··3J
01..1·1),23.10

EROAC+12
ST(.toIAA. ... ll.OlJftl)
C~V'LO.ll. ]

C... VAllO'llt .610
1, I I_
01..1.1,34,10

.'bO
DUMP '+11,0 .11
•• 30,CHVALD'11

·'If!, 2 .10

., Ie

1,' ,.

167

O~

l211a

12.16

ADORS.51
EROlt
AOORS.AOORS
TEMPR .AOOR 5
•• 20,INPur+20

•• JI),

.IIH
1:154
LH . .

12938

StAN, •• t2

162C-".) .ONITOR
18920
189)0
IB900
, •• 50
18960
18910
18980
IB990
19000
19010
19020
19030
Iqo.o
1'050
IQ060
19070
1'080
IQ090
19100
IQIlO
19120
1'130
19140
IQl50
1'160
IQl10
1.110
1.1.0
19200
19210
192Z0
1.230
1.Z40
I.Z50
1.2.0
19210
1.280
19290
19300
19110
IU20
19UO
19140
19150

YERSION 2

•• ~or , LEFT PAREN

EYAL~ATE

8TM
CM
BNN
A
TF
8NR
81
8NR
eM

~OHI

GMSV.0IGIT5 •• C~'t. HU~.U UF 01101 T5
OMS-v.OUT.1
OMSV.IOO ••• tHEtK DIGIT tOUNT
'+)6 ... LESS THI .. LCO. OUY. UROR IF NO lUNCH
UMERIN.NMOAL .. TEST SWITCH FOR NU~ OR ALPHA. ~U" IF U
OMERIA ••• ALPHA IF BRAhCH FRIO HERE
• '20.INPUl+10·•• FOR RM
OMSENO
INPUTt20 ••• 10. tHEtK FOR STUY RT PUEN
••••••• NOT A 5TRAY PIREN IF BRINCH
'NAL ••• 5E T SWI TCH FOR sun PARH FCUNt
OM5NUM.12.NMOAL •• SCIHHING IN NUI'ERIC MOOE IF BUIoCH
.01'51 1·+ U ... SCANNING IN ILPHI MODE
INPU+20.Z.oIO. tHK FOR lEFT PUEN

YERSION 2

1l.50

11

12962
12914
U916
U.98
13010
13022
13030
13042
1)0'"
1)066
IIOH

14
46
21
2.
45
49
4'
I'

13011
13090
11102
11I1'
1312.
11I18
IlI'6
11U8
IJl66
I Jl78
IH.O
I32C2
11214
11225

16
16
21
1I
45

4'16

.-. 4~

I'
47
25
II
16

0281)
11125
13125
02120
1)146
1)1'0
11166
11l9C
02223
0150
IlI8'J
IH25
1l12N
I

13226
11218
13250
13262
IU1.
13286
13291

I'
47
15
26
12
16

11291
IBIO
13122
IB)4
111'6
1))'8
1))10
IB82
111'1'
1)406
11418

02220
26· In45
II I1H.
11 02812
16 Illl8
21
InlB
12 1))88
J)
00000
I' I)lIa
11110
U
45 11546

11410
13442
IH5 ..
13.66
11478
13490
U50Z
13514
1152.
13531
11546
13558
11§l0
11512
135 ••
11606
U611
uno
U6U
13654
13 . .6

H

02221
132.8
0)547
13292
11292
coooo
I

5PS II-C PHASE 8

OOOK]
-2812
02511
oeooo
02221
0222)
COCK)
01200
0222)
-0003
OCo-O
OOtLO
01200
0000IlI25
OCO-2
occ.-o

PAGE

T+2" NPUT+ 21

·'35,CH·"'LO'll
•• 23.1
INP~T+ Iq
•• 42.0UT.",.
• ,'30, TE'-PR
·,18,2.10

.-b,OUf'4
.- 36

OAt h 5 TCHAR+II
ADDRESS ASSIGNED 8Y PROCESSOR
·.23,100COIIII
··2].JSTBl
AOCCU",,10

AD DR S .AOOCO.
AOOCO •• TE "'R
AOOCO •• 2.10
Ltlrlft-t,ADOCOIII

•• 2"'. tNTBUFtS

AOORS.Aooeo.
Oat.
SCAN ••• 12

NOS INE .85.
KLRlSW.RLOCS.
LNT~.ADOR5

FRS TAO .IOORS
FRSTAD .1
lSTAO.FRSTAO
L 5 TAD • TEMPR
•• 72. tNTBUF+S

LSTAO .ADDRS
L SlAO ..
FRSTAO.LSTAD
FRS TAD • TEMPR
ADORS.LNTH
LNTM.TE.'R
GEE T.PCONF
TEMPR.IOO
H30.IN'UT+ZZ

unl

11690
Ul0Z
IHI4
13126
una
uno
unz
13114
Ill"

•• 18. TEMP"

1,' ,.

11

2~

II
26
ZI
12
Z6

"

26
49

IT
40]

n
Z6

26
12

26
II
41
26
II

Z6

22
Z6

,.
IT
16
16
II
16

CAt 5+6. 2.10

11116

12

C~VAlD-Z4.CAC5.6.11

13'"

45

13110

lS

UIZZ

.9
16

01,5·'.0,6
OAC5+ IZ
.+.,.IN'UT+12
NOSINE-31.lDCRS
N0511i£-31.2.10
,70,10

uno

UI42
Ins.

n ....

nlll
UltO

.--6.2 .. 10
NOS INE-l1
EROAr. L+ZO

06046 J29U
01520 -0051
u n l 01300
on20 0)520
02511 03520
n030 0281 )
noo,
1)090 02815
03520 -COOO
111)0 01100
01815 -0000
I •
2

I6S

U902

,.
II
t6
11
l'

"

0281'
13125
-0001
oeooo
-2222
02511
000-2
OCooo
-2222
01100
Illn

1l~51
0261&
13465 02.59
OZ618 000-0
03520 02671
02618 0251-1
OZUI 000-2
02381 02618
13511 01631
0)520 02618
13594
06046 J35$1
1)4)0 0.048
o.on 01950
OZ187 03520
OJI9. 03520.
OJ199 -0001
0390. 0)89'
03909 OZ511
un4 OJ6n
0)909 03520
0)909 -0001
OJ. .9 0390'
03199 025n·
0)520 OU87
oun 02511
09210 J4160
OZ511 -0100
UlIO -Z8U
11110 onn
00000 -0000
I K
2

U1l0
I J090

U1I13116

UIlZ
Inn
IU93
00000

unz

IU'U
UI'4

000-2
1311.00000

-2115

ouzo

00D-2
000'0
00D-2
-0000
01200.

)9

Ib20-1441.0NIIOR

1~4fO

IF
IF.
CAC

I~ •• O
lq~q:O

19~CO
I~~IO

.'U

19~20

I_HO

OSC
'9
OSA

19SiKeR BI

02678
02399
COo-o
02678
036)<
J4048
03520
079S0
00000
02678
02678
000 . .
000K3
OCOOO
OCOOO
\3950
03899
-4200
J4772

PAGE

Ica

os

•

11999
14011
02678
1)961
119b8
06046
11971
14084
1)961
03899
01909
01909
02678
1)9SZ
11964
02300
OlS20
04018
09210

SPS II-C PHASE B

1~920

LIN.C

00000

GENERAIIC~

SF

20000
20010
20020
2003e
20040
20050
20060·
20070
20080
20090
20100
20110
20120
20llu
201'0
20150
20160
2017U·
20180
20190
20200·

11872

,-COOOI

-OS6S
-0023
2

Il~74

I,'
liNKAGE

19660
19670

COA

26
16

11U2
oeooo
I

lOR I ,OOOH

19.~0

l.qlO SUB'

11914
I H26
I1H7
119~0

,OCCO(.)

40

PAG~

SPS II-t PHASE I

27
21

16
16
16
27
27
27
11
26
21
26

ZIt

11

1248.0
00000
00000
00000

02480
00102
00108
OCOOO

09267
12632
S
12444
12488
5
09267
09655
02387
12612
5
12'44
12548
5
02301
01899
01909
0)520
04018
11916
2

-9lt80

12487
12443
12511
-9572
·11048

-coos

12547
12441
12601
02220
0190.
02387
0189 •
12631
-926.

5 x
-0565
-0023
2

5 X
-05 ••
-0000
I
5 x
-U14
1
5 •
-lll4

1

2

PAGE
}0100

~AM

DSC

I, '

2011G MC{{,IT

c<;(

1.1

203}U QP)SW

CC

20BO

DC
'),12H,)
J 2 14 <)
CC
2,12

In4)

l

ACOOKY

20140 Sol/ACC
103~0

.2ClG

20160

~A(.R2

J2
I'C
JZ
LF

I,U

),ll

20) 70
(0)60
20HQ

L

204CO
2041U

RI
C

(jp 3 <)w
•• , J,'J'.;PUT.14
11£(',01244.10,
•• ?!dNPUTtlb
CAL,OI2C))tlO,
•• 2~.J"'Puhl?

lO"lO

ONI

ll~I(.S.01.l4"dC,

C

Bl

llH~
121~0

12I5~

In~4

(ARC TAPE l'fPE OrFI""f~S
AT,..
SCU~,.+12
HD
,,"CUPP ,8 5."
Yr
J(llll<).",RlOCSW
tFM
\\iALll,OQ,IO
fr
AOORI(T,ADORS"

200ft 10
20440
20t.50
/Ooft60
lOt. 10

10"80
20400
10SOO J'.;OQPP

tH

L CALL LINK LOAD

IZ80~

DOTH!. DEFINE.S

12814
12828

P.Or. . . . . ER ASS

IGN~.OO.fSS

La

IlB_O
12851
1284_
12B 16
IZH88
12QGO

AOO~I(T,AOOCO~

12~08

20'510

TFM

5"'AOO , 08,10

20~10

AM

AOOBKT,ot'1D

12920
IZ03Z

fF

T~

127H
12191
13256
12BI5
13908
1283Q
13014

OOCOO
02801
012""
02se"
012N)
02805
OllM.

II

060~6

~3

12901
0"033
I27S2
121'0
129 ...
12150
12752
12150
0.2812
06044
I21H
02220
03909
01]87
090"Q
03628
02301
12"8
03433
121"2

J2152
090'"
070S0

12768
12180
12.702

o DIS' CEFINf.S

2S
14
24
~9

26
I.
II

I"-IPl.l+1Q,tNPUft.21

12~H

1I

('0"40

8 ,.

SCAN,··ll, ,

10')')0

Tf
T.

~ALl(l,AODRS

11
26

OLT+2,_RUKl-4

IF

L SlAO,AC08I81..1
20')'10
;0600
2C61D

20620
;061'0
,06,,0

206S0

\ F
If
PR[NTER:

lC;6bQ

20b 10

C
ONi

,Ob'W

TR
8TM

20100

C

lOll 0
20120

ANI

2(\b8U

,01 W /l.iOPkT
2G 1 .. 0
207';'>

2U 1')0

20160
20710
20180

••

lR
ffM

TI)
TO.
A

HTM
HIM

I'" fHoUF 11
iEPO·l,OUf.l
lINKO,·+ll
[NfRUF.S",

STA.l .D GE"[RAUON

M[3L"'3+1,INf~UF.t,

DEFINERS OPRN,DPRA
·.23t1NPUf+16 . . .
TFST FOAR IN 3AO PCS I 1100.
NOPRT,012SQ,lO,
NOT PRINTER DEFINER
INPtT+19,INPuT+Zl
PICK UP 3.C OP£ ••
l STeAR, •• 12"
•• 23,lCHAA,,,
IS IT AN.S FOR SPACE SVPPRES~

,O

•• ''',012b2tlO,

00 NOT ADO

"0

I'IRLI(.3t1,08,IO,

ADO

.~

FO. SPACE SUPI'RESS

Ol>l.Z,MRUK3
l~lh00003,

ou '.", SP sr.",
DLI'IP1+lltO.ll.
Aooeolll, SYAOD
lINI(CR,.qZ
GEET,Pt1ASEB

P.INT G"

171

162C-l""3 IoICNIILR

I

H
26
I.
2~
I~

H
II
12

2.

H
H

11I11
11172
02812
14850
IHS9
IH12

II

12/'2

1I
16

02220
02381
02222
035'"
02.18
12518
09210

H
JI

11

2~

I"
21
\1
II

POo-o

03520
02678
000- 8
000-1
028 I'
J.1968

OlS20
12729
12750
-0005
07050

oeool

OU10
n06'
00000
01634

02$00
012.9
02814
J1l36

1.ge,
01202
000-8
12141
-0001
02S60

oeoo- .
12152
n,H
-"zOO

PAGE

IJE~SION

END OF CARD rAPE TyPE DEF'INEAS
2NIOU
utSK FILE OfClARATtlJES NCT CALLS
BrM
SC.A"-I ••• 12
t0810 REG

10700

t0860

'TO
BO
fO
TF'"
If

OP3St.,8SW
NorOP,BSw
KLRlSw,RlO(SW
SVAOO,OO,10
ADORK r 1 ADOR S"

2U810

[l

GONG",

20880
108QO NOTOP

1.096u

CUR G
TF
AODRK r, ADoeow
If.
SVACD.D8,10
A0081(T,OI,10
TR
IN P L T + 1 Q I I NPu Tt 21
INIBUF • .,
SF
IF
MALK HI, INT8LFHI 1
8 T.
SCAN,·+lZ
If
~Bl;Kl
,ADORS"

,DOlO
209ao

Te
TR

MOlGlT.RLOC\W

.?OQ~O

~T'"

? lOOO

AN<

SCAN,.+lZ"
.'3f"OP3Sw
•• 2~ ,SSw
~vflCD ,05,10 ,
UP lS~,8Sw"

20820
20&10
}O!:t40

208')0

2090u

IOQ10
2092J
,,0930

209"0
,OOSO

132Sb

•• uC •••• E. ASSlCNS ADDRESS

.- ,

••

11
25

06046
12745

"3

l331b

2'
16
26
4_

Ot.tOJ)

I27S2
I27S0
I3H2

H"8
0~0"8

09048
070'0
000-0
03520
00000

13H~

••

(l 01 0
AD
ltOIO
10
(lOl"
21040
IF
TES T Fa.
21050
lR
21060
8T.
21070
1< 3,2.11

·.23,M20IG

OLI.Z.MSVK1,.
LSTAD,AODAKT

FI.ST OPfRAND TO

LIST

13120

SEC NO OPERAND TO liST

UU2
UTH

lNT~,OIj,

OSA80.,MOIGI T
INT8UF,I

1)156

13168

llf'ltKOA,·+12

Non.op!Sw
OUT.Z,fII8Ut(2-4 ••
INTBUF,l

13110
UT92

THUD OPEUNO TO LIST

IJn4
11116
IU21

OSASo •• RLoes.
lINKClR,·.12
OU'.l,MRfIII, ,

u.~o

RECORD MlRK

UI52

lNTI1,01

IH

as

\1
11
16

U6H
13660

12141

01909
12~81

0)621

0904 ..
U602
02220

CZJI?

JH52

01211.
00000
12141
12150
000-2

-0001
J~120

1212.9

12135
HB.O

121.,

-0001

1020-1"] _ONI lOR
llUO
21 ]6U
21 HO

llUu
211QO

11
11

Jl

143 . .
15114
1l91B
1. . 24

1)523
-0000
J4n6
OCOOO

1l~23

02437
01200
11521
1]512
000-4

1441.2
11512
14)00
14.89
1424.
un.
153)1
1273)
12729
02812
060 ••
1273.

1)527
00000
153)4
00000
02U4
J4484

03520

OUIPUT
FRS1AO,ADOCOW

ACeRS. AOOCOW
l S TAD .100COW
LSfAO,11llt.1O,
AOOCOW.19.10
MIOtS+2
MIOCS'14

SET TO lOUL lENGTH

14~56

14S61
14580
14592
14604
14616

M tOCS+lq

lEPO,MIOCS

1,·.24

BTII

LINI'RT,DOINST
OUT PUT eO"SUNTS
22160
22170
ff
L S TAD ,AODeOw
AM
ADOeOw. 07.10
ZlllO
TFM LOII .. ,07
1ll.O
OUT+2,M8UIC,)
TR
22200
TR
OlJf.".,M8UKl-4
ll210
81M lINKCR,·.l2
22220
H01.8SW, ,
80
'UlO
22Z40
TR
DUT+Z,MIUK2-'"
TO
DS&BOI.AlOeSw
2ll'0
Ul60
TOM
INTIUF .1
AM
AOOeOI.. 05.10
TFII LNTto.OS
BTII L ''''KD.,
2ZZ.0
12
OLh2.IIAM
lnOO 110)
TR
rOil DUM'l.l1,l,11
"2110
Tfll Lllrl'.OI
UJ20

TE 5 T 3AO OPERAND
OUTPLT lRO OPERAND

e.

ITII

4~

14168
14no
14392
14404
14412
14424
14416

IF
TF
AM
AM
eF
CF
Cf
TR
IFM

ITII

16
II

FlOATA,FlOATA+lb
GOUN,FLOATA,.
OfA004+I!;,04,10, •

IF

uno
nuo

H

FOlNU

120~O

ZU10
U)40

14100
1411.
14124
14H6
IOl41
14344

lERO Gll -EOulv 8Ul,KET
NOT FOUND

FLUATA+ 11 ,('OlL-2

22060
22070
UOIO
22090
22100
22110
22110
221)0
221'0
2l1~0

1£ S I ENO OF , ABLE
OPEIUI~C

L INttCa.-.12
GEE'. _HISER

17 "

14628
H640
,I •• SZ
14"4
141>76
14688
14100
IHIZ
14124
141)6
14141
14160
14J12
141U
IU"
IUOI
14120
141)1

l6
21>

J]

H
)J

11
16

17
l6

11
16

n
n

11
U

n

n

"
"n

03899
0]520
03909
03909
02611
12706
IUI8
12721
02100
04018
09268

02671
02671
02678
OOOU
OCOJ9
OCOOO
00000
00000
12704
J4628
JOOn

03909
02671
OZl87
02220
0222Z
12511
14714
OllZO
09049
0)621

02671
000-7
-0001
12741
1272.
J470D
09041

II

DUll

16

OUIl
U602
01120
01547
Ollll

17
16

lJ.

Inll

11

09210

Ul35
01950
00001
000-'
-000'
H114
1214)
OOOOJ
-0001
J483Z
-4200

45

16}0- 1 't")

12

J~O

,H60 LSTCAR

IF~

llHO
ZHOO
12410
22420
22410
llHO
12HO
224.0 NOClR
12470
22480
22090 l (HAR

C

"I

C

TE S T BLANk
TE S T

81

NOCAR,O(22),lO,

Tf

lC~AR,

fR
"7
fF

I~PUT+

B7

Al PHSW,1.1l t
COLl-Jl.7.l0
Pc. fR
AlPt-S.W, ZEROS.

BT~

ER,-+l2

K7
TR

III CH

226SD
22660
22670
22680
226QO
2<700
22 710

uno

perR

22110
227'0

znso

CHAR 8UCkEf

A~a

sw ITCH CFF

.~

CUOMA

I"NPLT+1O.OO.10

PC TA
COll.INPUT+20

COLL-I
CCll-ll,COll-l')
IO~~T-l,lNPUT+20

IOfNT"6,lDENT-!Ij

INPl '+20.6QdO,

lEST F,QA ALP .. A

• +24

SEI ALP .. A SW ON

INPLT+llJ,INPUT+Zl
P(All +24

• +,.".
cell,O

hE
TD~

2218(,)

'R
67

2Z 7.0
2JHllO
2}lj I (:
ill- ( ;

III CH

, ~'''' ~ t)

AlPH~W

[Ie

1.2840

IC~NT

DC

(,dIIlO

I EROS

.-.

rCAlL-l,.6
1,('

·

24

U

Z6
JI

49
26
49

14905
14942
i4929
149.2
14981
02112
14862
14980
00000

000-0
02813
0281)
012-0
0281]
0120
0281~

02814 ,
14849
OCODO

14990
15002
15014
15026
15034
15041>
15058
15070
15082
15094
151C6
15118
IS 130
15142
15154
15166
15118
ISI90
152C2
15214
IS226
ISH4

JI
11
45

49
14
46
14
46
2"
))

11
H
11
14
46'

15
14
41
11

IJ
49

31
49

14
46
15
1I

49
12
49

02421 02400
15329 153]7
150)4 02813
15254
02813 000K3
15254 01200
P2813 000-0
15234 01200
02439 0281 3
0243. 00000,
02422 02424,
153]5 02B13
15130 15331
02813 00009
IS \78 01100
15329 ' OOOOJ
02422 000-7
1523' 01200
15329 15)31
13918 J5226
15322
02812 028\4'
15014 CCOOO
02.22
1HIO
02439
02<22
15254
IlZ426
\498A

000-'
01200
COOOO
02424
00000
00000

15336

I"

r:cocooo'

I

V[ASIUN

ISHl

;t

SPS II-C PHASE 8

PAGE

TO LOAC Pt-ASE Rb TO THE OISK FILE

2287[; fb
l2EUlO

228.0
2lllCO SUB'
22QlO
J.;;'Ql0

rSAf

22940
2l~'O

tlCU,l)

l]Cno

2/980

H

18
TRA

SU86,701
Sl..n6,702

CDA ,0 ,8bDArl. BbS" T, I ~s TRN
OJ9I ~ 1- ;on ...
Tca F6

··

.M

23050 Rl CSA
2)0'0
B070

eM

230~0

23090
ZlIOO
23110' TROSA
211Z0
21130
231'0
23150
21160
Z1I.70
23\80
23190
23200
23210
2)220
HHO KATHY
23240 •
23250' •
23260.
23270 IUCROF
23280
23290
23300
23310·
23320 •

TO

HL
IFM
IFM
87
TR
8NA
8NF
TFM
A..
IF

A
SM
IF

SM
TF

AM
8f.

1519'
15)94

cecoo

00000
14

00101
OC702
00500
00000

.Rll1SA+b, 1, 10
,RlCCSW

TROSA+6,-Jl.1O

fRDSA
TROSA.6,~b, 10
RlCSA+b.OSA80l(+9

fRaSA>12
lEPC.ADDRS-'
GOE VAl-12" NPUT+2 0
MACI.INTBUF>I
lNTH. S

AODCO •• 5 010
AOOAS.AODCO.
AOoeOW.IROSA>.
AODCOW.I.l0
FRSTAD.AOORS
FRSTAD.4
L SlAO.FRSTAD
LSTAO.5
GH T.PDSAF

16
3\
16
16
49

3\

129]4 , OOOR6
09049 OZ162
12866 -90lta
09655 -9048
12B24
02B12 02814

12824
12836
12848
12 . . 0
12872
12884
12896
129C8
12920
\20128
12940
12952
12964
1297.
12988
110CO
110\2
1)024
1103.
110. .
1)0.0
U072

06046
12H4
12866
U 00000
1_ 12934
41 12928
16 12934
\6 12866
49 12940
11 02300
U
12812
44
11140
1. 02187
11 02671
16 03520
21 02678
12 02611
26 0)8"
12 03199
26 On09
11 01909
11, 09210

1)08"
no. .
niDI

n

17
II
II

J2836
000-5
000- i
07950
000101

onoo

OOOM6
-9058
03516
02813
0)629
-0005
000-5
02618
129)4
000-1
03520 '
-0004,
0)899
-0005
J4748

SUBROUTI HE II NKAGE FDA FUNtTIONAL MACROS AND ARITHMETU; ""R
TO
TO

."
TF

87

23])0 •

23340
HnO "AC!
2]]60
23170
23310

34

38
36
49

12lSb
12156
12168
12180
IZ192
12804
128\2

llOOO
COLLECT OPERA~OS
23010
2)020 GOEVAL AIM SCAI\j'·'12
2 )010
A.
fRDSA+b,5,10
23040

ISl46

15358
15310
15382
15194
15346

OORG MACRZ
I FM
lRDSA+b ,Q6, 10
fA
o SA SO 1(. Cl£RER.+4"3
nM Rt lJ ~4. +'b, O·SA80X-l
TF. e 1-'5 YM+ 11 ,D5A80X-l
A7
-+20
fR
INPl.:T+ tt~.1 NPUT+ 21

2lqqQ •

·

1~~62

149B3

1~32Q

7,I,;CCOCO'
-OOCOO'
[)SC
8,(.COOOOO'

It2C-l""3 ""ONITOR

1~882

49
24
4'

1~246

COll-17.COll-l'i

rORG

16
H

15254
15254
15266
15218
15Z.90
15.)02
15110
15322
15129

PCAlll
(net-I)

SF
B

·.23,AOO(0'"
•• Z3.AJUST
ACDtO ... ID
SPQFlD. 11.1 NT8UF ••
DSA'Fn.TO DSA ROUTINE TO PI tK UP OPERANDS

25

11101'
nll9

una

\JUO

11
26

nU2

49

un'
Ul,.

1)140
11152
1]164
Ill"

11

02220

02.71
02199
000-0,
03634

ASSEN8lE LINKAGE
TR
TF
A
A"

OUt+2.lEPO+I
ADDU,ADOtO.
AOOCO •• TRDSA . .
ADDCO •• 21.10

46

14988

I~PL1+20,23,lO,

CCLl-l1,ObtlO

227.0

nolo

QPERA~O

PCAlll

eM

"}1l1()

226.0

LASI CHAUCIER IN

B
OURG .- I

PCALLI

148~0

14862
14814
14112
1490.
14918
14910
14942
149H
14962
149h
14982
14981

SAVE LAST CHARACIER

·+lO.INPUT+20.,
PC All. 1

BE
CM
BE
fF
CF
fA
fO
TA
CM
KH
TOM
CM
8NE
TA

22b10
12 . . 0

CO.~A

cecco

eM

22~80

C"U BUCKET

.+18,LSTCAR-l

8

2l~60

22590
22600
22610
12b20

O~E

14n~

.,..PUhlO"
19.1 NPUhll
LSfCAhl2

2l~~0

2H70

IILAN,k THE,

lfl4PUTt.20.,

8~R

12~'O

PAGE
148108

.+t.~,

22~IO

10 PCAll

SPS II-C PHASE B

·.}O, UfPUT+,O

21~20

21~

VeRSION 2

NOeAR
·+}3,INPUT+20"
.+4t8,01200,10.

DORG .- I
DC
2.12 ..
J2
1j,12145
DC
J214S
fR
COll-18.fHINGS-2C
fA
AlPHS •• ZEAOS"

U~CO

I

1 CHAR,OdO,

RNR
B7

l2 J 1C
12 )80

.O~ITOR

DC
'). 12 )"~
J21"

176

26 OU20
Zl ' 021071
11 02618

02301
02618

12934
0001()

47

.

11420

t 3"!O

.I) """0
H'5C

S

HPO·2S',OUT.2
ztPO'18,QQ
l t PO. 1"

,)PQ F l r.- ef
rF.

.~

; '~th)
l3">CO
1 )':>lU
2351'.)

IF

te"

l

~c,.

~

TH,l

Qli' + 2 t l ~ 'H'1" _OvE
OlJJIII'P '''11.1 t 11
lINKCA,·.12

'Ie

el"

II',..

CO

0

'e

1)blO

2 lb20

"0
,0

,1010

If

llb_U

ru

IQ

,+;1,L SlAD
.+,l),AJ1JSf

~M

l SlAO,OQ, 10

IR

C CAZ

OA,,-Ij,AODR~

IJ~H

SCAN,-ttl
UA II,ADOI( S

r.

I~Pt..'+lq,INPLh21

SC.AN,·+12

21170

" 'M
SF

A[)[JRS- 2

21180

IF

$(..

O'M
If

MA II .hOOP:

I.

OU T+ 2, UAlI-,)

, FM

L N f~ I II

,.

2 HYO
l ~aOG

n810
2 lAID

f •• AOI1~S

INJ"l.T+1Q.INPUh21
SCA~'.'12

S

2 Hi ~o
i )8" U
.. \8'10

" 1M

rw

OLltl.SCf"-1

I J8hU

If"

l "I t ~, \
t INKCA,.tll

ll'lj"C,,·tl2

"I.
,.
'0
n,.
."
,."
"I·

t HI10
I HUH)
~A '-iO

0

/191 u
~~2 (I
~'H(,.,

11~.itO

11H4
IIH6
lIS ••
I H8U
IH91
11.04
11ft I.
I lh28
Ilb40
IlbS2
11&64
11616
I J.bS
111CO
Illl2
11124
Illlb
llHB
I 116e
I J711
Il1h

I~PLT+lq,INPLJTt21

Ot, '+2.11411.w;-"
l)~"f}!I"

1o(L()l,- $"

I.. INI(I}R, ... 12
."lb,MuRrE~

ADDCo .... u.un
I\Q1.JCDw, I

177

GEt l,I'IH-''i(H

IbIO-1441 _ON "OR I
? HhG

DC

/1090 MAx

Os

-4100

rf~

Mlues+! 1,0001.

1~O60

A

"'t10Cs.~ 11~/I,OOCOW

If"
IF
IF

~

24080
140QO
1A1CU
1'110
14110

A"

/H 10
/4'40

24l su
24160

Cf
Cf
CF

M10&5+14

n

MlloCS*19
lEPp.MIOC5

IF

'CC~5.F~STAD

PIS~

QU ft Z.M8UKl

4N

AOOeoW.I9,IO,

H2l0

TF

.11

2~210

lUaO
2HQO
2HOO

&I!

4qDCOW~PI.IO
LNI~."2
q,.~CR"·ll
"8~~ I, .OOCIl.,

"ft~~lo06o!q

fIf.

ra
JaM

lH10
2~1.p
~~)~O

~f~

?t~.q

~I!

I,

~H1Q

If!!
JIl~

2H~O

~o"cll

2"1>.11

.,."

,1.H6P

Bll!

rEI!

nil!

ADDRUS OF tCA

O!=fOIt'f

07.'0

a Ibn
o~qOq

II7~·

ZO
II

12bPI
Ilij08
alb 18
OZb 78

~ooo

I18Ca

11

0.210

-4100

t

j~.J,

I

'''Ir

oQ~

QllfUd"

RfCORD

DISK

UA~

111~

1

Ile.1
\J8ll

\I
16
21
10
I.

020a

2.\I
II

~UgQ

P10~

IJ99~

26

01~20

Q]~9~

hOC.

OUl~

,HOlD

I.OI~

Ib
IJ

1.01 0

l~

'to+1
I~OH

'.D.~
,-ph

lt211!

~CDClfSS

U

n

II

H
11

127IS
1/115
121H
Old"9
Q1QOQ

QHa 4
1210.
I2T\4
121H

~t'u

IU

0/678
02018
OeOK4
00 000
00000

poooo

09Z ••

~OO88

121H
127t ,

OOCH
00110 0

onl o

glbl_
U 0)99'
t1 gaUl
11 ll'lf
q2·1~

!11~1

gog~~

q?UI
QOo~2

~OOO2

~~12~

1Z1n

can

II 0261~
UUl
n Q'!Ot,

~q~05

Z6

Ii Im~ ~/jp,.
H 1m2 oqo~~
lW'

'I!

,~

P2H~

9~1>~_
U~II~

gPo'll

!l21~f

"1!~Ol

•.
U lizmn
l'H 11'"

H

!I~~t1

l~

mu

gao-I

QOOOJ

m~~

IU~.

!U!~IU
~'
.• J
(nat

illig".

'1,1\

LII''''oO.

"Ollb

it mn
tm:
lilli' H . mn
onu
t! 11m ~I~n
!.~U

~P.I!Cqlh(llh 10

01018
0/10.
000-0
-0019
01018

2S

t:m
IUO

A"

SiClOR CIlIJIIJ

J

l5

'tllg
,UU

q~hl.II~IIK I~.

"'8~~I.O·Pl.9.

U

'18~0

I.I~.

M~~~I,'OC~lO

UllJC •• ··'2

I.
1/
11

118b2
11814
Ilellb
In.1i
11QIO
119n
11914
11 •••
, 11958
1191Q
11982

t:!ii
PIIIIT

II
11

IlB)S

t

14~U

L INICR,otlZ

a

h ,.

UIU
hl$Q

•• 1I5o!O

'~'~UF ..
,~ "1~!l~'~'12
P,~H~!"U"
~~O€qll.!ll.la
IN!~IOI
DUMP! t\ It , • \I ,

Jl~U

oz ...

11

11

t~nJ

,,,"

01520

IS

I.U~O
I.'D~

,

11

J)Sll
OlSIO
02814

01220
Oll81
12488
01]20
01l.1
IHIS
02220

1.11'

OS4~Q~.'HS~

~flln~ff

'1,1"
rf"

MODE CODE

LIjH"OS

Pf~

u

lfNGI~

Ont2.II'UU-4

'fll!

24320

Sff 10 TOUL

MOVE AeDeQN TO END QF L I_~

P r ~O. 400CO.

@"

2~110

Rf 1 URN AfOAESS
lOR GElS Et.lTA.'t'

"'8~U

r~

H210

17

a

04048
IlelO
02812
060U
1181S
01811
0604.

11
I.

'1818

DEFINERS

MBllK1H.n.IOII,

TflO
8111
Tf

_roc ow

"

!flO
CF

2~HO

AD JUS I

.1··1~
L INPRr,DOINSI

STM

GENERUE

hZSQ
Ha.o

1 Nt:

MIUCSt?

TFN

••

••

Il,lC$t 1,., lOCAL"
FRSIAD,AOUCOIo
l Sf AD, ADDeO.
L51Ao,HoIO,

~()U,

II
11
11
H
H

02678
0100'
OllQQ
oeo-o
02814

J Ho04
00000
OH20
01814
nbSl
o 1~20
11810
-0006
J1100
11821
-COOl
J 1116
13& II

Ilen
I IS lb

24') llJ

rl)
rn

I~

JH04
0900'
OQ04.
o lQSO
On20

lUI'
01812
0.046

I,'

I'OSO

'IolANSFflo:

l~

0600.
CUll
IHbO
040ll
OlQOQ
11SOB
OHO'
114Q'
IH07
01'0'
02812

OHIt

l1"; \

AM

2"0'0
HO,u

2.41q

02UO
on41
1251.
onlo

12

I,'

10 Rf TURN ~OOIHSS
.,.!l,AnpC(J\iij.t
•• j)). 4.JUS J
ADDeow, .10

'0

'40l0 M TI( A

f·"'1l

a J~/O
OOO-N
02220
CCOQQ
00000
J12H
J0088
021H
OCO-l
01520
JJl 12
-COOl
02)88
OOOOJ
JH80

PAGE

I,'

cc

'''OOu

2H20

01111
11HQ
021H
02118
02314
00038
OQ/61
02120
OH20
01QOQ
12.02
02181

SP> II-C Pl-iASE B

V,RSIUN 2

cs

2Hl" SCI.
21980

2."10

OJ~2/

lb
11
II

~ ~

r>
OC

DA'

IS
2b

IH10

IF

10
IR

11
H
4J
4"
26

Il~O'

RT"

Z.",!D

17
I.
25
IS
II
11

IH'~

[~pl.rtLC~,INFtLJf+2l

23140
2 \15C;
l31bO

?H~Q

]I

II
2t>

11HI
IH60
Il~ 12
114H
IlH.

SCh~,··l2

llllO

2UQQ

22
13
I.
1/

I lHI

DOA2
~ S14I>,>OOCU,

Br_

24170
24180
.4190
?4Z0Q
Z~Z 10

13116
11208
11160
11211
I 12eo
112Q.
Illoe
1))20
I JH2
Ill44
I J35.
I B ••
I31BO

llltelt

DO"SG~rRSW

I HOD
; HIe
" H2O

240lU

II

1141.
1342.

I(llnSw,RL(J(.Sw
lSTAO.AnOR';)

DCAIUN If

2 \h 70
lHdW

n.so

l )12ft

02300

01 S' ACORE II
SC A". ••• 12
MLA..lfL.BSw

"7

, ]hflC

2
,

Ct..' '·2

(.fETtPHA~EO

I~f

21000

t'~C

,c

11
21
11

0

B I-

2
I

Rf (. ,..RIC..

IH.8
11100
11212

0

2l'QO DC AF

, }bqO

L SUO,AODA.S
ll""II;OR,"ll

11f'"

23-,)"0

216~O

lINPIo(Ttf)OtNSf
OL'+Z.lEPO"25
ADCIH .• 1,10

n~lu

2 3S 10
,2l580

.: •• +2'4

,.

lH~

...

PACE

11-0 PH."SE B

IE PO'II, AOOR 5
SPOHO.ll.S,lOll

2 }'\\8U

if,S

IJf k) I ilN 1

~C~lrCR

IE PO,l! Nt'''-

~~

i! }-'lbLl
"( 3" 10

2 ~'}')u
? ~r,MJ

Ib2C-l""1

,
,.

nHQ
13.:.00
2l,qo

IIp,,.OJ

~.

PAGE
J"'t80

"

..0

"SOU
"s 1U
I'S,O

Til
AM

OltT+2,MSUKl-2
ACCCO.." 01.10

TF'"

lNTH.Ol

IH~

L I~KCR •• +12
MBLKI,D"
LJl"T+Z,M8UKl-4

fFM
fA
U4

i ... '»)(l
; ,,1)"0

CURE ACORESS

ADOCOw.O~.10

1"~'>0

lF~

LNTh06

"SoD
"S 10
,'S80
l"C;qO •

TO'"
Bf'"

DLJ/IIIPl+ll.Odl
L INKCR,.+12

RTM

GEET,PHASE8

BTIII

SCAN,.+12

CF

AOORS-4

BT'"
TF'"
B1
SF
SO

FILl,AOA.FIl-"
lSTOUT-l, •• 20
PR. I ~T
AOORS-"
DOTCO.INT8UF+b, ,CHECK FOR

IF"

TESIAO

l411u

TF
TFM
TO

;'ft13o

~T~

07 .. 1 ... 0
2,.1'50

BTM

FRSUO,HUOO
l N f ...
OLf+2,lNTH+l •• RK.lllflk.
RflOOG,btll
STACKR,9tlO

" .. 0

"OSO

'?"b60
'''b10
2"b80

l'bQO
"100
'<11,9

" .. lblJ

,<110
2"180
241QO

,.~

14498
14SI0
14522
14534
10546
14H4
IHO.
IH1B
14SqO
10002
10014
14.20
14018
14no
100.2
14.14
14686
"098

"

rCD

ST~UCO.ll,2

TOM
aT

"'OOIFI,MOOIFl-l

fA
TFJoII
TA.

"'lb,AOORS- ..

12131
000- )
-0003
JU14
-0000
I21Z9
000-5
-0006
0000JUBb
-4200

J4510
00000
J2347
J45S4

1I
10
1I

00046
OHIO
11704
IIqB3
12100
01516
1480b
09028
C389Q
0238 I
02220
'10254
10434
114U
11108
101600410
00416

00000
03b14
-0000
02518
-0000
021U
00000
000-9
00002
11101
14193
00R99
03516

I.
49

00565
00520

J4733
-)S1Q

16
11

02029
02SQ2

J4158
JOOOO

II
16
I I
10
1I
II
10
IS

I'

11

TRDATA+b.NINES-5,6
410,999,9

11
3)

11
10

.9
32

4l
I.
26
I/o

25
I I

11
15
21

.RlTE fINAL 1 SECTORS TO FILE

24800 •

FI'IS

Hilt

IORT,e+]]
IOR8C,OEFCUT,7

B

1'820
2 ... 8JO

02220
02671
Oll87
12H8
127])
02220
02678
02387
OlS41
12518
09210

•

"020 OENOF
"OlO

"Sl~

JI

EVAlLAfE AOOPESS OF OENO

l'tbOO e
'ltb 1 0

1430.
14318
14190
14402
14414
14420
14418
I44S0
141062
14414
14480

IHIO
14122

END OF PHASE 8 ,CALL IN PHASE

•

2"8"0
2"8S0

TFM
8T'"

248bO

P..,AlfC ODA

CFfA,PHAZEC
CFF ,PHASEC
,O,PHCDAO,PHCSCT,PHASEC

"

OJ88SS-10JOOOO
DC

1,

14112

t

14880 SI,MPlE TOfl!

TROATA+b,b,bll

108qO

B1

FINIS-08

Z.. 900 NINfS

DC

14qlfJ OHSIX

14114
14 186
14198

b,qqqqq'
R99QQ'
DC
6,b

IS
49

101014062

10254
Oll81
02211
02212
09210

00000

o

- 00006
24~20

DC

ro

2"'j~O

14'170
('dSO e

14805
14806
1481ti
14830
1484.
1485'

11
10
lS

14800
1'118
14890
14qt2
14914

14
16

LNT~

IF"

/.:., ,'1",:J

; .. '1':10

1,'
RHOOG,Q,1011

OL.l-7t1t
rR
OL J-b,ADORS-4
GEET,LUCK
8 T"
TO lOA 0 Pt-A Sf 85 TO THE FILE

VERSION 2

SPS II-C P"ASE B

~Ut3"i

COA

038H
Ol510
-QS52

PACE

Sl.B'5,10\
SUA5,702

TR.
l':t020

11

17 !J

1620-I"l "CNI TCR I
34
38

1I

000--

-cooo

,C,BSOAO.85SCT,tNSTRN

)6

49

14914
14914
00000
00000
14

00101
00102
00500
OCOOO

00505
005 ••
10044
1031b
\0008
0252Q
00415
12440
12515
124.0
12441
10152
12441
1244Q

J0023
JI81B
02530
OOOOJ
00000
12540
12440
OOJOO
00002
IZS41
000 OK
11811

1251b
12511
12520

12441
11191
00421

12459
12460
12510
00565
00520

0247.
0250Q
02559
J02S9
J1818

00565
00566
1142.
11452
02528

OJ9122-2CiiJ2" ....

reo

F5

2'1040 Pt-+ASfC DORG
11)050
2')OtlO
2'5070

TFM
flo
8NR

25080

81

,2')QQQ

RNA.

2'llCO DO
2') itiJ

2'110
<'ll0

l'Hku
2",50
l'lloO
lS 110
IS 180
15190
15100

25110
2S220

HBO
2'240
252S0
2S2bO

H210
25280
25290
25100 RCOIM
2SlIO
H120
25])0
25)40
15350
25]60
<15310
25380
25390
25400
IS-IO INO
25420 SIH
]S430
25440
15450
25460
25410
25480
25490
25500
25510

rOM
SF
TF
Tf

SM
TOM
SNF
rOM

TF
TD

T.
TO
TO
TR
TF
TFM

8

148bO
1(000

,

RE AD SEC TORS 1.2 OF CBJECT PROGRAM

lOR T
IOL T

, •• 2]
, JHe

00-11
S Ilf

.ISTAT-29

BR IF SUBRS REDO

,CD 1 M

BR I F CARD I ~AGE

00+12
CDIM,-l
'tlS
Sl;F +5
SlJF +80
aUF+'j
8l;FHI
-+24
BUF +b

8Uf+l"

,1

,

I NOlCATE SUBRS REDO
STORE FIRST A~R

,BUF+105
,6UF + S

.100

.9,

CONVERT TO 1 SECTOR BEFORE

••

RELOCATABlE
NON RElCCATA8LE
"aVE SPS 10 COCE AND LENGTH

.2
.8UF.I06

,-2
.FRoSTCD

TO CARD I (OlS 0-14
BUF+81
,8UF..
CONSTANT INC FOR SEceNO CARD
BUF-82
,SECCO-3
LOADS SECQND CARD COLS1-25
BUF-85
,R MARK
"
INSERTS RECORD MARK
WRITE SECTOR I AND 2 AFTER SECTOR I IS UPDATED
BUF+H
,RELSW
..
-I IF RELOCAUBLE O&J PGM
BUF+2S
,COMOAT'09..
MOVE COMMON DATA
BUF +15 ,I STAT
JORT
IOR8e

,.+23
,JH8

,1

.,

10000
10000 I.
10012 49
10024 4S
IC030 49
10044 45
100S. 15
100bB 32
10080 2b
10092 , 2.
10104 12
10lU
IS
10128 4.
10140 15
10152 26
25

10lU
1011.
10181

31
U

10200
10212
10224
IOU6
1024.

26
16
49

Z5

31

02~29

RO DIM ENTRIES FOR SUeR INCL PICK
TFM

IORT

B
8NR
BO
A
TFM

10GT
,JH82
CKSET
"STAT-28 ..
CKSET'24.ISTAT-36
PICKUP
,.A'1814
CKMAP.54, S UE
CKMAP'47.01

TFM

MAP

TFM

, •• 23

8R I F MORE THAN 0 I VW UQU I RfO
ADO LENGTH OF SOFT DiViDE TO PICKUP
SET lUNCH ACR

.WA.1U~

8
CK DIM
DORC
.-It
BNR CAlC
.1 STA T-a. .9.
IR I F LAST REQ SUB NOT 'ROCESSEO
OS
ISTAT POINTER
TFI<
SYS CO"M Sf!: TO ZERO
lOR'
, ••
B
10GT
.CSDODA
•7
PUNCH BLANK RECOROS AfTER L I Sf CECK
BNF HIP ICK
,LSCOSW
TR
CLERER'54.CLfRfR

,- '3

TOM

..

Cl'ERER+Sl.O

TR
CLERER+IOf.CLERE.
TOM CLERER'107
w'CO ClERfU2
.ACO CLERER+2

1811

1021>0
IOll2
loze4
10296
10]01
10320
lonz
IOH4
lon6
10)63
10364
10375
10376
10318
10400
104U
104H
104]6
104"

lOUD
10412

lIUZ

J0283
JII26
02531
02523
14249
J0316
-0001
J424'
00000

U

11240

02N30

16
..

00'65
00566

J0399
JII34

..

104.6
Olly)

OH79
02719

U
U
It
Jt
It

02772

16
49
4S

n

21
I ..

16
16
..

Jl

IIUZ
II'"

lun
o

olin
02126
onu
,onll

ocooo

Ol1l9
00000
00.00
00400

50

2~S20

25530
2HOO
'~~50
2~SbO

HHO
ZH60
lSSqO
251100
H610
25112Q
251130
251100
lSIISU

1620-IH]

......

.O~I

TOR I

VERSIU~

2

PAGE

SPS II-t PHASE I

_ACO CLfRU+2
.PLACt HIGHtST ADDRESS USED IN PICKUP
Hl"cK. C'
'IAOD
.PICKUP
BNe ·+2~
TF
Pl'CKUP
.HIAOo·
CYLINDER CH.fCK
CH
SLUOUr. 5 .ICOO
'MNe' AD.
00
.'20
.22. PHASEC
'AOK
01
CF
22.PHASEC
TOH 2 3tPH&SeC.O
.II
•• 20
TO
,1l+PHASEt
CM
.es
.HO
.... 24
DE
TOH 13.PHASEC .-1
At TV
WATV 8AAF
HTY
WATV BA~F2

··tl

2511.0
25610
25610
25.9Q
25100
25710
25120
251)0
2514U
2HSO AO'
H7110
25110
25180
25190

..

H

BNCO
TCM
SH
TA ..
AD
S
TO
AfIIL
10
It
Te
TO
TO .'
TF"

2~800

25610
25820
2~810

2H40
25BSP
25860
25870
lSORO

,.

B

ACTY
wATy

25090 ALL
259Q·.·D'~ETU'O.FAUl T
26560 DELETE RCTV
"'EVENTS UECUT ION
26510
SF
NONU
l6510
NATV DTtoU
.-01
TOM SKIP
21'90
SltlP QL"UT "EFEIIIIG TO tau If-,
26600 $IIIP
I
Os
SILE
81
Z6"0
26UD DEFI
OSA PICKUP-4

......

A

.-.

."fA

··
..

...

.--1

00400

104qja·
10508
10520

24·
41

02518
IOH2
02528

02Sza
01100
02518

0]59]
10132
10516
10132
10012
10023
lOUD
10620
10641
loon
00000
122 •.9
COOOO
12B5
00000
10132
1\.195
OHI!
10000
10888
02.9.
·02529
10811
1206!
12061
12059
12057\2055
0051i5
00532
00000
I"H
, COOOO

-1000
01100
10022

2.

ItS!2 14
10544 U
10556 43
105U 49
10516 H
losn I>
10600 H·
10612 14
IC.24 46
101136 U
I06U 34
10660 N
10612 H
10684 )9
106Q6 48
IC1C6 H
10120 \5
ICH2 12
10744 H
lon6 H
IC168 22
10780 2~
10192 46
loec. 2~
10816 H
10820 H
100·.0 25
I CU2 2.'.
ICIb.
16
IOH16 49
lOOse l4
1(9C.0 39
10912 H
1092. .• J
109)6 H
109.8 16
10960 .q
IC912 16
10984 .q
IOQ96
IICC8
\6
11020 4Q
1.10ll 26
110•• B
\.\056 16
11061 .9
·,.IIOIC. 16
11092 '9
IIIe4 .6
11116 16

11128
II \40
1.1152

nih
ABEAVED FDA AEADING CARD TO LEAD.

"ONCAl
S.SCAl
DUP

02121

II-t PHASE B

SP~

•1

~OP

TD"
81
TF"
SD
AH
AH

J9

.

AnDRS-4

IOMJ ••• 23
lOP',OEF]-It,7
10'H , •• 21'
lOP' ,OEFIt-it t 7

IFM

8R IF ObJCAE IS NOT E>CHDED

OVfA.1I8.08JCAE-)
QVt:A+t)b,ORJCRE-l

~NF

IF
CF

CALL

,R ... ARK

l~.IO

lb02U
2bOJC

O~P

.PICKUP

l~960

25990
}bOOO
26010

INHI 81 T

.10

,ltOl

10484

..

..
..

IU

11112
1118.
IIIQ6
.1I2C8
11220
11232
11240
11252
11264
11216
11286
113ea
IIltZ
11120
11)24
11336
IU. .
IU60
1.IH2
11383
lUI4
IU96
11.0.

.
••
H

'9
.4

15
.1
4Q
15
49
16
43
\I
\I

12
.6
II

1$
.)
.9

12
ZI

00000
0000loon
-00-5
01200
OOOOJ
00102
00100
00102
00100
00000
oil.oo
OCOOl
00'0-1
00.0)
IU86
02511
00421
0\300
02.92
0249)
02494
0249.5
01496
J0887
JI131
00102
OCIOO.
00951
11686
00000
JOQ7I
J 1695
J0995
J 170]
02418
J.10B
JIBS

I09~6

02524
00565
00532
OOSH
00~32

110)2
00565
00532
Ol510
015111
00565
00532
00565
00532·
111111
00565

02~\3

00000
J 1019
JIIII
J 110)
JI1i9
01.00
JII39

PAGE
00520
00000
11112
l1l8.
11220
00415
OODoa
00796
DDH5
1.1196
11622
11)60
10315
11610
11310
10]64
11383
2
11320
IOU'
IIH2
lun
.02521
0

lun

10023
00001
00000

ceoo.o

00002

JIJ60
10nN
000-1
000-1
000-1
01100
-OOKO
lUlL
I\UO
00000
000-'
J!649

10)75
11610

h

oni]

.

11".0
02SU
115)2
Iun
115.JZ

1.6

Inn

a'iSZG 11
un2' 26
115.' Il
u ... • 5

.run

-GOZO

lIsn

-GOOI
00000

IIUO

11HZ

••
I.
4J
16

4'

lI.t" .. 16

115.0

a"t2

II
II>

'L.a.

·1'.
,,6

una

12

1160..

IIUt
116",0
"66.
H616
11616
II. . .
"6"

16

'"

••n
".

11324

53

J 183 •
00101
10022

II
21
II
.9

11421 '
llUI
114.0.
,UUZ
.11 •••.
11416
(lUI
Inco

52

OOOK5
11320
1I320
00000
000-0
01200
-COO2

~~:~~

,

01200
.12 •• 9

115JZ

usn

11]81

11520
11610 Iud'
11610. ..,000"

11613

oun

-0000
OUOO
"1>10 JZU'
00000 oOloi
00.~1... 00000
1206.1 . 00100
11616 OOOOJ'

OOGOO

lUTZ

I
10,1"
5 •

It.lO-l ...... ) OONIIO_

OC

l"JO

j,

I

VERSION 2

$PS 11-0 PHAst B

PAGi
IInq
11102

22'

'4

~2524

J

"2'
i6bftQ nUl

CSt

(ORt

11107

IbbSO

DC
J8 '
OSA

'3, 1a'

11107
11110

AOORS-,

1111S

OC
<2'
OSA

'3,22 '

11115
11118

S TPIII

11121

DC

'3, 1 a'

11121
11126

lbbOO C E F J

U',bl0

""080 UfFft
20b90

,to 100

JII19
J

-3516

J
5 x

J1I95
1

J8'
CEF ;

OSA

OilER

11111

'3 t 18'

11711
1I1H

to120 Off.

DC
J8 '
OSA

RE.lCRf

IIn9

'Oil 0

5 x

JI . . J
1
5 x

Jln,

11719
11142

,.no

DC
3, 1 B'
J" '
(61 .. 0 •
FOR sua_ou liNE OIM ENI_IES
'6'150 DC AJR cOA
,l,SU80AO,lQ,W'·1

1

.

11104

l-fte06-p,JZ4,]b

nc

It-.lb(;

I

"

IIU8

"

11714

lol10 ,
fOR READ "0 2 SEC lORS AND .R I SEC 1O_ I
lb 780 CCAIJ8 COA
,l,---,2,8UF+l
I-OOOO-02H0l6
1h790
nc
I

lb800 CSCCA
loa I 0

COA
, 1. _050'0,1, O. PH' SEt
IHOO)-OIJOOOO
DC
I

DC
-100
DC
-O]OOK
lhe,.o
9
DC
-b012)41)'
168 \0 fRSICD ce
8
QB 1.a.2

0100

OS
.;'t!"t.J kJ044!h.
{ba10 (OHCAt os
lbtt80 ([f_
OS

,4121
,I SlAl-;9
olSIAI-]O
,02

•

,.810

JH"

ltdC{;

esc
02
OSA

J~B2

It'.. !J )0

lb'H,U
Z t-.(I "'0

l~CLCA

OSC
22
OSA

CUNS1.~I

FOR SECOND CARD

11194
11800

to012H5'

I18C9
eeNS IA~ I Fe_ F IRSI euo

t 6 71)14a"'2

,

11811

HI ORDER pas iliON OF COMMON DaTA

OOA (JB

OC

'''·'HO
2b~20

Il

11776

t" 3002

18 a

1620-1"3 oONI lOR

14

11190

"

210820 SEcce

lbSQO

11160

VERSIUN 2

SP~

0

00421
02500
02H9
11818

0
0
2

11824

5 •

II-e 'HASE· 8

'AGE
1182<0
11825

"
,22

J116.0
I

11826

00AJ8

5 X

11812

ac

"

CSC

,22

JllH

118J2
118ll

I

118H

2l
itdtO

2e',I()

CSA

C SDCA

DC

"

I
11,ENO OF ASSEMBLY.'
~ND OF ASSEMBLY.'
llOOO co'00
0&921
Ol'in.
OOOH
OHH2
I'ZOO
10808
021>6'
O~Ol·q

OOH.
1199l
C2.14
0~&21

CLERU
C"PC"I
co"car
CO"SPC

11B2
III I~
02119
0861.
02500
06806

W'OfF

Q4tS.

e~"AlD

WAEN S
esccCA
eOAIJa
CCASGN
OEFCI"
OEF 1~2
DEFOUI
~ELEre

"FAtUI
CFACC1
tFAte)
OFACC.
~FAC06

C I GAL F
CIGITS
UI"CAt
OI"SC I
oMENOI
C"ENC?
CMER1A

UMEAIC
O"EAI~

ONES II
O"ES2I
OMF S22

ellq/>
1103'
11160
1]460
1.I'n
0)H8
0]519
IIHO
Ml.6
0_1'6
OqlOZ
14284
1420.
OtJ4S8
OQ072

04800
COOO I
12316
120Z4
17.108
12196
12112
11148
11980
11028

~O~IIOl

D"PDIG
D"RIjD
OIOSEt(j
Ol"sfll
D.S .... l
O"S~~.
OOCo,,~

DOINn
·DDHU
nOMESS
USABOX
OUflU'

DVAD8F
DVASG,

HUll
'PRI ~I
ERD~t I
EILNIH
ERSIS.
HALAO
EVALER
EVA10P
FeHIUF
F ILRUF
FLAGGR
FLOATA
FRS lAO
FAS Ito
FRSIMI
F .DSC.
"OEVAl
GOO082
HOPR II
HIPICK
INCOO~

I NoAOA
I N'UI 2
I NSTAN
I NT8UF
I NI_S.
10ADoi
I OC SAD
KIL SII8
KLILS_
lI .. ISF
LlM!SP
LI ~KC'
LI NKOA
LINKER
LI NK SF
LI NOA I
lNIHH
10POU
10S'.S
I seos ..
lSPAS.

VHSIU~
0~~2&

12220
12"6
119CO
IIU8
IIUO
10]6
10088
el066
09B~0
c.o~_

00/12
101]'
096U
11196
080ll
\lllO
0 . . 02
oZO 16
06126
C76"

·.LS ItAI
LS ICON
LSfDEf
LSIOU'
LSHS.
IOACReF
"ULI.
"e I GJ!
"ESDUI
IOroRueR
100elOC
"oelFI
"OEXEe
"OIONO
_ONA .. E
100NtAL
_eNO I S
"OS8NC
~OSOAt

"SIOAC
~UAIH

0~~06

~VE~OC

11971
IIq60
12880
11SI1
0119.
11811
(40)2
OSQOO
118H
050U
00"'0
10'"
02491
109H
Cl28 1
12'"
CI628

NE"CAA
NOPR EC
~es I NE
NC IV PE
OBJCAf
OPCOCE
OvALAP

oz-u

C2U6
19181
0248'
0.011
04010
02se 1
11S 18
12602
126)2

PACKAe

PCALLI
.C~CO_

pc_us,
PGAREA

EB
PHASEC
PHAzeC
PHCCAe
PHCSCI
PICKUP
o.rcSA
P~AS

PRI~r3

1201&
1198~

09268
12HI
C1U1
Iq~97

REfIIAIL

CH19
02481

ALOCS.

.E\/Se~

a79~'
auo~

"SSW· GlHI
7TY5

IS991
I21H
Oq180
1)\12
16021
II )08
00'26
160)9
160H
00196
160"
160')
Iq66]
IB941
1))621
12144
11100
0271 3
11<10
101.8
02'Q6
12660
11668
O).IS
1 ')2'i"
0'716
02.82
060B9
0'200
10000
I.H8
1.855
00016
02S28
1.600
0.572

UtAU
usel
A2tAD
USC!
AleAC
Alse,

04668

PU~C~2

OUU

130B~

A~CAC

AHCT
no AD
nscI
A8U
ABU
ACCI
ACCRS

1118d
12260
142"''''
109]0
11919
10lS'
10Q76
OSBS4
01qSO

O~OJ\

11280
12610
03520

AJ~S7

OB99

1£900
021> . .
10810
IC9H
110 . .
1'1012
10112
11028
11000
IC.92
ICBi
OQ4)6
015)4
1.91.
OC021
IQ200
C0052
19000
09\00
tC069
19069
000S3
19122
C0029

A~lIC

0~06e

IU . . 2
11.00
OCIH
11800
OCOSS
19Z52
OC029
"8"
ceoH
IUH
OCOll

ALI
AlPHA
ANAL I
AN All
ANAL)
ANAL 0
AtUI
ANLIA
A"L1B
AOK
ASINE
ASTER
DICAC
81se I
alCAC
HlSer
BlCAt
B)I",O
Blser
84CAO
B.ser
8SCAO
8sseT
86tAC
B6SCT
81tAC
87MAC
81sel

b.caC
a~MAO

8AKA
BANAN
aAAF2
BAAF

BIZ
&ETA
8LO'
Bli
8'ZOK
8RNCH
elSEO
BSAV
BS8F
8SHI
eSNEO
8SW
BIBLI
aIBl
aUF
CALC
CAL
CCHAR
eDIM
eFFA
CFF
CFIL
C.. AR
CHECK
eHK.,
eHKIO
C".NO
CHKIt"
CHSYM
CKDIM

O"U

OZ~'O

02'"'
u2S02
u241S

PA It '"
PTINS.
pUL II a
PUNCH I

RH"ESS
UCANI
"'VIIS.
2PASS

12)4)

PACCRe

ACEelv
REETIN
AE"AE
RHOOG

I" 1Cf6

1~8t0

PRINT"

5.

PAGE

SPS 11-£ PHASE B

ClitMAP

tKSEI
ClOAD

CaLL

oe030
19219

OAtF
oAC
CAS

oeose

1700 I
16500
I nl2
IllH
122~9

un.

1119.

ann
OZUII
on"

0 ••••

U19Z
1. . 12

IZ ...
04160
O"ZO
10....
0 . . .4
IuJZ
liS"
11.21

I~ZZO

1l5~'

IH94
13714
12950
149~0

115~0

nln

oCF82
DC
DCAZ
OOAF
oOAJ8
oOA

OQ960

12~n

112.0

11119
1171'
01419
11916
13090

ou

oeooo

05~'0

05tS.

\Z~]&

CONIU
CORE
CSDDA
CTVI
CVACT
DAt2
DAC)
DACO
OAt~

oe. .o
O. .~.
090..

01lZ.
090.0
11IQl
024)Q

CLO~I

CNIR
CNI

I~I\I

0'021
OZ. . .
0 . . 10
016.'
CC005
0"'0
IDtOZ
OtQIO
01100.

0~60'

11840
13501
1]]92
1\ 1~4
IH68

,.5
161C-I44) _ONI lOR
CHI
OEF2
Off]
tEFO
OEFS
DEF6
nEFEO
OHIN
OfFSOfNUF
DE"C
CFACD
DCifltF

OCM
oMESI
OMUZ
OMESA
OMES8
oMESC
O"ESC
OMESF
DilES
DMES"
OMU2
0"S81

116Q~

11701
11715
I IT 11
11TH
Ilnq
14215
0);;6
0)603
14498
14856
OQIQO
0'460
14880
1\656
1191Z
11'0011424
11540
116211
11196
14928.
03881
11856
11436
11519

DMsal
OMSRZ Inl~
DIISV
09061
DOtoN 09410
I~llit
OOOSF
Ot35l
ODDS
'06851
COL
13n6
OORC
10056
DO
DOTCO ,"06
12156
DS.F
101~4
DSA
0~268
DS8'
14784
DSB
DSC
'051'
050.. 8 13332
13Sl6
DSS
on
12730
DU"'I 035)&
11196
'10060
DUD
DVLtF 09616
14,U
DWLC
09l7Z
DVl~
100]6
DVSF
DWSIII 10Dle
a'Slta loon
DVTR
1004'
lI.U
Il1O
13660
IN
Dun
EN'

-

FOoAO
EOSCT
EOSII
ERoAt
ERtAB
ERRXX
EA
EVI
EVODO
FI
F2
Fl
fit

F5
F6

Fl
FAULT
Fltt
FINIS
FIT
HGRM
FOII ..U
FOUtoao
Gn
GEET
GET
CUI
SIT
COl
GOAHD

CDCL
GOND~

COOOB
GOO..
GO
GOTIT
HClIII
HDDfF
HOP"'
·HUD
HED
HIlDO
HUll
HUll

HilB
,IC
IDENI
INO
INITI
INKR"
. INPUT
fOCAl
IOGT

. ropt
lo••e

.loU

Vt RSI UN

tooco
00004
0691.
\11]8
0181\
OSlO.
\1918
01612
02469
0.656
14964
0926Z
IHH
IH66
15]-'
06410
I2ln
11104
1411C
10516
O]91C
04312
144\2
09018
09210
01190
091&6
09121

SPS II-t PHASE B
leSK
ISlA!
JHB2
JH8
JSI8L
KATHV

LABL
LBAee
Lau~

LCHAA

LIN
UMSV
L1NKC
L1NKO
LINK
LINKS
LIN.
1~IH2

LNIH
L
LSTAO
LUCK
M2tlC
"ACI
MAC2
MACRZ
"AeRO

MAl'

0~.44

MARKI

14.12
12296
13172
05594
14300

"AX

u ....

08316
01507
OUll
046Jl
06001
OJ . .6
02511
11156
11191
Illll
011 ...
15]]6
lon5
~I"

onn
onu
00716
0056.
oouz
OOUO
005U

"BUKI
IoaUKl

"Bun
MESS2
"IOCS
1110
IIOOEI
"ODE
MODOC
"OMAD
"DilL
"OStl
"OVE

"""

. "Till.
"UIII
NAST
NE
NE~ll

NINES
NMOAL
NO]
Noaoo
lIIICall
NOISE
NONEI

.AGE
NONU.
NOOP,
ND.AI

OOSS'
02~S~

11826
liB 18
014SQ
11072
068H
00116
20009
1498]
0381\
0]882
12'88
125'8
03522
1)976
14H2
00000
02181
02520
0)Q09
0'1552
12154
IH40

11172
Il8~0

NOTO'

11336
02448
1480'

OMSIX
ONE
ONEl
OOPS

opnw
OPER
OPFIL
OIHER
OUI
OVER
PACK
PAGEP
PAGE
. . . IL

"All

lOCK
PCONI
'CONF
'CON
,CTR
PDUF
'CSA

UH/>
14a)l.
1138')05321
13835
12733
127l9·
12141
01991
12704
13950
U&64
12616
160Z2

12QO.

NUll

NUMB

14952

06110

.FIl
PCCON
'GNUM
P."OC
PLACE
PROS
PRINT
'Rue
OFIL
RCU8
R£J1t
ROC 1M
REG

06!~6

02516
C18'>6
1214;
09041
12361
1201>1
02218
1199]

160.1
16000
065]4
1~74]

13831·
01631
05220
llUD
11044
I.".
090'1
IUa.
136.0
1.962
OZUI
00457

U·

S~A

gq~.o

SHAG
S liE
SKI'
S"Oot
slO'n
S'IL
SPEC;
SPU I
S.S"M
situ
SICNT
SIP"
SUBO
SU82

15214
14748
09572

sun

0291~

0621'
06218
08256
14990
021U
09S16
L4160

lun

061'1
02641
0)912
09033
11521.
12100
l2lll
12]99
lZ~ ••

079. .
10160
lJ25.
RELS~ . DZ41.
0• .,.
RfNU
RLeu 12•• 0
IIlOP
DuDe
RfilARK Oo.ZI
llMOP
OUII
RfIIRK
02115
11M
UIIU
RSCAN OU'4
10•••
ISIN
IISTRF lUll
ItSTR
1"04
51
01".
SAVEF 10"0
saVE
1""

00~15

51

SAVIN
S8"U
seoul
StANI
SCANA
SCAN
SCU
SECCD
seCAO
SEE'"

sun

SUU

10H~

02&13
OZ6H
06)58
0.17.
060..
11129
II"~

041 ••
129"
01971
1~1I0

Ion.
II . .'
090.1
COU5
000.0
06114Z
IIS64
025&0
OUI4
OUll
12195
041~

15012
0"10
1437Z
IUl4

15''''

SU. .
II...
SUet
sueo
06U.
SUBIII Ost6.'
SUBNO onu
SUBS" 01612
lOVAOD IInz
UPIN 02660
IlIll
OSS"
TeL2
Dt43Z
TE"PIt DUll
TEMP
,DUll
TEST
011015
flU
05U.
TUNS llOJ6
TItA
1.,20
fRDSA "1121
TRII"M un.
TRREC 1'1'.
T~O
OU"
TYPt
OtQZJ

"""

Ot6l1

~a

UJ60
Uut

X

~OJl

lfPO

02100
15U7
1 !JIZZ

USED

ZEROS
ZILCH

162C-I443
~KFACO

SEC INs
SETHM
·SIMPlf
SPQFtO
55 TOAO
SSTSCT
f~O

1 ~998
10)52
11296
14114
11248
18908
00035

~O~ITO_

ST'CKR
STt"Al
STCHAR
STKU,
STNUCD
5"CS.
S"RSN

VEASIO~

. SPS 11-0 P"'S.E •

sun.

10414
In" .

$UIO'D
SUIENT
SUIOUT

l11lt
Olt04
11416
OZ470
02472

SV~UO
sy~raL

SVSCAl

PAGE

02~71

04.01
090 Ii

on..

02,41
16001
00475

0900.

VAt,,, .

.0404.0

,IHIIIGS

02420

IUOIIIE

U~u

UD'"
T.IIUMI
TIINUMI
" IHSN

IOU4
074 . .

hUNf

DUU

CZUJ

1.8 ~
162C-I441 _ON ITOR 1

00400
0~10

OOAI'

00410 '
00440

OSC
0
DSA

OC
119.
.DSA

004'>0

,DC

00"60 OODA,

DSC
OZ

2

SPS 11-0 sua_OUTINE SUPERVISO_

AO_ CF RECORO URK
AOR CF RELOcar ION I NCRf.eNT

.,520
,1)65

.566
tllb
,196
.16CO

•1
5
12CCO

.
.

SCRA ICM SEC AOR FOR SUBRS

.2165

,P(I(+))

.1280
• 10
.8000
,"00-1

,PCK

SIART Cf AREA CO~M WITH FORTRAN lO.R
-I~O

1210
XEO
439
468
414
421
XEO.H
XEQ

10
2

, •• 21

.ooon

• SEClST

..

•3

.000&P+12
,480

.lSfAT N
.15

,

..
...
..

•. 7
·,1 t

.7,

,RESTOR+I2 ..

lUC

~F

02210
02215
11014
02402
02402
02414

SUBR SUPER ON UISK

RO SU8R FlO ·SC;TC
'UJ FHE AOR
PNT TO SEC tNT OF· NEXT SU8R
PfRIII? HIGH CDU TO FURM ADR
'OJ. i STAT REF'RENCE
ELlIIIN"E A SIlK IN uiu
I. IF ANOTHEA .SUBR TO IE P*OCESSEO
PREPARE fO lOAD _OBJECT '1I0GRAIO
ItE$lCRE RELOCATION INCREIIENT

02~a
02~1 •

02450
02462
02474

01"6
OZ4.¥

o.
~

02522
02514

anSI

.IOG

DU65

OUU

on"
anti

OOAR

.'

oa59'

'-'

110 suaRS

RE~D

X

2
0
5 •
11000
0
0
0
0
16
4~

ZI

11

n

II

16
43
16

10

e05.S '-Z~2S
005U -260B
e2591 .-2674
CZH7 "OOQ),
ca . . ~ OU20
02497 ~C.OOI
OlZlO ··0.10

U401
COU9
00468
l6 00'14
I)
CD421
16 02415
49.' 02402

·~l641

~oon

onto u

Gnu
HOLDS DDA 'FOR OBJECT

.-22

.0

0
0
0

01000

.OOOAR

.-.

0

0

a

0199~

.11014

C~ECK+]5

00421
004H
00415
00520
00565
00566
00116
00196
01600 .
02165
02398
01210
02215

AREA feR SUaR RUU IN

.OUIO
.02215
14C2
10RT
10GT
OOV>S
·-1
DCOAPH

PAGI:
1
0
0

004&'·

,471j

DC

00420

VERSIO~

,401
,421
,434

cccoo

Q26U
Q1jooo

~z';n

zo

2

sx
·a,.,
I

01'9,

fRO" SCRATCH

lASE

9l'"

on..

••••

02601

"~9,

OU06
02606
0,60'

"
,oa

0160'

18~

un.

0'041

OF ONE ASSEM8LY.

00010 CO .... ON. OS
00040 RMARK os
~oo~o RH1~C US
00060 SYSCAL OS
00.010 IOARC· OS
OS
00080 10RT
00090 10GT
OS
00100 lOCAL OS
00110 MOt.lCAl OS
OS
00120 SASE
DSH
oopo PCK
00140 ·PWSL OS
00150 FOREO OS
00160 SU8VEC OS8
00110 ilOO
OSS
00180 BUF
OS
00190 Rill
OS
00200 RII2
OS
00210 SSlOC as
oouo
OORG
·002.)0 XED
HII
00240
8
A
00250
A..
00260
00270
TO
DOzeD CHECK A"
TFII
00290
00100
BO
TFII
OOUO
SF
oouo
TF
00 no
CF
OOHO
TFM
00150
OUl60 Uti
B7
Dono ODAR
DSS
00110 OOOAR OSC
2K
OSA
003'0

tt-

fllENO
tf.SUC

5 .•
• . . 00
I

.....
I

l

.x

162t-1443 MONITOR I
D~

00410"

U04,0

__

CCAP

Ct

VER~ION

,0

~P~

II-C

~U8ReUT

IliE

~UPERVI50R

"

"

FOR I~FO ~OSI DURI~G LOADG OF sueRS
oo •• Q ~fSToR ass it
,0
I NOI tAlCRS FeR REOD SU8R~
!laseo UTAh OSC 30
oooeo 0 c c t ceo 000 0000 OOOC CDC C0 00
OAt I,e
00110
0
ALlG~ SEt LST AT EVEN ADR'
OORCi .-1
DUSZO
LI Sf OF' SEt LNGTH FOR REDO PROGRAMS
,30
uOUP ~ECl Sf DS8 ]
OORC ·-~c
DOhO
,0
oo~so COASe
DC
I

"

,

cOHO
OUHO

00580
00~90

~
DC
JQ6U
)
DC
-01

OU
DC

OOUO

00670

02672
026h
0211 I
0211 I

]

02724

~

02124
U27H

-HOO
I

02132

~

02132

-2711

I

0l1H

,c

"213'

]

01

02

~A

ou690 OCA2

esc

,0

a

DC
5
-4808
]
DC
-06
OSA ~A2

Au Ill.

,.

,

~

02/41

- '400

a2H.

I

DC

"

DC

,0

]0

.
.
.

02154
01151
5 •

02162

00740 OCAW

.'

(J2'''Q

,,,/jOll

00110

x

I

71t~

~274

"

00720

I

~

CC

00110

01613

SIMULATE DUA .0.0,001."A
,0
Ru OBJEt T SEt r

00680

007CO

20
)0

C2' 11 •

"
,0, •

~

DC
-01
CSA

02621
02641

~21t6

FOR SVS CO •• SEC

,22
CCAse

-ooco

UQ660

-2593
-eeoc
I

~2119

,I

"

DC

00610 •••••• oc I
00640 OCA
uSt
0
ct
OOUO

02614
02619
02620

02116

,19663

~A)

00600 OCOASC DSC
22
DSA
U0610

2

PAGE

02614

ltIRT Sl.8A

O~

~l7tJ"

-29]4

02761

I

~21"

OISK

I 8!1
162C-144l "ONI rUR I
Dono

C~A

00760

DC
-00

00710

OS~

00780

DC

uono DeARS
0(1800 CC~A

DS
DSC

VERSION 2

BASE
,0

.

PAGE

SPS II-e sueRcur I ~E SUPEAV I SOA
v21b"l

~

O1l69
t2712

,..lbCO
]

~}171

MOC
,I

2C

,I)OA

2

,22

';; RU SLBR FeR

.00IFICATlC~

GU17
"2178

-8CtO
I

li27H
li2JlQ

20
2

Z2

Q0810

OSA

02765

CCA

-21)4
I

OQIlO

DC

I'

1/2786

00810 CCU2

OSC
22
OSA

,22

02187

00B40

Dono

CCA2

,

DC

00110

DC

001.0 DCDAII

OSC
02
DSA

00900

1

"

00910

DC
OSA

tlA

OQUD

DC

3

-'"

"

oc

'5

-2734
I

x

•
-2164
I

02115

5'

02815

-'''00

on ..

.Olt'

",.
xEO."

01010 ".~A ,~SC

5

02801
02B02

02809
OlllO

""

IIHEN NON 01Ste, INPuT

"O~UO

02132
42 ..."
0281.
0"6'

olin

"

,010'0

V2801

028,,9

00•• 0 ••••••.
. U$ED IN KED PoRTION OF
469
00910 lIJODI$1t SF
416
,RESTOR
Til
00960
tR
~RESTOII.6
009'0
,IIOOAII
0.0980
, 81
0099.0
dO
0100,0
.DC
I

'''"

I

028C)

,02

DDA~

00920 NeCDA

-2749

0219_

,22

OOARS

2

5 •

C279]

0219]
02794

"

001160 ODOARS OSC
22
OSA
Dono

5 X.

0278~

,i:

02U6

,1,9113

DUll

x

J

iz
.31
1.1
I.

...

00"69
00416
OOUI·

.oz.. ts
0,40,2
I
"

J9".J

190

.J.

oeooo

02621
02621

-2585

H2C-IH) MONITOA
010)0
010~0
010~~

OC
-03
OC
6
- OCCO'
DR COOE 10
00A."02
07
ROFR Sf
naRC 2qH
WAl
IR
SUPER
OoAR
TR
FaRED

01046
o 10SO
01060
01070
oloao
01090
01100
01110
01120
011)0
01140
OllSO IOU
01160
01170
01110
01190
01200
01210
01220
01230 ROFR S I
01240
ul150
UI260
UU10
01110
OI29U
01300
01110
01)20 CAP
01))0

TF

DOA +S

10
I.
TFM
0
10
eM
OS
6M
00

oOA
AEI roo
lOR I
lOG I
100
100

01~00

Ul41U
el410 FOAex
OIHO
ul"ftO
o I~~O

SUPEAY 1$011

)

CHAR WA FaA aiM EhTAIES eYERLAYG PG~
,~02
SAVE 08J PAtG DIM ENTRY
,402
SAVE FOR FeRfRAN AND NOOISK
_401
STORE CBJ PAOG olSO ADA
,402
,416
SAVE HTRY ADA
AD SYS CD~~ SEC 'U MAl
• ·.21
,1
,OOOA SC
, "'28
,0 )
,7\011
')
INCltAlDA
1/0 OICII
8R IF PAC'" ON 0150
.... Ahllj

029]4
029H

.~oo

..

,.,
,.i )+14

seT FOR

h~N

08Je~ T

w.3+ cn

, .... S

RfDl.tE tll.CAPel8
,,,,AFt \ 1
IPS 1 \ I

RE

"0 C Il

SF
C
"E
C,

S~SIST-'

SP S TS T
CORI"
'29
10. I
lOCAL

TF_

0

.21,

,0

PMDG

~OV. R~CCAC I NIO MI 'AOeAESS
BA I F NO .A'P AROUNO
SAVE CC~NT OF OBJECT tOAE CAPAC IrY

,

"
"

, •• 1Q

",tiiO

• 22001

,38'

11
16
4~

I.

BR I F CORE I"AGE SPS PRO GUM
IORI HOUSoeep
CALL L1U FaA FORIRAN LOACER

46

OC~6S

-lI~q

~

C05bb

-211~

.

0)1~9

,,980

Ulib"
L lI74
o lI8b
o lIQ~

H
H
H

o J21L
ulZU

II

C lZl5
2

00000

032U

.,II

-J~99

w'+e,"62

UI4~O

~.

COAA'5,I,10

OH~~

UUOO
01510
0"20 RDtn

SM
A.
DNF

DOAAta,l.lO

C3'Ob

U))~8
C3310
03312

ACJ FOR RELtCAT ION INtRf'tNT A\ REg

OC428
-CO-L

4~

....

"

-lIZ6

~)\~O

TR

ODAR+lltltlO
,,,AF+2)
• +Z4t

OC~02

Cll26
C2817

I~

H

CHIC
C14n
cn~8
CO~H
LO~20

CC~OO

01419
-)209

-2716

CO~29

C 3211
OOOuo
L1Ua
CHI3
01200
ueUOO
e740'
C 1200
CCuOO

16

CC~bS

-ll49

4~

Cullb
3

200-1

1I

C2~34

U

0010
C 1401
CH10

CHOO
06056

2<
24

CIHO
Cbuo5
Cb'b~

4b
II

034 30

2~

Ob4~'

4b

Cll~8

)1

O))SO

70,~"S

CC4~2

00407
C0402
CC416
-3017

16
41
15
Ib

~]

H

03342

.. A2. WA

00402

01100
CHn
C13)4
COOOJ
-2011
C 1)00
CCC02

0)05~

U1066
o 307ij
03C90
C lI02
u II I~
03126
03\ lti

UI~80

COR 1M

2~

2S

01410

01~60

26

030)0

CIC
38 '
I"
IF

J

11

C1006
01018

ell!'
0)246
0315&
0)110
032ti2
0)29.
03306
01118
o 33JO

ftA IF CAMII I ~AGE SPS PROGUM
• .AFt/)

OB6S
t1280
02739
C2H4
02621
005&5
C0566
CIC )8
tJOl8
0
C2"92
Cll18
C))\I
05980

IF NCh DISO INPUT lNCl1

.'

01 " .
(AP

1I

0)O~2

100 I
,·.2)
10Rse
,CODA IC
.1
CALC IllE OF U8JECI COAE, MIGHESI ADM AYAIL IN CAP+lti
CAPtlS
,20
,10. STEP HI AOCAES~ 8Y 20000
DC
,--1
2

IF
C

0126

0101~

,.At 7CJ

IA
BNR

C2n~

~.

02994

OISO INPUI

READ FIRSI AeCOAO OF
~O

2'>

02qO~

029H

B. IF PACG ON CARDS

..

02892

02946
02958
02970

INPU'

1III,.n

SF
IF
IFM

PAGE

02nO

,

"ONF

SuaA~UTt"E

0288~

FOR Ex
Oso S.
.-1
ROF. S T+ 2 h SOOOA-~
RO FRST
NDOOA. 2 .2
, •• 23
lOAf
,7
IOGI
• OOOA
SAve CARD SEQ
CAP
,OSKSw

TOM
TFM
ijL
TOM
IFM

SPS 11-0

.0'

FOR Ex

...... ,.

01340
olno
G\360
U.I310
0\380
013.0

·

ORe OOE

no

YERSION ·2

1I
II
I.

~6459

C2~3~

CI~73

COO-l
COU-I

C7.n

OC~-I

~H18

II

~)410

44

C2H6
03H4

03442

21

C1443

03454
034U
C)418
034.0
(')sC2

25
II

00441

OC~21

CUll

00021
CCOOO

191

01530
u I~'O
~I~~O
OI~bO

......

01~10

u 1~80
QI~qO

OlbOO
~1610

01620
0lb30
016~0

Ol1bO

......

I

YERSION

SPS II-C SUIRQUT INE SU'E·RY ISOR

~NF

NO I SV
MANIL
SUM SE I
Co SE I
IIIAt !b

~ESTOR'l

,J7t'liA]
t

lq .... l

,111+'" )

lij IF SUBSEI IS ACJ AT EXECUTE T I"~

• 'hIllA]

INSEA' NelSE DIGIT

~1514
on~b

,'~.WAl

111 •• 34

,7IHIA)

INSERIS UNITS CIGIT OF LEhGl~
INSERT TEhS DIG INCL FLAG

ons.
01'66
03571
OI5QO
01'.1

",.1,+34

......

TFM

"

.

.. .
"

.,

.. At 38
,02
,10
RD aiM
FCRCE SIT 02
AM
DDA2+5
,6
, •• Z)
IFM
lOA I
AUD RnD DIM ENTRIIS
B
lOG I
,1
.OOOU
INSIST THAI MU TI S$A LE "GlH "En SPfCIFIC"ION~
tM
MAtn
,02
.10
•• 24t
IH

,

CM
BL
rFM
TD

ro

TF
8NR
TA
eM
TFM
BE
aH
aNA
TOM
SM
TFM

e
Oa070
01010 .DELETE ReTY

.... 15

II""
••
2~

,02
.41

"
"

.-u

""

H

~I4H

12

01434
OUI4
C 1411

49

H

C1H9
Olhl

cun
C7H~

C7318
CCCOO
CHili,

C1438
0151
C2U4
onn
C14U

000-2
01100

I~

u

46
14
46
16
4~

CI654
C2114

eHn

onu
OhSi
onu

C7418
-eou
CCCOI

-~II'

OUOo
000-1
01200
COO-2

On46

1\
4~

can4
DOl.,
00 . . 6

-000'
-nil

01110
onu
0ln4
01106

14

C14U

46
It
14
H
It

01411
014U
CII'4

000-2
01100
000-2
UOOM'
OUOO
000",
0·1411
014J.
01411
O19U
02914
000-1
-DOlL
01200
01100
01446
00001
-000'

OJUI
01910
OltU
OJ'l~

01 . . 6
OJ9. .

«MOlD
04022

IU

u

OUIO
CHU
on02
CHU

cun

on~1

onu

"

CI591

4~

OIUO
01142
011S4
OJ . . .
OJUI
OJ190
01902
01914

.4.
.10
PCK.34,WA+JI"t
SUI.OUUNE sn I.D.
PCo .)6
,MAt36
NClSt DIGIT FDA oeJ ,G_
pco.n
.L
+L FCR CIJ
CELETE
.MU+\9
MAl.600.IIAI
MA2 +15
,01
.10, . DECODE SET
AMI
INO Lec OF R" AT END OF ALPH'
FYLAFP
YL AFP
DELETE
.ISUT-U
SUBNO
01
Sf T TC 01 FDA SOFT DIY· SET
SY
.5
tAPCO-2, SOFT
FYLAFP
.10 SET M

01514
O1'H

44
4q
25
4q

14
46

onu

.10

.... ]5

44
44

DIU.

onu

,10

can

41
1\

onu

"
"

n

CCH4

03610
01622
0)614
OIUb
OU66
oun
0'''0
on02
onl4
onu

•• 12

n

TFII

0)51~

.. " .)1)

PARAM

PAAAM+12
.U+MAl
INSEAT SUti SET 10
"'+38
SEr ~EC TOR ADR FOR REQO sueR Sf T
03 AF • • ~801 ,02 VL • HI4 ,01 FXL • 4820 .00 DIY • 4826
.NO CONTROL TYPEOUT
80
,IIIAt 11
8M IF NCT seFT DIY SEI, 00
AM
00A2+5
,\8
TOM DDA2.8
AI
AD DIM
tM
.At38
.02
,10
KH
RO DIM
1M IF AFP SET 1011
TFM 00Al+5
,~8H
BE
AD DIM
YL sn 10ZI
CM
WAtn
,Oti
.10

If

PAGE

03526

,

011.0
DilDO
01110
01820
OIUO
01140
01850 RODIM
01860
01110
01110
olno
01.00
01.10
01920
01910
01940
01950
01960
01.70
UI.IO
01990 $ETCOO

01040
01050
01060

RESTORt' ,421t

,

olno
01180

01000

IA
CF
ANF
BNF
81
10
NOISY
A7
IU
MANTL
10
SF
01
SUDSET IU

......
......
......

02010
02020
020)0

ru

PAUM

Ulb50
"16bO
01610
OlblO
ul6QO
01100
01110
01120 CKSf!
01710
01140
olno

~ONITOR

162C-IHl

P ItoU'
.AE l I Nt
SAVE AREA 421-HO. elA FLAG ON 420 FOR NON C I SK I N'UT
o~ I
.42\

16

n

It
26
4S
II
14
16

CUll

0141'

on. .
02401

au..

04022
OU34
01'4.
01210

46

OUlO

"

04102
04022
04'"
0"40
OS19.
04nO
OCOOO

a,46
12

"

4'

14

-UI1

....

-

DUll

00102

~

VEOSIO~

lb20-U43 fIII(jNITOIt

OlOQU
01100
01110
Olllv
01110
02140

OHE If-I

2

SP, II-C

SU8~CUTINE

PAGE

SU'ERVISO~

,b,

,

04014
D404tJ
L401(.

SY SCAL
,4
MONCAL
COEAIE AOC VECTOO fOR ADJuST.fNI CF P ANC C O'EUNCS
TFM AMl
,-,"7
It.lO lee CF R/I' Af t~C OF AlPHA

04rHl

02110

S~

FVlAFP.3S,~8

04114

Oll80

A
A
S

lOC II;
,L
lOC ll'j+~o.L
lO(111)+lO,l
LOClll).IO.CJ ... q~"

VLAFP

02190
ullOO
OUIO
OlllO
02HO
02240
02HO
02HO
01210
OlllO
Oll90
OBOO FYl A,..,
01110
02310
OIBu

"",
AM

~OC.l1\.lo,1

TF

L.OCII;+60,LOCII;+10
l
,L
LOClll)+20.l
LOC 1l'.i+10,l

A
A
A
TF
A
IF
S
A"
TF

I NSf Il: f

I NSt R f + 2l

II

11

LOC11~+30,lOCllo;+10"

042 J4

2L

LOCll"+30,LO(ll"+30
LOCll;+HO,LOCIIHlO
.+3'.i
,PICKUP

O'14b

·+24
PIC KUP

042;8
04210
001Sl
fIIIU'VES PIC"'- IF

,HCLST-12"

OODAPtll ,PlCKUP
Suo NO- / ,,,A+ 38
RO SUB
CK SUR
.l5TAT-10

Ul390

DNO
OS
81
"0

U2400

A"

INO

,!

,LI,
010

u141u

AM

Sl;[} NO

,1

.10

02HO

AM

02410
02440 S TP$V

AM

ot""dOddO
5 II + "5
,c;

~E

DC

,

CAP CK
R 0 SUM

SV
NF

2

.

SID., SEI

,I,

SA.

ANCT~ER

I F

fiR

U421,j4
G4 Jeb
0431/j

PC'" SHeRT

SUBIol

RECC

P~TR

I')TA'

, I NO

(~J

~C

04

~

h.l

C4
C4

)It"

nl:l

004 l'lu
GIt) 5 d

IF ')l,.8R I') uSED

u411u

G43dt
004 Hit
C44Ctl
SL~'¥EC

,')
,1

AOJ

,01

NU OF

044lb
u41t lC

PCI",YEioI

ISIAT

f~T

TlJ tK pelot

SU8~

BH
AO
TO

CK

IFM
80

SV+S
F JI'IAl

01'10
OH40 00SU8

B1

AOJ

TF

AO

Ol~50

I"

AD SUA+)!),IA

01')60

T.

ODARS

C~

UOARS+11
4

.
,.

02500 DIM
O/~10

O/HO
0/580 SOSNO

os

os

AUJ

STORE 'E

,
OIM

FO~

,lO
,.A]+18

.

I\E

[,f-

~f)(T

POIl'oiHR FOR NE

Ol~

IN el'"

E~rRIES

uilt41t1

lJ4"'HJ

,

C.4 ') C,
04'110

SUO+ll),OIM

DEL E Tf

fIIUVt:

l:[I"

E"T~Y

CK SLUR fIoLJ
Sl: T ~G A,,"C

,

,

,)U~1oI

TC

eCA

4UO

LOCll'.i+I)O,PICKAO

D2blO

LOLlll)+bO,P(CKAD

NU. HAS CC"'E RfCL tiV
INSERr PICk. +l
INSER' Plef( -L

162C-1443 MONt

'OR~~

'VERSluN 2

rrl~

lNSE~T

lOCllS+10,PICKAC

uSEO

SoPS
PICK

11-8

FeR:

IoIGG

~y

P~tVlvUS

LAST

SUHRCUTI~E

SUUR
SUI3~

A

..

.
,.
,

,.

,

,

,b,

·.zc

"

.'
•

,b,

21
2.
2l
41
II

2.
U

.,
••_l
40

II
II
II
II
II
II

06115

+2l

00100

00102
CCIUO
CCIOl

CC004

-c 14P
-OO.k
C 14]~

061b5

0141~

Cb

(.. 14 31)
R'1'1"1Q

J2~

06325
Ob l20,

Ob]15
(;14H
OblH
Cbl'"
CbJ45
Cb)4;
Cbl.'
C.l05
C.30b
(;1 . . l
Clb 19

C4;5;
C4SlU

-COOL
0032;
C 14 35
0741~

01_ 3~
OoJH
0034;
Ob345

c 7,,4}
01100
-2bb2

01"l
C 1418

C4l58

a

c,>s')Et

C4"J 10
C4 J"q

04,:»",
C441P
C'> 141)
0'17,,0
(;4418

0434R

ccc- I
GCO-I
CCOJO
-CCO~

CC/;- 5
CCO-l

1

."

C llce
CCUKO

i'

Clti"J8
(.4411
C44 HI

16
.1

14~

-SGC7

a,H8

C443d

II

."

o

0'>

-n'l

C44')"

I.

.,

C4')41)
04.,"'15
e2l34
Co? 1') 1
04022

el200

II

Ob]')"

-GvOO

11
21

Cb lb5

C4';tSl

Co] 11)

C4"J81

l:b~U~

04':>1:)1
02147

16

It
11

-

04471

-CU11j

cOOOO
-OcOO

a

PAt,;t=

SUPERVI~Of<

LOCllS+SO,PI(.KAO
I~SERT PICK -2L
PKLP
,CDAPS+l1,t
STORE CORES uSEu BY SUAR
TF
IJ2bbO
SET VICKAD TO IENI CO •• LE.E~r OF LCRES uSft; ()Y THIS SUBH
0lbl0
TF
P ICKAO
,DOARS+')
02b80
SF
0lb90
'''KAO
,9QQQQ
AM
02100
P"KAO
PICI(AO
01110
.I
A"
PUT NORK ARFA CORE Ael< I~TC OOARS
TFM DOAOS+1) ,MOD
01720
, •• 23
Rf"O 11\ SUijRUUTINtS
TFM
lOR I
02110
,1
,nDDAR.S
lOG T
8
u2740
, •• 23
TfM lOR T
UlI;O
PRE SEEK
,DOOA'"
Ol1bO
D
55DISABLE _UOIFC,"
SET P+25 ,I
0277"
TO"
ASHeAN OSA CF EACH SURR
,-2
TOM MOU+~
u2780
,tJUF.6
S£T 10 FIRST l'UleAtO" OIGIT
0279" MOUI FY TF_ CAA.D
SET PNTR: TC FIRST INC ON 1\1::'" CARC
.CARO
TFo PNTO
01800 MEweD
ADO Cf FIRST "0 FeO NEXT CARC
02810 elOO
OS
AOJ AOR OF NExT CARD
,75
AM
CAOO
02820
(I( I MJ ceOE FOR RM
,BUF+6
02810 NXTIND 3NR Nor OM
POI NTS TC SUSR PO'IT ION Of I"TE"EST
uS
02840 PNTO
810( IF eREAI( IN SE"UfNCE
,PNTR
,11,
O.
02.50
"NF
81{ IF I\El!i CA~C REQUIRED
81
NE. CO
Ol8bO
AuJ FOR f'lEXT INL) ulGIT
PNTR
02810 RoM
A"
PN rR-ll
61
0188U
B~ TU RO~T1NE TO PROCESS DATA PER ,"OleAreR DIGIT
028QO
.+17
,PNTR
.II.
I N>ER T I'D COUE
TO
U2~OO
BR AS INUICATEC
lO(115+5 ,
81
02~10
,lO,
AOJ feR LENGTH OF· tNSTRUCTCN
PN TA.
,2
AM
02920 INST
LNG
,PNTR
.II,
STORE LENGTH
If
02910
,10, ADJ FDA P OPER HI OROER CIGIT
AM
PN fA
,1
02940
PN·TII.
,2
AM
02950 SET'
StT TO IND. OPEO ~DCIFCT'
SWPQ
,-I
TOM
029bO
1
• ·-1
OS
01970 SWPO
,ll ,
SO IF ELGISLE FOO MODIFICATION
~OP
AOJ
, c n PNT
02980
AM
PNTR
.10
02990
LNG CK
01000
S7
8R IF ~CO OF • FIELD OEQO
SO
01010 AOJ
POINTER FOR ,U80 MOOIFICATIC~ CONST
;
0)020 e7lPNT OS
Q GK
0)010
.I
NO
F
OR
I
NO
IREe
T lO~ CONOTN
DOOG
'-4
01040 INOA
F I ELO
PNTR
SET FL1G TO DEFINE
SF
01050
F IElO
AM
PNTR
,4
.10,
40J
FOR lO" ENe OF
O)ObO
FIELD
,PNTO
.11,
SlVE I NO 10~ CCNO OF
TO
INO A
01070
•
,b.
RE~OVE
lNY
IA
FL1G
PNTR
CF
01010
.eTLP"T
.11,
INSERT COOE FOR "OC lDJUST
TO
-+22
0)090
,LOCIIS+40,b,
AOO PROPEO VALUEILS +PleKI
PN TR
A
01100
oI~O •
"
WILL PResUVE NEGATIVE RESULT
HNF -+24
01110
PNTR
.b.
RESTORE
INO lOR
•
SF
Oll20
,4
.10.
PT At HI ENC OF FIELD
PNTR
SM
01110
PNT.
.5
010.
10J
FOR
0
FIELC
AM
Ull40 oeK
.I
010,
lUJ FOR NEXT COMTROl olen
C TL PNT
1M
01150
,s.po
8~
IF
Q
FIELD
NO
INST
BNF
01160
.0
" S E T TO Q FielD
TOM SWPQ
01170
.CTlPNT
.11.
8R If ELIGIBLE FOR "DlllfICATlOII
lDJ
BN~
01110
15
..
lOJUS T FOR Q OPERAND
PNT.
01190
A"
02b50

(J4'l'i
G4'.34
(;04"i4h
C4 '>5 I
()4'>'l1l
04'> 1(,
04'Hll
Q4'Jtl2
04'>44

SUAR

NL

LOC 115+40,

......

El\fl(y

,1'400+7
,"4E

DNE
0/590
OlbOO
A"
Olb 10 PICUD OS
A
U2b20

02boltO

044",
lI4454
0440b
C4411

SUB

DIM
NE

II

02210
04.W!j

(j1t4~~

- I

01HU

26

O'IIC
041n

ilBbO F IN1L
01 )10 INO
OH80

02410
02480
02490

Ib
II
II
II
2l
It
II

041~B

D7

SM

0411b
C4I1b
u_lSO

+L

0'114
e41 ti6

02)~O

s.

C_ICI

u~lb2

IF

0141)u

04r,~4

!N1t.I -L

ul140

014bO

ceCDO
C6141
ceooo
00.15
C010b

CJ40~h

OEL TEO

021~0

a 21bO

0402J

L4t.lh

21
11

.046 ]("

/.

06 ]tfl)
0508')1

U4h42
Il4flS4
c.,,4bb6
'-l4h Itl

26
12
II
II

C4'.1IH

U(.I.,.O(.l

0.501
";81

R<;Q9'"

U4b"lL

I.

Ol1.41

C4702
04114

Ib

Ou'io'>
005b6
OO;b'>

-tluOO
-4125
- 2 7.'1')

-4144

CO']0;4

-2l:iO 3

C.04"'0'"

C4"dl

~4<)al

021'1

-COOl

(j473tl

.,1.-~

U" 1Sf.)

I,

04~43

041b2
0471"
041ttb

I'

0800i)

OCOOI
COvDI(

Ib
Ib

04191

-800'>

e4ti21

-41Q7

II

041Q7

eeop;

"

04tt62

-AOO;

C4S42
"18b
04821

ultU2J

04720

C_ 711
041Qd

0_810
04ti21
04H2l
u4SJ4

04842
{J4b,)4

048b2

04"74
U4ti62
Ult8Q4

04.0b
04.1.
0_.30
04')40
U4~42

04.;4

.."

..
II

25

••

C4ti21

15

C"q.40
I
0 . . 74
C4821

11

04~14

.1

OCOOO
00000

12

0482J

11

04821
04Q91
C482J
OSOb4
0482J
05090
0482J
04821
04821
04985
C5182

ocooo
000-4
0.e2J
00000

2~

05010
0;042

H

..

21

OSOoo

44

05090
O;lCl
OSI1'

12

2~

32

11
11

...
IS

04q40

05150

U

0'162

11

04974
nU21

OHli

049EtN

-0010

05218
C~102

oso~

O~l2b

O'Sll

000-2
0482J
OCO-l
-C002
OOOOJ

04994
5

0.q8~

oson

C4ft19

Cb320'>2/1
04821

41

OOO-b

04" 10

II

4.

05018

o

2b
11
II

O';Q6b

04986
04q93
0499.
osoe.

a

04~8~

Ob3"
04QQ)
OQOOO
oeO-4
OOO-.S
000-1
04~40

OCCOO
04Q8N

-ooos

16/C-I"3 MaN 110. I

81
03200
01110 .01>60

Hili

NOV2NOtll,ICP+12
Nov2NO·b t TCP."
MOv2NO+ 11, TCP+ l
1401J2NO+6 ,YCP+l

o 34j80

,seeN

,Ll,
.61,
II

,11.

..

051Q4
051CO
0521M

0~280
0~/Q6

PI AI

INa

12
14
H

11
II

~Slll

H
11

0'>334
05346

O~Ho

)bb

OSHa
(;146l
aS,,,
"'49.
0lSC6
O'.ii)lb
OS530
01)')42

A
031)90 JIIIQIJ1NO TR
CLOSE PSCO~
CARD
t 1S
,OJ FDA NE)lT CC
OlbOO
AM
PROTH
03010
1i7
a }610
PSUEDO CONST TERMINAIES CARD 'NO IS "CT CC" ON "EH CARD
CARD
.11)
03b)0 P'iOTC
AM
() lh4tO
TFM
-+]C
,TCP+4
-Ita
,rep.')
G )o')Q
,I\,
,IoUilS-bO
0)600
TU
P LOAD
U3bl0
11
, I
PN TA.
_OJ fOR NExT I " CIGII
01680 ON8
••
p~ TA.-ll
0)6'110
R1
FORJIII INFO REQO Tn COMPLE IE LOAOI 'G OF SII~.OUT INE
OHOO
AOJ E-~TA:y _OINTS IN Sl,BVEC AS . . 0 BY
or SURI OF SU8R.
OHIO
,NF
AOJ INO FDA ALL ENTRY POl~rs
OH20 FORM
1"0

o~

OHIO

Qlj1t86

oil

C4q~5

Ol).,o;ft
u'i'iflfl
uljl)1b

OS5QO
OS"2

-6SI'
01100

ceool

0~/11

CCOJ2

2

....

0""38
AAEA

05218
O'Q41

05242
052'C
OS162
05270

OS426
CO~IRCl

14
41
15
12

41

0~414

8. IF CCNT C. " l IS
LUAD PSUEDG ceNS' 10

OS218

0'013(;

OSHa
013QO
01402

,eA:

"Q

0~221

(jl)

ADM

,]
,PNTR

"NO
IR

P~T

"POIIliT AT

t

U 14190
Ol'lQO

•

DISABLE MODIFICATION
AOJ AVAIL DIGITS OF INSI.
Nu OF U~PROCESSED DIGITS CF INSIRN
BR IF ANCIMER INSI IS NOI AVAIL

,1.2

PNIA.,2
Tep
,PNTR

114

0~182

,cnAR+Jq

,

.M

PAGE

11-0 SUBROUTINE SUPERVISOR
O~

P+21j tl

PNTR
PNfR
PNTA
P'iTR

OHIO

SPS

N>"NO
SE I P
,IlNTA
OR IF RElCCU AeLE
CO" Sf
, 1
PNIR
AOJUSI FCR PWEoO CO~P'RE
PNn
oJ
PSl,Eoo
B~ IF PSUEoO CC~STANT
PN ,R
, 1
.l 0, AOJ FOR INo OIGIT
PN IR
,2
,lOt AUJ Fa" LE~GIH FIElO.
,PNTA.
AOJ P~IR BY L~NGIM OF CO~ST
P"IR
,la, AoJ FOR NEor INC elGII
PN'R
P"IR-II
PUI PSUEOO CONSllNI INIO CILAR ANa FILL BAL 01T" REC ~KS
REPLACE 'OR Oil" ,ERC ,.REV£,I PSCC~ FRO" BEING LOAtEC
AlSO .0"5 IF PSCQN IS SPLII ON 2 CARD RECORCS
C ILAR.S9 ,.MS
SET CC~TRCl AREA 10 RECORC ~A'KS

A.

OH~O

VERSIUN /

CK

LNG

us

a 12qO

CK
PHT

,,~

/.
II

C~BIO

01100

C~q18

OSllO

C~82J

04821
C482J
CSH'
04821
00821

000-1
00-01
01200
CCO- )
000-2
0'02J
OCO-I

C~821

04821
04kl0

CbftSb

11

061i'
C<821
C6652

10
II
21
II

0'82~

-cooo

0'821
C4.21
0'B21

-COOl
0'M2J
-0001

O!Jltqt,

C"-H2J

11

06065

I>

CItI.l4t )

I'

C_QM5
04810
04B21
05bl0
00821

06656
00005
-6461)

.,
.~

...
II

12
16
I.
21
21

C~1)89

-0002
04M/J

-CC05
0 •• 2J
-000 I
-6664

Q55HIt
O')"i8'}

-bb5b

0'>58'"

11

cocoa

0 •• 55

II

041Q1
05jQa

-C07S

..

Cbbl)'j

cccoo

ell, 10

C41(41

-C015

0~1,1l

05.~l

v'1b )4
0'l64tb
",I-!iH
0'ib6b
u')b 11:J

C56~2

-bb'>b
066')1)

ocooo

Qbj9f1

C~4"O

CCO- )

04821

0_. I 0

C,.

T.

,~E
SUB NO
F IL SV+)'j,1)
illtCKUP
SV

o 31bO

A

PCK

.. "'00+ 1

01110 S,
01180

as

S

,

03130

on"Q

u 311j0

1\

FllSV

,,~

U1790

s~

01800
03810
01820
01810 SCT
01840

BH
IF
IF

05
IF.

OJ8~0

U 38MJ

O.U70

,~

03880 PKUP
() )890
o }900
0)1110
03920
01'BQ CAPeK

u ]Q.ltO

,.
os

10M
A~

~7

A

H

s.

03950
o 3'H. 0

Sv
NE
F Il SV
se I
00 ...... +8
5
JaR'
10RBC
ODA"'+I)
PIC~UP

5

SCI
IS"r.

·-0

VERSION 2

.
..

,DDDAW

.ODAW+H

d

01
01

SPS

11-0

HHRJES

SUBROUII~E

CON""S AoR OF SUBR
AOJ

Sl..B vEeTeR

REDUCE

01

,

ALL

,6,
, I.

".1

.

,10,

~C

05110
0>722

21
II
II
20

CIt34tQ
04'>'> 1
C50 141j

C4418
0"'18
000- S

C~H-

C71tft)

057H

/1

-lIb5

0')686
jJ')b(H.

SU'ERVISOR

,2

,

,-·23

NC.FUH

,b

, .-1)

,aDAM S"8
.SfClST

SudA

tJQ

162C-I"1 _ONI TOA

so

AOJ

tt

IN SU8VEC

AOR

CF fNlRI ES

RECORD SEC REQC FUR SUB'
ENHR SEC-C" FO • • RI sueR IC SCRIC
SEC lOR COuNT FC" WMOLE SUBROUIINE
.RIIE Mao SUBR O. SCRATC~
INCREASE DIS_ 'DR BY NO SEC
INCREASE CORE ~CR BY SUBR LENGle
IEM' SICRE PROG IOlAl CORES
AOJ FOR. ~E)lT SU8A
INolCAIE RfQO SUS"

AoJ 0 I~
,PCK
AiII! FeR ALPMA
R·I
RO/
,PCK
R. FeR BElA
RM2
,1
~A' E RE CO AD J 10 RE AO OBJECT 'ROG"M

PAGE

5

0'> 1"6

O'>HQ

ceo-,

05H8
0' 710
oHe2

c . . le

CCO-I
01100
02/<2
-2614

O'>1'H
O'i8Cb

I-

05810

"II

U583U
u'JH" l

Ol)t:lq~

osn2

01970

(j')qJ~

o }991..l

OIjQ4tb
01)9'1&

O~180 LOCII5 OS4

osno
OSQ80
OS982
OS9Q~

060C6
a60lk
06010
060.2
060S4
06006
00018
060QO
06102

1I
26

Ii

...
13

CS80~

0264l
OS87/
Clt45"
02210
0221>
0221 ~
~lSl8

Ol)QQ4

11

02510

32

C15~6

11
12

"0

41

25
25

25
2S
25
16
~9

I
02565
01"1
C6018
0/002
0671S
0611 1
C6711
C610Q
06101
04040
04022

OU~O

onu
06150

-5829
-2803
0217 2
-COOO

OCU-3
COOOI
-COOl
0236S
021.'
-0001

ocooo
O,Qeo
02820
00000
C2B16

-3228
01'00
01100
01401
01442
01 . . 1
C1 . . 0
C14)9
-6655

5 x

06300

OblU
00120
06llS
06110
0611S

I !lG

11
I'
II
4q

02172
5
C050S
00520
0276Q
C14ltl
5

06296
OUCO
06]05
OBBO
0611S

o,PCONST ,0 ,CaNST .c .0111 ,0 .IIYEl , O,FOU

21

0.,8') 1
u'i85.c.
058fl6
0,)81B
O']bIjlQ

......

C~110
O,BO~

Q'HW5

OSq 1(;

CF
UOAR·l)
Qlqao a I S,C. BNF
_+48
,0 SK Sill
SR IF DISK PCM
EO 11-48
,NU 01 SK
'R
SF
OODAR + 1
0.000
04010 aSKS.
as
I
,--1
5. HAS -1 .~e~ NCN OISK INPUTINOII
0_020
IR
ooAR
,NOODA
a_ala RE~UCE s.
• IC_U'
,C.IP+L B
ROC 'R U1 FM .R ~VL8
04040
BV
·+12
o.oso
BNH
XEC
0_060
TO
Sllf+bO
,PICKUP
MOVE NO OF CORe 10 S IlE MESSAGE
04010
10
S Il E. S8
• P I CKUP-1
0_080
TO
SIZE.56
,PICKUP-2
040qO
IC
SllE>S4
,PICKUP-l
a_loa
TO
~1lE+52
,'ICKUP-"
00110
TFM oelETE'II,SllE
00120
87
DELETE
041JO
BelOW IS DUAL. PUR.OSE VECTOR. EVE" AoR FHLDS RRE ACR OF
RO\lTINeS THAfORE uSED FO DECODING INDICATCR CODe
001'0
OH50
ODD ADR F IHIlS ARESUIR AOJ FOR THE' AND Q OPERANDS Cf INST
0 . . .0
OORG
6296
OSA NE. CIl,
0'110
,I~ST

08CO 1

OI)JltO

-4110

-CCOO
-4882

5
-0000
-U50

-ocoo
-5310
-0000

-S'"

-0000

-0911

10

1620-144) "ONITOR I

04190

.NYff,O

VERSION 2

PAGE

SPS II-t SUOROUTI~t SUPERVISOR

_"'VE 1.0

OU§~

-ceoo

UU60

-568.

5 M

0616§

06)J~

-oeoo
-6918
-ceoo

06)'~

-69\8

06)U
06)10

04200

.'

-oeoo

OU90
06)95

-ceoo

OS
60
6U AECORD ~AAKS
OHIO R"S
04220 SPSTST DC
8
,61514142
07514842
04210 CTlAR
OSS
188
USED FeR SUU CONTROL CO~STANI
04240 ycp
OS
•
..
TE"P STOR FCR PSUEDO CONSTANT
042§0 S IlE
OAe
43.tORE CAPACITY EMtEEDED QY 00000 LtCATlONS.'
CORE tAPACITY EMtffOEO 8Y OCCOO LOtAIIONS.'
04260 DEL TEO OAe
21.PROGAAM I S TERMINATED.'
PROGAA" IS TERMINATED.'
SUU NOT LOCATED IN SUUOUTI NE ~AP'
04270 BOSET" OAt
SUDR NOI LOtATED IN SU8ROUIINE MAP'
CAC
31.IMPRUPER I NO tODf IN SU8R 0000'
IMPROPE~ IND CUDE IN SUOR ceoo'
TO
NY.ES+~8. SUB NU
04290 NYEI
TO
NYMB+56. SUB NO-I
04300
fD
NYMES+§4. SU8 NO-2
04310
K TM DEL HE
• hYME S
04320
04321 SOFT
TFM RM2
.ooceo
TFM
RM ~
• coeLO
04322
B7
DISKCK-12
04323
OORG FOREO
04nO
•• '8
04340 lOR"KS AM
TO
RMS-§9
04nO
04]60
Gflil
.-~
BL
lD~MK5
04370
04)80
SF
RMS-60
LOAO SuBR SUPER CN OISK
14
ODAL
,101
04390
18
DOAL
.702
04400
TAA
04410

8
OH65
06652
0665§

188
4)

•

06741

2)

M

06187

]5 M

~J6q U~

2~

2'>

GbQ';4

u6Q7u

II
16
16

069~0

~"

O,>q]~

II

C1298

H
14

-6)~1

e·l )8b

.0

DSA

OH40

DC
- 51

04450

056

G/1H

SSlOC

06QI§
C641]
e6.11
04022
02215
C2210

06Q)O

01280
01280
0lH2
01)04
01316
U 1326
CIHO
01152
on64

ollQ)
01196

2

II M
l~

06942
06q6h

o
04430

o

"U51

01316
DSC

I
60

n.

04420 OOAL

. 7

-6918

UU96

..

Ot

OUI5

10

04557
04556
04555

-6bH
-0000
-C~oo

-0001
OUQ6

-hS6

H

GI298
C1280

]2

06]Q6

oeooo

).
3.
).

e73&8
C 1lH8
COOOO

00~00

4"

01300

CC101
ee702

coooo ocooo
I
5 •

J1C24
]

01401

XE~-2

o 14C I

-240C

012Q2

04460
DORG

04410

072du

FUREO

I !J 7
162C-1443 MONIIOR 1
04~80

/lS

044QO .a3
04§00 .AF

OSS

U4~10
0~5Z0

.A
l

ass

as
os

20
100
ICC

SYSlf.·CU •• UNlcaTICN SECTOR
FIRSI SKIR OF 08J PGM II,e R~eURel

....... )5

PAGE

SPS 11-0 SUBROUflM SUPERVISOR
072~~

20

C 1100

100

C 14Cu

I~O

a I~GO
o I~l~

,WAF
AOR CF SPfC .ANT LENGrH

VI.43
~ 141"

• w4+4)
_IIIA+ 14

U4§)O P ItKUP OS
04S~O ISUT
OS
OENO

..

VERSICN 2

S~PER

.

"

uS

o
o
a
o

II

IUC-I~~]

AOJOI"
loserM
COIOMON
tTL"H
DODARS
DooASC
'OEL HE
OEl Tf 0
01 SKCK

0445~

U~COOE

02n2
04210
0264\
01280
06)1 S

FVi. UP
ISlATW
LORMKS
l OC II S
1000lFY
"ONtAL
MOV Z~O
~~I~ST

NOOISX
Nui,.o
peONS T
~ICKAD

PICKUP
rSUI!OO
ROF. S T
~EOU(f

TO~

"QNl

RtLI"t
RESTOR
2ND"
AOJ

Q~Ul
00~01

on8!
021n
02126
04022
OU41

lASE
~Vf

,VER51IjN 1
004]'
~2I>Z I

ceOA
OOoAW
OIl!!
ON8
OSKSW
fl I T
f ILSV

0~49~
0491~

0,,,.

01600

o,n,q

CAPCK
CAP
03210
URO
OH91
CHECX Q2UZ
eKSE,T' 0)610
CXSU~
0.)58
CONH 'OHIO
01]58
CORt~
etuR 064U
00A'2
02749
POAl
onll
OOAP
0259]
OOA.
02US
OOA.S 027)4
02114
OOA'
110ASC 02711
OOAW
027 . .
000A2
OoOAP 02.08
OODAR C2585

as' ••

O.'H,
0'01"

0~H8

051U
02UO
04810

0,250
04UI
01Hl
05354
0312'
0599"

SP5 II-D sU'R~uflNE SUPERY ISO.

fiNAL

FOREO
FOREX
FDa ..

INOA
INo
I NST
IDeAL
ICO
10GT
IOR.e
ICRr
ISTAT
LNGCK
LNG
L
MANYL
MOO
NCOC A

ann

HE

02779
0210]
04411
US66.
0"10
025,.
05110
04)]8
01280
01U8
05686

NENtO
NDeOA
NOISY
NOTRM
NYET
NY.H

PAu.

P80TH
PCK
POUP
'LOAD
PLUSL
PNOTt
"HR
OCK

a."]

04)4~

0~182

00116
oJ01B
,OOU.
00520
005.5

~OCTL

01~74

05218
05221
074]5
u]554
08000
02815

P~GE

OUJ8
OHI6
U2n.
uJ5H
04861

suello

onlH

supeR
SV
SwPQ
TCP
VLU,
.A2
WAl
WAF
W,
lEO
seCLST
SE TtuO
SPSTST
SUUtT
SU8VEC
SYSCAl

OU5?
03502
05390

onu
05BH

0545~

"2398
05UO
04821
05102
C1BO
01758
OHIO
U2210

ROOI';
.OSUB
Rill
RM2
AMAU

OC4l1

RIO

0~H~2

AilS
seT
SETP

Qt45.

U
sue
SOFT
SSL",
STPSV
SulNo

0221~

05805
04U~

fNO OF D,.e ASSEIIBl' •

I tllJ

SPSLl8

THE ,SPS 11-0 MDOIFICATlO" PROGRAM

00010' SPSLl8---THE 5PS II-Q
00020 55 TOAD OS
.18908
00030 MSTOAD OS
.18943'
00040 55 He T OS' .15
00050 A20AO
,18800
000'0 AZStT OS
.55
00010 A20 I S OS
d3
00080 IE PO
OS
.01300'
00090 COlL
OS'
.02439
00100 TYINSW OS
.02413
00110 COINSW 'as
.OH71o
00 120 PT INSW OS
.02475
00130 PRTLIN OS
.02502
00140 HeLlM os
.02501
00150 ClEMER os
,.02700
001.0 INPur os
.02en.
00110 ~III1TS D,S
.03281
OOIHO AOORS as
.03299
00190 lOPOUT aS
.03327
00200 PHASU OS
.03"08
00210 PROSTII as
.039U,
00220 AlFDP' a's
'O~'I'
00230 AlF,LP OS
.0411.
002"0 'UJ
US
.O~''''
00250 zp
DS
.04.0'
002.Q eV'LAU OS,
.05"('
o 210 OK
,PS'
.0.9'
00Z80 'EvALE. DS
.070'~
00290 LOL8L liS
.01414
00300 Lori
OS
.09190
, 00310 fRio.
05
,01'94
00320 OUTPUT 'os
.OU"
0,0)30 'IN$TRN os'
.IOU.
003"0 SURU os' ".IOU"
OOUO STZL
OS
010850
OOUO
OillG 10900
00310 L1aST ,GU' P"AI

IIODI~ICATION

PRINTER

PAGE

PROGRAM --PRINTER

'

18908
18943
00035
18800
00055
00033
OllOO
024J9
02413

us

00)10
nil'
,00390 PRoeDN aTli
00400
JPM
00410
00420
CF
OOUO
00_40
ell
0045,0
8L
004100
nil
00410 .$lP
00.. 10 saH~
00,,90
17
00500
£

.7

••

OUlO

1111

T~

.

OU27

1I00 S' 5, 'IOCON
lOCK, •• 2\)
'HUlA
•• Jo.IN'UT~lI
'''',III,a.IO

...

• ...,IIIPUT'·151

• • )6

,. ,..20.·..
,.11

OOUD

0241~

02415
02502
02507
02100
OU81
03287
03299

,

SINha, IIIPUT-10,.,
S ~NII.ll i 2010

, SLPX

'LEIlEII'l,SI.·U.1,l
SV
sy•• U, ...... u

Zoo

00000,
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000
00000

01401
03916
04101.
04116
. 0",41
04804
01404
04921
01072
01414
09190
09594
096 . .
lon6
105](0
lOUD
10900
10900 10 005.5 J092)
10912 ~9 00"6 JU31
10t2~ U I2S 16 J09)6
IOU6 17 laUI J09S6
10941 ~9 OJ~OI 00000
10'" I. 1091., -2816 '
109. . II 109" 000-2
10910 JJ 00000 00000
lOt'll 14 109,. -1031
11004 4T 109. . 01300
1101' 16 nos 1 -2111
11021 II 11051 000-2
11040 U 11060 00000
lUlU UUl60 00000
110tO 24 02101 1l0SJ
11012 . , UDII 01200
UO'_ at IUU 1l01l

OUH
~"6

111124
04~U

Q"551
Q~6'O

0'''.

05740
O. .~O
0 . . 52
QU02
02'lH

onoo
074C0
01400
Q2_02
02674
03914
06_.4
OU98
0221S
00415

~PSL

II

THt

OOHO

IF

OOS~O

SOl
All
IR

OOHO
005'0 SIR
00510
00580
00590 SL'X
00'00
00610
00'20
00&30
00'40
00&50
00&&0
00b70
OOUO
00&90
00700
00710
00720
OOHO
00740
00750
007'0
00770
00780
00190

00800
00810
00820
00830
00840
00850

Cl
C2
C3
to
t5
tiP

00800
00810 " ' 2
00880
00.'0

U

SP~

11-0 MOOIFICATION

UN.
SINR
SINR .. I.IN'UI-10-2·13

~L

'.)b

C
It
Coo

INPUT-10+2·12.CI-2·12
eIP
S8NR+11.1 NPUI-IO+2.1)
'''3b
IN'UI-IO +2.12. C2'2.12
e2P
5INR'II.1 NPUI-10+2.ZO

BL

C
~E

Coo

n

C
~E

COO
8L
C
8t
COO

*·36

*·)b

INPUT-IO +2*0 b, C•• 2'0'
(3P
5BNa+II.INPUI-IO+2·11

8L

*+3b

C
Bt

C 5'

B7

PM' Sf A

INP UT-lO +2-10 I C 5+2*}0

OAC
UAe
OAt
UAC
OAC
GE I

13. 00EFINEOPCQOt
13.·0ELETEOPCOOE
24 •• OH I Nt 5Y 51 E"S '''IOL TAILE
01,*eNOL18
lI.·L1SIOPCOOt
OPT ,1,8, ' t
Ilff INE O' COUE

~I"

MOOSP~)I'.12

81"
81"
81

AOC.Kt~NOC.lP

&lFUP t '.20
ALR I N
OPSAV,lP+18,11

OO~OO
OO~IO

IF

IF

lP+lIhbOS.6

,F

QOQ30

~IM

009~O

009S0

bIOI
IF

INPUT+U
AlFUP,NOSPAC
EVAlAO,*+l2,.
ZEPU+]O,.OOA.)

OU~bO

n

It:'''U''21,O'')AIJ

"

l.,. '" 1 .l t l E ~ U. 3U t b
P.l ...... r.:A
("PT"R, t ,

~1

ou~aoJ

nOQQO

0'

GET

I.2P2

0101
0101
BI"

UFUP .NOI IN

IF

INPUT+18, bO S

u 1000

o 101U
o 10lO
01030

SPSLlo
01040
01050
010'0
01070 C4P
01080
01090 C'PI

o! 1 00
01110

MOO)P~,

11

llb84 2b 02327
llb~&

*+ 12

RUCK, ENDC IP

IF

ZEPO+27,ZP+18,ll
IP+ll.ZEPO+30.b

~7

PHASH

IFM
81M

S)TDCF+5,MSTOAO,. ,
MOOSPS.·+12
SST DC F + 13 , +ie 1-1 M
SSTOCF +13, 5S TSt T*lOO+ 11

IF

,01
GET

11100
1111l>
11128
11140
I17S2
Ill . .

DEL Ell' O' COOE

2111

IHE SPS 11-0 M.ODIFICAIION PAQGIlAM
IF

PAGE

II0h ll> 11138
11108 12 11138
11120 II 1I1~3
III )2 )1 00000
11144 49 1I0~0
11152 49 11040
II laO 14 IIMI
11172 41 11201
IIll4 24 02901
III" . . IIH4
11201 14 11051
11220 41 1125&
11232 24 02901
11244 ~& 1111&
11256 14 11051
112&8 47 11304
11280 24 02923
11292 4& 11120
11304 14 11051
1131& 47 11352
11328 24 02889
11340 4& 12248
11352 14 1105 I
113&447 11400
1137& 24 02897
1138846 1225&
11400 49 03408
11409 0002'
11435 0002&
114&1 0004'
11509 00010
11523 00021
11540 10 005&5
1155& 09 005"
115" 17 1251&
11580 11 12788
11592 170'''&
11&00 49 13010
11612 2& 1321&
11&24 2& 04'2"
" ' 3 ' 32 02898
11&.8 17 0461'
IIb_O 17 0~"04
IIbT2 2b 02330

I NPUI -10 +2 0 ll. 0'202 3
e4P
S8~A.llt INPUI-l0+Z*Ol

00'20

Ou~/O

PRINHR

--., ...-

til

H1

~ROGRAII

STR_'.SINR_II
STR+btltlO
SIR-II.I.IO

OEF IN!'

81
UAt
DC
OS
UO

01380 SHDCF OOA

SYMBOL TABLE

SSI

PROtON+20
30.U"11 OF 150 SVIIIOLS EXC EEOEoil
3.0
5
,SSTOC.F. itA

.0.5) 10AO. 55 TSCI •• -.

01390
01"00 ClP
01410 CSP

OC
1 ••
CALL EXI I
GET OPTA ••• ,

01420
01"30
014"0
01"50
01"'0
01470
01"10
01"'0

TFM
TF
IF
TF

IF"
81"
TF"

BTII

ZP+36.6.C5P2
INPUT+18.CLERER+1
LOPOUT .CLERER +9
XC+9.CLEREhl
INPUT.I2.99.10
ALfOP."12
INPUT. I ....' . 10
ALFOP ••• u

JI580
J2'18
Jlb12
00000
0'82"
132'8
00000
H030
llblK

0329Q
1321_

2& 0481N 02330

••10

0340B

00000

005b5 J 1139

49
17
17
17

005"
1257&
12188
00"&
1111b 2b 02Q05

11188
11800
11812
11820
11832
11844
118S6
118'8
118BO
I1B92
11904
119"
11928
11940
11952
11964
11976
119B8
12000
12012
12024
1203'
12044
12056
120U
1207&
12088
12100
12112
12124
121lb
12148
12157
12218
12223
12224
1l2a
12231
12232
12231
12241
122'"
122 . .

C4PO}.ll, SSTOCF+ 13
IF
01120
AM
C4P02+U.4.lQ
01130
PATLIM,.-.
01140 (4P02 S
IR
Ll"1 I S-9. PR ILlM-4
01150
011_0
,-OTR+l1,e4P02+11,ll
S
01110
LOT~+ '.'4P02_1I.11
S
01180
IF" PHAseA-i •• +12
8TM litOCK, C._END
01190
AM
ENIC NI. I. 10
01200
ENTC.HT,lSO.Q
LM
01210
bH
C20ECT
01<20
bIOI EVALAO.*+12,"
OIBO
87
LOLBL
01240
01250 C20 Ee I aCT'
01260
~AT' C20EM
CALL EXIT
01270
01280 C4ENO IF
C4P02+II.HC!.I".'
01290
5
C"P02+I1.PR Ill'" &
01300
C"02+1I.17., 10
S"
IFM SSToCF'5.SSIOAO
01310
PUI SSI.Rat
01320

01330
OHOO t20E"
OIHO ENleNT
013bO
01370 SSI

J15,1
n21)

J3213
J1152
J2918
JZ958

132&8

PAG,

PRINTER

~Y5H"

11051
000-1
000-1
00000
00000
00000
-2903
01300
114)3
01200
-290)
01300
11459
01200
-2925
01300
11507
01200
-2891
01300
11521
01200
-2899
01300
11543
01200
00000

LIS I OP CODE

211~

2&
2&
49
Ib
17
2b
12
10
49
2_
11
22
31
22
22
1&
17
11
14
4&
17
49

34

02321
0481N
03408
12237
1251&
12245
12245
00565

0 .. S2K

02330
00000
J8943
JlS ....

02501
-3511
J1891

OO~_'

JU24

11921
11.27
02502
03218
09701
oqlQ,
03407
12788
12218
12211
1204'
05"04
OS"I"
00000
12151
00796
1192'
1192P
1192P
12237
0051>5
00520

1224S
000-4
00000
02498
1192P
1192'
J191b
J2076
000-1
00J50
01100
120"
00000
00102
00100
00000
02507
02502

)9
49
2&
22
00~J1
12
J890B
16
J2147
10
49
J2224
49 109~& 00000
000&0
0000)
00005
00002 22
00005 J2232
00001 i
00006 OJ8908
0000) -35
00005 -0000
00001
49 0019. 00000
un, 10 00U5 J2279
I2UI 49 GOUt J3213
12210 I. 0 ..... J2 .. 56
12292 , . 02.05 02707
12304 2t 03327 02709
1231' , . 12525 02701
IU21 I' OZ." 00019
12340 11 OUI& J2H2
u n 2 " 02901 00019
IUt4 Il oua J237'

'''~

"SPSllb
al~OO

, !f.1I
b 1M
HII
ij'"

OHIO
01520
OI,JO
Q 1540
01'45

U"

IFM
b7

OlS~O

01560 C~P2
01570
OiS80
01590,

a1.00,

OIUO
01620
0lb30
01640
01650
-PI/)/)O
OIUO
01680
01.90
a I 700
01710
01 Tio
01130
01700
017)0
a 176U
01770
01780
01790
01100
0181Q
01820
01830
01hO
01850
01 •• 0
o !l;70
01880
0lR90
01900
(11910
01920
01930
01.40
01950
01 •• 0
019TO
01980
0199Q
OlOOO
OlO10

xc

IN'\Jl+ 18 ,99.10
A~fOP.··U

PHAsE'

~OPOUI-2,LEPO+n

4

10
RCTY
A"

~NTY

.*.,9.2

t'

10

H"

OK". 1 t 42 t 10 "

TF

tRj.b.BOP+b.t

H

OlJTPUT+b.8LOl.L+b ••
E,h.A+b.8ER4+b
E:VAL fA. +6, BEA. S+f) t t

1F
TF

uc

PH' SEA~ I, MOOSP 5-1
S 12l+6, 8Sl2+b
HPU+31
1, dI,.

If-JII

lLFUP ... 3ft+b, NOT I N

TF
TiJM

8T
8T
80P
87
eLO,8l 8T
8F.~
87
III
"EIit-.
8S 12
.1
H2C
8L
BE
87
as
ROll(
8NR
IF"
aD
SPH",

11'4.0
12492
U5a4
125 . .
12528
12540
12552
125.4
12575
12576
12588
12600
12612
12624
12636
126"8
12660
12672
12683
11684,
12696
12704
12712
12720
12 7 28
12136
12-144
12752
11164
12776
12787
12788
12800
12812
12.2"
12836
128<08
12860

LOPOUT-I
LE.U+28

S·IY
ij7
ALF L'
S
OS
"oo'sp~ If
PRUS T~+61 IPMA •• ,.

IF

12371>
123st
12400
12412
12424
12436
124.'
1245.
!lU8

lP,3b+6.AlFLP ,
PHASEA-I,PROtON
60S-6, LOPOUI-2
ALFLP
·•• 24 •• 'l ..... 9

~E

'''E

PRINTER

IN....,UT.l .. ,9Q.• 1O
At"fOP, •• 12

IF

~ATY

CONVERT INpUT ROUT INE
cONvERT 0' CODe
lOOK-UP RouII"e
CONVERT lOL8l ROUIINE
CONVEiI eVALAO

STAR T2
PI1.~EA-l"O

flI

AlFUP-l .. O 6
PHASEA, ,0
EA.~OET,

,0

AL,R IN. ,0

S T2C t ,0
Cl5'
Cl4'
e13'

5

.+24. I MPUT-I0

IN'LIT-10.M,10
*·"U"T'fINSW

RC TV

wAIf INP(JT-1Q

eM

IftPur"lOd4,lC;»

8ti
SF
Sf
nM

RO( 1'1.-01, ',.0

AM

SF

CM

SPH II
02020
02030
02040 NOliN
02050
020.0 ENDC l '
020TO
02080
02090
02100
02110
02120
02-130
02140
02150
02160
021 TO
02180
02190
, 02200
'02210
02220
02230

SPS 11-0 ~OO ,ICATION nOGkAM

12872

.-..

12184
12196
12908
12920
12932

*+18,2,10
.... b,U"P·UT·l~l

THti' 5PS 11-0 MODIFICATION PROGRAM
IL
BI2
WAH
87
PUT

87
ALRIN

IN'UT-I
IN.un II
•• ]O,IHPUT+ll

2113

12944
12956
12958
12970
12971
12990
13002
13010
13022
13030
130<02
130S0
13062
a07"
13082
13094
1310.
13118
13126
HU8
13150
1'3162
U170
13112

PRQCON+20

PHASEA
NOSP"'C WAn NOSPM
aT
PHASEA
eRson ~ATY UNOSV.
~ATY COll-12
87
PMASEA
TOM COlfj$~oItll
C 13'
TOil PT INS~,O
TOM: TYINSW,O
87
PHAUA
(14P
10" PTlIISII.1011
TOM COINS".O
lOll TYI"S~,O
117
PHASe.
TOil' TYlNSW.I.11
CUP
TOM ' COINS .. ;O
TD'M PTI!fSII,.O
022.0
P .. ASEA
n
02270 01'1" 00
,OP1I:1, "A

m:~

022.90
OUOO' PHAI

po

02~10

DbA

AIOCF

DC

02120:
PC
112Uo ,.05
DC
On400P$AV oc
02)50"AUINM PAC

,0 .A20AO.UDI S,A2SCT~.UDIS .1,NSTR,,+100*UOI S,
"hit'
t

0290S OOOR9
0461b J2424
16 04841> -4116
16 03407 J0936
49 0]408 00000
26 03325 02327
2" 132U '0)325
46 04716 01200
4) 12516 12525
34 00000 00102
II 12525 0-0-2
l ' 03319 00100
U 02328 00100
HOODOO Dalal
,,9 0"716 00000
00005
26 0)922 12710
16 04929 000112
26 0485" 12718
26 09692 12116
26 09600 12742,
26 070Ta 12TH
Z6 03407 12575
26 10U6 IlHO
15 02331 00000
00001
16 04658 J2958
"9 10534 00000
"' 03"OP 00000
119 0"61N 00000
M9 OH08 00000
"9 13050 00000
"9 13010 00000
"9 12752 00000
4T 13170 01300
46 13126 01200
49 13082 00000
00005
45 12812 02877
16 02877 000-0
43 12 .... 02473
34 00000 00102
39 02877 00100
I" 02877 000J4
46 1278. 01200
32 02816 00000
32 02898 00000
lb 12926 -290"
II 12926 000-2
32 00000 00000
14 1292' -3038

12908 01300
00000 00000
13353 00100
03408 00000
00565 HOOI
00520 J3213
10956 00000
132T900100
03408 00000
13315 00100
03401 00000
13383 00100
02427 00100
OH08 00000
15 02474 OOOOJ
1.5 02" T5 00000
15 02473 00000
49 03"01 00000
15 02"75 OOOOJ
15 OH74 00000
15,0247) 00000
49 03401 00000
15 02473 OOOOJ
15 024T4 <10000
1319" 15 02475 00000
13206 ... 03"01 00000
13213 00002 22
13215 00005 H222
13220 0600 I il
13U2 00006 OJ8133
13228 00003,-22
13231 00005 ,~355.
UU. 00001
U2n 00002 22
Un9 00005 JP".
112 .... 00001 il
1)2"" 0000. lJ'600
13252 00003 -16
I l l t l 00005 ~Z300
U2'O 00001
132 . . 0000.
U276 00001
lIZ-it 00016
lUis 000)1
1135] 00010
UII),00040

NOT I Nil
PHASEA
,OP7AS.08,C

8T

DDA

0290) aOOR9

0461b J24QO

.RINTER

--36

WATY ALRINM

02210 OPTB

4
I.
IT
16
17

A1DCF" ,A

• I. 18bQO ,"', nOD

"I,a
•• _060601>0
1,0,
II, ALlllAOY DUINllli
19, 110 1100II IN UILfi

,~m~ :~~:..g:~ .

15. HOT, IN TAnll
02.'0 IIHOS'" D~' 20. UIIDIPINIO SYIIIOL iI
ClU'O'
PEND Llln

10900

, U4ZZCQU POSITIONS ""1111110
O,Oho. Sf:ATI"llfU PAO(.iS$fO

'!u4

47
42
39
49
10
49
49
)9
49
39
49
39
39
4'

,p,

11-0

/iliON I Tal(

USA

000 10
00020
000 lO PO

auoG

000 ... 0

0,

OOOSO OIV'l
OOOqo
00100
00110
Dalla
00 ll0
00140

001 bO
00170

:w

Ou,,,o

')U\j+ 11

I

HO

.l

l"'4UAO.""

,·.2U

IF

(NIJAIJ
P()) T.o

,1 ND;,D+

INDAO+'-2

,··20

"n

OOiOO
POS T

I NOAO. 1!I"f

31

'-. u
P(j ':. I .. 2L
PU,)T+'ol
•• "8,,0

TUM

P[jST+(2

Out8D

H
CF
TO'"

··l~

10.

.1
,1-'0') I + 11

r*b

IjNF

...... b, ,0

,0

POST+c:l

00380
()O ;qO

oNF
H

;.

OU420 bFlG
uu'tW

BNF

01

,0 1 a

sue;+l.l,U
PU-ll,t,O
•• j 5
I POS T +6
*+23,1.010
*-12,,0
... 35, ) US .. 11 ,0 1
•• 23.1.0 lO
·-12,,0
"'-1,SU8+b,Ol

.0 1

8 ~ l G .. 11 , SUt:i .. 11 ,0 1

OO-'o4(J

oo .. '}o

BH,G+l1. tH'LG.-' .... ,U 1

00400

ONl

"'.

00470

U

8f-l(,,- 31

,F
rFM
TF

00480
004QQ
00;00

,P5 11-0

M(J~

001;110

,M

00;10

-~b

.0
.0

B~lG+l1

SU!:;+"'2tNI~,011

PQ+b,BFlG+ll,Ol

il0R

SUB~Ollll

1

IF

P(,j+o,l,olO
rMO+b ,PO+b,O 1

OU',)30

H

P\J-l,~UB+ll,Ol

OO~"O

TOM

H.

SfT+ll"O
·+'1,,010

;
8N

PIJ-21t,

00';50
005bO
00510

.01

PO-ll, I,ll

• .. ~j,Sub"'l1,Ol

00330

TDM
TOM
rF
;M

.0"
.01

SU""'l,,, to

TF

00 .. 00
00 .. to

.0 1

,0 11
,P[J!:>

00310

00310

.01

If

00i70

003 .. 0
003S0

.01

,2 E:ROS
,I EW, O~

bO

T DM
Tf
0",

O{)3bO

~y

!N()AO
Su~ ./;:1
I I NOAD. '1Q
OIVl+1t,02,U1O
4'1
12 fltOS

OOlbO
00100
00 lOO
OOHO

.0.
• .... ,0

[PljUALJ

If

rDo

00,'.10

,PC K:" IV
.04

H

A.

002\ u
OOllO

1"

D I v I. 11
PU'.:a T... 11
I,,"OAO+ '-2

If

00180
00190

OUi.

• t

o lilt .. 11

.0
If
"0
01

no
07

00 150

,,( i6'i

100

If

~UB

00580

A"

SET

DOblO NZQ

TOM

SfT ... U,l,O

00b20

HM
01
rF

~U8+42tSU8,0

A

TO

t~US-jtl
It'

00090

00700
00710
00 720
00130
00740 ~"O
00750
00760
00770
00780
007QO
00800
00810
00820 SE 1
00830
00840 INOAO

'M
80
AM
,F
81
,F

60
5F
SF
AM
5F

+24
S.U8+b
SUS+b, 1,0 10

·

P(')+bd,OlO

.POS,1+22
*·30
pg+o
SET+ll.,O
PO+O,l,OIO

PQ+b
*+2_

."

99

81
AM

OIV1+11
01'11 1+11

OOISO
00800
00870
00080

TF
TF
bNF

··23

IF

OUtl'lO

H
.1
OC
DE"IO

..

ou "II 00
00910 ZEROS
00920

.b

SUB-l2, ,0

BNf'

SF

••

f:MD,~U8+4,Ol

PI.I+6

··1,,,010

·
·

,pOSr.22

·
·

.05

.b
.6
.0 I

••

.010

,0 I
INOAO+5Q
•0
,J NOAO+ S9 ,I
0
,0
I~U"D+59 ,0
'NUAU+!t9 ,I NUAU+"9 ,0 III
,0
) ,,,"".-U+ 3&
,0

Don II

.0IYI+ll

,

JO

00818 000-1
00910 OaR 1 B
OOB 11 00711
010 II 00000
00b97 000-0
00000 00000
001tHl n 1300
OOb~7 000 J 1
00000 00697
01000 00000
01011 00001
00742 -0700

22
M7
JI
"L
"9
J5
007b8 JO
00780 MO 00700 oonoo
00788 <0 0080. 00706
OOBOO 21 00000 00000
00812 ZN 00000 006Q1
00824 M1 00848 01200
00836 U 00700 00000
00H8 J I 0070b 000-1
008bO Ml O'OQ04 00704
00872 JI 00818 000-1
00884 l2 00810 00000
0080. "q 00b88 00000
0090' 32 00000 00000
OOq 16 ~l OOq52 ~032.
Don. u 00810 00000
000'0 L2 01011 00000
009H JI 00818 000-1
00Q6' l2 00810 00000
00916 I'M 01000 00326
00988 32 000Q9 00000
01000 JI 01011 000-0
01012 MQ 0014P 00000
,IND AODR ROUT tNE
01020 JI 00141 OOO-~
01032 KO 0lOS5 00147
0104. K• 01079 00000
0105b
00000 OIOH
0101>8 13 01079 00000
01010 KO 01079 0107R
01092 MQ 01056 00000
01132 000)4
00011
00100
00112
00724
00730
00148
007':10

II
sua, ,0
"+18,SUB,+b,Ol

aNI
LF

OOoBO

p~GE

JI
00b~2 KO
OOb64 KO
00676 J5
00b40

.. 0

OOobO PQ

2 Ii;.

,E r 00

SIJM-3,11,010
,)U8-3tl

aD

87

Dab 70

0000' 00005 -0 100
00000
023.5 00000
SUFFER REOO FOR CORE I~AGE OBJ PGM
00099 00100
00100 M. 00112 01'00
TU ... OFF OVFL
00112 M. 00141 02115
001Z' JI 00141 -0004
001lb Mb 00315 00000
lNO A AOR
0014B JO 0101>2 -0 I.e
00 1'0 M9 01020 00000
,lOIO
AOOR
001b8" MO 00111 010H
00 IB a JO 010.2 -0200
00 1 92 ~9 01020 00000
, lO,"O 5" I FT
00200 KO 00) 10 01019
002\ Z JO 010b2 -0232
0022' M9 01020 00000
,LOAD L'-i 00232 <0 oojo. 0\019
002"'" J I 00 141 000- 2
007':16 20 00099 o Ill2
002b6 20 000b6 o llll
D02RO 20 000 37 01132
00292 15 0000'- 00000
0(; 30 ... 2. 00000 00000
0031b .)5 0031b DO-O 1
0032b KO 00;; 1 00 31;
00340 M4 00 388 00000
003~2 J~ 00326 0000003b4 KG 00182 00310
00376 3J 00000 00000
OU3f18 J5 0070 I 00002
00400 J5 OOijO I 00001
OO't 1 t KO 00"- 35 00711
00"74 M4 00472 00000
00436 JI 00320 000-1
00'041.; J; 00701 00001
00460 J5 00801 00001
OOJ.,72 KO 00~07 003\0
D04A4 J2 00507 000-1
00496 M4 00484 ooroa
00')08 KO 00543 00711
00520 J2 00543 000-1
00532 M4 00510 00000
00544 KJ 00543 0070b
005~b KK 00543 00111
00568 KM OOt)43 00507
QO"AQ .0 Dab I b 01300
OQ5Q2 l3 0049N DonOD
OOb04 L2 00~4L Donoo
00010 JO 00741 -0756
00bl8 KO 0081" oo~" 3

OObAS

00590

00b30

NE

,a

OObOO

00040
0001)0

PAGE

,US" OUT I"E ,E T 00

>-.

U,
OV

OuO~O

OOObO
00010

I

01 VI-l'

."

2116

SU~'OUIIN~

00(J

10 ••••••

UOOlO··~..•• ~

000)0····,·
00-0.0 ••••••
(')Q()I)O . . . . . . ..

OOO.bO ...... .

00010···.··,
00080.·;..· ..
O()O~O·····~

OOlO·Q ...~ •••
00110 ••••••
00 120 •• ~ •••

on 1 ~O.

0014.0 •• _ •• '

00150.
COlbO·.· •• iI!

001'0 P
00160 PL"
P O l90
00200 EQG ••
P0210

OOuo

002)0 'L F!ld"

00,40 S_VE
DOHa 8ETA
OO?O
oono .ICK
00,80
002<0

00300
00,10
O(;i.lO

09310
00,'0
003~0

OU3M')
fO
OO.hW

0(;' ~

c)Ol90
OO~(lU

(10k- 10
ou~lU

OO':t30

0,

....

·

-"

..,

",,,T

5PS 11-0

OQ_'Q

SET 01

~n. np~'.ND~ ~ .'NO ·a QN~Y
~,. uu lin BE .uSfP as a wo,~ Uea IF suaR .NOT USED. IF
SUBROUTINES R~QUIRED.THUI THE AREA IS USED AS FO~~O"S
OHOI·
NOISE DIGIT.
SOVRCE.SUBROUTINE SUPUVISO.
P~.
aOR O.F PHR.
SDURCE.W8ROVIINE SVPERVISOR
pr, •• ~
.OR OF RETURN TO suaR.
SOURCE.SU8ROUTINE
Pc .. 10·
_0' OF • iTURN To .lIa uiL INE. SOURCtoPRIII.IV LlNUGE
'.r"I~
• OR. OF , OPERaNO CHaRaCTERISTIC.
SOURCE,PICK
pc •• ZQ
.OR OF B OPUANO CHARacTERISTIC.
SOURCE.PICK
PC.+25
AOR DF • OPElAIiO IIANTISSA.
SOURCE.PIC~·
PC'HO
AOR· tJF 8 OPE.AIIO " ... TISU.
SOURCEoPIC_
PC" 31
HSERV~O fOR POS$I.LIi ~~CORO MA.K
PC.· H
" RHERVEO tOU
.
pi.~'bH"U PV-~O SU8VIiC FO~ THE I T FURNISHED SU~'OUTIHE$
aOR·, aRE SU"~IE(l ay THE sua.OUTINE SUPERVISOR
P,0-91 CUW" 10 END OF IOU " " .BE \lSEO IF NO ADO EO sue.OUTS
us. ., a
00000 00000
O~8
\
,8
.23b'
'02305 ooo~o
OS. Plto
OOOO~ 00005 -0100
us •• -00000 00000
DQ~.(; EDGAR
00000
PS
'."."fF
00045 000"
Dli
21
000. . 00021
us II
00077 00011
OS
21
0009. 00021
I
00099 00001
TO
"0 I
.eEU'I-P " ,
RESEI ERROR INDltaTOR
00100 IN 00~01 00099
P(.~+11
oil, MOYE OPERA .. OS FROII MAlNL INE
00112 H 02316 0231N
AM
P(.K+I0
tALC RETua .. AOR 001l' II 023H -DOll
8NF
PROCESS A OPERaND
00136 M, 00180 023.·0
c.F
PC.It·l~
001~' 33 02380 00000
IF
,PCK·15
PC.''"·15
00160 20 02380 OHe.
011
87
.- 30
.0
OOIH "9 00136 00000
IF
P~'.H
,PC"·I5• "I NUS
0018026 02)90 02180
P(K.2~
.Z
00192 12 02390 -0002
bNF
,PC.k:t'20
PROPSS
OPERAND
00204 M4 002~8 0238~
CF
PCK+lO
00216 33 023a5 00000
.1f
PCK+20
,II
00228 2& 02385 on.N
87
.- .!~
00240 "9 OOlO~ 00000
PC'.)O
,P(".'z(l
8 "INUS 2
00248 26 02395 onu
PCK .)0
.2
~.
OEL IBEUH OVERF~O.
00200 12 023R5 00002
TF
, .. C .... 20
MOVE
CM" TO 8ETA
00272 Kb 00098 0238N
,PC.K+)O
01 I, MOVE a
TO BE lA-2
00284 •• 00096 02)9N
,~.
RnuR .. TO SU8ROUT INE
00296 4& 0231- 01400
,0
00308 "_ 00332 00099

~u8RPUIINE

"ONI TOR I
SF
A"

.~PH'-

·

,0

,

...

·

.n n3,

os

paGE

SET 01

OOllO LZ 000&4
00 .. 70
.OQ
,010. SeT HP El INDICATORS
0033;! JI 0006 ..
j:lCK+25
,ALPI'U-2
00344 20 0239ov"eo STORe H
ti.
OO~QO
IF
,ALPH~
Q035~ ZO 0238PC"+l ~
oI~
OO~OO
8
p.CK+10 pO
00368 ~9 0231"
TOM '~I
OO~IO OVH
,11
00380 15 00401
•. 1
OO~lO
IF
.lPHA-2 ,NI"U-2
,01
003'2 .0 OOO~4
. IF
ALPHA
,01
.NINES
00'30
0040" <0 00066
00')40
b1
ZlfS+30
,06
on"" 16 "9 00470
TpM 401
OO~~O UNF~
00424 15 00401
.9
OO~~O
CF
DOH. l ] 00099
OO~70 IRE>
TF
AIOM.-2 .AURO-Z ,01
00441 .0 OOO/>.
IF
00580
,A~ERQ
ALPH'
,01
00460 -0 0006~
OO~.O
87
STORE
,0
00~71 "9 00344
~I 1 (.K ROUTlNE.SHARED CQNST4Nn AND WORUNG SIOU(;E
001>00"
00b10 ,-l1S01G u~
I
.2~1
OZ401 00001
nObza
DC
8
,0000 0000
00486 00008
00.10· .URQ OC
.... 99
2
OO~18 00002
Uo&~o
U.;
'.i
00.19 00001
I
00650
DC
8
,9999 99. .
00~97 00008
00660 NINtS. DC
,99
00499 Oei002
2
00610
,II
DC
I
00500 00001
00680 ~NU
PC.
13. 1000000000QI)0
00513 00013
00690 LOGE
DC
10
00523 01)010
" ,41 ,,2'" 4119
OOlon \C.NI
IlC
10
0053~. 00010
• 16U3 D76.
00110 lCNl
DC
10
, 9: 0'09 ·090.
00~43 00010
0\1720 LeN)
DC
10
00553 QOOIO
.011 liP 1111
00130 ~CN4
10
. ,14 .2U'l 14~1
Q~
OO~') 00010
00140 LeNS
(lC
10
,20 0000,0000
005Tl 00010
OQ750 LC"6
10
DC
un,
00583 00010
00760 tzeRO DC
00594 00011
II
.0
OOTTO ~ac
000. . 1)0000
, aLPI'4.
00780
OC
·8. 10000000
00602. oo~',
.00190 HON~ O~
2·,111
00604 00002
00800
oe
I ••
00605 00001
00110
O.E/jO 01001
01 00 1.
2
HRH4-'

00000
000.0
000 ••
0006~

00000
OOOOJ
00497
OQ.99
00000
00001
00000
00 . . .
00488
00000

'2

~PS

MO~

11-0

I TOR I

00010
00010
00030 OIV.I

USA OIV.I
DORG E D~A.
TR
PCK+ll

00040
00050
OOObO
00010

A"
LO

pett...l0
P(K+Z5

pel(" 30

U

SUbROUT INE SET 01

,P(!(.+ 10

,11,

,11
,PCK+15

,.

,PCI(+20

bl

F-CI(+ 1.0
OtNlI
01011

00080

SPS 11-0
00010
00020
00030 'SI
00040

00050 • Al
OOObO
00070
oooao
00090

00100
00110
00120 ASCDM
00130

au l~O
00150
OOlbO
00170
00 lID
00190
00200
00210
00220
00230
00240
00250
OOlbO
00210

00180
00290
00300
00310 ADO
00320
00330

00340
OOHO
OOHO
00370
00380
00390
00400
00'10
00420 NO.M
00.30
00440
00.50

ddl

,.11

PAGE

0000' 00005 "0000
00000
IOOVES DIV OPfRANUS INTO P~. AREA
00000 31 0237b OlHN
CALC RETURN ADR 00011 II Ol31S -0021
0001' la 0239- 02380003. 19 OH9~ Oll8N
ooo.a '9 Ol17N 00000
01011

PAGE

SUtslil.OuT INE SET 01

_ON nUR

0000. 00005 -0000
00009 00005 -0020
00000
OORG EOGAR
T Fflit
00000 10 02370 -00.0
PCK+S
,FA1+20
t.11
pel(,
.6
000,12
49 023bN 00000
b7
IFM PCK+5
, ASLOM
00020 10 02310 -ooa.
017
,b
00032
'9
OH.N 00000
b7
PC<
50 ,a 55000 50 50 50000H5 00 00555050555005050050 5U50505005,350
DC
00350 00050
,0,
bNF ASCUM-12 ,8£TA-2
'HANGE SIGN AND ADO
000'0 MM 00072 0009b
BE T A-Z
00052 L3 00096. 00000
CF
,SCDM
b7
000.' M. 00084 00000
00072 L2 0009. 00000
BE TA-l
SF
ALPHA
,PCK+l~
til, MOVE A OPE UNO
IF
0008' Kb 000 •• 0238IF
ALPHA-2
,PCI(+Z5
000 •• K. 0001>4 0239.II
,a
TOM AOD+ 1
00.108 J5 00H3 00001
.I
IFM AOD+11
,Bt:TA-Z
,07
00120 JD 00323 -00'.
ALP,",A
,BETA
00132 K. 000 •• 00098
C
,0,
CHARACTERISTICS EQUAL
BE
AOO
001" Mb 00312 01100
AlPMA LARGE-iii. THAN eETA
bH
*+'t8
0015' M. 0020. 01100
0011>8 LJ 00057 00089
TR
AL PHl-9. BE T A .. 9 t t SWI TtH OPERANDS
00180 K. 00098 02>388ET"PCI(+1~.11
IF
Tf
BETA-2,PCHH,11
00192 K. 00096 0239,ALPHA
BETA
0020. u 00098 00066
SCALE
S
BV
S TOR E-I 2
002" M6 00H2 01400
,0
A
ADD+ II
.BETA
00228 KJ> 00323 00098
,0
00240 MIO 0021>4 00096
,BETA-l
8N' *+24
,0
TOM AOO+-1
,2
00252 J5 00313 00002
,7
dOll,CHECK DI'F IN CHARACTERISTICS
CM
B~TA
00264 J' 00098 OOO-P
oon. 107 00332 01300
S TORE-I 2
8L
TOM BETA-IO
,0
00218 J5 00088 0000oil
00300 L3 OOOU 00000
BETA-9
CF
ALPHA-2
00312 K I 00064 00000.
A
STORe SIGN
00324 2N 00099 00064
,llPHA-2
TO
'9
,5500505055 5050505050 5505555050 0050505550 ,340
DC
'0
00340 00040
0033. JO 00478 -030.
,SIG~
!F" ZRts+30
00348 'n 00428 01400
BNV NORIO
AIO
ALPHA
00360 J I 0001>6 000-1
dO
01
OVFL
OVERFLOW
8R IF CHU
BY
00372 106 00]10 01400
TF
,ALPHA-)
llPHA-2
ADJUS T IOANT I SSA 003B4 KO 00064 00061
,II
TOIO llPHA-9 01
00396 J5 00057 OOOOJ
ALPHA-8
00401 L3 00051 00000
CF
SIGN
00420 10. 00301 00000
.7
00428 M6 00.36 CHZOO
IlZ
ZRES-12
8tt I' ZEAO
ALPHA-Z
NOUAL! ze
00440 L3 00064 00000
CF
00452 KO 00091 000. .
Tf
8ETA
• ALPH'
,0
004.4 Ml 00532 ooon
10
.ALPHA-'
US,

• SI

,FA 1

..

.

,

_+6'

! j II

•

SI>s

11-0

OO.~

IIO~ITQ.

1R

OO~bO

70

'~PH'.~

TO

Oll-eQ
·00.90
00500

A~''''.2 '
~ta

~II

~"V
8.7

OO~IO

SF
IF
8'

00~20
·OOUO
PO~·O

I

~-~

~U'RQ(JT

,,,O~

or

IJI!F(·,

Q047b
00."
00'00
00512
00524
00532
00544
005h
01022

DIG
,(0
,0

ALP"A"'9
ALP·"~

~'G.

I"fi HT 01

.,11" P"U"8,

,BETA

SIG~

·V'''O. U!022

LJ 00051 00058
.5 OOOh 0240 I
J2 00098 OOO-i
117 00.'. 01400
11.9 004;!4 00000
L2 00057 00000
KO 000 . . 00098
119· 00108 00000

2I I

5PS 11-0
00010
00020

00030 Fill
Q0040
00050
000~0

00070
00080
OOOQO
00100
00110
00120
Q0130

00140

oouo
00160
00170
00180

00190
oOzOO
00210
00120
002)0
Q024Q
00250
002bO

OOllo
OOlao
.00290
003Ql1

S~8ROU1IN~

liON I TOR I

SET 01

PAGE

00004 00005 -0000
00000
,17
00000 10 02)70 -0020
•.• +~O
,b,
8R TO P Ie. ANa RHURN
00012 .9 023b" 00000
oe
003S0 00030
30,5505500050 90000050Qo 0'00050000,350
HII
00020. JO 00.78 -0308
lRES'3D .SIG"
M
,b,
,BfU-·Z
MUL MANTISSAS
00032 ZL 0239- 000,6
'C.·25
2RfS-ll
000"4 lib OOHb 01100
8l
,'8 It
•• !tb
0005b 113 00112 00084
80
.0
HII
$AVE
.0 I
oI01l.<'D~RE~ T I ON FDk 1; DIGIT PRDoveT
ooou J~ 00077 OOO~J
85
SF
00080 32 00085 00000
TF
P,K+Z5
,92
,~
00092 2b 023~~ 00092
,0
B1
00 104 '" 00 J3~ 00000
"H'
iFII $A\I~
,00
.10. INO ICATE 10 DIG iT PAODUCT
00112 J6 00071 000-0
TF
p.eJ(+Z5
,91
,6
00124 2b 0139~ 00091
PCUI5
,8ETA
.6,
CHAtlACTEAISTICs
A
00098
00136 1.1
~.72
BV
00148 lib 00220 01"00
A
,b.
ADJUST CH~UCTeAI ST It
• 5AV~
P~"iS
00"0 2.1 ·0238- DOlin
INF •• ;t" ,99
00172 114 00196 00099
SF
pctc.+2:S,"
00 I." JZ OU9- 00000
AM
PCK+15,OO;610
001·9b II On9- 000-0
INV PtK+IO;;,
00Z0847 013711 01"00
' ;PC'~U' ,011, Itl IF POSITIVE CHU.,TUISTlt
._"F 0+20
00120 II .. 00240 023'~
DC
b • 500 5·JO • )50
00350 00006
\)IIIF L
00232 119 00424 00000
67
A
PCK+U
iSAVE·
ADJUp CHARACTERISTIC
00240 2J 02U- OOOH '
INN \IvF~ :
00252 110 oonCl 01300
TFM PtU}S,MitIO. ..,
001b4 16 02"- ooou
'(KOla
...
6
00276
49 02)7111 00000
8"
.. .,...
D.Ef'II) 01041
01041
OSA Fill
nnAr. FmaA
HII peU5
pel<
~7

,

_aD

..

one·

,

.'

al~·.

b

,pS II-II
00010
00020
00030

liON I TUM I

~Ol

PAGE

SU8OR
000" "I DO 112 00089

D,A
~ III
UDRG EDGAR
HM

··.,,0

.0.

OUO~O

87

OOO~O

oc

OOObO
OOOw
OOOBO

TF

OOOCia

TOM

401

.0

.lIt

SET fH.ROA. tOCE

0005e.

1'; 00401

0000-

UUIOO

bO

MANT-lilt

,AlPHA-q

,0,

Ck FDA HAD DiViDEND
000.8
00080
SIMULATE "'AI 003""
JO 00418

00051
00000

.0.

IF
BO

no 1 to

81

;T,)M,

UO 1 iO

AM

AlPHA

.~q

l)0110

!:SV
TFM

STnFH
lRE)+30
i.J1

,SluN

00140 fiIIANT
llUl')0

LD

TO
bD
HZ
~F

(lOi 10
ulIi2U
OOl )1)
00.140
OOt''!:IQ
OUibO
0o, 7{J

Ct-lA~

002BO

')AlJf

,HA'

2U 00091 00064

if'!. 00091 00096
2!» 000Q9 00091

,IlJ

.50;05'005> 'CJ;05,;;;0 50.;50

OOlZO •• 00252 00000
OOBO OOOZZ

ot

n

TF

ALPHA-2

,0

"A,..T

,'II
,DO

TFM
S
bY

,90
SA~E
,01
ALPHA,8ETA
•• "'_

OOlOO

SP-4Y

ALPHA, SAVE
SIGfli

00'10

81

OV F I

00 ;20

tl.NF

O\lFl.AlPHA"DVH

002.0

OOl7i1t
UOI,b
OUI'-A
OOIf'lO
OOllt

M3 00228 00083
~6 D043b 01200
MANT OF 8
0018'" 32 00084 00000
OOIQb K:b OOOb4 OOOql
OOlrJtI Jb 00011 000-0

AltJ~A-l

tF
HM

bl

.A~; I~)AS

OlvlOE

,AlPMA-c
QI
,8ETA-2
QQ,cH"lAYf SIG,..
CHAR-tit
,83
If(f.S-12
8",

o

OOlbC
OOPO
OOIBU
001.0
00200

-009.
01400
... 0308

1~AfII

COl2a Kb 000b4 OOOqO
00240 Jb 00071 000"'1
0021S2 KK OOObb 00098
IF DIFF GREATE-R 1HAfli 99
002b" Mb 00308 01400
C021b I(J OQObb 00071
If }Tlll U::.SS THAN 100

,10
,a,

uF A ),MALl fk

SR

SR

00288 "1 0030B 01400
00300 •• 00380 00000
IF

tXP

POSITivE

DR Ufllf=.LA(,fJED iE-RO

0030H .M 00380 000 ••
AlPHA,SAYE

(i!,)

3 il)

II 0

.~ '+()

tiH

00

~~o

jj

IRE 3+ 11

8ft

IF

""'AfliT

u0320 KJ OQObb 00011
1':1 -qq

~E:':IlJl T

Of-

0033l •• 004bO 01100
1

')P5

It-u

OlD'=>I

MONI

Tll~

00D1Il
Dunt'll

USA
F Slo/k 1
UOR r. f [)(; AR

(lu0;U F S(Jl'Il
Ol.l\) ,,0

bl

DC

DOUbO

80
TFM
81

00010
00090
00100

""

00110

CF

DO IlO
Dalla
001,,0

80

OOl~O

b"

001'0 .02
00110

SF
TF

OOIBO

LD"

00190

If

00200
OOllO
002Z0
00230

TFN
TF"
TFIO
TF

00<40
00250 LSO
0021>0

All
$

00270
OOZ80
00Z90

8NN
CM
8NL

10"

TFM

81

00300

DOHa

1

SlJ8ROtJTtNf

00320

CF
AN

DOHa

SF

003 .. 0 LSQII
00350
00)1>0
00310
00380
00)90 SOU
00 .. 00

AM
$10
111
DC
1111
SF

All

':ItT

PAGE

01

00004 00005 -0000
00000

.•.

TFM

00050

OOOBO

00344 Mq 00424 00000
010'>1

UNf- L

LJ=!\jL

GI.I}e-')

.iT

(JOOOO

8R TO PltK

lRt~"30

I"' ;

,8E T A-'1
• .),u~t

·

.0.

..
.0.

10 07370 -0010

RETURN
000 l2 4q 023bN 00000

~OOOOOOOOO

"+32

A~O

0000000500

0~005~0000

000005.

Hb

0014b 0004b

8R NON lEAO ARc,

00020 Ml 00052 00089

ZERO AAG

OOO~2 JO 00418 ... 0344
00044"q 00448 00000

8<

00052 J3 00098 OOONO
BR IF PIJSIlIVE ARG
000&4 MM 00100 00091>
BE T A- 2
0001. 13 0009b 00000
00088 15 00~01 00000
40 I
;Q3
8R I F CHAR 000
00100 M3 0043b 00098
,010
0011' Jb OOI1B 00009
SQ2+"2
8< IF CHAR POSITIVE
·"24
OOll~ ... 00\4B 00099
91
..
SET SIGN OF tHAR 00 \3. 32 000.7 00000
peK+ J 'J
STORE RESULTANT CHARACTERISTIC
00148 26 0238- 00091
19
.00
.10. CLUR WORKING AREA
OOlbO \8 00079 000-0
NOVE IIANT I SS. INTO 89 OR 90
,8ETA"'l
00112 20 00000 00090
00184 J6 00258 00001
lSD+18
.0 I O. IIANT I SSA ADR
.81
00196 JO 00203 -oon
.8ETA-10
.OT. ReSULT AOR
L$0+23
00208 Jo 00302 00001
LSIIN-I>
,010
.81
,m"l1EI-4
SET RtSUL T EOUAL 1000 00000
8ETA-Z
00220 10 00091> 00509
0023Z 109 00H8 00000
LSIIN
.0bI0.RESUlT • 2
00Z40 JI 002bL 000-2
LSO+23
MANTISSA MINUS RESUL1
00252 22 00000 00000
00ZI>4 116 002.0 OUOO
LSO
00Z7I> JM 0021>1 -0091>
LSO+23
.BETA-OZ
.07
EX IT IF TfRIIINAL RESULT AoR REACHED
soex
00288 106 00392 OUOO
, LSQ+2)
RESTORE LAST SU8TRACTION
LS\!+ 18
.011>11.
00300 IJ 00250 001'1
.01>.
00312 L3 0025Q 00000
LS,O+ 18
LSON-o
.01
.010. IIOVE FLAG RIGHT OI.E.
00U4 J I 003.2 000-1
OOHo 32 00000 00000
.010. MANTISSA ADR •
150-18
.02
003"8 JI 00258 000-2
.010. USULT ADR • I
00300 J I 0021>3 000-1
LSQ-23
.01
.01>10.RfSUI T _ 9
.09
00372 JZ 002l>l 000-9
IS0-z:j
003 ... "9 00212 00000
150-12
14
.5000000000 5050
0031" 0001~
,10, UIT
8ETA-2
.50
00392 J3 000. . OOONO'
9Q
'
00"0' )Z 00090 00000
BETA

·+31:1

.50
,8E t A-1

.10

.0.
.0.

.b.'

·

.0.
.0.

·

.)J'

2j

I,

;PS

II -u

MON I lOR

I

IlIBROl" !NE SET 01

UU .. 1O

1f

P[K't('}

004Z0

~

PCK dO

00" 30 SCI

AM

.9

, ~o

t

10,

004"0

TOM

BElA-IO

,0

t

11,

(.\; .. ')0

BE: T ,-4
U
TFM
SQ l+"2
.1
IC 2-11
OENO a lOb 1

00400

00410
00<80

;p,

11-0

(.I\}(jLO

10

C' ,U"-l)

Fe. os 1

"hlt,50
OOfl60
cO(J1lJ

.. tlN i

ro~

,010
,0,

::tU8kouT I Nf

r~

no lOu
OOilO
.id 1 i.O
dO 1 :~o
OD 140

00 1 ~n
(<:160
1.'0 l 70
O(i 180
uu l'lC,
C0200

00210
00220
00130
00240

a fJ.:! M)
00r,0
00280
00290
00300
00110
00320
OOHO 8NP
00340
OoHO

Dono'" -0000

FSIN1+2't"O

."

I.

,

PC,,-

20

U(

4.

eM

"rA

HE-TA,D,,", lOkl
4+'t't, ,0
BfTA-Q,FlONE-9
AlPHA-Q,BETA-9

OT

::. TOP l

IF.

lRES+30.STORE

C-

HTA,OB,lO

eNH

•• 32,,0

TOM

401.0,11
ZRE5
BfTA,02.10

Of<

81
CM
8NH
TO"
M
U
A"

TF
S.
TF
SF

TF

,

~OOOi)"55r;O

RTWOPI,BETA-2,D,

A

5
BV

C

00 .. 40
004t SO

8E
TFM
M

00 . . 0
00_10

TF
TF

00480
00490

1 FM
M

oo~OO

8HF

"
'5 saooooso

Al.PHA-l

ALPHA-l,COfU,.
-+12,,0
ALPHA-2,AlERO-2
ZAB.12
•• 9.4.010
... lPH .... l •• l.PH~-l
$AVE,90

.LPH.-1O,CO .. ,.1
•• s9,cm~C+lO,011
SAVe. AL'HA-IO

·.24,'.,0

2
f:,

aOOb(;

0OO8fl

00100
00112
00124
00132
00144
001156
DOlbB

00 180
00188
00200
00112
0022'

REDUCE

Q023b

00Z48
002bO
00Z72
0028.
0029.
00308
00320
00332
0055500055

-0032

J' 00121 00009
JS 00 loa 00003
M" 00056 00000
J S 00321 Dono 1
j') 00100 00004
10 n2310 -0016
0230N 00000

'"

5000000tSOQ 5005500'>00 soooaO,350
00 \50 0OO4h
00070 J4 DOOQ8 aDO-JIll

AlPj.iA-l

ALPHA-I.CONA.1
ALPHA-I
ALPHA-I,cON8,1

-~

o/,n~,

A3

RT~OPl-27,99.0
).
, ~050505050

c.

Ouo .. "

BETA,'ll,tO
8NP-l,8ETA,O
BETA,B,lO
··18,8ETA,O

*.3bttO

SF

,0
017

401,0

tiNF

•

1)00 I,
000t'4

-.24, to

a

oc

,0

(l!lO
~

00000

OOO{j~

"7

"

OOORO

O\)(J04

ooouo

t.' ~ '" ~ .,

000000000

o()f'o ..

RNP ... t,9,O
F <:.1 '" l-+oe , l
F~IN1+6&

OOONO

PAGE 10

T DM
TOM

HhlP .. 1 • 1,0

00000

FOR S iNP lx.U
OOOOG

f~M

INI

00097

SET 01

t nCAR

"i/{I-){I

00~30

, q.

PAGe

STORE MANTI SS. RE SUL T
00<16 26 OZ39RETURN TO MAINLINE PROGRAM
00l.

A'....Ph.\-lO ,'h,

OO~48

"-1), 1n ,0 10

0051>0
00512
00.,84
00328
0059.

00':> 24+

,"

·-})~tl,01O

• -H "-.

ue

2"

""

ALPHiI.-l,ALPHA-l0

OO~80
OO~qO

OObOO

TO

a"

QOblO

oD

00b30
OOb40
00.50
OOboO
DO.10
00b80
00690
00100
00710

I

U

,,,0 "~l(": I).,u.,u

u51)1)50~OOO

ALPHA-ltl

TO

00'10

PA&E

IE 1 01

TF

A"

ou,10

1 NE

"
"NI

on'i"O

on",,.,o

~U8krHJf

_u
'<,

50555050 .328

00608

Q2,AlPH'·1"
AlPHA-Q,82
BeTA-lO,Ol, LO

NO~'"

00'20
00. l2
00b4,.
00.5.

·."fl,AlPMA-q,O

TO

ALPHA-Q,AlPHA-8

00bb8

"

BE TA-lO d dO
ALPH,
,NOS a I"
·- .. 8,,0

OObqZ

TD

07

00b80

Tf

Al~HA,

b7
IF

50 I GI'II

00704
00712
00124
00136

A\ PHA-l

00744

IF

AlPHA-Q

b7
00 7 ~o lot T.. OP I ul
00140 CONA
DC
ue
001"0 eONb
DC
007bO LONe
00710
DC
00780
DC
007QO
DC
Quean
DC
UE:NO
008 Ie

00710

BE T A-lu

BNP"'Z4t"O
9,l1)91549'd
q t 2;0000000
Q,500000000
10,39110b7150

GO/lSb

00171

0018 a
00189
00199
00809
0081.
00829
00839
01072

lO.-1bIj1~97504
lO,~lb022315B
lO,-41341b17~O

10.0t)2t1318':1,n
01072

l2 DOU9Q
00090
KI> OOO~.
JI 00~'1
J2 00449
"1 00500
00028
I I 00048
Kl OOO'~
2N 00092
LI 000~1
J' 00088
00112
l J 000~1
J2 00088
K5 000 ••
00'5'
I I 00051
KO 000 ••
'9 00 l08
l2 000.5

n

"'

".

II

00000
00000
00090
OOOJO
000-1
a I 700
00000
00050
00061
00081
000-1
00057
00058
000-1
02401
00000
00000
00088
00000
00000

,..q 00)44 00000
00009
00009
00009
00010
00010
00010
000 1 0
00010

1i

SPS

11-0

iliON I HJR

00010
(Juu20
000,0 FATNI

F ATN 1
UIA
DGRG EuG.o,R
TFH
PCK+5

00040

01

00050

DC

OOObO

BO
TR

00010

{J0080 Fl:ETUkN .1

CH

00090

00100
00110

TR
OL

ooUO

TF'

00130

TD

00140 TEST

CF
C.
bH

ou 150

001bO
00170

BE

00180

TFH

00190
00200
00<10

A
TFM
CF

00220

TESTl

1

SuBROUT I Nf:

, ··20

PAGE 12

lET 01

ol

00004 00005 - 0000
00000
00000 10 02370 00020

,.,

8~ TO PICK AND RtTUFl:N
00012 49 023bN 00000
50, a 55 550 50 ;550000 550500000 05 055050505 05 05 0005 00050~0 ,l50
00150 00050
,0,
,Bf T A-9
CK FOR ZERO MANTISSA
··3£
00020 Ml 000~2 00089
fAC-9
,A. ZERO-9
00032 LJ 00051 00479
00044 H9 00344 00000
lIaR E
,-l
,10,
I S NUMBER TOO Sfo!ALL
8ETA
00052 J4 000ge OOO-L
F lC-9
,8E T .0,-9
00060"" lJ 00051 00089
0007b '1 00344 a IlOO
STURE
VES
",07, NO
Tf~T+l1
00088 J. 0012l -0000
TtS T+q
,I
,0,
IT ORE SlGN m ""'NTISSA
00 I 00 KN 00 121 0009b
00112 Ll 0009b 00000
Z
,a
IS CHAR POSIT lVE 00124 H 00098 000-0
BETA
,1O,
,0,
C PLUS
YES
0013b H. 00152 01100
yES
,0,
ZERO
EQUAL IERO
00148
OOZ""4 01200
,01 I
NO CHAH 15 NEGATIvE
TES T 3+ 11,z
OOlbO JO 00219 -OOCJb
,0,
00112 KJ 00219 000CJ8
TES 1 3+11dH:TA
,a
00 184 J. 00088 000-0
8ETA-1O
dO
1-1
0019b Ll 00089 00000

pel<..

,

".

IF
OOZ08

00210

TO"

1-1

00240

CF

1-'

.-10

••

,

,

0009b 00000

00220 J5 00089 000100232 Ll 00090 00000

00250 IEROC

CH

1-'

12q

.10.

002bO
00210

Bl

AFl:E T+3b

,a

"M

I

,
,

00280

TOM

90

.

, -1

,51 x

00290

,98

00300
OOllO

IF
DC

50 ,0 ~O SOD 5000 ~S500

00120
OOHO
003.0 UEI

lO
0
TO

,I
91
92
• SAVe
TES T 2-1),99

SAve

,la,

,

00244 J4 00090 000K9
0025. M1 00)7' 01300
LARGeR THAN PO INT 29
00Z.8 Jl 0009. 000-,
00280

d,

1~

00090

,
,
OOOOJ
,

00292 'K 0009b 0100e
00304 •• 00017 00091
500 55S050~50000005550s~000000000000, 350
00150 OOO~O
HARDWUE 0 I~ IDE 001l. 2Q 00091 0009.
OOlle 2R 00092 00077
,0,

216

SPS 11-0
00)50
00)&0

MONI TOR

TF
SF

l

SUIROUTINE SET 01

.90

EIGHT DIGITS

",a,

TnT+11

"iii II
00300 05 ,00579 00099
00352 O. 0009& 00090

··

00364 L2 00123 00000
OOHQ,

.l

00)80
OO)9Q

TF

OO~OO

rFM

IFM

SAVE
.91
LOOPA+1l ,lCN'-1

*.9

,4

",0

1,

,DID,

OOH& 0 L 0009& 0009&
00318 K& 00077 00091
OO~OO JO 004.7 -0552

EIGHT DIGITS
NINE DIGITS

·

00412 Jb 00421 000-4
00424 Kl 00542 00077

OO~IO

00~20

~OOPA

0043& K& 000&6 00000

OO~30

·

.91
M

DoHa

AM

00070

6NZ
TF

OO~&O

S"

OO~'O

lOOPA+II .10
LOOP,"15.1
lOOP A
•
FAt
.ONE 2-3

00.48 02
SEVENTEEN DIGIT PROOUCT
004&0 Ol
00472 J I
,DID
,010,
00484 J2
00.9b M7

,0,

00006 00091
000&6
00441
00421
0043b

00017
000 JO
000-1
01200

·
·
··
·
·
·
·
·
·
·
··
·

00508 00 OOOb& 00510

00490

FAC

00520 02 OOObb 00091
00500

M

00510

bNF

.l

TUT

00520

.TEST+II

.01,

.TUTz-n ,01.

00532 Ol OOObb 00096
THAN .29
00544 MM 00592 00123
8R IF QUOTIENT NAS PDUlIVE
0055b MM 00580 00519

IR IF • WAS lESS

OOHO

00568 )2 00091 00000
91

005~0

00550 TESH

bNF

•• 3~

005bO

SF

91

00510

DC

00580
00590

IFM

00000

TO
80

OOblO LOOP,

tTEST+10

d

~OT

00580 2 J 00091 009H
1, 2. 3, "
•
00592 MM 00b28 00 122

dO.

00bb4 J2 OOObb 000-1

r.

82
91
'LOOP

TO
81

OOboitO

IR IF CHAR

00&04 32 00091 00000
50 .005005005000000000 50505005500055050500500505 005 000.350
00350 00050
91
,A CON
OOb I b 2J 00091 00919
FAt
.01
00b28 J. OOObb 000-1
92
.BETA+I
OOb'O 2N 00092 00099
THT 1-24.82
NDAMAlIl A TI ON
.0.
00b52 M3 00701 00082

00.20

00.50

,01.

.83
.NO~

DI~

OOb 7. 31 00082

.0.

ooon

00688 25 00091 0240 I

00700 M9 00652 00000

2 J !J

SPS 11-0

MONITOR I
~f

00;,10

TF

82
FAC-2

00.80 TEST!

...F

STORE

87
TF

I..IUobu

00708 32 00082 00000

I

TEST+9

• I•

..

0010(, (.PIUS
00110
00120

8H

S 1 GN+12
91
.C HRO-I
8fTA
.B
.10.
TEST 2+24.

oono

TF

FAt-2

00750
OQ1bO

...

-+18

00110

SF

OOf>QU

(.M

PAGE 14

SU8ROUT INE SET 01

.0.

.C ZERO-)

·

00720 Kb 000.4 00089
TERMINATE SU8ROUTINE CALCULATION
00732 MM 003.4 00121
00744 M9 00)20 00000
CHAR POS I7IYE
00752 20 00091 00593
00164 J4 00098 OOO-B
8R I F CHAR GRE ATER THAN EIGHT
•
0077b Mb 0061b 01100
ADJUST POSIT ION OF I IN NUMERATOR
00788 00 00004 00591

·
··

.FAC-IO

00I~O

TOM

eN

00800 JO 008)0 -005b
00812 OJ 00830 00098

.0

00824 15 00000 0000 I

FAt-9
90
90
Sf.T VAl

00780
00790
00800

.BETA

01

.2
.82

00810
00820

8H

8ETA
, ..
TEST2·12 •

00830
00840

Dt
TF

l

Dono

SF

TEST+iO

0081>0

SF

00870

B7

.0.

.0.

.10

10.5000500050 .3,0
.90

00836
008'8
008.0
8R IF x EQUALS ONE
00872
0088'
III IF tHAR EQUAL 5. &.
00196
00350
ELIMINATE LEADING ZERO
00908
HARDWARE DIYIOE

• FAC-'

.0.

L2 00057 00000
2Q 00090 000&4
2R 00090 0009&
"3 00952 00012
J4 00091 000-4
7. I
M6 00&04 01100
00010
K. 0009b 00090

l-7

.0,

nRC C

00110 SUV41 TR

fAt-'

Dono

B7

7EST

0090Q ACON I

DC

9

00910 ACONI

Ot

10

00920

Dt

I

Dono At ON~

Dt

00'40 ,SIX

DC

009 50
00960

DElIO 01091

,AtON )-1001.

~40 419 '00

OS

·

00932 I I 00019 00000
009"4 M9 00244 00000
SET TO VALUE FOR. EQUAL ONE
00952 LJ 00051 00990
009&4 M9 DonI 00000
,00979 0000.

ol no 196 Sl7 .. Att TAN 0' PI OVU TNo
00919 00010
11 5)' . . . . . Alit TAli 0' P I OVEtt FOUIl
00••7 00001

.001 ••
•

·•

00920 I I 00122 00000

01000 0000)

,60000000
,"TA-~

0100. 00001
000" 00000
01091

2111

~P~

MO~ITOR

11-0

I

OUQ 10.

~U8ROUTI~E

PAGE 15

SET 01

HASTINGS .. j~~ROXI"'TION

00020

uuu,O HXT l
OOObO
00n10 FF_l

no",.o

ounqu

, F E)l.l
0000'" 00005 -0000
00009 00005 -0020
OOAG EOG . .
00000
DC
)8
,0500050000 0555505000 5550000000 00050005
1338
00138 00038
l'IIuT 1.+;0 .ONt; l-t.
,01
00000 JO 00114 -0511
00012 "9 00032 00000
FE'.-12
NO T Z • 30
, l OC f
,01
00020 JO 00114 -0523
,. ·20
P(
00032 10 02370 -no 52
011
PC_
, b.
bR TQ PC_ ANO RfTUA~
0004 ..... q 023bN 00000
au
NOT I
,O-~
,0,
ZERO CHECt(
00052 "L 00084 00089
TfiI:
F AC-q
,FLnNE-q
000b4 LJ 00057 00595
81
STOAE
0001b M9 00344 00000
Oil
0
,-8
,10,
00084 J4 00098 000-0
ts,NH
FEXl ..... ~
0009b "7 000.4 0 II 00
~
LOGE
,O-Z
00108 KL 0052) 0009b
CM
0
d
tl D.
00120 J4 00098 000-3
,0.
··3b
"U~ T cALC
00132 "7 00lb8 01300
~NE
E ROuT
UvEA OR UNDER
001"" 1017 00b04 olZ00
,0, HI ORDER NCT lCRO
KUUT
,82
bD
,

1/."

,

00 lOu

00110
00120
OOllO NOT I
001 .. 0

00150
1)0100

·
,

(l0170

.0,

l1Q 180

0015b "3 OObO. 00082

,

.2

00,,00

00210
00220
00230
002 .. 0

TF

,e

TFO

,80

A

t

ZERQ-2

,010,
,0

a

POSITION FLAG

00 IbB B 00082 00000
001"0 20 00081 00592
00192 Jb 00222 00000
0020' KJ 00222 00098

·

,F

00250
Q02bO
00270

A.
A.

·-18

B'

E

00180

AO

nowo
00310

OQ3l0

'-0

,0 I
,0 I

,010, SET CHAR EQUAL
.0blO,CH.R PLUS ONE

,09

,010.

.0.

~llUT

0021b )2 00000 00000
00228 Jl 002Z2 000-1
002"0 Jl 0022t( 000-1

O~ER;

OR UNIJERFLOW

~OVE

002'52 Mb DOb04 01400
MANT AND CHAR

00284 JI 00222 000-9
5500 5055500000 0050550050 5555050050
0340
00340 00040
0027b KO 00075 0012_
011
0028B L2 000b1 00000
,E xCPlll
00300 JO 00347 -Ob"5
,011. 'N'T CALC lOOP
t C Z fM 0
00312 1(0 000b4 00 594
,7
,0 10, COUNT
0032~ J. 003H 000-7
00330 I( 1 00004 00000
00348 KL 000b4 00015

,50~000

OC

.0

1F
SF

FAe .9
F AC+ 1
LOUPE.ll

OOBO

IF"
IF

OOj400

IF.

00350 Lonpf:
003f'10
00370

o
TF

HC-2
FAC-2

uo 380

AO

LO(JPE+ll

F 4(-2
lOQPE-3
F .6.C-2

00300 K6 00004 00090
,010,

til

AQJUST LOOP VALVES

" .,

~

~~.

SPS

11-0
SM

00372 JI 003.7 OOOJI
00384 J2 00333 000-1
OO)9b 07 0033b 01201

,0 10,

bNl

lOOPE-;
LOOP E

,1

00400

,1

,0

00410

A/4

FAC-II

.10

dO,

OOj("!O

PAGE 16

;U8AOUT'NE SET 01

"ON'TOR 1

ADO OPIIE

00408 JI 00055 OOOJO

,

,Flt.C-3

004t20

00420 KL 000b3 000b3
00432
00440
004~O

TO

FAC ... 1

"NF
C

00490

8NE

STOf(E
88
··32

OO~lO

so

B7

00081 00000

00444 Kb 00004 00088
00450 KN 00067 00099

.

,8~TA.l

CHECK FOR NEGATIVE'
,o . . 2

F A(

,ONEZ-I)

004b8 114M 00344 00096

.• 0

010

,I

EROUT-;2 ,
.0
,5005055050 5050555550

00'>20
00,30
005"0

oc

20

TF
LO

~AvE

,89

92

,ONE Z-3

005!10

U

TF

q2
FAC-2,90

,~AVE

005bO
00570
00580
00590

~F

FAt

AO

FAC

,01

';20

HARDWARe 0' v IDE

.10

87
TFM

STOAE
IRE S. 30. Sa TOR

BNF

OVFL,D-2

00b30 EXCNI

87
DC

UNfl
11

q326 421"

000"'0

DC

II

554q 180,.

OOb,O

OC

II

17 4.11 199 ..

DC

II

OObOO EIotOUT
00610
00020

)2

,B8

TF

004bO*
00410
00480

Qosno

·

81

OU'o30

€::

00480
00402
0050.
00516
00320
00S24

20 00088
07 00524
J2 OOOb.
"9 00572
00020
Kb 00017

00508
01200
000-1

00000

00089
L
0053b 20 00092 00510
00548 2Ao 00092 00017
00560 Kb 00064 00090

00572 L2 00066 00000
00584 J I 0006. 000-1
00596 "9 00344 00000
00b04 JO 00478 -0)4'
Dab 16 M" 00380 00096
00628 "9 004" 00000
00b'5 000 II

OObbQ

0065b 000 II
OObb 7 000 II

72 9511 367 ..
OOb78 00011

II

aDb70

• 254 )9)5 748"

00680

11

OOb80

OC
00700 0
00110

II
01102

poO II

bb2 7308 8"3"

00700 000 II
.1151 2927 lbO"

,lETA

O~

DEND

t

00711 00011
00098 00000
OliO.

2 ?-~.)

SPS

11-0

MaN I TOR

I

CDOlD
0.0.0.30
000 .. 0.

.

OURt. .O(,AR
F~OGI

TOM

MUlM"ll

;9

,0

~7

00050 •• ••••

00060 fLNI
00070.
0.00.80
00090.

PAGE 17

.UIROUT INt sn 01

.Fl .

00010

FlNhl2
,0
RtlDcnA8lE SPS flOATING LN
TOM
MUlM-11
01
,0
TFIIt
PCK+5
,-.20
,17

COCO .. oooo~ -0000
0.0.0.09 000.0.5 -00.20.
. CaDDO
00.0.00 J5 0051) CilCC9
0.90.12 "9 00.0)2 00000

00.020 J5 00511 00001
000)2 10 OU70 -0052
000 • • • 9 (1)6N 00000
DC
"2.,50050000.0000 0550000050 '000550000 55550505·50 ,)50
0'0150 0.0.0..2
00.100
LF
0.0.052 L3 00.089 00.0.00
0.0.110
bD
,8-7
8R IF MANT NDT ZERO.
00.0.6. ML 00120. 00089
TOM
00120.
401,0,11
0.0.076 15 0.0.01 0000DOIlO
TF
PCK+2S
,NNINE;
,6
00.081 20. 02)9- 0011>5
0.01 .. 0
TFM
PCtl. 1 S
t +99
DO. 10.0. 16 OH8- Doon
.610
pel(·10
00150
87
0.0.112 .. 'I 0217N 00000
.6
00160
INF
EVAl PN
,8
8R I F "ANT IS POS IT I V E
OOIZO MM 00 156 .00096
00170
CF
00.112 l ) 00096 00000
00180
TOM "01,0
001"" U 00.0 I 00000
001 QO ••••••
EVAlUAa
x EQUAL PN so. THAT x IS GREATtR THAN
00200 ••••••
ONE HALF ANa P EQUALS I, 2 •• , 8
OCZIO EYAlPN TFM
lo.DPl+107,CDNST
.0.17,
aD 156 JD 00.99 -08 I)
OOuo
TDM 8-8
01
,II, SIT x EQUA~ X PLUS DNE
0.0.168 J5 00011 DOOOJ
Calla
010
0.0.180 J. 0.0089 OODJ'
C"
00.140.
BNl
8R MODIFIED X MCRE THAN 3 HALVES
00.192 M6 0.0236 01)00.
0.0.250.
,8
SET X EOUAl X PLUS x
0.0.20. .. KJ 0.0.0.96 0.0096
AM
CC2bO
LOOPl+107,1I
STEP LN P FOR P EOUA~ P.P
DCZ 16 J I 00 .. 99 -00 II
00<70
,0
87
·-bC
DD2Z8 M9 00. 168 000.00
TF
00280
FAC-Z
,8
DD23b XO 0.00.6 .. 00096
00.290.
FAC-2
, LeN.S"l
SET NUMHATDR EQUAL X-I
87

P(K

,6

t

,0,

,

,0,

,0,

,

,

0021t8 KK 0006 .. 00572

0.0300
00.310.

LO

,FAC-Z..
HARDWARE olYIDE
DDZ60 20. 0.0089 000.6"
o
,8
0.0272 2R 00.089 000.96
TF
,90.
0.028" X. 0.0.0.96 00090
DC
... ,5050.555055 5505005055 5000000055 0550.50.0.0.0.5 050.555,),0.
0.0.350. 000. .. 6
~F
8
0.0.296 L 2 0.0.096 00.000
SF
8-9
0.0)08 L2 00087 00000
"8
,8
TIMES
0.0.]20 XL 0.0096 00096
TF
SA vE
,89
CC33Z X6 00.077 00089
A
8
,8
PLUS Z
0014 .. XJ 0.0096 00096
TF
FAC
.ClERO-1
0035. XO 00066 0059)
TF"
lOOP ~.II,lC"1
,07
00368 JD OO~O) -0533
TFM
•• 9
,6
,0 I 0
00380 J6 00)89 000-6

acuo

CCBD
003"0
()D350
003bD
00310
0.0380
00.390
OO~DO

0.0. .. 10

89
89
8

221

~PS

11-0

MONI TOR

SUBROUTI NE SET 01

'AGE

FAC

CALC SERIES USING Z SQUARED
0039Z X I OOOb. 00000
0.04]0
FAC
, SAVE
00."04 KL 00066 00077
,89
TF
FAC
00"40
00"1. X6 00066 00089
AM
00450
LOOPL+II olD
,07
00"Z8 JI 0040) -0010
LOUPL-3
,010
OO"bO
01
00""0 J2 00389 000-1
S"
00.:.10
BNZ
LOOP L
,0
00.452 M7 00)92 01200
004ijO
,8
FAC
CONVERT TO ODD POWERS OF l
00 .. 6 .. KL 000.66 00096
OOIrrtQO
89
0047. 2X 00089 00096
,8
S
I)O~OO
TF
00 .. 88 K6 0009. 00000
b
(j1)!:I1O
,89
00500 X2 00096 00089
iI
S
00520
NoP
,0,
MULLUG
8R IF lOG CA~C RATHER THAN LN CALC
00512 Ml 00736 00000
LNTEN
0.0530 MUlM
,0
0052 .. KL 00857 00098
.8+2
99
OOHD
,8
00536 2J 00099 00096
A
00550
97
,C ZERO
00548 ZM 00097 00594
TR
00560
FAC-9
,AZERO-9
005.0 LJ 00057 00419
00.570
38
,5000.000500 0000000000 0000000000 55505055
DC
t 338
003)8 00038
00~80
STORE
BE
00572 "6 00344 01200
JlR IF X WAS ONE
HM
PC. .... 1 S
00584 16 0238- 000.-)
00590
,0 3
.610
,99
00.00
TO
FlNl+7
00596 X5 000.27 0009'1
.0
99
00610
TO
,8ETA·l
00608 ZN 00099 00099
_+56
,87
006Z0
80
006Z0 M) 00676 00017
.0
,88
006)0
TR
87
0063Z 31 00087 00088
PCX.15
006~~ 12 0238- 000-1
006~0
SM
,01
.610
TO
98
.... 05 DIG
00656 25 0009. 02401
00650
006.0
b7
00668 .M9 OOblO 00000
• ....8
SF
00670
87
0067.6 32 00087 00000
8NF
00.610
,Olt SET FLAG
00U8 M" 00712 00027
• Fl.-Nl.1
• ... 2..,
94
00700 )Z 00094 00000
00690
SF
TF
PCk+25
,94
,6
00.700
00712 Z6 Oll9- 0009~
00124 .9 0237N 00000
00710
PCX·IO
8
.6
00720 "ULLOG TOM 79
00736 15 00019 00000
M
00748 Xl 00523 00091>
Dono
LOGE
.8
0071>0 . . 00091> 00019
TF
00740
8
.89
00n2l2
00096 00000
SF
00750
B
ONEl-2
,8+2
00784 XL 00511 00098
00160
0079. "9 OO!)I> 00000
00770
87
.0
"ULM.12
00780 CONST DC
00813 00011
11
.0
00190
DC
0082~ 00011
1I,-'931ltll'05
00800
DC
11.-UI6Z9H611
00835 00011
00841> 00011.
00810
DC
11,-207"415416
OOIZO LNTE" DC
00151 00011
11,2302"50929
00830 NNIIIES DC
8,-99999999
00.65 00008
00840
0009, 00000
.lnA-2
00850
PEND 01122
0lU2
(JU .. 20

LDOPl

"

,

"

,"

,

..

·
·
,

"

•

os

22ft.

18

SPS II-D
00010
00020
OOO)D nUl
00040
00050
000.0
00010
00010
00090
00100

IIOIIITOR I

IIU
OORG
HII
17

",. "

SUIROUT Hot SET 01

FSRU
iOG . .
PU+5
PU

00004 00005 -0000
00000
00000 10 02310 -OOZO
,·.20
.11
.R TO PICK AND RnUR"
00012 ". on." DOOOO
MNF e+24
.PCKoU
.011. SUi FLAG ALPHA FIHO
OOOZO II" 00041. onllit
00)12 00012
12 .5000000000 05 .312
SF
lETA
00012 LZ 000. . 00000
PChU
5
.PtuU
•• 11. ZUO ALPHA FI!:LO 000"4 22 onl- one511
.1
.10. LOCATE HI ORUER FLAG FRail I OPERAND
'C h 20
0005. 12 onu 000-1
000.1 114 0005. onl"
.'CKo20
.011
IN' --12
LF
PU+lO
MEIIDVE FUIi FMOII I OPERAND
00010 n onlN 00000
Tf
IIOVE ~ IElU TO A OPERAND
... '.,+15
.IETA
.~.
00092 20 0211- 00091
PCK+IO
RnURN TO IIAlNL I"E 'ROGU"
17
00104 "9 oznN 00000
01141
UENG 011"1

•••

•••

oUlID
o)u.~o

•••

Dono
00140

225

SPS II-D
00010
00020
00030 FSLSI
00040
00050
000.0
00070
OOOMO
00090
00100
00110
OOllO
00130
00140
OOISO
00160
00170
00110
00190
00200
00210

IIONITUR I

PAGE 20

SUBROUlI NE SET 01

0)004 00005 -0000
00000
00000 1D OZ370 -0020
.11
••• . . TO PICK AND RETURN
OOOU 49 on.N 00000
Dt
110 .0550000000 0005
.314
0031" 00014
TO
--I
• BETA
.0.
SAVE SIGN OF B fiELD
00020 KN 00019 0009B
CF
lETA
00032 L3 00098 00000
TF
PCl+30
PROV IOE WORK ING AOR OF • FIELD
.PCKo20
00010" Z. 0239S 02385
SII
PeK+30
SUB TO ESTABLISH LtNGTH.
01
0005~ 12 02395 -000 I
All
PCK+15
ADJUST A FIELD AOR FOR EACH DIGIT
.1
000.. II OZ3IO -000 I
MNF *-24
.PCK+30
00010 II" 0005. on9N
.011. IN 8 fIELD
TF
PCKo15
IIOVE M FIELD TO ADJUSTED A FIELD
.IEU
00092 20 0231- 00091
PCK+15
00104 24 onlo 02315
t
.PCKo20
BNN
BR WHEN NO IIORE ZENOS REQUIRED
.0.
001l~ II. 00160 OUOO
All
PCK+15
ADJ ADR OF A FIELD
01
00128 II 02310 -0001
TOil PeK+15
IIOVE IN ZEMD KT OF DATA IN AFIELD
.0
00140 15 onl- 00000
00152 119 00104 00000
b7
.0
*-4.
INF PChlO
RESTORE PROPER SIGN AND
.FSLSl+I~ ,16,
001.0 411 0237N 00019
SF
PCK+20
RETURN TO MAINLINE
00172 32 0238N 00000
B7
PCK+IO
PROGRAII
00114 49 OZ37N 00000
DE NO 01151
01l5l
DSA
DORG
TFII
b7

FSlSI
EDG ..
PCK+5
PCK

,·.20

•••

*._-

.

•••

•••

•••

22&

SPS 11-0
00010
OOOlO
00030 T Fl S I
00040

"ONI TOR I
O~A

SUBROUTINE SET D)

IFUI

UlJRG EDGAR

IF"
87

peK.!

,··20

PC~

00050
00060

DC
TF

4

00070
OOOHO

If

81

PC'+25
PC" 10

00090

UENO

,0505.30'
,lEU

PC~015

,8EU-l

,17
tt.'
,6,

,.,
,.,

alibi

'AGE 21

00004 00005 ~O.OOO.
00000
00000 10 02370 -0020
IR TO PICK AND RETURN
00012 49 OH6N 00000
00304 00004
NOVE CHAUCTERISTIC
00020 20 023'- 00098
NOVE NANT I SSA
OOOll 20 0239- 00096
RETURN TO "AINlINE PROGUN
00044 49 OH7N 00000
alibi

227

,ps

11-0

MON I TOR I
BTFSI
EDGAR

00040
OOO~O

S"

p,,025

00060
00010
000811

DC
TF

6
,050005,350
PC,025
,aETA-2
*+30
,PCK+1O

,.,

TF

000"0

&T

PC,015

,.,

OQl(HJ

87

00110

OENO

OOOlO
ooo~o

ij IF

SI

PC"~

, *.20

PC.

olin

PAGE 22

SUBROUTINE SET 01

USA
OORG
IFN
87

0001(,

017

,b,

01

,&iTA

,0,

00004 00005 -0000
00000
00000 10 Ol310 -0020
BR TO PIC' AND RETURN
00012 .9 023bN 00000
AOJ AOR TO A F IElO-3
00020 12 02390 -0001
00350 00006
MOVE MANTI SSA
00032 20 0239- 00096
STOlE RETURN AOR OF MAINLINE
000.4 .6 00074 02375
aR AND MOVE CHAueTERISTIC
00056 2P 023B- 00091
IR TO "AlNLlNE WHEN 88 OCCUR S
00068 49 00000 00000
Ollll

2U

SPS

II-U

MONITOR

I

SUijROUTINE SE T 01

PCI(

00020······
Ou030 0 • • • • •
OU050······

SUBR.OUTINES ~EUul~EOtTHEN THE AREA IS USED A~ FOllOWS
0'''01
NOIS!: DIGIT.
SOU"CE.S,U8ROUTINE'SuPERVISOR
pel(
'D~ OF PICK.
SOUNCE,SU8R.QUTINE SUPERVISOR
PO.• "
'OR OF jlj,F.TURN TU SUSk.
souRce,SU8AOUTINE

00070······

pC.K+10
PCI(+l'

0001010.·· •• •

P(K+20

OUoqu .... "'····

P(I(+2'"'

uuo .. o······

aQObO······

AkEA JII,t,¥

8t

USEO AS

PAGE

00u 10· .... •••

A WORK

AREA

IF

SUHR NOT USED.

IF

AOR OF RETuNN TU .... INLINE.
SOURCE,PRIIIII'RY LINKAGE
ADK OF A UPENUW CHARACTER.ISTIC.
SOURCE,PICI(
AUR OF t1 (jPEiotANU CHARACTERISTIC.
SOURCE,PICK

AOR OF A OPERAND MANT ISS..
SOUf.l.CE:,PICK
ADA. Of- tl UPE~ANU M'NllS~A.
SOURCE,PICK
RESEIoI.'v'tU FOR POSSIBU: RECORD MARK.
001iO·
PCK+3"
~ RES.~k~tO (OWE:
uu13u······
P(K-b T~RU PCK-90
SUb\lEC FOR T.... ~ 11 FUANI::-.HE-O SUBROUTINES.
OOlltO·
AORS AIo
,2
.PCK+20

INDICATOR
00198 2N 00401
FRUM MAINLINE
00110 31 0237b
CALC I(.K+;'>O

,11,

00HI2 I<..b 00194 U239",
TO SUBROUT INE

2 2 ~J

SPS

11-0

MONITUR

I

SUbROUT I /lit

PACE

51::T 02
003Q4 46 O}'H- 01400

AFFIX PROPER SIGN

00lt60 SIGN

;

00""0
00480
00~90

STOIol.E

,

AM

AlPHA-2
ALPHA-Z

,00

, la,

IF

PCK+25

, AlPHA-2

, b,

00500
00510

00520
00':>30 uvFL
005 .. 0
00550
00560
00510 LJNFL
OO~HO IRE ~
oo~yo

DObOO
OOb 10
00 b20 ••••••
00630 ONtl

pel<..+ 15

07
OC
TDM
IF
TFM
b7

TOM

TF
TFM
AM
b7

OC

,ALPHA

12
401
PCK+25
PCK+15
ZRE S+24
401
PCK+25
PCK+15
PCK+25
PCK+I0

,b,
,b
,)12

PC I<.. + 10

,0100000001
, -1
,NINE -45 ,6,
,99

,bID

,1
,CLR-96

,b,

,-Y'J

,biD
,biD

,00
,

00406 H4 00430
0041B l2 00048
00430 J I 00048
MOVE ALPHA-2 TO A. MANT
00442 20 0139MOvE AlPHA-2 TO A CHAR
00454 20 02380046b 49 0237N

SET

00099
00000

000-0

INOICATORS

00048
00050
00000

00312 00012
, +L

, +L

00474 15 00401 OOOOJ
00486 20 0239- 00763
004QS 1& 02 3A- OOOR9

00510 H9 00554 00000
00518 l~ 00401 OOod 1
00530 20 0239- OOBOB
00542 Ib 0238 - OOORR
00554 11 0239- 000-0
OOSb6 49 OZ 31~j 00000

SHAREO CONSTANTS
49
,100000.0000000000000000000000000000000000000000000
006'21 0004'}
, 15707963267948'9661923132169163915 144 209~584b996

00640 P 10\12

DC

00b50 LOGE

OC

47

,43429~~B

GObbD LN 10

DC

48

t

00b70 NINE

OC

OOb80 ClR
OOb'W

9b
411,
OC
49
DC
DENO
02001

006b8 00041

00700
00710

os

1 90 32 518216511289189 1 660508 2 294 3970058 0

00715 00041
230 2 5850 929940456840 11991454b843b~ 20160 110 1488b 2

00763 00048
, 9'9 '9 9 9 999 9 99 99 '9 999 99 9 9 99 9999 9999 9 '9 99 99 9 q 9 '9 99'9 9
00808 00045
00Q04 0009b
9b ZEROS
00904 00048
,0
00857 0004'
,0
02001

..

2311

,00010
00020
00011i DlV"l
00040
, 000'50
00060
OCl070
OQO,o
00090

aU

00R6
T.

01 VWI

lOGAIl

,11.

PCK+ll

PCK+IO
TF
IS
LO
PCUlS
o PCK+]O
B7
PCK.IO
DEliO OlD II
AM

.21
.nR-IO
.,tK+IS
,P,C"20

"

..

.611
.611

'AGI

)

PAGE

4

00004 00005 "0000
00000
II0V~l DIV I'PEUHDS IHTO PCK AMEa
00000 31 02)7' OlnN
CA~C MITUIH ADR
00012 II Ol315 -0021
00014 20 00015 00194
00036 II 0239- 02U00041 19 0239N 02UN
00060 n 02HN 00000
02011

231

Ml)I4llOk

SPS IhO
00010

USA

FSl

SUIROUTINE StT 02
,FAl

, F03

,FII3

00004 DODOS -0000
00009 00005 -0020
00014 00005 -0564
00019 00005 -0148
UORG EOGA.
00000
00020
01)030 FS3
TFM BRANCH.6 ,BRANCH+' ,on, set UP FOR SUBTRACT
00000 JO 00106 -0101
,0
F'3+12
00040
M7
00012 M9 00032 00000
TFM' 8RANCH.6 ,INAOO
,017, SET UP FOR ADD
00050 FA)
00020 JO 00106 -015l
TFM PCK+5
,11
000)2 10 02no -0052
00060
,··ZO
00070
87
PCK
,6
00044 49 0236N 00000
44
00080
50501010 000n00050 0005550000 1150505550 515005 ,]46
OC
00]46 00044
0009Q
Tf
'LPHA-P
,'CI(+15
MOVE A OPUANO CHAR
00052 K6 00050 023800100
TF
A~pHA-l-P ,PtK+25
oil! II0VE A OPERAND MANT
00064 K6 DOD •• 0239TOM ALPHA-l~P ,0
00110
.a 1, -~ PRePARe FOR ~ONGER F IELOS
00016 J5 00041 0000TOM BETA-2-P ,0
,11, -~
00088 J5 00194 0000DOUO
COUD 8RANCH 11
00 I 00 4' 00000 00000
BNF INADO-IZ ,In,-2-p ,0,
00140
s .. ITCH SIGN OF B OPERAND
00108 MM 00140 001.4
8eU-2-p
00150
00120 ~] 001.4 00000
CF
Bl
,0
00160
IN'AOO
00132 "' 00152 00000
00170
SF
IETA-Z'"
00140 ~2 001.4 00000
,0
00110 INAOD TOil AoO+1
00152 J5 0014' 00001
01
00190
,IEU-2-P ,01
00164 JO oOln -01'4
T'M AOO+11
A~PHA-P
oozOO
.IETA-P
DO 116 KII 000'0 001.6
~
,0,
IH '0+60
811 IF A CHAR ~ARGER lHAN I CHA.
DOllO
00118 116 0024' 01100
'00220
,0,
IE
ADO
III IF CHA.S EQUAL
OOloO 116 00144 DilDO
"00230
n
.~PHA-I·,.IEU-l-P
.L ,-~ EXCHANGE FIELDS
OOZIl LJ 00049 00195
TF
00240
,11
00114 K6 00196 OU'InA'"
,"~+U'
TF
Dono'
IE lA-Z·p ,PCII+2'
00U6 U 001.4 OU'.11
00160
IEU·P
,ALPHA·P
00141 U 00196 00050
S
OOltO
IV
STOR l-U.'.
I· IF CHA. OIFf TOO LUGE
00160 116 00430 01.00
,+L
,10.
Ool7Z J4 DOI96 OOOU
DOUD
IEU-'
,."
00290
IL
STORE-U·',
.11 If CHU DlfF GIIUTU THAN ~
00ze4 liT 00.'0 0 UOO
00]00
A
,0,
SHIFT n CHAII 01"
AOO+ll
,IEU-'
DOlt. IIJ ooln 00196
,146
00310
PC
,0100101005 0010'00110 111"0'000 InOTOUIO ,no
00".000. .
INI' "a4
OOuo
00108 l1li oon2 001.4
,IETA-'!-' ,0
TOIl AOO+I
,2
OOUO
C"A.NGE TO SUI If IIIG
00120 JI 00141 DOO02
C;f
110340
IEU-l-' ,
eu.... "1 0110111 'UG
DoJJaL) 001" 00000

,

.11.

...

'"

..

.

.0,

"

-L.

232

SPS
00)4)0

II -U

ADD

MON I TOR

QUjbU
00 310
DOHlO

1U
b'
U

0039U

hi

00'-00 NORM

hlJ

004c!O

I"
1,

004,0
004'00

lD

OU4')O
uuoltbU
l;u ..

70

I·
01

C'

004~O

OO_qa

TUfII

uu,00

••

00510 E x. I T
00; 10
DO'> 30
005 .. 0
0(1,,0
QOl}60
OOl}70

BN¥
bNF

,.3

"7
IF.
JFM

.7
DC

00,)90

bZ

00600

bO

,.
,.

H.

F Ix

OOtdO
00640
00050

bN'

H.

00660

bD
SF

OOt:. 70

00680
000'10

PAGE

0<
OO,~4

,

I,

00580

OOb 10
QUblO

HI

K 1 00048 00000
44
0031)b 2N ODOQ9 0001t8
,ALi-'t"1A-"-f.i,,
I rORE 51GN
00lb8 Mb 00484 01.00
ADJ
,0
AlPI-tA-.2-P,
PROCEED WITH NORMALIZATION
DOl80 L3 000.8 OOOOD
-P,
bR IF ZERO SUM
ZRfS
OOlq< Mb OD5l0 01<00
f XI 1
,ALPHA-I-p,a.
• -L
"R IF NO'."IZAIN COMPLTE
00404 Ml 005l< 00049
Al PHA
-P,
0041b L< 00050 DDOOO
-L
AlPHA-l-P ,ALPHA
-p I I
-L ,- L
00428 LJ 00049 D0050
00,.40 .Q D0050 000411
AlPI-IA
-P,ALPHA-l"'P
AlPt1A-2-P ,NOS DIG
!:NTER NO I SE DIG I 1
0045, .5 00048 02'01
-p.l
AL PHA
00404 J2 OD050 000-1
,ID
Nu ... ".
00476 M9 00404 OOOOD
,0
ad" j 1101.I ALI-lHA- 3- P. I
~H 1FT RIGHT ONe PO>l110N
00484 KO 00048 OD047
At. Pf-A
-P,
-L.
CL EAR ExTRA HAG
004Qb l 3 00050 00000
AIPHA-I-P,-l
[NS E R T HI OROE R ONE !If I TH FLAG
-L,
00,01'1 J5 00049 OQOOJ
ALPHA
-p ,u 1
AOJUS T CHAR 00520 J 1 00050 00.0-1
,10,
,I GN
I lOR, ALPHA ANa A F F 1)( SIGN
00532 M7 00406 01400
-P,ALPHA
-P
00544 M~ 00414 00050
OIJ F L
-P
Ui'lF L
0055b .0 00518 00000
BR.ANCH+b ,*+ 32
OO~b4 JO 00 lOb -05Qb
,011
F I x. +2 ')
,04
00576 Jb 00669 00-11
,012
00,88 .0 00772 00000
f-03+24
48
,5I}SOQ40Z,0 l10 50 500040 ,,,2000000 020800,( 5 2 5 000 204 50 t 348
00348 00048
ALPHA-2-P,SETA-2 -P
MUL MANTISSAS
00596 Kl 00048 00194
-P,
I"E,
8" IF ZERO PRODUCT
00608 Mb 0053D 01200
,D,
, -2L
MOVE-12
8. lF NORM NOT REO
1100
00620 ~3 0071tl 00100
~O\l!:+ll
.OGl,
-L
OOb32 Jb D073Gl OOJDO
1100
8~TA
-P ,0 1
.10,
ADJUS T CHAR BY nNE
00644 J2 00 lOb 000-1
,0
00656 ~1 00692 01400
·+36
-p ,0 1
ALPHA
DObbS J2 00D50 000-1
olD
BE TA
-P,-Gl9
OOb80
.10
Jb 0019b OOORR
CHGl:
,FIX+23
,0 I
00692 ML 00008 OObb7
00704 3< 00101 OOOOD
10 I
-IL
ALPHA
-P
-IJ,BETA
00116 KJ 00050 OOlGlb
ALPHA-2-P ,44
, -L
00728 Kb 00048 OOOqq
!:)( I T
,0
00740 .0 00532 00000
BRANCH+b ,.+5b
00748 JO OOlOb -080'
,011
F I )(+25
,09
00760 Jb 006b9 OOJ 11
,111
,Q9,
, -L
00772 Jb 00710 oo-qq
,099
~O\JE+ 11
8,
,CLR-IOb-P, ,
00784 20 00085 OD7QA
,2L

,-I-'

1,

AU J

$uSROuT tNE

2-P

,

"

OU'-JU

I

AlPP1A~

A

MUVl

00700

IF

b7
IF~

Du710 FO;
00720
00730
00140

TF~

1 FM
TF

,

2JJ

5 P;

001bO
00770
no 780
00190
00800
00810
00820
DOt-! 30
00840 MOVEO
OD8,0
OOl:!6D CHGE:
00870

OO~80······

aD8GlO······
00900 IC K
OOY 10

00920
OD430

MON J TOR

11-0

00750

87
LD
0
8V
10

SUBROOllNE

I

FA3+12
qq
qO

PAGE

lET 02
OQ79b MO 00D32 00000

20 00099
2R 0009Gl
.b 00q28
, -L
2, 00099
09
M3 00b44
, -2L
Fix
"0
-p
.b
00530
ZRE
S
"I
ODooe
,40550002 ,314
8
DC
0087b 32 00100
-2L
100
SF
-p
0088e •• OD050
ALPHA
-P,BETA
I
OOqoo .9 00728
,0
fIIOIJE
b7
, qe
00908 Jb 0073q
, -L
,0,
TFM
MOVE+ 11
00920 M9 00888
MOVED
b7
PCK-90 DOWN TO END OF IORT MAY BE us ED I F NO ADDEO suBROUT$
PCK-5 THRU PCK-89
IueVEC FOR THE 17 FURN 1 SHED SOBROUT 1 NE,
,0
,11,
TD.
.0 I
SET ERROR INDICA roR
oone 15 00.01
HARDWARE 01 V AND FORCE
,09
SIMULATE
AM
PCK+15
,b,
00940 11 023800q52 '6 0237N
PCI(+ 10
,b
BV
0202'
DENO
02024
I C<

, AlPHA-2-P"
,BETA-2 -p, ,
,0
,99
,99
,0,

,

"

,
,

-L
-L

00804
0081b
00828
00840
00852
008b4
OD314

00048
00194
01400

2 J II

OOOqq

00099
01200

OOODO
a019b
00000
00008
00000

0000aVE
0009'1
01.DO

VS
OQOIO
00020
00030
000"0

II-a

FSO~l

MONIIOR I
USA FSII~J
OO.G EOG . .
TFM pcus
PCK
17

00050

DC

....

00060
00070

60
.7

*.20
IRts

00010

""

lEU

eNF

..

00110

t·F
TOM

IEU·2
401

DOUO

BO

SO)

00130

TFM

$OZ+ ..2

001<0

BNF

·.24

00150 S02
00160

SF
TF

97
PCl+15

00170
00180

TF

99

Q0090
OOlpO·

).

IF

00190

IFM

LSQ+'I

90z00

IF

LSO+23

00210

TF

lSON-6

002Z0

TF

IEU-2

00230
00240 LSO

H7
A'"

LSOM
LSg+23

00250
00260

BNN

LSO

00270
00280

tM
BNL

Lso+n
SOU

00290

LSO+II

00)00
00310

tF

00320

SF

~

SO+11
LSON-6

A"

PAGE

SUI.OUT INE SET 02
00004 OOOO~ -0000
00000
00000 10 Oll70 -0020
,Il
,·.20
•• 10 PICK AND IETUPN
000 12 .. 9 0236N 00000
,015050 0550000002 0000000805 040000560000000005, 3 sO
OO)SO 000 ....
,-L
00020 ML 000 .. 0 00195
,lEU-I -',0 t
I.
IF
~ESUlI
lEIO
-Po
00032 M~ 00S30 00000
-p,50
OIV C~U BY 2
.10.
00040 J3 00196 OOONO
IR FOR POSITIVE A~G
,IEU-2 ... ,.0,
000S2 MM 000 . . 00194
.p
00064 l) 0019 .. 00000
SET NEG ARG INDICATOR
.0
00076 15 00"0 I 00000
,98
,0,
II IF CHAI ODD
00088 M) 00380 00091
,97
,-L
MOVE MANT I SSA AOl
.010,
00100 J6 00166 00017
,99
BI IF C~AI POSITIVE
.0,
00112 M4 00136 00099
00 12" 32 00097 00000
,97
STOlE IESULT CHAI.PIOPER SIGNO
.6,
00136 26 on. - 00097
,n
00141 20 00099 00112
,CLR-U-P "
MOVE MANT INTO 97191 MINU$ L
•. IET4-2 ,.." ..
00160 20 00000 00194
,97
.010. .-Zl INn IAL MANI ADI HI OlOEI
00172 J6 00246 00017
,SIU+II
INITIAL IE SUl T AOl
.01.
00114 KO 00251 (0)98
INITIAL MANT AOl
,LSO+"
00196 KO 00)30 00246
,+L sn IESULT 10 ONE L+I DIGITS
-P,ONEl-U-P"
00201 KO 0019 .. 00573
,0.
00220 M9 00336 00000
,2
,0.10,
ADO 2 TO RESULT
OOZZI JI 0025J 000-2
sue IESUL7 FIOM .. ANTI SSA
00240 22 00000 00000
,0,
CONTINUE UNT IL "ANT IS NE G
00252 M6 OOZZI OUOO
,IETA-2 -P,07
00264 JM 00251 -0194
,0,
BI IF T!IIIINAL IUUL T ADI
00276 "6 004)6 01)00
,UII+13
,01611 ,
IESTOlE LAST SUI
00288 KJ 00240 0025J
,06
00300 L) 00240 00000
,01
,010.
REDUCE MANT FIELD LENGTH ONE
00312 JI Dono 000-1
00]24 32 00000 00000

,6,

,

,

235

SPS 11-0
00330 LSg..
00340
00)50
00360
oono
00380 SO)
00390
00400
00410
00420
00430 SGU
OQ.40
00450
00440
OQ410
00410

liON I TOl I

SU8ROUT INE sn 02

PAGE

STEP MANT I SSA ADI ,H I ORDER, +2
00336 JI 00246 000-2
All
,01
,DID,
LSO+23
STEP IESUL T ADI +1
00348 JI 00251 000-1
LSQ+n·
,09
.0610,
STeP IESUL T -9
S"
00360 JZ 0025J 000-9
,0.
17
LSO+12
tONT LOOP WITH NEXT 2 DIGITS
Don 2 M9 OOZ"O 00000
16
• 7070020Q06SOZ0. 316
DC
00316 00016
All
99
,so
ADO ., TO tHAI/2
,1O.
00)80 11 00099 OOONO
,211 , -L, LENGTHElI "ANT FOR ODD CHAI
TO" IETA-2 -P,O
00)92 J5 -0194 0000aETA-1 -P,
-L,
00404 13 00195 00000
tF
TFII 5Q2+42
,98
,010,
.-L MOVE "ANT AOR
00416 J6 00166 000118
II TO STORE tHAR + INIT LOOP
87
S02-12
00421 ..9 00112 00000
004)6 20 00010 00104
TF
80
.Cll-IOO-P"
.+L
BETA-2 -P,so
IESULTIZ 00.41 J) 00194 OOONO
.10.
91
-L,
DEFINE FielD
sF
00460 3Z 00091 00000
,6,
IF
PtlOZ5
,97
S TORE "ANT IE SUL T
00412 26 0239- 00091
,t,
RETURN TO "AiNLINE
17
"KOIO
00414 49 0231N 00000
DEND OZ061
02061
A"

UO+lI

,02

,DID,

"

.0,

....

"

236

)PS

11-0

I

MUN\TQ?(
lJ '> A

000 III

~

t. ()"

SUijROUT lNE

HT 02

PAGE

l

aenn .. 0000<; -0000
OOOOq

UOOiO

UO~(,

~[)GAR

CLf.+ll

,0 LO

OOO'tO

TFM

Pll(+;

,CU"

0001)0

t;1

PCI\,

!-(OS,

onou'"

-0032

00000

TH4

O()OjD

lNlI '0. Cal
00000 Jb 00099 00- 10

UlJO 7()

l' "

(l0080

b I

1)(lj()()

ULJ

j

IU

OU120 elf0(1130
l'lt 140

t,.M
h"4l

00 I 70

eM

nOISO

IH

OIJ\40

IF'"

DU/no

to

Ttol.

00220 ElRO

BD

()U"

tiD;: 30

00i:'

4(J

OO.!

~JO

t),.,

O()tbO

~F-

00270

A
br..

00280
oo2go
no300

~""
~F

0031 G

A
fF-

1)012(;
00330

(J(

',0":"'11

no

~I)I'

iF

003hO

.17

AND IittTtJRN
000 2 .. 4q 023bN 00000
,-0 l l
,OGl ,
INIT F()Ft PO)ITIVf. SIN
noD 3.2 Jb 00099 00-1 J
017
00044 10 02310 -DOb"
"'20
1.0 Tn PI(I( AND RFTURN
0005b .. <1 023bN 00000
5000510007 0501005651 0070510000 '05b08,348
(103"f< OOO .. t">
"+3"
DOO"''' MM 00100 nOl94
l! F- "qO
ADJu)T F[lR NEG SIN
00070 JI) oon9A onnon
f\~ T A- 2 - P
DOOR A l ' 00194 nonon
bE-TA-l -PI
-L
OUIOD l3 00191j 00000
~Avt
-P,Uk-94-P
1+ l
MUY't L -+? IF kr S T [l SAVE
(liil!2 1(0 COlaO CORIO
EHTA
-J.',UO
tiD
0012 ... J'" n01Qb 000-0
P(1l[H
,0,
bR 11= pn~IT!vl nR ZERO CHAR
00136 Jolt-. 007bQ 01300
8rTA
-P,OO
dOll,
,-+l
00148 J4 00196 000-BRQ
,0 I
BR IF (HAIit LFS::' THAN -l
DOlbO M1 n0208 0130{1
.·jl
,SAV(::
-P,07,
,-l
CHAR BHwEFN 0 AND -l
no 17" JO 00202 -0100
.+11:!
IB~TA
-p,a
OOPH. KK 00202 001g6
,BETA-l -P"
,-l
00 1 'hI 3J 00000 ODIGl5
•• )4
,elF-+ll
,01,
bR IF SIIIo ROUllNE
0\,208 ML 00232 OOOqg
5AVF-P
,PlnIJ2-45-P"
,-+LlONVERT Te ~IN
no??o KJ 00100 00623
SAV~
-P,TWOP!-45 tI,
,+l
002~2 ,(t( 00100 00964
."L!
,0,
~LJB 2 PI FRnM "'ANT UNTil NEG
00244 M6 00232 01100
SAVE--l -P,
-l
00256 l2 OOOQ9 00000
SAY'£::
-P,PI-'o5
,.l
00268 I(,J 00100 00917
•• )6
,0
002BO "'7 00316 01300
CU+I0
,01
,010
002Q2 J2 000Q8 000-1
C;AV~
-P
00304 l2 00100 00000
SAVE
-P,PJrJv2-45-P"
,+l
OOqb KJ 00100 OOb23
fW
t(ljo(~lOb-P"
,2l
00328 20 00080 007Q8
4A,55~27U5bO() oa022020Uli l}05500QOQO 0008550000 0056001)0 ,348
00348 000'08
-p
SAV!:
- .. , SAvf003"'0 KL 00100 00100
~p,qa
~AVf
,10,
• -L
0(31).? Kn 00100 ~OORS

t·

GO TO PICII.,

.6.

SAY'E-l -P,
"
-P,llNEZ-'t1-P"

0037t)

OOUll 10 02]10 -0088

.b.

-l

BETA

SPS

11-0

MONI!OR

003,",0
Ot) J,cm OvER

TR
TOM

AA8- 3
SUM+l

00,,"00

00 .. 20

fF
TFM
U

00,," ,0

bl

99
q7
gg
OONI:

00,,"40
OU450 SUM"
OQ'tbO
OU470
004HO

TF

00 .. 10

1

003b" l2 00099 00000
,+lSET BETA EQUAL 1 PLUS l+l ZERO

,UB"OUT1NE SET Ol

PAGE 10

.0 I
,0 11,
,qS

,la,

,0000

,58,
d5
,0,

,A8

SET

,-L
-l
,-l
BR

r,ant. ltn

OOl4b 00574

003AH LJ
SubTRACTION
00400 J5
00412 26
00424 16
00436 2R
IF IJUOTIFNT ZERO

00907 01010

FOR

004~8
~

AM

AM

Tf

004"0
00500

rF

00510
00510

bNF

00530

fUM
b7
(,
tif

005't0

00550 OONE
00560

ALPHA
BtTA

AAB

-P ,95

-P,ALf'HA
,;:.
,2

,AAB-2

-P,01

00099 OOOR8
OOOR7 0-000
ODORS 00Q14

00588 OllOO

004bO I070 0000500505 5000500051 000050S000 050570050350
00350 00048

005.0

80

PLACE-24 ,8ETA-l -P,O,

COMIQ

~M

SAvE

00610
00620

TR

BE1A-l

TO

8,TA-l -P.NOS OIG

00630

SF

BET A-I

OOb~O

67
80
SF
IF
TO
87

.-bO
PLACE
.CLF> 10
.0 I
BETA-2 -P
PCK+15
.SAVE
-P...
PCK+25
.8ETA-2 -P...
ALPHA+I-P.H3H7
01.
PC'+IO

00650
OO.bO
00670 PLACE
00b80
00.90
00700
007 10

POlO~

H

.10

-pta 1 , 1 0
-P,8fTA
-PIt

,-leR IF NURMAl1lAT ION NOT REO
00614 Ml 00b92 00195
OOb3b J2 00100 000-1
-L,-l
OOb48 LJ 00195 00196

ENTER NOISE DIGIT
OObbO K5 00195 02401
"'L

-P,

00672 l2 00195 00000
00.8~ M9 00.24
00.92 ML 0071.
00704 L2 00194
STORE CHAR 0071. 20 0238STORE MANT 00728 20 0239ReSTORE RM 00740 KN 00051
RETURN TO MAINLINE PROGRAM
00752 ~9 0231N

.6.

eM

8ETA

00720

8L

*.80

00130
00740

CIII

8ETA

8NH

.+44

00750

TOM

~O

-P ,03

00000
00098
00000
00100
0019~

01018
00000

00160 J4 OOlCJ6 000-1

,10

,0,

8R

IF CHAR SMALLER THAN 03

00172 M7 00852 01300

007.0
00770
00780

TO
87
TOM

I

-p,oe

.10.

.0.
.0

ALPHA+I-P,H34+1
IRE S
~Ol
.0

• It.

,+L

00784 J4 00196 000-0

8R 1F CHAR lE SS OR EQUAL L
0079. "1 00840
CHAR TOO LARGE
00808 15 00401
RESTORE RM
00820 KN 00051
00832 M9 00530
OOUO 15 00401

01100
000001018
00000
00000

23~

SitS 11-0

IIOIIITOIt

00790

TFII

....2

SUIItOUT I III SIT 02

PAGE 11

, _AYE-I -P,O"

AOJ TO SUI TWO PI FIION IIANT
008n JO Don.. -0099
•• )0
00800
,lEU
UNTIL ItEOUCED TO IIEG NUIIIER
00 .... III 00.... 001 . .
00810
TOM IEU-2 -P,O
,11 , -L
00." J, 001" 0000-'
00120
TF
,IIU-2 -P
00... 20 00000 00 It..
OOUO
litO
,0
OOt 00 II. 00 201 00000
00840
OORG
00.0'
00850 UI
OS
ootiD 0000 ..
00860 AI
OS
00'1" 0000"
00870
OS
I
0091' 00001
DC,
00180 PI
4T
,3141 S.2UU . ." . u ...., ... nUZ?9'02 .... I" 1691'9)
00.62 ooon
00190 TWOPI ·OC
,U.JI .. 'O?I?9..... ".25U.'. . '''oO.?AU.UI.''''
4'
DIDO. 000.. 7
00900 H3"
Dt
2
,0 I
01011 00002
00910
DC
2
,02
010n 00002
00920
5
DC
,00011
01011 DODO.
00930
OENO' 02072
02072

·",0.

•

""

.-.

23U

MONITOR I

SPS 11-0

USA FATNI
OORG EDGAR
TFM ItCh5
PC.
IT

00050

DC

OOObO

TFII

00070
00080

&0

81

00090

TO

00100 TE ST
00110
00120

CF
CM
8H

00130

8E

00140
00150

eM
Bl

00160
00110
00110

TFM
A
TF

00190

CF

00200

TF

00110 AlPH

SF

OOlZO

002)0

CM
Il

00240
00250

TF
M"

00260

TOM

00270
00210

Tf

OOl'O

TF

00)00

LO

00310

DC

00320
00310

D
TF

PAGE 12

SUI. DUll NE SET 02

0000.. 00005 - 0000
00000
,-.20
,17
00000 10 OU70 -0020
IA TO PIC. AND ItETUItN
000 IZ 4' OU.N 00000
50 ,0700055050 0000110005 onn05070 7000065020 51500125, no
00150 00050
SET INOICATOItS
TEST+lI
,01.
00010 J' 00075 0-000
,-l
,lEU-I -p,o,
OOOU III 00052 001'5
"'0
EOO+12
lit I' ZERO M.N'
000.... II. 01052 00000
SAVE IIANT SlGII
TEST+'
,In'-I -p,o,
00052 .N 00073 DOl'"
000 ... lJ 0019 .. 00000
IiTA-2 -P
-P,
lETA
0007. J" 001 . . 000-0
,10
,0,
PCH.R
I. IF CHAit POUTlYI
000.. II. DOl" 01100
ALPH
,0,
lit IF CHAit ZERO
00100 II. DOl .. 01200
+L
ODin J .. 00196 . ., n
8ETA
-P,-9999'
tiD,
,0,
EOO
I . IF CHAit LISS THAll -IL-ll
Don.. "' 010"0 OISOO
ALPH-I
,IEU-I -P,O,
OOU. JO 00195 -01'"
UPH-I
-P,O
,IITA
001'" IIJ ooln 001 . .
eLiAR AItIA LIFT 0' .ITA
IIU-2 -P,CLII-,.-,
-L.+L
00160 "0 00". 00.01
-L
InA-I -p,
.X'ANO II'A I' IINOVIIIG FLAG
001" U ooln 00000
ADJUST In A , IILO FOil CH.1t
InA-Z -P,
00 .... II. 001'. 00000
-L
IEU-I
eON'ItA~T lETA I' IISITTNG 'LAG
001 . . U 001" 00000
,la, -L
.EU
-',Z.
J .. DO'" 000'"
,a,
UIII-72
,1 IF II ... ' USS THAN .,.
002'0 "' OOJ.2 01100
,·L
,eLI-IOO-'"
oon2 '0 000" 00.04
. .NANT
,la,
IN . .
IETA-' -',A
00'''. JJ 00" .. OOo·t
91
,-I
·L
l·'·"'"T III . .
oo,.t 15 0009. OOOOJ
,It
IITA-2 -',SlX-4I
·L MNT-.' l O.IITS
00'" "" 00". aUla
1 ....... IIT NOVID TO ALPHA.L.'.
'LPHA -p, . .
oozeo '" 00010 ooot.
lUI ZIIIOS
,eLIt ...... '
0019' 10 Doott 00110
-L,
91
L DIIITS
I
OOS" ze 000. . 00 ...
,ZlUOOO. . . 1,.6UOIO' '02001100' 5I1200000D "110111,141
OOS4I 000. .
-L.
L.' DllilTS 00'" 'I 00100 000.0
100
.ALPH'
,-L .ANT IS I.ANT· •• 1/.10.....NTI
IIU-I -P.,.,

00010
00020
00030 FATN3
00040

,.,

"

.',

,

"
"
"
"

00'0'

"

"

"

...

"
"

,n

.'ITA-' -'"
." ,
"

Z;U

~P~

11-0

"ONITOR I

~U8.0UTINE

SET 0,

PAGE 13
OU.;28 Kb OC194 00097

UU3~O

003~O

80

003.0
00310

"IF

00;80

TF

00390
00.00
00'010 ATNI

8ETA-Z -P,8E1A-,2 -P
SA'JE
-P,Q9

tt

A1 N I'" 35
ATN 1- 3
99

.10,
,10,

,(U~-9,2-P

.10

,99999
,'1Q~9q

00.20

fF._

'HI

OO~H)

OM

'It!
9b
ALPHA

,Al PHA
-101 ,52 00015
OOb Ie Me OOb40 01300
- l , +L

.01

-P,l
010
.BETA.I -PIt

-L

-l

INSERT

FlM

AT

32 00099 00000
2J 00099 0125.
"" 00b88 00070
32 00099 00000
2J 00099 00623
J. 0019. 000-1

IOO-L

00700 ZN 00100 00197

,0.
(Juo 10

t;t:11l

-P,1

010
-21., -.il.

UlIocH)

SPS

"ONline

11-0
TO

OU100

00710
00120
00730
00100 TESTI
00150
001.0
00110 PCHAR

,.

87

TF
TF
BNF
SF
87
TOM

00790

TF
TOM

00800

u

00810

DC

00700

OU830
00840

H

008;0

S"

'00860
00870

87
TF

00880

SM

IF

NORMAliZATION NOT AECO

00712 .3 00768 00098
0072' J2 00196 000-1
0073. 31 00098 00099

SU8ROUT1NE SET 02
,NOS DIG

PAGE 10

INSEAT N{IISE DIGIT
007_8 2~ 00099 02001
.-4H
007.0 M9 00712 00000
.0
98
-2 L
00168 32 00098 00000
I=ICII.+25
.97
00780 2. 0239- 00097
• -l
PtK+ 15
-P,c
00792 20 0238- 00196
.8ETA
·+24
,TEST+9
.0 I
008 O' .M 00828 00073
PCK+25
0081. 32 0239- 00000
.6
P(.K+ 10
r0828 .9 0237N 00000
INDICATE POSITIVE CMAI
TE~T+I0
• -I
0083. J5 00070 OOOOJ
99
,tLR-95-P
.2L
00848 20 00099 00809
lOa
• -I
-2L DIVIDEND EUUAlS .\
00860 I~ 00100 OOOOJ
.9
,8ETA-2·-P"
-L.
DIVISOR
IS MANT
00872 2" 00099 00190
08 .04'052~000 5250000050 0000010000 0500555.70 7051000~.348
00>48 00008
,-2L
SR IF MANT IS 100000 •••
008So .3 00900 00099
100
-2L
IEDUCE TO L DIGITS
0089. 32 00100 00000
-l

....

,

.

,

.0.

6£TA-2 -Pt99
BE TA
-P 01

..

8E

00910

SF

00920
OOHO
009'0
00950
009.0 EOD

87
TF
87
BD

00970
00980
00990
01000

TF
87
TF
TF

IF"

C~

TDM
CM
INH

IF.
DC

• -L

00908 fi(b

00194 00099

IEDUCE CHAR BY 1
00920 J 2 00196 000-1
·+3..1'
,
THESE 3
00932 "9 00964 00000
8ETA-Z -P,98
,-L
1NS TRUC T IONS GO
00940 •• 00194 00098
8ETA
WITM 80 AIOVE
009~2 J2 00196 000-2
IR IF OPERAND 15 ONE
00960 .7 01008 01300
AlPH
II IF CHAR REDUCED TO ZERO
00976 M6 00196 01200
8ETA
-Po
CHAR STILL POSITIVE,"AKE NEG
00988 L 2 00196 00000
TEST •• a
01000 "9 00112 00000
PCK+15
t
.6010,
STORE
01008 16 0238- 000-0
PCJ( .. 25
,PIOv .. - .. 5 ,It.
, 'L
01020 20 0239- 01301
TES T I
01032 "9 00804 00000
*+]2
IR IF RESULT MORE THAN. PIOVl
,TEST+10
01040 ML 01012 0001.
P(.K+25
,BETA-2 -P,.
01052 20 0239- 00194
0106.. M9 0079 2 00000
TESTl-12
01072 KO 00050 '00194
ALPHA -P.IETA-2-P
,+L
IETA-Z -P,PIOV2-46.-P ..
L'1 DIGITS
01014 KO 00194 '00622
ALPHA-I-P,
-L
01096 L3 00049 00000
ALPHA -p.
-L.
0110. J5 00050 '0000lEU
-P,OO
01011,
,+L
01120 J. 00196 000-.~
01132 Ml 01110 OllOO
.+35
,ALPHA -P,07
01144 JO 0\l79 -0050
OO:UO 00010
10 .0550050000,310
.10,

,0,
,0,

OUtl90

00900

8R

,0,

00620

01010
01020
01030
010..0
01050
01060

,-2L

,0,

........

,.11,

SP~

11-0

010·/0
01080

"OllITO~

01100
01110
0112(1
011)0 SIX

A
S
TF
TFM
8
OORG
DC

011 .. 0 TAN.

DC

••

01150 PIOV"

DC

'5

OU.O

O.EHD

OIO~O

SP5 11-0

coo 10

000"0
OOOSO

FExn

000.0
00070
00080
00090
00100
00110
00120
00130
001 .. 0
00150
001.0
00170 SETUP
00180
00190
00200
00210
00220
00130
002.0
00250
002'0
·00270
00210
QOltO
00300
00310
00120
OOUO
Q03"0

··2)

BEU-l -P
PCK+25
PCO.15
TESn
'5

0-.

02091

"ONITOR I

FEXn

PAGE 15

SU8AOUTillE SET 02

,

,

0115.
01168 .2 ~o l~4
01180 2r, 02)~01192 I. onl01
•• 10
0120. M9 0010'
.0
01211
•• OOOOOOOOOOOOOOQOOOOOOOOOOOOOOOOOOOOOOOOOOOOO
01255 000.5
.540'1"00 270,. .. 155 ... 35713 .... 08599910 1351.8 a l ..
01301 000'.
• 7153981.U9h .. U09/'15 •• 0h58198757 210.9292).9
013". 000.5
02091
t.l:.

t II

-P,O

K';

,IfU-) ... p t ,

('I'

~6

flOc" ,i

n019!
000-1
00000

PAGE 16

SU8ROUT I NE SET 02

,FEl)

0000 .. 00005 -0020
00009 00005 -0000
00000
OORG eDGAR
MUL BY LOG e FOR exp
TOM SETUP. I
ALLOW
01
00000 J5 001.5 00001
FExn.12
87
00012 "9 00032 00000
.0
PREVENT "UL BY LOG E FOR EXT
TOM SETUP. I
.9
.0.
00020 J5 001 .. 5 00009
00032 10 02370 -0052
,·+20
.17
H" PCO.5
8'" TO P ICO AND RETURN
87
PCO
000." .9 023.N 00000
t
348
DC
••• 005.07000 5 50 ZO 250001 500.. 50'052 0052510050 000050
00341 000 ...
TFM PCO.15
00052 I. 0231- 000-1
.010
01
TF
ALPHA-2-P .ONEZ-.. 5-P ••
.+l
ONE. l+" DIGIT "ANTISSA
00064 KO 000.8 oon.
aD •• 20
.-L
0007& "l 0009. 00195
.8EU-1 -P,O •
8R IF "ANT ZERO
B7
GOBACO-12.
00018 M9 DIDO" 00000
TO
RECIP-I
NON ZERO MANTISSA
.8ETI-2 -p,o,
0009. KN 00187 0019 ..
BETA-2 -P
00108 L3 0019. 00000
CF
TFIO 101
-L
00120 I' 00101 -0000
97
TF
.• 8ETA-2 .. p"
-l
l+" OIGlTS IN 101-l
00 132 20 00097 0019.
MUl BY LOG E IF EXP
·.'92
8
.0.
001 ... M9 0023' 00000
00156 lO 00080 00791
TF
10
.C~R-IO'-P ..
.ll
M
2l+2 DIGIT PRODUCT
leTA-2 -P .lOGE-45-P ..
.+l
00168 K~ 00194 00070
·... 5.
IR IF H 10ROER NOT lERO
80
.0.
00 leo M3 OOU. 000. .
-Ptl
00192 Jl 00190 000-1
5M
lETA
.10
0020' 3l 00099 00000
5F
TF
MOYE L+. 0lGIT5
UTA-Z .P.iOl
.-L
OOll6 K6 00194 OOIOl
00221 M. 002.' 00000
17
.0
MOYE L+. 01101 TS
TF
IETA-l -P.IOI
.-l
oon. . . 00194 00101
CM
.+L
IfTA
.1011
·'.-00
OOZ'" J" 0019. 000-IA I ' CHAR LEiS THAN -L
INH GOIAU-12.
.0.
00260 "7 0100. 01100
00272 J. 00196 000-0
-Po
.10,
IUA
C"
IA I ' CHAR lEAD
CALC
.0.
IE
0021 .. 146 00.68 01200
III I ' CHAII IITNUN -lAND lEAD
IL
.0.
CALC+"
00296 107 00516 01300
00101 J. 00196 000-2
CM
lETA
..,.2
.10
·IA I ' CHAII LAAGU THAN Z
aH
El2
.0.
00120 Mt 00416 01100
*.4"t
IA I' CMAR InNUN 0 AND . ,
IL
.0.
outU Nl OOllt onoo
oc .6. 0"10070 70011700'0 lotOOO1000 1000000'0' 7610'070. 1.1
OSA

00020
000]0 FE']

I

·

.0.
•••

..

·

...

"

•

"'O

•

..

.-n

... -u.
..

2H

SPS

MO~ITOR

II-U

I

SU8ROUTI~E

PAGE 11

SET 02

Dab 10
OObtIJ

003_8 0004.
(1041R flJUAlS +2
OOH' 2J 0238- 00 I'll
SHIFT LEFT 2 POSITIO~S
OOHb lJ 00191 00191
E 12-12
00368 M9 00424 00000
8E TA-6 -p.
til,
-L
CMAR EI/UALS +1
0031. J5 00190 0000BETA-5 .. P,
.,
-L
00388 L3 00191 00000
PCK+15
,8ETA-5 -P,b
00400 2J 0238- 00191
• -l
8ETA"~ -P.BETA-4 -P ..
SHIFT LEFT I POSITION
00412 LJ 00191 00192
8R IF ADJ CHAR DOES NOT OVFlOW
.0.
00424 M7 00'56 01400
-P,kECIP-1
8A IF "ANT POSITIVE
00'3. "M 00.14 00887
UNFL
-P
00448 M9 00518 00000
8EU-S -P,
00456 L2 00191 00000
"Q
l~lT SHE IND
OQ'b8 J6 00.11 0-0-0
.10, -L
00480 J' 00192 000'l4
,a,
iii!. IF tHTA lE~S THAN .34 +Cl-IAR
00'02 "7 00.08 01300
,10.
-l
ADJ 8ETA 8y -.34
005()4 J2 00192 OOOl'
.010,
STEP sin I~D
00516 JI 00.77 000-1
.0,
CONTINUE REDUCTION OF 8fTA
00528 M 00480 00000
PROCES~
IF (.MAR NE(,
,8ETA-" -P,07,
OOBb JO 00595 -0192
00548 KJ 00505 0010.
• ... 1
.8ETA
-P,O
8ETA-b -P.CLR-96-P
-L I +l
l " DIGIT FIELD
005.0 Kn 00190 OORO,l
8fTA-5 -P,
00572 l3 00191 OOOO(J
-l
8ETA-" -p,
!>HIFT RIGHT", R T CHAR sile
005.' Kb 00192 00000
81:TA"'5 -P,
,,-l
00596 lZ 00191 DOnna
•• ,085b.0 5252 00 550 8S502 20200CSOOO 000000085 I '052
,3.8
003"8 0004 ..
80
,cue-10b-p"
00b08 20 00080 00798
,2L
n •• DIGIT PAOOUCT
8ETA .... -~tLN10- .. " ... Pt'
.+l
00.20 Kl 00192 00717
00.'2 32 00091 00000
-2L
-p,qq
.-L
l+' DIGIT FiflOS

OOt))O
()Ob"O

Bf:TA-l -P,99
F- A( T. 1 J
12

003~0

,-l

OOlbO

TR

00370
00180

81
TO"
CF
A

TR

00"0
00.50
00"60 CALC

87
~F

IFM

DO .. 70

OO'tAO

oosoo

AM

oos 10

01

00~20

A
H

OOSSO
005bO

{.F

IF

~"

OO~llJ

00580
OO~QlJ

u{.

GORD

IF

OObOO

,

OOtl~O

Al"'HA-'-~,S.A\lE:

OObOO
Ol,)b7Q

ItO

OlJbtlO

99

SAVE

SPS

Il-li

"
,010

OOb ...... 6 00100 OOOqq
OOb5b k,6 00194 00099

• -l

00 •• 8 Jb 00751 000-2
(lObeO KJ 000 .. 8 00100
00b92 20 00080 0019A

-p

,CUt-10b-Pt,
-Pd~ETA-2 -P"
.9b

.2l
Zl.~

• -l

L'.

DIGIT PROOUCT
0010' KI 00100 0019.
DIGIT OIVIOE~O

PAGE 18

M(JhlrLlH.

z.

0071&
00099 00096,.
OObqO
,10, -L
9b
00728 II> 0009. 000-0
00·/00 FACT
97
2 0 I G lTD I V I SOR. L +. QUOT! ENT
-L
00140 19 00091 -0000
SR WHEN T~RM REDuCES TO ZEAO
00"' 10
00752 lIb 00196 01200
... p ,97
00720
IF
SAVE:
L+" DIGIT FJHD
00164 K6 00100 00001
00730
0011b JI 00751 000-1
.010
ol
CALC NE>! HRM
001"0
00788 M9 00680 00000
(J0196 J' 00.71 000-0
Ou1?O
tALC."
.010
8R IF FURTH.R AOJ NOT REQUIRED
00 /be
REel P
00808 "6 00888 01200
00710
IF
,2 LADJUS T FOR RfOUCTNS 8V .34
80
00820 20 00080 00198
001~0
.L 2L+4 DIGIT PRODUCT
, ALPHA-It-P. TEN) .. - . ' ,1
00832 KL 000'. 01024
91
-2L
2L+3 DIGlT~ 00844 32 00091 00000
00790
ALPHA- ..... P,98
L+2 OIGITS
ooeoo
.-L
00856 K6 000.6 00098
,010.
REDUCE I~OICATOR
00810
CAlC+9
00868 J2 00411 000-1
00880 M9 00796 00000
.-84.
,0
00820
.350
00350 00022
00830
22, 000008.025 000200000005
8R IF "'NT WAS POSITIVE
008100 RECIP
GOIACK-12.REtIP-1
.01.
00888 MM 0 I 004 00881
MAKE CMAR NEGA! IVE
00850
PCK+15
. 00000 32 0238- 00000
99
.2LCALC RtC IPROCAL IF NEG "A~T
00860
00912 20 00099. 00810
.10.
-2L. ~L+2 DIGIT DiViDEND
OValO
oIU
00924 16 0009·9 OOOJO
o
,ALPHA-"-P, ,
-~.
L+2 DIGIT DIVISOR
00880
100
1I0936 2R 00100 00046
OORCIO
8V
GOIUCK-24.
81 IF ORIG OPER I DR I/LOGE
00948 116 00992 01400
.-L STORE RESULT IIANTISH.
IF
PCK+25
• 97
00900
00960 26 0239- 00097
AM
nOUCE CHAR BY ONE
PCK+U
00910
00972 II 0238- 000-1
_ETU~N Tn MAlHL IHE
81
PCK+10
00920
00914 49 02 JlN 00000
PCK+15
AM
00992 II 0238- 000-2
00930
.2
.610
n
STORE RESULT IIANTI SU
PCK+2S
009.0
,ALPHA ....-' •••
0100" 20 0239- 0004"
RETURN TO MAINL IHE
00950 GOUCK
PCK+IO
01016 49 0231N 00000
00960
010l)
.,
DORG
*-4
47
00970 TEN34 DC
.2181701.,39495525622261149163041813101118056246
01069 00041·
00980
DEND 02102
02102

.0.

",

.0.
.0.

.

,"

.6.

.6.

.6.

S'5 11-0

IIIIMITO. I

00010

OSA

OOOliO

DORG

00030 FLOG)

lOll

OOO~O

81
Tall

00050 FlNJ·

OOol&!1
0001V

TFM

00080

IlC

~1

80

ro..
TF

OQIIO
00110

81
BNF
00150

TOil
(.F

uP"l to
O,"! 1 tiC
00190

HII
IF
Cf

TOM

00200
{)C<

eM

j ()

ooao
uO~

SHl

jU

AM

00240
lJO.lS(

61

or,

OOlbO

00310
\'0#0

OOOO~ 00005 -0000
00009 00005· ·OOlO
00000
SET FOR CO""ON LOG
00000· J5 00&09 0000 I
,0
00012 109 00032 00000
.9
SET FOR NATURAL LOG
00020 J5 00609 00009
pe.+s
,*+20
,17
00032 10,02370 -0052
PCK
III TO PIC' AND RETURN
000.4 49 02J&N 00000
30 ,07000&0050 0500500105 7070700055
,350
00350 00030
,-l SR I F NON ZERO ARG
00052 ilL 00108 00195
~Ol
SET INO FOR LOG OR LN OF ZERO.
000&4 15 00401 0000•• L 5 TORE IIANT I 5SA
0007& 20 0219- D07U
PtK.25
,I>.
N ITH NEG SIGN
00088 32 0219- 00000
OVfl +2~-P t
SR TO 5 TORE CHAR AND R TN TO II AI HI HE
00100 119 004" 00000
SR IF IIANT POSITIVE
00108 "" 001.4 0019.
~Ol
,0
SfT IND FOR NEGATIVE
00120 15 00401 00000
SE lA· t ,"p,
IIAKE PDS IT I VE
00132 L3 00194 00000
(00"-25
.CZERO·45 ,017.
+L
INITIALIZE 001 •• JO 005U -091.
GOAL-I)
,BETA
-P,O,
SAVE CHAR 0015& KO 00831 00191>
IETA-1 -P,
-L.
EXPAND fiELD TO L.I DIGITS
001&8 L3 00195 00000
8fTA-z -P,I
ADO 1.0
00180 J5 00194 OOOOJ
&ETA-I -Pol'
,lo.
00192 J4 00195 000J5
8R IF "00 MANT NOT LESS 1.5
0020. 116 00248 01300
OOU8LE "ANT. l+1 DIGITS
00216 KJ 00194 00194
AOJ FOR "E Xl CONS TANT
00228 J I 005' 3 000118
.-60,
.0
00240 "9 00180 00000
'2, ,& 7055011252"20 85552"01 03 !l06202050 085552. 350

.FI. .. '

EOGU
CORN. I

,D.

.

,0,

,

..

.11.

...

,0,

'"

ALPHA

... ',OHEZ- ...·P ••

'rOM

A\.PMA

·P,2

Tf
LO

99
97

OO.ll()

oo~oo

FLOG)

o

.ll.

,e,"R-93-P .,
,ALPHA -p"
.8ETA-2 -P,.

98

,·L

-L,
,ZL
-L.

-L,

00350 00042
L+I DIGITS
00248 KO 00050 00573
CONVERT TO TNOZ
00260 J5 00050 OOOOK
2.0 MINUS 1000 IIAIIT 12.0-Z I
00272 .K 00050 00194
00284 20 00099 00111
00291> 2Q 00097 00050
12.0-ZIIZ EQUALS Y

247

SPS 11'0

SUBROUTINE SET 02

"aNI TOA

Dono

TF

8ElA

uC ' .. (I

TF

eo

O(!;ii)

H

BETA

.~

00.100

1F

SAVE

-p ,97

,-L

-P,98
.CLl~.-lOb-P,t

,BtTA

PAGE ZO

.2L

-P ..
,-l

00308 21l
L+2 DIGITS
00320 K6
00332 20
2L'" DIGITS
00344 KL
V··2
L+2 DIGITS

00098 00194
00196 00098
00080 00798

00196 00196

00356 K& 00 I 00 00097
8ETA

00310
00180 COUN

-P,8ETA

*+9

-P ..

,999',

.010.

COUN+71
.99999
.010,
ALPHA -P, CZERO ... &

TF

99

,CtA-92-' ,.

TF"

98

,10

,

98
... p

ALPHA

If

00~70

00 .. 80

.'JIt

80
ALPHA

-P, SAVE

TF

A,PHA

-p ,97

511

CDUII.71

00 •• 0

,10,

-P"

.010.

.Z

.010.

SM
o\)~OO

DC.
00520
00530

:Hj~«.ii

00580 CORN.
()v~9rl

Oowo
00.10
00b20
004),0
0(;4,;,0

46,

TF

80

II

AlPH.

08552550 505Z0001. .
,CLR-IO/o-'.,

·P. IE TA

91

. v:". ... '.'

00570

,'0,

8NZ

• BelA

Tf

UTA

H
S

8EH

-p

8ETA

-P,91

•

- ' ..
-"

f

-Po
"

.0.

H
t<
U

aO,tlR-IO'·', •

SF
TF
14

InA

lOC.t-d-P,UU
8ETA

-. ,97

-,

. ' ..
"

80
,CLIl-100·'"
ONU-U·P ,GO"I.-1J ,lo

DOU8LE Y
00368 KJ 00196 0019&
,.LINITIALllE COUNT TO L-I TERIIS
00380 J& 00389 999R9
00)92 J& 00451 999R9
,Zl
L+2 OIGITS. ZERO ALPHA
.+L
00404 KO 00050 00913
00416 20 00099 00112
08 TA IN REC IPROCAL TERM
-L.
00428 16 00098 OOOJO
00 •• 0 19 00098 -0000
-l.
L+2 DIG IT S TO PRE V TOTAL
00.52 Kl 00050 00091
,ZL PRODUCT OF yooZ AND TOTAL OF
004&4 20 00080 OQ798
PREV 10USl Y CAlC TERIIS
00471> KL 00050 00100
,-l
l.2 DIG ITS STOIED TOTAL
00488 K& 00050 00097
REDUCE DIVISOR
00500 J2 00451 000-2
REDUCE NO OF UNCALC TEIlIiS
0051Z JZ 00389 000-1
'11 IF L-I TERMS NOT CALC·
0052. 117 0041. 01200
52500.1>005 50501>05000 07770050 .350
00350 000 .. 1>
.n
00536 20 00080 00798
2' • SUM Of L-l TERMS
005.8 Kl 00050 00191>
-L
ADD ZV TO AIOVE PRODUCT. L.Z
00560 2J 00097 00191>
SET WITH 'IIOPER CIIMSTANT L.J
00572 U 0019& 00000
DO"" l2 00191> 00000
,-, SUI ACtUM TOTAL PROII CIIMn.N'
0059& It2 00 I ' " 00097
IR IF FINOIN& NATURAl lOG
00.01 II. 00116 00000
.2L
OOUO 20 00010 00191
+L.
·00612 KL 00610 001'1>
.-L L+J DIIiITS 006." U 00191> ooon
OOUt U 001'" 00000
,.L
006. . 20 00010 0010..
.L.
0111& CHAR. ONt. l . ' OIGITS
00.10 Itt 00n5 001 II

,·l

SPS II -U
OO.~O

PlU;

OObbO

,,0.70
00.80
OO.qO
00700
00710

00780
00790 GOAL

..

00&30
OU"40

01)8';)0 (..lE-IilO

008.0
00870
00880

008'10

,ps

II -0

1(.10

000.20
rlOO jO FSRS3

(lUO 70

OOOqO
0Ololl
O(J 110
i;() 1 :!n
eu I ~o
(I() 14(;

,0,

••••

00800
OOK 10
00810 NlG

n:'()l'!Q

.4

.0.

00750

O(lO'tO

00.92 2J 00099 00196
TF
-P,99
PRfPARE FOR "OUlL IlAT ION
00704 U 0019. 00099
CF
-P
8E IA
0071. 13 0019.6 0'0000
CLR-92 ... P , li8
00728
0·0812 00098
C
.+L
-p.
BE
ZRES
8R IF L+" ZEROS 00700 Ii. 00530 01200
TFM 'C"·ll}
SeT C'MU OF 3
oJ
.010.
00752 16 02)8- 000-3
.-l 8R IF ~I ORDER DIGIT 'NON-ZERO
GOAL-Z'
0076 .. III 008,20 00192
TR
oe77. LJ 00192 eOl93
8E'A-_ -P.8f;TA"1 -p"
00788 12 0238- 000-1
PC.-15.1
•• 10
INSEAT NO IH DIG IT " .
TO
8ETA
.P.NOS DIG
00800 .5 00196 02401
CoNT INUE NOAMAtUAT ION
00812 M9 00764 00000
DC
I'
.7005000000
.3,0
00150 0001"
SF
Iii:: TA-" ... p,
-L.
SET FIELD OEFINITIO"
00820 L2 00192 00000
TF
.8ET6.-!i .. P,ib.
STORE "ANT 00R32 20 0239- 00191
,qQ
AFFix SIGN,ANO RETURN TO MAINLINE
"NF
0084 . . . . 0237N 00099
P(I(+2 ')
0085. 32 0239- 00000
pet<·10
00868 49 0237N 00000
80
,CLR-100-P, •
CONVERSION FOR IN
0087. 20 60080 0080.
II
IN 10-45-P. GOAL-13
+L.
L+5 OIGITS 00881 KL 00718 00831
PLUS
.0.
RETURN TO COMMO" SECTIO"
00900 M9 00.92 00000
uL
'8
.0
00959 00048
DC
48. -.93147180559945309.1723212145817.5.80755 00 134 3.
01007 00048
DC
.8. -ll8b29.3blll9890.IBI1 ...... 24291.H313.1510002U7 2
01055 00048
.8. -Z079"15'1. 7983592825109.30.3 7.5ZQ704Z 2.500.0108
DC
01103' 00048
uEND
02122

-P

,M

007.0
00770

Ol105Q
OfJObO

PAGE 21

;UBROUT I"e SET 02
,tH:YA

..

007.0
00730
00740

(

MO" I TOM
A

MON I lUk I

,UBRQUT I"E

>ET

PAGE 22

02

0000' 00005 -0000
00000
SET FOR RIGHT SM 1FT
, *·zo
00000 10 02370 -0020
PC_
.7
8R TO PICK AND RETURN
00012 .. Q 021~N 00000
u(
00320 00014
.320
I ' ,!toao OOOOOOO~
I:H,u·
,PCK+1S
,011. RETA IN PROPER SIGN
*+2'"
00020 M4 00044 0238,~
-p
BE lA
00032 L2 OOlq~ 00000
P(K+l!t
,PC"+15
,011. C~EAR A FIELD TO ZfROS
0004" 22 0238- 0238P(I(+20
SII
01
.10. FIND AND CLEU MI ORDER Ft AG
OOM~ 12 02385 000-1
, P(I(+20
8/OF
·-12
,011 t IN 8 FIELD
00068 "4 0005. 0238N
PCK+20
CF
00080 13 0238N 00000
PCK+l!)
IF
,8ETA
-Ptb.
STORE
00092 20 0238- 0019.
117
P(K"10
REIU"'" Tn MAl ~L1"E
DOlO. 4q 0237N 00000
UeNO
Oll"1
021'1
t...~A

F SR' 1
lJOAG
EDGAR
HII P(K+~

.•.
••

.•.

2511

MOIIlTp. I

S'S 11.0
OOOIC
000.20
00010
00040
00050
000/10
00070
00010

f~U

In.

OQ090

SM

-.)5

00100
00110
00110
OOUO

AM
INF
Tf
C

·-24

001"0
00150
001'0 CL
0·0170

'AGE U

SU'•.OUTI NE SET 01
00004 0000' -0000
00000
00000 10 02)70 -DOlO
0001Z ,,' 02)6N 00000
00314 00014
00010 KII 0015' DOL . .
SAVE S IGII OF . 8
00032 L) 00196 00000
AIl.l A AOI TO LO OIOU AD. III
0004• • • 00091 onu
,010. acCORDANtE IIITH • FIUO LENGTH
00056 Jl 00091 000-1
000.. 11 02)'0 -000 I
tl
000.0 M" 00056 00000
.0
000'2 20 0251- 00196
.IEU -Ptt.
CLU. La OROU • FIELD AND' FIELD
.PCH20
0010" '" 02)'0 0251t
00116 M6 00160 OUOO
.0
0012. 11 on.o 000-1
,10
.1
001"0 U 021'- 00000
.0
00'" M' DOLO" 00000
.0
,: 16, SET SIGN 'ND EX IT
.eL -19.
00160
02)7N 00U9
00171 32 OII.N 00000
00 .. " '" Oll7N 00000
OIUI

OSA FHS
QQI' EDG4.
TF" " . . 5
.·.·20
.Il
,1
PtK
.6
.
DC
14 .0"0000000000
t • Jl4
TO
.UU
CL - "
tF
TF
-+.7
.PCh20

INL

PCK+"
PC .. IS

PChlS
CL -20
'ClOU
pthlS
CL -,.
., .. ",·10

ovuo

,M
rOM
81
...F

001'0
0011)0
00210

SF
PCK+20
87
'ChIO
OENP nllSl

-,

·

"',0.

..

"
•

·

·

non

••

It"

••••

251

MilHITOK I

SPS 11-0

00010
00020
00010 TFlSJ

OS, IFtSl
OORG EDGAR
rF" PCX_5

000 .. 0
00050
00060
00010

ij7

DC
TF

OOO~O

TF
87

00090

DeNO

PCX

"PCX+25

Pex-u

PCX+IO
02101

PAGE 2"

SUIROUTINE UT 02

,*.20

,17,

·

••
.32"

.0505
.BeU-2 -Pt"
... p, ••
• UTA

•••

OOOOit
00000
IiR TO P ItK 4ND InURN
00000
00012
00JZ4
MOVE B-1 TO A-I 00020
TD A
000)2
MOVE •
RETURN TO MAINLINE·
000.4
OU6l

00005 -0000
10 02170
4' 0236N
0000"
20 023'ZD 0131-

-0020
00000
00194
00196

4' 0237N 00000

uz

"S 11-0
00010
00020
OUOlO .TFS3
00U40
00050
000.0
00070
00010

MONITOR I
OSA
DORG
TFM
117
DC
SM

BnS3
EDGAR
'CUS
PCK

8

SUIROUT! NE SET 02

, •• 20

,.

,11

..

,00050005 ,]50

TF

PCK>25
PCK>"

TF

*+30

,IEU-2 -p •••
,PChlO
,0,

PCK+15

,BET A

00090

8T

00100

B7

00110

OENO

01

-p •••

02171

PAGE 25

0000400005 -0000
00000
00000 10 02310 -0020
00012 4' on.N 00000
00350 00001
ADJ FOR A-3
00020 IZ 02390 -0001
MOVE 1-2 TO A-3 00012 20 OZJ'- 001'4
SAVE ""NLINE RETURN AD.
00044 U 00074 02315
IT TO DESIRED lOC
. 0005. 2P OUI- 001'.
RETURN TO "A IN LINE
ooou 4' 00000 00000
021T I

2r.J

SPS 11-0

MON I TOR I

PAGE

SUBROUTINE SET 03

PCK AREA "AY 8E USED AS A WORK AREA IF SU8R NOT uSED. IF
SUBROuTINES REQUIRED,THEN THE AREA IS USED AS FOllOWS
00020 ••••• •
02401
NOISE DIGIT.
SOURCE,SUBROUTINE SUPERVISOR
00030· •• •••
PCK
AOR OF PICK.
SOURCE,SUSAOUTINE SUPERVISOR
00040 •••• ••
PCK>5
AOR OF RETURN TO SUBR.
SOURCE. SUBROUTINE
00050······
PtK+10
AOR OF RETURN TO MA INL lNE.
SOURCE ,PR IM'RV LINKAGE
OOObO ••••• •
PCK>15
AOR OF A OPeRAND CHARACTERISTIC.
SOURCE.PICK
00010 ••• •••
00080 ••••••
PCK+20
AOR OF • OPERANO CHARACTERISTIC.
SOURCE.PICK
00090· •••••
PCK+25
AOR OF A OPERAND MANTISSA.
SOURCE.PICK
"K+30
AOR OF 8 OPERAND MANTISSA.
SOURCE.PICK
00100 •••• ••
RESERVED FOR POSSlllE RECORD MARK
PCK+31
00110· •• •••
00120.
PCK+35
4 RESERVED CORE
00 130 ••••••
PCK-. THRU PCK-90 SUIVEC FOR THE 11 FURNISHED SU8ROUTINES
AORS ARE SUPPLIED BY THE SU8kOUT INE SUPERV I SOR
001 ..000150 ••••••
PCK-91 DOWN TO END OF 10RT MAY BE USED IF NO ADDEO SUBROUTS
.. MAY 1963 .. JHB
001.0. SPSII o SUIROUTINES - AUTO flOATING POINT
FOR OPERANDS A AND B ONLY
00170· •• •••
00004 00005 -0198
00180
OSA PICK
,_-4
00000 00000
00190 EDGAR OS
02365 00040
OS8 5
.8
00.00 PCK
02401 00000
.021001
00210 HOSOIG OS
UORG EDGAR
00000
00220
00050 00051
00230 ALPHA OS
51
00000 00000
OS
a
,ALPHA-AL PH'
OOHO P
DS
50
00100 00050
00250 SAVE
00196 0009.
002.0 lETA
OS
96
00197 00001
00270
OS
I
RESET
ERROR
INDICATOR
OOzeD PICK
TO
100 I
.8ETA+l-P ,1.
00191 2N 00401 00197
TR
,PCK+ 10
MOVE OPERANDS FROM "AINlINE
00290
t 11.
"UI1
00210 31 02376 0237N
AM
CAlC RETURN AOR AND OVERFLOW
00300
.11
"K+IO
00222 11 OUP5 00011
,11 • MOVE I
TO BETA
00310
• PCK+20
TFl lETA
00234 -. 00 196 023IN
RETURN TO SUIROUT INE
PCK>5
00320
IV
0024 • • • 0237- 01400
.350
00150 00014
.00100110000020
00330
DC
I"
OOZ58 15 00401 OOOOJ
00)40 OVFl
TOM .01
,-I
oono l2 005'0 00000
00]50
SF
NINE-4. •
t.
+l
TFL 'CK+15
,NINt-43
, ••
OOUO
.>l
00212
00"1
tF
NINE-45
00294 lIDO 15' 00000
.+l
Dono
00to6 4' 02nN 00000
IT
PCK>IO
00380
DOli" 15 00.01 00001
00)90 UNFl
TOM toO I
.1
00126 12 0010) 00000
SF
ClR+1
-L
00400 ZRES
00". 00 0211- 00104
00410
TFl ".+15
Dono LI oonK 00000
CF
--II
00420
00U2 to, OU1N 00000
IT
ptK+IO
•
00430
SHARf 0 CONSTANTS
Dt.,
.1000000000000000000000000000000000000000000000000
00"'0 CNEZ
00"11 0004'
,157079U2."4 . . . . 1'231)21.'IU'" 14"20'"1'''''
00••4 00047
aDO 10 ••••••

.t.

.

00••0··.·.·

".
••

OD onl-

••••"
••

t

-

SPS 11-0
00410 LOGE

MONITOR
41

DC

00480 LNIO

DC

4,

00490 NINE

DC

45

00500
00510 CLR
00520
00530
00540
00550

DC
OS
DC
DC
DC
OENO

2
'b
48

SPS 11-0

49

2
0300 I

MON I TOR I

00010
00020
00030 DIVWI

OU OIVWI
DORG EDGAR
TR
PCK+II

00040
00050
00060
00010
00080
000.0

AM
TF
LD
U
81
DENa

PCK+I0

85
PC'+2S
PCK+30
PC •• IO
030 II

PAGE

SUBROUT! tiE SET 0)
.4)429<48190325\821651128918'1660508229439100580
OOSII 00041
.2J02~8509l994045684011"1454'84)6420160110148862

OOSS' 00048
•• 99.9 . . . . 9 . . 99 . . 9999 ••• "9 ••••• 99 . . . . . . . . . 99.
00b04 00045
.99
00606 00002
00102 00096
96 HRQS
00102 00048
.0
, .... 47
00b55 00049
.0
,-99
00104 00002
03001

..

SU8ROUT

,pel(+ 10

.-

IN~

,11.

• 21
.CL

hiD
,P(K+15
.bll
, PCI(+20
.611

.b

PAGE

SET 03
00004 00005 -0000·
00000
MOVES OIV OPfAANOS INTO PC' AREA
00000 31 0231b 0231"
00012 II 02375 -0021
CA LC RETURN '0 •
000 24 20 00085 0069 2
00036 28 0239- 023800048 29 0239" 0231"
00060 49 0231" 00000
03011

256

SPS

11-0

00010

00020
000)0
000"0
00050
00060
00070
00080
OOOqO
00100
00110
00120
00 130
00100
00150
00 1.0
00170
00 lID
00190
00200
00210
00220
00230
00200
OOBO
00160
00270

FS)
FA)
FM)

F03
MOVE

MONI TOR
FS)

OORG
TOM
B7
TOM
b7
TOM
87
UC
TOM

EOGU
FLOP.1
,2
MOYE'12
FlOP·l
01
MOYE·Il
FlOP·I
d
MOYE
.. ,0005,350
,9
FLOP'I
79
,Cl
R-17
PC •• 5
, FLOP-Il
PC.

TF

TFM
87
··12
b'Y
FLOP
FAOO pC.tc.+15
bY
lROOIV
SN)(V PCl(+10
TOM
"0 I
P(.I(+10
oNF
UNFLO
CF
00 I
87
PCtc.·10
lROO IV TOM
"0 I
FAOO PCtc..15
8NZ
PCt(.10
TFM
PCK+l~
07
PC.K+I0
OENO
0302"

SPS 11-0

,PCI(.20

,

00050

DC

00060
00070

80
~7

00080
oooqO

8NF

00100
00110

CF
TOM

00120

bO

00130

TFM

001 .. 0

8NF

00150 SQ2
00160

SF

TF

00170
00180

IF
TF

00190

TfM

00200

TF

00210

TF

00220

Tf

00230
002 .. 0 LSQ

87
AM

10250
10260

8NN

00270

CM
8Nl

00290

,a

,II

,UNFLO+ll ,6

,

,9Q

.61011
,6

0000 .. 00005, -0000
00009 00005 ~0020
0001 .. 00005 -00"0
00019 00005 -0060
00000
00000 J5 00117 00002
00012 M9 0008'0 00000
00020 J5 0011'1 0000 I
OOOH M9 0008 .. 00000
000 .. 0 'J5 00117 000,,03
00052 ,M9 00072 ,00000
00350 0000"
OOObO, J5 00117 00009
00072 20 00019 00685
oooe .. Ie 01370 -DIDo
0009b .. 9 0236N 000,00
DOlO .. Mb 00116 01500
00 116 01 0238- 0231N
00128 M6 00(96 01"00
001"0 .. 7 0237N 01500
00151 15 00 .. 01 OOOOJ
0016 .. 0 .. 0237N 023800176 33 00.01 0-0-0
00188 09 0237H 00000
0019. 15 00 .. 01 000000208 OJ 0231- 00187
00210 .. 7 02HN 01200
00232 I. 023S- OOORR
002 .... .. 9 0237N 00000
0302~

PAGE

SU8ROUT INE SET 03

,.,

-p,o.

,0,

S-,,,

,0.

,0,

,01
SF

,.11

.611
.810

,

'AGE

,FO]

,.
,.
,.
,.

,-I
,pC.I(+15
,0000

,

OIl,UO
OU.IO

SET a),

, FM3

00004 00005 -0000
00000
00000 10 02370 -0020
017
SR TO PIC. AND RETURN
00012 •• 0236N ,00000
,075050 0550000002 0000000805 0"0000560000000005,350
00350 000 ....
,-l
00020 Ml 000 .. 0 00195
• 8ETA-l -P,O,
·.20
-P,
8R IF RESULT ZERO
lRE S
00032 M9 00326 00000
OIY CHU BY 2
-P,50
8ETA
.10.
000"0 J3 00196 OOONO
8R FOR pas IT I VE ARG
.BETA-2
00052 MM 00088 0019 ..
0006. L3 0019'0 00000
8ETA-2 -P
SET NEG ARG INa ICATOR
401
,0
00076 15 00"01 00000
8R I F CHAR 000
,0,
SQ3
,98
00018 M3 00310 00098
MOVE MANTI SSA ADR
,-l
SQ2.02
,97
,010.
00100 J. 00166 ODOR 7
BR IF CHAR POSITIVE
,99
00112 M. 00136 00099
0012" 32 000.7 00000
97
STORE RESULT CHAR
,97
SQEX+47
0013. .6 00 .. 83 00097
..n
00 "'8 20 00099 00.10
99
.CLR-92-P ••
MOVE MANT INTO 97/98 MINUS L
.8ETA-2 -P"
001.0 20 00000 00 19 •
,010. • -Zl IN IT IAl MANT ADR H laRDER
L SQ+ II
00172 J6 002 ... 000R7
IN IT lAL RE SUl T ADR
lSQ+23
,5Q3+18
.Olt
00184 KO 00251 00391
IN IT lAl MANT ADR
,lSQ+1&
lSQ"-.
00196 KO 00330 002 .. 6
,+L SET RESULT TO ONE
L+I DIGITS
BETA-2 -"ONEZ-..
00208 KO 00194 00369
00220 M9 0033. 00000
LSQ"
"
ADD 2 TO RESUl T
lSQ+2)
,2
00228 JI 0025J 000-1
SUI IIESUl T: F,RDM MAfiT I SSA
,
, ' , ' 0024022 00000 00000
CONTINUE' UNTIL MAin IS 'NEG
LSQ
00252 M6 00221 01300
", 00264, J" 00251 -0194
,IETA-2 -',01
l5Q+2J"
•• IF TERMINAL RnUlT 'OR
SQU
"
"
OO~16 M6 004)6 01300
'RntollE LAST SU,I
lSQ+18
.lSQ+23
,Ohlli
00211 /lJ 00240 002SJ

00010
00020
00030 FSQR3
00040

00320

,FA;

MONITOR I
FSQR3
OSA
OORG
EDGAR
TFM
PCK+5
PCK
87

00280

SUBROUT I NE

OSA

REDUCE "ANT

~m& t:N~~~4gN~0000
OOJU',JI 00330 000-1
00114 U 00000 00000 '

'$~S

II ~O

~ON

00150

...
.",..

'. DOHa

1\1

Dono

0(;

00380 sQl

~.

00)90

TO.

.00.00
00·10

CF
TFIt

DOHO

~SQM

OOhO

00'21)
00430 S.·OU
00440
'004S0
004.~0

~1

IF

I TIlR I

~U'ROUT INI

lSQ+"

.'

9'

.so

STEP .... TI'H .OR.HI OROU .+2
DOll. JI 00246 000-2
,A 10,
l~Q'H
.v 1
STEP AEIUl I AuA +1
00341 JI 00251 000-1
.09
l~Q"l
STEP RHUll -9
.0.10.
00360 J2 0025J 000-'1
lSl/oU
.0.
CaNT lOOP WITH NEXT 2 OIGITS
00312 . , OOHO 00000
16
.10100 2000·.50 20,)16
0031. 000 I.
.DD .5 TO 'M.R/2
.10.
00380 II 00099 OOONO
,ETA-2 . . p.o
.UI. -L. LENGTHEN "'''T FOR ODD CHAR
003'2 J5 -0194 000000404 l) 00195 00000
IEU·I ~'.
-L.
• 98
S1I2+42
.-l MOVE .ANT ADR
.0IQ,
DOH. J. 00166 OOORI
~Q2-12
8R TO STORE CHAR • INIT lOOP
.0.
00421 .. , 00112 00000
80
,ttl-1OO-P t •
.+l
0043. 20 00080 00.02
BElA-, .. P. ~o
.lO,
RESUlT/2 00441 J) 00194 OOONO
-l.
DeFINE FIELD
004bO 32 00098 00000
INHRn CHU
00412 16 000 •• -0000
.IiiQ
$TORE RE,Ul T
P~"15
00""" Ob 0238- 00099
PC'.IO
RETURN TO MAlNLlNf
004 •• 4. 0231N 00000
0.30b1
0)061
,0

HI<

IFl

004.0

,1

00 4 '0

II~NO

~O:t

..

".SF ••
••

00470

"GE

SEl 03

..

•••

,

PAGE
00004 00005 .. 0000

." SJ N3

00020
000)0 'C053

OORG

OOO~(1

00050

TH.
81

00060 FS IN]

TFM

HM

lie

0.0100
00110
OOllO CH

C.f

OQ 1.0
OOI.P

H

C~

001S\I

CM

00160

, BNl

00\10
OOUC!

CM
Il

00190

IFM

00220 ••0

00~30

5

Dono

8H

0"260
00210
00180
00290
00)00
00310

Sf

I"

OOUII

TF
DC

00310

DOHa

.11

., elF

•••

PC.

."0

.0,

,0.

.0,

• •• '6
SM
Sf

•

OQUD

1\
H

OO)1U

$F
If

ou.o

00000 J' 0009. 00-10
00012 10 02310 -0088
GO TO PICK AND RE TURN
00024 49 D23.N 00000
eLF+II
,-0 II
INIT FOR POSITIVE SIN
00032 J6 00099 OO-IJ
P(I(+!)
• -.20
00044 10 02310 -00.4
.11
pc~
GO 10 P Ie. AND RETURN
0005. 49 0236N 00000
46 .0'0050 TOh
S0005l0007 050100'651 0010~10000 505608.348
00348 00041>
111+)6
000 . . . . . 00100 DO" •
CI.F+,O
ADJUST FOR NEG SIN
.0
•0,
OOGH J5 00091 oolioo
,ETA-2 -P
00088 13 00194 00000
ieTA- ~ ... P.
00100 L) 00195 00000
-L
S,V~
..,P,(.LR-9 .... P
",+l
MOVE 1+2 ZEROS TO SAVE
00112 KO 00100 0060.
8n.
00124 J4 00196 000-0
.10
0
POtCH
8M IF POSITIYE OR IUD CHAR
00136 •• 00160 01300
-p.oo
lETA
.1011, .+l
001"1 J4 00196 000-,Ii IF CH•• LESS THAN -l
'RO
00160 Ml 00208 01300
CHAR BETWEEN 0 AND -l
,S'VE
00172 JO 00202 -0100
.1t.fA
00114 KK 00202 00196
.-L
0019. )J 00000 OOI9S
,8iTA-' -, ..
IR IF SIN ROUT INE
.C~~+ll
,01.
00201 Ml 00232 00099
,P IIlVl~"5-P,.
.+LtDNVI·RT TO 5 IN
00220 K,j 00100 00"19
..p. TWOPl.U ,1,
.+L
00212 Itlt 00100 00"4
SU' 2 PI FROM MANT UNTil NEG
002" M6 00232 01100
00256 l2 00099 00000
uv.~j -'.
-~
,+l
002. . KJ 00100 00' 17
SAVE
"p'''-U
.0
00210 111 00116 OUOO
f
Cl~.lO
_0\
non2 Ji 00091 000-1
.010
SolVE
.,
00)0" lZ 00100 00000
.+l
00316 ItJ 00100 0041.
SAVE
·'.P IDYl-.'-'"
10
.Cla-IOt-,,,
OQUI 20 00010 on. .
"I. '''~10StoOO OOOUOIOOO 5051000000 000.,50000 00"00'0 ,)41
00).' 00041
00)40 ItL 00100 00100
~nE
-,...
;10,
OOltZ K6 00100 000. .
SAvf.
..
00,." L 2 00099 00000
SAVE-I .p.
EQUAL
I 'LUS l+ I UIIO
-P.ONfh"l-'.,
00316 KO 0019. 00)10
P'~.~

-,,0

00200

00'10

Qoa~o

IN IT FOR COS

.010

.6.

OVOW
OU080
00090

0000. 00005 -0032
00000

tOGA~

ClF+1I

"

•n

.,.UVt

un

-,

•

SPS 11-0

"ON IIOA I

OO'HO
00,90 OVER

IR
TO"

00400
00410
00420
00430

II
81

IF
IF"

00000
OOO~O

TF

SUM

>

AM
A"
10

000'0
00470
00,.80

I~

UOc.90
OO~OO

IF

00510
005.0
OOHO

10
BN~

00') ... 0

00;50
005bO

~ONE

10"
87
C
BE

OQ')",O

IFM
DC

ou,QQ

8D

OOtiOO

SM
IR
TO

00570

10
00620

OOb

00630
OOb6tO

OD.50
00b60
OOb 70 PLACE
OOb80

SF
07
.0
SF
TF
TFL
TO
07

OOb(W

00700

no 120

CM
BL

007;0
00740

CM
8NH

00710 POZtH

00750

10M

D07bO

TO
S7
TOM

00710
00100

PAGE

SU8AOUIINE HI 03

00388 L J 00~07 01010
SET FOR SU81UCT ION
00400 J5 00473 OOOOK
~~
.98
.lO,
.-L
00412 26 00099 OOOU
97
.0000
,58, -L
00424 16 ooon 0-000
9.
00436 2A OOORe 00914
.A8
.-L
.15
DONE
.0.
8R IF QUOT lENT lEAD
004.8 "6 00518 01200
ALPHA
-p .9~
00460 K6 00050 000A5
.10
8EIA
.. P.ALPHA
-P
00472 KK 00196 00050
AU
00084 JI 00910 000-2
.2
.010
, 004~6 JI 00908 000-2
"8-2
.2
.010
AAS
,a 1.
4DIG II PAOOUCI
."8-2
00~08 KL 00910 00908
AS
.99
.0
00520 06 0091. 000~9
80
00532 20 00080 005~6
• ClR-IOa-P,.
.2L
... p .ALPHA -P
SAVE
00544 KL 00100 00050
OVER
,SUM"1
00556
00.00 ooon
.0 I
SU".1
.0.
SEI 10 ADD 00568 J5 00473 00001
01
DVER+12
.0
00580 109 00012 00000
oE lA-I -P,ClR-95-P
005'8 OM 00195 00607
.+L
POlCH+bO
.0,
8R 1F L+1 ZEROS
00600 106 00820 01200
-p ,0 1
SAVE
010
00612 J6 00100 000-1
48 ,07507BO 70 0000 505505 5000500051 00005 05 000
05057005,350
003~0 OD008
PLACE-Z" ,BETA-} -P.O I
.-L8F1 IF NORMALIZATION NCT REO
Dab 24 Ml 00692 00195
-p ,0 1
SAVE
00636 J2 00100 000-1
010
... p, ,
BETA-I -p ,8ET'"
- l , -L
006.8 LJ 00195 00196
BETA-I -p tNO~ 01 G
ENTER NOISE DIGIT
00660 K~ 00195 01001
SETA-I -p.
-L
00672 Ll 00195 00000
·-bO
00684 109 00624 00000
PLACE
,ClF+IO
.0 I
00692 ML 007 \6 00098
BETA-2 -P
007 00 Ll 0019. 00000
BETA
-P,SAVE
-P.,
STURE CHAR
00716 KO 00196 00100
pC.!C.+1S
.. P,b,
.BtTA
S TORF RESULT
00728 00 02]8- 00196
ALPHA. l-P,H~"'.1
RESTORE OM
01,
00T40 KN 00051 01018
PCK. lO
,6,
RETURN TO ,MAlNL INE PROGRAM
00751 O. Ol37N 00000
00760 JO 00196 000-3
BETA
-P.03
dO
*.80
,0,
BR IF CHAft SMAL L ER THAN a]
00771 "7 00852 0\300
-p ,00
BETA
,+L
,10.
0078. JO 00196 000-0
*+44
.0,
8R IF CHAft lESS OR EOUAL L
00796 107 008.0 DilDO
.01
,a
CHU TOO LARGE
t 11,
00808 15 00001 0000ALPHA+ I-P.M 34.1
RESTORE RIO
00820 KN 00051 01018
ZRES
OOB 32 M9 00326 00000
,a
008.0 15 00.01 00000
001
lA8-3
SU"+I

.H3 ..... 1
.2

·,

.0 I
.0 II.

".

..

261

SPS 11-0

00800
00810
00820
00830
00840
00850 UB
00860 AB
00870
00880 PI
00890

lOON I TOR
!FlO

00790

TWOPI

00900 H34
00910
00910
DO'HO

t+42

SUSROUT INE SET 03

-p .01.
-p,o,

PAGE
AOJ TO SU8

T~O

PI FROM "ANT
• SAVE-I
00852 JO 00890 -0099
*.30
,BETA
UNTIL REDUCED TO NEG NUM8ER
00864 OK 0089. 00196
TOM BETA-l -p ,a
.11, -L
00876 J5 0019. 0000IF
00888 20 00000 00190
,8ETA-l -P
,a
BRD
00900 .9 00208 00000
8
DORG
00907
.-~
0
OS
00910 00000
0
00914 00004
OS
05
00915 00001
I
47
,31415916535897932384b2643383279502U4197Ib93993
DC
00962 00007
47
,6283185]0 71 195864769252867665590057683943387987
DC
01009 00047
DC
01011 00002
2
.01
0101] 00002
DC
,02
1
uc 5
.0002.
01018 00005
OENO 0307.
03072

8

~UN

SP, II· 0
GOO IU
00010
OUOJO

I lOR I

SUBROUTINE SET 03
 00194 00000
-L
CO"TRACT BETA BT "BETTNG FL.G
0019. L2 00195 00000
lETA
-P.29
,10. -L
00208 J4 0019. 000K9
ArNI-!2
BR IF ",NT LESS TH'N .29
00220 "7 00352 01300
19
.(LR-IOO-P"
0023Z 20 00079 00.02
.+L
eETA-2 -P.b
.10.
IN 99
•• ... NT
00244 J3 00194 000-6
98
• -I
l"~.MANT IN 99
-L
00256 15 00098 OOOOJ
BET'-2 -P.SIX-H
+L M.NT-.. L DIGITS
00268 . . 0019. 01190
PC.+5

.17

, ·"10

•••

00040
00050

DC

00010
00080

~o

00090

TO

b1

00100 TEST
00110
00110

.0.
.0.

00130
tM

00140
001 SO

8.

001.0
00170
00180
00190

tF

DONO

IF

00210 AlPH

SF

00220
00230

CM
BL

OOzoo
00150

TF

.0,

MM

OOZ.O
00Z10
00280

ALPHA

DOHO

TF

00 ;00

,u

VlJ 3 iV

DC

CG~?O

o

00330

TF

-p ,99

10 ••• ,.., ... T MOVED TO ALPMA.L+20G

00280 Kb 00050 00099
2L+2 ZEROS
00292 20 00099 00.01
L DIG ITS
,BETA-2 -P"
-l.
I
00300 2Q 00098 0019.
~b .""l0008~~ 'i,003010. Z02QO'5008 5552000000 5.5508,5do,
00148 000.8
100
,ALPHA
-L.
L+2 OIGITS 00310 2R OOlOO 00050
ftP;1'-2 ... p ,en
.-L .,NT IS C•• NT- •• IICIO+ . . . . NTI
00328 K> 00194 00097

.2L

99

2liJ

S~S

lI-O

"{IN

PAGE

I roR I
,0,

Tf)l+~l

O(dbO
flu] 70

TF

80

M
TF

8£T'-2 -P,8ET"'-2 -p ..
SA'ij'E

1"0 THIS CALf. "AOf
00140 Ll OOOH 00000
.2L
ZEROS
00352 20 00080 0059'
SQUARE "ANT 00364 KL 0019. 0019.
.-L S'VE IS "."TO".NT.L DIGITS
00)7. Kb 00 100 00099
.+L
INIT .lPHA TO 00 L+I ZEROS
00388 KO 00050 00b07

.CUt-IOIa-P"
... P,99

00360
-.':'ljq(j
\0(1

OiJ4;.lv Afl\;l

TF ..
OM

UO~lO
O~430

000.0
Oi.)Jt~O

S
H

(H)4tb')

If

~)fjJ"

1'0

ATkl+ ;5

.99999

,10,

AlN 1- 3

~99q99

,10.

99

.teA-gl-P

-p

..

f(.llt-10b-P,.
... po

oo<\>qO

t-L

OOUO
OOUO
00"0

Dono

00 . .0

.b 00050 0009 •
ZO 00080 0059>
Kl 000,0 00100
U

00050 00099

,OlD

00520 Jl 00459 000-2

,OlD

INt

00532 J2 00'21 000-1
8R IF LESS TH.N L-I P.SSES
005.4 "7 00'2' 01200
.+L
L02 DIGITS
00556 KO 00100 00370
OHE NINUS SU~ O~ I Wf . . "",T"21
00561 KK 00100 00050
.2l
00580 20 00080 00596
2L+2 DIG IT PRODUCT
00592 Kl 00100 00194

OC

,-0,

80
SoA'YE

.CLR-IO'-' ••
-',ltT.-2 .p ••

48 ,OOOOlOZIOO 202650250. 5044200040 5200500500 00084025.348
00341 00048
TEST2
.TEST+II.0 I
0060' 11M 00.52 OOOH
IBn, 12 . . 0
00610 "6 006.0 01300
99
•
••
-l
00621 )2 00099 00000
99
.TAN6-45
01.
-l.+l
l+1 DIGITS
00640 IJ 000 . . 01236
eMF "3.
,TEST-IO
.01
OO.H "" 00. . 8 00014
S~
99
•
••
-l
00 . . . 32 000 •• 00000
•
99
."OYl-H-P"
-l.+L
P2 OIGITS
00676 2J 000 •• 004U
TFH I n .
-P.l
.10
00. . . J6 001t6 000-1
fa
100
.In,ol
-L
INSUT RII n 100-L
00700 2N 00100 00197
CO
HSTI-l"...
"
.-2l IR IF NORNAliUTIDH NOT AlIiO
OOlU MJ 00161 000. .
$11
8fTA
-'.1
.10
00724 J2 001 . . 000-1
TR"
.tt
..
-2L.-n
0013. JI 000. . 000. .

INF
8....
Sf
•
ffSiZ

99911:9

00610
000 JO
-0000
00050

01

00,.0

iA)ttHJ

20
I.
19
2'

,2

TF

00.20
00030

00424
00436
OQ448
OO'bO
l+1 DIGITS
00472
00 ... 84
lL+1 DIGITS
0049.
L+\ DIGITS
00508

ATNI-3
'TNl

00540
00550

OO~80

OO~21

00099
00098
00091
0009'

lE~O~

AHH+)!i

00520

00590
00.00

l+4

Sl,

s..

00570

• 2L

-i",$."'~

"
00500
00510

~L

-l

ALPHA

flO
'lhH.

00"*12 Jt

.+l
.+l

,10,

9B
98

••

Ot)·... oo J6 001, "" 9991119

.2l

-p..

II

SPS 11-0

MONI TOR

00690

TO

00700

81
SF
TF
HNF

00110
00120
00130 TESll
001<00
OOHO
001.0
00110 PCHAR

99

S~

TFl
87
TOM
TF
TDM

00180
00190
OOBOO
00810

DC

00820

BO

008)0

SF

OOB'O
00B50

TF
SIO

008.0
00B10

81
TF
110
bL

00900

8E

OOq 10

SF

00920

009.0 fOD

Bl
IFIO
TF
87
eNF

00970
00980

IF

ef
TDM
eM
BNH
TfM
DC

01000
01010

a 1020

01030
010.0
010,0

01000

..

,

,.

,

......

TF

ooqqa

-l

,

008QO

OOq~O

INSUT NOISE OIGIT
0014B 25 00099 0240 I
00160 N9 00112 00000
,0
-- .. 8
9H
00161 32 00091 00000
-2l
8EU-Z .. P.97
,-l
00780 K6 00194 00097
,TEST+9
00792 MM DOl" 00073
··1ft
,01
BtU-Z -p
00804 II 00194 00000
PCK+15
,BEU
DOl .. 00 0231- 00196
"P,b
P CK+ 10
0082B 49 0237N 00000
,0,
THT+IO
,-I
INO ICAl E POS IT IVE CHAR
00B3. J5 00014 OOOOJ
99
.tLIl-9,-P
00848 20 0009' 00601
,2L
100
,-I
DIVIDEND EQUalS .1
-2l
008.0 15 00100 OOOOJ
99
-l,
,BETA-2 -P"
DIVISOR
IS MANT
0081Z 2R 0009' 00194
44 ,044052'000 5HOOOOO50 0050510000
555.,0 10510005,348
00341 00044
-.Sb
,99
,0,
,-2l
8R IF "ANT IS 100000 •••
00884 Ml 009'0 00099
100
REOUC E TO l DIG ITS
-Zl
00896 32 OOIDO 00000
BE 1A-2 -P,9foJ
,-l
00908 •• 00194 0009'
-p.l
BETA
REDUC E (HAR BY I
.10.
00920 J2 0019. 000-1
,0,
009]2 "9 009 •• 00000
THESE 3
··32
BE lA-2 -P,98
, -l
INS TAUCT WNS GO
00940 Kb 001 qAt 0009A
8EU
wITH BD ABDVE
-P.2
.l0.
00q52 J2 0019. 000-2
,0,
8R IF OPEAAND IS ONE
00964 107 010D8 01100
AlPH
,0,
IR IF CHAA REDUCED TD ZERO
00q'6 M. 00 19. 01200
-P,
BE TO
CHAR STILL POSITIVE,IUKE NEG
00988 l2 00 19. 00000
T E ST ... 8
01000 109 00112 00000
-P,
BfTA
\TOAf (HAR
DIOOB JO 0019. 000-0
.10.
,+l
eE1A-2 -P,PIO\l4-45
01020 KO 00194 Opel
01012 109 00H2 00000
rEIlI
,TEST+IO
TEST I
8A IF AE SULT MCAE THAN P IOV2
010'0 1010 00192 00014
01052 KO 00050 OOlq •
AlPMA .. P,8ETA-2 -p
,+L
eE TA- 2 -',PIO\l2-"''''-P,.
l+2 DIG ITS
010 •• KO 0019. 00'18
ALPH ..... l-P,
-l
01076 l3 00049 00000
ALPHA -P,
,11. -l
DI088 J5 00050 0000-P, 00
8fTA
.lOll, ,+l
01100 J' 0019. 000-,
,0
01112 10' 011.0 01100
u\lPHA -P,Ol
01124 JO 01159 -0050
··3!)
,0550555000
00350 00010
10
,350
-p ,0
,BET ..
0113. KJ 01159 00196
·.23
01148 K2 00194 00000
BETA-2 -p
DIG

..

OOBAO

00940
OOQIjO

PAGE 12

5UBROUT I NE SET 03
.NO~

·."'8

21i ;,

sps

11-0

01010
01080
01090
01100
01110 I I x
01120 TANb
D1130 PIOV"
011"0

MON I TOA I

SU8MOUTI NE SET 03

-p

ou.o KO 00194 00'193
8ETA-2 -P,BETA-3
Tf
IF 10 BETA
-P,o 1
01172 J6 0019. 000-1
010
,0
01184 109 00792 00000
TE S T1
8
01191
OOAG
,.OOOOOOOOOOOOOOOOOOOOOOOOOOODOOOOOOOOOOOOOOOO
DC
'5
01235 00045
,540 '195002705841554435 78364.08599910 1151482514
.0
OC
01281 0004.
.5
,1851981633974483090156.0845819875721049292349
oe
0112. 00045
03091
OENO 03091

>-.

PAGE 13

SP~

11-0

MOIiITOR I

ou

00010
00020
000)0 fUl>
00040
00050 f u n
00060
00070

PAGE 14

sueR OUT I NE SET 0)

FElT)

0000" 00005 -0020
00009 00005 -0000
00000
DORGEDGAR
ALLOW
IIUL IV lOG E fOR EXP
TOil sETuhl • 1
.0 •
OO.goo J5 001 .. 5 00001
00 12 119 000 12 00000
17
FUU·12 •
.0
rOil SETUP.I .9
PUVEIIT IIUL IV lOG E FOR EXT
00020 J5 001 .. 5 00009
TFII PClO5
00032 10 02)70 -0052
.. *.20
.17
PCK
IR TO PICK ANO RETU.N
n
000"4 .. 9 023611 00000
"6,0056070005 5020250001 ·160.. 50"052 0052510050 000050 • 141
00)48 000 .. 6
TFII GOBACK-I .01
00052 J6 01027 000-1
.10
TF
ALPHa.2-p. Ollez -H-P ••
•• l
ONE. L." DIGIT IlANTlSU
00064 KO 000... 00)7 2
•• 20
.IETA-1 -p.o.
80
00016 ilL 00096 00195
87
GOIACK-IZ.
I. IF '''NT ZERO
Doole 119 01016 00000
TO
ReelP-1
NON ZE aD IIaNT I SU
00096 KN ODin 00194
8ETA-2 . ,
00101 l3 00194 00000
CF
TFII 101
00120 16 00101 -0000
-L
TF
97
L.4
DIGITS
IN 101-l
-L
00132 20 00097 0019 ..
IIUl 8V lOG E If UP
•0.
001'4 "' 00236 00000
TF
80
.C.L •• 10.~P.,
00156 20 000.0 00596
II
2L+2 DIGIT 'ROOUCT
aETA-2 -'.LOGE-".P"
.+L
00168 Kl 0019 .. 00.66
,R IF HIOROER NOT ZERO
80
00180 113 00216 00091
511
00192 J2 00196 000-1
.10
IfTA
SF
99
•
0020. 32 00099 00000
-2L.
TF
leTA-2 -PoI02
IIDVE l+' DIGITS
• -L
00216 K6 0019 .. 00102
-.20
,
17
00228 119 002 ... 00000
.0
TF
8ETA-2 -P olD I
IIDVE L+4 DIGITS
002)6 K6 00194 00101
CII
-P.-OO
8ETA
.1011
.+l
002" J4 00196 000-8NH GOBACK-12.
8lt I F CHaR LE SS THAN -l
00260 117 01016 01100
CII
BETA
-Po
.10.
00272 J" 00196 000-0
8E
8R IF CHU ZERO
CALC
0021" 116 00 .... 01200
IR IF CHU 8ETWEEN -L aND ZERO
CALCO"
00296 117 00!)6 01300
eM
BETA
.10
00308 J" 00196 000-2
aH
III IF CHAR LARGER THAN 2
E12
00320 116 00,,)6 01100
_+44
8L
8R I F CHAR BETNEEN 0 aND .2
00332 117 00n6 01300
DC
.... 07770070 1007710050 5090001000 1000000505 76105070. ) .. 1

.0.

•••

00010
000110
00100

00110
00120
>00130
00140
00150
00160
00170 SETUP

.n

00110
00190
00200

-'01

00210
00220
002)0
00240
0025'0

.0.

..

.0.
.0.
.0.
.0.

00260
00270
00210
00290
00300
O(}310

00320

.0,

00330

~1i7

SPS 11-0

IIDNITOR I

00350
00360

Til

00370
00380

B7
TO~

CF
A

TR
BNV
8NF
00 .... 0
004'0
00.60 CALC

SF
TFM

00410
00480

CM
8L

B7

SM.
00500

All

00510

B7

00520

TFII

OUUO

A

OU~40

TF

005~O

00160

"

00570
00510

SF
DC

00590 c;oRD
00.00

II

00.10
00620

SF
TF

006)0
006.0
00.,0
00. .0
00.,0

TF
TFII
A
TF
II

oouo

TF

TF

"

'AGE 15

SUIROUTINE sn 0)

DOh. 00046
CHAR EQUAL S , 2
GOBACK-1 .Ina-" -P ••
.-L
00h4 KJ 01027 00192
SHIFT LEFT 2 POSITIONS
8ETA-' -P.IiU-3 -P"
00356 LJ 00191 00193
El2-12
00)68 M9 0042" 00000
,11.
CHAR EQUAL S +1
BETA-' -Po
00n6 J5 00190 00008ETA-~ -P,
,.
00388 l) 00191 00000
GDUCK-1 .IEU-5 -P"
00"00 KJ 01027 00191
SHIFT lEFT 1 POSITION
BETA·5 -P.IETA-" -P"
00412 lJ 00191 00192
la IF AOJ CHAR Don NOT ovnON
00'24 Ml DO .. , . 01400
OVFl
-P.RECI P-I
8R IF MaNT POSITIVE
004)' 1111 00258 00187
UNfL
.,
0044. M9 0031 .. 00000
BETA-5 -Po
.,
-lL
004" L2 00191 00000
INIT SIlE IND
.0110.
"9
DO"" J6 00471 0-0-0
,10.
00480 J" 00192 OOOl"
III IF lEU LESS THAN .34 oCHAR
00.92 111 00601 01300
leTA-4 ..,P, J4
.10. -L
AOJ 8ETA BY -.3.
0050.. J2 00192 OOOl"
,010.
CALC.'
.1
STEP SIZE INO
00516 JI 00 .. 71 000-1
CUC.12
tONTINUE REDUCTION OF lETA
00521 "' 00"'0 00000
.IETA-. -,.01.
PROCESS IF CHU NEG
Don. JO 00595 -0192
...../
,IETA·'.O
005..1 KJ 00595 00 196
;ott ..-. -'.tLM-96-' ..
L'" DIGIT FIELD
00560 KO 00 190 0060.
00512 L3 00191 00000
UtA-, -'.
M'A..,4 -',
SHIFT RIGHT N R T CHAR SIZE
00514 K6 001 U 00000
Ina-, -Po
"
-~
00596 L2 001'1 00000
.341
"".OIU80 00000
007'. J' 00.77 000-0
8R IF FU.THER AOJ NOT 'EQUIRED
00808 . . 00888 01200
.nADJUST FOR 'EDUCTNI 8Y .14
00820 20 00080 005'.
,L 2L+4 DIGIT PRODUCT

1

-2L

00832 KL 000'. 010.8
32 00097 00000

n+3 DIGITI 008"

l+2 DIGITS
0085.
,0 10,
01
REDUCE I~OIC"OR
008.8
--84,
,0
00880
£'b, 000008_02'5 0000000200 005005
0350 00350
•- L

,01.

SR

K. 000'. 000.8
J2 00.11 000-1
M9 0079. 00000
0002.

IF ... ANT WAS POSITIVE

00888 MM 0101. 00887
008bO

TF

001:110

T FM

MAKE CHAR NEGATIVE

,

dO

dO,

00900 L2 01027 00000
,2lCAlC RH,IPR.OCAl IF NEe. M"NT
00. 12 20 0009. 00.08
-2L, 2l+.{ DIGIT DIVIDEND
00924

100

OOt\RO

,ALPHA-4-P"

.0.

u0890

~V

G084(1(-2_,

U()'10U

A~

.0 I

DOg 10
00920

H
TFl

G[lSA(K-l
>:< + 2:3

PC 1('" 1 ~

• 99

OOg4Q

AM

004'50
OQ4hf) GOBALIC

TF'"
TFl

G08A(K-l,2,10
A l PHA-4-P
PCK+15
,ALPHA-4-P,b,

B1

PCK+10

DC

47

,GOiUCK-1

P(K+lO

oo<:.t Fe
OU9AO

T ENj4

OE-NO

00'190

,PI 11-0

aSA

00020

UORG

FlOG3

l+2
SA

.....

16

000'19 OOOJO

DIGIT DIVISOR
0093& 2A 00100 000'.
IF (lRIC. (JPER 1 OR l/LOGE
00948 Mb 01004 01400
00960 J 1 01027 000-1

dO

00972 KO 00.9N 01027
,-l STORE RESULT
0098' 0. 0238- 00099
RETURN TO MAINLINE
DOQ9b 49 0237N 00000
01004 Jl 01027 000-2
0101b Jb 000'. -0000
I TO'E 'EIUL 1
01028 00 0238- 000 ••

...

...

RETURN Tn MAINLINE
D 1040 49 0231N 00000

.21811.1.2)9.9552 50U2011491 .38'1'731071180502'.
01093 000.7
03102

MONll0R I

uOO 10

IUS'OUT INE SEI
,FlN3

EDGAR

.0.

PAGE

D)

0000' 00005 -0000
00009 00005 -0020
00000
lEI Fa' COMMON LOG

rOM

eORtH'}

UUU40

.7

00050 f-lN3

TU"

000 12 M. 00032 00000
SET FOR NATU'AL LOG
00020 J5 00597 00009
,.+ 20
pei<.+"
017
0003. 10 02370 -0052
PC'
BR 10 PICK AND '~IU'N
00044 •• 0236N 00000
28 ,0700
.050 0500500105 7070700055
,350
00350 00028
,-l
8R IF NON ZERO ARG
,8ETA"1 -Pit
00052 ML 000'. 001.5
40 I
,11,
SET IND FOR LOG OR LN OF ZERO.
.0
000.4 15 00.01 0000PL
lET UP TO IT'OE NEG NI~ES
0007. L2 00559 00000
OVFL.12-P~
BR TO ITO'E AND RTN 10 .AI~LIN
00088 M, 00270 00000
,BE TA-2 -p ,0,
BM IF MANT pas IT I VE
-+ 36
000'. MM 00132 001"

()i.J'J

HJ FLOG3

03102

-l,

00060

IF"

(10010

07

OOOBO

DC
bO

00100

10M

00110

SF

oouo

87

O(J1.30

00140

TOM

00150

CF

001.0
00170
00180

CF

00190
00200
00210

10M
CM
SNL

IFM
TF

00220
00230

A.

00240
OOHO

87
DC

00260

TF

00270

TOM

00280
00290
00)00
00310

TF
LD
D

00320

TF

01

.

.9

00000 J5 00597 0000 1

.0

.0.

.•.

401

,0

SEr

INO FDA

~EGATIVE

00108 15 00.01 00000
MAKE POSITIVE
00120 L3 00194 00000
COAN-,25
,ClEAO-45 ,017,
+l
1~ITIALllE 00132 JO 00571 -0'1'
GOAL-I]
.8ETA
-p,o,
SAVE CHAR 0014. KO 0081' 00196
8ETA-} -P,
-l,
EXPAND FIELD 10 L+l OIGITS
0015. L3 001.5 00000
8ETA-2 -Pd
ADD 1.0
00168 J5 DOl'. OOOOJ
BET A-I -P 015
,10. -L,
00180 J' 00195 000J5
BR IF MOO MA~T ~OT LESS 1.5
001 Q2 M. 00236 01300
8ETA-2 -P.8ETA-2 -P, I
DOUBLE MA~T. L+l DIGITS
0020' KJ 00194 00194
CORN-2S
•• 8
ADJ FOR ~EXT CO~STA~T
0021. J 1 00' 71 000118
*-60,
.0
00228 119 00168 00000
42.567055082525520 855525501 03 '106202050 085552. 350
00350 00042
ALPHA
-p ,ONEZ-Itt-P"
,+l
L+I DIGITS
D023~ 00 000'0 00369
CO~VERT TO TWOI
00241 J5 00050 OOOOK
ALPHA
-P,8ETA-2 -Pt.
2.0 IIINUS 1100 IIANT 12.0-1 I
00260 . . 00050 00194
99
,CL_-9J-' .,
.2L
00272 20 00099 00609
Q7
.ALPHA
... P t ,
00284 2Q 00097 00050
-L.
98
.eETA-2. -P,.
12.0-0/1 EQUALS Y
-L.
00296 2R 00091 00194
-P,9.
L+Z 011;115
BETA
8ET.'-2 -p,

.11. -L,

*+""

.0.

.11, -L,

.-L

2711

17

SPS 11-0
OOHO
OOHO

MOIl I TOR
IF

"

00)50

TF

,Clll ... 10o-P. ,
... P. ,

10
BETA

-P,IEU

SAYE

-P ,97

eETA

-P ,lEU
, ~9999

-".,ala,

,99999

,010,

..

OOUO
00370 COUN

A

00360
003~0

TFM
TF

00000
00"10

TF
TF"

96

OO-'tZO

PM

9.

00030

A

ALPHA

00 . . 0

IF

10

"

AlPPH

-P, SAVE

ALPHA

-P,117

G~)"

,0

TFM

~

CbUN.7l

ALP .. A
~9

,
-p ,91
tC.l"~lOo-P"

00 ... 10

,M

(OUN+71

.,

OO~80

SM

coufII+q

,I

o u./t. OiiO

,NI

COUfII+)o

00500

DC

.~,

00510
00520

TF

60
ALPHA

8E

OU5".10
OQ5bO

SF

8E TA
8ETA

CO~N

]A

-P"
,010.

,01'0.

06552550 50520008U
.CLR"lOo""P"
-P,8ETA
"P. ,
,8ETA

1F

-P, ,

-P,
-P
-p t 91

,0,

NlG

00~SO

TF

OO'5:QO
(.101:'00

"

•

,0,

97

oulj .. o

00570

..

,CLR-92-P
dO,
010

IF

00530

"

-P,CZERO-"6

~h)ot()O

M

ser

SUBROUT INE

,CLR-lOt.-P ••
.. P. ,
lOGE-4~-P, BETA
-p ,91
8ElA

80

TF

-p

~F

8E T A

00020

1F

006]()

~

,CLf~. -100-P. ,
80
ONE I-'O-P ,GOAL-13
01,

n

99
BE 1A

0(),<,p}

OOb4Q

PLUS

COb~O

, BETA

-P

... p ,99

PAGE

03

II

00308 K~ 00 1~6 OOO~I
003,0 ,0 00010 005~6
,n
2L." DIG ITS
00312 OL 00196 001~6
,-L
L+2 DIGITS
,"2
DOH" K6 00100 00091
DOUBLE'
003,. oJ 00196 001~6
,+L1N IT IALi f'1: COUNT TO L-I TERMS
00368 J6 00371 999R9
00)80 J6 0003~ ~~~R~
,2L
L+, OIG IT S. ZUO ALPHA
,+L
003~2 KO 00050 00913
00000 20 00099 00610
,+L
-L,
O'TAIN REC I PlOCAL TERM
00016 16 00096 OOOJO
-l,
00026 19 00091 -0000
L+2 OIGITS TO PREy TOTAL
00"'0 01 00050 00097
,2l PRODUCT OF ' ' ' 2 AND TOTAL OF
00452 20 00010 00596
PREY 10USL 1 LAl( TERMS
00464 Kl 00050 00100
,-L
L+,
DIG ITS STORED TOUL
00' 7 6 K6 00050 00097
REOUCE DiViSOR
00068 J2 00419 000-2
REDUCE NO OF UNCALt TERMS
00500 J2 00377 000-1
BR IF L. ... l TEftlllS NOT CALC
00512 M7 00.0. 01200
5250066005 5050605000 07770050,)50
OOHO 00046
,lL
00520 20 00060 00596
2Y • SUM OF l-l TERMS
00536 Kl 00050 00196
ADO 11 TO ASOVE PRODUCT. L+2
-l
005.6 2J 00097 00196
SET wiTH PROPER CONSTANT L+3
005~0 K6 00196 00000
00572 L2 00 I ~6 00000
,-L W8 ACCUM TOT AL FROM CONS TANT
00580 K2 00196 00097
U IF FINDING NATURAL LOG
00~9& 109 00876 00000
00008 20 00080 00596
,2l
+L,
00620 KL 00'66 00196
,-l l+l DIGITS 00632 .6 00196 00097
006'-. L1 00196 00000
,+l
006~6 20 00010 00602
+L,
ORIG CHAR' ONE.
L+5 DIGITS
00668 KL 00371 00819
00680 2J 00099 00196
PREPUE FOR NORHALIIATION

nl

MON I TOR

5PS 11-0

PAGE 19

SUBROUT INE SET 03

06 00196 00099
00704 L3 00196 00000
-P
BE TA
,+l
00116 K4 00610 00098
elR -92 -p .98
-~,
8R IF L+5 ZEROS
00726 lOb 00326 01200
lRES
.lQ',
GOAl-I
,03
SET (HAR EQUAl 3
007'0 J6 00131 000-3
,-l IR IF HI ORDER DIGIT NON-ZERO
GOAl-Z'
,8ETA~' -P,O,
00752 Ml 00101 00192
-l,-l
0076. lJ 00192 00193
BETA-. -P ,BETA-l .. P ••
,1O,
REDUCE CHAR 00776 J1 00131 000-1
GOAL-I
,01
.P,NO$ OIG
INHRT NOISE DIGIT
8ETA
00781 K~ 00196 02 .. 01
,0,
CONTINUE NORMAliZATION
.-48
00600 M9 00752 00000
00)50 00016
16
,7050005005000"0
,3'0
-l,
SET FIELD DEFINITION
BETA- .. • p,
00808 L2 00192 00000
00620 J& 00193 -0000
BETA-)
RTN
TO MAINLINE
,99
AFFIX
SIGN
AND
··24
00832 M4 00856 00099
.p
008
.... L2 00191 00000
8ETA·~
0085. 00 onl- 00193
PCK+U
,8ETA-3 -P,6
,&
00868 .. 9 0237N 00000
PCK+IO
,+l
CONYERS ION FOR LN
.C,la-100-', ,
80
00876 20 00080 00602
IN 1O-05-P ,GOAl- U
l.5 DIGITS 00818 RL 00514 00119
-l,
,0,
ReTURN TO (OMMON SECT ION
PLUS
00900 "9 00610 00000
,0
009U 00048
0., -.HI4 718115599 .. nOhI7U212IUI17.,610755001 '''J6
GI007 000'"
... , - 1)862943" 119190.I.n446"Z~291'U3 U6151G002 . . 71
01055 00041
41, - 2079 .... 15.16 T9 n 5921251 . . . 364374529704 2ZU 00 .. 0 JO.
01103 00041
OU22
03122
00~92

00 •• 0
CGb 70
00. eo
00.90

CF
C
8E
TFM

00700

80

00110
00/20

rR

DOHO

SH
TO

007-'10

87

00750
00160

DC
,F

00770
00180 GOAL

TFM
8NF

00790
00800
00810
OOUO NLG

87
TF

00830
00.40

M
8

00850 CZERO

SF

yFl

UL

OUdOO

uc

00870

ac

001.0

DC

00890

O~NO

..

,

..

••

27Z

SPS 11-0

SUlaOUTI NE SET 0)

"ONITOa

00010

OSA

OOOlO
UUO)O FSMS
000 ..0
OOO~O FSLS
000f>0
00070 TFLS
00010 fLOAT
00090
00100
00110

OORG
TOM
11
TOil
11
TOil
TR
AM

00110 ITFS
OU130
001 .. 0
001.0
OUlf>O
00170

TR

FPS ,FSLS ,TFLS ,ITFS

flR
B7

tOG'"

,.

FLOATon
FLOAT
HOAT·n ,I
FLOAT
FLDATolI
ptUIl
,"UIO
PU·IO
,II
,PCKOlO
PUolO

,.

,11

"un

AM

PU.11 ,Ptu 10, II
PU.IO, II

Tf

"]O,Pt~.IO

,.11

'f>'

8TH PtK+I',P'K.20,f>11

6'

UtNO

0)1 ....

"GE 20

0000" 00001 -0000
00009 ODOOt -0020
DOGI" DOOOt -00100
000 It 0000. -DO"
00000
00000 JI ODon 00001
OOOU M9 ODDU 00000
00020 JI ODon DODD'
000)2 M. ODDU 00000
000"0 JI ODOlf 0000.
00012 U 0211. OU1N
000." 11 onn -DO 11
ODOlf> O. 02)1- 0211N
UTURN TD MA IMLINE
00011 .. 9 02)1N ODOOO
ODD" II 02)1' 0211N
0010. 11 onn -0011
00 110 0 00 ISO onn
001)l 07 0211- on.N
00 I ....... 00000 00000
0]1 ....

~;-

l~lO-I.U ~nNI rn~

00010

1620 FO~TRA~ II-U
DORG OlllR
5
.-100
at
·OIL-

.JOOltJ

uCOJII

cno ...

FORTU" II-C

JAGE

P"A5E I-A

I-A

), 1,-

at

jllti~UJIIII

VEMSIOfil 1

PHASE

:1

0221.
Ollll

•

02121

)

-01
11OOljO

usc

,2

Olln

.... 00£10

2
DC
01

,,,,

OZll5

•>0010 Pt.A: .... s.. DSC
OO~

O(,ORO
~OOqO

far. rot

OUIOD LI~T
OUl10 PRST
lIu120 HIr.PRr
00 1)0 NI
tJJI.C

o~

'>I4(1

DC

-l461
-2400

0
0
.10 X
0
0
0
0
0
0
0
0
0
0

I5n9

FMON

nOloo
,,0 l1U tslKII

02nt
02324
I

012.8
ISDn
15119

~rM

I)O'.CJO

16
17

Ol'Z9

UOJ6
00116
00566
005Z0
OOHl
005'.
0060Z
00565
00796
02HO
02442
02"1
02"'.
02466
02471

uono
aouo

HO)6
I

'.11'00

C

16
17

02359
02324

-0000
-24)0

0

IA
17

02nt
02)Z4
z

-2471
JO'Il

5 x
-1486
I

02491

JU"U

-R'
as.

nJ800

"Olt". ..

SfC ro~ cnuNI OF

t

IlOFt 10

Ile

I.'

oaR2D HdOAD

O~

.. ')40

00 8'JU HISC I

I)')

P.~TAO

02494

2" :,

E 86"40

"n~[

IblO-I'"

008lt£1

p~'SEB

lOR I

VER\IO~

2

FC~IHN

,,-r.

Ol'9~

P~ASf

5 X

I-A

03
00. ,I ,HeOAO,HI SC r t~ll ••
IJ nlto·ol-,z~·IO

,.GE
02499
02500

-243C
I

113.0
00003
02502

0
0
14

or.

I.'

IlSC
21

l,l2 ...

uOA 1n

"5A

PR,lAO

02521

n08AO

DC

I.'

02523
OHZ.

-l'02
I

00890 Nil
00900
OOYIO
(J0920
009)0
009.0

8V
10M
AM

• + 12
OOOCO
··It!
I

OH16 46
OZ538 IS
02550 II
025U JI
02514 .~
0251. 2~
ontl Z6
02610 12
OZUl I'
OJ61' At
OlbU ,12
Ol658
02610
02612 IS
01 . . 1
0'694 IS
0210. n
02111 2'
OlUO J6
0214l 16
onS4 49
Dn" J6
on"
16
02101 16
02114 16
Oll26 4'
011)' Il
02no ZIt
DlItZ 46
0'174 J6
1&
02'"
OZ... 12
0"10 U

02538
00000
OZ501
-OOOJ
02550
02371
05746
0'746
00565
OO"A
0574)
on".
02622
06)U
I
0l1l0
01222
O"U
DUll
005"
DO'"
on61

00"5Q

OaR.'

PRrHO

uQ950

UO'60
00910
00980

aono

01000
01010
01010
010)0 IiO~.
010"0
UIO'O
[HOllO
01010
01010
01090
01100
01110
Oillo
01110
'01140
01150
011 60 Nil'
01110
°1UO
DUtO
UI,J.OO
GIlIO
OU20
OIU(I
01l"0 fill
OU'O
01260'

·'OUll!
012,0'

r~
6~R

rF
If
SM
IF"
8
SM

,

·-z't

I~DO"\O

'-1iII1t

·

TO
TF
rF
IF"

,7,
,20000
,UPHaM-I ,lb
.0
,· ... 111

01

,1,
,10

BIiFE Q,. 100, GR"_
aUFOI".lou.n_"k
,STill
Till
FCntlO
,ST~~

JOAT

".2)

'.'8
I"FlQI-S
""CIE ROaNe

""OSSF
AI,

YF
5"
TF

.."

.10.

,I2NINI

,l.

,

'.10

,NlI'·1I

DUII"Y

,d'
,a,

--t
t~

5
t9
Till
TIll

fill

",

.16

,Ot

,.••

on.o

GlI • SECTORS OF EOUIV. ,AILE
lOAD SYM fA8lE FROII EOUIV 'AilE
IS ENTRV All NINES
YES
NO

OUEUINE SU.ROUU ... E ACDRUS

.610

,-

,ENflN·5
,1ft
,5,
.N1I4-11

GET FIRSt ,. DIM ENTRIES
IN EfilUIVALENCE UILE DIM ENrAY

,10

.10.

una
o"n

""IDt.. ralLE 'OllifU

..

,6,
,10

UORi $UI •• ADOR'SS IN SYM
UIIIINAl! SUNKS FRIHI NallE

276

, x

."

IIiITUULE SYMBOL rABU

BUFSCS+l00.,'"

:IDGr
,1,
,OJI'OU
TF
Ol"ODA'.' .HUFOI".U ..
DIMODA
TO
,IUfOIIl-'O
,9
IFM 111"0111.1 ,OOA
IFI' o IIIODI.U,I\lFEQr
... U
fF" 10MT
10r.I
8
,DI""'T

TF

"EMORV SIZE

,9

8

All
511

tAlCU~ATE

02511

INnO&+1 J ,'lILOC

Tn"

TO

."

:. THI
I NOOAt 13 .ST~~
I ~UOAtl) ,qqq
, •• 21
IORr
InOl
,INOAIA

B~l

DGf'

OBI6
READ PAGt OFIO

UlLE

n

II

,.

02"" 11
02946
0 " " '12
02970 It

05156
0~"4

an . .
00'"
00"6
0"56

.')1'
OUSI

01400
00000
KOOOO
OSU9
00000
OlS.1

Dun

00.99
-2645

-5125
000-1
02)72
OUOO
00000
026.1
026"

Dun

onn
-,,,,
-514'
Oll"
07",
00-0.
-6J10

..

·UU

-"

OOO~.

0600t
ouoo

...,

au..

000. .
OUlL

-UIt)

Oi061

021. .

02904
02.04

"

OUOII
ODOtS

000-4
OOo-t
000·'
00000
000. .

onu ooo-s

IblO-I"1 -aNI lOA
012~0

5M
01100 lUnp41 AM
01110
C
RH
01120
01 ))0
IF
01 )<0
5.
OllSo
5F
01160 1112
05
01 )10
C.
01180
CF
01190 1111
05
01400
~'E
01410 Nil"
5M
IF
01"20
0\"10
501440
5F
01450 III'
05
u14bO
IF
01" 10
5

Illl
I II Z
1112
N 1142
1111
I III
I II }
5
1112
I II }
5
lOO",1
1112
TIl}
TIl I
TIl I
Ill'

,1112

'f ll4

,f

o"eo

T 114
"'I Xl OC
NXlOC

,01

A.

01490
01500
GI'IO
01520
01510

A

ulS40

A'
C·
BL
55·
rFM
C·
BNL
rF
rFM
B
r.
IFM
rFM
B

TF

rF
5'
TF

01550 MOONE
ul'JbO

01510
al'HI{)

01SQO
01600
01610
01 b20
ulolO

01640
01&50
1I1b60

01610
Ulb~O

01 bqQ

3'

01100

TO
CF

La

71 0

eM

C 1120

HE

01110

0\ 140

c.

O11S0
01160

eE
TOM
rF M

01170
o I lao

5

.

,

olv

, T 114
,b 11,

,05

,b,
010

··lA

,02
,00
,CHI

CM I END

010
,6

• f liZ

,as

'-0
. - J6

010

11)

FCfPW

Cf-f I E "lU

5 lORE 5U8A. NAMe IN NAME TABLE
5 10~E POIHIER IN S1J1!. fABl E

,fIll
,10.

UPDATE r ARLE COUNr

,OUfFQJ+7Q~

010
,10.
,210

INITIALIZE AEAO IN aREA

,AlPHR~

IORT,·+21 ••
GET HEAO
IOGT ,PR THO , 7
Nll+4,(HIENO-162.,.8lANK HEAOI",G SEerOR
NlI+4+lbl,,,
CLEAR RM
pur CIEAREO HEAOI NG
tORT,·"ll"
I 01-1. Be .PR THU. 1
s.1 P 10 I I ~"'EOI ATE
,0911 "
I Ni>uTD
,426
Ol::.TER""I,..E INPuT OEVICE
I "4puTU
1'4PuTD
,01
010
I P TV
,D)
I NPuTD
010
I PP T
1"'101\1

NllKEY .. l

OIBOO I pI' f
u 181;)

B

Nil

..

,0
010

PAPER TAPE

INPUT

rD.

INDIII

rF ..
TFM

,ZIKEY-I
lOR r
lOG I
CO.AOU-4
CO_SI
BUF 5C S
00402

01860 Nil

JIR10
Ol8BU

B

01010

TO
TE
rA
r.
rF
rF
10
CM
B'E
RCTY

01 !JAO

!F.

Olqqo

8
CM
RNE
BC 4
CM
"'E
CF
CM
"E
CM
BE
e.
BC
CM
BE
CM
SHE
BIM
CM

QI8Qn
01 qOO

01910
01920
01910
01 q4tO
019ljO N.!1
01 Q60

02 000
OZ 010
02010
Q2010
02 040
02050
020bO
Ot' 070

01080
O} 000
02100
02110
02120
02110
02140
D21 SO

02160
02110
02180
02190
02200
02210
02220
02210
02240
02250

BN~

022bO

02210 CDCIl
02280
02290
02300
02)10
02120
02110
02340
02)50
02160
02)10
02180
021qO

CAnp,

TYpe.RITER INPUI

01

VERSION

MONITOR
,Gb

FCRrRAN II-C

277

,.+~]

, 1,
SC SOA T
.8UFSCS.1b, ,

..

,CO~ADO

,I NIT
,1NI1-1

FI~G

GEl 5YSTEM COMMUNI CAl ION SECTPR
MOVE OBJECT rl"E "ACHINE 51ZE
5<1 uP OIM IN SY5 eOMM 5Ecld_
SEI UP DIM IN SY5 COMM AREA

,eUFSCS+4b, ,
""aVE F
1':1b,8,
wAnE\JP
eM , • ." 5 j4 .... 8,
WAOK
CHI+ .. ,4bltl.lh

HIEST

,
,
,

CHI'4,"Q4b,8,
··24. ' .
eOCll. I F TRt
CHI+4,41~),R.

··.U", ,

..

, lO,

014

CAll,PI
CHI·l
CHI+4.51t.l.t'.R,
~ASS

..

, •• Zl

READ oN I NPul RECORO
USING loor.
ALLO.5 GOOF SwiTCH
15 TH 15 A CONTROL STArEMfNI
NO, CALL IN PAS5 I

..
..

15 TM I S APstSN StATEMENT
YE5
IS IH 15 • P08JP 51.
ytS
IS IH I S A lOIS' ST.
ns
IS IH 15 A FAN05 ST.

..
..

Yl

IF TRACE
NO
ALI
NO

5TATEM~NT

MAP

8TM COCTL,PR;ST
CM
CHI+4,415Q,A,
ARIIHMETIC TRACE
NO
8NE •• 24."
BTM CDC fL ,HC IRC
CM
LIST PRINTER
CHI+",5149.8.
NO
BHE CDC Tl+24 •••
BTM CDC Tl,lI ST
5,0
OC
-0000
TOM ·-I,l.611
BIM PGH02,N21
IESI FOR
CM
CHI.2,14tlO,
PCHO'., ,
YES PAGE HEADING
BE
,
NO, INVAlIDCTt.. -sr:.
~C IV
eHI_)2
,AlPHRIMI
IF
WAry CHI
RC TV
WATY ERMESI
OROR, INVALID CONUDl STAU"ENf
H

N21
8
OORG '-4
SF
CHI-]

II
24
46

26
12
12

'"
'"
))

12
26
12
12

01065
01065
01065
Oll02
01089
01089
OlOIR
5
0106N
OlOIR
5
0299"
01065
01089
01089
OlOIR

BR.,: TO RUO NE.T STATE"f'"

000-0
00000
01200
000-2
02856
OOOJI
00000

II
21
26
26
Il
26
II
14

'"1212

.

16
14

26
16

4Q

1I

16
Ib
4"
14
2'>

01l"9
Oll"9
01l"9
02112
02ll'
029n

oal]

02118
OH29
02856
02Bl8
02118
Olll2
JS999
01112
03294
15999
00565
00566
025)0
01693
OOsbs
00520
00000
ObOl1
06011
06011
0)514
06011

01065
01089
000-1
01149
0106N
02312
000-5
029))
000-1
-1115

01)00
000-5
000-2
000-0
J5IH
01100
05680
-H11
-2511
15837
-0000
-342~

-2511
\,. '111

16
49

"

01424
0601&
035,9'8

15
16
49

02424
06018
0)598

OODOl
COO-"
00000

]~14

15

02424

COo'OI

0)586
03598
0)610
0]622
0]614
01646
0)658
01610
01682
01694
OH06
0111"
0)130
0)142
Oll54
Oll66
OH18
0]190
0]802
01814
0]826
0)8)8
01850
0)862
03814
01886
0)898
0]910
01922
01914
01946
0]951
0)910
0)912
0).94
OA006
04011
040)0
OAOA2
OA054
04066
04012

16
16
49
25
26

06018
00565
00566
02258
02182
06218
00402
02250
02252
02210
06011
Oll42
00000
00565
00566
06011
0)802
031)0

0)510
0)522
0)514
0]541
01"1
0)542
0)5')4
0)566
0)511
o

))

14
4b
14
4b

03~4t2

PAGE

04014
04096
OA108
04120
041ll
04144
04156
041"
OA110
04192
04204

II

1I
26
26
25
14

41
14
16
A9
14

.
.
41

14

1~1)9

41

IA
41

04212
15142
151Al
04424
15141
04584
1514)
04118
I5IA)
05096
15143
03910
04084
15143
OA006
OAOIA
15141
OA042
OAOl4
1514)
04101

11

04014~

15

0401l
05694
15141
0"0.
00000
15111

1I

14

14
A6

.
14

40

IA

IA
Al

11
14
Al
11
IA

41

11

000-.
-]621
-5111
06294
02262
0519 5
05194
06264
Ob266
0628) ,
000-1
01200
00102
-J16S
-6012
000-1
01200
00400
OOOH
01200
00000
ON762

01200
ON156
01200
ON) ...

01200
0"6AI
01200
OM946
01200
-2226
0"15)
01200
-2229
OM 159
01200
-2221
ON149
01200
-2228

5

41
49

00000
05119
00000
On06

ODOOJ
-1706
OOOJ4
01200
00102
05610
00100
0010Z
00100
:00000
- 00000

)2

UI4Z

00000

11
14
46

)4
26
)9
14
)9

"In

OUIl
04212

27~

000J2
000-2
02856
01100
01065
000-1
00000

5
26
22

PHASE I-A

010

t

12

00,_
00000
000-1
01200
000- I
01200
00000
OOOJO
00000

o )4tqA

CAMO I NPur

til.
010

, O.

1620-11t4~

01AljO

Olls~

.-,

,j

PACE
02982
0299"
01006
01018
01010
OlOH
0105"
01065
0)066
0)078
01019
0)090
Oll02
o JlI4
OJl26
OJill
OllH
o Jl50
Oll62
OliH
01186
01198
03210
01222
01214
01246
01258
0)110
01282
03294
01106
0)118
OB10
01)42
OH66
01118
0J]90
01402
01414
01426
01418
0)<50
0)462
0)414
0148b

010

DORl. '-4

IPTV

P-ASE I-A

,blO
,6

, 02
,NUIt"lR
011

,0 I

1.11820
UI'\40

.

HICNf
N114+1A
"1114

"I?

I.!l A)O

,00

,

FORrRlN 11-0

010

,'
,

VfRS I ON
010
,10

,6

.Nunc

v'HI:("
f}llR.G '-4
rOM
INOIV
If ..
NllKEV-l

1~tl

" 112
,01

III I
TIll
F C IE ND

"

01

OllQO

.12
,02
t ~ ll· , 18

IblO-IHI

U2400
02410
U2HO
u2HO
024 .. 0
u24\O
02460
UlUD
J2480
~2490

anoo

OHIO
01520
01SIQ
OH40

~F

~F

V
SO

IF
TA
TF"
TF
A"
TF

C
S.. "

TF
TF
TF.

DB SO

8

Ol~60

8
OOAG
IF
dT.
C"
BE

02570
.02510 .AH
U2~90

02600
02610
02620
02610
026'0
016~0

01660
Ol670
01680
026'0
02700
02710 WASH
02120
ul1)O
017'0 "AClftJ'P
OlHU
02760
MHO
~1710

il2790
ullOO
02810
02120
02810
02840

'"

•
FPI

•• 24

-

.W
10MT
10PT

.-.

PA~ClN

CHltllt

PGHD2
CHI'll
WAHl
CHI.12
WASSI

.1 NOIV
• ALPHA.

.CHI-I
.00
• ~ L~G
.02

"

oO~G

TO"
TF
8T ..
C"

.'IE

ro ..

~

M

OnRG
TIl ..

'.aSf I~A

FOUUN 11-0

Nl1
.-,

dO.

'ALCULAIE F PLVS TWO

CALCULATt • • • OAO Silt fOI DISK 10

.F P2

,·.11
• SC sou

• AlPH."

,·.12
oil

·

.14

.7.

..
..

.t O.

.10.

,.

pul SYSTe" CO""UNltATlON sterOl

GO TO PRI .. , PSISN
IS OEv ICE ceDe PAPE A IAPE
YES
NU. IS DEVICE cnoe CARDS
YES
EUO~.

..

.~.

INVAL'IO OUtpUT DEVice CODf

TO RfAO "EKT 5T.TtME'"

,(HIt12

JAY
01
CHld4
• AL PHRflI
PC"'Oi',··12 ••
CHI'12
.72
··32
8UFSCS.Zloi
"21

.-.

,10.

CAAO I~'UI
'II: S. .DVF I ~'VI RECORD
TO '1415
ERAS~ "ECOAD MUK

.-

"ZI

.-.

..

,I(U~r.

·

OOR'"
CM
CHI+l,l
• 14
R~~
··12
TOM 8UHO'ZhO

01~SO

2

.KlNG

fO"ES)

OURG '-4
TO
PUSTSN
.. 11

u2860
01870
02880
02no
02qOO
U1910
Ul910
02910
UZ940
0191)0 WaOK

··"11

CHI'160
CHI5-1
CHI'160
F'I
F'l

H
~

VERSIC~

101 I

-:.
CHI.,
CHI.9

BE
KC IV
WAIY CHI
Men

wa IY

"O~I

,.....

·

8UFSCS+2J,O

RC TY

OUP ACTIO .. RfQUIUC

..
..

GO TO PAI .. T 'OU'
,10.
IS UE~ICE coot PAPER TAPf
,,0
.11, YES

dO.

IS DEVICE ceDE CARCS

.11.

ye>

~o

•.IL

WAn' tHI

R( TY
WA IV E .on I
H

ERROA, I NHL I 0 OUTPuT DEW ICE CODE

.-.

'<21
8
UORG
ro .. BUF 'iCS'''2, 1

BR.

,11,

TO "EAC ~EKT 5TAlt"!NI

SIT U' TO LOAO OBJECT PROG. ON 110.

PAGf
04224
Jl
04216 )2
04241 12
04160 H
04271 a
04214 11
042"- 16
04108 26
04120 II
041)2 26
04H4 24
041" 41
041. . a
04)10 a
04192
16
04404 49
04416
OHlJ
04424 2'
04416 17
04448
14
04460
14
04472
04414 46
0 . . 96 ) .
OHOI 19
04520 J4
OU)l
J9
04H. 41
045S6 49
OU6I
04564 25
OU76 49
04513
04584 15
04S96 26
04601
04620 14
046)2 47
0 .... 4
IS
04n6 49
0'663
0.664
I•
04676 47
04 . . 1
u
04700 49
04707
04701
U
04720 14
047)2 19
04744 J4
04756 J9
0"68 u
04"0 49
04787
04188

11>20-1441 .nNI lOA
0.2.960

OlQ70
02980
02990
U]OOO
01010
010111
fllo)n
010'40

JAY

Tn ..
TF

CHI_ )2

61"

PGH02 ,- +12 ••

B~R

TF"
A"
C..
8"1H
CF
CF
CF
CF
CF
TF
SF
SF
SF

01050
01060
01070
01080
01090
OHOO
UHIO
uU20
OHIO
~F
OH.O
SF
011 SO
TO
GUM
TO
OH70
Tn
01180
Tn
01190
SF
01200
B
OHIO
UORG
01220 '",EST TF
0)210
BT"
01140
Tn
0)250
TO
01160
CF
0)270
01110
BOlE
0]290
TO
0])00
SF
OUIO
TO
0))20
OB]O
BL
OB40
CM
8H
OlUO
0))60
TF
0])10
TO
0)180
TD
on90
'F
ell
01400
01410
8NE
01420
TO
O)4JO
SF
01440
TD
e,"
01450
0)460
at05410
C..
034tO
I."
01490
ff
onoo
I
01510
DORG

,M

'"

·'24
'-1

.... l)
.-:l1S»

·-"8

V~R~IO,~

QUP

d
I

FORIRA .. II-V
ACTlO~

ALPHltfll

.(HI+lZ
.00
.1
,UH.JO

.1.

"IA~S

.610

04160
04812
04884
04896
04901
04920

CHI.l)

CHI +11
CHI>\9
CHI +ll
8UF SC S+ j~.CH I +l2
CHI + II

O'~ll

0.944
0.956
04961
04910
04992
0'004
05016
05021
05040
05052
05064
OSO'6
05011
05095
05096
05101
05120
OSU2

'MI+I~

CHI'11
CHI'19
CHI'll
8UF SCS' 16.C14I'24
BUF SC 50 J7 .CHI +Z6
8UF SC $')8 .eM I +ZI
8UFSC.+",CHI+10
8UFSCStJ6
N21

.-.

,

'UI

Fwnu
N1I

PUle;
R.O . . -I
K.DRK
KIIORK
KilO . .
N1I
RIIORI-I
«IIORK-I
KlIOn
KMORK
NJI
KIIClI

lUI

.

«UG
IIZI
~"

GO TO PAl .. ,

..
...

,10.

,

,10,

.21

.10

·

,'1I0U

,,

FANO.

IS F ~U"ERIC
NU. ERAOR
YES. LOAO F
F III R.NGt
NO. fUDR
110. fUOR
YES. IIOVE F 10 FOUltiN COlI. ARIA

.CHIH'
.CH""

.n

·

.CHI."
,eHl+lI
,04

,

,10

'.

,KIIOIll

.....
..,.
.."

,10,

.10,

Oll40
Oll96
00565
00512
0245.

..

15153
05694
15151
04564
15151
045'DOOOC

00000
01701>

05610
-4448
000P2
01200
000P4
01200
00102
00100
00102
00100
00000
00000

02294
OH06

15151
00000

02367
1515)
OS . . .
15151
0'6'4
06241
01706

00001
0\610
-4620
000'2
01200
OOOOJ
00000

IHSI
04701
06241
0)706

000"
01200
000000000

06z.1
00000
I5ln
00000
0591S
00000
OH06

000000102
00100
00102
00100
00000
00000

"

0624C

OOOOJ

15
21>
45
\6
II
14

02361
15111
OS694
0.860
041..,
0'141
041.7

4J

0~n6

))
))

15152
15154
15156
15158
15160
06251
15152
IS154
15156
15151
15160
06U4
06Z55
06256
06157
06254
0)106

NO. ERIOI
YES. lOAD K

NO. 1111011
o YU, IIDVE .. 'II 'OIl'IIIN CCII. allea
• •• TO RUO IIEIT STATI"'IIT

2811

))
))

Z.
J2

12
)2
12
J2

2~

25
25
25
12
49
26

11
25
25
))

14
47

on••

• UI'

)J

05l~4

OU24
OUI6
OU4I
OU60
OUU
OUU

K IN RaNGE
NO. UIOR

17

051U
05 . . .
051.0
05192
05204
05216
05U.
OU60
05252
on6.
OU"
OU . .
05100

onu

IS I NV"UIC

00000
00000
00000
02424
05 . .0
151)'
000-0
02250
000-2
02U2
02U2
01100
02298
02240
-4415
-5771
00000

un.

00000
0~n5

PAGE
04100
04HI2
04824
04aJ6
048~~

.. 0

tHI"~

CHI+l0
.ALPHU
PCH02, •• l2, ,
FWORK-I
.CHI+II
F~ORO
.CHI_I'
fWOAl
FWORK
,71
NU
FWOIIO-I
,CHI+12
FWO"-I
F,WORO
.CHI+I.
FWOU
.02

02291
02240
02291
04)10

PHASE I-A

RtQUIREC

GO fO .AI .. T LOIS.
ELI"INATf REtuRO

OU9I

...

"

27 !J

1S144
15146
1 ~141
04)01
1S299
I5nl
15299

zs

12

25

..,."

4f
14.

n

25

1)

14
U

It
JZ
2S
14
U
I"
46

0140'
01410 . 18
01 • . ,
0141 •

••

I5ln
05694

an ..

OSII5
05815
05115
OS440
05814
01114
05815
OSll5
05.... 0
OU1'
054.. 0
OUIO
05116
DIll'
05111
OSlll
05440

OUI6
0511"
058"

01111

01440
01111
0'4 .. 0

onSI

OU06

00001
OS680
-.8)6
J5UI
000-0
000-2
J5169
01100
00000
00000
00000
00000
00000
15161
00000
00000
00000
00000
00000
lSlU
15165
lSI'"
15169
00000
00000
05 . . 0
-5120
15150
IS152
00000
OOOPl
01200
15151
00000
15153
000-2
01)00
OOOU
01100
05115
1515..
15156
00000
OOOP?
01200
15115
00000
15111
000-4
01100
OOOJO
OUOO
OSl"
00000

6

IbZO-IHl
OHZO
U)'l)O
OH40
OHSO
OB60
un10
OHIO
01590
0\600
0)610
0)620
U)UO
u)640
O)UO
0)660
OlUO
0)610
OlnO
03700
017\0
OH20
0)7)0
03740
0)750

'HI

~ONIIOA

iliA

ry

veR~luN

Z

FORrRAN 11-0

P .. A$E I_A

ERROR, F OA • OUISIOE R.NOE

RC"

C"I

RC"

..

iliA TY ER-n2

N2\
OO~G 0-4
RCUri NE TO PRINI AND STORE
IF
CHI+4_160.AL'H~~
'ClOD
THt CEA~EO RECORD IS STILL
IA
Nll.CHI-l, •
IF. IORT, •• 21, t
IOPI,HEAO-4,7
~
IF. (.HI+"+140.0.1'J.
ReVSC N IF_ •• ~9.Nll .... lb' ••
S.
•• "7,2.10
C.
··35,Nll+)
PUT
BL
BNR .",HI,t-e
IF. e-i,O,blO
IF. IORT, •• 2l"
~ul
I OABC ,Pit THO, 7
8
K7
N2\
05A Nil-I
lOt AD
8

DC
J8 •
01710 ALPI'4RJIiI DC

J, 18'

0)780 P';HDJ

CHI

01160

DSA

Jt'

RR. Ie READ NElr sua_eNT

PAGE
OS440
OS4S2
OS464
OSH6
05411
05'00
OSS01

H

00000

)9
H
J9
41
49

00000
05119
00000
OH06

00102
00100
00102
00100
00000
00000

05S08

26

1530)

OStlO

OH20
05532
OSSH
05556
OSS6S
OHIO
OS592
05604
05616
05628
05640
05652
05664
05615

JI

OlU6 15131
00"5 -5555
00532 -5611
15)0) 000-0
05627 -2691
05627 COO-2
05627 -2529
05640 01100
05510 00000
0562' 000-0
00565 -~66J
00520 -2517
OH06
5 I

IHE PAGE HElDING
IN tORE
LOAD HUOER
PR INT HUDER
CLt lA R.
CLEAR R•

.R liE Ut. 10 01 S.

DEFINER TO PAINI HEADING

,0'

DC
1.t8·"
JA'
S,12HS
DC
J2H5
IF ~ JORf, •• ll •••
OHIO PC.HD2
IOPT,PGHD]-4,7.
0)120
B
B7
PGM02-1 •• b
01UO
,22
01840 11'1106", OSC 2
22
OSA INDOA
0)850

CONIROl

~EtORD

'A IIH OH INtM

OSC
0

01880

I)C

4S
\6
\6
49
49

05675
05678

-2527

OS680

2

)

5 I

05615
OS6IB

NOUAL CDNUOL RECO.O _.INT IOUTlNE

OSb94
OH06
OS7I8
OS725
OS711
0~711

01870 INDDA

12
U

J5139
3

OS691

01800

OC

16
H

05615

0)790

0)860

16
49
16

I~U9

05712

"
,u

057ll

.17)10

OSH8

,010

OS74\

16
49
49

-S117
-S6U

00565
005)2
0569L
2
5 •
-57))
I

J73Hl

1

DC
-\0

u18J10
01900

os

OlglD

at

"

1620-1441 HeNI rOA
01920 UI_DAI DSl:
lO
D~A
01910
01940

,

-4800

DC
-0\
OSA

01990
04000

S'~PAT

04010
04020

04080

fORTUN II-e

,

05754
05754
DH55

,0

05756

,04800

0576\

.UOI

05764
OS769

DC

"

OSC
20
OSA

,20

05769
05HO

05H7
05H7
05H8

"
,0

05H9

.1966)

OS784

,DOl

OS7I7

5 X

\.

-7122

I

5 x
-5719
I

05792
05792
05791

"

OSC

5 •
-5756
I

05771

StSDOA

oc

9

PAGE
05748

8UF 0 I"

oc

05746
05747

PHASE \-A

"

040)0 SCSODA DSt
0
DC
5
04040
J9663
DC
04050
1
-01
OSA RUF SCS
04060
04070

2

DI"DDA

DC

01980

YE~SION

,10

03950 OIMDDA OSt
0
DC
01960
0)970

281

,I

05794

,00000

0"99

,--4

057"

-UII
I

\

04090

DC
-0000

04100 INIT
04110

as

5

DC

,999

04120

DC

,-99999

04110

,00000'
6
-0000'
OS
2
2
OS
Oat )O,URO., I"YAUO CON'1I0L RECORD'
E.RO~, INYALID CONUOL RECORD'
OAC 2A,EugR, F O• • OUTSIDE U"Gf'
EUUA, F OR • OUTSIDE laNGE'
DAC J2,UROR, INYAUO OUTPUT UN" CQDI'
ERROR, INYAL 10 OU'_UT UNIT CDOE'
.9n•••• 99.99
12
DC
R9999999,9"

0~102

0
)

R9~

05107

R99~A

04140 F.nu
04150 hOU
04160 U_UI
04170 u.eS2
OAIIO ERMEn
u4190 UNINE

DC

282

051n

6

05115
OUI7
05119

)0

05179

21

05915

12

06009

u

2
l

2

x

2

Vt.~IUN

\b20-\""1 MO'I ro.
U4t 20U

IN.U 10 OC
-0

DSA

QUID

2

FO~TAAN

11- C

PHASE

I-A

PACE

,DO
Cltl

Obl,l6

5
J~

ObOlb

UHlG 'dKtv DC

,00

ObOl9

I

-a'

uo210
OQ.~
OUoo IlvF so 055
04250
os
002bO DuFEQI OS,
00210
os

Ooil8
lOP
2

UCt )40

u41S0

-'U
DC

~,021I.

OolbO

-Uld
DC
I

00 J 70

DC

ult 1'11)

or.

Uft )90

UC

044,00

DC

JIt4t lv

usc

~UF

0 Ifll

u4t2QO
00)00 uulll",y
DOll0
0'120 PHAOOA
O. HO

•

119

J

Ob2\8

ObllA
ObH9
06 )20
o HZI
01lU
0722 3
9q9qq
10000
IbOOO

8~0

2
100
PS
2
OS
UOH" IbUOO
OSC
I,D
0
DC
!», 1 7 290
J7l'0
DC
1,OSO

0"2"0

10

ObGII

oss

, Q1qq...,

100
2
800
2
100
2
0

1600")
L b008

lOUll

"
"

I bQ I'

"

160\b

"

lhOl7

,0000

loa I q

,0

IbOll

I bO I;

I bO I R

DOu,,;

,~tI;MK.

') 11SC
0

)4430 LUPIoIA
0". .... 0

SF
10M

0 .... 50

DGM

u4te20

rf M
IF

04"b[)
04 .. 10

ItEC,..K s-

~

I bOZ'
I bOlb

GR~I(

32
15

IbOI'
02(9)
I

Ib
2b

IbObb
q9q?q
160bt
1600.
IbObO
IbOOO
1600e
00000
00000

1 flO41

··18

t~UfSC~"'1q'1

rc

Ib048
I bubO
16071

Du"'~'I'

,~fO'I(S

'-0

olD

CM
O'E

e-18
.-1b

,LlUfSCS-l

I(

f'lHAODA,701

I.tdOI3

P .... OOA.101

'd
H

16110
I b 132
101'-4

.q

O"4AQ

s.

0""90
04500
00510
JO 520
(;.510

oN

III 5'1""'EH.ll T Abl E

RlCORO

~URI(S

olD

1608.
16C:<.H.

I",

O' 5'0

rC 0

U4550

O€ '0

t,.OPHA

12
14

,.
18

00000
00000

1211
1 bOl",
000.)0
-b211
01200
00701
00702
00500
00000

1602'
00(,00

2S

1620-1441
12"Nt

()60(J~

lin ... , I C~

V[RSIL'N I-

L FNr;YH

on.k
Ol"9.
007Qb

~

OR

r \.tAI;I II-C

Ol24H
OObOL

lOPHA
liS r

022S0
0132.
02298

l ') TAl)

142

U~6C8V

l ClIPit 1
foIr.",(.Al

MUFL I PI!

ellU

fo'lJlOr: f

02184

(NIL N
f-RRE r
f-U'H;

CUFlOT

~2IKEV

QbO 1 ~

F~n~

C hlP l

vb \ 2~J
(Jo2t ~
l..42lt

1J2l26
16000

CAllP,

0240U

F- P?
F ..tURK
"',Rf'K
H[ AD

5

CHIPm

COMAro

l59'U
c 2262

~Jl1o'lu·.r

O,>74U

DIMUI)A
I) 1:,1'.. SW

uS? 56
OIlS}

t. Hh4t4U

('Zit 30

l~Mt: S 1
I l.Ml C,l

OS87'-l

dH~l

5J

pr,I("'S",
PHAODA
PHflOAT
jJHflOI1A

02478
02486

OSA 1-'

PA.U;ST
PR "AN
PUIISN
"EC MK S
REvlCN
AF TUl

150;,

1 ClG r

J,

B 1')('
BF!OAO

DOOO)

OlK8
CArtll

02ltb 1

I UPT
ICRRC
IDRr

0)::J

vlZS 7

(Ff ~c

U24;'4
Oll,}4
U;~6H

I NOUA
INOI V
I'll
I DOL

16023

IIHO

F4crRC
FeTlNO
FK TL t T

07221
vlUM
OSO~tJ

04,084

I~DATA

coen

INPUTO

oS12'
060 II

I ,.,.fl.:P 1

Oll8,

CHI,
CHI
COlli') T

15't }9
IS 139
02382

F.:IltO Uf

n't

1 ~a 16

PAGE
OS" II
16024
OlU8

022)0

~C

1- A
KwORI(

I G"'~ r

HUF

ASt

Q9QQy

o\LPI-'RM
t)

~ ...

DUM"""

I G~K
t PPf

~U

~lllt

O'l8 l ':;

Nil

0269)
056 1~.
02220
O'i7H
0242'

NIl

n'57Q)
001\t..
OL)SM..
005 lL

005Z0
OO:'6~

DCS!)4

O);4,l

"I
"21

fiD

0}O89

ala H;

o cSl6
0'598
OU"
o 170t;
alUl
alll3

PGH02

Q'itJ,q,.
0'51685
O,)'lC8

PGH(J l
P{iHO
PGNU,",

PRS T
PI\ TAO
Pit THO

OBb7

~ur

OnS2

RDON!

2S "

0110<

NXLU(
P 2[)T~


Olblu
02b2S

,EM I COLON

PAA.C~TtO.?

02b2b
OZtd8

IIIIOOAF

OZb5Q

r, S I N(,~ ,

fO_
DC

~UtHt., lER! H2
8A,INOlv
CHI'>.l""
1, I • •

(!It.

01140

IA

CHI-l.(HI'l-1

02t.cH~

011';0

U

"'fA01.24

OllbO
Ulll0 uA
DllHfJ l)NO
1I100

00'(,
.C TV

02110
0.2 1 ~ 1
0211R
01724
02125

.-4

')

:! S i

IURY,"2l

16.?O-1"4t "'ONlfOH

U 122 1)
('1210

1..'1140
Ulll;)O

ull..bfl

vlll0
\JI1Ru
012')0
Cl Jon

01 HO
('1120

o 1 ]]0

""

III ]70
01 INf'l

OlIO"
Ol40Q

eKq~

01010
,)\.20
Ollt}O
Ot 44l'

OI.SO

HM

•• S"J ,eH I

~O

01~20

01630
01640
01~50
01~60

01610
01680
01690
01700
01110
01120
011]0
01740
01750

•
•

fESf FOR COJlllfllt:"w'

CARD

SCA~

,

-,z,. •• ,

.- .

~ACK

10 PLACE "E(ORO

~ARt(

CHECK FOR OLANK CARC

CKR ..
REAOl,. ,

1,' ,.

...
,2

•• 44,lIST"

0~.01

Ct4t).c.
OJOOO

••

II

" I \8
0290,

15818
00000

h

ooooe

COI02

~

r

~7

CoE
toM

DEfCHJ .CHI,.

OO~.S

01"2
0215 •

~.

00560b

4h

02718

O.21Cf~

,.,.

02fJ I 0

.. l

CH9.
Cl .. 54
I S Il'~
Olooa
15141

027bb

01926
(29)8
029S0

PRrCHI·L, •• 20
PRte"1
CHI,4l,LO
RHOI
CHI.'9.0~ 11
.+l2 .. CHI
CHI-IoCHIH

SF
OTM
"f"
fF
IF"

ro"

A.
60
TO"

CSPVA-12, .,
OUfS.

CSfNO.e+l2, ,
OUIPUT S TAUMENT If./M8£R
puT f
114,ft,tOlON
E~NO,S'V,.

,.
I'

>9
\6

'9

16

'"

2.

OJ
41

14
~.

S~.tI.OO.l.~,

1+,,,

.. to

02228

000M1
01200
0000-

02600
1511.
0]622
010]4
05UZ
0.050
02724
02600
02610
01208
0]410
0120Q
01201
0])06
0]]42

000-1
0000'
01100
00000
-11'0
0-134
09919
0-000
OOOOJ
000-5
01200
00001
OO()O>Z
0120Q
00000

01O~2

16

O]O5~

49

OIOU
OIOH

~6

0108~

IS

14

4]
]I

49

II

03l~Z

14

01lS4
01166
01118
0]190
01202

~1

28~

O]21~

01286
012'8

-2'01
-9701
J5281
000-2
OcOOO
02612
02.11
)5139
01100
00000

0]0~2

]2

11
\1
26
16
I~

Sj\ljAOO~2

OO~b6

02593
02525
02526
151l.
02818
15141
0]130
15111
01098

4)

1t+20.S"AOD,ll

OOI5e.S

02017
029\1
C2bl2
0299 •
0299 •
OZ917
OZ.14
02818

16

..

0]2Z~

s~

15143
Ol618
01098

CGO~j

0:200
000-0
tl200
000-0
01200
OOOCO

-0002
00000

0]2]8
01250
0)262

fEST IF STATEMENT NO •. .,AS USED BefORE
SET INOltATOR THAT STA.NO. 'PPURED

0)~'8

02228
-)828

029)1
029]P
I

S.AOO,5,10

S!"flltll.Stt'DQ,ll,

021Qa

-0181
00400

II
\5

NOI~D,I,II

8e
~

.,
I.

~6

0)21~

ESNOPl,o.8

I.

02914
02"'6
0299'
0""
01006
0101!

01098
OHIO
OH21
OH]O
011]0
BRANCH IF NO'SlIrEMENT NUMBER

,.

029bl

010]0

.OOIFY POINI OEF IHE.

-lIH

PAGE

0)018

fOUL LI SliNG

80
fA
8
·"14
OOOG . - j
A.
ESNOPL ,1,1 0
c. CHI,609,LO
8HH

C
I
I.

• " ,.r tAAUS fAllM CHI
fFM
TFH

1 ,;.~.,
I

01710

OlQ02
0,9 "

+"4.tKE~O-1

C'Olfll!-l
tKRJII-l

100 It
01.1 \ fI

01aS8
02A1D
02878
C/H1'"
02890

.141t

+"b,CICE~O,

I.

OUI)4
02R .. t.

fl~ST

CQqqa

OJ
1-·

'J,~tt

At:..C

O-IIK
00·-00

OQflO8

I-A

CKRM-l,C.HI

"DO"G
BNF

P"'Sf

•• 23,2.10
C"f'O

RO
C_
8H

0".0

FOIURAN II-C

0005C
02015

O}~l'''

Ol178
02100

l'

IOCY,Cl)OATA-It.7,

IF.
SH
fF

ul~AO

01500
01 SID
01520
JIBO
01540
01550
UI560
OIHO L tAOaL
0"80
01590
01600
01610

lOR T, ••

~

AH
TOM
DC

01"'611

01470

IGt04 2

R(AO $ (AHMENIS FMO. rVPt-WM nEte.
AlLU~~ ~OUF SWIYCH.
I Pljt: FROfll! nl~K ... Rt:TURN I> 10 LNGPRf
lor Al L I ~ II NC.

lOG Y,lJHlJ.\ r 11.-4 r 1.

• - ;tI",
"C.
CAL L PIf TVIlE PK I ~r A(IUJ
8NF LNr.PRT,LI ST I t
A.~ YR +b, ~(.I\l
Po7
HI P
L ~r.Pk I C.
CHI,4),lO.
IEAOBI
"~E
CHI+2,tJdO,
CBNI:
LEAOBL
CM
'1-11+4,0.10,
BFr.I NA
Bf
~
L F.A08l
DORG ·-1

L 1 )40
J 11Sl) flEAiH
u1160

VFR~

11
Ib
I

~

01.'2
'.) 2 t~ 8 ')

I. ' •• -4

Il

I

OlblO

01110
OIIIJ

0121u

)9

OlbOI

I,J
-OU
5,0
OC
-OOCD
OC
5,0
-OOtu
BfH PUT,Ol'42,81l,

01l0tl

JSI

02bOO

Ulb08

,.-

-\18~

01~00

~.

1),0
DC
-0000
I,U
OSC
0
1,0
USC
0
OSC
l.oJ
0
OSC
I,D

uS

-2S~9

-lSn

02~81

OlbOI

DC
IF _

.

005~S

00512
C2582

02~.2
02S1~

1,0

.)1010 Ht.r.P"
I IOHO Ut rol.~A
IF"
010QO
80
CllOn
IF
J L Ll 0
"0

Ib

02591

)10"0 !>AAtN r DC

nlO"in

...,

02591
02>9b

-0

00990

PAGE
-](10
I

OHlfl
02~ I 9

II
15
12
4)
~,

J5119
-10~2

1~\]9

ISI~O

00000

MO~IICA

1020-I'H
01100
01110
01180
01190
01800
01810
01120
011)0
01140
01150
01160
01810
018RO
01890
01900
01910
01920
01930
01"0
01950
01960
01910
01980
01990
02000
02010
02020
02030
020.0
02050
OZ060
02010
02DRO
D2090
02100
02110
0212J
021]0
021.0
02150
02160
02110
U21~0

UAOl

SINER

8

--)6

OORG
IFM
B
OORG
CM

.-)

8~E

fORM

BIM
C
BV
BE
B
OORG
CM

SPGS+ll.016,Q
SPERR+12",

FOIITU~

II-e

SIAIEMENI

~O.

03300
03300
03311
03130
03142
03354
OU06
03311
OU90
01402
01410
03410
03421
03430
01430
01H2
0345.
01466
03HI
03490
0)502
03510
0)510
03H2
0)53.
03546
0355.
03H4
01566
0351R
03590
D3602
0361'
01022
01622
0161.
01646
03651
01610
01682
03694
03102
03102
03114
03126
03138
03150
03162
03114
03186
On94
On9.
03806
01811
038)0
038)8

PREVIOUSLY USED

sy~,FMICST

.- J

CHI,00.10.

.,12

CHI-I,CHlol
e-

SHI FT UFF BLaNKS

)6

.-)
C.OlNAM,6.l0
SYM,FfIIJCST"
·'20\

MUST Ie FOR'ANI S fA TfMENI

FORM"
SP(j,S'11.Z11.~

~

SPERA.'lZ t

OORG
TDM
TFM
AM
BNR
TFM
TR

·-l
NOINO.

8

OECOOE

..

ELl[ UROR 21

X'll.CM I.

X'11.2.10

·''''''.'11tll
hll

.Jl.bl0

lUll

.AVOID,b,

.-

_VOIO • FUG1,l,UACO,IECM"K

OOlG
)
1(+11
CM
.0.610
8~E
CSPVA+12
TF
e.SCt,K.ll
IF
e+47, •• 42

..

•• j5.1,'0

.,18,1,10

,

HIMINATe ILANKS

C S'VA+2~
·-3
.+15.C.Hf-2

-.2),2.10
·+/0

e+80

a!J

0-)

11>20-IH3 MONIIOR
CM
BM
CM
B~E

CM
8E
IFM
B
OORG
CM
INf
A~

VERSION 2

FORTUN 11-0

P~asf

PARCNT.O.9
NO~UI

0-3
OfCOOE03S,24,610
-+12
PARC~H.l,lO

B
OfCUOEol2
DORG 0-1
CM
OECOOE035, •• 610
B~E
DECDDE'12
SM
PARCNloI,lO
OfCOOEol2
B
OORG ·-3
OECOOE.35,2.10
OtCOOA AM
8NR "20,OECOOEon,11
CKCUK
B
OORG 0-)
CM
DEcoDe. 35.2 30610
8E
000
CM
OECOOE' 35.24.610
B~E
OECOOA
CKeTAl 8n
ASCAN.INOIV
8TM CKCNTU.O.1O
ASCAN
B
OOR6 '-3
OS
IIONUI MUST IE AT LUST -04144lit."
NUNAR I IFM Ll06,1"ST
CF
CHltl
CF
'Hlo]
CHI . . ,£NOCI+'
C
BE
ENO
80
•• Z4.INDrv
BTM ClCNTu.a,lO
TeST.CHI04
C
LI
IE
L2
SII
Ll06,lI.10
INR LI,U06,II
TR
CHI-I.CHloS
ERROl 8TM ERROR,Oll.9
LI+6. T8CM
CII
Ll
8NH •• 12
sn SlNOLE SUJE"ENT SlllTtH OfF
TO" SUN,O, ,
INF '>41. T~INO
TDM nlND,O
o+24,NOIND
10
OlilO
"ISSING SU{JJoIeNT NUIIIIII AFTER 'RAII5fER
ITM EAROR2.5U.9.
01110
5M
Ll+ •••• l0
021.0
TR
'"1-1,'"1*5
021'0
LI>6."TlL+,,7
SF
01160
5
02810 STAFT DS

02450
02460
02410
02480
02490
02500
02510
02520
02530
02540
02550
02560
0257D
025'0
02590
02600
02610
02620
02610
02640
02650
02660
02610
02610
02690
02100
02110
01120
021.]0
02740
02UO
02760
02710
01110
02190
02100
02110

"

'Iftu

I.
41
II
4.

09050
01200
09999
01201
03510
1'119
0l43C
151]1
OH66

0-140
00000
00001
000-1
01200
000-0
01200
15140
00000

16
4.

09339
09256

00-16
00000

U
41

151]9
03634
OU62
09919
0361'
10J'2
0363.

000M6
01200
000-6
09929
01.00
01100
00000

I'
41
II

1511.
0355.
15111
03510

000-0
01200
15140
00000

11
24

04662
09919
0160Z
1039Z
D9339

II
IS
15
11
43

.
..
...
17
14

46

49

.9

092S~

000-6
09929
01400
01100
DOKn
00000

15
16
11
45
16

02610
0814.
011.9
03102
08l4R
01141
03194

00000
J51J.
OOO-Z
08UOOOL 1
01>012
DOOOO

081.R
01646
031.0
03115
03115
03110
00000
0365.

000-0
01200
08149
03110
000-1
000-1
00000
DOOOO

01829
03829
0]1)8
0)910

J5131
000-2
00000
00000

16

31
.9
I'
41
26
26
II
12
JI

49
16

II
.5
.9

PAGE

1-8

DECODE .15 .40,61 0
DECUOE'12
DECODE 0 35 01 )'61 0
··~6
PARCNI,O.IO
OECOOA

Ol440

PAGE

PHau :-1

C SPVA
FORMAT
C SPVA

I~

02190
02200
02210
4M
02220
SM
02230
Tl
02240
B
02250
02260
OORG
02210 IltCOOE TFM
AM
02280
022QO
B"R
B
02300
OORG
02310

02 )20
02 HO
02140
02350
02300
02310
02380
0l)90
01400
Q2410
CH20
024]0

VERSIDN 2

.-J
CHI .46,10
C SPVA
COLNAM,,-,lO

B~E

B
OORG
BTM
C
BV
8E
IFM

CS'VA

I

UORG .- I
BIM PUT,
IltO,II,DUMMY
10M SMAOO.O.6
10M OOIU~,1
AM
~~AOO,I.I 0
80
FORM.S"AOO.11
CM
CHI.O,lO.
~NE
SlNER020
IR
CHI-I,CHlol

03838
03850
03862
03814
03886
01891
03910
01922
03930
0)930
0]942
0]95.
03966
03914
01974
01986
03998
04010
0.018
O.OIB
0.030
0'042
0.050
04050
04062
0.074
040.6
0.09B
04110
04122
0'130
041.,
04144
04156
04161
0.110
04192
04204
04216
04121
OU40
04UI
041.4

OU76
04ZI1
04100
0.312
OUZ4
OU).
OU4I
04160

oun
OUI4
OU96
04.01
04419

II>
49

0382R
03806
0312R
019]0
02615
0.011
02615
04144

OOOMO
01100
DOOLl
01200
000-0
01200
00-00
00000

14
41
II
49

0l12R
01914
02615
03806

OOOU
01200
000-1
00000

14
41
12
.9

038ZR
01806
02615
0)106

000-4
01200
000-1
00000

II
45
4.

03829
04050
0409'

000-2
0312R
00000

I'

0382R
10.16
0312R
04011
10440
04142
10.40

OOOK)
01200
OOOK'
01200
0242'
000-0
00000

14
46
14
41
I.
46

46

14
41
4)

17
49
16
)]
]]

24
46
4)

17
14
46

12

45
11
17
14
41

IS
.4

15
U

17
1.1
II
U

14
04Z].
15140
15142
15143
0947.
04221
04141
0.651
04)00
04z)4
OUII
l'UI
09UO
OU,",
04114
OU41
OUI4
DUO.
OUI4
0.40.
04U.
l'UI
04U4

,

-4651
00000
00000
099)9
OllOO
02424
000-0
15141
01200
OOOJI

o.nll

15144
00-11
-.504
01100
00000
02.09
00000
OUIO
OON12
000-6
1'144
J'04D

5

6

IblO-IHI MIllO I 'OR I

U2810
02190

~

.-.

OORIi
OC
I,'

02UO

OSA

ozno

DC
,,1t'6"~t;»~
MU455
OSA NONARA

02940

02960

DC

't"~.'J4'

M44~46

02910

D~A

fIInN'R.

0"10

DC

'."5~.6"

M5~8"4

02990

OSA

0)000

DC

01010

OSA

P~ASE

1-8

~ONAU

PAGE

•

FUNCTION

044)2
044]1

SUBAOUTI NE

04HI
04449

..

0-\040 '"CM
030'0

OEf IN[

..

0)090

,

OH65
OHlI

EQijl VALENCE

.,41S6!:11t ..

04476
04482

CO., ON

DIM

DC
b.'S91t561.
10 •• 563
OSA NONARA

t

04487
DH9\

DI'ENSION

04498
t

04491
04504

RETURN

04509
04~11j

HO'

04~20

04520
0452b

p'USE

045)(

IlC

01110

au

b,It'4"i!l'i ••

fiNn

04H7

M649~5

OKlO

1620-144) MON arOR I
0)120

OC

011 )0

OSA

6.46

03160
Ol17L01180

DC

6,~7blt~~,

,

ACCEPr

04564
04570

PUNCH

04575
04511

04~11§

5 X
J0200
6
5 X
J0200
b

N7"~S

03190

DSA

0)200

lOUT

DC
6.61 •• -;1 ••
016857
nSA lOUT

01210

DC
6.51'" .. , ••
N7S949
OSA lOUT

01220
0)210
01240
01250
0)260
0)270
OlllO
0)290
OUOO
OUIO

OHI6
TYPE

04597

D4S97
0460)

PRINT

04608
04608
04614

DC
6.594!t41 ••
10945'1
OSA NOHARA

RUO

6 ... 35.55. ,
DC
IOH655
DSA CALL

CONTINUE

6.4)41H ..
DC
IOHIS)
OSA GOTO

CALL

6,47566] ..
DC
M1566)
051 IF

GOTD

5 X

J0200
b
5 X
J0200
6
5 •
JOlOO
6

0461'
04619
04625

JOl24
6

04610
04610
04616

J0144
6

04641
04641
04641

JOIlO
6

04"2
04652
04651

,aST

DC
6,4 ....2'....
1f1
10'4624
OlUO
DS
Z
0)140 COl!!A" rF" e"l.5¥"-U ••
0))50
TFII •• n;C"1
OU20

045 . .
04592

tOLlEtr NUes TO OEU~"I"E TYPe OF SfIlNT

292

0466ci
04662
04614

JOn6
6

l

16 06'04
I' 06'09

-"51
J5U9

1620-14H MOIIIIOR I

VERSION

I

fOR'''" II-D

~"ASe

1-8

AM
01160
•• US.2,lO
OH70
IF
.CH 1,7
AM
01110
--1.2.10
0))90
aliR
·.20,a-11,11
01400
R
·.12
OORG .-1
01410
01420
tOlNAM-I.I.IO
S"
01410
COl~'M.2~
8"'1
IFM •• lO.SYM .... Z5
01440
1M
014S0
a+i8.2.10
01460
tF
01470 oulStE OS
(
01480
.... 6tCOL~a •• 1t2
81'1H .-)0
01490
IF
OISOO
S'''',Clll~'".4lfl1
01510
aa
DO.tG .-q
OH20
01510
(HE(K fUR (ON""UIlIUN tAROS
0lS40
US
1
lOA. r,. +21
015S0 (.Clllu IF.
03560
R
IOGI.(SOI"-4.1
OH70
BO
CKCNI.CHI5'10
0lS80
IF" cello.o.IO
01S90
CM
CHIS,ttl,tO
0)600
8E
·.24
TOM CHII)+q,
0,11
01610
01620
88
DORe ·-10
OUIO
01640 CT fOR LHolNG lEROS

10

II
II
14
41
I41
II

059)1
0601'
060lN
06024
05911
05884
099&e

000-2
000-2
OOOMO
01100
000J2
01100
coooo

09

06104

00000

12

09968

00000

a

a

II

2

)I

4.

069'.

00000

11
IS
26
16
14

09)5C
01581
Oqql.
0_210
15119
061.6
ISI18
0_H2

00-18
00001
-9qSO
oooPO
01200
15100
00000

I SI19
06428
15119
06]24
06214
06280

000-3
01100
00009
C 1100
-9980
01 laO

0619h
OblOR

NUM~

u50o0
05010
05020 f'IIU""S,

AM
A.

1620-1_41 _ONITOR

06220
06232
06244
06256

~ ~~ j

VERSION 1

FeR rAAN 11-(

"'MASE

06316

SET fiX OR fLelf SW fa Fix CaNST

06324
0612'
06B'

TES T IF Fl' NUMBER EKC[ECS •

ObJ~8

ERROR,11','J,

FIXED PolNf "U.R(R GR;EA rER THAN K

06160
06]12
a618<

MIGHf JUSTIFY VALUE

061IO. PLUS_II
054'10
S
05500
TO
'lUS_II,CHI
T_
CHI-I,tHI_1
05510
Sy,,-)O. ,1
AOI
OH20 'LUS

.,
1I
49

_.

14

10
41

14
46

060lN

06954

25
1I
II

II
4•
IS
12
24

-.

11

26
2.

12

00000
15138
00214
09.49
06196

1511q
15140
000-1
000-1
00000

06,S"''''-l.l
Sllf+1H,'iY"'--11

CM
8NH
CM
"NL

049_0
04910

fEST FOR FI_ VU

05836
05848
05860
05H12
05884
05896
05908
05no
059)1
05912

5J14l"4C,Q.10.

oOKG 0- I
8f. ERROR,1A,Q

ro.

U~140

0~824

FJ(ORFL,l, ,

SVJI',SAlhbdl.
YAW. Sill ,0
SMTUhEQUSI•., ,

04860
04 "10
1)488U

05128
05152
on64
05116
05188
0>800
05812

cs

2,', .-1

04 SSG

PAGE
0~116

SC~I.~5.610

fF

8

1-8

CS

DC

04810
04810
04810
0484U SL2

P~asE

SCtoll.b9,ftlO.
NIJ"aER

04160

o.aoo

FORTRAN II-C

Nu·au

0.170
04180
04190

fOM
"0
SM
fR

VeRSION 2

INITI ALilt IF NOT IN eOUIVALENCE
I NIT (AllIE F U OR flOAT Sw I TC~

0642A

06452
Ob4&4

BRANCH RAC. fO SMIFf OFF LUolNG

COllft f NU.eER

nST FOR E npE

.·,6

~EROS

ooHo
o648B
06500
0.512
06524
ObS16
06541
06560
06512

25

11
49

06148

2!1G

46

06596
06604
06604
06Ub
06628
0.640
06652
0666'
06616
066U
06100
0612.
D6}].

EXPO"ENT

I.6
41
I.
14

06~8"

06112
I~VALIO

I ..
12
11

06160
06112
06114
06196
06l0R
06120
06112

14
41
16

15
14
41
41

15
JI
14
46

17
25
JI
I.
61
2Z
IS
JI

II

1S1l9
OU.4
06'.)
068H
15141
06100

06112
0681)

l5ua

15141
06HI
0'1]50
OU4)
15111
1511.
06132
0"41
OUH
I'U'

0 ....

-65'4

000-1
151.0
OOOPO
01200
01100
-6514
-9980
01)00
15119
000-1
CADDO
000115

01100
000-0
00001
OOOKO

onoo
01100
00002
15160
0000'
01100
OOHI
15141
15142
0000.
01100
O.IH
151J.
15160
-0000

12

1620-14.' MONIIOR
IF

'J"~10

vtR\IO~

2

SF
IF
U~5.0
8V
0~S70
80
IFM
OHIO
0~~90
8
OORG . - I
OHOO
)0.0
OHIO lUS.M DC
-00000000000000000000000000000
).010.IERSYIO-2a
OHZO
DC
-10
S.M80l IABlE lOOK UP
O~UO
e
O~ . . O
0\650 SMHU IFM "OOAO.STBl-'
HM SM,no
0\1>60
IFM SMCNT.Slal-.
0~610
MOOAO IS USED 10 IESI FOR Fl' OR FlOAI
0\"0
0~690
SMAon WILL CONUIN IHE AOORns CF fHI ~YM~Ol ENln AI Ell,
5MCNI IS USEO 10 FIND VARIAIll na LlIfOAl
OHOO
IF
05710
LS IEN.raCNI
AM
l!. fF"4.1.10
0~720
OMVU
~~no
CF
051.0 l SIEN OS
SMlOOPH6
05150
8
OORG .-)
0\160
SJl4CNT,10.10
O~110 SMlOOP SM
• SfillOOP
05110 OUISW OS
.0010,10,10
051QO
SM
AM
S .. IOO,10.10
O~IOO
SM
lSfff'l1,l,IO
05110
8M
JOE
0~1l~
•• )5. SMC",f
051)0
IF
SM
•• Zl,SO,IO
05 •• 0
8NR IBlFUl
05l~0
AM
TBCNI.I.IO
05160
AOVAR
B
o~no
OORG
05110
)
0\ . .0 laHUL 8111 ER"OR1.74,9,
O,qOO
ABORt JOB CIN ~Ol fO ON
K
"0"'( Al."
OO~G
0\.10
llffRL,VARSW
..
8RANCH
If sY1I80~ H A CONS "'II
OS.20 Jur
80
BNF •• 10,5.. 'NI, II t
FLAG IT SMC~I I.Pl n~ tONS"NT
OH10
SHlOOP
OS •• O
8
O\.~o
OORG . - ]
,SYM
OS.60
C
-~
05970 SMIOO 05
SOleop
OSqRO
8V
05.qO
SNE SlIlOOP
lOll INSw,., •
SEI OIGU IN IN'~ n VARIULE FOUMO
06000
SHlcn
tF
0 .. 010
•e
06020 SMCNI 05
SHADD, Felt-NO, •
IHI If SV"80~ WI' Ll8RA~V fUNtT
060)0
C
RH
FCffST, ..
0.0.0
AM
ObOSO
SMC-"',l,lO
80
CSORN-l,OIMSlII.b.
RHURN IF 1'- OI"t:tl'.dnN SIITEMENI
06060
O~~40

O~~~O

......

.

PACE

PHASE I-I

FOR'''.'" I'-C

S.M.SYM-)O
S,"-2.
SYM-2.5, M-)0.7
ElCH5
SMHU.S.M-2.
S .... 9 •• 1011
SHILU

.'

.-

.-1

..

OUH
0 . . 56
06868
06880
0 . . 9Z
06.0.
onl6
06.2.
0695.

26
)2

26

.
4f>

H
16

"

09n9
09950
09917
0.7)6
0695.
09n.'
0695 •

lJ

Q••••
QOOOO

-nH
01.00
0.950
OOOU
00000

)0

06.25

on5.
on1>6
06971

16
I.
16

01185
07201
07261

-2)n
-0000
-2)71

06QQO
01007
07014
01025
01026
010)4
0103.
01014
010.6
010n
01070
0701l
0709.
0110.
07118
01110
011.2
01150
01150
01162
01110
01110
01182
o IIq4

26
II

07025
01025
01090
0
01010

02429
000-1
00000

01261
0
01185
07201
07025
07170
0111'
071"
01150
02.2.
OR09C

OOOJO
OOOJO
OOOJO
000-1
01100
07261
000'10
00000
000-1
00000

09.06
0019 ..

00-1.
00 ... '1

07616
07202
070).

01581
072&J
00000

0120l
onOl

OT208
0721.
01226
01218
onso
on .. 1
07262

U

••
12
12
II
12
.6
2.
12
.5
II

••
17
••
u
••••
l.

.,
46

15
H

0121.

.,.

OIlBb
01HR

II
43

OHIO
01122

43

2.

00000
0
010).
070).
OUIl
01208
0
07201
018 ••
072.1
05JOl

00000

09 0 19

01.00
01200
00001
00000
02311
01100
000-)
100~4

2 !17
Ib20-14'3 IIONIIOR
ObOl0
Ob080

80
CM

0"0.0
06100
06110
06120
Obi )0
0.... 0
OblSO
0 ... 1>0
Ob170
U.. 180
0.... 0 FNTSWl

8

··20

OORG
CM
RNR
B
OORe
BE
80
R
DORG
OSC

.-'j

UblOO
06220
Ob230

062.0
06250
062.0
0 .. 270

DI~ERR

Ob280

062QO
06)00
ObJlO
06320
06))0
ou.o
06350
06].0
0.170
06110
06).0
0... 00
01>410
01>420
064)0
0 ••• 0
0 •• 50
0."0
0.470
0.410
06.90
06500
06510
06520
065)1!
0"'40
06550
06560
06570
OUIO
065.0
0 . .00
0 . . 10

a

fOATRIN II-e

CHI,llt,IO

onH

07H2
011.2
07)5.
OI1.b
0717 •
0117.
a 1)86
on9.
01405
07405

5tHl,14,610

·.'0. SMCPH, 11
FCTST

.

-)

OIMEAR>l2
.tlO. SMCNr .11,

.-.

TEST FDA 01. VUIABlE

LUlClT

1.0

eo

•• lO,SMCPtf',11

8

DI~ERR

0750l

DIM VAR UHD WID DIM IN 110 $TAlEIIENI

LUJl:IT,IOSW"

lUXIT.FNISW2
lUXIT
,tAlL~W.

80

COME .COMSIII ••

BD
81"

lUXIT-12.EQUSW

80

CO~ER2.(;OMSW

ERROA,71,CJ,

t

OIM VIR USED WiD O.M IN
UME fOR ta ... DN
OIMENSION~O

CALL

VAR uno wnH OU' SUI$ClIPf

......

DORG e- )
SF
DMYAA., ••
sn DIMfNSION VARIABLE SiliftH
EXI T FROM fABLE lOCK UP
Ell! IF OUI5I1 NOI !oFI
lUKn UNF CSUR~-l,OU'SW.e..
CF
OUISW
81
PUI. SMAOO-I
8NF •• "4,OMV'.
OMVAR
CF
VIRSW OS
IF
OUTSCE.tSDRN-I
B
OUTSC
DORG . - ]
8NF •• 32
,FNt! ....
TEST IF SVMIDl W.~ A fUNt T ION NAME
B7M PUT,OlS4,1.
a.lfM STATf"ENf ca'l
8
CSORN"', ,6
OOIlG . - ]
•• 20,FN,S .. , ,
80
DIG If AND NO ' l AD I M'lI ES SU8'IIOGUH
CSORN-I,,6
8 '
OORG '-3
,eRR1,O'u.,.
SUrEHENT FUIICTlDN 'REV OfF INfO
BD
fUNtflON onUTOR tall
a'M PUT,015' •••
CSOAN-I. , .
8
OORa '-3
!>URCH SYHIOl fAlU FOil CONSUNTS
COMsrS HAVE .UG
II rEAl 8NF S"LOO', SIItNr ,II,
lUNCH" lOOIIING-IJ' SUflH!NT _ n i l
10
LUSTNO. STIIIIIS II "
•• IF SU.CHIMS Fa~ FlXfD ~OIIST
10
FlL If .FXQIIFl"
SMLOO'.HODAD,II.
10
SMAOD.SYH.6,
lITF
t~'.IIE t"A~At'l.ISTfCS
C
INE SMlOO'
&OSAVf, SHADD
IF
ADsaVE
CF
CF
SMtNT,,6

.'

......

paGE

PHASE I-I

01406
OHIO
07410
074.2
01.s4
01466
0141ft
01490

KD
AD
"0

Ob210

VERHDN 2

•• 32.EQUSW

......

2U!!

07510
07510
07522
01B'
07546
01551
01570
07581
07582
07594
07602
01.02
01.1.
07626
07f»4
071».
01646
07654
07654
01 . . .
07618
01. .'
01 •••
01691
01110
01122
01n.
on46

ann

01110
onl2

14
4q

07)42
ISI1Q
07H4

OOOK4

I'
.5

060lN
0137.
on ...

ooou
0126J
oooeo

.6

01418
01406
07522

01200
0126J
00000

07522
07522
07521
11968
075IC
OQ350
0 •• 62
07510
01 ....

10011
01.05
10009
10010
10001
00-7)
10010
0726J
00000

••

.3

••
41

u

.1
.3
H

17

.)
.]

••

10008
00000

32

01090

00000

4.

onOl
070).
09050
07602
08090

010)'
00000
07207
01090
00000

))

17

••

J]

26

••
••11

°

04101
1046.

0570)
00000

07.14
09050

.9

0570~

10000
0-15.
00000

4)

071>54
onOl

10000
00000

'o.uo
0.050
onol

10001
O-U)
00000

070)4
01110
01026
0l0)4
01200
01014
0 . . .'
0.41'
OlUJ

01UJ
1000)
0'.19
0"'"
1M9"
01200
01201
00000
00000

.9
4)

11
4'
44

4J
U
U
'4

4.J

26

n
u

I•

PAGE

OIoUO
SII
ADSAV(,2,610
~
S"AOD ,srM-l,6,
COMPAR[ MA~ II SSA
0106 '0
06640
II
•• 44
061>50
AM
ADSAYE,2.610
0106.0
SF
SMCNT .. 6
0101>70
8
SMLOOP
010610
OORG .-)
010690
All
AOSUE,2.610
06700
SF
S"CNT .. 6
,.
010 110 IIU~.O OS
010120
TO" IN •• "
06710 EUD.I CF
S"AOO
06740
CM
CHI.H.ID
06750
BNE LUIIT
06760
UM IiMRDI."1.9
()6J70 ••••• ~
IE" FOI SINGLE SUHIIFNT FUNcraCN DR fu.cnnN sua.OU'INE
•• )6
010710 F~TS' IE
D6no
"n •• 24 ,CAll S'"
06100 t"109 8'" ERMOI,ClT',,,,,
I"COAR[CT USE Of SUR'RO~RAM IUltE
OUIO
TOM FN'Sw.l,.
FUIOCIION SUIIOUTINL
06120
O"F lU'IT.~.CNltll
068)0
SF
"us .. , ..
06~40
8
lUll'
DORG .-)
OU50
OU60 HII' MD
OICIT INOICUH Fix VAA
"lO.IIODAO.II.
06170
B
SIILUOP
aUla
oaRG '-1
06no
TFSI fO' SfAlf~fNI NO.
ANF S"LOO~, "OO~O.II,
06900
C
SfllAOQ.~Y",,,
06910
BNt S"lDUP
010920
8
EH061
0"910
DCRG ' - l
06'40 ••••••
E"TAY TO .00 A NE~ VAAl ARlF '0 SY'SOl fAHLE
06950 AIJUR CF
SIIAOO
06960 O~VU os
,AnVAM
06HO
Tnll INS.,O
AM
06980
SMCNJ, J, 10
06990
MOOAO,fCOMFL,fII,
'0
SF
01000 I
MOOIO".
07010
HO
.Otll,VA.SiI,.
ORANCH '0 ADO CONSIA'"
01020
A
fItIXlOt,~.L~"t.
~OO W'BOL SJCRAGE M' NU"HER OF C~AA
TF
~.lOC. 5.M,6.
010'0
MOVE SY~KOl INIO SYM srCRAGE
07040 AUVlOP TF
SMAOD,NXI-DC.,b,
MOVE ACO OF
I~IO '>Y'BOl TAblE
01050
BO
'OV'Al,DIM~Wt.
IESI IF IN .aIMFNqCN ~IATEIIENI
01060
ADVAA2
01010
}
010AO
S"&OO ,1 0.10
01090
T"tNT.I,IO
01100
IF
SMAOO. NXloe. 6 t
PUCF DOU8LE ENTAY FOR C I"ENS ION VAl
AM
01110
s~aon.1 a 010
(11120.0V._l AD
AOSURP. SUBS ... ,
lUI IF IN SUHROUII~E SIAJ[IIENI
01 no
CSIl~~-I,O(~S •• ~,
UO
COTO COLLECT DI'FNSlnNS IF IN Dill
01140 SET I~C II~F •• 211,C.O Ill 5111 ••
IESI IF I" CC~MON
(,7150
~F
~"'CNl,,6,
SeT FLAG ON l"OICAlO. If CUMIION VIRIAHLE
• + lot! ,EQUS_ ..
C1l60 S"~'ST RO
CM
01\ 70
tHI.Z~tlO

......

S'"

.-

!!) !J

IblO-IH1 MO"IIUR I
01180
01190
01200
.,1210
01220
(]1230
1)7140
olHO
01260
01210

B

rnll
DC

2

~U.T.A"

11-(

"~AH

F""rsw,l ..

DO NOI 5<1 S.IICH If IN OECLARUION SIMI
Sfl SWIICH FOR FlINCllON NA"E IAI

SMC~l"b

I.', •

012AO
80
ASC1I,O""
01290
H
LUlU.
01300
OORG .-J
uHIO SuA'~ MTM eRRO.,IIO,4,
Dill VAR IN EQUIV WID PREVIUUS OIMENHU"S
OH2()
ENIAY TU PLACE VARIAAlE IN SUB.ouIlNE OEFINIIION IN fA8lE
01]10
IHES~ VARURlE ARe PLAttO IN 'WICE 8ECAUSE OF POSSIBLE
01'40
0Ill6NS'UN"~r. LAlfR
01350 AUSU8P e... F ..... t SU8S ..
01 )1>0
CF
SUM SW
,.
01 no A~SAVE os
OHAO
AM
SMAOO,IO,IO
01)90
B
SEII~O
DURt; . - ]
"/400
01410
SF
suss.
01420
\M
S"ADDtI DolO
014)0
A"
TACNT .1010
U1440
B
AIlVLOP,.,
BUNCH TO PLACE SYMBOL IN SECOND TIME
OORG __ ,.
01450
01460 ••••••
ENTAY TO PLACe 'O~SUNTS IN IUU
01410 AUIIT 80
'DsrN.~ TlIOSW..
BRANCH 10 ADO S TATEMEN' NUMBER
01UO
BO
AOXLII,FIORFl..
RMANC" TO ADC FII CONS I
01490
NXLOC ,FLNe
A
01500
TF
'IXLOC,SYII-l •• ,
IIOVE IN FlOAIING MlNTlSSA
AM
NILOC.2,10
01510
TF
.SMAOO,NllOC.6.
SET SYII ADO INTO TAILE
01520
01530 AOLI T1 TF
ULOC.SYII,..
MOVE CHUl"ERISIIC 011 FIX CONST
07540
1M
SNADD.loIO
01550
S~
SMADD ....
01560
AN
SHADD. I • 10
01570
II
f H061+12
oalC .-)
01510
01590 AOILI T •
NXLOC ,K1.NG
TF
SlllDO.NXLOC.6
01600
07611)
•
AOllT1
IJDRG .-]
01620
076)0
EHfER IIHE!! 1.00l'I"G UP STUEME'U NU'IERS
••••••
01640 LUS 'NO a~f •• lO,MOOAO,ll.
01650
B
SMlOOP
oalC;, '-1
07660
01670
C
Sll'00.5YM •.6
07610
S"LOOP
01690
TOM ST"OSII,O
01100
•
E3106l-1~...
' . .IICH fD SU INSII ."0 GO JO'LUX"
DORG .-J
07710
07120 ••••••
E"TU TO ADD SUrElIENf NUMUR

'"E

311lt

12

24

0841'1
07200

U

07162

11

0141'1
0726J
0701.

)2
49
11

Jl

u
U
14
41

11

01946
07958

01910
07982

0"94
0100.
01011
08026
OA026
oaOJR
08046
01046
08058
08010
08082
08090
08090
08090
08102
OAI14
08126
081 J8
08150
OB162
08174
08186
08198
OA210

OOO-l

02611
07201
1511.
01522
09)50

00001
00000
OOOU
OIlOO
DOL 11

07912
07.12
09150
10000
07522
10000
01522

01100
10009
00-79
00001

o

0~046

H

15
II
2~

32
H

21
26
26
41

4.

000-'
09911
01100
000-2
00000
00000

OI . . N
01Z6J

00000

0126J
00000
00000

070)4

0181N
00000

070H
0720Q
010)4
01891

0'919
01200
00000

01201
C
02611
01261
07l8N
0181N
onsc
02)11
OH1K
01200
01218

M266

OJlI~

00000
00000
000-)
06419
00000
01581
059)1
09,·/9
02)12
10004
00000

08ll~

08210
08HO
OA242
OB254
08266
08218
08290
08102
OA1I4
0"126

01201
02419
01Z0Q
01201
01462
0570L
OUI4
0126J
08)46

08318
OIHb
08346
08H8
OSHa
08382
OR394
00406
OA418
0.42'

08)58

00000

ObOIN
07522
Oft45C
01S21
QQ462
10000
0126J
I

OOOU
01200
10008
10012
10010
00001
00000

41
49

13282
01522

10001
00000

OR450

11

09)5C

OOHO

OA462
OA414
08415
08416
08498
on06
01506
01511
085111
DISH
01550

44

01506
10012

1001l
00000

U

01208
08290

COOJO
00000

Jl
12
II
49

10012
01201
02429
08186

00000
OOOJO
000-1
00000

4)

1000]
06419
02Z50

151 "

I-R

•• ,,0

OOAG . - J
CII
~C"I,2"'tblO
B~E
LUIII
An
SU"'R,t:QUS."
HO
LUi" t suitS"', t
COMFRl,CO,..SW
HO
TOM

VHSIlJ~

on94
01806
01"11
011J0
01842
01854
01862
01162
01814
0188\
01886
01891
OT910
01922
019)4

OOOJO
000-1
02112
OOOJO

10012
10004
IDOla
00000
10001
OOOU

PAGE

08010
08442
08"!:iO

08550
01562
01514
01516
01591
01610

)~

II

o

0 •• 22

21
26
11
Z6
16

0"1~

12

08646
01651
01670
01671
01611
01 . . 0
01702
01710

J2

0ln4
08618
02112
02J7K
02112
07200
02J7K
07201
01200

11

0720.

4)

n

01910

21

OU72
07200

26
.9

099n
OOO-Z
OUU

09979
OOO~I

00000
000-1
00000

oun

0. .22

0217Z
00000

••

08no
070)4

07B1N
00000

2.
47
08154 U
01166 . .
08n.·

07200
070)4
1000)
0711'

09979
OUOO
00000
000110

01710
01122

olno
olno
onu

n

1620-IHJ MOIIIIOA
01110
nn40
011S0
01UO
0'1110
0"10
0"90
01100
01110
01820
01110
01140
OU50
01160
01110
01110
0"90
01900
0'910
0'920
01910
01940
01950
01960
01910
01910
01990
01000
OIDia
01020
01010
01040
01050
01060
01010
01010
08090
DilDO
01110
08120

AOSn

K

8TM
F"ESI Mn
BO
80
10
110

COl
8'1£
IF
A..
IF

~'lOt

RtF

fDAUA,. 11'0

SMAOO,NXLOt,6,

MDVE 'UIOIIT liD. ADORnS TO "IU
CLUA fLAG FOA ,UUIIENI NUIIIIEI

5 "'D~W, a
AOlllI
tIl:MOA: ,114.'1.

--12,COM5111 ••
."24,EIlUSIII,,
.-16.DIMS ....
."48.IUS ..
fCIESI-I2,OIOIO
CHI,H,IO
fCIESI-12

ILUGAL USt Of fUIiCTlON IIAIII
UU fOR FUNeTl Oil NAME IN 'OIlIlON
fUII'T NA~1 III £QUIV
I

·.j.,.SM.OD
•• 21,51,10

Tf.M',. ,

TEfIIP,ENTLOG-1J

.

101M

TEMP,i.iO

SF

01

OS
IFIO

••

,

~O,USEDFS-l

·.111, ... 8
10M ,ltlO.
8
LUll!
80
ElIT,ERSW
IF
PUTOUT,PUT-I
8
E94270
OORe; .- t
PUIDUI,PUI-l
IF
n
CAAO,PUTOUI-102
AM
e-b,4,10
.... 18.(.ARO.l00
COl

PUT

~~4210

~E

e+

118

01100
01190
~P[ItR

OU40

00290
URDR
• CAll
E94620
EKOOR2

URRI
COMER
CO"ER2

e"n

8LU

08610

C911 sr ON SII Z

01114

II

Din.
01110
0lU2
0ln4
08146
OIUI
08810
01112
0 ....
08906
0891.
01910
01942
01954
08966
01911
0.990
09001
09002
09014
09026
09011
09050
09062
09014
09082
09012
09094
09106
09118
09130
09142
09144
09144
09156
09161
09110
09192
09204
09216
09221
09235
09215

n

on .. u

oe

I,'

IFM
BD
rFM
8
C-

SPGS+ll.071,9
SPGS,INDIV
IOM.T,·.21
IOr.',t5l0'TA-4,l,
CHlS,It),JO

09244
09256
09261
09210
09292

C!;tECK FDR COhflNUAlION CARDS

a1/1
VERSIOII 2

FORUA" II-e

4
as
10M ERSW,l
TOIO E9"'20+1,9
ERROR PA I NlOUT OF 0 ISK -RnU'" IS ID 194610
SET 8UNCH Ie ERROM MESSAGE
rF" RETR +b,EAl
Y7
fliP
BEGINA
8
TDM E9"'20+1.2
TOM JAV,"
IF
ERROR-I,URORl-I .. rUNSM. I IHE UROI NIIMIEA
ERROR+24
B
DORC .-)
8TM ERItOR,1760,Q
8TM EIU~OR,)72,9,
INCORRECT CDMIOOI!! STATE"ENT
,enNfR
as
e+20,SUBFcr
80
8
e+J2
DORC ·-1
•• 24,R.TSW
8D
8TM ERROR2,571,9
YV
-+ 12
,E.5 .. , •
80
SKIP STORAGE ALLOCATION IF PlOG HAD ERM
"ONCAl
8TM pur,
141,1,£"0
81M PUf,
I.O",DU"".,
8TM PUT,Oll2,IlI,
SE". CDLON
COl
E94270+6,CARD
ME
e86440" ,
UII TO STDAAGf AllOCATIO"
rOM Exd+I,9
E94210.50
8
DORG .-)
OSC 2,22
22
OSA 8LKU

09]49
09]50
09162
09114
09]16
09194
09406
09411
09410
09442
09450
09450
09462
09. . 2
09414
09416
09494
09494
09506
09518
095)0
09542
09554
09566
09511
09590
09602
09614
09622
09621
09628

0 . . 20

De

I,'

OIUO ILKI.

OSC
a

1,0

09610

01"'0

DC

5,17600

016'0

DC

09615

,04)

09631

-4)

OSA

14
41
26
11
26

12
II

U
16
21

15
.9
4J
26

.,

""9

Din.
01965
01965
Olue
OU20
02620
00091
e
09012
09032
00000
07522
09221
091 ••
09094

14
46
42
16
49
11
49
H
18
16
42

00565
00532
02)90
09216
00000
15036
09100
02410

-9161
-9235
000-1
00200
OOIM
OOIV'
J50)6
COOOO

5 •
-U85
I
16
4)
16
49

14

09])9
09121
00"5
00566
1511.

46
4)

11

IS
U
16
49
49
15

15

26
49

11
11
41
49

.)
11
46
41

11

11
11

14
46
15
49

-34"

09150
09150
0
09494
09518

00L16
00L72
02291
00000

09511
09406
095)0
00196
09050
090'0
09050
09100
02410
09229
09144

05619
00N1I
01.00
05640
0-141
0-140
a-13K
J50)6
01200
00009
00000

00000
00002
00004
09405
00000

5 a
-9610
I

5

,
2

31/2

00001
00009

02496
02454
01618
09195
02)61
09149
09314

09645

I,'
2.22

01200
15849
00-11

4
0"40
09195

JlI20C

DC
,

00-11
02424
-9291
-9199
000101

09321
09161
09350
5

09641
0 .... 4

OSC

00098
ODD-I
00000
05640
0'0.9
00000
090.1
09)41
000-4
J5U6
01200
00000

11
II

09641

0 . .10 IU2

-2262

091 ••
J5016
09100
09100
09144
00000

26

lOUT

01610

Z2

4J
4J

01)12
00000
00000
00000
00L14
10010
10001
1000.
10011
10001
000K4
01100
01201
000-5
00000
-2241
000-2
00000

09]45

0.621
09629

0 . . .0

4J

.)

11

000-4

PAGE
(9)04
09116
09)21
09)44

3

11
4J

02)12
012011
0"'"
1000)
0.U2
09350
OU14
0.n4
0ln4
Din.
0ln4

PHASE 1-8

-+24
8E
80
SPERR +24,CHI5+10
8TM ERAO" ,071. 9
5,0
DC
-0000
OC
I,'

J1600

.,
u

09241
09241
09242

1620-144) MONlroR
08250
08260
08210 SPGS
08210 PUTOUT

SEI 1li0ICUOA fDR fUIj'TlON useD

'It

DORe .-q
IFM
IOAf,_+21
10PT,INIOP,l
B
.11
INIOP 1+5,1,10
8
e+46,00200"
~C Iy
W~TV C'MO
rFM E'Jlt27!l+o,tA"O
ER,.lt40
AB
OORG ·-4
OSC 2,02
02
as. INIOOI

PAGE

PHUE I-I

A

01140
08150 tAil
01160
08110 INTO'

08)00
04110
08120
olno
08140
04150
01)60
OoHO
08110
08190
D0400
01410
01420
08410
00440
08450
08460
08470
01410
01490
08500
08510
08520
08510
01540
01550
01560
01"0
onlO
08590
01600

VE'SlDIi 2

,4 .10

MOOAD, •••

~M

uAI10

01200
00210
08220
ooUO

AM
IF
CF
10M

I

X

II

16l0-1<"
08690
c~

lOa

08

no

~LOlA

.O~,

lOR

,

VtAqU~

2

FURI.A~

II-C

paCE

PHaSE I-a

UH

8l!(lA

09UI

IIC

I.'

09651
09651

usc

1,0

09651

OC
S,l'4all
JHOO
), J4b
ac
-46
O~.
I.JUI

096..

19

5 •
-9U1

•

0

08110
U81l0
OM"O

09651

~815C

oc

I.'

UR 160 Rllt't

asc
II
OSA

2.,-,

09661

ttLI' JA

09b?

08710

09614

OM 110
t'M 1410

~LII'

IA

OC
!
OSC

\.'

09U~

1.0

09616

0
",1,.')0
DC
JH>u
1,046
oc

OUoo
..... 110

5 •

09666
09666
09661

J0200

•

5 •
-9U6

•

09681
0968.

-46

OSA

(IR~20

08810
()H8 .. 0

"ltc ..

OHR~O

08860

IlItlT

09689

DC

I.'

09619
09UO

usc

2,22

09691

II
ns A

8 lIu. A

09691

I.'

09691
09,9.

DC

UR810 HLICIt"
0_880

U,'
"DC

I. u

09699

r;,,171i00

0910.

uC

1, U4b

09101

,nul

09112

DC

I.'

09112
09111

USC
27
I:SA

1,")"1

0.114

5 I
JOlOO
I

5 I

-.'.9I

Jl1)CO

OHA90

-<6
OR~Ol

US'

IIRQ 1',J

,)"<11(1 lJlW

r,

(JA'no

UltclJlA

16l0-11t41 JIIIC'lN1H!R

.

09120

:iii J

,

VtHqON l

fOHI.A~

II-C

PACE

DC

I.'
I.G

09111

,)J\'lb')

USC
0
DC

1I),11b5U

09121

OR'HD

DC

;!iq",o)

l'LI<. ,)A

5 I

?".Sl 1-8
09120
09121

')H'l1j1J

5 •
J020C
I

-9121
I

J1(,~U

1, Qt."

00110

11101

O"lS

-46
J •• 80

OSA

UflClqQ

Dr.

I.'

09lH
09116

()f'OQO t'lLlCb

OSC

2,21

onu

09010

OSA

5 I
J0200
I

21
IHtt6A

091H

0.020

DC

'.'

091.,
0914'

0.010 t\l.tc.bA

1.0

097H

09040

USC
0
DC

-:',11'>')0

09150

090~U

DC

},Q"b

091~)

Jl., ... a

S I
-9145
I

-46

u?ObO

OSA

IllUI

0975.

OQOIO

DC

I.'

09151
0915.

09080 ML"l

Ost
2l

2,1.2

09760

09090

DSA

OL'"

0976'

09100

DC

I.'

0.166
0.161

0911U "LOlA

OSC
0

1.0

09lU

0.120

0'1111

09110

DC
5.1 lIOO
J17DO
]
DC
0100

09l~0

JOO
OS,

0911.

I.'

01160 URDATA OSA

CHI

09111

DC
-6'
09110 CODATA DU

,),06'

0'"0

DC

eH·,

1

5 X

-'16.I

0.71,

£A6".0

0911.
09112

09150

J0200

311 If

09711
0'190
0'195

5 X
-~4JO

1

nu,
J

20

lb20-144) MONI ,c' I

.E~~IO~

l

FDa'UN 11-0

PHASE I-I

PACE
09'9~

09190

UC
JO'
09200 C50AlA O~ A
OHIO

OC
JO'
09220 _UOAFI IF.
09210
SM
09240
IF
09250
AM
09260
C
09210
BH
TFM
00280
09290
A
OnRG
09100
Oq 110

E.~ES

Ole

1, 10'

OH9H

CHIS

09801

),10 •

09801
09806

.+ \Ij,AFT8L+5!

09dO'
09820
09811
098"
(,9ft,6
09868

·"13,~,10

·+18, ,

.Z.10
·-11,)I4FI
.-41\
STAFT.AFTRt,+1)

O'HIAO

BEr.I~+}h

09R9Z
09.GQ

0-4
9,t A:N.UIiI:

00'

21

J.51 ).
)

5 •
J51)9
)

16
12
26

11
24
46
16
4'

09843
0984)
09UO
00000
09841
09UO
04419
02662

J5040
000-5
00000
000-2
04419
01100
J5040
00000

9 •

oq~l)l

EA.ROR. OU'

09120 FM IC S T OC
11.46,,0595HI61
"656,".41.'
09130 PLUSS
2. +'
OAe

OQQ ... 9

12

09111

2

•

09140 ENDC I

Oq<.jl~1

I

•

..

OAe

3.

[~O

E~O

09HO
09160
09110

SY~

O~

40
as
2
OC
I •• a
-oouOOOOOOOOOOOO
09180 HAil os
, ·-2
, .-h
09)90 ftNI
0$
09400 S _PeGS, DC
1.0
0941u OuTUN OSC
0
OSC

OHn Fi-4TS"
09.41U

F~TS.I

oqlt"n

u

OSC
0

f 1'4~"

usc

\)q"lju

"NOS.

ose

dQ4Ibfl

IJ I"'S.

09<19
OQQ81
09.9'

40
2
16

Oqqq"

0
0
I

09.91
O'JQQA

1.0

O':lQQl

1.0

10uOO

1.0

10001

1,(,

10002

1.0

10GOI

0
a

fI<,I471)

1t-1)'4

"~C

a

QC;C

a
d""S() <;GIO
OQ"QO

u".

OSC
u
IlSC

1.0

1 (,1)C41

..

1",0'l

I.U

10,-'01':1

1.0

10001

U

UqljOI) h"US.

o~c

a
09, I 0 CALLS. OSC

1.1

10eOR

1.0

10009

3115

U

00,20 CU"'5.

OSC

1,0

IGO 10

0

16l0-1441 MONI
OY §)o')

IDS ..

ose

'O~

I

YEASION l

FORTRAN 11-0

1.0

PHASE 1-8

PAGE
1 CO 11

0

UQS40 Su~SW

ose

Oql)SI
OQlj6u

:JOKG 10200

10012

1.0

0
10111

09510

IF"
6TM

095~0

NONARA TFM

0.,90
09600

BI.
TFM
Ol~
AIM
OQ610
09620 CU.MON IF.
I)Q610
81M
TFM
09640 IF
eTM
09050
OQ6hO GUTO
IF.
09610
BTM
TFM
oQ680 CAll
09090
81.
09100 AI: TU~N IF.
8TM
OQ110
OCJ 120 FURM'T TFM
09710
OCJ140

09150
09160
09110
09180
09190
09800
09810
09820
09830
09140
098,0
OQ86Q

09810
09880
0_890
09QOO
09910
on20
09930
09940
onso
0~q6~,

09910
on80
09990
10000
10010
10020
100)0
10040
100SO
10060

ueo
ASCAN
UUTSC
OKlO

81.
IF"
BT"
IF_
BTM
IF.
STM
TFM

10iOO
10200
10,,2

FMO~+ !Ij.BlKlt
FMON. lOuT
FMO",l+]'),RlK2

•

DO~G

DO~G

0212~

~4

16
49

10564
024.6
02454

12

on~51

FMO"'. J5 ,OU: 1

10248
10260
102H
10284

Fft40N,Olfll:
FMONtjlj,filttt

FMOPII, COM-'O~
FMON+3'5.8lt(b
FMON t IF
FMOr.,.]') ,eLtc:b
FfI'ION.GOTO
FMON+15,8lK6

IO"Q6

FMflN+J5,8lK6

1010A
10HO
10lH
10144
10150
10168

FMIJN,RCfUM,N

lOlRD

FMI')N+ j'j .BLlt I
Flo1nN.FOIUU'

IOJ91
lM04

F.ON.CAll

FMON. tl),OlK4

IOllo

fMOt.l.DOO

10428
10440
10H2

FMON+1S .8l1( 1
FMON, AscaN
FMON+15."lK)
FMON,QUTSC

101t6'

10016

FMnN+35,8U(~

10512
10524
10$)6
10,44
105"
10'68
10580
10518
10518
10600
10612
10624
10616
10648
10 •• 0
10612

OQRl,J _-)

A

11

10,16

FMON.OKIO
INIIIALIZ"ION 'HAse 1-8
PASCAN BNF PAseNI.L1ST"
l(jUl ll~TI~G
IFM RefR +6.1~IT'," ••
PAINT OU' 'HE HUO
FLIp·
81
PRSCNI ~F
00451
SET ~nell
10" 0041S,2,. ,
•• 20,INDIV
BO
*+1)6
8

10

10500

FMON t No,..ARa

BT"

8NF
IF"
TFM
TF"
rF
SM
$
AM
IF
SM
S

10~88

02159
1~
11 02124
16 02)59
11 02)24
16 Oll59
1·1 Oll24
10 02359
11 ' 02324
16 02159
11 02124
16 02)59
11 02)24
16 01159
11 02)24
16 0~159
17 02124
10 Oll59
11 02114
I~
02159
11 02124
16 02)59
11 02124
16 Oll59
11 02114
16 02"9

Ion.

oU8,INPIV
8A+l ,It 1 ,10

.'.37.41,10
URDUl+2,08,10
SMTlU'II, S III
SIInUtll,6,IQ
SIITluo2),STll
SIITLU+21,05.10
SIITlu.,s.srll
SMTlU+l5.6.10

1068~

FlORFL-5.~LNG

PLUSH1. FlNG
1l.4 ••. INDI~
BEGIN'
0-)
16000

:JIIG

10696
10108
10120
10712
10146
10152
\6000

u

4J
~9
6~

00~15

10511
10616
106)6
02119
02155
091 . .
0"65
0""
06n1

-9691
J0200
-96~5

J022~
-9~22

J0248
-9022
J0212

-9TH
J029.
-91)1
J0320
-9131
J03~4

-9H1
J03U
-9622
J0192
-9691
J0416
-9661
JO~6~

-9668
J046~

-9116
JOlt88
02U8
-~o.a

00000
00002
02424
00000

II'

Dun

12
22

0. . . .

02424
000"1
000101
000-.
02)11
000-4
02111
000-5
on11
000-'

0641~

OU"

21
41

0 . ."
021. .

02250
02424
00000

U

16
16
26

12
22

2.

..

0. . . .

OUU'

22

IUO-IUl ~D"I 10'
10010

'H~D"

USC

VUllO,. 2

fOUIAN II-e

PAGE

PHASE 1-"

2.11

lJ

16000

11

10010

OSA

10090
10100 p .. ~nOA

PHRODA

16006

DC

I,'

16006
16001

O~C

1.0

J600.
I

1600H

U

10110

UC
b.I1200
JPiCO

16011

ItR.

16016

lOUD

OSA

J""O

16021

10140

DC

I.'

1602l

10150 lU.H"
10160
10UO

JFM
R

'OI" ••• Z)

10110

ICO

16024
160U
16048
16060
16024

IX

10 UO

-84

10190 •
102eo
10210
10220 •
10~)0

IF,!

8TM
IFM
8TM
Cf

•

Cf
8
IFII
STII
I'M
OJ"

LOPH"

FMON. HlUI
F"ONt JS,Rlll
FMON,IOONAU
STSN
DillEN
SISN
COli MEN

"If
"GOTO

FIIO,.."'lT
FM(lN,.~.GLK'

• .CAlL
• .RtTUAN

FR(QS~

B

FO_"

IFM
OTM
IF.
"1M
IFM

F~a"H5.RLK4

~~.

10216
1024R
10260
10212
10284
10296
10)01
10110
10312
10)44
IOU6
10)68
10110
10192
10_04
10416
10421
10440
10HZ
10464
10416
10418
10500

••• cu...o~

FIION.IF

FMON.C:LL
FMONt) .nl6
F IION.IIE IURN

nl.

10200
10200
10212

••• 011"

F.UN. JS,gL. ...

t .. fORMaI
• .000

FMeN,ooo

FMtJ~.J •• 8lK) ••

ASCAN

FMON.ASCAN
FflfON+JIj,Rlt(l"

OUISC

FMOIII.CUISC
f·II~.I~.ftLK~

•• 0110

FNa~.U'IO
f~1A r 10 QECnl'pnn

01 "EIOSIO"

16
49
U

n

005U
OO'U
00000
ooooe

J60U
J6000
00'00
00000

ann

-9691
J0200
-9"1
JOll4
00000
00000
00000
00000

FCllQNI~

10124

FMUNt)~,lll'

~IM

IFM
61"

CnN!AINS IHE

..lOUT

fMIIN+ J'j .IL ••

IF.
IfM
8T"
CF

...

InPT • PHIOU , 1

I~A

UUT OF CU_' MLUCK I
UI"fll$lCJN
CO"MO,.
FOM".,
OnRG 10UI

°
°

102.0
10250
lOUD
1021Q
10110
102'0
10100
10110
10)20
lono
10140
10UO
10160
10)10
10 )80
10 no
10400
10410
10420
104)0
10440
10HU
10460
10470
10UO
10490
10500

-24)0
I

16021

.
11
16

17
U
49
U

n

16
J1
16

11
16
11
16
11
H
49

16

11

OH24

ozn.

02n4
0'641
10'U
05641
11"6
02"9
02124
Oll'9
02U4
02"9
02)24
021"
01124
14211
U166
02159
021H

16

0215~

17

023U
02159
02324

16

11
16

02U~

11

02124

105U
10524
IOH6

11
24

10~41

41
11

04662
099"
042 . .
04211
I5U8
10004
10620
0915C
09350
15'"
10601
I5ln
10601
05704
11414
07UJ
01415
01208
0720Q

SIAIEM~"I

-91H
J0296
-91U
Jono
-9117
J0144
-91J1
J01"
00000
00000
-9691
JOH6

..

-"
JOUO
-966'
J0464

-9114
J04"

3l1i
Ib20-1441 MeNI
10510 ~IIIEN
10570
105)0
10540
1055Q
10560
10510
10510 0'"1

BIM
C
HV

cnlNAM.6.IO

~~E

E~.OI

'O~90

6U

10600
10610
10620
10blO

CM

106'~

1065Q stJo.
10660
10670
10610
lono
10700
10110
10120
lono
10140 SO
101~0

1016U
10170
10180
10190
10100
10810
10llO
10110
10140
lono
10860
10870
10110
10890
10'100
IQ910
10920
10910
10940

Ln,o

StTil~~

FC ... RAN 11-0

"~ASE

I~

CHI-IoCHI"1
DIM~W,I

·.U•• C""+2
E~RII •• 012.~.
ERMOR.210.Q
CHI,4u.10

10560
10512
10584
10,96
1060R
10UO
10612
10644

",.~

--2'"
C~I.6~.IO

HO

01.2.IN5Io"
SMC~' ,1· •••
40UVE, $MAOO,II,
5-400.05,10
SM40n.I.h7
CHI.24.10
01"1
OIMI
SE IDM

RUNCH IF SYM NAS AlREAey IN TA8lE

C.HI-I,CHI ••••

SHI FI OFF LEFT PARN nR ·CO"IOA
TEST FDA USIlL\lIF

CH
8H
6111

"'''

TF
S"
IF"

o.

lINE
SF
SF
fR
CII
8lfH
81M
tM
lifE
_M
10M
CF
IF
AM
IF

t"

IE
C"
eNE
IIIU

01~lt12

S~IDMlU4

CSINO.OtU
Sr·.G.IO

·.24
fMMOM.119.Q
AUSAVf,S.IO
SYIO-4.0.11
SY"-J
AO$AVE. SY" ••
N_Lac,s,IO
U!II',SVM.
CHI.O •• IO
MayO,.
CHI.I), 10
111"1
IIEIIPIM.OI.I.,
SIIC"I,J ••

.

,0"
"Sf '"'DO. re.~."
TF
~F

IOb~6

CSIJA~.·.12

CHI."", lQ.

SMAQO.,,',.,
DI.I
10"0
10910
SO
10910
DOIIG 0-1
109.0 GENOI"
SEToIII.Z., SlfOIl ..
rOM SMC"I.,,6
11000
Cf
11010
SETM
11020
SnDU
110)0
DOli .. 0-)
SMADD.n".. ,.
11040 "IlVDI"
SF
91
110'0
11060
IF
$"4DO •••• 6

flU FOil SECO/jD DllIENSloN

•

II'"

TEU fOR 'HIIIO DllliNS 1O/j

1066A
10680
IOU2
10704
10116
10lll
10140
10152
10164
10716
10"1
10800
1011l
10824
lon6
10141
10"0
10l1Z
10114
101. .
10901
lOUD
10912
10944
10916
10'"
10.10
109.2
11004
11016
11021
11040
11012
110"
11012
1I0U
11.,
__

""""

•

"

PAGE

1-8

SYM.fNSIONtl~

10"

61~

S~fOM)

VERSIUN 2

EMAOI

8N~

6T.

,u~

3f1~

46

15
45
II

11
14
47
14
46
II
4J

15
26

12
I~

n

U
11
Z6

14
4'

14
41
44

"

n

JZ
26
U
49

..

44

IS

1110. n
11116
11116 n
11111 . J2
" ..0

"

OOOMO
01100
00009
01100
Jono

DUll

LO. .O
OlUJ
10610
11016

10.10
00001
00000
ooeoe

OUIlt'

02620
000::
Doe

15"~

IOS96
101 . .
10. .0
15111
15119
10860

II
II
IS

oono

lUll

14

41

II'"

01400
OUOO
15150
00001
15141
00-72

00001
0720Q
OOO-S
-0001
000'4
OUOO
00000
00000
ISI40
00009
01100·
Jon.
000-0
01200
OOJ79
0000-1
000000000
099"
000-'
09979
000-.
01200
00011
01200
IDS. .
00002
ouzo
00000
OD099
ooooe
oooeo

41
Jl
J2
H
14

41
II
14

000-6

0~412

0""
10l1Z
0"'0
01415
099"
0. . "
0 . .111
OUU
01620
lSI,.
11116

Itu.

10'"
1I0U
OU6J
OUOQ
00091
OUOO
IOS9.

CIOO9'

0"l1li

24

Ib,/0-1441 "ONIIO.
11010
II 080
110'0
11100
11110
11120
11110

DI~IP

111~0

IR
10
e"
OS
1M

BE

linD

B'tR

fORTI." II-C

SETOM4",
.<)Z",
AOSAVEoI,U,

SETDM~

TeM",AnSAVE,bll

"
NHOt ,qq,.
ADSAVE, TEIIP,611
TEMP,NllOt,611
TEIIP,ADSAVE,611
IE"P,l,610
NHOt,05.10
'''lOt.SMADD,611
•• 20,CtH+2

a

V~RSION

2

FORIRAN II-C

COMER
tOMIN.INS~..

SI"ItH If VIRIAAlt . . ~ PREVIOUHY u~EO
11650 ••••••
IF VARlA8U WA\ NOI DEFINEO THEN If M'ISI BF ~I.PLE VARUBlf
AM
NXLOC,5.10
11660 tU"A
TF
NUOC.tOMAOD.6,
MOVE 08J TillE COMMON AnCRHS TO SOM A~H
11610
80
•• 12, F_ORfl
11610
5
cn~AnD,FP2,.
ADJ tOI'.ON ADORES. 'OR FLOAT VARlaSLE
11690
B
•• 20
11700
DORl> .-)
11710
5
tOMAOO.KlNG.,
ADJ COMMON AODRESS FOR
VARIABL E
11710
II 730 tOMAS ONR •• 20,tHI+Z
8
BEGINA
11740
OORG .-J
11750
TEST FDA MCRE LISI (LEMENIS
eM
CHI ,2)' 10.
11760
BNE tOMER
11770
TA
CHI-I,tHI<1
11710
8
COMMEN<72
II 190
DORG .-'J
11100
tOME HEAE IF SlIIPlE VARIABle .. AS IN TABle
11810 ••••••
I 1820 tU~II~ 8NF •• 2~,SMC~f,11
VARIABLE ~AS PREVIOUSLY PLACEO IN tOllMON
1,8)0
BTM EIROR.J7).9.
.. AS IT PREVIOU~LY EQUIVALENCED
aNf .-12,140DAO.ll.
118~0
SF
SMCNf .. b,
11850
NXlOt. 5MLNG
11860 tU~INA A
II0VE NEW SYIIBOL APORESS INTO TAIU
TF
SMAon.NUOC.6.
11170
lF
NUOt.SYII.6
11110
BRANCH TO pun COMMON AOORESS IN UIH
11890
8
CO"'" ••
DOAG .-)
11'00
11910 ••••••
RHUIIN FROM 5Y" UnE LOOK UP WHEN. VARIABLE WAS OlllEII'lONED
INF 0.20. SIItNT.1I
11nO tOME
VARUBU PREVIOUSLY PLAtED IN COIIIION
I
COMIN 2
CHI.IIl,IO
·.14 ...

I NVAll 0 FOOAT

S.~qHC.TlU"

EW:RuR,J1S,lI,

CHI-I.CHI'I
tHI.O,lO

Ib20-1~'1

8E

11140
12150
12160
12110
1218n PIVPE
12190
IlAOO
12810
12A20
128\0 .u~M2

eM

IlA40

12850
12~M

~H

Cit

e'le
U

c.
8~E

0
1l0AG

CM
6H
CM
KN"
8rM
10.
8
OOK"
CM
IOIE
' afM
8
OOR«
eM

12810
12180
Il89U
12900
12910 F'Y~E
12920
129)0
12940
12950
129.0 ~IY~t
12910
8~E
129RO
SIM
U990
10M
11000 FuR ... t IA
1)010
CM
U02U
BE
11010
CM
11040
a~H
In.
H05P
It060
UM
11010
CM
11080
'.E
11090
IT
11100
801F
CF
UIIO
1I1l0
',Ill
111)0
$f
IF
11140
11150
8'"
IU60
B~
C.
11110
11110
IMe
111.0
n
:1
11200
DOIIG
11210
U220
t"

I1no

Ul~O
1120
11260

uno

11l1Q

.,,'

,'IE
IA
til

If
. CM

.0~lrCA

veASIU~

FU"'UN II-C

ettl ,6'1, 10.
• ... 48

SHiff

~F

SCALe FACICR

)

FIJIU'R

•• "P"
PUT.

IES I FDA I rvPE

'''9,I!,1 YYPF.

UIY'E.I
FOMMI
•• )2

1~6.~.~

FORMJ-12
'-I
tHI,41).10,
FU~MER

~~~;'PE.O IB.,.E

IfH FOR F IYPE

fYPE
IU' FUA e rY"f
IYP~

."Z4

~H'.69010

fORMER
OIMSlih.l ..

,s, . .n, ... 12 ••

SET SIIUCH ·JO RETURN 'ROM LUIID
COlUP NU~IfR

FDUER
PUI.SYM ••
'+60.FAEO$II ••

OUTPUT II
TnT IF SPEC

~v"'.O.IO

FR"O~II

M4$

MIILI $PECIFICATIDN

SYM,SEfFRO_1I

960

SVM.99
NIDCK.O.IO
fORM', "TYPE,.
CHI.0.l0

fESf IF INI,OR • YYPE

•• )2

t"I-I.tMI-1
:,'

C",,69'lo

)I
)I

14
U

JI
49
14
At

17
11
11
II
16
41

Il
II
14
46
14
46
41

11
15
49
14
46

..
14

~'I

14

14
46
11
)I

14

all ..

15111
1111.
UUO
15UI
12406
lSi l '
1l4l6
0.150
09050
090.0
02615
14Z19

un.

14289
15111
UIJ9
IU5.
1'11'
U191
U6U
09050
14225
UOI0
15119
IUI6
15119
13946
lSI )9
12110
lSI)'
12110
09)5Q
UIU
15139

00001
000-0
OOOLf
060n
15150
000-0
OUOO
15140
00000
000"4
01200
OOL"
P-1l1
0-124
000-1
0-14S
02210
000"4
1514Q
000-0
OIlOO
000101
DILDO
OUOO
0-144
00001
00000
OOOK,
01100

ooou

01200
OOOKO
01100
OOOJO
DilDO
OOLn
IS140
000-0

15
49

1.1l9
11111
151J9
U918
0.050
14225
nOlO

00009
OILOO
000M9
01100
0-149
00001
00000

h
41
11
49

uln
110za
090.0
n051

000 ••
01100
0-146
00000

lion

14
41
11
IS

UOI0
UOIl
13094
11106

14
46
I.

I Jill

41

UUO
11142
1315.
13166
UUI
111.0
13202
U2I"

15
11
14

15119
12158
0.050
1422'
15131
1511.
11010
''119
12151
1000.
OS412
0.,,,
12151
090S0
uno
1.::11
0""
000'6

000M5
01100
0-145
00000
L5140
000-0
01200
0000.
01100
00001
nU4
000-0
01200
0""
lUll
00000
I.U'
00000
000"
000-0
14225
000-0
OUOO
15140
00000

46
14
46
14
47

11
14
41
49

..
14

I~

41

11

312

46

n

44
U

n

UZl6

12
Z.

uno

'O".~

11

11211
11250
U26Z
11214
11216
H291

I1J42
I1J54
UI. .

:CHI-l.CII'+1
1;111.0.10

,-z.

II
16

UUO
10002
04U2
01141

all ..
OZ4'4
JS2IN
OOO-Z
01200
000-0
000-2
00000

01200
00009
01100
OOONl
01200
15140
OOO-Q
01100
00000

uno
lUll
unl

'~J6

pur,

I~

JSU,
OOO-Z

PAGE

12"1
12990
11002
11014
UOll
UOll
1)014
1104.

CHI-I.CHI>I
tlll.O.IO

.-J
CNI.l.IO
'ORIIER

"

UH.
0114.
OIIU

oon,

00000

12~18

.- I

CHI,"o,IO,

pur.

11
4'
I.
II

0114'
0114'
\1242
U)70
029n
02917

07200

12110
15119
U110
15119
12158
15111
151J9
U918
12854

12806
12818
12830
12842
11854
IlB66
12818
12890
11898
12.98
1l'l10
12922
12914
12946
IH58
11910

IES I FUR

CHl,b!J,lO

10.

II
U
41
II

11210
09U.

PHASE I-B

F O.M~.
CHI-I.CHI>I
C'" .0,10
Hype
·-36

CHI.~~,

12606
126"
12610
12642
12654
12662
12662
12614
12616
12nR
12110
12122
12134
12146
12151
11110
12182

1219~

CHI.~1,10,

H

n

J

,-.tit

.-

Il~H

12U6
12498
11510
11521
IlB4
12546
12551
12510
12512

31

11110

12254
Ul66
U271
12290
UIOZ
IUI4
IlIl6
unA
11146
12146
12nl
11110

FOR"H·,I~OIV

eU I-I,CHI+U6,111

·.It,
ull

.." A""

uno a.

,Ct~I-'

.+11

'A I YPI::

PAGE

PHASE I-a

unl

IU'D

17
H
14
41

n

4'
I.

0''''
14300
IJUI
IS'"
lUll
1'111
IU,,"
ISU'

'"" "1"

..
U
I.

14

O'OSO
ISU.

1511.
IUM
IS'"

000-,
01200
0-101
In·1I
000-0
OUOO
00_

II

1620-144) MeNI,a.
11290
IHOO
IHIO
IH20 FURIIS
IH10
111.0
11)'0
1)]60
11170 FuA"~1
11110
11)90
11400
11410
11410
11.10
11440
11450
11460
11410
1)410
11490
11500
1)'10 FCMa
IH20
IlUO
115.0

I1no

11560
11'10
11510 FURII7
1J'90
11600
11610
I1UO
11610
116.0
11650
11660
11610
11UO
11690 FO ....
11100
13710
11120
U130
11740
11750
11160

I1no

11710
U190
U800
!JUO FO.M.
U120
U810
11840

8NH

8'"
8T
CM
8HE
'R
8
OORG
tM
ANE
8TM

,.

SII
8Nl

til
8E
aNA
8

CORG
JR

8
DORG
eM
INE
• 'M

•

DORG
CM
a'll
ITM
TFII
110
SM
,R
ell
IE
til
If
CM
INH
'OM
aTM
COl
RNE
T~

rn

11~7.

ORlOn,C"I"
IEGIN

.-)

.-~,

'-1
CHI.23.IO
In •• ,CDlOMa

FOAMI

.- t

CHI.2I,10
FDRMIo)6
PUT.
IU ••• DIYIDE
~IO'H.I.','.

"24.IIIGP.,
~IDTH.2 •• 10
CHI-I.CHI'!
CHI.o.lO

.-'-4

CHI.Z •• IO
'0l1li.
CHI.nolO
FORMSI
OllOs~.1

eSTNO ... "
'HI.O.IO
•• J1
eHI~ I.CHlo,

11"~4

AM
8TM

PARCII'''.lO
PUJ.
FDRMI

.-j

,ur

" •.• ,u"

8Nl

INR
8
poRG
SEfFRO SF
FREOSW OS
UTYPE OS
.T
TF
CM
B",e

p.MEN

VeRSION 2

CF
OS
I
DORC
OS
5
IN
18
DORG
OOAG
TfM

rEST FOR

FOURA', II-e
SPECIFIC"

If'~

.-)

~~~F:~~10~
~IOCK.O"P
PUT,SY~

1408l

PUf.
1•••• ,H "PIE
CHI-1.CHI"
·'lO.CHlo'
FORIOER

140.94
1'106
1."8
14UO
1'1 fR
14118
14150
14162
1411.
14186
14198
1421D
14218
14,211.
1.218
14225
14210
1.242
1.254
14266
14211
14219
14290
14291
1.299
14100
14112.
1412.
IUZ6
16000
1.6000

.-}

•• ,5.tHI
•• 22

pur.

".OUTPUT HOLI

S'YM, l.lO

HOLLI
fOR"5+2 ....
FORHfR
'-3

'"I.'

FRfUS~

.SErF.O

,--4

PUT. SYM
SEJFRQ.",nM
CHI.2·.a O,
FOR"Io'.
FRfOSW

...'

FORM,
]

2.

~IOT",SYII

FORMU
'-9
16000

lou •• tn

10PT •• Uhf

IU.O

TCO

. .000

.lflti12

'60Z4

TRA

14JOO •
14110 •
14UO'
14110
......0

·••

14160'
14170 •
1•••0

OUT OF COIf
EOUIVALENCE
SUI.oUTlNE
FUNCJlON
CONTINUE
PAUSE
STO'
DEfiNE
OOIlG lOUT

.&.~.

,

"OJ6
16000
C;.,..UINS T"E FOLLOII, ..G

3 J',

U

11
49
14
47

17
H
12

.
.1

14

45

49

U151
0'412
090'0
15U9

. "411
15UI
11.JI

000-4
OUOO
0-10.
15140
OU15. 000-1
11UI 01100
15!J9 000-0
In91 01200
Ilnl lSl.1
02626 00000
15U9
I""
09050

unl

11 I5UI
49 . "'54

15140
00000

14
.7
11
49

15L19
11662
09050

unl

OOOK)
01100
O-IU
00000

I.
41
It
16

15119
12594
09050
142"
I J1.1.
1.219
15111
15139
1111.
1S1J9
119. .
15119
J.J.12
1000.
OHIl
15119
13116
15111
111.2

OOOKI
01200
a-Ill
0-1.'
02210
OOOK.
151.0
000-0
01100
OOOK.
01200
000D9
01.' ~
0000,
J3B.Z
000-0
01200
151.0
00000

15119
un4
15119
1)911
09050
02615
09050
1255.

000N7
01200
OOOU
01200
09979
000-1
0-1l.
00000

4J

...
12
11
14

14

14
41

IS
11
14
41
11
49

14
46

14
47

21
11
11
4Q

10200

11
49

15119
14046
1.300
09050
09050
11462

00007
01100
000-0
iJ9979
0-1.7
00000

I.
.7
11
27
11
31
.S
49

15119
1.2"
1.300
09050
09050
15111
14UI
12151

000"1
01200
000-0
09919
0-148
151.0
15141
00000

26

14113
14H2
09050
099"
1.106
llU2
12758

ISU9
00000
0-000
000-1

14218

·00000

14
47

11

17

n

11
12
47

...5
'32

OllOO

151.1
00000

0

21.
26
I.
41

n

49

22
H
42

.

.9
J6

....

19

01100
JJ426
09979
000-0
01200
15140
00000

PAGf
1)918
14001
14014
1.026
I.CJA
1.046
140.6
. . CSA
14010

PUT,
1., •••• "Pf
FoR"5'24

41
11
Z7
14

'''&Sf 1-8
IJY9Q

PUT.SV~

•

J4,1G

T~"

.: 1:1

CHI,67.ID.
HOll
~IDe •• o.IO

IU.O

.... no

FOR. StALE Fac

DORC --)

IF

IJh6
11818
11886
11886
I )'~I
11910
I J921
1)9)4
I )~46
1)951
11970
1)971

.-16

PU'.~'II'

CF
"M
S.M

~IDCK

1)590
1)<,98
11591
1)610
Ubil
!JU8
!JUO
1'642
UU4
116U
11662
1)614
11616
11n.
11710
U1l2
11714
U146
11158
U110
IH82
11794
11806
IUI8
1)8)0
118.2

CHI-I.CHI ..

IT

eM
BNE
aT II
8T
arH
8
OORG
CM
HUll
8Nf
I'M
8T
aTM
HUlll' 'R
&>IR
8
O/IRC

~IDTH

11402
. 11414
1).26
!J4)1
114'0
I ).U
13474
11482
I14U
11494
Ina6
11518
115JO
IJ54l
IHH
Ih.6

CHI ••• ID.
Ft"a
PU'.
10•• 11,111"' PAUN
CHI-I,CH,.,
"ACN'" .IU
,0RII'
CHI,O,IO

•• )2
PUT •

PAGE

PHaSE I-t

.- t

CHI _'7.la,
PTYPf
CHI.24.IO
FORM_

FO'M.

II -C

··)1

1610-14" .IIf!ITOR
11850
UUO
IJ81D
!J880
IJ890
!J900
11910
1J920
11930
13940
139'0
13960
11970
I19AO
13990
14000
14010
14020
14010
140.0
14050
14060
1.070
14010
1.090
1.100
H,Il0
14120
14110
1.140
I.UO
1.160
1... 170
14180
14190
14200
14210
14220
1. no
142.0
14250
1.260

'o~'UI

CHI-I.CHI·l
FORM5

B
DQRG
COl
8E
COl
8NE

8

VERSION 2

FORMER
CsrNO."U
pur.sY"
CHI.O.IO

0
09050
14229
15119
1259.
1421.8
0
11946

09979
099"
0~0K4

01200
00000
00000

2
142 . .
12151
00000

099'9
01100
00000

00565
OO'U
00000
00000

J60lJ
-9622
00500
00000

JO

Ib1G-IHl .01;"OR

" ..
•

H)90

14400
14410
IU20
14410
14440

IH'

e..

IU~O

uno

,"O... GOIO
F,.U... ,I,IU(6, •

8'"
fF"

FMCNtJ'.ILK6"
,,,mitRE IURN
F"'O~.JI),.Ll(l ••
f"OI'l.fIlR""

T'"

FMn,..loS •• L .... ,

~"OI;.CALL

'''011.000
FlltOfrf. JS ,lUll"
FIIOI'I.65('I!
F .. Olun,llU ..
f"OI'l.OUfSC

""
U ..

RrM

......

STII
IF"
STM
Sf
.IM
tM
SV
&E
8TM
t
&V
8f
t
IE

F"U~·)~ •• lKS"

CAU
R£ IURI;
FQR"U
DOD
ASUI;
Durst
OKlO

10~00

lO~1Z

10S24
IOB6
1054"
IOS60
'10512
10,i4
10S96
1060R
10blO
IOU2
10644
10656
10668
10610
10691
10704

EUOI
PAUSEN
tOL~A •• ."lO
SY~tflNUf:".

UROI
tONTEN
SYM,C liON"
FUNCU
COlNA"'. '.10
~¥M.ROU'N.12
fR~OI

SU""

SY~.n~FCI+12

OEF INE
E~TER TO OECQ.POSi EQUI VALFNCE 5 UTfMF.1S

8TM

tOl~'III,I.LO

C

SY •• I VALENt 14
UROI
EUOI

8V
ij~E

(M

,HI.l4,10
•• 24,

14940
14950
14960 t'ijl
14910
14'"0

8TM
IPM
AM
eN

SE

SlS~

EO\)So.I.II\

P", t,

1,' ,.

1620-1441 MONITOR

8H

8TM
I.'~O
15000
tM
.H
15010
U020
IT"
80
15010
15040
'M
'.'l)~
8
15050
15060
OORG
15010
80
8~F
15 08 0
15090
8'lF
8'
15100
15IIQ
OORG
A
lU20
iF
1'110
1514J
T'

151.0

If
GOTD

'I'''. 2 .10

14920
14910

15210
15280
152.0
15100
UJlO
15120
II no
15140
15]50
15160
15]10
15110
15190
15400
11410
l54l0
15410 EQ24
11440
15450
15460
15410
15410
15.90

CO .... ON

SYM,6l.S,a

CHI-l.eMltl!)

15160
15110
15180 U.21
151.0
15200
U21D
15220
15230
15140
15250

10HI
10260
10.12
10lU
10196
10lOR
10320
10)12
--10144'
lon6
1,1)61
10)10
10)92
10404
10416
10428
10440
IOH2
10464
IDH6
10481

no""

COL

IR
CF
InM
10M
OC

UUo

01"

FMOI'I,OK 10

~IM

C
8V
S!
C
IE

PAGf
, 0200'
lQZl1
IOlH

lOB.

f"OIl.n.'L~6 ..

IT"

OI~'U,

lI,r,

fMO .. , IF

n"

14"0
1. . 10
14680
14690
14700
IHIO
14120
14110
14140
141'0
14160
14110
14100
14790
14800
14810
14120
14810 _WIY"
14840
14850
14860
14870
14AeO
14890 t' .. ~
14.00
14'10

CHHK FOR P III STOP

fFli
I'"
ff"

""
"'1

lH~O

FORTUI;

tHI.HtlO.
'MUI;.n.lu,I ..
f.O ... ~' ..
fMOIH ~.IUI ..
'IIOII,tOl!IIQH
flOl1l1.n •• LK6 ..

.'"""".

IH60
14570
14110
141.0
IUOO
14610
1... 20
IU10
14640

1

IOUI

I;NAR~A

HOI
ITM
rfM

IU60
IU10
IUIO
14no
14100
14110
\4120
14530
14540

VU~IOI;

FMOfrftlS •• '-" ....
f .. OI;.IOU'

VERSION 2

FORTRAN 11-0

&iliA. 0--' • a 70.9.
StHI.69.610

II'IVALIO vu

--21t
CSOR~t·+l2,t
.+)2"~SWtt
N.l(jC.~.lO.

EOll ...

GUIO COLLECT ~ •• e
IfSI IF S¥. paEV,IOUSLY CEfIOlEC
If SV" ~OT PREV nEFINEO. SAVE ROOM FOR
OF'SeT VALUE

.~l

E021.S"C~T.II.

f021
•• 2Q
Ull

'''00'0,11.
• SMt'll .\1,

lEST FOR 01' YAR
liST IF SY~ WAS PREVIOUSLY EOUIV
TeS I If YU NAS IN CO"NC~

.-]

NIlOC .~MLNG
NIlOC.HM.6,
SMAOO.I;HDC,6.
U12]0

.-

t:"'12,fN'$~.,

AM

SMCNT ... IQ
. . zo. SMtl;' .11.

8
EOH-U
OORG '-1
SMt~I .01, IQ
~
801R "20.SlItllll,ll.
8
e021-12
IlIIRG
SOl
SlICotT.Ol.ID
IIIR -.IO.PIl, •

..

.-)

!II~

.DVE SYM "'''E I~'O TABLE
MOyE liEN SYM ADD INTO lA8H
IIIYA~ID

lEST

FO~

,,'''f USED IN FUNCTlOII
FUNeTlO~ .AME I~ tOlllVALEIICE

TU T FOI OU"MY PARAMETERS OF SU.'RDG....

rEST FOR SU".OGRAM N'ME 11'1 SUBPROGRAM

TEST

FOR FUST N411E Oil LIST

OORCi ·-1
_ODE ,FIOlFL, t
e

.."Z.KlIIG.,
".
'.2.

fEU Foa .I_ED l .. ;tv

(

lUI FOR _ EQU.L

e+2"".,.

" " IF SfM I4AD 8EEII
'R~NtH IF SYII IS NeT
TEn I' PREVIOUS SYII
IllEGAL IQUIV'U~tf
TEST IF PRn SY" WAS

'E

IT"
RifF

.'1'
I~F

£RROI.112.9,
fOll.MOD.D.II.
•• S6. ~JIICN' t ll,

I'M
S'lf
8
OIlRG
elfF

.a"OR.ln •••
.... l2,P.-l,t
E07

Cf4

SCHI.2 •• 610

'0 F+2 III "'~EO EQUIY
'ltfV,OUSLY fQU IY
'" ~O"MOH
NA$ ... tOllllON
eOUIV

.-)

EOIt,DNY&_"

1S1l.
IOU2

OU59
11 02)24
16 Oll59
IJ OUl"
16 ' 0215'
11 02Jl4
16 0215.

-un

11

OHH

JOUO

16

OU5.
02324
02)5,
OUlA
OU59
02)24
0215.
01114
OU5.
02114

11
16
17
16
17
16

11
16

lY
16
11
16

11
At
17
14
46
46
17
24
46
46
24
46
17
24
46
46
24
4b

11
14
46
47
1I
))

U
I'

0115.
02)24
0215'
02)24
11951
04662
09979
04Z88
IH9C
04662
0991.

04188
11124
09979
1)651
04662
09979
04211
IH24
09979
11'90

fEST fOR 01. VAR. lRANtH IF 1I0f

-9131
J02 ••

-9131
JOl44

-91n
J01U
-'622
JOlt2

-.u,

J0416
-9668
J0440
-9661
J0464
-'114
J04n
01200
000-2
0024'
01400
01100
000-'
IHn
01400
01100
1J111
01200
000-7
13651
01400
01200
14419
01200

04662
09919
04218
04288
15111
0'641
10008
12511
I

000-8
11123
01400
01200
15154
00000
OOOOJ
00000
000<4
01200

14
46

15119
10841

1081&
10848
10860
10812
10884
10896
' 1090.
10920
10912
10944
10956
10968
lon6
10''?6
109"
11000
11012
11020
11020
1I0Jl

11

09150
06015
06015
060110
10'01
09150
060lN
10196
0"04
10976
02)12
11016

00'"
J'h
000-,
000"0
01100
OOHO
0000.
01100
Je'44
02611

11016
11016
11020
11076

0716J
0188N
0126J
00000

02312
0217.
01200
10.56

059)\
09919

26
4'

11

on,o

OOJlI
10000
000-1
07l6J

PAGr

110....
11056
11064
111164
11016
11011
11100
11112
11120
11120
IUn
11144
IIU2
11152
11164
11116
11114
11114
11196
11101
11120
11212

11144
11256
11261
11210
11292
11104
IUU
,IUIZ.
11124

~ODAo'

lin,

AI<
IFM
tM
eH

5C141.2010

EO' .... III... l0
StHI •••• _IO
•• 2"

I l l••
IU'O
11111
IU.4

16
II
14

....17
14
46

17
41
II
49
4)

44
44

49'
21

2&

4)

II

11064
01261

OOO-~

00000

onn

00000

4~

1I1Z0

4"

11064

qoooo

II
45
49

01261
11151
11064

000-1
01UJ
00000

12

01UJ
11114

000-2
lUll
00000

AS
4.

14
46
24
46

17
44
44

••
.,••
••.,
't••
\1

14

.
1I

Ill . .
06411
IlZ',.
012 . .
1114.
on50
12204
11112
lUtZ
091.0
11210
11156

06419
01200
0225Z
01200
OOJll
0"1111
OU6J

11100
0601111
11'"
060U
IU'4

010.0
0001!4
OUOO
000-1
JI60a
0000'
01100

060'11
1140•

Jl

-9691
JOlOO
000111
00000
-9622
JOl41
-9622
J02n

10812
10614

IHE

316

0235.
02)24

,".SE I.e

SCHI.ItC,61CJ
•• 2ft

8D

Ie

I;;

$e"I.CHI
SeMl,lolo

OORG
)
8TM fUOR.1T1.9,

•

"'.

ERROR,l'2,9.

•

8NR

lEI $WIIC~ INDICATING EeUIV SUTEMENI
IlIlIULllt Pit

1011 6
1012R
101.0
101'2
10764
10116
10"8
10800
10811

U
lY
14
4'
Ib

12,.,

OOJ71
U510
00000

H

1U0-1'U IItIIInoa
15500
15510
1~520
1~5J0

1551t0
15550
15UO
15570
15510
IUtO
15600
IUIO
15620
15610
1561t0
15UO
15660
15670
1U"0
15 . .0
Ul00
15710
15120
15110
15140
15750
15160
15170
15710
15790
15100
15110

uno
uno

EI/ll

tOU

COLLIU IIiDIl

eM

.I'IH

•• 4111

INE
I'"

EOH . . ,SYII
EOH-!Z
ERROII.7I"
UM.fon •• , Ia.
UM-4

"

SF
OS
CII
· II'IE
AM
8

'MASE I-I

•• )o.s, .....

.'

..".

StMI" ... ,O.

'In '01 IIGM' "AlfIIl

SCMI.a,IO
·.20

OORG .-)

$"",1,

EDit,' ...
.. 20.'1
EOIt
DORG '-1
I"f EQIt.'I-I"
REf. SIIADD,
pR.S"tNf,ll.
'0
pR-I.IIOOAO.Il.
'0
YF
TillP, ,YII"
til
SCHI,It.610.
If
EOlOOP, "
tM
stHI,lI"IO
8E
eOI
8
E01-,1t
DOl" .-1
..001\1100&0, II.
'0
(:f
.. ODE
as
REF.5I1AOO,
JF
TO
'R-1.IIIIO&II,II
~~.S"CN,.II
'0
•• ,)2ftD
'FM TEM,., ,

'U' I' ,.nlous n .. WAS DI .. WAil

•
"

iY4

fIST IF ,.nlDUS $Y .. liAS IQUI"
SAWI INDICIJORS
" n GFfSIf
.IID Of LIS'

,If

'11 QI fLoar

"

R

EI~PO

-,."

15940
15950

DOR' .-J
til
SCHI.2••• 10

1591>0

8"£

...

AM
CM

.~H

E02]-~8

1bOOO

""

EO ....... ,O
EOB-I....
.-]
fEM,.SYIi
·.20.IIODAJ), II,
E04

1bOl0
I
OIIIlG
16020
160]0
Tf
16040 U4UO 8~f
8

TIS' '011 0111 va •

)~

15910
15910
15990

1.0~0

JOUUN II roC

'.11101.10
.StMI.II.
SCHIol.IO
5I;HI ... ,.10

. 'FM
10
81/F

uno
15150 E~7
15160
15170 SAVel
UIIO
15190
15900
15910
15920

l5no

a

IIICQ•• tCY SUlStIllP'ING

'FM
'FM
AM
'0
AM

ell

SAVEl

"1151011

ERROR.n •••
S.M-JoO. ,

81M

SCHI.l.10
SCHI •• 9 •• 10
GO '0 COLUer SUlseR 1" ING

UST IF Viol '"EVIOUSlY equIVALENCED

"GE
Ill96 11 09150
11'08 16 0. . "
IIUO 16 11450
1I1t)2 11 11410
1I1t44 25 00000
11456 11 06QU
1146. 14 O.oIN
1I1t'0 U
In"
1I1tt2 lit IIUO
11504 ' itT lUll
11516 11 onto
11528 26 09919
11540 12 09975
11551
0
11552 lit O.OIN
1156. ·u 11516
115" 11 06015
11511 Itt 1160.
1159.
11596 16 09919
116011 ItJ 11700
11620 Itlt 1161t0
11612 Itt 11700
11640
11640 ,1t4 11700
11652 26 09001
11664 25 lUll
11676 n
UUO
11611 26 02610
11700 lit. 060lN
11112 1t6, I2IU
11124 lit 060lN
11116 u
10. .0
11748 49 .IO'U
11156
11156 2S 06411
11761 )) 06417
.0
11n9
11180 26 09001
11 792 25 UtlO
11804 25 unl
Il116 ItJ 11841
11828 I. OU20
I1UO It9 11940
11848
11848 lit 060111
11860 It7 IlIlI
11812 11 06015
11884 14 0601N
11896 47 11196
11908 16 11 nit
11920 Itt 1I1t01
11928
11921 26 026Z0
1191tO It4 1196C
11952 1t9 11700

J)

00-75
-0000
-9915
000-1
0601N
000-1
00009
01100

.

-"

OllOO
00-75
11 1tS00000

OOO-it
01100
000-2
00000
-0001
lUll
lUll
00000
125.0
OUOI
OU6J
0711"
099"
OOO-it
01200
ooon
01200
00000
01 . .N
00000
07201
07llN
OTll>J
Ull1
-0001
00000
000K4
OUOO
000-2
00009
01100
JI9Z8
00000
099"
O"IN
00000

317
162D-141t1 "0111'0.

VERUOII 2

'QUUN 11-0

16060

OIIIG .-]
TF
1b070
"'O.SIItNT
e.ll,),10
1bOl0
A"
16090 U4110
.0 •••
'EST .F 'tlEVIOUSLY EOUIV SY. liAS' lASE
1610Q
EOIt
IE
80
16110
TEn .0. 01' VAl
E 84 no. PCII' .11.
16120
TF
··".511&00.11
A..
e.21,5,10
1b\10
1611t0
GllIlUn OFfSEl '0 PREVIOUS BASE
fF."fI, ..
16150 E84Z40 'f
'OUVE.n.L
16160
.OUVI·I .......... II. GEII 'DDIIESS OF BASE
5
A..
16170
AOUVE-l.I ...
16180
'F REF.ADS'VI
SI!
161'10
'OSAYE.04.10
1.200
· TO
pR- •• A056I11 ....
"VI f.1 O. fLOAT
A..
16210
AOUVE, 1. 10
TO
laVE 11111 11i0ICATe'.
16220
' •• ADS'''.H.
fOIt
11>2111
e
OII.G '-3
16240
1625Q E8~UO $II
~fIIAOD.H.11I
16,.0
• ,F
"21.511. .
TE .......
A
16270
Ittl N'~ Of' ~ET
ElI421t0
UZIO
DORG .-)
16290
aNF EOlIt-., ...·& ••
,IITIII '11011 unDo. II TO EUO• ., '.EV
16100 eQZZ
107 ........
liAS EQUIVALENtED 01 IN COll ..OII
16110
I
1.,20
EOZ"-12
16)]0
DORG '''')
MIl' 'Hell EQUIV SUUIIENT HAS
1611t0 f~lOOP " . stMf.tMI ..
fF
16150
£8ASI."...
EU'E ...,
16160
S
AM
16110
ElASE-I ••• lIl
SF
16180
f"st-I
16390 EUSE os
••111 $UIIIIEO OIIt~ TO OElIIIIIIIIE .,se
5tHI ;1.10.
'AM
161t00
16410
tSO.II ••• " .
If $" liAS '.IV EIlUIV IT ..UST IE TME
16420
III' U".M .......".
C;.
'1"1 GF 'M, '.UENT EOU IV
16UO
tiI,,6ft
tiE
161t1t0
164tO
.0
ElIt.... lClllf.U.
TIlT HIlI 0."
TF
16"60
AOUVl ....... " .
16410
,0snE.'.Ict.
All
16It1D
'F" 'as.... I . ., ...
'LIot~ IIH sn .IITD TAIL E
ADUVI • . . . , •••
A
161t90
AM
16500
16510
511'011....
-,
••
'F
IIIF UUIII."
IU20
sc.......
SF
IUIO
nnto
16S1tO
16550
DOIIG '-1
16560 ElltS60 ell
StMI .••" ' . ' .
..
n
IUfO
· IE
JI'll SYII.I~r1&
16510
16590
DOlle; .-,
1. .00
31~
AM
S~HI.I.I.
16610

'"

,

•
'It'

'''I

..,,1

.,

""

'. _.11....

S"'OII""L

•

•

..,.

,/I'

PAGE

'HASE I-I
11960
11960 26 11990
11972 11 11990
1\984 lit 00000
11100
11996
U008 It·] 12160
12055
1t020
12012 1-1 12055
12044 . 21 02620.
U056 26 01,,15
UO/ol 22 0 .....
UO.O 11 OIUIt
O.aOI
12092 U
UI04 12 O"I~
uSIa
U116 n
UUft 11 08ltU
UlItO 25 u n l
121'2 Itt 11100
12160
12160 12 0720.
12112 26 12195
I2I1It n, 01620
12196 1t9. 12056
12201t
12201t Itlt 11Z10
12216 41t 11'"
12221 .49 H2.0
122)6
12236 U
0.015
12241 26 12195
12260 J2 122·"
12272 11 12294
12211. ).2 122'2
a
12291
12296 II 06015
1230. 11 onolt
12120 1tIt. noZl
12)]2 ZIt 0.7241'
UJItIt It. .12.16
121t12
12316 U
16 01."'5
12310 II 0. .15
12192 16 0I1t1ll
UItO.. II 014111
UIt16 11 OliO.
U4I. 26 onoa
UItitO 1t4- InM
121t12 JZ 072 ...
IU"
12. ."
UItU
12472 lit 0.0111
Itt In 16
16
• .2101 . , . IISIO
12116
an16 II 06015

.
z.

121."

.

12""
12""

DH'.

14

07261

000-)
00-00
OUOO
07Z6J
07200
000-5
00000
02)17
1199000-1
0'415
OOO-it
O.... N
000-1
O.UN
00000
000-5
0720.
00000
00000
125.0
12t.1
00000
J51J9
OU17
09001
000-1
00000
OOo-Z
JU20
O'"N
09001
OUOO
0726J
07200
000-5
-OO'J
112620
OOO-t
lli94
12511
00000
00000
OQOll"
01200

-DOO"

00000
000-2

:0

MO~I

11020-1441
IlobZO
11>1»0
1. . 40
11>1>50
11010100
1. . 70
16610
1106.0
16700
161\0
16110
167)0
16140
llono
110160
16170
16110
161'0
1. . 00
IloilO
IU'O
161]0
1. . 40
16150
IU60
1. . 70
16810
110"0
16.00
11>910
110"0
I'HO
11>'40
16951l
16.60
1"10
169AO
1.,90
11000
11010
11020
170)0
11040
17050
11060
17010
170eo
11090
11100
17110
17120
11110
11140
1715~

lOA

IFM fOtil." •• 20B
fOB-II>
DOAG
)
S,
5YM
A
S., .. , ftll1'"
.5"
S"ADO.05.10
OS
•• -1

'A

IF
All
~

''''DO,$Y'',b,

,.

MNE

IF
AM
Iq
B
DORG
IF
'M

..

1l54~
12~U

GEN OFFSH

1'560
12S12
12SAI
Inl4
125'10
1260R
116110
1'6110
1262e
IUllo,
12.]10
U •• A
1,.60
12011
12bA4
121092
1110.2
12704
121\10
1212A
12140
12152
12164
1217.
12184
12114
121'10
1280R
12820
12832
121H

MOVE OfFSfI INIO lASH

C~~AR

HAG INDICATINt; EDUIV VAR JA'l E

.. )'

I

BEGI~'

8'"
eM
.~

~U"PA

11210
11280

112'0
IHOO
IBID
11)20 SUPPf
10)0
1040
11150 ~U"'I
11)60
IU70
11380 SUAPUT
11)'0
11400
11410
17420
114)0
11440
11450
114100
11470
11410
11490
17500
11510
17520
175JO SU8Pl
17540
17550
17560
17510
175AO
17590
17600
17610
11620

3 I !J

VER~J(J~

2

FCRIUN II-e

.M~SE

stMI,~.610

.-}"

811

• ... 21t

BTII

PUT,OI",'"

8TM
AM
10M

OUTS"
CSUA ..... 12
S"'''OD,04,IC
S"&DO •• 6

S,

DC

"

801.
~"F

81M
CM
BE
8TII
8TIO
I.
CM

~~H

OUJPUI SOBROUJlOIE SYMSOl

I.· ..

SAVIYIO.SY.
·H6,CIII.'
BEGIN.SUB'CT
ERAOR. HI.9
CHI.24,IO
•• 2'"
ERROR. HI.'

PV"

U •• B.LEFT

.UE~

CHI-I.CHI·1
CIII.40.10
SUB"-J.
CHI.69010

811

5UIPl-J6., •

TESI FUR SUBDue

SF
&TM
80
·A"
TOM
DC

OUTSN.
cJOIII, ••
S
IISW ••
S.AOD,.30 10

DUTPU' _aGUEIIEIII'
UROR I' A.QUEMENT .. AS 1111

.

"'-36,lf"

ARGUE~EIIT5

SMADO •• 6

1 •. ':,-

CM
8"E
IITM

CHI.21010
··.1-2'
PUl,
123.e .tOllMA
SUBP2-U
a
DOIIG •.-1
CM
~HJ.It.1O
BilE
U8Pl-'6
erM PUI.
tQ4,8.IIIf.H' 'AAEIII

.

00 au
01200
000-'

I2n •

U
21>
II
II
16
12
II

000-5
026'0
000-'
000-5
00-00
000-5
00000

11161
118"
12810
12892
1190.
12916

14
41
II
14
41

OU08
onOD
ouoe
OUOI
07200
0720e
0188 ..
0
0601"
122 . .
06015
01001 ..
12.72
12961
12.1>1
15118
IOU,

000-4
01200
000-2
OOOK)
01200
06015
000-1
00000
00000

11007
1)001
11016
02611

06015
000-2
00000
00000

on50
060101
12856
01>015

00-72
aDDU
01200
000-1

.
26

II·

16

I.
41

II

41
II
44
.9

26
II

11
~9

26
II
4~

UDal

4.

11016
I JOIl>
I J02A
I )o.n
I ](j51

14
41
II

11

14
41

II
4'

000~4

060lN
11052
01>015
12856

000-4
01200
000-2
00000

1 •
16
11
U

U
U

11291
1'118
13184
02291
111910
09J50
I1U4
100U

11
44
IS
14 1'13'
46· IJlS6
0.150
U
14 1513'
46 13244
17' 090'0
12 OtOl4
11 on04
II onoe
15 OUOD
I

11140 16
1))52 45
1111>4 44
In76 H
UJee 14
13400 4.
13412 U
1)4'4 U
UH6 JI
13441 14
IJ. .O 47
13412 14
13414 46
114'6· n
U501
1)5'0 U
U5)2. 11
U544 15
In55

"

.

0-135
15152
01291
00001
051041
00110
051041
00001
OOOMO
01100
OOUO
00009
01100
0-U5
00000

Jna.

000-.
00000

0224J
Ine.

09979
15141

09)50
I'U'
11424
091'0
o,no
1511.
1511'
U4:Z
15U'
I14U·
010'4
""04
U4l'
onol
OUOO
1

OOlH
000a4
ouoo
OOLH
0-U4
15140
000110
01100
0000.
01100
00000
JnZO

0162.

au')

DUll
000-1
00000

47
17

I'· 15U'
n600
0'0'0
nU6

OOoa)
01200
o-UI
00000

lJU,

14
47

U624

11

15U'
n4U
0'0'0

000-4
OUOO
0-104

us ••

IUIO
115'2
J)600
U600

U

01200
000-'
07UJ
00000

PAGE

I-B

11556

3211

all 00

0100101
12164
060.,
0100101
UJlf>
0100 IS
127.4
I2UO

11124
III J6
11148
1 1160
1]112
11184
13196
I l20a
11220
1)2)2
11244
13256
1)268
11210
I }2'1
11304
1)J16
I )J2A
In19

8'.

,I>
II
4'

01'6J
01200
000-5
0'610
00000

IJO"
U076
I )08A
11100
11108
11109

A. SCHI.2,10
8
fR4?IO
OORG .-J
OAC 8.IVAlENU
IVAnNCE
IItJIPU' SUUOUIIIIIE OECURAIION S'AfEMENI
IFM SUO.UIt 11,01 n ••
TR
CHI-I.CHloU
80
.'l6.SUBFCI
10M SUOFCI"
•• 2~,STS~
80
ERRO, ,110,9
INf ·-Il,SfSN
TOM SUBS •• I
CM
CHI.40.1I'
IH
·.24
8TM EA~Q'.270,9.
SU8 OEClARU 10" FRRCR
c•. CHI.U,IO

00000
0'620
000-5

07201
a

U6"2
08415
0"'115
o . . e ..
12I2C

11',2

SCMI.14.6IO
EIUIO
SCMI.l,IO

. ."
o0 ..
n

12

H

11VR4
129'.

E~"CIt.72.q.

U
21

On6J
00000

12~18

I\II~

JUU
00000

H
Ii 616
4':. U."

11940
Ilq52
12Q6.
12Q71

•• 15, SCHI
•• 11.2.10
·.20

LIt'4
11401

0'919
OOOJO
00000

•• 1'. SCMI

'-1

I.
H

O?lOl
12421

•• ;tl,lt10
CMI-I
EQR

IlO~G .- J
U~I04

'AGE
1l5,H
12540

.-J

Ibl0-1.41 MnNIIOR

nuo

PHASE 1-8

"

e ..
BNE

11680
11690
InDo

H-C

.-

11180
111.0
17200
11210
11220
11210 I V4l EN

nuo

FOAU~OI

S"AOO.IO.IO
U •• 100-44

DOA'
u"QS ROlf •• 10. ~.t'''.11
8
HEAE
OIlAG .-l
80
HERE, ~MtOlI ,II
IF
A051V~, ,IIAOO ,II
AOSAVE.S,IO
'M
IF
AOS'VE, 'E .....
B
£84 JlO- JIo
OURG
]
H~U
CM
5CHI,H •• 10
"Olf •• '0
AM
~CHI.2,10
5CHI,4,610
C"
BNE ·-l4
AM
StHI,2,I0
I .. ,
"20, S~C~I 01 I
U'lIO- 16
OORG .-)
5M
SMIDO", &0
IF
~M.DD, fE"p. 6
S"AOO,5,10
'M
AM
5"'00,5,10
IFM SM&OD,O.6IJ
S..
511'00,5.10
.. 0010 ••••
t-ti" 710 eF
SAVEl OS
eM
SCHI.~.610
WNf EOlOO •• IoO
SCHI.2,10
SCMI.lJ,610
C"

8U

1"40
17650
UUO

2

.--

11160
17170

17241l
17250
11260

VUqO~

16.

1620-1441 liON I rOI I
11110
UUO
U1)O

B
Rour~

......

11140
uno FUNC r&
11160
1Y170
1Y1I0
171.0
11100
11110 CIION

......

11120
11110 CON TEN
11140
\1150
11 . .0
11110
11 . .0
11 •• 0 TINUE
InDo
Inlo
,7920
11910
17940
11950
11"0
17910
1Y980
11990
II Don
11010
11020
11010
1I04D
11050
11060
11010
11010
11090
11100
11110
11120
11110
11140
IRUO
1.160
18110
IIUO
11190
IUOO
11210
18220
IU10

PAUSEN

PAUS

srDPE"

VERSION Z

fOIUAII 11-0

.-

DORG
)
DlC 1.ROUTI~E
Rour I~E
OUTPUT FUIIC TI ON DECUUflDII SUTf~ENTS
TR
CHI-I.CHI."
TFIO SUBPUTHI.U6.1
BO
SU8PF-24.SUIFcr
TOIO SUBFC T.I oil
I
SU8PF-1.
ODRC .-)
Oat 5.CIION
ClION
OUTPUT COfUI ~UE ,urEIIENr
80
"24.1101110
8rlO ERROAl.574 •••
UNNUIIIEUD CDIITlIIUE STATEIIENT
IT II PUT.
Ul.I.CONTlNUE
.rll PUT.
140 ••• DUIIII,
8
8EGIN
DORIO .-J
OAC 5. TlNUE
TI"UE
UUTPUT PAUSE srATEIIE~T
TR
CHI-I.CHI')
OTII pur,
U •••• PlUSE
IT II pur.
140 ••• DUIIII,
IliR ··20,tHI_2
8
BEGIN
DORIO '-1
CII
CHI.6 •• 10
I ..
·.12
.TII ERROU.511 •••
CHA . .CTEk '.nR PAUSE NOT NUIIEUC
BEGIII
I
DORIO '-1
ITII PUT.
14D,',OUIIII'
TD
··Zl,(HI
8TII pur,o ••
TR
CHI-I.CHI'I
B"R e-J.,tH,t2
8
BEGIN
DORG .-)
OUTPUT STOP S"TEIIENT
rR
CHI-I.CHIoI
HTII PUT,
In.~,srop
PAUSe"'24
DORIO '-4
T.
SHIFT OFF INEOISK
CHI-1.eHI.'l,.
CF
SlSN
80
ERR6001 2. SU.FC T
BO
ERR60'12,IIULOEF
TOM MUlDEF,1
CM
24.10.
CHECK FOR lEFT PAUN
8"E ERR44
TR
CHI-l.CHI+I ••
SHI FT OFF lEFT PUEN
CII
CHI.69.10
8~H
ERR44

......

......

....

•

OEFHU

,tt •.

182~0

IR260

uno

IURO
IU90
U)OO
\R1I0
1R120
18))0
18140

uno

1816D
IR)10
U180
18)90
U400
IR~IO

IU20
IR41D
11440
IU50
IU6n
18410
11480
11490
18500 OfFCT
18510 ERR60
18520
185)0
11540
11550
11560
11170 EaU4
11510
11590 •
11600 •
11610'
11620
11610 ClOliT
116.. 0
11650
11660
11670
1. . . 0
11690 CLOGT!
11100
linD
11120
11110
11140 CLDGTZ
In.o
IU6D
linD
117.0

11616
11644
11645
1165.
11670
11.12
11694
1110.
11114
111\5
11124
U116
1114.
Ul.0
11172
11110
11111
11190
11802
11.14
11126
11111
Ill. .
\1 •• 6

unl

uno
UI82
U890
11190
U.02
U'I4
1J926
unl
u"O

unl
unl

11910
U982
U9I9
U990
14002
14014
14026
140)1
1_050
14062
1~014

14016
1409.

4'

OU2.

)7

00000
a

11

16
U

15
4'

4)
\1

11
\1
4'

15111
11291
11U4
OU91
11172

15141
0-116
02291
OOOOJ
00000

11741
0.40.
0'0'0
0.0.0
0262.

02610
00N14
0-127
0-140
00000

•

a

2

JI
\1
\1
4'

nUl
0'0'0
0.0.0
Ill. .
OUU

15142
o-u.
0-140
15&41
00000

14

1511'
11 . .0
0.40.

02.16

DOOO'
01100
OON11
00000

0'0'0
l19n
0.010
1511.
11.02
OU"

0-140
15U.
0-000
1.140
15141
00000

11
\1
49

UUI
0.050
11114

15H.
0-U5
00000

JI

UU.
05641

un2
00000
02291
02114
00001
aDDu
OUOO
15140
0000.
01100

.
.
U

11
4'
\1

U
\1
11

45

))

4)
4)
15
14
41
11
14
41

1~4J2

IU12
02114
1511'
14420
15111
1511.
IU20

321

1620-1441 IIOIIITDR
11240

PAGE

, ..lSi I-I

8EGI~

8TM
SF
CIO
8H
TF
CII

au

FQRTRAN 11-0

VUUOIol 2
COLLECT "I

14110
14122

ERR'-4 •••

NI GRUTER THA" 50

14146
1415.
14110
14112
14194
14206
14218
14210
14242
14254
14266
14218
142.0
14102
14114
14)26

1411~

NI,SYIO
CHI
10
ERR44
CHI-I.CHIoI

,2),

TR
M
W,Nl
tlO
99,0100, •
TDII REClG.2
8H
·.24
TOil REClG.1
tM
Cf9.0200 ••
8H
ERRlt4 ...
EXCEEDS T~D SECTDRS
CHI,69.IO
C"
RIIH ERN44
RTM ClOGT,06.10,
COUECT N2
SF
TF
N2,SYflil
CM
SYII.20000
8H
ERR44
CIO
CHI,O.,10
8IOE ERR44
8
8EGINA
oaRG .-)
OAt 1.INEOISI
INEDISK
TFII REClG,000,9
TO
·.35.JAY
8TII ERROR2,610,9
TDM JAY.--.
BEGINA
8
DORIO '-4
os
.ERUO
COLLECT DIGITS SUBIlOUTlNE

""-4

I~n.

14150
IU62
14114
14116
14191

"M

ClDGT,IX,IO,

2
··12.CHI
CHI-I,CHI.I
--24
DOIIG .-1
Tfll nll-u,o
TFII CLOGTZ •• ,SYII-U
511
C:LOGT-I, 1t10
aCLOGT
11
ell CHI,69,IO
IIIH ICLD"
All
'.1',1,10
,CHI
TO
rll
CHI-,.CHI'I
IIIIt CLOGTI,CHI+Z
ERR4.
DQRG .-1

x••

11
12
14
46
26
14
41
)1
21
14
15
46
15
14
46
14
41
11
12
Z6
14

..,
14

49

14~06

14420
14412
14444
14456
1446.
144n
14420

.

14411
09911
09919
14420
022))
15119
14420
15111
02240
00099
02241
14266
OU41
00099
14420
15119
14420
14411
099"
DUll
0""
14420
I5U.
14420
02611

16

n

11
15
49

OUU
14467
09406
02JU
0,.11

11

OOD-l
00000
OOONO
01100
09919
OOOK)
OUOO
15140

oun

0-100
00002
01100
00001
o-zOO
01100
0000.
01100
000-'
00000
099"
10000
01100
000-4
OUOO
00000

, a

14401

•••

2
00-00
02361
00010
00000
00000

a

NO. OF DIGITS TO C:OLUCT • I
14416
'4411
144.0
' ...02
I45LO
14110
14512
1.... 4
L.....
1455.
14170
, ...12
' ....4
1 . .06

DS
BD
TR

•

•

PAGE

P"ASE 1-8

ClOGT .OJ, 10,
SY"-I
SYM.50.10

1461.

32Z

146.0
14. .1

U
II
.9

16

'IZ6

•6
L4
U

U
II

..
II
U

2
14110

'51.'

14411

0. ."
14toO
144n
1. .11
lSn.
I. . . .
1. .00
00000
11111
IU ••
.,610

1511.
15140
00000

.

-"

-0000
OOD-I
01200
0000.
OUOO
OOD-I
1511.
15140
lS14'
00000

1620-1441 MONIIOA

IRno lelOGT IF
18100
11810
18 A20 •
IftUO

18840
I88S0
IA"OO

UA

IKM70

ICO

18QlO
10'20
IIHO
In40
18~50

19040

19050
.9060
19070

19080
• 90'0
19100
IHIO
19120
19110
19140
I~ I ~o
19100
LQll0

'lGE

14b)'

2b

14650
1.652

42

16000
16000
16012
\6024
16016
16000

OUT UF CORE ALaCK )
oune

CCNTAINS THE

16
49

16
4.

09.n
OOOOD

1460OODOO

00565
005U
ODODO
00000

J602)
- . . 45
00500
00000

0215'
02124
021'9
02124
02159
0212.
02'"
02124
021,.
02U.
021"
0212.
02159
02U'
02U9
02n.
02159
0712'
02H.
02U4
120.'
120S1
lOll ..
10512
0215.
02124

-,.,1
J0200
-.645
JOZZ.
- • .,Z
J024'
-.U2
JOZ1Z
-'7)1
J0296
-97)1
JOlZO
-9111
J0104

It

FOllO~ING

'SCA~

Ar_

'OUI
"'"Ol\l+)~,

BUt4 t

t

F"ON.luur

10200
10200
10212
102H
lOll_
10241
10260
10212
10214
10296
10101
10120
IOH2
10]"
Ion.
10]61
10]80
103.1
10.0.
10'1'
10.2.
10 . . 0
10051

lOUT

FIIIIION+)!>.BLII.2

FMON,NONAItA
FJiIIOI\I+JS,ILlll, •

OIH

FIIIOJrif,UIM

fllltJN.)'S,"Lkl ••

COMHON

FJIIIO~.C.OM.ON

FMQ'HJS.8Llf.6 ••
FiliON, IF
F"mil*)~,"LK6.,

,f
GUIO

FMON.GOTO
FllltON+ IS, RLK6 r,
FJIII£'N,CAll
F"WU)'S.ftlK6"
FNO~."E TUMN
F",mU)';,RlKl ••
FfilON,FOJUiIA'
FJIIION+J'i,RlK4,.

If_
8T"
8.F

CAll
RUU.N
FaRHAT
00

ST~N'

FlI4nN,OOO

ASC IA
A~CA~

A

•• RI"IO"

ASCAN

.SINGS',.

OUI SC

10.,"'4

DOLO

1041.
10.18

I

ijO

sc,

A

oursCI

IFM
KI.

fMON+l'i.8LK'j"
FJIIION.I.}K IrJ

10~00

IIT
16

17
I.
II
16

17
I.
II
\6
II
I'
\1
16
17
I•
17
16
17

••••
••
OJ

10
II

-9711
JO)"

-un

JO]92
-'691
J0416
02609
00000

OQQ'I

00000
-9714
JOU8

UUIPUI SU8SCRIPrlNG CODE

19 1"0

••

H~P

,SfIIAOO

26

0'."0

10~]0

H

2 •• -2

10~H

OIJIII~OtSMCNT

.11

OIJIIINOT,DlJIlIP~O

AI-),MA!>""
PA1,Al-4
PA2.AI.-4

A.

I.

CHI-l.CHI+l

IQHO

S"

OJIIIPIIO.OOOI ,III 10

1610-1"1 MONITOR
leJ)40 OIJIIINU
lq }"}o

os
eM

CH~.b9tlO

I"~O

A~H

AlFAT
OlMSW.L
CSTNO, •• ll
O'''SW,O

jlRO

8T.

IHQO
lqdtQO

10M
CM

IHIO

~E

lQ420 SC'
ll,lltlO
I'HIItO PA2
l(41)O
l!Htt'lO

as

TOM
TF
6~'

1.500
IHIO
19S2D
I.HO ;C I

CF
,F
CM
RE
e.
8E
8TM
8TH

1'J'j,40

IR

IH10
I.,AO SCS
lq.,.QO

80

lq'S~O

IHbO
19570
IHac so
IH90 PAl
IUOO
19610
19610
19610 UHI
19'40
19'50
\9600

p,

•OORG
TF
CS
IA
CM
8H

CM
8N"
BTM
8n
B
OORG

IF

se.

19120 CALC

19830
19140
19150
iWl60 "OWE IT
IUTO
19110

,--s

a.)t), Se12

sen
P ... 2 .. 6

CHI.ll,10
sea
CHI,4.10
•• 16

ERItOR,1S,Q
ERROR.212.~

CHI-l,tHt.l
SCI-12.01""0

SCq

.-}
PAL, SYfIiI

,.-s

CHI-l.tHI·l
CHI,6Q,lO

se 1-12
CHI,ItO,10
SCI-12
CSO.~,·+12

.-.

•• 20, F.lO.Fl
SCI-12.,

LO.IO

8£

• +<\1

e.
BHE

CHI,20.10

SF

S~

SC22
CHI-I.C>lI>1
CHI,69,10
5C.I-12
OIMSO.1
tSINO.S"
NOYEIT>6,1l1-1Z
01"IIOT.05, LO
ft"P •••
DI""OT.I2.IO
"OVEU>'."
.TUIP,II
D I"NOT 01 010

81

•• 4~

,

10M
lOll

A
A

FLOATII.G VUIUlE USED IN suesc . . ,

p', ,S .. AOO-I
t

2~

2.

IO~'O

11

10HZ
1058.
10590
10608
10blO
lo.n
10 . . .
1005.

11
I'
10
I.
II
II
II
H

oa20
lo.n
106n
2
10545
10620
11920
10.14
10112
11031
10914
10182
11011
Hili

PHASE I-e

O.... SW,O
PA2, SVJI'

,a-I)

TO"
Mil
Tf"

FORTRAN II-C

so

CHI

IINH

YEHIO. 2

CHI,I.,IO

OS

eM

32 :J

2,a-'}

C.

TR

SET UP WOAK AREA

Pi ,1-12
PA1 • .,,lO

IOHO

ro.

10~4.

sezz

1(1)10

F(}

,II

IOH2
10SH

'AZ ,4 t 10
PI.12.10

19610
19080
19090
IHOO
191\0
19120
19130
19140
19750
1911>0
IUTO
19180
19no
1.800
IUIO

PHASE I-I

16000

19 •• 0 OUT se I IF
19200
TO
10210
eF
In In o I.NUI os
I.BO
IF
eF
19240
19250
n
IF_
1.200
•• 110
IF •
IQ2AO
I'.
I.zqa ;(11
Iq)On
A.

~ ~

FORUAN 11-0

Inp, ,KLK1. 7

OORG
TFM
BTH
IFH
8T"
TFH
HTM
IFH
BTM
TF.
8TM
IF"
BT.
IF_
HT.
IFN
BTN
IF_

InbO
InTO
Ift,.O
18990
19000
19010
19020
19010

2

88
OO"-C a-I}
DENO
OOAG 16000
IFM
InQr ••• Z1

B

. ' ... 0 •
18890 •
18900 •

VeASIO~

SVH, CLUG T2'b, II

SC5

10611
COOOO

II."
J191'
JI.lI

JlOJ.,

000-'
000-.
000J2
ISI.O

'AGE
IC&6R
10617
10680
10092
1010.
10716
10128
101.0
IOTS1
101 ••
10776
10181
10118
ICBOO
10812
1012'
108)6
10848
10160
10812
IOU.
10 . . .
10908
10920
10.28
10.ZI
10914
109.0
10952
109.4
10916
lonl
11000
110\2
11024
lion
11012
110]'
11044
1105•
110"
11010
11092
11104

11116
11121
111.0
11152
1116.
11116
11111
11100
IUIZ

3%1.

OT20Q
0126J
00000

IIlH
lIn6
lIZ ••

12
I41
I~

11
IS
14

••

IS
26

..
u

12
I'

••

I.
.6

11
11
11

.]

••
26
11

I.
U

I'

41
\1
41

10677
2
15\39
10'"
1000.
05412
1000.
15119
10.28
1000.
IOU2
0
1082.
10620
10UO
ISl19
10620
Ull.
10 . . .
O']SO
09)50
15111
10112
11164
1091.
0
15111
15119
10112

Ull'

lOin
0510.

1I0ll

0-0-1
00009
01100
00001
JOT2.
00000
OOOJ'
01200
00000
0 •• 19
10620
00000
00000
000l)
01200
000-'
01200
00-15
00012
15140
lo.n
00000
0.919
IU40
0000.
01100
000110
01100
JIO\2
0. . . .
00000

.9

lOin

26

.

11011
0

01201

I.

151"

OOOJO
01200
OOOKO
OLZOD
00000
15140
0000.

I~

41
12

1I
10
.1

U
11
16
II
II

U
ZI
21

12
•6

1110.
Itln
IOU.
10620
1'111
15ll'
10l1Z
10004

05412
11210
10'~'

GlUO
105.'
11110
00000
10'"
IlZtZ

DilDO
00001
JOl84
JlU.
000-'
000"
OOOJZ
DOOM
01620011-1
01200

.0

1620-14H MOIIIITOI

A

D4,99

A
M
SF
TF
M

D4,AZ
01,CI
92
01,99
OZ,II
92
02,99
AI,OOOOI,.

~F

IF
11M

TUNY
IHDI
INtlZ

IOVI

IF
TFII
IFII
alilF
OS
CF
TOM
OS
SII
SII
CM
BNl
TFII
All
a .. R
B

DORG
AM
CII
BE

••

8

MV2

lOHO

10lS0 MV)
20160
20110
ZO)RO
20 )'0
20400
10410 tUNT
20420
204)0 l4
10440

'HASE I-I

DORG
IF
IF
AM
SM
IR
SII

10410

l6

AI
61

CI
AZ
H2
t2
01
I

INOI,04
IN02,04-1
"16,INOI

"

INDI .. 6
INOZ,90.11

,--5

INDl0I2,I0
1III02,U,I0
INOI,OI,61
TONY
1'1.1-12

",.,10

·"20,'1,11

CO"",.

GO TO OUTPUT SUING

.-)
PI, ),10
PI,O,68
MY2
OI~NOT,

01,10

IIVI
'-1

325

es
OS
OS
OS

OS

K

O~

DS

as
OC
-001

20110 '''S~
20120

VERSION 2

FOURAN 11-0

"48
I

4
8
I
4,0001

,.-)
4,1

2l
2J
12

it

21
12

Zl
Zl
U

12
U
U
JZ
Z6
U

Z.
16
16

44
])

15

000-5
OOOJI
00000

".U

IInl
11.4)
00000
00099
lin.
00000
00099
lIUS
lInl
00000
00099

000.2
11911
"96)
00092

1191'

".11
".u
".15

000.2

11961
OOO'Z
1I961
11.U
UUI
lIU.
11511
11544
0
lUll
lUll
0
U51.

11.21

00000
00001

"nz

OOOJZ
000J2
JI'U
OUOO
J194J
000-'
1I01Q
00000

1I
14
46
1I
49

1I01l
1I0)Q
116.2
10545
1I604

000-)
0-000
01200
000-1
00000

26
26
II
12

12
4'

1I146
lInl
IU51
1I146
00000
lion
1I616

.'OJI
1I." 1
000-1
OOOJI
00000
000-)
00000

11712
11114
Il'"
11108

16
21
17
17

IUOl
11101
0905C
0.050

0-14e
10545
-0000
0-1l4

IISl0

11

09050
IU16
09050
01261
04l0J

0-140
11944
0-104
-Z219
00000

lI'144
0.050
,,944
lU)2

ODOOO

12
12

.
II

usn

PAGE
45

11
16
49

J2
21
11
49

II.'"

11941
00000

4
4
4

"4
4
B
4

•
4
I
4
I
I
4

11919
11996

0
4

-001
20110

DC

20140

DC

-001

4,1

11000

4

4,0

12004

4

4.0·

12001

4

4,0

UOll

-DOC
20150

DC

2016Q

DC

-000
20110
20110
20190
20100
20810
20110
20UO
20140

....

-000
.,0
DC
-0000000
4,0
DC
-000
1,0
DC
-0000000
DC
4.0
-000
DC
•• 0
-0000000
DC
4.0
-000
DC
1.0
-0000000
DC
I,'

ASCAN tOOE
20150
20 . .0 ASCANI tF
TlINO

12020
120Z4

4

l20U

I

120J'

4

12044

I

12041

4

12016

•

uon

326

no" u

02609

41

00000
000. .
0-001
000"
JI9I'
JI9IO
1I51'

lUll
11501
11011
110)1
11616

118)2

4
B

DC

Ii

"AGE

02620
lIHO
11224

14
46
16
II
4S

11144
11156
11 . .1
11116
11816
1111.
11'100
11'I1l
"'20
11.21
11921
lI.lI
11.15
119"
11941
119"
11955
11961
11961
11915
11919
11.11
11911
11992

""44

as

1I104
IU16
1112.
IU40
I115Z
IU64
lIn6
lUll
11400
114U
11.,4
IIU6
11441
11460
11412
11414
11496
11501
IlS19
11520
115)2
115)1
B544
111'6
IU6.
11 SID
115"
1 . .04
11616
IIUI
11616
11616
1164.
11 . .0
11612
1I614
116'2
II6'Z
11104
11116
11121
11140
11152
11164
IIH2

. ".11
12

PHASE 1.1

PUT.140,1
lb,OI-l
PUT ,104,B
SIOC III I .2219
OUTSCE, ,6
B
DORG .-1
SF
DI- 1
PUI,OI-4
BT
Tq
DI-l,DI-3
l5
B
OORG '-1
OS
4

8T"
BNR
BT"
IFM

UJ

04

liZ"

MW) •• ,P 1 ••
SHIFT !oFf SUBSC NOT NEEDED
IIYHII,"
IIV1+lIo1,10
MV)+',ll.lO
0,0
PI,01.10
B
IIY1+12
OORG .-)
SO • 148 lITERAL SUBSCI"l, SI • 14' OlliE SUISCRI"
,,2 • ISO INO SUUtRIPTS, 53 • UI THREE 5UISUIPrs
IFM l"'II,OI4l,.,
USE FOR SUBSt" P' QPE . . TORS
A
l4'",OIMNOT
8TM pur,Q
BIM PUloIl4,I

os
os
as
os
os

01
J

11260
11212
11214
lInl

DI,99

1620-1443 I00NIIOR I
Z0450
20460 l)
10480
204.0
20500
20SI0
20520
105)0
20540
lOSSO
20"0
10510
20580
l05'10
10600
20610
20620
20610
20640
20650
20660
20610
20680
10690
20100

'OIlYlAII 11-0

TEIIP,OS,IO
,mVEIT.6,I2,10
B
MOVftl
DOIG '-4
S
04,01
M
Dl,C2
SF
92
A
04, ••
M
02,82
SF
92

looon

10010
200Z0
20010
20040
100SO
10060
10010
20010
200'0
20100
20110
20UO
ZOllO
20140
20150
20160
20110
20110
20190
20200
20210
20220
20210
20240
20nu
202&0
20UO
20110
202'0
20100
20110
20120
20no

VUSIOIII 2

SM
SII

191'0
19900
19910
19920
19910
In40
I99S0
19960
19910
19910
19"0

00000

42

162~

20870
20880
10190 UCU
20900
20'10 •
20920
20910
20'40
20.50
010960
20970
20.10
20 •• 0 AEU
lIOOO
?IOIO .sC22
21020
110)0
21040 IFStAII
21050
21060
21070
21010
210.0
21100
ZlllO
21120
21110
21140
21150
21160
21170 ASt4
21 liD
211'0 'SCll
11100
21210
21220
ll2JO
21Z,,0
21250
21260
21210
211AO
21290 A~C6
21100
21 JlO ASC)
21 llO
21

no

21140
21150 A5C7
21160
21170
?!lAO
21190
11400 A5Cl
21410
11410

144J MONI TOA

SO
BT"
ro"
CM
B""
C"
BOlt

CHI.40010
AUA
CHI.70.10
AERR

~F

our~w

""

CSOAII,"12
snOl
CHI.ll.IO

TO"
CII
IE

n"

TO"
Br"

""

UlO"

1Z010
1Z012
1l0.4
Ill06
Illl1
IllJO
1Z142
12154
IZI . .
12171
12190
12202
12214'
12226
1221.
12250
11262
11274
11216

·.24
EAKeR. 176.9
OMM.O

PUT,
IH.I.fQUAl
0I0PAA".00.10

rFIO

AStI40u.FlI~r-.

tlll-I.CHIOI

•• Z4,tHltZ

EUOA. HI.9.
MISSING OPEUIID
CHI.40.10
A$t1
CHI.20",0
I~E
··lt4
ITII. PUt,
U •• I.UNARY III NUS
rR
CHI-I.tHlol
IFSCANoll
DORG 0-)
tM
CHI.1U.10
8E
IFSCAOI
CIO
CHI.24,10
8~E
ASC6-24
BO
..... ,FNTSWl
PARCNT.
1.10
A"
124.I.lEfI 'AREII
8T" PUT,
0
IHCAII
DO~G 0-1

Ill"

12110
12122
1l))4
12)46

1115.
11370
123.2
121.0
11)'0
12402
12414
12426
12431
12450
12462
12474
12412
12482
12494
12502
12502
lHI4
12526
I2BI
12550
IH62

•

...

8
OORG
CM
HNE
CM
B~H

SF
8TII
BO
80
BO
K.. R
C..
BE
8T ..
C~

Hl
BT"

TPARtT,l,lO

A5C23024
0-)
CHI.hlO
IF 5CAll024
CHl+2.6:9,lO
I FSCAII+24
OUT5M
CSOrt .. , •• 12
A5C •• FIITSWI ••
ASCII,F'HS ....
.'CALL.CALLS ....
ASCI.CHI02.
PARCNI. 0.10
KEGIN
ERItOR.17Cf,~.

BRANCH IF COllECTlIIG FUIICTION PAU"ETER5
ft.ANCH IF S'''IUl WAS FUllerlOIll ",liE
RErUR" 1O CAll ROUT INE

UIIULEIICEO PUENTHESIS

CHI t JO.l0
•• 24
!RROR, )78.'1.

PAGE

PHAs[ I-I

"'

1620-144) IIONI lOR I
21430
21 •• 0
11450
1I.60
11470
21480
21490
21500
1I510
21520
21510
21540
21550
11560
21570
ll580
215.0
21600
21610
l1620
21610
71640
11650
21660
21670
21610
116.0 45C24
21700
21710
21720
21710
21740 ASC25
21750
21760
21770
21710
21190
21800
21110
21120
21810
21140
21150
211'0
21110
21110
211.0
2UOO
2UIO
21"0
21 no
11940
21"0
21"0
Zlno
21 . . 0 IUCALL

Fel"UN 11-0

"24.1110'."0
EnOR1.51.i.9.

"

SHR
17M
t"
III
tM

YERSION i

IOIVALID OPUUOR

V£R5ICN 2

FORTRAN II-e

.

3 'J ~,

I2nc

17

0.150
UI1.
12550
UI1'
12J.O
0.050
UIlI
12216

49

UIJ9
12274
15139
12502
llU2
02615
0'050
12274

OOOJO
01200
OOOU
01200
10001
000-1
0-124
00000

II
49

146.1
12462

ODD-I
00000

14

15119
112.1
15141
122.1
01014
05704
14516
IH54
13242
11651
02615
02626
09)50
15119
12n4
0.150

000-)
CIlOO
0000.
01100
00000
J2574
10001
10000
lOaD.
15141
000-0
01200
OOl79
OOOlO
01)00
OOlTl

120U

\1
15

09406
10007
1511.
12214
uln
122U
010U
05704
05641
1511.
12226
0.150
10007
0'050
luoe
14644
1511.

..

14
41
4'

12
17

IS
14
4'

17
IS

17
16
16

11
14
46
14
41
17
11
49

.

14
46
41

43
II

17

41

14
41
)2
17
4J
4J
4J

45
14
46

17
14
41

17

PHASE 1-8

C..
BE
CM
BNE
8TII

CHI.14.10
'SC2)
CHI.l0.l0
e.12
PUT.
110. I. ADO
8
ASC24
OORG 0-3
C..
CHI.20.10
BNE •• 12
110.R.SUITRACT
BT" pur.
R
A5C24
DORG O-J
C..
CHI.21.LO
BNE e+)2
BIll PUT,
121.1.0IYIDE
K
A5C24
DORG o-J
CII
CHI,14.10
8~E
'5CH
CHI+Z.l4,lO
C"
BOlE A5C24-12
115. B. flPONEIII" ' l
8T" PUT.
TR
CHI-I.CHlol
•• 20
8
DORG o-J
MT .. PUT,
114.1.~UlTl'LY
TR
CHI-l.CIII-1
CHI.40.10
C"
BH
A50
B
ASC4
DORG 0-3
C..
CHI,lt,10
·.)60
RE
80
ASCl81.fNTSNI
I"VA~IO OPERATOR
81" ERRoa.H'.9.
BTII PUT.
104.1 •• IGMT PAllEN
BO
fOlrsWI
·"32.
,aRCNT. 1.10
SII
•• 20
8
DOItG 0-)
IP.aCT. 1.10
5"
CHI-ItCMI_1
U
8111
ASC1-U
.OIH • +ft8
eM
CHI. Z4. 10
8111E A5C7-24
8111 E. . O•• 11 ....
CII
"RCIIIT.0.10
SHE ·.24
BO
oursU.lf511
CHI.24.10
C"
.-60
8E
80
ASCJI-12.'"75111
ASC1
DOlt' 0-1
fFII CAU +21.CALU

12~74

12516
12598
12610
12622
12614
11646
12651
11610
12612

45

OUIO
00N12
00001
000100
01100
OOOPO
01)00
00000
J2111
00000
OOOll
01200
OOl76
00000
0-lll
000-0
J4691
15140
15141
OOlTl
000"0
01100
00010
01200
0-11'
15140
00000

U

PAGE
12694
12106
12111
12710
12142
1215.
11762
12162
12774
12116
12798
12806
12806
12111
11110
12842
12150
12150
12162
12114
U8I'

unl

12.10
12.22
12910
12910
12942
12954
12966
12"1
12.1.
12916
12. .1
UOIO
\J022
11014
\JO.,
11051
\J010
U01l
UOU
\JOtO
\JI02
UII •
UU6

tllll
U"O
UIU
UI1 •
Ul16
UI"
U210
UZZZ

•

un.

3h

IIZ.Z
IIl.Z

151 )9
124U
1511'
12162
0'050
12942

ooou
01200
OOOJO
01200
0-110
00000

14
47
17

1513'
12106
0.050
12'.2

OOOKO
01200
0-120
00000

14
41
17

151)'
12no
0'050
12942

OOOKI
01200
0-121
00000

14
47
14
41

151)9
ll ...
15141
lU10
09050
15111
12942

OUOJ4
01200
00OJ4
01200
0-115
15140
00000

09050
15111
15119
1Z550
11414

0-114
15140
000100
01100
00000

15ll'
11014
14422
OtUO
Ot050
1)071
OUU
110tO

000-4
01200
10001
OOlf.
0-104
10001
000-1
00000

14
46

14
41
17
49

.
..
.
17

JI

17
U

14
4'

..
49

14

41

17
17
41

IZ

••
12
11
•1
U

I.
41

11
I.
•1

I....

UB'

IU. .
1)162
l'l)t
un4
09UO

OU"

49

Ult'
I)UZ
1,.,.
UUO
I •• "
In. .

16

101"

--.,••
I.

000-1
151.0

onoo

01100
00DA4
OUOO
00l1l
000-0
OUOO
1000'
00011.
01100
10001

-

J14. .

4)

44

1620-IH) MONITO_ I

VE_SJON 2

fOUlAN 11-0

.......
.....

......

......
......

32[1

1620-144) MONITOR I
22550
22560
22570
22580
225'0
22600
22610
22620
22610
21640
22650
22660
22610
22610
22690
22100
22110
22120
227)0
22100
22150
22160
22110
22180
22190
22.00
22110

8T~

ASC12

ASCER

8TM
TFM
TR
TOM
CM
8NE
8TM
8
OORG
CM
8NE
TR
eM
aH
eM
8E
CII

VERSION 2

FORTRAN 11-0

•

11754
11166
117n
131'l0
13B02

00000

16

10119
10296

Jl672
00000

IH06
0'150
0"41
OlUJ
10001
OU25
0'050
09050
14091
09050
1511.
llU.
09150
1511'
1)426
10000
1513'
13426
010)4
05104
13426
1409)
0"11
0'910
02112
02)lK
04419
044IR
1513'
ll6l6
Ull'
11426
0'050
1)402

05641
OOL71
00000
00000
00000
01201
0-1)1
02624
000-0
0-U4
15140
15141
OOLl6
000"0
01100
00000
0000'
01100
00000
Jl522
02611
000-1
000J4
00000
000-2
0"11
000-5
0120'
000-4
01200
OOOK)
01200
0-123
00000

0'050
1S13!
02625
0262N
OOl"a
12190

000-4
140'3
OOOOJ
00000

"
4)
11
Jl
U

15
26
17
21
16
17
11
45
17
14
41
15
14
U

)2
17
41
II

16
))

II

26
12
26
14
46
14
41
11
4'
17
II
II

26

.,IS
44
II

26
14
46

.-]

-.24

CHI-I.CHI'1
CHI.40.10
ASC21
CHI t ).10.
'SC21
CHI.24.10

TPARt T t 1.10

AStl2
.-]

OUTSW
2.0,·

un.

140'4
14106
14118
14UO
14142
14150
14150
14162
14114
14116
14191
14210
14211
14ZU
142)0
14242
14254

'SC27&. NOPU"
FNTSW20l
CSORN ... 12
fNTSW2.0
ASC2'-12
.-)

TE$T FOl 'lUreD FUNCTIONS

.-)

CHI.23.IO
&St28
12 JoI.eOIl.. A
PUT.
CH1-l.tHI.l
"20.NO"lM

)2

01034
2

00000

44

14150
01405
05104
01405
14116

14100
00001
J4110
00000
00000

05704
14100
14026
14626
14UI
14026

J416Z
000-1
OUOO
10000
15141
00000

15119
lUll
0.050
1'1)1
14U6
UIl4

OUOO
a-In
U140
14100
00000

HZ ..

14100
14026
nl74

000-0
01200
00000

liU'
14162
10001
lUll

000-4
01200
00001
00000

IS
14
41
11
49
14
41
II

14
46
14
46
14
46

11
11
Jl
II

4'

15
11
15
4'

11
II
41
43
U
49
14
41

11
Jl
44
49

14271

•• )2
'NTSlll,1
AStl

HZ ii, I"
142. .
14110 4.
lUll
lUll '14
14110 4'
1414Z 11
14114

lUI.

33t1

01100

OOOJO
01200
15140
000"0
01100
000-)
01200
000K4
01100
00"10
0-124
15140
000-1
00000

17

16

nell

.-)
NO'llII.0.10
AStEl
ASCIZ
.-)
CHI.4.10

ooou

15119
11"4
15111
15119
14012
1'119
140.2
15ll'
14011
09150
0'050
I'll'
1469.
Un4

II

CHI.IO.10

10000
000-2
0126J

00-1'l
0-1l4
000-1
15140
00000
OOOKO
01200
O-Il'
00000

13&50
13862
13814
13816
1)891
13'10
13'18
13'18
1)'30
13'42
1)954
13'66
1)911
1)9'0
14002
14014
14026
140)8
14050
14062
14014
14012
14082
1409)

CHI.20010
•• )2
PUT,
129 ••• UNUY MINUS
-+32

'04

PAGE

CHI-l.CHt·l
FNTSW,Q

eSO'RN ••• \2
NOPAR".I.IO
,seER
AseI4.FNTSW ••
e+20.tHI+2
&SCER

14606
07261
14100
1513'
11126

...

••

U

lSittO

0'3'0
OOl050
14698
15118
10000
1511'
11'11
0'050
13'42

11

e·24

•

uno

1)642
1 )654
1)666
1)61R
U6I6
1 )6'6
I)'"
13110
11122
1]7)4
1374&
11754

10)44

13114
13826

ERROR,.70,9,
INVALID FUNtfiON P"AIIETER LIST
PUT,
124.S.LEFT PAREN
CHI-I.eHI'1

•

1)212
U2'4
1))06
Ulli
U))O
1))42
1 Jl'4
1))66
unl
ll)'O
1 )002
U414
U426
1)011
1)450
1)462
U414
1)486
11491
11510
U522
115)4
lnu
US!I
U510
13582
1 )5'4
U606
1)618

4'

PHASE 1-8

FUNtT NAME NOT fOLLOWED ay LPAREN
PUT,
lH.8.LEFT PAREN
SET UP lEMPCRARYPAREN COUNT
lPA~CToI.l0.

8TM
8TM
TR
A"

OORG
'SC21 SF
DC
"NT
-0
8NF
22120
TOM
228)0
8TM
22'40
TOM
22850
22860
8
DORG
22110
22eRO ASt276 8TM
SM
22890
8N
22900
aD
22'10
22'20 '5C29 8NR
229)0
OORG
22'40
CM
22950
BNE
22960
22910 ASClO aT II
T_
22910
aNF
22.'0
2)000
I
DORG
21010
til
23020
2)OJO
IE
23040
DORG
230'0
2)060 UClI til
IE
23010
nOlo
TOil
no.o

1)254
1)262
1)262
U274
U211

ERROR,Q7ca,9,

BE

8

PAGE

'"ASf I-I

B
tall
ll"O
22000
OORG . - )
22010 OUTSI2 IFM IF·2JoOUTSN·U
22020
8
IF
220)0
DORG .-0
22040
ENTER HUE TO ,OUTPUT SINGLE STATEMENT FUNCTIONS
22050
22060 ASC21 10
.e24,STS"
22010
111M ERROR,Jl',9,
SINGLE STATEIIENT PMECEEOEO BY OTHU STilT
220~0
CF
SHN
SF
SIIIUH .,6
220'0
22100
TOM OMM,O
IF
22110
TEMP •• S .. IOD ••
SAVE SYIIIOL AOOlESS TO "aVE IN NO.Of PAR
11120
8TM PUT.
Ul.I.ARITH STATEIIENI FUNCTION
HI
22130
PUT. TEMP5-1 ••
OUTPUT SfIlN' N'''E
TFM PeNT.0.l0.
12140
INITI'L """UU COUNT
22:50
8TM pur.
124.'.LEFT PAREN
12160
TR
CHI-I.CHI+!
22110
8'1R •• 24.tH'+Z
8TM UROl.)".'.
221~0 ASC26
INCO"'LUE STAre"ENT fUNCTION
CM
22190
CHI.40.10
22200
8NH .... 24
22210
TD" fNT5W.0
CM
22220
CHI •• ',lO
8H
1223D
'SC26
22240
SF
OUTSW
8TM CSOR ... ··12
22250
80
22260
'SC26.I'ISW
AM
22270
PC"",1.10
TFM SVM+Z,14,lO
222'0
CF
SVM+l
222'0
22)00
NKLOC .2010
'M
TF
22110
~ILOC,S"".2.b
22120
STAFf.SolO
S"
IF
SUfT.SMAOD.6
22HO
22)40
CHI.04.10
C"
22150
BE
··1}o6
CM
22160
CHI.Zl.10
22)10
BNE HC26
8TM PUT.
121 ••• CO .... ,
221.0
B
ASC26-H
22190
21400
DORG . - )
8TM pur.
22410
104.8.RIGHT PAREN
TR
CHI-l.tHI.l
22410
A~
TEMPS,It,tO
22410
TF
2HOO
TFfiilP!hP''''.6
TOM SINGSJ,l,ll,
22450
SET SINGLE S""T SWITCH. SWlTtH TESTED
IN PliTT I~G OUT SUBSCRIPTING
221160
8
"'EAR-21t., t
22470
OO~G .-1
ENTER 10 OUTPUT SINGLE STATEMENT FUNCTION C'LL AND
224~O
FUNC II ON 5UaPROGU~ CALL
224'0
8~F
AStl1,FNTSW ••
22500 ,sca
NO FL'G INDICATE FU"tr ION SUIPROGRAM
AM
SMCNr,l,lO
22HO
NOPARM,
SMCNT,
11
t
MOVE NO. OF PARAMETERS TO COUNTER
22520
IF
CHI,24,lO
225)0 'SC 15 CM
e+24
12500
8E

ooou

46

1610-IHJ
13100
2JlIO
lJlIO
2Jl JO
2Jl40
lJl50
2) "0
2H70
lHao
111.0
n200
lUIO
2121U
21210
2J240
21250
11260
21270
1)210
2U'0
2HOO
2))10
2JJ20
2) no
2H40
21150
21160
2U70
2Hao
2H.0
2)400
21410
11420
214)0
2J44D
11450
21460

DO.C
8TM
SM
TR
IN
IE
ASCle! CM
8E

~O"l"OR

I

VUSlO'"

fO.UA". 11-0

A~CU

•• 5'

21410
2)4'0 CLASfN
2noo
11510
2)520 TPAMCT
21510 IIOPARM
2H .. 0

CHI.2), 10
ASCJO
1"11 ASClhH.CHltl
A
ASCER
DORC • -J
asC'-tl."IOPA'"
CII
ASC 14tll.H I S T-9" TEST If NEST LIST IS EMPT'
8'1E "12
TOil '"TSWI
ITCALL-44
8
DOli' '-J
TI
"nCT-I.ASCI4tll, II
S..
ASCIUII,5,10
I
AScn
DORe '-J
CM
"IO,.U,OolU
8l
ASCJl
R
ASCU
DOIC '-J
TOM FtUS'H.O ..
I
ASC29-1l
DO.G .-J
HM 1I0PARM.0,IOll
8
ASCU
DORG '-1
~NTEM HUE TO SHIf! PAU~fTER LIST DO.~'" FO' "IESTED CALLS •••
AM
•• 11,5.10
IR
FLIST-9.TPAICT-I.Z
8
ASCI
OORC '-4
TFM ASC 1. . Ift.FLI ST-9
8
IFSCAN'12
DORCO '-4
TFM NOPUM.OO.IOII
8
IFSCA~-12
OORG '-4
OS
2
OS
2
DC
I.'

2)550 FL I ST
2)'60
1)570
2nAO
2)590

OSU S.20
OORG 16000
TFM IORr.·.21
IOPT.HLK1,1
s
IH

2)600

reo

ASCll

A~C9

asCII

......
ASCI4

IFASEN

HUu

.11'

OUT or CORE BLOCK 4
UUTSC

21610 •

cu
10 OTHU THAN OISK
DORG lOUT
C.
CHI ..... IO.

Ib20-1~4J

2)640 •
71650
n660
nb70
llb80
216'90

100"E~

Tr.
8T.

FMON+J5,BLK2

21100

rr.

2)110

8TM
TF.
BT.
TF.
8T.
TF.
BT.
TF"
aT"
TF.
ITM
T'"
BTM
8"1F
a
TF"
erM
Rn

COllllAlNS THE

MOfU lOR

B

'''UI

I .....
1"4"
1"411'
14 ...0
IUOZ
14514
IU21
lUll
1451"
IU. .
1"554
IU5"
14566
14571
IU. .
145 . .
145.1
IU06
IU06
14611
14U6
14626
1461.
146'0
14.,7
",.,1
... nD
14677
IU7A
14690
146"

......

2J720
2)7JO
FMON+)S.8LK6,.
2J740
2)750
FMUN. IF
F"ON.)~,8lk6"
'1760
21770
F~ON.COTO
217AO
FMO ... JS,AlK6"
F~o"..tALL
731'0
FIItO,...J5,8Uf.6,.
nftOO
F,ON.RETUR".
2J810
Hila
FMON.)5. ILIl'"
2)IJO
F~ON.'OR~AT
DOLOOPt)6. TRIIIIO.,
23840
OOLOOP
2J850
FfifON+J5,IUr.J, ,
2!860
lU70
F"OIl,ASCA".
HIRO
SCI.SINGST"
!.."lITSCl
21890
U
2).00
TF~
FMOlt.... ;c •• LK5 ••
8TM FMON.OKIO
2J'I0
11.20
uUTSC CODE I 5 "E~,
239)0
DORG ASC'NI
2)940
OUTPUT DO STArEME".TS
n950 DOLOOP TDM TlIND.O
2)960
.0
"24.1101110
2)970
ITM URuu.nz,.
2,..0
iHI.44.10
C"
PERI
219.0
.".E
CH!+Z., •• 10
CM
24000
2.. 010
ME SPEIIR
80
"24.1"10."
2"OZO
ITM CICNTU. 0.10
240JO
TDM STSN
24040
CHI-I.CNIt)
TR
140'0
24060 DO.
CM
CHI.'9,IO
•• 24
BN
24070
1 .. 080
.T" 1I1I01I.2n.9,
ITM PUT,
101.1,00
2 .. 0.0
SF
DUTSM
24100
BTM CSTIIO •• tU
24110
SMAD[,.
1,10
AM
2.. UD
OCJtK
24no
I
lXII'
•••
)
24140
TDM SM"DO.I.,t;
Z4UD
eM
CI" .40,10
24160 DOC
MH lICel-lI
24170
241.0
tNI .... IO
CM

n

09050
IU ••
unl
14026
144 . .

0-104
000-1
15140

14

onoo
OUOO
un. ooon

'49"

14142
IUU
1"026

01200
151"1
00000

"4
I"
"7

lUI"

lUll

.
,,U

11

U

49

nita

14100
JU.7
01200
00000
00000

11

I . ."
146""
1"ltI

I"'''M
000-1
00000

...••

I"

14100
14411
14026

000-0
OUOO
00000

••

15

10001
141 . .

00000
00000

16
49

14700
IH.O

000-00000

II
JI
49

1"644
JU.7

un ..

000-5
l46n
00000

16
4.

146""
122 . .

J .... 7
00000

..."

14700
12261

000-00000

I ......

U

10001

12
49

U

... 700
14701

5 I
00565
005)2
00000
00000

16
4~

...
)6

20
J60lJ
-9"1
00500
00000

FO~LO"IIiC

33J

VERS IO~ Z

FORTRAN 11-0

~O"'OISK

lOUT.

10200
10200
10212
10224
102)6
102U
10260
10272

lie

DI~

COM'OI;
IF SUNT
COTC
CAU
RETUIN
FOUAT
DO ST ATEMENT
AStAN
OUTSt
~ISK

_ACE

PHASE 1-8

F~ON.NUNAU

FMON+)5,BlKl"
FMON,DIM
FIIION+)') "8Ull,.
FMON.CO"MON

IU6'
14'61
IUH
IU16
IUtI
14410
lUll
1441"
I"""

14706
16000
16000
16012
16024
160)6
16000

IbOOO

2)610 •
21620 •

'AC.

'HUE I-I

'-J
PUT.
104 •••• "HT pnEIl
"nCTol,ID
CHI-I.CHlt'

I".PUT/OUTPUT

......
16

11

16
11
16

102a~

11

10296
1030a
10320
10))2
10"'.
lon6
10368
10)10
101U
10 .. 0 ..
10416
104Zft
10440
10452
10464
10476
10""
10500

16

17
16
II
16

11
16
17
16

n

".
44

..

151)'
1l17Z
02159
02)14
0215'
02)2"
02)5,
02J24
02)59
02114
02)5'
0212.
02)59
02)24
0215,
02124
OU59
0212 ..
12094
12051

16

17

4J

16

17

on59

02J2 ..
10 ....
10512
02159
0212 ..

000"4
00000
-9645
J0224
-9622
J024!
-9622
J0272
-97)7
J0296
-'7)7
JOllO
-")1

JO,...
-91)1

JO,6I
-96Z2
JOJ9Z
0260.
00000
-'66a
J0440
0. . . .
00000
-9714
JO ....

12051
12051
12070
"' .... 7

.;.::

......

III II
12110
'H4l

.

.;~ ~.

I ' ! ••
lUll
1l19O
12102

UU"
UU.
unl
uno
11261
12214

"CDltIlECT DO SUntlE".'

s n " LO. IF MDT SIT DO IU III TAIU

lUll
lUll

liZ..

12106

33Z

lUll

15

DUO.

4J
11

120...
09406

1511.
0'144
I_
47

1~141

0.144

U

121 ..

11
IS
II
14

:4142
C'J'4'

.

15U~

11
4.

15n9
UU6
09150
09010
01014
Ot4U
01101
12ltO

U

01100

"17

17
12
17

. 14

41
14

00000
01610
OON72
000""
OUOO'
000116
OUOO
OZ424
000-0

oeooo
15142
00009
01100

DOlIn

0-101
OOMO
JZn2
000-5
00000

UU.
12111

OOGOI
Il00II0
01100

Ullt

00009

...

1620-144) NONlroR
24\90
2UOO
2UI0
lU20
24230
24240
242S0
24260
24210
2UIO
242.0
ZHOO
24HO
24no
2U)0
24)40
24350
24360
24310
24180
2UOO
24400
24410
24420
244)0
24440
24UO
24460
24410
24480
24400
20500
24510

UOCK

OOCI

OOA

U08

I~E

2~520

BTN
TR
CN

24510
24540
24550
24560
24510
24510
245'0
24600
24610
24620
24610
14640
24650
24660
24610
14UO

8~H

CN
ROIH
SF
8TN
81
ftO
B
OORG
8'11'
R~F

2-'6110

14100
14110
24120
241)0
24140

IH
8TN
IT
BO
UM
BO
SN
80
8
DOle
8UI
CM
B.. e
lIN
IR
CF
CF
CN
8NH
CM
INH
SF
SF
8TM
80
8
OORG
8Nf
IF
CN
BE
C"

U~E

C
8L
CM
BE
8"1R
BO
8
DOMG
C"

OOtK-ll
CSORN, •• ll, •
PUT. SMADD-I
DDC I. FXDRH
ERROR,2' .... 9.
00CI-12, S~AOO.II
SNAOO.
2010
DOC.
SNAOO.II
00C-12

BE
80
B
DORG
ITM
IR
CM
B~H

FORTRAN 11-0

'HASE I-I

flOATING PDINr VARIAIlE FDR INOEl

.-)

DO REFERENCING ILLEGAL STANN I ND
rEst FDR EQUAL SIGN NEXT

CHI.JJ.1O.
00+24
PUT,
U).8.EQUAL
CHI-I.CHI+I
OOA

I.,

1 },.~ ..

I N1 TI AL liE SWllCHES

Dna
CHI.40.10

nOC"-12 •••

lEST FOR UNSIGNED VALUES

CHI.69.10
•• 24 •••
OOA
outsw
(SOltN, •• IZ,.
··20,FXOAFl
00CK-12

COLLetT AND CUTPUI FIRST INOEl

.-)
D08,DOA

ooreST,SVIII

SY".0.10.

lEST IF FIRST INCU WAS lERO

OOC:K-12
CHI. 2), La
00+24
PUT,
12J,I.CO"N.
CHI-I.CHI+1
CHI.leO.10
00CK-12
CHI,09,10

··z,..
008

C!tOA,.,·.12
PUT.SNADO-I
·'20,FXO"fL
00CK-12
·-3
.'11,008
•• )6,001
SYM,DCreST ••

DOCK-12,,,

TEST IF SECOND INDEX IS GREATER DR
EQUAL 10 THE FIR~r IF 80TH ARE CDNSTS

5''',0,10
00CK-12
00F,CHI.2
OO+Z4t,JOSw, ,
8EGIN
'-1
CHI .2.J, 10

•• J2
IOF,IUSW"

1/0 CANNOT END HERE

3:J :J

VERSION 2

FORIRAN 11-0

RETURN TO 110 SCAN

00+2"

PUff

12J,I,CONNA
CHI-I.CHI+1
CHI,IeO,10
00CK-12
OUTSW
eSORN"+12
S"CNI.221.
00+24,. ,
SUBSCRiPtED YARlABlE IN DO
··ZO,FIORFl
OOCK-12

......

•

33',

....

11
2J
4J
\1
43
12
43
4.
17
14
41
11
II
))

33

12518
12510
12542
12554
12566
12511
125.0
12602
12614
12622
12622
12614
12646
1265.
12610
12612
12694
12106
12111
UHO
I214Z
12154
12166
1211A
121.0
12102
12814
U122
12822
un4
12846
12858
12810
12.12
12194
12.06
12911
12.26
12926

14
41
14
41

12918
12950
12.62
12910
12.10
12.12
12. . 4
11006
13011
11010
13042
n054

·-3

46

12~06

PHASE I-I

SF
8TH
CM
8E
80
8
OORG .-)
CII
SY",0.10
ftE
ODCK-IZ
110
IOF.I0SW ••
8NR e+20 ,tHI+Z
8
8EGIN
nORG .-)
.8TM EItRORl.571,q
BEGIN
8
DORG '-3
OS
10
ENTER HERE 10 OEeO~POSE 110 STATEIIENts OTHU THAN DIS.
,OIE
OUtpUT REAO SYIIIDl
IF" IOUTl+11.112 •••
TR
CHI-1.CHI'1
8
10UTl
2~040
DORG . - )
25050
CM
CHI.5S.10
25060
8NE 10UTl
25010
CHt+2,61tIO
25080
C"
,+24
Ie
250.0
25100 IUUTER BlM ERRDR.H,'
TFII IOUTl·Il.1I1.1.
OUTPUT 'RIIIT SY\IIlOl
2~1l0
CHI-I.CHI.)
n
251Z0
1
IOUTI
25130
DORG .-)
25140
CHI.4S.10
25150 10Urz CN
INE
loun
25160
TR
SHIFT OfF E
CHI-1.CHI.I"
25110
. CII
CHI .... 10
25110
INH loun
251.0
TFII IOUTl.Il.01U •••
OUTPUT T"E SYIIIOL
25Z00
10UTI
25110
DOIIG .-)
25120
25no loun ITII tOlNAII.Z.IO
SYII.4n •••
25140
CII
IOUTER
2USO
'Y
10UT4
INE
2"60
TFI! 10UThU.ll ••••
OU,'U, 'UNCI! SYlllIOl
uno
CHI-I,CHI.I
25110 loun
CIII
CHI.II.10
2"90
INE loun
25100

'"

'AGE
12no
12)42
12354
12366
12311
12]90
12402
12414
11426
12414
12414
12446
12458
12410
12482

COLlEcr DD INOU SYN8Dl

ERROR,211t,"

162D-144) NONIIOR
24150
24160
24170
241RO
24190
24800
24110
24820
241)0
24840
24150
24160
24110
24"0
24190
24'00
Z4910
14920 UCFE
249)0
24940
24950
1496Q
24910
24980
249.0 DOTEST
25000
25010 IOUTEN
25020
250)0

YERSION 2

)2

u
\1
4)
4.
44
26
14
46
14
U

UI.O

u.oo

U.lI
U .., ..
UUI
U ....

n ...o
U411

\2446
O')~O

00K1~

12414
01201
122.4
122B2

071i:O

ooooe

0'150

OOK1o\

I~IIO

oeOll
01200
)-IH
I ~ 140

12214
00050
ISllI
12518
12610
I5ll'
12n.
1'1l9

un.

lUll
010)4
05104
12622
12)1'

r.c:· .07 zrc

ar.eco
00000
OOONO
01100
0000.
01100
00000
00000
J2602
064\9
00000

12610
12518
13111
01100
000-0
01200
15141
10011
00000

14

15ll'

OOOK)

46
4)

..

U910
14210
12214

01200
10011
00000

\1
1\
14

09050
151l.
UIl9
1231.
010)4
05104
01261
U214
LJO"
lUll

0-12)
15140
0001110
01100
00000
J)042
-221.
01200
0641'
COOOO

09.1.
lUll
14210
\)142
OUU

000-0
01200
10011
15141
00000

11

0940.
OZU6

OON13
00000

41
16

n216
n,.l
l'lll
11556

01200
0-112
15140
onooo

15\J'
1)101
151 .. 1
nan

000.. '
01200
00001
01200

14
41
J2

..
11
21
41

..

41

12
11
14
46

14
4'
43
45
H

..
..
11

14
41
14

...
...

JZ19~

01201
06419
00000

PAGE

10

11
16
11

onlo

11511
1511.

uu.

0-111
15142
00000

I"

1S1n
1U••
Isn.
lln9
lU ••
lUll
lUll

00011'
01200
15140
0000.
01100
o-IU
00000

a.IIZ
11"1

000-2
011141
01400
01200

lUll
1'1'1
Uln
lUll

15141
00001
01200

u

11
14

u

16

••

."",.
11

It

1"

u

099"

UZ..

40

J2)~4

12194
12110
09019
12)1'
09019
1231.
12926
12214
02626

U

4'

UI ••
lU"

01201
0641.

44
44
24
41
14
46
45
41

11

)1
14

It)

lJZII
UIOO
lUO.
lUO.
11120
lUJZ
u n..
'UII
lUll

090~0

12511
0.919
000-0
01200
OOOK]
01200
0-12)
15140
000110
01100
0000.
01100
00000

1'066

U211

01100

12610
13111
09919
1231.
1511.
12214
09050
UUI
15U'
12311
Ull'
12111
12610
05104
0'050
12122
lUll

11011
11016
11016
11098
13110
I1UZ
11\34
13lltZ
lllltZ
13154
13162
UUI
UU2
tlll4
UI96
U20.
Illl6
U216
11221
llZ .. 0
112U
Ill"

12)1,
05104

00-11

o-;u.

50

~ONITO~

Ib20-1003
25110
75120
isno
25140
25)50
25160
2SHO IOUlI
253"0
2S 190
25400 IUUT4
25410
7H20
25410
75440
2HSO
2H60 TPeST

aTM
C
BV
8~E

TR
AM
8TM

VERSION Z

FORTRAN II-D

OUTPUT 110 SYMaOL

PUT" •

25410
ZHao INOUT
25490
2>'00
2'510
255Z0
25530
25500
25550
,,560

INour
OORG '-3
tM
SY"'t~76J,'
flV
IOUTEM
SNE
IOUTER
TFM. IOU 11011 .0116 .1.
OUTPUT ACCEPT SY"80L
B
loun
OOMG '-3
8.6)4l571t'l, •
ot
TAPe
0141S14S
UUTPUT INPUT-OuTPuT LI STS
CM
tHI,69.IO
•• 24
IH
ITM EARnlll,l7,,9,
STnEME~T ~UMleo MISSING
SF
OUTSW
TOM 10SW.1
STM C SiNO •• 012
AM
5.. 100,4.10
•• )2.I~SW
80
TOH SMlOO,l,b,
SET OIGIT FOR FOR~'T ST'~NT NU"SER

i"'J'i70

B

15580
25590
25600
2561 0 10'
25620
25610

CORG '-1
80
•• 2-., S.. AOO. 11.
aTH ERI(UR.277,9,

......

t!)6~O
}~650

15660 IDLER
25610
Ltj6RQ

75690
IS 100
75110
25120
25130
25140
15150
25160
25710
75180
15190
l5800
25810
15820
,5810
2'iA40

B

......

"~R

8
OORG
CM
aE
8TM
arM
TR
CM
8~H

JU~

CM
8H
SF
STM
TFM
eM
8Nf
'M
IHM

IUO

TR
.M
CM
SE
CM

··j2

•• lO.CMI+Z
8EGI~

CHI.ZltlO
•• 2'"

pur t

108
CHI ,6'1, 10
IDLER
OUTS.
C SORN,I 0'
IOlOQt».O,lO
CHI,24,lO
IDLER
PARCNftltlO
PUT I
124.8.LEFT PAREN
CHI-l.tHI.l
IOLOOP,I,(O
CHI.24,10
lOG
CHI,40,10
loao12

CM
8H
Sf
DC
-0
aTM

CHI.69.10
IDLER
OUTS.

"~R

··'o,sllllc~r.l1

1620- 1443 MONI TOR I

l~980
2~9qO

IbOOO 10'
26010
26020
26010
26040
l6050
26060
16070
16080
lbOQO II;F
l6100
26110
26120
16130
2. . 40
26150
26160
26170
26180
2. . .0
26200
ZUIO
262Z0
26no
26240
26250
26UO
26270 lUG
2UIO
Z6290
znoo
2Ul0
ZUZO
26130
26140

uno

263.0
ZU70
Z6310
26190
2'400

OR INVALIO LIST

~LEMfN'

121,,.,CO""'

lS8bO
25810
258"0
15890 IULOOP

l5970

CO~"A

C.HI.40,10

a~H

}')95.0
/.'1960

MISSI~G

CHI-l,CHI.1

~1j8S0

25900
25910
25920
25930
15940

TESt If STA.NT NUMSER CORRESpONDS TO F"T
STATEME~T NO. NCT • FORMA' NUMIER

1/0

.- j

ERROR,}78,9,

315

VERSION 2

FO~TRAN

11-0

P~ASf

•• +lZ,

t

COLLEtT LI ST ELE"ENT

.....

• .-)
f'"

10"T,un

1)640
1)652
116 . .
11616
IU . .
IHOO
11112
11124
I I1l1>
11141
13156
13156
11168
13110
11192
13800
Ilaoo
13812
13624
13816
13648
13660
13872
l3al4
13896
13908
13920
13932
13"4
1]956
1]968
13980
11992
14000
10016
14028
10040
14051

14060
14016
14088
14099

87
10LER" .FUNCIION NAME
CHI.2l .. o
C"
aNE
10E
aTM PUT,
121,8.CO""'
Sf
IOSw
TR
CHI-l,CH1+1
S
100
OORG '-1
SNF 10LER.IOSW
CF
IOS11
CHI,]), 10
CM
IOK+12
SNE
aTM PUT,
l)1.a.EOUAL
6D
OOA-Jo,FXO.'l, ,
8RANCH TO COLLECT 11401CB OF URAY LOOP
6
IOLER
OORG '-3
aETURN HUE HOM DC CODEING
CM
CHI.4.10
INE IOLER
6TM pur,
104.8.RIGHT PAaEN
TR
CHI-l.eHlol
SM
P"CNT ".10
8N
IDLER
SM
10lOOPtl.10
8NZ '·)2
INR IOLU-Z4.CHloZ
B
IEGIN
OORG ·-1
CM
,HI.ZJtlO
IIlE 10LU
Mil 'UT,
UJ.I.COIIl!A
TR
CHI-l.CHlol
Sf
10Sw
I
100
OORG . - )
aTM pur.
u •••• LEfT PUEN
,ueNT.l,IO
AM
,I. CHI-l.tHlol
AM
10lOO,,,.10
CII
CHI ,Z', 10
SNE 100
12 •••• LEFT PAUN
IT" 'UT,
All
''''C"T.l.IO
T.
CHI-l.CHI+1
All
IIll00', 1,10
100

001.'
001.' 16000

U'I'
1)496
11508
1)520
U5n
115••
lJSS.
US6A
13576
lnu
In . .
1)600
1361Z
U6Z.
1)63Z
un9

l-B

2, 0,.
CSOR~

PAGE

PHASE 1-8

COll'lA" . . . . O
SY".TPCST
10UTU
IOUTER
CHI-I.CHIO'
101111011.1 .. 0

3311

17

14
46
47
)\

II
IT
49

14
46

41

16
.9

14
46

IT
)2
15

IT
II
4J
U

49
H

11
45
49
14
46
11
11
]1
14
41
14
46

12
17
16
14
41
11
17
II
11
14
46
14
47

..
14
32

04662
09n9
Ill6.
Ill64
15131
09050
U640

000-'
UU9
01400
01200
ISIU
000-1
-0000
00000

09979
11264
11164
11561
1)'41

ON163
01.00
01100
0-116
00000

(51)9
13U6
09)50
070]4
10011
0541Z
01208
11156
01200
13780

000D9
01100
00K16
00000
00001
J111Z
000-4
02611
00001
00000

13110
09150
13100
Olb26

01200
OOK71
LSI41
00000

15139
13136
09)50
09050
15131
15139
1]9]2
15139
13124
01034
05100

000K3
01200
00018
O-IH
15140
OOOMO
01100
00009
01100
00000
J1110
000-0
000K4
01200
000-1
0-124
15140
000-1
000 . .
01200
OOOMO
01100

ll,n

14099

15139
1]124
OZ6lS
09050
15138
14099
151H
1 .... 6 ..
1513.
11944

PAGE
15139
1)124
01034
2

00009
01100
00000

05704
14132
13124
15139
14200
09050
10011
15131
14040

J01l2
Q126J
OOOK 3
01200
0-IZl
00000
15140
00000

13114
10011
15119
11944
09050
12412
\3124

10011
00000
OOOL]
01200
0-131
0641Q
00000

15139
11124
09050
15131
02615
1)124
14099
lH96
UIOO
02626

000-4
01200
0-104
15140
000-1
OIJOO
000-1
01200
15141
00000

15119
UIl4
0'0'0
15U.
10011
14040

0000
01200
0-123
15140
00000
00000

14100
14112
14124
14132
14144
14156
14168
14180
14192
14200
14200
14212
14224
.. n6
14241
14UO
14212
1'210

17
45
49
14
41

14210
14292
lH04
14316
141Z8
14340
141'2
14364
141n.
14111
14196
141"
1440'
14420
144U
14444
1445.
144.4
14. . 4
1447.
14 . . .
14500
14511
14524
14536
1454.
145.0

14
41

l4514

49

140. .
14040

000-1
15140
000-1
000K4
01100
0-U4
000-1
151.0
000-1
00000

145'2
. .000
. .000

I'

00'"

J60U

lun

17
32

11
49
40
]]

14
41

17
41

49

11
)I

lZ
47
12
47
45
49
14
47

17
)I

U
49

Il
11

4l
11
11

0'050
OUIS
15U.
140. .
uln
14040
090'0
GU15

U

"UI

u

11
14

II

o-u.

51

52

1620-1441 "ONITOR
26410
26420
26410

6
TRA

lOP' ,8LK4,1

TCO

16000

VERSI ON 2

FORTRAN 11-0

"GE

'NASE I-I
4'
]6
49

005]2
00000
00000

-9b91
OOSOO
00000

16

-96'1
J0200
-"4S
JOll4

41
4.
15
4'

02)S9
02)24
02)S9
OU24
OU59
02124
02)59
02)24
OUS9
02124
OUS9
02124
OUS9
OU24
OUS9
02124
OU19
OU24
120.4
120,.
OU59
02124
10114
10512
022 . .
l3U2

12950
11110
11110
11112

H

141'6

10011

41

I41U

10011

11172
11184
11196
1]208
11220
11212
1]2"
1]256
11264
1]264

]2
14
41
16
14
47
49

10488
15119
IJl64
115]5
1514L
04288
15111
L3404

00000
000"]
01200
0-142
000M8
01200
15142
00000

14

1511'

000144

11276
1)288
13100
1]]12
11124
13112
I]H2
IHH
1]]56
1]]68
11380
1]]92
13404
11416
11428
11440
1)452
11464
1)416
114U
13500
U512
US24
U5U
US4.
U560
13512
11584
U591
13592
U604
1161'
13621
1)•• 0
U652
U'64
13616
13611
13100
Ul0.
Ul01
UUO
13nl
UUI
UHO
UU2
Ill ••
un6
13111
11100
UI12

41

1])]2

]]

10488
I1S)5
15131
13404

n

1.000

uu.

14
.6

lIl1.

I1n6
111.1
UUO

JZ

n

010).
0510.
UI"

16012
16024
16OJ6
16000

51

2blt4Q •

26450
26460

26410
26480
26490
26500
26510
26520
26510
2.540
265S0
26560
26510
26580
26590
26600
2UIO
26620
2U]0
26640
26UO
26660
26670
266.0
2U'0
16700
26110
26720
2U]0
26140
26750
26760
26170
267AO
26190
26ROO
26AI0
16A10
2bBlO
26A40
}68S0

2bA60
16810
'~RAO

2bA90
26900
26Qi a
26.20
269]0
26940

OUT OF CORE AlOCK ~ CONTllNS THE FOllO~INr,
0
DUTSC
•
00
0
OKlO
OOAG lOUT
rFM FMaN·)~tILUt ••
lOUT
8T" FMON.IOUT
TFM FMON+J5.8lK2
erM FMON.NOIUU
TFM FMO,..+)S,BlKl ••
DIM
BTM FIIION,OIM
JfM FMO"'+)",BlKl.t
COMMON
8TM FMON.COMMON
TFM FMON+)S,8LK6.,
IF STMNT
BTM FMON,IF
TFM FMON+15,ILK6"
r,OTQ
RTM FMON.GOTO
JFM FJIIION+)5,8LK6,.
C1Ll
BTM FMON.Clll
TfM FMONtlS,BlK6, •
RErURN
8TM FMON.RE TURN
TFM FMON+1S,8LKl ••
FORMAT
erM FMON. FORMAT
8NF DOlCOP.)6, TRI'tO.,
00 ST.ATEMUT
8
OOlOOP
TFM FMO,...]5. BlK).,
ASCAN
8TM FMON"~CAN
80
Stl,SINGS',.
OUTSC
ourSCI
8
TDM USEOFS+S,l.,
~ISK 110
OKIOEN
8
uUTSC CODE IS HERE
QQRG ASCANI
OUTPUT 00 STATEMEhT CODE I SHERE
OORG 00E+24
THE FOllOWING INSTRUCTION IS A CH1NGE TO 00 S TATEME'" CODE
80
OKF, IDS ....
RETURN TO 1/0 SCAN
OORG OOEE
OkF.IOSW
80
OO"G 10UTEN
ENIER HtRE TO OEceOE OISK 110 STATE"ENTS
OKIOEN SF
01( 10. f I
FllG FOR FETCH AND RECORD
CM
CHI,ltl,10
B~E
OKIOI
TFM DKPUf+ll.0142,8,
FElCH S YMBel
CM
CHI+2 , 1t8.10.
CHECK FOR H
6_E ERROl
TR
CHI-1 , tHI.],.
SHIFT OFF TWO CHARACTERS
B
OKLI S T
OORC 0-1
OKIOI CM
CHI ,44, 10

317

1620-1443 MONITOR I
26950
269hQ
2bqlQ

269AU
26.90
21000
21010
21020
21010
21040
27050
21060
21010
210AO
210.0
27100
27110
27120
271]0
27140
27150
21160
27110
21180
271.0
21200
21210
21220
21210
21240
27250
27260
21210
21280
21290
21300
21110
21120
21)]0
21140
21150
21160
21110
21310
211.0
21400
21410
21420
21410
21.40
27UO
21460
21410
21410
214.0
21500

SNE
CF
TF M
rR
6
OORC
OKI02 8fM
C
BV
AHE
fR
TFM
DKlI ST TOM
CM
8NE
TOM
TR
CM
Bl
A~

OKPUT

CM
8l
IT ..
8TH
SF
8T ..
80
8
DORG
CM
8NE
8TH
8NF

DOl

OKER
OK8

FORTRAN 11-0

OKlO,.,
OKPUT.l L, 01-.., II,

CHI-l.CHI+l ••
OKLI S T

NO FllG FOR FIND
FIND SYM80l
SHI FT OFF ONE CHaRACTER

0-]

COLN'".O),lO
SVM.ORocr+ ..

ERROl
ERROl
tHI-L.CHI+S ••
OKPUT+ll,0146, 8,
DISKSW,l,ll.
CHI. 24,10,

SHI FT OFF THREE CHARACTERS
RECORO SYMeOl
SET SN TO INDICATE DISK 110
CHECK FOR lEFT PAREN

OHR

IOSW.l
CHI-l.CHI.l"
CHI.69,lO
-+24
OKPUT+ll,l,IO.
CHI ,40, 10
O15
11152
14167
.. 511
11721
0262.

000-4
01200
0-104
15140
000-1
OUOO
000-1
01100
15141
00000

ISI)9
11152
14248

OOOK)
01200
00000

09050
oui5
Isue
14167
ISH.
14101
09050
02615
151)'
14161
14101

0-124
000-1
15140
000-1
OOOU
01200
0-124
000-1
.l5140
000-1
00000
2

14682
16000
16000
16012
140H
16016
a6000

16000

OUI 'OF tURE aLOC • • CONI'IN$ TME FOLLOVIN'
OUTSt
tALL
RETURN
IF
IFSfNSESIIIICM
GOTO
0011' JOUT
IG.UT
If" FIIONon,IU' ..
FMON,IOUT
Ifll FIION. .5,ILU
Ifll FMON.IION'"
11111
If" 'IIDNoU,lua ..
IT II 'IION.oJII
CIlllIIOII
If" FIIONoJ5,IILU ..

n.H

U

I . ."

-0'
DORG 16000
IFII 10RY, . . n
8/
ItI~T ,MLU, 1
IRA

zino

07Z6J
OOOOZ
00000

U.O.
U.12
1)911

14196
1440A
14420
1'412
14444
1.456
14461
14480
144.2
14504
l4SIZ
14512
IU24
14516
14544
14544
1455.
1451>1
14SI0
145.2
14604
14 . . 6
14621
IU40
14652
I ....
14612
14611

OORG .-)

2" l80

l1'U
14106
1192.

I1IU

MElUM,. HE"E F~Oll DO CCDI>4G
. C"
CHI.OIt,10
K,.E OKER
81" PUT .0104.8.
OUTPUI RT PA"EN
I.
C~I-I,CHI'I

2AI50
28100
18170

28540
28550
21560

nllo
nl.o

:sa !J

n

PAGE

P"ASf 1-'

OIGn IIIPLIES AN ARRAV ,UIIE

.-

,.OAO

Zlno

II~O

.-)

16Z0-1441 "CNI'Ol I

28420
284)0
21440
21450
21"0
21410
2UI0
214'0
21500
2UIO
21520

FOURAN

DKSII2,I
80
"20,OKSIII
8
DK81'12
DORG .-4
t
OKSWI,OKSII2
BE
ou
DK81
IT II ERROR,.'l,"
A. . AYS AND 51 M'H VAR .. ILES ON SAllE 110
10
DKSIII,IIKSIiI
8
ou
UDMG .-)
•
IHE fOLLOIII~G HANDLES IIIPLI ED 00 LOOPS I ~ 1I S IS
OKt
IF" OKLOOP,O,IO
CII
tMI,24010
BNE OKFR
All
PARCNI,1,10
8111 PUI,Oll4,I,
OUrPUI Ufl 'AREN
IR
tMI-I,tHlol"
SHIH OFF OIlE CHARAtTER
DKL OOP 01 ,10
A"
ell
tHI,24,I0
8E
DKG
OKO
CHI,40,I0
t"
8.. H OKC'll
tHI,69,IO
C"
8H
D'ER
SF
OUISW
UKlOOP ot
2.0 ••
-0
81" CSOR~"'12
8~R
,,20, SJIIIC,.' .11
81
FUNtll ON NAOF.
OKE" ...
10
"lb,Ot(SlIIl
C
DKSWI,~KSII2
.,.E OK81
10
OKSWI.OKS_l
OKOI
co eHl,ll,to
""E D'~
OUIPUI CO""A
"I" PUT,Ol2)' ••
1CHI-1.CHI"
~F
OOE
2,--)
OKS_I OS
OKSW2 DS
2,--1
DKO
8
DORG .-J
DK[
8.. F OKER,DKE
CF
OKE
CHI, HolO
C"
OKC.IZ
"NE
81" pur,Oll),8,
OUTPUI EQUAL SYMBOL
8D
DO&-J6,FXOItFl,.
GO 10 00 COOI~G FOR I"PLI EO 00 LOOP
8
DKFR
DDRG
)

18060 •

28JoO

VERSIQN 2

.-)

""

3~1I

10Z00
10200
a0212
10224
aon.
aDz . .
aOllo
102U

]

14

00565
ooni
00000
00000

J60U
-nl.
00500
00000

14

oun
0212.

- . .91
JOZoO

a6

OUst

11

onz.

At

16
49

n

16

oUSt

U

OUI.

16

oun

-'1"
JOZZ.
-"22
-"12
JOZ ••

1/O20-1~41

ITM
AM

lU70
lUIO
1""0
11/000
lll>IO
2R620
18UO

B

tM
I

til
8

216~0

211>50
116/00
2U10
28610
286.0
18700
28110
28no
28no
2U~0

BTM
8
rFM
BT.
TF.
srM
rFII
BTII
80
B
TFM
srll

IIONITOI

'MON,COMMON
'ARtNT.OI.IO.
IFI
tHI.5/o0l0.
GOrOEN
tHI.510I0.
CAllEN
COlNAM.O).IO.
RETRN

F"ON.JSt.LIlI,.
FliON. FORIIAT
FMONtJ5.ILIt4 ••

FIION.OOO
FIION.35.ILKJ ..
FIION. AStaN
Stl.SINGST ..
OUTSCI

~ElS10N

2

FOUIAN 11-0

'AGE

'HUE I-I
102l~

102./0
10101
lono
lon2
10,44
10156
10J6I
10110
10)92

IF
GOTO
tALL
RETURN
FORM"

AStAN
oursc

10~"

12)10
12111
Inll
12no
12n8
12n8
12150
12)62
12374
12312
1211l

1620-1441 MONITDR 1

10500

U058
11070
UOIl
1l0'~

UI06
III 11
12110
I2IU
12154
12166
12171
12190
12202
11214
11226

unl

~A"E

3~ I

2

FOITRAN II-D

I~

1511'
12051
046.2
UU'
OU59

4'

11

U

16

~)

16
17

I~UO

OU2~

0215.
OU"
OU59
OU2~
1011~

105U
OlU.
on2~

47

,.
""

342

JO~16

-9661
JO~~O

099.8
00000
-'71~
JO~"

OUII
15111

01200

0~"2

ODO-4

12

09979
12154
IU61
09919
12711
1000.
0'050
1511'
12214
0'150
15U.
12202
07034

11

0570~

Ull.
01400
01100
I)U7
01200
00001
O-UI
000100
01100
OOK79
0000.
01100
00000
J2262

4)

Inll
0'050
07l6J
I

..
)1

17
24

46
24

46

15

11
14
46

17
14
46

u

17
15

unl

151~0

151~1

02611
0-151
00000

~.

02626

00000

45

07910
02626

0726J
00000

17
"4
49

12162
09)50
Inll
uno

10000
OOK79
10000
00000

15

10000

00000

14
47
17

49
H

PAGE

PHAse I-I

tM
CHI.24.1"0
BNE tAllEM
arM PUT,
291~0
12~ ••• lEFT PAREN
AM
PARtNT .1.10
2'150
CM
CHI+2,4,lO,
JEST FDR ND FUlleT IDN ARGUEIIENTS
2'160
2Q170
tALLEM
AE
2.180 CALLI TFM UtAN.n.tuSEN
AseA".,. ,
29190
B
GO TO ARITH"ETIC StAN
ODRG . - )
2.200
CHI,21,10.
29210 CAll2 tM
reST FOR "ORE ARGUE"ENTS
2.220
KNE •• 32
BTII PUT,
29210
In.I.CO"M.
29?ftQ
a
tAllI
ODRG .-)
2.250
CM
tHI.4.10
2.260
•• 32
29270
IE
29280
TFM AStA .. ·23,ASCI
GO TO SCAN ARITH EXPRESSION OPERATOR
AstAPII, ••
zn90
B
ODRG . - )
29300
BTM PUl,
104.8.RIGHT PAREN
29110
SII
PARtlir .1.10
29120
29))0
tHI-I.tHI.I
TR
•• J2
2U~0
Bl
aOjR CAll2.tHI.2
29150
B
tALLER
291/00
ODRG . - )
19170
8NR tALLER.CH"Z
29180
B
BEGIN
291'0
ODRG .-3
29400
29410 EXlTtD IINR tAlLER-U.CH .. IO
TOM TRIND.loIl
29420
BTM PUT,Olll,',
tALL u n svnOL
29410
BTM PUT .0140.'.
294~0
DU""Y
R
BEGIN
19450
OORG'- .-)
29460
29470 L1NKCD til
tHI ••• 24.10
•• :12
29410
BE
BIIR tALlEit-4I.CHI.'
294'0
ERROl
B
29500
ODRG . - ) .
29510
rOil
TRINO.I.ll
2.520
CALL LINK SYIIIIIL
• TII PUT .0152.1 •
2.510
ITII PUT .0140.'
29540
29550
IT" PUT.OI~O.'
CHI-I.CHlo,
TR
2n60
CM
tHI.40.10
2n70
INH CALLER
znlo
CII
2n,o
tHI.69.IO
IH
t&LLER
29600
T~
2.610
DUU •• "ASKLK
TF
OUTAUI.CHI
29620
CHI-I.CHI+1
29610
LKCDJ+ •• OUT. . . .
296~0
CH",40.l0
29650 lKcill til
INH UCD4
29 . .0
INII UtD).LKCD,06.ll
29670
29120
291)0

51

J0271
000-1
00000
000N6
00000
OOON)
00000
000-)
00000
-'622
JOJ9l
-.691

12051

TRYING TO taLL SINGLE SUTIINT FUIICT

~ERSION

UZl~

1511'

u

U

29010
29020
29010 CAlLA
29040
2.050
2.060 tALLB
19070
29080
290'0
29100
2'110

Sy" 'REVIOUSLY USED NOT AS CALL

DUn

I~

1046~
10~76

12250
12262
12274
12216
122.1
1230'

8
BEGI"
OORO . - ]
8liR ERR09.SIItNr"l
II
BEGIN
ODRO . - ]
BO
.+2It,FNTS"
BrIO ERRDR.279.9.
BliF •• 10,FNTSIi
--24, ••
B
ODRG . - ]
roll FNrsW.o

II
~.

10~52

FMONt35.ILKS ..
DISK INPUT/OUTPUT
21750
FIION.OKIO
21760
UUTSt tOOE IS HERE
21no
OORG ASCANI
28110
ENrER HERE TO OEtOIlPOSE taLL SUTE"ENT
18790 CALLEN BNE ERROl
28100
TA
CHI-I.tHI·I
21110
IrM CDlNAII.D~.IO
28120
t
SVII.EXI Tth6
28no
BV
CAlLER-~.
2U~0
AE
EX I rco
1U50
t
5'".LINIC,Crt'
28160
8E
LINKtO
28870
TOM CALlSM.I
Z8880
ITII PUI.
UI.I.CAll
CM
CHI.40.10
288'0
•• Z4
28900
BH
11910 taLLER BTM ERltOR t 27Cf,9,
I NeDUE" tALL NA"E OR LIST
28920
CII
CHI.69.10
8H
21no
tAllER
SF
21'~0
DUTS"
28950
Br .. C SORN,.tIZ
BNR CALlB.tHI02
28960
21970
BO
tAllA.INSW
ATM pur,01!;),_,
289.0
FUNtTlON OPEUTOR CAlL
28990
rOM SMCNI",
Ot
1,' ,2'000

...

OUl~

11
16
11
16
11

10~O~
10~16
10~21
10~~0

000

17

12~42

14

12454
12466

~.

15U9
12202
0'050
0261S
1:'141
U202

16
4.

10460

000K4
OUOO
o-U4
000-1
000-4
OUOO
J4671
00000

15\)9
uno
090S0
12466

ooon
01200
0-12)
00000

I~

15lJ9

U
16
49

10UJ
10440

000-4
01200
JUSI
00000

09050
02615
nUl
12642
U ...
12202

0-104
000-1
15140
01200
15141
00000

12Z02
01626

15141
00000

Un4
0260.
0.050
0.050
OUlI>

15149
OOOOJ
O-UI
0-140
00000

14
U
U
49

15147
In.2
12114
041 . .

OOOU
01200
15147
00000

15

0160'
09050
0.050
0.050

OOOOJ
0-152
0-140
0-1"0
15141
000110
OllOO
0000.
01100
U152
15n.
15140
JJl .. I
000110
ouilo
Ut"

12)9~

12~O/o

1Z~1I

12410

12~71

11

12416
1241.

14

12~9I

47

12510
12.522
12530
125)0
12542
U554
12566
U514
12574
12"6
12591
12610
12622
12614
12642
12'''2

17
49

12U~

12662
12662
12674
12616
12691
uno
12nl
Inll
uno
11742
1275~

12762
127.:&
un4
127 . .
U"I
UI10
UUI

un.

17
12

.
Jl

46

"5

45
~.

U
15

17
17

".
n

17
H
II

..'"
I~

UI. . 1..
UII •
uno Jl
U'U 16
U .... Jl
Ut06
Iltll l"
11910
UUI '""

10~61

In1~

"111

l5119
12202
u n •.
12202
unl
lint
IIUI

.. ,,_.

.,

11. .1

lint
1100'

5.

lblO-IHI

"Qr;IfO~

S

19090

CORG
]
rF
.CHI,
rR
C~I-I.CHlel
lKCOl+6.02.10
A"
8
LKCOI

Hl00 lKCOI
/QUO
79120
291]0
Z9140
lH~O lKCO'
297600

ZQ170
ZH80

29820
Z98)0

FORUAN 11-0

P~ASE

I-I
129U
Inol
1297.
12916
In. .
1)006
11006
11011
110)0
1)042
I )Ot.
UOU
\)071
1)090
I JlOl
I HI4
Ulll
I Jill

tHl.O-',lO

BNE

EIROI
UROI.CHI . .
OUUR02
QUrUe6
OUUR+IO
'Ur.aUURe)
PUT .QUT &A.+ 7

pur. our ARoll
29&40
8
8EG ...
19HO
CORC 0-1
2UbO tl IfC r UAt 4.t: JlI ,
lQ810

lQ180 UUUR

15119
04211
lJI40
IllH
11141
09050
09050
09050
02626

000-4
01200
1514)
00000
00000
00000
11I41
lJI45
lJIH
00000

.,
B
B
J1

21
II
21
49

O.,ll

I

4.0

I H52
11\59

4

4.0

1110]

2.0 •

I H65

4.0
• e-)

S '1M. URNe"4

8~E

80
BrM
80
8
OORC
arM
8r"

EUOI
.'44. SU8FC r

rR~

19980

29QQO
10000
10010
10020
'0010
J0040

rD.

100~0
U~NCT

ERRORl,517,9

PUT.
PUT.
MTSW,l

1)9.'. "E TURN
140,It,DUMJIIY

UR~

'0090
10100 1 F I
10110
10 120
10110
10 1'0
'0 ISO
10160

our'ur IF COOl NC
rD.
8TM
BT.
KO
6
OOKe
8rM

ERROR1,511,Q

rD·

lFSW.l.

fR.INO,I,ll,
IC1.~.IF

PUT,

......
......

SEr rRA"SfER INOICUOR ON

SYM~OL

PUT,

IH.R.LEFr PAREN SYMIOL
'.20,DOTRlN,t
TEST IF 00 LOCP er;OING "'ITH TRANSfER

'·20
a-J

\hlO-I .... ) MO"I rOR I
10110
10 lAO
10 I 00
J0200
10210 •

J0220
J0210
10240
10250
'0260
10210
10280

10290 t."02
.0100
10110
.0120
10HO
jU )40

10150
10160
.OHO
10 J80
10)90
J0400
10410
10420
J0410
10.40
10450 OUTS ..
10460

11\66
11\11
11\90
11202
11214
11226
1)2)4
1l2J4
1)246
1)258
11270
11278
13279

SEeIN.NOI"O
"fGI'"
0-1

R
BEGIN
OORC 0- J
OAC J,URN

100~0

105~0

I.

U

14
4

C

10480
10490
10500
J0510
J0520
10510

151 ]9
15140
000-2
00000

I )l)~
Ill"

2"'0

10410

00000
15111
12961
12918

I

2<)'l6Q

10060
10070

lb
II
11
.9

59

E.. rfO HERE ro our'ur REIU ... S1ATE"EM

2Q940

,9Q50 RE

00000

•

14

lq~90
DC
-000
zqQOO tUSKlK OS
lHIO
DC
-000
19910
DC
-00"
29qlO
DC

04111

•

OAt ",liNK
LI ...

ass

••

11111

EXIl
LI~.cr

PAGE

un.

OORG ... )

C"

CF
CF
CF
sr
8r
8r

Z9&00
Z9&10

VERSION 2

HROI

8~R

lHE+20

UI1 •
U . .'

utOO

31'1

U'OI
U'OI
UtlO

••

11

U
11
15
J2
21
14
41
12

11
16
11
J2
14

..
U

01014
15U9
UUO
on50

11

05411

I~UI

15160
0-1l0

09910

000-4
OllOO

000-1
0-104
000-2
15140
00000
00009
01100
00H5
JJ1)Z
02611
00000

4)

••

U152
U116

II
4J

01201
unl
U'OI
0"41
UI . .
UI44
OUlI>

000-4
07200
1000.
000-1
01100

09150
09406
OUlI>

00-71
OONn
00000

15119
Ul01
U"O
"'01

OODIlJ
01100
15141
00000

UU9
11164

000-'
01200

..
U
Il

U

49

..
.
11
11

I.
41

U

1.
41

1~141

00000

00

VERSI all Z

'OITUII II -D

11150

ICo

11160
H 170 OHOl
1\ 180 PRNT4
H 190

DORG FLlPl

tllOO
llllO
H 220
tlBO

16000
8l" •

D~

1620-1 .... 1 IIONIIOR
H240
11250 ONF
11260 100
H270 HUNUM
H280
31290
HIOO
11110
Ill20

87

NO~UII

TOM
TOM
TO
10
ID

PR'IIT4+ l19,PGNUM.

)4

14
TFM

.0911 ••
.0962 ••
IOAT, •• ZJ"

B

IOPT.OFLOI-4.7.

All
87
OSA

OFLo-lt,6,
OH02

PGNU~.(lI.IO.

~UPPRHS

FORTRAN 11-0

IO".NOLlST-4.7
EREXT. HOD ..
OHO-I .ERUT ..
OFLO
10RT ... n ...
10".ERR-4.7
CHAN12
BLK9h5.fLO'I ..
RETII ••• £94620 ••
FLOP,,,
ESNOI

11610

J,l" " '

Jl6ZD eR.
116JO
1164D 15110 1

OC

J.'

DSA

STUfF

PAGE NUIIBER

49

17
17

11
15

4.

onu
07207
00000

DUll
DUO.
14164
14176

01200
OODOJ
0"99
00000

09406
1511.
UU9
14244
05641
0.050
1167Z

OON71
15140
00014
01200
000-1
0-105
00000

09050
09050
02615
10006
11660

0-10'
0-124
000-1
00001
00000

11 •
00565
005U
00000
ODOOO

2
J6021
-,1)7
00500
00000

IZ •

o

'I •

Olll8
Oll)O

41
41

0))50
01)61

on4Z
0)150
DJJ62
DU14

49
15
15
Z5
Z5
Z5
14
14
..
..
11
49

0))74
OlJ04
on06
01109
Dn07
0))D5
00000
00000
OD565
oonz
OZUZ
O)JlP

ADD I TO PAGE NUMIER
RETUR" INDIRECT

TEST 'RINTU CMaN1Z
SET UP EUOR ElIT aFTER OfLDIl IlIDlcaTlON
'RINT UROR If LISTING
MODIFY DOa
MODifY RnUR .. ADDRESS
lesTOIE ,allTiaL

DlflNER 'RINT LON' IRRDR . . . . . . . . . . RIIIII..

01' "'ER 'RINT SIIORJ 1111011 II

•

OJ416
OJ49.
01510
onu
DJn4
DII46
DJUI
01510
DUU
Dn94
01606
DJ611
DJ.JO
0J642
DJ"4
DJ. .Z
DJ"4
DJ. .6
DJ6"
DnD6
Dnll
Dn"

00007
00001
OZZZZ
OZZZl
02220
00911
00962
-1457
-1417
000-1

5 •
-11]1

0)411
OJ414

)

U
41
Z5
Z5
Z5
Z5
Z5
Z5

Z5
Z5
16
49
U
16
49
I.
49
49
16
16
49

09)49
022Z1
OZ724
Dun
OZ12Z
OZ121
OU91
02191
OU99
OZ600
-)629
-1125
0)400

onl1
0)662
0114.
onu
Dn45
onu
01151
01159
0)761
Dnu
00565
Donz
DJ694
DJJl 1
DUll
DO"5
Donz
D)6JO
DznD
014. .
014. .
5

DJU9
Dntl

-nu

Dnn

5

Dnll
Dn4D

-u"J

-)6'"

-)615

-un

JUOl
-'194

1

Dnu

4 •

2

Dnn

I

2

Dnll

34ti

022Z0
02221

PAGE

DU . .
DH1D
DHZZ
01414
DH46
OJUI
DJ470
0)411

SKIP TO I I"EDUTE
OOU8LE SPACE AfTER PIIINT
lOIORT-PRINT ,aGE MU~

ERIIUI

ESNOPI OAt 5. DODO
DODO
Jl"O
OSC 2.DO
DO

41
15
41

16000
16000
1.0ll
160Z4
16036
16000

au ..

IORT, •• 21

DC
1.11· ...
Je'
Dac 4. OODO
DODO
oac z • •

HIlO
lUll
14144
14156
14164
14164
HI"
Hili
142DO
14Z11
14224
142J6
HZ44
14244
14256
HZ . .
14ZID
14192
14JOO
14101

PHAse I-I

PAGE OVERHO~ OEF INU
DC
JI'
•• ERROR MESSAGE ROUTINE
ERI
TF
ERHESloI4.EUOR-I"LOAD 'HE UROII NUMIU
80
LlSTl.L1ST..
TOTAL LISTING
TO
ESNOI.6.ESNO ..
NO LISTING-PRINT COM'UTE "USAGE
10
HNOlo4.ESNO-l
10
ESNOI.2.ESNO-Z
TD
ESNOI.ESNO-J
TO
ESNOPl.Z.ESNOPl-J
TO
ESNOP104.ESNOPL-Z
10
ESNOP106.ESNOPL-I
TO
ESNO'lol.ESNO'L

II )80
II 190
11400
11410
11420
11410
)1440
)1450
11460
)1470
1\410
TFM
)14.0
11500
8
tl5l0 CHAIII12 '" I
TFIt
11510
87
11510
11540 Llsn TFII
B
11 no
)1160
17
11 no ERU' TF..
)lSlO
TFIt
11
lU'O
)1600 NOlIST DU

)l . .D

t t

In..
lJ9ID
1199Z
14004
HOlt
14OZ1
14040
140U
14064
14076
14DII
14100
1411Z
HUO

61

000-1
15140
0-ID4
15141
OOJ"
0001)
01200
15140
000'"
OUOO
000N5
01100
J4011

02615
15UI
09050
11991
09150
UU9
n91D
15UI
15119
n9l0
un9
U910
05104
UtiD
09050
nlu

01116

PRNT4.117.PGNUII-I
PRNT4·175.PGNUII-2

11 )]0

11"0

LERO

PRNT4+Fllt,l,.
'''NT4.l.", T"

1114o
Jl 150 OFLOl
\lUO OFLO·I
II )70

VERSION Z

UUZ
U944
U"6

01110
01111
OlllD
0)295

HEADER I NFDR~n I O~
.0HOl-I
DAt 09.PAGE
I·...
PAGE eONSUNT
PAGE
I'
•• '~INI OVERFLDN PAGE HEADING AND RETURN
ot
5.121"5
J2345
aHD
80
ONE. PGNUM-2
8D
two. PGNUM-I
DAS

,aGE

'MaSE I-I

101)0
511
"RC~I.I.IO
10740
TR
CHI-I.CHI.I
J07S0
8111 PUI.l04 ••
10760
8~R
•• 24,tHI+l
l0770 OUTS"I BIll EUOA.17 •• t.
I~OEX OF CC"P. GO TO "ISSIN' 011 INvaLO
10 lAO
CII
CHI.lltIO
10190
MilE 0-24
10100
IR
CHI-I.CHIOI
10110
CII
CHI.49.10.
lEST FOR FliED POINT Val
10120
BL
OUISO
101)0
ell
CHI.n.IO
10140
IH
OUTSN)
101S0
ITII C50RN •• 012
10 . .0
80
OUTSNJ. 5I1CIoIT.11
10170
RT
PUT.SIIAOO-I
10lRO
B
OUTSNE-JZ
10R90
OOIlG 0- I
10900
E~TER HERE TO OUTPUT GO TO S UTEIIEII'
•••
10910 GOTOe" 8~E EAROI
TOil TRI ..O.I.lI.
SET TRAilS INDICATOR
10920
10910
8D
•• 20,OOT"6N
8
•• 20
10940
DOIIG 0-1
10.50
10'160
BI" ERROIl2.511.9
'0·970
TIl
CHI-I.CHI.I
10910
CM
tHI.24.10.
IE 51 FOR COMPUTED GO TO
BE
tOMPUT
10990
11000
IFM STt.lolO
11010
RIll PUI.
105 ••• GO 10 SY"80L
HOlD
OUIS".ll...
BRANCH TO OUTPUT STATEIIENT NU"IU
R
DDRG .-1
nOlO
11040
RTM PUI.
10 •••• tO"PUlED GO TO SY"IOL
11050
BTII PUI.
IH ••• LEFT PUE" SY"IOL
H060
AM
PARe"I.I.IO
TOM tGTO.I
H070
II DID
B
OUI S.....
RRANCH TO OUTPUT STlTE"ENT NUlliUS
OORG .-)
11090
HIOO SkNSOe OAt II. SE .. SESNITCH
SENSESNlTtH
ODRG 16000
11110
HllO
IF" 10"' ••• 21
8
IOPT,ILK6,1
1l1l0
TRA
11140

Dn"

2

1&20-1441 .ONI lOR

V£RSIO~

2

fQURA/; 11-0

PHASE 1-8

PAGE

1\680 e •• fSl OAe

0)167

9,E:MMOR 00'
ER 1u'.R 00'

IIUO
II 100
1\ 110
II 120
II no
II 740
1I 750
1\ '60
II no
)\ 1~0
II 190
11100
llAIO

Hila
)\ 110
HI40
11150
11160
)1170

canna TF.
IF

TF.
~1

AOUIII;E
IF.
SCNI
Aa~R
"N2
IF.
TFM
SCII)
C.
OH
BT.
IFM
IFM
81
,C .. 4
TF
TF.
DC

lIlAO
)I

no

)1900
II ~IO
)1.20
11910 SAVE
Jl940

1I'50 PMNT 1
11960
11910
H9~0

H990 PI'lNr 2

DC
J8 •
32010 INUU IF_
]2020
IF.
120.10
12040
OOR.
IF.
32 050
)2060
8
12010
IU

0'.

12080

ICO

J}OQO

OE~D

0]796
OU08
01120

01111

ou_o
OJ151
OJ"~

SCN~

PRNfl,·.l2,.
ILK ••• ~.FLO'l, •
MEr • • 6,U~G'.rt'
FLOP., I
SAVE.~c'n.II.II.
SC~)+lll.+·'o.

2,0',.

al. PRNfl.·.12, •
IF
SCPlll+11.SAVE.o,
TF
PRPIIT2tSC~)+l1"
AM
SCN1+U,220,9,
81
StN1
2,99
DC
A9
S,QQQ99
OC
R9999
IF. IOA.r,·+2) ••
IOPT .... ~rz-4,7
B
8N I PR~Tl-l. )400,60,
8T_ OFLn,PRNTl-l.711,
OH CHI

11000

onu

IlK.9.+S,FLOPI ••
~ODI fy OOA
Itf fN. +b ,PlHC,", 1 ... 1 t t .ODIFY MEIU." AOORESS-C~I PRIN'
OHD-I ,FLO', •
SET BU"CH TO RES lORE 'UIIAl
ono
TO ~CAN A"O PRIl;l CHI fOR P/I OR TYPE INPUT
SCNZ+l1,Cton-l,.
INiTIAllZ SIART OF SCAN
SCNZ+U,l.lO.
uP THE CURRENT LOUT! ON
SCN1+12,--+,.
IS IHIS AN ••
SC~).l1 ,tMI+2l0.,
INITIALIZE END OF FIRST ,RINT OUT
INITIALIZE OEFII;ER
PA.~'2,tHI "
SC~2.11 ..... ·.,
IS IHIS THe ENO

YES
MODI FY DOA FOR RfTUAN
MODIFY RETURN ADaRess
RESTORE PUTIAl AND lUUlli
.. a-SAVE THE CHAUCTER
SET l~ AT Elle

16
U
16
~.

U
II
45
16

01116

16

OUII

14
46

OJ900
01912

onH
OJ']6
01948
01956
01961
01919

$I

9 X

11

"

16

~9

16

••

PAINI IHIS INCRE~ENI
RESIORE CHA.ACIER
MOVE PRI .. ' DEFINER HIGHER
uP IHE POINIE'

01980
01991
04004
0.016
04021
040)6

PMINI THE INPUI S TAIEME .. T

0'0~1
0~05'

reST P"INT CH'''' 12 8UNC BACK I .. DIUCI
-GO 10 OVERFLC~ ~ITH RElURN ADDRESS

04066

16
49
41

o~on

IT

IT
U
26
II
4.

01510
024"
OHIT
OUII

H101
015H
-2"6

0)16)

JSIH
000-2
00000
JSJ59
J511'
-0000
01100

01861
OJ140
0)1"
04090
03161

019"
04042
02510
024.6
02 . .6
0~016

OI"R
1
0~042

0)1"
0.09.
0""
all . .
1

-1'2~

JTl01
-lnl
O)89R
079)6
-)992
04016
0)19'
00K20

04041

04094

J5In
I

0'094

1,18'"

PRINI PIT OR IYPE INPUI

8lK9A+S.FLOPI, ~.
RErA. .6,PRSCN1"
OFLO.FLOP" ,
16000
101(',.+21
IOPT,8LK9,1

.001 FY DOA
SET RETURN AODAES~
GO 10 OVERFLC~ WITH CAll ".IUL

O~O"

0.091
04110
04122
16000
16000
16012
16014
160)6
16000

16000

00565 -4065
005J2 -40.0
0'04J 01400
OHII -'O~J
5 X
I

16
16

.

11

16

)6
49

02510
024.6
01111

H201
JOS.4
-2"6

00565
00511
00000
00000

J601]
-24'1
00500
00000

00000

3 ;.7

1620-1") .O"IICR
AUL IT 1

AO'AVE
AOSURJol

4.IJVAR 1
AQVAR.2

AOVlnp

AO'LII
ASCdA
ASt281
ASCANI
REGINA
B I GPR I
esOUA
CALLF~

CALLFR
CALL'2
CALLSw
COoAT •
tOUFLO
CM'''12
CKCNIU
CKC TAR
CL'SE~

Cl DC T I
ClUCT2
COLN'M
COMAOO
COJln:Al

CO_ER j
COMI"A
CtH""E~

CO_MaN
COMPUT
CONIE~

C SINO I
OECOD'
OEcooe
OHtMI
DEFINE
DI"ERR
IlIMNOT
a I 51< ~~
OK IOFN
DKLlST
DaLunp
OOLOOP
DonST
UOIUN
E31061
UJllO
E'4110
EI.IIO
tl4Z40
EI.no
£14560

F..... "

08'22
OS48'
OS"2
08Z I_
oe2bb
0818b

OS61d
1'1 SO
1,422
12058
OZ.18
022 JO
O~AO I
120S8

ES411 a
Fh'04
f 8b440

E 9'210
E 94620
£NSION
e~ fLOG
ECLOOP
EeUI VN
fR_HI
[RRO~2

B .. OPI
ES.. OPL
F xCE S S

rco

IllOl

f II

OHOU
10009
091Q,
03184
OlBO
04142

EXIIC T
FC lEND
FcrES I
fLNUMa
F~rc S T
FNTSwl
F"TSW2
FO_AT I
FORMSI
FOAM"
FORMAl
FORMER
FREOS.
FUNCU
FXNUMB
FaOlFL
GENOIM
GOrDEN

0~098

14678
14SH
14594
04662
01262
0 .... 62
12148
IIq24
11576
10212
1424'
1l11~

UIY~E

05516
04018
0)794
0259)
\J9'10
01466
105H

10956

IFIUN
IFICAN
, .. ITAl
INTO'l
IOlOO'
lOUTEN
IOUIER
IVAU"
LEAOIL
LENGTH
LINKCD
liNKer
llTfRl
LNG_U
LUUND
MUlLK

II'~O

"DDAFT

119"

"ONCIL
MOVDi"
MOVE IT
MUlDEF
..... ,I.AJ.

onu

I J\ '2
11404
I4IU
12058
1l.1I

0""
0189d

12056

Ilao
12412
12101"

VE RS I ON

FOAU ... 11-0

09094

~OPAR~

aQ)901t

,.,UMBER

ObUt.

IIHS
02248
Ill)6
10116

OUIS 12
OUISCI
OUTSCE
OlJTSN2
OUISNI
OUTSNE
'AAtNI
PAUSEN
PHaDAT
'HADDA
PReGS I

11262
IOSl2
04801
11908
1)980
11844
02.15
In.o
16000
16008
OllS1
\0512

11028
02410

0)161

09406
OJ1SS
oz.oo
06H.
12 •• 1
1112)
OHI8
01~4b

06428
09919
10001
07405

11210
1)482
12110
10192
1215.
14Z18
11658
0612'
0'~19

11012
14120
14ZH
14651
12214
04098
anI'
16099
11112

IlU.
ilia'
010 ••
0224.
12111

IlIlL

ou. ..
02191
01710

NOll ST
NONARA
"O"ANI

PRSCAIIII

'RSCNI
PRICHI
'USTSN
'UTOUT
RElUAN
UCALL
AI
A2

'OllT
AOST ..
10VU
URAl
AERA
AFTBl
ILFU

&sell

ASCll
ASCI4
&SCU
UClA
aSCI
ASCZI
ASCll
'S(2)
ASC24
ASC25
ASC26

ASCH
UC21
ASC19
ASCIO

&sell

11152

ASCI

09801
00196
11116

&SCT

02526
02294
091'~

10368
11HZ
11'2)
IIUS
08550
01114
oa090
09450
I21H
150n
10916
1460'
un6
14611>
U190
120'.
U.,.
U18Z
UBI
UU'
U9~2

12 . . .
1!416
1401Z
I~H'

141 . .
16242
1~'18

12"0

ISC4

11414

ASt.

Inu

11224

ASCI

on.~

ASt9
UtAN

10512

I05~'

un.

un"

145. .
10440
~

I·

~

,.

PAGE

PHASE 1-8

OJT2q
IOZZ'
04144
14100

12a~,

A~CER

AVOID
81
aA

~l

BEGI~

8LKIA
8lKI
8UlA
8LK2
ILKlA
ILK)
UK4A
8lU
IU"
BlKS
ILK"
ILU
BLUA
BLK1
ILU
ILK9A
ILK 9
ILOC
CI
Cl
CALC
CALLI
CALL2
CALLA
CALLI

14016
060]2
11927
1191.
02118
02626
09610
0'622
09651
09645
09616
091>. .
09699
0.691
09122

0'114
09l4S
onn
091"
09160
OlUI
01.505
024.1
OZU'
11911
11961

II Ill>
12. .'

11416
lUI.
unl

CALL

10)~~

CARD
CCNO
CGTO
CHU
CHI
Clelll
UCNl
CICN]
CICN6
CIEND
CIlII
eLDCT

15016
02601
10006
UIJ'
1511.
04921
05056
OUU
05152
OUIl
ann

CII~"

066D6
II'U

COIIII
tOIlA
tDIIC
CDMR
tDIIE
tDIIIN
CDIIII
CD"IT
tDII511
tOIlY
t50ll"

I6H.
117~4

IlU4
0.662
I""
IIUt
120. .

onu

10010

117Tl

ono ...

CSPVA
CS
CsrNO
C TI 01;
01
02
01
04
OEFCT
01.1
01.2
0lM1
OIMEN
OIMI;O
aiM
OIMSW
OIMIP
OKA
OK81
OKI
OKC
OKOI
OKO
DKER
aKE

0"

DKG
OKIOI
OKI02
OKlO
OKl
DOUT
OKSIII

0)634
05148
05412
BIIS
11951
11961
11975
11981
14401
1059.
1141.
IU51
\0512
10617
10241
10004
11115
IHOI

"

...

111',
14000
IU41
1410'
IlUZ
14J16
14196
1~544

112"
11111
10~1I

1l6"
1l52~

1~10'

OKS~l

1~106

OMVAR
DOl
DOl
DOC I
DOCK
DOC
DOEE
DOE
DOD
DO
flASE
ENOC1
END
EOI
EOll
EOU

010"

eou

115l.
U610
U~U

121'0

11296
UlIO

lZ916
10416
11190

lun
0 •• 15
0'~14

10.60
1101.
12204
1144.

E02~

lUll

104

III'

1&700
117"

lOll

107. .

10.11

lUI.

1620-104' MO"II01
E~US.

Ell
ERE"
fRMfS
fAMOI
ERRn2
EU09
ERR44
fAMbO
EARf T
F'UOR

fAR
EM ,.
ESNCI
HNn
E 'YPE
flU
FUU,

FtlS'
HIPI
H IP2
fLIP
HIH
FlNr,
FlOPI
HCP
FIION

10008
0)416
o)n~

09901
0.288
11HA
01910
1~420

14420
00602
09)50
03111
05640
OIHI
0212.
I lOll
09228
11618
079 ••
11140
01110

FMSW
FN'SW
FOIIU
FO •• I
FilA"}
FO .... J

FO ..... ..,
f005
FOR.'
FOM"'i3

fUR"
FOR".

FP 2
F "PE
f lL' f

COlO
H£IH
HULll
HOU

END OF

Ifl
If
IfSW
11001
IN02
INOIV
INOUT
INSW
INTOP
lOt
101
lOCAL
100
IDE
10F
lOG
10Gr
IDLER
10"
10UC
lOR'
10SK
105.
IIIUTI
IOUI2
loun
10UT4
lour5
IOUI
I
JAY
JOE
J
KL ..G

Ol-'~"

1410.
02HO
17207
02'66
0232_
10002
10000
121 ••
12558
1289"
nOlO
l)q46
1143.
11680
1)81 "
o I~ I 0
IIH8
021 9a
11H8
0802.
10120
12'"
1<10'

O~E

K

102~6

10005
1151.
11518
02424
IU40
02611
092)5
11780
1)'12
00116
14040
IUOO
IUBO
14~64

00566
I )12~
005)2
00520
00565
005~~

10011

I3SSo
1))01
11188
11H.
11UI
10200
IIq55
02167
01110
IIq.1
02252
l191q
0~228

L2
L'

04 JOO

l~

lIfF
utOI

,onu" \J-O
L_CO)
L_CO.
UUO
LSfEN
LUlU
IIlSK
.0010
IIOOE
.ON
.VI
.V2
.V)
NI
102
NOIND
NONU"
NUMBI
NUMU
NUIIB)
NUMI5
NUll.
NllOC
Of La I
OFL02
OflO)
aHa
0""
ONE
ORDtT
OUTU
oursc
OUTSH
ours.
P2PTR
PI I
Pl2
PIUS
PCNr
'GNUII
PI
PLUS
PLUSS
PRNfl
pONI2
PONrPR

)21~

1I

LA
lO'H8
LElDl
lISII
II SI

1404tb

YEUION
I

11196
118)2
11870
1602~

01l.6
01662
02228
0111.
12918

'"ASE I-I

12962
U006
OllO.
01025
01522
11989
07885
06417
12101
11604
11692
11140
022))
02218
02610

'T"E
'UT
IUOI
AfCLG
IU
AfTIN
Inl
10UTN
Irsw
SALT
SAvE I
SAVEl
SAVEl
SAvE
SCI
SC22
SC2
se)
SC4
SC5

OJ)H

06268
06512
OU16
06J0~

st.

06196
02172
01481
Ollll
01410
OHII
10001
0])50
1461)
IBl8
1040.
11600

SeHI
StNI
Stll2
StN)
StN4
SO
SETO"
SUSH
SIIADO
SIICNT
SMUG
SIOTlU
SPIRA
SPGS
SUFT
STll
SfC
STHEA
STSN
SUI' I
SUIP2
SUIPA
SUePF
SUISW
SUaTR

010)~

02B)
109)4
10112
11846
1409)
02222
110]8
06A32
09qll
O.OH
0_094
all )0
12581

'5
SwSEr
SYII
flell
flCNT

o.no
Olill

all.,

0.001
In . .
02"0
IUU
056)'
05.0.
11"1
UIU

lin.

04016
10114
10610
06\0.
10911
IOU4
10124
11164
06015
OUli
0)"2
OUII

UST

oun
OZ6n
01620
OllO)
0.991
IH'I
11501
UU'
0160.
01)'2
11279
06512
01511
14)00
14219
02240
02lt6
OIlJl
0'995
0224)
14)01
lon,
11016
lIZ"
lila.
lUll
012.0
0....
010).
1000)

•W.
I

lERIl
SAVSVII
SENSwe
SETOMI
SETDIU
SETOII.
SETOM5
SE"IQ
SITINO
SINGH
SI'LODP
$TNOSW
STO'EN
SUIFC T
SU8PUT
sueTST
TBlFUL
"ARcr
UROA"
USEOFS
ltloer
lUS.II

019~6

101 ..
10UO
12 . . 2
01201
012'1
05Ul
06n4
0'244
0.321
04.1~

02)11
0504)
OHIO
05641
I32H
1)448
1112.
11201
10012
08450

Ib20-IHI MONITOR
00010
00020
00010
PGNUM

00050

1620 FORIRAN 11-0
DORC 02218
5
,-100
DC
-010) ,1 ••
DC
-01
,2
Dt

•DC

00060

VERSION
PHASE

I-C

fORTRAN II-a

~I

P~ASE

I-t

PtGE

STORAGE AllOCATION
02218
02222
02222
0222)

,67

02225

,QI1891

02231

,0

022])

5
,0
DC
-0000
,0
DC
2
-0
,000
DC
-00
,REClG
OS
12
5
os
D5
2
os
2
,00000
5
DC
-0000
os
5
OSt )0
,0
0000 00 0000 0000000 a 000000 a a 0000
,a
DC
I

022)8

2

01

Dt

00010

6

"'''HI'l8
';0080

~I

00090 ~"
00 100 •
00 110

~I:CLGo

00120
00110
00140
00150
00160

SAYSY"
LENcrH
FL'IC
KLNG
PRoes T

00110 CO"AOO
00110 USEDFS
00190 SURfer

DC
-0

2

022~0

0224)

..

00400 MUlOH DC

1,0

00410 INTOPI Dse
a

I,D

IZ
5
2
I
5

02262
02263

5
)0

02293

00200 pus TSN OS
I
PUSTSN •
FOR PAPU TAPE
00210
PUSTS~ 111 ~ fOR cAlas
00220
00230 W.
os
2
002~0 FP2
os
2
os
5
00250 aND
5
00260 l,UO os
5
00210 P2PI. DS
5
00210 fClENO OS
OS
5
00290
IF
•• 42.FMON-l ••
SETUP ROUTINE ENUY
00100 FIOON
TFIO 10RT ••• 23
00)10
8
10GT .. l
00320
GO TO EXEtUTE CAlLED ROUTINE
B
Dono
00).0
ODRG '-4
00350 JAY
OS
I
00160 NllOC DS
5
oono STftl
os
~
oono co.sr OS 5
1,0
00)90 DISKS. DC

,

02243
02241
02250
02252
02251

022'4
02296
02298
02)0)
02)0'
DUll
02124
0lU6

onu
02160
OUU
021U
OU12
02111

OZJIZ

Dun

OUI4
Dun

3511

I
I

,,

,,
5

OZJII
oUZJ

Z.

16
49
4.

ouu onu
-2)59
aD'"
00U6 -0000
00000

1
5
5

,
I

.. 612
09979
0.504
02419

TEMP!
rEM'
TEND
fENl
T1NUE
TONY
"CST
UINO
TWO
UINeT
vaUI
VAISW
wlDel
WIDTH

ASSE"BLY.

3 'I

00040

PAGE

I2n.

00000

u",

0229)
11210
OIH.
01150
14698
'9111

c

-')

1"')8
06951

1620-144'

at

00420

~ONI TO~

I

VEUIO .. 2

FOUU.. 11-0

~MASE

I-C

,.00600

-0600
DC
1.001
-01
DU CUD

00410
00440

PAGE
OU'O
021"
02191

~04'O

OC

on..

I.'

004.0 CAtlP2 TF~ F"O~.JS, IlKI
00470
8TII F~ON'''HP2
004~0 INDIV
OS
I
004'0 •
1'«)1 v • a FOM "ROS. I FOR TYPEMRnu.
00'00 •
FLAGG£D 1 FOR PAPER TAPE
00'10 T~C~T OS
00520 ENTLOG as
.USEDFS."
005)0 AfTIL OS
ol~OH
00540 CHI
OAS 410.IH)'
00550 tHU
OS
.CMI>100
00,.0 lOCAL OS
• fl6
00510 lOG I
OS
.S66
005_0 IU~BC OS
,~lO
OS
00"0 luP!
.Bl
,,060n luSK
os
.554
00610 titRE! OS
.602
,1)65
00610 IUU
OS
00610 IIUNCAL as
.796
n064n Lltl
D~
• 2l1~
00650 unAn os
t 1 1)40 •••
01 Sl ADDRESS OF PAGE MUCING
OU660 ~I~~AO O~
.ll4JJ t • •
CORE ~Tn"GE OF PAGE MUCING
00610 U6440 SF
Kl+'"
006AO
RT
OUTAOIJ,PItOGST, •
INII OUTPUI ROUIINE
00690
8
UOU"O
00100
DDRG .-4
U0110 "LU
DSt 2.12
ZZ
~01l0
OSA RlIU'A

OhOO
0141Z
01414

1511'

un.

OOU'
00566
OOUO
00512
00n4
00602
00'65
001"
Ollll
IU40
UUO
024)0
02442
02454
02461
024.1

I.'
1.0

02469

5.11100

024H

J1ft~O

3,136

02411

00110

DC
J16
DSl

tALLPl

OZ412

00110

at

I.'

02482
02411

U0190
INilULI1E '.I"IER ,.r,~ HElDING
J0800 '""UNO 8'1' •• )2.LlSJ"
INITIAL READ AND PRINT HEADING
IFM OFL01"'1 ••• ZO,.
OOAIO
I' CO'lSOU S~IJCH I I~ ON
OFlOl
00'20

"'

~CNIICA

OC

~O"~J

S.

vORbll
00"7,)
uO''''1!}
U0890

S.

P~OGSI.OI.IO

IF

lilt,PMlHiST

oncHO
OO"l2u

SV".l •••

In

PTA'.2.PUS'S~

PTR'.2.0b.1O

IF"
S

SM'OO,U.

1III0OAD,10.1"

~OqqO

.~

5.'00,10,10

01000

B.. R

•• 20, S.. C\I" 11,

nlOla

Oll~()

..

.cr.

FLAGGEIJ re •• I"AL Ro TO INOItAH CARD END

~"UH

,SIlL

SMC,NT ,b,lO

"0010,41,10

Soot .. I.IO,IO
TEST 'OR

E~O

OF

U~LE

•• 60

,

at

S"
SF

lUNCH IF F IUD

'P2 OR KLNG

.....

vi"""

S"AOO,~.IO

OJ012
0102.
o)on

S".. OD •••

I't' .SIIADD,SolO
SMAOD

IF
OU'LI'.2I,~."20.'
P.INT S.IOIIOL UIU-FIIlSf ,..,

02521
02540
02552
02564
OH16
02588
02600
0261l
02624
02616
02641
02660
02611
02684
02696
0210A
02120
0212R

02140
02152
on64
02176
02T1A
02800
02111
02124
028)6
Oll41
02160
OZU2
02114
02 . . 2
OZ. . Z
on04
02916
02921
02940
02"2
Olt. .
02"0
02'16
0"··

MIllY

.

00000
02251
00000

5 •
-24"
I

-HOC
I
44
16
49

02516
11141
11142

02228
-2516

PAGE

azul

TESI FUR LITUAL
TEST 'OR SI~NI NO

OS
M'lTY lOC-4
SPT'
OS
,--5
All
10M

02414
02496
02501

0251.
02521

,

I

12

21
4'

a
a
0
a
a
lIl"
10614
02484

... ASE I-t

MOOAD.S TAL

~
f81110
DORC e-)
8~F
e8660l. SMt,.., .11,
R~F
S IMTNO,MODAO til.
CF
SfltCNT".
t.
1110010, . ,
IF
S'".SMAOO.ll
CF
SMADn
SO
£16101-41. 1100 AD. 11.
SIO
SIOAOO,2 •• 10
•• 21, !t __ ADD, 11
IF
TF
sYlI-2
LOt.FP2
IF
SIIADD.LOC.6
IF
£1680Iel1,"Z
B
U6AOI-lZ
DORIi . - )
A
lOC,KLNr,
IF
SIIADO.LIlt ••
IF
EI610hl1,KLNG
TFIO £86120 •• ,5.11'1
fbblOI SIO
E'I6120 •••• ,

GI160
01110
OIUO
"'190
"1200
01210
01220
01210
01240
01250 AUSE
01160
01110
OIlAO wDLN
ou.o EI6820
01 JOO
01110
OU20
OIUO
01 )40
OIJSO
01)60

'CRlAAN II-C

SO'OO. S IRL
s• .&on,~, 10

,)0910
IF
00940
S"
(IO'l50
I.
J09btJ .
So
OOHo l tl6bOl S~
UOqRO
SM

010"0
'll 0'0
ullOO
CIlia
CI12D
01110
01140

Z

1,' ,.

AM

AM

VER~IO~

I

~"".l.t·"'·

,}O".o

00900

°

0

a

351
1620-1441

10~

00" 10

C
e

02461

at

00160

a

a

02461
02461

DSC
0
DC

-2461
-2400

02)5'
02124
I
5
0
0
410 •

OUU
uon

Dono

00 150

16

1J

0142'

on140 BLlU

UIOIO
OION
olOln
01040
<11050
01060

-1454
I

Oll91

15

OlSle
I

00000

12

0158C
ell51
0]516
IlZ08
11208
01539
03B9
OlS19
0]544
01544
OlS49
0]549
03544
0]549
0153'
02128
01112

00000
000-1
OU51
02294
COO-6
-0000
02111
000-5
02111
000-6
02117
000-4
OOOJO
OOOJO
OOOJO

OZ.12
01616
0]54M
0]54R
01519
01519
02192
O153R
02141

0)5411
on4R
00000
00000
OJ5)R
00000
CJ54R
000-2
035)R
00000
02291
OU16
azul
00000

12
Z6
ZS
11
I.
22
11
Z6
Il
2.

12
12
12
11

4S
49
44
4.

n
n

26

n

OJ

Il
26
26

21

,.
'"
,.,.
26

21

16

12

4•

J4

II

11

i ..
I'

OJO)' 12
0)041 J2
OJD6a· 26

3·')
il.

ann

0)"6
0)53.
OUSI
ann

0J54~

00000

OZ9S1
OJOO.
0)006
aJ012
00000

OlZSl
onl6
0225Z
-JSlO
-0000
00000
00102

......

.",,00
00101

03'"
03U.

:~

a

00000

anI'
OUI.

0,1100
000-'
00000

1
an"

onit
OUI)

000-'
00000
OJ006

2

1620-144) "ONUOII I
01)70
01 ]AO
01 )90
01400
01410
OIUO
Ci1410
01440
01450
01460
01410
01480
01490 PKNT

BNf
Til
TF
CF
TR

VUSION a

fOUUN 11-0

~F

CF
CF
TF"
B

TF"
B1
OSA

015DO

DC
J4 '
01 SlO
80
01520 Dun I T 8T"
OU10
OSA

PAGE

P"ASE I-t

ID'T,PIINT-4,l
OFLOI-I,OUflIT-I2 .. SET IIETUIIN FIlO" PAGE DYERFLOW TEST
TEST 'AGE OVUfLOW
OFlO, "
CUD

0]012
OJOI4
OJO ••
0]108
OU20
OU)2
OU44
DJU'
OJ161
OU'O
01192
OJ204
OllIS

1,1'"

OUI5
012U

DUTlII-I2,LIST"TDTAL LIST"IG
CARo,cnO-II" ,
INIT FOil PIlINTING
CAIIOH,LOC
SY~·I

C AR006, El61Z0.6 ,II
SY"ol
CARD
CARD.6

lou, .. n

LLI,PUSTSN

D12Z0
01212
DU48

DUfK,·.16
E86801. I I,E16120.'

DJ248
DUB
0]254
OJ262
DJ262
OJ274
OJ216
01291
OUIO
OUZl
on14
0))46
01151
on65

Z6
n

1\
12
n
n

It
49

\6
49

ouao
OJU4
OJue

-J4'4
J
41

IT

01262
ID056

49

-2951
-J006
02ua

J\
26
n
U
12
25
16
49
49

OJU4
OJUI
0"'0
01460
OJ"O
OJJn
00'"
00'12
0)ZJ2

),00'

0))69
01112

-]454

DC
-0'
DNa
ONft
DC

50
]0
I,'

0)422
0)452
OJ451

50
10
I

OSS
OS
os
Os
os
DS
os
DC

II
5
5
5
)0
2
5
I,'

0)454
0]519
0]544
0]549
0)519
OJ51\
OJ516
01511

1\
5
5
5

01110
01120
01130
OIHO
olno
01160
01110
01180

CARD
s"ooo
S"CNT
"OOAo
SY.
LOC

CAROH,LDC
SY".I
CARO+6, EI6IZ0 •• , II
SY~.I

PTC002,PUST$1I
II1MT, •• 21
I DPT, PTCO-4 ,1
a
a
Dun I T
DORG '-4
OSA CUD
TF~

01190 rUfP
0\800 TE~P2
01110 H"P)

DS
os
OS

TE~PS

o~

SAVEl
SAVEl
SAVE)
ADS AVE
EUSE
"ODE

OS
os
os
os
os
DC
-0
TF
CF
TF"
OC

01890
OlqO()
01910
OlqZO

ST~T'ID

TF
A"
80
CF
TF"
a
Sf
TO"
8T"
TF
SF
Sf
a
OORC
OSA

VER~IDN

2

fORTUII 11-0

)C

2
5
I

0]592
01591
0)602

PAGE

PHUE I-C
03601
0]612
03617
0362Z
Ol627
OlU2
Ol6)4

S
S
5
S

5
S

2,0

0)616
0)641
0)660
0]611

S.~,S"Aoo,1I

S"AoO, ,
5"'00. ,6
~hOOOO'

,.

02080

SVM-1

0)612
0]614
0)696
01701
Ol720
OJ112
Ol744
01756
01761
onlo
01792
0)804
OJI\6
OJ824
01821

],14'

0112.
03811

•• )5.5"'00
e.21,5,10
ST"NTl,O,
S.,,-)
IORT ••• Zl
IOPT,SYMI-4,l
S.~-)

JAV,It

URDR2,S79,9
S TMNTI.II, SYMtI,6,
STMNT1+ll,,6,
S".OO
E A6601

TABLE STMNT NO. AND REC "ua
SET fLAG OVU RIM fOR PASS 2

'-J

DC
J4'
02090 E81l10 TF"
DC
02100

SVM+Z, .10.

TF
02110
80
02120
TF
02110
02140
B
OORG
02150
Tf
02160
02\10
A"
021.0 E81210 Tf
AM
02190
Tf
02200
02210
A"
8
02220
DORG
02UO
02240 £11110 5"
Ol250
S"
02260
5"
Tf
02110
02210
C
OZZ90
IE
02100
'~II
5M
02110

TENiI,lIOl)AO
E92210,SUBfCT"
TBASE,fCTENO
IUFOU", ••
'-4
S"AOO, TIASE
S"AOO,I,IO
S"CNT, nASE
5"CNT,5,10
"00 AD , TlASE
"00AO,2,10
E.1110.J6
.-)
5"AOO,IO,10
"OOAO.l0,10
SMeNT ,10,10
SY",lER1J-l
S"ADD,TENG"
UlOID
Ul420, Slit"' ,II,
S"ADD,OI,IO

-13'5
00000

)

S
S
5
5
S
S
2
26
J3

16

01579
015)9
O)53R
5

0)5)R
00000
00000

01107
On07
onlo
OJ516
00565
00'32
01516
01J61
11246
OlTOP
onop
01519
oauz

0)5)9
000-5
00000
00000
-174)
-]124
00000
00004
OON79
0]510
00000
00000
00000

-000'

019)0
01940
OlqSO ST~NTI
01960
0lql0
. 0\980
OlqqO
02000
02010
02020 S TMNT 2
020)0
02040
020'0
02060
02070 SY~I

00000
ann
01516
00000
01000
00000
02294
-))51

Dun

:Hi3

1620-144) "ONITOR I
O
A
03960
IF
01970
M
01980
01990
SF
04000
S
A
04010
0.020
8NF
C
0'010
8H
O"O"u
04050
TF
040bO
C
e~H
0'010
TOM
o.oeo
8TM
0'090
TF
04100
AM
0'110
TOM
0'120
04110
oc

0.110

SEUCH FOR EQUIV. VARIAILE

OS4IS

CM
ANE
IF
8

O}81a

O'I~O

8RANCH IF NO STOUGE AlLOCAT ION DONE
BRANCH IF NOT STATE.ENI NUM8ER

E 8RS40

SMC~T,lOdO,

Ib20-144} MONITOR

0".0
04\50

FUNC T NAME

DORG 0- 1

03810

0'870
OlB80
viB90
03900
03910
"3920

O~

0500.
05016
05028
050'0
05052
050U
05016
05018
05096
050Q6
05101
05120
05121
05121
05140
051.8
051.8
051110
05112
0518.
05192
05192
0520.
05212
05212
0522'
05210
05241
052110
05212

1,' ,.

UllAO
03190

01800

8UNCH IF NOT SUBR

E~A5'O

0-)
E8J:1b60.SJItCNT,ll.

PAGE

PHASE I-C

MOOAO,10.10

EA8bOO,SI4C.NTtll.

01100
01110
a) 120

FORTRAN Il-C

SMtNT .10.10

OHOO
B~F
OHIO
OH20
ilORG
OHIO EdRoCO 80
OH.O
8
01450
OORG
01460
SM
0\410
SM
UHIO
SM
01490
8
OORG
OHOO
OHIO E8R06Q 8~F
01\20
8
OHIO
ilORG
035.0
C
01550
8~E
OHbO E88110 SM
01510
TF
IF
01580
IF
OH90
OlbOO
60
AM
albIa
CM
Olb20
Ulo)O
B~E
IF
Olo.o
Ol050
B
UORG
OlboO
Olb10
0)6RO
5F

•

VERSION 2

SAVEloIO.IO

SM
SM
8TM
OC
J
0$4
OSA
Os.

04210 E19000 BNF
0.220
e
OORG
0.210
0'240 E8QblO TF
TF
04250
TF
042110
0.210
eOlF
CF
042.0

SMOH t O,61.
•• 12
99, TEMP

F.NTER FROM E88110

VERSION
lEST

FO~

3 ;j i

FORTRAN II-C

05~92

95
• 0

GEN ADO OF fIRS T ELEMENT OF ARRAY
ANO MOVE TO TE.PI

MOUE
TEMP5 CCNUINS eASE

ADD~ESS

9,
qq. WOlN
TEMP!t,99, •
•• 48. TElSW"

TEMP5 CONU I NS AOORESS OF LAST ELENENT
RRANCH IF IN COMMON

LaC. fE.P5
·.2lt

LaC. TEMP5
TEfIIIP5.COMST
··36
JAY ...

ERROR2,575.9.

COMMON VAR. OVERLAPS MEMOU

SMAOD.TEMPI.6
S"IDO.5.10
S~lOO •• '

0550.
05510
0552'
OS52.
05516
05541
055'8
05500
05512
0558.
05590
05608
05620
05632
056.4
05056
05008
05680
05692
0510.
05116
0572_
05140
05152
05164
05716
05118
05800
051\2
05'2~

1.' ,.

05\92
05121
05016

O15.M
O)H.
00000

H
.9

051.1
05016

0)54.
00000

12
12
12
49

01519
035 ••
015.9
05016

OOOJO
OOOJO
OOOJO
00000

H

OHI2
05121

0)51.
00000

01611
05128
01519
OHl1
01519
0)579
05 . . '
Olb21
OI62P
05152
0lb02
05.00

015.M
01200
000-1
OI51R
12251
Olb2P

Zl
12
21
20
26
II
IS

0lb2P
00095
00099
03b02
OHIR
0)519
035."
I

0299.
00000
0}592
00099
01b02
000-1
COOOO

II

lIHo
I

-54.8

H

.9

.9
24

41
12
26
26
26
41
II
14
47
20
49

SJIIADO.1~.lO

05816
058'8
0581>0
05812

101
TEMPI-4

05111

5YM-ll

058n
05112

.

-351>8

05118

00000

12

OlS ....

OOOJO

14
41

015 ••
05524
00099
05560

-0000
01200
01592
00000

O15.~

029 . .
00000

26
49

Zl
l2
21
26
25

n

20
II
11
21
26
Zl
12
22
21
H

2'
46
26
24
U

IS
11
26

11
15
12

12
11

-]598

EaR5.0. EQRET
E92010
0-)

RES TORE AOOIESS 'liD CONTlIIUE SCAli TO
OUTPUT VAl STOIlAGE

35S

0151~

0lt01
05100
01l1>1
11246
OI51R
01519
O15IR
I
01519
015. .
lint
1

01592
00099
015.R
00000
Olb02
000-1
000-5
00099
0162'
0299.
00000
0299.
00099

on.o

01607
01100
0lt01
02112
01100
0000.
OON15
01602
000-5
00000
OOOJ.
OOOJO
-5172

5 X

-15",

on"
05111
05 . . .
05900
0590.
0590'
05920
019)2
05944
05956

00095
a
00099
01602
Ol6l.
0l6l1o
01601
Olo14
01614
03021
0154M
O15.M
00095
00099
0lb01
05152
01511>
05152

-1591

05112

TEMP5-.

OI5~R

000-5
-0000
01200
0}592
00000

5 •

05835

MOOAD.10,10
PGPRT.·.12

SMAOO.SAVEl ..
SMOtT. SAVel.,
"'OOAO, SAVEl ..
E8nlo.III,TEUM . .
TElSII

••

H
.6
.5
.Q

PAGE
05.80

SMCNT t.OlN,b

JEMP5. TEMP),.
MODE.itlD
MOOE.!»,10
ADSAVE. "q
SMC~T, ADSAVE, 611
SMCNT ,WDLN,6

OOOJO
OOOJO
OOOJO
OOOJO
02)0]
01200
OIHR
00000

PHASE I-C

HRC OFF SET

·.44
0-'

99, TEMP"
TEMP),qq ..
fiilQOf,fIIIOOAO.11,

0)622
035 ••
01519
0]549
01519
0 . .01
050"
05016

12
12
12
12

.~

••
,.z.
211
.~

n

x

-)60)
05016
01 . . Z

01512
00000

onn
on••
on••

011>12
0)611
01U2

0.00.
01)40

on.o
00000

.-.

1020-144)

O~l90
S
04)OU
0'"0 taqOOO tM
O.UO
a~F
041)0
SF
U' )~O
8
o.no
DORG
O~).O EdQ'40 8~F
04)70
OOItG

FOUND DEFORE CO"I"'400,11.
SYM" ,
SNAoe,LOC,b,
e90010,MOOAO,II,
SM'OD,I,10
SMeNT,.6

_aVE SY. NA.e
'OVE O~J TI'E ADDRESS TC "ILE
HAlNCH IF VARIULE IS AN URn

059. .
059"
On7.
0""
0.000
0.012
06020
0.020
060n
06040
06040
06052
0.060'
06060
0.072
06010

ouzo

'9

JZ
U

J)

26

H
Z6

21
20
12
26
20

26
41

II

on).
02291
0299.

onl6

OOO~I

035)R
00000
O)S16
OJSU
000-1
00000

11136
I

-62'0

11"620

"T"
IJC

P('",PA. T,. tl.2
I, u

0.2 ••
ooao

o . . JO

OSA

re"p-.

06265

5 x

~Y"-Il

06265
06270

-3518
5 x

JUIO

~SA

0"640
u~

050

"

.- .
~

A.
....

04690
0.700

A
IF

0,,110

..

JH20
041)0
,J,-"'II

SF
S

IJft 750

04 7~0
OH70
041au

A

10 ..
DC

0.270
0.272
Oo2ary
06280
06292
OOJO'
OoHo
06321
06)40
00lS2
06364
06370
06)18
0.400
06411

90580

DI1~G
0"660
lilt 670 t 900 1 0 S..
SM"'OO.~, lU,
If)
MDOE ,fllr.OAO,ll.
0 .. 680

PUINT 10 Ne OF ELEMENTS
SAVE DII,0

0)617
0)622
0)627

on••
01011
06659
01612
0)6)1

00000

ann

000-1
00000
02)77
00000

U

07)40
0616"
066. .

-0000
0)5"
OOOJO
OOOJO
OOOJO
02)03
01200
on411
00000

45
44
49

0 . .60
06196
06 . . .

on""
on""
00000

·U
U

0....

06116

0]5411
00000

au..
oun
on..

OOOJO
OOOJO
OOOJO
00000

16
U
Il
Il
12
Z.

.
46

.
1l
1l

0 . . .0 'U
0615Z

ann

0"'4

II

Ib20-1441 MONITOR
OORG
OHAO
OH90 E~0900 ~~F
OHOO
a
OHIO
OORC
05)20
t
051)0
aNt
U5140
80
OH50
SM
TF
OSJbO
AM
05110
AM
05HO
05 )90
t
OHOO
INL
TF
OHIO
TF
05420
054)0
8
OORC
OH40
05HO E91050 SH
t
05460
INl
05410
TF
054ao
IF
05490
I
05500
OORG
05510
OH20 E~1l20 IF
OHIO
S
AH
UH40
INF
05550
TF
055bO
IF
U5510
SH
05580
TF
05590
AM
05600
OS
05610 OUTCE
SF
05620
056)0
ao
05640
I
OORG
05650
OSbbO E91250 CF
TF
O~bl0
IF
05680
TF
05b90
TF
05100
B
0' 110
OORG
OH20
OS no l_IUO SH
TFO
05140
IF
DC; 750
B
05160
QORG
05110
05180 E91<10 c.
Il
os 190
SF
05800
C
05810
aNE
05820
TF
05830

.·10.S,.AOO.ll.

LOOK FOR EQUIY YARUBLE

E 908~o-20
.-)

SMtNT .EUSE-I.6.
E90850-20
E 91 050. MODAD .11.

IE S T FOR EQUIYALENCE TO BAH YARUBLE
TEST FOR

PACf

PHUf I-C

FOURAN II-e

VERSION

.-}

DI~ENSION

0 . . 60
06160
06112
06 . . 0
06110
06192
06904

H
49

06110
06196

O)5)R
00000

24

24
46
Z6
26
49

0)54M
06nb
01020
0)5)9
OZ910
OU10
0)5)9
01'106614
0)592
OU59
06614

0)54R
000-1
O)5)R
000-5
000-1
01592
01)00
02910)5)9
00000

12
24
46
26
2b
49

01544
0)54M
06128
0)592
06659
06128

OOOJO
0)592
01100
O)54H
0)5)9
00000

26
22

II

01621
0)626
0)621
01296
01549
0)519
0)519
01544
01544

02111
0)54H
000-1
0)62P
0)621
0)b21
000-1
0)621
000-3

32
4J
49

01196
044lb
04228

00000
0)54R
00000

H
26
26
2b
26
49

01196
035)9
01544
01549
03611
05052

00000
03612
0)611
03622

12
16
26
49

Olb21
01592
O)bll
Ob904

000-1
-0000
0)540
00000

14
H
)2

-0000
01100
00000
0)612
01200
03612

41
H

0)611

DilDO

5,.100,1.10

onl6

ABASE.SMAOO.II.

06'11
06940
0695Z
06964
069"
06911
01000
01012
01020
01020
010)2
01044
01056
01061
01080
01011
0101.
01100
01112
01124
011)6
01148
01160
01112
01184
01l9b
01196
01208
01220
01228
01U8
01240
01252
01264
01216
07288
01296
0129b
01108
07320
01112
OH40
01140
01152
01164
01116
01)88
01400

U

41
26

01592
OBI2
01140
03621
01444
0)5)9

01412
01424
014)b
07444
01444
0145b
01468
01480
01492
01504

26
2b
49

01544
01549
Ob092

03611
03622
00000

26
2b
II
2b
II
49

OJ539
01544
01544
01549
01549
06092

O)b21
0)621
-0004
0]627
000-1
00000

26
26
2b
II
26

0
0196]
015)9
01544
0)544
01549

II

0154~

)2

O]b21

.9

01512
0
01595
0
06092

2b
26
26
49

0)5)9
0)544
01549
05052

0)612
0)611
0)6ZZ
00000

2b
lb
II
2b
II
Z6

0)5)9
0)544
01544
01549
01549
0)612
01631

01595
01595
000-4
07595
000-1
07595
000-1
00000
02111
00000
00000

'8ASE,5.10
SMAOD.I.IO

'BASE,fE.P t . ,

FIND

~EG

OFF-SET

E 90750

fEMP,A865E.ll,
SAve .. , 5"'00 ••

SAVE NE~ OFF-SET
SAVE TABLE ADDRESS OF

NE~

VAR IAllE

E 90150
.-)
SIIICNT

t

10, 10

SJIIICNr,TEMP,b,

IES T OFF-SET

E90850+12
TEfIIIP,SIIIICNY,ll.
SA.E4.SMADO

HOVE IN NE_ OFF SET

E908~0+12

.-)

AOSAVE. SfBL
AOSAVE-I.SHCNT .11.
ADSA.E,01.10
E91110.lDSA'it,11.
000 AD. AOSA VE
S.AOO. ADSA vE
S.AOO" 010
SOCN I.ADSAVE

GEN ADDRESS OF aASE
nST I F BASE IS IN COMMON.

8RANCH NO

.. ,

SJll1CNT.l.10

,

OUTCE
E 87b 10+ 12, .. 00AO, 11. METURN ro OUTPUT CO~MON ARUY
RETURN 10 IlUTPUT SIMPLE COMMON VARlA8lE
E 874QO-ItI •••

.-

)

Durce •••

ENIER

S,IIIAOO,S4YEI
SMCNT.SAVE2
MOOAO,SAVEl
E8A SE-I. SMCNr .11.
E8t15"'O+)6"

•

FRO~

E89150

SEI uP BASE NUMBER TO SURCH FOR
IHE REMAINING EQUIV VARIA8lES

·-3
AOSAIJEtl .10,

ENTER

E8ASE-l,SMCNT.ll.

SET liP BASE NUMIER

Te,-p,a

FRO~

E91150

e90900+44
.-)

TEMP.O ..

E'H610 •••
TEL SIi".
AOSAVE, SAVE 1,.
•• 56".

ENIER FROM E90190 AFTER SEARCH INC !AILE
FOR ALL ~OUIV VARIABLES. If TEMP IS LESS
IF NOT NEGATIVE
THAN lERO. THEN THE BASE ELEMENT IS
NOT ASSIGNED FIRST

SHADD. SAVEl

Il
II

II

II
44
Z6
2b
12
2b

24

a

Il

O)·j.t,~

00000

361
1620-1441 OONITOR
05840
05850
058bO
05810
05880
05890
05900
05910
05920
05HO
05940
05950
059bO
05910
05980
05990
06000
ObOIO
Ob020
060)0
060.0
Ob050
Ub060
06010
Ob080
Ob090
OblOO
OAiIO
Db 120
061]0
OAl40
Obl50
061bO
Ob 170
06180
06190
06200
Ob210
OU20
Ob210
06240
Ob250
06260
06210
06280
06290
06)00
06310
06120
06nO
06140
06350
06160
06370
aUlD
OU90

TEL SW
E911>10

SAVAO
EQRET
Enno

t _1810

TUSE

E92010

S.tNT.SAVE2
MOOAO.SAVE)
E89820+12
~
DORG .-]
TF
SIoIAOQ,AOc)AYE
IF
SHCNT .ADSAVE
AM
SMeNT ,4
IF
MOUAD. AOSAve
AM
MaCAO,l.IO
B
E 89820+12
OORG . - )
,e91410
OS
TF
SAYQF S, TEMP,.
TF
SfIIIAOO.SAVE4 ..
TF
SMCNT .SAVE4
AM
5"tNT ,4 .10
IF
OOOAD.SAVE4
AM
MOoAO,l,10
SF
EQRET
OS
$AVAO,AOSAVE ••
TF
DS
,E91blO
H
E89820+12, ••
DORG . - )
IF
SMolOO.SAVEl"
TF
SMtNT.SAVE2"
TF
MOUAD,SAVEl.,
E88540+]6
I
DORG '-3
TF
5MAOD. SAVAO"
TF
SMCNT .SAVAO
AH
SMCNT ,4,10
MOOAO. SAVAO
TF
AM
MOOAO.loIO
TF
EUSE.SAVAO
SM
EUSE-I.I.IO
SF
feASE
A
EBASE.STBl
EUSE-)
SF
CF
SAVOFS
OS
.+,.
,MODAD,U,
80
SAYAD,l,10
SO
fF
'+]0. SAVAD.II
AM
e.18,5,10
TF
,SAYOFS ..
a
E18110 •••
DORG - - )
SM
SAVAD ••• IO
TF
SAVAD. UYOf S.6.
8
El8710 ...
IIORG - - )
TF
reM', TEMP)"
CF
EORET
TF
SIIADD.SAVEl
TF
SileNT .SAVEZ

VERSION 2

FOURAN II-e

PHASE I-e

IF
IF

.'

"

PAGE

07~12

ENTER FRUM E91420 .SAVE OFF-SET VALUE

. SAVE ADDRESS OF BASE ElEMENT
RRANtH TO OUTPUT $VM WITH NEG OFF-SET
ENTER fROM E90bOO
RESTORE TABLE ADDRESSES AND 8RANCH TO
ASSIGN EOUIVALENT ADDRESSES

ENTER FROM E90bO]

TEST I f DIM YAR

PLACE OfFSET IIITO SYM AREA,

PLAtE OffSET INTO UBLI

01340
01512
01524
015Jb
015U
01560
01512
01584
01595
0159b
01512
01608
01b16
01616
01b2&
01b.0
01652
01bbO
01660
01672
01684
0769b
01108
01120
011)2
01144
017510
01168
01110
01791
01792
0780.
07116
07UI
0".0
01lU
01160
07 . .0
01172

alII.

07 . .2
07lt2
01904
01916
07921

fNTER FROM £19601

362

26

12
)2
21

016ll
n6ll

12

oun

13

01963
0
0"60
01595
01 . . .
01 . . .
00000
05n6

4)

12
26

II
Z6
.9

0)592
06659
06659
OOO-~

06659
000-1
00000

00000

0154R
000-1
015911
000-5
0196)
00000

01595
OUtli
05216

000-6
07961
00000

Z6 015.2
U. onu
Z6 ann
Z6 OJM.

OJ602
00000
OJ612
03617

12

.9Z6

11

1620-144) "oNIIOI
TF
O'~OO
~F
OHIO
06UO UVOfS OS
06410
I
OH~O
DORC
U6HO E91210 IF
H~R
064&0
SM
06HO
06480
IFM
TF
064.0
0650n
AM
TF
06510
06520
S"
(65)O E"22"O 10
06540
A
8
06'~0
06UO
OORf.
A
uU70
CF
06"0
065.0 ~URAOO OS
TF
OUOO
TF
OUIO
IF
OU20
TF
06610
OU40 [~71"Q 8T ..
OU50
DC

EU~40.16

.-J
~UUOO,FCIENO,

,
•• Z4,FC 'ENO,II,
SU8&00010,10
E'2440-21,4I,10

.-1
lOC ,KlNG

,.

.. OOlOn"

SVM,lERI1-1
•• 2),$"'OD.l1

sn••••

"oVE NAIOE 10 SVII
MOVE O_J "'E AOOIESS TO JAllE

SlUDO.LOC,6,
PGPU
1,0

,"Il

CSA

~

YM-Il

•• )0. SURAOO

01l0~

BO

E'1~10.

SUhAOO.l.10
5U8100, ,6;

SUUOU,II.
A~
sueAOD,l,lO,
AM
LOC.S.lO
En19U-60
B
QONG .-1
AM
LtJC,'hlO
MnOAO. ,6
CF
SYM,IEKII-1
IF
TF
AD~'VE, SMAOO.ll,
sv .... AO!:.VE.ll, \
TF
TF
S"AOO,LOC,b.
SF
S""OO't b

TE S T FOA ENe OF PAUIOEr EIS

T£SI FOR 01' vu
FLAG INOltAHS FU~trION \UB'ROGU" IN

363

VERSION 2

FORrUN

II-e

,.

,.
II

.
II

41

II
II

)J

Z6
Z6

,.
26
\1

OlJU
aULD
OOOJO
000"1
01121
000-)
OIIU
000-2
OU41
02'"
00000

on..
01541
01100
au . .
01112
on . .
01541
0

022'2
00000

oun

Ill,.

01159
ann
01511

01',1.
00000
0]51'
-'''4

lin.
I

OUI.
OU21
01140
OR152
0116_
0.312
O.Hl
01114
011".
OUOR
01420
014)2
08H4

)2

16
12

12

.,
11

II
})

26

12
13
41
II
II

~"
II
])

26
2.
2.
26

]2

•

0}5).
011"1
Olll)
01519
0154"
01548
Olll)
oalll
OUl2
08)22
00000
01112
0112]
01516
01112

00000
OOOLl
OOOKO
OOOKO
UOOKO
OUZl
000-1
00000
081ll
000-1
00000
OU2l
000-1
000-5
00000

01516
0)54A
01519
0)621
0)57"
O)5)R
0)5)1

000-5
00000
12251
0)5)R
O)62P
01516
00000

PHASE I-t

SAVE NUI08EK OF 0 I MEN$! ONS

PAGE
01456
0 ....
0'410

2S
12

oa~"2

DUO'
08~16

II
II
Z6

01528
01540

II
4.

O'~"

2.

II

OJ6H
Olll]
0)6)4
00099
03.27
Ollll
0112]
08172

O.IlL
000-1
000-5
000-5
00099
O)62P
000-'
00000

Des ••
ENIfR FROM E"2~ 10
FOR RECoRO ,UK

01560
01572
015 ••
01596
0160.
01620
016)2
0 . . 4_
01656
01672

SF
lOC'1
CAOD,lOC_I.6
TD
MSP
8
OORG .-~
tAOO,09,I0
S~
GlP
e
DORG .-~
lOC,O~,IO

IUFDU".99
lot,OI.IO
A"
GO TO our"UT .UFFER
8
eUFOUlI" ,
DORG '-1
E"T~R HUE flO" Ulna AFTE. All STORAGE IllOtATlOli 15
COII'LEIE
OttlOD,INTO".,
E'I'OIO TF
TENO, . . . O.
ESPECUll,T Fol JAV
A"
SMADO, flASI
TF
TF
S"CNT, TlISE
AM
S"AOO,2
S..CNT ,~
All
·.)2
8
DORG .-J
S"AOO.IO,IO
E91060 5"
SMCNr .10.10
SIO
SMeNr, fEND.
C
EtJ610-24
Il
lliR E91200. SMeNT
U)060
B
DORG .-)
En200 III. E 91060. SIIADD.1l •
aNF ' . . J2 , SIIAOO. 11
TO" 5"100.0,6
U]060

.....
.....

,lI,

•

12
U

00000

0112]
alDOl
01121
01191
OUlt
01121

-""5

·.18,1.10

SM

....
80

Z6
4'

14

OJU2
00000

a
o,on

-H6I

TF

EQ}8110. sutUOO, 11.

5"AOO •• b

--ll,12.10
:)Uf'AOQ.20.10
""AOO.20.10

16Z0-1441 MONlfoR

M~P

4'1

01l9~

SM
CF

MOOAO.10.10

~~.

"

I.
II

0 . . ."
011"4
01196
OllaR
08220
0.212
082_4
0'256
082"
08210
01292

SF
TFM
SM
S"
SM

MODE .·~UO'D() tIl.
SUHAOU,lo1G
MODE, S"O
qq,5,10
Obq~O
06950
AIlSAVb""
0 .... 0
SUKAOO, AOSAVE,611
SU8600, 8 .. 0
06970
0. . . 0
8
E 923"0
OORe; .-J
0 . . .0
01000 E.2160 TF
TRASE. SHADD"
A.
Loe,OI,IO,
01010
AM
07020
tAOO .... IO
CEND,tAOO
01010
C
01040
8NH EMP
01050
CAOO"loIO
S"
tADD. ,6
tF
ul060
tAoo,Ol,IO
AM
01010
OUTAoe, lOt
070RO r;lP
8T
srM OUfK •• +16
070"0
OS. CSTI,lOC"
01100

eM-

0"40
01912
01961
OJ . .4
01972
ann
onl4
' 0"'"
01001
01010
01011
01044
ala,.
010. .
01010
o.on
0.100
08100
01112
olin
01124
0.116
01148
01160
olin
a ....

01549
01)40

A... "

TD
SM
MM
AM
A
TF
AM

01l~D

TEST fOR FIX DR FlOAI

·'20

0 .... 10

01150
07160
01170
01\RO
071.0
01200
U7210
01220
01210
07240
01250
01260
07210
01210
012"0
07100
01)10
01)20
07))0
07140
on,o
01)60
01)10
OU.O
on.o
07400
01410
07420
OTUO

ENTEI "0" Elll~O TO OU"UT Su.,IOGU"
lUNCH IF NCT SUTEIOENT NU"ln

S"AOO,~U"OO

SUKAOD, J, 10
"OOAO, SUIAOO
"OOAO,l,IO
•• 12 , "aDA 0 , II ,
loC,"2

"GE

'''ASI I-C

IEl~~

lOt-4

01110
01120
01110

II-e

,.

nSA

0.910
06"20
06"10

fOlTlAN

"OOAO, UVEJ

06660

0 .... 80
06 . . 0
06100 ( i2'~0
061\0
06120
0""0
06740
U6150
06160
06110
U6180
06190
06"00
0.810
06820
U6810
068~0 E.7510
06850
C.860
0.810
0 ••• 0
068"0
0."00

VERSION 2

36 '.

01612
01671
01611
01690
01702
01709
01710
OU22
0.U9
o.no
OUU
OU54
OU.6
0.714
0ln4
on16
0.1 . .
0 •• 10
0.122
0.n4
0 ....
0'.,_
0'''4
0....

DlIT.
0 . . .0
Olt02
Oltl4
OItU
OItU
0.914
0 ••46
0 . ."

II
II
24
_1
12
)J

II

Z1
\1

01791 0)5]9
0)586 000-1
11219 OOOJI
11224 Illi.
0.1l0 01100
11219 OOOJI
1121. 00000
Ill .. 000-1
10614 0)516
10056 -'612
5 X
Z
-nle
-1'11
01511
1121.
o.no

00000
0]517
00000

II

Ill . .
01644

000-'
00000

II
U

01516
0"'6
0"'6
0.156

000-5
000. .
000-1
00000

10. . .
onol
015]9
01544
onn
OJ544
Oil"

on.o
000-'
on.1
OT"I
-0002
-000'
00000

OUJ9
01144
OJ544
0.260
Olt"
0 •• ,..

OOOJO
000.10
OUOI
onoo
015411
00000

01154
0....
OilY
0 •• ,..

DIna

JZ
U
4'

.
II
4'1

,.
,.
II

16

II
II
4'1

U
II
24
'4J

.,
4'

U
64

11

••

olna
00000
00000

15

1&20-144) MONITOR
01440
DORG
roM
01450
014&0
5~
01410 £91UO ,~
TF
01410
014.0
TF
TF
onoo
onlo 8~'
SF
CM
07520
075)0
8~e
07540
07550
IFM
075&0
CF
01510
8
07510
DORG
TF
on." ~Ii.
01600
TF
TF
01610
TF
01620
01610
8TM
07640
D5'

"

.-)
SfIIAOO,O.6.

VUSlDN ,

POIIUAN II-a

'MASI I-e

CLEAR RECORa IIAU

5~'00.2.10

LOC.5.IU
55YM~K.ZUII-1

.'210 SM'OO.1I
SS'Y .... K •••

MOVE FUNtTICN NAME

S5YMWK-1I
55YMWK-IO.00.10
WG.
SSYM~K-II. 55Y"~K-'

SSYflII"K,OO,lO

.-.

S5YMWK-1
IWP

CUO.II. S5Y""K
C'ROol •• LDC
CUOoll.AlPHR"
5M'00.Loe •• ,

out., •• l .

MOVE OIJ TillE 100lES5 TO "IU

CSTI7.CUO

'A'E
0 . . .6
0 . . .6
onn
019.0
0.00'
0.014
0.026
O.OJI
0.050
0.062
0.0"
0'0"
0.0 ••
0'110
0.111
0.111
O'UO
091.,
0.15.
091 . .
0'112

15
12
11

""
"

Jl
14
U
H

"n

.9
2.
21>
2&

,.
"

01"R 00000
015)9 000-'
on. . 000-5
0.n4 12251
0.0)7 on).
0.n4 00000
0914) 00000
0"'4 000-0
09111 01200
09141 095.5
0"'4 000-0
09551 00000
0.011 ·00000
0)U5
OJ470
OJ472
on,.
10056

09554
onl6
0925.

on ••

,•

-'112
2

07UD
016.0
01610
01&80
01690

AM

SIll&OD,2.10,

TF
TF

5YM.lERII-I
5Y".E91UOo41,1I ,

6T"
DC

PGPRT, •• 12

1.0

09112
09111
09111
0.200
0.212
0.224
0921&

0170U

DSl

LOC-'

0.241

5 YO-II

09241
0'2'"

-nil

.-.

0924&
0'241
0.255
o.n.

4.

-15&1
0lU4

noooo

09260
0.212
0.21.
0.296
0.308

14
4&
4.
1&
4•

122'2
09)40
09140
00565
00532

00D-6
01200
02221
-9319
J12U

O,)2D
0'312
09140
0.352
09)60
09160
0.312

16
4'

-9)40

4'

11141
11910
0'160
09556

16
49

00565
00566

-9)11
-'1)1

09114
091.6
0.408

26
26
)2

0'55~

0'~20

I~

0'412
0'444
0.456
Oh61
09410
0.417
O.UI
09500
0.512
0.514
095J.
09541

41
31
16

01710

05'

07120
07110
071.0 CHI7

"DYE 5'" ".,E

6
E91060
DORIi
DC
2.&8
JO
01750 ALPHAM DC
2.0'
07160

Illno

16

-.'56
-J454

11
26
Z6

"

on"

000-2
12151
0.0)'
-921&

01519
on19
IIJ16
I

5 •

5 x

0.25.

le."INAL ROUTINe TO PRINT LIS' BLOCK

co.

tOU~T8,

•• lO

NOPU
unoo
BE
017.0 .13610 8Nf NOPR r .ll Sf"
TF~
IORT ••• Z) •••
07800
IOPT,fAF5-,..7
07810
8
07820 •• PRI" HelDER FOR FIRST PAGE
IFM OFlOl-l, •• 20 ••
018.0
~7
OFlO+12., ,
07850
•• ZO.SU8FC.T
01860 NUPR' 8D
ERNEST
H
01870
0788U
DORIi . - j
07890
IF" IORT,·.Z)
07900
IOCT.c.OMSec..1

TEST ON LINE 'RINT SwITC"
P~INT THE LIS' LINE
DF PHISE 2
SUPPLY RETUMN 100RESS
PRINT FUST HEADING 'HASoE

•

1610-1441 MONITOR
07910
01 '20
01910 1I JUST
07940
07950
07960
07910
079.0
019.0
OAOOO
08010 "V ... IIE
08020
OAO)O
OR040
OB050
OR060
08010 SSY~.K

TF
TF
SF
CII
B"e
TR
TF~

SSY"~K-1I
S5Y~WK-IO.OO,

SS YII~K-II. SSYII~K-'
SS'O'WK,OO.lO

.-.

8NF
80
8T"
.T"
os.

C
ROlE
8TII
SII
rOM
TFII
8
TF
8Y
8

10

MV'NAME

OMO.O ~RNEST
08100
08110
08120 HU
DRIlO

•

FORUIN 11-0

SSY~WK.SIVS"

00010

•

VERSIUN 2

SSYM~K.lERU-1

SSY"WK-I
LTJUS'
DORIi
TF
COMNIII. SSYMWK
rF
SAYSYM. SSYMIIK
TFM IORT .... ZJ
R
IOPT.enIlSEt.1
HU
OOMC
oc 12.0
-00000000000
DC
I.'

08140
D815n
01160
08110
olUO
01l9D
01200
08210
OU20
OI2JO
01240
01250 CSTI

CF

3 G~t

.-.

PIGE

PHlse I-e

~9

O.~O.

, 12251
02243
00000
000-0
01200
09545
000-0
00000
OODOO

26
26
16
49
4.

09719
02241
00565
OO,U
09592

09554
0.554
-9515
-91)1
00000

J)

0'S5~

09556
095 ••
09510
09592
0.60'

E~ROR2.610.'

ourl( ••• l6

t5T1.ALPHl"

CIDo.CENo
.+)6

09554
0954)
0.544
0.411
09541
0.554
09553

Il

END OF 'ROGUII INDICATOR

09.0.
D'."
09.14
0 •• 26
0.611
0 . . 50
0 . .. ,
0.6"
0. . . .
0....
0.1&0
O.72Z
0.72.
o.no
097JI
09117
091n

.,
44

11
11

24
47
17
U
15
16
49

,.

46

4'

09592
0.592
11246
1005.
5

023n
021'~

00070
-'60'
2

•

-97JO
-9258
1121.
0. . .2
10614

11224
01200
-0000
OOo-J
0000.
• •• 91
JO.06
0"16
01400
00000

lUI'
IIZIR
00565
00512
0'211
09122
01400

z
Z
5 I
-91 . .

OUIO

DC

I.'

on..

01290 cCllse

DSC

1.0

091)9

DUOO

DC

5

01)10

DC

),001

01"7

J

08120

-01
DU

COllAR

09112

5

a

02291
00000

09555

HU.DI SKS~
HU.IIULUEF

OUIIDD
CIOO.l.IO
'AOO.6.6,
IDRY.··2)
IDPT.DKo"A.l
'ROGST,LDC
•• l2
CILLP2
DORG ·-4
DC
2.01
-I
OU'O COMSEC Dse 2.20
20
DSA COllst
01210

43

I

0.n4

,1"6.

Jt6.,

UQ

•

17

1620-1") MC"UOR I

olno

DC

VHSlO~

2

Fe_UAN 11-0

'AGE

P"AU I-C

I.'

I

onu

QRHO C40,(AOO
I r~c

Ib20-144) MONIIOR
(JA870

aquo

CONSU.T ADDRESS

IIIK1,

DORe; --J

08~40

UF!q ..

LENGTH
.OVE IN U~G'"

ourK-l, .6,

aria so OHAbO

ilfKl.

••

OR 100
u8110
120

WI(

IF
IF
TF

08bIJO

1,

TF

,.

08680

~,.

10055
10056
1006R
10010
10092
1010.
10116
10118
lOin

as

Ufll~40

'JU60
08610

TO NUl CARO
CFNO
".10

4b

l.
H

10Jh
10116
10JII
10000
1001l

K1,6

ClGIH
J, 10

--.,6

U

II

JI
2b
12
26
11
l6
II
II
II

1041.
IOU6
IOH8
10060
10412
10.1.
10"6
1050.

ClGTH"I l,

CAOO
10 10
4,10
15,10

DORG .-)

QUTPUT THRee SECTORS
I'. RE TUR"+ •• OUIKl
CKLl+Il
~
OORG . - )
4,10
'ADO,
T.
CAOD,
Kl,6
s. elC; rH,
)tlO
IF
tADO.
CLGTH,611
CLGT ...
1,10
A"
A
CAOO.
CLGT .. ,.II
OlSlOl
IF" CLGI .. ,
,F. ClOO.OI S"I
8
O\lTKI
OORG .-1
CONSTA"T OUTPUT 1I0UTHI£ FOil , . "

,.

••

10~0~

16

10516
1052_

49

10~20

II

10516
10SU
lOUD
10512
10SI.
10"6
10.01
lOUD
10UI

)I

1121.,
112111

12

112)4

Z6
II
21

lin.

000-4
IIBS
000-]
1123.
000-)

IIZIII
IIU4
IUI9
10212

JOUI
JO'll
00000

"

16
49

I121R

lin"

09250 •
0'9260 •

09210
09210
09290
0.300
09110
09)20
09))0
0.).0
09350
09160
09310
09)"0
0.190
0"00
09410
09410

OUIlOO

,.

5

C
B""

,AI>O.
CE"O.
CKtCO
CAOO.

SM

OUI

8T. OUUOD. NEW lDOIIESS

os

IR
IF
A"
TF
SM

IOU2
10610
10. . .
10'"
10610
10. . 2
10. .4
10106
lonl
lOUD
10142
10144

',10
CAOO

5.10
CAuO,
CONSTINT
1", ••
CADO.
OUUDO-I.6, "EW AOOlfSS
CAOD.
4.10
ClGTH,CAOD
CLGTH.OI,IO

IB

DOIIG .-9
•
CKleo

C
BE

TF

CHECK FUR UST C'.O
UDD,
CUD
CKLI
(A~O.

tUD

3Ga

10144
lon,
10161

5
II
24
.1

U
JI

at
II

26
U
42

<

14

,.

46

IIU9
IU24
10144
IUI9
112111
lUll
11219

IIno

000-'
11219
01100
000-5
lun
IOU)
000-0

1I11'

IU)4
00000

000-1
00000

IU29
10lU
11219

IUl4
01200
11224

19

LUO- L.U "01l1T01
OUIO
OU.O CKl
~'.50

VUUOII Z

FDlUAII 11-0

'"

•

10"0
10'"
1010.
10112

II
II

••

112,.
11219
10612

10112

16

10190

IOU.

005U
u 005U
II 10. . .
16 . 11219
16 IIZZ.
00000

0 •• 60
O'UO
0. . . 0 CKLI
OU'O •
09500
onlo
onzo
O'HO
0.5.0
on50 ~tTURIil
0951>0
DORG '-4
0'510 OUTOK DSC 1,0
0
09510 DUDO DC
~.OOOOO
-0000
095.0
].001
DC
-0]
0.1>00
DSA DISK

Ion.
108. .
10"0
10112
108U
101"
10. . 1

09610

I.'

10'0.
10905

2.02

10'06

•

'"

•

DC

0'620 DKD&U DSt
02
OSA
0'610
096.0
0.1150
0 ••• 0

.

UI~K

0.670
0'1>10

ot

5 I
JO'U
I

OUTDK

10'12

I.'

10'IZ
10'1)

JOI"
I

10".

50

10"4

50

OUTPUT DISK ARU
OSt 50.0
00000000000000000000000000000000000000000000000000
OSt 50.0
00000000000000000000000000000000000000000000000000
ot
I.'

OSA

DI5K+1S0

09160 LiDO

OSA

01 SKHOO

0'120

VERSICN 2

FOURIN II-e

5 I

1I0U
11015

36:1

Ib20-I4H "ONlTeA I

4'

110••

50

1111.

50

1111>.

50

IIZI.
11219

I
5 I

11219
IIZl.

JIO"
, I

IIU.
IIZZ9

JIO ••
5 I

JUI4
5 I

PAGE

PHASE I-t

09710 CLr,TH

DSA

015Ktl08

11ZZ9
IIlJ.

091AO KI

OSC
02

2.02

lIZH
IIZU

JIOZZ
l

DC

2.0

Ilnl

2

I.'

liZ"

091.0

JOI"
JO.06
000-1
JO.I •
JO.19
00000

••

10.0.

0.150 CflllD

0'110

J01"

16

101"

0.710
O.14Q "no

09100

000"
000-.
00000

101"

Ost 49,0
0000000000000000000000000000000000000000000000000
ost 50.0
00000000000000000000000000000000000000000000000000
ost 50.0
00000000000000000000000000000000000000000000000000
Ost 50.0
000000000000000000000000000000000110000000000000000
OS
I
OSA DI5K+IOI

0'1>90

20

'AGE

'"All I-C

tEND.
'~.IO
CAOD.
•• 10
A"
OUT
DORG .-]
OUTPUT
TF" RHURN.I>.
'Kl
UISK DUrPUT RDUrlNE
TFM IDRT ... n
8
10PT.DKD&U.l
DUDO.
1,10
DISK
TF" CADD.
TFM tEND.
OlSlO15

II

-0
09100

DC

0'"0 11K!
0'120 •
0.130 tRAOR2
0".0
09150
0'18'0
09110
0.110
0.190
09900 EUESI

DC
S.O
-0000
DENO
TF
EA~ES.14,·-1
TF" 10"T ••• 2)
10PT.ERIIESI-•• 1
8
"M OFlOI-I."ZO
B?
OFlOI
88
DORG '-9
DSA UME$

09910

DC

099Z0

ER~ES

I1Z4.
112U
11211
11210
lUll
lIZ ••
IUOZ
IUO.
IUOI

5
2.
16

••16
••

.2

JS'
OAt •• ERROR DO'
EUOR 00'

ooooe

00000

5 •

Iuoe
lUll

).18'

112.5
JIlIi
JUO.
JUOl

IUZ1
005"
oonl
111.1
11I4Z

JUU
)

,

IUU

.

2

O'UO •
LINKAGE TO PGPRT

09940 •

onso
09.60
0.910
0.910
099'0
10000
10010
100ZO
lono
100.0
10050
10060
10010
10010
100.0
10100
10110
10120
10UO
101.0
10UO
10160
10UO
10110
10190
10lOO
10110

•
•
•
•
P"RT

IIT~ PGPRT."U
•• 0 Oil I
DC l,X,.
DS& SADDR-•• IIAIIE , 110011-.

OS
TFII
TF
All
TF
TO

5
FAF I .... UCAIID.I
FAFl-" 'GPII '-I
FUI-I.05.10
FAF1+ll,_-_

e".,.-e,.

~DVE INS TAaT AODIIESS
FAH ••• l.IO
FA".II,OI,IO
F"LO •• UCARD. .
INH 'AFI
AM
F.FI-I.'.IO
TF
"ZJ,FAFI-I,II
TR
UCAllDo12.·-· ••
IIOVE III IIA'"
F.F).PGPU-I.ll ,
lUNCH IF EIID AOORES$ IEGII '"10
10
TF
UtAIID+J5.IUIIIO
All
'AFI-I.I,IO
••• ROUTINE TO PRINT OUT SYAfEIIE"T """IIU
IIilF IIDPUSf. LI ST"
'OUL LISTING
,COUIITI
10
"INUSI
COUNn,06.10,
lIun 'HI CDUII'
TFII lou.·.n"
'11 I liT THI L "'1 OF ""IOU
I
lOP' ,F"5-4."
TFII OFlOI-I,"20,,·
TESf 'All D.UI

FAH

'"
til
All

FA"

""

3711

In)4
IU)6
IUU
IU60
Iun
lUI"
IU"
11401
IIUO
11HZ

""44

16
U
II
Z6
'5

II
II
I"

U

5
linG
lUll
lUll
I Uti
00000
linD
Iun
linD
IU. .
lUll
IIU.

"...,
11.0"

U
16
Jl
U
16
II

11116
lUll
11140
lUsa

U
16
16

11616
U60.
lUll
-oOH.

16

U141

114"
U"6I
IIUO

US"

lU76

4"

...

.,114

11701
Illn
lun

oOln

J2IO)
IIU5
000-'
00000
00000
000-2
000-1
J2111
01100
000-'
lUll
00000
llnll
IlUO
000-1
0222,
12212
000-'
Jilts
JUtS

JII••

1620-1.-' MONiTOR

1010U
10 110
10UO
10UO
10140
lono ~l' )
10 )60
lono
10IRU
lono F.,.
10400
10410
10420
IOHO
104.0
10.'U
10UO
10HO

OUM o_j
IF. 10RI... n
I
IOPT."U-4.'
I
FAFI-I .. 6

10.'0 UfLOI
10.'0
10~0"

10SI0
10520
10510 OHO
IO~'O

10550
10~61l

10~'0

ONf
10510 T.O
10S.0 ~U,.U"
10600
10610
10UO
10010
I"HO
10650
10UO
lOUD
1"610 PAr.~

lono
10 700

C~KHD

TF

"20.'U5I~1I

flFI-I .. t'

I ....

lin.

0-.
RACuo.n.R"asl

l.

"FI-I.OS.IO
IFM Fl.U6.UClID.21
TF
•• FUII.'UI-I.II
e-e,e·e ••
10
.OYE IN END 'DD~EH
,M
FAF"'.6.l,lC
O.
F.F"lIol olD
F" •••• Ucuo.n
C"
aNH "F4
l.
"FI-lol.IO
.U2
a
DORG 0- J
Sol214S
OC
JlJH
NOP OFlO" •
FIRS T TlIOE FALL IH~DUGH
TF. IOMr, •• Zl.,
RRING IN IHE HUOING
8
IUGI.05IHO.'
TO. OFlOlt,,1, •
"DOlfY NDP Ie 8R1NCH
67
OFLOtll".
SliP IHE O'LO IE51
I~I
OFlOl-l. 1.00.6"
TEST PRINIEA tHAN U-SRUtK INOIRfCI
HO
O.-.t • PGNUM-l, ,
YES-CHlN 12
60
T.. O,PliNUJIII-l
B7
NONU"
TON Itl 011110-1 , •• .,
TO" B10fllAO+l ,.,.,
ID
810"'0.' '.,PGIiIrIU, ••• PAGE NU"BER
10
a. OMlO.I". PGNU"-I
10
110.00.1 n.PGNU.-2
14
• OQ1l,.
SlIP '0 I I."EOUIE
DOUllE SPACE lFlU PUHI
t O~62"
I'
IORT, •• Z1..
TO 10R'-PRINT PACE "UO
IF"
IOPI,PAGE-4,1
H
pr;NUM,ol .10"
ODD I TO PAGE Nu"au
d1
OFlOl-l . . . .
RUNCH Uti INOIREel
us, IIU .. OU.I

••

DC
Jft •
05C

1.18'".
2.22 ...

'UHI INDICATION

l~O

PAGE NUIIIER

PAGE DFLD OHINF. FOR SY,"SOL IIBU

12

OSA

10110

PAGI

'HUE I-C
115 . .
1160.
11620
11."
11644
11U6

B

OO~G

fDRI . .II 11-0

"I~USI.IA.FU6 ••
1~IIllLIII 'C~ LOlDING 'RIIII ARll
CoUNfI.OI.IO ..
fA'6.RlClRO..
MeVE IHI ONE ENI.Y 10 '.INI UU
Mlllus\.1I.00001.n .CLEU IHI 'REVIOUS RECDRO "lAl
MOYE IHE ,OIMER
"11105101'.40.10.

I02~U

IFN
l"
60'

l

lUll

II
,FN
5"
I~

VU~loN

uno

10220
10UO
102.0 MI~USI
lana
10UO
10210
10210 lopun

01 :'KOU

116"
I ....
11700
11707
1170.
11120
11712
11744
IIn6
117 . .
11110
11191
11104
11116
IIIU
IIn6
11140
11842
II".
11166
Ilill

linD
11 . . 1
11910
11922
119)4
11.41
11954

II •• ,

II'"
11990
U002
12014
1l0l6
1l0)'
120'0
U062
1l0H

49
16

II."

16

11"6
lUll
UUC
116ID

U
49

lUll

U
11

lUll

4'

IU'L

JI . . .
JUU
00000

26
II
16

UU7
Iun
11762
11161
00000
11762
11161
11762
IIn6
lun
115It

122.0
000-'
JIU'
lUll
00000
COO-l
000-1
JZU7
01\00
000-1
00000

11191
00'"
00"6
11141

00000
JII71
J20n
00009

,.
U
II
II
14
H

II
49

41
16
.~

IS
4'

U
4J

4)
4.
is
U
2~

25

n

)4

)4

OO.U

Doni

l191e
II . . J
11hZ
11954
11.'6
-IUO.
1260'
U'O.
12607
U60'
00000
00000

lonn

DC

FCAIUN Il-C

I.'

.

10'SO RlC.RC IIUP
10160
ODR~ UtiRa
USC 12.101010701000
10"0
1"7010'01000
24
107ftO
os
10790
DC
2,0'
10800
IORIO

DOS 65

11013

J14J1

11076

)

120"

,

IOR20
101)0
10UO
10850
10160

DC

),00'

J2016
I

120 . .

I.

11100

lono

FO"
10.00 FAF5
10910
10910 0
10910
10.40 ILK'

-6

OS
OSA
,DC
JI'

.BIOMlOoJOO
F"6-1

1,11' .. ,

00000

12119

'0

12<)'

'0

11261

2Z

12250
1l2'U
122. .

,

1l2 . .
1l2. .

JlIO)

12210

II

0
C

IUI2

2
0

,
)

16000
16000

2

10950

. .006

,

10960

DC'

16006
1600'

- J6001
I

10970 IUIA

05t
0

1.0

1.00.

'1

'.Inoo

160n

10910

DC,

11000

-J7100
-'DC
)
! 100
'JOO
,DSI U6440

11010

DC

10990

I ••

16016
16021

372

..OZI
ltoU

X

J27Z9

OENO
DOItG 16000
OSt l . l l
2l
ou lL.n,
1.'

.

J

uno
12211
12290

00000

12
2.
2

12217
PRINT

41

121)7
Illn

-0'
IOR10 U"'SK DC
11.07070107010
-701010'070
10880 C~UNT8 DC
2,06

.
PAGf

1l01J
11014

11102
12102
11102

DC
'0.0
-ooouOOOOOOOOOOl0

E'ono
E.ono
£90900
£910~0

£91120
f'1l50
E9\ 120
E9I410
£91610
(911)0
E9IBIO
E92010
E92210
E92290
e.2190
e'2~40

£92510
£92R60
£93010
EU060
E9)200
Euno
(9)610
ENTlOG
ERIIESI
ERNEST
URORZ
FCTENC
INTOPI
LENGTH
lTJUST
MINUSI
"ONtAL
"UlOEf
IIYNA"E
OUTADD
OUfLn
'ROGST
PUSTSN
"'CARD

VER~ION

06H6
06516
06684
06R16
06160
01020
01088
01228
012.6
01140
01512
01616
01660
on.2
01.72
08068
08112
OU20
08312
01541
01774
0lSS4
01922
01990
09284
02261
IUOI
09556
11246
02311
02385
02241
0940.
1160.
00796
on.4
0.4"
10614
OU32
02257
02294
12102

-.,
I·,

FORrUN 11-0
AI~ASM

RETURN
ABASE
AFrBl
BBOAO
BLMU
8LKl
8LKIA
8lMS
.811P
CAOO
CUD
(£NO
tHI5
CMI
ClLl
tMlCo
ell
CLGTH
tOllAR
tDMSC
CDMST
CSTll
CSTI
OlSM
D~ADO
OS~MO

EIIASE
Ell'
EGRET
eRIIES
URn
FAFl
FAf2
fAf)
fAF4
FAfS
FAf6
FlNG
fllON
FP2
GL'

1600~

16000
02469
02461
0.038
11219
01454

11l?4
158)'
151N
IORI2
10144
10192
112)4
09154
0,7)9
02112
0'2'10
09730
10914
101910
12077
01632
08110
01512
11)13
00602
11184
11516
11108
11756
12281

uno

02250
02324
OUU
08644

IHD OF OIlE ASSE"ILY.

3 7',

15

PAGE

PM.SE I-e

IllIO
10884
02910
ISOH
11140

MU
INOIV
10tAL
Iocr
10PT
101l8t
IOAr
IO~O

UNt
JAY
01
MLNG
lAOO
lOPHt
L1sr
lLl
laC
lSUO
MOOAO
MODE
MS'
NI
HZ
IIIOIIIUM
HOPRT
IIIlLOC
OFlOI
OFLO
OOIE
OUTU
ourOK
OuTIII
OUTK2
OUTO)
ourll
our
'2".
PAGE
'GNUII

pc;pu

'RNT
"CD

0'~'2

02424
00116
005610
00512
00520
005.00554
10)64
02)61
11215
02252
1122'
\6024
02U'
01262
01516
02108
01549
01614
01130
Olln
02238
11966
0'140
OZ172
11142
11191
11942
01196
108t1
loau
10504
10524
lOa"
J06U
DUU

up13

OUU
IUJ6
0)215

on,9

PrU
RECLG
SAVIO
SAVEl
SAVEZ
SAVEJ
SAVE4
511ADD
SIItNT

11266
Oll4)

01595
0)612
0)611
03622
06659
on)~

03544

STIL

Dun

SYMI
SYM
rlASE
TltNr
TO

O)UI
01579
on. I
02419
10256
01340
0)597
03602
0"47
03607
on92
OUO)

TEL~"

TEII'2
rell"
TEII'4
TEll"
Jell'
TEND
TIID
1I0L ...

"c;p
11K!

IIU
1111)

II

""zean

11'54

02994
091"
11244
IOU9
10223
02240
022 . .
un2
079n
OUU
0.554
0'''6
Ol7I0
DJU6

SAVOFS
UVSYII
SSY"""
SJ""TI
STIIIITZ
SJllrlllO
SUIADO DIU)
Su.,cr 0229)
USEIIFS '02UJ

......

00010
00020 IUPI
000 )0 lOR! '
OOO~O IOr.1
00050 .ONCAl
00060 lOCAL
OOOIU SYSCAl
00080
00090 HtAOER
00100 'GNUM
00110
00120
00 1)0
00 I~O
00150
00 160
00110
00 liD
00190
00100
OOllO
00220
J0230
002~0

00250
00260
00210
002RO
00290
00)00
00110
00320
00 )JO
OOHO
00150
00160
00)70
OOlBO
00)90
00~00

Nl

"z

-

1620-1441
OS

OS

os

as
OS
as

I

UQRG 2218

as

os

UGA"K

DG"
IF
IF"

os
F'2
aASE os
l>UO CS
'2P1M OS
FCTENO os
os

2

s

2
)

S
2
2
5
~

)0
I
I
2
2

,
2 J2J
• ·4t2
lOR I
10GT

.F.O~-l

, •• 21

.1

R
8
OORe .-4

sv

OOHO ANS
00420 AOTEM'
00'10 SL
004~0 880AO
00~50 HIOMAO
00 . . 0 I FTRC
00410 FACTRC
OOUO L1SI
OOHO .RST
00500 PASSII
DOSIa
00520
00 S 10 •
005~0

00S50

OS

I

os
OS
os
OS
os
as
os

0000'1., Slit"
00005" S. I f
00002. ,oP t.
cocos .. S¥ ..
00005,.A,..5.,
00005 •• 'Off fliP ••

DS
OS
OS
OS

,2226

oaoo!a I t Sl.,

DISk ADDRESS OF PAGE HUOING
CORE STORAGE OF ,AGE HEADING

,11).,0,. ,
, 1/t8CO" I

,UZI
.2ll8
.ll29
TF
LNG
TF
AOCO •• 8EGAO
AM
AOCUw.l, La
SET ADORE S5 IN
8TM AOJUST,ADCO.
TF
8EGAO. AOCO.

os
OS

•••
AOCO~

Dono

00 . . 0
00690
(JOIOD
00110 CLEAR
00120 •
Dono
00140
00 ISO
00160
00110 Ll
00110
001.90
00800
00110
00820 LIZ
00830
00840
OOUO
00160
00110
00110
OO19D
00900
0091D LIl
00920
009]0
00940 Lot
00950
00960

INITIALllE
CF
ADCO"
TF
PUIXl
IFM 10RT
8
IOGT
A
NUT
TF
.RE8UF
SM
NEXT
SF
FlC""
IF
DOMAK
•• 11
TF
IR
8Ufl
AM
·-18
C"
.-16
IL
80
COIZR.005W
SET uP STRING
TD. IGNST>I
1.' ,.
DC

.-.

TF
TF.
ITM
CM
BE
8TM

37:;

VE.SIO~

"urla
,P2PTR
,'lEU
,I

.POUSE
,PREBUF
,IN'Ult2.

,75

~ECO.O

00910
00910
00990
01000
01010
01020

eM

010)0

..,.

L)

IT"

N40002
N40002
COTNS

OSA

N~OOOl

OSA

~v

5
2
2
5
5
)0
I
I
2
2
5
5
5
5

,

H
16
~9

4Q

I
Oll"
00565
00566
00000

02)2)
-2359
-0000
00000

I
5
5
2
5
5
5
5
C

0
0
C

16
h
II

02H6
024U

II
26

01166
02251

02296
OllSl
000-1
-6925
06925

PAGE

.1

02 . .0

))

02~71
01~1~

2.
I.

02~"

~9

OHOI
02S10
025)2
OlSH
02556
02561
025.0
OlS92

,10

.,

0260~

21

2.
12
]2
2.
26
3\
\I
14
41
U

06925
0116)
005U
00566
01404
Ollll
01404

Dun

09601
0151.
01401
025.'
OZSI6
OZSIO
10)10

00000
02301
-2501
-U50
0231 )
01404
000-1
00000
0~026

olin

09124
OOOPS
-1101
01100
09403

15

16000
I

00000

16
16

09401
OlllO

II
14
4eo
II

OSH~

094)4
J(00)
-BlI
a-13k
DilDO
-2)11
0-1l2
-2ll5
OZ229

02651

,

lV

)

0141~

026~0

,
,

TF
AM

5
2

CONSTANTS

,

BH

2

0
0
C9660
06925
06925

02616
02621

LV

CF
W'I
SF
TF.
IT
AM
eTM

02233
02231
02240
022H
02241
02UO
Olln
022n
02262
OllU
02lU
02294
022 . .
012"
02)01
02301
02313
02111
0212 )
OlU)
02 J24
02J16
OZHI
02lbO
02)61
Oll61
0231 Z
02 III
02119
02314
Olll'
Oll"
02)99
IIHO
14800
02226
02221
02228
02229
02400
02412

P"UE 2

,10.

DSA

K

FORTRAN 11-0

•• UF •• 7~

DU

8

2

,L S lAO
••• 2)

S .. UEA
,NU089
N40002 .IGNSf +4
GETl
.51
SX,I)2,I\I
LI2
AOSL, S'
Ll,l:U.'
AOSl,·-l
,'_SI
LIl
,ll4
IGNST-I
L1)
•• 24
,]400
,91\
ADCOW-4
AOCOW-4
,900
AOCOW-4
,I
I
GTSCL
,G!SCL-I
SCNT
01
G T"S
I

8T.
INF
C.
IE
8'11

14
3

TG EVEN

1620-1") MONIIOR I
00560 •
00510 J.e
00510
00590
00600
006lD
00620
OOUO
00640
00.50
00660

02211
02211
OlZll

DO'"
00116

,~n

I~

oous

0
0
0
0
0
0

OOSU
OOSU
DOS . .

• "6

h 1.2222

'.lit

'"An 1

,116

DC
-01
OS

--

JU
SR
SX
O'

FORrUN 11-0

VERSION

• su

OH

OS
MECLG OS
LENGT .. OS
F
OS
k
OS
hGAO os
LOCOM os
UFS IR OSS
FCTS_ OS
'uSISN OS

F'lm..

~ONIIOR

SECOND PASS FORUAN II
.SU
.5.5

,152

02.52
0266~

02676
02611
02100
02112
02124
02116
021,1
02"0

,
,I ,

,

,10

376

USJ6
16001

C-I)~

021~4

0211~

H
14

OllOI
00000
0.911
OU21
0.921
09561
0"96
0"93
0"22
5

01200
OHOO
00.11
00000
00900
00000
0-001
06195
000-1
-ZI96
x
I

02110

,I

OU"

~6

]]

18
)2
16
Zl
\I

11

OU96

01
,2
••• 16

02l4~

11

02112

au..

,10

~~

14

02196
02101
02120
Olill
OZIU
02n6

,8

..

Ollll
0ln6
OS".

0219.
02901

-.,61

01901
02902
Ol9i'
02926
02911
02950
02 . .6

-9511

02"6
02911

5
I~

U

l6

II
11

onn

0-152
01100
030l~
OHIO 0 " . '
01110 000-2
UU2 -2"6
1
5 x

-HIO

5

Ib20-1~4)

BTM
USI

01040
01050
OIObO

OSI

01070

OSA

MONI TOR I

VERSIO~

2

FOUUN 11-0

PHlSE 2

,·.10

FORCE
LV
MV

-9597

I .. S

0144)
02".

029 . .
0)000
0)012
0)024
0)0)'
0)04"
0)0 ....
0)05'

-nit
onn
on ••

CM
8"E
AM

1.1,10
L2
I
,I
,10
8
L2
OOMG .-)
OUTPUT HUEME .. T .. UMBER aDDRESSES
SM
,I
I
olD
8TM .MNS
osa I

OlllO

osa

Sl

01116
01121

JI210
ul200
UIISO

TF
8TM
DSA

R"NS
I

012bO

OSA

LV

01210
01280

BTM
OSA

GINS
I

01240

DSA

;R

01 )00
01 )10
01 )2U
al no
01340

CM
8"E
TOM
AI.
rSA

01]50
01160

DORG
CM
BE
SM

IN~

,

·.1

I),

5.,

, •• 16

CM
BNE
BTM
OSA

TF
01410
ill 420
SM
01410
SM
01440 StTFCT TF
OIHO
10M
BNR
01460
TOM
01410
IR
01480
CF
01490
01500
TFM
BNF
OISiO
01520
8011
01510
TR
01""0
01550
TR
tF
01560
tF
01510
01580
TDM
015.0
DN8
w,..
01600
TOM
01610
IF
OIUO
01.,0 NOlYP TDM
TDM
01640
tM
olno
01660
BE
01610
8
DORG
01610
01690 SiTNMT TF
01100
CF
SM
01110
ITM
01120
DSI
olno

•

01'140
01150
011.0
olno
01110
01790
OileD
01110
01120
oUJO

8

uTle es

,I
, ··lb

•• ~R

tcoEe

•

OORG
os
N.. ecce cs
N.. OOOI cs
N40C02 oS
I140CGJ
... ecc. cs

Nlcoce

cs

I, ~R

377

VERSION Z

FORTRIN 11-0

12fJ.",FORMaT

, •• 16

sxF
SXF
AoeON
SEIID-I
SEIID
SET .. MI
SEIAD
LSTN
LST,..
seNT

,IDCON
,10
,6
,SL
,4
, SEIID
,5
, SETaD

NOTV'-24

,PR5T
,1 .. 00

·.24

LIS
lIS ••
LIS
LIS ••
L1S+5
I,·
lIS,400

,10
,10

,II

, ,
,11,

,IOCON-4
.SEIID

, ,
,Il.

SETIO
SEIIO
SETIO
SR
CDoep

,IDtON

onn
01526
0]5Jt
01550
onu
015'4
on . .
OJ59.
OJ610
OJ611
0161.
0)610
OJ."2
OJ ....
OJ610

.9

,6

.I

,611

,SETAD

,Il

,",··16

,10

,UI

,I

exn

.-3
N40002
N40002
,..40002
PUTI
"'''0002,111(0_

OJ610
OJn5
un,
u,n

,4

DUll

UIT
.-J

0lU6
Cln6
once
onu

, •• 1
5

5
5

3h

-0000
OUOO
000-1
00000

04561
02 . . 0
09561
01110

000-1
01200
000-1
00000

onu 000-1
OH41 -)116
5 X
I
-9561
5 •

-1)"
2b
IT

04U.
OH91
5

on"

-)150
I

•

-q561
5 X
IT

-qUI
05622 -U12
5 x
I
-H61
5 X

14
H

15
17

11

-2H2
02)12
0)258
0440)
05542
5

0-1"0
01200
00001
-)210
2

•

-95bl
-2)12
05622 -)252
5 X
2

PAGE

ani.

SUIO,~,IO

5

17

0.561
01110

2

OJ29B
OHO)
0))08
0))10
0))22
0]))4
0"4'
0))58
0))10
0])12
0))44
01406
01411
0)4)0
01442
01454
OJ466
OJ .. 1I
OJ"''!
Dn02

,
,411

P~ISE

OJ252
0')251
OJH8
OHIO
0)282
0)298

8,8lANK.8lA~1(

,

II

OlBO
OlB5
O)21b
OJ252

, •• 10

GTNS

,.

"

0)088
01100
01llb

OUIT
01118
011'0
01202
01214
0)210

140.8.DUMM",

aMNS

SETFCHJ6

o JOIO
0)018

I ..

12

01112
OUIT

CKFMT
DDS.

SR,
SE IFe I
PUTX

14
41
II

Olon

OU55
OU5b
01112

I

5 •

01150
0)155
, •• 10

-2'"
X

5 X

.."

Ollll
01121
011 )0
01150

Sl

I b20-1041 MONITOR I

OIHO CHMI
OlJ80
01190
01400

,b
010

.I

,•• '6

eT.
rSA

,

-9511

01080
01090
01100 LJ
01110
01110
011 JO EXII
01140
01150
OllbO
01110
UIIIO
01190 COOH
01100
01110

B

17

-4'91
0460"

onu
02n)

a .. s
I
Ll

I

'IGE
024Jl
02472
02411

I~

41

17

26
12
12
26
15
45
15
H
)J
16

....

4T

14
H
H

n

n

15
J.

15
2.

15

-4561
-2HI
02H2 0-128
O)J4b 01200
06410 -1298
5 •
1
-69)0
-9426
-4426
OU02
04602
06925

D)'"
Dun

016"
DJ6U
0'166
09166
0.691
onJl
OJ4"
00000
114112
O""t
OUIZ
0'"'

Dun

I
0.112
OJ . .'
OJ . .,

onn

06925
OOOJO

000-6
02)99
00004
016"
00005
016"
00000
-0000
02U4
0)400
00971
06911
016.,
00000
00000
00000
00900
000-.

O"U

00009
OOOOJ
0-11.
01200
00000

15
14

....,

0,..,
02na
10241
0104.

26

03110 0.''',
OUIO 00000
OUIO 000-'
01220 -1610
5 X
2

n

12
U

-nlc

••

.9

-..n

cnll

c

eeoc.

CIt ... " ~coec

Olno

,
,,

onl5
en20

5
5

e

16lC-14H oeM IcR I
018<0 •• cce5
aliSO ~'CCCt
CIUC ~4CCC 1
01110 ~4cece
CillO .4CCC~
qno .4CC It
CI~CO

~4CCII

CI q IC ~'COll
aUla ~lCOtl
aUlC
CI ~40
01 ~SO AtJYS I
OIUO
OIHO
OIUO
01 ~~C
02CCO
ClelC
Olela
OlClO CPSR
OZC'O
aleso
01C60
OZC10
OlelO
02C~0 CPSX
OllCO
C2110
OlilO
Ol130 UPOI
02140 CPU
02150
Ol160 Fx
C211C UfAU
OlllC FLAO

c's
CS
CS
CS
CS
tS
OS
CS
OS
CS
OM
BO

WHSlt. 2

U7H
cnlc

5.

onu

5c'

5

5
5
5.
5

ol"e
CJ7U

olue

,

OHn
0376C
03761

.. ,

FORIRA'. AOJYSI 'RCCEOyRE
5

--l.5,61C,

'YH"~

•• 'It,'4

8a

Y

ACCC~

onu
03766
03711

ey S

onte

OaR' .-~
AM
AOJUST-I.I.elO.
!8
IF

TC

cn.,

ACCC~

CIIC.
01111

FOATRA. C' SURCH ROUII~E
CPSI,.-l,&l.
'eWE I. PU •• fUoS
OPSR-I. s.le
OP'I.C,SR-I.II
OPS1I-1 01 oIC
CPTI.CUSE
OPT1-1 .. ,
GE.ERAIE UIlE ACCRess

..

·.21t,FI,.

O)lll
CIU'
01136
01141
OI16C
CIIU

olin

IS IT FilEt CR FleATING WARIAllE
FLeUlhG. AeJ~ST UIlE ,ccons
,eWE (hIRY 'CCRESS Ie A CI

...
..

OPII.SoIC.

01114
0ln6
onci
OIU'
OHn
OHlC
C]UI
Oll4l
0]B6

•• -5

e

OPSA-" ,6,

es
CS
ec

I ••
••• It-IICO
5.e4C9(

41
4l

S
cnt.
ClfU
eccec

cec-s
cecn
ee.occ

II
.l

C3U.
CCCCC

CCC-I
cegCC

CIIiI
CJlII
CJU4
cuil
enu
cnlt

ClUJ
CCC-'
ClUJ
ceo-I
-'141
ccoce

euCl
euu
ecccc
C
c
ClUJ
I
C
5

cnll
ecc"
CCOCC

Il

OUU

Ace

to,." .-11

A"
IF
A"
IF.
A
es
80
SM
IF
es
OS

PlGE

'~'Sf 1

Fell . . . . II-C

s

EX"

,.

II
26
11
16
21
41
Il
26
49

c

ccoce

-4C~0

02190 FXAD

ec
'.ClUI
-)818
5.C12]0
DC
-12J0
ac
5.CH,.

-4)"
5.C3496
DC

on'l

02220 TUCf
02210 REAa

-3096
'.i,0,.,.26
ac

OJ9U

CHCO REPO\
02210

PAI~T

O]HI
03946

03956

-H26

U2240

CCA~F

OllSO nPE
e2260 FLOUl
el210 FJOYl
e221e FlFXP

ac
00C05.116ce •• aOREF.
J1600
CC
5.C4282
-4H2
Ct
S.C4138
-4138
CC
s.eHSC
-Jt;50
cc
'.C4lSl
-It2!'

1620-144]

~ehlTU

I

0]~66

0)911
Cl~16

onll
tHee

37 !J

WEASIC' 1

HI/UN II-e

eZlQC FXEIP

CC
5.e4234
-42)"
5.-e2lS@
CBce SLB I
ec
-225Q
ClllO ACCEPI ec
5.C4318
-4318
C2!2C SL~l
ec
5.-C2261
-22tl
CHIC ACeup ee
5.C44C2
-44(2
C2HC SLel
CC
5.-C2268
-2UQ
en" PLNC~ ec S.C4])C
-.HC
Ollte eePAst ec
ocee5 .IUOC •• De'ISE.
JHeC
5.C4](6
C211C PL~UP ct
-4lC6
C2!!e Fl SY! cc
s.e4CU
-4CU
023ge Fisue Ct
5.CHel
-IH2
024CC FlCYC ce
5.C4162
-4Ul
e2410 Flcwe CC
5.CH14
-H14
CH2e FlRCY cc . S.1l4116
-41U
02430 FIROV Ct
5.C3~U

P~ASE

1

PACE
OHU
on9~

c.cel
04tC~
C~t

II

04CIt
C4C21
04CU
e4tH
04tH
C4(41
C4tU
C4t51
C4CSt
(4ctl

-'~~8

5.e4C42
Ol440 FIIOFl CC
-4t4l
02,.,0 FL TeFl ct
'.C~154
-3854
OHfO Rfl SL! ce
s.c.i 14
-4114,
C241C AFISLe ce
5'(,Hl'
-3926
5.C4C20
024ee A5HFl Ct
-H2e ' ,
024~C ASHFI
Ct
S.C4,ClC
-4C2C
OHCC ATV'E ce
5 •.CHl6
-45)6
s.eun
ClSlC SLAS~ Ct
-U16
C2520 AEP
cc 5.e1l26
-1126 " .
S;t'~'44'
025]0 ITVPE ce
0254C FnPE
02550 flY'f

cnto

REDO

C4tH
C4ClI
C4tU
C4ell
C4C1a
C4UI
C4C"
C41e1
041ct
C4111

-4441
Ct
S.~,~"
-4551

cc 5.C.,ac
'~;4'!C .
cc 5.C1(26
-7(.26

C4116

C'UH

3811

C4U'

6

161C-I44J
Ol! Ie

t-

'YPE

02sec xn'E
OlS~O

I STCP

OlHO

f~FAC

~C~ITt~

I

liE A! I e~ 2

Fe A'.'h

11-[

,uu

.-U

2

ec
S. CH 02
-He2
ee
s.e1ls.
-13 ~ ..
ee
S.C2J95
- 2 JS 5
CC
S.O'5Z

C41H
C41 Jt
C4141
COlU

-3~';2

Clt 10 '(FAC

'S ,e )40e

COlSi

ec
S.C24C;2
-1HZ
5,CtCQC
oe

e415t

ce
-)4(8

C1UO floe

CHJC IC

C4lt I

-6C~C

C2t4C

ICF~O

C1BO IX I
CUtC "A

ClelO

~AT

C1HC BG~I I
elt90 LIS

esc

C21IC
C2120
027JC SOFer
C1He
02150
(2lte
e2l1C
CZHC
C2HO SA!'"
C2ICO
Cle IC
Cle 10
Ole JO
Ole4C
OleSC SR~X
C2HO SAt I
Cl!lC
Cleec
02e~C

CHeo
CH 10

ellis",

Cl~IO

CC-S,

02~10
Ol~4C

CH50
CHtO
CZC;lC
CP'

CH~C

e4181
IS~~9

12,e

es
IF

I.
IF

••TO'

OJ eec
OJ( 10
OC20

5
SAS't',·-ltll.
SRFCT-l.5dC
SAGT,SAFCT-l.ll
SRfCl-ld,lC
SBASE,"
S8IS!-1

C• .i 12

SRGT,C,lll

C41H
C4Ht
C4JCe
C4J 16
C4J It
C4 J2I
CHI!
C414C
C4HI
C4 Je<
C4J14
(4115
C411t
C' JIB
044CC
044(0
044C8
04411
C4.2e

TO' A"-S .. tlt11
$AFCT-l,,6
B
CORG .-J
TF
,SAASE.l1.
CS
,--5
10_ F.S'
•• ~e.SRCl.ll
"~F

eo

·"36,SIC.IPS ..

CF
CS
OS
TOO
IF 0

SRtT"t

eN F
100

eo

"
cooe

,.- I

FP~",1,ll

381

SeASEtldC

oe~lTcp

FXCRFl.SlrASE,ll.
S8A Sf.l de
O,.S •• SBASE.ll.
(C" 5 \II
.C
·.24,Of'S.
co~ S", 1 "

··2C,O","5 .. ,.
SRCFFL, "
SBASE,7,lC

031~O

SRCFFl CF
(I

H

IIER~le.

/

HArP •• 11- (

SET

CI.E~Sle~

S.ITC~

SET cco.n SHTC~
IS IT CI~HSIChEC
E x IT
SET

SBASE ,7t1C

I

...

FXCRFL
seASE.2,le

·.

SRFer-I .. 6,

,.

·

•

·.2,.
.'

ecC-'
eH~'

eH~~

ece-I
ecce4
cecce

11
15
2b
45
It
IS

C4~CJ!

CH94
e
Cit 1 U:

4~

e41~.

C45.'
-ecce
eeeCJ
CCCCC

It

ceccc

C4".

IS
44
4J
JJ

C~tH

C4]2_
C5CC~

(

C44Ce
OHU
(432_

.

cccce
C432.
CUti
ecccc

(
(

I~
16
4~

It

C~t1~

C4411
C442C
CHIT
C

II

c..

25

e"~1

,~!

e44~2

C45C4
C4 ~ If
C"'~2"

II
25
15
44
15
4J
49

CH~~

C4]14
C4]H
C45C4
Cflll!

C.524
C45tc

C .. 524

II

(4595

(45 Jt

It

C~tll

C4!4e
C4~12

II
JJ
1/

""I

'4584

4~

C•• f;!
C45~5
C41~.

C4!~"

••

•
'F

CH~'

C41'~

eCCCJ
ccen
eccce
C(OJI
Cct-I

•

PICE
e44 J2
C44H
C445t
cute
0'4ec

( 45tC
EXIT

031 to f JtCA f l CC
2.(
-0
FeR rRA~ FCRtE PReCECu~'
o 1I 10
CS
5
Cll ee
IF
FlV,.-l,ll.
o 1I90 FCRCE
OC~E I~ PI"~ETf'S
OllCO
FORCE-I.'oIC
TF
FA\I,FORce"'l,ll
OlllC
FORCE-I.S,le
C32tC
oJ2]0
IF
FA~S.FCACE-""
FOReE-I./.IC
01240
'M
eM
1C4 ,e. J S lEFT CPf,",eA lESS '~'H CP lO~ VALUE
03250
, ·-5
C3UO FlII
os
fQAC8+21t
Bl
03210
",VE U!U e.SE TC HI
TF~
OJ/8C
FTl,FBASE"
GE_EUH THLE OCCAfSS
FT1-l.FL'i,ll.
03290
IF
O]]CO
lVAl,FTl.ll,
AE~CVE lEF' "'lUE FAC~ "elf
FTI,l,le,
AM
'COl TC UHf HCRESS
03JI0
AE~C~E CCCE fAC~ T.elE
IF
FCODE,FTI,llt
C3~20
OJ]]C
CM
lC4 ,',I! RICMT C'ER,Te, lESS '~'H "
lC_ ~'lUE
,.- 5
01]40 FRII
es
Bl
FOReB'14
01J50
HG~ HlUE
0]]60
IS ep "IG~U ,~
c'" FRIJ.1·H.6Q,
FORCC
0]]10
BM
~OVE UUE USE TO FT I
TFO FTI,FRASE ..
Olleo
CEHAUE UUE .CCHSS
FTl-l,FA".tl.
OH~O
1M
fll.2.1e.
OHeo
'CC 2 T( ueu .CCRESS
RVAL,'Tl.ll,
RE~O~E RIG~' W.lUE fAO' "I~E
CHIO
(O~PUE LEft VI~UE Te R IGH
LVAL ,AVAl"
01420 fORCe e
0)430
8N~
TF. FccbE •• ,
HVE lEAe T( (ccr
CH4C
TFO
~C~E IEAO c. ecCE T( FlhS
0)450
CS
CHtC fCCCE
OS
OHIC FINS
• --5
FORCE-t .. tI.
EXIT
OHIC
B
5 ••
CS
O)"C fTl
O)seo feRce TF~ AVIl.O.IC
0)510
FOAce
8
CORC '-3
03520
CS
2
0)'30 U'l
2
0154C '~.l
OS
38~

·

C4211
C4H2

• ~ I Sf 2

SET F I' CA flOl

'-1
Pl,SeASEtll.

so

TC CT

·.

10

a

S'~Hl

.C

es

TO
TOO

se'IE

.ellE eBJ!CI HCHSS CF

OPJI,21,lC
B
··2C
COR.C '-1
lFO
CPM,lltlC
,*- 2

••

H
11
2b

04211

,.IF

C31~C

C"ioUl
C .. itO

SA~)I.S8.SEdl

C 311C

Cli JO
C1I4e

C42CC
04212
04124
C42 Jt

·.

••

eJC40
ClC 50
CletO
ClClt
ClOBe
Cle9c
clice

c41~e

.ell' I_ . . . . . EIf.S

lFO

10

~c

IltCC
~eul I~!

"NO

IF
OS

C
12

04182

FaR1AU. S»8U UHE SEun

IUC-I44J

C3C

C4111
C41H

coeecoeccecc
ce
1,'.116CC

CZICC

C7~ec

C4ltt

oc
5.C1ce6
-7te6
oc
5'C"le
-421C
5,C:Hle
cc
- J J18
ce
'). Ct 151 e
-6518
,15Cj(jQ
CS

0472~
C~H6

04He
0416C
04166
04112
C4"4
C~"6

04eCI
041/0
04132
04'"
C4."
C4I68
04"C
04,U
04.0]
04'"
04904
04915

OH16
0492.
C.']6

c.. n

C4H'

C4"~

eecce
C4H4
CCCC!
CH1.
cccce
ecc-I
C. . . .
ceO-l
eeccc
ece-2
ccccc

t
2

C45~1

04t02
OHC4
CH 16
CH/8
04t4C
C4tS2
OU64
C4tH
C4te2
04tel
OHCC
04112

C4S.'
ecc-I

C4682

C~.Cl

II

C4eC!

CtC-'

It

cnet
CUC]
(4.H

"

II
26

II

C4~C]

14

ceece
e
c~ . . e
C4U!
04"4
e4.31
e4.1'
cue]
COCCC
C
c.lle
C4tee
C4Ut
C4U'
04"4

~I

16

H
26
II
26

14
41
U
4'
16
21

II
2t

24
U

C. . "

cun
(4')1
04 . . 2

C46C~

ccc-'
C. . C~
CCC-2
C-IC4
cute
-ltel
C. . . .
cu"
CCC-I

C4U'

C-IC4
cute
CCJ41
cllce

-no

C416C

(CO-2
C. .

,1i

04'"

cllce
-toce
-coee

16
16

cnn

..

,4.el

eccce

(415 •

ecc-c
ctoce

cceoc
t
(

44
16

,
cun

16Z0-IUJ
0"" FeASf
OlHO
CH10

cs
Dt
-I
ec

CHID

"~IIC',

,I

, ·.2-lCilC
l-d ••

'OlU~

~eulc~

II-t

,un,

"u
onol
C4941

.,un

2.5C

04.4J

CSA

LJ

CHU

Ct

I.e

[494'
04.4'

ec
CO
ce

2.fe ..

~o

OH"

~,uc

CHeo
OJe IC

-JU4
I

04HI

Gere

2.,.

04")

~9

CSA

CJUO

oaJO UFl.G Ct
CC
-0
ec
-0
CSA

ClHC
Clt!O
eHeo
CJue fTn

tOCH

04'"

I.e

e4'"
C4'"

2,e. ,

CC"~TfC

e4UI

GCtc

2.e

04~U

cecn

C49e1

I.C

C4U.
C4U9

2.e

C4'13

oneo

csc
e
CC
-2
Ct
-0
CSA

tOOEl

0491.

CHIC Ull>

CC

I.e

CHlt
eH19

CHZO

CC
-0

2 Ie

CHIC
OUC

••

cc

2.e

CHOC

-0
eSA

CCCEl2

C4'"

2.e tt

C4'"
C4U.
C4HI

ff'S~

C]110
CHIC
C]HC
CHee

SU,S~

CHIO

os
CC
-0
Ct
-0
es.
CS
tC
JO
Ct
JO

CJUC
OJI4C

eSA
A~S~

C3I!e
CJUO
CJHC
OJUC

fUGS~

one

CHJC

t.S~

CU

2.e

CHU

2,le ..

049 . .
C4U.
C"[I

PL~S

38

201C

~ChITCA

1

VEAS

It~

2

FU'I'~

11-[

HUE 2

"Of
e,cee

cscce
c!en

05(11

"I~T

2.e

C'C IJ
"Cit

ct

2,C. ,

C5C II
C5CU
C'CZI

-0
ct
-0

2.C

e't21

tOeEU

G!C2f

CS

es
CC
-0
tt
-0

2,e"

I(AC

eSC21
c,c,.
CSUI

TV'E

2.t

e,c))

OJHC

au

eccEI~

CSUI

CH5C

CC

I.C

C'Cll
C5C1'

c)'eo

-,
ee

2.5 ..

ec
-5
(SA

2.5

OHC
cnlc

I.e

tHeC

ce
-5
CC

2,5 ..

C5U9

u,

CSC51

tCCEI

CSC"

e",.t!c

ec

I.e

esc"

c~ho

ce
-0
CC

2.C,',

-~

CSC,.

o~,,~

Je 1'4
I
2

JCI'4
I

JecC2
I

CSC!!

esa

C4(~O

! •
JCIH
I
2

cse~1

2.4

C~,tlO

Jecc;
I
1

OS(4)

CSC4.
ee

! •

e5UI

~,~

eOCfl

C)"c

-Hit
I
2

CSCCJ

tecEi

2.C ••

JCll(
I
2

04'"

CCCEIO

aSA

once
OHIC
on2C

cs
CC
-0
CC
-0
eSA

C4U]

teCH

1t2C-1H]
CH2C

Jet"
I

COUI

CC

CH!C

CJ}!C
eJHO

! •
JCIU
I

C491I

If

2.2"

JCCU
I

ACUpt

Jeccz
I

CSCII

2.C

CSCU
e5U.

-0

04etO

au

COCEl4

04(10

cc

I.e

38.',

csc . .
C5C ••

~CI'4

I

Ie

162(-144) ~e~IIC'
04UC
04'90
C41(C

[c
-0
tC
-0
CSA

,

2.e ••

VUS 'Cl 2
ICCE"

fC"U~

11-[

PI"

,. 'Sf I

"PI

2,C

C5tH

COOEI4

C!ClI

!

e!c 1I
C!CH

JCIU
I

C411C

[C

I, [

04120

tC
-0
CC
-0

2 ,e;:"
2,[

C!OIJ

OSA

COCEI4

C!CtI

!

no ..

JCI"
I

041

)0

C4140
C41!0

tC

I.e

041 to

ce
-0
CC
-0
[SA

2.e ••

04110
C411C

II

0"71

•

o !ell

Pl_C"

c!en

•

e!C~1

PUhC" IIPf

c"tJ

2.C
COCfl4

C!C"
CH.I
tHH

e4190

cc

I.e

C4HC

CC

2.1C ..

C4210

CC

e4i1C

es-

.I_LI

JClU
I

0"01

JO

(!lC I

2.tC

JO

coeEI

C! 101

!

OIC.
C! It.

Jecel
I

042JC

ce

I, C

04/.0

cc

2.

C! III

C' ~ ICE

fj ••

•

-5

C4250

cc

2,!

(511 J

042t0

-5
eSA

coeEI

C5111

!

C5111
05119

Jcec.
I

e4/1C

ce

I.e

C42fC

cc

.( ,e.,

•

C! III

IC~C

-0
C42t;O

ec
-0

2. e

C!121

C41CC

C'i.

coeEe

" 121

!

1.[

C! III
"IH

-Hff
I

C4110

CC

04 ~2C

o.Ie

04\JC

CC

C .. ]4t!C

n4~~O

162C-I441

04310
o'lee

~(hl

Tt' I

VEI5'," 2

c 5111

38:;

f,"",~

II-C

PlGE

PHSf I

-2, It!!

C! III

eSA

cceE~

C5UI

cc

I, [

C! 1)8
O!IH

cc

2

~8

c.ieo

c ••

2.4
C.1e21

C1I56

.UI

,11

39',

01161
01110
01lU
CUC4
GUU
CUU
OU4C

26
II

CIlIt
e6tH
Cllll

2~

enee

41
24
41

C1552

""A
ceO-5
enfA
cee-s
ell"
C691A
ecc-2
CI"2
ellce

Cf441

CI~15

24
41

nU2

un4
cln2
Clllt
Clue

U2ee
Cln5
cnee
ell"

26
II
]I

un.

cnn
CIll!

26
II

Utl\

4]

"

II

"

2.
41
41

12
24

41

U4C4
Cf4"
cun

CUlt
CUlt
U4U

eutl
en ..

eOO-2

Cllle

Clue

clIce
Cl425
CCO-l
cnu
cllce

2e

16ZC-14U

(
. r· ,

.

,..
~

"

'.

~

'CU4C
cn,e
euee
CU1C
OUIO'
OU.O
C1Wj
OUIC
C1UO
C7eJC
C7HC
01t10
CUtC
CU10
CUIC
07no
cnco
cnlc
C7UC
onlo
C774C
OllSC
Cl16C
01110
on.e
07,.e
ellec
Cl110
C1UO
07ue
ClI4C
07t10
Olleo
07nc
0711C
ClI'O
OHCC
CHIC
C7HO
C1UC
CH4C
on,c
ontO
07.,0
OHIC
01nC
OICCO
CICIO
CIClO
OIOC
01C40
ORCIO
cleee
0lC7C
OIClO
CIC90

P"TGT'

PLnc
'

'Llle
'LIIF

OJ

••

".0••

NU'

HGi

NEXT
flU 1
"l" '
SS4 '
III

;"
10

",
SOl
•,

SSI

SU
151
S'U
FLU
uveQ~

HG4

,.,--1
,.

AM

SOl
8D
TF
II
TF

81
'M

BE
AM

TF
S'

''''ET

",
87
'TF,
01

,,,U'

TFI'
T"
TF
SM

COl
IH
I

e1411
C7411
OUCC
ClSn
OlU4
C1IU
C1I . .

.611,

.

10RT
10"
PUfJl
punF
",UT
•• 11
IUF4. "

·-6

•
....
"I
"

f'

I
T. '

"

11
-2
I:C

,oS

, •• 21
,PUu

,J

' ,I'" 1
,IL.I·I
,1LF4.15
,IInOIt

,12

.-11

,.

,IC

,IC

,UC

,IC

,IC
,IC
,IC
,6

3!J5

feU

a'"

11.(

,61\

TY,n,

,IC
,IC
oLC

'UTe~I,'''fO''l

TY'fT

PUTt,

,uU

"""I

,un

'UT. . '
,un-I

"'It
'''El,,,,,,''
".-1

QUYSill

..

,'''''''.
.n,..

.11

,ac
.n.

',IC

cen.

euu
CI4"
e
e
C
C
Clue
Cl4C'
e
cnu
CUCP
Cn4!

CCCCC

.. .....
..
U
U

u
U
It
41
16

CI4C4
en"
Cl4CP
tUU
ClIU
C7 .. 1
unt

16
24

tina
U441

47
14
47

(UU

II

"

II
16

..

ean4
ulla
Cf4U
CI4C,
eaU4
Cl4C~

~~

Cln~

Il

cn ..
Clue

H

en . .
C7112
euu
Clne
ClU4
cn ..
Cl4C'
I

47

14
4e
II
Il
15

Il

cecce

tillS
CUll

Clue

cnn

An . .

cn ..
cun
CUCC
cun
clJee
eec-I
cun
(CC-a
eec-c
CUC4
CCO-!
CUll
CHCC
CCCPI
ellee
CCC-I
ceO-1
eccec

.
Il
4J
26

at

4'1

CUU
enu
C7IU
cue,
CUll
(l4V
Cleu

CCC-'
eCC-!
cun
en2'

ea4e4

CCC-l

UHt
cnll
cuo.
CUC4
CUH
Clue

ellee
eec"
CUU
CCC-I
ecc"

CUll

C84CP tnu
enu -un

..

'Ula-l, III.
'PUTU
ltl

,1,2

2.,

..

eco~1

eulS
C6UI
enl!

.

,'''IC",

,.,"'.-,
.s
-,,,"' ,

U

un4

UUI
Cl44l

.

,'lTC-I

PUTU

.

cne,

,C1411
CUll

ecc-.

cnlL
C1416
CCO-I
enle
ClUl
(-cec

-n"

.Ie,

"

u

u
ae
u

ct,C,
e . ."
Clue
CUU

15 cllce ecccc
OJ'"
onn
I
C1961 U
CCII'
cnlc 49 CClJa -n,e
onu \I CIlU ecc-I
01CC4 16 ClU! -14C1
CICU It CUC~ -UCl
clCa. '16' tlC4e -17(1
OICU 26 cllce 0.414
Clna u ClU. ccc~a
OIU4 14 ClC4t -14U
CItU 4. ClCAC CIlCC
'cnlt eccee
ClUI
OIlCC a6 ClUJ ClC . .
OIlU !1 ClUI ecccc
01124 14 CllaL caau
c.n. 46 clI,e ' ClICC
01141 11 cun Cl144
CII6C U
eun ClC"
Cle4C CCOCC
01112 U
011 . . u
ClC" CllIl
011 . . U (un UlS'
ellt( ceccc,
OUCI
OUIO u. enu CUll
01211 Il cu" ccc-,
16 Cl121 elUI
0"'"
CU" U CUlt CCC-I
012 •• 16 ce", CUll
IUIC 11 clln cal"
OIau 4t un, ccccc
C.IlJ ClIU
OU04 n
0111. It ce", cnu
C?uc
aUII
onn
I

,7
,IC

,Llle"

,n'IU

4J
II
U
41
16

cn,a II
011 . . 25
o lilt 14
CUU 4f
onec II
C7UZ ,at
0,.24 12
Clue 16
C1HI 49

,IC
,6

,II

ct.e,

C

a.

,390

21

cr.u
eccec

PICE
OTne
cnee
07l0C
CUll
C7124
(lua
07844

.-

,--1

Cln2
on04
on ..
Clue
Cl14C
cn52
on64
Clnl

C127t

PHSE, a

,IC
,IC

,lLfl

--1'
PUTXI

•"

TF
T.

,I

,n

C1I5Z
C75H
CUlt
C15 . .
eleCC
CUll
0lU4
C IUt
C16H
Cle6C
CH12
CltE4

CUTPL T 8UFFER LO'C TC tlse
8UH.H

"'TI~l

U'fl .. oSI:
2
O.UO
lit
olno

HEn
III

puu ..

'.21
•• 1\
.-1
PUTCI

tl
'~tllI

0140 •
014U
C14l4
C142'
01416
07421
C1421
C141e
014·n
074"
C1451
C7.6I

IU" . .

VflSIC~ z

"un.

NEil

TF
Cf
C
1M
T. '

TF

"

,unc.

NUT
,5
,5
Ul
PUTU
,CCOU-)
NEXI
"cec~
'UUG
NHT
,pua
'UUG
~UT CAlO II.FfEI lC IE UHC
NEIT
,I
NEIT
,FLU~
,1LF4
'RE8~F
'U"CH
,n
'AULF

PI. "c~ TO'
OG,
T'"
B

,ue*

ellU
enu
cn,.

un

TO

'~TO

QHU

cnl_
,cn . .
on.o

'

,n,,,

ell

'1.111

cnce
C1HZ

,-

'~laE

,01

,1. TNIT

11

,t,

.......

PLT"

CUU
Cll ••

,6

'Ylae
NUT

'01
'01

PI.1IJ

.IC

,6

,n ...

......

'LU~

••

4J
JJ

••

,UkG

UtE
CUU
Oll ••
ClIll

,Ie

'lACE CSt Aoo.usn u C~"~T
,uue
NUT
,SlkG
S
IU
,UkG
IF
NUT
,PLlJ
•• 2C
10
;ceou-I
,unF
11
TF' SIVCC~
17
'UUh'4
THI S TV'E ~OT !QU'L TC
l STYPE
PI. '0 IF TF
,(C~ET
SA~cn
C
,ItCC,"
I~E
OUT SEQ
C
III
,SHU
PUINlT
8L
PLUC
NEIT
,I
TO
NElT
,a
~EX'
TF, NEIT
,C
TF
lNGAC
,~EaT
SOl
Ul
,I
87
'UTEST
eL' CF se'loCf
Ul
C~ TSEC C
,5CL~G
IL
PUTUT
COl
BAL
,7,
BE
'UU"
NE.T
,I
SOl
8U
,I
TD, 'NEXT
CC
l,' I t

cueo
clnc
C. . IO
OIl'C
OI4CO
CI4IC PUe
0.4ao
0141C
01440
C1410
C"'O _UCI
01410
0. . . 0
on co
01510
OU20
OUIO
CU40
0'''0
01160
olno
015.0
01"0
o.eeo
01610

,.

'~.SE I

ole
,611

"

'YIIC
NUT

...... ,

clnc

clue

,I

n,.c

,.·2

162C-14"
CUCC
CBIIC
CII20
CII!O
C8I4C
CAUO
C8UC
01170
CIIIC
0119C
OAlCC
01210
OU10
OIHC
caHC
01250
CR2tO
08270
CBlIt
CBl90
C.lCO
083IC
UUC
ceHC
OIHC

,.a

,.c,c~

lNGAC
'Yla-I
'NUT
• --1

SF
OS
CS
OS
OS
11
SF
os
11
SF
11,

",.1.12
,SSJ
,c
,n
,SLNG

UVCC~

fCUU"

.$$1

,'lU
,ss.

'OCO~

11,

VE.SICk I

TV I

'~:It

TF

fLGl

~C"I

•• 2.
NElr

10
,CF.

ann

I

OIUt

J

22

1620-1 •• '
201C

~OI'U'1

VUSlC~

2

'U'U~

puSt

11-(

'a"

I

Ot
JO
Ct
2011
JI
tt
'.1 tt
-0 ICC
Ct
I.'

ClH.
C.,.,

canc

esc
(2
as.

2.2
purn

cnu

cnce

et

I ••

ell56
CIUl

e"40
o~e,c

CUtC
ORtle
C;8UC

,~ru

OUle

esc I.t
C
et
5.C
-occe
)'1
CC

olue

csa aUFI

Ollie

'~rn

cn2C

P~UI

clnc

013.]

ensc

Ot

o~no
C8~CO

BLF2

CI~lo

08'>ZO

BU 1

O'Sno
CH~C

B'~F~

I

CIH]
ellll
enll

1••

CUll

! I

-un

I

cnn
eun
oun
en19
cnll
OUIt

cnn
on92
ClH.

P~

clnc
CIUC BHI

-us.

enu

OlleO "PEl CS
I
Clnc UNG os
2
OIlIC SUNG os
2
2
OIne N~NC cs
2
OUCO SQlNG DS
5
CIIIC CCDfl DS
CII2C
CS
I
OU1O LSlVPE DC
5.C
-CCCC
CI.e.O Ul
cc
2.15
C8t5C l"cao
oauc NUl

! •

Clue

-0]

FlC.~

lJ

ClHI

ou ..
CI.C.

CS 5
csa BUF I

euc.
01.01
CUCI

DAS
esc 5C.C
cocccooccccccceeccocceccoecooceoccocecccccceeccccc
esc 25.C
COCC ccccccccccccc cocceooo
osc 50.t
CO ec ccoc cc eccccce cocce ooce eoeccccooc eecoc ccececceD
esc 25.C
to cCcocc CC ccoceee coeceooo
esc 5C.C
COC Ccooc Ct cecCCCCCDC.ccoocecoec oecoece eec ce CDC OC Cc~
esc 25.C
co eceo ococ De cccoe ca ce e00 0
esc ~c.c
coee cooc cc eec (ccecottecet c cccoeecaaceeecceooeoocce

! •
-I.U

I •
!C

OU51

2!

CI."
tl5H

!C

C8551

5C

2!

cetce

2!

crtn

5C

DUll

2!

397
ItH-IHl
OM 50

cnee
DeHe

CR~K

PRU~F

08~IC

PLII

1:8~~C

p~r2

09.C~O

09C!C
C9ceo
D'IClC

I

vUStc~

2

JUtu. Ir-t

cs

onll
onll

cs
I

5
5
5
1.1

On21
cn29

CC
J2

2.12

01"1

J5
cc

2.15

Cllll

2.2C

01115

cc
2.21
KI
oc
501
-ace 1
I ••
Ct

cnn
on42

ct

KO

o'lIlC

-5

cc

-8

ClU]

on.4

cc

on46

2.1

all..

2•. 13

ctHC

JJ

09121)

0.91le
09140
09'150
C,ItO

09no
e9UO
119"0
092eo
09HO
09210

09210
o.uo

2.1.

01152

5.le
-OC1C
I ••
cc

ciln

ct
J4
ct

npecr. osc
2
Ct

-5

cc

O.lSl

l.5

en"
cuu

2.1

ciln

1.2

-I
DC

2.11

ellu

cc

2.14

ann
cana

J]

J.

,.lCC
ct
-ottO
1_e-ct
npu esc I.]
3
DC
-5

at
J3

Dnu
01114

2.5
2.U

! •
-I~e'l

onn

09C1C lYPECR cst 1.3
l
09t~C
ec 2.5
09100

P.GE

'.UE 2

enel
CIlIJ

c'teeo Pl.ll es
o'lelo lYPEX esc
O'lC20
c'le]e

~CNIf(a

CSt 25.C
COt ccooc ccet (ecccceeee ooe
CG~
osa aUF I

3U

on,.
onll

I

14

L61G-,14U

o.uc

CC

,.1.1

c.ate

~t

2,.\,4

J1

J6

cc

OUlO
o.ac

(SA

O.!!C
c.no
cu.e
0'''0
C.4CC
(.410
0'420 CINe Sf
CUJC
0.44C
0.450

nuc

CF
SF
'0
COl
INE
SF
cs

'F

.""'5
10'0'
O'-J
'-1

,

ox

••

•• Z4
0'

•• Ht

c,"e

I~.I

C'1]C
ttl4e
c.ne

IUIA

c"ee
c.lle
c."c
09190
C9fce
O.IIC
ctue

..

.1

'F ·.'1

.(.I"eid

• t.

C'~ORT

' .11

4.'

cs
ec 5
.c
-occe
ON LSf~ ,
•• e I
1O
fMI.14.SC"j~1
fMlti •• SC.U-Z'
'0
'0 EMltl •• $Cu-t
E"t2C.5,IIl
'0

~.

'

,"1.

TF

,9tl

£1'1

.,'co

'I

;

o'OIe
ueta
euc.
CtL"
nu.,

3 !J!J,

WUSlt~

H·,.n n-'

.•••
l

,~u.

I

-n"
;'tcU

cccce
ceo-c
ccc-.
,euee
eeoee
unJ
CCC-I
"naI
a
nele
uen
Cln,
en"
nou
eeeee
e
e"t,

n Cln, nc..
u

41

u

It
II

11

-tCn

L" etc ..
ncn
II cnu
cnn
11 C42Ce

".

!

-ten
-ten
a. neta cnn

eccee etc ..
4. cn" eecce
e

II

"

u

e.. u ee.el
n etln e..u
as nllt
U etl .. n .. a
n "IU e.. "

Ct'"

I~

2.22

nit.

cue4

~

naa..

-tact
I

0921.

Jeeee

,.~.

CUlt

12,

.'111"

• 1111'
I

·

I

C"

0'111

II •

nUl

I •

Ctzn
euea
CtHI
c•• u
CUI9

Ct I.'
esc I.e
e
cc ,.nne
J7116
et )'41
-4'
au tODEI-Z
.1,'

ouat
euu
etala

z.u
.UIA

,

I ••
'he

n2Je

cc

Jele

eun

caeiL-'

eu.,
n ...

CUlt

o... e

cc

I,' •

0. . . 0
C.. CO'LU

oS

L

esc 2.Z2

"tlO

cu

'~IIJ'

o.tlO

"·

I.'

•

Z2

csc
C

I.e
~:/"('l"

etau

CU ••

:('

,
Jecee

I

OU41

atu.

euu

.:t

OU"

.....
nan

41'1'

.
J

I

-uu
L

CC

-60
0$'

,

etaat

csc

,e
c:C ·~.I1"l'
J7U6

2

eun

O.14C

•

U

"LU enci
CtLII I. "el' ence
42
ceeec eceec
0'164
e
cu ..
nne

I ••

CS

•-t".,

,.GE
C~14e

LSTII.4

ct

C-lC"
euee
eCC-L
eeoee

'"

IUU

•

. .,

•
-u.,

CSA

·

22

o.tlO ILU.

-tC ..

E"'-I

aSA

'L'"

U

-u., •
Cln, • ...4
• a

,

0.110

0"'0
C... O
a.no

u

ClU. tun
una -uu
!
2

o.
811
cs
OO~G
et
OAt
CAS
CSt
22

•

ILU

i'
',H,

.1C4,

IUC-L4~1 Me~lI(a

c.e4C
C'e5C
c.&te
C961C LSTN
o.uc
c.nc
C.1CC E'I
C.lle

.",

.1

.-,

C9HC

' .Icli

.n
.,-1

."

CUU
CII44
C1I4'
c.lle
01161
OIn4
0....
CII"
clue
OI.,a
cnll
C.U4
Olt4.
enu
e.. u
eltn
0....
Clue
O.. U
OtC04
ncu
c.cu
C.U.
etC II
eten
09CJ4
ncu
C.CII
Ctcn
etcn
e.ell

,IC

.U·J

--u

f

26
11

cu" n
C""

,.t" "

C'ltDS-L
.IINS
OSA 1.0.

cs

,.

un
on.e

o"tI
cnn
cn ..
Ctlet
c.ua
c.ua

• 11

"~l'

AM

B

......

"oLl

0.460
COl
OX
C.41C
INE otn
.01
'ANOS-I
O'4'C "IICU
o.-.C
I
CA"O!-I
~OlO
o"co
o.,.e
I f ' SIFe'
CSA DX.OI
C"20
C'He
C'54C
CUfC
CU60 c.
09!l0 n
C'!lC
e.,.e Ea.,
o.tCC
c'lle
0.120

II".c

entz
cnn

"

IT'

~UU •.

'.:l,~(e

-Leee
ec 1. '.
CS f, , ",', ,
O'UC
09]ce UNCS
"ltCSt
~.JlO
I " ·''''5
UA
I.U
0'120
0')]0
0'!4C

.VI.,,,' ,

"~'Hn

-..,.
I

.
.

Z

2

162e-144) ,CNI Ie' I
CqHC

~USle~

2

".un

II-C

'AGE

'USf 2

et
~,lIcec
JettC
),41
ec
-41
CSA tOCEI-2

eUel

09HC

Ct

I, '

e9zU
e9261

c. . . e
0. . 90 lla4

os
est

I
2,22

(92n
0921t

lotte

CSA

IL.UA

C9216

10C IC

ce

I, '

09216
e9620
1"630

...

~

14e~"

-2177
tellO

cs.
. ar~

16ftt
IbtlO

c~.

4t

-H4C
C2H2
1494E
14.H

17

Ce1~O

16710
1"720
161]0
16140
IU'C

S~1P5_

10"
S~

Q(P
I

er~'

es_

aM~S

B"

(DIU

~NF

I.~f

"~l'

• Iq
.1
, •• 1.

' .le

Qt'!'"

.,OQRG

.-1 ,

,:B'" ': CTNS "
CSA I !$I

Ult
':>

ellCt

en~.

I

-u,!

11

-691!
Cllce

14'ot
1.9. .
I.,eo
14'16

"

"etO

J

J4B7C
I

17

J4818
I

•

-usc

I,U'
I4UC
1494t

15eU
' IIC1'
150.4
15044
!SetC

, •• J6

C81!'
-e9lt!

JUC6
2

•

.,

J4Ue
I

J

J4'4t
I

J

eeeC!
J4'16
I

-ute
CUt,
cne4
~,.n

It

4•
12
11

unc

161fC
16110
16780
16790

C-IIC
cilee
e 12CC
J.e",
2

-6Cj4~

-n.e
clle.

I .. "
14.11
l4"C
"cn
UCl4
UCIO

.e

•

.•

n

I"~\I,

•1

.

J4116
I

-Hit
17

.,.,

16tH ctSUI ',1O. UFSTA.'
16HC Ct$IV BU' P~'A'
CSA lA'
167C0

cn\}
eecec

I.
'7

14~U

.

J4730
I

•

17

14U2
l4.a8

,OK

JHU
I

•

-HH
Ulce J4lH
5 •
I

.,.16

,p~,c

1

CIU4

P~'C

01

•

11

n

al~

cnu
-eee I
ellee
J46U

147ft
enl!

I49Ct
16HC
16650

J4.,C
2

-69t!

14UI
14f9C

Cl,D.

eeC-l

44
12

, •• u.

[~.

-n.!
-23'4
Cll!C
C69H
I!H4
euec

\I

C'~O~

81"

CCC-t
CCC-l
C4CCt
J45U
J
2

-ZU.
C95tJ
14H2
0819.

C~ICC

11

1 ••

cnt1
14612
en"
CH1C
C!19.

-HH

14f7C
14812
14UI'

OJ

"HI4

-17lC

lb

P~'C

[SA

2

-nt!

II

14e1C

02

au

I6ftC
16tIC

,e·le.

J~'12

"'~2f

HU8
14 as I
lb~ec

c"n

CIHC
(.H4

pjr.e

14118

,8

t .. "
CCCCC
c-ue
CIICC
cuce
eCC-t
C4Cle

J

U1H

.1 ~o

en2'
CCCJI
cecC!

-6fj~!

I41H

Ie
1654e
16!!C

Ib~

-t"!
-H4C
(112!
CH2!
C1425
144H'
1. . 4t
C112!
C2!72
IOU4
14!"

,
14He
I.ll.

[SA, 01

J4J12
J
2

J

1'~17t
16~ 10
16'2C

enH

HUI
14tee
l.t.1
14;"·;,t\

'.,

~)

IIlU
, IU'~

:,;' ,; ,

line

112,.
112 . .
11101
IIUc
II~"

,IC

,i'"

U
IS
4.

4'
26

II
11

CM

:~ ..

(SA

Sl
N.CC ••
SaFel
51

1"260

CSA

".cCCJ

II J~I
11.42
IU54
IIIU
IIU2

, .t't

,I

552

IlC~f

enc!
CHt!
nU2

~

11141

,.

,IC!

I~

U

11

CU~'

II . . C
cuec

lUll
lUll

-lJn

\I )11
lUll
I14CC
11416

-]71~

U

OP.

eSA

rOFAe

114 If
11421

-Hil

I'IJce

eSA

Noeee.

11421
11426

-~I"

1"!lO

1I~26

-HI!
UCU
1141C
C. . IC

ro

l"Ut

1'I34e
19He

IT ..
CSA

CSA

l'IlfC

CSA

19HC
l'IlIC
19390
19'Ct
IHIO
1942C

......

l<14~O

t""C

FlAGSio
•• ~C.IF'.C ••
POTI

11

!

.f J(lf,l
If TRice

11428

Z5

II'~C

~4

,'.16

11452

11

II~H

-692f

IItAtE

-1"t

F ACAe

,11'13
\1418
lin!

-~I5e

CUTP~

I fllfe ~'.I 'IU If nSI

·.2C

N6ee~9

.HAGS~'

COAC 0.3
I
.2
A"
POll
BI~
,'.16
CSA C... fAtAC.zeAU

1620-1'43

H~"C~

I

,IC

427

~~RS'[.

2

f(.TAI~

11-[

l148e
II4H
IIstC
115CC
I151Z
\lS28

19'~O

lO~

BT~
Br~

eSA

l·.~e

BI~

19"C
19510

81~

CSA

~

43
.~

1911e CtCUt aT~
aT~
19530
(SA
1914e

II

"

lQ!!O

115~C

15

11552
UU:4
II!IC

"

GSAI

II see
1"15
1159C
11592

P~1l
•• ~.ecC3.lf_t5

SK IPS ..

,e
,4

CLfAR
I
GINS
I.SK

,'.16

19UC,
19620

11' ..

saFei

,1'16

CSA

SK.N~ecCJ

I'IBe
19He
19"C

INF

'''14

.T"
(SA

INSET
SK,Acec"

"t16

551

,I

1957C

195!C CSP I
195.0
19tCC

TOil
19HC
19HC
8
19ue ,"UOH TF.
AM'
1"690
T~
191Ci:
19ne
5,
AM
1"120
,I9lJC
fO!,
1'I14e
OSA
I"ne

e'"

AOCO~

CiSBI~1

;'4tcta
",.eec I
~.ccc~

NteCe'

N.ceC4

116C~

IUIC
IIUt
11625
lIue
IInl
II6H
litH

,'.16

10'
5M
8
AM
aT'
CSA

19ue

.1

lute
IlttS
IlelC
11612
lit ..
11696
11"1
I112C

,IC

.H

11116
11141
11142
11151
11151
1I1U
1\114
11116
11192

nue

S5I
~UU' '
,"I~
10.114000 h,•• ea04

I.e

""

I

JI6U
JlUt
3

I

H6 ..
Jlue
3

-]115
-~t'l

IJ

"

1I1Cf
cnlc
-,tHC

-nl!
-'~Zt

15
12

...
II

IJ

CCCCC

"UI
[U2!
CH21

cee-~

ecccc
eHO CCC-I
" H i JlHt
I
2

-9561
Jct .. ~

"

e~zcc

I

JUS!
2

JCI~~

44
\1

-]115
II'"

ncCt

,•

H1U
2

III~~

Jeu,

-n25,
I'

II'

U'

(1U~

IIU~

IIU.

11

[een
eecce
cnn
cc'ue

(14' ..

Inc,
tnt!
CJ1C5
UUC
cnac
cun

unl n

U)

InC!
CHee
-~63f

26

IIl1e'
1111'
I'll'.
U9IO

(ttCI
Jl5U
JI5!C
I
3

-9t2~

III••' 26

,10

nUl
I11CI
CHec

-1115

"'" ••

,6

5~

-Ot!.

Ill"
II'"

,.ttCIt
.le
,"j:AC
,fPZ
,I
,I

IJ

1I1~t

'.'$~

,

c.!tl CCC-2
cnee JIU!
! I
3

-9~H

.1
• '.12
Pl.. T.
• '.16
BL. ~.cCC 3 .~C I1Ct

'.12

C5eu
ceccc

PICE

SKIP~~

t

I

-9t21
-'156

Gse I

GS81

C.. 541
C2226
JIU'
I
I

luce
11122

PHS£ 2

,.t12
P~TX
,'·16
eE ,uceo ,Huee

I

! I

1152e
,11533
liSle
190te
19He
19.PC

CCCCI
H416
I

! I

114n
IIH1

~

C-IC I
cuec
JIJU
I
I

~

B"

80

I

C7U5
CUIC

eSA

,-.. e

CI2ce
CUll
cec-I
HU6
~
I

5 •

ID~
eT~

I'lno fUC04! .NF

CCC~C

-2H~

I"ZlC
19ZIe
19nc

'~I.

CCCCC

uec~
III~L

-]1"

IInl

19220
192!C
1"240
19HC

CCCCC

CHIP
C

11214

ei:iu~G
,I
,I

n

"GE

'USE 2

It', uue

')

CHI.
c22'f,

CCC";',
tCcCC'l
J.ltlC-

I

'J,

1~2C-IH] "~IIU

IqHC
IqllC
Iql!C
IqHO
I'I!CC

••

I

I

lO~

S'IPS~

GSB I
,.t12
PUll
,.t 16
B•• 4CCC J .lue,

CS.

'C.U.~

11-(

II~IO

-~64]

II~

-HC~

I!
IInc
1"22
119)4
11~4e
II ~!I

-H2C
II

C~!tl

"

Cgefl
IIICf

17
11

S.
BT.
BI.
CSA

Iq!!e
S"
l'IItO
e
Iqno
COAC
Iquc tCtElf A"
l'IfH
BT.
I'I~CO
OSA

Iq~lo

U~20

I.HO
IqHO
U~!O
19~tO

19nc

IF
SF
TO.

."

eT~

aT.
OSA

AOCC~

.4

Gse I

,"12

-6~1C

pun

,_.16

BNF ,h4(CC J

I
eCOflC
a-J
I
GTNS
I,N4cec I

,FA'"

•J

.10

.1
,'t16

.IC

INOIEt-2
.ueool
I NClec-4
SOl PS~
.1
,I
I
GSA I
,"ll
, •• 16
PUll
a I, N4CCCl ,I NCIEC

CSA

SL

20CtO
20ClC
20e!C

c.

SL,
eOOH
N4CCC4

BNE
IF

20C~O

20lee
20 llC

."

aT.
eSA

20120

OSA

Sl

20110
2014C
20 150
20lte

10.

OSA

551
SOl PS ~
SAFe,
SL

20 170

OS.

N4COC4

-~4U

12(16
unl
UCU
121e4
121U
1212f
1214C
12112
121U

,IC

Ule!
1211l
1< llf
IlIlC
121U
12lQ]

12
17
11

1(4,I,IIC'"

To~

-

PUO

42!J

YIISIU 2

. [ , u " II-C

-]ll~
-~t![

CQlt 1
11 e12

CCC- 3
ecccc

11
17

CQlt!
clen

CC(-]

-~I"

26
32
II

J20ee
2

-

-HC!
121n
121n

01(1
CCCCC
CCCCI
C(C-I
J2152
J21U

C~HI

II

e~lt7

11
11

1I1(!
cene
-1612

-

J2191
11t32

17

C!e22

eecee

-Q!t7

12221
12222
12234
1224t

-2H~

14
41
2~

II
17

C2]~~

C-le4

Ie 14t
eH2C

CQ5t7

CI2C~

122~2

123[4
U1l6
12H2

l21ll
123]1
12354

J22!~

-

! cceci
CCOCI
J21l2
1

CH24
e9HI
C42ce
-2399

! -lI2e
enle J2354
I

an

PUll

OSA

""

[SA

N4ceC4

121U
12159

-HI~

202ec

CS.

"NS5

12359
12364

-J72(5 _

20210
20220
20230
20HC
202!0
20UO

10.
IF

SS2
N4CCCI
NHeCI

12364
I23U

.1
,ICCC.

unl

17

~ -

15
26
II
17

-QIJ7
CH2!
c)ln
CHC5
cnlc
I

BT~

pun

OS.

SM

12390
IH(2
12411

-94H
-94H

.IC

20210

CSA

HI3C<;Z

12411
12423

202fe

[SA

N4CC(1

12421
12421

20He
201eo
20110
20320

HI!

I

sn

GTNS
I

.1

,I

12421
124]0
I2U2
12U4
1241C

t'

•.••• 6

11

ce~25

•

en"

CH2e
nU2

e-eel
ceou
J241C
1

•

-nn

-I •

20BO

aSA

SK

20l4C
20UO

IT.

SRFCT

CSA

51

12415
12416
12492

DSA

N4[Oe4

U4t2
12491

Jce4~

20UD

124tl

-1l2C

':J"

CCCC I
CCOJ!
J2411
1

-HC5

16
11

1241e
124"

,.tI6

I

-2]~~

15
I!
17

12312
12])1

,··16

!e

eee-I

oue
[1622
-H2C

U216
122'1
.1
.1
, •• 16

-

! -

"CE
122!!
1227e
12286

,IC

J22U
I

201~0

TOM
aT"
CS'

]

-:nl~

49

PUSE 2

, •• 16

,I!
,.f16

]

12
H

20 lee

."

3

ece-4
J2ClC
J2(U

1I1(!
enrc
!

122H
eT~

-

121H
122CC
122U

.1

.1

JI~!f
JI~14

CtQ2~

-9t4~

122U
12221

162e-IU1 "hIfC' 1
N4ceC4 _
GTNS
N4C(e4

-HI!

1I~14

12C26
12C31
12C36
12C1I
UC5C
12cn
UClA
12C7C
12C16

COCEl(
199fO
a
199~C
OORC a_)
6,C
20ceo IhCAEC ec
-oceee
20el0 CCCo~ CS
~
CUTPl T ee,pl fED CC 'e
20e20
2000 etCHP aT. CINS
,.'16
20e4C
CSA I
20C!0

Il~H

IIQlt
II"f
12elC
12(26

,IC

CCC-]
CCCCI

ce~IC

1I~14

1I~74

U!lC
Iquo
Iql3C
Iq!40

"

PICE

'HSf ,

.tc

.J
.1

BI~

BT~

YE .SlC;~ ,

JCl4~

11

C42C(

,

J24U
I

.
•

U2C-I •• J 'CAI fU I
'O~

20110

aN'

20UC

IF
AN

20nc
204(C
20410
2042C

1041C
4C
20Ht

'1l.

,,~

ceCE~e

CODEU

ID.

S52
PUll

IT.
OSA

12 ...
UUC
IU22
IHJ4
UHf
U5U

.IC

",··16

125tl
Inn
In61
I""
12'"

.1

,·.16

a

20~tt

[SA

~UCIl

125U
IltOI

204ft

CSA

N4ceC4

IltCI
12.U

20He
2049C
20!Ct

IF.
8T.
eSA

GT~$

I

12.C.
12ne
U6U

20510

CS.I

SL

1261.
12HI

20520
eM
BE
20"C
20!4C ceCH. 81.
CS.I
20!'C

I

I. Sl

1.lt41
12142
12"4
12t1.
lUll
12t12
12681
lun
I2ICC

SL.
CLUR
C T~S

IC ••••• I""
t

C"
BE

SL
N6CCll

.le4

20!8C

1O.

SKIPS~

2QHC
20ecC

BI.
(SA

SRfeT
SL.N4COOI

.1
••• It

TO.

20tlC
20t20
20BC
20t4e
20t5C
20ttO

20HC
lOHe

eeOE~e

SIC

IP~"

.C

••

12112
12124
I2HC

CODE~C

.~

TF
SN
BT.
CSA

eGee.

• .I[en
.2
, •• 16

BT.
CSA

INSET
SL.CGen

llHC
12H5
12H.
12158
12HC
Illt2
12H4
12PIC

.. s..

BNF

eGce~

P.lRI~

'.16

20!tC
20'10

.IC

12f1e
12e1 ~
121U
IlUi

,·.16

PLTC
N4CCCI

41i

H2e-I"')

VERSI[~

.C~ITCP

I
20tH
A"
COCEU
20lCC
B
CDRC - - )
101 Ie
20720 Ur.CH aT. .I0JU T
20BC
B
neaR
(DRG --3
2074C
eUTPLTS fe ••• I
20750
20lte etlIP [SA I.SH I

feATAU,II-t

2

8T.
[SA

R"t.S, •• tt
I. S'17

20HC
loeco

IF
.1M

REP1,Arcn., •

IOIlC cell.l

BT.
BT"
CS.I

USt,

U
II

Ill"
11191
111.4
5

15
11

16
11

loue
20150
208tC .R'NS
20!!C

20ue
20no
~09CO

20910
20910
2093C
20940
20950
20gee
20ne
20~IC

289'0 S.11
2ICeo (Cllt
21C1[
21e20
21C3e
21C4C
21C5C REPI
21C~0 Ctllt
21ClO'
21C.0
21e~c FAEQI
211CO
2111C CtllF
2112e

C"
HNL
BTM

OSA

14
4'
IJ

..

CS

Ie I ..... S I I

.-

SF

91,

81
8

PUTI JC.9~
eOlu

tHUTCA

PUTlle,99
R..,"S, •• 16
I.SYIl

I

C-CC4
JlU6
I

•
•

-21U
ellU
Clt2.
C!e22

C-IC4
cuec
J2612
2

,•

-1561

-21H
CZH~

CHe!
C42((

C-IC4
cllee
CCCCI
JU.C
2

1l.,4

.•

-21H
-lit!
15
H

2.

12
17

"

cccee

C9.11
1281t
121 . .

C5tC9
CH"
ceO-2
JlUC
2

1211'

11144
-2H~

J219!
C!ICC

,

•

.

J2832
I

-HC~

C~5e

1
12tt.

CCC-I
[CCce

49

"

nltt
C2UE

-&925
ceecc

11

-95t1
J!l41
"592

II
4~

! •

,1 S IT HTYPE

'~T

ITYPI

~.

12~11

II

1291C
12942
12HI

""

IJCO.
I]C(9
1)( IC
13cn
IlCJ4
llC4t
1]"1
I]ClO

IJcn

I]CU
Ult6
III 18
UIJO
Ill41
UI42
I H54

A~C lf~G'~

(JUt
UII.
P~T ~T"f.

lE~G'.

A~O

C[NST'NTS

.-

8T
CSA

.I~

' SXlJo,l.IC
91, ,t;

8f~

..

,PUTlhHTV'E ••

SF

UUI
ettl2

15
II

12~C5
12~C~

11958
1296)
12H4
12916
129ft.
11CC4

SUI.SlI
CDIU
SXll,2.lt

os

SY~~CL

SVI1,
114 ••• 15 IT LEFT PARE.
tOIlE
FREQIoSll1 ..
CTHU c,eu" •• SAVE FREC
SAVE ACCRUS tF un spec
REPl,Aoee .. "

PUll1.~TVPE

.M

•

141 .... 5 IT .TYPE

,It. ,e

BT~

BT~

SPE~

YES. fUNe~
RE.eVE ~E.T SY~8CL

1.5."

~M

es

'CCAESS CF 1ST
.It

AE~[vE

CD11B".
RfIINS,·.lt ••

RePl.4.1~

IF
8

~AVE

I.SH7

~N

-HIe

14

IlE18

.1

R"~S.·.16.,

SYl1.
COlIC
SVll.
COl Ie

-.. n

12~CC

.IDCO~

tN
BE
eN
BE
CN
HE
IF
TF

CCCC I
J"U

•

SPEClfIC.llIe~S

C...... ·.12

SIP.

.2562
2

•

"CE
II! 34
12f ..
12e54
121 54
12@tt
12et4

•• tce~

ccc-,

-tHC
! •

-"61!

12~(C

2082C
20e3e

.C,4'
HI ..
(7425
cute

Clcn

enu

! •

12132

12f 18
12e!3
12ee4

1011e
201H

44
IJ

eccec

UUI

PHU 1

.IC

.1

IS

Il.Ct

,I

.4
, •• &6

n

PtGI

PHSf 2

1I-C

.'tCC~

CGCO~
I~SEl

SK.CGCC~

"I"~~

••• h

CGCC~

CSA

,

YE.SlC~

,e

SKIPh

Illte
IUGI
IJlCZ
IUI4
13226
unl

II

14
4'
U
4,
14
4e
26
26
II
26
4t

-95eJ
J4143
IUH
1114Z
14243
132e2
14243
UJ32
13231
132Cl
IUCI
11141
134(4

H

4;11

C-Iel
cnce
J3ee4
2

•

C-141
el2ec
(-UI
CllCC
C-\24
Cllee
13141
cnu
ceC-4
1424)
ceecc

(

II
Il
)2

n

••
n

Il
J2

un. n
UUt
IUU

-95fl
J3I41
14HI Ce125
CU2! CCC-I
IH4C J29H
C5592 J2951
5 •
2
.. C;!t1
J3141
13141
134'4
(5592

14

J29CC
2

•

Il

14'2C -4Ut
1"41, eCC-l
eecn ~CCCC
14ue cec . .
une ccoee
e
I.,le -41l1
UI41 ceC-2
eCUl ce-ce

c

IUU

una

5 I

cccn
JUU
2

5.

U2C-I~H

211 30
2114e
21HO
21UC
21110
211IC
2lUC
212ce
21210
21220
21HC
21240
21250
nato
21270
U21e
21290
211CO
21 HO
21120
21 HO
1I14C
21150
21 !ec
21 no
lIJ1C
21 !tC
1I4CO
2141C
2142C
214JC
2144C
21450
21460
21410
2141C
2149C
215(0
21510
21 !2e
21 !JC
21540

"

SM
CM
BH
8
es
TF
5111
IF
,M
IF
8
OS
CM
8E
CM
BE
CM
IE
CM
BE
eM
BE
CM

REP2
ctln

FUO'
CUll

~ehl

CCI1I

8T~

8T~

es.

~M

SF
8T
CM
BE

BT.

8T
8T
TF.

HUC

calc

REP2,4,IC
FUQ2,SXl7
C'OI U .. 9

,.

Sl17,
C017G

IU,.,UGHT '110

Sill.

14"I,! "PI

BT
8T~

CSA

2ll!C
21ltO

1356C
13!12
lJ5 . .
IU"
U6CI
uno
un2
IU4e
lJ64C
llU2
Ute4
un2
un2
Utl4
1"9'
Inll

cK ..... ··12

RIIINS.·.l6
I,SXll

SlIl,2,IC
91
P~'11C, . .
FREQI,a,~,

PLT

nt~ IIEf".~

.CCRESS

COI1'
'''TI1,RfP
P~TI H ,REPl
PUTllB,FREOI
FAEQI,e ,.

433

VUSICh 2

~CIIITC'

FCUUt. II-t

.-]

CKX~

CM
BE
CM
8E
If
DOIIG
aC
-2
2uec It~ects IFM
8TM
2lne
21UO ~L.ca8 'F~
11M
21890
219CO ~~eC12 lFM
81M
21910
21UO W1l1l2. TF"
11M
line
ITM
21940
cu
21950

'

..•
OS

4'1

J424!
146C4
IB41
UUI
1!2"
12tJe
C
I4Jl1
14311
UUI
UHI
1340
1291(
C
11141
142H
11141
14244
11141
U64C
11141
U6n
UI41
11114
13141
1'154
IH41
I4H2
11141
12nc
nuc
14)11
14111
129JC

1l
Il
49

11HC
1452C
IH1C

J3652
-41C I
CCCCC

II
II
11

1394C
1452C
C'5'2

-~09.

21
12
14
4t
49
'at
12
26
11

at

49

14
4t
14

4e
14
4t

14
4t

14
4e
14
4t
14
4t
14
41
17
26
12

17
49

UUC
13ne

-4111
cceee

Il
17

1452C
(5592
-9561
J1l41
14"t
C55 . .

1~19E

IJHC
13H6

11

(5622

UHe
1J9U
11962
un4
nut

-un.

' UCIC
141ee
14101

141[2
14114
14126
14UI

,suces
,lLtI.
,nlUI
,.Ul
,SUU2
,IU.
,SU1Z1

I~.,e

I4IU
14114
14116
141"
14214

..

,u,nl •• u ,
CO 1111

•

JIlt '111'-

II"'"''

.cDlIfSS

4311

JHI2
2

4'

49

,lLn

J

CCCCC

I""
IH21
11922
11HI

FMeNo15
FMtN
F'ONOl!
FMCN
'110"0"
FIICN
F"ONO"
FMON
liMNS, .. 16
I,sxn

no"'-

1291C

WUB 12B024
5,C

141ce
2,2

(-14~

CllCC
C-14e
C12ce
C-I12
Cllce
C-124
C12CC
J36t1
C692!
CCO-I
cccec

21
It

21

21
11

XR~NS

C-IC4
CllC(
C-14'
Cllce
(-121
C12CC
C-I44
e 12CC

J1l41
11141
ceCH
14556
13231
UHC
1452(
lute
14604
13231

13112
13887
13UI
13UC
U'16

CKJCH-l •• 6

eUH
cec-I
U92'
eCC-4
1!l41
(C-CC

-HU

13
12
21
U
4e
11

PUTllt,!JIl
RII1NS.·.lfl
I,SXI1

5'110147,9
XII'NS
SYll0141,9

142H
(ce-I
(c-ec
e llCC
ecccc

CCC-2
cccce
cce~.

cc-ec
C12ce
-41Ct
132tl
112n
cc-ce

PaGE

l!126
U8H
13834
1l.U
11854
UI!4
IlI66
lUll

.

CUH, . . .,
PUlll,En'E
COllL+U
DOli' .-J
ITM CUN,.OU
CII
FIIE\l2,O,t.
COlla
IE

IU
ITII

IHI2
IHIl
Inll
I'HO
11142
Ill54
IH66
13771
unc
U.U
U.U

14214
14ut
14220
142U
14241
14144
lUll
142.'
14216
14111
141. .
14JOa

59

-~Ul

, •• st 2

CC
-OCCO
BTP GTNS.·.16
CSA I,SY17

21790
2leee
2lele
21120
21110
2114e
21UO

22C40

13~48

IT. , PUTll,FTY'e
8T. ".111\15, •• 16
eSA I,SXIl

21l2e
2113C
21He

lIC50

nUl/lhc,.ccnss

B
CDI7A
COAG .-J
YU 'c T1l,I TYPE
tOllJ024
B

21t~0

21tH Ctl7K
21t7e
21UO
2lt90 ctln
211CO
21He

UCiC ccUG

U~I

RfP 1, aOC[~"
REPJ,I,IC

IIfP2,aoce~

162C-1443

2zeco
nelo
UUO

Il2U
13HI
11212
11214
une
IUCI
I !l2C
I JIB
1!!32
13H4'
IU"
lUll
UUC
IH'2
U4Cl
114C4
11416
11421
U44C
11452
13464
I 341e
11411
Il"C
1l"2
11524
U5U

PUHlI,SYIl
SXl1,lole
SXll,C,9
COllF
COIU

..

PlGf

' . . 11 ,

8" punl,SUS"
8
COIU
CORG .-J
CKlfoI, •• l2
8T~
B" PUTn,"'Pt

CCI1J

uno
u"O SU7
una ctll"

.CU .... II-e

".

CCI1~

21960

2

COIlH
S1I7,
UI,I,$Us~
COlli
SXIl,
144,.,. "PE
COIlJ
SXll,
149,11,1 "PI
CDIlK
sXIl,
146,',' "PI
COlll
8£
CM
sXI1,
U2,.,U~1 eCLeh
'BE
cOllse
CM
UIl,
124,.,Uft P"t~
8NE COila",
8" CUH,.o12
TF
UVE IE .... atUUS
RfPl,aOCC~"
SM
IIEPhl,le
COIU
8
COIIG .-3

21550
215tC
215lC
215le CCIl~
21590
2uce
21f1e Ctlll
2U20
216]C

21 HC
21UO

~USICh

"p I

J

-4116
HI12
2

J

J3916
2

Ill~1

-9561
J3141

14
46
14
4t
49

It
Il
16
11
16
11
16
11
11

ccecc

J

Jl"6
2

-95t7
J424l
14243
U9U
14241
12 . . '

(CJ41
C12tC
CCJ41
C12CC

C2J5~

-9294

e2314
C2J!9
(2124
eun
UU4
C2l"
CU24

J41e2
-'111
J4126
-H42

un.

en"-,

Hue
-n..
J4114
J4214
X
2

-un

"

4t

11
IJ
4.

JJl41
14604
UlS4
UUC
14'ze

nlee

It ,nt4C
14
46

U141
ecClct

(

IJ4CJ
unc

.1425.
-4121
CGeec
JU . .
eo-cc'
cuee

6C

It2~-14.' 'C~I~C'

zletC
UClO
22CIC

IF
IF
IF~

22C~0

IT'
221C0
I
22110 REP)
CS
22120 ct: l15t INa
221 )0
IT'
211te
IT
12 150 eel7 .. II~
IF
l21t0
22170
22UC
CU

"'

221ge
222CO
2221C
22220 PL Till
2223C
222tO
22250
222t0
2227e
222.0 .lTll

uno

ADJlSI ACCC. It

fVE~ACUISS

.• t"

TF~

'~Il-1

B7
182
es
III
IF

HIl,

.-)

TY'eT

,"'EU
,tl" 11-1
,"29

'UI)

•,un

,"'EO
,HTll-1

tyPE I

.

,UIIlI'Z.

,

, "'EKJ

HPEI
p~lIle-

pun

)

14'"
IHIC

,'LII1C~1

14192
IttCl
I4tC4
Itt 16
Ittl'
14t4C
14t41

PUll H.'t

.'TYPEl

.I~'E.2

PUll lB-l

pvn

,HUll-I

224tO
81
PUll 11 '1t
22410 ".EK2 c~e 1,2
2
2242e
CC
2.2
-2
2,5
1141C
ce
-5
224te
2.le
ce
JO
l,lI
2245C
ce
JI
22HC
5.lecce
ce
Joeee
2241C
ce
I. '
22tH \V'E. l OSC
2
224~C

CC

16
11
.9

.,
II

n

11
16
Il

IHe!
IJnl
ec-cc
-lUt
ecocc
UCCt
-Hit
Itnl

-n25
net2
J.44'

•

2

-""

H

JI
16
16
H
42
H
26
.9
H
!l

16
.9
!I
!2

16
t~

-U2!
ClUt

ceccc

U,U

Cfltt
J44n
J4",

Clllt
CUH
C7Ctt

ce75~

Cln!
ClUt
14H.
C
cun
1.,51
ClU.
IH9<
C
clln
Itte<
tlllf
14tH
I

IHU
cccce
I""
CCCCC
JH"
ceocc
146'1
ececc
JHCJ

ItU9

14t51
Itt55
14ttO
l4tt I

1.2

14tH

2.1

I'U4

" .15

1 ~lO-lt43
CC

,.at

unl
IUCI
IHC3
IHlC
uHe
e
12')(
ItHe
IHU
OUt
ClllC
CIUC

14t"

-]

22~CC

IHU
1HZ'
IHU
1.,41
I'UC
14111
14112
14l1t
14Jte
14401
IH20
l44ll
14441
Itt ..
1441'
14414
IttU
144H
14461
I441C
14tH
IHC4
It'l2
14'"
IH20
IHU
14544
I""
I.,,,

tlUR

U

PlGE

'HU 2

"

CDIIA,IGU .. '
'YTp,UCC
PU Ill!, Rf"
AOJUII,ACCC~ ..
N4CCU, SlF
'UlA
U. ,AOtC~

,

IF~

22l~0

'U . . _~ II-e

FREQ I,FREQ2
UPI,H'l
PREQ2 ,e,~
'~I II,
U'4
COllI

I
CDRC
es
IR
IF'

223(0
~
22!1C
os
22120 'llllC lR
nHC
SF
12)te
IF~
2215C
8
22 !to
CS
22110 PL I III lR
22l!C
SF

vUSIO 2

.e~lIcP

I

vERS It. 1

FC A'AI~ 11-(

HJSE 2

2.t

"CE
14tH

-6
22~

Ie

ce
2,11
JI
ce
2.12
J2
ce
5.leece
JOcee
cc
I.'

2252C
22~

!C

22!t.C
21~~C

OUIP~I

225fO Fe TR lP TO.
8T~
2B1C
22'!ec
CSA

SS2
SRFCT
RTN"e

22~~0

"4(<<11

CSA

14tt!
I'ne
14tH
14f It

REI~R~

,I

14ne
I'He
141Ct

••• 16

15
11

5

-H"

IHet
14111
1"11
1"12
14HI

5 •

81~

22t1~

OS.

PVIX
81.

OSA

TeF.C

HUI
I'lll

-6tH

2U20

-'151

NtCCl1

14111
14111
Itlll
14HC
14152
HIH
14U6
141.,

-11"
CltH
eJUe
eHee
CHIC

OSA

22t4C NtCI82 IF~
TF
22t5Q
2HtO
SM
22610

BTM

2ltlC

CSA

5S)

N'Cell
NteCIl
P~"

8

,IC I
,AUC

,q

",•• '6

, Ie

11

CU

16
26
Il
11

CSA

Il.ANK

22110
UHO
22HO
22740 liZ.

8

CLeAR
.-J
16CC2
IUl' .101
IUlA.l0Z

l2760

DORC
DORC
14
18
IRA

nne

Tce

IllX

uuo

DS'

CF

nno

121tO
2lIC0

......

IIC02

11014

IICU

un.

lieu
Utl4
IU,.

OORCi locee
SKDIIO••.• 1IliUGE fOI IUjCl J

IOCCC-

436

CCJel
eH~l

Ctc-I
J41U
I

•

-JUC
5 •

HI"
HICZ
14104
IUU
UCtl

.

-6tH
5 •

Hn1
2l1ec

J4ll1
I

•

! •

Hl"

"HCI2

CHIC

~

141H
2l~90

•

-11!!!

llteO

Ufle

,et 16

cecel
J4lCt
I

CH2~

e42ec

-"2t
4.

uue

tcOCt

.

CU1C
tUH
eccce
ecect

COlCI
telU
cnee
ceecc

14

,.

]I

! •

-'413

62

61

ICCCI

203
F~[~+

JS

.eul

F~CN

.CCDEI

F~ON+J~

,eUI

FMCN

,ccou

F~[N+J~

,UKI

F~[N

,CCCf4

FMC"+ 55

,eu2

F,MC~

F~C~+U
F~t~

ICCC2
ICC I.
IOC26
ICC)I
ICC~C

ICC62
lOtH
leCI6

,ccou
,tL,K2
,ccon
,eLKI
,ccou

ICCU

F,MCNo15

,ILK.

FMO"

F~["·)5

,FeTl

10110
10122
10114
IC 1.6
IC"I
10 170
IC1I2
10'''4
IC2Ct
IC211
102]C
IC242
IC254
IC266
lonl
IC290
10)t2
10114
It 326
10lli
lOBO

,tU2

101U

FOCII

,FURl
,flU

FMCN+l~

FMCN
F~C~+

55

F~C~

,eU2
,CCDn

SUBe 12
,I

Fl

CDI4P
FMCN+ 35

FIICN
F';CN'. JS
F~OI'/

,eUI
,CCDfU
,eU2
,CCDEIl

SUBCOS

5u8cn
SUU2B

~~r."o 35

F~tN
~V , '
COCAL'P

,ECJ

;HI

,.

IC314
10386

loni

O\l1PCl Ie SU'E~EH
,C
"FR's~
,.':l6
~~IIS
I

C2l!~

CH2'
CH!q
C2324

-H~!

C2l!~

-HU

16

17

JCe2t
Jee!e
·q222
C215~
C2124 Jee14
-9122
C2l!~
C232. JeOH
-HU
C2l!~
C2324 JC 122
-9122
CH~~
e2]24 JOIH
1.1" ceccc
ceecc ceccc
e3~1I
cceci
le.34 ccoce
C23!q -U~I
C212. Jell!
C232.

16

C21!~

17

C232.
141e2

.9
41
4q
48
•9

.8

Ie
17
16,
Il
16
Il

104lC
IC422

I'
49

10434

15
17

1044t
IC412

-Uq!
JCOCZ

16

11
\6
Il
It
17
\6
Il
It
17
16
17
16
Il
.q
48
15
4q

-9122
JC2.2

cecce
eee'cc
ceecc
eecee
cceee
cceee

ecccc
I.Ut
eeccc
1.11 •
eeece

-H7C
JO]]!
-9122

C2]5~

C2!2.
C215~

J062

e2324
C2!!q
e2324

-qnc
Jel!t
C-Ill

Cq~!1

I )ec. eeccc
cecce
J\. C.2
)

le462
le4f7,
8i~

csl

l,n~o

I. SL

til,

CDI.JC

. 0,

C'D14JG'

1~C

,.

'

lJi~Q

Hi1e

It467
IC.U
IOU4

,··16

ci'T~ 5

LV

,I

-231i

11

437

2

-~5t1

lo.eq

IC5C2
10514
10526

JC.!.

~.

10.84

It~qC

C5t22

-2H~

C-142

14
41
14
.t

C95!1
ICqec
"!!1
le~!e

(-141
tl.ee

15

e4qeq

cceci

C95e1

C-I42
C12CC

C I )ee

64
FF'S~

LV
CD 14' V

LV,

.1

COI.Ft

Lv

• 146

LV

,147

CO I~AV
COI~RL
Ff'S~

••
••

LV

COIHY

,.
.8

CDI.Sl

--3

le538
1055C

IC"2

14
4f
I.

Ic~q8

••
I.
4t

IC5H
IC586

ICtlC
ICfl2
ICB4
ICHt
IC658
ICUt
ICU2
Icne

let'C

L YP

IiT,LVP'~13CH

IC1(2
IC714
1012t
le742

AM"S

10742
IC147
10752
IC754

E~i~J~

II

put>

le77e

I. SL

14
4f

C4'!~

IC~.C

nm

26
14

e2H~

.1

IIce2

11

Ceq!C

11

-2n~

17

cute

JC812

2

-un
15
17

-H2C
C1U!

eooci

utle

5

10Uf

-at"
-4151

JC8 . .

•

J

-Jue

17

ese".

~.

lcn4

Jcn.

2

-'!Il
-"!I

17

10191' ••

IOU2
lo,,,e

eeoee
Ilce)
J

leU6

10920

2

-95U

IClI2

Incc
IC . . 2

1

JOle

e5'~2

•

lon4

,Rieda
.lIEeaRa
.... '1110

-'.H

IDn6

Icn.

JC7.2

J2~1I

11214

10HO

C~ICI

cl2ee

-~.52

lUll

lClII
ICUI

11eCl

UHI

•

lonl

,,,&2

C9~!1

49

leno

CI2CC
C-I47
C uce

ceoec
C-\H
elzee
., leuc ecece
!2
I.

H

let II

C-146

le~cc

10776
1078'
le7 . .

iell2
IClIl

e-141
Cl2ee

""1
1C92C

46

le77e
le775

.,he"
, •• '6

leHC
[9511
IC7!4
C95!1

26

••
It
4t
z.

Ie", ••

C!tl2
107C2

UUI

101C2
UUI

lent

unl
IClez

JCa'2

una

12'"

IHu

1620-IHl

llteO CCI4H IF
1H9C
87
2llCC UI.JC 8Y,
ll!le
CSA

~C~I1U

LVP
CDUFl'11
OPSR

I

~usln

2

~C.,

•• ~ II-e

'~'Sf 2
IC~'C

26

IC912
IC ~IO

H

, •• &6

L~,LVP

11

unl
IC !~e
'U12

II

-Hf!
Janl
cn.,

IC~"
IC~U

H!20 CC UJ.

BT~

21ne

OSA

21hC

C~a

nne
2JHO
Hl1e
nnc

......

~~~s

lieu

Sl

IIC21
ID~

SS2
OUTPLJ
BT~
SRFC I
(sa
SL

,I
1~!I.lCTI(h

Ile2~

FtR It CH ICt

""2

2ueo
nile
2JUO
2le!C
He4C
nl50
neec ce 14R'

eD
eo

CDI4NR'1l

a~

SUSE

_'''5,,5

eNR

CDI4~R

,SUSE

IF~

a.
IF

OPI
COI4U'12
N4C OC I
N4ceCI
SRAse

,acce.

ID~

R~S'

Tf~

OPI

81.
OSA

OPr,LVP,h4ceC4

nnc

21~ee

eCUhR

2HIC
2H20

2HJC eClu
l3HC

8~F

23~5C

87
8T~

n~7r.

csa

2H~C

CSA

s~

l1HC

e.
8e

CDI~EN

2~ecc

2~Cle
1~C2C

8T~

CS.

SL,
GTNS
I

,Ie
,II
,IC

,a!

.Ie

,II
,hOOCI
,C
,II

pun

23~tC

IleH
lie,.
IIC1C
IICl2
IICH
I lice
11111
11116
11111
11I5C
11161
11174
II lit
112C2

,FFRS'

CDIO~

101
·.2C
CLEAA
A"NS
I

ID'

,6

,Ie

,"16

11,(2
1120!
11212
1121.
IlZa
11238
1124t
IIa2

,e
,FFAS.
, •• 16

IH,.,SUI

CClC~

,.t16

ItlC-1441 .C_I It' I

os.

SL .

2~C'C

c.

2405C
24CtO
24070
24cee

8E

2'C~C

CSA

SL,
COCCA
SL,
COO EPA
SAFCl
SL

241CC

CSA

SA

241\0
24120

80

241 '!C

80
CO~9
8
COAt .-J
8NF CD9S
TD~
SS'

2414C
241 !C
141t(
2417C
2418C
1419C
2420e

C~

8E
8T-

8"
CSA

OSA

FCRTUh ·II-C

P~asE

-an~

I!

-lUe
I lilt
IIlle
C45.5
11114
C4411
II lie
ellC!
eHe!
C4"h
e5en
C4411
c"le

15
44
_9
11

-HII
J2"1
-lI2C
c.nl
lIue
C2621
e!"2

-,"

II
45
16
4'
at
II
26
15
16

...

Illtl
litH
111SC

4t

l21t •• ,lfFJ

11<~2

11

2

P.GE

Illll
; " ~

. ..

11l9~

14
4t
U
46

11

2414C
24"0
.24UO
2H10
24110

pun

OPI

• SIIF

,'tl6

11'44

,,

?, "t
oj

IIn4

C4174

4J
49

1141t
1 14 I f

CHH
cecce

44

1141t
Cl424
C6ue
5

C9619
cecCl
JIH6
I

"

I!

!

_9

15
1$

4'
26
49
2t
11

BO

•• 2C

C014t
OOltG .-,
eOlf tDI4t

24nc

8T~

SSI
puu

244ce

QSA

tF

el421
C142'
11532
ClHC
IIS44
OUC
cnee

,

-44 I!

liS.,

•
•

eeocc
eceel
CCCCI
049 . .
C4161
12911
Jl56e

,

.

I

-,IIC

1156~

SA

-9426
II4U

11'60

N~CCt4

os.

rD~

! c;

8LAN~

8T~

e

C-le9
cl2ce
C-124
1I1~2
CI2ce
042ce J l31e
, I
I

1245C
C2H9

• ~1

IU~O

24)]0

-2H~
C2H~

-2!H

114"
1\461
1\476
11476
1 .. 1.
115CO
11512
115H
115]2

t6

5 •

11461
11466

,I
,FFRS.
,Ie

,J 1262I

-9561

II JIP
II!!J

..

cecce
C4 . . 9

111(1

11131
II l5C
IIlt2
line

,fPS.
,I
,.t 16

,

I

113C1

11]2~

,·.16

CCC~!

e6U5
eCOJI
eUC5
ceeec
ceCJ!
JIle2

cnn C-1l2
I255P r.!lee
e5t22 J I lCl
, I
I

111I)
11314

pue,

CCC-5
C4"~

-llH

liB!
1C9,S,CO

C_ . . .
(5 DC.

-95t 1

SA

CSA
OSA

",CU
I

-9411

•• 2C
8
OORG '-3
TD~
5S'
TO" SS2
C091
80
TF
N4CCe~
eDH
e7
N4ceC4
IF

24)20

ecoc I

CHCC

11456
IUtl

24220
2U10

JIOII
I

•

CHH

SF

os.

242'0 tt99
24HO
24210
24210
24290 ce97
24100 ce9/>
24!i0

If

II4CS
11416
11416
I U28
1144t
11456

.. Hie

lH40 CC9I

vERSIeh 1

COCARR
,tHo
QUTPLl SI.PLE •• R• .aLE
•• 20
,F.CAFL

Plll )I

a

., -21"
,,

IIH2
lilt 7

"3~

14C1C

JC"6

•

-Htl

IIC52
11(5!

~~cce~

IF

lieu

, •• 16

cu

87

IHH

IIC2J

nnc

HIIO
ano

IICO I
IIce2.
IICII

,u16

H

"Cl

I~D

,F

1"'0

,FlCRFl
,f'S.
,I
, •• 16

4411

IUle
L19l2
IUt.
IIS.a
Iun
I16C4
lUll
11612

-2172
4)

••

4_
U

Il

1I5U
IIt44

C4SH
cecce

"64.

eecC!

01424

uue

5

e..H

H6U

•

I

162C-144J

~ChITO

I

VU51Ch Z

'C_ . . . h

II-~

"ce

'~'5E 2

24410

CSA

SR

litH
IIU1

24420

CSA

&lAN.

11611
11t42

244]0 ec 14e

24HC

8T.
CSA

_.hS
I

24450

(SA

SL

244tO
24410
244ft
244'0 ecc . . _
245CO
24510
24520

8
eOl41
CORC .-]
OUTPl.I OI.ENHOh ~UUILES I. Ie
.... cee ..
.I
I'
I.
Noeee 0
.1
.Ie
, •• 16
8T. G TNS
OSI H.ecco

1\642
11644
IIttO

, •• It

IU6t
IItB
Iltt5
IltU
11614

11

..

-'41l
l J
-2112
l J
-'Ht
''''2
-'''1
l

11214

eecec

1\614
IItU
Ilnl
11114

26
II

11

e112e
onc
(5622

"5U

LV

24540
24550
245tt
24510
2451C

c.
8L
I.
10.
c.
BE
B1
TO.
80

LV
COO.AI
I
101
LV
COSSA8
COCESS
101
CO~5

.Ff_S~

IF

N2,e
26 1te
26!1C p~h2
:i61le
2i';JC
2"4t
26 ,50
26HO
26il0 ilL IXll

11

Inu
C95tl
CH"

Ilec]
LI~.

Na~E-l

COlGl
H2
CDlGI

46
II

un)

,!'f

161~C
~6·2ec

26lle
2Uee

IF

NA~E-J

I2~U

••

u~u

••• ,-6

csa

ccoce

enze
I2.U

u~u

F INC

26Clt
260C
26C4e

11214

26

u .. ]

-ll~l

25~4C

.

11

PlGE
-2H~

,

1'5n
J3111
J3426

U2C~IH3

2651e
265ee

~CMI".I

VUSlC' Z

I.'

IHH

et

5 .14~5

13:4]

l6HC Nte5H eSA

lOR I

IHH

~eC71t

CSA

lOCAL

IB4B
11553

~CH!

26ftC

~2T.C

26Ut

N~H

ce
'.zeeee
Kocce
ce
~ .It
KO
et
5 t I It 1 t

115n
IH5I

-CH!

26t1C

~CH~~

n

PAGE

".".~~. II~C ""UE 2·

Ct
~H~S

l6tlC h I41R~

-l41

2U4C NA~e
lU'O eel"
26HO

26He
J6teC
2u~e

26ICC
2611C
26120
26He
261H
261~C

l6HO

~~~.

......

26110 leCE I
26!PC
26J~C leeEl
loPec

26! 10 leee.
2bele
2ftP!C lLCH
26'OC
26@!C nco
Zbeee
2bele ICCE!

C$
S,"
eSA

t

12

TF~

F~CN.

ST~

F~C'

H~

F~n.

)5

4~

Cil!4
CQl!4

e CH I
CCH2
cc 5CC

eceec

cecce

eccec

Iceee
Icee I
ICCC2
Iceu
leC26
ICC 31
lee5e
ICCH
letl4

Ie

C2!5~

-HU
Jeee 2

F"C.
f~CN'

8T~

F.e.

TF.
8T.

lee~e

FMCt.l.)~

II

C2124

JC014

.BLKl

leC~B

FMC.

C2H~

-~222

.C(CEl
,ell,
,c[cn
.eLKl
.e(OH
.eLKI
.C(tEl2

Ie IlC
Ie 122
10134
Ie IU
I ell e
IC IlC
IC 182
IC 1~4
IC2C6
1C218
!C21O

16
11
It
17
16

C2320
C2324

JCeu
-HU
JClZ2

e2H~

-~222

I?

C2324

JCI4t

16
11
16
11
16
11

C2H~

-H~e

1C/42
10254
!C2e6
IOle

It
11
16
11

1C2~e

16

IOC2
le1l4
"H6
Ie BB
10]50
lele2
lelH
Ie 3Rt
10398

11
16
1l

15

ffll(~.15

F.C .+]5

26~~C

8T.

F~tN

ILCE1~

]I

f.,.

IF~

26~5C

3.
H

cee-4

TF~

16~CO

2bHC

12
4i

ST"

lbHC lceE Ii

leCE I_

-9!te
-HH
eftl!
e H21

JJ5H
3

ST.
TH

FMC"'·35

26~!C

-H3C

IHi~

)

.eL'l
.CCDe I
.eLKI
.C[CEI
.eLKI
.[[0f4
.HK2
.C[CE6

35

F.e.
FM[N+]5

2b~4C

.It

ce

IF~

26!90 ICCf9

••

12
efue
5

IH94
IHe4
I HC!
IHII
uee2
ueC2
IHI4
ue26
UCle
IftC2

OORC Iceee
seee.ou • LI ••• GE FeR BLCC • •
2.4

-.

11

IH~4

u, .. x

8T.
TF.
ST.

n,! ec

IHII
U5U

, .. \6

P~"

B•• ecH6.JL.~.

SM
AOec.
SI
CLEAR
eORG 16ce2
14
U·U.fCl
]A
IlOA.le2
TR.
Tee

IHH
13565

FJIIICf\

IF.·

FjIICN.J5

,IUl)

8T~

F~C~

IF.

FjII[".J5

RH

F.CN

.C(DE 14
.eul
.CetU5

u
u

11
16
11
Ie

C2124
e2Ui
C2324
C23H
C2324

-H~e

JeOle
-\lil
Jee5e

C2H~

-~222

C2H~

e2 !20

JC IlC

Cll'~

-~246

C2no

JCIU

C215~

-H~P

e2l20

JC218

" 'if
lb2C-'''' . "e.,,(~ I
26~IC

lCCE I! IF.

RT_
2biec
lbC;QO lCCESI IF"
eT.
l7ece
27C1e l[:!Ssae TF.
8T.
17C 2e
27t ]C lClle TH
ST_
ne.e
27~!C leT I
8T.
~
21Cee
HC70 le T. T TF.
neee
ST.
27C~O

l(J

,op

211ec
8
27110 lCCAll lro
27120
eT.
211 !C FCT IP es.

FJIII.c~.

35

.U.I2

f.C_

.C(~U

FJIICN* J~

.ell'

F"[~
F",(~.)'5

FfII(,",

F"CN·15
FjIIC,,"

1

.!UC!

R•• S
Fp.tCN.)5

,llltZ

F'C~

.FFTRI

F.C.

PHSE 2

.e(CESS
.ellC 1
.cess.!
.cCl2e
.fCTIP

EOJP
F.CN' 31

FC.T._. 11-(

v, ~s /C •

"0"
IC422

,ltll)
.CCCALL

1 ,l V

le4J1
IC4n
ICH3
IC44.
ICOtO

HI4C
2715C

en
CS-

••• 5
1.5l

,.·16

21lfC
2117C
21lec

til

LV

.l'!6

.1

.SUlf

,135

.1

,suep

.t
,Acceo
.136

,IC

211~C

2llCC
Z12IQ
21220
2123C
2124C
21250
212e0
212lC
Hlee fClII
2l2QO
2l!(C

21110
2l!20
2lBC
ZH~C

1H'0
21UO
nllO
21380
2H.0

•• ) f

LV
FeTlI
AOCCo
RUO
LV

"·32

,$I

87

RTNA.e
FC TIC

TO.

SU8'S~

,I

87

Fe I IG
Fl5 ..
S~FC ,
Sl, N4 CCIl

TD~

aT.
csa

TO

."
TO~

OSA

Tf

SM
Tf~

TF
Tf

.1

.FUC
RS •• -I
PUll

.1

, •• 16

.suel

IU'~

,11

ICtC2
Icn4
ICUC

IC630
leU5
1(61'
10UI
ICUO
ICU6

.FlCRFl
, •• It

•• BLANK.llI~~

SI'
SIF
AOTOP
'DTE"-,
IDTE"

.ICCOt

,le

.IC

,~

:UClIlt

,6

4h

IU"
10611
IC6I6
ICtIl
IClee
10112
IOll4
ICl"

C2 ]2'
C1l5~

-~I~e

C2120
ell'S
e2l2'

-H~e

JC2H
Je2~e

e2!~~

·s I~e
JOl4
JC43!
ceccc

e2124

11

C55~'

ecccc

Ie

e2]5~

-~222

II

e2n.
eeece
IIHe
)

JC3tl
ceeee
cccce
-H4e
JC41C
2

I

JC4H
2

41
4Q
16
11

C2]5~

(2l24
-q5fl
-Hn

17

("~.
-~Iel
-2H~

lC.t;!i

10416
10411
le4.(
1(5C1
I(! 14
IC',.
lelll
IC"O
IC5U
ICIH
ICUZ

-Q222
Je242

4!

le06e
8E
CM
80tE
AM
IF
CM
'otE
TF

14

"'GE
C1l5~

14

46
14

H

,.
11

14
U
U
~,

"

4'

"

11

C-l3t
CI2CC

U5n
IC514
nlel
1(6CZ
e . . z,
""Z

C-13~

Cl2CC
eCC-t
CUZ,
(-136
(l2e(
e2nt

",n
ItlU
e""
lelU
C4n~

CCcel

ICU'

(ceCJ
C4zce Jeuc
J
Z
c~.n

-UH
-lltc

21

"

n

(4'"
CCceJ

C4'4~
."~Cl

cn.e

JCn6
J

]

-6ne

-'426
-.~u

UU,

I.

(t.el
e •• u
U"4

-ecc.

Zt

en"

(un

26

12

at un]

CCCJC

us ..

1~2C-I~4J

274(0
27410
2742C Fe TIC
21"~C

A"
8)
8T.
CSA

.ehll(~

I
Fe IIC I
R.NS
t .5L

H~~

Ie. 2

PAGE

PHS( 1

Ft_"A. II-t

ICHB
ItHC
10)U
10184

ole

01

• ·'16

II
H
Il

2752C
215JC

~'"
OSA

II
RV
LV
LV

,ACee>

.I

Sl

,IJZ

,c

,Aeec.

,.

.It

Fe I It

101QC
leee2
IC! 14
IC826
ICIH
I CI5C
ICU2
ICIa

,q

, SC

, .t16

R~.S

I, Sl

R.NS

Icnl
ICIB
ICIB4
Icqeo

,"16

t, !A

21~C;(l

216CO

8Nf

FC 112
.F'SIIII
U"_.ETIC STAle'E.' Fl.CIJC • •• • UN llH
IO~
,C
SUCS>
IF
,L.
5'
10. SS 1
,I
8'. PLY.
• '·16
CSA ""',Vv,F I 'IE

C9!!1

C6~1~

12
14
46
I)

C~!!)

ecc-I
C-I JZ
ellce
JCBJe
2

H.
IF
A"
eT.
CSA

ntlo

2Ule

If
A"
If.
8T"
es.

21t~C

H)ee
HUC
27J2C

2771C

10-

211"

"20
Felll
SS2
su~cc ,
suetC,

Pl.'.
Tf,SL8tCIIo,L'I

BCcBCO

8'"
eSA

nHa

nnc

H.

211IC

81.
CSA

271~C

neco
21110
2112C
Hele Fe II!
2l!'C
2)Be

BNF
81

IF

1O.
BT.
eSA

TO.

278fC
nne
2HIC

sr.
CSA

,II
,HCC'
t1'
• '.16

IC~S4

IICC6
IICI4
IIC 26
IIC l8
11 C5C
IICH

,IC
olC

IICH
IIC 11
IICH
IIC Ie

ole

IIC~C

,It

BNF,etC",Slace.

II1C2
11114
III JO

SSi.

IlIlt
11115
1I14C
11142

,J!
oll
. ' f16

"/I!)

01

.UI

H~

I

VEPSlc' 2

FCP"". II-C

p~,

CF, SL8CC.,8L'N'

SS.
,1101
PLTX
,.'16
IF,SLAce',Heec.

111](
11115
IIIIC
11182
I11H
11'le

-+20
FCll J
S'
SS2
PUTX
81.TCF1C,S.

SS2
SRFC I
Sl, N, co 12

1121C
11215
11220
~ 1222
11234
11 •• 1
11254
112H
11282

,SARCS'
, Sl8CC'

,I
,·'16

11282
112Bl
112q2
112H
111C6
11122

01
• .*16

27!~O

BT.

pun

2HCC

OSA

BT,,",FRf.C.".C012

11322
11321
1112!
11344

,·'16

Hue

HTIF

nue

2H50 feTl!
21HO feTlK
21910
nuo HUt
2H90 Hilt
28eco
2BUO

28C20
21C30
21C4C FCTI2
11"0

IF"

SR
FC I 18
RV
fe, ..
FellC
SR
FCTlD
SR

TOM

551

81.

PUP

OSA

'",l~,S'

C"

8E
A~

B1
80
TF~

B1

80
81
8U
OSA

flll
ClUR
safCI
Sl, N40C II

ole.

,8

,5

,Ie

,'IG.' "PEN

,R~

,2

,10

,I
,I
•• '16

,Ie

11349
11154
Ill"
11168
IIJet
Ilnl
114(0
11412
11424
11432
114 ••
II·'!
'11412
11412
IIH)
11412
IU"

,FTS~

11 ...

,··16

IUP4
IIUC

4511

CCCCC
Cq5!l
eecci

e~~Be

JC~IC

1
-Hll
-q5!1
-~551

"
49

C1421
IIC 14

16
26
II
11

C742~

4)

cceCI
C2Hl

112~4

ceCJI
CU15
CCCl5
JICH
1

116C!
l'J6C~

enee
-H15
J3~C!l!
-~5!)

2t

11
16
11

1161C
Ilt Ie

CH25
cCelt
eceJI
J IllC
3

C742~

C6Sec

•

-qt,.~

Jlt 1C
JltC~

15

11

eetCI

CH2'

11520

C6~ec

-9.11
JltC!
-~.2t

16
I)

C1421
CHee
~

16

,

J Ille
1

.

eJICI
J 12ie
3

-941 ~

J16C5
J]ec~

44

11Hl

49

1\ lCt
e2317

U
15

C'4I2!

11

CHee
!

136CC
136C15

ceoci
JI2!2

•

!

-«I4!;

-"1'1
-nl1
15

C142~

11

C410t

Il

-21SS
-1l6C
enee

11:!44

21He
21930

C4~6~

I HCC
C23))
n024

pOCE
1115'
1I11C

,8

-2112
115C4

Sf 2

• '*16

Pt.1.

JC~CC

( '5'~.t

2

15
2t
15
11

I C~B2

,A~CC'

551
PUll(

1~2C-IHJ
211~C

,I
,Ft IS.

SS~

•

-~5t)

le~H

10.
80
81

114J2
e55~2

-2H~

11

I C~IC
leGl5
21t 10
2H20
2TtlC
2H4C
21t'C
21ttO

(2H~

-qH1

I C~ 18
le~42

CC-CC

e~H1

2t

44

IC~lC

C6~25

CH1C

16

IC~Ct

IC ~54
I eGlC

JtH4
1

•

-2H~

2e

1 C~CC
ICH5
2154C
21550
115tO
2)5)0
215!C FC II_

H

ecc-I

-q56)

IOJ!4
2744C fClIGI IF
IF.
274te
IF
21410
S"
214PC
t"
21490
8E
215eo fClU ,1.
215IC
CSA

C55~2

~

IClI~
27it~O

CqH)
ICHC

14
46

11

••
••
43
U

\6
U

11

-6921
-414t
-J1H
C2111
l14(c
e9591
leU2
11412
(2312
1144 •
(2312
01414'
cnlc

CCCCI
J Ill2
2

•

J13H
3

•

C-le4
CI2ce
ecc-,
C95H

ceO-l
ecc-I
ceoci
J1412

•

]

~'411

·9'"

-2312

4)

••

11

~3e . .

Clue
CUCt

5
-2ns

C49H

Jl5ZC

•

2

Uze-I'H 'e~lftA I
Z8UQ

~ERSIO

eM
IIiE
fO'

SR
. . )2

,IC4

,I

SA~GS_

.LI

211ea
2111e

",

FCfl~

01

,II

,IC

'"10

All

lI.He.

IT.

Zit 70 .

nCia
Ue"c

, 11

"
511 ,

~uto

GSA

line.

sU

114CCU
, ICCC~
N4CCil
,tC
N4CC II
,A
PLU
,,. ,~4CCU,UCC II

,

....

'''Sf l

PC .... ~ II-e

1

,"G~'

'''EN

"'94

tiC
,IC

11.,4
116]9

21 If 0
11170
llite

,He 44

fO •. $51
,I
P~U
, •• 16
I"
CSA A',N4CCIl,FnR

lUte
212CO
21UC Feru
'11210
2U!t

fO'

n

Fefl~

f'.

SSl

n.

cu

lD,
BD
fO'
fF
SM
Br.

llHO
21250
21UO
2111C
'IIIC
lRI~C

DSA

,nce

SUGh
p~n

,II

,II
. '.16

,IC

)1614
~ \67\
11th
IHIe
IIUI
Illte
11711
1I1J4

TF,N4eOIl,sucn

551

11714
Inn
117U
IIHe
1175R
11I7C
11712
IIH4
II8Ce
11121

,I
,!UGh
,I
,.CtCto

Fert~

551
N4CDII
N4CC II

,e

,It

, •• 16

P~U

A', N4CC 11 ,CNEl

28110
2RHO
281]e

fF
AM

283"e
28.!!C

Br~

P~TX

DSA

BNR ,h400 1l.~400 II

fF.

IHU
IUU
IUH

,e

55.
N4CCl2
N4ce 12

11822
IIUl
IIIl2
lUH
11I4e
lu,e
I U1C
IUU

,.

,1101
,L~

,I)

oIC

,."6

15
17

17

181~0

I
R'~5

,IC
,Ie

1.551.

CCCC I
JI614
!

,•

JUU
1l6CC
ICU2
CHZ!

ce,'C

CCCCCCCJI
JlH4

,

-11"

Il
17

J36C!
ClU4
11412
CU'4
C37!!
Cll!!
ceuc

16
16
II
11

-HI7
-]15!
Jlel4
CU27
cnee
CIlt(
CUfe

15
41
15

at

U:CC I
136CC
CCCti
ceu,
ccc-e
JII22

•

,

eJICI
cun
CeCJ3
JUU
1

•

Hell

-nee
II

Ie

II
11

11922

-HC.
-l7eC
-ju!
QU4
enee

-.4"

II@~e
II~

• ,

! J

11896

,5
01
•• '1&

RV

(CCJI

,un

ec C~C
cce-A
JI6J4

-,leC

15
4.
Ie

"U~I

AM
'AM
BT'
CSA

C-IC4
CUCC
CceeJ

-~.Il

11186
2AltO ",TIL
28na
2818t

17

PlGE
-)H'
CHU
II '26 U
IU1C
.Iun H
H~,e
15, IJetC
11562 4t ICHI
'lI51e 16 CUi!
11512 ' 26 cnec
II cnte
d I6,C6 Il 07"
11611 Il CHIC
IlfH

1152'

-3"!
[".7
U5t1
C5592

II~JI

etc-,
ecc-I
JI~H

•

2

" ,II

Ifze-I"3

284CC
28410
284.C
2A43C
2B4.4C ECJP
2B_!C
2AUe,
18410 H.JJ
28.,t
285CO
28!lO
2A'2C

2ABO
28540
l8'j!C

2A560 fCJG
2851C
285ft
2B'~C

IN~

·.)6

AM
TO
eM
8E
AM
TF
A.
fH
81
TF
fF'
rD

NEn

2".0

21,110

ILI~

,. IGH

P~ASE

PACE

I
11'l!
II9.l
1 .. 44
1115e
119te

"AE~

",

.It

,I

.IC

,FlGA'

,6

PREB~F

.eLH

EOJC
PREILF
NEH
NeH
NUT
ECJJ
CLLILK
u.G
aUF •• "
IOU
IOPT

,.

~UfJl
PRfB~F

lillO

EOJ_a4
lOR f
IOGr
CLULK
'ltUlF
'RU~F

'RE,~F

LIIG
'RUV
PREllF
EOJC;·24
L"IG

,15
,PAULF

,Ie

,e

,IC
.67

.craL~I

,67
,PL fPC~'1I
,·.23

.IC

,PLfn

.1
,It

,]

.BHI
,67

'REB~F

Ion

,It

,e.'l

,.
,7

,tALILK

,J

,It

,4

,I~

"CCC~

,1

,'~n~F'

,ee

,IC
,II
,IC

,elF •• "

,el

EOJ~G

'RULF

line
11981
I2teC
I2tl2
IlCl'
12e3e
12C.8
IlUC
12ell
IlC84
Ilt96
12 lee
UIII
I2l2e
I2I'C
12152
1216.
I2lle
12111
luce
12212
12224
122U
122.1
12260
12212
12214
U296
InCl
IIJ2G
UHZ
1214.

.1(

NEH

,}4
,SII"
, •• 2'1.

IQPT
,'Ull
~OJE"D-I2'lIl' "
£OJ£'o- II ,PI ' "
U1t IORr,·.n
;a" ' lon.IU .. ,}
PILau
81
CSC, I,ll

80

21150

,8

5R
tiC"
FCf II
FC1I8
tNO CF JC8 RCL "~E
5M
Aceo
,5
eM
BAL
,C

II-C

~~E

•""
lift'

2812'0"
1113'0

fUIAA~

B1

2Uet
8
AM
2Bele
2,620
T"
eM
2BHC
28640
e~E
,,~
2865C
286ee
B
AM
nne.
·lIUC. lCJltC AM
A.
21nC
2nCO
A"
fF
2nl0
JII
flUO
" eM
ilnc
.11£
1I1'.e
-e ..
28 no £I:JIo
2neo
11£
Ai!
ZInc
.TF
2'no
28lse
281C'O'

znlC,

VERstCh 1

ICA I

eM

......

2B"~e

.C~I

~

~!

,IC'

IZ!J6

,IG "
,6

lun

UJle

In.,

~'f'
U:,'L. LISTllta
c,u' ~""D SfIlU IF 'LL STII.'

(,U

...,

IH04
U4'16
12411
1244C
. . 412
12464
nHI

unci

·'eu

BU'"

I2Hl

nile

,. ,lit "

I, ,

114".

21190,U"A

,~.:

1

DSC

, I

1.1

UUl

U2

UU.

14
41
4~

12
I.
H
11
25
H
4e
II

at

II

Ie

••

26
16
l5
Ie
.t
II

-He7
-2112
Ull2
Iu~e

C-le4
02ce

114CC
ce92'
ClH'

I2CIe
CI.U
CI'"
enl!
11 lie
cell ]
CUC4
C84C.
CI.t.·

ecce'
eCe-t
e lice
ecc-I
eflU
-IU]
CIlce
ectP5
enl]
eCO-4
-ccce

I2CI2
IH4C
egeee
cnee
e(56'
ccn2
teJU
cnn
C9etC

C5521
CCCCl
cnn
J21l'

-'''(
ceo-]

-e.CI
CCOC?
CIlC(
(nn JU.l
ec,ee Jl577
uS'c ecce)
CIlIl eeC-4
21 cnll C6U'
11 cnn .CCC-'
26 et. . e CUll
II callJ eccel
I ' cnu -nce
clIee
14· Utee · ceen
.6 llite cllec
II CIll) ceo..
26 cnlL n4l6
Ie CCSI! J2."
' ccuz -euc
12494' e22ze
·U .J24'~ Clin
,16- ecst! J2.U
4. COI16., J2.n
49 I.n~
2
16
H
4Y
16
.9
II
11

usn

.. I""
..••

n.n
I

II

162C-14" '(hllca I

VERS ICh 2

fU,Uh 11-(

28~CC

12414

28UO

1Z481

5,11)51
CC
JH51
l,CCI
CC
-01
28~2C
CC
6,IHec'
J41CO'
EOJSlh
,PLS 15~
2H1C
BO
ADCO~
,I
,It
28~4e EtJEh[ AM
,unc~
fF
2U5C
LENG I"
,GaUGE
IR
FCIS~
2H60
, L[CC~
IF
SCNI
2A~IC
oI[
,5
Loce.
28ue
'M
,H
60
28~~C
e'2C
81
29CtO
·.zc
,Ie
,I
SM
Loce.
29C IC
IFM 221c,~81n, ,
'ESHR! CChl.CL RECCRC 5W
29C20
29C10
IF' PGNU. ,ICC, 71 I
~)
IFM IDA I
29(40
,1
,SfClt
IOPI
8
29C5e
10
29ceo
.*21.J'"
eM
.''',4,81C
29CTC
ARNOI
BE
29C80
29CQO
80
ARhCI,E'5~1
CF
451
291CO
10
2911C
SV~CAl,J"
CF
AOCO~-4
29120 L~I
CF
SC~ T-4
29110
,r;!lZ
K
291.0
IF. IORTt·'l]
2915C
IOPI,ACCH-4,1
B
291eo
IF. JOR', .+21
29110
ICPI,USOCAI-.,1
8
291!C
IF> IORT,.'Zl
2919C
IOPI,SChl2-.,1
B
292CO
IFM IOAt,.'Zl
29210
IOPI,LC"OI-',J
8
2922C
IF> IOAI,·.Zl
2921C
IOPT,ENO'l-.,1
B
2924C
SF
AoCO~-'
29250
SF
Sth 1-.
29UO
.+12
29270
8V
2928C
14
.C~ll ,,·S.I"~
81
292~0
MOhCl~
29)(C 'RhOI TO" svseAl,2
81
lHI
291lC
29320 ACC_, OSA AOCC_-4

,

29!30

CC
'2'
29HC lSCCRI OSA

..

124"
1Z4~4

43

125e6
unl
l25Je
12!42
12554

II
26

12~ee

"C~

'lH

12518
12586
12598
I2t1C
12tH

11614

12646
12t58
12tH
11t12
12694
121Ce
12718
1211C
12742
12154
12166
12118
12190
IHC2
12!14
12e26
12118
12150
12U2
12eT4
12U6
12n8
12He
IH22

]I

26
11
41

u5~e

I<
Ie

C2U2
CUlt
C2222
CC5e!

16

16
49
25
U

4e
41
]]

25
)]

!1
1.

..
Ie
49
16
Ie
49
16

49
16

49
!2

32
4e
14

12~1e

49
15

12H2

~~

2q3~C

cr

) .18'

J8 '
eSA

SC".,

162e-I'~1

2911C
ec
'2'
2918e LC.AO I eSA
29HC
294ce

E~CMI

CC
J8'
CSA

,,~

~[~IICP

I

VE.SIC" 2

HAllAh 11-(

:J

~

!

12U~

J11l1
1

12~e9

~

l2~n

-96H
1

],22'

12912
12Hl

OC
J8'
2942C ECJSI~ 10
29410
CM
294.0
8NE
29450
IF.
81
294fC
29410 ECleNY IF.
TA
29480
2949C EC~eIE AM
BNF
29!CC
TO.
29! IC
1F
29520
CF
29510
29540
TO'
TF
29550
CF
295fO
29510
BO
TO.
29!80
29590
DC

"9
fOIC.V
TS_
EOPE IE
TSI!
INP~Hle

FCTHO
eOAoe
FCTEhD
INPl1+1
INP~I

FCIE~O

INPlh9
INP~1+5

COPOM
INPUT'IO

12~90

1

,lie

l1e(2

,I

,Ie

,Ie

,It

11e26
11e18
11C_6

25
14
41
It
49
16

I1UI

]I

11e1C
11CI2
11n_
IllC6
Ilill
IH10
UIU

II

11t1~

,.

,.

,It

,II

,FeIHC

.11

,FCTEhC

,II

1115-

,e!"

131ft
UITI

29fee eCJAII ~NPI INPUI
2gel0
IINPI INPl1+5
,It
,Ie
SM
FCIE~O
29e20
FCTHD
,IUSE
29610
e
aNl EOPEIE
296~0
EOJHO
81
29150
,IC
FClUO
,U
296e0 HiROD SM
EOJRIIIU
IT
29610
INPUTH
29UO CtPC~ TD
.~""hl
~NCC INP~I
29no
B1
EOJAI hH
291CO
eens ~SfO'
29110 USfCCR ClC IT,
CCAES ~SEO'
IIUT (C'''CIi'
29120 lCOMAC Olt 18,
NEil tC,'u'
29110 tS~
OS
I
OS
I
2.9140 JSW
6.9'999'
29150 NINER' Ct
un9'
29160
CSt 50,e
OOC t OOOC Ce Dooeooo OOOt C000 C01100000 00 Ccoeooooaa OOOCO
29UO
OSC 18,0
eoce OOOCOCOCCCCOCO
29110 SII., ose I,e
0

--

15
26
11

15
26
11

H
15

Uln

1.' ,-

UUC
lUtZ
lUl_
IU26
nUl
UUO
UUI

18
18

U
24
4t
49

12

11(11
nCIl
l]e4f
13311
11C1e
11111
C91ee
CH\!
1125!
CHIe
tuel
e9e9e
(HI!
euel
e91el
11211
cnee
I

CCCJC
11_51
eeC-5
ClllC
ecece
tnlC
ecocc
("coco

uJle

(Ccee
UUC
eecce
ence
ce2ce
eeOJe
C2lU
euoc

1,.51
eeUe

une
nne

49

lUll

25
II

e91U

lun
lUll

4.

13214
11" •

\334'

C22~4

t-C-2
( l2ee
eec-I

C9e9E
(91el
(UI!
en\!
UCle
U5Ct
(2UI

Ulle

Ua.c

8e

! •

12~e.

,5
,FCTHC

.

J1U~

,PLSISh
,I

,HIYH

•

1

12~1!

3,18e+21

•

! •

'2~85

29410

I.'::"HI

cece2

J3H~

12911
IH8C

e'

J2~'9

J28CI
J2951
J2825
Jlge5
J2849
J29n
J2.11
J2981
tecec
eeccc
(14CC

PACE

PtUE 2

ENO'E S

t~6e1

cectc
CBel
CCCCC
(CCCC
((952
J2111

C9U~

eccce
CC5e5
C0512
((!Ie,
tC532
eC5e!
eC512
eeH5
CC51i
Cc!e!
eCH2
ee921
e.en
12HC
eoeec
eClH
CC4!!
1211!
-H21
1

leC.AO
3.1

UUl
Utel
12'](
In1t
CC451
CC4H
CUB

IH51
12~t1

cec-I
A!1!~

-CICJ2645
J1"0
C21tT
e-0-4
el2CC

CC~H

12~51

12~t1

t22H
tte-I
Ct925
IU2f
C22U
CCC-5
CteH

u ..t
CUH
C224'
(22"
C9U1
[Ue2
IH!e

H

12~56

3.22 •

uSFoe.

2QH:O seNI2

19

PtCE

PHSE 2

\I •

CCCJ'

2

U!IC

lUlL
UU1
1311.

n.

U4U

1'1

nU6

45',

.'

162e-I44)

29nc

S~Tne

2gece
24fl0
2'1!2e,

C~I

~CM TC~

I

vUSlc~

Z

f(U"~

I

II-r

P~UE

z

"'

etll Ie
Ctll, l~
cc
I,'

1!!21
1]5))

2'1HQ
2'1stO

cc

Sfcn

SEen

13~tC

I,'

1156e
IHtI

osc I,e
e
S ,e
CC
-OCCC
ce
1,\
-01
CSA ~UCfR

2'1~IC

2'1920
2'1.3C
29.4C

cc

Uleu esc
CO
2'1HC
CSA
2'1~',C

2'1910

ec

,

CC

lOC1C S.Res"
lOC4C S~Atr •
lOC!C e(:.o.
lottO 8~R

CS
CS

lOOC

Ct
-I
Ct

CC

-.

30cee fUR

135'C

10lCC
10llC
10120
10130'
lOl4C
)0 I!e
loue
lOIlC
lOUC

E~D~f

• .,H

I,'
2,(

11~17

CAllU

I l,e 1

I,'

I He!
11514

......

-22 If
I

J]!e!
I

1158!
115ge
IB'Il
Il!.e

I,'

Il!.e
Il!Q'l

It''5

IHe!
IltlC
"tl2

2,1

Iltl4

! I
-eu!
I

IHt~

,,;.. ...

2,4

IHI6

;

.[~I

le,R I

VEAS In

F(ATRA~

11-[

P~UE

s OAC l'l,E~O CF ce.PlL'TlO'
EtiC OF CC~PILAT rn'
CORG I6ce2
34
8l0U,'CI
TO
SEC TC-I,LG"~~
38
ILK'" ,1(2
TRA
TCC

! •

13!!7!
1l!15
IBJ6

162t-I441
lonc

I

I'Ht1

os
~5

e~E2

Jl,e;

I 1~t2

2''1~tC UlUO CSC
I, e
C
S,C
2'1HO CLlIl. cc
-oeec
1,1
loeee
CC
-01
OSA BliFl
loe Ie

10t20

I.

11' 52
I H51
1]554

co

(SA

2

PAGE
Iltl9
IHe2
ItCC2
ItC 14
IH26
ItClI
ItC!C
\tCC2

XVYX

CORC 14I(e
TERTI AlY lINUGE !leu
Ct
2,t

19 •
H
25
!I

le
49

CHH
1155]
n2H
cccee
ectCC

CC7C I
C2323
tC1C2
(e5CC
ecccc

141CC
UICI

-6
]O,,~O

""eces TH

lO2ce
30210 X~P.CAe
10220
lone ILIC I,
1024C
]0250 ILU2e
,10zeO
l027C SCAI'

F.C~+l5

8T~

F.CN

8"

R"~S

TF~

F.CN+l5

,Slaces
,scup

F.C~

,!ln
.SlIC U

F"CN'15

,!IU

F~CN

,!lIU!

1,51

.. "

142C2
142C1
142C8
142Z4

••• '6

14224
14229
1421C
142U

.. ,.

1424t
14251
14252
14264
l421t
14292

,

102!C
10290

8T.

:l03eo

!I'
liSA

ONS
1,5.

TO"
SM

au

SUPS.
I
efNS
1,51

,

lOHe
)0370

8T~'

SAFtT

eSA

5., s.

,'+16

30ltO

TO
AM
8Nf,
TO"
80

UFUG
I
COUl
'PSIo

lollC

lalla
lonc,
10140
]0150

)ono
,oue

]0410
10420 (taU
lO43Q

141(2
Ull4
ul2e
141le
1415C
141H
14174
14116
14202

,elK5

~

8T.
IF.
8T"
CSA

OSA

81'

T'

311UO

17.,

10450

TF

II

I
't
I.
I

1l~2'

,·.1

''If le ' GRPJGE CS
29140
,6,-eeC2
ce
-etc eM
2'1e~O
IQ,I1CI2J4StU.UH561
cc
J7CIHH6'M412l45H
Z'IttO
CG'
'2'1elO SECTC CSC 2,e
29ftC'

"GE
IH51
I Htr
I 1~26

A"NS
I,SY

•• ]2

'l
COA.II
l

,I
,I

,flCR'l
,I

,5.

,I
,F10UI
,fP2

,-

.It

14292
14297
14291
14114

,IC

,U

UG

14314
lUI9
1412C
IOU
I43H
14116
14361
141le
14392
144CO

Ie

"

C2". -~2"
C2324 J41tZ
t5!H J42(2
ceccr ecctt
CZH9 -U4Z
(2124 J41!C
cn,. -nu
(2124 J41H
5 I
2

11

-Q5t1
-2!77
C"92

11

17
48
It
17
16

17

15
12
17

I

J4224
2

I

J4246
2

-95t1
-Z1I4
e5592

-95tl
-23!4
C9t11 CCct I
nUl ttC-1
C5UZ J4292
5 I
2
-9561

-2311
11

,

C42CC

I

J4314
2

-un
2'
11
44

15
43

u

49
26

-2371
C4'"

[9561

141U
(9619
144C(
C69l1
1"431
C69l1

cun
CCC-l
C2311
CCC[J
C4'"
(12"

eU52

12

162e-I44)

8"'
SF

CDAe.

e,~

CANDS

)0490

CSA

)O~CO

30~tO

)0410
)O~80

eCAh

)O"C
JD520

wUHn 2

FC"U~

Il-t

01 CI

0"'. S'f

I44H
14452

CF

O~

14H2
14Hl
144,.

~

O~

,l

14~IO

,H

1449~

010

IHet
IHII
1451C
14542
14"4
145ft
14578
14!9C
141e2
14t 14
14t22
14t l4
1464t
14t 58
14tH
14tH

14412

9S

04
COSA@1
COSAe.
COSU1'12
CN.P
eosae.
eOSA82-12
04

,HS_

.F !w
"t12
,F P s.

01(1
,t

'.32
OP.
COSA82
OP.
SSI
"4eCC5
"4CCC5

pun

ole
, Ie

,22

,21
,I
,Aeec.

,35

,It

,.t16

IFflI,""'CCC5.C4

COSA@8
'.32
"'COO5
.t2C
N4ceC5
OP.
SS2
GT~S

14tet
14tH
14t91
14198
14701
14118
1413C
14738
14750
14762
14174
14HO

,FFAS.

ole
• S."F

,It

011
,I
"t16

ItS'

I
ST
(OARl

,IH

8T~

PL:TX

• ·.lb

eSA

Op.,_4ceC5,(4

B"F

coa8'
SKIPS>

BY.
OSA

RfijI,,"S

I, S T

,.

,I

S.
c.
Bf

TO~

14~24

1

oIC

,IC I
,C

,·.ib
"~7

162e-1441 HhllCP I

~EAHn

2

FCIT".

II-~

H
32
11

COl4A
SS2

,II

PUll

, ·.16

sx

fPCl
O.

)0~5C

CO~AB5

80
TF
80
TF
10~tO
10~10
87
10~80 CCSa!X BNF
)OHO
B"F
lIeoo
5
lIClO
CF
lICZO
TO"
HOC
B7
lIe40 CeSABl A
lIC50
BO
S.
lIC~O
IF
lIClO
TF
lICBO
TO~
lIC90
TF~
II ICO
87
II 110
TF
HIlO. FPCl
31110
TF~
11140
81
11150 f;CU~ TO~
TO
II 160
eT~
llllO
OSA
lIUO

N4CC05
COSAB4
COSABl
COlASl
04
04
SS4

'·20
04
COSae5
I
GI
Tte.
GTSBS.
GN.P-I
GYfS-24
N4CDC5
OPX
COSU)
RSW
RFUG
PUlX

,Ie

.ICI
, S'
,I

,F.UD
,It
,I
,PXFlAG

,It
,1\

,Ie
,11

,'.16

TF~,flC'C,04

...
43
11

44
44
14
46

\6
H

16

"

2e
\I
17

11210
)1220

nao co."

1\140

BT~

DSA

8T~

11

au
DSA

~

49
41
26
H

It
\6
U
17

uno

TO"
TO
8NF

t~~ec

5

14848
14853
14858
148tO
14872
14884

. -,,.t'!
15

151ee
CHe!

11

C!5~2

~~

14~14

\6
H

J"'Blte

•

1

CBn
CCCCC
J49CC
2

•

IUOO
UJOI
IU,.

15129

uno

llJU

litH

!4

-9!t!
11214
0742~

11

e2117
cnlt

4)
26
41
26
4'

-4411
-1l2!
-2]11
15182
C6ge5
141(t
(lI25
1475C

.
44
22
H

15
4.
21
41
12
26
26
15
It
4'
26

"

4.
U
25

11

15(~C

"09C
e69t5
CUt'
C1427
I51C2
Cn65
147Ct
C95e7
C6611
cnll

(n14

eceJI
eccce
J4~54

•

1

C~4C2

eH2t
C9397
eH51
e9391
e6915
e2371
eecce
eccci
e2171
C93n
(CC-I
(95t7
(n15
(eCCJ
J5422

C5HI
C"94
(H25 e4151
C. . II ((OJe
14162
(.4Cl (CDCJ
04.49 (4959
J5254
une
]
5 J
-'4e~

11

-415e
-'''5
C5.,2 J52U
5 I
2

-9567
-9551

15212
UUI

45~

ecc-I
C-Ill
CI2ce

-Htl

14~C~

,

,"SW

12~7!

PAGE

lUll

coalXT

C49n
C4 It I

-172~

15212

,1.1

.

-Hll

I4~CC

,'.12

,U,LaG

ccon
CCCCI
(6925
CtOl5
J46!1
1

CCOJI
etcci
J479C
! •
2

11

GN.P
CDUXT
RPHS
I,FAt

,I

IHI4
1473.
C172!
I475C
CH2!
04411
e142!
e5e21

1~811

,'.'6

FUGh

e~)q7

-eeec
ellec
eCt.2

-'CJe!

14848

R'HS
I,FAC

FSW

eecec
(6973
eecce
eCC99
e91H
(9679
e9191
J45H
ege79

-~5n

11

1l
41

UU2
15422

J5JCC

II

nU2

J5J24
2

,•

-un

IUH

JlHO
31260

ent5
eete!
eCCH
ent5
14"4
I5t22
145ft
(5912
"e22
14622
ent!
14622
CUI7
14614
CHIl
(1424
C172!
Cll2!
C69BC

14
4t

U2H
15116

.."

ccecc
J4452
2

•

-94C9
-H2!

15254
152"
31\90
112(0

eH~7

-2n~

-95el
C95t7
C9Ul
1521.

14954
14959
14964
14UI
14.11
14990
15CC2
15( 14
I5C22
I5CH
15t46
I5C58
I5t7C
15082
I5C9C
1"(2
151\4
15126
15131
15150
15162
15\14
15182
1519.
152e6
15214
15226
152U
15254

,[4

,I
,[4
,I
,eUBXl

e87H
5

14He
14195
14196
14808
14820

14926
149)8
14H4

,CAllS.
,BUN.
,IC I
,TC FAC

,5 •
.It1
,I

cun

PHSE 2

OPX,NltCCCS,SJ

)0930
10940

144H

-nt~

H
23
12
2t

149ce
149(5
87
loeeo
)0890 eeSAee TH
CF
10HO
8T~
10HC
CSA
10920

IJ

'AGE

PUSE 2

, •• 16

]OltO
BI
JOT 10 CeSAB5 80
IF
30720
87
10110
]0740
IF
10750 eeSA84 IH
)OHO CC SAB] TO"
8T~
lonc
eSA
1018C

30e·4C
10850
308tO
JOele

I

14412

SF
)ono
IF
)0540 eCHel BO
)O! 5e
8NF
)OHO
e"~
1057C
8'~
305!C ceSAel 8"F
30590
8"F
)OtCO
C"
JOUO
8"l
IF~
lOt 20
87
)OtlO
IF.
10140
30t50 e(SU2 10~
IF
30ttO
a.
10tlC
8T~
10UO
10t90
CSA

10HC
10!CO
loe 10
J0820
lO!]O

~ChIH'

j,

n

44

-'''1
nne

(CCCJ

(49"
eso"
U4U tun

U2C-I443 ~C~If" I
11210
80
H29C
81
H leo
BT~
SM
11 110
lIll0
SF
11 llC [C.81T 10M
1114C
87
1I ]50 CIFI~ TO
lIltC
'M
11! 70
TOM
1I !eO
SM
H !90
TF
114CO
87
CORC
llHC
1I420 _LU_
H
31410
18
JlHC
TAl
114"

......

ICC

··2C

,CAL l

..t.

CDABXT
CNAP
CUSE
GeASE
SKIPSEXIT
GBlIE
GBISE
G8'S!
GUSE
GUSE
GTJh
uce2
8lK6.,7CI
8l' 6', 7C 2

VEAS

IC~

H 'IR'~ 11-[

15366
I53H
15l8t
15]98
15.IC
.,.22
15.34
15.42
15.5.
IHH
15478
15.9C
155(2
ueel
ItCC2
16C 14
He26
16tH
ItCC2

S~

t12
,Ie

,

"

,e

,6
,I e
.t
.IC

,.HlAC
,]

,I
.4
• T(O_

,~

_Ul'

CORe 1<1 CC
IERTI UV lINK'GE ueCK
ce
2.7
-7
lI49C YL8ees IFM FMC~' H
.IlK5
81M FMC.
1I5CC
.SUCCS
,elK6
1151C n8CI! TFM FMCN.]5
81M FMCN
11520
.Sl80e
N.eCC4
,I
Jl510 YL8C11 IF
COl2P
1I54C
8
1I550 v~e l2e IFM HeN+]5
• eLK'
BIM F.CN
,SLUH
1I560
1I570
cu I'LI 1.ITI'lIll.G I~STRLCIIC. FeA tr ((elM
IHOICIES e. ce L1S1
1I5eC
AM
,I
Jl5~C ce lIP
H4cec~
.LC
BO
1I teO
eOlze
oIC I
BIM
GINS
,·.16
HetO
CSA N4eCC4
II 62C
lI460

lI47C

HUt

.....'.

CSA

12

1lo4C ee IIC
11650
lI6ec
HefC
ltt ee
JlHO
11 He CFlMS

A.
e

oeAfF
DCAEF
COIlE
EAAT.OFlMS
·.1'2

HIIC CC IlE
HI2C
31 no
H14e

IF

ATM
BV
B7
CAC

"[PliCAL

ZOo

.3
.9
17
12
l2
15
•9
25
II
15
12
26
49

nue
1,.22
"912
CU57
CQe5P
C9tel
Cle ••
Cge5P
Cge57
CU"
CQt57
C9HP
CHee

14

C93lt
CUlt
CCCCC
CCCCC

CO ICI
CC7C2
CC50C
CCCCC

-92H
J41C2
-931 !
J4126
C9567
CCCCC

17

C2359
C2324
C2l!9
C232.
CH2C
141H
C2n9
e2 )24

II
43
11

Cll2C
14244
C562.

Je
16
H

oe

.11
.GeASE

141C2
14114
141H
14118
1415C
141tl
14174
14186
.~C

CH59
CCC-]
CCCC I
ccc-.
CtU7

16

17
16
17

26
H

u

-93U
J41H

PI'C!
141~8

I""
14222
14<38

•. Ie

1.141
142H
14256
14268
14l8e
14292

H

1" 3C4

49

IH52
14364
141H
14Je8
144CC

eco-I
C~H7

J423e
I

•

-112C
! •
II
24
47
11

-9616
09U
(!9H
143'"
"cee
1.3C4
COSt

CCC~ I
C9651
C lIec
J4111
e 14CC

2C

14311

118lE FlH'
.HAEF
,21
• T2
.L

J53U
CCC-I
CCCCC
ceecc

141 CC

nc IABlE Flll'

DC~Al

26
II

CgeC7
C9ee7
C19H
eH2e
"e22

eHH
CeCMI
e961e
cec-I
J4416

AM

OC~Al

l~C

IF
,M
BIM

DCoEF
H4cce4
C I~S

II lEe

CSA

H4CCC4

1441t

5 •

1I 77C

CSA

St

14~ 16
14<021

-112e
5 •

Jl 18C

IF

H 19C
BetC
He 10
H820
31 AlC

AM
TF
A.
CSA

HceC4
J4Cce.
H(ce.
N4Cec.
G lOS
N4ceeo

!I e.e

CSA

SR

318~C

TOM

II e6C
HelO
Heee

TO~

551
552
SKIPS_
SOFCI
Sl

H

t,a !I

, •• 16

If:2C-1443 HOllO

BI~

.It
.6
.IC

I

yEASIC' Z

f (R I

~,.,.

II -r

02
t ••

II
17

PAGE

14421
1.'22
14414

oIC
.6
ole

.51

ze

H.H 2

,((REF
.~

14/,4tf

1.458
14t ,.U "~~!ER

CHe CfflhfA

£~PRT

nHe

JF_
TF~

U55e

e

1 t'

"'"
'."UH 'TolO
SM

.

UHO
]]650
13160 JOOVR

nno'"

CCCCC
COCCC
c"e5
CC512
C2222

142JC
14281

4'

I'IC~

nez,

14192
CCOCC
enn
ccccc

I

1.1"

1.162
1.114
H~74

I.'

cccn
CCCel
C2222
C2221
Cl22C
CC"I
ce9U
J42!l
J421l
CCC-l

14"6
149"
14~"

H~"

PAGE
! •

14211

J48CI

1428.

]

14285
!

I

~

J42~~

1'2~2

I
14

141C8
I~f

>f'C'hG

T8lEhO,fCTE~C ..

,

OU"AA.SHY~a.5e

I.,.,

1.314

..

IQAI,"21"

IOPT,fAf,-4.'

IIOVR'6

,fA""

COU~TI.OI,ICII

TF

TBlE'O,I"
OUUUthTlUND,ll

OUrARl

TF
CF

faUNO.4 " '
OUUuo.,fBUNC,lI
'OUlAA'"

J,,_

'R

F'F6,C~U".l,

AM

"OVR,.,U,IC,
TIUNo,lC,lC,
fIIlE~o, IUSE
fOPR' .. t
J01Il,.'n"

SM

l]e,o ci;Ii'4A C
J't'CC
. BNl
TF'

nuo
• ,ton,,.,,... ,
una
I'" ·OFtOI,.tl.l".
])'.0.
. IJ
EOJE~o-l2
nno IIII'\tH SM ·:Ul'fIlD.U.IC,
.nuo,
. 117 '·I;oli...
"HrC!"UNe ~~tcc'·'CCCCC ...
c:qUIII' 5~

IhllUlIlE IH

PrJ~TER

ULEhO,',IC
COU~TI,tl.IC

2.0'

Resn TH CCLH
'PI"T , ... lIH .Cf s"eeLS
tEST

C~A1\

\l
IhHUlU FeR lCAt.I~G PRINT .AU
A' OIlCE ,... tc"",
SHU'HT'hij'HA IS. HU

'''E

'(YI'e PA,U eUffU 'AU
'CDIFT '~f ,cu.
AtJij$T

'~E

PeIUE'

t' AAU "
US-.... NT UST liNE

tllo

UST

e.. u

14l1C
14122

FCJOD-4

CF

'~nlO

m.e

e]Jl~

CUCC

CJ4CC
.ClUC
C2221

25
!4
14
16
..
II

,1.BeDIC .• et2 ,·8\C~'C .. ,CtA CF PP Ih I e~T eFle

.BTl' oncl"'ll, ..

)JelO
)JUC

nuo

[CCU
C~C'2t

CI2CC
Cl'U
CCUI

141C.

47
41
H
4'
15
15
25
25

14i1~

:~f :~:~~tm~~~'l1

HUO

nelo

,

CClCl
CClC2
CC5CC
CCCCC

14ICt
141\8
141!0
\4142
141'C
14162
14.14
14116
14UI
1421C
14222
14214
1424e
14i58

142~1

,

SF
IF
TR
AI'

:::;~

neec

CCCC I
J4H6

C9374
C9314
ceccc
ceccc

2

liCK 'HIREtl

·PRIH C(Ae ~,p CF. ~"HS Ih eLtCKS
peLON! IF" IORt ••• 21 ..
eOI~G I~
B
IOGT,OSKI'o,1
10' . FAH',CCCCC.,
CC
1,' •.•• ,.

H4~C

nno
H!ee
15".c

J

.0

Hue pelOK

n!CC
1!!lC

eCC-'I' '
011h

-.Ul
-J"7lC
-9121
cnee
c!tee
14812
e31l!
CHI5
C!ttc
14212
1415e
CHH
'.UI
12482
C2tK'
U

IJl34C-C2J4~CC

H420

-H2e
-He5
CHI!
C312e
CH24
C6UC

14104
nST PRIUER n . . 12 eRUCK IhCIAECT
'fS~ C~A~ 12

llHC tS'nc

H41t t ISKCC COA·

Ii
2f
15
11

141tC

NC~V

~nl

J4612
J
> J

PAlh, 8LCCU

-T~eh

81&"0'''4,1
81C"C' U', I
IIC",po"9,""V",PlIiE hU"U

\t20-IUl
HHC.PA~£

ueC2
uce2
16C14
16C26
UC1I
IHe2

IS! I

Co'G UICC
PRI~T fiRST PAnE ~UC
OC
5.12]41
J2145
HNI OHCI·I,14CC.6.
aO
OlliE .PG"~'-2 ..
BO
ThO 'PGh~'-1

•••

HliC

I41U
14741
14146
14141
.. leC
14712
14114
141U
141CI
14820
.. Ill
14844
1415e
14UP
1481C
14UI
141'1
14895

,IC

.ecn.

,.-,

nl~o

, 1\

,.4CCC]
,I
,"16

coue
IE
uno ile~U;,1 80 .,,24
IF
ncec
oQ'I/o"
UCle un' lo~ 5_1 'S.
neee
80
C014'
nnc
8
~lU~
nlcc
COA~
nllc tcn~p C$.
'1120 Cc-U CAe n.

·.HC40

niCC

14U4

IIII~,UCCC4,.CII(C

,nee

nuc

.. ee2

,IC

,I

N4CCU
1i14teC4
SU
PUT.

cuec
-~U5

14e12
14en
]~UC

.

PAGE

14U6'
I
Source Exif Data: 
File Type                       : PDF
File Type Extension             : pdf
MIME Type                       : application/pdf
PDF Version                     : 1.3
Linearized                      : No
XMP Toolkit                     : Adobe XMP Core 4.2.1-c043 52.372728, 2009/01/18-15:56:37
Create Date                     : 2014:03:12 13:34:25-08:00
Modify Date                     : 2014:03:12 14:27:52-08:00
Metadata Date                   : 2014:03:12 14:27:52-08:00
Producer                        : Adobe Acrobat 9.55 Paper Capture Plug-in
Format                          : application/pdf
Document ID                     : uuid:a3333034-3edb-4746-b9c2-52b04de29d40
Instance ID                     : uuid:ffa1a234-9391-0c45-ae38-2dd5cd962fda
Page Layout                     : SinglePage
Page Mode                       : UseOutlines
Page Count                      : 674
EXIF Metadata provided by EXIF.tools

Navigation menu