From 61f68ffc6f102231175917d82f934afa0fecd3c6 Mon Sep 17 00:00:00 2001
From: Vasili Vershylovich <vasili_vershylovich@epam.com>
Date: Tue, 13 Oct 2020 23:51:22 +0300
Subject: [PATCH] Add Harmonic Minor tune

---
 harmonica_tablature.qml | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/harmonica_tablature.qml b/harmonica_tablature.qml
index a35d294..fbdcc44 100644
--- a/harmonica_tablature.qml
+++ b/harmonica_tablature.qml
@@ -84,6 +84,7 @@ MuseScore {
                 ListElement { text: "Richter valved"; tuning: 2 }
                 ListElement { text: "Paddy Richter (Brendan Power), valved"; tuning: 10 }
                 ListElement { text: "Natural Minor"; tuning: 7 }
+                ListElement { text: "Harmonic Minor"; tuning: 13 }
                 ListElement { text: "Melody Maker"; tuning: 8 }
                 ListElement { text: "Country"; tuning: 3 }
                 ListElement { text: "Circular (Seydel), valved"; tuning: 5 }
@@ -181,6 +182,11 @@ MuseScore {
         "+7",   "-7o",  "-8", "+8", "-8o",  "-9",     "+9b",  "+9",   "-9o",  "-10",   "+10bb",  "+10b",
         "+10", "-10o" ];  //Labeled by blow 1 like Hohner. Seydel and Lee Okar labels by draw 2
 
+        var harmonicMinor = ["+1",  "-1b",  "-1", "+2", "-2bbb",  "-2bb",   "-2b",  "-2",   "-3bbb", "-3bb",  "-3b",   "-3",
+        "+4",   "-4b",  "-4", "+5", "-5b",  "-5",     "+5o",  "+6",   "-6",   "+6o", ,   "-7", 
+        "+7",   "-7o",  "-8", "+8", "-8o",  "-9",     "+9b",  "+9",   "-10",  "+10bbb",   "+10bb",  "+10b",
+        "+10", "-10o" ];  //Labeled by blow 1 like Hohner, Seydel and Lee Okar
+
         var melodyMaker = [ , , , , , // label by draw 2
         "+1", "-1b", "-1", "+1o","+2", "-2bb","-2b", "-2", "+2o", "+3",  "-3b",   "-3",
         "+4",   "-4b",  "-4", "+4o", "+5",  "-5b",     "-5",  "+6",   "-6b",   "-6",    "+6o",   "-7",
@@ -220,6 +226,7 @@ MuseScore {
             case 10: tuning = paddyRichter; break;
             case 11: tuning = powerBender; break;
             case 12: tuning = powerDraw; break;
+            case 13: tuning = harmonicMinor; break;
             default: tuning = richter; break;
         }