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
26 cp "$t"/tuba_loopnote_maker.mid tuba$tubaid.mid
30 timidity -Ow "$@" -o "$t"/out.wav "$t"/tuba_loopnote_maker.mid
33 fluidsynth -v -n -i -l -T wav -F "$t"/out.wav "$@" "$t"/tuba_loopnote_maker.mid
37 normalize --peak "$t"/out.wav
41 for note in -18 -12 -6 0 6 12 18 24; do
42 sox "$t"/out.wav "$t"/n$note.wav \
47 fn=tuba"$tubaid"_loopnote"$note".ogg
50 loopfinder/findloop "$t"/n$note.wav $fftsize $len $loopmin $loopmax "$t"/t$note.wav | while read -r SAMPLES SECONDS; do
51 oggenc -Q -q9 -o "$fn" -c "LOOP_START=$SAMPLES" "$t"/t$note.wav
55 start=$(($start+$step))