60220200E_SMM17_Program_Listings_COM_Feb75 60220200E SMM17 Program Listings COM Feb75

User Manual: 60220200E_SMM17_Program_Listings_COM_Feb75

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

Download60220200E_SMM17_Program_Listings_COM_Feb75 60220200E SMM17 Program Listings COM Feb75
Open PDF In BrowserView PDF
o
o

o
o
r

o

CONTROL DATA®

SMM17

C)
C

c

Program Listings

COM

c'
o

o
o
o
o
CI
(J

n

CONTROL DATA
CORPORATION

CUSTOMER ENGINEERING MANUAL

/'
I,

\

...

....

RECORD of REVISIONS
REVISION
A

NOTES
Manu::ll released

Information complete throue'h SMM17 Edition 2 0

1f:l-?,O-fl7\

R
. (11-17-69)

C
(4-12-73)
D

Information

.,

Information complete

-, SMM17

throu~h

Edition 2

?

()h~nlptinO'::ll1

,

..

SMM17 Edition 3. O.

This edition obsoletes all previous editions.

Information complete through SMM17 Edition 3. 1.

This edition obsoletes all previous editions.

(5-1-74)
E

Information complete

throu~h

SMM 17 Edition 3. 1-1.

This edition obsoletes all nrevious editions.

(2-4-75)

r·

\

J

\

....

ID
I

>
UJ

a:

..,o
N

~
::E

a:

fZ

Address comments concerning this
manual to:

Pub No. 60220200/'
1973. 1974, 1975
by Control Data Corporation

© 1967

Printed in United States of America

Control Data Corporation
Technical Publications Department
4201 North Lexington Avenue
Arden Hills, Minnesota· 55112
or use Comment Sheet in the back of
this manual.

•..

u

o
o
o
o
o

o
o
'

PAGf

COMOOl
0001
0002
0003
0004

DATEI 10/20/75

1

NAM
r.OMO!ll
10154 COPYRIGHT CONT~OL DATA CORP lq74
•••••••••••••••••••••••••••••••••••••••••••••••••••••• ·····················00002
•
····00003
• • • • • • • • • • ~EVtSION RECBRD • • • • • • • • • • • • • • • • • ····00004
•
····000D5
• ~OnAVR VE~SIJN
WHAT DONF. • WHY, AND WHO DID IT
····00006
•
····00007
• 032074 V 1.1
SYST~H RELEASED
····00008
•
AOOEn AOP~SSING CHECK
·.··00009
•
I~PROVEO REPEAT SECTION, CONDITIONS LOGIC
····00010
•
CORRECTED H PEG INT~EGRrTV WGEN HULTIPKEXING
····00011
•
····00012
•••••••••••••••••••••••••••••••••••••••••••••••••••••• ·····················00013

oooe;
OOab

0007
0008
0009
0010
0011
00l?
0013

... --....-.,'

r

L

o
o

o
o

0015
0016
0017
0018
0(119
OO?O
0021
0022
0023
0024
0025
0026
0027
0028
0029
0030
0031
0032
0033
0034
0035
0036
0037

0001
0002
001)3
fJO;)4

OOB

Ooor,

0039
0040
004!
0042
1)043
0044
0045
0046
0047
0048
004CJ

n

STOPX(CONTP.OL~l)

EOU

EXIT ('STOPX+1)
REOINT(EXIT+1)

1)005

fQU

FCLRINT(R~OINT+lt

0006
0007
OOOIJ
onqg
OOOA
0001)

FlU
EQII

JUMP(~F.aINT+2)

OO!le

f:QIJ

GENPAN (JUMP+ U
TVPEOUT(GENRAN+l1

EQU

TTYBZY(Typ~OUT+l)

EflU
EOU

HEXASCCTYPEOUT+zt
OVRLAY(HEXASG+!)
PELPOS(OVOLAV+l)
MIH NLC ~ElPOS+1J
SETHASKCHAINL+53J
ST J-P (SETHASK+1)
LASTVALU (ST JP+ U
LASTAO(STJP+2)
LOtGORF.(LASTAO+2)
LOLICOR(LOLCORF+l)

t:'.JU

ooao

EflU

0042
01]43

[!)ll

0044
01] 45

EQlJ

EQU
EQII

0047

EQU

004R

EQ!'

O1l4Q

EflU
EQU
EQU
E'QU
[flU
EQU
EQU
FQU
E"l'J

0056
0068
on~!3

00(,0

OOoE
() Of}F

0170
0071
0072

EQU
F.QIJ

EQU
EQU
EQU
EQU

0[173

o0 71~

0075
0076
0077

60??J200

o

CONTROL UI

F.rJ,lI

Eau

F.1U

o
1 07Lt1
PODAC 07LtF
PODA') 075F
PODAE 0760
POOAF 0770
PO!JBO D78C
0202 pooel 07Aft
0203 POOfl2 0000
POOB3 0000
POOIlIt- FFFF
POOAS 0000
POORf.l DriFF
0204 PO~ 117 8000
POOIH COOO
POoeg AOOO
POOBA 9000
POIJ93 "800
PoaBe 8lt-OO
POJB!) 6200
poosr:: 1\100
roosl=' 801J0
0205 poaco 80LtO
ponCl 8020
PoaC2 8010
POr)C3 1\001\
°OOC4 RIlO4
PODce; 8002
PODC&;' I\n01
0206 POO~7 AOOO
pooca 4000
POOCCJ 2000
poaCA 1!! 00
POOC~

a~oo

POOC~

0'.00

P
P

ADe

DATE I 10/20/75

6

T~"tTRB,TCH,TeB,AAH,AAB,EAHtEABtLAH,lAB,CAH,CAB

00201

c

P
P

P
P
p

P

.,

P

P
P
P
P

Aoe
NUH

AO~

emIl

GONG

NIJ"i

~600nt~eOOOt$AOOO,~9000,!8800t~8LtOOt$B200,'8100tS8080

00204

NU:...

$~OLtO,~~020,$6010,!8008t'8004,t800Z,!8001

00205

NU~

$AOOO,$LtOOO,$2000,~1000,$~00,$LtOO,$ZOO,$100t$80,SltO

OOZO&

CON?

O,O,~FFFF,O,~FF

···00202
00203

c

PQDen 0200
paaCE 0100
PQOCF onao

POOOO
OZf)7 POQ,)1
POO,)?
POOO3

0040
01j20

NU~

120,1.10,8,Lt,Z,1,O

00201

NU,",

$8000t~COOOt'EOOO,!FOOO,$F800,$FCOO,$FEOO,$FFOO,$FF80

00208

0010
000/\

rOODIt 0004

POOOS
POOOE;
POOO7
020A POOOS
1"000'1

0002
0001
0000
8000
COOO

oO?20200

CON7

,,-

PAGE

(,

c
(~
("
\

(~

C)

o
o
c)

COMOO1
POODA
POODA
POODe
POODD
POODE
POODF
POO~O

o

[
()

02()9 P()OEl
POOE2
POOEl
POOE4
POOES
POOH,
POOE7
0210 POOES
0211 POOF.q
POOEA
POr)EB
POOEe
POOEr)
POOEt'
POOEF
POOFO
POOF1
POOF2
POOF]
POOFIt
0212 POOFS
POOFo
POOF7

PAGE

EOOO
FOOD
F600
FCOO
FEOD
FFOO
FFBO
FFCO
FFE'O
FFFO
FFF6
FFFC
FFFE
FFFF
FFFF

NUH

$FFCO,'FFED,$FFFO,SFFF8,SFFFC,$FFFE,$FFFF

00209

$FFFF

NUM

$2000,S1000,$eOO,!400,S200,$10~,$80,$40,$20,$10,8,~

00210
00211

NUM

2,1,0

00212

NUM

CON11)

"000

DATEI 10/20/75

7

1000
0800
0400
O~OO

0100
0080
0040
n020
0010
0006
on04
0002
0001
0000

1"- \

~)

o

60220200

o
o

E

PAGE

7

~""

CaHOOt

PA:;I::

DATEI 10/20,15

8

~

•

0214

CH!!CK REGISTER BITS

l_,

··~·00214

(r--,
'-,

n216
0211
0218
0219
0220
0221
0222
0223
0224
0225
0226
0227
022R
0229
02:JO
0231
0232
0213
0234
0235
02l!)
0237
0238
0239
0240
0241
0242
0243
0244
0245
0246
0247
0248
0249
0250

POOFd
POOF')
POOFA
PO OF')
POOFC
POOFO
Pilon:
POOFF
P0100
P010t
POI02
POt03
POt04
P010S
P010'j
POlO?
P0101J
P010Q
P010A
P0100
P010e
POI0D
P010E
P010F
POtln
POll1
POltZ
POtl3
POlt4
pour;
P0116
POlt7
PO 111\
P011-l
P011A
P011B

0800
OAOl
&870
0604
OA44
0101
S135F

IPEG

NOP
ENA
ST~·

SET
CL~

SAZ
RT.J·
RAf)·
SET
Clf?
Sr)Z
Tq,O
RT J.
RAO"

087R

0802
0842
0142
OK14
56li9
D872
06'+4
60FF
08n4
COFF
0101
51\52
OI}&9
0604
51\0:
0868
0844
0602
01\14
r;609
n8&3
0804
IiOFF
01\44
COF'F
5603
lROO
FF15

CL~

STASFT
lflASA 7.

RTJ"
P A").
SET

0

1
IREGE7
A
A
1
tREGf
I~F.GE7

SET

ERRO~

CODE

A REG WOULD NOT CLEAR
UPDATE ERROR CODE

Q
Q

2
A

IREGF.
IREGf'1
A
I

Q REG WOULD NOT CLEAR

UPDATE RRROR COUNTER
ZERO ALL I REGISTER BITS

A

COpy I REGISTER TO A REGISTER

I

1
IREGE
I~~GF.7

COULD NOT CLEA R ALL I REG BITS
UPOATE ~RROR CODE

A

ra.J·
RAO·

IRE"GE'7

Cl~

A

SET
rqQ

Q

RTJ"
P40·
SET
STACLR
LOAPTJ"
JHP

IQE'GA
IQEGE7

I~FGA

A

CK A REG BITS TO SET
UPO+TE ERROR COUNT

.CK Q REG AITS TO SET
UPDATE ERROR COUNT

A

I

SET ALL t REGISTER BITS

A
I
I~FGA

ENOSEC

CK I REG BITS TO SET
SECTION COMPLETE

···00216
.. ··00217
• .... 00218
•• .. 00219
···00220
• .... 00221
···00222
···00223
···00224
.. ··00225
···00226
.. ··00227
···00228
···00229
···00230
···00231
···00232
• .. ·00233
···0023 ..
···00235
••.. 00236
···00237
···00238
···00239
···00240
···00241
••.. 002 .. 2
···00243
···00244
···002it5
···00246
···002 .. 7
···002"8
···00249
···00250

,--.....
\
~

......

~.

r
1.......

r'

(

"-

~

.... '-

(---.

('
"

.._.

'

('
....... -

(_."
1.........••

r

I

"'-...

0252
0253
n2li4
0255
0256
0257
0258
0259

PQ11C
POl1D
POl1E
POl1F
POt20
P0121
POtZ2
PO 12.J

QJ)OO
oeOF
0131
5"3E
IJIJFE
OFCl

I l:'E'G 1\

Nap
EN1

15

SAM

1.

RT J.
INQ

0

AlS

IREGE'
-1
1

0131

SAM

RTJ·

1

5~3A

IREGE

Cl( REG 'BIT TO BE SET
BIT 15 010 NOT SET

BIT 1,. 010 NOT SET

.....

,

c-'

···00252
···00253
···00254
···00255
···00256
···00257
···00258
.. ··00259

r··'
'"

('

\........_..

60221)200

E

PAGE

8

{'
'--..... ,

C
--

(

,

u
U
".

~. ~'.

(,~

0
(~

,.J

0

0
Cl

0

C

)'
0'

0
0
CI
()
C)

0

COMOOl
0260
0261
0262
02G3
02G4
0265
0266
0?67
0268
0269
0270
0271
0272
0273
0274
0215
0276
0277
0278
0279
0280
0281
021J2
02RJ
0284
0285
0286
0?67
0288
0289
02QO
0291
Olg2
0213
0214
0295
0296
0297
0298
02QQ
0300
0301
03112
0303
0304
0305
0306
0307
0308
0301)
0310
0311
0312

PAGE

OOH'
OFC1
0131
583&
OOF'E
OFCl
P012~ 0131
P0128 5832
P()12C I)OFE
POl20 OFCl
PQ12E 0131
P012F 5B2~
PO 130 OOFE
i-J0131 OFCl
P0132 0131
PO 13.J 582A
P313/. OOFE
POllS OFCl
P()llo 01,31
POll7 5~2o
P0138 OOFE
P013'3 OF'C1
POll'\ 0131
P013~ 5822
P013e OOFE
P0130 OF'Cl
~013r: 0131
P013F S81E:
P0140 onFe
POt41 OFCl
P0142 1)131
P014J '5!UI\
P0144 O['FE
POt4S OFC1
P0146 0131
P0147 5816
P014~ OOFC::
P0149 OFCl
P014~ 0131
P014B 5fJ12
P014G OflFE
P014J orCl
POlitE 0131
P01,.F 580E
P0151J OOFE
POt51 OFCl
P0152 0131
P0153 5'lOA
P0154 OOFE
r015e; OFC1
"0156 0131
F01S7 5806
POl,)" OOFE
P0124
P0125
P0125
POl27
P012A
PQ12Q

INQ
ALS
SAM
RT J.
INQ
AL$
S"M
PTJ·
INO
ALc)
SA~

OATES 10/20/75

9
-1
1
1·

IqEGE
-1
1

1.
I~EGE

I~EGE

IN~

-1
1
1

SA'"
fHJ"

INQ
ALS
SA ''1
RT J"
IN'1
ALS
SA'"

I~EG~

IREGE'
-1
1
1

OTJIIIo

t~EGE

INQ
ALS

-1
1
1
IREGF
-1 1
1
IREGE'
-1
1
1

INQ
ALS
SA""

RTJ·

INQ
ALc)
SA'1

PT J.
INt)

ALS
SAM

RTJ·

IN1
ALS
SAM

RT J"

INQ
ALC)
SA"'!

PTJ·

INO

BIT 10 DID NOT SET

1

1
IREGE
-1
1
1

INQ
ALS

SA..,
Qf"·

SIT 11 DID NOT SET

-1

~TJ·

S~H

BIT 12 DID NOT SET

-1
1
1

RTJ"
ALS

SIr 13 DID NOT SET

I~FGE

-1
1
1
IREGf
-1

8IT

9 010 NOT SET

BIT

8 DID NOT SET

BIT

7 010 NOT SET

BIT

6

BIT

5 DID

IlIT

,. DID NOT SET

BIT

3 DID NOT SET

BIT

2 DID NOT SET

BIT

1 DIn NOT SET

oro

NOT SET

~OT

SET

1

1
I!lEGE
-1
1
1
IREGE
-1

····00260
···00261
···00262
···00263
···00264
···00265
···00266
···00261
···00268
···00269
···00210
···00211
···00212
···00213
···OIJ214
···00215
···00276
···00277
···00218
···00219
···00280
···00281
···00282
··"00283
···00284
···00285
···00286
···00287
···00288
···00289
•• .. 00290
• .. ·00291
• .. ·00292
···00293
•• .. 0029 ..
···00295
···00296
···00297
···00298
···00299
···00300
···00301
···00302
···00303
• .. ·00304
···00305
•• .. 0030G
···00307
• .. ·00308
···00309
···00310
···00311
···00312

,...---."

C

("~.

,~

0
~,

( )

60220200

J:

PAGE

9

r"
....
\

-"

,---......
r,.

COHOO1
0313
0314
0315
0316

0318
0319
0320
0321
0322
0323
0324
0325
0326
0327
032R
03~q

0310
0331
0332
0333
1)334
0335
0336
0337
03~8

03JQ

0340
0341
0342
0343
0344
0345
0346
0347

POlS')
POlSA
POlS!)
POIse

OFCl
0131
1)802
leBF

P01SD

ooon

bR17
P015f:" 4817
P0160 0~44
POlElt ~816
POI62 o~ OF
P010l C314
POl64 oqra
P01S5 0123
P0166 C80F
POto7 6~OC
PO 10·Q 11\ 03
P016'=J C?60
P016A f)!PJq
P0163 C~Fl
P016C De 06
POt!}!) O~44
POto:: 5402
POl6F B09
P0170 lC18
POt71 0000
P0172 0000
"0173 coDa
P0174 0000
P017S 0000
POt7o anon
P0177 OOO:!
POl7" C8FC
POl7,) fliFC
POllA tCE2

PAGE

IPEG!::

P015~

1
1

(lREGAJ

BIT 0 DID NOT SET'
RI.:TURN

NUM
STI\"
STfl"
CL'"
ADO"
STA"
LO""
INA

0
IREG!:4
IREGE5

SAVE REGISTERS

-4

SAP

1

Ul""

I~EGF4

ST~"

UJ4"

STA"
ClP
RTJJMrn .

I~fG:::3

IREG 4
IREG Cj
IREG 7
IREr. f,

DATEI 10/20175

ALS
SAI-t
RT J"
Jl-tP"

SU·
JMP"
LOA-

IREGCl
IREG7:2

10

NUM
NU:'1
NU"f
~UM

I~EGE

A
r~EGE7

IREGEl
I~EG!:7

IREGEl
""+3
BITO,Q
IRF.GEJ
IREGI.:
IRF.GE2
A
(STOPX)
IREGF.6
$lCl/\

a
0

0
0

NUM
tJUM
NUH

a
a

NU:1

0

lO~·

IRE"Gr"4
IREGE5
n!:;lEGE)

LOry"
JM°f.

OK SINCf THIS IS SECTION 0
FORM SSEE

SKIP IF ERRO~ CODE 1,20R3
SETUP IF ERROR COOE 4,50R6
GET FAILING 9IT

SEr RTN AODR

""·00313
···00314
···00315
···00316

·""·00318
·""·00319
···00320
···00321
.... .".00322
·""·00323
···00324
···00325
···00326
··""00327

···00328
···00329
···00330
···00331
···00332
···00333

""··0033,.
···00335
···00336
···00337

SSEE
RETUNN ADDRESS
FAILING 3IT
. SAVE A.
SAVE a

.... ·00336
···00339
···003"0
···003"1
···003"2
···003"3
···00344

RESTORE REGISTERS

···003"5
···003"6
···00347
(~

\..•...

c.~,

,~

\.......
5022iJ201J

PAGE

10

(--'_..

COHOO1

P4~F

0349

()

o

0351 P017!]
POt7r.
0352 P0170
0353 P017E
0354 P017F
0355 P011\0
0356 P016!
0357 P011J2
0358, POIAl
03SQ P018,.
0360 POlse;
0361 P0186
035:? POt87
0363 P0188
0364 P0189

CODA
010S
IB03
0000
0000
1807
(lOOO
0000
1R06
OC04
0001)
(!1)0()

o

0372
0373
0374
0375
0376
0377
037A
0379
0380
0381
03R2
03d3
0384
0385
031\6
0387

P01AA
PO 18:3
POIBC
POts')
oOlSE
P018F'
P0190
P0191
P01Q2
°Ot93
P019'+
P019E}
PD190
P0197

o
o
o
n

...........

SECTION 1-JUMP

J"'r.

LOA

=N~108

00351

JMP2

00352
00353
00354
00355
00356
00357
00358
00359
0.0360
00361
00362
00363
00364

003 .. 9

li:lF~

J'4p3

0000
lC39

.Jt-fP5

••••••••

SECTION

RTJ

RTJ·
JMP"
NUM
LOA

RTJft
RT J3
0
=XPTJ+l

00368
00369
00370
00371

ST4·
LIJA"
EOp·
SAZ
LOA·

SAV
RTJ4
SAVPTJ5-·-!
QTJ4
SAV
P..' J7-"-1

00372
00373
00374
00375
00376
00377
00378
00379
00380
00381
00382
00383
00384
00385
00386
00387

JMP2
JMPft

C;'\02
1~12

0000
COOO
Ot~A

RTJ4

C"FA

sua·

980A
0111
tGF5
CllF6
f'019~ 6C20
P!ll(H CRF2
P019A 6C2A
POlga OCl1
P01QC ooon
POIC!,) lC25
POlgE 0000

RTJ3
SAV

SA"!
JMP·
LDA·
STA·
LOA·
STA·
ENQ
SLC::
JMo ..
NUIi

............

SEGTIO~

RTJ5
RTJ7

03:U P01QF 6C26
03c}2 POlAil EOIJE

6022020!'!

J"1P3

,.JHPS
JHP4
(ENOll

2-RETU~N

JUMP ............

00366

!l

680F
r,8FB
BROO
010l

038c)

o

..........

DATEt 10/20175

J!'tP"
SLC)
SLS
JHP·
SLS
SLS
JMp·
t:N a
SlS
SLS
JHp·
SLS
JMP·

0366
03GA
0369
0370
0371

11

LOA

STALOO-

E

