fc TAPE 1337 m5 SEARCH MEMORY CASE
OCTAL
a1,si10		|SET ALL FLIP FLOPS
cab14		|b14,1.00000
tsa5
ca4		|INITIAL ADDRESS
mdb1		|b, 0.77777
tst1		|TEMPORARY
ca5		|FINAL ADDRESS
ovmdb1		|b1, 0.77777
sut1
tsc1		|c1, WORD COUNT
cpa2
dmb2		|b2, 0.01777
cpa3
a2,cab3		|b3, 0.00016
si225		|PRINT-RANGE ERROR-
bop1
si0
spa1
a3,ca4		|INITIAL ADDRESS
cpa4		|BUFFER DRUMS AND CORE FIELDS
si1703
32a7,cac1		|WORD COUNT
sdb4		|b4, 1.77777
tsc1
su1
bi2000		|BLOCK IN REGISTERS TO BE SEARCHED
cab9		|b9, 0.02000
tda5
oa5,ca0+
tst1
md2		|MASK SPECIFIED BY FF2
ck3		|ITEM SPECIFIED BY FF3
spa6
si300
rd
cpa20
aoa5		|PICK NEXT REGISTER
ao4
aoc1		|INDEX COUNTER
cpa5
a20,cab5		|b5, 0.00007
si225		|PRINT-DONE-
bop2
si0
spa1
tma4,mdb6		|b6, 0.74000
dmb7		|b7, 0.34000
cpa9		|BUFFER DRUM GROUP
ca4		|INITIAL ADDRESS
mdb7		|b7, 0.34000
srh13		|EXTRACT CORE FIELD NUMBER
adb8		|b8, 0.00100
tda8
a8,cf0
ca4		|INITIAL ADDRESS
mdb2		|b2, 0.01777
adb9		|b9, 0.02000
tda5
csc1
tsc1
spa5
a9,ca4		|INITIAL ADDRESS
si1713
spa7
a6,taa10
ca3
spa11		|CONVERSION AND PRINT ROUTINE
ca4
a19,spa11
cat1
spa11
si225
cap3		|CARRIAGE RETURN
rc
cap3+1		|LOWER CASE
rc
a10,sp0
a11,taa12		|RETURN
clh21		|SIGN IN AC
adb10		|b10, sip5
tda13
a15,md0
clh3
adb10		|b10, sip5
a14,tda16+
aoa14
aoa14
sub11		|b11, tda17
cpa15
a13,ca0
tsp4+1
a16,ca0
tsp4+3
ca0
tsp4+4
ca0
tsp4+5
ca0
tsp4+6
a17,ca0
tsp4+7
cab13		|b13, tda16
tda14
cab12		|b12, 0.00013
si225
bop4
a12,sp0
p1,1.62000		|UPPER CASE
0.50000		|R
0.14000		|A
0.60000		|N
1.50000		|G
0.04000		|E
0.20000		|SPACE
0.04000		|E
0.50000		|R
0.50000		|R
1.40000		|O
0.50000		|R
1.22000		|CARRIAGE RETURN
1.72000		|LOWER CASE
p2,1.62000		|UPPER CASE
0.44000		|D
1.40000		|O
0.60000		|N
0.04000		|E
p3,1.22000		|CARRIAGE RETURN
1.72000		|LOWER CASE
p4,1.72000		|LOWER CASE
0		|-
0.42000		|POINT
0		|-
0		|-
0		|-
0		|-
0		|-
0.20000		|SPACE
0.20000		|SPACE
0.20000		|SPACE
p5,1.74000		|0
0.52000		|1
0.36000		|2
0.16000		|3
0.26000		|4
0.46000		|5
0.66000		|6
0.56000		|7
0.06000		|8
b1,0.77777
b2,0.01777
b3,0.00016
b4,1.77777
b5,0.00007
b6,0.74000
b7,0.34000
b8,0.00100
b9,0.02000
b10,sip5
b11,tda17
b12,0.00013
b13,tda16
b14,1.00000
t1,0
t2,0
c1,0
START AT 0
m