1#!/bin/sh
2
3lev="$1";
4shift;
5pre="$*";
6
7case "$lev" in
83)   set  50+1.2/40  100+1.3/20  288+3.6/7;;
910)  set 100+1.5/20  200+4.0/10  250+4.0/8  300+4.0/7;;
1012)  set 50+0.25/40  100+1.5/20  200+4.0/10 250+4.0/8  300+4.0/7  400+10.0/5 500+10.1/4 600+4.8/3;;
1115)  set 100+1.5/20  200+4.0/10  250+4.0/8  300+4.0/7  500+7.05/4 630+7.0/3  750+7.0/3;;
1221a) set 200+4.0/10  250+4.0/8   300+4.0/7  600+16.2/3 750+16.2/3 900+16.2/2;;
1321b) set 200+4.0/10  250+5.4/8   300+5.4/7  600+16.2/3 750+16.2/3 900+16.2/2;;
1422)  set 200+4.0/10  250+4.0/8   300+4.0/7  600+16.2/3 750+16.2/3 900+16.2/2;;
1523)  set 400+3.9/5   503+4.0/4   600+4.0/3  750+3.9/3  900+4.0/2;;
1624)  set 50+0.75/40  200+1.5/10  400+3.9/5  503+4.0/4  600+4.0/3  750+4.0/3  900+4.0/2;;
1726)  set 400+3.9/5   503+4.2/4   600+4.0/3  750+4.0/3  900+4.0/2;;
1827)  set 50+0.80/40  400+4.0/5   503+4.2/4  600+4.0/3  750+4.0/3  900+4.0/2;;
19*)
20	cat <<END
21Usage: t-focus <focus-level> <additional-sbagen-options-if-required>
22
23Focus levels available, with meaning from Ken E-F, if he mentioned it:
24  3	
25 10	Brain awake, body asleep
26 12	Expanded consciousness - in the mood to head out and explore
27 15	No time - 3 hours seems like 2 minutes
28 21a	}  Alternate energy systems, bridge into worlds with 
29 21b	}    non-human entities.
30 22	Place where people with loose, chaotic thoughts go after death.
31 23	
32 24	Belief system territories - place where dogmatically inclined people
33          go after death.
34 26
35 27	The park - a way-station, a place of high creativity, a stepping stone
36          into areas beyond
37
38Note that the focus level tone frequencies and beat-frequencies were
39measured, but the relative amplitudes of the tones were not measured,
40and may not be correct.  The original tone-sets almost certainly had
41some tones stronger than others, but with this script, all have been
42given approximately equal audible presence.  This means that these
43tone-sets might not work at all like the original ones.  But still,
44for experimentation, this is a lot better than nothing, considering
45the cost of obtaining Monroe Institute courses !
46
47END
48	exit 1;
49esac
50
51echo "Focus $lev:"
52echo ""
53echo sbagen $pre -i $*
54echo ""
55
56sbagen $pre -i $*
57
58
59
60
61
62############
63
64
65-----------------------------------------------------------------------
66Wave I - Discovery
67-----------------------------------------------------------------------
68
69Tape 1 - Orientation (Focus 3)
70Hemisync, Energy Conversion Box, Gateway Affirmation, Resonant Tuning
71
72l/r 300/304 plus 100 Hz and 500 Hz carriers without recognizeable Delta
73
74### 100+0/ 302+4/ 500+0/
75
76-----------------------------------------------------------------------
77
78Tape 2 - Intro Focus 10
79
80Focus 10, Ten Point Relaxation
81
82### 100+4.0/ 300+4.0/ 500+4.0/
83
84-----------------------------------------------------------------------
85
86Tape 3 - Advanced Focus 10
87Recall
88
89-----------------------------------------------------------------------
90
91Tape 4 - Release and Recharge (Focus 10)
92Process of Energy Conversion - Daily Exercise!
93
94### 102+4/ 412-4/ 502-4/
95
96-----------------------------------------------------------------------
97
98Tape 5 - Exploration Sleep (Focus 10)
99Remembering who and what you are, Rolling out, Floating upwards
100
101### 102+4 302+4 498+4
102
103-----------------------------------------------------------------------
104
105Tape 6 - Focus 10 Free Flow for your own purpose
106
107l/r 100/104, 300/304, 500/504
108C1: 308/322, 500/515
109
110### 102+4 302+4 502+4
111### 315+14 507.5+15
112
113-----------------------------------------------------------------------
114Wave II - Threshold
115-----------------------------------------------------------------------
116
117Tape 1 - Intro Focus 12
118
119l/r 51/51.75, 98.75/101; Delta-Frq: 0.75 + 2.25 Hz
120
121### 51.375+0.75 99.875+2.25
122
123Tape 2 - Problem Solving (Focus 12)
124
125l/r 99.5/101, 202.7/204.2
126
127### 100.25+1.5 203.45+1.5
128
129-----------------------------------------------------------------------
130                   Focus Levels/Frequencies
131
132F3   59[1.2]-110[1.3], 288[3.7]
133
134F10  100[1.5], 200[4.0], 250[4.0], 300[4.0]
135
136F12  100[1.5], 200[4.0], 250[4.0], 300[4.0], 400[10.0], 500[10.1], 600[4.8]
137
138F15  100[1.5], 200[4.0], 250[4.0], 300[4.0], 500[7.05], 630[7.1], 750[7.0]
139
140F21  200[4.0], 250[4.0], 300[4.0], 600[16.2], 750[15.9], 900[16.2]
141
142F22  Same as F21
143
144F23  400[3.9], 503[4.0], 600[4.0], 750[3.9], 900[4.0]
145
146F24  50[0.75], 400[3.9], 503[4.0], 600[4.0], 750[4.0], 900[4.0]
147
148F25  503[4.0], 600[4.0], 750[4.0], 900[4.0]
149
150F26  400[3.9], 503[4.2], 600[4.0], 750[4.0], 900[4.0]
151
152F27  Same as F26
153
154Example: The notation 503[4.2] should be understood to
155represent a beat frequency of 4.2 Hz between two carriers
156equally separated from 503 Hz (i.e., 500.9 and 505.1 Hz).
157
158Amplitudes are generally maintained about 20 dB above
159background 1/f (pink) noise and/or surf.
160
161-----------------------------------------------------------------------
162
163 L  58.4, 109.35, 286.15
164F3
165 R  59.6, 110.65, 289.85
166
167 L   99.25, 198, 248, 298
168F10
169 R  100.75, 202, 252, 302
170
171 L   99.25, 198, 248, 298, 395, 494.95, 597.6
172F12
173 R   100.75, 202, 252, 302, 405, 505.05, 602.4
174
175 L   99.25, 198, 248, 298, 496.475, 626.45, 746.5
176F15
177 R   100.75, 202, 252, 302, 503.525, 633.55, 753.5
178
179 L   198, 248, 298, 591.9, 742.05, 891.9
180F21-F22
181 R   202, 252, 302, 608.1, 757.95, 908.1
182
183 L   398.05, 501, 598, 748.05, 898
184 F23
185 R   401.95, 505, 602, 751.95, 902
186
187 L   49.625, 398.05, 501, 598, 748, 898
188 F24
189 R   50.375, 401.95, 505, 602, 752, 902
190
191 L   501, 598, 748, 898
192 F25
193 R   505, 602, 752, 902
194
195 L   398.05, 500.9, 598, 748, 898
196 F26-F27
197 R   401.95, 505.1, 602, 752, 902
198
199
200
201