diff --git a/Source/aeolus/scale.cpp b/Source/aeolus/scale.cpp index 137c2fe..496e97c 100644 --- a/Source/aeolus/scale.cpp +++ b/Source/aeolus/scale.cpp @@ -56,6 +56,25 @@ const Scale::Map Scale::_scales = { 1.8691860f, } }, + { + // based on https://www.huygens-fokker.org/docs/scalesdir.txt + // (meansixth.scl) 1/6-comma meantone scale (tritonic temperament of Salinas) + Scale::MeanSixth, + { + 1.0000000f, + 1.0525061f, + 1.1203511f + 1.1925695f, + 1.2551867f, + 1.3360967f, + 1.4062500f, + 1.4968975f, + 1.5754938f, + 1.6770509f, + 1.7851545f, + 1.8788860f, + } + }, { Scale::Werckm3, { @@ -228,7 +247,8 @@ juce::String Scale::getNameForType(Type type) { static const std::map names { { Pythagorean, "Pythagorean" }, - { MeanQuart, "Meantone" }, + { MeanQuart, "Meantone (1/4 comma)" }, + { MeanSixth, "Meantone (1/6 comma)" }, { Werckm3, "Werckmeister" }, { Kirnberg3, "Kirnberger" }, { WellTemp, "Well tempered" },