fc 1231 m8 AUXILLIARY CHECKER, BENNETT
OCTAL
|INTERPRETIVE OPERATION
DA1.11600|2000|b26-7600,x18,sp r6	|check for halt
ca d4	|pc
ts 6
ca1
ts6d8
sp b41	|obtain instruction
ts 6
ts 1d6
clh 25
ad x20	|x21, table
0r,td 1r
ca
ts t1	|logical word
md 7k1	|si 7
ad 1x20	|x22
cf 400	|dispatcher
x22,sp x23	|other
sp x24	|sp
sp x25	|cp
sp x26	|cf
sp x43	|si
| illegal
x46,sp r20	|pr0nt location, order
sp r7	|il
0.73614	|uc I L
0.30247	|L E G
1.02636	|A L lc
sp r28
sp x35	|exit
|si order
x43,ca d12	|ac
ts 2t2	|for si
ca 6	|si
ts 22r23
su 1k5	|17
sd k5	|-0
cp 1x28
x28,sp r23	|execute instruction
1x28,ca 36p9	|loop ind.
cp x47
ca 7d8	|inactive ind.
cp x47
ca d3	|mode
ck 1k11	|1.60000
sp x34	|trace
tmx47,ca 6d8
ad d4
ts d4	|index PC
tmmx30,cad4	|pc
ad2k11	|0.77770
cp x35	|all done
ad 7k1	|7
su d7	|initial-1
0r,cp 3r	|not in active region
su 1d7	|number regs
sd k5	|-0
3,ts 7d8	|inactive ind
sp x18
x34,sp r20	|loca, order
1x34,sp r21	|print ac, br
2x34,sp r22	|print contents
sp x47
|exit
x35,ao 1d8	|old pc
td 2
sp r15	|block in perm a
ca 5r	|5b45
sp 2a9
5,5b45
|other
x23,ca 36p9	|other
cp x28	|loop
ca 7d8	|inactive ind
cp x28	|inactive
ca d3	|mode
ck 1k11	|1.60000
sp x28	|trace
ca 2d5	|which type of instructon is of interest...

cp x19	|employ or both types
ca t1	|store type. logical word
clh 3
x44,cp x31	|right type, bi or bo
clh 35
cp x32	|right type, store or employ
sp x28
x19,clh 1
cp 5r	|both
ca t1	|employ
clh 4
sp x44
5r,ca t1
clh 5
sp x44
x31,ca 6	|instruction
md 1k2	|3777
su d5	|initial of area
0r, cp 4r	
su 1d5	|lingth of area
cp x33	|within area
sp x28	|not within area
4r,dm d12	|ac
ad 2k1	|2
cp x33	|within area
sp x28
x32,ca 6	|instr
md 1k2	|3777
su d5	|initial of area
cp x28	|not in area
su 1d5
cp x33	|inarea
tommsp x28
x33,ca d3	|mode
clh 1
cp x56	|not interested area
sp r1
sp r9	|print cr
tommsp r7
0.75737	|lc cl ss
0	|15 dec spaces
0
0
0
1.00000
sp r21	|print ac, br
sp r22	|pr contents
x56,sp r23	|execute
sp r20	|pr loc and ordeer
ca d3	|mode
clh 1
 cp 2x34	|not interested area
