tones

#!/bin/bash

quarter=$( echo "scale=2; 60 / $bpm" | bc );
quarter_eigth=$( echo "scale=2; $quarter * 1.5" | bc);
eigth=$( echo "scale=2; $quarter / 2" | bc )
sixteenth=$( echo "scale=2; $quarter / 4" | bc )
eigth_sixteenth=$( echo "scale=2; $eigth + $sixteenth" | bc )
halves=$( echo "scale=2; $quarter * 2" | bc )
halves_quarter=$( echo "scale=2; $quarter + $halves" | bc )
whole=$( echo "scale=2; $quarter * 4" | bc )

l=$quarter;

octave=1;
octave_high=2;
octave_low=0.5;

factor=$octave

up () {
	factor=$factor*2
}
down() {
	factor=$( echo "scale=2; $factor * 0.5 " | bc )
}

bp () {
   f=$( echo "scale=2; $f * $factor" | bc )
	sleep_time=$( echo "scale=2; $l * 1 / 6" | bc )
	play_time=$( echo "scale=2; $l * 1000 * 5 / 6" | bc )
#	echo $l
#	echo $l2
#	echo $l2000
	beep -f $f -l $play_time;
	sleep $sleep_time;
}
c() {    f=261.626; bp; }
db() {   f=277.183; bp; }
d() {		f=293.665; bp; }
eb() { 	f=311.127; bp; }
e() { 	f=329.628; bp; }
f() { 	f=349.228; bp; }
gb() { 	f=369.994; bp; }
g() {  	f=391.995; bp; }
ab() { 	f=415.305; bp; }
a() {	 	f=440;  bp;}
bb() {   f=466.164; bp; }
b() {		f=493.164; bp; }
p() { f=0; sleep $l; }