Mercurial > dottes
annotate makeHornInF.sh @ 851:4bfff0cce12d
Change morris image to another Barbara P work.
author | Jim Hague <jim.hague@acm.org> |
---|---|
date | Sat, 23 Mar 2019 15:05:20 +0000 |
parents | 06fec6764661 |
children | 1a838d8dca2a |
rev | line source |
---|---|
216 | 1 #!/bin/bash |
2 # | |
3 # Transpose a book for Horn in F. | |
4 | |
5 if [ $# != 1 ]; then | |
6 echo "Usage: makeFHorn.sh <book dir name>" | |
7 exit 1 | |
8 fi | |
9 | |
322
b4a0161e8870
Add abcrange.py to return the range of a tune, and use it in instrument transposition.
Jim Hague <jim.hague@acm.org>
parents:
263
diff
changeset
|
10 # Transpose down (return 0) if top note was > e (> a for horn). |
b4a0161e8870
Add abcrange.py to return the range of a tune, and use it in instrument transposition.
Jim Hague <jim.hague@acm.org>
parents:
263
diff
changeset
|
11 transposedown() |
b4a0161e8870
Add abcrange.py to return the range of a tune, and use it in instrument transposition.
Jim Hague <jim.hague@acm.org>
parents:
263
diff
changeset
|
12 { |
351
6bcafbfac674
Now fix logic error in makeHornInF.sh.
Jim Hague <jim.hague@acm.org>
parents:
350
diff
changeset
|
13 (($2 > 109)) |
322
b4a0161e8870
Add abcrange.py to return the range of a tune, and use it in instrument transposition.
Jim Hague <jim.hague@acm.org>
parents:
263
diff
changeset
|
14 } |
b4a0161e8870
Add abcrange.py to return the range of a tune, and use it in instrument transposition.
Jim Hague <jim.hague@acm.org>
parents:
263
diff
changeset
|
15 |
216 | 16 dir=`pwd` |
17 | |
18 booke=$dir/$1 | |
19 outdir=$dir/$1-HornInF | |
20 | |
749
06fec6764661
Revise transposition scripts to make Compact.
Jim Hague <jim.hague@acm.org>
parents:
748
diff
changeset
|
21 mkdir -p $outdir/Compact |
216 | 22 |
217
a8a46fd79d5c
Fix up problems in Horn in F transposition.
Jim Hague <jim.hague@laicatc.com>
parents:
216
diff
changeset
|
23 # Copy book component items. |
a8a46fd79d5c
Fix up problems in Horn in F transposition.
Jim Hague <jim.hague@laicatc.com>
parents:
216
diff
changeset
|
24 cp $booke/*.txt $outdir |
a8a46fd79d5c
Fix up problems in Horn in F transposition.
Jim Hague <jim.hague@laicatc.com>
parents:
216
diff
changeset
|
25 |
263
7b98278d6e8b
Add instrument name into title page for transpositions.
Jim Hague <jim.hague@acm.org>
parents:
218
diff
changeset
|
26 echo "Horn in F" > $outdir/instrument.txt |
7b98278d6e8b
Add instrument name into title page for transpositions.
Jim Hague <jim.hague@acm.org>
parents:
218
diff
changeset
|
27 |
749
06fec6764661
Revise transposition scripts to make Compact.
Jim Hague <jim.hague@acm.org>
parents:
748
diff
changeset
|
28 find $booke -name "*.abc" | sort | |
216 | 29 while read filename |
30 do | |
31 name=`basename $filename .abc` | |
749
06fec6764661
Revise transposition scripts to make Compact.
Jim Hague <jim.hague@acm.org>
parents:
748
diff
changeset
|
32 |
06fec6764661
Revise transposition scripts to make Compact.
Jim Hague <jim.hague@acm.org>
parents:
748
diff
changeset
|
33 dir=`dirname $filename` |
06fec6764661
Revise transposition scripts to make Compact.
Jim Hague <jim.hague@acm.org>
parents:
748
diff
changeset
|
34 basedir=`basename $dir` |
06fec6764661
Revise transposition scripts to make Compact.
Jim Hague <jim.hague@acm.org>
parents:
748
diff
changeset
|
35 compact="" |
06fec6764661
Revise transposition scripts to make Compact.
Jim Hague <jim.hague@acm.org>
parents:
748
diff
changeset
|
36 if [ "$basedir" = "Compact" ]; then |
06fec6764661
Revise transposition scripts to make Compact.
Jim Hague <jim.hague@acm.org>
parents:
748
diff
changeset
|
37 compact="Compact/" |
06fec6764661
Revise transposition scripts to make Compact.
Jim Hague <jim.hague@acm.org>
parents:
748
diff
changeset
|
38 fi |
06fec6764661
Revise transposition scripts to make Compact.
Jim Hague <jim.hague@acm.org>
parents:
748
diff
changeset
|
39 |
322
b4a0161e8870
Add abcrange.py to return the range of a tune, and use it in instrument transposition.
Jim Hague <jim.hague@acm.org>
parents:
263
diff
changeset
|
40 range=`./abcrange.py $filename` |
216 | 41 |
42 # Transpose concert pitch up a fifth. | |
322
b4a0161e8870
Add abcrange.py to return the range of a tune, and use it in instrument transposition.
Jim Hague <jim.hague@acm.org>
parents:
263
diff
changeset
|
43 # If there are any notes above 'd' (Horn 'g'), transpose |
216 | 44 # down a seventh instead. |
45 transpose=5 | |
322
b4a0161e8870
Add abcrange.py to return the range of a tune, and use it in instrument transposition.
Jim Hague <jim.hague@acm.org>
parents:
263
diff
changeset
|
46 if transposedown $range; then |
216 | 47 transpose=-7 |
48 fi | |
49 | |
370
ecc62b487e57
Some empty "" chords may be causing trouble with Jenkins.
Jim Hague <jim.hague@acm.org>
parents:
351
diff
changeset
|
50 # There's no point in having transposed chords. Remove from the |
ecc62b487e57
Some empty "" chords may be causing trouble with Jenkins.
Jim Hague <jim.hague@acm.org>
parents:
351
diff
changeset
|
51 # abc before transposing. Some badly formed chord items can give |
ecc62b487e57
Some empty "" chords may be causing trouble with Jenkins.
Jim Hague <jim.hague@acm.org>
parents:
351
diff
changeset
|
52 # erroneous output from abc2abc (like, strings of binary gibberish). |
ecc62b487e57
Some empty "" chords may be causing trouble with Jenkins.
Jim Hague <jim.hague@acm.org>
parents:
351
diff
changeset
|
53 sed -e "s/\"[^\"]*\"//g" $filename > $outdir/$name.abc.tmp |
ecc62b487e57
Some empty "" chords may be causing trouble with Jenkins.
Jim Hague <jim.hague@acm.org>
parents:
351
diff
changeset
|
54 |
216 | 55 # Transpose. By default abc2abc will report errors in the output, |
218
1a9d937b7765
Force Horn in F output to be in treble clef.
Jim Hague <jim.hague@laicatc.com>
parents:
217
diff
changeset
|
56 # but this messes up output formatting so stop it. Also force all |
1a9d937b7765
Force Horn in F output to be in treble clef.
Jim Hague <jim.hague@laicatc.com>
parents:
217
diff
changeset
|
57 # output to be in treble clef; some lower tunes with the odd high |
1a9d937b7765
Force Horn in F output to be in treble clef.
Jim Hague <jim.hague@laicatc.com>
parents:
217
diff
changeset
|
58 # note will otherwise appear in bass clef, which is not what this |
1a9d937b7765
Force Horn in F output to be in treble clef.
Jim Hague <jim.hague@laicatc.com>
parents:
217
diff
changeset
|
59 # crap horn player wants. |
370
ecc62b487e57
Some empty "" chords may be causing trouble with Jenkins.
Jim Hague <jim.hague@acm.org>
parents:
351
diff
changeset
|
60 abc2abc $outdir/$name.abc.tmp -e -t $transpose | \ |
749
06fec6764661
Revise transposition scripts to make Compact.
Jim Hague <jim.hague@acm.org>
parents:
748
diff
changeset
|
61 sed -e "/^ *K:/s/$/ clef=treble/" > $outdir/$compact$name.abc |
370
ecc62b487e57
Some empty "" chords may be causing trouble with Jenkins.
Jim Hague <jim.hague@acm.org>
parents:
351
diff
changeset
|
62 rm $outdir/$name.abc.tmp |
216 | 63 done |