7 gcc -o findloop findloop.c -lfftw3 -Wall -Wextra -ffast-math -lsndfile -O3
10 t=`mktemp -dt loopfinder.XXXXXX`
11 trap 'rm -rf "$t"' EXIT
25 perl tuba_loopnote_maker.mid.pl "$t"/tuba_loopnote_maker.mid $delta $program $velocity $transpose -18 -12 -6 0 6 12 18 24
29 timidity -Ow "$@" -o "$t"/out.wav "$t"/tuba_loopnote_maker.mid
32 fluidsynth -v -n -i -l -T wav -F "$t"/out.wav "$@" "$t"/tuba_loopnote_maker.mid
36 normalize --peak "$t"/out.wav
40 for note in -18 -12 -6 0 6 12 18 24; do
41 sox "$t"/out.wav "$t"/n$note.wav \
46 fn=tuba"$tubaid"_loopnote"$note".ogg
49 loopfinder/findloop "$t"/n$note.wav $fftsize $len $loopmin $loopmax "$t"/t$note.wav | while read -r SAMPLES SECONDS; do
50 oggenc -Q -q9 -o "$fn" -c "LOOP_START=$SAMPLES" "$t"/t$note.wav
54 start=$(($start+$step))