(~TJ4.

RTJ4+2
(STltt
RTJ4
(STI0t
111

(=XRT Jl+U

Q=XY,X=FRROR NUHBER,Y=NUHBER OF

0

(!:"!Oll
0

3-LOAO A
(ST111
OP

.........

00389
OPERANO'IN A.

00391
00392

PAGE

11

,r-....

I

'

"

lI.....

,,~'

(\

'''--'

~-"
I,

\

COHOOl
0393
0394
0395
0396
0397
0398
0399
0400
0401
0402

P01A1
POIA2
POilU
POIALt
POIA5
POIA6
POIA7
POIAi3
P01A,}
POIU

PAGE

4C23
0822
BODE
0105
0814
900E
011)2
OC11
se1A
lC16

LOA2

12

sTaw.

(ST10)

T~A

Q

EO~-

OP
LDA2-·-1

SAZ
TP.'l
SUBSAZ
ENQ
RTJ·
JMP"

,

DATE' 10/20/75.

·A

TO

Q'

Q TO A

A

a?
LDA2-·-1
Q=)("X=E~ROR

$11

NUHBER,V=NUH~ER

(STPU
(ENDU

OF

(~'

00393
00394
00395
'00396
00397
00398
00399
00400
0'0401
00402

'

....

C'
('
"-

('
0404

••••••••

SECTION 4-STORE A

STA

STA·
LOQSTO·
fOq·

'-...

••••••••

'

00404
,~.-,

0406
0407
0408
0409
0410
0411
0412
0413
0414
0415
0416

POIA')
P01Ae
POtAO
POtA:
P01AF
POlao
P0191
P0192
P0193
pots,.
POIAI:)

6CIA
EOOE
4C17
ne17
0105

SAZ

coo::

LOASUB"
SAZ
ENQ
RTJ·

9Ct4
Ot02
OCl1
SCOF
tCOD

STA2

JMP·

(STtU
O?
(SHO)
(ST1lt
STA2-·-1
OP
(ST11)
STA2-·-1
$11
(STP!)
(ENDtl

OPERAND IN A.
A=STORE+t
A=STIJRE+1
Q=XY,X=ERROR NUHBER ,Y=NUHBER OF

I

00406
00401
00408
00409
00410
00411
00412
00413
00414
00415
00416

\,

"

~'

....

1"'---

,

••••••••

041A

SECTION 5-l0AO

Q

••••••••

00418
(

EOOE
GCOD
4COD
0814

O~1i

POIBo
POID7
P0181
P01S9
P01Bl\
P018B
P01SC
POIBO
POiB::
POlflF
POtCI]
:lotCt

04.33
0434
0435
Olt36

P01C2
P01C3
P01C4
POIC;

0031 P END1
091C p STP1
093B P ST10
093C P Slil

0420
0421
0422
0423
0424
042'5
0426
0427
0428
0429
0430

LDQ

LOQSTA·
ST:)·
TRQ

BOOr::

EO~-

0105
01314
90nE
0102
OC11
SC03
1COl

SA 2'

60220200

Lf'Q?

-

TRQ.
SUBSAl
EN!)
RTJ"
J'1p.

Aile
AOC
ADe
AD'::

a?
(STI0)
(STIH
A
OP
lDQ2-·-l

OPERAND, IN A.

Q TO A = OPERAND

A

O?
LOQ2-·-1
$11
(STP!)
(ENDU
FNDSEC
STOP
srORE
STORE+1

Q TO A = OPERANO

Q=XY,X=ERROR NUHBER,Y=NUHBER OF

r-'''''

........

00420
00421
00422
00 1f2:3
00424
00425
00426
00427
00 It2 8
00 .. 29
00lt30
00431

r-'f

1'-..... ,

(~

'-,,-

C

00433
00lt34
00lt35
00lt36

PAGE

12

C_
C
~-,

\""

,

(---.

'

I:)
r".

)

\
"----"

o
()

COHOOl

PAGE

0437 P01C6 002B P ST12

0439

(j

o
C)

[
o
r',
~/

o

04'+1
0442
0443
04lt4
0445
0446
0447
0448
0449
0450
0451

P01C7
P01CI\
P01C9
P01CA
P01C3
P01CC
POlC)
P01CE
P01CF
POlOO
P01Dl

EODE
6CF9
4CFS
BCFA
0105
COOF
QCF7
0102

P01D2
POlal
POI04
P01D5
P0106
P0107
0460 P011J1J
0461 POIDQ
0462 POI0~
0463 POIOR
04&4 P010e
046~ P010D
0466 POIDE
P010F
0467 P01EO
0468 POtEl
0469 P01EZ
0470 PO 117:1
0471 POIE4
0472 POLES
0473 P01Eo
0474 P01E7
0475 POLEd
0476 P01Eg
0477 P01EA
0478 P01El
0479 POtEe

OAOO
0102
OC10
SCED
COOO
010g
6eEnOAFF
0101

o

STQ

LOr}STA·
STQY-

.........

00 ..39

OP
(STI0)
(ST111
(ST11)
STQ2-·-1
OP+1
CST1U
STQ2-·-1

OP IN A.
A=STOREt-1

ST02

SAl
LOASUf1·
SAZ
ENQ
RTJ"
Jfo1P"

..........

SECTION 7-SI

DATEI 10/20/75
$31
(SfP!)
SAZ8
SAZ8-·-1
$ltl
(STPt)
(ENDU

SEen J'~ 8-SKIP IF A NOT =0
ENA
SAN
ENQ
PT,'"
LO~

p

01FS

14

STA·
FNA
SAN
JMP"
ENq
RT J"
LOA

Q=XY, X=ERROR NUMBER ,Y=NUMBER OF

00lt80
00lt81
00482
00lt83
Q=XY,.X=ERROR NUMBER ,Y=NUHBER OF
00484
00lt85
TO ENO OF SECTION
···00486

• •••••••

-0
SANZ-·-i
$10
(STPU
=XSAN4
(ST12)

a

SAN5-·-1
SANG
OS20
(STPl)
=XSAN7

SET RPT CONOITIONS PTR
A=O
SKIP SHOULD NOT OCCUR

···00495
00496
00491
00498
Q=XY,X=ERROR NUM8ER,Y=NUMBER OF
0049Q
00500
···00501

p

SAN7

STA"
LOAST/\"

(ST12'
OP

SA~J

SAN8-·-1
SANENO-·-l
tJl
(STP2t
$AN10-"-1
SANENO
$'+1
(STP2J
(EN02)

(STlO )

<:;I'lNEND

0'315

..........

SFCTION CJ-SKIP IF A POSITIVE

SA7.
ENQ
PT JtIo

C;A"'A

SANI0

SAP

SAZ
JHP"
D~Q

0126

STAtio
SAP

(ST20)
SAP11-·-1

n86~

TCA

6C37

STAtio
SAP
fNQ
RTJ·

A
(ST211

IlC39

0122

oe11

5CJ2
l~OR
SAP9
fOOO
SAPH
O?16 P

~0220200

r

J~p.

LrlQ

SAPQ-"-l
$11
(STP2)
APEND
=XSAP11

\" .......

···00502
00503
00504
00505
00506
Q=XY, X=ERROR NUMBER,Y=NUMBER OF
00507
00508
00509
00510
Q=XY, X-=ERROR NUHBER,Y=NUMBER OF
00511
00512
TO END OF SECT
···00513

PTJ"
JHP"

P020E
P020F
PO?10
PO?11
P0212
P02B
05~3 P021't
01)24 flO?1?
05?5 P021€>
P0217

(.........

00lt90
00491
Q=XY, X;:ERROR NUMBER ,Y=NUH8ER OF
00492
00493
···00494

0506 P02fJf>
0'51)7 P0207
0508 P020i
0501) P020':1
0510 P020A
0511 P020'3
0512 P020r; sr; 3./\
0513 p 0 ?o~) le38

0517
0518
0519
0520
01321
0522

c.

00488

.........

"

00515

OP IN A.

00517
00518
COMPLEMENT A
00519
00520
SHOULD SKIP
00521
Q=XY,X=ERROR NUMI3ER,Y=NUHBER OF
00522
00523
00524
···00525

PAGE

14

c
c

o·
COHOOl

()

o
o
C)

0526
0527
0528
052Q
0530
0531
0532
0533
0534

PAGF.

(ST12)
A
(ST21J
!
APEND
$21
(STPZ)
SAP9
(ENOZ'

POZiS
P0219
P021A
POZ13
P02le
POZl1
POllE

4CAO
01'64
6C2E
0121
1"04
DC2l

PO~lF

HF5

SAP1~

P022!) iC25

APEND

SAP
JMPy.
I:NQ
R.TJJMPJMP·

...........

Sr::CTION A-SKIP IF A NEGA JIVE

SAM

STAy.

STQTCt\
ST~y.

Sr,28

05.16
0518 P022I C:;C26
J53q PI]222 0134

0540
0541
0542
0543
0')44
0545
0546
0547
0548

OATEI 10/20/75

15

1-'0223
P0224
P022S
P02?6
P0227
POZZR
PO'?2c}
P02ZA
POZ21]

SA...,

0122
OC!l
se21
lR05
0121

SAM3A
54HZ

SAo
ENr)
RTJ"
JMP·
SAP

JMP·

1803

oe21
5C1C
lelA

SAM4

ENt)

SAM3

RTJ·
JMP·

.. ..,.·00526
.. • .. 00527
00528
00529
00530
00531
Q=XY,X=ERROR NUHBER,Y=NUI1BER OF
00532
00533
0053 ..

SET RPT CONOT PTR

••••••••

(ST20'
SAMZ-·-l
SAf043A-y.-l

OP IN A.

$11

Q=XY,X=ERROR

«STP2)
SAMJ
SAM4-"-1
St\H3
$21
(STP?l
(ENOZt

00536

NUHfJ~R, Y=NUHBER

OF

Q=XY, X=ERROR NUHBER,V=NUHBER OF

00538
00539
005ltO
005 .. 1
005 .. 2
005 .. 3
00544
00545
005 .. 6
005 .. 7

oaslta

o
o
o

o

60220200

E

?AGE

15

COHOOl

PAGE

............

0550
0552
0553
0554
0555
OS56
0557
0558
0559
05&0
0561
OSc,?
05&3
OS64

P022C
P0220
P022E
P022r
PO?lO·
P02:H
PO?32
P0233
P023'.
P023S
P0236
P02.37

EUOE
4C1A
0145
0101
11\ 08
orl1
5C14
1805

SQZ

SQZ3
SQZ2/\

0103

OC21
SClO

1 !'Fe
PO?311 lcon

:::NOS~U

.........

056(,
056R
05GQ
0570
0571
0572
057'3
0574
0575
057'6
0577

£OOE
P023A 4r.OO
P02J~ 015S
P023C OUl
P0230 lR07
P023E oe11
P021F 'jC07
P0240 11\04
P0241 0112
P0242 OC?t
057R P0241 seOl
OS79 P024!t lCOl

SON

002.19

LOQ-

STQ'"
SQZ
SAZ
JHP"
ENQ
RTJ"
J'1P"
SAZ
tNQ
P.TJ·
JHP"
. JMP"

SEGTIO~

lonSQN

SAN
JHP"
ENQ
RTJ"

E'N£lSN

OS81 P0245 0031 P EN02

P0245 091e p STP?
0583 PO~47 OQ]9 P 5T20
0584 P0248 Ogle P Sf21
05~2

nATE' 10/20/75

SC::CTION B-SKIP

STO"

SQN3
SON2t\

16

J"'p.

SAN
ENQ
RTJ·
J~p.

AOC
AOI:::
AOC

AOC

If Q=+O

.........

00550

OP
(ST20t
SQZ2A-·-1
1·
ENOSQZ

OP IN A.

~11

Q=XY, X= ERROR NUMBER, Y=NUHBER OF

(STP2)
ENOSQZ
ENOSQZ-"-l
$21
(STP2)
SQZ3
(END?)

C-SKIP IF

a

OP
(ST20)
SQN2A-"-1
1
E'NOSN
$11
ISTP2)
ENIJSN
ENOSN-·-1.

Q=XY,X=ERROR NUHBER,Y=NUHBER OF

NON-ZERO ............
OP IN A.

'00552
00553
00554
00555
00556
00557
00558
00559
00560
00561
00562
00563
00564

ISTP?t
(£N02)
ENOSE'G
STOP
STORE
STI)P.F.1

00581
00582
00583
00584

$21~

Q=XY, X=ERROR NUHBER,Y=NUHBER OF

('
........
'

00566
00568
00569
00570
00571
00572
00573
00574
00575
00576
00577
00576
00579

Q=XY, X= ERRO R NUH9ER,Y=NUHBER OF

c

C'.

c
&0220200

E

PAGE

1('

c'

Cj

o
COM001

PAGE

••••••••

0586

( ...,.)
~

o
o

[

0588
051)9
0590
0591
0592
0593
0594
0595
0596
0597
0598
0599
0600

P0249
POZltA
POZltB
P02ltC
POZltO
P024E
P024F
P0250
P0251
P0252
P0253
P025lt
P02se;

0864
[ODE
ItCFB
0165
0131
1807
OGll
5CF5
11104
0132
OC21
5CFl
lr.EF

SQP

P0256 0864
P0257 [ODE
P0258 ItCEE
P0259 0175
P025A 0121
P025Q 1807
P025C OC11
P02sa,5r.E8
P025F. 1804
P025F 0122
P0260 0r.2!
P0261 5CE4
P0262 tCE?

60220200

o
('

u

OP IN A.

$11

Q=XY. X=ERROR NUHBER .V=NUHBER OF

SEr.TION E-SKIP IF Q NEGATIVE

ENOS~

..........
ALS

(STP2'
ENDSP
ENOSP-·~l

$21
(STP2)
(END2)

TCA

A

lOQ-

OP
(ST20)
SQM2A-"-1
1
ENDSH
$11
CSTP2.
ENOSH
ENOSH-"-1
$21
(STP?'
(END?'

STQ"
SQM
SAP
JHP·
ENQ
RTJ"
JHP.
SAP
ENfl
RTJ"
JMP"

•••••••••

A
OP
(ST201
SQP2A-·-1
t
ENDSP

.........

SQH3
SQH2A

Q=XY,X=ERROR NUMBER, Y=NU':'BER OF

••••••••
9P IN A.

Q=XY, X=ERROR NUHBER,V=NUHBER OF

Q=XY, X=EfotROR NUHBER,Y=NUHRER OF

00586
00588
00589
00590
00591
00592
,00593
0059 ..
00595
00596
00597
00598
00599
00600

00602
0060 ..
00605
00606
00607
00608
OB609
00610
00611
00612
00613
00614
00615
00616

SECTION F-A LEFT SHIFT ...........

00618

ENA
STASOV
LOll

-IE
S

00620
00621
00622
00623

STA·

SH2

lOA-

OP
(ST20.
SHA

STA·
RTJ·
ALS
NOP
SlA"

E

D-SKIP IF Q POSITIVE

ENOS?

SQM

0620 P0263 OAFl
0621 PO~64 6000
0622 P026t; 01AO
0623 P0266 COOO
P026? OFC1
0624 P0268 6AI0
0625 P0269 CODE
0626 P02GA 6COC
0627 P026B 580C
0628 P026C UFC7
0629 P02Gfl flf'OO
0630 P026E 6CDQ

DATE' 10'20'75

STQ·
SQP
SA'"
JMp·
ENIl
RTJ·
JMp·
SAM
ENQ.
RTJ·
JHp·

SQPJ
SQP2A

0618

o

TCA
lOQ-

0602
0604
0605
0606
0607
0608
0609
0610
0611
0612
0613
On14
061e;
0616

SECTrO~

17

0

=N$FCl

7
0

(ST211

CLEAR OVERFLOW FAULT

00624
00625
00626
00'627
00628
00629
00630

,PAGE

17

r'

I

",

COHOO1

PAGE

18

DATfl 10/20/75

r-''--....
1

0631
06J2
0633
0634
0635
0636
0637
0638

P026F
P0270
P0271
P0272
P0273
P027lt
POZ7S
P0276

SC07
0105
CC06
9CD4
0102
OCl1

EO~"

SAZ
LOt."
SU~·

SAlt
ENQ

scnl]

RTJ·

lCGE

06ltO
0641
064~

06lt3
0644
0645
0646
0647
0648
0649
0650
0651
0';52
0653

06151)
0656
06';;7
0658
0659
0600
0661
0662
06;3
0664
06n5
0666
0667
066R

POZ7]
P0271i
P0279
POZ71\
P0279
P027C
P0270
P027E
P027F

0001
OFC1

•
•
•

SHIFT t. LEFT AND CHECK FOR OVERFLOW

SH2

RAOlOI'l-

SIlZ
P.AO·
JHP·
SHO
EWl
JHPy.
JMP"

O~F9

ERR-~

fNDAL-l
(SHA)

OVERFLOW SET ON LEFT SHIFT A

BZS
QLS
RA'l-

LOASAZ
P.AO"

lCFS

..............
QLS

s

SNO
FN'l

$21

JMo ..
JHP"

1~14

SHQ~U

'1
S
2
SHl
SH1
2

J~1P·

F.

!~1

SHl

0102
OSFS
18FA
0192
GC21

60220200

2

SIiIFT 1 L-:::FT AND CHECK FOR OVERFLOW

coon

PO?AO DAFt
P028E 6000
P02Se:" 01 AO
P02QO COOO
P0291 OFAl

SHA(U
1
S
S
2
SH2
SH2

..•..
P028~

P028€>
PO?87
P02R8
P0281
P028A
PO 28)
P028C

BZ
P02A7
0700 P02Aa
0701 PO~A'~
0702 PO?AA
P02A]
0703 P02AC
0704 P02Aa

o
'"

U

C'

0
C"

0

07!)S
071)6
0707
0708
07013
0710
0711
0712
0713
0714
0715
0716
0717

AI?SP

OCOO
4000
C07g
OF41
5C35

ARSP5

BAOI)

C)
Cl
(-'')

4000

sua
SAl
LOA

ARSP2-·-1
CON10 t a

00703
00704

STA·

(ST30)

ENQ

$11

RTJ"
LIJQINn.

(STP3)
S
1
S

ARSP4.

0719

..............

SC:CTIO~

0721 P02BC C07A

ARSN

LOA-

E

0
S
CONST+14
1
CST3U
CON10,Q

00700
00701
00702

SAZ
ST1LOA"
JHP"
JMP·

60220200

Q=XY,X=ERROR NUMBER, Y=NUltBER OF

ARSP2-·-1
(ST31)
CONI0,Q

sur~-

(--"",
"-...J

(STP3)
(EN03)

.00 69ft
00695
00696
00697
00698
00699

LIJA-

P0206 g070
?O?Q7 0103
P02Bd 401)0
P02139 ce21
P0213A llJt:9
P02BO tCle

$11

00676
00677
00678
00679
00680
00681
00682
00683
00684
00685
00686
00687
00688
00689
00690

ENQ
STQLOl\ARS
STA'"

STQ-

coon

SHl
OP
(ST30'
SHQ
7
(ST30
(STJU
(ST30t
ENOQL-·-l
(ST311
(ST30'
ENOQL---l

00692

SAZ
LO,v,

ARSP~

DATEI 10/20/75

SECTION 11-A RIGHT SHIFT .........

EO~

FE:41
0109
C031
gADa
FE30
0105
Cl\OO
P02A~ FEJA
P02AF 6C2A
P02QO OCl1
P02!)t SC27
PrJ2B2 £010
P0283 0001
P02B4 4000
P02B5

STAy.
LDQSTI)·
RTJ"
QLS
STQy.
LilA·
EOR·
SAl
LOA·
SUO·
SAl
ENQ
RTJ·
J,,",P.

19

Q=XYtX=~RROR

s

HOIlOF
A.RSP4-·-1
S
(ST31)
ARSP5
(EN03'

12-A RIGHT SHIFT .........
BIT1~

($8000)

NUMBER ,Y=NUHBER OF

00705
00706
00707
00708
00709
00710
00711
00712
00713
00714
00115
00716
00717
00719
00721

PAGE

19

(
'-.

COHOO!
0722
0723
0721t
0725
0726
0727
0728
0729
0730
0731
0732
0733
0734
0715
0736
0737
0738
0739
07ltO
07lt1
0742
07lt3
07lt4
07lt6
07lt7
07lt6
0749

P02RO
P02BE
P02BF
P02CO
P02el
P02C2
P02C3
P02CIt
P02C5
P02C6
P02C7
P02C8
P02C9
P02CA
P02ca
P02CC
P02CO
P02CE
P02CF
P0200
P02D1
P0202
P02D3
P0201t
P0205
P02D6
P02D7
P0208
P02D9
P02DA

PAGE

OCOO
ItOOO
OF41
6CIA
BAOO
FE!6
Ot09
CC16
9AOO
FE12
0105
CAOO
FEOF
GCOF
OCtt
5COC
EOOO
0001
1t0DD
COOO
9070
0103
1t00D
C(:06
18E9
lCOl
0031
091C
093B
'093C

ARSN5

ARSN2

P
P
P
P

OATEI 10/20'75

ENQ
STQARS
STA·
EOR

CST3U
CON7+1,Q

00722
00723
00724
00725
00726

SAZ
LOA·
SUA

ARSN2-·-1
(ST31)
CON7+1,Q

00727
00728
00729

SAZ
LOA

ARSN2-·-1
CON7+,l,Q

00730
00731

STA·
ENfl
RTJ·
LOOINQ
STOLOASUBSAZ

(ST30)

00732
00733
00734
00735
00736
00737
00738
00739
00740
00741
00742
00743
00744

STQ-

ARSNIt

20

LOA·
JHP·
JHP·

0
S

1,

$11

(STP3)
S

Q=XY, X:=ERROR NUHBER,V=NUHBER,OF

1

S
S
HODOF
ARSN4-·-1
S
(ST311
ARSN5
(ENOJ)

END3
STP3
ST30
ST31

Aoe
AOC
ADC
AOC

••••••••

SECTION 13-A RIGHT, Q RIGHT SHIFTS

RSHtF
RSHIFIt

ENQ
ERA

~NOScC

r
.. ~.

(

"

.........

" '-.

00746
00747
00748
00749

STOP
srORE
STORE+!

"

-

(

I
\,.

,/'-

0751
0753
0754
07S5
0756
0757
0758
0759
0760
0761
0762
0763
0764
0765
,0766

P020A
P020C
P0200
P020F.
P020F
P02EO
P02El
P02E2
P02E3
P02E4
P02E5
P02E6
P02E7
P02E6
P02E9
P02EA

OCOO
OAIF
ACOE
0822
8000
OF40
FOOD
OF20
6801t
1t801t
CODE
EOOE
OROO
0800
4eFO
6CEE

ADO
AOQ

=N$OF20

0075$

ST"·
STQ·
LOALOQNOP
NOP
STQ·
STA·

RSHIFl
RSHIF2
OP
OP

00759
00760
00761
00762
00763
00764
00765
00766

A~1)-

RSHIFl
RSHIF2

0

0
(ST3U
(STlO)

HAKE SHIF INSTRUCTIONS

WILt CONTAIN A RIGHT SHIFT INST
WILL CONrAtH Q RIGHT SHIFT INST.

"-.

00753
00754
00755
00756
00757

0
SlF
OP
Q
=NtOFltO

T~A

~SHIF3

••••••••

(

00751

"

(-----

\ ... _"

C'
f'
\,

(

"~

r--'
\,
60220200

E

PAGE

20

c:
(~~
(-'
\,

0
r-'"

U

l,---"")
"

C)

0

COHOOl

PAGE

OATEI 10/20/75

21

,.----..,)

L,

0767
0768
0769
0770
0771
0772
0773
0774

0

palEO
P02EC
P02EO
P02EE
P02EF
P02FO
P02Fl
P02F2

BCEE
0105
CCEB
9CEB
0102
OC11
5CED
lCE4

EO~"

()
\~

0776

C)
0
(.-.....,

I

1

I

L
0
0
/--\

"-/

0
C)

C)
('1,j
r"',)
~../

0
(')

0778 P02F3 OAOl
0779 P02F4 6000
0780 P02F5 8000
P02F6 OFE!!
0781 P02F7 6803
0782 P02FR CODE
0783 PO~F9 EOOF
0184 P02FA OBOO
0785 P02Ftl 6C2D
0186 P02FC 0000
0787 P02FO COOO
0788 P02FE 8000
P02FF OFEO
0789 POlOO 68F9
0790 PO 301 COOD
0791 PO 302 9070
0792 P030 .1 0102
OTH P030lt CCI0
0794 P0305 18Fft
0795 P0306 0182
0796 P0307 OC21
0797 POJOI} 1811
0798 P0309 CC1S
0799 P030A OFFO
0800 P030a 4Cl1
0801 P030C BODE
0802 P030n 0104
0803 P030E ce13
080ft PIJ]OF 900E
0805 P0310 0101
0606 P031l 1809
0807 P0312 CC10
0808 P0313 BOOF
0609 P031Lt 0104
0810 P0315 ceoo
0811 P0316 900F
0812 POU7 0101
0813 P03l8 1802
0814 P031Q 1807
0815 P031A CODE

60220200

00161
00768
00169
·00770
00771
Q=XY,X=ERROR NUH8ER,Y=NUHBER OF
00772
00773
···00774

RSHIF7

...........

SEr.nON 1ft-LONG LEFT SHIFT ..........

00116

ENA
STAAOI)

1
S
=N$FEO

00778
00719
00780

STA·
LOALOQNOP
STIl·
RAOLOAAOQ

LLS2
OP
OP+l
0
(ST32)
S
S
=N$OFEO

01]181
00782
00183
00184
00185
00786
00181
00788

STA·
LOA-

LlS2
S
CONST.5
tlS3-·-1
(ST32.
LLSl
2
!21
ENOLL-l
(ST32)
16
(SI33)
OP
LLS4A-·-l
(ST32)
OP
LLSltA-·-l
LLS4
(ST33)
OP.l
LLSG---l
(ST33)
OP+l
LLS&-"'-l
LLS4
ENOLL
OP

00189
00790
00791
00792
00793
00794
00795
00796
00791
00798
00199
00800
00801
00802
00803
00804
00805
0080G
00807
00808
00809
00610
00811
00812
00813
00814
00815

LLS

LLS2

SU~-

LLS3

SA!
LOA·
JMPSNO
ENQ
JMPLOALLC;
STQEOR.SAZ
LOASUl)SAl
~MP-

LLS4A

LLS6
LLS4

E

CST311
RSHIF7-"'-1
(,ST30)
CST311
RSHIF7-·-1
tl1
("STP3)
(EN03)

SAZ
LOASUg·
S.1l Z
ENQ
RTJ·
J"'p.

LOA·
EORSAl
LOA·
SUBSAZ
J"fp"
~MP·

LOA-

S=1

0020

OVERFLOW SET ON LlS

PAGE

21

COHonl
0816
0817
0818
0619
0820
0821
0822
0823

POU8
P031C
P0110
P01IE
P031F
P0320
P0321
P0322

PAGE

&CBO
CODF
GCBC
OC12
5CSIl
leB&
ENOLL
0930 P S1'32
093E P STl3

..........

0825

STA·
LOASTA·
ENQ
RTJ·

JHP·
Aoe
ADC

DATE1 10/20fl5

22
(ST30.
OP+l
(ST3U
112
(STP])
(EN03)
STORE+2
STOPf+3

Q=XY,X=ERROR NUHSER,Y=NUHBER OF

SECT!:)N 15-LONG RIGHT SHIFT ...........

r--\ .... _-,

'00816
00817
008US
00819
00820
00821
00822'
00823

C·
('
1.." ._

00825

r

\,
0827 P0321 DADO
0828 P0324 GOOD
0829 P032'> &800
P012& FOBO
08·30 P0127 C07A
0831 P032S F.019
0832 P0329 OF&l
0833 P012A 6CF&
0834 P032a 4CF&
0835 P032C EOOO
083& P0320 BAOO
POJ2~ F099
0837 P032F 0105
0836 P03l0 CCFO
0839 POl31 9AOO
PO.J32 FOgS
0840 POll3 0101
0841 P033,. 180E
0842 P0335 CCEC
0843 P033& SAGO
P0337 F091
0844 P033S 0105
0845 P03l9 CCE8
084& POllA 9AOO
P033B F080
081t7 POllC 0101
0848 P03l0 1805
0849 POllE OA10
0850 P033F 540&
OSIH POlitO 18E2
0652 PO 341 180e
0853, PO 3lt2 CAOO
P0343 FOB5
0654 POllt4 &CQ5
085'> P03lt5 GAOO
POllt& FOBI
085& P0347 6COO
POl4e FF90
0857 POllt9 OC12
. 0858 P034A 5COO
POlltB 006&
60220200

L~S

LRS9

ENIl
STASTA

0
S
CON7-1

S=O .

LOALOOLR'.)
STA·
STO·
LOOEOq

CONST+15
CONSTUIt

8000
1t000

SAZ
LOA·
SUq

LRS2-·-1
CST32t
CON2+1,Q

TEST SHIFTED A

00831
00838
00839

"-......

SAZ
JHP·
LOA·

TEST SHIFTED A
ERROR

008 .. 0
008 .. 1
008 .. 2
008 .. 3

(

EOR

LRC52-·-1
LRS3
CSTa:n
CON2+2,Q

SAl
LOA·
SUB

LRSIt-"-l
CST33)
CON2+2,Q

00844
00845
0081t&

SAZ
JMP·
ENA
RTJJHP·
JHp·
LOA

1
LRS3
!10·
(JUMP)
lRS8
CON2+2,Q

00841
00848
008 .. 9
00850
00851
00852
00853

STA"
LOA

(ST31)
CON2+1 ,0

0085 ..
00855

STA

(ST30'

00856

ENQ
RTJ

$12
(STP".

1

(ST32)
( ST33)
S
CON2+1,Q

00821
00828
00829

,,/......---.......

\'- .....

00830
00831
00832
00833
00834
00835
00836

r---

(--- ......

LRS2

Lt:?S4

LRS3

lI~S

ERROR
REP'EAT CONDITIONS

Q=XY,X=ERROR NUHBER,Y=NUHBER OF

\,

"'-"-

~.

i'--'
I

'----, .

('
"_.,

.

('
"

,

(-,.

00851
00858

('
E

. PAGE

22

'-'

(----:
"- ....

c=
('-'

:~

c:)
"

~

,

)

~

()
().
COHO!]l

0
('-"",

~)

0
(---,

0

0
.,.,-....,\

\......../

0
0
C~;

0
0
C)
Cl

0
r''',

U

(~)

PAGE

0859 POlltC 18Ft
08GO P03lto coon
0861 P03ltE 9000
P034F 0000
0862 P0350 0104
08G3 POJS1 CCCF
08G4 P0352 DODO
0865 POJ53 ECCE
08G6 P0354 1804
0867 P03S5 OCOO
08G8 P0356 4000
08G9 P03S7 E01A
0870 POl58 4800
P035') F070
0871 P035A C07A
0872 P035a OF6l
0873 POlSC 6CC4
0874 P0350 4CCIt
0815 POl5E EDOO
0876 PI)35F BAOO
POJGO F067
0877 PO%l 0105
0878 P0362 Cr.OE
0879 P03&3 9Aoa
POJG4 FOG3
0880 P03&5 0101
0881 POl&G 180B
0882 P03G7 CCBA
0883 P03GS B400
POlG9 F06F
0884 POl6A ,0111
0885 P036B 180E
0886 P036C CCBS
0887 P03&O 9AOO
POJ6E F06A
0888 P036F 0109
0889 P0110 1801
0890 P0371 CAOD
P0372 F055
0891 P037l 6C3F
0892 P0374 CAOO
P0375 F06l
0893 P0376 &C30
0694 P0377 OC22
089S.P0378 5C3Q
0896 P0379 C070
08Q7 P037A 9000
0898 P037a 0105
0899 POl7e 'tODD
0900 POl70 DODD
0901 POl7E CCA2
0902 P037F ECA2
0903 POl80 l80A

60220200

LPS8

LRS10

lRSIt
S
=N13

00859
00860
00561

s~z

L~S10-·-1

LOA·
RAOLO')·
JHp·
ENQ

(ST32)

00862
00863
00864
00865
00866
00567
00868
00569
00870

LRS15

LRS16

LOQSTa
lOAlRS
STA·
STQ"
lOQEOR

CONST+15
1
(ST32)
(ST33)
S
CON2+1,Q

SAZ
LOA·

LRS12-"-1
(ST32)
CON2+1,Q

00877
00"78
00879

SAZ
JMP"
Loa·
EOq

LRS12-"-1
LRS15
(ST33)
CON7+1,Q

00880
00881·
00882
00883

SAN
JMP"
LOA·

sue

1
LRSt6
IST33)
CON7+1,Q

0088,.
00885
00886
00887

SAZ
JMP"
LOA

lRS1&-"-1
lRS15
CON2+1,Q

STA·
LOA

(STltO)
CON7+1,Q

STA"
ENQ
RTJ"

(STftU
$22
(STPIt.
H01JOF
S
ENOLR-·-l
S
S
(ST32'
(ST33)
LRSll

L~A-

SUBSAZ
STQRAOLOA·
LoQ·
JHp·

E

S'
(ST3l) .
lRS9
0
S
CONST+15
CON7-1

'sua

LP.S12

DATE' 10/20'15

JHP·
loASUR

STI)-

lRS11

23

S=O
8000
8000

ERROR

00871
00872
00813
00871t
00875
00876

00a88
00889
00890
00891
00892

Q=XY.X=ERROR NUMBER,Y=NUMBER OF

00893
00894
00895
00896
00897
0089a
0089Q
00900
00901
00902
00903

PAGE

23

COHOOl

PAG~

090'+ POl8! lC2F

ENOLR

JHP"

0906

...........

SECTIO~

0908
0909
0910
0911
0912
091l
091'+
0915
0916
0917
0918
0919
0920
0921
0922
092l
0924
0925
0926
0927
0928
0929

POl82
POl83
P038'+
P0385
P0386
POl87
POl8S
POJ89
POJ8A
POl8B
POl8C
POl80
POl8E
POl8F
POl90
POl91
POl92
P03,}l
POl94
POl95
P0396
P0397
P0398

AD81
6C2F
6C2F
A072
010l
C082
8C2A
£tC2,)
ce29
80.00
OAOO
6801
0000
6C2'+
CC22
BC22
0105
CC1F
9C1F
0102
OC11
SCtA

ENA

.1~18

h0220200

16-ENTER A

.............

ENA2

ENOEA

STA'"
NOP
STA"
LOA"
EOR'"
SAZ
LOA'"
SUO·
SAZ
ENQ
RTJ'"
JHP·

...........

SECTION 17-ENTER Q ••••••••

ENA2
ENA5

ENA7

ENQ

·ENa4
ENQJ

00906
OP IN A.
0080

csr .. o.

( ST40.
(STitU
=N$OAOO

CST41)
CS'ft01
(ST411
ENDEA-·-1
(ST40,
(ST .. H
ENOEA-"-l
$11
(SJP'"
(END41

Q=XY,X=ERROR NUHBER,Y=NUMBER OF

00908
00909
00910
009.11
00912
00913
00911t
00915
00916
00917

STA·
LOA'"
ADO

ENQ3
ENQ2
=N'OAOO

00936
00937
00938

STA·
JHP·
BSS
NOP
NOP
STA"
STQw.

ENQIt
ENQ'+
ENQ2Ul

00939
009 .. 0
009 .. 1
009 .. 2
OOc)"3,
00·9 ....
.0"9"5
009 .. 6
00947

SAZ

0

~'...

\.

(

00931

HOOF:F
FNQ2
=N$OCOO

'0
(ST40)
(ST4H
(STltU
ENOEQ-"-1

('

00918
00919
00920
00921
00922
00923
00.92ft
00925
00926
00927
00928
00929

ANOSTA'"
ADO

EOR"

E

(END'"

HOOFF
(STltO)
(STitU
CONST+7
ENA8-·-1
HFFOO

I

093l P0399 A081
0934 P039A 680c)
0935 P03c)B 8000
P039C OCOO
0916 P0390 6808
0937 P03c)E Cft05
0938 P039F 8000
POlAO OAOO
0919.POlA1 6803
0940 P03A2 1802
0941 POlA3 0001
09'+2 POlA4 0'900
0943 POlA5 OBOO
0944 P03A6 6eoc
0945 P03A7 ItCOC
0946 P03A6 BCOB
0947 P03A9 0105

DATEI 101'20'75

ANOSTA'"
STA·
ANOSAZ
LOAADO'"
STA·"
LOA·
APO

fNA8

0931

2'+

OP IN A.

ENTER 4
ENTeR Q

00933
0093 ..
00935

PAGE

(

24

c
(-

'

r---,
I

~

J

C)

o
C)

COHOOl

PAGE
LOA· .
SUB·

09ft8
0949
0950
0951
0952
0953

P03AA
P03Aa
P03AC
POlAO
P03AE
POJAF

OC11

ENaG

SC03
leOl

E~DE·Q

0955
0956
0957
0958

POlBO
POlB!
P03B2
P03B3

0031
091C
DeHB
093C

09&0
09&1
09&2
09&3
0964
0965
09&6
09&1
09&8
0969
0910
0971
0972
0973

P03B4
POlB5
P03B6
POlB1
P03B8
P03B9
POlBA
P03Ba
P03SC
POlBD
P03BE
P03BF
P03CO

OAFF
EOOE
4CFB
AOOE
6CFA
BODE
0105
CCF7
900E
0102
OCl1
5CFl
lCEF.

CC08
ge08
0102

P END4
P ST40
P ST41

0975

o

0977 P03Cl
0918 P03C2
0979 P03Cl
0980 P03C4
0981 POlC5
0982 P03C6
0983 POlC7
0984 P03e8
0985 P03C9
098G.POJCA
0987 P03CB
0988 POlCC
0989 POlCO
0990 P03CE
0991 POlCF
0992 POlOO
0993 P0301
0994 P03D2

o

ENQ
RTJ·
JHp·
ADe
AOC
AOC
Aoe

ENDSEC
STOP
STORE
STORE+1

..........

SECTION 19-AOO TO A .........
ENA
STA"
STA·
STA-

AGAIN

THIS

SAN
LOAEORSAl
JHP·
EORSAN
LOASAN
STA"
.JHp·.

OAH

LOAEOR-

0
C·ARR
(ST40)
S .
OP·
AGAIN-·-1
OP+1
HFFFF
THIS-·-1
01(
HFFFF
01(---1
OP+1
OAH-·-t
(ST401
AOD8A
OP+1
HFFFF

.~

00 9ft 8
00949
00950
·00951
00952
00953
00955
00956
·00951
00958

........

ENOAN

LO~-

E

Q=XY,X=ERROR NU"8ER,Y=NUHBER OF

SECTION 1ft-AND WITH A
ENA
-0
lOQOP
STU·
(ST"O)
ANnOP
(ST .. t)
STA"
OP
EORSAl
ENOAN-·-1
(ST4U
LOA·
SUBOP
SAl
ENOAN-·-1
ENO
$11
RTJ·
(STP")
JHp·
(ENDlt)

AND

ADO

OAOO
6846
6CEE
6000
CODE
011 ..
COOF
at11C
0105
180C
B07C
0119
COOF
0112
GCE2
1820
COOF
B07C

60220200

••••••••

DATEt 10./20.115
(ST"O)
(STltU
ENDEQ-·-l
tll
(STP4)
(END4)

SAl

P STP4

25

Q=XY,X=ERROR NuHBER. Y-=NUHBER OF

00960
00961
00962
00963
00964
00965
80966
00967
00968
009&9
00970
00971
00972
00973

00975

CAR~=O

00977
00978
00979
00980
00981
00982
00983
00984
00985
00986
00987
00988
. 00989
OD990 .
00991
009.92
00993
00994

PAGE

25

,COMOOt

PAGE

0995 P0303 0112
0996 POlor. OAFF
0997 PQl05 18FC)
0998 PUl06 CODE
0999 POlD7 EOOF
1000 POlO6 OFCF
1001 POl09 OFAF
1002 POlOA 682F
1003 P030!3 482F
1004 P030C 0125
1005 P0300 0165
1006 P030E CR2A
1007 P030F 0115
1006 POlEO 0828
1009 P03El l80C
1010 POJE2 0165
1011 POlE3 C~25
1012 P03E4 0116
1013 POlES eccc
1014 P03E6 OCOl
1015 POlE7 t808
t016 POlE8 C82D
1017 P()3E9 010l
1018 P03EA OAOO
1019 POlEB 6810
1020 P()3EC 1SF8
1021 POlEO CCCIt
1022 P03EE oeoo
1023 POlEF OF61
1024 P03FO 6CC1
1025 POlFt .OAOF
1026 P03F2 9000
1027 P03F3 0106
1028 P03Fr. DODD
102Q P03F5 C814
1010 P03F6 E614
1031 POlF7 Of"CF
1032 P03F'S OFAF
1033,P03F913EO
1034 P03FA C80E
1035 P03FR 0101
1036 P03FC OCB5
1037 P03FO CODE
1038 P03FE 800F
1039 P03FF 6CBl
, 1040 P0400 8CBt
1041 P040t 0105
1042 P0402 eCBO
10lt3 P0403 9CAE
10lt4 POlt04 0102
1045 POlt05 OC11
1046 P0406 5CAA
1047 POlt07 tCA8

6022020(1

OK

ADOll

AOD2
A003

SAN
ENA
JHP·
LOALOIlALS
QLS
STA·
Sfl)·
SAP
SQP
LOA"
SAN
RAO·
JMP·
SQP
LO"·
SAN'

AOOIt
A0011

A005~

AD06
A007

A008
A008A

LOA'"
ENQ
JHP·
LOA·
SAl
ENA
STA·
JMp·
LOA"
ENO
L~S

STA·
ENA
SUR·
SAl
RAOLOA·
LOQ·
ALS
QLS
JHP·
LOA·
SAZ
RAO·
LOAAOOSTA"
EOR·
SAl
LOA·
SUB·
SAZ

AOOlO
ENOAO

E

ENQ
RTJ·
JtiP·

OATEI 10/20175

2&
---

OK-·-l
-0

nilS

OP
OP+l
15
15
AA
QQ
A002-"-1
A003-·-1
CARR
AOOlt···1
CAP.R
A005A
AD011··-1
CARR
A005A···1
(STItOI
1
AD06
CARR
A0051\-·-1
0
CARR
ADD ..
(ST40)
0
1
(ST'+O)
15
S
A008-·-1S
AA
QQ
15
15
AOO12
CARR
AOO8A-"-1
(ST40'
OP
OP+l
CST4H
«STltO.
ENOAO···1
(ST4U
'(ST40'
ENOAO-"-l
S11,
(STPft.
( ENOlt.

A=+
Q

CARR • 1

S=l

Q=)CY t X=ERROR

N~"aER.'=NUM8ER

OF

00995
00996
00997
'009ge
00999
01000
01001
01002
01003
0100'+
01005
01006
01007
0100e
01009
01010
01011
01012
01013
01014
01015
01016
01017
01018
01019
01020
01021
01022
01023
01024
01025
01026
01027
01028
01029
01030
01031
01032
01033'
01034
01035
01036
01037
01038
01039
01040
010ltl
010 .. 2
010 .. 3
010lt,.
010 .. 5
010 .. 6
010 .. 7

PAGE

~

(~
'--'

'

r"-,

26

C:

(I
~

o
o
COHOOl

c)

PAGE

ass

10lt8 POlt08 0001
POltOq 0001
P040A 0001

27
CARR(1),AA(1',QQC1)

. 010lt8

()
CI
r--....

U

(~'

I

I

I'---.--/

I

o
o
c·· "
c)
/

1050
1052 P040B
1053 P040C
1051t P0400
1055 P040E
1056 P040F
1057 P0410
1058' P0411
1059 P0412
1060 P041l
1061 P041,.
1062 P0415
1063 P041!)
1064 POlt17
1065 P04113
1066 P0419
1067 P041A
10&8 PO .. 1B
1069 P041C
1070 P04l0
1071 P041E
1072 POltlF
1073 P0420
1074 P0421
1075 P0422
1076 P0423
. 1077 P0424
1078 P0425
1079 P0426
1080 P0427
1081 P0428
1082 POlt29
1083 POlt2A
1084 P042B
1085 P042C
1086-POft20
1087 P042E
1088 P042F

DADO
6000
6CA4
CODE
EOOF
68FS
It8F8
0122
0162
1606
0164
CC9B

SECTION lA-EXCLUSIVE

EOR

ENA
STASTA·
lO~-

EOR7

EOR2
EOR3

Ocot

0874
1802
CC50
6CltF
DODO
COOO
906F
.0107
CC4A
OFCl
6e48
C8E5
E8E5
OFfl
18E9
CODE
BOOF
6e42
9C40
0103
OC11
5C3C
1801
lCl9

EOR9
EORIt

EOR6A

lO/)STA·
STQ·
SAP'
SQP
JHp·
soP.
lOA·
ENQ
EAQ
JHP"
LOA·
STA·
RAOlOASUBSAZ
lOA·
AlS
STA·
LOA·
LOa·
llS
JHP"
LOA~

EORSTA·

sus· .

O~

WITH A

A=POS.
Q=POS.

EOR2",!~:=,,1

EORJ-·-l
EOR9
EOR9~!.-1

(S'''O)
1
A
EOR ..
CST50.
(ST501
S
S
CONST."
EOR6A-·-l .
(5T50'
.- 1

DOlt)·
.. -- .....

....

(ST50)
AA
QQ .

I

1
EORt
OP
OP+l
(ST5U
(ST50)

EOR8 .

10QO

••••••••

SECTION lB-ADO TO Q ••••••••

1092 P0430 800F

AOQ

Aon-

E

..........

0
S
(ST"O)
OP
OP+!
AA
QQ

SAZ
ENQ
RTJ·
JHp·
JHp·

60220200

C)

••••••••

EO~8-·-1

'11
CSTPS)
EOR8
(ENOS.

OP.!

Q=XY, X=ERROR NUMBER ,Y=NUMBER OF

01050
01052
01053
01054
01055
01056
01057
011)58
01059
01060
01061
01062
01063
01064
01065
01066
01D67
01068 .
01069
01070
01071
01072
01073
0107 ..
01075
01076
01077
01078
01079
01080
01081
010S2
01083
010S4
010S5
010S6
01087
01088
01090

OP IN

A.

01092

PAGE

27

-'

,

t

./

COHOOl

P4GE

'DATEI 10'20/75

28

,_

...........

1093
1094
1095
1096
1097
~ .... _1096
1099
1100
1101
1102

P0431 6C39
POlt32 EOOE
P.g433, FOOF
P0434 4e37
POlt35 CCl6
~0't3f) eC3"
P0431. 0102
P0436 OC11
P04l9 5C30
P043A lC2E

ADQ2

AOQ~

STaw.
LOA·
EO~·.

1104
1106 PO,.3B
110r POlt3C
1108 PIllt30
1109 P043E
1110 POlt3F
1111 POltltO
1112PO"41
1113 POltlt2
1114 PO,.43
1115 POlt,.lt
1116 P0445
P0446
1117 P0447
1116 PO .... 8
1119 p0449
P04 .. "
1120 P04lta
1121 POlt4C
1122 P04"O
1123 P044E
1124 PO .. ltF

STAw.
LDQ-

A081
6e2E
A072
0103
ee2B
A062
1802
eC28
6807
eC26
8000
0900
6806
.COOF
8000
0000
6C1F
CODF
0900
6CtD
BCto

AOQ3

SAZ
ENQ
RTJw.
JMp·

••••••••

SECTION lC-INCREASE A

. INA5

..

~

STORE; J NCREASE A INSTRUCTION

I.NA6~·-:1

S11
CSTPS)
,EN(5)

1130

......... SECTION 10-INCREASE Q ••••••••

1132 P0454 A081
1133 POftS5 6C15
113lt P0456 8000
POft57 0900

INQ

60220200

AND-

HOOFF

STA- (ST50)

ADO

E

0080
I'

THE AHOUNT A WILL BE INCREASED

(ST50)
STA·
LDAOP+l
NOP
(ST~i.·'
STA·
EOR-· (STSO.
ENQ·
RTJ"
JMP"

=NS900

01093
0109 ..
01095
·01096
01097
01098
01099
01100
01101
01102

0110",

IN AS
OP"l
=NO-

SAl.

INA6

.... ...

STA·
LOAADD

5T4·

OF

'-

LOA".
ADlJ

EO~-

INA .. '

NU"BERtY=NU'''~ER

OP IN A.

JHP·
LOA·

INA3
INA2

Q=XY,X=ERROR

HOOFF
(ST50)
CONST"7
INAJ-·-l ...
(ST50)
t-!FFOO
INA2
IST50.
INA ... 1
(ST50)
=NS900

STA·
AND';' ,
SAZ
LOA"

1125 .~OIt5Q :.0102~.

1126 POltS1 OC11
1121 P0452 SC17
. 11.28 P0453 IC15

ANO~

, INA

(

( ST501
OP
OP'+:l
(ST511
(ST51)
.. 'ST50.
AOQ3-· ... 1
'11
(STPSl.
(ENOS)

•

•

~,

. . . . . . . I, • •

Q=XY, X=ERROR NUHBER,Y=NUMBER OF

01106
01107
01108
01109
01110
01111
01112
01113
0111 ..
01115
01116
01117
01118
01119
01120
01121
,01122
01123
0112 .. ·
.01125.
0112&
01i27
01128

01130
OP IN A.

01'132
01133
0113 ..

,PAGE

28

u
1'-"".

U

o
o
o
o

COHOOl

o
o
r----,

(

PAGE

113S P0458 6808
1136 POlt59 EC11
-. 1137 POlt5A FOOD
Pli45B 0000
1138 POItSC 4803
1139 P0450 COOF
1140 POItSE' EOOF
1141 P045F 0800
1142 P0460 0800
1143 P0461 6C09
1144 P0462 4C09
I11t5 POlt63 BC06
1146 P0464 0102
1147 P046S OCll
1148 P0466 5C03
1149 P0467 lCOl

STA·
LDQ··
.. ; ADQ.

INQ3
INQ2

STQ"
LOA- ..
LOONOP
. -NOP
STA·
STQ·
EOR·
SAl
ENQ
RTJ·

IN04

DATEI 10/20'75

29
INQ2
(ST5 O'
;:fi!DOO

01135
01136
.01137

INa3
OP+l
OP+1

JHP·

(ST50)
(ST5U
(ST51)
INQ4-"-1
$11
(STPS)
(ENDS'

AOC
AOC
AOC
AOC

ENOSEC
STOP
STORE
STORE+l

Q=XY,X=ERROR NUHBER,Y=NUMBER OF

01138
01139
011.. 0
011lt1
01142
01143
011 ....
01145
011 .. 6
011 ..7
011 .. 8
01149

I

'--.-/

1151 P0468
11S2 PO't69
11SJP046A
1154 P046B

0031
091C
093B
093C

P ENDS
P STP5
P ST50
P ST51

.............

1156

o
o
o

o
o
o

o

1156
1159
1160
1161
1162
1163
1164
1165
1166
1167
1168
1169
1170
1171
1172
1173
1174
1175
1176
1177
1178
1179
1180
1181
1182
'1163

P046C
P0460
POlt6E
P046F
P0470
P0471
P0472
POlt73
P0474
P0475
P0476
P0477
P0478
P0479
POlt7A
P047B
P047C
P0470
POlt7E
P047F
P0480
PO 481
POlt82
P0483
P0464
POltR5

OAOO
6CFC
6CFC
DIAD
'CCF9
806B'
6CF7
DCF7
BCF6
0102
OC11
5CF1
01B4
CCFO
0132
OC21
5CEC
OA13
lCE9
CCEA
09FE
6eE8
CCE8
09FE
6CE6
18E9

60220200

E

RAO
RAOl

RA02

RA03

Ot151
01152
01153
01154

SECnON IE-REPLACE ADO ONE IN STORAGE
ENA
STA·
STA·
SOy
LOA·
AOOSTA·
RAO"
EOR·
SAZ
ENQ
RTJ·
SNO.
LOA·
SAH
ENQ
RTJ·
E'NA
JHP·
LOA·
INA
STA·
LOA·
INA
STA·
JHP·

0

(ST50)
(ST5U
0

iSTSO)
CONST
(ST50)
(ST511
(ST51)
RA02.··-1
$11 .
(STP5)
4
(ST50)
2
$21
(STPS)
RAOJ-RAO
(ENDS)
(ST50)
-1
-(ST50)
(ST511
-1

(ST51J
RA01

............

01156

01158
01159
01160
01161
01162
0001
01163
01164
01165
D1166
01167
Q=XY, X=ERROR _NUMBER,Y=NUHBER OF
01168
01169
01170
01i71
01172
01173
OVEltFLOW SET ON A RAO INSTRUCTIO
01174
D1175
···01176
01177
D1118
01179 .
01180
01181
01182
D1183
REPEAT CONDITIONS

.PAGE

29

(.
\.....

(
,
\....j
(--\

"'-_...-'
,,-----....

,/

\

COHOOl

PAGE

30

OATEI 10/20/75

('
',-

.............

1185
1167
1188
1189
1190
l1ql
1192
1193
1194
11q;
1196
1197
1198
1199

P0486
P0487
P0488
P0489
POlt8A
P048B
P048C
POlt80
P048E
POlt8F
P04qO
P0491
P0492
P0493

OA64
6603
COOF
6000
0000
6COE
COOF
900E
ElCoe
BCOA
0102
OCll
5CD6
lCOIt

SUB
SUB4
SU02

TCA
STA"
LOAAD!)
STA·
LOASU9STA·
EO~·

............

"'-

C

=N~O

01181
01188
01189
01190

(ST50)
OP+1
OP
(ST51)
( ST50)
SU!33-.. -t
1111
(STP·S)
(ENOS)

01191
01192
01193
01194
01195
01196
01191
01198
01199

(

A

OPIN A.

SUB4+1
OP"l

SU03

SAZ'
ENQ
RTJ"
JMP"

1201

••••••••

SECTIO"! 20-SKIP ON OVERFLOW, SKIP ON NO OVERFLOW

1203 P04q4 OAOO
1204 P0495 6835
1205 P04Q6 .01Bl
1206 PO .. 97 0833
1207 P0496 C067
1208 P049Q 0901
120Q P04QA 01A3
1210 P049B OCI0
1211 P049C sece
1212 P0490 1805
1213 P049E DIU
1214 P04QF 1803
1215 P04AO OC20
1216 P04At 5CC7
1217 POltA2 OAI0
1218 P04A3 S406
1219-P04A4 18F3
1220·P04AS COOO
P04A6 6001
1221 P04A7 09FO
1222 P04A8 01A2
1223 POltA9. OC30
1224 P04AA 5eBE
1225 P04AB OAI0
'1226 P04AC 5406

OVNO

ENI1
STA·
SNO
RAO·
L'OAINA
SOy
ENQ
RTJ·
JHp·
SOy
JHP"
ENQ
RTJ"
ENA
RTJ"
J"P"
LOA

0
OVERF
1
OVERF
H7FFF
1
OYN01-·-1
$10
(STP5'
OVN02
1
OVN02
$20 .
(STPS)
$10
(JUMP)
OVN03
=N$8001

INA
SOy
ENQ
RTJ"
ENA
RTJ-'

-2
·OVN05-·";'1
$30
(STP51

OVN03

OVNOl

OVN02
OVN04

OVN05

r

01185

SECTION IF-SUBRACT FROM A

$10

(JUHP)

Q=XY, X=ERROR NUMBER, Y=NUH BE R OF

.........

SET FLAG
GENERATE OVERFLOW
SHOULD SKIP
Q=Xy,X=~RROR NUHBER,V=NUHBER OF
SHOULD NOT SKIP
Q=XV,X=ERROR NUHBER,Y=NUHBER OF

R.EP'E~T

CONO)

GENERATE OVERFLOW
SHOULD SKIP
Q=XY, X=ERROR NUHBER,Y=NUHBEROF

....

r,.

\ .... '

,,---,
I
\"''''

r-'

01201
01203
0120 ..
01205
01206
01201
01208
01209
01210
01211
01212
01213
0121,.
01215
01216
·01217
01218
01219
01220

(~

\-_ ...

('
..........
'

01221
01222
01223
0122 ..
01225
01226

(
"-.-

60220200

E

PAGE

30

c
(~~

'- ..

u

0
,.~.-

-,

l)
r-.. .

U

r·-,

l)

COHOOl

0

1227
1228
1229
1230
1231
1232
1233
1234
1235
1236
1237
1238
123<)
1240
1241

C

I

r-",

U

~,

L)
r-· .....\

U

L
0
("',
I

I

~

0
0
r~"

U

0
·CI.

0
0
(')

1242
1243
1244
1245
121t 6
12lt7
1248
1249
1250
1251
1252
1253
1251t
1255
1256

POItAO
POltA€
POItAF
POltBD
POltBl
P·OltB2
POltB3
POltBlt
POltS5
POltB&
POltB7
P04B8
P04B<)
P04BA
P04BB
P04BC
P04eO
P04BE
P048F
POftCO
P 0 ItC 1
POltC2
P04C]
P04C4
POltC5
POltC6
POltC7
POltC8
P04C<)
P04CA
PD4Ca

PAGE

18F7
C087
0901
0181
1801t
DCltO
5CB5
180lt
0182
OC50
5CBl

OYNO&

OVN07
OYN06

OAI0

5406
16F3
COOO
8001
D9FO
01Bl
1803
nC60
5CA7
OAI0
5406
18F6
C805
0102
CO'l7
0<)01
lC<)E
0001
0001

OVNOq

OVNOA

OVNOH

1258
12~0

1261
1262
1263
126lt
1265
1266
1267
1268
1269
1270
1271
1272
1273
. 127ft

P04CC
POItCO
POItCE
POltCF
POItOO
p.O 401
P()402
P040]
P0401t
POlt05
POltD6
POlt07
P0408
POltO<)
P040A

DADO
68lC
68lC
6610
6000
683E
CODE
0111
1867
B07C
0111
186ft
COOF
0111
1861

60220200

E

31

OATf.1 10'20/75

JHPLOAINA
SNO
JHPENQ.
RTJJHP·
SNO
ENQ
RTJENA
RTJJHPLOA

OYNOIt
H7FFF

(STP5)
OYNOR
OVN08---1
$50
(STPS'
$10
( JUMP)
OVN06
=N$8001

INA
SNO·
JHPENQ
RTJENA
RTJJHPLOASAZ
LOAINA
JHP·
BSS
BSS

-2
1
OVNOA
$60
(STP5)
$10
(JUMP)
OVN09
OVERF
OVNOW---l
H7FFF
1
(ENOS)
OYERFlU
CARRYUJ

REPEAT, CONO.

f·

1
OYN07.

S.. O

Q=XY ~ X=ERROR NUH8ER,Y=NUHBER OF

Q=XY,X=ERROR NUMBER ,Y=NUHBER OF

REPEAT CONO.

Q=XY,X=ERROR NUHBF.R,Y=NUHBER'OF

REP£AT.CONO.

••••••••

SECTION 21-HULTIPLY INTEGER ••••••••

HUI

EN"
STASTA·
STA·
STASTA·
LOASAN
JHP·
EORSAN
JHP·
LDASAN
JHP-

01242
01243
012 .. 1t
01245
01246
012 .. 7
01248
012 .. 9
01250
01251
01252
01253
01254
01255
01256

01256

0
PROOl
P~OO2

HULT2
S
NEG
OP
1
HUl12
HFFFF
·1
HUI12
0'-+1
l'
HUI12

01227
01228
01229
01230
01231
01232
01233
01234
01235
01236
01237
01238
01239
01240
01241

S=O

OPE~AND

1

OPE~ANO

1

= +0
=-0

OPERANQ 2 = +0

01260
01261
01262
01263
01261t
01265
01266
01267
01268
0126<)
01270
Of271
01272
01273
01274

PAGE

31

(~
\ ........... "

/

COMOOl
1275
1276
1277
1216
1279
1280
1231
1282
1283
1284
1285
1266
1287
1288
1289
1290
1291
1292
1293
1294
1295
1296
1297
1298
12q9
1300
1301
1302
1303
1304
1305
1306
1307
1308
1309
1310
1311
1312
1313
131lt

1315
1316
1317
1318
1319
1320
1321
1322
1323
1324
1325

POltOB
P040C
POltOO
POltOE
POltOF
P04EO
P04El
POltE2
P04E3
POltElt
POttE5
P04E&
P04E7
P04Ea
POltE9
POltEA
P04Ea
POltEC
POltED
POltEE
P04EF
POltFO
P04F1
POltF2
P04F3
P04F4
P04FS
P04F&
P04F7
P04F8
P04F9
P04FA
POltFB
P04FC
POltFO
P04FE
P04FF
P0500
paso!
P0502
POS03
P050lt
POS05
P05D6
P0507
P0508
P0509
PD50A
P050B
P050C
POSOO
P050E
POSOF

PAGE

B07e
0111
185E
CODE
0122
0864
082~

6829
EOOF
0162
0852
0829
4627
E626
OF61
4624
0131
1825
C81E
A622
681E
C819
A61F
881B
A810
&819
C8t6
6813
&612
0115
.C614
niOA.
OAFF
6600
1808
A812
980E
0104
C608
09FE
&606
080&
ce07
680lt
6803
1809
0001
0001
0001
0001
0000
0001
0001

6022020n

E

HULTlt

EO~-

HFFFF
1.

ANn"
STA"
LOA"
ADO"
STA"
SAN
LOA"
SAZ
ENA
STA"
J~P"

HUll

ANO"
SUS"
SAZ
LOA"
INA
STA"
RAO"
LOA"
AOO"
STI\"
JHP"

ass
ass

Hl

OATEt 10/20/75

SAN
JHP"
LOASAP
TCA
RAO"
STA"
LOQSQP
TCQ
RAO"
STa"
loa"
LRS
STQ"
SAM
JMP"
LOA"
ANO"
STI\"
LOA"
AN 0"

Aon"

ATLAST

32

NUM

ass
ass

SHlF2A
PRODtCl1,PR002(11

01275
01276
01277
01278
01279
01280
01281
01282
01283
01281t
01285
01286
01287
01288
01289
01290
01291
01292
01293
0129,.
01295
01296
01297
01298
01299
01300
01301
01302
01303
01304
01305
01306
0.1307
01308
01309
01310
01311
01312
01313
01314
01315
01316
01317
01318
01319
01320
01321

HULTIC1~,"UlT2t1)

01322

o

01323
0132,.
01325

MUltZ
OP
Z
A.
NEG
MULTl
OP+1

OPERAND 2
OPERAND 1

OPE~AND

=-0

2

2
Q

NEG
OPER
OPER
1

OPER
1
. SHIF2A
HUlTl
Nl
Hl
PROOl
Nl
Hl
Nl
Hi
HULTl
PRODl
PRODl
ATLAST-·-l
f11

HUl1-·-1
-0

PROOl
HUll
Nl
Hl
HU1l-·-1
PROOl
-1

PRODl
PR002
HULT2
PROD2
P~OD2

OPERU)
NEG C1)

ADD~SHIFT

ANO STORE

HAKE PR.OOUCT 1
OETFRMlNE IF -0 WENT TO

=

IS CARRY AROUNO
.0
NO,THEN SET TO -0

GO TO SECOND WORD

~o

PAGE

/'

(

"

(

32

c.··

u

o
u

o
o

o
'...J

CI

c
I

r·· "

I

'---'

COHOO1
132&
1327
1328
1329
1330
1331
1332
1333
133,.
1335
1336
1337
1338
1339
13ftO
13ft1
13ft2
1343
13ft4.
1345
13ft&
1347
1348
1349
1350
1351
1352
1353
1354
1355
135&
1357
1358
1359
1360
1361
1362
1363
'1364

PAGF

P0510 0001
P0511 CAF9
P0512 E8F9
P0513 OFEl
P051,. &6F6
P05t5 ,.SF6
P0516 DODD
P0517 01'10
P0516 9000
P0519 0101
P051A 18CO
P0516 C8F3
P051C 0108
P051D A06C
P051E 0116
P051F C8E9
P0520 0864
P0521 68E7
P0522 C8E7
P05'23 086ft
P0524 &8ES
P0525 C8E3
P05.26 GCOO
P0527 006E
P0528 C8E1
P0529 6eoo
P052A OOBC
P052B CODE
P052C 20DF
P052D &C70
P052E 4C.70
P052F BeOD.
P053B 00B5
P0531 010 ..
P0532 De12
P0533 5COO
P0534" OOBO
P0535 1806
P053& CCG8
P0531 BeOO
P0538 OOAf
P0539.0101
P053A 16F1
P053B 1880

Nl
SHIF2A

NUH
LOA·
LDO·

HU15

HUI3

MUlEE

MUI11

HUl12

DATE I 10/20'75

PROD!
(ST&O)

.. ' 01126
01327
01328
01329
01330
01331
01332
01333
0113 ..
01335
0133&
01337
01338
01339
013.. 0
013.. 1
01342
013 .. 3
013....
013 .. 5
01346
013 ..7
013.. 8

LOA·
STA

PROD2
(ST6tt

013 .. 9
01350

LOAHUISTA·
STQ·
EOR

OP
OP+1
. (ST62t
(ST63)
( SToOl

LL~

HUI2

33

STA·
STO·
RAOENA
SUBSA Z
JHp·
LOA·
SAZ
ANOSAN
LOA·
TCA
STA·'
tOA·
TCA
STA·
LOA·
STA

SAZ
ENQ

1
HULTl
HUlT2
1
HULTl
HULTZ
S
1&
S
1
HULT ..
NEG
HUI5-·-1·
CONST+l
HU15-·-1
PRODl
A

PRODl
PROD2
A
PROO~

OPERAND 1

01351
01352
01353
0135 ..
01355

RTJ

HU111-·-1
!:12
(STP6)

JHP·
LOA·
EOR'

HU112
eST63)
eST61)

01359
01360
01361

SAZ
JHp·

HU112-·-1
HU1EE
OVNON

01362
01363
0136 ..

JHp·

Q=XY,X=ERROR NUHBER,Y=NUHBER OF

GO TO END SECTION ROUTINE.

01356
01351
01358

r····,

U

136&

•••••••• SECTION

o

.1368 P053C DADO
1369 P0530 685B

OIV

60220200

o
u

E

ENA
STA·

22~6IVIOE

o

FLG1

'INTEGER ••••~ •••

01~66

.

01168
01369

PAGE

33

('
........,.,.",

COHOOl

PA!iE

34

DATEI 10/20175
/

r

1370
1371
1312
1373
1374
1375
1376
1377
1378
1379
13AO
1361
1382
1383
1384
1365
1386
1387
1388
1389
1390
1391
1392
1393
1394
1395
.. 1396
1397
1398
1399
1400
1401
1402
'1403
1404
l'.OS
1406
1407
1408
11t09
1410
1411
1412
1413
141.4.
141,
1416
1417
1418
1419

P053E
P053F
POS40
P0541
PO,42
P0543
P0544
P05,.5
P0546
POS47
P0548
P05't9
POS,.A
P054B
P054C
P054D
P054E
P05'tF
P0550
P0551
P0552
P0553
PO,5,.
P0555
P0556
P0557
P0558
PO,S9
P05SA
PO,SB
P05SC
POS50
P055E
P055F
P0560
P0561
1'0562
PO,63
P056't
P0565
P0566
P0567
P0568
P0569
P056A
P056B
P056C
POS6D
POS6E
P056F
P0570
1'0571
POS72

685B
68S7
6854
66S4
6850
6000
COEO
0112
1600
0090
B07C
0112
1800
0097
CODF
0113
CODE
0106
1808
B07C
011,
CODE
B07C
0112
1800
0088
CODE
EOOF
0163
D6JO
.0864
0852
6a3E
't8JC
COED
0122
0837
0864
6836
OCOl
0139
OFAl
OFC1
6831
COOD
09FE
6000
6"25
C62C
18F6
OfCF
OFAF
6828

DIV1B

DIVl
DIV2

OIV4

OIV5

STA"
STA"
. STA"
STAll
STA·
STALOASAN
JHP

FLG2
POSIl
QUOTl
QUOT2
FINO
S.
OP+2
2
ENDDt

EO~-

SAN
JHP

HFFFF
2
ENOOI

LOASAN
LOASAZ'
JHP"
EORSAN
LOAEORSAN
Jt1P

OP+l
OIV1B-II-1
OP
°lVl- II -1.
0lV2
HFFFF
DIV2- 11 -1
op·
HFFFF
DIV2- 11 -1
ENODI

LOALDQSQP
RAO·
TCA
TCr)
STA·
STQ·
LOASAP
RAO·
TCA
STA"

ENQ
DIV8

SAM
QlS
AlS
STA·
LOAINA
STASTA"
LOA·
JHP"

OIV6

. AlS
QlS
STA"

OP
OP+l
DIV4-·-1
. FLGl
A

.0 tUO NOT ATTEHPT SIH.

01310
01371
01312
·01373
01314
01375
01376'
01377
0137S

-0 00 NOT ATTEHPT SIH.

01379
01380
01381

OPERAND 3

OPERAND 1

BOTH REGISTERS

= -0

COHPLEMENT DIVIDEND

Q

.-

DVNDl
DVND2
OP+2
DIV5-"-1
FLGZ
A

DIVIS
1
DIV6- 1I ·1
1
1
OIVIS
S
-1
S
FIND
DIVIS
OIV8
15
15
DIVIS

CO"PLEHENT DIVISOR
FINO THE LEFT HOST eIT.

~UH9ER

OF TIHES TO SHIFT

(~'
\

"-

..

~"

\"

'-. ..

01382
01383
01384
81385
. 01386
01387
01388
01389
01390
01391
01392

/-',
I

. '-..
/,-.- .....

'.

I

01393
01394
01395
01396 .
01397
01398
01399
01400
01,.01
01402
01403
01 .. 0 ..
01 .. 05
01406
01 .. 07
01 .. 08
01 .. 09
01 .. 10
01 .. 11
01 ..12
01"13
01lt14
01lt15
01416
01 .. 17
01418
01419

(
~

.. --.....

;
". ........

r-'
\.......

('
'..........,.

~-

(

('
I,

(0220201)

E

PAGE

......

3,.

C
C-~~

C--,·

u
"

"

0

u
0
0
(J
0
0
0

n

~

i'
'---'

0
0
0
0
0
0
0'
0
,,---,

U

n

PAGE

COHOO1
1420
1421
1422
1423
1424
1425
1426
1427
1426
.1429
1430
1431
1432
1433
1434
1435
143&
. 1437
1436
1439

P0573 4824
P0574 C827
P0575 9825,
P057& 0121
P0577 1826
P057S &823
POS79 caln
P057A B81A
P057S &819
P057C C811)
POC)70 B818
POS7E 6817
P057F OAOF
P05ao 9000
P0561 0111
P0582 1821
P058] C819
P0584 E617
P05S5 OFfl
P056G AOOO
.P0587 FFFf
1440 POS88 6814
1441 P0589 4812
1442 P058A C80C
1443 P056S E80C
1444 P058C OFFO
1445 P0580 OFEF
144& P058E 4609
1447 P058F· 6807
.1448 POS90 0000
1449 P0591.1REZ
1450 P059Z 00'01.
1451 P0593 01)01
1452 P0594 0001
P059S 0001
1453 P059G 0001
P0597 0001
1454 POS9a 0001
P0599 0001
1455 P059A 0001
P059B 0001
P059C 0001
145& P0590 0930 P
1457 P059E 093E P
1458 P059F OAOF
1459 P05AO 9000
14&0 POSAl 0101
1461 P05A2 USED
1462 P05Al E8F7
1463 P05A4 eSEO
1464 P05A5 0901
1465 P05AG 0103
1466 P05A7 OFAF

&0220200

E

OIV1l

OIV12

STO·
LOA·
SUS·
SAP
JHP·
STA·
LOA·
EOR·
STA·
LOA'"
EOR·
STA'"
ENA
SUOSAN
JHP·
LOA"
LOQ~

LLS.
AND

ST62
ST63
DIV10

XXX
FINOl

35

DATEI 10/2{J/75
POSI2
DVN02
DIVIS
1
OlV10
OVN02
POSIt
OUOTl
QUOTt
POSIZ
QUOl2
QUOT2
15
S

01lt20
01421
O1lt22
'01lt23
01 1t2 It
014Z5
01lt26
014Z7
01lt28
014Z9
01430
01lt31
01432
01 .. 33
0143~

1

XXX
OVN01
oVN02
·1
=NSFFFE

01 ..35
01436
01437
01"38
01439

STA·
STO·
LOA·
LOa·
llS
LLS
STQ"
STA·
RAOJHp·,
BSS
BSS

ass

OVN01
OVN02
POSIl
POSI2
1&
15
POSIZ
POSIt
S
DIVll
FINOCU
oIVFAUU)
OUOT1(1I,OUOT2Cl)

BSS

PPSI1(1),POSIZ(1)

01 ..53

BSS

FLG1CU ,FlG2U)

01454

BSS'

OIVIS(1),DVN02(1),DVN01(1)

01455

Aoe
Aoe
ENA
SUBSAZ
JHp·
lDQ·
LOA·
INA
SAZ
QLS

STORE+2
ST'ORE+3
15
S
1
OIVi2
oVND2
FINO
1
FINO?-"'-1
15

.... ........................
~

STORE REMAINDER

01440
01441
0144Z
01 ItIt 3
014 .. 1t
01ltlt5
014 .. &
011t..7
01ltlt8
01 .... 9
01450
01 ..Sl
01452

01456
01457
01 ..58
01 .. 59
01460
·01461
01462
01463
0146 ..
01 ..65
01466

PAGE

35

(

COH001
~

. ..

.

PASE

36

DATE' 10/20f75

.

1467 P05A8 0901
INA
1 .
1468 POSA9 18FC
JH~'
FINDJ
.. 146.9 .. ,P05AA. "C3£ ....: ..FIND2 .......S.T . . . .
..YD... ...
1482 POSB7 0111
SAN
1
FlG2:t. YES
1483 POSBS 1810
JMP. .
DIV3
HO,GO nIVIn
~~" ._,.. 14 O~. J~D ~.B. 9 CC ZC. . .. _. .•. ...Lo.A.!, :. .. ; .._.. J.SI.6. QJ __ '," .•. .,..__. '"..... _. ___ .., ". __~._ .• ' .... ..,....1 ".~_
:"':":1"05 pOSeA 086"'~
TCA.· A":'" .~:. ';\ ) "'i>'COIPLEMf:NT QUOTIENt··
1486 P05SB 6C2A
STA.
(ST60"
.
........ 1 .. 87... P.05.B.C 180e:.
.J"~,'
DIY3
1488 POSBD B80B
GtVB
EOR.
FlG2
1489 P05BE 0113
SAN
OIVB2-.-1
,..... 1490 POsQF CC27
~LOA!,
.(ST6U . _....
·>149i;;f05CO·086~:;,. '.. /'
TeA
A"'"
.. ~~!lPLE"EN.T. 1.i"'I"D~R .
':';";1492' .PO~Cl 18fJ6'
'. <:'
JMp..
01'a1.
.;.:l~
" : 1493POSC2 Ee23 :. DIVB2
LOQ~ _
. cst60) ..
1494 P05C3 0852
Tca
Q
COMPLEMENT QUOTIENT
1495 P05C4 ..e21 .
STQ(5T60'
.: . 1496 P05:C5 .. CCU
lO.A!!".:.
__ .($T61)
1497 Pose6 .0864
TC~
A
· 1'+98 pose7 6C1F
OIVet
STA.
.: lST6U
r'
_.....1"99 ... posc.e .. CQDE' ._DIY.!.
.L:D~~:.
.....:_O"! .... .;.·..... , .>:.,
'.......... _'. OPE~AND 1
1500 P05C9 EOOF
LOQOP.l
OPE'RANO 2
1501 POSCA 01AO
SOY
U

«s"O)

0"

,,':

",.""~,, !.;~~. :~~g.~ ~~~:~1504
.1505
1506
1507
IS,S
· 1509
. 1510
· 1511
1512

P05CD
PO.S.CE
P05CF
P05DO
POSOl
P050Z
P050J
PO!>Dlt
P050S
P0506
.151~ P05D7
1514 P05DS
1515 P05D9
;:..... ,}·.1516,.;,.P050A.
1517 PO.50B
1518 P05DC
,

.:

. .,

''''--C'' '''-'''

4COO
ceCIt. . ..... ~ ..,..
0101t
01A2
OC22
prV3l
SC12
180F
DIvaw
0183." OlV3)(
EOOO
2203
lSF9 .
CCC5
DIV3Y
BCOO
0103. ...,:,~":.. ;.. ~ .....:.:~
OC12
DIVitA
SC08

~~.!;~STQ.
LO~-_.

SAl'
SOY
ENQ .
RTJ.,
JMP.
SNO
LOQ
J"p.

LD4-'
EOR.

.

:'

.~·:;~2i. · ·""

(ST63)
QIVFAU_.
OIV3)(-.-1
OIV3W-.-1
S22

Q=)(~,~=ERROR

ENDOI
OIV3Y-.~.1
=NS220J

ERROR ...

'~STP6J

DIV3Z
'(ST6':n
(ST61)

L~SAI.~ .:L...::.._:..... DI88~!~.l..:_ .. ~. __ .

ENQ
RTJ.

__ " . "

112
(STP6t

NU"9ER,Y=NUMB;R OF

01 ..67
01468
01lti9
'011t70
01 '71
.. OJ, 1t12
01"'3

alit''''

011t15 ..
01 .. 76
'011t77
01lt78
01 ..79
01 .. 88
01U1 '
01 .. 82
01 ..83
.01,.'1t .

(
\....'

81"'S
01'86

81"87
01 .. 88
01 .. 89

·

014.~O

IU.'9S,
01 ..92
01 ..93
01 .....
01495
· 01 ..96 . .
01 ..97
01498
01lt99
01500
01501
· .01502
01503
0150,.
.01505,
01506
01507
01508
01509 .
01510

CHEC~

REMAINDER

.. -:~~. -Q.)(,·,X;;~RR~'·R· Nii"iER~'Y~NuM8ER'OF'~;'

81S11 .
01512
·01513
01.51" ;
01515
.

:~:·t;-;··-

'

01518

"

. 60220200

E

(-

'PAGE

36

c.

c
';.,\

..

(j

o
u

o
o
o
o
o

o

COHOOl
1519
1520
1521
1522
1523
1524

PO SOD
P050E
P050F
P05EO
POSE!
P05E2

180S
CCBE
se06
0101
16F9
lCOl

1526
1527
1528
1529

POSE3
POSE,.
P05E5
P05EG

0031
091C
093B
093C

PAGE

DIVItB

ENoDI
P EN06
P STP6

P ST60
P STG1

1531

c
o
o

o

o
.0

o
c

o

1533
1534
1535
1536
1537
1536
1539
1540
1541
1542
1543
1544
1545
1546
1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1557
1556
1559
1560
1561
1562
1563
1564
1565
1566

POSE7
POSES
POSE9
P05EA
P05ED
POSEC
POSED
P05EE
P05EF
P05FO
POSF1
POSF2
P05F3
POSF"
POSFS
P05F6
P05F7
P05F8
P05F9
P05FA
P05F9
P05FC
P05FO
P05FE
P05FF
P0600
POGOl
P0602
POG03
P060,.
POGOS
P0606
POG07
P060S

OCOO
4822
,.820
0121
061F
OFCl
GCF7
081B
C8lA
90GF
0102
.CCF2
16F6.
C816
OFCF
0133
OAIll
GCEC
1803
DADO
GCE9
CODE
GC9F
7C9F
6eE6
BCE4
0101
1804
CODE
BC99
0102
OC12
5COC
lCOA

. 60220200

E

37

oATEI 10/20175

JHp·
LOA·
EOR·
SAZ
JHP·
JHp·

ENDDI
($T62)
(STGO)
1
DIV4A
(EN06)

AOC
AOC
AOC
AOC

ENOSEC
STOP
STORE
STORE+1

••••••••

SECTION 23-STORE PARITY TO A

SPA

ENfl
STQ·
STQ"
SAP
RAO·
ALS
STA·
RAO·
LOA·
SUBSAZ
LOA· ,
JHP·
L'OA"
AlS
SA ..
ENA ,.
STA·
JHP"
ENA
SlA·
LOASTA·
SPA·
STA·
EOR·
SAZ
JHP'"
lDAEOR.·
SAZ

SPA2
SPA1

SPA7

SPA3
SPA4

'SPA5B
SPA5A

ENQ

ENDSPA

RTJ·
JHp·

CHEC QUOTIENT

01526
01527
01528
01529

••••••••

0
CA~RR

COUNT
SPA1-"-!
CARRR
1
(STGO)
COUNT
COUNT
CONSn'4
SPA7-·-1
IST60)
SPA2
CARRR
15
SPA3-·-1
1, ...
(ST60)
SPA4
0
(St60)
OP
(ST62)
(ST63)
(STG1)
(ST60)
SPA5B-·-1
SPA5A'
OP
'(ST63)
ENOSPA-·-l
$12
(STP6)
(EN06)

01519
01520
01521
, 01522
01523
0152,.

A=+ OERERHINE NUMBER OF OITS SET

0010

CLEAR PARITY BIT

COHPARE PARITY

COMPARE OAT A STORED
Q=XY~ X=ERROR NUHBER,Y=NUHBER OF

01531
01533
0153"
01535
0153G
01537
01538
01539
01540
015"1
01542
01543
01544
0151t5
01546
01547
015"8
01549
01550
01551
01552
01553
01554
01555
01556
01557
01558
01559
01560
. 01561
01562
01563
0156"
01565
01566

PAGE

37

o
('
,-

COHOOl

PAG~

15G7 POG09 0001
1568 POGOA 0001

BSS

ass

38
,COUNTCU
CARRRU.

01567
01568
,~,

1~10

1572
1573
157 ..
1515
1516
1577

POGOB
POGOC
POoOO
POooe:
POoOF
POo10
151~ POol1
1579 P0612

OAFF
6C08
0806
5C29
1803
OC12
5C02
lCOO

SET

ENA
ST4·
SET
RTJ·
JHP.
ENQ
RT J'"
JHP·

........
P061l
POG1 ..
POG15
PD616
P0617
P0616
P06l9
P061A
P061a
POGIC
POGlO

DADO
6COO
CODE
Eoor
08 .. 6
5CIF
01603
oe120
5CC8
OAO ..
lCC5

1595
1597
1598
1599
IGOO
1601
1602
IG03

SECTION 24-SET TO ONES

SET2

1561
1583
1564
. 1565
1586
1567
1566
1589
1590
1591
1592
1593

••••••••
SETl

P061E
POG1.F
P0620
POG21
POG22
POG2l
POG2 ..

GCCG
082G
5C17
1803
OC12
5CCO
lCBE

60220200

CLR

ClRl

'

(ST60)
OP
OP+l
A,Q
CINTRZ'
CLR2
$12
(STP6)
CLRI-CLR
(END6)

••••••••

SECTION 26-j~ANSFER A TO A,Q

TRA

STA·
TRA
RTJ·

TRA2

ENQ
RTJ·
JHP·

.

Q=XY. X=ER~OR

(ST6at
A~Q

CINTRz)
TRA2
S12
(STPG)
'(ENOG)

c

01570

("
......

01572
' 01573
01571t
01575
01576
01577 .
NU"BER,Y=NUHBER O'F
01578
.. ··01579

.........

0

E~A

JH~·'

E

-0
(ST6tH
A,Q
' CINTRl), 0
'SET2
$12
(SfP6)
(END£,)

CLR2
ClRl

JHP· '

.,

".11,······.·

SECTION 25-CLEAR TO ZERO A,Q
ENA
STA·
LDAlOQCLR
RTJ·'
JHp·
ENQ
RTJ·

I

DATEI 10/20175

Q=XY, X=ERROR NUHBER,Y=NUHBER OF

....... ~

('
'-."

01581
01583
01584
01585
01586
01587
01588
01589
01590
" 01591
01592

c

~··01593

••••••••
OP IN°A.

Q=XY, X=ERROR. NUHBER ,Y:NUHBER OF

.....

01595

c

01597
01598
01599
01600
01601
01G02
01,603'

PAGE

38

u

o
o
o·

o
o
o

o

c
o
o
o

o

o
o
o

o

COHOOl

PAGE

P062e;
P0626
P06Z7
P062A
P0629
P06ZA
P06ZB
P062e
P06Z0

EOOE
084 ..

TRQ

.. caD

0616
5eOE
1803
OC12
5CB7
lCB5

TRQ2

••••••••

1617
1619 P062E
162.0 P062F
1621 P0630
·1622. P06l1
1623 P0632
1624 ·P063l
1625 P0634
1626 P06lS
1627 P06l6
1628P0637

B07C
TCA
6CJO
CODE
TCA?
0866
SC05
180l
OC12
5C36
TCAl
1Cl"
08EF,.P·INTRZ

1&30
1632
1633
1614
1635
1636
1631
1638
1639
1640

P0638
P063Q
P063A
P063a
P063C
P0630
P06lE
P06lF
P064D

B01e
6Cll
EOOE
08.56
5CFA
1803
OCi2
SC2C
lC2A

LOQCLR
STQ·
TRQ
RTJ·
.JHP•.
ENQ
RTJ·
JHp·

HFFFF
( ST10J
OP

EOR- .
STA·
LOQTCQ
RTJ·
JHP!,
ENQ
RTJ·
JM~

AnD ..

STA·
LOALOQAAQ

••••••••

OP_IN A.

A,a

CI NTRZ)
TCA3
$12
(STP7)
CENon
INTREG

Q=XY,X=ERROR NUKBER,T=NUHBER OF

OP IN A.

TCQ3

E

Q=XY, X=ERROR NUMBER ,Y=N'UfotBER OF

TCQ

800F
AAQ
6CZA
CODE
AAQ2
EOOF
0836" .

60220200

I.ST60)
A,Q
UNTRZ)
TRQ2 .....
$12
( STP6)
.. CEND6).

~

•••••••• SECTION
P06lt1
P0642
P06 .. 3
P0644
P06 .. 5

OP

SECTION 28-TRANSFER COMPlEHENT A fO A,Q
EORSTA·
lOATCA .
RTJ·
JHP·
ENQ
RTJ·
JHP·
ADC

01605

A

•••••••• SECTION 29-TRANSFER COMPLEMENT

TCQ2

16.. 2
1644
1645
1646
1647
'1648

OATEl 10/20115

•••••••• SECTION Z7-TRANSFER Q TO A,Q ••••••• ~

1605
1607
1608
1609
1610
1611
1612
1613
1614
1615

39

HFFFF
CST70J
OP
A,Q
(INTRZI
TCQl
S12
'STPn
'ENOl)

2A-TRANSFE~

'OP-+l
'ST701
OP
OP+1
A,Q

•

0'

•

o

TO A,Q

•••••••••

Q=XV, X=ERROR NUHBER,Y=NUHBER OF'

THE ARITHMETIC SUM OF A,Q TO A,Q ••••••••
OP IN A.

. 01607
01608
01609
01610
01611
01612
01613
01614
01615
01617
01619
01620
01621
01622
01623
0162 ..
01625
01626
01627
01628
.01630
01632
01633
0163 ..
01635
01636
01637
01638
01639
016,.0

016.. 2
01.6.... :
01645
016 .. 6
016lt7
016 .. 8

PAGE

39

"
C
."

"

-"'"
("---',

,

CI

COMOOl

PAGE

161t<1 P0646 5CF{I

1650
1651
1652
1653

P0647
P06lt6
P0649
P06ltA

1803
DC12
5C22
tC20

1655
1651
1658
165<1
1660
16Gl
16G2
1663
16G4
1665
16G6

PD64B
P06ltC
P06ltO
P06ltE
PDG4F
P0650
P0651
P0652
POG53
P0654

8DOF
6C20
CODE
EODF
0876
5CE6
1803
DC12
5C18
lC16

1670
1671
1672
1613
1674
1675
1676
1677.
1618
167<1

••••••••

SECTION 2B-TRANSFER EXCLUSIVE OR OF A,Q TO A,Q,········
(

01655

EAQ

EORSTA"
LOALOQEAQ
RTJ·
JHP·
ENQ'
RTJ·,
JHpW-

01657
01658
01659
01660
01661
01662
01663
01664
01665
01G6G

Q=XY, X=ERROR NUMBER, Y=NUHBER OF

ANDSTA·
LOALOOLAQ
RTJ·,
JMP·
ENQ
RTJ·
JHP·

CAQ
CAQ2

CAQJ

OP+l
eST10)
OP
OP+l
A,Q
CINTRl)
lAQ3
$12
CSTP1.
(ENOn

(

01649
01650
01651
,01652
01653

C
(~

"-.

OP INA.

LAQ

LAQ3

AOOF
B07C
6coa
CODE
EODF
08F6
SCOl
1803
OC12
5COl
teol

OP+l
eST10)
OP
OP+l
A,Q
eINTRz)
EAQ3
$12
(STP])
(EN07)

Q=XY t X=ERROR NUHBER,Y=NUHBER OF

SECTION 2C-TRANSFER LOGICAL PRODUCT OF A,Q TO A,Q

.........
P065F
P0660
POG61
P06G2
POGG3
POG64
P0665
P06GG
P0667
POGG8
P06G9

CINTRZ)
AAQ3
$12
(STP?)
(ENOn

••••••••
LAQ2

1661
1683
1684
1665
1666
1687
1688
1689
16<10
1691
1692
16q3

AAQ3

EAQ3

POG55 AOOF
PDG5G GC16
P0657 CODE
POG56 EOOF
P06SCJ 06BG
PD6SA.SCOC
P06SB 1803
P065C DCl2
P06S0 5COE
P06SE lCOC

•

OATEI, 10/20115

RTJ·
J..,p.
ENQ
RTJ·
JHp·

EAQ2

1668

40

••••••••

,,'

r"
I:
\'

..

"

f"
I

r---'"

01668

OP IN A.

Q=XY,X=ERROR NUHBER,Y=NUMBER OF

01G10
01671
01672
01613
01G7 ..
01615
01676
01677
01678
01679

(

~----

\'.

('
",-,.

r----'

i

SECTION 20-TRANSFER COMPlEHENT LOGICAL PRODUCT A,Q TO A,Q •••••

01681

ANOEORSTA·
LDALOQCAQ
RTJ·
JHP·
ENQ
RTJ·
JHp·

01683
0168 ..
01685
01686
01687
01G88
01689 '
01690
016<11
01692
01693

OP"l
HFFFF
(ST70)
OP
OP"l
A,Q
'CINTRZl '
CAQ3
U2
(STP7)
tENOn

01' IN A.

Q=XY,X=ERROR

NU"BER,Y=~U"BER

OF

,,-~,

C
('
;,--,
I.

('
,-,..
60220200

E

PAGE

40

C
~

l,

('
"

(J

o
o
o

Cor100 1

o
o

o
o
o
c)

o
o
o
o

o
o
o

169S
1696
1697
169a
1699

P066A
P06G9
P066C
POGGO
P06GE

0031
091C
OQ39
08C7
08CE

PAGE

P EN07
P STP1
P ST10
P ST71
P ST72

••••••••

1101
1703
1104
1705
170G
1707
1708
1709
1710
1711
1712
1713

P06GF
POG70
POG7!
P06l2
POG7]
P0674
P06l5
POG76
POG77
POG78
P0679

SCFO
OAFF
se33
0801
'5C30
1603
OC11
5CF4

SETM
SETHl

0~03

SETH2
SETH]

5CF5
lCFO

...........
•

1715
1716
1717
1718
1719
1720
1721
1722
1723
1724
172S
1726
1727
1728
1729

P067A
POG73
P067C
P0670
P067E
P067F
POG80
P066t
P0682

1731
1732
1733
1734
1735
1736
1737

P0663
POG84
P0665
P0666
P0667
POG88
POG8'3

•

TRAH

5CF2
SC29
0821
5C26
1803
OC11
5CEA
5CEC
lCE7

TRAH2

•
•
••••••••

SCE9
0621
OADO
SC1E
0641
SC19
1803

60220200

CLRM

CLRHt

E

AOC
AOC
AOC
AOC
AOC

SEcrro~

RTJ·
ENIl
RTJ·
SET
RTJ·
JHp·
ENO
RT J.
EtlA
RT J.
JHp·

OATEl 10/20ns

41

ENOSEC
SiOP
STORE
INtNT
ENINT

01G95
01696
01G97
I NH I NT, SA VE H REG
ENT INT, RESTORE H REG

2£-SET TO ONES-Ii ..........
(ST711
-0
(CHMSKl )
M
nNT~YJ

SETM2

111
(STP])
SETHi-SETH
(ST72)
(ENOn

SECTION 2F-TRANSFER A TO H
RTJ·
RTJ·
TRA
RTJ·
JHp·
ENO
RTJ·
RTJ\L
JHP·
SECTlrlN
RTJlf.
TRA
ENA
RTJ"
CLR
RTJ\L
JHP\L

(ST7U
(CHHSKU
H

30-CLEA~

",v-°01703
''''·01704
0110S
CHECK MASK REGISTER (STORE DATA)
01706
01707
01708
Q.=XV,X=ERROR truHI3ER,V=NUHBER, OF
01709
01710
01711
·~"'01112

v.o·01713

01115
01116
01717

. . . . . . . . tI>

V.v.~01718

X=E~ROR

~QV-0172S

·~~01126

TO ZERO-H •••••• w.v

(ST71)
0
(CHHSKU
(!NTRY)
CLRH2

v-·V.01719
01720
01721
01722
01723
NUHBER,V=NUHBER OF
01724

CK MASK REGISTER, STORE DATA

Q=XV t

H

H

"'·"'01699

01101

nNT~,()

TRAH2
$11
(STP])
( Si72)
(EN07)

~V-V.01698

01727
01728
01129

.00.01131
V."''''01732
01733
01734
CHECK tUSK REGI STER (STORE DATA)
01135
01736
01737

PAGE

41

c
(

COH001
1738
1739
1740
1741

P068A
P068l]
P068C
P068D

PAGE

OC1t
5COF
5CE1
lCOC

...........

1745
1746
.1747
174e
1749
1750
1751
1752
1753
1754

PD68E
PD68F
PQ690
POG91
P0692
P0693
P0694
P0695
P06'96
P0697

TRQH

5COE
5Ct5
082~

0811
5Cl1
1803
OClt
SC05
5C07
lC02

TRQH2

...........

1756
,1758
1759
1760
1761
1762
1763
1764
1765
1766
1767
1768
1769
1770

POG9S
POGqq
POG9A
P0699
P069C
POG9D
POG9E
POG9F
POGAO
POGAl
P06A2
P06A3
POGAlt

SCOlt
TCAM
B07e
.5C,OA
CODE,
TCAH2
0861
5C06
1803
'OCU
5CCA
TCAH]
SCCC
lCC7
06FB P INTRY
0902 P CHHSK1

.........

1772
1774
1775
1776
1711
1778
1779
1780

POGA5
POGA&
POGA7
POGA8
POGA9
POGAA
P06AB

TeaH

5CC7
B07C
5CFC
EOOE
0851
5CF8
1803

60220200

TCQM2

Q=XY,X=ERROR NUHBER,Y=NUHBER OF

SECTION 31-TRANSFER Q TO H·.· .......
RTJ"
RT.J"
TRA
TRQ
RT.J·
.JMP·
ENO'
RT.J·
RTJ"
JHP·

(ST7H
(CHHSK11
Q

RT.J·
EORRTJ·
LOATCA'
RTJ"
JHp·
ENQ
RTJ·
RT.J"
JHP"
ADC'

ADC'

RTJ·
EORRT.J 4

CINTRYJ
TRQH2
$11
(STP7)
(ST72)
(ENOT)

(ST71)
HFFFF
(CHHSKU
OP
M
(tNTRY)
TCAH3
$11
(STP7)
(ST72)
(EN07)
INTM
CHMSK

LOQ-

(ST71)
HFFFF
(CHHSKU
OP
H

CINTRYl
TCQH3

017.. 3

···01745
···017.. 6
01747
017.. 8
01749
01750
Q=XY,X=ERROR NUHBER,Y=NUMBER OF
01751
01752
···01753
···0175lt

H

SECTIO"f 3J-fRANSFER

. 01738
ft1739
···01740
···017 .. 1

CK M REG, STORE DATA

SECTION 32-TRA NSFER COMPLEMENT A TO H •• • .......

Tca
RTJ·
JMP·

E

DATn 10/20'75
$11
(STP7)
(ST72.
(EN07)

CLRH2

1743

42

01756

···01758
.. ··01759
CHECK MASK REGISTER (STORE DATA)
01760
01761
01762
01763
01764
Q=XY, X=~RROR NUHBER,Y=NUHBER OF
01765
0176G
···01767
···01768
01769
01770
CO~PLE"ENT

Q TO H .........

c

01772

..··0177 ..
···01775
CHECK MASK REGISTER (STORE DATA)
0177G
01171
01778
01779
01780

PAGE

42

c

u

COHOOl

('I
"- /

o
"'I
( '/

PAGE

1781 POGAC OCl1
1782 POGALl 5CBD
1783 P06AE 5CBF
17114 POGAF lCIlA

'TCQHl

...........

17n6
1788
1769
1790
1791
1792
1793
1794
1795
1796
1797,

POGBO
POGBl
POGB2
POGB3
POGB4
P06B5
P06B6
POGB7
POtiB8
POE»B9
POG'BA
1798 POGSS
1799 POGeC

AAQH

5CBC
80DF
SCFI
CODE
EOOF
0831
SCEC
1804
OCll
SCOO
FFBO
5CB2
ICAD

AAOH3

o

o
o
0,

POGBD
POtiSE
POGBF
POGCO
POGel
POGC2
POGC3
POGC4
POGC5
POGCG
POtiC7
POGC8

5CAF
BODF
5CEt.
CODE
EODF,
0871
5CDF
1803
OCtl
5C43
SCA6
lCAl

POGC9
P06CA
POGC9
POGCC
POGCD
1823 POGCE
1824 P06CF

fAa

RTJ·
JMp·
ENQ
RTJ·

RTJ·

EAQH3

JHp·

LAQH2

E

Sl1

(STP7)
(ST72)
(END7)

Q= XV, X=ERROR NUHBER, Y=NUHBER OF

0178G

SAVE H, lIN
1iiI··01788
OP IN A
···01789
CHECK MASK REGISTER (STORE DATA)
01190
01791
01792
01793 .
0119 ..
01795
0119G
Q=XV,X=ERROR NUMBER, Y=NUHBER OF
01197

(S172)
(ENDll

RESTORE H. fIN

(ST71l
OP+l
(CHHSKU
OP
OP+l
H
nNTRY)
EAQM3
$11

(STP8)
(ST72)
(ENDn

~··01798

···01799
A~Q.TO

H ..........

(ST711
OP+l
(CHHSKU
OP
OP"l
H
UNTRY)

01B01

SAVE H
OP IN A
CHECK MASK REGISTER

Q=XV, X=~RROR
RESTORE t:t

•• .. 01803
...... 0160 ..
(STO~E DATA)
01805
0180G
01807
01808
01609
011110
NUMBfR,V=NUHBER OF
01611
01812
.... ".01813
•• .. 01814

SECTION l6-TRANSFER LOGICAL PRODUCT OF A,Q TO H ..........
RTJ·
ANDRTJ·
LOALOQLAQ
RTJ·

01781
01782
.. • .. 01783
···01784

(ST7U
OP+l
(CHHSK1l.
OP
OP+1
H
UNTRY)
AAQH'l
$11
(STP7J

SECTION 35-TRANSFER EXCLUSIVE OR
RTJ"
EORRTJ·
LOALOQ-

EAQH2

LAOH

5CAl
AOOF
SCD8
CODE
EOOF
08Bl
SCDl

60220200

()

EAQH

...........

1816
1818
1819
1620
1821
1822

RTJ·
JHp·

.........

DATEI 10/20/75

SECTION 31t-TRANSFER. ARITHMETIC SUH A,Q TO H·· ........ ••
RTJ"
ADDRTJ·
LOALOQAAQ
RTJ"
JHP·
ENO .
RTJ

AAQH2

1801
1803
1804
1805
180G
1807
1808
1809
1810
1611
1812
1813
131"4

ENQ
RTJ"
RTJ'"
JHP"

43

01816

SAVE H
•• .. 01818
...... 01819
OP IN A
01820
CHECK HASK REGISTER (STORE DATA)
01821
01822
01823
0162 ..

PAGE

43

(-(------1,'-...,,/

('
"----, I

/,---..

r
PAGE

C.9,t;' 0 0 1

,.,4

..

DATEI 10/20115
r"

1825
1626
1827
1828
1829

POGDO
P060t
PO'6D2
'P06DJ
P06D4

1803

JMP·
ENO
RTJ"
RTJ·
JMp·

OClt

5C37
5C9A
te3,.,

LAOM]

••••••••

1831

LAOH3

01825
Q=XY,X=ERROR NUHBER,Y=NUI1BER OF
0182G
01821
···01828
···01829

-,

'.

$1t

(STP8)
(ST12)
(ENDS)

Sf-CTION 37-TRANSFER COMPLEHENT LOGICAL PRODUCT A,a TO

H ,. . . . . . . .

r',

I

01831

, ..

~

\,.
1833
1834
1835
1836
1837
1838
1839
18,.,0
18,.,1
18,.,2
18,.,3
18,.,4
1845

P0605
POGD6
P060r
P060S
P0609
POGDA
POGOS
P06DC
POGOO
P060E
P06DF
P06ED
P06El

CAQH

SC97
AODF
B07C

EO~-

scca

CAQH2

CODE
EOOF
08Fl
SCCt;
1803
OC11
5C2A
5C8D
lC27

CAOHl

.........

181+7
18,.,9 P06E2 5C8A
1850 P06E3 SC5A
1851 POGE .... 0821
1852 POGE5 5C5A
1853 POnE6 OSOF
1854 POGE7 5C55
1855 POGE8 1803
1856 POnE9 DCl2
1857 POGEA 5CIF
1658 POGE'3 SCa2
1859P06EC tele

TRH

P06EO
pOGEE
.,06EF
P06FO
P06Fl
POGF2
P06F3

SAVE H
OP IN A

···01833
···0183 ..
01835
CHECK HASK REGISTER (STORE DATA)
01836
01837
01838
01839
01840
018 .. 1
Q=XY, X=ERRO R NUHBER,Y=NUI1BER OF
018 .. 2
018 .. 3
RESTORE M
···018 ....
···018 .. 5

RTJ·
JHP·
ENQ
RTJ·
RTJ·
JHp·

(ST71)
(OHI1SI(2)
H
(STO)
A,O,H
flAOH,
TRH2
$12
( STP8)
(ST72)
(E..,D8.

••••••••

STORE DATA

Q=XY, X=P~ROR
R.ESTORE H

SECTION 39-TRANSFER Q+H TO A,O,H ••••••••

TRB

RTJ·
RTJ·
RTJ·
RTJ·
LOATRA
LOO-

(STP81)
(CHHSK2)
(ORl)
(SlD)
OP
H

OP+l

r'
\..

"-.

STORE DATA

···018 .. 9
···01850
01851
01852
01853
01854
01855
NUMBER, Y=NUHBER OF
01856
01857
••.. 01858
•• .. 01859

01861
···01863
···01864
01865
01866
01867
01868
01869

PAGE

;'

,.

~,

018 .. 7

SAVE H
CK H REG, DATA HOT STORED

~

;'-----I

SAVE H
CK M REG, DATA NOT STORED

••••••••

TRB2

E

(ST71l
OP"l
HFFFF
CCHMSKU
OP
OP"1
H
CINTRYJ
CAQHJ
!11
(StP8)
(ST72'
(ENDS)

SECTION l8-TRANSFF.R H TO A,Q,H

RTJ·
RTJ·
TRA
RTJ·

TRH2

5C10
SC,.,F
SCSi
5C4F
CODE
0821
EOOF

602Z0200

RTJ"
LOALOOCAQ
RTJ·
JMP·
ENQ
RTJ·
RTJ·
JHP·

TRH

1861
1863
186 ..
18G5
1866
1867
1868
1869

RfJ"
ANO-

(,\'"

.....

(J

o

o
o
o
o

o
I'
L
o
o
o

o
o·

COHOOl
1870
1811
1872
1873
1874
1875
187&

POGF4
POGF5
POGFG
rOGF7
POGFS
POGF9
POGFA

081F
5Clt7
1803
OC12
5CU
5C12
lCOE

••••••••

1880
1881
1882
1883
1884
1885
188&
1887
1688
1889
1690
1891
1892

POoF9
PO&FC
P06FO
PO&FE
PO&FF
P0100
P0101
P0702
P0103
POTOlt
P0705
P070&
P0707

5COF
5Cltl
B07C
5C41
CODE
0821
084F
5C3A
1803
OC12
SC04
SC05
lCOl

1894
1095
1890
1897

P0108
P0709
P070A
P010El

0031
.091C
OBC7.
OSCE

(j

TeH

TCH2

rCM3

P
P
P
P

Aoe

END8
STP6
STP81
STP62

P070C
P0700
P070E
P070F
P0110
P0111
P071Z
P071J.
P0114
P0715
P071G
P0717
P0716

TCB

5CFO
SCll
CODE
5Cll
B07C
SC2E
EOOE
COOF
0821
08SF
5C2G
1803
oe12

TCBl

TeB2

E

OATEI 10/20 f75

45
A,Q,H
UAQH)
TRBJ
$12
(STP8)
(STP82)
(ENOS)

01810
01811
01812
Q=XY,X=ERROR NUHBER ,Y=NU"'~E R OF
01873
01814
RESTORE Ii
···01875
•• .. 0187&

SECTION 3A-TRANSFER COMPLEMENT " TO A,Q,H ••••••••

RTJ·
RTJ·
EORRTJ·
LOATRA
TCH
RTJ·
JMp·
ENQ
RTJ·
RTJ·
J!1p.

AOC
AOC
A'OC

.........

18CJ9
1901
1902
1903
1904
1905
190G
1907
1906
1909
1910
1911
1912
1913

fRB
RTJ·
JliP·
ENQ RTJ·
RTJ·
JHp·

TRB3

1818

00220230

o
o

PAGE

(STP8U
(CHHSK2)
HFFFF
(STD)
OP

SAVE M
CK H 0
STORE DATA

H

A,Q,M
CIAQM)
TeH3
$12
(STPe)
(STP82'
(EN08)
ENOSEC
STOP
ININT
ENINT

Q=XT,X=ERROR
RESTORE H

SAVE Ii REG., INHIBIT INTERRUPTS
RESTORE " REG, ENABLE INTERRUPTS

SECTION 3B-TRANSFE R COMPLEMENT Q+H TO A,Q,H

P.T J.
RTJ·
LOARTJ·
EORRTJ·
LOQLOATRA
TCB
RTJ·
JMP·
ENQ

(STP81)
(CHHSK3)
OP
(OR1)
HFFFF
(STO)
OP
OP+1
t1

A,Q,H
nAQM)
TeB3
$12

~UHBER,Y=NUHBER

•••••••••

01878
···01880
···01881
01882
01883
OUt8,.
01885
0188&
01887
01886
OF
01889
01890
···01891
···01892
0189,.
01895
.·n·0169&
.. ··01897

018CJ9

···OlCJOl
... • .. 01902
01903
01904
01905
STORE DATA
0190&
01907
01908
01909·
01910
01911
01912
Q=XT,X=ERROR NUHBER,Y=NUHBER OF
01913

CK H .REGISTER SIZE

PAGE

45

("

,

(

"

r--..

' '-.....-

CI
r"

(
\,

~

COHOOl

PAGE

fto

..

DATEI 10/20115

(--.,
1914
1915
1916
1917

P071t)
P071A
P071J
P071C
P0710

5CEF
5CF'0
TCB3
lCEC
1400
0032 P

RT J.
RTJ·
JHp·
JHP.

(STP8t
(STP82)
(ENDe)
SPCEND

01914
···01915
···01916
01t)17

RESTORE H REG

1921
1922
1923
1924
1925
1926
1927
1928
1929
1930
It)31
1932
1933
1934

P071E
P071F
P0720
P0721
P0722
P0723
P0724
P0725
P0726
P0727
P072S
P072Q
P072A
P072,]

5CEB
SClE

••••••••

SECTION 3C-TRANSFE'R ARITHMETIC SUM A,H TO A,Q,M

AAH

RTJ·
RTJ·
ADORT J.
lDATRA
lDAAAH
RTJ"
JHP·
ENQ
RTJ·
RTJ"
JHp·

81)OF

5CIE
CODE
0821
eOOF
062F
5Ct6
1803
OC12
5COF
5CEO
lCDC

AAH2

AAHJ

f'

,_..

\

,
1919

\

(SlP6U
(CHM~K2)

OP+l
(STD)
OP
H
OP+l
A,Q,H
CIAQH)
AAH3
$12
(STP6t
(STPR2)
(END S)

..........

f"
\

\...,

01919

r"

SAVE M
CK H REG, DATA NOT STORED
STORE DATA

Q=Xy,X=E'~JJOR

RESTORE "

···01921
···01922
01923
0192 ..
01925
01926
01927
01928
01929
01t)30
NUMBER t Y= NUMBER OF
01931
01932
···01933
···0193"

I

'",--,

~,

r"

\ .....

••••••••

1936
1938
1939
1940
1941
191t2
.t9ft3
1944
1945
19ft6
191t7
1948
1949
1950
1951
1952
1953
1954
1955
1956
1957
1958

P072C
P0720
P072E
P072F
P0730
P0731
P0732
P0733
P0734
P073S
P07l6
P0737
P07lA
P0739
P073A
P07lfl
P07le
P07l0
P073E
P073F
P0740

SECTION lD-TRANSFER ARITHMETIC SUH A,Q.H TO A,Q," ••••••••

5COO
AAB
RTJ·
5CI0
RTJ·
RTJ·
5C12
80EO
AOO5COF
RTJ"
CODE
AAB2
LOATRA
0821
EOOF
LOQCOED
lOAAAB
063F
5C06
RTJ"
JHp·
1803
nC12
ENQ
5CCF
RTJ·
AIlS3
SCOO
RTJ·
lCCC
JHP·
0806 f) IAQH
Aoe
Aoe
0909 P CHHSK2
OCJOE P CHHSKl
AOC
Aoe
0915 P STO
08E7 P ORl
AOC

60220200

E '

01936
(

(STP6!)
(CHMSK2'
(ORU
OP+2
(STD)
OP

"

OPt1
OP+2
A,Il,H
(IAQH)
AAB3
$12
(STP8)
(STP82)
(ENOS)
INAQH
CHHSKA
CHHSKB
STOATA
O~

\.

SAVE
CK H REG, DATA NOT STORED

···01938
···01939
019 .. 0
0191t1
STORE D~TA
019 .. 2
019 .. 3
019....
019 .. 5
01946
01947
019.. 8
019 .. 9
Q=Xy,X=ERROR NUHBER,Y=NUHBER OF
01950
01951
···01952
RESTORE "
···01953
0195 ..
01955
···01956
01957
01958

"

PAGE

\,

,_....

c
(

46

c.

c

()

o

COH001

o

1960
1962
1963
19&4
1965
1966
1967
19G8
19G9
1910
1971
1972
1973
1974
1975

,,.---..,

(

PAGE

\

"'-J'

P0741
PQ742
P07lt3
P0744
P0745
P0140
P0747
P0746
P0149
P074A
P07ltB
P074e
P07ltO
P074E

5CC8
5CFA
BODF
5CFA
COOE
0621
COOF.
OR6F
SCF2
1803
OC12

••••••••

SECTION 3E-TRANSFER EXCLUSIVE OR A.M fO A.Q,H .........

EAH

RTJ"
RTJ"
EORRTJ"
LOA-

EAH2

. EAM3

(STP8!)
(~HHSK2)

OP+1
(STDJ
OP

T~A

H

LOA-

OPi:l
A,Q,11
UAQH)
EAH3
t12
(STP8)
(STP8Z)
(EN08)

EAM

SCBC

SCaD
1ca9

47

RTJ·
JHp·
ENQ
RTJ·
RTJ'"
JHp· '

01960

.. ··01962
···01963
01964
. STORE DATA
01965
01966
01961
01968
01969
01970
01971
01972
Q=XY,X=ERROR NUHBER,Y=NUHBER OF
01973
RESTORE Ii
···01974
···01975

SAVE H
CK H REG, DATA NOT STORED

o
C"

o
o.

o
'~
(

I

60220200

,E

PAGE

47

/"'--"

(
'

.. "

,I

(~

1,_",

C

'-.-.-

(--,

/0

CDH001

oJ

•••••••• SECTION 3F-.TRANSFER EXCLUSIVE OR A.Q+" TO A,o(), H ••••••••

1977

°

1979
1960
11361
11382
1983
1984
1985
11386
1981
1968
1969
1990
1991
1992
1993
199,.

P074F
P0750
P0751
P07S2
P07S3
P075 ..
P07S5
P075&
P07S7
P0758
P0759
P07SA
P075e
P075e
P07S0
P07SE

5CBA
5CEC
SCEE
BOEO
5CEB
CODE
0821
EODF
COEO
087F
SCE2
1803
OC12
5C42
SCAD
1CA9

EAEI

RTJtfo
RTJtfo
RT J"
RT J.
LOA-

(STP"U
(CHHSK2'
fORt)
OP+2
(STD)
OP

TR~

H

EO~­

EAB2

EAB3

LoaLOA.EAG
RT J.
JHP"
ENQ
PTJ"
RTJ"
JHp··

OP+l
OP+2
A,Q,M
(tAQM)
EAB3
!12
(STP9l
ISTP82)
(ENDS)

(

01977

SAVE H
CK H REG, DATA NOT STORED

(

···01979
···01980
01981
01982
STORE DATA
01983
01984
01985
01986
01987
01988
••.. 01989
01990
Q=XY,X=ERROR NU"BER,Y=HUHBER OF
01991
01992
RESTORE H,
···01993
···0199 ..

\ ...
r'"

!

\ ......

'

i-'"
I

,"',-

..

""

/'
l

" .

(r-'

199G
.1998
1999
2000
2001
2002
2003
2004
2005
2006
2007
. 2008
2009
2010
2011

P075F 5CAA
P07GO SCOC
P07Gl AODF
P07G2 5COC
P07G3·CQOE
P0764 0821.
PU76S COOF
P07GG OSAF
P0767 SCD4
PU7Ga 1803
P0769 OCl2
P076A 5C9E
P076S 5C9F
P076e lC9S

60220200

E

••••••••

SECTION itO-TRANSFER LOGICAL PRODUC T A,H TO A,Q,H

LAM

RTJ"
RTJ"
ANT)RTJ"
LOATRA
LDALAM
RTJ"
JHp·
ENQ
RTJ·
RTJ·
JHp·

LAH2

LAf43

(STP6U
(CHHSK2)
OP+l
(STD)
DP
H
OP+l
A,Q,H
(lAQM)
LAH3
tt2
(STP8)
(STP82'
(ENOR)

••••••••

019136

SAVE. H
CK H REG, DATA NOT STORED

••.. 01998
···01999
02000
STORE DATA
02001
02002
02003
02004
02005
02006
0200r
Q=XY, X= ERRO R NUHBER,Y=NUHBER OF
02008
02009
RE_STDRE
····02010
• .. ·02011

(
/

~

\
\,. -

..

. 'PAGE

48

c-

(
(

\
I

,,-_./

o

PAGE

COHOOI

ft9

DAT EI 1 0/20.175

•••••••• SECTION 41-.TRANSFER LOGICAL PRODUCT 4, Q"H TO, A.Q,H ••••••••
2015
2016
2017
2018
2019
2020
2021
2022
2023
2024
2025
,2026
2027
2028

P076D
P076E
P076F
P0770.
P0771
P0172
P071J
P077,.
P077S
P07l6
P07l7
P017S
P07l9
P077A

~--.-~ .2Q291l.077~,'"

c
o

2030

~077C

5C9C
LAB
5CeE
SCDD
AOEO
5CCD
CODE
LAB?
0821
EODF
COED
OSBF
5CC..
1803
OC12
5C24
5CtlF.-:,.,:LAB3 ,. : , . .

te88

••••••••

--2032
203ft
2035
2036
_..2.037
2038
2039
20ftO
20ft1
2042
2043
2044
20ft'S
2046
Z047
2048

P0170 t;cac
POllE SCBE
POllF· AODF
P0780B07C
P011H ·5ceD
P0782 CODE,
P07S3 0821
P0184 CODF
P0185 08~F
PO 786 SCB5
P07S7 1803
P0766 DC12
PD789 5C1S
P078A 5C80
P078B lelft

CAM

CAH2

CAH3

RTJ·
RTJ"
Rf J.
ANDRTJ·
LOATRA
LDQLDALAB
RTJ·
JMPf
ENQ
RTJ·
RtJ· .
JHp-Wo "

(Sl'P81)
(CHHSI(2)
fORt)
OP.2
(STDl
OP
t1

OP+l
OP+2
A,Q,H
UAQH)
LAB3
$12
(STP9J
(STP82)
lENDS-I'

SAVE H
CI( H REG, DATA NOT STOREO

···02015
···02016
02017
02018
02019
STORE DATA
02020
02021
02022
02023
02024
···02025
02026
Q=XY.X=ERROR NUHBER,Y=NUMBER OF
02027
02028···02029
···02030

SECTION 42-TRANSFERCOHPLEHENT LOGICAL PRODUCT ,A ,M TO A,Q,H •••

RTJ·
RTJ·
ANDEORRTJ·
LOATRA
LOACAM
RTJ"
JHp·
ENQ
RTJ"
RTJ·
JHp·

(STPBU
(CHHSI(2)
OP+l
HFFFF
(STD)
OP
H
OP+l
A,Q,"
CIAQM)
CAM3'
$12
(STP9)
( STP82)
(END9)

02013

02032

···02034
···02035
02036
02037
02038
STORE DATA
02039
020,.0
020 .. 1
020,.Z
···020"3
020ft ..
020,.5
Q=XY,X:ERROR NUHBER,Y=NUHBER OF
020ft6
RESTORE Ii
···020"7
.. ··020 .. 8

SAVE H
Cl( H REG, DATA NOT STORED

C)

o
0,
60220200

o

E

PAGE

49

".-~

COHOOl

PAGE

50

.."

OATEI 10/20/75
(~.

2050
2052
2053
2054
2055
2056
2051
205e
2059
2060
2061
2062
2063
2064
2065
2066
2067
2068
2069

P078C
P07.S0
P018E
P018F
"0190
P0791
P0792
P079J
P07Q4
P019S
P0796
P0797
P079a
P0799
P079A
P07.9B
P079C
P0790

2071
2072
2013
2074
2015
2076

P079E 091C
P079F 0031
P01M .08AO
P07Al 08C7
P07A2 OftCE
P07A3' 088F

5C15
5CaO
CODE
5ceo

••••••••

SECTION

CAR

RTJ·
RTJ·
LOARTJ·
ANnEORRTJ·
LDATRA
LIJQLDA-

CABl

ADEO

B07C
5CAC
CODF
0821
EOOE
COED
08FF
5CA3
1803
DCl2
5C03
5CC6
'IC02

CAB2

p

STP9
P EN09
P STP92
P STP9J
P STPQ4
P STP9,

(STP9])
(CHHSK3)
OP

COHP,LEMENT LOGICAt PRODUCT A,Q+H TO A,Q,M •

H

ADC
AOC
Aoe
Anc
Anc
AOC

STOP
E'NOSEC
ADERCT
ININT
ENINT
AORERR

,~

···02052
···02053
02054
···02055
02056
02057
STORE DATA
0205&
02059
02060
02061
02062
02063
• .. ·02064
02065
Q=XY,X=ERRDR NUMBER ,f=NUH BE R OF
02066
02067
···02068
... ··02069

(0~1'

RTJ·
JHp·
ENQ'
PTJ·
RTJ·
JHp·

02050

SAVE H
CK H REG 'SIZE

OP+2
HFFFF
(STO)
OP+1
DP
OP+2
A,Q,M
UAQHt
CABl
112
(STP9)
CSTP94)
CEN.09'

CAB

CA03

43-T~ANSFF.R

~

I

\ , ..

r
".

(-'
"-

",-

(
\

"'- .

(

02071
···02072
···02073
···02074
···02075
···02076

"'.

"-

,,
/
"

•••••••

2078

SE~TION

44- ADDRESSING CHECKING

• .. ·02078
(

\,
'10 ...

2080
2081
2082
2083
20S4
2085
2066
2087
2088
2069
2090

PD7A4
P07A5
P07A6
P07A7
P07AS
P07A9
P07AA
P07AS
P07AC
P07AO
P07AE
P07AF
P01BD

oeoo

AOR
T86

0844
6CF9
OAOl
60FE
6400
OUFE
6400
OOFE
COFE
09FE
0101
5CF2

NOP
CLR
STAy.
ENA
STASTA+

1-1
1-1

···02080
···02081
···02082
···02083
···02084
···02085

STA

1-1

···02086

\

LOAINA
SAZ
RTJWo

1-1

-1

···02087
···02"88
···02089
.. ··02090

I

0
A
(SfP92'

ADDRESSING CHECK
ZE~O

ERROR COUNTER

1

1

(STP9S'

NO ADDRESS. D NON-ZERO FAILED.

"

('
".. .--'
.

("
~
"

('
60220200

E

PAGE

...

50
(-~.

'-'
(~.

' .. -

C"

(j

o
o

o

o
o
o·
o·

(

PAGE

COHOOl
2091 P07Bl DCEE
2092 P07B2 COOO
P07Bl 0050
2093 P07B4 D9AF
2094 P07BS 0101
2095 P07Be; SCEC
2096 P07B7 OCE8
2097 P07BS C4FE
2098 P07SQ 9001
2099 P07BA 0101
2100 P07BB 5CE7
2101 P07BC DCE3
2102 P07BO CltOO
P07BE OOFE
2103 P07BF 09FE
2104 P07CO 0101
2105 P07C! SCE1
2106 P07Cl. DCOO
2107 P07C3 OC04
2108 POtC4 C2FA
2109 P07CS 09FE
2110 P07CI) 0101
2111 P07C7 SCOB
2112 P07CS DCD7
2113 P07C9 OCOS
2114 P07CA C200
P07Ca 0002
2115 P07CC 09F8
2116 P07CO 0101
2117 P07CE SCD4
2118 P07CF·DCDO
2119 P0700 DA04.
2120 P0701 60FF
2121 P070l C1FA
2122 P0703 09FE
2123 P0704 0101
2124 P070S sceo
2125 P070!) OCC9
2126 P0707 DADS
2127 P070S 60FF
2128 P0709 ClOD
P070A 0002
2129 P070S 09F8
2130 P070C 0101
2131 P0700 SCCS
2132 P07DE OCCl
2133 P07DF ceoo
P07EO 0033
2134 P07E! 090F
213S P01E-2 0101
2136 P07El SCBF
2137 P07E4 DCBB
2138 P07ES OC03

60220200

E

T61

RAO·
LOA
IN4
SAZ

RTJ·
T88

RAO·
L04SUB-SAZ

RTJ·
T89

T90

.T92

1

(STP9S)
(STP92)
13

(STP95)
(STP92)

1

1-5,1
-1
1
(STP95)
(STP92)
5 ,

STA~

I

=XDATA6-0ATA4,!

INA
SAZ

1

RAO·
ENQ

Q INOEX, 0 > 0 FAILEO
UPDATE ERROR COUNT

4
I

LOA

RTJ"

Q INOEX, 0 NOT> 0 FAILED
UPDATE ERROR COUNT

=XOATA6-0ATA4,Q

RTJ·

RAO·
LOA

INDIRECT, 0 > 0 FAILEO
UPOATE ERROR COUNT

1-5,Q
-1

-7

RAO·
ENA

INOIRECT, 0 NOT> 0 FAIlEO
UPDATE ERROR COUNT

4

INA
SAZ
RAO·
ENA
STALOAINA
SAZ

NO ADORESS, 0=0 FAILED.
UPDATE ERROR COUNT

'11

(STP9S)
(STP92)

RAO·
ENQ
LOA

·~·02091

••... 02092

CI-1 ,

RTJ·

INA
SAZ
T9S

1
(STP9S1
(STP92)

-1
1

RAO·
ENQ
LOAINA
SAZ

UPDATE £RROR COUNT

-,so

INA
SAZ

RTJ·
T94

(STP92)

=·N~50

CSTP9S)
(STP92J·
1-1

RTJ·
T9J

OATEI 10/20175

RAO·
LDA+

RTJ·
T91

51

I INOEX, 0 NOT
UPDATE ERROR COUNT

~

0 FAILED

-7
(STP9S)
(STP92)
(OAlAO 0)
-$20
1
(STP9S)
(STP92)
3

I INOEX, 0 > 0 FAILED
UPDATE ERROR COUNT
OATA 2

REL,INOR, 0 > 0 FAILED
UPDATE ERROR COUNT

···02093
···02094
···02095
•• ... 02096
···02091
••... 02098
... ··02099
···02100
•• ... 02101
···02102
• ... ·02103
···02104
• •• 0210 S
• .. ·02106
... • ... 02107
···02108
···02109
···02110
···02111
···02112
···02113
···0211"
···02115
···02116
··-·02111
···02118
···02119
•• .. 02120
···02121
···02122
···02123
···02124
···02125
···02126
···02121
···02128
···02129
···02130
···02131
···02132
••... 02133
···0213 ..
···0213S
···02136
···02131
• .. ·02138

PAGE

51

,/'"

(,

COHOOl
2139
2140
2141
2142
2143
21ft4

2145
2146
2147
2148
2149
2150
2151
2152
2153
2154
2155
2156
2157
2158
2159
2160
2161.
2162
2163
2164
2165
2166
2167
2168
2169
2170
2171
2172
2173
2174
2175
2176
2177
2178
2179
2180

PA:iE

P07E6 C6FE
P01E7 900ft
P07E8 0101
P07E9 5CB9
P07EA DCB5
P07ES OC03
T96
P07EC C&OO
P07EO 0815 P
P01EE 09AF
P07EF 0101
P07FO 5C82
P07Fl DCAE
P07F2 OC03 , T97
P07F3 OAOI
P07F4 GOFF
P07F5 C3FA
P01F6 09FE
P07F7 0101
P07F8 5CAA
P07F9 DCA6
P07FA oe02
T98
P07FB OA03
P01FC 60FF
P07FO C300
P07FE 0002
P07FF 09F8
P0800 0101
P0801 5CAl
P0802 OC90
P0803 0405
T99
P080 ... 60FF
P0805 C90E
P0806 09AF
P0807 0101
P080a 5C9A
P080t) OC96
P080A OA04
TI00
P080B 60FF
P080e C900
P0800 0006
P080E 098F
P080F., 0101
P0810 5C92
P0811 De8E
POR12 1809

LDA-

sue-

SAZ
RTJf.
RAO·
ENQ
LOA+

INA
SAZ
RTJ"
RAO·
,ENfl
ENA
STALOAINA
SAZ·
RTJ"
RAO·
ENQ
EN"
STALOA

52

DATEI 10/20/75
(I-U ,Q

s;.

1
CSTP(5)
(STP92)
3'

OATA20,Q
-$50
1

(STP9S)
CSTP92) .

I NO R, Q I NO EX ,
UPDATE ERROR COUNT

3

1
I
I-5,B
-1
1
(STP95)
(STP92)
2
3
I

=XDATA6-DATA4,B

INA
SAZ
RTJ·
RAO·
ENA
STALOA"
INA
SAZ
RTJ"
RAO·
ENA
STALOA

OATAOO.!
-$50

INA
SAZ
RTJ·
RAOf.
JIiP"

-$40
1
(STP95)
(STP92)
TI01

-7
1
(STP95)
(STP92)
5

I AND Q INDEX,
UPDATE £RROR COUNT

",----,

!

r-"

···021 .. 6
···02147
0:> 0 FAILED
···0214"
···02149
···02150
···02151
···02152
···02153
···02154
···02155
D NOT> 0 FA ILED ···02156
···02157
···02158
···02159
···02160
···02161

I AND Q INDEX, D :> 0 FAILED
UPDATE ERROR COUNT

I

1

(STP95.
(STP92)
4
I
DATAOO,I

(

·"·02139
···02140
···02141
INDR. Q INDEX, o NOT :> 0 FAILED •• .. 02142
UPDATE ERROR COUNT
···02143
···021 .. 4
···021 .. 5

REL, I INOE X, 0 NOT > 0 FAILED
UPDATE ERRO~ COUNT

I
\,

,/'-"

I

'.

('
"

""--"

···02162
···02163
···02164
···02165
···02166
···02167
···02168'
···02169
···02170
···02171
···02172
···02173
···02174
···02115

\

(.-.,
' ..... _ • •

r-'

(

"

REL, I INDEX, 0=0 FAILEO.
UPDATE £RROR COUNT

,.J

···02176
···02177
···02118
···02179
···02180

.

(~
"-

("
\.

2182 P0813 0815 P OATAOO
2183 POSllt FFFF
OATAto
21B4 P0815 0020
DATA20

ADC
NUH
NUH

OATA20
-0
$20

···02182
···02183
···0211J4

(
\.

("

,'.

60220200

E

PAGE

52

' .....

("
"'_..

(r-~,

--/

(

o

COHOOl

PAGE

DATEI 10'20'75

53

2185
2186
2187
2188
2169

P0610
P0817
P081S
P081Q
P08tA

0030
0040
0050
00&0
0819 P

DATA30
DATAr..
OATA5
DATAG
DATA7

NUH
HUH
NUM
NUM
AOC

'30
$40
$50
$60

2191
2192
2193
2194
2195
2196
2197
2198
2199
2200

P081a
POSle
P081D
P081E
P081F
P0820
P0821
P0822
P08,23
P0824
P0825
P0826
P0627
P0828
P0829
P082A
P08lS
POB2C
POB2D
P082E
P082F
P0830
P0831
P0632
1'0833
P0834
P01335
P0836
P0631
P0838
P0639
poa3A
P083B
PDB3G
P0830
poa3E
P063F
P084D
P0641
P0842
P0843
P0644
POS45

OA03
60FF
C5FE
9004
0101
586F
D87F
OAFC
60FF
C900
FFFJ
09CF
0101
5867
0671
ocoa
CAOE
09DF
0101
5861
'0871
OCFC·
CAOO
FFE6
09CF
0101
585A
086A
oe03
CEOA
09AF
0101
5854
0864
OCFG
CEOO
FFDA
09CF
0101
5640
0850
OC60
OAA2

TI01

ENA
STALOASUBSAZ
RTJ·
PAO·
ENA .
STALOA

3

I
H-U,I
$4
1
AORERR
AOERCT
-3
I
DATA6,I

INA
SAZ
RTJ·
RAO·
ENQ
LOA·
INA
SAZ
RTJ·
RAO·
E.N!1
LOA

-$30
1
ADRERR
ADERCT
$S
TI00,Q
-$20
1
ADRERR
ADERCT
-$3
DATA6,Q

INA
SAZ
RTJIiJ
RAO·
ENQ
LOA"
INA
SAZ
RTJ·
RAO"
ENQ
LOA

-$30
1
AORfRR
AOERCT

INA
SAZ
RTJ·
RAO·
ENQ
ENA

-$30
1
AORERR.
ADERCT
. $60
-'50

·.·02165
···02186
···02187
···02188
···02189

D~TA6

o
,r-,
U

2201
2202
2203
2204
2205
2206
2201
2208
2209
2210
2211
2212
2213
2214
2215
2216
2211
2216
2219
2220
2221
2222
2223
2224

c

o
o·
o
o
,-'

( )

2225
2226
2227
2228
2229
2230

-

. TI02

TI03

Tl04

T105

TI06

TI07

INOR, I INDEX,
UPDATE ERROR COUNT

o

···02191
···02192
···02193
···02194
···02195
NOT.> 0 FAILED ···02196
•• .. 02197
···02198
···02199
···02200

IHDR, I INDEX, D > 0 FAILED
UPDATE ERROR COUNT

REL, Q INDEX, D NOT > 0 FAILED
UPDATE £RROR COUNT

REL, Q INDEX, D'> o FAILED
UPDATE ERROR COUNT

3

(DATAOO),Q
-$50
1
AORERR
ADERCT
-3
CDATA7),Q

REL t INOR, Q, 0 NOT> 0 FAILED
UPDATE ERROR COUNT

REL, tNOR, Q, 0 > 0 FAILED
UPDATE ERROR COUNT

···02201
···02202
···02203
···02204
···02205
···02206
···02207
••.. 02208
···02209
···02210
···02211
···02212
.. • .. 02213
···0221 ..
···02215
.. ··02216
···02217
• ..... 02218
···02219
•• .. 02220
•• .. 02221
•• ... 02222
···02223
••.. 0222 ..
.···02225
···02226
•• .. 02227
···02228
···02229
••.. 02230

.. .....
"

60220200

E

PAGE

53

COHOO1

PAGE

54

OATEI 10/20/75
,I"

2231
2232
2233
223ft
2235
223&
2237
2238
2239
2240

::-

P084G
P08ft7
P08'4S
P08ft9
P084A

GOFF
C7FE
<)004
0101

5845
PO~'t9 0855
Poa4C OC9F
TID8
P0840 OA50
P08ftE 60FF
P08ftF C700
POS50 0"1<) P
2241 P08St O<)CF
22ft2 P0852 0101
2243 1'0853 583C
22ft,. P0854 084C
22ft5P0855 OA03
TI09
22,.6 P0856 60FF
2247 P0857 coea
2248 P085B 09AF
2249 P0859 0101
2250 P085A 5835
2251 P085e 0845
2252 P085C OAFC
T110
2253 POSSO GaFF
225 .. POB5E COOO
P085F .FF'6A
2255 P08GO 09CF
2256 POS6t 0101
2257 P0862 5820
2258 POB&3 0830
2259 P0864'OCOG
Tll1
2260 P0865 OAFe.
2261 P0866 GOFF
2262 P08G7 CBAS
2263 P0868 09CF
226,. P08G9 0101
2265 P086A 5825
2266 P086e 0835
2267 .P086C OCF9
T112
2268 P08&D OA03
2269 P086E 60FF
22].0 P086F ceoo
P08ro FFA9
·2271 P0871 09BF
.221.2.P'0872 Pl01
2273 P0873 581C
227,. POB71t 082C
2275 P0875 OC50
T113
2276 P0876 01\82
2271 PO~77 GOFF
2278:P0876 CF9A
2279 P0879 O<)AF
2280 P087A 0101

STALOAsueSAZ
RTJ"
RAO"
ENQ
ENA
STALOA+

t.

n-u,a
$4

1

A.ORERR
AOERCT
-S60
$5D
I
OATA&,a

INA
·SAZ
RTJ'"
RAO"
ENA
STALOA'"
INA
SAl
RTJ"
RAO'"
ENA
STALOA

-$30
1
AORERR
ADFRCT
3

INA
SAZ
OTJ"
RAO"'.
ENQ
ENA
STALOA'"
INA
SAZ
RTJ"
RAO"
ENQ
ENA
ST4L.QA

-$30
1
AORERR
AOERCT
6

INA
S.Z
RTJ'"
RAO"
ENQ
ENA
STA. LOA·
INA
SAZ

I. Q, 0 NOT > 0 FAILED
UPDATE ERROR COUNT
IND~,

UPDATE ERROR COUNT

t

(OATAOO) ,I
-!SO
1
AO~ERR

AOERCT

REL, INOR. 1,,0 NOT> 0 FAILED
UPDATE ERROR COUNT

-3

t

fDATA7),I

REL, INOR, I, 0
UPOATE ERROR COUNT

>o

FAILED

~3

I
OATAoo,e
-$30
1
ADRERR
ADERCT

UPDATE ERROR COUNT

-6'
3

I
OATA7.B
-S40
1
AORERR
ADFRCT
!50
-S40
1

(OATAOO) ,B
-$50
1

REl. Q, t, 0 > o FAILED
UPOATE ERROR COUNT

... ·02231
···02232
• .. ·02233
···0223ft
.. ··02235
• .. ·02236
.. • .. 02237
.. • .. 02238
.... ·02239
.. ··022 .. 0

("
I..........

···022ftl
•• .. 022 .. 2
···022ft3
•• .. 022 ....
•• .. 022 .. 5
•• .. 022 .. 6
"'··022 .. 7
.. ··022.. 8
···022 .. 9
• ..·02250
.. • .. 02251
···02252
···02253
···0225 ..

/"
(
'-.

r'-

.

\",

-(' ,

.. ··02255
....·02256
···02257
• .... 02258
···02259
•• .. 02260
···02261
···02262
• .. ·02263
• .... 0226 ..
···02265
···02266
····02267
•• .. 02268
.. • .. 02269
···02270

\..

(,'"''''

/-,

/,--..,

(
'\"'"

.

,..--.."

r
"',,,

···02271
···02272
···02273
• .. ·0227 ..
• .. ·02275
···02276
.. ··02277
···02278
•• .. 02279
.. ··02280

c--'
(

(
60220200

E

PAGE

,

54

C'
(-~.
\"'.

(,

{

'I

\

I

'---

,,,.'"

~\

(
)
"--/

u
r""~

......

,.,....-....,

C)
/.,.

...

~~~

U

C)
"1"'- ..... ,,

U
('\
~)

""-'. ),
C
,r--,)

~,

/" ... -.j

(

PAGE

COHOOl
2281
2282
2263
2264
2265
2286
2287
2288
2289
22<)0
2291
22<)2
2293
22<)4
2295
22<)6
2297

POS7B
POS7G
POB70
P087E
P037F
P0880
P0881
P0882
P0683
POB84
POS85
POS8E)
P08S7
POS8R
P0889
P088A
P08SB
P088G
POSSO
POSSE

5814
0824
OCAF
DA4D
60FF
CFOO
FF98
09CF
0101
580a
081B
OCFC
EAOO
FF91
ooaF
0141
5804
0814
1800
F1A2

T114

T115

55

DATES 10/20/75
A.ORER~

RTJ·
RAO·
ENQ
ENA
STALOA

ADERCT
-$50
$40
I
(DATA7),B

INA
SAZ
RTJ·
RAO·
ENQ
LOQ

-$30
1
ADRERR
ADERCT
-3
OATA7,Q

INQ

-$40

sal

RTJ·
RAO·
JHP

REL,INDR,Q,I,D NOT
UPDATE £RROR COUNT

REL, INOR, Q, I,
UPDATE £RROR COUNT

o

=o

FAILED

> o ·FAILED

AD~ERR

... • .... 02287
...... ·02288
......... 02289
........ 02290
......... 02291
......... 02292

LOQ, Q INDEX 0 > 0 FAILED
UPDATE ERROR COUNT

... • ... 02293
...... ·02294
• ... ·02295
• ...... 022<)6
... • ... 02297

REPORT ARDR £RROR
ERROR COUNT
SECTION NUMBER

• ...... 02299
···02300
... ··02301

1

ADERCT
ENOSEC

... ··02281
• ...... 02282
• ...... 02283
... ··02284
• ...·02285
.......... 02286

,

I

I

l, - j

0

\1

0
CI
C~)

0
,~

U.

2299 P088F 0000
2300 P08c}O CRI0
2301 P0891 £1\00
Poa<)2 F1C7
2302 P0693 OFA8
2303 poa94 ·0834
2304 P0895 6807.
2305 P089E) C8F8
2306 POB97 6606
2301 Poaga 0844
2308 P089g 5402
2309 P089A 1807
2310 P069B 0108
2311 Poa9C 0000
2312 P069J 0000
2313 P089E 0000
2314 P089F 0000
2315 P08AO 0000
2316 POSA1 E800
P08A2 FFFD
2311 P06A3 EAOO
P08A4 0005
2316 P08A5 C06F
2319 P06A6 5406
2320 PO~A7 167B
2321 P08A8 1CEE)
2322 P08AQ 01A5 P
2323 P08AA 07B2 P

AORERR

NUH
LOA'"

Loa.

ADRETl
ADRET2
AOERCT
ADRER2

AORPCN

0
AOERCT
SEC

ADERCT

ERROR COUNT
ERROR COUNT

.......... 02302
... ··02303
•• ... 02304
...... ·02305
• ... ·.02306
• ... ~02307
•• ... 02308
• ...... 02309
......... 02310
• .... ·02311
• ... ·02312
... • .... 02313
... ··02314
... ··02315
···02316

LOQ

ADRPCN,Q

REPEAT CONDITIONS POINTER

... ··02311

LDARTJJHPJHP'"
AOC
ADe

BIT4
(JUMP)

QLS
AAQ
STA·
LOA·
ST"'"
CLR
RTJJHP'"
NUM
NUM
NUJot
NUM
NUH
NUM
LOQ

8

A
ADRETl
ADRERR
ADRET2
A
(STOPX)
ADRER2
$010A
0
0

SET SSEE
SET RETURN AD DR
REPORT ADOR,ERROR
SSEE
RETURN AODR

0
0

o.

(HOOOO),Q

(AORERR)
T86
T87

CK FOR RPT COUNDITIONS
YES
NO- EXIf

• ... ·02318
···02319 '
• ...... 02320
... ··02321
···02322
···02323

CI
60220200

0
0
(~)

E

PAGE

55

/~

-,

(

/

COHOOt

PAGE'

2324
2325
2326
2327
2328
2329
2330
2331
2332
2133
2334
2335
2336
2337
2338
2339
2340
2341
23"2
2343
2344
2345
2346
2347
2348
2349
2350
2351

POBAB
P08AC
P08AD
P08AE
P08AF
POBBO
P08Bl
P08R2
POSB3
POSB4
P0885
P08S6
POS97
POS8S
P0889

2353
2354
,2355
2356
2357
2358
2359

P08CT·OQOO
POSCs 0500.
P08C9 6004
P08eA oaoc
P08CB 6S0A
posce COO,.
P08CO 1CF9

PO~BA

0788
0780
01C3
07C9
0700
0707
070F
07E5
01EB
07F2
07FA
0803
080A
0619
0822
082A

P
P
P
P
P
P
P

AOC
Aoe
AOC
ADC
AOC
AOC
AOC
AOC
AOC
AOC
AOC
AOC
,ADC
AOC
AOC
AOC
ADe
AOC'
AOC
AOC
AOC
AOC

P

P
P
P

P
P

P
P

P

P06BO Ot\30
P088C 0637
POS80 OS30
POS8E 0",.4
POB8F OS4C
P06CO 0855
P06e! D8SC
POSC2 0864
P08CJ 086C
P08C4,Q875
POBe5 0870
P08C6 0886

P
P

P
P
P
P
p

AOC

P

AOC
ADC
AOC
AOC
AOC

P

P
P
P
ININT

NU'"
lIN
STATRH
STA·
LOAJHP·

DATEt 10/201'75

56

('"
T88
T89
T90
T91
T92
T93
T9,.
T95
T96
T97
T9S
T99
TiOO
Tl01
Tt02
T103
Tl04
T105
T106
Tl07
TtOS
Tl09
T110
Tl11
T112
Tt13
T114
T115'

•

0
TEHPlOG
A
INTSVl1

···02324
... ··02325
... ··02326
···02327
···02328
···02329
···02330
···02331
···02332
···02333
···0233,.
···02335
···02336
···02337
···,02338
···02339
···02340
···02341
···02342
···023 .. 3
···02344
···02345
···02346
... ··023.. 7
···023"8
···023.. 9
···02350
···02351
INHIBIT INT, SAVE" REG

SAVE H REGISTER

TEH~lOC

UNINTI

RETURN·

r---

\

\

.......

r'-

(,
\",.~,. "

,,------i

"-

/,"-'-

(

("'"

I\,

···02353
···02354
···02355
···02356
···02357
···02358
···02359

(

'- .. ".

C~
2361
2362
2363
2364
2365
2366
2367
2368

ENINT

P06CE 0000
PO ·~CF 600ft
P0600.C805
POS01 0621
P0602 COO4
P060J 040tJ
P0804 1CF9
P0605 0000

INTSVH

NUM
STALOA·
TRA
LOAEIN
JHp·
NUt1

•TEMPLOC

ENABLE INT, RESTORE H REGISTER

INTSVH
H
TEHPlOC

RESTORE H REG

0

(ENINT)
0

TURN INTS BACK ON
RETURN
" ~EG SAVE CELL

('

••... 02361
···02362
···02363
···02364
.. ··02365
• ..·02366
···02361
···02366

0..,''--,

(--

I"
r

(

r

60220200

E

"

PAGE

56

(

\'---'

C
(-.~

r

C)

o

o
o

o
o
c
)

C)

o
o
o
o
o.
o
o·

PAGE

COHOOt

2370
'" .2371
231:?
2373

57

DATEI 10/20/75

02310
02311
. 02312
02313
0231,.
02375
02376
02377
02318
02319
02380
02381

""STORE

THE RESULTS. OF ·INTER-REG
"INSTRUCTION AND COHPARE IT TO
"KNOWN RESULTS, IF AN ERROR IS
"DETECTED RETURN Ta~ROGRA"
·SECTION VIA'RETURN AODRESS +1,
"IF NO ERROR OCCURS RETURN TO SECTION
"VIA NORHAL RETURN ADDRESS.

231~

2375
2376
2377
2318
•
2379
"INAQ" . ttUH
236D P080G 0000.
Q
2381 POBD1 6 .. 00
STA+
STORE+1
P08DS 093C P
STQ.
STOltE.2
2382 P06D9 .4"00P08DI\ 0930 P
2383 P08Da 8860
STORE
EOR"
. 1.__ , ...
23.84 POBOC 0101
SAZ.'
2385 PO~DD 1808
INAQ2
JMP"
2386 P06DE C8SD
LOA"
STORE
STQRE+2
·2387 P080F B85E
EOR."
2388 P08ED 0101
SAZ
1
INAQ2
2389 P08E1 1804
JttP"
2390 P08E:? 080C
A
TR"
STORE+]
2391 P08El R8SB
EOR"
SAZ
2392 P08E4· 0101
1
INAQ2
2393 P08E5 08FO
RAO·
tNAQ"
UNAQ(1)
2394 P06E6 lCEF
JHP"
2395
"
2396
"INCLUSIVE OR SUBROUTINE
23q7
"
OR
NUH
2398 P08E1 0000.
0
.. 2399.,pOBEfl BllnF
., .EOROP+l.
STORE
2400 POBE9 6852
STA"
OP
2401 P08EA CODE
LDA,:_",,: ....240Z ~08FB 581E., ""'.'
.RTJ! . ,. ....... CIU!~KA._ ..
ANOOP+'1
2,.03 POB'EG AODF
STORE
2404 P08ED B84E
EOR"
(OP.)
.. 2405 P08EE lCF8
... JHP~
2406

"

·STORE THE RESULTS OF INTER-REG
.INSTRUCTION AND COMPARE IT TO
"KNOWN RESULTS, IF AN ERROR IS
"OETECTED RETU~N TO PROGRAM.
.SECTION VIA RETURN ADDRESS +1,
.IF NO ERROR OCCURS RETURN TO SECTION
."VIA NORMAL.RETURN AODRESS.

2406
2409
2410
2411
2412
2413
24·14 ..
2415
2416 P08EF 0000

60220200

•INTRF.G

E

NUH

o

02382

SUB-ROUTINE FOR OR

.. .... ,_._ . . . ·•· .. ,......1

....

02383
02384
02385
02386
02381
02388
02389
02390
02391
02392
02393
0239,.
02395
02396
02397
02398
02399
02400
02401
02 .. 02.

02403
0240 ..
0240.5
02406

02"08
02409
02410
02411
02412·
02413
.02,.1 ..
02415
02416

PAGE

57

c
~

C'JHOOl

P!lGE

58

DATEI 10/20/75

(
2417
2418
2419
2420
2421
2422
2'.23
242,.
2425
2426
2"27
2428
2429
2430
2431

2432
2433
2434
2435
24J6
2'.37
2438
2439
2440
2441
2442
2443
2444
24,.15
2446
2447
2448
2449
24S0
24S1
2452
2453
2454
2455
2456
2457
24Cj8

2459
2460
2461
2t~62

POSFO
P08F1
POl\FZ
P08F3
P08Ff+
POIJF5
P08F&
P08F7
P06F8
P08F9
P08FA
P08FB
P08FC
P01)FO
P08FE
P08FF
P0900
P0901

STA4f.
STQ·

6a4C
464C
9849
0101
1805
C84A
BS4S
0111
1CF6
D'lF5
1CF,.
0000

EO~·

INTH2
INTH

SAZ
JHP"
LOA·
EOR·
SAN
JMP.
RAO"
JHP·
NUM

DaDe

T~H

683F
B63D
0101
D8FA
1CF9

STA·
EOR·
SAZ

•

•

0000
E805
0151
A070
6835
1CFA
0000

CHHSK

STORE
1
UNTREG)
INTREG
UNTREG)
0
A
STORE+l
STORE
1
INTH
UNTH)

..

HSKFL

0000·
EeFO
0151
A070
lCFB

•
CHHSKA
•

•
CHMSt
Source Exif Data: 
File Type                       : PDF
File Type Extension             : pdf
MIME Type                       : application/pdf
PDF Version                     : 1.3
Linearized                      : No
XMP Toolkit                     : Adobe XMP Core 4.2.1-c043 52.372728, 2009/01/18-15:56:37
Producer                        : Adobe Acrobat 9.13 Paper Capture Plug-in
Modify Date                     : 2009:08:25 21:01:07-07:00
Create Date                     : 2009:08:25 21:01:07-07:00
Metadata Date                   : 2009:08:25 21:01:07-07:00
Format                          : application/pdf
Document ID                     : uuid:b10fa907-b010-41fd-b24c-4caaa4b770fe
Instance ID                     : uuid:b9808b71-6a31-4de0-b3fa-90550f2f702f
Page Layout                     : SinglePage
Page Mode                       : UseNone
Page Count                      : 86


EXIF Metadata provided by EXIF.tools

Navigation menu