:
# Test script for the speaker driver
#
# v1.0 by Eric S. Raymond (Feb 1990)
#      modified for 386bsd by Andrew A. Chernov <ache@astral.msk.su>
#
reveille="t255l8c.f.afc~c.f.afc~c.f.afc.f.a..f.~c.f.afc~c.f.afc~c.f.afc~c.f.."
contact="<cd<a#~<a#>f"
dance="t240<cfcfgagaa#b#>dc<a#a.~fg.gaa#.agagegc.~cfcfgagaa#b#>dc<a#a.~fg.gga.agfgfgf."
loony="t255cf8f8edc<a.>~cf8f8edd#e.~ce8cdce8cd.<a>c8c8c#def8af8."

case $1 in
reveille) echo  $reveille >/dev/speaker;;
contact)  echo  $contact >/dev/speaker;;
dance)  echo  $dance >/dev/speaker;;
loony)  echo  $loony >/dev/speaker;;
*)
	echo "No such tune. Available tunes are:"
	echo
	echo "reveille -- Reveille"
	echo "contact -- Contact theme from Close Encounters"
	echo "dance -- Lord of the Dance (aka Simple Gifts)"
	echo "loony -- Loony Toons theme"
	;;
esac
