Mercurial > dottes
diff makeWebAudio.sh @ 1029:1139aa0eb0c2
Revist tempo change code when generating web audio.
Now Mac friendly.
author | Jim Hague <jim.hague@acm.org> |
---|---|
date | Wed, 19 Feb 2020 10:33:55 +0000 |
parents | e4d31e094d24 |
children | 70e1ff83fe34 |
line wrap: on
line diff
--- a/makeWebAudio.sh Tue Feb 18 18:20:19 2020 +0000 +++ b/makeWebAudio.sh Wed Feb 19 10:33:55 2020 +0000 @@ -60,14 +60,20 @@ echo "Warning: $1 has no tempo. Using 120." tempo="120" fi - pos=`expr index $tempo '='` - numtempo=${tempo:pos} - notelenprefix=${tempo:0:pos} + numtempo=${tempo##*=} + notelenprefix=${tempo%%=*} + if [ "$notelenprefix" = "$numtempo" ]; then + notelenprefix= + else + notelenprefix="${notelenprefix}=" + fi # Calculate new tempo. newtempo=$(( ( $numtempo * $4 ) / $5 )) + echo "Old tempo $tempo new tempo ${notelenprefix}${newtempo}" # Insert new tempo and delete old. Old may not exist, # so do this rather than overwrite. - sed -e "/^Q:/d" -e "/^K:/aQ: ${notelenprefix}${newtempo}" $1 > $tunedir/$newspeedfilename + sed -e "/^Q:/d" -e "/^K:/a\\ +Q: ${notelenprefix}${newtempo}" $1 > $tunedir/$newspeedfilename makeaudiofiles $tunedir/$newspeedfilename $tunedir --mute=0,-1 rm $tunedir/$newspeedfilename }