summaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/fss.sh90
1 files changed, 90 insertions, 0 deletions
diff --git a/src/fss.sh b/src/fss.sh
new file mode 100644
index 0000000..e4e2135
--- /dev/null
+++ b/src/fss.sh
@@ -0,0 +1,90 @@
+#!/bin/sh
+#
+# "Free Software Song" player
+#
+# Copyright (C) 2016 Patrick "P. J." McDermott
+#
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program. If not, see <http://www.gnu.org/licenses/>.
+
+play()
+{
+ local octave_shift="${1}"
+ local note_length="${2}"
+ shift 2
+ local note=
+ local octave=
+ local length=
+ local freq=
+
+ while [ ${#} -gt 0 ]; do
+ note="${1%_*}"
+ octave="${1%:*}"
+ octave="${octave#*_}"
+ length="${1#*:}"
+ shift 1
+ case "${note}" in
+ C) note=-9;;
+ Cs|Df) note=-8;;
+ D) note=-7;;
+ Ds|Ef) note=-6;;
+ E) note=-5;;
+ F) note=-4;;
+ Fs|Gf) note=-3;;
+ G) note=-2;;
+ Gs|Af) note=-1;;
+ A) note=0;;
+ As|Bf) note=1;;
+ B) note=2;;
+ esac
+ # A note's frequency is:
+ # n/12
+ # f = 2 * 440 Hz
+ # where n is the distance from A4.
+ freq=$(awk -v octave_shift=${octave_shift} -v octave=${octave} \
+ -v note=${note} '
+ BEGIN {
+ octaves = octave_shift + octave - 4 + note / 12;
+ freq = 2 ^ octaves * 440;
+ print(int(freq + 0.5));
+ }
+ ')
+ length=$(($length * $note_length))
+ beep -f ${freq} -l ${length}
+ done
+}
+
+# "Free Software Song"
+#
+# Time signature: 7/8
+# Octaves: 4, 5
+# Tempo: 252 BPM
+# Duration: 0:20
+#
+# The notation for the "Free Software Song" is from
+# <https://www.gnu.org/music/free-software-song.html>.
+
+play 4 238 \
+ D_1:2 C_1:1 B_0:2 A_0:2 \
+ B_0:2 C_1:1 B_0:1 A_0:1 G_0:2 \
+ G_0:3 A_0:3 B_0:1 \
+ C_1:3 B_0:2 B_0:1 D_1:1 \
+ A_0:3 A_0:4 \
+ D_1:2 C_1:1 B_0:4 \
+ \
+ D_1:2 C_1:1 B_0:2 A_0:2 \
+ B_0:2 C_1:1 B_0:1 A_0:1 G_0:2 \
+ G_0:3 A_0:3 B_0:1 \
+ C_1:3 B_0:2 B_0:1 D_1:1 \
+ A_0:3 A_0:4 \
+ A_0:7