|
Warning: this is an htmlized version!
The original is across this link, and the conversion rules are here. |
#######
#
# E-scripts on sound and music (on a very wide sense)
#
# Note 1: use the eev command (defined in eev.el) and the
# ee alias (in my .zshrc) to execute parts of this file.
# Executing this file as a whole makes no sense.
#
# Note 2: be VERY careful and make sure you understand what
# you're doing.
#
# Note 3: If you use a shell other than zsh things like |&
# and the for loops may not work.
#
# Note 4: I always run as root.
#
# Note 5: some parts are too old and don't work anymore. Some
# never worked.
#
# Note 6: the definitions for the find-xxxfile commands are on my
# .emacs.
#
# Note 7: if you see a strange command check my .zshrc -- it may
# be defined there as a function or an alias.
#
# Note 8: the sections without dates are always older than the
# sections with dates.
#
# This file is at <http://angg.twu.net/e/music.e>
# or at <http://angg.twu.net/e/music.e.html>.
# See also <http://angg.twu.net/emacs.html>,
# <http://angg.twu.net/.emacs[.html]>,
# <http://angg.twu.net/.zshrc[.html]>,
# <http://angg.twu.net/escripts.html>,
# and <http://angg.twu.net/>.
#
#######
# «.timidity» (to "timidity")
# «.playmidi» (to "playmidi")
# «.csound» (to "csound")
# «.csound-ezinefiles» (to "csound-ezinefiles")
# «.air_on_G» (to "air_on_G")
# «.festival» (to "festival")
# «.denemo» (to "denemo")
# «.scarlatti_sonatas_as_midi» (to "scarlatti_sonatas_as_midi")
# «.sound_from_C» (to "sound_from_C")
# «.nas» (to "nas")
# «.aureal_vortex» (to "aureal_vortex")
# «.disc-cover» (to "disc-cover")
# «.xmms» (to "xmms")
# «.snd» (to "snd")
# «.puredata» (to "puredata")
# «.compilation:hugo_largo» (to "compilation:hugo_largo")
# «.secrets_of_the_rocks» (to "secrets_of_the_rocks")
# «.penguinsap» (to "penguinsap")
# «.asma» (to "asma")
# «.bplay-deb-src» (to "bplay-deb-src")
See:
(find-es "music")
(find-es "alsa")
#####
#
# cdda2wav
#
#####
cdda2wav -D /dev/cdrom -t 7 mlobo_7.wav
cdda2wav -D /dev/cdrom -t 8 mlobo_8.wav
cdda2wav -D /dev/cdrom -t 9 mlobo_9.wav
cd /mp3s/MINE/WAV/
anonftp ifigenia 'cd /hda1/' 'mget mlobo_?.wav' quit
#####
#
# bladeenc-081
# 99sep??
#
#####
rm -Rv /usr/src/bladesrc-081/
cd /usr/src/
tar -xvzf $S/http/home8.swipnet.se/~w-82625/encoder/source/bladeenc-081-src-stable.tar.gz
cd /usr/src/bladesrc-081/
# make |& tee om
make CFLAGS="-O6 -malign-jumps=2 -malign-loops=2 -funroll-all-loops" \
|& tee om
#####
#
# encoder
# 99sep??
#
#####
rm -Rv /usr/src/encoder-js/
cd /usr/src/
tar -xvzf $S/ftp/wopr.campus.luth.se/pub/mpeg_layer_3/encoder-pre2.0.tgz
cd /usr/src/encoder-js/
./configure |& tee oc
make |& tee om
cd ~edrx/
/usr/src/encoder-js/encode
/usr/src/encoder-js/encode huh.wav huh.e.mp3
#####
#
# timidity
# 2001jan18
#
#####
# «timidity» (to ".timidity")
# (find-status "timidity")
# (find-vldifile "timidity.list")
# (find-udfile "timidity/")
# (find-udfile "timidity/README.Debian")
# (find-status "freepats")
# (find-vldifile "freepats.list")
# (find-udfile "freepats/")
######
#
# Using MIDI files
# 00feb11
#
######
# (find-status "abcmidi")
# (find-vldifile "abcmidi.list")
# (find-fline "/usr/doc/abcmidi/")
#*
cd /tmp/
cp -v $S/http/www.tfy.drugsense.org/jukebox/barimyst.mid .
playmidi barymist.mid
# timidity barymist.mid
#*
cd /tmp/
mftext barimyst.mid
midi2abc -f barimyst.mid
#*
######
#
# playmidi on potato
# 2000apr01
#
######
# «playmidi» (to ".playmidi")
# (find-vldifile "playmidi.list")
# (find-vldifile "" "playmidi")
# (find-vldifile "playmidi.postinst")
# (find-vldifile "playmidi.postinst" "edit")
# (find-vldifile "playmidi.postinst" "CONFFILE")
# (find-fline "/usr/doc/playmidi/")
# (find-fline "/etc/playmidi/playmidi.conf")
cd $S/http/www.cs.uu.nl/~hanwen/lilypond/mutopia/E.Satie/out-www/
playmidi petite-ouverture-a-danser.midi
######
#
# MIDI on Gravis
#
######
cd /812.C/ultrapnp/mids/
playmidi -g barimyst.mid
# (find-fline "/usr/doc/HOWTO/")
# (find-vldifile "ultra-mod2.0.30.list")
# (find-vldifile "ultra-utils.list")
# (find-vldifile "ultra.list")
# (find-fline "$HAI/Packages" "Package: ultra")
# (find-fline "/usr/doc/ultra-utils/")
######
#
#
#
######
cd /cdrom
find | grep ultra
cp -diPv $(find | grep ultra) /
pdsc /debian/main/source/sound/ultra_2.99a-devel2-1.dsc
cd /usr/src/ultra-2.99a-devel2/
debian/rules binary |& tee odrb
cd ~/HASH/
dpkg -i ultra-mod2.0.30 ultra
cd /812.C/ultrapnp/mids/
ultramidi barimyst.mid
####
#
# How should we pronounce Linux?
#
####
# (find-fline "/usr/doc/FAQ/Linux-FAQ.gz" "hear Linus himself")
cd /snarf/ftp/ftp.funet.fi/pub/Linux/PEOPLE/Linus/SillySounds/
dd if=swedish.au bs=1 skip=23000 > /dev/audio
cat swedish.au > /dev/audio
cat english.au > /dev/audio
####
#
# /dev/audio
#
####
# (find-k2file "drivers/sound/")
# (find-k2file "Documentation/devices.txt" "4 = /dev/audio")
# (find-k2file "include/linux/")
# (find-k2file "include/linux/soundcard.h")
# (find-k2file "include/linux/soundcard.h" "/dev/audio")
#####
#
# Hacking workbone
# 99jun??
#
#####
# (code-c-d "wb" "/usr/src/workbone-2.40/")
pdsc /debian/dists/slink/main/source/sound/workbone_2.40-1.dsc
cd /usr/src/workbone-2.40/
ln -s ~/C/edrxwb.c .
cat >>Makefile <<'---'
edrxwb.o: edrxwb.c workbone.h
edrxwb: edrxwb.o hardware.o
gcc -E edrxwb.c > edrxwb.E
$(CC) -o $@ $^ $(LDFLAGS)
---
cd /usr/src/workbone-2.40/
make CFLAGS='-g' LDFLAGS='' workbone
make CFLAGS='-g' LDFLAGS='' edrxwb
# (find-fline "~/C/edrxwb.c")
# (find-wbfile "")
# (find-wbfile "hardware.c")
# (gdb "gdb /usr/src/workbone-2.40/workbone")
######
#
# alsa
#
######
apt-get install alsa-modules alsalib alsautils
# (find-fline "/etc/init.d/alsa")
# (find-fline "/usr/sbin/alsaconfig")
# (find-fline "/usr/doc/alsa-modules/")
# (find-vldifile "alsa-modules.list")
# (find-fline "/usr/doc/alsalib/")
# (find-vldifile "alsalib.list")
# (find-fline "/usr/doc/alsautils/")
# (find-vldifile "alsautils.list")
# (code-c-d "alsad" "/usr/src/alsadriver-0.2.0-pre8/")
# (code-c-d "alsal" "/usr/src/alsalib-0.1.1/")
# (code-c-d "alsau" "/usr/src/alsautils-0.0.6/")
pdsc /debian/dists/slink/main/source/sound/alsadriver_0.2.0-pre8-3.dsc
cd /usr/src/alsadriver-0.2.0-pre8/
debian/rules binary |& tee odrb
#
# (find-alsadfile "debian/rules")
# (find-alsadfile "cards/interwave.c")
pdsc /debian/dists/slink/main/source/sound/alsalib_0.1.1-1.dsc
cd /usr/src/alsalib-0.1.1/
#
# (find-alsalfile "")
pdsc /debian/dists/slink/main/source/sound/alsautils_0.0.6-2.dsc
cd /usr/src/alsautils-0.0.6/
#
# (find-alsaufile "")
#####
#
# wav
#
#####
apti emusic wavtools xwave bplay
# (insert-kbd-macro (make-symbol ""))
# (setq last-kbd-macro
"# (find-vldifile \"\C-@\C-e\C-[w.list\")\C-a\C-[[B\C-m\C-[[A# (find=-\C-?\C-?-fline \"/usr/doc/\C-y/\")\C-a\C-[[B")
# (find-fline "/usr/doc/bplay/")
# (find-fline "/usr/doc/emusic/")
# (find-fline "/usr/doc/wavtools/")
# (find-fline "/usr/doc/xwave/")
# (find-vldifile "bplay.list")
# (find-vldifile "emusic.list")
# (find-vldifile "wavtools.list")
# (find-vldifile "xwave.list")
# (find-fline "$S/http/www.freshmeat.net/news/1999/")
# (find-fmfile "1999/05/20/index.html.txt")
6958 dists/potato/main/source/sound/mp3blaster_2-0b9-1.diff.gz
809 dists/potato/main/source/sound/mp3blaster_2-0b9-1.dsc
183303 dists/potato/main/source/sound/mp3blaster_2-0b9.orig.tar.gz
1297 dists/potato/main/source/sound/mp3info_0.2.16-1.diff.gz
619 dists/potato/main/source/sound/mp3info_0.2.16-1.dsc
42990 dists/potato/main/source/sound/mp3info_0.2.16.orig.tar.gz
psne $FDEBIAN/README.non-US
psne ftp://nonus.debian.org/pub/debian-non-US/ls-lR.gz
#####
#
# some slink mp3 programs
#
#####
pdsc $SDEBIAN/dists/slink/non-free/source/sound/mp3asm_0.01-1.dsc
debian/rules binary |& tee odrb
pdsc $SDEBIAN/dists/slink/non-free/source/sound/mp3info_0.2.9-1.dsc
debian/rules binary |& tee odrb
cd /usr/src/
mv *.deb .debs
apt-update
######
#
# potato freeamp
#
######
pdsc $SDEBIAN/dists/potato/main/source/sound/freeamp_1.2.0-1.dsc
cd /usr/src/freeamp-1.2.0/
debian/rules binary |& tee odrb
#####
#
# csound-3.484 (slink)
#
#####
pdsc $SDEBIAN/dists/slink/non-free/source/sound/csound_3.484.0d-1.dsc
# (find-csoundfile "Make.Targets" 31)
patch -b -z'~' Make.Targets <<'%%%'
31c31
< $(CC) -shared -Wl,-soname,$(CSADYN) -o $@ $(COBJS) $(LDFLAGS) $(LIBS) -lc
---
> $(CC) -shared -Wl,-soname,$(CSADYN) -o $@ $(COBJS) $(LDFLAGS) -lc
%%%
debian/rules binary |& tee odrb
cd /usr/src/
mv -v csound *.deb .debs/
apt-update
apti csound
# (code-c-d "csound" "/usr/src/csound-3.484.0d/")
# (find-csoundfile "")
# (find-csoundfile "odrb")
# (find-csoundfile "odrb" "dpkg-shlibdeps: warning")
# (find-fline "/usr/bin/dpkg-shlibdeps")
# (find-csoundfile "debian/tmp/DEBIAN/shlibs")
# (find-vldifile "csound.list")
# (find-fline "/usr/doc/csound/")
cd /usr/doc/csound/CsManual3.47b2/
cd /usr/doc/csound/tutorial/
# The "toot" examples:
rm -Rv /tmp/csoundtut/
mkdir /tmp/csoundtut/
cd /tmp/csoundtut/
# cp -iv /usr/doc/csound/tutorial/* .
# gzip -dv *.gz
cp -iv /usr/src/csound-3.484.0d/tutorial/* .
cd /tmp/csoundtut/
A=(1 2 3 4 5 6 7 8 9 10 11 12 13)
for i in $A; do
csound -g -W -o $i.wav toot$i.orc toot$i.sco |& tee o$i
echo $i.wav
bplay $i.wav
done
# (find-fline "/usr/src/csound-3.484.0d/benchmarks/")
#####
#
# csound (sarge)
# 2005jan13
#
#####
# «csound» (to ".csound")
# (find-status "csound")
# (find-vldifile "csound.list")
# (find-udfile "csound/")
# (find-status "csound-doc")
# (find-vldifile "csound-doc.list")
# (find-udfile "csound-doc/")
# (code-c-d "csoundman" "/usr/share/doc/csound-doc/manual/")
# (find-csoundmanfile "")
# (find-csoundmanfile "examples/a.orc")
# (find-csoundmanw3m "commandflags.html")
#*
rm -Rv /tmp/csound/
mkdir /tmp/csound/
cd /tmp/csound/
# cp -v /usr/share/doc/csound-doc/manual/examples/a* .
cp /usr/share/doc/csound-doc/manual/examples/* .
gunzip *.gz
#*
cd /tmp/csound/
csound -d -W a.orc a.sco
bplay test.wav
#*
# (find-csoundmanw3m "commandflags.html")
cd /tmp/csound/
function csplay () { csound -d -W $1 $(basename $1 .orc).sco && bplay test.wav }
for i in a*.orc; do echo $i; csplay $i; done
#*
#####
#
# csound-3.53 (+ csound-doc_3.47b2)
# (very old)
#
#####
pdsc $SDEBIAN/dists/potato/non-free/source/sound/csound_3.53.0.1d-1.dsc
cd /usr/src/csound_3.53.0.1d/
debian/rules binary |& tee odrb
pdsc $SDEBIAN/dists/potato/non-free/source/doc/csound-doc_3.47b2-1.dsc
cd /usr/src/csound-doc-3.47b2/
debian/rules binary |& tee odrb
mv -v /usr/src/csound*.deb /usr/src/.debs/
apt-update
apti csound csound-dev csound-doc
# (find-fline "/usr/doc/csound/")
# (find-fline "/usr/doc/csound-dev/")
# (find-fline "/usr/doc/csound-doc/")
# (find-vldifile "csound.list")
# (find-vldifile "csound-dev.list")
# (find-vldifile "csound-doc.list")
# Trying to play the examples. Most are silent...
# The "toot" examples from the 3.484 distribution have disappeared!
# (find-fline "$SDEBIAN/dists/slink/non-free/source/sound/csound_3.484.0d-1.diff.gz")
# (find-fline "/usr/doc/csound/examples/")
rm -Rv /tmp/csound/csound/
mkdir -p /tmp/csound/csound/
cd /usr/doc/csound/examples/
cp -dipPvR * /tmp/csound/csound/
function cs2wav () {
echo "\n$*:"
time csound -g -W $*[3,-1] -o $2.wav $1 $2
laf $2.wav
bplay $2.wav
}
cd /tmp/csound/csound/
cat > p.sco <<'---'
f0 10
i1 1 4 100
i1 10 3 150
i1 20 2 400
---
cs2wav args.orc p.sco
cs2wav control.orc p.sco
cs2wav icall.orc p.sco
cs2wav kargs.orc p.sco
cs2wav micall.orc p.sco
cs2wav return.orc p.sco
cs2wav args.{orc,sco}
cs2wav control.{orc,sco}
cs2wav icall.{orc,sco}
cs2wav kargs.{orc,sco}
cs2wav micall.{orc,sco}
cs2wav return.{orc,sco}
# Benchmarks (in the 3.484 source!)
cd /usr/src/csound-3.484.0d/benchmarks/
cs2wav bach.{orc,sco}
cs2wav guitar.{orc,sco}
cs2wav james.{orc,sco}
cs2wav risset1.{orc,sco}
#####
#
# csound - playing the Ezine files
# 99oct24
#
#####
# «csound-ezinefiles» (to ".csound-ezinefiles")
# (find-es "music" "csound")
cd $S/http/www.werewolf.net/~hljmm/Ezine/
find * | egrep '(orc|sco|srt)$' |& tee ~/o
rm -Rv /tmp/csound/
mkdir /tmp/csound/
cd $S/http/www.werewolf.net/~hljmm/Ezine/
for i in $(find * | egrep '(orc|sco|srt)$'); do
cp -Pv $i /tmp/csound/
tr -d \\r < $i > /tmp/csound/$i
done
function cs2wav () {
echo "\n$*:"
time csound -g -W $*[3,-1] -o $2.wav $1 $2
laf $2.wav
bplay $2.wav
}
cd /tmp/csound/
cs2wav Spring1999/beginner/bgoscil.{orc,sco}
cs2wav Spring1999/synthesis/parosc.{orc,sco}
cs2wav Spring1999/processing/tokbox.{orc,sco}
cs2wav Spring1999/within/depletion.{orc,sco}
cs2wav Winter1999/beginner/myfile.{orc,sco}
cs2wav beginners/envelop.{orc,sco}
cs2wav Winter1999/processing/{tanh.orc,tanh1.sco}
cs2wav Winter1999/processing/{tanh.orc,tanh2.sco}
cs2wav processing/delay.{orc,sco}
# This one takes almost four minutes to generate.
cs2wav Winter1999/synthesis/ca.{orc,sco}
# This one took 1'20''.
cs2wav synthesis/julia.{orc,sco}
# These generate only silence.
cs2wav realtime/fofrt.{orc,sco}
cs2wav Spring1999/realtime/anmod.{orc,sco}
cs2wav Spring1999/within/Within.{orc,sco}
# Other things:
# (find-fline "/tmp/csound/examples/")
# and I don't know how to use the "score.srt" files.
#####
#
# rms' free software song
# 99oct??
#
#####
cd $S/http/www.liacs.nl/~wichert/
bplay why-cooperation-with-rms-is-impossible.au
cd $S/http/www.liacs.nl/~wichert/
mp freesoftwareSong-remix.mp3
#####
#
# midikb
# 99nov27
#
#####
rm -Rv /usr/src/midikb-0.4.3/
cd /usr/src/
tar -xvzf $S/http/www.sdf.se/~simon/dl/midikb-0.4.3.tar.gz
cd /usr/src/midikb-0.4.3/
./configure |& tee oc
make |& tee om
cd /usr/src/midikb-0.4.3/
strace-to ~/s \
src/midikb -c midikb.conf.english
# (find-fline "/usr/src/midikb-0.4.3/")
# (find-fline "/usr/src/midikb-0.4.3/README" "output >/dev/midi")
# (find-fline "/usr/src/midikb-0.4.3/midikb.conf.english")
#####
#
# klav
# 99nov27
#
#####
rm -Rv /usr/src/klav-0.0.4/
cd /usr/src/
tar -xvzf $S/http/www.sdf.se/~simon/dl/klav-0.0.4.tar.gz
cd /usr/src/klav-0.0.4/
make |& tee om
# (find-fline "/usr/src/klav-0.0.4/om")
#####
#
# cecilia
# 99nov27
#
#####
pdsc $SDEBIAN/dists/slink/non-free/source/sound/cecilia_2.0.2-1.dsc
cd /usr/src/cecilia-2.0.2/
debian/rules binary |& tee odrb
mv -v /usr/src/cecilia*.deb /usr/src/.debs/
apt-update
apti cecilia
# (find-vldifile "cecilia.list")
# (find-fline "/usr/doc/cecilia/")
cd /usr/doc/cecilia/html/
edrxnetscape index.html
#####
#
# rosegarden
# 99nov27
#
#####
apti rosegarden tclmidi
# (find-vldifile "rosegarden.list")
# (find-fline "/usr/doc/rosegarden/")
# (find-vldifile "tclmidi.list")
# (find-fline "/usr/doc/tclmidi/")
pdsc /big/slinks2/dists/slink/main/source/sound/tclmidi_3.1-4.dsc
debian/rules binary |& tee odrb
# ld: cannot open -lg++: No such file or directory
# (find-fline "/usr/src/tclmidi-3.1/tests/")
# (find-fline "/usr/src/tclmidi-3.1/tests/copy.test")
expect -c '
package require tclmidi
puts [midimake]
'
# even the humblest call causes a segfault...
cd /usr/src/tclmidi-3.1/tests/
for i in *.test; do
expect -c '
package require tclmidi
' $i
done
load tclmidi31.so
# (find-fline "/usr/bin/tmplay")
#####
#
# MIDIs from Wendy Carlos' site
# 99nov27
#
#####
# «air_on_G» (to ".air_on_G")
#*
cd /tmp/
unzip $S/http/www.wendycarlos.com/resources/airongst.zip
# playmidi airongst
timidity airongst
#*
# The chords on the left hand (?) sound really horrible on my OPL3-SAX
# if I use playmidi (i.e., if I use the built-in instruments of the
# card). With timidity it sounds quite ok, but John Sankey's stuff
# survive the MIDIzation much better.
#####
#
# Speech syntesizers
# 2003feb17
#
#####
# (find-available "festival")
# (find-available "recite")
# (find-available "epos-ptd")
# (find-available "speech-tools")
#####
#
# festival (on potato)
# 2000apr01
#
#####
# «festival» (to ".festival")
apti festival festvox-rablpc8k
nas-lib
speech-tools1
festival
festlex-oald
festlex-poslex
festvox-rablpc8k
# (find-fline "/usr/doc/festival/")
# (find-fline "/usr/doc/festlex-oald/")
# (find-fline "/usr/doc/festlex-poslex/")
# (find-fline "/usr/doc/festvox-rablpc8k/")
# (find-fline "/usr/doc/nas-lib/")
# (find-fline "/usr/doc/speech-tools1/")
# (find-vldifile "festival.list")
# (find-vldifile "festlex-oald.list")
# (find-vldifile "festlex-poslex.list")
# (find-vldifile "festvox-rablpc8k.list")
# (find-vldifile "nas-lib.list")
# (find-vldifile "speech-tools1.list")
echo "hello you, I'm festival" | festival --tts
cd /usr/doc/festival/examples/
zcat saytime.sh.gz > /tmp/saytime.sh
festival --script /tmp/saytime.sh
festival --tts intro.text
festival --tts benchmark.text
festival --tts ex1.ogi
aptrm \
speech-tools1 \
festival \
festlex-oald \
festlex-poslex \
festvox-rablpc8k
#####
#
# denemo
# 2005jan12
#
#####
# «denemo» (to ".denemo")
# (find-status "denemo")
# (find-vldifile "denemo.list")
# (find-udfile "denemo/")
# (find-udfile "denemo/README.gz")
# (find-udfile "denemo/README.gz" "insert a half note")
# (find-udfile "denemo/examples/english.keymaprc")
#####
#
# Scarlatti's sonatas
# 2005jan11
#
#####
# «scarlatti_sonatas_as_midi» (to ".scarlatti_sonatas_as_midi")
# (find-shttpw3 "www.geocities.com/Vienna/Studio/1714/")
unzip -l $S/http/www.geocities.com/Vienna/Studio/1714/scarlatti.zip
# http://sankey.ws/data/scarlatti.zip
# http://sankey.ws/scarlatti.zip
# http://sankey.ws/ross.sbk
# http://sankey.ws/ross.sf2
# http://sankey.ws/my.html
# (find-status "timidity")
# (find-vldifile "timidity.list")
# (find-udfile "timidity/")
# (find-man "1 timidity")
# (find-man "1 timidity" "--chorus")
# (find-man "5 timidity.cfg")
#*
rm -Rv /tmp/scarlatti/
mkdir /tmp/scarlatti/
cd /tmp/scarlatti/
unzip -L $S/http/sankey.ws/scarlatti.zip
cp -v $S/http/sankey.ws/ross.sbk .
cat > ross.cfg <<'%%%'
bank 0
6 %font ross.sbk 0 0
%%%
#*
cd /tmp/scarlatti/
timidity -c ross.cfg --chorus=d k162.mid
timidity -c ross.cfg --chorus=d --reverb=d k162.mid
#timidity -c ross.cfg k162.mid
#*
cd /tmp/scarlatti/
# playmidi k026.mid
timidity k026.mid
#*
* (eechannel-xterm "S")
# The 12 sonatas in Andras Schiff's Hungaroton CD:
SCA=/tmp/scarlatti/
function T () { timidity -c $SCA/ross.cfg --chorus=d --reverb=d $*; }
echo 1; T k162.mid
echo 2; T k322.mid
echo 3; T k027.mid
echo 4; T k096.mid
echo 5; T k394.mid
echo 6; T k017.mid
echo 7; T k420.mid
echo 8; T k518.mid
echo 9; T k519.mid
echo 10; T k208.mid
echo 11; T k427.mid
echo 12; T k491.mid
cd /tmp/scarlatti/; cp -v \
k162.mid k322.mid k027.mid k096.mid k394.mid \
k017.mid k420.mid k518.mid k519.mid k208.mid \
k427.mid k491.mid \
~/SQUEAK/
# k394 sounds bad when rendered in real-time.
# How to
# (find-man "timidity")
function T () { timidity -c ross.cfg --chorus=d --reverb=d $*; }
cd /tmp/scarlatti/
T -OvM -o /tmp/k394.ogg k394.mid
#####
#
# soundtracker
# 2000jun17
#
#####
# (find-status "soundtracker")
# (find-vldifile "soundtracker.list")
# (find-fline "/usr/doc/soundtracker/")
# Where do I get mods and instruments?
#####
#
# spiralsynth
# 2000sep12
#
#####
apti libfltk-dev
apti mesag-dev
rm -Rv /usr/src/SpiralSynth-0.1.6/
cd /usr/src/
tar -xvzf $S/http/www.blueammonite.f9.co.uk/SpiralSynth/dload/SpiralSynth-0.1.6.tar.gz
cd /usr/src/SpiralSynth-0.1.6/
find * -name '*.[Cch]' > .files.Cch
etags $(.files.Cch)
./configure |& tee oc
make |& tee om
cd /usr/src/SpiralSynth-0.1.6/
cp -v .SpiralPatches.bank ~
# (find-fline "~/" ".Spiral")
# (code-c-d "spirsy" "/usr/src/SpiralSynth-0.1.6/")
# (find-spirsyfile "")
# (find-spirsyfile "oc")
# (find-spirsyfile "config.log")
# (find-spirsytag "main")
#####
#
# Generating sound from C
# 2001feb16
#
#####
# «sound_from_C» (to ".sound_from_C")
# http://i2pi.com/comprez/tutorial/
# http://i2pi.com/comprez/tutorial/c2k-tut1.c
# http://i2pi.com/comprez/tutorial/c2k-tut2.c
# http://i2pi.com/comprez/tutorial/c2k-tut3.c
# http://i2pi.com/comprez/tutorial/c2k-tut4.c
# http://i2pi.com/comprez/tutorial/c2k-tut5.c
# http://i2pi.com/comprez/tutorial/c2k-tut6.c
# http://i2pi.com/comprez/tutorial/c2k-tut7.c
# http://i2pi.com/comprez/tutorial/c2k-tut8.c
# (find-w3m "$S/http/i2pi.com/comprez/index.html")
# (find-w3m "$S/http/i2pi.com/comprez/index.html" "sox")
# (find-w3m "$S/http/i2pi.com/comprez/tutorial/index.html")
# (find-shttpw3 "comprez.i2pi.com/tutorial.html")
# (find-shttpfile "comprez.i2pi.com/")
# (find-shttpfile "comprez.i2pi.com/c2k-tut1.c")
#*
rm -Rv /tmp/c-sound/
mkdir /tmp/c-sound/
cd /tmp/c-sound/
cp -v $S/http/i2pi.com/comprez/tutorial/* .
cp -v /oldfs/6/snarf/http/comprez.i2pi.com/c2k-tut9.c . ;# older copy
for i in 1 2 3 4 5 6 7 8 9; do
echo $i; gcc -lm -o c2k-tut$i c2k-tut${i}.c
./c2k-tut$i > out${i}.raw
done
#*
cd /tmp/c-sound/
bplay -b 16 -S -s 44100 out1.raw
bplay -b 16 -S -s 44100 out2.raw
bplay -b 16 -S -s 44100 out3.raw
bplay -b 16 -S -s 44100 out4.raw
bplay -b 16 -S -s 44100 out5.raw
bplay -b 16 -S -s 44100 out6.raw
bplay -b 16 -S -s 44100 out7.raw
bplay -b 16 -S -s 44100 out8.raw
bplay -b 16 -S -s 44100 out9.raw
#*
#####
#
# nas (network audio system)
# 2001oct21
#
#####
# «nas» (to ".nas")
# (find-status "nas-bin")
# (find-vldifile "nas-bin.list")
# (find-fline "/usr/doc/nas-bin/")
# (find-status "nas-doc")
# (find-vldifile "nas-doc.list")
# (find-fline "/usr/doc/nas/")
# (find-fline "/usr/doc/nas-doc/")
# (find-status "nas")
# (find-vldifile "nas.list")
# (find-fline "/usr/doc/nas/")
# (find-fline "/usr/bin/start-nas")
# (find-fline "/etc/init.d/nas")
start-nas
/etc/init.d/nas start
auplay /snarf/http/www.pgeek.com/turtle.au
/etc/init.d/nas stop
#####
#
# aureal vortex driver
# 2002may14
#
#####
# «aureal_vortex» (to ".aureal_vortex")
#
# ----------\
# | \
# in black \
# | cd_in \
# mic green \
# | tad \
# out white \
# | aux_in \----
# j |
# o |
# y VORTEX |
# s AU8830A2 |
# t AAPXP |
# i 9923-M4J28 |
# c |
# k--------- |
# |||||||||||||
#
# Aureal semiconductor
# vortex 2
#*
rm -Rv /debian/tmp/aureal/
cd /debian/tmp/
tar -xvzf ~/tmp/au88xx-1.1.2.tar.gz
cd /debian/tmp/aureal/
make |& tee om
#*
# (code-c-d "aureal" "/debian/tmp/aureal/")
# (find-aurealfile "")
# (find-aurealfile "README" "8830-based (Vortex 2)" "make install")
# (find-aurealfile "Makefile")
# (find-aurealfile "Makefile" "ifndef AUCHIP\nAUCHIP = AU8830")
# (find-aurealfile "Makefile" "install:")
#####
#
# disc-cover
# 2003mar13
#
#####
# «disc-cover» (to ".disc-cover")
# (find-status "disc-cover")
# (find-vldifile "disc-cover.list")
# (find-fline "/usr/doc/disc-cover/")
# (find-fline "/usr/bin/disc-cover")
# (find-fline "/usr/bin/disc-cover" "disc-cover-$process_number")
# (find-status "cdcover")
# (find-vldifile "cdcover.list")
# (find-fline "/usr/doc/cdcover/")
# (find-fline "$S/http/www.freedb.org/freedb/rock/c90d450e")
# (find-progoutput "disc-cover -h")
#*
cd /tmp/
rm -Rv disc-cover*
cp -v $S/http/www.freedb.org/freedb/rock/c90d450e .
disc-cover -r -f c90d450e
mv -v disc-cover-* disc-cover
mv -v Various_*.ps disc-cover/disc-cover.ps
cd /tmp/disc-cover/
cp -v disc-cover.tex dc.tex
#*
# «my-disc-cover.tex»
# (find-angg "LATEX/my-disc-cover.tex")
# (find-fline "/tmp/disc-cover/dc.tex")
# (fooi "\\color{black}" "" "\\bfseries" "" "\\sffamily " "" "\\sffamily" "")
cd ~/LATEX/
latex my-disc-cover.tex && dvips my-disc-cover.dvi && regv my-disc-cover.ps
#*
# (find-fline "/tmp/disc-cover/dc.tex")
cd /tmp/disc-cover/
latex dc.tex && dvips dc.dvi && regv dc.ps
#*
cd $usr_src/
rm -Rv $usr_src/disc-cover-1.4.0/
tar -xvzf $S/http/home.wanadoo.nl/jano/files/disc-cover-1.4.0.tar.gz
cd $usr_src/disc-cover-1.4.0/
#####
#
# solfege (from the .tar.gz)
# 2000sep18
#
#####
apti python-gtk python-gnome
#*
rm -Rv /usr/src/solfege-0.7.22/
cd /usr/src/
tar -xvzf $S/http/download.sourceforge.net/solfege/solfege-0.7.22.tar.gz
cd /usr/src/solfege-0.7.22/
mkdir tmp
# --sequencer-device=/dev/sequencer
./configure --prefix=$PWD/tmp |& tee oc
make |& tee om
make install |& tee omi
cd /usr/src/solfege-0.7.22/tmp/bin/
./solfege
#*
# (code-c-d "solf" "/usr/src/solfege-0.7.22/")
# (find-solffile "")
# (find-solffile "INSTALL" "--prefix")
# (find-solffile "online-docs/C/changelog.html" "dev/music")
man2t /usr/src/solfege-0.7.22/solfege.1 | l
cd /dev
mknod music u 14 8
rm /dev/music
# Sound is impossible to hear. Maybe I need that bugful 2.4 kernel to
# have /dev/music working.
#####
#
# xmms
# 2004sep07
#
#####
# «xmms» (to ".xmms")
# (find-status "xmms")
# (find-vldifile "xmms.list")
# (find-udfile "xmms/")
# (find-udfile "xmms/FAQ.gz")
# (find-udfile "xmms/README.gz")
# (find-man "1 xmms")
# (find-udfile "xmms/README.gz" "\n2.3 Skin Installation")
# (find-fline "~/.xmms/")
# http://www.xmms.org/files/Skins/minEguE-xmms-v2.zip
# http://www.xmms.org/files/Skins/UltrafinaSE.zip
#*
cd ~/.xmms/Skins/
cp -v $S/http/www.xmms.org/files/Skins/* .
#*
#####
#
# snd
# 2004oct12
#
#####
# «snd» (to ".snd")
# (find-status "snd")
# (find-vldifile "snd.list")\
# (find-udfile "snd/")
# (find-fline "/usr/share/snd/")
# (find-status "snd-doc")
# (find-vldifile "snd-doc.list")
# (find-udfile "snd-doc/")
# (find-status "snd-gtk")
# (find-vldifile "snd-gtk.list")
# (find-udfile "snd-gtk/")
# (find-man "1 snd")
#*
firefox /usr/share/doc/snd-doc/HTML/manual/index.html &
#*
firefox /usr/share/doc/snd-doc/HTML/tutorial/index.html &
#*
cp -v /oldfs/music/kristi/07-Only_Love_Remains.wav /tmp/07.wav
#*
snd /tmp/07.wav &
#*
#####
#
# normalize
# 2005mar01
#
#####
# (find-status "normalize")
# (find-vldifile "normalize.list")
# (find-udfile "normalize/")
# http://thobias.org/doc/conv_audio.html
#####
#
# puredata
# 2005mar17
#
#####
# «puredata» (to ".puredata")
# (find-status "puredata")
# (find-vldifile "puredata.list")
# (find-udfile "puredata/")
# (find-status "pd-zexy")
# (find-vldifile "pd-zexy.list")
# (find-udfile "pd-zexy/")
http://www-crca.ucsd.edu/~msp/
http://pd-graz.mur.at/label/book01/bangbook
#####
#
# Compilation: Hugo Largo (Drum + Mettle)
# 2006jan28
#
#####
# «compilation:hugo_largo» (to ".compilation:hugo_largo")
#*
# (find-fline "/oldfs/music/fernanda1/")
# (find-fline "/big/music/mp3/Drum/")
# (find-fline "/tmp/hugolargo/")
mkdir /tmp/hugolargo/
cd /tmp/hugolargo/
FERNANDA1=/oldfs/music/fernanda1/
MP3DRUM=/big/music/mp3/Drum/
ptowav a1_grow_wild.wav $MP3DRUM/1_grow_wild.mp3
ptowav a4_harpers.wav $MP3DRUM/4_harpers.mp3
ptowav a5_scream_tall.wav $MP3DRUM/5_scream_tall.mp3
ptowav a6_country.wav $MP3DRUM/6_country.mp3
ptowav a2_eskimo_song.wav "$FERNANDA1/Hugo Largo (2) - Eskimo Song.wav"
ptowav a3_fancy.wav "$FERNANDA1/Hugo Largo (3) - Fancy.wav"
ptowav a8_second_skin.wav "$FERNANDA1/Hugo Largo (8) - Second Skin.wav"
ptowav a9_myfavpeople.wav "$FERNANDA1/Hugo Largo (9) - My Favourite People.wav"
silentwav 100 b0_10s-of-silence.wav
ptowav b1_turtle_song.wav "$FERNANDA1/Hugo Largo (1) - Turtle Song.wav"
ptowav b4_hway_knowing.wav "$FERNANDA1/Hugo Largo (4) - Halfway Knowing.wav"
ptowav b5_4_brothers.wav "$FERNANDA1/Hugo Largo (5) - 4 Brothers.wav"
#*
cd /tmp/hugolargo/
makecdrdaotoc 2004122055555 *.wav > toc.toc
showcdrdaotracks *.wav
# (find-zsh "cd /tmp/hugolargo/; showcdrdaotracks *.wav")
cdrdao read-test toc.toc
cdrdao toc.toc
cdrdao write -v 5 --speed 8 --device /dev/hdd --driver generic-mmc toc.toc
#####
#
# Kristi Stassinopoulou's "Secrets of the Rocks"
# 2006oct01
#
#####
# «secrets_of_the_rocks» (to ".secrets_of_the_rocks")
# (find-fline "~/NICOTINE/KRISTI_STASSINOPOULOU/Secrets_of_the_rocks/")
#*
mkdir /tmp/kstas/
cd /tmp/kstas/
for i in ~/NICOTINE/KRISTI_STASSINOPOULOU/Secrets_of_the_rocks/*.mp3; do
# echo ptowav $(basename $i .mp3).wav $i
ptowav $(basename $i .mp3).wav $i
done
#*
cdrdao read-test =(makecdrdaotoc 2006100155555 /tmp/kstas/*.wav)
#*
cdrdao write -v 5 --speed 8 --device /dev/hdc --driver generic-mmc \
=(makecdrdaotoc 2006100155555 /tmp/kstas/*.wav)
#*
#*
cdrdao read-test =(makecdrdaotoc 2006100155554 /tmp/cuba/*.wav)
#*
cdrdao write -v 5 --speed 8 --device /dev/hdc --driver generic-mmc \
=(makecdrdaotoc 2006100155554 /tmp/cuba/*.wav)
#*
#####
#
# pengiunsap-0.1 (a console SAP player)
# 2007aug31
#
#####
# «penguinsap» (to ".penguinsap")
# http://asma.atari.org/
# http://asma.atari.org/main.html#plr
# http://asma.atari.org/bin/pengiunsap-0.1.tar.bz2
# http://asma.atari.org/bin/pengiunsap-0.1.tar.gz
# ^ the .bz2 extension is wrong, we have to copy the .bz2 to a .gz.
#*
cd $S/http/asma.atari.org/bin/
cp -v pengiunsap-0.1.tar.bz2 \
pengiunsap-0.1.tar.gz
#*
rm -Rv ~/usrc/penguinsap-0.1/
tar -C ~/usrc/ -xvzf \
$S/http/asma.atari.org/bin/pengiunsap-0.1.tar.gz
cd ~/usrc/penguinsap-0.1/
rm -v .main.cpp.swp
make depend |& tee omd
make |& tee om
#*
# (code-c-d "penguinsap" "~/usrc/penguinsap-0.1/")
# (find-penguinsapfile "")
# (find-penguinsapfile "README")
# Installation:
# (find-fline "~/bin/" " sap")
# (find-sh0 "rm -v ~/bin/sap")
# (find-sh0 "cd ~/bin/; cp -sfv ../usrc/penguinsap-0.1/sap .")
#####
#
# ASMA (a big archive of SAP songs)
# 2007aug31
#
#####
# «asma» (to ".asma")
# http://asma.atari.org/
# http://asma.atari.org/bin/asma32.zip
#*
unzip -d /tmp/ $S/http/asma.atari.org/bin/asma32.zip
rm -Rv ~/usrc/asma/
rm -Rv ~/usrc/ASMA/
unzip -d ~/usrc/ /tmp/files
rm -Rv ~/usrc/asma/
#*
# (code-c-d "asma" "~/usrc/ASMA/")
# (find-asmafile "")
* (eepitch-shell)
# (find-asmafile "Docs/STIL.txt")
cd ~/usrc/ASMA/
sap Various/Grayscale/Kwiatek_Grzegorz/Desastre.sap
sap Unsorted/Wiosna.sap
#####
#
# mmsap-1.6
# 2007aug31
#
#####
# http://mmsap.sourceforge.net/
# http://ufpr.dl.sourceforge.net/sourceforge/mmsap/mmsap-1.6c.tar.gz
#*
rm -Rv ~/usrc/mmsap-1.6/
tar -C ~/usrc/ -xvzf \
$S/http/ufpr.dl.sourceforge.net/sourceforge/mmsap/mmsap-1.6c.tar.gz
cd ~/usrc/mmsap-1.6/
rm -v mmsap-als
rm -v mmsap-sdl
# Broken:
./compile-alsa |& tee oca
./compile-sdl |& tee ocs
#*
# (code-c-d "mmsap" "~/usrc/mmsap-1.6/")
# (find-mmsapfile "")
# (find-mmsapfile "readme.txt" "4. How to compile")
apti libgtkmm-dev
#####
#
# bplay (from the debian sources)
# 2007sep04
#
#####
# «bplay-deb-src» (to ".bplay-deb-src")
# http://ftp.debian.org/debian/pool/main/b/bplay/
# http://ftp.debian.org/debian/pool/main/b/bplay/bplay_0.991-9.dsc
# http://ftp.debian.org/debian/pool/main/b/bplay/bplay_0.991-9.diff.gz
# http://ftp.debian.org/debian/pool/main/b/bplay/bplay_0.991.orig.tar.gz
#*
rm -Rv ~/usrc/bplay/
mkdir ~/usrc/bplay/
cd $S/http/ftp.debian.org/debian/pool/main/b/bplay/
cp -v bplay_0.991* ~/usrc/bplay/
cd ~/usrc/bplay/
dpkg-source -sn -x bplay_0.991-9.dsc
cd ~/usrc/bplay/bplay-0.991/
dpkg-buildpackage -us -uc -b -rfakeroot |& tee odb
#*
# (find-fline "~/usrc/bplay/")
* (eepitch-shell)
cd ~/usrc/bplay/
sudo dpkg -i *.deb
#*
# (find-status "bplay")
# (find-vldifile "bplay.list")
# (find-udfile "bplay/")
# (find-bplayfile "debian/changelog" "claviola@debian.org")
# (find-bplayfile "bplay.c" "strcmp(progname, \"brec\")")
# (find-bplayfile "bplay.c" "if (recorder)")
# (code-c-d "bplay" "~/usrc/bplay/bplay-0.991/")
# (find-bplayfile "")
# (find-bplayfile "" "bplay.1" '(woman-dired-find-file))
# (find-bgprocess "xterm -e sudo aumix")
* (eepitch-shell)
cd /tmp/
brec -t 2 -D 2 /tmp/o.wav
bplay /tmp/o.wav
brec -t 2 -D 2 -r /tmp/o.raw
# (find-fline "/tmp/o.raw")
bplay o.wav
#####
#
# libsndfile (from the debian sources)
# 2007sep06
#
#####
# «libsndfile-deb-src»
# http://ftp.debian.org/debian/pool/main/libs/libsndfile/
# http://ftp.debian.org/debian/pool/main/libs/libsndfile/libsndfile_1.0.17-3.dsc
# http://ftp.debian.org/debian/pool/main/libs/libsndfile/libsndfile_1.0.17-3.diff.gz
# http://ftp.debian.org/debian/pool/main/libs/libsndfile/libsndfile_1.0.17.orig.tar.gz
# Homepage: http://www.mega-nerd.com/libsndfile/
# dpkg-checkbuilddeps: Unmet build dependencies: libflac-dev (>= 1.1.4-3) libasound2-dev
# dpkg-buildpackage: Build dependencies/conflicts unsatisfied; aborting.
#*
rm -Rv ~/usrc/libsndfile/
mkdir ~/usrc/libsndfile/
cd $S/http/ftp.debian.org/debian/pool/main/libs/libsndfile/
cp -v libsndfile_1.0.17* ~/usrc/libsndfile/
cd ~/usrc/libsndfile/
dpkg-source -sn -x libsndfile_1.0.17-3.dsc
cd ~/usrc/libsndfile/libsndfile-1.0.17/
dpkg-buildpackage -us -uc -b -rfakeroot |& tee odb
#*
# (find-fline "~/usrc/libsndfile/")
* (eepitch-shell)
cd ~/usrc/libsndfile/
sudo dpkg -i *.deb
#*
# (code-c-d "libsndfile" "~/usrc/libsndfile/libsndfile-1.0.17/")
# (find-libsndfilefile "")
# (find-available "grandfatherclock")
# http://www.sourceforge.net/projects/grandfather/
#
# As a matter of fact, grandfatherclock can be configured to execute
# any command. The upstream default is simply to write a *.au file to
# a sound device file by using cat(1).
#
# Since cat is not a good sound player, the default is changed to use
# sox instead. grandfatherclock depends on sox to ensure that it can
# run under the default configuration. You also need a kernel support
# for a sound device to use grandfatherclock.
http://insanecoding.blogspot.com/2007/05/sorry-state-of-sound-in-linux.html
http://www.davep.org/emacs/festival.el
# Local Variables:
# coding: raw-text-unix
# ee-delimiter-hash: "\n#*\n"
# ee-delimiter-percent: "\n%*\n"
# ee-anchor-format: "«%s»"
# End: