DEC 12 AJAA LA_FOCAL 12_Listing_Jan71 LA FOCAL Listing Jan71
DEC-12-AJAA-LA_FOCAL-12_Listing_Jan71 DEC-12-AJAA-LA_FOCAL-12_Listing_Jan71
User Manual: DEC-12-AJAA-LA_FOCAL-12_Listing_Jan71
Open the PDF directly: View PDF
.
Page Count: 110
| Download | |
| Open PDF In Browser | View PDF |
IDENTIFICATION
PRODUCT CODE:
DEC-12-AJAA-LA
PRODUCT NAME:
FOCAL-12 LISTING
DATE CREATED:
JANUARY 11, 1971
MAINTAINER:
SOFTWARE SERVICES
COPY'RIGHT@ 1971
DIGITAL EQUIPMENT
CORPORATION
•
IrOCL12. :51
1
23';216
IrOCL12.31
2
3
.4
5
6
lea~vRjG4T
1910j DIGITAL
r~O~E
rtXMqI
rSU3a2id0~
X""~
nX~QJ
rOIV.30~0
9
rtX'4IiI FGETIIi'000
n X"'R I rPlITII600e
,09)0
13
,·'{'J00
14
441'117
6101
n NT.JMS I 7
.'~Ol
·1
l'
16
17
18
19
":'21
'Ha;5
1:'~2
:Oi'~3
'~0~
26:'~3
21
22
.... 1?'4
')0~4
?2'~5
'-~lJ
23
??~6
"1221
221
24
'30'?l
. 2'26
"t1~Q'
;{'I0(1!
27
28
29
!ll?U
':3~B
38
:51
32
33
""h
"'11'210
1'I~13
~4
p'~15
36%'1
3117
35
36
37
38
39
40
644EIN
PI;;:~5
"'1~6
p1.37
'4I.S~
ENDT.
BU;SEG
CrRSl( I
;1. Ti!ER
ErUN!l; . EF'VN3
ICO\ST";T
IC'O'JSTA\ T
IA5:II rCR i!r.'RO
ISI'ACE T(ST '
IPEqIOC T[ST
IC,~. TES!
1= .. 4
F'r.l~
4';'WORO
IPAREN TEST
IPAREfli TEST
IF! I GHT ,~ flSI<
100'JSTA\ T5
IN.GSW TEST CONSTANT erOR POPe')
IOATA AQDRESS
IGENERAL cHA~AeTER INPUT ROUTINE.
I~ULTIPI_Y 'LAC BY 2
1F'1.0ATI~r, OUTPUT
IF'LOAT!:\G If\JPUT
ICO~~ANn BUrrER START
IADDRESs or ~UMMY llNE~
IrJRST LOCATION USED IN eK~
1ST ART or STnRAGr AREA ••
IrUNCTJON RrTURN
IPOINTER TO ~ERO DATA
I"INPUT' USES CHAR AND GETe OR READe TO DEVELOP
14 NuMBER WHICH IS THEN STORED VIA ~Tl~
IO~
WOROSl!!l
I~Ew
4540
-"21
1413
5541
1'65
1'42
"477
4543
,534
4544
. 554
4545
2274
4546
4'41
1312
B5.
26~
,,242'
62~~
156
159
'-53
16 4
f'J.l "'USA ~ ,.3:'1
C26~'.
~~24'~.
PAGE 1,,2
I"?" '
3140
25,'2
H~
I~C:J
Cl132
1'1133
1~7
Hi
162
177
17
'.11
-2
0131
141i:!
141
142
1·3
144
231Z6
IST£P 1'I00SI(
45!H
121
4551
PUS~J~JMS
i.
IRECURSIVE SUBROUTINE CALL
XPIISH,J
POPA~TAO I PDLXR/RESTORE AC
POPJ,J~P I .
ISUBROUTINE RETURN
XPOPJ
PUSHA'JMS i .
ISAVE Ae
XPUSHA
PUSHr'j~s r t
ISAVE GROUP or DATA
P02
POPF'~,J~S
I.
P03
I~ESTO~E
GROUP
GETc-JMS I ,
IUNPACK A CIolARACTER
PACKC·JMS i ,
PAC8Ur'
IPAC~
UTi~~
SORTJ'J~S t.
SORTS
SORTe·JuS i .
XS!')RTC
PRl~TC.JMS
out
?'I65
45"52
2157
t4
INstR~eTIONSI
RE40C·J~S
ROI'V.
I.
I.
CHIN
A CHARlCTER
ISORT 4\0
BR~NCH
ON AC OR CHAR
ISO~T C~4R
{PRINT 40 OR CHAR
IREAJ DATA
I~TO C~AR ~NO P~INT
IT
..
IF'OCL12 • 37 •
166
16 7
'4'553
lOS
£4Z~
4554
PRNTLNaJM$ I.
xPRtl:T
GETLNaJ'4S i·.
169
3-;2
XGrTLN
170
.;555
2244
111
1.72
173
174
4556
2360
4557
,413
115
176
177
178
179
180
1131
162
456t1
1535
4561
1546
4562
2037
4563
le 3
'144
1~4
4564
185
186
18 7
188
189
190
191
192
L7~r.
4'65
2064
4566
4566
4566
~166
2726
193
19 4
19'
196
197
198
199
21:'21
201
202
2z,3
2£14
2:)5
2"16
2~7
206
2(.'19
2121
~167
0167
d'0~
3601
""ell
1137
3"22
7~""1
",~0
0~!I'2
""",3
""e4
~'''''
3"13
215
l)I't5
1132
":(1~
3'~27
,II!?1 7
4552
220
-167
5U9S2,
~2121
j225
('1211
4551
i"!212
1132
l'!O?i3
1'1214
3?-1'-'
.0
3~62
,5'7
G(Lt~ENO)
ITERM' NUMBER, rUNCTyONI LETTEA. AND IGNORt
SPAC[S~
Ll~E
IREMOVE OLD TEXT
IEXCESS SOMETHING E~ROR
IMISCEL.LANEouS ERROR
IF'ORMAT e:RRO~
o
L.ESUR2; o
SUBS~
~
LEPUT
o
I.·I.· ....····....
I··I.·.···
..··....
I.·...·
I •••• •• ••
I •••• •• ••
I •••• •• ••
PWAtT, WAiT
PCLtAR; CLEAR
IBECOMEs (Re:COVR.l) ••
BEGIN
IPROGRAM START F'ROM SELF'
SKI' CLA
JMP 1 ,;'2
ICONSOLE START. 9101*200.
TAD CF'RSX
DCi PC
3~26
012",7
I •
I ,
ISKIP Ir C(AC) •
£RROR4,JIoIS 1 ,
[RR2
IUSEO BY 81(
,rOCALIS COMMAND/INPUT CRJVER
31~(I!
2,11
212
213
214
XO£L£TE
E~RORhJMS
ERROR3'J~S
U:SU9S;
1226
218
21 9
PS I N ~
'i000
7610
5576
IROTATE U"T SIx
'PERIOD, OTHER. NUMBER
"'173
"'1;7
IINSERT LINE PorNTERS
i •
)(TESTN
TSTLpRaJMS I ,
L.PRTST
TSTGRP'JMS I •
GRpTST
TESTcl!lj"'S i •
XTrSTC
OELETEI!IJMS I f
LErpuT~
"'176
rOR A GIVE~ LINE
TEST~j·JMS
6163
7657
"1;5;672
IS£ARC~
IIGNORE SPACES AND LEAOING lEQOS
Q1172
~1;4
IUNPACK AND rORM A L!NENUMBE~
i •
xSpNOR
~00"
i'90e
",i7e1
'PRINT cCLINtNO)
spr~O~· J'~ S
Cil1h
0I~Ql6
216
217
rINDLNaJMS I f
xF'iNO
['IOL",aj"lS t •
)(ENOLN
RTL.6aJMS I •
XRTL6
•
PAGt 1• •
23106
leu.
tAC
DCA OMPSW
DCA OEBGSWTAD COMeOT
DCA POLXR
TAD CShR
PR!NTC
TAO COM8UF'
DCA up.
DCA XCTIN
tAO COM9ur
DCA PACKST
QEAOC
SORTJ
I(PC) ,,> 0
IrOR COMMAND MODE
IUSe: ONE IN T~[ AC TO
IINtT UNPACK AND TRACE S~tTCN,
IENA~LE TRACE rOR INPUT or (1),
IPROTECT COMMAND BtlrF'ER.
INO PATC~ TEsT.
IANNOUNCE PRESENCE
IBY TYPI~G T~E LEAO.IN CHARACTER
IIN[TIALIlE CO~MAND BurrfR
IrOR
UNPACKI~IG.
IRU9~UT
PROTECTION
IREAn COMMAND STRING
•
221
222
2('3
n4
225
226
227
226
229
~'-~!.
-474
,"! ~ 2
.~ ~? 3 4546
'2?4
~217
.' ~ 7~ .
252
~22n
,'2 ?7
"!J
4'46
2~0
~2~l
4546
1132
231
2.32
233
23 4
235
236
:>:<32
_~'l11
:>~~3
3,,'20
4'45
"!35
:'?'36
;'I!3 7
237
;-(,4"
238
239
24"
241
242
243
:":?41
:":?42
244
245
246
247
248
249
250
251
252
253
25 4
255
2~6
257
256
259
26"
261
262
263
26 4
265
266
;'t:
,"'! ~ 4
n 43
,,,44
:'245
li''''6
:><'47
:'250
Dci POLlIR
4554
1124
1;)65
764€'
4566
1~6"
TAD BurR
5362
5211
N26
:"251
n52
3"10
1'1253
3~62
n5 4
~255
DCA XCTIt-./
TAD LJNE~O
3 4 1£'
DCA I
SPNOR
45621
P257
,410
P~621
4545
~261
4546
"262
??63
1'264
n65
1366
1116
n66
4565
;'12;'"
4556
5171
:,?67
~~h
",?;z
SRETN,
5260
?275
n;6
5177
269
:->2;7
:'1'!!f'I
2721
"1~1
3a22
ln2
' . . . 01
5232
AXI~
SKP
GErC
I'ACKC
TAO CIUR
T~5 MCR
Si!A CLl
164~
454\J
AXJ~
DCA
j067
267
273
TAb COM8Ur
DCA AXOUT
[lCA xCT
CErC
TAn BOTTO"1
GONE.
SPr40R
TESTN
JMP GlLRR
J"11' INPUTX
IS~ D£SG$1oi
GETL"!
TAr) P4000
TAn NAGSIo/
Si!A CLA
(RROR3
:"'-74
27·
275
C:A:I(C
Jt-4o tGNOR
252
ISAvr
STRI~G
C~ARACTE~
•
IACI("OWI.r.OCE CHARACHQ
CO~EOUT.12
lENa or ~OMMAND 8urrrR,LESS
ICO~~AN~/t~PUT PROCESSOR
IRETNI PACKC
ISTA~T To PACK C.R~
PACKC
IrINIS~ C~R.
4560
4561
n;3
271
272
CSTA~,
COMBOT;
3['113
.,611
1.422
;45t'1
2~8
P;l.l ST-L IST7
1~35
1"56
PAGE 1.4
I.I5T7 .. 1
",'173
•
•
23"'~
DELETE
tN6LN
JMI' START
tNPUTX;
PUS~J
TAO I PC
"Te:XTP"
LINt
IREA~
CHARACTER.
IINtT
CLJRRE~!T
rI~ST
Pus~;OnW~eLIST
IIGN~R( LEADING BLANKS
IDnE~ THE
BEGIN ~rTH 1.97
IPERIOO -ILLEGAL GROUP ~ERO USAGE
LINE
INO
IVES,OISABLE TRACE rOR ~EPACI(ING
IRE4n THIS LINE NUMBER
ITEST rOR SINGLE LINE~
IILLEGAL LINE
IStT POINTERS
PROC
S~A
Jr-II' START
DCA PC
TAO PC
IAe
JMP GONE
,'2
I
ItlN
I
Lp~EI.!O
.".1
e.R.
J
ON INPUT
ISAVE LINE #
I(Xe"'1EM)
IIGNORE SPACES ArTER LINE NUMBER
IREMnVE OLO LINE. Ir ANY.
IINSr::RT ~;EW LINE
IPOt~T£RS ~usT BE REJNJTIA~I~EO
IPROC[SS IMMEDIATE COMMANO.
ICHECK NEXT LINE (X-MEM)
IENO or PROGRAM?
IVES
ISAVE NEw LINE NO.
1ST ART NEW LiNE
IPROCESS
!TEXT LINE BUrrER FORMAT.
1*1 I pnINTER OR !ERO I~ LAST
1''3 .;.
~UMBER
IREAD 1ST ArTER LINENO T£R~INATOR,
ISAVr TtxT A~D RESTORE DATA rI£LO
ITEST rOR [N~ or INPUT STRING
.-5
JMP
11~ITIALlit
IS£TIIP
TtXT
OT~ER
COMMANDS
•
,F'OCI.12.
276
27"
27S
219
2q0
261
282
:t,.
'h2
r;IAI..U
'''i'':'I
456:?
:,::6
165"-
SN4 CL,A
:'~ .~7
5322
JMP TESTA
28 4
t'! 11
4771
297
.':t 12
:'313
:'314
~ '.114 7
76<12'
4566
sii CLA
.'317
1~47
tAo 'I.AC*;S
:"32et
4557
.·~~l
7flet4
;'I:t22
3~67
:,.,23
<1561
:J~?4
4545
r"325
4561
"326
5340
5352
~33Q1
112154
3~11l
p331
321
302
flJ32
\.1333
11~6
1 ~54
3;,4
"334
?335
3~67
J'!I5
3<16
~3:56
4'45
l"337
~JAl
309
"':542
1:2'54
31"
1"~43
311
ia67
"'344
:313
314
315
:'1346
r.~50
3067
4545
4561
5340
;410
~:!I51
4566
~352
7l~"
316
31 7
J18
319
320
321
322
J?3
324
325
326
32 7
328
329
330
~345
01347
nS3
~354
~~1.55
G£RR~
;n~
:'357
;1Hi'1
,"361
1067
-106
;46("
"'62
4566
764'~
RTl6
RAl
DCi 1..1NENO
TESTN
.
GETC
TEgTN
JMI=' GERR
JMP GEl( IT
tAo SORTCN
RTL eLL
TAO SORTCN
RAl
TAO 1..1NtNO
DCA 1..1NENO
GErC
tESTN
ERROR4
JM~ GEXrT
TAD SQRTCN
TAO I..INENO
CC4 1..1NENQ
CErc
TESTN
JMP GERR
SKI'
GEl( IT,
1067
'1','14
'640
:>:556
"363
TESTA.
H!67
3~8
312
£RROR2
70'14
4561
4566
5352
P3411
ERROR2
Cl..l
TAO 1.1 NENO
1.1 N£NO
AN; P177,
TAD
SNl SlA
GlER~,
ER~OR2
~i!A
ICALI.. 'CETC' PROM 'INPUT'
I(OECONV - IN rI..OA1,)
IGRQUP ToO I..ARCE7
Vl~
'OECON'
IGROUP NUMBER TOO LARGE
/Ttsn
IREAD STEP NuMeER,
!TEST4, anlER
IDOURLE PERIODS
10TIof~R
INUMElER
IREAD SECOND STEP NUMBER,
!TtsT4, cTIo4ER
IDOUBLE PERIODS
IOTIo4ER
INUM8ER
ITEST 'OR CORRECT TERMINATOR
ICHECK sin
I,
ITOO LARGE A LINE NUMBER,
ICLEAR LINK elT
ITEST rCR GROUP NUMBER,
IREPAA'[ "NAGS W"
10.)( ~
ERRORIIL.I.ECAI.. I.INE
~U~9EQ.
CL,A
TAD P20U"
CMl
;'366
7l0.4
RAl
t'l'67
3065
DCA NAGSw
,..,
IOEVEI..OP I~D •• "GETLN"
IIGNnRE lEADING sPACES,
. I"ALL" IS A SPECIAl. ARGU~E~T,
Cl.l
1373
,~,,":
•
1~
CMl
7~2~
(,)4
PACE
AND P7600
sH
~J65
'"
2310~
TAl) rL.Ac*2
~315
:'~16
~J?7
3:.'!7
DCA INSUB
JMS I I..CCN
TAD F'L,AC*3
~NI) P7140
.:372
10 4 6
298
299
J~3
TAD CHAI;
TAD I'1P-lIJSA
l.~66
1112
~036
29 4
295
296
)(GETLN; ;)
SP\lOR
~:P3
n;'4
.'~i'5
~'H~
292
293
11:JAN-11
I~I~r NUMB£~ rO~~ATION
2~3
285
266
281
288
289
290
291
V'~3
•
331
332
333
334
335
336
337
338
339
340
341
342
343
344
34'
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
~~;~
'5102
. '3 71
('13;2
~6"'"
774r.
;',~'3
LCC'J,
F774",
2~'N"
r:' 2"'~(',
IQ A\J:;E ~r
ACCEPT 1alE: LhE Nut'StRS , i. k'1 TO :51,99
ILINr=42!2'~
IALL.00~1
.374
2i'.16
Vl374
~n;5
!'I~;6
20112
1156
;602
1145
"'3;7
fil4C111'
r14011
1341
o4~2
('I4~3
5e'iII(!
462r
(.14(114
0I4r.15
5~4~
5234
014"6
5177
740£1
('1407
~4i"
2725
~411
2125
2125
OIi112
1'1413
"'l!I0~
~414
71'-"6
;006
;@06
5613
1'1415
01416
1)14i1
~420
"'421
4'54
1922
45042
015043
0I4~2
3~65
371
f'l430
312
373
31 4
375
316
7110
01431
!lI04~2
5263
4555
1'1433
7~!:t0
C'i4~4
lP.l23
r435
3t"11
""
c1436
1~4J7
('144(1
3~'"
1 0411
4563
4566
~441
4 '4,1
331
!"A 4 2
I
3e 3
'-"43
9'444
il544
, ;;165
~445
385
1422
~446
74591
H4
77'~
nR:'lUP.H0~
1"1421
3~2
I XGETlN
201?':"
I\4GSW I
366
367
368
369
370
316
379
JMI'
.DECOONV
171423
U24
(~fil17
"'425
04543
"365
~4'-6
6':~6
ILIST or rUNCTtoN ADORESS£S~ (NAMES .~E IN "'~TABL")
rt..;TASF' ••
XABS
lABS
.. ABSOLUTE VALUE
XSCN
ISGN
.. $ Ic', PA~T
XINT
IITR
"'ZNTEGER f:JART
I ••••••••
xoisp lOIS
-XRAI\I
IRA"l
''RAN~OM W"4BE~
lCAnC
·/ADC
.IUA" ANALOG TO DIGITAL CONVERTER
A~TN
IATN
"~EXP~NENTIAL 'UNCTioNS
F'E lCP
IEXP
r~OG
ILOG
"'
F'SfN
ISIN
"TAIG
F'UNCTIONS
FenS
ICOS
XS~RT
ISQT
.SQUARE ROOT
PF'Ntw, ERROR' INEw
·US£R D£F'J"'!ED "UNCTIO'llS
PF'x,
ERROR' IF'x
..
pn,
lCRTL6,
EIH~OR5
o
CLL RfL
RTl
1F'1.
I.· ......
I ••••••••
IROTATE AC LEn SIX ..
"RTt.,6"
~Tl
JMP. I XRTL6
IREcuRSIVE OPERATE, EXECUTE, OR CALL
DO,
G£TLN
IEXECUTE ONE ~I~E, A CROUP,OR ALL
TAO PC
ISAvE' ADORESS
PUSH A
lor CURRENT I..%NE
PUSHF'
ISAvr REST OF' T~lS LINt
TEXTP
IADQRESSO' TE~T POINTERS
OGRP,
PUSIoIF'
ISAVE NAGSWJ CHAR. AND LINENO.
NAGSW
T46 NAGSW
ICHECK DATA rROM CETL"'!,
SPi CLA
ISKIP lr GROUP OR ALL
JMP DOONE
100 ,NE lINE
rl!\jDLN
IINIT rOR GROUP AND SET TH1SLN
NOP
DGRP1,
TAD THISLN
Dci XRT
TAO I lCRT
TSTGRP
ERQOR2
PUS~J
popr
TAD l·pe
SNA
~TEST.
rOR GOoD GROUP
IrX.M[M)
INO SUCH GROUP NUMBER
OBJECT LI~£ 4NO SET PC.
IEXE~UTE
PROCESS';'2
IRESTORE
NAGSw
~UM8ER.
IC~rCK
T~E
rCR
CATA
E~O
or
TtXT (X.M£~)
IF'OCL12.~7 •
o1A1..1~
!'11447
:-4'Si1
5271
'7 ;,~~ 1
JMP DCONT
3~7
388
.'4'51
3130
~89
~"52
DCA PTl
TA6 NAGS'"
S"14 SH CLA
3e6
!
lAC
·'65
390"'453
391
"4'54
7741
<;260
Jf1P ,.4
392
~455
1430
393
;\451)
'456~
394
'~457
~46~
~461
5271
TAD I PTl
TSTGRP
JMP OCONT
1'1462
5225
4555
395
396
:'97
398
399
4e§)
!J!463
11'464
!'!4~5
3F.6?
1i'466
4(12
4'113
1'1467
1'14;2\
1'1471
r2l65
V472
'.'017
1'1473
04;4
1413
4544
408
01475
409
1'14;6
04;7'
~!e00
til 5010
""; ~1
3£171
41"
416
417
418
41 9
42121
421
422
423
424
425
426
427
428
429
433
431
432
4~3
43 4
435
436
4310
",5 et 4
H'71
3413
~503
t115"'5
0I5C1i6
5617
01511
1013
£ll512
3013
12113
o?0~!21
£llS 1. 4
7141
(liStS
1331
7630
"'51.6
£11517
('152:21
!7!5:?1
P5t'2
"'523
[11524
£11'525
111526
"'5~7
PROCESS
NAGSW
POpF'
TEXTI'
POPA
DCA PC
JMP I ,.1·
IPUS~OOWN
XPUSIoIA; ~
LIST
PRoe
cMi
JMS PCHI<
PCHI(.
4566
571Yl
•
LINE~O
POiNTER TO
ICIoIe:C-K rnR GI542
1,31~
JMS PCIoIK
;>~43
1117
TAD
DCA
TAD
DCA
446
447
448
449
4521
451
452
453
4!\4
455
456
457
458
459
460
461
462
463
46 4
465
466
46 7
468
469
4711J
471
472
413
4,4
4,5
476
47 7
41,S
479
4RIIJ
481
482
483
48 4
495
486
487
488
;;;~5
., 5..$ (l
;>':;44
;'545
!A546
3413
If"t X RE TURi~
Icn~~UTE
01551
:'1552
1'1553
4310
5134
JMS PCHI(
JM~ I P02
"'554
:a555
"'556
1'15'7
()!560
TAl) MF'LT
P03 •
e
r562
'1'563
14 13
3~'1
Dci T2
01564
3411
Dci I XRT
2~71
01567
!:i754
OJ57ra
274~
~""
PS;2
:'217
r22'
PI'S 71
r:95;3
~5;4
015;'
f~212
1~?,5
1137
2725
t'l516
1'1517
P!6t'l0
,"'610
1'16 PI 1
06e12
1472
06~3
11'6~4
(1160'
1'1606
"'6017
016'. (II
1~65
~·614
4554
4555
4566
j 2123
3~22
~~i'
4545
Ifll66
i116
7650
0;541
4550
!1l6i7
J 374
521[11
VJ6t3
~612
01614
"'616
RESTOR[ A FLOATING POINT
VAIr. Aoolr.
N~MBER
lSi! POJ
1'1561
5363
I
IGt T
DCA XRT
TAD MF'L.T
3€111
1111
9l!565 .
IRESETPOINTER
CLA eMA
ho I POJ
1154
2354
111566
~~INTE~
lSi! T2
1117
.'303
72421
~uS~,
MF'LT
T2
I XRT
I POLXR
JMP ,!!O3
491
492
495
3111
l411
lSi! PDZ
TAn Mn. T
~55tz!
~611
49 4
I ,';2
OCA xRT
:? ;111
53 4 5
?~47
489
490
4Q3
T,A~~
•
•
PAGE lea
11':;JAN-11
TAD I POLXR
IMOVE
lSi! T2
JMP .-3
INLIST.,
JMP I P03
qEODVR
IBAR
IGNOR
IEXtT
CO~TAOL
IC~C. I BREA~
IINPUT
IB.A.
I
IL,F'~ P
RESTART
IGNoqE
CHARACTERS
IR~TN
IC.R. ~ TER~INATE STRING
F'LZST2; F'LiMIT I,~STANOARO
r I NF' I N /I-SHORT
ERROR' ICR-OUMB
F'LIST1; 'INCR
I,~STANDARO FORMAT
PROCESS 1'!SET,pLUS •••
PC1
IC.R.!S~T COMMAND~
Mr,
.306
IUSED By TESTC
IPRIMARV CONTROL AND TRANsr£~
GOT~.
GETI.N
IREAD THE LINE NUMBER REQUESTEO
FINOLN
ILOC4T[ rT AND RESET T£XTP
ERROR2
INOT T~ERE
tAfi THISLN
ISETPC
DCA PC
pqoe£SS,GETC
ITEST F'OR END 0' I.INE
PROC.
tAD CHAR
IrIR~T C~ARAtTE~ READY. USE PROC
tA, ~CR
c)NA CLA
~O"J
lEX I T "PROCESS"
so:nc
IIGNOR~ "SPAct",",". AND "J~,
GLISTel
JMP PROCESS
: "POpr"
/F'OCI.12 •.H •
U;'JAN!l71
23106
TAu CHAR
ANr P331
ISAV~
496
l62Z
l.J66
491
498
499
!p21
'71
5;;:2
~~?1
';:'75
~622
4542
PUSPoIA
1"6'3
454~
N:?4
455'~
r,£TC
5~'3
"6£'7
1374
il626
,4U
5223
JMP
1 4 13
POPA
4'47
SO~TJ
5~'5
5~;6
1'1632
5~1
Cl6~3
5{1S
VI~:54
511
1512
!H3
51 4 .
515
516
517
518
51 9
52"
521
522
523
52 4
525
526
521
528
529
530
5:!tl
532
533
534
535
536
53'
.165
4566
4554
(11636
?~26
~637
4555
5267
lOUT PUT COl4fio1AND TEXT
kRlT~,
GETL'"
In OEBGSW
01641
lei61
;64er
!lI645
4553
4545
4551
('1646
1~66
~641
~650
1116
~651
~652
5244
1'1644
"'653
r.654
1~655
"'6'56
1'1651
(),66t'1
~661
764e:
1.23
;450
5211
1"663
('1664
~66"
5273
143et
3~67
;42
,"6;2
5541
1 ('165
~674
775:l
545
546
:~~ 75
~6;~
5271
4551
~4'
'-6;7
5264
!!i53
'(';~2
!.
'0
(lI
4'6~
455~
pn,
TAO NAGS'"'
SMA CLA
TAO J PTl
TSTGRP
JMF' WX
TAD t PTl
oci LIN£NO
JMP IoIRlTE.Z
TAb THlSLN
JI1P wT£ST2
DCA OEBGSW
POPJ
TA" NAGSw
SF'&. SNA el.A
DCA
WALL.
3~26
544
:';;7,,'
::tHl
lAC
3.430
5237
1023
5253
548
549
JMP WhZ
71M!
4'63
:"6;3
TAD LINENO
sU CL'
pRNTLN
GEi'C
PRiNTC
tAo CHAR
tAli MeR
sH CLA
JMP .-'
TAO
1 TIoIISLN
WTUTZ; SNl
1~65
1'1662
~6h
F'l NOI.N
JMP ",TESTG
;~01
~330
11'666
("1667
[.'671:1
543
ERltOR2
~635
1'11)'2
Pl643
CASE ALSO
IGO TO
TER~INATOR
IGO "0
COMMA~D
COMLST-1
COMGO",COML.ST
IILLeGAL COMMAND
IALSO Is CO~TINUE
COMMENTS-PCl
!lJ64~
C~ARACTER
.e.
·773
538
539
540
541
Sl(~
'614
'''9
51"
COMMA~O
IEXE~UTE I.OWf~
SO~TC
:~625
~6~~
~6'H
5:>4
~-~
PAG£
"'x,
JMP wXa2
PRiNTC
JMP WALL
XTESTC; o
ITEST
SFINOR
SORTe
IS£T I.,INENO
IDIsABLE TRACE
IS£A~C~ rOR LINE NUMBER
INOT ~~ERE OR GROUP
IPRI~T
l.iNE NUMBER AND A sp,ct.
IPRtNT TEXT
or
A L.INE,
ISKtP Ir END or LINE
ITEST rOR ENO or TEXT eX.HEM)
I[XITIOO NEXT INOIRECT LINE.
ISAVE POiNTER TO LiNENO or NEXT
I ( X';"1EM)
IT~Y NEXT
LJNENO rOR GAOUP.
ISET LIN£NO
'X~M£M)
IINYT GROUP pRINTOUT
ISl(t P IF' ALI.
IPRt~T C.R~
T~£
AGAIN
NATURE or T~E NEXT ALPHANUMERIC ;
IIGN"RE SPACES
ITEST Twr. VAQIABL£ TERMINATORS
•
IF'OCL12.3.
551
"'713
~IAL1~
1771
:; ".~r:
~52
~';;"4
553
d,15
~~4
~7.1~
555
5:.6
.~h0
557
765~'
;1711
558
:'59
560
561
~h2
~h3
:"h4
5317
5'?I~
"h5
5700
;1'7-"7.
~62
?716
563
56 4
V'717
?;2Vl
565
566
567
"';21
01;22
;:1;23
\i1;,,4
568
~69
570
571
5,2
573
574
575
5,6
577
5,8
'79
5s0
581
562
,e3
5&4
585
586
587
seS
589
590
.
"'725
:;'1;26
J ~\66
;:3;~r
12::'2
4'61
74H
2300
230~
XT3,
57P1k1
,-' QI '" iii
xso~ne;
1721
:!f412
1412
;51G1
534il
,,;27 711141
r!';30
1i1;:51
11366
;64~
~;32
5324
",;33 . 1721
"7~4
"';35
CII?36
~7:'-7
",;4£1
"'741
"'742
1i1143
"';44
1'1745
"'746
",;47
01;5£1
P!;51
et;52
;~43
1012
3354
;4111'1
2321
2321
7300
5721
"'C!J0
"lQ14
;1341
311171
1~67
;.'1 III 4
1071
591
592
111153
59 4
595
596
597
598
599
6Ii'! "
60
1Il760
764~
"';61
5364
4545
5'56
4552
4;47
593
6~'2
6v:3
604
6~'
765~
~;55
2344
5744
C1'756
:·~e~
""57
3036
~754
"'762
C'I;63
111164
"'765
OIh6
!'I;67
V "~J
6776
3402
U:'JAN.71
23106
•
PACe: 1-10
TERf'1Seol
J~I~
IYES .. S'jlnc' IS Se:T
t XTf.5TC
TAO CHAR
I'JO
lSi! XTESTC
TAO MF'
SNA CLA
!TEST F'oq "r"
JMP XT3
TESTN
JMP I XT£5TC
I,
SKP
IOTH~R
JMt:l I )eHSTC
INUM~e:R
lSi! XT(STC
IRETtJRNS I TJ NJ r J A
lSi! XTESTC
JMP I XTE:STC
1'1
ISORT CHAR AGAINST TABl.E • "SORTe"
tAD I XSORTC
DCA XRT2
I15T ARG IS UST~1
tM) I XRT2
SPA
ILlsT IS ENDED BY 4 NEGATIVe: NUMBER
JMP S[XC
12AN'J EXIT. NOT IN LIST
Cl~
TAD CHAR
sli. CI.A
ICOMPARE
JMFI ,_6
TAD [ XSORTC
ICOMPUTE INCREMENT I 2 '" III
CMA
tAD XRT2
DCA SORTCN
SI137
655
6~7
1i'41
1:"42
1:"43
658
1(1'44
6;6
6~9
6{)0
1;)45
..i "46
" SI
" , AIi
:Se3
ICO~MENt8
IGOTO
- VA
IASK
ITypE
IOUTPUT
IERASE
IWRITE
/THIS COf04Hi~o
rr;s,
IS! T1
SKI'
JMP ,_4
IF'1.
GETC
JMP
IF'3
SETh,
FOR,
CO~T~OL
STATE~ENT
PUS..lJ
14;11
,44",
ICOUNT COMMAS
/TRANSF'ER
J"'P I COM GO."
SOIUJ
ISEARC~ TEXT UNTILL ,JC,R.
TLIST-1
lL1STeTLlST
GETC
1241
1335
I ••••••••
II
lSi T1
SPA sNA CLA
1£C4LL; [CAl.l..
IP.A~T,
pAqTEST
456\1
1066
COMMENTE
.. O[MANcE·
.. TAPE
BIF'F't
.. JN~CRIS
I~OOlrY • MOOSF'IE
IQUIT
.. ARqETE
IRETURN .. RETOVR~E
II. tBR.....
.
LrST IS SpEED OPTIMIlEO.
16111
2251
454"
QIJANO
ICOND1TtONiL TRANS'ER PROCESS,
Ir.
tEsTe
IIGNORE SPACES AND T£ST
JMS I IECALL
IT
I Sf PDLlCl'~
IN-OUMP THE (trop)
JMS I 1~ART
Ir.C~tcK rOR PAREN MATCH
TAO M2
IA
Dei T1
/TEST .,e,.
tA6 F'LAC.l
SPA
11.001'
6~4
/IF'
100
322
3U
~23t?1
653
ORGANI~E
311
321
4547
4545
5225
OEC"OING LIST
•
317
305
327
315
5765
644
645
..
IroQ
301
324
2~32
;750
lOR
ISET
3".
307
"315
\'321
1?i2
I,
II
ICO~MANO
323
306
·327
PAG.£ 1. . .
IE~GLIS ... "'F'RE'lCH
CO"lLST ••
··324
322
,-314
I I ~'''UT
PC1
3t
1et67
i07£11
:;~71
1~;2
4'40
4540
1612
111'11
4'43
1107
hl~
,1~17
1124
;'12100
1125
1126
7'4~
1127
5'41
1133
1134
1135
H7!?'
53&:11
75[13
rRO~
"[VAL"
AOORESS •
INCREMt~T,lr
A~Y •.
TE~MI~ATORS
IGET THE LIMITCNO ERROR DETECTION A'TER LIMIT)
F'I.ARG
TEXTP
PROCESS
ITiR1
F'tNT
rG£T I PT1
rAOO 1 'INKP
rpUT I PTl
F'SuB I F'LARGP
rxtT
TAD F'I.AC.1
CI.A
POPJ
ISAVE THE LIMIT.
ISAVE TEXT
or
OBJECT STATEMENTS
10C TM[ OBJECT STATEMENTS
IRES TORE REMAINING TEXT.
IGET L.IMiT
IGET INCREMENT
IGET VARIA8LE ADDRESS
IINCREMENT AND TEST
II.OAO THE VARIABLE
/INCREMENT IT
IC\ojA~Gt IT
nEST IT
5HA SlA
1 33~
4542
4543
£XP~£SSlO~
f'LIST2-i'LIST
IILLEGAL TERMINATOR IN'F'OR.
ISAVE THE INCREMENT.
•
F'LARG
POPA
OCiPT1
1~45
iB2
ITEST
POPF'
643~~
2525
IEVALUATE THE
TEXTP
POPF'
4407
.43"
1133
H~3
113r;'1
il~l
POPF'
4544
1 4 13
1121
1i22
PUSIiJ
,'61~
3{330
h2~
PUSHF'
4542'
H15
VALuE
ISAV~ VA~tABLE
PUSIoIJ
4543
1't16
i117
ERROR.
'I.IMiT; PUSHF'
.1{H7
1114
l~ITIAL
TI.IST-1
2~32
4544
2!!132
4544
H70
1111
U12
1113
IGET
ITEST LAST C~AR
TI.1ST .. 1
F'L 15T1-n.l ST
lEX CESS R.PAR
SORTJ
1315
H~~
11('16
ERQOR4
tAD PT1
PUSHA
PUSHJ
1612
4541
1~1·7
11"3
F'lC i 'I'
SOI:fTJ
4566
103.,
4542
4'43
2032
~VALwl
TO VAqIABLE
Por~T£R
rt'.JT
;2~ll
4566
ISAVE
'rPUT 1 PH
, ~{I~
1~;6
1194
H~5
PH
1'01:1.
'JCA PH
4547
1375
7176
11",2
TA~
3a3~
1~'3
1074
ie,'
E:~~C~4
! ., 3~)
:; "53
1's:;4
•
23106
TAl)
PT1
PIJS~.
F'INI(P,
MEa.
puslofr
JTER1
JMP fCO"T
..2'5
IENO OF' LOOt:!
ISAVE ADDRESS •
INCREMENT AGAIN.
ISAV~
.
IF'OCL12. ~.'
716
717
716
719
12111
721
722
_~
1:.'7
1:41
L'lALl"
V~03
7524
4543
p2,4
F'tNF'iN; PUSHF'
24(~5
11 42
726
'127
728
129
'130
731
732
733
'134
135
1145
ii4.s
i 147
1i50
:.,~ IZ VI ~
200Ql
].342
4155
1152
3342
3044
5536
6160
1153
1154
1155
1160
'40
1161
5536
1161
U41
'142
1163
i 164
1162
1165
it66
1167
1:170
ith
11;2
11;3
11;4
11;5
h;6
it17
~2~0
1~01
'756
757
758
759
'160
161
162
121113
763
764
12v.17
1H0
765
rACO
F'I'1UL
rpUT
'13&
7!i4
X~AN,
F'lCiT
DCA
1157
'155
~0~0
200121
01210"
F'I" T
1~0(lJ
'137
n~3
RANC.
6342
4453
;2021
1,0
'151
'152
IS£T
I
1151
1156
'46
747
748
749
JMP
"~~~
4407
136
'14'
141ii
INCREME~T
To ONE.
...
F'I.TO~E
F'CO~!T
ISAM£ 'RAN • JUST MOVED
1143
11.44
743
144
PAGE
I
724
125
'41
23106
'~CCM.
'~41 , 53('1
7(13
'139
11~JAN.'1
1202
1'~4
"05
:; '06
:;';:·1
H}41
1313
;)420
t:611J3
f'614
1211JQI
1201
;106
22~6
:'6:55
1254
e177
1563
6346
724~
3t356
4547
1367
'2~"
2~56
5223
4541"
14r,'1
DCA
JMP I
CRUDOY; IUNMUI.
ITAKE
XINT,
RANO
CRUDDY
FUNO
RANO
PI.AC
EF'UN31
t~E t~T[G(R PARr
JMS t INTtG[R
COMGO.~
S£TT
'O~
lr
DO
GOTO'
COIolMENT'
ASI(
TYPE
I(R[F'£RENCrO)
OUTPUT
ERASE
I ••••••••
WRf TE
MODIn
STiRT
IR£TU~N
LTAPE
I ••••••••
IINPuT;OUTPUT STATEHENTs
ASK,
CI.A CMA
IREMEMBER WHICH CAll.
TyPE.
Dci ATSw
TASK,
SMTJ
ISPEC1.~ CHAR' •••••
AI.ISh1
ATlIST-'LIST
ISl ATS~
If EST QUOTE SWITCH
Jf1F1 TYPE2
PUS~J
100 ASK, SETuP PT1
CETARG
PUSHA
uo COl.
PR!t-ITC
In INSUB
767
168
769
l' ;>14
1'-13
4542
i253
4551
:; '15
211136
1721
1216
;1I"1
TO COMMANO MOOE VIA 'QUIT'
~ET~N
TAO CI-4AR
"12
I ••••••••
IC'rX)
ClA
JMP I EF'UN3I
ICOMMAND ROUTIN[ ADDRESSES
1~66
766,
I.·I··I.·......······......
I.·I··.····.
..··..
I.·I··.....
....····.....
I.·I.·.......·....
'I.· ...·..
lAc
ISAVE
tN.ll~E
CHARACTER.
/TYPE COLON
ICeLA)- TO SuPRESS
IINDICATE 'AEAce'
IPOINT PAST CHAR
"I"
•
IrOCl.l' • •
. !- 771
772
;
773
,,
..
,."775
776
777
778
119
='2'.... .,
; .... ,
".
4531
1413
e ..
S2JV'!
454~
~ ~:2:
1613
#!
~;'~5
52 Al
~ (~~
~~2'
21\26
785
7s6
h~5
;2~6
4545
4547
1531
,645
4551
5230
4545
78 7
1237
4554
1242
52CJ2
1::H
783
1C33
784
·,s8
189
190
791
792
793
1::~2
i::~4
1243
1244
1'-45
1077
4463
;001
1247
1~5~
31Z126
79 7
798
1251
;;52
799
800
1'53
4545
5232
796
1246
1
~272
'81i'l1
802
8e'3
804
825
806
8,,7
8~8
1254
1255
1,56
8219
1257
81e
126C
1261
811
812
813
81 4
81'
816
61 7
818
819
8213
821
822
823
82 4
825
4554
'''5
4566
1961l1
3010
3062
1067
341'"
1'62
1:263
1264 ia10
:;'65 3~27
1'66
1267
4464
HUnT,
n26
12;2
,,;3
4551
1';'
:;';6
1267
,,74
4545
454'
,-",76
4546
1,77 5211
PROCESSING
JMS I F'OuTF'UT
IPRr'\!T
(jEtc
101S48L.[ TRACE
/TYj)£ 1.1T£RALS
SO~TJ
T1.IST2-1
Tl.tSTJ-TLIST2
TIN"TR.
PRiNTC
JMP TQUOH1
CEre
CETL.N
TAD LINENO
DCA nSw
JMP TASK
IPASS PERCENT SIGN
IqEA~'ORMAT CONTROL I "X7.e3"
ISAVE rORMAT COO[
TCRLF'2; TAO CCR'
ISPLATICR ALONE
JMS 1 OUTDEV
lAC
INON;PRtNTINC OELAy rOR C~R.
TCRLI~' , i' AD COR
IEXCLAMATION POINT'CR,Lr~
!'RiNTC
TASI(4, DCA DE8GSW
cEte
JMP TASI(
COL.
272/"1"
II' O£BGSW,0 I ENA8L.E FLIP-FLOP "OMPSW"
I
'0i DISABLE ANO RETURN ALL"?" , S.
11r OMPSW , 01 TRACE o~. I' ENABLEO
I
'01 TRACE orF'
IIF' 80T~ ! 0 I P~INT TRACE,
ISEAqCH ROUTINES
MOOtrV; GETLN
IRhD LINE NO,
F'INOIoN
ILOOI( IT UP NOW I
ERROR2
INOT THERE , BAD COMMAND UNLESS
TAD 9un~
ISET POINTERS
DCA AXJN
O'OR INPUT
•••••
i£RO~
DCA XCTIN
TAD LINENO
SCONT.
31~~
12;~
1211
ICO~TtNU£
JMF' TYPE
ISP DEBGS:'!
•
•
PAGE 1~14
,qEA~ DATA A~C SAVE
I~E~TEST LAST TER~lNATOR
23'06
IDO TYPE:
PUSIofJ
EVAL
1,4" 1067
1241 3352
a.,.,
4551
194
195
TVP£2,
453("
~"~
''30
'81
71.\2
PCl~A
DCA CHAR
JMP ASK
3!l66
:~.{"'!'
".
l1':'JAN.'l
JMS I F"INPUT
:IAL1~
SCHAlh
Dci I AXIN
ICOPY THE SAME LtNt NUMBER.
ICX;''''EM)
ISAvtSTART 0' NEW 1.1 "'E ,
JMS I tNDEV
IREAD
TA:l A)(IN
DCA PACKST
TIofE
TELETYPE INPUT SILENTLY,
CHARACTER
DCA LUT3.1
IS! O[8GSw
ISAV~ SEARCH
1"/0 ~R£AI3
1524
GS4~
PTtST.
"
GEC41.L~
(;52,
4566
10121
3"'H
1061
s~;..
JMP
CLA
GF'NOl
TAO PT1
!lCi I PU
1171
3430
TAD sues
lSI pn,
2~3~
DCA 1 fT1
2~3~
IS! PU
4401
i'53?
r, QI~PI
'XiT
OCA XRT
CIA
/TRy
~E)(T
ONE
IAOO T~E VARIABLE
ITEST STORAGE LIMITS
IUPDATE THE LIST.
ISAVE t.lAIoIE
ISAVe: SUBSCRIPT
ISET PT1
)(AT
IWRONG SUBSCRIpT
IS£T POINTEA To OATA
JMP GU
In PTS.
2330
. HF',
t Sl P'U.
POPJ
j~61
DCA
TAO
PT1
QAOO
lWETMP
3"'~2
DCA
1526
1527
317~
DCA
9a5
TAD
L£SUB2
SUBS
9(\6
997
15321
1liH
J111
3167
DCA
S.U~S2
15541
988
989
990
POPJ
111133
111;34
TAO
TI.IST2~ 242
21!
M26".
,,26Kl
SA"'E
ITEST SUBSCRIPTS
TAD SUBS
sai CLA
203(J
;52~
IF'Ou"O XX
"OU~ID
TAO PTS.
TAO 1
1411
7041
1171
;640
5257
~. 242
,215
IGET HBlE E>TRY
l£lClT
POPJ
erN01.
1.('-45
1~:\2
SEARC~
•
Fcn I CFRSX
"PuT J FlU
1~25
9~4
or LIST
F'lNT
643~
~"'31!'
I£NO
ro~ £~r
JMP GS:S
""IUEST
[CAll
TAC LASTV
TAO pU
cti elL
TAO POLXR
SNL CLA
ERROR:!
TAD LASTV
tAo CINe
Dci LASTV
TAO QADO
3433
5'41
ITEST
1Iif
TAD GINe
1~U3
5541
Ul"
3011
PA~£
TAO QADO
11/161
7650
947
955
231a~
r.IAL13
HORO
I.·I.· .....·.....
I.·I·· ......··....
....····.....
I.·I.·I.· .....
I •••••••• s~vES
SUBSCRIPT ON r
~
I ••••• • ••
I ••••••••
1·· ...·8t;.
•
•
I.· ......
23106
991
992
XS"~JOR;
1535
993
994
IIGNnRE L£AOING SPACES •
12166
1.114
TAb 1'1242
11)4:'1
1640
5735
si!A CI.A
JMP 1 XSPNO~
GEi'C
JMp XSP"-iOR"l
1:;37
995 .
:~
TAO
15'6
99~
1" 1\41
997
998
1542
4545
111;43
5336
999
M272~
1f2!010
10!il1
012.
1(l~2
112!!." 3
1004
1546
.2ge
121""
1541
1'1'66
1551
i~5!:'1
Hfe6
10,,7
10~8
1e09
101Q1
1011
115'52
1115
164'"
2346
15'53
iSH
1344
1555
11(l1Q1
1551
:5""4
743!!1
1~56
HH2
112!13
12114
101'
11316
156111
1561
XTESTN;
1345
SlL
2346
1562
5'146
1563
1564
1137
3022
1413
~
tAO CHAR
tAo MPER
SZi CL.A
ISi! XTESTN
tAD
CHAR
tAo
1012'2
CI.L
tAD
012
DCi
SORTCN
H"66
lSi
JMP
lh1
1018
1019
1020
1021
1022
12123
1('12"
102'
1026
t'565
1566
3~'11
1567
5411
15;1Zi
1236
11)73
1243
311152
1576
15;1
16C'!~
125Cl
~. 61 i!
'614
162'1
I Q!l~
15721
15h 1221
1572 1246
1027
1028
1n9
1230
H!31
12132
1574
1"i;5
19.133
1~34
1251>
l:rl35
1036
1331
1038
16~2
16':"3
UJ9
H~40
1041
1~42
1:)43
1~44
1i1l45
.
'~54
4542
1604
1~55
16~5
4542
16~~
1607
1flt~
'~'6
4542
-J"2r~1
IEXIT
"S~~OR"
CHA~
XnSTN
xTESTN
I.·.···
...
I.·,I.·.......
.....
..
··
..
I.· ..·. ...
I.· ...·..
I.·I.· .....···....
I.· ..··..
IRETURNS.
I ••••••••
I ••••••••
RECODING
~J
ro~
OTHER.
SPACE
NU~BER
•
"TEST~"
RECODING rOR SPACE
I ••••••••
I ••••••••
I ••••••••
~~OM
A "DO" SUBROUT!NE
TAD CF'RSX
I (PC) I> PJ
DCA PC
XPOPJ. TAO 1 POLX~
IRECURSIVE ExIT ~ "POPJ"
Dci T2
JMP 1 T2
,
ATLIST.~
IASK-TYpE CONTROL CHARACtER TABLE
TINTR
I~. rORMAT ~ELrMITER
i'QUOT
I"" L.IT£RAL OELIMIT£R
tCRLP
I I . CARRIAGE RETURN AN~ l.iN£ VEEO
tCRI.P2 1*. CARRIAGE RETURN ONI.'
TDUMP
lSI. DU~P TH~ SYMBOL TABLE CONTENTS
TASK4
ISP. TERMINATOR rOR NAMES
TA~K4
I,,, TERMINATOR rOR EXPRESSIONS
PROCESS II • TERMINATOR rOR COMMANDS
PCl
IC.R • • TERMINATOR roR STRINGS
IS • rOR 'TOUMP' TERMI~ATES THE CO~MANCI
IEVALUATE iN EXPRESSIO~ w~lcw
ITERMINATES WIT~ AN R~PAQ" DR C~R~ AND
ILEAVE T~E RESULT I~ rLAC ANO IN 'LARG.
[CALL' ~
IR£CURSyVE CALL TO "EVAL"
TA5 SORTCN
ISAVE ISORTC~'.'LASTO~'tANO
R[.T"N,
PUS~A
HO L.ASTOP
PUSIolA
TAO [rap
PUSHA
TAb [CALL
" IS AVE rUNCTION CODE.
IRETURN TO CALLING
'troP'
•
\ IF'OCl12.~.
01~l.1C'1
H'46_~.1
1~4a
~'~55
11"49
1~!.4
1"5~
4564
Ht5
5227
;617
5343
161~
12'51
a~2
1057
1058
1059'
<
16'3
1624
i 6t'5
1626
l~~QJ :,;
i 627
1061
Ul62
1f1'163
106 4
112165
1066
112167
H'68
, 630
1 ~H
lrl!69
101"
U71
1072
1073
112174
1075
1643
1644
1645
1646
1077
1650
1651
lrZI8121
1t"Sl
112182
1083
1064
1065
112186
Hl67
112188
1121e9
112190
1091
U'l92
1M3
109 4
12195
H'96
1097
112198
12199
l1~QJ
ECHDLST,l"212
,;377
4566
1137
J23V1
1111
U54
7ii!01
16<47
112179
,_ 212
1634
1635
1e'76
112178
OPN[l(T; 'TESTC
;4591
1640
:;641
i642
1652
i653
1654
5247
'650
5323
1~54
1121
;'11"
5364
4562
HUJ
4566
12'54
3024
1024
1121
""',,
3~24
16"5 1fc124
;656
;12141
1657
166121
1661
1662
1663
1f11"
1664
1665
1666
1667
i6791
16h
16;2
1673
PUS"'J
\0
4564
52044
:;~33
1637
JMP EF'U",
14::15
1632
1636
TESTC
JMP (T£l;l'-'l
JMP (NUll
4'4i1
;- ~n
1622
1055
U56
[VAL.
PUSI.IA
GETC
~CA LASTOP
5332
"62~
lC"S3
1054
11;JAN.71
4'42
4545
~~12
1~13
1r47
V1~3
JMP
GETVAR
JMP [TUM
lAC
SNi
JMP
tAO
tAO
CLA
ARGNXT
SORTON
... 11
spi CLA
JMP [LPAR
ETERMN; TSTLPR .
SKP
ERROR4
[TEAH, TAD SORTCN
Dci THlSDP
TAO THlSop
tAO MU
SHA CI.A
1111"
7112
7012
1331
3274
i~'5
764P
44(17
rI"lT
0111
F'PUT
1125
tAO FLARGp
•
IOPERATOR MISSING BErORE PAREN
ISET ',ROM "TESTC"wnSORTC"
lEND'
ITEST rOR [NO or DATA INTO rLOATING AC,
IGET L4ST OAT A
6525
:' 9!~'"
IIGNORE UNARY Pl.US
ITEST rOR NULL PARENS.
u.
16;5
1616
i 677
ICREATE DUMMY F'OR UNARV MINUS
ICONTINUE
I'SNOOPERATIOtll
~
F'1. 01' ,
8
TAO
sPA:
JMP
TAD
Cli
:; 6;4
001'1
MtSSING OPERATOR
ISET pTf.
ITO POINT TO lERO
ITEST ro~ UNARV OPERATIONS
I"T~rSOp" EQUlv.TO END 0' EXP.
ICOMPARE PRIORITIES
popr
4544
,."144
I"
II.
TAfi THISoP
DCA TloIlSoP
LASTOP
CI.A
EPAR
lASTOP
eLL RTR
RTR
TAO OPTABL
Dei n.op
tAO LASTOp
CL4
531('1
IT
IN-ERROR IN F'ORMAT
ERROR4
ETEQM1; TAO crRSx
Dci PH
TAO M2
TAO SORTCN
SNi
;71121
"~U~cER
IPUNCT t Ol'J
IlETTER OF' VARIABI.E
IrrND OR CREATE VARIABLE'AI.SO SET PT1.
IP T1-)4RG
£TERM~
0377
tTER~2;
1.
23106
PAGE
IADDRESS APTfR
XT POPJ
I~Ovr. PAST ExT"A CIoIARACTER
IE V4UA TION cnNTROI.LE~ CC~EC~POINT 1)
ITEST CHARACTEp AND IGNOR( SPACES
!TERMINATOR
ntT
rLARCp
I(F'LOPR I PT1' ••• '
RESULT
IS4VF..'
•
•
·/F'OeL12.1;'.
11'"'1
1HZ
11::"3
1174
11;l5
11;'6
11::,7
11~\6
11::9
11 HI
1111
1112
1113
1114
1115
1116
1117.
1118
1119
1120
1121
1122
1123
1124
1125
1126
1127
1128
;;;''L'
;':"1
; ;;.2
~;,'3
~ ;.'4
1;.'5
1;;'6
H(17
1hI"!
1h1
l' h2
1713
V·I[ .j
3~30
~~~4'
76'5,'
;541
1413
SNA Cl.A
POIilJ
POt:A
3.~55
DCA LAS TOP
r;255
~KP
5366
JMI' £PAR2
H2"
4543
1721
,el0P!
1el24
1722
3355
4545
4564
1730
1731
1;32
H33
5343
1'43(11
4543
~;"44
1;34
1125
173'
1736
31a3C!!
1132
1;37
11:53
17401
H41
1135
1136
1137
1138
1;44
1745
1139
1140
1747
1141
1142
1143
1144
1145
1146
1147
1148
1742
i743
1';46
1;5"
l' ;r;1
1;52
1153
1;54
1;11)5
1;!'i6
1757
4545
1;65
1;66
cErc
IREA~
tESTe
JMP El.PAR
JHP ENU"I
[rUN,
ICOULO BE l.t"T
IN
PARE~
"Il.IBASE
POR OPERATION COMPUTATION
ITO PROCESS A NUMBER,SAVE AC
IstT POINTER AS
ro~
A VARIABLE,
Dcl PH
DCA INSUB
JMS I F'lNPUT
popr
IPOINT To 'CETC' AND USE CHAR
'REA~ TEXT NuMBER ,) (PT1)
IRESTORE THE AC
JMP oPNrxT
ICO'JTINU[
aErc
'REA~
DCA Erop
TESTe
JMP
.JMP
ISET CODE
rUNctION NAME,C1,2.0R 3 LETTERS)
SEPARATES rILE BECAUSE r OIGIT
I.·,.......
.......
I ••••••••
I ••••••••
EF'UN2
Pf'NUM
I ••••••••
'401'
TAD
Erop
Cl.l RAI.
tAO CHAR
JHP £rUN
TSTl.pR
1M ISH-MASH HASH CODE
ER~OR4
412~1
1ST CHAR OF' AN ARC,
100 SPECiAl. CHECK
n. AC
4562
4566
41562
4566
42·" 1
I"IORE To COME
TAO F'LARGP
5343
45417
2166
62f.15
tAD THISaP
Dci LASTOP
.JMI' E"U~
.JMP OPNEXT-2
OPTABL; F'Gn I I'T1
ENUM,
PUSHF"
F'LAC
H'~4
12166
1 4 13
.1;64
ARGNlCT;
1056
1';61
1;t.2
ISAVE LAST ARGUMENT
IilEl
;2'ClC!
1;6'"
1';~3
DCA ,*2
PUSHF'
4564
5355
5771
1149
IGO EVALU~TE EXPRESSION
ICONTINUE REAOJNC TME EXPR~SStON
ISAvE "unop".
LASTOP
TAO PH
4544
,'''44
5222
30'6
ITEST POR SUg-£XPRESSION
PUSMA
3"36
4531
1150
1151
1152
1153
1154
1155
TAD
5364
5332
5220
ICOMPARE TIoIIS 0"
tSTl.PR
n~55
1h7
IEXIT "[VAL"
IGET PRIOR I)P
.JMP ETEIH12
4562
;410
3320
•
PAGE
H" THJSoP
TAD LAS TOP
1h6
2311/l~
Ph
1 (155
1129
1130
1131
113 4
~CA
1h4' 4542
1h5 1(1130
;;23
1;24
1725
H26
1;27
11':;JAN'11
IMUST BE rOLLowEO BY PA~ENS TO SET ARGV~r.NT .
ICAll "[VAL" To COMPUTE ARGUMENT
la~A~CH ON F'uNCTION COOEJRETURN VIA ErUN3J~
.JMS ECALL
POPA
SOQTJ
F'NTARl.-l
TSTl.PR
F'NTAer-,."JTABL
E:~~OR4
·EPAR2,
JMS E:CALL
1l.E:F'T PAREN rR rEl.L THROUGH F'UNCT!ON TABLE
IOOuqLE ~P£RATORS OR JLLEG4L rUNCTioN NAME~
IEVALUATENEsTtD &~PRESSI0N
IF'OCL12, ~7.
231Z6
Vl~3
IDUMP
11~6
,7
2,~13
lSi
POL;)(~
1157
1;;"
JMP
1158
1;71
~536
t ['tJN31
1159
11 ~21
1161
1,;2
116 4
;1~0
;~;'1
"~1l2
1167
1168
1184
l1S5
:-336
I
, ?M3
,251
;"~4
;'335
;0I~5
;M6
':0.10
;~11
, 215
,'27,
;012
4543
;013 24",
; iii 14 4544
;~i5
r~44
2016
'Vli7
,,,,20
;11111
2021
44'"
1233
4451
;P22
2",23
6232
;~'5
'~'-6
1125
;~24
;021
1196
1191
1198
1199
12!'!0
12::l1
12~2
12~3
12C4
12:J5
;1iI32
:-00111
'~30
;~n
I.
1
I..
/I
I.
2
:5
336
250
IUP
1C
6
33:5
It
7
XSGN~
OPNEXT
F'I.ARC,
ICATA
1/1
P3.
TAO
?~4"
112(1
;~.,""
'11'51
•
5631
,.y,
~~
STORAGE
SORTCN
SMA CLA
JMP I LPRTST
?237
T£~PORARV
:s
I.PRTST; '"
5631
,'4V1
IrUNcTION RETURN IS OK
'-"
'2143
?,l46
15
DCA PU
tAo Ml1
?,H?
I,
/I
.
1121
12~8
12
13
14
'LTONE
JMS PARTEST
JMP I •• 1
;OI:H -
1~54
10
11 R;PARS
0,
o
- ?v144
I(
F'L.AC
TAO 'L.ARG.1
ITAKE ABSOLUTE VALUE or 'L.AC
SPA CL.A
ISKIP TO CONTINUE
JMS I MINSK!
INEGATE tHE ,LOATING AC
ICONTINUATioN
'UNCTION CALLS.
E'UN!, FlNT
rNoR
INORMALI!£ F'UNCTION RETURN
'PUT F'LARG
ISAVE 'UNcttO~ VAL.UE
,X"T
. I
TAO rLARGP
ISET POINTER
.'0111'1
'tl03
,''''0:'1
1054
'7?~
L"pARS
XABS.
,'!1QJ f'I
"'142
l'tTVA~'
5
I)
I)
popr
'~34
'~40
'EVAL' AND
'.
4
A~R
Il
PUSH'
fI
;~41
ARG.
ICtR'"
16
21!1
I~ TO [,.. 0 GETARG rRO", 'SET I
ITWO Mi~OR rUNCTIONS
11~"1lJ
;('.35
;1'136
ro~
2.._A
215
32'3~
;031
1206
1207
1209
1210
(1PJ(H!I
4251
5631
1622
119 4
119'
;~'''''
253
255
25'
214
251
33,
27,
254
213
,'254
,;213
I.· ..·...
- IT£qH!NATOq TAa~E
ISPACE ~
\ 252
c216
;eI~1
'NLIM
240
,333
;;2'4
118 7
1188
1189
119"
1191
1192
TERMS·':
,,250
1186
1193
PF'NU'~,
:;;;5 ",257
1;;6 ';252
1165
1166
1172
1113
1174
1115
1116
1117
1178
1179
118"
1181
1182
118 3
;;;7
1;73
1162
1163
1169
11721
1171
1';;4
6311
"72
_, 24~~
,253
:'255
PAGE
TAO SORTCIII
TAD 101'
SMA Si!A CLA
In LPRTST
JM; I L.PRTST
PARTEst,,,
ITEST THt ,PARtN MATCHINGS
•
•
IF"OCL12.~
. '·1211
1212
1213
1214
1215
1216
1217
1218
1219
122~
1221
1222
1223
1224
1225
1226
1227
1228
1229
123Ql
1231
1232
1233
1214
123'
1236
1237
1238
1239
12421
1241
1242
1243
1244
124'
1246
1247
1248
1249
125~
1251
1252
1253
1254
1255
1256
1257
1258
1259
12621
1261
. 1262
1263
1264
1265
•
0IAL1~
11;'JAN.,71
23'06
'.~ 5 2
.t 413
POPA
IRESTORE
,~?:s
~~55
~
':'54
1.236
1' .. ::'
,'}55
'?'iA,
,;"41
1"54
,~~~:'!
764:;l
;,'61
.'?62
4566
':'63
5651
'.'~~(!I
6'302
'''66
'V!67
5664
ERQO~"
;101
;1~2
:)103
'1~4
'H15
;{06
Hr,,7
HUI
Hil
XOEL£TE~~
lor
4555
rI~~L~
JM~
IS~
2326
4545
h12
2113
1116
764k1
Hi4
hi5
;116
:h1?
h20
:h21
;122
'123
;124
;{?5
;126
;12?
CIA
t4~
SNA
5117
?~0r"
OOK,
DCA T1
TAD TH JSLN
CIA Cl.L.
TAO T1
Sh Cl.A
;63('1
H!J
19132
;131
'132
;133
;134
;1,35
;04;:1
1~23
3('11
1257
?04(l!
ln3
CNTR
tAO T1
DC4 I T2
tA~ T1
1~32
3471
ISKIP IF THISLN ) X
ICHANGE (X) TO ACCOUNT rOR
IGARBAGE COLLECTION.
IGET NEXT
JMP DOl<
IGARBAGE
!:,ONE~
T~E
rlPST
ISTAQT LIST ~T TOP
IEXAMINATION ADORESS
IGET T~E NEXT AODR~
/TEST 'OR [NO
IY£S~WRAP UP Al.~.
ISAv£ NExT ADDRESS;
ICOMPARE LINE POSITIO~S
. JMP DONE
1 ~57
TO OELETE
tAD erRS
TAD I T2
1023
1141
1032
lLL[GA~
IJUST IGNORE SUCH COM~ANOS
ICHANGE DATA 'IELD TO TEXT.eX.MEM)
IDISCONNECT
SNA
5331
IL£~IGT'" ( '"
lIT IS
JMP START
CO; T
tA6 IT~ISLN
DCA T2
3P!32
5313
ISAVE ~AST AO~RESS
TH 1S1.~
C~A
DCA I ~ASTUN
;"50
;i301
;1.~~
TAB THISL~
DCi. CNTR
TAO eFRs
765c.:
1471
XCE~ETE
IUNC~AtN A l.INE AND ~£COVEq T~E S~'CE~
IPROTECT POINTER CHANGES rRo~ fNTt~RuPTlnNS
IS~TS "T~ISl.N" AND "LASTl.N".
IA~qEAOY GONE
IOIsAe~E TRACt
IMEASURE LENGTH
C!-1A
11'123
30'7
1133
;041
1023
3e171
I
OEBGSw
GETC
tAD Ci-IAR
tAD "!CR
!;i!A Cl.A
JMP ,_4
TAO AXOUT
1~66
i423
:H25
1133
1.3 TO caMPA~~ CoOtS
IGET l.AST PAME\ CODE.
IC~ECK ~oR ~AREN MATC-,
I(ST!L.l. SET ~Ro~ Ti-It LAST "EVAL,."l
ISI(IP IF' MATe"!
II:IAREN ERROR
I/olOVE PAf;iT R.. PAR
JI'4I:' I PARTEST
DELETE A l.I~~ ROUTINE
,::');5 5271
'016 lU1
,,,;7 7041{:
;iMl
SO~TC~
GET:::
IT~E
'~65
;2\73
":'74
TA~
S£A el.A
4545
; :"64
;~;0
;~h
;~;2
CIA
•
OPERATION
LAST~P
F3
POI'A
1413
2.~'57
..,
~AST
C~l.LECTION
CHi
THISL'I/
xRT
P:l CNTR
rAJ
~CA
CM;'
TAa TJoII Sl.N
ISETUP END Or
~OsE
~IN£
I
IF'OCL12.
1266
126 7
1266
1269
1270
1271
1212
l.273
1274
1215
1276
1277
1278
1279
12821
1281
1262
1283
1284
1285
1286
1287
1288
1289
12921
1291
1292
1293
1294
129'
1296
1297
1298
1299
1313"
13~1
13~2
13~3
:11.
.7
~~12
DC4
XRT2
~057
CNT~
~6('
TAD
TAD
':leA
'144
1 liP
., .14"
h45
'146
CMA
3::"32
,!41
;i42
'143
;147
1~16
1~12
11"57
'iS4
;155
h~6
;157
'16~
;161
;i62
:0;~0
4464
U65
H66
5751
~lF
'11"
'171
;H2
h;3
hi4
:a7'
~~i6
'177
;~0Q1
;'-01
;202
;203
;;",4
;,Pl7
?2~~
"11
;'12
2167
2533
2650
2636
2565
2630
2517
,5'12
2624
2625
2654
257,
2'O2
2631
,,33a
:1332
4564
5241
5224
~21'
"13
111166
i112
;216
4566
1135
"14
;215
n17
;,,(11
;"1
3 "6~
;222 . 3"31
;223 5177
•
TA':l
IIxt';
tAo
)CRT2
•
or BUrF'[Q
~o
INTER.
•
ICO'4PUTE COUt>,·T
ISlp~ON LO~ER P4RT~
ISi! T1
._3
CHIN.
JMP
JMP XOEI..ETE.S.
JMS
'" [ I ND[V.
DCA CHAR
IRESn
l~rA~
'LASTL~t.'T~IS~N'. AND OATA F'tEI.O':
IN A C~ARACTER SUBR •• "READe"
sane
F'NT uL. .. ·•
I~INEHEC OR RUB OUT?
£CI-IOI..ST;'l
JMP I C,",IN
IVEs
PRtNTC
IfC~O Tloft INPUT
JMP I CIolIN
2533
2650
2636
25'5 .
2630
2511
2''12
2624
2625
lABS
ISGN
IUR
lOIS
IRAN
IADC
IAT~
IEXP
I~OG
2U4
IStN
I~IST OF' COO[O 'UNCTION NAMES
ICOS
2702
ISOT
INEW
2U1
~3Se
IF'X
0332
1,2
IERASE SINCL,£ 1.1NES .• GRoUPS, OR VARIABLES
[RASE. TESTC
ITEST THE SECOND WORD, IF' ANV.
JMP ERVX
IERA~EVARtAEll.tS
JMP ERL.
1~INES OR GROUPS
IERRI'!R
JMP
tAB CHAR
I AI.L TEXT
TAD MlNUSA
2'"
I.·I.· ....··......
•••
H40
3Z6(i\
~'33
E"-jO
8U;~
Tlon I XRT2
DCA I XRT
3366
455:11
1623
5157
4551
h6~
h64
iCoq~£CT
pur~
tAn CNTQ
DCi AX I N
53~2
5265
!'AGE
23t~6
Dci T1
, TAO AXIN
l·He
3(11:.1
l412
3411
2032
;:H'J6
1317
1318
1319
1320
!
;151
h52
'153
13:::17
13(119
13121
1311
1H2
1313
131 4
1315
116 ,~
'is?,
;,"5
13~8
U;;;JAN .. l1
V··~·3
'1 4 ;'
13",4
13'"
13~6
:.l-H.1Z,
Si!i
ER~OR3
E~T.
[!:IV,
TAl) ENOT
:lCA Burr~
DCA I e,RS
TAO STARTV
Dei I.ASTV
JMP START
IBAO
rOR [RASE;
ALL TEXT ••
ARG
IER'~E
I(X';'''EM)
IERASE VAR UBI.£S
IPOINTERS
MAV
••
BE OtrF'ERENT ."OW.
•
- ------ _. -
-.. .... --~-
•
23106
'JIAL1(/J
1321
n22
1323
1:'2 4
1325
1'526
132 7
1328
1329
n:s0
1331
1332
1333
1334
1335
1336
1337
1338
1339
13411'
1341
1342
1343
1344
134'
1346
1347
1348
1349
1350
1351
1352
1353
1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
136 4
1365
1366
136'
1'He
1369
1370
1371
1372
1373
137 4
13,5
';:2 4
::1';5
4554
3317.
,,!~
2'~23
'~:H
1~65
77~~
;2:S4
4563
'23~
5221
1 4 23
'24~
5227
,,32
;233
;;35
'2~'
3~31
"43
5541
H44
:!U0
1133
'-'-46 3025
;247 " 1133
22591 3e23
1923
~H!51
;241"5
;;52
;253
2254
;255
;;56
;,57
;2621
;261
;262
';63
;;65
3~11
;"67
7141
1411
,45()
2244
5250
;267
1"23
'~12
'273
;,74
SNA
XrlNO
IS!
Sil eLA
JMP F'EN03
TAD TIoIISLN
DCA LASTLN
TAD I TI-iISLN
sH
JMP nNO\!
3~25
,,66
rEN03,
3~2~
1002
;11~
'217
1~06
4330
':H!!fil
1357
::>:5 y,1
Itll66
T~lSLN
DCA AXOUT
39117
;2;5
;,;6
TAD
lAC
;IiHl1
5644
le)(","!EM)
ISKI~ Ir GeAC) •
G(LI~ENO)
ICX';'p.tEM)
II~IT"VARI'BLES MAY
BE INDIReCT
COMMA~O
I'OPJ
H'l23
74401
T~lSL.!\I
NAr.Sw
CLA
TAj I Tlo4tSV~
TSTGRP
JMP tRV
TAO I THISLN
DCA Ll~ErJO
JMP ERG
TAD STARTV
DCA LASTV
IROUTINE CALLED VIA "'lNO~N"1
ISEARC~ ro~ A CIVEN LINe: 1.0. 'C "LINENO" ~
liST R[TUR~ IF' NOT rou~n.
12ANO ir rOUND.
I"T~tsL~" , rOUND LINE o~ NEXT LARGER,
I"LASTC~" • LESSER ANO/o~ LAST.
I"TrxTp" IS SET
XF'INO, Q!
11NITJALIiE POINTERS TO F'IRST LINE
TAO crRS
DCA LASTLN
TAD erRS
ISAye:: THIS ONE
F'lNON, DCA T~ l$LN
TAO TIoIISLN
DCA XRT
TAO LINENO
ICLEAR LINK AND NEGATE LIN£NO,
eLL eMA lAC
ILIN£NO,~ WILL ALSO BE F'OUNO(XeMEM)
TAD I XRT
5267
1423
;2h
ERVX~
;63~
;'64
;,;VI
lSi
TAD
SMA
3~67
11116"
IERASE LINts.
IPROTECT REST or T[XT.
!)ELETE
1 4 23
"42
1~~
OC4 AXI'-
4565
,,41
GETU,
TA"i 8UF'I~
IJ6~
;Z26
;;27
(RL.
PAGE
•
\
;
UTRl.
uTE,
OCA XCT
JMP I XrIND
0
JMS GET1
SPA eLA
TAD
cue
TAO "'131
TAO CHAR
I.·.····.
IPAST n","
IMOye: POINTERS
,
lEND OF' TEXT? CX-MEM)
I··
I.· .....···....
,
INOT YET
liST RETURN
~
NOT
F'OU~O
ISET "TEXTP".
IUNPACK CHARACTER.
INORM 4 EXTEND
& 340.376
12408276 & 200"236
13~0.337
~
"GETC"
~lAL.10
HOCL12.~.
1376
1377
1378
13'19
13~"
131\1
13/32
2
745J
5~i
'3316
'~"4
1?15
JMP VTX
UD 1'337
;::t~5
~J(l6
'306
J026
'~;17
l1;11{1
':H~
'311
1'385
;113
;~12
1386
;314
1387
2315
1388
:?316
13.,9
n17
1390 : . ;32~
1391
;321
1392
'3'2
1393
'323
1394
'-324
1395
;325
'1396
2326
1397
;327
1398
'3301
1399
'331
1400
;332
14~1
14e2
1403
1434
140'
1406
1407
14V.l8
14 {I 9
141111
1411
1412
1413
1414
1415
1416
1417
1418
1419
142111
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
11;'JAN-71
,V3
13$l:5
1~a4
V.1i~:5
;333
'334
;~35
2336
;331
765~
5674
4330
704P.1
5276
1ii!26
764i1'
5326
11101
,~""
1356
5'1:50
1411
2346
3021
;:J47
;040
n5C11
~e2El
,~51
:I~21
'~52
'~53
;112
'361
GENC.
7h2
'~12
5334
;?4Q!
1641
.\~~~
;~'HI.
1425
346P1
GEU.
JMP.
un:
tAb
IGET NEXT CHARACTER INSTEAD.
ITRACE DISABLEo ~ RETURN "1"
p277
JHP UTQ
1ST ARTS,!!!
GTEM
p7'1
CHAR
CHAR
TAn 1'117
SNi el.A
JMP EXTR
TAO CMU
tAO
ANO
DCA
tAD
TAO
JMP
TAO
ISAVE
IEXT£NOEO
10140
I CUi
I AXOUT·
DCA ·GTEt-4
CMi
DCA xCT
TAD GT£~
RTIi! el.L.
RT~
M41Z1,
.40
.137
M137.
XENOLN; 21
cor
ITERMI~ATE T~E
T
1~61
Si!A
;37~
•
3425
~410
ICX;MEM)
RU
JMP GENe
7440
·106~
/TEST rOR TRACt-ENABLED
IUNPACK hBlTS
" XCT
JMP GE:T3
;367
;~64
'~65
~[RO.
BoTH ARE
1'1.1" THE TRACE ,.LOP
n66
'363
l'
uti DEBGS,",
sli el.A
JI'1P ,·6
TAD OMPS'"
TAO I I.ASTL.~
DCA I BurR
TAD BurR
DC. 1 I. AS·TL.N
TAD 01.00
;362
IPRPlT ONL.Y
" JM I' I UTFIA
JMS GETl
CMA
IS!
3066
12166
l1r1!3
5313
UJ66
'3'56
;357
'3M'I
CET1.
211120
5345
1"'21
,'122
DEBGSo/
TAn OMPSw
SNi CL.A
SNA CI.A
lAC
DCA DMPSIoI
JMP UTRA·1
5215
;650
'354
,;555
unc.
31~0
;3"~
'~45
EXTR,
11~fII
(1010'"
•
rOU~ID
C~ U!
DCA
PRt~HC
765e:
; ~"''' 1
530'
''',f'
1,
TA")
4551
'341
;342
;~43
UTQ.
PACE
231"6
. oci
. -.-
--.
BuF'r[RED LINE •
I(X.MEN)
ISAVE OLD POINTER
IPOI\T TO NEW LAST LINE
IC~EC!(
F'oR EXTRA INF'O
AXIN
-~
..._---_ .... -.......
"ENOL~I"
.....
--~.-.-
--
•
-- .....__ .... -
._-
.
l1';';JAN~1i
1431
1432
14'33
14:'5 4
14'55 .
1436
1437
1438
~~;:
1:>1~
TAD AXI\!
:::!;2
~ J~l·
I'
;'d3
;:,;4
r:
TAD
ocl
STA~TV
·_··2l~l
'407
23"'2'
;;3:'1e1
F'1.Ti!ER; 0000
3;131
'576e
2377
! 25
.~
.614
24~1
:>" ,; 1
,4.'2
62>32
,424
625~
;4('3
;4;16
?51
157
241~
;'''J~
;411
·~z~
;412
;.'13
;'66
;41 4
.... ~HH'
;415
611131
5215
'416
;417
2000
0000
21i1l11l0
0000
,'Pl0Cl1
['112 •.
133 •
[1l
1(5;
JMP
KR~
'420
6036
"1"6
JMFI
TAO
2424
5215
1123
5614
;421
2422
;423
1465
1466
~432
IDECIMAL CONVERSION rACToR rOR "PRNT"
INO;INTERRUPT INPUT ROUTJNE
~12
.-s.
-
IIGNORE PARITY BIT
AND P171
SNA
;45~
JHP
~
1'000
._5
c211'0
I 133
IPRINT A I.INt NUMBER - "PRNTLN"·
TAD LINENO
RTL:6
2433
1:.J67
4557
,-122
4242
l.U2
4551
1468
;434
le16?
TAn l.I NENO
1469
;435
14721
1471
1472
1473
1474
;436
4242
1356
TAD M140·
1475
1476
;442
?443
'444
'445
;446
;447
'45Q1
1467
1477
1418
1419
1413"
14,=1
141:2
1483
145 4
14~5
BurFER
'405
,;\;6
2425
;426
;421
243'"
2431
146 4
or
l.ASTV
JMP 1 Xt ~!Ol. ~I
II.ITERAL T£RV,INATORS
TI.IS13_.
TASK4
I"
pci
IC.R. ~ AUTO~ATIC QuoTE MATC~
IDATA Co~T~OL CHARACTERS
ILErr ARROW
, KIl.L
F'l.tNTP·2
IRUeOUT
• IGNORE
t NP\.IT·~
IL.r~
• IGNORE
INPUT·l
IALT MODE
• EXIT
ENOF'I.5
/CNO RELATtv~ RErERtNCES)
rI.TONE; 02101
'~;5
14~9
1(41ll
10441
1442
1443
1444
144'
1446
1447
1448
1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
PAGE
ICO~OUTE NEW thO
D~A 8UF'I~
1Z6~
ll~:~
23i~6
'437
'44e1
'441
?451
?452
1'453
'01154
AND
JMS
,!~32
:'0(;21
PRtNTC
IPERtOD rOR SEPARATION
JMS PRNT
ITWo DIGIT "STEP" NUMBER,
DCA CHAR
PRjNTC
JMP 1 XPR'4T
VAL-Tl
PRNT~
~
~'333
ANn P117
DCA VAL
TAD C260
DCA T3
5252
JMP ,.3
:'1,16
3032
1113
2J33
~132
1~32
]213
15~"
ITWO DIGIT "PART" NUMBER
PRNT
tAO PER
3"'66
4551
5625
pn
XVi.
tSl T3
DCA VAL
TAD VAL
tAO
SMA
M2,2
ISAVE SPAC£ IN C~AR.
IPRINT TRAIl.tNG SPACE
IPRINT TWO DECIMAL DIGITS
•
,
IF'OCL12.,.
1496
.5
14~7
:4.5~
,jlALlt"
'525-:'
; 2·111
1408
1489
~'!P
~: ~ "
1490
1491
2l~!
1·~32
1492
'£~2
1113
"!-3
1493
1494
1495
1496
1497
1498
1499
15::'10
1531
1502
1503
152\4
'H5
;H7
;,;:1
1116
5276
;474
4463
5665
,.;5
, .. ;6
;417
1~17
ln1
iSO'
'52"
;5:.01
1507
1538
1509
151111
1511
1512
1513
'512
;,,"111"
;510
1!51 4
;511
l!H'
1516
151 7
1518
1519
1520
1521
1522
1523
1524
1525
1~26
1527
1528
1529
1530
1531
1532
1533
153 4
1535
1536
1537
1538
1539
1540
'\
"h 7452
4463
1076
5274
15~6
OUT,
7450
1 a66
"'2
;?473
;5?3
;524
;.,:-5
'5~6
25~7
'5i5
1071
''52111
;44111
;5'-2
;524
?'525
'5'6
;~'7
'53"
;5~i
;'5~2
'533
;534
'535
'1)3,6
'537
'540l
1353
-::354
PAl,
S~A
7~0A
d{l(1"
2~62
5357
1 ;~61
341~
3a61
1313
PACX;
£SCA~
PCK1.
H140
si!A
tAD 0140
SNA CLA
JMP ESCA
tAo T2
ANn P77
JMS
CO;
JMP
TAO
JMS
JHP
5102
1122
4335
5324
OUTX.~
P2n
"TAD
CIA
4335
'542
•
JMP
,4411l
'&;41
;'S43
SNi
TAD CHAR
tAn MCFI
SNA
JMP OUTe"!
TAO CCR
JMS 1 OUTotv
JMP I OUT
Hi; CCR
JMS 1 OUTOEv
TAD CI.'
TAO
1356
1354
H50
5332
1071
.:1122
/)
tAo CHAR
SNA
'tAo Pel0
tAD HUll!
.SNA
JMt' 1 RUBIT
i'4o P;S11
DCA 12
tA5 T2
AND 0140
1352
iUl
3~71
;~'3
PACBUF';
74513
2513
;514
2521
OUTCR,
7341
i066
74'
"
5755
;51.6
;5i7
OUTx~
111'1'
;512
.
,
•
tAn VAl.
TAOC260
PRINTC
JM" 1 PRNT
4551
"i'!?Z
t.
TAti T3
PRi:-JTC
4;51
5642
PAGE
2310fl
cd
1~33
~4~J.
"6~
l1;'JAN .. l1'
JMP XVl~l
V1~3
PCKl
P
.,
IOUTPUT A CHARACTER • "PRINTC"
IUSE (AC) OR (CHAR)
IPACK A CHARACTER
.
•
"PACKC"
21'1 TO 33'
IC~ANC;E
ITEST 'OR RU80UT',
ISAVE INPUT ITtM
ISO THAT QUESTION DOESN'T MAKE
ICWAR LOOK L!KE A L£rTdRROW
10ATA WORO','
134"';'3'77 AND 200.237
1240,,~31
I! GNClRE 30f'1l
ICX';'~£M)
I PACBUF'
p71
PCKl
PU
~
ISJ XCTlN
JMP ROT
TAD OAOO
OCi. 1
AXI~
QCA QAOO
TAO PDLXR
1~0
TO START
/( X... ~EMi
IC~£CK
ICLtAR PACKING WORD
F'OR OVERF'LOW
•
•
I
IrOell;!.1 7•
1541
:::5 44
,C;4S
1542
1543
;~,,~
1544
,1:;"
1545
1546
1547
1548
1549
155121
1551
1552
1553
1554
155'
1556
1,,7
15,8
15,9
15621
1561
1562
1563
1564
156'
1566
1567
1568
1569
15?12I
1,,1
U1Z
157:5
151·
.1575
1576
1577
1578
1579
15821
1581
1582
1583
1584
1585
~5S3
2554
. '-555
,,56
CM~
p , 1'13
T,I.n AXIN
1'317 •
3';'il4
RUBrT,
4557
2'H~
3'~61
,'562
2561
;(:14':1
3062
;563
5735
PUSIoI .. OClW" lIST
!~
1"
i
~
I PCl633
1614
1615
1616
1617
1618
1619
'6H
'636
;637
;6H
1~34
;642
;643
;6.-4
;64'
;646
76421
'647
~650
;651
;652
5253
1628
1629
;661
1640
1643
1644
1645
1646
1647
1648
1649
u,e
•
T40 C200
\ TAO SIN
tAO MBRUI<
SNi CLA
JMP R[COVR
TAO INBur
s~i CLA
ExtT~
6135
ERROR2
TAD SIN
DCA INBur
CLSI<
JMP
NOClK
CI,.SA
72~~
eLl
DCA
3261
" CI.KrLG
IMA~UAL
STOP?
IANy SPACE1
IWILL WAIT roR ouTPUT BurFER
I.·I.·.....
.......
ISAVE INPUT
I •••• • •••
II ••••••••
.. • •• •• ••
IKW12 CLOCK INTERRUPT ROUTINE
;&55
1641
1642
8UFrEQ ANO CLEAR rLAG TO '£Tc~ NExt
IIG~'RE BLANK AND L~T ANO PARITY BtT,
DCA SlN
~!i3:H
6131
KEVBOARD FIRST
I
1622
1623
1624
1625
1626
1627
1634
1635
1636
1637
1636
1639
ANO Fll77
S~A
d66
1262
16211]
1633
KINT.
l2~2
1621
163111
1631
1632
oci "OPTR 1
ICME~KrCR
'6.'.6
16a3
1605
16rY6
16i?7
1608
16Z9 '
16H'.I
1611
1612
1613
3265
6all
!'246
... Alii:. . . . ,
Ksr
JMP EXIT
'625
16~2
1604
"" I ill"
;653
2654
6244
1201
7U4
'6'6
1200
6P101
;657
~660
2662
;663
;664
;665
'666
;667
;6;0)
I
NOCLK.
RAl eL.L
140 SAYAC
54~0
EXtTJ,
;~"21"
:"HHI
CLKrLG;
3120
312" "
312~
0000
1~34
SIN.
OPTR0,
OPTRO.
OPTRi.
X133.
'613
'6;4
;6;5
IOUTPUT
IVARS
INBur
3276
3"'34
1276
~666
6.Hll
1664
;;03
;640
4574
:>;;'4
=,705
lfJ16
•
I09ur
I09ur
IORU'
SNA
'7{h"
;;:'16
;7~7
'o"
"tAo
IMOOIF'lEO 'OR POP-'
SET TO III tV£RY INTERRUPT
I ••••••••
JMS I
PWAIT
DCA XOUTI.
DCA IN9UF'
tAD XOUTL
JMP I XI33
;6;6 '"200
;677 3266
';:"1
;702
ION
JMP I 0
H5:11
;671 4574
;6;2
6M2
764~
5314
•
RM;
uti SAVLt<"
X(lUTU
o
DCA XU3
ION
TAD I OPTRO
S~A CI..A
JMS I
lor
TAO TELSW
SaA CLA
JMP
,.,
POl~T£RS
I.· ...·..
IVIA CINOEV)
IANy INPUT?
REF'RESH SCOPE WHILE WAHiNG
I •••• • ••• ,OR INPUT
lel.EAR INPUT BurF'ER
IVIA (OUTOrV)
ISAVE CURR[NT CHARACTER,
IBE SU~E I~TtRRUPT IS ON.
IANy ROOM?
"
IA C4ARACT£R IS ~ON'iERO
, •••••••• RErRESH SCOPE
II N PROGRESS?
•
•
•
(~
IrOCU.2.3',....-.
1651
l.6S2
;71.£1
;711
1653
165 4
1655
16!6
'712
'h3
'h4
1657
;;1.5
;716
1656
16"59
166"
,721
,7i7
,;29'
1661
,722
1662
'723
1663
166 4
1665
1666
1667
1668
1669
16711l
1671
1672
1673
167 4
1675
1676
,;24
;;25
,;26
;;27
,731'1
;;31
;;32
2;:53
;;34
11;;'JA~'~71
1266
p'
(: ..,46
3316
TI,,~
5323
1266
~664
1264
,001
,'107
1263
3264
6301
5676
3326
,""'I:'PI
7241'l
1326
3~67
6~~1
1316
;640
,;035
5333
;;36
;;37
6002
5342
1123
3"67
2;4Ql
1677
,;41
1678
1679
1680
1661
1682
2;42
;;43
;;44
2;45
1684
2146
;;47
1683
L'IAL.l9.1
1105
22116
;O~0
34UI
1692
1693
1694
1695
1696
1697
1696
1699
17~. 1Il
,;"57
17~1
l'J2
1':33
ln4
1'~5
2"57
5351
3034
1263
3265
i263
3264
7040
;;62
;;63
6~146
';65
4553
'764
'766
;;67
1.131
4551
;:'~22
.1422
;;;('1
745"
0;377
;;;2
31167
,;;4
4551
,;h
,;;3
J1l11
•
l"lO
/TVpE CHAIUCTER.
ISET t"'~PROGRESS F'L.AG.
IRETURN
ISE\I~
"ATA
Ol'TRO
TAD oPTRr
lAC
AN~ 1'17
TAO
OPTR~
DCA OPTFlo
IO~
JMP t XOuTL.
IERROR REcnvERY PROCEEOuRE
ERROR'; DCA ,.1
IERROR CAL.~EO FROM A TABL.E
E~~2,
~
ILt~IT EXCtEOED
CL.i CMA .
ICOM~UTE CALLING AOORESS (AL.SO "SPACE")
tAb ERR2
IANO USE IT AS ERROR ~UMBER.
DCI LINE~O
ISAVE ERROR eOOE.
10~
I
(JMP ••• ) p FOR OEBUGGING
TAO T£~S~
IWAIT rOR OUTPUT TO fINISH
Sin C~A
JMI' ,-2
lor
JMP ,.3
RECOvR; tAO C:200
Dci LlNENO
tAD 1'1221
TAb OPTRl'!
Qci utN
IS! TELSW
COr
DCl I AxlN
tS~ CNTR
JMP ,-2
;~40
2151
';52
,;53
';6['!
,;61
TAr: xIJ3
nCA t
1263
3a10
;'50
;;56
JMF ,+U
3fJ57
1685
1691
ci TELS"
DCi. CNTR
1686
1687
1688
1689
1690
;;54
,;55
~
X I 33
23111)6
IDISABL.E INTERRUPT rOR tNtTIALIlATtO NS
ISAVE ERROR NUMBER
ISETUP INlT COUNT
CHA-
DCA INBur
TAD
OPTR~
ItNtT
1/0
BUFFERS,
I.
I(X;'M£M RESET)
IINIT I'i2
;'2'~
1122
1123
3~'I.3
~2'14
~ll'I.5
5641
1251
1124
3:'116
1010
1125
3~1?
3~11
1126
1127
1128
3V!2e
;'H~0
~tl21
2'l62
1129
173111
1131
1132
1133
1134
173'
1'7:5 6
1137
1136
5242
3"'23
1411
:.'122
1103
'640
3025
3026
3",27
3"'30
3~:51
3032
3",33
CL.A
TAr) SPI.AT
PRINTC
TAn AXIN
DCA T2
4551
3222
3~24
SMA
JMP 1 RUB5
JMP RUB2
TAO I T2
I" ADO" IS rULL',
TAD
M'"
/TEST POR EXTEND
CMA
Dcl XCTIN
ISET SWITCH
3"62
1 ~10
TAD AXIN
;04~
Run.
;~H0
JMP RUB4
CMA
Dci
AXIN
3U~
1471
TAO I T2
1140
3~36
J1~1
ANti 1'1100
DCA Q400
JMP 1 RUs5
1143
1144
1745
1146
1147
1148
1149
~03'
3~47
1750
1'51
1152
175:5
115 4
1'55 1756
3,,50
3051
1157
3"56
1158
J057
1159
3~M'
1160
3061
RUB4.
5641
2530
1411
RUB5,
RUB2.
'-1~1
10~6
;64el
523()
3471
5231
,3H
3V152
1~60
3;153
JC'l54
3;A?5
333<'1
:;~61
•
/TEsT ~ALP
AND I'll
3034
3P14"
Jill 41
3042
3M3
3"'44
3045
3 !:'I 46
I,Oq,A RUBOUT ACKNOWL.EOGEMENT
sli CI.A
5231
1:331
7 'Hi
"ACX
tAO I T2
tAO
SiA
JMp
DCA
JMp
IRESET AOO
ICHECK POR ExTENDEO
C100
CLA
RUBJ
I T2
RUB3.1
ISAvE COFHI[CTION
SPL.AT. 334
ISYMBOL tABLE TVPEOUT RI)UT hiE
ItN!T POJNTEQ rOI; SYMBOl. OUMP.(X.MEM)
TDUMP, ,TAD STARTV
DCA PU
ITEST POR [1140 OP 1.1ST
TA~ L.ASTV
CIA
1~30
TAD I'll
SMA
143~
IBACKUP POINTER
AND P17f1121
'165~
5541
...
iTEST NULL L.INE
I()(.~EMI
T
IU XCTIN
!?l35
1142
PAGE.1
cor
1139
1741
23'a6
CI.A
POPJ
TAO I PTl
•
IGET THE VARIABL.E
•
•
IrOCL12.~,.
jlA~l:-
11;:'JA~J"'1
DCA OP.l
I(OCA
TAC' 01'
'I Se: TIi II' U~.' P "C K PO! NT £ RS
1161
1762
~~63
1763
~:'~4
3316
~ 315
3::1'1
~.'65
3,"2,"
~;'fl~
4545
4551
4545
4551
176 4
1765
:3::'~2
1766
1767
1'168
:P67
~"7~
1769
1770
3V;2
1771
~rh
iI~;3
3~;4
"A30
1430
~Hl0
4714
4545
4551
~1"'1
2i"3~
GETC
PRiNTC
rn PU
F'INT
rGrT I PT1
3;;,;5
3(1;6
177'
1780
1781
1782
1183
1784
1785
1786
1187
1188
1789
179"
1791
1792
1193
119 4
, 1195
1196
179'
1798
1'199
18"0
1801
16::l2
1803
180.4
18e'
1606
18a7
lee8
lA.:-19
181 0
1811
1812
1813
1614
1815
~~;7
4551
il102
:51",3
44217
,;439l
31?4
"~H'J0
~i06
1""
4551
~1~5
3107
3tH!
3111
3112
3113
3114
3i15
3116
3117
~0~"
32:16
32217
(' eJ f'll?J
321~
,;',34(3
3211
;1617
"331
1455
3213
3214
n15
IPRINT SUBSCRIPT TO 99
IpRr"lT ")"
IPICI( UP
VA~uE
'''RI~T VALUE
OPt
TAn CINC
TAO M2
TAD PT1
JMP TOUMP.1
PRNT
1 eX-MEM)
1 eX;'MEM)
•
00~0
ICT~£St GO IN 10005 rOR X-MEM)
'0'1
IOUTPUT CHARACTER BurrER (AOnR[Ss IS A MULTIPLE or 20)
IOBUF' 8 3120
COMEINaIOBur·Z0 ICOMMANO • INPUT BurFER
COM£OUTaCOMEIN.46
-COME OUT
rRST.
0
/TEXT PoINTER
00210
0340
0617
12131211
1455
6162
IDUMMY
LI Nt
NO I
I ••••••••
Iro
ICA
I ••••••••
6162
r~sTX.
3216
7715
IOUMMY e,R.
ITO SAvE TEXT ,SAVE C(BurR), CCLAstv), AND C( 'RST TO
IwITw ODT-JR46 , T~E TApES MAY B£ tOGETHER WITW
ITHE S~~BOLIC CUMP LAST I "oeAL • 'LoAT • OIALOG I
I~OAotNG T~e: LAST SECTIoN MAY BE CONSIDERED OPTIONAL.
BUF'~EC·t
ITEXT SurrER STARTS HERE.
1715
36~0
:5 M'Jet
PRNT2,
"a~tIJ
5051
:>741
36C1l1
~ 2~0
~6""2
3176
,36(13
7..1",-"
36('14
ilM:5
13"~
4515
NAME
PRtNTC
1~70
31213
31413
3236
3236
~212
F'X!T
J"1S I "OuTPUT
UO CCR
4'3~
1111
133Z
5253
2442
3115
(4)ftrO~(XftMEM»)ISAVE
vETC
45 4 5
PRiNTO
! S! PH
TAD t I'll
JMS t PRNT2
1772
1773
1774
1776
1777
17,8
1179
IjCi. AXOUT
r'lCA XCT
r.F;TC
PR i IJTC
G£TC
PRiNTC
PAGE
I •••• ~ •••
C(BU~R»
-360<:'
ni.
SEGIN,
H£COVR·1/STARTING ADDRESS
TAn 01 IINITI4LIlE ANY e;rA~l~Y COMPUTER,
DCA STARTe1
NOP/(IOPR£SET' I ••••••••
JMS!
PCLEAR
eli eLL
I ••••••••
INITIALI!E
POt~T
OISPLAY
•
e. ,
",",wI-4C. "
1816
181 7
1818
181 9
..
H
~
,'
~~~:-
;'6Il.llGl
V,) ... .)
11",JA"lWfl.
3414
DCA' I f'LTXR
?J57
ISl
c.)'I(1~
JMP .,,2 /r:l.r."~ t ~ClUT 8urrtR
/ •••••••• F'IX UP DIAl. 1/0 ROUTINES
CI.A
6213
/e IF' CDr 1;'1/ ........
/
G1775
Dci t
/
tAD
G5772
52.16
;2;:11
:t!~2
~,213
3667
1823
1824
:t~~3
~6!"
~~!.5
361~
~263
1825
1826
~62~
62~1
1827
~!:21
1828
1829,
1830
1831
1832
1833
1834
1835
1836,
1837
1838
1839
1840
1841
1842
1843
1844
1845
1646
1847
1848
1849
JMS I
G?774
3f.22
6212
~f.25
4666
3655
6212
4664
6211
/elF' 115 /
/
G7200
~60)6
24~0
24(/10
~621
6211
~63~
~6~1
~6~2
74~0
6211
7'1313
182~
le5~
1851
1852
1853
1854
18"
1856
1857
1858
1859
18621
1861
1862
1863
1864
1865
1866
1867
1868
18f.9
1810
:!6~7
~623
~~24
3633
363"
3635
3636
~637
364Q!
3641
3642
3643
3644
~64'
3646
3641
3652
3651
3652
3653
3654
~655
3656
~651
36613
~661
3662
6212
JMS I
RITEOU
tAo
ION
R
urou;
GBI.OI<.
GUll;
C1715,
G1776,
J~45
;71P
....
101
5172
5713
'2U
7113
7'174
""
"'6
C7177 • 7111
.46('1(.1·2VJ
rEX!:!,
GtTSGN
462"
/
/01F' 10 /
(;7775
/
/
/
/
/
-cUll
/
/
/
/
/
/
,.1
/
. .. ... _.. -
ERASE ALL
/
/
/
/
/
/
/
/
/
/
/
/
/
/
/
.~
•
IT AKE ABSOL.UTE VALUE
SPA CI.A
- .. ---.
WRITE MiLDRED INTO UItPEA
SOuRCE WORKING AREA
IN i TI AU it CLOCK
/
321
76
2
U13
25
23
C57'2,
C5713,
C12:H'I,
G1173,
C7774,
/
/
/
1113
1
cUi
5712
;'175
'716
,,7',
ERT
/
/
/
TL.S
JMP
/
/OOF' 10 /
CLLR
_CLSA
CLA
r'~2J1
7714
/cor s.e
Cloi Clot.
CI.18
0
/
CI.£f..I
.'1"''
~66?
G7177
CL.LR
,,025
i\"23
7773
(;5173
/cor
........
........
........
........
........
........
........
........
........
........
........
........
........
........
........
........
,.!t........
••••••
........
........
........
........
........
........
........
..........
........
........
........
........
........
........
........
........
........
........
........
........
........
........
........
........
........
........
........
........
........
/
/
/
G7176
4011l
"0"'2
~665
•
JMS I
,,930
1'0'6
:\f\66
DCA I
6211
5650
2216
;: 11"
72A13
TAD
GSLOK
61346
6 iHlI 1
3664
DCA 1
6201
;'4211'1
6212
4667
3651
6132
6134
7243
6133
1261
6132
6135
72CHlJ
5713
'4620
4621
,
3671
~663
~6;""
36h
T12.
~_262
367~
BV LOAO.
C~TR/tNITIALtlED
~~!.:.
1821
1822
e
PA_Ut. •
.
.,"
~
..
- -_ ..
+._- .-
•
._---".
•
I,
'
IrOCL12.~
1871
1872
1873
til74
1675
1676
1877
1878
1879
18~0
1881
1882
1883
1884
1865
1886
1887
18aS
16'89
1890'
1891
1892
1893
1894
1895
1896
1897
1898
1899
19rJ2I
1901
1902
1903
19,,4
1905
1906
19117
1908
19~9
191"
1911
1912
1913
1914
1915
1916
191 7 .
1918
1919
1 920
1921
1922
1923
1924
1925
•
~
)
.
:14l.1C
'~22
'~~3
4724
(~'5
46~
~67'5
f,
(!2;
4632
4~H
46:!2
46:!3.
4634
4635
046H
4637
4640
"641
4642
4643
"644
46'"
"646
46<17
4651"
4651
4652
4653
4654
4655
"656
4657
"660
4661
"662
4663
4664
4665
4666
4667
46;0
46h
"672
46;3
4674
4675
,~
L.G2E
I!'PuT 1 X2
F'£)(T
JM~ I INT!:GER
DCi F'L.AG2
F'1"1T
F'NCR
F'PUT I XSQ2
F' GrT t X2
F'Su9 I XSQ2
·F'PuT 1 X2
rMUl. I X2
F'PUT 1 XSQ2
F'ADO OF'
F'PuT TEMP
F'GrT CF'
rDiv TEMP
rSu9 I X2
rAQO Ar
;:J::l~
6676
,675
2676
6675
4675
6676
13U
6326
3~5
3326
2675
1277
6326
,'302
4616
1326
6326
,)675
3326
,,321
,316
TeMP
SF'
"J04
TWO
ONE:
DCA rL,AC
rr~T
rF'uT I )(2
rGET ONE:
F'Div r X2
n':XT
RETURN
ICONSTANTS rOR rEXP
X2,
X
XSC2;
XSOq
Ar,
0"04
2372
4701
1 4~' 2
8F',
4;0(1'3
H74
"157
Vl12
CF'.
14~2
5151
"'454
343
,
I X2
lSi T3
RETURN
2372
fNT£C£q PAqT
ISAvr loOIo: OR!:'ER DATA
TAb F'l.AG2
5536
5321
/TAKE'
TEMP
21<333
5536
X2<~'
•
T[",p
tAD rL,AC
': ~J(lO
PACe: 1-34
I XSQ2
TEMP
1~44
3~44
~Z0Cl
4;?,7
rPuT
F'GrT
F'MUl.
;AOO
F'PuT
F'GrT
F'Oiv
FMUl.
FAOO
r£XT
:}3~~
1325
44t'11
6675
:'316
3615
2310~
PIUL
;! ~~
~325
4;!"4
4;~5
4;~6
11;J~'1.71
n~T
4453
3325
4407
4676
46;7
4;n
;'3
J'1S ! N£GP
r:A T3 IC(SIG\!)"l IF' I
3,133
44;'7
4313
4~t4
V\'
7774
21'j7
5157
Q!@12
5454
~343
.-
,
--~
IrOCL12,.
1926
i:"!
19?7
4hl
1.928
4h2
19~9
193~
4H3
:" lAL.1C
Cl~7
'.W1
19:51
ishS
1932
1933
4h6
4h7
2P0~
1935
4;21
"rH""
0132
1936
4,'2
4;23
1914
1937
1938
1939
19411J. •
1941.
1942
1943
1944
1945
1946
1947
1948
1949
195B
1951
1952
1953
1954
195'
1956
1957
1958
1959
1960
1961
1962
1963
1964
1965
1966
1967
1968
1969
1970
1911
1912
1973
I.~ .. .-
1~,5
1976
1977
1978
1979
19a.0
4;~0
~H~l
.
." 'H'
5163
4725
0210
:'00"
4;27
41JIlI
4;31
4732
OF',
QI~~7
~
L.G2~.
t10~1
0-':£ •
21ilJ5
2 4 35
(:\2'01
4407
J615
TWO.
~~"'2
2~00
0~00
r..EGP,
F'L.AG2,
TEMP,
F'N£C
0
0
11!
"
/IJ.AIN ALGORITMM
rOR ARCTANG['JT
'"
A~CALG;
rIt.jT
rCrT
F'MUL
rpuT
F'MUL.
5'754
"'54
5C!!24
4755
r·il~(1
2437
2437
1643
4;60
1643
;777
3304
4;61
4;62
4;63
4;64
41(.'
i·)~
4675
66'6
4374
1371
4616
1366
6326
.1363
46'16
\'~0""
/Co~sTANts • '~OATtNG
0~31lJ
A~'i!'
AL.F'1,
7771
AL.F'2~
4434
1113
4434
lJn6
~4~4
~tH\
3306
.5
"If"
N')~
?<\~?
24~'
1646
1646
4;;2
4;;3
4;;4
2427
2323
4,h
•
~
AQiQ!
;775
BET1.
Btu;
ARC TANGENT
33~4
4"~
4t~?
)(2
rMUL I )(S02
;AoO BETe
F'PuT T£M"
rcrr . AL,F'2
F'MUL. I X902
'ADO AL,F'l
F'MUL I. lCSQ2
F'AOO AL.ri!
F'MUL. I X2
F'O iv TEMP
F'[XT
JMP 1 ,*1
ARCFlTN
46'16
13155
4675
3326
:- t ~~< ~
I
I xt
1 )(S02
BEn
rAOO BEU
1360
;773
•
3021Pi
4;33
4;34
4;35
4;36
4137
4;4A
4;41
4;42
4;43
4;44
4;45
4;46
4;47
4751lJ
4;51
4;52
4753
4;56
4;57
•
..
2000
~
'J~0Pl
i' (I.I\)"
,~ 9Q1~
PAGE:
231:2)6
2566
5341
2(j~r.
4;~4
4;26
11:'JAN.71·
2566
5341
?1r.5
2435
4;t4
V ~~:'I3
~0UJ
2421
2323
7'1;5
.
-
-
_.. -.--
-_..
.
--_ .. --- --.-
...
,.
•
.'
.
,
.
f.
/F'OCL12,:H
11;;5
4;;6
Cl~L.1!'!
V)!OJ
11;'JA"'-11
7h2
IrLOATi'G c::"'INT .\RC TA"r.~"'T
.5:·~~
A,; T~ •
GE:TSG"-:
4363
3>133
50(}4
44~7
150~5
5rzZ6
6635
2637
1992
I5~Cl7
" 0.0!'l
F'E: )IT
1993
1994
1995
1996
1997
1998
1999
200rl1
2001
2002
'51'10
1~45
CETSGN
2rl104
200'
2006
2007
201218
20~9
2h"
2011
2~12
201 3
201 4
2015
21316
2"17
2018
2019
2~2~
2021
2022
2t1J23
2024
202'
2026
2027
211'28
2029
2~321
2~:31
2r:~2
7'11~
5221
441217
\'637
3635
6635
5:H3
'5Zi4
5u5
'5~16
"u7
5"'2121
5"'21
5022
5Cl23
'5024
5?!25
5026
5"'27
5030
5031
5032
5033
5M4
50'135
5036
'5!1l37
5040
'50141
5!1l42
50143
1)~44
'5(ll45
15046
150<47
15 1'1 5V'l
I5(llSl
&;'-'52
'5~r;3
,'~0QJ
7240
3362
5623
4'fJ2
2362
5634
4407
6635
1636
2635
:~k!0QJ
5634
531211
5321
5315
4716
H'!45
,4511l
4566
;110
4566
4401
6156
2637
:'CQ!g
1045
7450
5536
'5054
'7(J;~
55
111,,56
<;264
4407
'5057
637
t;,~
2033
203 4
"506"-1
3756
2035
15061
6756
SPA CL.A
JMP GO
IL.ESS THAN ONE
F'INT
F'G£T 1 CO~1
rOlv t )(1
F'PuT I 1(1
r(XT
CL.A eMA
ISIG~ F'LAG or RESUL.T
DCA F'LAGl
GO.
ICALL ALCOR I THM,
JM~ I ,·1
ARCAL.G
n~e: TLIRN ~ERE
ARCRTN; IS! F'LAG1
JMP I EX I Tl
F'I "J T
rpuT I Xi
rGET I P 12
rsuB 1 )(1
n:XT
JMP I ,.1
EXlTl, £xiT2
ICO'4sT A"ITS rOR A~CT ANGt'~T
Xl,
X
PI2.
PloT
ONE
CON1~
n.oe,
GETSCN
IF'L.OATING LOGARITHM
SNA
ERROR3
SPA CL.A
ERROR4
f'INT
F'PUT I TE~
F'Sue ! CON1
In~o
"
ARGU£'1£NT rOR L.OG
~"~
I.
,\
rE)(T
GErSGN
SNA
RETURN
SMA CL.A
J"1P STARTI.
run
F'GET ' ! CONi
F'Oiv t TEM
f'PUT I TEM
_ . ___ ••
,
2~03
5~11
5?12
IT AKE ABSOLUTE VALUE
SPA CL.A
JMS rNtc
DCA T3
rI'lT
J'PUT 1 )(1
F'SuB 1 CONi
_
'5~.~1
1<"45
771r
e
"i~~'l!
~
5l2e'
2
'Sr(:'3
191\9
1990
1991
e
I'AG£ 1 .. 36
3427
~427
~152
;
S~~'
191'18
23136
_
1981
19(12
j99J
198 4
1985
19f,6
19!\7
Ie)
..... ..,...
~
\
_ ,,,,_,'
__
'~
,,,,,.·.~"<'L"
10
_~
f,
"'
1F'IOCL12. ~.
2:'36
2037
,'2
2""~9
21:'156
2057
2058
2059
206"
2061
2062
2~63
2£064
2365
2066
2067
2:'168
2~69
2Yl721
2~71
20'12
2073
2074
2217'
2076
2077
2078
2'-179
212180
2081
2~82
STA~TI.
; f'Ci T3
TA~
5::'66
)','14
DCA F'L·C
5,' ;2
;,'4
175
3"4
3;l4
50;3
~r.4
11",;4
1I~;5
5~;6
3'15
uCA
DCA
!:lCA
lAC
DCA
44\)
rI~T
0;;-67
~~;0
~;'h
i51C2
51')3
5124
135
4'15
5ii0
5111
4756
1342
4756
1331
4'56
!51~6
5H~7
134'
5112
5113
51i4
5115
5116
5117
5120
5121
5i22
1"334
4'56
i331
4756
1326
4756
1635
5123
5124
5125
'5126
5127
5130
~ HIe! 21
5634
"~0"
3777
4r.00
4Ul0
;777
2517
5134
5135
5136
;776
4113
7211
'.5140
~i41
45
:.~
..
4t-
~~
H
""210
3717
L2,
"'77
;776
25~5
3301
;'75
,-'
•
.~.
~
-
.
.~'o.
I
TEM
4000
41210
L3.
L4,
.,,77
2517
~310
7'176
4113
'1211
ILOGARiT~M CONSTANTS
,776
LOC'.
2535
3301
7775
LOG6.
"/111.6
'':
TE~l
.,., '2
!,31C~
151.37
I
F'LAe·l
F'LAC.2
F'LAC.3
F'MuL. LOG2
F'PuT 1 )(1
F'GrT I TEM
F'SUB J CON1
F'PuT 1 TEM
F'MUL LOG8
F'4(10 LOG7
rHUL J TEM
F'AOO LOG6
'MUl. I TEM
rAOO l.OG'
F'MUl. J TEM
F'A60 l.4
F'MUL J TEM
F' AM L3
F'MUL 1 TEM
'ADO\..2
F'MUL 1 TEM
F'ADO L1
F'MUL J TEM
F'AOO 1 Xl
F'Elt T
JHP 1 EXIU
L1,
7742
;"177
5131
5132
5133
IS
\
435
151"'5
2~e6
uo
4;55
663
,75
263
675
15101
P13
C~lA
7~C
liZ;?
5100
'.5 42
5 43
15 44
,':<~;:·:;.9
724
1::"65
2083
2084
20S5
2Vl86
21"87
~~s"
n: lC of
eLi. c....
~
~i'3
2~4'
2055
(.
l1;JAN-?1
J:'(l\
2"41
2042
2043
2:'H4
.
~
V~"3
'5"~4
U'40
21!46
2P'47
2:;'48
2049
20521 .
22'51
2Q152
2€53
22'54
";\
,
15:'!-3
2~38
tAP"
~.
~;1il
2311i'J6
PAGE
1.
•
(.
IF'OCL12,:t7
2Z91
2\;92
2Pl93
51SC
"5151
"it52
2!!'94
-;i1:;3
2~95
"5154
21396
2M7
2:198
2099
L~G1.
43,'14
;171
1316'"
15170
5171
51';2
l5i;3
51;4
'0£l~
,', C'~ ['!
4451
7240
5163
6213
5126
6213
5130
6213
5132
HU
2115
2116
2117
2118
2119
2121a
2121
2122
2123
2124
212'
2126
2127
2128
2129
213Q1
21:51
2132
2133
213 4
5117
4407
520~
6321
5201 ;-315
5202 2321
'5203 \)0""
5204 104'
5205 7740
52016· 11)214
5201 1045
5211i] ;70ill
5211 5'36
4451
~212
~2i3 ;e43
'5214 3t1133
21:55
;"~00
2136
2131
2138
213 9
2140
2141
2142
2143
2144
2145
'5171
5215
521.6
5217
5220
5221
1}222
5223
.,224
'5225
'5226
~2?7
., '523(IJ
5231
'52:52
LOGS,
44707
331:'15
6325
4453
44fi'17
701:'10
6321
,'325
7321
4305
6321
,~311
. ~0e'
11~JAN"71
23106.
.'
PAGE 1.38
7771
2'-'6
4j}!4
1711
4544
4544
4126
" ~eO!
2613
4414
'5162
'5163
5164
'5165
5166
5161
21~4
;174
22~6
'51 ';6
';157
21~1
21~2
210'
2106
2101
21f1'J8
2109
2111a
2111
2112
V·'.;
.i 735
!5161
3
:d ALP
'5155
212'0
21.,3
(.
1735
TEM,
L::lG2,
TEMP
.l
2613
4414
F'I.AG1,
F'~e:G.
t':
~
JMS I MINSKt
CL.A CMA
JMP I PNEG
6213
lelF' CDJ:" tel ••••••••
LO.
JMP
XL.O
6213
ICJF' COr
Le.
JMP
xU:
6213
ICJF' cOr 10/ ••••••••
LL..
JMP
xL.I..
IrL.OATi~G POINT SINE AND eOSIN!:
I··.···
..
1"'/···
••••
•
I.·.·
.....
I........
.5177
F'cos.
F'SlN,
F'tNT
ICOSeX)'SINCP%/2;X)
F'PuT X
F'GtT PlOT
F'SUB X
F'ExT
CETSGN
SMA SU CLA
JMP MOD
GETSGN
SMA CL.A
~£TURN
JMS I MtNSKI
IYES
SlNCe)8" ,
INOISINC;X),;SIN(X)
DCA T3
IRE:DUCE X MODUL.o 2 FI
CMA
MOO.
•
F'lNT
TWOPI
F'PuT XSQR
F"OjV
rExT
JMS I INTEGER
\
F" I ~lT
rNOR
rPUT X
rGe:T XSQ~
rsuB x
F"MUL TIoIOPl
,,"PuT X
rSU9 PI
rExT
IX34
;111~
1)'~5
5244
152H
15237
1!j,4:l
5?41
15'42
5243
5244
1033
5245
.321
2315
5,46
5247
1325lll
5251
5252
5253
15254
15255
5256
5257
5260
5261
5262
5263
15264
5265
5266
5267
527~
52h
52;2
52;3
152;4
152;5
44:.1'7
6321
:l\:Jf}
7;'4~
3033
44~7
.~~2'
F'GU PI
IstN(X)~SrN(Pl·l()
2"'33
!-Bel3
3110
~·"02
~~13
31H'1
3'56
l5~t5
·AI(1] 1
15~16
311"1
3756
3235
X
rOiv PlOT
F'PUT
F'MUL
F'PUT
F'G£T
F'MUL
F'AOO
F'MUL
,AOO
F'MUL
F'AOO
F'MUL
F'AOO
F'MUI.
4~25
5536
4451
5536
F'SuB X
F'PuT X
r£lCT
rtNT
F'C[T
4325
1335
4325
1341
4325
1345
3235
•
PALG.
,~331
5310
15311
'5320
1l(PI/2'I
;;311
4407
('321
3h5
6321
4321
6325
•
GEi'SGN
:?321
6321
~00"
"
SIGN
IVEs
3156
5~14
/INVERT TH£
INO
5306
5301
5311
5312
/YES
It-JO, SlN(X~P!)·.SIN(X)
rtNT
i1~~0
53~5
PAGE.
"
GETSGN
SPA CI.A
JMP PCWECK
F' 1~~ T
F'PUT X
F'£XT
TAD T3
CMA
DCA T3
\
PCHECK; F"I'ilT
rGEf )(
F'SuB PlOT
rEleT
526~
44~7
53~QJ
5303
23106
SPA CI.A
JMP PALG
1315
4321
5304
11;JAN·'1"
H345
'77Ul
5:;!i6
5211
5321
15332
v;,!I'3
EXtT2,
X
l(
XS"QR
C9
.)(SQR
C1
XSQ~
C5
XSQR
Cs
XSQR
PlOT
)(
rEXT
lSi! 13
RETURN
JMS r MINSKI
RETURN
Ico~sn\jts AND POINTERS
TWOPI, ~003
3110
3156
3235
PI,
/C3155) .. "OR 4.WORD
~0~2
3110
3756
3235
~2~5
PlOT.
..
_
IUSEO BV
0~~1
3110
3156
3235
....
--- - .-- ._._ .•.
'
Sr~[
AND COSINE
•
. . . . . _ '0._.______. W____ ..____ .... __
•
(.
,F'OCL12.31
22::'1
22,"2
22,'3
22;04
22(;5
22r.6
2207
22~S
22r9
2210
2211
2212
2213
2214
221'
2216
2217
2218
2219
2220
2221
2222
2223
2224
222'
2226
2227
2228
2229
223121
2231
2232
2233
2234
2235
2236
2237
2238
2239
22421
2241
2242
2243
2244
2245
2246
2247
2248
2249
2250
2251
~~
2!.
~:t22
~~=!3
1l3~4
VW3
11:JA~:
. :tc
X,
,,"' ......
"0~0I
;\~15
15~35
1771
5464
5514
6150
7715
2431
5361
4736
5336
5337
534~
'5~41
5342
'5343
5344
XSQi1~
13345
i' Ill" 121
5325
;
f·l,
fI.
I
\~1i'I0~
'SI'IE CONSTANTS
C9,
7164
'25"'1
7015
112142
1711
5464
5514
615121
7715
2431
5361
4136
C7,
C5,
el,
01210121
,~414
3161
.
0000
0000
1~42
5:H6
15347
5350
•
~0(1!3
2501
5333
15334
PACE 1-40
;11?? .J
N11Zi3
.
231~6
71
....~
, .~lle
5331 ';164
~332
~
:~~:,
' ee"
3 2'
Jr..' c,.
~ C~~
~:!
,lEND or
5325
0414
3167
EXTENOEO F'UNCTIoNS.
0 1 , EXPRESS IOI\j
ISETS ClOC\( ACCOROING To [xpr:tESSiON
'HA~oLU
5351
5352
5353
15354
5355
15~56
5357
15360
15361
13362
15363
15364
15365
5366
53~1
53721
13371
5372
"1373
5~;4
53i5
5~;7
2253
,:lAL1;-'
. ,"'J '"
~"'"
:0r'~
5~'6
2252
\
~:!26
~327
1i!:t25
,
!.
4'40
1612
4407
43"
I
Se:TCll<; PUSHJ
EVAI.-l
rINT
rMUl
rEXT
CLLR
:: ~(H'
6132
6134
4453
6133
72('10
1 ~"~6
CL[N
JMS I
Cl.A8
CLA
TA6
eL.lR
6132
TAO
CI.£N
TAO
1123
6134
1314
CL.LR
6132
;200
5773
:"611
46?0
:007
47JC
1M"
eLA
046N~
,
JMI' I
PRne
46~""
........
,,,........
........
,I........
.•••••..
........
,........
INTEGER ,........
,I.·.····.
........
I.·.····.
,
........
C211l"
.. •· •.
,,I.·........
,,........
........
,........
........
.. •· ..
,,I.·........
........
MHUNORO
/
;.
~:
"1. ....
of
C102l
04600
•• 1
f.\IoiUNORO. 714700 J 0
II'AG£ 1 • iNPUT IOUTPUT ROUT I ~J£S
POINT PACKAGE'.
1F'L.OATi"iG
F'O~
THt F'OCAl
(
lIN tHE
225 4
2255
2256
I
I
I
I
I
2257
2258
2259
2260
2261
2262
2263
2264
2265
2266
2267'
2268
2269
2270
2271
2272
2213
2274
2275
2276
2217
2278
2279
2280
228 1
2282
. 2283
2284
228 5
2286
2287
2288
2289
2290
2291
2292
,;:294,
2295
2296
2297
2298
2299
54(,!0
'Z~6
54t'J
"Gl0~
TAD F'ISW
54213
4557
'122
3032
RTl6
154it'l
5411
5412
15413
1541'"
5415
15416
15411
1~32
TAD T1
71il41
;453
1326
3335
CIA
SNA
tAo
MO
OCA F'COUNT
tAo F'l Sw
1~!52
;450
5241
"1122
3333
SNA
JHP R6
AND p17
ICJHP FPRNT) • FoR NO ROUNOGIN.
"~O'TINC OUTPUT'
'/Y£S. ROUND oF', TO MAX.NO. PLACES
DCA DEep
TAO FCOUNT
TAO DEep
I ' .. 0 ) 0 1
/YEs
'5424
;240
.*5
15425
let32
3333
DCA
otcp
IMAKE 0
5426
5431
15432
!5433
15434
15435
CLA CMA
TAO T1
CMA
1033
;50£1
TAO T3
ICO~~ARE
SMA
I
CLA
72"0
1932
,510
5263
1.326
IYtS. NO ROUNOING NEEDED. GO TO PRiNT
INO, ROUND TO 0*[ PLACES,
ITO A MAXIMUU or 0 PLACES
TAO 1'10
1)440
;2~l0
5441
5442
1327
el.A
TAO RN02
DCi. T2
TAD I BUF'ST
TAO 't'2
OCA PLC[
2300
'5447
2302
23",3
230 4
23.'5
7041
15450
~LHl
5451
1325
2736
t736
133:;'1
~4153
5454
15455
5456
•
1~'1
"1~
5265
RET.
DECIMAL EXPONENT
r .. n ) E:7
INO, ROU~O orF TO ~F PL~CES
JM? 'PANTw2
SMA
1731
1011
3336
'-1
/YES
SPA
3071
II
TAO T1
,5o",
C;452
INO,
7214£1
'5436
111437
'5443
t;444
C~UNTS.
INO, COMPUTE F'tELO SIlES
JM?
15427
'5430
• -SET
ANO pH
SPA
15421
15422
5423
AVAILA~LE
DCA T1
1335
1333
;51'3
5230
5423
-soP
INUM9t~ or O~ClMAL DIGITS OUT
OIGnh6
TGO,I 0
ISAVE MAX~ NUMBER or ~IGITS
DCA SCOUNT
1~52
5405
154"6
54""
_"1510
.oECP
.54;10
3334
2:3~1
23il6
COM~[NTS 3E~O~I;
NUMBrR or QIGITS ~~ BE OUTPUT
a II NUM8F'R or DECtMA~ oLAcrS
E - DECIMAL Ex?ONE~T
? = NUM8E~ OF PLACES ~E~AI~ING TO sE
~~INTED S[rORE otCI~AL POI~T
D
54~1
5445
15446
2307
23?8
r
5432
~4~4
•
231~6
IF'OCL12,.
TAO T2
CIA
DCA T2
TAD 1<5
ISl I PLC£:
TAD I PLCE
TAD OM12
SPA CLA
JMP F'PANT
I
o.t < '" t
I
-ROUND
U, •
Is'vr NUI.IB£R*10r PLACES TO qOUNO TO.
.T
ISET U' BurrER ~DORESS
W~ICM
IROu~O~NC OF'r S~OULO ST.RT
ISET UP COUNT OF MAxfMUM NU~8ER
CARRIES ALLOwABLE
ILtTTI.£ EXTRA ON FIRST DICIT.
IAOO 1 To DIGIT AT CU~RENT POSITION
lor
ICA~~Y REQUIRED?
I~O. GO TO ouTPUT
•
, /
,.
I
:.
IrO~L12."
;; tALl G
23:1 9
~4~':'
2~121
! t
2:'H1
2312
2313
231 4
2315
231 6
2317
2:318
231 9
2320
2321
2322
2323
2324
2325
2326
2327
2328
2329
233"
2331
2332
2333
2334
233'
2336
2337
2:538
2339
234"
2341
2342
2343
2344
2345
2346
2347
234B
2349
2350
2351
2352
2353
~ ~
"~11
5321
!"~2
~4~3
. . ,36
2"'33
~H4
72i..·(iI
,="~5
!
~'H
~'~7
165!~
5471
5';2
~d3
'54;4
54.;5
54.;6
54;'
55~~
55£l1
5522
5523
5115114
55~5
15.536
55;.17
5510
5511
1!S5i2
5513
1551.4
5515
5516
1333
;5elfJ
;2~e
i~;52
1f;'101
3336
'5'526
5252
:'El04
;772
5527
:1~~7
5530
7766
615(3
6154
5532
5533
5535
;
~0"
.' 0fl(,:
~. ~'" £I
5530
!'5.36
5537
:' ~~!~
4132
233;
2~59
1)540
2360
2:561
5541
5736
5542
56~C
2363
'5543
HI40
5544
236~
BACK;
;710
lU5
4336
2eJ32
5303
1102
1033
DCA r Pl.eE
ISl T2
JMP DECR
lSi! I "LeE
ISiZ T3
lyES, MAKE CURRENT OIGtT 2t~o
laEGINNI~G or BurrER QEACHED?
1'-.;0, OECR£~E~T BUFFER ACDRESS A"JO REI'EAT
lyES, SET MANTISSA TO 0,1
ICO"lPENSATE BV INCREMENTING EX~ONE~T
TAD rtsw
CLA
.,IMP FLOUT
TAC FCOUtJT
TAD T3
SMA Si!A
JMP FLOUTe1
TAO DEC!'
SMA
el.i
cli
TAD T3
CtA
7650
534;5
1232
5524
5525
2355
2358
5355
;a41
1"133
72141
3r.32
1M!33
231216
CI.A
tN,
OECR~
K'.
HO,
RN02.
OM12,
BUF'ST,
OF'UT;
DEep,
DCA
TAD
TAD
SNi
JMP
TAD
lAO
SPA
DIG
11
qEGISTER ALREADV SET, ;.
I , a 0 7
IYES, OUTPUT AS FLOATING NUM8ER
IAUT~~INOEX
I £ )., ?
IV!::S,CONVERT TO E
~
.P~tNh
rOR~AT
I E ( "'0 7
INO, TAKE I' .. E
lyES, TAKE P " F.O
ISET UP MINUS P
IpR I '-IT 00,'000
I P , t 7
Iyts. PRINT olGIT
INO,
I P ) 1 ?
Ct.A
M2" IYES. TAKE SPACE C240.26~)1 OTIo4ERWlSE ZERO
IpRINT CHARACTER
JMS OUTA
IP C~ARACT£RS PRINTEO?
lSi! T1
INO
JMP 8ACl(
TAD PER
IYES,
PRiNTC
IPR! '-.IT O[Ci MAL. POINT
JHP BACI<
CMA
IBACKUP TO TOP 0;: BurFER,
TAD pl.e£
Dci PIoC[
JMP RET
tAo
,.
4
"OtGITS
DIGHS·1
·12
SAOR
OUTOG
"
.
SCOUNT;
'"
FCOUNT; c
PLCEa.f
..
aUTA ~
JMS
ISl
JMf:)
JMF'.
otG,
11
T3
T1
CL.A
.'
.'
!'AGE 1.. 42
11;'JAN"'l
SNA
1335
lJ33
754(3
5'523
155:31
FPRNT,
'5356
5522
5521
'.1'534
2357
~c52
4551
5303
;:H0
1336
55i7
55~~
2:554
23S6
3136
S;l~:'
'54;;:
v~~3
eMA
I'iQDlrUBL.E I.OCATIONS
I OPiJT
F'COUNT
t OUTA
I TGO
to\O T3
.'
IMOOtF'IEO REGISTERS.
IPr:tI~:T
CHARAr:TEFI
Ir C4ARACTrRS PRINTED?
INO, RETIJRN
lyES. NUP-'BER rtNSHEO
IREOUCE E, BV 1
Y
DIALlr
IF'OCL12 • •
2364
2365
2366
2367
2368
2369
2370
2:511
2372
2313
23,4
23"
23,6
2317,
231S ..
23'9
2380
2361
2382
2383
2384
2385
2366
2387
2388
23S9
2390
2391
2392
2393
2394
239'
2396
2397
2396
2399
24"'"
24~1
2402
2403
24('14
2405
24P16
2407
24CB
2409
241"
2411
2412
2413
2414
2415
2416
2417
2418
11-JAN .. 71
VZ!"3
2310~
45
~:~33
DCA
I5S46
334
.. 353
tSiI SCOU'~T
JMP ,.4
14f;1E
7\14 !~
C"1A
S551
3334
'5'552
'5313
1414
5313
DCA
INO
IYEs.
5547
555:.'1
15553
'5554
:<
1S555
72a~
5556
5557
1Ij56Z
1Ij561
5562
5563
15564
5565
5566
15567
55;0
55h
55;2
55;3
4132
!~74
~!5;5
5576
5d1
1122
4551
220(11
1414
4336
2334
5362
,"4Pi
3334
5363
(:090
1045
3~5"
U4S
;710
4451
5171
56"~
56111"
1J601
5632
5603
5604
!11605
5606
5601
5619
5611
5612
56i3
1J6144
5615
5616
5617
5620
5621
'5622
5623
5624
15625
15626
5627
•
ilia""
3046
3U4
3"45
304'
3314
:H'50
,066
1264
745f'
52211l
1111
;648
5221
'~40
3""0
4666
1966
1265
,65l'1
5220
4227
56"0
:~,~00
J~I:I
SCOUI~T
IN
TAD
I F'LTXR
JMP
IN
cd
JMS I OpuT
145 PER
PRiNTC
lSi T(;O
t~,!l I n TXR
JMS OUT A
lSi! SCOU"IT
JMP
CMA
ABSOLV;
Dci
JMP
13
T3
100 F'L.·OAT IN G au TPUT
HOUT.
PAGE
.-3
SCOUNT
._5
ALL SIC.
I~ESET COU~T
nGs.
TO
/AND LEAVE CeAC)
.
USE01
•
~1
~
ITAKE NExT DIGIT F'ROM BUF'Pe:q
II' OUTPuT TOO LARGE.
IPRINT "0"
IPRINT " .• "
IsteCND ~e:TURN
/TAKI\: NEXT DIGIT F'ROM BurrER
IPJ:tPIT IT
ITEST rOR £~o OF' INPUT
lAND REPEAT
IOUTPUT
EXTRA
cEROS.
0
TAO HORD
Dci SIGNF'
TAO HORO
·SPA CLA
JMS I MINSKI
JMP 1 ABSOLV _
loouRLr PRrCISION DECIMAL-SINARy
~lNPuT AND CONVERSION roA • oR _ XXX '•••
.56A0
OECONV; 0
DCA LORD
DCA EXP
Ic£RO THE EXPONENT AND
DCA MORO
IINITIALIlE rLaATING 4C.
DCA OV £I:! 2
·"ocl ONUMBR
DCA SIGNF'
TAO CHAR
,ALLOW KEVBOARD SJGN CHECKS.
TAO MPL,US
SNA
JMP
I.SIGN' GET NEXT
TAO 112
IC"I[CI< - SiGN
Sli CLA
JMP •• 4
CMA
lIN IT ,SIGN CHECK TO pas.
OCA SIGNF'
JMS I XINPUT
IGtT NEXt
TAO CMU
IA SPACE PERHAPS?
TAO MSPACE
SNA CLA
JMP •• 4 .
JMS otCON
JMP I D£CONV
OECON, ~
,.,
.. -
--------------------_._-
-
•••••_
•
•
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ • - - . _ . _ •• 0 • • •
•
•
.:...
2419
242'"
2421 '
2422
2423
2424
2425
2426
2427
2428
2429
2430
2431
2432
2433
2434
2435
2436
2437
2438
2439
2440
2441
2442
2443
2444
2445
2446
2447
2448
2449
245'"
2451
2452
2453
2454
2455
2456
2457
2458
2459
.
563ft
15631
1)632
5633
'5634
5635
,
'..
DIAL1~
IrOCL12.~1
.'
Ie'
(e
V:~~~3
t066
1262
",621
4561
5627
5247
5637 11'1,54
5640 3313
5641 4261
5642 2314
5643 ;640
'5644 4566
5645 01666
5646 5230
5647 11366
'5650 1112
5651 7710
5652 5621
5653 1~66
5654 1263
5655 7140
5656 5627
5651 1066
'5660 ,122
'5661 524'"
5662 ;413
5663 ;446
5664 7525
'5665 ;'40
5666 \~'156
5667 (''''00
5,6711! H!41
56h 3043
5672 1046
56;3 :5~42
56i4 Hl45
5675 3041
'5676 3312
156;7 4315
'563~
'5;c:lt!!
57\11
2461ll
, 2461
'5702
G)7l'l3
2462
11)7:')4
2463
246 4
570'
5;rt.6
2465
c;; i?17
2466
2467
57H~
5;11
2 468
2469 ,
I5H2
2470
ISh3
15714,
2471
2472
sh5
2473 ,,'".,h 6
4315
4~33
4315
1.313
3!H3
3"'42
3(~41
433:5
1312
5667
.. ;:1~"i
.iJ~'~~
. N':1 .
,;1 Y'''
tH7
l1:J"~ .. l1
2311')6
fA:.! CHAR
T'O MINE
/TEST LEAD CIotARACTER F''O'>I
S~jA
76521
OSAvE,
F'AGE 2,.44
Cl.A
J"1P I OEeON
TESTN
JMI' I OEeON
JMF' OTST
TAe SORTCN
DCA DIGlT
JMS t-IUI.T1:1l
lSi! DNUtoIBR
Si!A Cl.A
T£R~tNA.TOR
IE
I.
IOT~ER
IN
lyES
IREMA IN MUST U
leo U\J TOt Gt TS
'J
Sl~C£
OVERrL.OW IS CHECI(EO
IINPuT.OvERF'LO ... ERROR
XINPUT
JMS I
ICONTI NUt
JMP DECON·l
IAI.LOW A;Z
TAO
CHAR
OTST.
TAD MINUSA
SPA eLA
JMP I OECON
TAO CMAR
TAO MINUSi!
SlA SMA Cl.A
IUSE SIX BiTS'OF' ASCII
JMP I OEeON
TAD CMAR
AND p7'1
JMP OSAVE
1(1532); ,OR AMPERSAND
';'305
MIN£~
..
332
"'lNUsl~
MPLUS, e253
MSPAcE; .ura
XIN~UT; lNPUT
/ROUTIN£ TO ~Ul.TtPLY rLAC BY UN (10)
~Ul.T1C; 0
OV£R2
TAD
DCA OVEIU
IOOUq~£ PR£CISION WORD
TAO LORD
IBY
TEN (OECiMAL)
DCA AC~L
IRtMAIN!REMAINOEq
TAO HORD
DCA AC1101
IC~EAR CVERrLOw wORD
DCA REMAIN
ICALL SUBROUTINE TO
JMS MUl.T2
IMUL Tl PLY BY TwO
JMS MUI.T2
ICALL OOUBLE ADD
JMS OUBlAO
JMS MUl.T2
IAOO LAST DIGIT RECEIVED
TAD DIGIT
DCA OVERl
DCA ACtL
DCA AC1H
JMS DUBlAO
IEXIT "'lT~ I:trMAINO[R
HO REMAIN
/lN AC
JMP I MUL T10
REMAIN; ..."
ISTORAGE rOR DIGIT
DIGtT, ""I
I!NUMBER or nIGITS
D"U~8R; '-'
IMUL TlI'L Y Ov£R2, 1.0~Of i-lORO BY 2
tll,lL T2, 0
TAD OVER2
ER~OR2
*'
"
. ,A
'
/
"
,'~:t~~7'-·
/
~
,'OC L12.:s.
2474
247'
2476
247 7
2478
2479
2480
2481
2482
2493
2484
2485
2486
248 7
2488 ".."
-2459
249"
2491
2492
2493
2494
249'
2496
2497
2498
2499
2503
2501
25",2
2503
25~4
25e15
2506
25r17
2508
25,,9
251"
2511
2512
2513
251 4
2515
2516
251 7
2518
251 9
2521111
~
eIAL1"
17 -711'4
5;2~
3~47
5; 11
1l~46
5;22
5;23
'5;24
5125
5;26
7ge.4
JI.145
7~cr4
5731
5;33
i'
~;J0
5;32
15;34
5;35
5736
5;37
5715
0021
73"0
1G.'47
lIiJ43
3041
5;.1.'1
;~04
5;41
5742
5;43
t"46
5;44
5745
15146
5;4'
5150
5;51
5152
5153
5;54
5;55
5;56
5;57
5;6eJ
5161
5;62
5;63
5;64
5;65
5;66
5;61
5;;0
51h
5;;2
5;;3
5;74
1~42
3046
7"'04
t045
1"41
3~45
;11104
lH2
3312
5733
,taP;"
;3~~
39143
~"4'"
6377
6n3
6004
1045
•
RAR
Dci AC1L
TAO OVER1
R,Uil
Dci OVER1
l~43
M~~2
252&
AC11o!
DCA .C1H
;01"
2525
;'0rIJ
•
_INK
Cl.l CMI.
3"42
;610
BIt is
RAR
;01"
6"0,1
2526
252 7
tAo
TAO AC11.
,~" 00
t~SEqT
HORD
REMAIN
3041
1"42
4566
PAGE
RAL
DCA RE:MAI"l
JMO I MULT2
/TRIPLE PREc UION ADeITloN
OUBlAC; 21
CI.A Cl.l
TAO OVER2
TAD OVER1
DCA OVER2
RAL
TAD L.ORe
TAO AC1L
eCA L.ORe
RAt:
TAO HORO
TAO AC1~
DCA HOAD
RAL
TAO REMAIN
tWiTH OVERrL.OW
CCA REMAIN
JMP I. DUBLAD
1.'1
ISIo41FT oPERAND RiGHT
CIV1~
ITR!PLE PRECiSIONCI.A CLL.
,au
5154
5754
23106
LORD
HORD
SPA
2522
2523
2524
6Q1M
, TAD
RAL ,CARRY
OVER2
LORD
1"41
7510
71213
600"
2521
eL.L
JCA
TA::'
RAL
DCA
tAb
RAL
DCA
~~46
3t145
1312
""04
3312
5;27
11;JAN .. 71-
Vi'l13
IS! EX1
F'SSERA;
.6""3(:'
JHP I DIVl
JMP I DrY1
ERROR~
IF'LOATi"4G OUTPUT
F'L.OUTP. "
S!0n
_....
- ._-'" - ._.
_.
,-"
-
e-
,._'.'"
.. - .... -...... _,
. .... ----- -----_ ....• -
.'
•
- I
-
"7 "
(.
l"OCL12.~1
2529
2530
2531
2532
2533
2534
2535
2536
253 7
2538
2539
25'40
2541
2542
2543
2544
2545
2546
254 7 .
2548
2549
2,,111
2551
2552
2'53
2554
255'
2556
2557
2558
2559
256121
2561
2562
2563
256"
256'
2566
2567
2568
256 9
2570
2571
2572
2573
2574
2575
2576
2577
2578
2579
2580
2531
2562
2583
,
!:IAL.1~'
60'~5
6:iH.16
6e07
II.: ,! 3
4551
<1153
611'11 . 3J33
6~t2 '1?144
;!5U
6.~13
. 6~14 5221
6~15
f:>02 •
6~24
61i125
6~26
6Z27
6030
6~31
6fl132
60'33
6~34
6035
6fi136
6037
604111
6041
\:000
7040
5225
3145
3'146
1350
3014
6(~53
6055
6056
6~57
67160
6e61
6062
6063
6L1164
CMA Cl.l.
DCA
TAO
DCA
JMS
IS!
JMP
TAD
1146
'450
5210
1342
t
11~tTIALIlt DECI~AL.
E'(PO~.t~T
~ARGEIMu~TtPL.Y
BY 1/111'·
ITOO
",..
':>,
1 DOuBI.E·
aUTCG
IROTATE OUT THE 1ST 4 BITS
.'?
ITEST rOR 10~~5,0,1·9
EXF
1 REPT
SPA CI,.A
JMP
lAC
7e01
ICOMPUTE BITS IN 1ST DIGIT
ITEM!' COUNT
IS£TUP COUNT
JMP rGo,
TAD F'M12
5264
IMULTIPI.Y BY TwO TO POSITION BI T0
IC~£AR OVERF'LOW wORD
IINIT aUF'rER POINTER
QUTCG
DCOUNT
SNA
7110
,*'
or
TOTAL OUTPUT
IIGNORE 1ST i!tRO
,;
1121-9
3414
:.'044
1342
2033
DCA 1 F'l.TXR
IS2 EXF
He' F'M12
IS2 T3
IOUTI'UT A 1
ICOU"lT hE DIGIT
ICOR~ECT REMAINDER
IBUMP DECIMAL EXPONENT
1146
t..lOF
TAll
I REPT
lSi! T3
NQP
SKP
JMS I M1~PT
DCA. I F'LTXR
lSi EXP
JMP ,113
ICOMPUTE RESu~TANT OR SECOND DletT
;~C."I'"
741121
6~h
3414
60;3
JMP ,.6
OCi. I OPT
Dci 1 R[PT
TAD SADR
DCA F'I.TXR
flO tXP
4527
2354
70(1 Q!
6072
F'G04.
3044
;:1:133
4747
~044
527~
\
r
,1,
C~~
1343
61366
6M7
6~.;21
F'G03.
714e!
6(165
l:
IAe
11344
5245
6l!l54
tA~ EXP
SPA
JMP rGO!
tAD T3
JMP F'(;02
F'1 NT
r~ul. 1 TEIIIPT
F'E)(T
61'l47
6t:152
lIS EXP ~ TO 47
.:~"~
;001
te33
5211
440'1
4'152
6042
6043
6044
6045
6050
6051
CCi. T3
TAO M4
SPA SNA CL.A
JMP rG04
rl!liT
F'MUL. I PPTtN
rtXT
3~54
6~46
IPRlt-.!T ";" OR A SPACE,
•
i
SlA
H4~
6Q!t6 . t341
6017 7150
5234
6~2(1
61"21 4407
6022 4744
Ml23
1w'
SMSP
H.;:: 'SMtN
rQI.,TC
J'1S I ABSOL.2
Hr'I
1334
1336
6~10
U;'J,a' ·71
PAGE
23106
l'
F'GOS.
.
• ; . ,A
lIE, ,672X10ah .12, • ETC
...
IAI.I. DIGtTS oUTPuT??
INOI CONTINUE
;
,./
IF'OCL12.~.
rI ALH'I
V;W:5
TAll SADR
DCA n. TXR
TAO DCOUliT
JMS I ROUND
JMP I n.OUTP
TAD CHRT
PRINTC
IOUTPUT t~~ EXPONENT
, tAD T3
2584
",74
·t:55J
2585
2586
2537
2558
2589
2590
2591
6::-;5
6,,;7
3,<114
1343
4751
6H"~
56il~
61;)1
6i02
1333
4551
6103
61<'4
6105
;510
2~92
2593
2594
2595
2596
2597
2598
2599
260"
2601
2602
2603
2604
260'
261216
261217
26"8
26~9
2610
2611
2612
2613
2614
261'
2616
261 7
2618
2619
2620
2621
2622
2623
2624
2625
2626
2627
2628
2629
263"
2631
2632
2633
2634
2635
2636
2637
6:";6
6106
6137
611~
6iil
6ii2
6113
6114
611'
6116
6117
6120
6121
6122
6123
6124
6125
6126
6127
6130
6131
6132
6133
61:54
6135
6136
6131
6140
6141
6i42
6143
6144
6145
6146
1233
~J4e
3345
;~40
5630
6151
6i52
6153
~i 5.4
6211
5571
6161
•
TAb EXP
ScA
JMS OUTDG
TAO ~ORO
lIH4
;440
4354
1245
4132
~712
54~(l
'!J I'l QI
.1113
45'51
5754
;150
2333
10UTI=IUT MA'HySSA
"Ix~O ~OI~T OONE
I~RI'JT
•
"t"
ITAKE ABSOL.UTE VALUE 0' EXPONENT
._3
5315
;714
;766
1771
6275
5113
TER
ISl EXFI
tAD M1H
SMA
JMP
TAO C144
Dci HORO
CMA
;5",,,
'~144
BUrrE~
PRINTC
tAD HORO
1337
5667
7467
61'57
616i1l
TAO T3
SHA CI.A
tAB H2
TAD SHIN
l045
2044
r2',
IINI'
~AGE)III
ISAVe: • POW(R
IPRINT SIGN
DCA HORD
7"~0
6147
6150
6j55
6156
Cli
1111
1.336
4551
7634
231~6
SPA
;041
3J4;
1033
2442
(·305
'76:5
3215
11.JAN-H·
PRNTi,
CIojRT.
SMS~.
P[Q.
SMIN.
H144.
C144.
~4,
''''12.
DCOUNT;
PI='HN,
DPT,
REPT;
MH'PT,
SADR,
ROUND,
TENF'T,
ISAVE: TENS AND UNITS
IOUTPUT ·HUNOREOS
IUNU:SS HRO
IPRINT TWO DIGITS
JHS r PRNTI
JMP 1 'LOUTP
PRNT
IE (0246) - F'OR AMPERSAND
30'
240-2" I
27'
2"
';'U4
0144
.4
1-10"
1.10~
-12
INUMBER OF' OIGtTS OUTPUT
-OIGITS';'l
PTr.N
lIE I
DIGIT
REMAIN IOVER"~OW 'R('JM It>;TECER MULTIPLV·
MUL Tl0
BUrrER-l
TCO
IACTUAL OUTpllT ROUTINE:
TEN
ABSOt2; ABSOLV
OUTOG,
IOUTPUT ONE nIGIT
TAO C2621
"PR!NTC
RAN"'UI.~
JMP I OUTOG
1150'2333,5733
I·· •• ••••
•
•
. -,'
l
:.d'.1.1f
6\62
2638
2639
26.;(!
2641
26-=2
2643
2644
264'
2646
2647
2648
2649
2650
2651
2652
2653
2654
2655
26'56
2657
2658
2659
2660
2661
2662
2663
2664
266'
2666
2667
2668
2669
2612
2671
2672
2673
2674
267'
2676
26'71
2678
2679
2681!l
2681
2682
26~3
263 4
2685
2666
1.1 63
6164
6165
t'J166
6167
617(!1
6171
6172
61;3
6i74
5133
1167
3171
117(11
3173
1002
6212
2~BO
6176
6213
5134
6200
6201
sueS2
DCA
SUBS
tAO
. LE"SJ92
DCA
U:SUBS
I. WE: I ;,,"
TAO
6212
JMS I
I Si! I
JI1P I
I.S, .
STOR!T
7
,·1
6213
.62e0
41~6
U!66
6214
6215
6216
6211
eI
sU
CLA
Jt-1S I
xJr~
T),O CHAR
TAD M2'0
SNA CLA
1114
7650
521212
47132
1066
1115
7640
5221
411216
DCA EXP
JMS t RESOL.5
JMS f I NORM
F'l NT
F'PuT I PT1
INOR~ALI~E
i31B
lJ66
6233
6;34
6?35
6<,36
6237
6,40
~e:~T
TAD MINUSE:
sH Ct.A
JMP ENOrI.:S
764et
5246
41~6
4702
41,14
ltJ47
1~33
6242
3033
6'43
44~7
:.0430
tAD p43
IREAD 'IRST olGIT GROUP
IANO SET "SIGNr"
I[NDED BY PERIOD?
or
DIGITS IN T3
F'iRST,
TH£~
..
-,.,,,,
.-
ISAVE NUMBE:R
TAD CHAR
1301
2668
6~44
F'tG01,
3BH
4?"H
4701
;-t;'!C!O
IIF' CCAC) ! e, USE CHAR
/1' CCAC) NO~8lERO , G[T NEXT
IGtT rtRST c~AR
IIGNORt LEADING SPACES
INO,
6222
6223
6231
6232
LIBRARY SAVE
DCA 13
CHI. lAC
3''''
6,31!l
I ••••••••
IS AVE NUMBER
;G41
6221
/
TAb I OPN
6220
6221
44~7
643~
/
IYES, READ 2ANO GROUP
",'!l'3
6225
6;26
.......
.
.......
.
I.· ......
I.· ......
·~
jMS I DPCVPT
tAO CHAR
TAO MP£R
SeA CLA
JMP F'1C:01
JMS I XtN
OCi I OPN
JHS I aeoNP
6224
·jt • •
JMP ,.4
3105
32133
ro~
"'!.OATING ~OINT INPUT
F'L.INTP;
62~2
/
CALLS STORJ~G ROUTINE
S r~(x).
ICIr COr 10/]*~" •• "
XLS
I ••••••••
JMP
·'0"'P.l
7640
M'03
621'14
62""
6206
62e7
6210
6211
6212
6213
........
I.·I.·.......
.... ....
/0'0 •• 0 ••
' •• 0 •••••
/
F'PNT·1
STORt T; I TSTQR
6200
6~41
2690
2691
.'!'~..;
•
PAGE
23'0"
IUSED BY 8J<
2687
2659
LL'UT,
4775
24"'7
5714
6431
6175
6117
., . '3
JMS I XIN
JMS I DPCVPT
JHS I RESOL5
TAl) OV£R2
tAD T3
DCA T3
ICOMPENSA 1£ F"OR DECIMAL.
E~OF'I'
F'INT
rca:T I I'll
I"t"
I~O
RUo IN?
IYES, READ JRO DIGIT GROUP
IIt£~ CONVERT DECIMAL (XPONENT
IC(SEXP)PLACES To
10' LAST OIGIT
EXPONENTS
IRESTORE MANTISS4
.'
RIG~T
.~
IF'OCL 1 2 . 3 _
2692
45
6246
6247
6252
2693
2694
269'
2696
2697
2698
2699
27Q'1iJ
"~51
6252
6253
6254
6255
2,n
6,'56
625'
6260
6261
2702
2703
2'04
27~5
6262
271116
rn AL.1J
56'J~
JMP 1 HI NTP
;,:.'"
44~7
643~
""30
;331
5266
440'
4271
6 430
2'11'
62;4
.;~0"
6275
6216
7715
2117
2118
2119
212it
2121
2722
2723
2724
272'
2126
2127
2728
2'29
li
~0f1
ll756
6310
0'43
6303
6:se7 ;335
•
•
IrJ til tSHED
I, IS TO THE LEF'TI
. IT hlC:S ,10f1JiIl
I.
ts TO THE RIGHTI
IMULTlPI.Y BY 10
CMA
TEN,
TAO T3
DCA T3
JMP END"I.3
0004
2.",0
""00
PTEFIj,
3146
63£16
6301
6302
F'MUL. PTEN
" rpuT I FlTl
. F'EXT
lAC
JMP ,.6
rlG04, F' I ~J T
F'MUL. TEN
F'PuT I PTl
F'EXT
~IHll1l
63"4
6305
63~"
F'INT
2400
3147
3150
H13
560e
5621
H13
5114
6277
SMA CLA
JMP rlG04
5261
4275
PAG~
/TEST DECIMAL EXPONENT
TAD T3
5F1lA
;"40
1033
3033
5246
d:i'4
2716
2;5106
745~
2708
2709
2710
2111
2112
2113
2'1 4
.
.1l. .. JAN!l71
F'£XT
CJ0
lZ:5J
6263
6264
6265
6266
6267
62?0
6271
62h
62;3
2'~7
Vl'.fl3
MINusE;
OPCvPT;
OCONP,
RESOL';
OPN.
XIN.
INORH,
PH,
00""
77"
3146
31<47
1(3146)
31'0
.305
DEcONV
DECON
RESOL.V
• FOR 4.WORD
1(1532) • 'OR AMPERSAND
DNUM8R
INPUT
CHoRM
43
lEND 0; F'LOA TI NG POINT iNPUT
11 rREt
IUSEO BY H.S, READER
2'3~
2731
2732
2133
2134
I
21~5
2736
2137
2738
2739
214~
2741
2142
2743
2744
27415
2146
ICALLS LOAOING ROUTINE rOR rILE
IVARIABLES IN EXPRESSIONS, CALLED BV £rUN:si
6311
6311
lJU
6HZ
6313
6314
32'56
4545
4550
1171
/
.6311
F'NUr1,
trop
Dci
CErc
TEqMSw1
;41C~
SKP
5313
JMP
632~
"'62
I.·I.·.···
..·.....
........
........
I.· •.• · ..
I.·
.. ·· .•
........
I.· ......
/
/
SO~TC
6315
6316
6317
•
CHAR
TAO
/
TiTi.;PR
._-
,-4
- .
'- ..
I ••••••••
/'
•
. _..
.. - .. -
..
"
- .-
..
.
...
- ..
.. .
-
..
-.- -
..
_..
•
I
r.
\....
,,:
01AI...I. 0
'F'OCL12.~1
2147
2148
2749
2750
1~45
2752
6326
2753
2754
2755
2156
. 6327
6330
6331
3173
j 413
6212
. 4133
5536
1533
2764"
276'
2166
2767
2768
2169
277f/J
2771
2772
2773
2774
271'
2716
2177
2178
211 9
2780
2781
2782
21S3
278 4
2?,s5
2?'86
2,s7
2788
2789
2190
2791
2192
2793
219 4
2795
2196
2197
279B
2199
28,,0
2801
6332
6333
6334
6335
6336
6337
6340
6341
6342
6343
6344
6345
63·46
6347
6350
6351
6352
6353
6354
6355
6356
6357
6360
6361
6362
6363
636.
6365
6366
6367
6310
63h
63;2
6313
6314
63;5
"3;6
64~"
64"'1
i6~1
~:~HJ0
4545
4542
d45
4550
1374
5735
5341
4335
JMS
DCA
TAD
DCA
pOpA
6212
JMS 1
JMP 1
LOADiT! ITLOAO
PEtAL!... EC.LL
0
·PASS.
GEtc
tAD
l. UP&:.
53"
1413
4'47
6365
l.£RR~
1.00.
5136
I.l.lSTt
LG.
F'PNT.
3~43
1600
74521
56£10
,
.." ,........
,........
PASS
CIoIAR
MINCOI1
CLA
l.ERR
JMP
POPA
SORTJ
U.iST-S,
LGO-LLUT
ERROR1.0
LC
LM
317
303
323
3217
MINCOM; ';'254
~'£lQl0
64~3
t
CHAR
31.
.64~"
64~2
i·
' ••• l>o •••
315
64 III !'II
730('1
~
~.-
~ORO
LS
LO
ll315
~"3H
~_50
~
SUBS
LI.
,~303
1'323
;13t'1'
7524
6213
tAo
Si!A
·;640
456.6
5167
5171
2572
5173
6116
6375
0317
JMp
JMS
tAO
1314
;712
PAGE
t
I
PUSHA
GETC
SORTC
GLiST-2,
JMp I ·PASS
12166
3047
64",4
6405
64"6
JIS
1 91 66
,,........
.........
ptCALL
INTEGER I.·.·····
,,........
........
LESu9S
,,........
........
nLt NO.
,
........
LOAOIT
EF'UN31 ,....... •••• 4).*.
,'.*.•....
23106
l1;'Jf::"l1
E~'"·'JR4
4566
6322 4734
63'3 4453
6324 . 3171
6325
2158
2759
216"
2761
2762
2163
..,;;C3
6321
2751
27~7
••
~
. "',./
\
6213
JMP
,........
........
........
,,........
........ JMPS ON SUBCOMMAND or I.1BR xxxx
II.·.······
.•• ·•·••
,,........
........
........
,........
,,I··.·····
........
........
,,I········
........
,,........
........
,........
........
........
/
/
/
:,..A
/
XI.C
I.·.·····
I F'LOATtNG.POINi' INTERPRETER
"OR rOCAL.
I:
CI. A CLI.
DCA OV[R2
DC,. OV£FU
TAD I "PNT
SNA
JMP
F"NT
I(NOP) • roR 4.WoRD
_ rOR 4i.woRD.
'GET NEXT INSTRUCTION
I ( NOP)
""--
,rAST [XU
~
~.~
;
,.. "
.~\
~,~
~ ....
',~
J ','
,~,
. :y';~ 1-',:
,~·.P:,",A""""~
11~JAN-71
23. "6
IGEr PAGE: BIT
5216
DCA JUt-lFi
tAD JUMP
AND C2r6Z
SNA CL,A
JMP •• 3
11~4
tAD p1600
I~O
140 1'117
IctT 7 BIT ADORESS
V~03
IFOC L12 • •
2802
28:13
28;,)4
28(,5
2826
2807
fl4;'7
641.:l
6411
1'1412
6413
6414
2808
6415
2809
28121
6416
64i7
3e4r"
2!311
64221
'264
2812
2813
281 4 ,
2815
2816·
281 7
2818
6421
6422
6423
6424
,.,425
6426
6427
6430
1264
765A
5233
6431
5572
281 9
213221
2821
2822
2623
2824
282'
2826
2627
2828
2829
2630
2831
2832
2633
2834
2835
2636
2831
2838
2839
2640 .
2841
2842
2843
2844
2845
2846
2847
6432
6433
6434
6435
6436
6437
64421
6441
6442
6443
6444
6445
6H6
6447
6450
6451
6452
6453
6454
6455
6456
6457
64621
6461
6462
6463
6464
2848
2849
2850
2851
'123
765~~
'2"0
,.,467
647~
6411
6472
2855
64t3
6474
,
11(~6
1~4e
1265
3~4e
220e
7"4~
AOO~
INO;'CO ON
IYES ,DEF'ER ,WIO AUTO-INDEX
SNA
JMP I
I.ErpUT
DCA ADCR
1.00P01; I Sf f"PNT
I ••••••••
I ••••••••
IF' PT1 WAS 2[RO, IT IS A
'11.£ VARJABLE
CMl
TAO AOOR
DCA F'L.'1(~2
IGET COMMAND
TAO JUM.-
CLL
;"'06
RTl
;45f!
SNA
~TI.
IG£T BITS 0-2.1£ OPCOOE
AND Pl'.
'-'1QI7
JMP f"loCT
5211
tAo TABLE:
DCA JUMP
TAD 1 JUMP
1266
3264
i664
;45~
SNA
JMP F'I.PT
5267
DCi. JUMP
TAO C[X1
DCA F'loTI(R
3264
13216
3014
i117
3057
1415
3414
2057
5257
5664
;0421
,.040
CONTAINS PAGE BITS
AODR
INORCT
JUMfo'
tAO I AODR
3915
1264
11216
,,4013
6575
1305
5215
1305
3'J15
•
JUMP
JMP LOOP01
1040
~HH'I2I
ICCrpNT)~.4
sNi CL.A
144"
745~
IPAGE: i!ERO?
IYEs
AND rPNT
DCA AOO~
AND
TAO
DCA
TAb
AND
3"40
l'I.'I4f1!
6465
6466
2852
2853
2854
2856
3264
1264
PAGE.
TAO Mrlo T
Dci CNTR
tAO [ F'L,TXR2
Dci 1 'L TXR
lSI CNTR
JMP •• 3
JMP I JUMP
JUMP.
"
ADORdX1
INORCT; 0400
TABLE, I TABLE
.
IGO THERE
F'LPT.
TAO COP
I£)(P TO (AOOR)
F'L,GT.
TAO CEl(p
,/(AOOR) TO C:xP
JMP .t5
Dcl rL.TXR2
CHA
tAo
AOOR
-.
)
:.
IF'OCL12.37
2657
2856
2859
286121 .
2861
2862
2863
2864
286'
2866
2867
2668
2669
267Gi1
2811
2872
2973
2874
2875
2876
2677
2878
2819
288i1
2881
2682
2883
2684
288'
2686
2887
2888
2889
289111
2891
2892
2893
2894
289'
2696
2897
2898
2699
"29210
2901
2902
29~3
2904
29('-15
29;16
2907
29C8
29Q19
291"
2911
641'
64!6
"477
65C!l0
6!5~1
65~2
6503
6504
6505
65e6
6507
6510
6511
6512
6513
11514
6515
65i6
6517
6!5?0
6521
6522
6523
6524
6525
6526
6527
6530
n31
6532
6533
6534
61535
6536
6537
6540
6541
6542
6543
6544
6545
6546
6547
655'"
6551
6'S52
6553
6554
6555
6556
6557
6';60
DlAL.lr
3~14
1117
3£157
1414
3415
2057
53"'0
52C:l1
';2'43
1.1(137
4767
4'172
52~1
4'174
4173
4175
4171
~201
11114,
72~fil
5321
:53 ....
3"'
"
3"'46
31347
522)1
4543
r644
4543
~04Pl
4544
.)044
4453
"1~
5344
;04Qj
3264
3~43
1:'145
'64,-,
4566
4543
2435
4'44
JQl44
4'44
7410
5362
4543
147~
4544
'040
6561 .... 17~
6!562
•
•
I
1'264
V,~03
11;JAN.71
23'2'6
PAGE
Dr.;: F'L.TXR
·/S4VE
'rRO~'
':" '\.5 MF'I.T
OCA CNTR
TAD I fL TXR
DCA I F"LTXR2
IS~ CNTR
JMP
JMP rPNT*l
EXP.1
CEX~.
C£Xl.
EX1-1
JI'1S 1 OPMINS
FLSU.
JMS 1 ALGN
"L.AO.
JMP F'PNT+1
JMS 1 RAR2
JMS 1 RAR1
JMS I TRAO
JMS I NORM
NORF'.
JMP F'flNh1
IlNTERpRETivE POWER
n.£)( • tAD HORe
CLA
JMP •• 6
ilERO.
DCA EXP
DOA HORe
DCA L.ORe
DCA OV[R2
JMP F'PNh1
PUSH"
F'I.AC
PUSH"
EX1
POPf'
f'L.AC
I f\ITECER
JMS
SPA
JMP .t!
CMA
/3
C~
,..52
AOORESS
4 wORDS
.-3
eCA JUMP
DCA OVER1
TAD HORO
Si!A CL.A
ERROR2
PUSHF"
POPF'
POPF'
JMP •• 6
PUSHF'
POPF'
n. TONE
IF'SUP·2
~
NEGATE THE OPERAND
ALIGN EXPONENTS
IRtTuRN iF' NO ALIGNMENT IS POSSIBL.E
fTRI~L£ PRECISION AOODITION
ISI~CE BtTS ARE sHirTED
IRIG\.lT
INOR"'AL. UE T~t RESUL.T
IHI~TIUSE 100X F'oR F'UNCTIONS.
"L.AO~1
;
rI~ST
IlERO?
ICROCI< ....
IYES
lAC TO A • POWER
ISETUP ARGUMENT
C
THE UPON£NT)
IONLV POSITlvt. INTEGER
EXPONENT.S
I(COULD CIVIC!)
ITEM' STORAGE
I(NOP) ~ 'OR 4.WORO
..
,
",,,-
ITOO LAFler OR NEGATIVE EXPONENT
IINtTIALtilE TO ONE~
\
F'I.AC
ITtRi
1TE:R1
(Xl
JMS I MULT
IS! JUMP
"r
I"MU\.TIt.
,'.... ."..
_""~
....t.
f
11>i·'-
.".".
Dl:'1..1~
V,,03
6563
6564
5355
52<'1
47n
6566
6567
6570
F'L.MV.
52~1
"OCL12.· • .
2912
2913
291 4
2915
2916
2917
2916
2919
292"
2921
2922
2923
2924
2925
2926
2921
2928
2929
29313
2931
2932
2933
2934
2935
2936
2931
2938
2939
2941
2941
2942
2943
2944
294'
2946
2941
2948
2949
2951i1
2951
2952
2953
2954
2955
2956
2951
2958
2959
296~
2961
2962
2963
296 4
296'
2066
~565
~571
65;2
65;3
6574
65;5
6576
6517
6600
6601
6602
6603
6604
66r.5
6606
6607
661e
6611
6612
6613
6614
6615
6616
6611
662r11
6621
66~2
&623
6624
6625
6626
-
&621
6630
6631
6632
6633
6634
663'
6636
6631
6640
tl641
"642
7153
;004
7335
6623
5154
OPMt!IJS;
MUL.T~
6757
RAR2;
01V2
TIUD,
DUIJl.AD
lTA8Lh.1I1
F'LAD
rLSU
F'LOV
F'LMV
FLU
5133
6'75
6510
6'0,
7107
6565
6517
,·\~HH'
6515
:-CHH'
1200
194'
7161
3"41
;0"4
1846
DJ
ACHINS; 0
CLA
TAO
CLL
Dci
RAL
TAD
CML
Dci
RAL
tAD
3045
56'"
:~B0"
104'
74'
"
1046
ALIeN.
CHi.:
Dci
JMP
~
fAD
1041
7450
SNA
t042
;450
1.1/143
7650
562:5
HH0
7041
1.344
6645
32~5
121115
;'09
;1341
•••
PAGE •
IMUL TlPLY
IROUTINE: TO COMPLEMENT F'LAC • VIA "MINSKI"
I •••••••• cts THIS CLA NECESSARY)
I •••••••• RECODINC 'OR SPACE
OVER2
I ••••••••
CHI. CIA
OVER2
I •••• •• ••
I ••••••••
LORD
I········
CIA
I •••• •• ••
I ••••• • ••
L.ORO
I ••••••••
I ••••••••
HORO
I •••• • •••
cu
HORO
I •••• •• ••
ACM·INS
ISUBROUTINt TO A~ICN
~ORD
IBINARY POiNTS
SNi
TAD LORD
SNA CL.A
JMP NOle1
TAb AC1H
7650
5311
23HJ~
au
NOR'
;"61
6646
i
ALGN,
R4Rl.
;2161
6644
.. 6647
NOR~,
3046
,BI!l4
i2l45
'450
5273
66'13
U;JAN"'1
JMP .,,6
JHP F'PNT.l
JMS tMULT
JMP rPNh1
MINUS2
OMULT
ONORM
ALiGN
Dlv1
liS
~ANTISSA
iERot
IYEs. RESU~T.OPERANO
INO,IS OPERAND !£R07
TAO ACtL
SNA
TAO
OVER1
SNA CLA
JMP t Al.IGN
TAO £le2CMA lAC
TAD
txP
IYES, £lC I fl'
£XPON£~TS
SNA
JMP AoONE
DCA ACMtNS
TAD ACHINS
IARE
IYEs
ell
INEGATE 'ANO
SMA
EaUAL7
~i;
I~O
_... -
_ ...
- ".
••
•
•
.)
·)
"O!::L12"~7
296 7
2968
2969
291~
2971
2972
2973
2974
2975
2976
2977
297S
2979
298'"
2981
2962
2983
2984
298'
2986
2987
2988
2969
29921
2991
2992
2993
2994
299'
2996
2997
2998
2999
30~"
3~1211
39102
3003
3",,4
3905
32106
30r2'7
3008
3211219
3~10
3011
3012
3('113
3014
3015
3Z!16
3e17
3018
3019
311'2"
3021
.
11%AL.l('
V·, (' :5
U;;'JAN .. 71
6651
3322
DCA AMOUNT
1'1652
-322
TAO
TAD
SPA
JMP
TAO
6653
6654
6655
6656
6657
6660
6661
6662
6663
6664
6665
6666
6667
66i~
6671
66;2
66;3
66;4
66;5
66;6
66;1
6h~
6;01
6;02
6103
6;04
6;0'
.1.336
711r.
5275
,235
;70t'
4357
~J22
112'4:5
3 iii 4III
4723
2322
5270
2223
5623
11340
7100
5304
1"44
;71111/1
5623
6i~6
'703
12"5
,.h~
5623
6711
1~40
67,,7
6712
di3
6714
6715
6116
6;t7
6;221
6h1
6;22
6;23
ASHri'.
AOONF;.
NOX,
NOX2.
NOX1;
3e1"5
"~"0
6;24
"~~~
6;25
6;26
6;27
6730
6;31
6;32
6733
6;34
6;35
4"1
1;:144
,751?
5353
;.~"1
3~43
t35?
3~41:"
4223
NOX
ACMINS
ICA~ T~t £~PnNENTS BE AI.IC~£O'
LA~G£R or TIoI£ TWO.
IYES. SHtrT THE SMALLER
INO. USE'
ASHF'T
DIV2
AMOUNT
.-2
AOOf'lE
JMP
AMOUNT
.-2
lSi! ALIGN
JMP
TAD
SMA
JMP
tA",
SMA
JMP
JMP
TAn
1 ALIGN
EX,"
CI.A
NOX2
EXP
CI.A
1 All GN
•• 3
EXF'
C~A
tAb ACMINS
SMA SU CLA
JMP I ALIGN
TAO EX1
DCA EXP
IMISSION IMPOSSIBLEI
ICHECK roR SrGN ol"ERENCE
I··
l.fII
ITEMIiI STORAGE or DI"ER£Ncr. BOTH POS EXp OR eoTIoI NEG'"
101( (.-,
IUSE I.ARGER
TAO Aell
1042
3~46
57504
TE5T2
el.A
TAO AelM
DCA HORO
1~41
1043
32147
5623
·I$AVE TIoIf. 01rr[R£NCE
AMOU~~T
TAD EXl
DCA £)(1
JMS J TAG1
SMA
;104~
3044
JMP
JMS
lSi
JMP
JMP
CMA
In
53~6
1~44
•
PAGE 3,.54
SMA CI..A
~265
5261
5273
7342'
23'0(1
OCA 1.0RD
Uo OVER1
oci OV£A2
JMP I ALIGN
,
.'
AMOUNT;
TAG1 ;
Dlv1
ILEAVE 12 91T ANSWER IN AC UPON RETURN
ILEAVE rLAC AS AN INTEGER,
"
rI x,
!3
JMS I ASSOL
TAO EXP
SPA SNA CLA
JMI' nx~
lAC
DCA OV£Rl
TAO P2'
DCA
, JMS
£xt
4J. I GN
'
,\
IVIA C1NUG£R)
ITEST rOR "RAeTtON
IDOU~I.£
CHECK rOR MINUS ONE.
IINIT ALIGNMENT
,-'
.... ,;
100 THE
ALIG~M£NT
TO AN INTEGER
•••••
<
.,,",-
~
•
.."/
".,10"
:,.
IrOCL12. :n
::11\1.1(1
3n7
7;-,3
3C7S
; ;~c4
3"'e0
;[:26
32179
7.'25
3~81
3~e2
"ln7
3083
;e31
3~84
3085
, 3086
3067
3068
3089
3090
31391
3092
32'93
3094
, 3e9'
32196
3091
32198
3099
310"
:5101
3102
3U3
, 3U4
31'"
'3106
3Ul7
3108
3111'9
, 3U"
,.3111
3112
.: 3113
.. ,3114
-311'
: 3116',
,3111,
3'118 '
3119
. 3120
.'3121
, 3122
3123
3124
3125
3126
3121
3128
3129
3130
3131
;e3kJ
l<142
4752
0e3
1046
3751
1141
4152
1032
:'a~3
1~42
7~34
4152
t 304
5263
3274
;033
;e-35
;:.'36
;~37
;~42!
;2'41
1M2
;('143
1Q144
;:"45
h46
;041
;e.50
;~51
;Q!52
,""53
;354
1~43
3151
1~45
4152
,." III 4
1046
4152
!~"" 5
111147
3151
1341
4152
""4
V;;03
11';'JM; .. 71
TA
E
TAO B
:5
TAOE
MULTY
4
DMUlT4; JMF DMOONE
DCA DATUMe6
TAD F'
SAvE
TAO A
MULTY
TAO B
MULTV
,h64
~'''''6
3~45
... h6' 130"
i~66 3046
7061' 1211
hh 31'147
11!l11
hh
11'173
;1'174
·7~;5
;e76
7~71
;1"10
he'l
71032
43~1
~041
5604
;U~
1~H"0
:'00:1'
,00r
,'3012'
'9Ia~
''''~3
22150
·;t04
4451
4141
iH15
? (H"~
h13
7106
;107
5101
11'iJ41
I(OC.
OATUM~5)~rOR
4-WORD
IA.'
IB*'
'5
TAD C
SAvE
TAO 0
IC*O
MULTV
TAO ,.
MULTV
13U
IB*£
4
H'I43
4152
7061
712162
;11163
IS*O
.TA5 0
MUL TV
7060
r0",
14·E
SAVe:
4152
h51
•
1f156
3
7056
H~42
FACE
.
~iJLTV
4
tAOE
MuLTY
'~55
;~
23106
t.
~
le-£
Ie·,
~
6
DMDON£; TAD DATU~.l
ICOPV RESULT
DCi HORD
TAO DATUM.'
DCA LORD
TAO DATUM.;'
DCA OVER2 .
JMS MUL.DIV
I(NO!') • 'OR 4.WORO
OCA OVtR2
JMP I DI'IULT
OATUM.·~.6
IINTtAMEOtAT£SToRACE
0/,6-LOW O~DtR ~£SU~T,
.,
.
'
~'."
'
(U*'
0/14
121/'3
121/,2
I'i-HIGH ORDER q£SULT
MULOiV;
ITERMINATE MUL.TIPLY ANO OIVIO£~
IS! SIGNF'
'CORRECT rOR SIGN
JMS I MINSKI
JHS I NORM'
ISHlrT LErT
I.
NOP
JHP I MULDIV
TAO AeiH
F'L.OV,
1.'DIVIDe:
"
....,.- ..
(
. ,r'..
-,) \. ...
23106
3132
3133
3134
3lJ5
3136
3137
3138
3139
3140
3141
3142
3143
3144',
314' :,
71H'I
7111
11 12
J(14;)
h13
7114
7115
h16
7'1'41
11221
475~
7i21
4331
7117
4324
;7~l:!
,,353
h22 5723
;123 ,6401
3147
3148
3149
31S5
h24
,h25
h26
3156
3157
31515
h30
h31
3159
31621
3161
3162
3163
3164
316'
3166
3167
3168
3169
3110
3171
3112
3113
31,4
3175
3176
3177
3178
3119
3180
3181
;127
1£'44
3044
1124
e345
1\]41
h32
??rIlra
;tH0
305e
1045
7450
5146
til5
h37
-H4r/l
H1~
H41
;t42
ft43
4451
1041
h45
5724
7450
7144 5146
lAC
IOIVISIO~
ISUBTRACT
BY
,
.•
~Eqo
[XPO~E~TS.l
lAC
JMS SIGN
ISET UP SIGNS
CL.A
, JMS MINUS2
INEGATE ~IVISOR
JMS I DIVIDE
IDlvIDE
JMS MUL,DIV
JMP I •• 1
rPNT·l
IT~lS SUBROUTINE PREPARES MULTIPLV A~O CIVIDE
IrOR ANV COMBINATION Or SIGNED ARCUMENTS AND rOR lERO.
IT~E RrSUlot or EIT~ER Is lERO IF rLAC - 0.
I~ESUlot OF'MUI.TIPLY IS ~£~O T' [~T~ER IS ZE~OJ
IDIviSioN 9V lERO IS CH£OKEo BEFoRt THIS
IROu;INE IS CALLED.
. IT~£ ClLLING AC CONTA!NS AN UPDATE VALUE rCR THE
I!XPoNtNT. THE RETURNING AC CONTAINS T~E SIGN or
ITH[ A.GUM£NT 'OR'rURTH£R T[STING BY EACH ROUTINE~
SIGN.
QI
nEST AND SAvE SIGN OF' RtSUI.-T.___ ._
TAO EXP ICOMPUTE NEw EXPONENT rOA MUL-OIV.
Dci EXP
TAO P400~
II.OAD 4000 TO XOR THE SIGN BITS.
AND HORD
tAo AC1H
SMA CI.A
I~EsuLT ~AV BE ~ERO
CHi '
DCA SIGNF'
TAO HORO
SNA
JMP I REVIT
IANswER !S lERO.
spi CI.A
ITAKE ABSOLUTE VAlour 0' 'LAC
JMS I MINSKI
TAD AC1H
SNA
IRESULT 0' EITHER MAY BE iERO
JMP 1 REV IT
JMP I SIGN
ISIG~ 0' R£SUI.T I SIGN'
SM~
''';'1
I·~~
h46
'h47
h50
6522
FlEVtT,
lERO
;335
7261
3751
NORM',
ONORM
7151
7256
'7152
;200
3182
31S3
3184
31S5
3186
;0L'J~
;t33
Hl4
;1l6
C~'A
7~01
3146
3150
3151
3152
3153
3154
SNA CI.A
ERQOR2
TAD EXl
765"
4566
PAGE ~
•
OlVtoE~
OUFlOlV
SAVE-OOA I •
NP2
""2
MUL.TVlj",S i
"~'45
AIF'UC.1
SIF'LAC.2
.. ~46
'dH1
:2141
,'042
L'ra4;}
C,F'LAC.3
O.A01H
[ .. A01L
,IOV[R1
MP4
•
. . Ie·
'-..-"
•
IF'OCL12,37
3187
3186
3109
'
73;~t
-~A
,1'H3
TAD
CHA
\ DCA
, tAD
71. 55
'1203
3222
i21114
3229
3230
3231
3232
3233
3234
3235
3236
3231
3238
3239
324"
3241
MliojUS2~
7153
7154
319111
3191
3192
3193
3194
3195
3196 <
3197:, .
3198
3199
3200
3201
3202
3203,
3204
3205
32t"6
3207
32CJ8
3U9
321"
3211
3212
3213
3214
321'
3216
3217
3218
3219
3220
3221
3223
3224
3225
3226
3227
3228
•
c.1 AI.!t'
0~£1
h56
'(Hi
'157
3~43
7160
1042
7161
7162
;163
h64
h65
7~4~
743~
12141
7167
743"
11(11
3e141
5753
h?~
7111
7172
h73
71;4
71;5
,~i3I1!"
1,~50
20 "
i72"1
hl1l2
1205
;206
;2V"7
;210
7211
7212
;213
;214
;n5
7216
7:?17
72"0
02100
'4511J
560E1
3254
3253
1251
3255
710fl!
1254
7~UI
7224
JMFI 1 HINUS2
RESOl V; 0
TAO
.720"
MFl4,
SIGN"
SPA CLA
JMS I MINSKl
JMP 1 RESOLV
0
ISINGLE PA£CISION,UNSIGNED~UlTIPlY •
SNA/NO RESULT AOOED I, i!£RO
JMP J MM
IrOR E~E INSERT THE rO~LOWINGI
17203 3206 DCA ,.3
'
17204 1256 TAO ~P2
1720' 142' MQl MUY
172ft16
k'l000
17201
17210
17211
17212
3253
151111
32"
5221
Ii)
DCA MP5
MQA
OCA MFl3
JMP ,.15
Dci HP1
Dcl MP'
tAb THIA
MP6.
eLL
TAD MP1
AU
1256
ell
TAD MP2
71~0
2255
52U
1254
.t6n2'
112 81TS BY 12 BITS
DCA HP3
DCA MP1
tAO MP'
SNL
;225., ??lU'!
;226 325'
;221
lAC CLL
DCA AC1101
3254
j253
742"
5220
;220 ;~Hl
;221 '3253
7222
7223
ACll
Si!L
771"
h16 4451
h;1 5713
ITRtP~E P~fCISION
OVERl
1AC
OVERl
S!L
JAC Cll
DCi AC1l
TAb AC1101
CMi
3042
72140
CLio
CMA
7101
h66
I"IEGATE OPERAND
...
JM~
,*;S
RA~
DCA MP5 ISAVE HiGH ORDER R£suLT
ISf HP;S
JMP MP6
tAn MP1 ICORREct
RU
DCA HPJ
TAO 1 HP4
~ow
OROER
RtSU~T
IPlcKUP SCALE 'ACTOR
"MU~TY"
:lAl.lr.
l1;JA.N,'11
;.,~."
7.' 41
CIA
;2:-1
,252
3254
1255
TAr) DATUI1A
If'OCL12.:l.
3242
3243
3244
3245
3246
3247
3248
3249
;'34
HC(.1
;23S
1654
;236
;237
~65"
2254
3250
'24i'
7tl'?4
3251
3252
3253
325 4 '
3255 '.
3256
3257
3258
3259
3260
3261
;241
;,-42
;243
;244
;245
7?46
h4'
3262
3263
3264
3265
3266
326 1
3268
3269
3270
3271
3272
3273
3274
3275
3276
3277
3278
3279
32B0
32B1
3282
32B3
32B4
3285
3286
3287
3288
3289
3290
3291
3292
3293
3294
3295
3296
;2~2
;~33
;,513
Dci MP1
TAO HP3
eL.l
ICO·IOUT£:
,,£~O
1l.~1oI
TAO I MP1
DCA I MP1
PACE , . .
231ZAt
I
ADDREss
O"O£R PART.
ACC'P1UL.A TE
, I Sl HP1
RAL
1253
TAD
7420
SNL
56J::'!
JMP I HP"
INO CARRY
JMP I HP4
JMP ,-3
11111
IEXtT
ICARI=!Y AGAIN
f1P5
TAD I MP1
DCA I HP1
1654
3654
2254
.,,654
IU MP1
lSi! I HP1
563'"
h51
5246
;252
;253
;254
1255
;U2
;~a0~
1011'3.
;'56
h51
h60
... 0"~
;16 ..
;751
;261
1262
1263
h64
~'0~0
It1UlTlPL.ICANO
BITS
"
.27
'OR
I'll".
12 OR 3 PREC!SION DIVIDE
DUBDiV;
"Dcl MP'
MP1
7265
;~66
;267
~'0",a
::~0',H~
:S2ra0
3254
1260
-727"
;271
11"",
;2;3
3256
;2;2
h;4
;2;5
;2;6
72;7
73:.1""
;~~1
;3~2
1303
;~"'4
;305
HI42
H146
1~0"
i2l45
1041
7423
5304
~'H5
1256
~046
72~'i'
1254
;3~6
;~~4
;:S07
3254
;310
;311
;312
;313
;:U4
;
OATUMl; DATUM
~
HP5.
HP1,
MP2.
TIoHA.
·14
112
TAD I'll'
Dci MP:S
SKP
OV3.
JMS I oouBLE
CL.l
TAb AC1L
TAO lORD
DCA MP2
RAL
tAo HORD
TAO AC1H
SNI.
I.'
DCA HaRD
JMP
TAO MP2
DCA L.ORe
eLA
TAD MP1
Rll
DCi MP1
j2(,,0
TAD MI"
7:3(34
RAl
32~"
Dci MP4
1254
TAD MP1
2255
5267
IPR.QOUCT
IMUl.TIPLIER
o
o
4_WORDC'-7'~5)
1(-43) •
DCA
325'
7413
4'27
•
lSi MP3
JMP OV3
ItNtT
BIT couNTER
ISHlr:'T 'lAC
LEF'T
ICOMgINE ONE POSZTiON AND C4-WORD)
ISAVE: RESULT
IAOO OVERF'LOIo/
ISKIP l ' OVERFL.Ow
. IUPOATE 'L.AC
ACCUMuLATOR
ISAvt OV£R'L.OW BITS CIRCULARL'
IC~EAR
ITEST rOR END or DIVIDE
./LOAc RESUL. TS
•
•
(.
~
\
IrOCL12.17
3297
3298
3299
3300
33~11
33~2
33~3
3304
3305
33('16
3307
33018
3309
33121
3311
3312
3313
3314 '
331'
3310
3317
3318
3319
33213
3321
3322
3323
3324
332'
3326
3327
3328
3329
33311J
3331
3332
3333
3334
333'
3336
3337
3338
3339
33413
3341
3342
3343
3344
3345
3346
3347
-3348
3349
33513
3351
GlALlr"
V!~ i:
3
11:',)1.\ .. 71
7316
3~46
;317
DCA LORe
,
'fA 0
20~
;320
32145
;321' 5661
1322 ;i.J04
3335
7~'3
1~24
2255
7325 5267
;326 ' ,335
;327 3tH5
;330 12~t!l
;3:51 32146
1332 1254
;333 3~47
;334 5661
h35 .':11~'"
7336 4775
7337 4366
13413 la45
;:Hl
h42
;343
;344
;345
;346
;347
;35~
;351
h52
;353
;354
;355
;356
1357
;360
;361
;362
;363
h64
7365
;366
1367
!3i0
7311
13;2
h;3
DCA
;7u
5360
4521
1140
1044
3344
5347
4776
4366
5735
M44
EXIT:!,
5735
6757
:'''01'1
1"'45
;51r.
7(341
771~
4165
5766
7314
1375 5571
73;6 1173
14('1~
JMP I DueOIV
1('lOP)
n::xT'u rr,q
JMP OV3
TAO ONORH
DCA HaRD
TAD MI'4
DCA LORD
TAO MP1
DCA OVER2
JMF' I OUBOIV
III
XRAR2,
TEST4,
SNI
TAD OVER2
SNA
TAO LORD
SNA CLA
JMP EXIT3
TAD HaRD
RAL CI.L.
SPA CL.A
JMF' •• 6
JMS I DOUBLE
CMA CLI.
TAD EXI'
DCA EXP
JMF' .-12
JMS I RESOL3
JMS TEST4
JMP I ONORM
DCA EXP
JMP I ONORM
Dlv2
hWORQ
nEST rOI=! END OF' OhIOE
ISU9ROUTt~E
TAO HORO
;450
12146
;65"
5363
U345
;104
PAGE 1.. 6.1
RA~
JMS 1 ABSOL3
JMS TEST4
745"
12147
,.
M~4
~ORO
DCA ONORM
lSi! MP3
O~ORM'
2310~
e)
TO NORMALllE 'LAC
lIS MANTtSSA.U
IVts
IwlLL SHI'T BE ToO 'ARt
IDON'T LEAVE 4000
IS£T TO
IRETURN
!E~O
"'}.
PI
tAD HORO
SPA
CIA
SPA CLA
JMS I XRAR2
JMP I TEST4
ABSOL3; ABSOLV
RESOL3; REsOLV
!TEST rOR
~..,
,
4~0il
ISHlrT BACI(
.74~~
I!:IACE: is
;4GHl
;401
;4?-2
44217
6274
;~~Iil
XSQRT,
IF'L04TING SQUARF: ROOT f'UNCTION
rINT
F'PuT F'PAC1
IVALUE
F'ExT
INEwTON'S METHOD IS USED
(-
,
3352
3353
3354
3355
3356
3357
3358
3359
3360
3361
3362
3363
3364
3365
3366
3367
3368
3369
331"
3371
3312
3373
337.
337'
3376
3317
3318
3379
338"
3381
3382
3383
338 4
3385
3386
3387
3388
3389
3390
3391
3392
3393
3394
339'
3396
3397
3398
3399
34~0
34~1
34Z2
3403
3404
34~'
3436
;4,'3
·.H5
~4 :'4
771(1
-;" ,15
4566
Hl44
;4;'6
;V7
;41:'1
751r.
;411
;;alC
;412
;413
3270
;430
;414
1415
7416
;417
;42a
7421
;422
'423
;424
1425
;426
7427
;432
;431
;432
;433
;434
;435
;436
227"
;£100
1267
3271
3272
3213
;451
;452
;453
;454
;455
,.56
;457
;46i'
;'61
;462
;463
;4~4
;465
;466
;467
TAb EXP
SPA
CML
RAR
,DCA I TEql
S~L
ISf ITERl
07000,
NOP
TAO
44~7
:'.274
3270
JMP SQ£ND
CL.CU;
rlNT
F'GrT F'PAC1
F'Oiv IT£Rl
F' ADO lTERl
rt)(T
eL.i CMA
TAO EXP
DcI EXP
1S44
3344
li44
TAD EXP
7041
. CMA lAC
tAD i TUl
SiA CI.A
JMP ROOTC;O
TAD HORO
;041
1271
7640
5261
CMA lAC
TAD lTERU1
S~A CL.A
JMP ROOTGO
HH6
TAD
;:;141
L.ORD
CMi lAC
1272
tAo ITER1*2
;500
SMA
7~41
CMi lAC
7a01
lAC
SMA Cl.A
;1i1'~
627:1
RETURN
ROOTC;O; rlNT
'~I~(I
5227
3J44
5536
3~15
7470
,! 2\
I11S
,........
tAo F'PAC1.Z
0"
44~7
IMAK£ r!RST APPROXIMATION
!TEST loSS OF' ExP
SNA CL.A
7240
5536
ROOTS
SNA
1270
" (l
SQCO~ll
I~U~QER IS NEGATIVE-IMAGINARY
II.I~< IS -0 F'ROM 'INT
I~ATCH T~E SIGN WiTH LINK elT
DCA ITER1.1
DCA I TER1.2
DCl ITER1.:S
TAO F'PAC1*S.
5265
;443
; ... 4
;447
;452'
ER~OR2
1215
127e
; ... 5
SPA CL.A
;451.'1
1276
76511!
;641!'
5261
\045
;u6
GE'tSG~
;"2~
;437
;4421
7441
;U2
'"
SQEND,
F'PuT 1TERl
releT
JMP Cl.CU
DCA EXP
SQCON1~
RETURN
301'
ITU1,
fIJ
BUrF'ER" "
IARE EXPONENTS EQUAL.t
INO
IARE HIGH;ORDER MANTISSAS EaUAL.7
INO
100
L.O~.ORDER
MANTISSAS AGREE
/WITHIN ONE BIT?
•••
•
.5
I
,rOCL12.~7
34:.. 7
34~a
3.. ~9
3410
3411
3412
3413
3414
3415
3416
341 7
3418
3419
342~
3421
3422
3423
3424
342'
3426
3427
3428
3429
343~
3431
3432
3433
3434
3435
3436
3437
3438
;471
;4;2
7473
;474
;415
;4;6
;.';7
7'52'r
ts,;a
;5~2
;'5?3
75,14
;5~S
;5~6
;S~'7
;5t;a
;'511
7512
;513
;514
3456
3457
34!58
3459
346~
3461
11··"3
l1;.J ..... 71
JJ(I
'l~2'C
F' r.' I.: 1,
0
.~C('!
l~
721J0
r
BufrER·13
7503
,'300
SCopoU;
' 106
1367
;44c
AND
"TAD
JMP
DCA
3364
CRLF'.
5321
1371
JMI'
NOCRL'; TAO
eLL
TA5
SNL
2365
11~{I
1;2106
;421iJ
76Hl
ISl
57t~2'
;520
236<4
;521
;522
6302
6141
IS!
7533
;5:51
. ;532
;533
7534
7'535
771~
1361
1365
;536
771~
!!'356
t366
;~4("
;542
7543
I.MOOE
~213
.. r.211'
6;~31
lOr
L.INC
01163
t'OCALF'
NeOL.S
NrE:EOS
HSOK
07655
C100
PMOOE:
NLI"ES
SCOPOU
r-.tCOLS
LO; 4
I
CLR
PDP
62U
IS!
TAO
NCHARS
NCHARS
07000
TAD
SPA CI.A
TAD
NI.INE:S
TAD
Nri:EDS
SPA CLA
JMP
NO~ANG
TAD
NCHARS
6213
JMS
WAITER
KSF'
,_4
JMP
534:,
6 J34
7~46
KRS
J 312
tAD
07566
SNA CLA
;55~
6:~32
;551
137'"
3774
3366
3365
;552
;553
;554
400;717
I··........
..··..
........
,,........
........
........
,,........
........
,,........
........
/
OPTR
;'544
765'?1
rAE:[
/
;545
7547
or ... EXT
LOCATION IN 10.01GrT VE:RSION.
,,'ADOQE:SS
........
........
OUTPUT ROUTINE rOR SCOPE
,,........
........
SToRES CIofARS IN P'L.D1, LOCS
.........
,,,........
,,........
........
,,........
........
........
,'e........
•••••••
,'.Ii........
••••••
,,........
........
,........
/
STIol
,'''11
;ISH
;'541
lTSOf( ,
\' ",1(12
62C'1
2366
1366
1215
PH7
SKI' CLA
TAO
SNA
JMI'
[,644
1362
""~3
SlA
~31C
745:3
;527
PAGE 1.62
~~O
;516
7517
7523
7524
7525
;526
231;'6
\
·0',HI
7515, 1361
3439
3441lJ
3441
3442
3443
3444
3445
:5'146
3447
34'18
34'19
3450
3451
3452
3453
3454
3455
:'lAL1~
e/
KCc:
TAD
DCA t .
DCA
DCA
,........
........
,,........
.........
........
,,,........
........
,........
TOO MANY I.INES,CHARS
,,........
ON OISPI.AY UNTIl. SOMETHING
........
,,,........
........
,........ IGNORE LINE
'EEO
,,........
........
CLE:AR
,,........
........ CHAqACTER
THE
/
/e •••••••
WA~G
,
'
>.".'1
OIS~LAVEO
IS TVPEQ.'
........
' ••• 0 ••••
06377
PPTR
NCHARS
Nr£EOS
/
/ i" /
i
~
"':- ..
;.~,....
.~
.,.~
IF'OC L1 Z . 3 .
3462 .
;555
3463
;556
3464
;557
;560
346'
3466
;561
3467
;562
3468
;563
3469
;564
3410
;565
3411
;566
3472
15~7
3473,
'1510
3474
7571
347'
isi2
3416
'1573
3477
1574
3478
3479
348"
:5481
3482
3483
;576
34S4
1571
34/35
;6t!10
3486
1601
3487
'61:'2
3488
;603
3"89
;604
3490
;605
3491
16"'6
3492
;607
3493
i6!k'I
3494
., 61.1
3495
;612
3496
;613
349 7
;614
:5498
h15
3499
;616
3521r/l
7617
3501
;620
35~2
;621
35213
7622
3504
;623
35e5
;624
352'6
;625
:5507
;626
3538
7627
35r.19
;630
;631
351"
3511
h32
3!512
;6:53
3513
;634
351 4
;635
;636
3!S1'
. ,~516
?lAL1C'
3364
6t'.'1
1364
1373
7740
5305
57""
,: 0l!'i!l
>,0"0
·.~02'0
;763
6377
7655
;566
7116
6002
;'76
\I L~ 1 J
t.;COLS
DCA
t>;O~U!G;
tAD
f.iLI~ES;
SMA
JMP
JMP
l
NCOLS
PPTR,
OPTR
07716,
'/'OIS
,
1.
•
DISPLAy
CRLor
/
/
/
/
/
/
/
/
1716
/
/
/
.7'76
/
/
I ••••••••
NCIolI,RS; ~
01763, 1163
06377, 6317
1655
7'66
CL4
SCOPOU
NHEOS; :/J
07655.
07116
su
e'
07566,
PAGE
/
10"
TAD
NCOlS,
........
........
........
........
........
........
........
........
........
........
,........
........
........
........
,........
........
........
,,........
........
.,........,........
........
........I.·........
..•· ..
I.· ..••••
........
I••• ·•·.·
I··.·
....
,........
I······.·I.· .••..•
........II••..••••
........
23,.,(1
l1;JANw71
~UNCtION
; STORES 2 kOQOS
'PER CALL iN 2200 THRU ,77' IN "LOi
04453
6213
5601
2fl71
44"7
4251
1~0n
4453
;'10
;041
335~
1066
1256
7640
4'66
4540
1612
441:17
4253
:3""
4453
3351
12'1
1247
7652'
4566
6\'11l!2
6211
735C'
::550
3671
~271
1351
',1251
........ _-." .
CALLI N; JMS I
6213
JMP I
INCALL
XO ISP,
INTEGER
,·1
F'I NT
F'MUL
rEICT
/
/
rORHUN
INTEGER / ••••••••
JMS J
SPA
erA
.
DCA
TAO
TAO
/
/
STtMP
CHAR
/
MMCOM
Si!A CLA /
ERROR:5
PUSHJ
EVALir1
rINT
F'MUL
rl VHUN
/
F'EltT
JMS I
Dei.
TAO
TAO
SNi CLA
['RROR3
JOr
6211
CI.A eLI.
AND
INTEGER
STtMP2
SPTR
Ml.rMIT
I••.•• · .•I.· ••••••
ICO' V
CMA RAR
JSI
STEMP
SPTR
SPTR
TAO
·.0741'
DCA
tAo
._..._,.,. _ ... __ .0. ___
STEMP2
I•••••
· .•
•.••••
I.·I.·.···
........
(-
I.~
--- "-..•..
",
............
. --_.-.. - ......
-,
......... -
•..
_.......... _- .
•
....
"
~
I
•
•
\
'\_~'.~'."
IF'OCL12.37
351 7
3!h8
3519 '
352"
3521
3522
3523
3524
3525
3526
3527
3528
3529
;64~
76 41
7642
;6 4 3
7644
1645
1646
;647
;65Z
;651
;652
;653
;654
'7655
;656
:1.Ll~i
~611
~211
72,q
;!611
6201
6"'''1
5536
2Z02
;4Z21
. !311
211321
,
~11
;657
;660
t661
;662
;663
7664
;665
i666
7346
:1251
3257
613"2
1132
6213
SPTR
62l'11
Icor
/
CLA CMA
SPTR
DCA I
11'
/
ION
EF'UN31
JM.P 1
MLIMyT; .. 5176
0141l'fl. 7400
rORloIuN; 11 i 2100
I(-LAST Loe ", OISP POINTS-i)
nVloIuN; 1113710.0
/
MMCOM,
/
/
/
.. 254
I
62101
5657
16H
h;5
;6;6
;677
3271
?6i3
;;ell'
lea"
I
a~\J
;;r5
7110
1711
;;12
;; 13
;;14
SPTR~
CLEAR,
7121
;712
4566
'7752
1161
;;16
'753'
;717 .. 1163
'1711
;;21 ;"134
WAIT
WAIT
I ••••• • ••
WAtT
0
tAb
OOISSP
6201
,cor
01.tST~1
,I.· ..·· ..
I.· •• •• ••
10""
ION
JMP I
OOtssP; 2200
PPASS, PASS
OUTpuT~ JMS J
POPA
SORTJ
........
........
I•...•.•.
,I··.····.
........
I.· ..• · ..
..•· ..
,,I.·........
,,........
........
........
,,,........
........
........
I.·
.. •• .•
,........
I.· •• •• ••
/
PNCHARS
ICIF' COr 10/.·· •••••
WAITER
SPTR
10'
ICOf' U
6211
CLA CMA
SPTR
DCA 1
724(11
4541
10'
tAD I
6213
JMS
ION
JMPI
DCA
6211
;;15
;;20
Dci
60212
1 4 13
7103
;;e4
0
el.i CI.L. eM ... RTI.
tAD
13~4
17{,6
;;~1
;;n
lolA IT'~
4402S
1661
16h
?6i1
7672
;,C1
3568
tS~
........
I··.····.
.........
I.·.····.
........
I··.····.
I.·.··· ..
........
........
........
........
PAGE 1-64
/
I
~"H1J"
3557
3567
SPTR
,l '
IJMS WA IT is EQUIVALENT
ITO JMp .-2 WIT~ A RErRrS~ Or
IT~£,OfSPLAY ON THE WAY
3558
3559
3560
3561
3562
3563
3564
3566
OCA
231"lo
:liHl0
7524
3611
6201
62101
5672
2230
6335
41.'5
3565
U;'JAN.'1
!-77~
3530
3531
3532
3533
3534
3535
3536
3537
3538
3539
3540
3541
3542
3543
3544
354'
:5546
3547
3548
3549
3550
35,1
3552
3553
3554
3555
'3556
V:1l"3
e
CI.EAR
III
CL.EAR POINTS f'ROM THE SCOPE
,:
...... ,
....
1· .... • .. crORST LOC 0' OISP POINTS)
PPASS
I······.·
JU"IPS nN SUBCOMMAND OF OUTI'U" XXX
I······.·
, ••••••••
oGO~OLlST/···.·.··
oERRoR; ERROR3
ClGO,
OC
00
OE
as
OT
01
........
,........
........
I······ .•
I······.·
I.····
•. •
/
,I•••• ••.•
t l~
IF'OC L12 t 3 7 .
3569
3570
3571
3572
3573
3574
3575
3576
3577
3578
3579
358"
3581
3582
3583
3584
3585
3586
3587
3588
3589
35918
3591
3592
3593
3594
3595
3596
3597
3598
3599
36f:U'
3601
3602
36,,3
36('14
36l'"
3606
3607
3608
3609
3610
3611
3612
3613
3614
361'
t:·lAL.ltC"
3~l3
7722
1723
7724
;;~5
;'26
;;27
;;33
;;31
;;32
;;33
;;34
;;35
7736
;;:57
;;5111
54
1Z
7755
;756
;;57
77 6 0
7761
;;62
;'63
;'64
7;65
;;66
7767
3214
3('5
3a5
;323
-324
. 311
6371
323
324
.~611
;566
POPTR,
01.
1256
;65~
1
"°"
1~~0f1111!
4575
3732
1330
31:53
3711
;fC'l0£1
4257
6002
6141
tAD
JMP 1
IS! r
TAO I
sU CLA
JMS
JMP I
PCL.I
.
.,.-
'
34021
35k:l(1
1'1111000000
.'
~.
•
43fcli2\
41""
42~h:l
4300
44""
A5""
4602'
001'J10";lI:'~
!~!3I?~@il"
4700
l1il1!1.1
i1111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111110
5Z0~
5100
11111ii1
11111"111
11111111
111111U
11111111
11111111
11111111. 11111111
11111111 11111111
11111111
11111111
11111111
11111111
11111111
11111021
5200
53011'
Ui11H1
11111111
l1iiHh
i1111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
uHHil
Ui1;t11
uHi iil
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
i 1111111
11111111
u11H1:1
11111111
lli1il11
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111U0
61"0
l1i1Hil
l1111iil
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
6200
6300
U1'ii1tl· 11111111
11111111 11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11·111111
11111111
11111111
111111U'
b400
l1il1til
11Uni1
11111111
11111111
11111111
6'0~
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
660"
6100
Uiii1t1
11111 til
11111111
11111111
11111111
11111111
11111111 11111111
11111111· 11111111
11111111
11111111
11111111
11111111
11111111
11111111
121021
11\11"111
11""
1200
7300
11111" ii1
Ui11iil
\1111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
~111U11
11111"111
.11111111
11111111
11111111
11111111
11111111
11111111- 11111111
11111111 11111111
11111111
11111111
11111111
11111110
740e1
7500
11t11iil
11t11 i i1
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111011
76021
11
11111111
11111111
11111111
11111111
4~~·"11
...". ."
.. 1
.
11111111
~
11 ';'1
"; ~ ~ ~
11111111
....... ,,?
11111111
!~, 1l:"'· ~~:
5400
5'' 0
5600
57r1l1ll
611l0"
~
-.:
11111.:
4111
~
; ,'.<,...
'I! .~ _:: ~
~-
....
~,
",;:
It ,'•
.?
4
<
~_l.;:.
;~-.~
"
.
,
,
.~
>It ..
~
V
IrOCL1'2 ,:51
3616
361 7
3618
3619
362121
3621
3622
3623
3624
3625
3626
3627
3628
3629
36::5"
3631
3632
3633
3634
363'
3636
3637
3638
3639
364121
3641
3642
3643
3644
3645
3646
3647
3648
3649
3650
3651
•
;1:> :11
~1~;'I2
M~3
231~6
V,''''3
,
:va
*1
O,~0
)(Q,
4:'1'1
D:25~,
02~~~~ ,
Z~;)
0M<4
125
("lOInS
I~H'\YJ
v' (l! ~~ 6
, 000
085,
GAMMA,
C"iRCNT;
I······.·
I ••••• •••
1(I:lErER~"JCECl
/(REF'ER~NBe:D
/(REF'e:R~'JCED
4 121 III
.......
.
I··.···.·
.......
.
.......
.
........
.......
.
.......
.........
200
125
o
"
~36e
·10
(H!l0
,'1310
JrH"
)(~1.
/
/
/
L"~1l
~. ,,~?
8l.K2.
/UNIT
"';'112
'0~0
~~13
AS Loe 2)
AS. LOC 3)
4S,LDC 4)
/
I"I'Jn
0360.
P4GE 1.68
3621
/ADDRESs
/8LOCK ,'JUfoIBER
"M0
/NUMBER or BLOCKS
(7I~14
c·0e1
MI15
111016
.160
01621.
,'{H;H'I
Al.P~4'
1"1'017
[ ~~0
"020
·20
/
/
/
eETA •
I········
I
ItNfrRro WiTH NO. CHARS IN Ael R£rREsH
/rOR C~ARS AND POINTS
/
"'~22
~"23
,'0 ~H"
745fJ
512161
71214el
qI~24
3121216
(.IJ~25
11[,76
!lI~26
30215
(11027
1~£I7
PlVJ20
"'~21
wAIHR; 0
SNA
tAD
GAMMA
y
TAO
3(1:31
DCA
DCA
~~32
6141
LINC
"'033
1325
3652
ClQi 35
3653
3654
3655
3656
3657
3658
3659
3660
3661
3662
3663
3664
VI'!36
?(.IJ77
1i"~37
212115
PCJ4~
1560
~"'41
7~00
M45
4077
4'-"211
6056
241
"'J46
2~iil3
01242
1i"~43
("\'144
7
.;1116
r:~ ~Hl
(,1'171
1756
('I ;~4
i?':,,51
3665
3666
0;'52
t~~53
l176
221
3667
3668
3669
36713
(11054
,221
(1\~55
'J11
~;~56
;,226
CO?57
6033
04371
DCA
3077
,,450
6045
CHRCNT
DCA
"'l"3f'!
01031
QI~34
NOAsell
JMP
CMi
LMOO£
CHRLUP;
l.o~
0360
xQ
GAMMA
H£
JMP GOODY
ADD Y
ADD 0760
BCl I
7000
STc Y
GOODY,
C~RENO;
STC xQ
JMP CHREND
RO~ 1
ADD 0200
STC Al.PHA
ADD Y
DSC A1.PHA
DSc I ALFIHA
XSK I XQ
XSK I XQ
CI..R
XSK I CHRCNT
JMP CHRl.UP
.......
.
.......
..
.......
I.·.......
...
·
..
.
.......
.
.......
.
.......
.
.......
..
.......
.......
.
.......
.
.......
.
.......
.
.......
.
.......
.
.......
.
.......
.
.
I·.·.......
..•
·
..
.......
I.·.......
..··....
I··.......
...·.....
I.·.···
.......
.
.......
..........
/
/
/
/
/
/
/
/
/
/
/
/
/
/
/
/ ••• 0 ••••
/
/
/
/
I •••• •• ••
/
/
/
/
/
/ •••••••• ONE TIME PER CHAR
'F'OCL12.~.
3671
3672
3673
3614
367'
3676
3617
361S
3679
3680
3681
36132,
3683,
3684
3665
3686
368 7
3688
3689
36911J
3691
3692
3693
3694
369'
3696
3697
3698
3699
3,00
3101
3102
3103
371114
370'
3706
31",7
3708
37!'19
37121
3711
3712
3113
371 4
. 3715
3716
3717
3718
3119
372 III
3121
3722
3123
3'24
3725
.rIAI.1m
Vg~3
231i!6
SI(P
,,
,,
,,
,
/
I~;~
61/1
(1;~
61
467
6141
?I~62
=,,~63
22t~0
22~0
645
61<'2
Lor 5
JMP SUBq
SET I BETA
p(1)64
t~='J65
t:l:?'66
IH,67
"'91;0
1iI(~h
CI!~72
\lOASClt,Ll~C
SET I 9tH
'lIn
L·g"
\ 2000
1.0, 6
JMP SUBQ
2i'l!!9
;1646
6U2
1;'''02
WUIf,
POP
P"400[
P0;3 ,6203
"",'4 7200
"'~;5 5420
"'1!J;6 4317
~017
IiIU"
·,171
AU1
<'1173
01",2
11056
AU3
[''''!Ill:'!
1'1104
(II 112"
(11106
1'1101
"'iifll
el11
"'112
0ii3
1'1114
l'Jii5
0116
Dl117
0120
~i21
0122
0123
1'1124
dJ00
~'461
HI~7
;\451
6072
~134
01135
0I1~6
~i37
12~3
5535
.1233
5~37
J.202
01140
01141
7"4
"'142
1171
~.
100"
7"5
SET
•
/
/Clr CDr "
dlTER
AI.P~A
TSr
SKP
JMP W[XIT
LOi BETA
SKP
lolA lTLP; LOA I BETA
/
OlSPL.AYS POINTS
olI'O
/
JMP WEXIT
STe GAMM4
Loi I BETA
OIS GAMMA
XSI( BETA
6115
,'33
~
PAGE
KST
SKP
JMP wEXIT
108
4005
1520
4317
0000
1 "37
:-;14'
\:217
5527
1431
5531
",i~2
SUBR~
r~467
1!1126
1'1133
L~OO£
('530
6072
11lf11
eL.A
JMP I
PSUBS' SUBS
' pL.£SuBs.LESuBS
6041
6016
0130
Ill!1
04317.
V,
:,1415
(\467
6"'2
01125
"'127
6203
•
........
........
........
........
........
........
........
........
,........
,........
.......•,........
.,,........
,................
I······.·
I··.···.·
I······.·,........
........
I,•••••
· ••
........
..• · ...
,,I.·........
........
,I.·........
•.••.•
,,........
........
I··.····.
I··.····.
,,........
........
........
,,,........
........
........
,........
,I.·........
........
.. · •..
.·1
,,........
........
,,........
........
,........
.. •• ••
,,I.·........
,........
........
U':'JA"Ie71
PMOOE
XI.O.
XI.C.
XL.L..
JMP WUTLP
JMP ALP 101 4
JMP t
1..0P(N
JHP I
LCLOSE
JMP I
'1.1.0Ao
XL-S,
XL.G,
X1714,
x1775,
PL.NUM,
JMP 1
LSAVE
JMP I
L.CIoIAIN
77'14
7775
LNUM
PCETRHI,GETRHS
/
.t1
••1
,ts.
• ·1
-/
.'
•
•
IF'OCL12.~7
3726
312 7
3726
3729
3730
3131
3732
3733
3734
3735
3136
37;57
3138
3139
3740
3141
3142
3143
3144
3145
3146
3747
3148
3749
315ill
3751
3152
31,3
3,,4
3155
3756
3157
375~
3759
:'144
;11.45
"146
?147
0150
(11151
:'1152
"'153
01154
!'I155
()I156
@1!57
"'160
(11161
0162
"'163
0164
"'165
f'l166
21161
0170
!lI171
1'1172
::"1;3
"'174
1'1177
0200
02U
;'161
3762
~763
3764
3765
:5766
3767
3768
cd Al.l~
116111
1177
12~0
I
9J~
,:030
!003
2135
1342
1600
1361
" l!IJ0
('''~0
21:176
01203
"204
"2~5
0206
\~177
6203
56e1
5174
4477
;144
5171
?651
4136
42144
0
Ii)
'LAC
F'L.AC*l
F'l.AC*2
~.
CHARTABa,-a
4417,1744
5117.2651
4136.2241
4111.3641
4,,7,4145
4471.4044
174110041
l077
UJ'7 J 4324
4~24
0230
"177
;~3"1
/
,.1
7741
.'041
4142
4e76
~~27
1'1231
Ii)
1077.7710
;'1('1
~,:?4
0
B1rLG-l
]1017
(11;'-1
01225
012'-6
l'I
413612645
2645
CA'22
""23
P~EPLAc,REPLACE
Myrr",p; 2'
MYTMP2; 2'
pr 1t.lt 5101, F'lN ISH
4136
~216
~2t7
VI,,0
PCO~MON,COMMON.
U!lJ0
1'll214
~212
~,i3
~
\
01420, 1420
,177
'ERROR; 6203
JHP I
F'SSERR
.202
Pl21'
~2il!l
C~F'LAG;
1420
;~11144
'~1Zl45
·.~046
1-1~
.. ISS, .. It
(1
LOS$,
PF'IL TAR.rtL TAB
PL.OO(UP,LUKUP
1164
:;11100
PACt
PLD~!L.o,LD"'ILD
06a~e,
dH:l~
23106
'0'
P5LNA"'; LNA"I(·5
P6L \JAM; L~4I'1E·6
61110(!f
:JC'3~
2241
01117
3641
4577
4145
4417
0211
l1':'JA~ .. 71
;764
2124
('1202
"'202
V,,('3
S1oIlTC: ioI ;
SWTMP,
P81rLG;
MYAC1,
MVAC2,
MYAC3,
P1'LAC;
P2'LAC;
P;S'LAC;
07164,
1:'fla0
(;130E1
e200
1'12t1J7
376"
e.l
'"
4142.40l6
0171 ,1IJ301
,/
IF'OC L121:S,
3169
.. 32
~IAL.l"
:-?33
;132'
~'~4
37)77
3"/71
"?36
01237
3712
3113
3174
3175
3176·
3717
3118
3719
3180
311;1
3782
3783
3184
31a5
3186
3'187
31a8
~240
91241
"242
1"243
017,44
(11245
~'46
t'l247
t'l25~
01251
!lI,52
tl!253
0254
"255
11;'JANe11
.
;"1('16
H"/7
;"/41
4471
3044
4276
)376
4411
3146
5121
4651
4040
4417,3044
,. .
4216,0376
'417, 3~46
5121,4651
4040,4071
4~77
,'177
;101
H71,7101
~:176
0176174C2
;402
~~67'?
e671 .7701
''?a1
1463
6314
.1'63,6:514
t'J263
01264
91265
01266
0261
0I211.~
0I2h
~212
",,-73
0274
Pl2;5
~2;6
",,;7
PI~"e
~'770
0,,1ZI,,0e?
4543
''''''
6151
4'43.6151
4117
::00e
1020
(1204
411'1,0"00
1020,0204
~~" .:10
"000,7141
23~0
221010,2076
2'11'16
1604
\'404
1604,0404
\~'H)0
00130.0000
;741
: 02'13
3189
"'301
CilJI7l2
75~0
?5~0.021lZ1l'1
3790
~303
?l3~4
\:0Ml
;GCl0
'1U0,1IJ070
(11:'5(115
; ~721
7624
24'16
5721
4671
3'191
(II~0I6
3792
~3"'7
"'3t~
3793
3194
3'195
.3796
tl!3i1
G'l312
Vl3!3
'1624,2476
15721 J 4671
6661
6661 J .333
51661052~
"'315
4333
5166
1'26
11'317
!'llJ021
C113~0
3600
:'1314
tlI:r16
•
4117,1"/41
1'!256
~26"
PAGE •
3n"lI17Z6
0257
(11261
t'l262
23106
307"1 J 173;~
3J1"1
3770
>'1'-35
V·~~3
;000
1000,0000
:5600,0041
.•
_
)
•
•
If'OCL12.'7
3797
3'198
.3799
38~"
3Se1'
3e~2
38e3
:S8e4
:sarli'
3806
3807
3808
3809
381e
3811
3812
3813
3814
381'
3816
3817
3818
3819
r'Il\Ll("
:':t1l1
~141
('~22
~J?3
41v,'
' "36
:'~24
2.'5~
.",25
,~5~
~376
,·4P4
"327
; 437
:>~~21
:"~Het
(!I~:51
~
'4~4
::"333
' 4vi4
~334
~";'~1
"~35
,21!l1'"
05~"'0"e6
0 4 04'13404
r0(1)l'''''I1'~
21601,4030
403'"
4536
45:56.3651
~342
01343
"'3414
0345
01346
~651
. 21l"1
2U1J0117 '
an
4523
2151
4122
2651
"'34'1
~~50
~351
[11352
0353
1'1354
"'355
4'23.2151
4122,2651
2414
2414,IU11
J477
5172
5172.0"1
~:651
1506
4225
4443
A356
Pl357
t'!360
Pl361
tlI362
9.1363
1506,4225
4443,6B51?1
605~
~364
5126
2651
5122
3651
22""
5122,36!51
4601
4601,0r1l""
512612651
2200,00U
!~~00
"'365
1'1366
"'367
:.'ia01"
01:5;"
1U014224
1~NI
4224
1212
1212
2442
1'1371
A3;2
11)3;3
,"374
1'1375
1212.1212
2442 UB10
~~Gl~
~3h
4J213
pl3;7
3S21
"
'e4~410437
c6a
"'341
•
PAGE: 1.72
2~5010"5~
~336
2~'S
3820
'
1!10~
3822
3823
3524
4020J2055
14nJ~777 A~£ C~ARACTER
OlSPL4Y UEA
*lJ0\'1
1
IGtT RiG~T MANO·SIOE ~ uSED l~
IPROCESSING or COMMANDS (L.la~' W"ficlol NEED'
IA rl~E NAME.tXPECTS T~£ 'O~M rtLE. UNIT
3825
3626
3827
,
~337
"'340
231Z'6
41~fIll0036
J06
("332
U';'';ANe71
V~~3
i000
1,1 ~"21
I
CETRIoIS; "
J"
'7
IF'OC L1213.
~IAL11Z
3828
1';, ;!1
3329
;'~n
,322
38321
111'3
3411
3831
3832
3833
3834
3835
3836
3831
3838
3839
3840
3641
3842
3843
3844
3845
3846
3847
3848
3849
385B
3851
3852
3853
385 4
3855
3856
3857
3858
3859
386121
3861
3862
3863
3864
386'
3666
3867
386B
3669
38721
3671
3872
3873
3874
387'
3e16
3e17
3878
3819
3eeR!
38el
3882
1326
1 P!!7
tiU
i311
3411
2e'112
i013
31611
1::-.14
1~15
t('l16
10i1
i1t21i1
;{JI21
ti122
1023
;"24
1025
1026
i027
i"'3"
1031
1032
1033
in4
1Q135
1':'36
1:037
i~40
;"41
1042
1043
1,,044
1:/145
i~46
1047
i05"
1(1151
1052
1~53
1t'lH
;:~55
1056
1I'" s7
1~60
11:JAt>.l"'1
1324
,
5236
1322
3H2
PLLP2.
5236
533~
~324
077
DCA
8LK2
IGOTtT ;
01110
8LK2·1
CCET
IGOTl T
JMS
JMP
JMP
AND
RMSERR
077
~143
NUMSGN
PP43
I
JMP
JMP
CLi
JHP
tAD
Dci
TAO
Dcl
TAO
PLLP;S.
DCA
TAO I
Cl.l ATL
RTl
RTL
BLI<2
8L1<2·1
PLLP2
CGET
IGOTlT
RHSERR
._4
PLNAME
8LI<2
07774
BL1<2·1
PLNAME
91.K2·2
9LI(2
TAD
!i3:h'
9LI<2
81.1<2.2
81.1<2·1
lSi
JMP
PLLP3
eLi CI.L CMI. RTL
I.NAME.4
DCi.
MOANUM; JMS
OCTt>.lUM
GET~HS
'JMP
RIolSERR
JMP
l~12
NUI'4SCN; TAO
~413
22112
5244
;326
337~
4J:~1
56!.'\'!
1323
765"
•
8L1<2·1
lSI
JMP
JMS
5236
.,
PLLPl
PI.NAHE
BLK2
DCi
TAO
DCi
Dci
1.
9L1(2·1
lSI
JHP
TAO
5216
4333
,"06
1411
TAD
SNi
JMP
2~12
;106
;006
07770
TAD
1217
'745;3
5261
1300
3411
5330
720"
5231
1322
32111
1327
3012
1322
3:1113
1411
tAo
tAO
1326
4333
8L.K2
Dci
PI.L"1.
PAGE
PL,NAr1E
DCi
32112
2:S1~6
PL.U"l.AG
DC.
tAO
3615
1t:!~4
11~~5
;~~6
i012
v·"13
Dci
I
ISC .. .., orr THE NUMBER, • sET T~t rLAC
/W;.ItCH SAYS IT WAS A NUM8ER
I
140
SNA CLA
81.1<2'1
010
/-
'
•
IF'OCL12.3'1
3883
3Pl84
3885
3886
3887
3886
3889
3691!1
3891
3892 "
3893 ' ,
3894
3695
3896
3897
3898
3899
3901!1
39~1
39f/l2
3903
3904
390'
39~6
3901
3908
3909
391 III
3911
3912
3913
3914
391'
3916
3911
3918
3919
~92a
3921
3922
3923
392 4
3925
3926
392 1
3928
3929
3930
3931
39'32
3933
3934
3935
3936
3937
:-lAL.1L'
l1~JAN.71
\ ",' 3
1 :,'64
43('1
JH"
,. ~165
~33r~
,.)';P
1 ;:166
~371
TAO
1"'61
:.-545
1276
DCI.
f~;"
1~h
1~;2
i:;]73
1P.1;4
1'0;5
1~;6
1",;1
3675
724~
3546
5256
1"62
5265
7735
1100
N!I43
l1Vl1
:'~01/1
ISUBR
I
1105
1i06
Hrn
111"
hi1
1"112
En
Hi4
1115
1116
H11
1120
!121
i122
1123
1124
ii25
1126
1127
1130
1131
1132
1133
1'134
H35
ii3~
3371
4333
23"1
PI.L.P4,
TO
oci
lSi!
JMP
AND
TAO
CL.L
TAO
010
CGET
ocl
SN~
RHS[RR
JMP
TAO
I.NUM
tAo
CGET
CLL RT!.
CLL RAL.
('010
OUt
1711/1
7770
1174
62.1 3
5732
6357
,·,w~
62(13
5136
2'64
1131
1354
11412'
1141
11042
745~
017.
0771~.
10
n
77U'
0717o, 711~
07174. 7774
'HISERR; 62flJ3
JMP 1
LEAR
~
CGET.
6203
JMP I
CGrTX
CGETRET,TAO
SNi
JMP
1143
5733
2333
1355
74513
TAD
SNA
1147
5'133
3356
74521
TAp
' 1144
1145
it46
LNUM
CGLT
OCTNUM
OCTNUM
071
07110
1111
i'an
"
GEN AN OCTAL NUMBER
JHP
PLLP4
PI.NAME; I.NAMEw2,
53~2
"
P51.~JAM
JMS
s?al
;324
1325
712!0
1323
3333
74,20
5330
1371
'U6
;t34
.1333
OCTNUM
HHS(RR
L"lUM
PAGE 1-7.
F'I. AGJ
\ TAO
DCA I
PI.ULAG
CI.A eMA
Dci 1 P6LNAM
JMP
MORNUM
PLEnAc,LErLAG
F'l.AGJ. l.ErLAG-3&177*5200
"143.
.. 43
43
PP43.
OCTNUM~ '"
I
11012
1103
h04
231~6
. 1~lc~T HAND SlOE ERROq
,*1
,*1
07524
lSi!
CGET
CGET
.. 01761
JMP
CGET
056
SNA
II NTt."'ACE: wI T~ r 1£1.0 ZERO
JMS CGET
JMIlI
l226
7450
1437
44"
1441
j
14.<12
un HH
4()22
72'~f1
5251
1221
H5,~
~ iii 2
II.IB~ARY 1'4,1([
6203
I
UNIT
I
rlRST &LOCK
121 •
UNO[J'INEO
1 •
UNSIGNEO(l wo)
TYPr
I
I
I
43~2
11IlOT [Nur ROOM.. SHOULD NOT HAPPEN
ION
JMP I
PPROC
PPROC. PROC
PG£i'c, CGET
PRHSrRR,RHSERR
075Uh 7510
0Ole~
U
Mes,
8323
GSMci, :523-312CI MC~. 31~~3IU
IF'lLTAa ENTRY III TYPE
I
LENGTH
Iw"'£~E
1431
qOo~
PCWAR
PRHSERR
PGtTRHS
PLOf" H.O
MYTMP2
P6LNAM
PR£PI.4C
1:.'2110
1436
MVTM,P2
JHP 1
Jt1S J
JMS 1
TAD
£Nur
REPLACE
4'43
4544
Sli CI.A
INOT
PAGE lot7S
6
24
F'lL£RR
M.I NCMA
1425
1432
F'lLERR
E:NREPL
TAO
12~0
4140
4141
4142 4143
4144
4145
4146
4147
4148
4149
4150
L.lr
"""2
1405
l' 406
i.n7
J'1P
SA,M€\,
,
6201
1601
1420
1421
1422
1423
1424
J~10
ENR[PL.~
3157
231Z6
l1':JAN.. 71
H24
1354
14?1
142'2
i4~J
V~:'~" '3
j)
LOP[N. . Jt1S
JMS
JMP
NOP
JMP
JMS
2 ,
SIGNED(2 WO)
3 •
F'L04T1NG P01'llTC3 1010)
ILI8~ARY OPEN
COMSUB
PG£TC
,.3
TAO
ERXIT
GETCX
MCS
Jt1P
ITSSS
SNA
;~i
;H1a .
~SMCl
IT~
1J
.'-,
~'.j.::.~,
I .
IrOCL12. J '
4153
1 45
4154
1446
4155
1447
4156
145~
41S7
1451
4158
14!'2
41,9
1453
416"
14~4
4161
1455
4162
145~
4163
'457
4164
i 46"
4165
1461
4166 ,. 1:462
4167
1463
4168
1464
4169
1465
4170
1466
4171
1467
4172
1470
4173
1471
4174
14;2
4175
14;3
4116
14;4
41'17
14;5
4178
14;6
4179
14;7
1,00
418"
4181
i501
4182
4183
4184
41S5
15'-"2
4186
1503
4187
1SIl!4
4188
1511'5
4189
1506
4190
1527
4191
;'510
4192
1511
4193
;512
4194
1!H3
4195
i514
4196
1515
4197
1.516
4198
1517
4199
rtAl.l~
l1';JAN ... l1
tAD
sli Cl.'
5623
721~1
JMI' I
ITS;r.
ITSsS,
ITS! it
70l!.1
n101
3157
4622
5261
[I:fX iT ,
;200
5623
4543
(' 0'30
4544
4"3
1157
3556
2156
1'46
3556
2156
1542
3556
2156
1545
3556
5216
,472
LEF'l.AG;
;H~IoiSERj:/
DCA
'1YT~P2
JMS
PGtTC
"lOP
•••
el.A
JMP
JMS
PGtTRHS
P~~SERR
J'"'P •• 3 l' G£TRIFT~
I SP'i
t,.X IT
I
IrllE VARIABLE LOA.OER
I
ITL.OAD; ~
1533
1534
JHS 1
PCO"1MON
I
is NOw IN ME~,RYI LOSS
,POINT AT iT, ONE or THE rOLL.OWING 3 CHOICES wILL BE TAKEN; ACCORDING
/TO TYPE
IVAI:nA8L.£
,
1541
1542
3164
1551
3165
2151
!;354
137a
3164
1"1
771"
7Z41!1
3165
1551
3166
SRETLO; DCA
1164
3567
1165
357"
1166
3571
TAO
1~H3
1544
1545
1546
1547
1550
1551
1552
1553
1554
15"
1556
i557
1560
1561
1562
1563
1564
1565
1566
1567
15;0
2151
r~ETLD~
l'!3i.'1l?'
4622
;'027
1571
5623
15;2
5H6
16~'"
JHP
TA~
lSi
TAO
DCA
IS!
JHIit
JR£TL.O; u5
DCA
027
MYAC1
tAo 1 LOSS
SFii CI.A
eMA
MYAC2
LOSS
r-4YAC3
DCA
tAo
DCA
6203
5733
IRETLO
SRETLO
L.OSS
LOSS
",YACl
L.OSS
MY4C2
LOSS
CRE:TLD
JMP
1535
1536
1537
15Hl
5346
5341
1551
62"3
MYAC1
PVLAC
~C~
TAO
9C~
TAO
Dci 1
GtTcx,
027,
MYAC2
P2fLAC
HY4C3
JMFI I
P3PLAC
ITL040
"27JMS
PGETC
JMP
JMP
pqlolSERR
GETCX
,,SU8SCRIPTING 'OR rIL.E
*16111~
IENT[R
wtT~
COMMON; "
A.NO
07
CI-I- RTL.
T!9
~!~~
VAIABLES
riLE NO. IN AC
IfOC L12 • •
4263
f 6,16
4264
4265
4266
4267
4268
4269
421"
4211
4314
431'
4316
4317
DCA
1'610
3151
T4C I
DCA
1623
6211
7650
5177
1556
1641
-
;204
1642
1643
1644
i645
t646
1641
t65111
1651
1652
1653
i654
,1655
t656
1651
1660
t661
1662
1663
1664
1"665
1666
l' 66'
1670
16h
3151
. 1.673
7140
3150
1"11
7141
1150
7430
31'"
72U
H!l13
10214
3£113
'433
5171
2812
5235
PREOiv;
TAD I
DCi'
fAD
Dci
DCA
TAO
CLL.
tAd
1556
•
SLKZ
91..1<2
8L1(2*2
91..1(2
HISS
otVOIV
~us
DCA
LOSS
toIlSS
DIVLU'P; TAO
CLl RAL
fAD
RA~
DC.
BLI<2
tAo
HUS
DCA
HISS
tAo
oci
8L1<2.2
CLl CIA
s!L
JMP
IS!
.,IMP
TAO
lSI
eli
lSi
TAO
IS!
JHP
oci
II-Ow ORDER SuBSCRIPT, THEN POINTER
HISS
tAo
Roll
•
IDIVIDES BV NO. ENTRIES/BLOCK
01764
9L1<2·1
LOSS
eLl
,
/CRE'ERENCES LoCS 2,3.4)
TAO
.ocl
Sl~
'
f"ERROR
MYTEMP
8L1(2.2, ,
PR[OIV
SKP
2E!12
5265 '
ISUBSCRIPTS
L.OSS
IS!
JHP
OlvoiV; CLi
DCA
2200
cr.
Dcl
7410
115121
"'ISS
PSVSS
PACE
BI..K2
SNl
JMP
1556
2156
7041
3012
1672 1313
1674
JHP
\,
3011
1411
3011
3e13
1011
7141
1150
;420
5232
3150
231~6
6211
TAD 1 "IYTEMP
SNA CLA
1556
1624
1625
1626
1627
1630 2813
1631 5222
1632 7200
1633 1112
1634 3h2
1635 1151
t636 ;U4
1631 3151
1640 1150
4301
4302
4303
4304
43o'
4306
4301
4308
4309
4310
4311
4312
4313
~15~
1621
1622
4296
U';'JAN .. 71
15::11:1
1620
4297
4298
4299
4301/J
v:03
16n
1'611
1'612
1613
1614
i615
1616
1:611
4272
4213
4214
427'
4276'
4277
4278
4219
428"
4281
4282
4283
4284
4285
4286
4287
42S8
4289
4290
4291
4292
4293
429.
429'
:J1AL1~
8L1<2.2
F'[RROR
81..1<2.1.
OIVLUP
MYT[MP
MYT(MP
8LI<2*2,
COMMON
HISS
9L1<2·,1
ISETS UP
COH~ON
xlT ACCORDING TO 'IL£ TYPE
ITeLK (RELATIVE) IS' 1~ 8LK2+2
11'3
LOSS
tAo
BL1<2.2
eL.L CMA
TAO 1 HVTtHP ICT"'&: LEN~'T"')'
~.
,
~.
".Jt' •
eJ
~
QIAL.H.'!
IrOCL12,~?
4318
4319
4320
4321
4322
4323
4324
4325
4326
4327 ":
4328
4329
"'33"
4331
4332
4333
"'334 .
433'
4336
4337
4338
4339
4340
4341
4342
4343
4344
434'
4346
4~H7
4348
4349
4350
4351
4352.
4353
4354
435'
4356
4357
4358
<4359
4360
4361
4362
4363
4364
4365
4366
4367
436&
4369
H7~
43H
Ui2
1675
l' 6;6
1677
dlllt1
1701
1";132
1;03
1;~4
17""
1736
'\;07
1713
1711
ih2
1hJ
1"714
ih5
76:2 ,1
e:'
5177
J'-1P
2156
1556
3~'11
1161
1163
1725
1726
ji21
1730
H31
1732
H33
1;34
1;35
1:736
i;;!7
1'40
1;41
'fl~6
1;44
1'145
1;46
It:J1''
315"
56'~0
1751
("000
1·'52
3162
1753
1'754
1755
1162
1163 .
3010
1410
76,13
1760
5151
1162
hl
113 H
17H
TAO
~4U
HJU
TBL.K
IUSOI,.UTE TS L.I(
T~E
sUrrERS
SW!TCI>!
JMS
PFTHSH
SWITCH
PB1F'L.G
XR1
TAC
TAO
ocl
CLA lAC
XR1
DCA I
. BI..1<2
TAD
XRl
XRl
81.1(2.1-
Dci
TAD
oei
TAO
81.1<2.2
DCA
)(R1
X1114
IREAo IT IN
TAO
SWITCH
/THE VAAl ABL.E IS IN MEMORY
TAO
TAD
06001/1
JMS I
BI.K2
USAGe; eLL RTL.
RTL
RTL
60~1
1'750
ISTA~TZNG
sw nCH
DCA
lOf'
!'el1
7~06
TOO L.O',G
eL.i CLL. lAC RTL.
CHECK
JM~
SWITCH IAL.TeRNATt
tAD
SNA CL.A
eL.i CI.I. lAC RTI.
454e
h06
81..1<2.2
91..1<2·2
CHECK
TAO
34U
t142
1';43
1;56
'"757
TAD
3~10
:i.161
aL.K2
MYTEMP
MYTEMP
lSi!
1231
3410
1"11
3410
1410
3U2
1013
1173
11'1
3151
7346
1'147
DCA
JMS
!?21
1122
1";23
1:;24
j":YTE;flP
'1YTE'1P
DCA
I~
PAGE 1.82
n;RROR
lSi?
3~13
23136
CL,A ISUBSCR,I'T
TAD
4351
7307
4351
1161
7652)
;327
3161
6(:102
1161
456:11
1;20
\,
2156
1556
1013
1:717
1116
11;..; :·"'11
V)('3
CHECK.
L.OSS
DCA
L.OSS
CL. 4 CLL. CMA RTL.
XR1
TAO
OCA
HISS
ION
JMP
COMMON
0
[lci
TAD
TAO
SWTMP
SWTt1P
PB1F'L.Ci
Dci
Xj:!~
TAD I
lCRl
SN4 CL.A
JMP l'
CHECK
TA~
91~
r ~
,
x~;
LlLK2
•
rj
IrOCL12.~.
4373
4374
4375
4316
4377
4318
4379
4381/j
4381
4382
4383
4384,
1764
d'65
1166
1761
1";;(')
1;h
1;;Z
11;3
1774
1;;5
1;;6
DI AL1!3
2010
141(ll
79.'41
,',a~7
2000
440"
4401
44212
4403
44~4
443'
4406
4401
He-8
4409
4411l!
4411
4412
4413
4414
4415
4416
4417
4418
4419
4421l!
4421
4422
4423
4424
442'
,4426
4\421
'0~Z
1567
3164
1573
3165
1'71
3166
'''11
21U2
;013
'014
2015
~016
212117
2020
2321
;'{II22
2023
2024
;025
2026
2027
;03"
2ro31
2332
;~33
4554
5266
5224
1164
2151
1165
3551
2151
1166
5211
1164
745"
5244
""Il!
5251
7100
1165
'51~
29135
7010
3165
1166
,kj<4"
:hHl
~~4!5
2III "7
.1166
;:'143
,"44
2046
JM~
07,
2151
23106
PAGE
1.
•
8L1<2·2
CHtCK
SWT~P
ITSAGO
laLK IS iN MEMORy ALREAOY
1
.20~(!I
I
IrJL[ VAFU A9\.£ STORER
I
ITSToR; 0
Dci
tAo
DCA
tAo
Dci
I
TAO
DCA
TAO
JMS
JMP
JHI'
FRETST';
tAo
Dcl
!SI
TAD
OC.
In
I
)CRl
P1rLAC
MYAC1
P2f'L.AC
MYAC2
P3rL.AC
MYAC3
XRl
PCOMMON IBLK IS IN MEMORy I LOSS POINTS AT iT
UR£TST
SRnSTMYAC1
L.OSS
L.OSS
MYAC2
LOSS
L.OSS
"'YACl
I NCAL.i.
MYAC1
TAO
JMP
·SAETST; TAO
SNA
nOKOI<.
JMP
SMA CLA
SToose
JMP
NORMLE; eLL
HYAC2
TAO
SPA
CML
RAR
DCA
TAO
RAR
DCA
IS!
JMP
70U!
31U
2164
5231
1165
3551
;;,42
TAO
3551
?il20
;0:57
" JMI' I
111llr/l
2034
2~36
TAD
si!A CLA
7640
5751
1162
5336
i,10¥!0
311JUJ
'0.103
2004
2005
2006
2007
21"11111
CIA
1~13
''''0111
2001
sU CL.A
C4[CK
JHF' t
XR1
lSi
XR1
TAD
764:1
57'51
4385 '
4386
4387
4388
4389
4393
4391
4392
4393
4394
4395
4396
4391
4398
4399
U':'JAN .. H
VJ!~3
5T01(01<;
TAO
DCA I
IS!
TAO
/MUST BE Lrss
T~AN
HACN. 1.
MVAC2
HHel
IiY4C3
MYAC1
NORMLE
MYAC2
L.OSS
LOSS
MYAC3
\
.)
'F'OCl12.3?
4428
',' 5\1
4429
'-~51
4430
~.~52
4431
'~53
21154
4432
4433
'355
4434
2~56
~~57
4435
~~60
4436
4437'
;~61
4438 .
'362
4439
2~63
4 Hili
4441
4442
4443
4444
4414'
4446
4447
4448
4449
4450
4451
4452
4453
44,4
445'
4456
4451
4458
4459
446i11
4461
4462
4463
4464
62~3
'372
211!73
2(!74
;('1;5
~ai6
'2~11
h0l'1
h"l
he2
21a3
he!!4
h05
2111
h12
:hi3
'2121
;1,2
4471
4472
4473
4414
447'
?\23
;£24
H':
"
RAq
DCA 1
lSi!
TAD
SMA
1.0SS
JMP
CRUST
URETST~ 6203
JMP t
CALl.1N
l~CALL.~ Dci I
LOSS
CRETST; CL.A CMA
DCA 1
6203
JMP 1
HISS
1TSTOR
FINUH; 21 _
TAD
DCA
tAO 1
CLA
JMP 1 rINlSH
XRS,
TAO
141f'
.""',,
SMA
56'16
1910
Dci
Dcl I
TAO 1
DCA
TAO
Dci
TAO 1
CI.;' lAC
3321
1412'
3322
1 4 10
3323
DCA
JMS 1
BL.QCI(
JMP I
4541
2121
5676
.~ elklP.I
CL.A
U~£RsT; DCA t
5620
}030
1163
301e
LOSS
LOSS
MYAC2
CI.A CL.L. eMA Rll.
lAC
6233
1410
447111
4471
4478
4479
4HZ
7576
3551
1240
3"0
Hil'!
4469
4476
56'10
3321
;22!1
3721
4468
4466
4467
52'2
'It'16
h~7
SMA CL.A
CMA CHL.
7X11e
3551
2151
1165
17tH"
1344
;="66
2"'61
2~h
eLL CMI.
.,.:~ 6.,
1001
1-84
~V.C2
STCn=3C; ,-4D
171."1
3551
'114
H15
h16
h11
h20
4H'
1165
7122
PAG~
I"lCALI.
5211
;,~64
;~65
,;,;a
231~6
'::IAI.1C'
~1.0CI(,
"
.~~00
V:'I
~AB00
~
:'1101
1
BL.OCK
BI.OCI<
XR1
BLOCI<
XRS,
BLOCK.S,
XR1
8LOCI<*2
x7175
F'INISH
IUNIT
IADORESS/256
IBLI)CKNu"l
IBI.DCKCOU~T
I
IBxrLG~0 l'
I
•• I~
I
I'
THE BurrER IS 'REE
THE BUrfER jS OCCUPIED
oCcuPIEO A~D SOMET~ING ~AS
,
CHANGED. It MUST 9E w~ITT£N OuT
laXeLK CONTAINS TH£ TB~K W~lCH IS iN THE BurrER
.w
'P81r~G
~IT
, .: .
POiNTS TO 81'~CJ ADOtGNS SWITCw MAKES
rPtNl ~T ~~r~~
.
"
"
.
',.
,....
IF'OCL1ZtJ71
4463
4484
44~'
4486
4487
4488
4489
4490
4491
4492
4493
4494
449' .,
4496 .
4497
4498
't 6
'127
'133
'131
'132
'133
'134
81UNtT;
'~34
. ~h"1"
r~"'0
t.0~1!1
I,
B1BLi(,
SULC,
PAGE:
~l
•
~
[\
e2BU(,
e
h.
•
35
:J35
'-'"' '"
23106
...J4
B2UI~IT;
I
IF'lLE DUS~lTIO"S • 4 "'ORDS AP IEeE
I-TvpE (1,2.3!U,S." 15 rOA u~OE"iNtD)
1~~(NGt~ (7711 rr ')
,
;135
! 10" QJ
'136
~~13~'"
HH
HH
;t45
h46
H47
'3"~Hi
lllHl!!l
1,0 Il! 0
~'eI1l0
!1~2I~
;'Id~S
(-'11\0"
l'~21"
~:"00
',0\1)0
;t62
;l000
H64
;1.65
(>,
;163
",000
1I"0~
' '!Ie
i'I100
;t67
~'O00
~'~~11J
'171
~'0'H'
h;3
(1,000
H72
;i;4
4'~2
0'I3'fJ,e'cH0'~I~
, 0"0
;;1t~6
~:'i0
0'f.0,0,"10.0,,,
~00"
:1U"
;t60
h61
0u,0J1/1,0,0,0,1!I
,,"" I!I
'154
H57
'H.TAS; 0",""15,(1,0,0,0
~le00
"QJ00
1'0"8
;155
,i56
BI.OCK
,-Plet0
!\"1ci0
u50
h51
h52
H~3
4,r;,1
;''!~~
l1;'JAN It 71
I-UNIT
;t42
:h43
4'~"
V"~3
'-rId;
;137
;140
4499
nIAt.10
1'~00
.·~0'"
•
',0,
,
..:,'
IF'OCL12.~7
11111111
.11111111
l1111111
11111111
11111111
Ull1111
11111111
11111111
1111111"1
1111101111
1.1111111
::111111
11111111
11111H1
111'i11i1
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
1£11210
111212'
11i11ii1
l1i11ii1
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
1200
1300
l111Eil
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
:1d0
15"'0
1111H11 11111111
11111111
11111111
11111111
11111111
11111111
11100rUHII
11111111
11111111
11111U1
11111111
11111111
11111111
11111111
11111111
1600
111210
11HHi.l
111:11111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111 11111111
11111111 ·11111111
11111111
11111110
20021
11111111
11HHi1
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11111111
11Uun
/0f1le'
~1111111
,1111111
,1"0
11111·'11
1202'
(300
... 2!QI
15021
"'60~
~'f2IfII
i'11f1l/!
2200
2UQl
2.0~
25"21
26 0 0
2700
30 0 0
31"0
32""
3300
3400
350"
3600
3100
11111i11
2311216
4013~
4100
42P'e
430e
':
440~
450~
4600
41130
50O"
1510121
522121
S30e
5400
55(/J0
!560~
57021
600~
6100
6200
630(1!
6400
650121
6600
6700
70"21
71011'
7203
73(/J0
74i11i/1
751i'l0
7600
17(/J0
/."'
•
~
IF'OCL12."t7
4
e
t ~ '1 i_
ASI:"JL2
: 1fll.ii'
V:'03
11;;JA~"71
. C14 \~
2554
EF'UN31
2136
614;)
0256
['85
~~02
Cld4
0004
:220
Z123
CAT 'J'"
11"2
El.PAP
E,"I ()
7134
21411
E1I.OF" I
ENOl.N
ENOT
5335
DCQUI~T
6143
E~FlEF'L
5331
DOTJq
DE8GSW
CEeON
DECOt-.:V
(~"04
7375
c2~~
D1U
5571
C3
C5
C1
C9
CALl.IN
CCR
eor
eEx1
CExP
5345
5341
C~!:IS
~133
, l'41
ACiL
AC"1i"lS
. 042
60:::5
AO",R
"H'
'~4 "
6673
4671
, AL~l
4'6~
AL~i'
Al.F'e
ALr.-.;
Al.TGN
ALi ST
AL~I.4A
A",nUNT
ARCALG
ARCRTN
iRr.Nl(T
ARTN
ASl.4rT
4163
4155
~572
6623
137Y.'!
316
(:.122
4732
5~24
1723
5000
6665
ASI(
12021
ATl'tST
lS7V1
'J056
A)(iN
AXrlUi'
,~~U
R
;'~46
R1RLl(
AUl LI(
!ii2n~
2133
2125
2126
2134
2131
~2IJNrT
2t32
AT!;W
~lrLG
R111NiT
BAOI(
REr.fN
9Eh
RET2
RET A
~ETil
~'01
,
55:"13
36111
,,711
4114
\'~1 7
4766
1iIF'
0I'~2
'011
~LnCI(
2121
. 335
~LI(2
ROTTOM
>IUr9F.:G
~urn:Fi
;:jUrR
~ursi'
r:
r.l::1~
~
145
ASC;CLV
AQ('I"JE
trl
PAGE 1·88
t-751
0153
ABC;('!L3
AC1~
2JIJ6
3216
., 4 7~'
~16 i')
5531
'?l41
, J"6
or
7516
01317
70'21~
6506
6505
4705
CF'QSX
0131
CGe:T
1133
CGE:TRE 1137
2564
CGETX
e~66
CHAR
CHARTA 02QJ0
CH£CK
1151
CHF'L.AG 01 4 1
2151
CHIN
CHRCNT . lHI06
CHRENO 0056
CHRLUP 0033
CHRT
6133
143~
elMCr
7427
CL.eu
7672
CLEAR
0076
CLr
CLKF'LG 2661
0051
CNi'R
1253
COL
COMBOT 0226
COM9UF' 0132
COMEIN 3140
COMEOU 3206
COMGO
1161
CO"lLST 0774
COI4MEN 0614
COMMON 16k'0
COMSU9 1502
5037
CO~l
CR(TL.O 1554
CFi(TST
2072
~ATU~A
r,CQ\jP
OCQ"JT
DEep
DECR
DEJU"iP
DELE T£
oF'
DGRP
DGRPl
DIG
DIG IT
DIGITS
ClIVi
OlV2
DIVOIY
DIVinE
DIVLUP
O"'OONE
QMPSIol
OMULT
OMUl.T4
ONORt-'
QNUMSR
00
001(
DONE
DOONE
DOUBLE
(1PCVpT
DPN
OPT
OSAVE
oTST
oueOIV
DUBL.AO
oV3
7252
63~3
13026
5627
5600
5533
5521
1306
4565
47U
0425
0441
5543
5713
130"6
51'04
6757
1632
7150
1635
7063
111100
,004
7036
7335
5114
0420
2113
2131
0463
0127
6302
6305
6145
5640
56047
ENUI-!
EFAR
EPAR2
E!:IASE
ERG
ERL
ERR2
ERRF'IL.
ERROR2
ERROR3
ERROR.
ER~OR5
ERT
ERV
ERVX
ER)(IT
ESCA
ETERr-!
(HRM1
t:T£RM2
ET£RMN
[VAL
E)(l
EXIT
EX I 11
EXIT2
EXlT3
EXtTJ
EX",
EXTR
P
lh4
6,43
4556
2135
1375
1732
17113
1766
222'6
2221
2224
,?726
2511
4566
4566
4'66
2725
2216
2221
2241
4"
12532
16041
1627
1655
1644
1613
:HI4"
2646
. S;034
53?'1
1363
2660
~044
2313
ri'043
7261
5733
rCONT
F'CoS
F'COUNT
F'END3
F'EF/FiOF!
F'ExP
7267
HXT
0[621[6
~042
1 5 22
11tH
5177
5535
2267
0117
4620
[CALL.
CRLF'·
'151215
£C~OLS
16"1
1624
rF'F'
F'G02
F'G03
CRUDDY
C:SMCI
1155
1427
0225
0041
[F'O~
0fa56
F'G04
6[627
t'lI:l34
[F'UN
1743
EF'UN2
1155
ErU'lJ
2021
rG05
nCOl
rxG04
6221
6261
CSTA~
U
£
6(/111
60'~
."
"
Y"'~.5.
...
• • ~1
~I.
rIl STR
-354
-
..... - ...
IF"
.
1537
..
-- -
F'RtTLD
F'Re:TST
F"RST
32~6
!F'3
FRSrx
3214
I G~,o;>
'1217
52~4
1036
0771
5513
3661
tOOTIT
lUST
IN
I'I8UF'
2071
.13
1eJ5
LE:5U~S
?173
q,~
>II TAa
FINeR
F' I ~j N_ :\1
rI'-l[1'J
F'I'.JrIN
1137
rI~JtSfi
?~76
riNK;:>
1133
,; 131
G5172
3662
tI>JCAL~
~INT
' G5773
G72~0
iND~cT
6465
052
7653
6724
6753
3663
3664
INDEv
44~7
LG
LG2E
LGe
L1~;e: NO
I.I5T3
LlS16
LIsT7
l.ISTGO
l.L
LLENGT
0'1773
r.,7714
Gn75
G7776
3665
3666
2431
0570
63e?
LL.OAO
l."1
Z44
G7177
3671
GAMMA
G8l0K
r.,ECALL.
GEND
3655
1463
2334
GERR
03"~
INfIX
tNUST
INQRt-'
INPUT
INPurX
INSUB
INTEct
tNTRI'T
I09UF'
!PART
1RETLD
r!N~UT
F"I C; W
ilv'-IIIN
ilX
, r 1lCM
~LAC
1326
;>135
! 1,65
4555
225:)
i
~LAG2
651\?
5162
11725
.tL~RG
In~
2~32
FUD
~LAG1
~LAGJ
rLARGI'
~L.nv
~Ln
rLGT
rLiMtT
tLINr p
FLTST1
~Lis"2
F'L"1Y
tLC~G
F'Ln~
iLnUT
rLnuTI'
i'UiT
~L!;U
F'LTONE
rLrXR
rL TxR2
- ~L rerR
~M12
FNVG
rNM
rNTASF"
rIllTA9L.
FNIIM
ro~
rO~l-IlJN
iOIJTI)U
rPAC1
rl'NT
rPRNT
rSiN
rssERR
nIT
G101
2014
5774
(1"00
3667
3670
e! iHl 5
IF'1
1~25
~034
:3~64
01~6
l.~AKE
0211
0036
0"53
L"'AME
LNUM
La
l.0101T
l.OlOJ
LOG2
LOG5
LOG6
L.OG?
1.0GB
LOOP01
LOP(N
LORD
LOSS
LPRTST
1.5
l.SAVE
LSSLI(
LTAPE
LUKUP
LWETMP
L.X IT
MUl0
M1L'lPT
Ml1
M12
M13"
M1<40
"1144
26~3
5556
Gl~C
007~
JUMP
3120
1040
1546
0227
6575
7410
1533
1736
1450
1452
7521
1451
2003
6464
6~212'
GI-IST
1375
1<5
552'5
GO
GONE
GOODY
GOTO
GRPTST
GS1
GS2
GSJ
GS4
GS£RCH
GT!:M
C;i!ERR
5021
KINT
Ll
l2
L3
2625
5126
5131
-125
h07
6517
()471
GETl
GEi'3
GETARG
GETe
1~75
GEi'cx
622'21
"517
r.,ETLN
,~514
6565
5040
1614
6467
6507
24;~5
- Z14
( 015
2407
6142
5163
GETRHS
GETSGN
GETVAR
GExIT
GF'ND1
2330
234S
1401
4545
1566
4554
1000
1045
1405
0352
1510
1iJ232
"045
(1'603
133
0144
1435
1464
1444
1457
14204
0021
-'362
f/13J7
0153
('1045
2414
64';0
IBAR
('1212
5465
tECAL.~
1~~H'I
-374
2161
6311
1914 1
7651
,133
;474
HI~eur
HISS
HORD
Ul37
i R£T ~~
I TABLE
IHRi
ITLCAD
tTSAGO
t rsrr
1TS II
IT501<
rTSSS
ITSTCIR
L~!ST
5134
L4
5137
LASTLN
LASTOP
L,STv
LC
lCHAiN
LCl.OSE
LeON
LDMILO
LHL,t,G
LErpuT
LEPUT
LERR
LESUP2
1'1055
kl031
5111
1202
1520
,,371
1160
1462
3172
6163
6357
~"2'
(1170
471 ;s
~;,sb:
~'M16 7
(' rt 77
('~'2
~C74
13"6
51'15
1327
6366
12:'3
2,72
1422
1172
1171
5167
6333
105:'14
5157
51112
51415
515fc?
5153
6433
1431
~046
~151
20:S7
6116
1233
1324
6346
1·HZ
~0?2
1 416
Ql1Pll
61H
01121
2413
2357
2,56
6137
M~
~111
M22
"'1"5
M24Wl
M260
M272
M4
M40
10143
•
;'11114
1534
1544
6141
23'16
1 il '17
.•
,-' '
•
IF'OCL12.37
'.7,
"5
-.B~(
At(
"C"'''I
vC~
"C~
.. 0
"E~
,
~,-
"tAU:"
- 1~':5
~P4
..,PS
-O\P6
"IP'~
':(GP
14i!6
-'6~2
13~5
7254
7256
7255
7201'1
7253
12U'
-:115
"UI TV
5664
5665
11:J1
~ 57!i1
5667
5715
4752
\,IVt':NT
1323
I,4vei'~
12~'e
~VI'TR
1201
,-164
.'165
'166
'156
.157
",PI'US
"'SPACE
'4UirliV
~ud
o.IUI.Tt0
"'UI'T2
"'VACl
"IVAC2
"4VAC!3
'~VTrMP
'"'YTlo'p2
0061
.1.36
116
117
5375
726r.l
1.'1 ~
"'1 ~!r.'" A 14NJ IotINCOf\1 6374
5662
"INr
-"'I"JSKI ~-"'51
MINllS2 7153
MINUSA _'112
6301
'4 I >"lllS[
S663
Ml~UU
"1L!HiLK 1165
t.4L!MiT 7647
7656
MM~O'"
5214
~o~
\,IantrV 1254
1262
'.Ion
1275
MO('l[NO
"I0nLUP 1266
MORNUI'1 1356
..,P'
..,P3
"!o4SCl
.:. ~~S
... ri'T
t.4P1
PIES
(1(165
7;66
'1564
4724
756!)
7561
\AGSw
'iC·jb,RS
26i12
5526
l135
23136
l1~JAN"l1
V':~'3
12r
_~IoIIJNDQ
MOV!'lOV
.}
tr'
t;F"(EDS
,"
~'1..
~OCI..K
2653
751;3
7556
651;
:~ORF"
"JOq!ol
6571
7147 _
'~Or:lMF
2a31
NO~MI..E
tJOTSAV 131 4
6615
NOX
6711
NOxl
6704
",Ox2
>.JUMSGN 1061
r-.;,OCRI..;
'JOIHNG
01
aU
012
0212!0
0215
027
03621
031
04377
04600
056
06000
06371
01
36021
1123
1545
00213
1157
15121
02107
136\'
012176
5314
11'6
0173
75'10
117b-
7415
7650
0174
1501
07472
1424
07510
1154
07524
7572
07566
0015
016[{o
7571
01655
1124
017
1125
01710
1573
01716
1155
07161
7567
07163
01164 ,:11172
1126
01113
1121
07774
7752
aC
OCTNUM 1101
073~0
07400
01420
PAGE
1.9~
7161
7704
7753
DE
r.ERROR 7113
7131
(lEX 1T
7114
oGO
7734
01
7722
eLlST
553"
0"112
4716
O"JE
1425
oau
006371 1730
3115
oP
6567
oP~ 1t~S
OPNEXT 1622
OPUS\' 1731
6002
OPTR
2663
ClPTRV'
2665
OPTR!
2664
-oPT~O
5532
oPUT
7763
oS
1357
QSA~P
00
aOISSP
aT
oui'
QUTA
OUTeR
ClUTD£V
aUTOe
ClUTPUT
QUTX
oVrRl
QV[R2
p
P13
P17
Pi"
Pl;I..AC
p200e
p27
1'217
P2F"LAC
p3
p337
pJ'17
p3rLAC
P40
p400C'
p43
P5LNAM
P61.."lAM
p'1201?
'1771
2465
5536
2416
13063
6154
7706
2475
0043
21047
00210
0005
0107
0106
0167
~373
6150
0110
"170
2036
el075
2553
0111
2552
0124
6310
Ql145
0146
1402
p16,i:~
pn
p17a'3
P174r11
PAl
PACBUF"
PACKC
~ PACKsT
PACX
PALl;
PARTES
PASS
PB1'-LG
PC
pel
PCIoIAR
PC\o!£CK
PCHI(
PCl(l
PCLEAR
PCLKF'I,.
PCOMMO
P02
P03
POL)(~
PEtA~1,.
PEQ
pER
PriLTA
PF'it-HS
:"1~4
:>l22
~121
-'312
2~24
2~~2
4,46
?iIl27
2,3'"
526"
2051
633;
,,163
,,022
0614
14~1
5244
r510
2535
0~'15
7745
21154
Ql5J4
\II!)54
~ru3
63H
6135
2'102
2'1!J2
('JU0
prNEw
~4U
p\.[Su9
Ul'Il
1771
PF'NUM
0411
P;)(
?-412
PF'l
1422
PGnC
PG[TIiI'" - U43
5311
PI
5036
P12
5315
PlOT
5536
pL.eE
PL.ClMIL. 011114
PL.£F'LA 10'5
PI.LPl
PL.LP2
PL.LPJ
PI.LP4
PI..NAME
PI,.NU"!
1006
PNC~AFf
7132
PIIlCOI.S
1176
PI.OOKU
110616
1044
1102
1122
i1I142
-:0153
l
"\1\,01."',,,
e.:
=~=L
,"''
":Jllr
=C"_
<1544
:;,41
RETURr-4
' "'Ev IT
POOl·;;
;733
r\HSERR
"P4~
111'~
~ITEOU
'f
,
"'~
~413
PPHfl
77!t:5
I)P~~:
1421
"P,,[ . .
"PT:;
"rol'~!V
"rolrPLA
"Ihl~lq
PRi ... 'c
~R~;
pR';'';2
CtR .. ,y
P~";L\j
PFlr'C
PRne£s
pSC:C"O
6144
7574
1622
,'155
1 4 23
4551
2442
3114
6132
4553
611
. bHJ
~s~;eL.
7715
;746
"s,~
~'165
ciSTAPT
1322
PSIIRS
1UIZI
:'030
pTi
PTRl
PTel>!
PTr~
PHST
PU!II~u.
PU4;~'"
silUt;~J
P\rIA iT
PXI'lUTL
lana
Q6
RAN~UL
RA'JO
RARl
RAR2
Roiv
QEAnC
133Ql
,!126
6275
1462
4542
4543
454"
t'" 74
;774
;;~61
5441
616"
1142
6'73
6574
~152
Q(PT
q£"OL
4552
274('1
2761
5112
1361
6146
67!)2
-~E!I;!'lL3
7376
~ESnl:5
631!'4
REr.nVR
~Eenvx
qEMAiN
R(PLAC
qtSOLV
H'~
j,
<
y,~~
4"'-W~'1I-'
~ET
~ET'lN
R".JDZ'
ROOTGO
FlOT
" ROUNO
RTL6
RUiJ1
QUA2
RUB3
Rue4
qUe5
RUeIT
SAoR
..
54'2
1563
55.36
7146
113Z
3651
5527
7461
2557
6151
4557
3Z04
3042
303"
H37
3041
2555
~~::~;.u
START
START!.
STARTV
STEMP
5TEMP2
5TOKOK
5T009G
sTORIT
SUBR
SUBS
SUaS2
SWITCH
SWTMP
2601
TASK
SCIoIAR
SCOf'jT
1271
1266
scoPOU
1300
75~0
SCoU~T
5534
SETCL.I<
5351
SETT
SEX
1041
She
1336
014'"
SGoT
1310
sroUND
SICN
SlCNf'
SIN
sMiN
SMP
SM9P
SORTa
SORTC
SORTCN
SORTJ
SP[C lA
SPLAT
SPrvOR
SPTR
SQCONl
'SQ[NO
SRETLO
SRnN
SR[TST
1304
7124
01Z1S.,
2662
6136
6101
6134
1312
4550
0354
4547
6717
3~51
45U
7671
1467
7465
1541
!'I261
2024'
TA51(4
i'CRLF'
TCAL,,2
i'DUMP
TELSW
TEM
TEMP
TEN
TENPT
TEAMS
TEST2
TES14
TESTA
TESTe
TESHI
TEXTP
TGO
TloIjR
THiSLN
TH lSoP
T1NTR
TLtsT
TLiST2
TL!ST3
TQUOT
TRAO
TSTGIlP
TSTL",R
TWO
TWOP!
2276
23i11;
2214
uTe
UTFIA
uTx
Ui!ERST
VAL
~U2
WAiT
2044
2051
6175
0171
111161
0161
0162
3611
SAVL.I<
seAR
1312
2603
UTE
1750
1751
Tn
37~1
SAvAC
SAvE
6150
t27.1
1223
UIl£TST
021(110
i'1
TVP£
TY"£:2
5i1J64
1.H16e1
T
T2
T3
TABLE
TAGl
SAM[N
0117
0032
0"71
111033
6466
6123
121/12
1250
1246
1243
32152
0016
5156
"'26
6271
6152
1772
67'36
7366
0322
4564
4561
11J017
54021
7257
U23
0024
1236
1316
1532
2317
1227
6575
4563
4562
4721
5305
wAlTER
wAtTLP
20~6
•
2316
2064
0032
7657
0020
U15
"1664
0ft172
WALL
wEXIT
0003
WORDS
!!I6:S~
wRITE
WT[5T2 ' 0653
WTtSTG 0667
WX
171673
)(
xl
x2
5321
50!5
4675
x7174
x1775
XAeS
XAOC
XCT
XCTIN
XDtLET
XOUP
X[NDLN
121140
xrJNO
2244
XGtTLN
XGfTOU
XU3
XlIII
XINPUT
XII11T
XLC
XLG
XI.L
X1.0
xLS
XOUTL
XPOPJ
XPRNT
XPUSHA
XPUSHJ
xQ
XR1
lCRAN
lClhR2
(11141
2f1l16
1341
~020
0062
2064
761!12
2360
~302
1254
2666
6306
5666
1156
1'1130
0136
0132
9IU6
0134
2676
1'65
242'
"'477
0521
0QJ01
Qlkl1fd
1145
7.56'
.
/~'"
..
~,.
",
C 'J
'-
'.
.
IrOCL12.~'
Ii~·
~11
... :;"'(
y~ •
-.112
.,
y$~'.
413
:' 112
)(S .. ~,.:::
721
XS;)'- ~~
1535
... S~2
xS':l:;
4676
5,325
lCS~qT
,4:"l
XT3
-717
ltH!;1'C
70 m
1546
""rs'"
xV7-
,
2 4 51
-.~."
6;22
ERRoRS
LINKS
~(T~CTrOI
~
CrNr~'T'DI
~
RUN~TI~rl
40 SECONOS
41< CORE U!i:r.~
/
I.
1,9S0l
ABSOL2
A8SDL3
ABSOLV
ACli04
.~
:?S::32
~J13
~3A5tt
58.
32192
31310
Jl33#
263211
3344-
2632
32!33
2456
246~
'J497
2454
2464
2944
2813
2493
2903
2391
~'-Rl
AC1!.
ACMPiS
AODR
C;91t
67
::'8?9
I. QO"l[
2962
AF"
AL'l
AI.F'2
AU'i!
ALGN
A!.JGN
AI.1ST
AI.PHA
AMOUNT
ARCALG
ARCRTN
ARGNXT
ARTN
ASHF'T
.... 82 •
1068
348
;'9;4
746
760
AXOUT
B
771
~1BLI(
~1r1.G
4485_
P1UII/!T
P2BI.K
R2F'I.G
.4483*
4489*
~2U~!T
BACK
p[GH:
~ET1
RET2
AETA
Fl£U
F~F'
Al.K2
4487#
;329*
32
1950
1949
3632*
1952
1894
'3626#
4308
FOTTOM
PUF'BtG
~UF'F"ER
PUF'R
U23
1430
- 1431
3663
43U
- 3861
43Z3
3131
3158
3167
3164
2953
30k'3
31B5
3192
!196
3276
2972
2524
2996
2848.
2856
2986
2992
2998
3007
3021
3691
37117
81 4
1131
828
127S
1274
1276
2951
2!512
2818
2513
2964
2821
2957
2985
88"
3664
2916
3665
2983
~"'., 8-
,,4
761
250
247
1686
1683
1232 0'_ 1367
;$182,
810
81~
1717,
1411
1724
1763
1738
4486.
3868
PLOCK
3197
312101
25;7,9
•
32(."1
191'"
19681
~;41
2967
1945*
1963
•
298'tl(
29.
i538
'37.
3080
3631#
ASK
ATSItJ
2812
2978
1971*
1965.
2'119,
294'.
160
3662
2968
21H,4
2,H,5.
112".
198"
2979#
756*
1024.
751
21'
1543
231 ,_ ...
309'
ATI..IST
AXIN
,
';'892
1956
1954
- 1958
'868
2919
;59
2931#
3344
" 2St5
.u57
51#
47
'629
U,
2339
2r112
1977.
196f1l#
3673
19741
192121#
3830
3869
4312
4459
234
80
34~'5.
246
02342
1811.
3677
3100
3102
J7~6
3708
3832
3834
42H
4322
393'
4272
4325
3850
4281
4346
3858
4285
4349
:S66e
'292
'372
3862
4298
4378
4465
3840
4274
4342
4469,
3849
4275
434'
4463
3838
4273
4326
4467
. 1268
1269
131 6
1322
142'
1426
1433
4064
38821
4315
4461
-4\'160
13 4
3413
8{'t9 -
°
-1BeU
826
'0
,(:;'1
2351#
:t~;S
3183#
137:5
114r1
.:-:9
~144
,~:'~
1522
2621#
1459
1478
2222#
2216#
2214#
221('1#
4444
791
1241
2866#
2653
1923#
1236
205
·l8,2
3'129.
-
nil
':1° 1
~24"
-20('1
~~~#
~2b2!
,~'1v
-:3
rS
':';'
;ds
~1
;d3
r,9
~AL.L.iN
'~4~3lt
cCR
171-
cor
2611
cEX1
'-8:53
r.EXP
Of"
r.rRS
;851
iSS9
132#
136j
c',RSX
CGET.:'f':
Cf~T~E' ..
38 4 1
:<1
~5it5
c.aUx;, :.' i'HII
~HA'R .: .. ~'
,:".
:;
'.·86'
. -\21.5
1562
3519
eio+ARTA
CI.CIJ
CL.EAR
tLF'
CLKF't.G
CNTR
cal.
C;OMBOT
COMBUF
eOMF.:1N
~OMEOU
cOMGO
caML.sT
COMMEN
33;2f11
3401
99f11
.·1505
2U
131*
131
1244
966
39:31·
4362.
3994
1282.
366 9
. 1628.
1235
799#
226"
214
4310
4198
1997
2?117t
4441
1403
2657
2662'
.9·09 '
77;"
1496'
2169
1408
2739'
4369 .
40U
1281
.::
2844
745
4251#
4185#
c:R£TsT
658 .
."t".,
1319'
3545#
5.·7
~RETI.O
"I·
Z436
5~'6
3;34
4141
1991
4231
3932
522
1311
1794#
643
rOMMClN
COMsuB
CONi
1781
1726
2865111
226
509"
28"4
17~8
79 4
1423
217
1793t
1795
139111
61h
~~7
2243
2634
U09
4327
; 618
7BfII
;67
1676
255'
1:309
24(.'12
.. ];56.
' ., 2U
1 ~"3
1491 \.
3928'
4329
3967
CHF't..AG.' . 3;29"
165
e10HN . ,'~'121
ewRCflkT', ':$622' .' 3642
3669'
C:\04R£r~D ,"
3659
3670
CHRI;.UP;
3650#
2616.
C'HRT
~589
elMer
4132. 4153
CHtOK
3425
1746
1549_
13~
42364446"
230
1794
2033
20'2
2859
2862
9'9.!
1510-c'
3494
r: rHo F'
CRUDDY
CSMCt
rSU~
i
:-'Z5~
.~~
.q,314
3467
134,.
'150
212
225*
~:';4
3;~s2
311£1
3~1"
3~11
3~B9
31:'9
3111
3113
3118'
3261
514
2424
27H
2322
541
2433
719
196
2441
818
2122
1226
1380
2431
3312*
3333
333'
1155
2758
r·8!)
:t!l19#
HUiI
roATu~
:r:'~8
3~169
QATU"IA
OCO"lP
:-243
3261#
['1CO"lT
ClCOU'JT
:"ODTJR
386
o£BCSW.
nECON
rECO~V
DECP
(lEeR
r£JUMP
r.EL.ET£
or
OCRI'
l"lGRPl
olG
tHGn
r"IGITS
'559
21-
44#
'416
332
,,-;7
2311
4"'22
lBU
1987
368.
:sekl#
2332
2427
;26U
() I V1
t' I '12
OIVOtV
'503#
DIVIDE
4279
H40
ClIVI.UP
('1MOONE
4286"
3:)88
nMPSW
OMUI.T
~O21
ll'12"
~NOR!oI
;017
3,7JeS.
,;26
D"JUMSR
,~(lI0
n~UI.T4
nO
DOK
, DONE
r·OONt
.
;668
DOUBLE
DPCvpT
:'IP~
r,pT
nSAV£
flTST
DUBOIV
~UaI.AD
:)V3
F'
(CAI..L
E'CHOLS
363#
1245,
1248
312
1281i1
'661
2661
2!552
'421.
'425
~122#
394
2586
21
2,"9
2418.
2395.
2219
2343.
4341#
259
2362.
2462
.. 2348
2511
2915
4283.
3176.
43214
31139,
2~8
3~62'
2918
2~29
743
1258
126h
398#
2561
2684
2669
2626#
2444
2624.
240
2422
2417
2284
13S8
2353/J
1324
24721,
2349
2518
3039,
2626
2624
2920
30219
3"~;l
3054
1381
3111
1391
1394
311'
241111
3302
2124
3305
3274
212h
272 4,
3326
3300
3311
2502
2922
318'10 4'
1148
2~34.
3268111
:-:2;"-
l29~
'46~
2466
3~;7
3~.'t~'
1~57.
...
4~'h
1926#
397
:5176
651
•
•
uS 4 ,
949
1286
2486.
33""
·31213
1"'38.
3336
,
,/
.....
)
..-....
~
7611 .
FF'O~
n'u"j
.; ?!;2
;- 1.39
1.35
~F'u"l2
~. F'U~~3
921
1124
1\'43
1136#
11'1511
733
n.~A~
11. 22
ll':i~h
END
~ II/DF"I
1.3311
1444
2682
2690_
fNULN
1'7211
200
1315
r'lDT
134#
F.NREpL.
P.JUM
FPAR
FPAR2
ERASe:
rRG
ERL.
.'
~RR2
rRfH"II.
~RROR2
4~99
1086
1109#
1155#
;49
132411
13~9
191
1566.
188"
~~54
189#
ERROR4
iq~.
E:!W
ERVX
£RXlT
FseA
[TERM
rTERM1
ETERM2
nERHN
£VAL
F)(l
nIT
f XU1
EXlT2
EX IT3
FXlTJ
ncP
rxH
F'
rCONT
reas
~;47
354
1315.
1318.
1308
4145
1524
1065
1050
ha2*
iQl56
665
57#
1598
;~06
2~13
~321
162711
62#
?994
:5402
1~135~~9?1
baH
352
rCOuNT
;2;2
rE:N03
1357
rEXQ
3;52*
51
12#
re:~H~oR
FEXT
2740
873
1151
2156
.
114;
736
3523
2111
41(j311
1123
E:RROR3
ERROR!5
FAT
13'"
oj ~51
1"111
1142
j)
114QIJ
71
1;. 72
fF'UN.3%
113Q
.)
13(7.
1333
132U
1666*
4'1'86
289
245
307
2777
355
1850
1127*
1668
:516
325
379
399
485
,~a
Sic18
1546
UU
2431
2898
3133
427
661
955
674
1314
2020
3497
:5508
682
9~1
U59
1015
3562
U4'
1154
1218
1566
2022
2519
:556
477
166'1'1
4194
4206
1°48.
2887
1561
. 29:'l9
2232
2958
3499
2980
2981
298'
2999
30221
:5U4
:513 4
2556
3035
2560
25'2
31!54
2602
3328
2609
3329
2673
3334
2865
3355
28'9
3:518
2960
3"'2
. 258a
315'
3379
2990
3380
2318
2355'
2359
43t'\2
1869.
1902
4:510
4054
1912
1961
1992
2vWIIJ
2011
2~26
2036
2~1"
2121
2135
2145
133~
1334.
4163#
1531#
10761
1kl60N
11(18
1\373*
678
2516
16"2
2~13_
686
2848
1614,
2"71
776
2866
2184#
3334#
3~0"
25:54
3H4
1407
31"6
714
3186*
719
2397
2117.
2278
1365#
4269
349
1676
F"F'F"
rG02
rC03
rG04
rG05
rIGOl
nG04
r H.ERR
rII..STR
F'lI.TAB
•
932
,c:.;33/1
'~~6
~54~
2156
~5~QI.
3987
40~3
F'INON
134911
F"INF'IN
rlNlSH
rlNKP
476
3;38
445(/1.
'1i'I07
2676
F'lSW
rlVHuN
nx
F't XM
, F'LAC
F'LAO
F'LAG1
rLAG2
F'I.AGJ
F'LARG
F'L.ARGP
nOv
F'LEX
F'LGT
rL IMtT
rLINTP
F'L1STl
rL I ST2
rLMV
rLOG
, F'LOP
F'LOUT
F'LOUTP
F'LPT
F'LSU
rLTO'iE F'LTX~
TX~2
n.
F'L TUR
713*
771
668
2023 .
269~
35U
h80
1904
3746
;S68t
3747
1878
3887
126
126#
19t13
3893111
69
3Cl16
61#
;0~2
;926
;sh,
2831
415
133
4;8#
<475.
;9144
35a
1091
'317
129
'836
;S61,
h8
331
34#
43
4p2
515
8'!7
1224
965
1185
67~.
789
3527.
3012,
3f1'3S,
66#
4098
27;14_
373
1362
717.
rINPUT
rINT
4~82#
27U
2U7
3351·
1171
21"9
1873
2155
1819
2162
19"8
1945
3487
3500
2885
732
669
2889
2902
~H.81
H82
2585
2839
2843
3376
",
"3.
2552#
2671*
;['13
13U
14M
4C'78 \,
4057.
2692
2549 .2678
2547/1
4498#
t INOLN ,
2543
98~ti
'665
47S
1;0j
2235
2546
3;32
nNC~
2183
35:'2
'56~
,,.,97
3975
39;9
2166
70
398
464
4455
4,468
1132
7!'ill
2132
2698
226 4
726
2"48
2'04
2273
3349
2315
2117·
U96
2132
3372
267
2049
290
2043
2,,44
20d
696
1181
U47
U29
11~9
119"
255'
2511
25H!
2137
3398
2167
2233
872
3,095
684
105
3131*
2928
2853,
683,
1441
673
285
19~'
631
737
879
2857
2860
2Hh
1939#
688
1,,98
1100
2654,
269'
23,4,
2'88
2614
681
~927
2(H8#
U97.
2321
2522.
2851.
2925
1178
1816
2825
136
1996
2547
1128
lUi!
3031
2924
2t'1~!5
2541
lU9
1445,
2370
2842
144"
2900
2378
2854
2861
3183
3745
!:' ,'112
PolE.;
nO~
F"JTA8F'
!:,,,Uf4L
~. ~U'1
!:'OR
!:'OR~UN
rOUTPU
rPACl
F'PNT
F'PR"IT·
FRETLO
,';61
1930
11#
34111
1151
1156
655#
3486
12911
132
37
1843
1822
c'7?:S
G7200
1824
1830
r.7173
C7174
r.7776
r.7777
1863#
1821
1821
1823
1825
GBL-OK
1828
C£RQ
GETi
CET3
r.ETARG
CETC
GETCle
CtTLN
GETRIolS
G£TSC~
r.£TVAR
GEXIT
r.F"NOl
r,lNC
C:1.15T
GO
c.ONE
GOODV
?1J5
2138
1152
11~2
2739:
741
3526#
231'8
G5172
GENO
18911'
2623*
l2(')::'
1180
JJ69
3373
J4111l#
279'.
2315.
2799
2831
281'16
- 2822
,2864
4~54
4~67
706
731
968
1099
1188
1779
365t1l
3105
. 3707
31 4
1398i1
1410
312
1047
. 488
112 0
499
1137
513
.7~7
806
1321
2018
211127
2122
2125
2869
28'14 ,
286:5
2913
2915
3143
649
7SZ
1761
786 ..
1169
4225#
351
'519*
13.
CECAL!.
111'16
'291
F'SIN
F'SSERR
nIT
r.AMMA
21'2.
27
44iHU
r. 7715
?513
1987
711
3367
2647
3~5iZ1
F'RErST
rRST
F'RSrX
G101
.)
j)
~
3621*
9~2
14,,2'
_2?7
1311
1<400
656
1'54#
;97
1"7;4
4146
168M
~;25
70"
903#
298
944
~8*
494
. 1995
~31#
1796#
16.12#
2122.
3154
6721
1859.
le6~#
1861#
1862.
1864#
1831
1866.
1867'
3644
1855.
949.
1419
307.
138'
141h
764
233
819
2741
4186
241
3827#
1869
14754
3.,8
186!5t
899,
253
90~
2769
41B9
363
3814
1985
1993
:517.
91~tI
946
51"1
295
913
2763
4248'
483
957
89h
1783
2165
U.:I2#
270
3652
4831#
366"'''
r.OTO
r.RPTST
183
5a4#
744
4,116
592
593
31215
997
1219
600
1227
2146
2159
521lJ
,
647 ,
1561
4252
3352
1765
r.S1
C:S2
.19
939
r.S3
9:!4:
r.S4
9·'5!!
y.' 5
c:se:~CH
G Tl:~14
(ii!ER~
•.q N8UF'
.. ISS
HORD
;33
rBAR .
~91/
'38
53*
~;33*
63.
2612
3157
82
2141
I ECAL.L.'O:
6"52
IF'
tF't
63U
U7
6411
tF'3
rGNO~
I GOTt T
tLl ST
TN
tN8ur
tNCALL
rNOEV
tNORCT
TNF'IlC
I NL.1ST
TNORM
TNPUT
rNPUTX
tNSUB
tNT£GE
INTRPT
IOBur
IPART
IRE:TL.O
tIllErN
ITASLE
ITERl
TTL.OAD
!TSAGO
1T5F"F'
ITSI!
rTSOK
TTSSS
I TSTOR
JUMP
:.:'5
KENT
11
l.2
219,
~a42
6.H.
'337tJ
5O.
3486
lH#I
2814
U5
2?2
'675
596#
239
52.
69#1
213
33
634
4223
228#1
;85"
698
~~99
'757
435U
41561
Y47
976
Y16
14;)1
325#
4263
98J
2751
3162
1452#
472
651#
742
649*
918#
1412
4277.
231i6'
2876
3260
1461l'
1415
4293,
4294
2419
2943
3315
4296
2481
2946
3322
32102
3338
2136
2238
2749
4280
2388
4289
2398
288\!!
2996
2941
3284
3299
33;-6
1634
U38
16a9 .
2449
2725
245~
4311
~496
~
4359
2498
3021
444'1
25'-7
311136
2595
3041
3045
2891il
3483
3491
3523
3381
2621
26~1
311~
3385
651!'
224
3853
646
2369
1609
H()7
816
2849.
1440#
470*
2726#
6al
262111
283
736
1579,
163Q!
652111
42324H
2923,
7U
H!l'U
4216'
473
38'"
2371
1613
4428
1283
.t44"
606
14462
1443
597
861
769
926
1569
1811
16:51
16:52
1192'
1793
291'.:4
2907
:5359
U61
3364
3U'
3366
;S37~
3375
n82
2au
2826
2833
2834
2831
2846
28411
2894
2911
U31
424'7
4382
41'52
3422
4149
;648
,Sfll2
'303
4158111
2~65
2U',
i583
2367
•
•
927#
95~1I
3432*
415"
4388,
2al3
2341"
1588
2372"
4449
2811
159"
3392
.
~' ..
.
-
--_ ..
".
L3
14
l ASTL III
LAS T r')P
l A5TV
~C
l CH Al N
LCI..O!'E
I CON
LOMILO
I EF'I.AG'
LErpU T
l [PUT
LERR
LESUe2
LESUEIS
7511
41i!
71'8 11
277"
332tt
234
3949#
~726
:5892
198#
198
;772
196 11
1.99*
,,'6
LlSTGO
LL
U.ENGT
LI.15T
L1.0.0
l.M
L",AKE
LNAM[
LNUM
l 0
LOAOI T
LOAOJ
L OriZ
loG5
LOG6
LOG1
LOGe
L OOPt"1
LOP(N
10RO
LOSS
LpFlTST
LS
loSAVE
l.SBI.K
LTApt:
LUIC
3873
3564
:50(1011
3546
3565
3562#
3555#
3594#
35;611
3587
3563,
3'79.
3561
235"-
~563
r.CTNuM
r·c
(lOISSP
roE
r![RROR
rEXIT
nGO
3561
01
01. 1ST
""112
~~68
356~
Cl"lE
'32'6
1901
(IOU
412911
(106377
rP
3575'
~PHBI.
1290
;525.
1595
1586
i;61
'861
OPMINS
oPNEXT
111'55_
"I'TR
c:I'TR2t
('PTRr
"PTRO
c:PUT
163111
'352*
("s
3566
862
3567
1.63
OSAMP
oT
~UT
('UTA
2337
r:UTC~
(1UTPuT
1499
83 •
2352
;48
!'IUll(
15:~2'
(1UTDEV
.rUTDG
('lVe:~l
011'
r.VER2
,-.
;,'13
-
6'.
3~28
2'5*
22#
J9'!4
•
39181
\.
<1284
3839
3921#
3593#
3883
3659
..
3654
3474.
~7655
i'n
•
3965
8
4244
1213
497
1378
31'9
910
929
439 4
3156
40'112
4118
4120
3978
3911
3998
585
1402
1696
589
1464
17114
28~7
1526
1140
15:5~
229
1119
254
41,a
1138
2266
824
834
904
2276
2443
487
lUll
1699
1'1 fIIQJ
436
45121
46'
633
114~
333#
1533
151tl1#
223
218
1143
2161#
948
2766
153~
228
815
121f/J#
3556
4451
261
609
1220
268
364
1439
384
4Q17
428
1545
4~3
~556
4~8
446
4'4
211
4'5
461
23'
469
416
421
422
423
154121
2758/1
4£66
1466
4196
4V9
2J4~
2315
426"
4211
4336
416 0
4203
~338
206
492#
4112
215'#
418
1532
181'
3584
4217
44Q1#
458"
14'
1191
2768
4365
26 4
5('9
42h
1534,
3593
1033
3!586#
4397
444
46"
4;,61
355#
1158"
4-162
PF'j!
356.
4126#
4142
PGETe
2810
439,2
9391
PF'X
1140
he~
3416
439t'
1396
1512
p5L."lAM
2029
1 476
3341:
1547#
242
2727#
3886
3690
125.
1659
1456
3 :~3211
1548#
4246
'-6;2
p77
1'5?4
323
4242
1'516
3;4711
p43
p61,.!'-a11
.J
~
4~6J
4249
9!53
1021
.
Pc ETlH4
PI
1'12
PlOT
PLCE
PLllMIL.
PLEF'LA
PLESuS
FlLI-P1
PLL.P2
PLL.P3
PLL.P4
PLNAI'4E
PLNUM '
PLOOKU ..,
PNCHAA .
PNCOLS
PNF'EED
POPA
POPF'
POPJ
POPTR
pp43
pplSS
ppROC
PPT(IIJ
PPTR
PREOIV
PREPLA
PRHSrR
PRINTC
P~NT
PFWT2
pRNTl
PRNTLN
PROC
PRoerS
PSCopO
psETCL
PSIN
.511
'144
",1,19
, ·116
,,99
3A28
3888
4262
3836
3851
387111
3915
3837
3976
4168
357711
3613.
3614#
:38331#
~84U
3863#
390Z'
3'129
3;2H
;'4733#
3539
3598
3597
14511
152*
146#
3578#
3846
3556#
4124
'-542
3459
4275#
3735.
.4116
162.
1697
2600
1465
36(:117
3582
187'
~~14
PTl
PUs!ol~
'h0
1,.,61
'677
4 \'123
127#4
~625
925
148#
2169
2181
2312
4167
23~9
4118
21 97.
2344
•
2345
•
235h
"
3857
40210
3861
4175
3916-
3594
42'2
542
666
404
739
699
693
969
4164
1106
U94
1214
2888
2753
2901
2773
29e3
3558
2908
un
11 4 9
1133
1336
1211
919
923
697
987
4251
784
1166
79'
116 8
820
1773
1288
1775
un
1472
2316
1489
1492
1182
1461
2341
675
97"
1772
700
917
1776
7~2
916
1718
104
98Z
1046
llU
2H2
712
69~
1119
1759
3557
4~1
16611
2157
23'5
3996
J'3y2"
382
492
3596
3895.
381
~613
4165
5~'4
;63
1;;3
4117
4~6
4125.
262'"
3471#
4282
4121
4127#
213
17e5
263'
1469
1181#
2615_
519
409
3&88.
46*
PTBL.
PTe!'!
PTEN
PTe.:ST
2119
23;4
3969
3689#
3995
2193*
·2'H6#
~;261.1
psTlAT
psues
3968
2163
4155
521
17(!16
17139
4204
768
1123.
14'"
1493
1787
2615
1698
489.
479
1701
2249
4SU
3576
495
412'
6G"8
692
11/132
392
93'
1114
395
940
1126
2706
530
945
11311'1
533
960
11921.
536
17!)4
662
963
1751
11621
669
961
1172.
663
676
111
. 766
U40
1~42
. U44
546
n:u
2"'U
3612_ .
3589_
4053_
4264
388
934
11,'1
2691
4\l!59#
1710
2699
948#
36~
27('121
961
667
9b4
2716_
498
1785
PUS~H'
PUSNJ
pwAIT
Io'XOUTI.
i)ADO
'<6
366
1~3::
2,:·2
349S
c. ~·'
!!
~~:'S
~1"
1636
361111
911
3l'1S
6d?
od3
6'19
712
924
928
942
959
961
1428
1537
1539
129
731
2500
25r.1
2627
3391
2469,
409fh
2576
2482
2464
2621'
3('129
3~34*
~331
3345.
268'
3J34
2346
lPJ19#
2723_
3203_
3201
3345
19~7
1913
3114,
3875
2029
2127
2U'
2181
3884
391111
3922'
4127
1552
2265
R[VtT
RHSERR
R ITEOU
RN02
ROOTGO
ROT
ROU"lD
ATI.6
RUB1
,;23
,-3t\4.
;53
hili
~164
3843
1838
;,95
3384
1536
'587
174*
155~
~Uel2
1728
RU83
1134#
wU~5
H21
1515
'351
qua4
RU~IT
SAOR
SAMe:~~
1733
4~97
C:AVAC
C;AV(
15;6*
S~VL,K
1577.
~BAR
!liC~AR
SCO~T
155h
2554
4100'
1579
1463
:S4n
174ih
258 4
1625
aB~
877
3~81
")
1750
825
f!46
4106
33981
819.
816d
SETCLI(
HTT
2349.
3389
1552'
263'"
291
1714111
1744.
1746
1741#
1742
82611
'2!l3
'23111
654.
830
1851.
3091
1623
~415'
s£X
6~2
1581
~"73
SCopoU
seou~T
3169
:S854
1741
920
2467
3999
2564
;674
1553
~12
•
1.646
1610
R(PL,AC
REPT
R[SOL
R[SOll
RESOL'
PESOL v
RET
RtTRN
RETURN
2231
715
1694.
,451
3735
'5'3
REMAIN
1561
763
1616'
411
2899
691
16<16
RECQVR
P[COVX
165~
28/016
685
2637#
727
2920,.
2921#
1711
219
679
16 4 *
2864
677
723.
HADe
1177
6.,4
PA ~~O
2a;~
1121
655
229?:/.
R~R2 "
1116
4{\il!
lolC
7~4
,ah
111
10;3
,,;5
QO 1V '
I
1";'s
'9:"6
RANt,wl.
FlARl
~
~
4J)
..
2629'
3099
818
~81
343~
3468
:5612
2354#
3589
236!)
2368
74"
856#
~
:517'1#
2380
23R3
•
HXC
~fO\J"JO
.
SGOT
~IGf\j
qG~I,
~IN
"M J .~
SMP
!;",SP
SPTR
SQCO'J1
!l;QENO
SRETLO
SRET~
SRETST .
!;ANI.ST
STA~T
STARTL.
STA!HV
STEMI'
~TEM"2
STOKOI<
STOO9G
STO~tT
~ua~
SUSS
SU8S2
SWITcH
SWT~p
T
11
T12
T2
834#
884
3137
3153,
317f11
16.!'
24?1
1612
2619,
1629j
~C;i.'9
TABI.E:
TAG1
TASK
USl(4
TC~L.F'
TCRI.,2
TOUMP
"599
2410
H26
3161
32:"4
842
550
309
8S1
1063
644
128'
1039
619
2742
603
856
914
1J13
671
758
2164
112169
181
:53h
4224
4227ti
14M
158*
6~14
1
278
2617#
836#
493
299
22111
605
1751#
236
3513
3424,
3402#
159
160#
1722
176.
~5~5
3363
25'*
4399
833
2tA3#
'-11131
19111
3493
352'4
44U
4412
;6414
l6;6
883
44U8#
876.
261
2338111
933
3512
3515
4424.
4429,
2648.
3682'
191.
927
195'
3;391
986
433Q1
24#
4363
1241
3;4Q1~
481i1
1289
1"819#
89~
853
T3
23B7
•
•
15*
~ORTC
~ORTCN
5PNOQ "
50;:1#
835
! .':165
t611
16'-'4
'53(,
!iiORT8
SORTJ
SF'tCIA
sPI.AT '
;~
3a#
1;44
49*
;319
'693
?832
'-982
758111
196*
794#
;9111
U29
636
2328
412
854
1149
1479
2326
21 .~9
2850#
3~e9#
79~
103"
U27
11'28
1753.
841,
5::~
.
321
5!j5
J~5"
906
578
858
1076
821
12V:1
831
1205
1150
1216
2774
2426
3559
1273
1219
147-
2261
2268
2283
467
587
1518
he
1525
~"2'
84'
1129
852
1139
2152
2592
215-
2184
2596
2286
2U7
2313
2688
251
3514
3517
549
3518
657
3520
3544,
3547
3551
266
152
1248
132"
1712
1812
.053
1334
1434
11!53
974
985
2639
2750
:U88
4335
4381
1726
641
2333
433'
4350
1249
2338
12'2
1255
1257
439
1023
238"
1812
2U4·
448
1245
23"'2
191116
451
U46
2311/1
1988
1256
U1'
2533
2038
2514
2131
25'"
1318
359h
359~hl
3691,
962
2638
4333
4364
1423
639
233!1l
415
1t5'
2296
1481
2329
271~
198
1031
431
1022
2298
1481
2363
464
2'""
591/1
2611
1438
1786
J
!:
(~Ji
)
/--............
/
.~
.
XABS
)'AD~
xeT
~CTI"
ltOEU:T
)(~rSp
ltE:r..jOL~
lIF'I'ID
)t'C:ETL'~
lCGETOU
It'I 3:3
)(IN
XI NPUT
xlNT
lCLC
xlG
)L.l
)(lO
):LS
xOUTL
l(PO!'J
XPR~T
XPUS~A
xPUSIoIJ
)t'Q
XIU
lI'FtA'i
){AAR2
lr'RT
)CRT2
ltRTL6
xSGN
)(SORTC
XSPI\JOR
xSQ2
xSQR
xSQRT
XT3
XTtSTC
)(TESTN
xvi
v
iZERO
~2
1181#
f~7
1222#
47
35=!l211'
, 45
173
lh
169
:-99~
64
;656
'-411
344
;179
;;92
'111
'1,,7
;65(1
83
147
167
149
144
3617#
3625*
4367
346
3336.
3t'1#
31#
1;5
343
161
i;7
1881
1916
•
8~Z'#
232
216
348711
1422#
1344#
27711
4011#
1633#
2666
2432
736#
3714_
3720#
3716#
3712_
311h
1637
1"21tt"
1461*
411.
429.
3647
3983
4370
726ti
3342
376
567
357,
1177N
565,
99h
1883
2134
353
557
185
3349#
179
1482*
3646
'879.
1\111'4#
1486
3653
3174
563_
548#
1368
248
139.9
811
1414
829
'1164
9('13
153'
.,
",'
1'55
1714
1721
1135"
4048
4452
4339
44'3
4341
... 56
4343
4460
4344
4462
4347
4464
4358
462
844
466
850
971
1266
972
1272
1217
1262
1278
1·35e
13'3
sa,.
583
1955
218Z
19.51
2205.
563
564
122~
1281'
1436
135!)
331
1369
1640
2683
24<49,
1642
2725'
1651
1655
1639
16411
1663
3611
:5612
1473
419
430
3658
3984 .,.
4;57'
434
3666
40n
4376
3661
'4k!07
4389
4,,45
43 06
377
568
361
443
517
449
843
566
996
1866
2140
575
580
998
•
'," .
,
1895
2172
191611
2174
1948
2116
1951
1e~8
554
101'
559
1016
562.
'62
3657
3663
36871
552
2118
4366
,./
)
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-c041 52.342996, 2008/05/07-21:37:19 Producer : Adobe Acrobat 9.0 Paper Capture Plug-in Modify Date : 2016:11:05 08:45:31-07:00 Create Date : 2016:11:05 08:45:31-07:00 Metadata Date : 2016:11:05 08:45:31-07:00 Format : application/pdf Document ID : uuid:e77817e2-8f1d-5348-8acf-821109d62990 Instance ID : uuid:3d90046e-24a6-5645-8ebb-475643499477 Page Layout : SinglePage Page Mode : UseNone Page Count : 110EXIF Metadata provided by EXIF.tools