sp 1x34
|sp
x24,ca d4	|pc
td 1d8	|from
ad 1
td 1t2	|a register
ca 6
td 2d8	|to
ca 36p9	|loop ind
cp x29	|in loop
cs p6
ad 1
ts 4d8	|set counter to search jump table
0r,cp 2r
sp x36	|do not check for loop
ca 11k6	|p9, loop detection
x38,td 1r
1x38,ca 	|p9, jumpt table
md 1k2	|3777
ck1d8	|current from
sp x37	|match
ao 1r
x49,ao 1x38
ao 4d8
cp 1x38
x51,ca 2d8	|to
1,ts 6d8	|ts
ca 11k6	|p9, shift jump table
td 11r
4,cs 11k5	|35
ts 4d8	|ctr
cs 17r
ts17r	|invert switch
ca 6d8
11,ex
ts 6d8
ao 11r
ao 4d8
cp 10r
ca1d8
pa2=1r
17,-sp-pa2	|ca
x36,ca 7d8	|inactive ind
cp x45	|inactive
ca d3	|mode
ck 1k11	|1.60000
sp x48	|trace
tomsp r1
ca 1d8	|from
sp r3	|pr no.
sp r7
1.00000
ca 2d8	|to
sp r3	|pr
sp r28
onnsp x45
x48,sp r20	|loca, order
sp r21
sp r28	|carr. ret.
sp x45
x37,ao 1x38
td 3r
ca 2d8
3x37,ck	|1p9
0r,sp 2r	|match
sp x49
cs0
|LOOP DETECTED
ts 36p9	|loop ind
ca 3x37
td x29
su 1
ts 3d8	|match entry
md 1k2	|3777
su 11k6	|p9
ts 1d11	|set single branch indicator
ca 2k1	|2
ts d6	|n
cs 2p6	|cycle limit
ts 2d11	|simple loop ctr.
sp x36
x29,ca 	|check for loop exit
md 1k2	|3777
ck 1d8	|from
sp x52	|match
x53,	|clear branch table	si17
cak2
bip9
ca 7d8
0,cp 11r	|inactive
sp r1
spr7	|loop
0.72633	|uc L O
0.67036	|O P lc
1.01736	|sp lc cl
ca d6	|n
sp r13	|octal fraction
sp r28
11,ca 1d11	|single branch loop ind
cp x36	|set
sp x51
x52, ao x29
td 3r
ca 2d8
3,ck
0r,sp 2r	|match
sp x53
x45,cs 36p9
cp x39	|not loop
ca x29
su 1
td x29
0,td 1r
1,ca
cp 3x39	|single branch loop
x55,ca x29
su 2k1	|2
td x29
md 1k2	|3777
su 11k6	|p9
ad 1
sd k5	|-0
cp x39
ao d6
su 2p6
0r,cp 7r
sp r1
sp r7
0.73234	|uc T I
1.31236	|L T lc
sp r28
sp x35
7,ca 3d8
td x29
x39,ca 2d8	|to
td d4	|reset pc
sp x30
3x39,ao 2d11	|simple loop ctr
cp x39
sp r1
sp r7
0.73160	|uc S P
1.70736	|I N lc
sp r28
sp x35
|cp
x25,ca d12	|ac, cp
cp x24
ca d4
td 1d8
ad 1
td 1t2	|a register
td 2d8
cs 36p9	|loop ind
0r,cp 1x28	|not loop
ca x29	|loop exit detection
td 4r
td x54
4,ca 	|pc
md 1k2	|3777
ck 1d8
sp x54	|match, loop exit
sp 1x28
x54,cs
cp 5r	|not single branch loop
cs 2p6	|cycle limit
ts 2d11	|set simple loop ctr
sp x55
5,cs 1d11	|single br ind
cp x53
ts 36p9	|clear loop ind
ca p9
sd k11	|1.00000
ts p9	|mark jump
sp 3x53
|cf
x26,cs 6	|cf
clh10
cpx40	|group A ind. not set
ca6
sd5
md2k5	|70
sd5
ts5
ts 2d12
x40,cs6
clh11
cpx41	|gr. B ind. not set
ca6
sd5
md7k1	|7
sd5
ts5
ts 2d12
x41,ca6
clh6
cpx42	|cf 1000
clh 1
0,cp 2r	|sp enable
sp 1x28
2,ca 0
ex d12
ts 6
sp x24	|handle as an sp
x42,clh 1
cp x46	|illegal
sp x28
x20,x21
x22
x21,4	|si
5	|illegal
0.13440	|bi
si 440	|rd
4r,0.07440	|bo
si 400	|rc
0.61140	|sd
si43	|cf
10r,1.21000	|ts
1.21000	|td
1.21300	|ta
0.61500	|ck
14r,1.61040	|ab
1.61040	|ex
2	|cp
1	|sp
20r,0.61240	|ca
0.61240	|cs
0.61140	|ad
0.61140	|su
24r,0.61240	|cm
0.61140	|sa
1.61140	|ao
0.61140	|dm
30r,0.61140	|mr
0.61140	|mh
0.61140	|dv
si 100	|sl
34r,si 100	|sr
1.21140	|sf
0	|cl
0.61040	|md
|INTERPRETIVE OPERATION SUBROUTINES
r20,ta 14r	|print location, order
sp r1
ca d4	|pc
sp r3
4r,ca 12k5	|slash, 41
sp r10
ca 0
sp r10	|space
10,ca 1d6	|instr
sp r14
sp r7	|3 spaces
1.00000
14,sp
r21,ta 11r	|print ac, br
ca d12	|ac
sp r30	|wi = of
sp r7
4, 1.00000	|3 spaces
ca 1d12	|br
sp r13	|of
sp r7
10,1.00000	|3 spaces
11,sp
tm|print contents, if meaningful
r22,ta 15r
cs t1
clh 6
cp 14r	|not meaningful
4r,ca c1	|ca
ex 6
td 6
ts4d8
sp b41	|obtain contents
sp r30	|o. f.
ca 4d8
ts 6
14,sp r28
15,sp
|EXECUTE INSTRUCTION
r23,ta 32r
ca t1	|logical instruction
clh 32
md 7k1	|7
ad 53r	|6r
cf 400	|dispatcher
6,sp 23r	|other
sp41r	|clears sam
sp 33r	|uses SAM
sp 45r	|ta
sp21r	|rd, rc, bi, bo, AC for si
ts 2	|ck
sp a7
ca 2
ck 0
ao 6d8	|extra index
sp 32r
21,ca 2t2	|ac for si
22r23,si 630	|si planted
23,sp a7	|execute
si 630
25,cs t1
clh 12
cp 32r	|a register not changed
ca 2
td 1t2	|set a register
32,sp	|exit
33,sp a7
ca 0
ex d8	|SAM
ad d12
ts d12	|AC
 sp 25r
41,sp a7
ca 0
ts d8	|store or clear SAM
sp 25r
45,cs4k2	|4000
ad 6
ts 6	|change ta to td
ca 1t2	|a register
sp b41
sp 32r
53,6r
|filler
DITTO
2724|d8,0	|SAM
0	|from
0	|to
0	|match entry
4,0	|ctr for. r70, r71, x39. simple loop. T. S. for r66
0
0	|TS for and x38
0	|inactive ind
d6,0	|loop ctr
0	|instruction for printing
1d11,0	|single branch loop ind
0	|simple loop ctr
STA32
