Mercurial > dottes

changeset 1029:1139aa0eb0c2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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 ac7e1edc114f
children 70e1ff83fe34
files makeWebAudio.sh
diffstat 1 files changed, 10 insertions(+), 4 deletions(-) [+]
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
 }