1#!/bin/sh
2
3cat <<EOF
4Usage: t-wave-1 <additional-sbagen-options-if-required>
5
6Please note: These tone-sets are based on data from a document that
7appeared on USENET, from someone who appears to have measured the
8frequencies used on some of the Monroe Institute tapes.  Although the
9frequencies were measured, the relative amplitudes of the tones were
10not, so the results may not be identical to that of the Monroe
11Institute tapes.  Also I believe that the Monroe Institute uses a
12guiding voice that leads the subject through the experience.
13
14Despite that, these tone-sets (or Focus levels) may be useful for
15experimenters to base their own tone-sets on.  No attempt has been
16made to sequence these tones - use ^C to abort any tone-set and move
17onto the next.  Amplitudes of the tones have all been set equal, and
18the user can edit these if required.
19
20- Jim Peters <http://uazu.net/>
21
22EOF
23
24echo -n "Press return to continue: "
25read xx
26
27#trap 'echo -e "\n**ABORT**\n"' 2
28trap ':' 2
29pre="$*";
30pink=''
31
32# Uncomment the following line if you'd like pink noise as a background
33#pink='pink/30'
34
35function play {
36    cmd="sbagen $pre -Q -i $* $pink"
37    echo $cmd
38    $cmd
39}
40
41cat <<EOF |
42-----------------------------------------------------------------------
43Wave I - Discovery
44-----------------------------------------------------------------------
45
46Tape 1 - Orientation (Focus 3)
47Hemisync, Energy Conversion Box, Gateway Affirmation, Resonant Tuning
48
49l/r 300/304 plus 100 Hz and 500 Hz carriers without recognizeable Delta
50
51+++ 100+0/10 302+4/10 500+0/10
52
53-----------------------------------------------------------------------
54
55Tape 2 - Intro Focus 10
56
57Focus 10, Ten Point Relaxation
58
59100[4.0], 300[4.0], 500[4.0]
60
61+++ 100+4.0/10 300+4.0/10 500+4.0/10
62
63-----------------------------------------------------------------------
64
65Tape 3 - Advanced Focus 10
66Recall
67
68-----------------------------------------------------------------------
69
70Tape 4 - Release and Recharge (Focus 10)
71Process of Energy Conversion - Daily Exercise!
72
73l/r 100/104, 414/410, 504/500
74
75+++ 102+4/10 412-4/10 502-4/10
76
77-----------------------------------------------------------------------
78
79Tape 5 - Exploration Sleep (Focus 10)
80Remembering who and what you are, Rolling out, Floating upwards
81
82l/r 100/104, 300/304, 496/500
83
84+++ 102+4/10 302+4/10 498+4/10
85
86-----------------------------------------------------------------------
87
88Tape 6 - Focus 10 Free Flow for your own purpose
89
90l/r 100/104, 300/304, 500/504
91C1: 308/322, 500/515
92
93+++ 102+4/10 302+4/10 502+4/10
94+++ 315+14/10 507.5+15/10
95
96-----------------------------------------------------------------------
97EOF
98(
99    trap 'echo -en "\a"' 2
100    while read xx
101    do
102	case "$xx" in
103	    +++*)
104		play ${xx#+++}
105		;;
106	    *)
107		echo "$xx"
108		;;
109	esac
110    done
111)
112
113echo "DONE"
114