From 866716676f5be34262d1ca81add5047f55d16ede Mon Sep 17 00:00:00 2001
From: Jules Laplace <jules@okfoc.us>
Date: Tue, 20 Sep 2016 13:46:49 -0400
Subject: handle negative notes and non-octave scales

---
 index.html | 62 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 62 insertions(+)

(limited to 'index.html')

diff --git a/index.html b/index.html
index fc82edb..38aeeca 100644
--- a/index.html
+++ b/index.html
@@ -52,6 +52,52 @@ pre {
  1200.
 </script>
 
+<script type="text/scale" id="mavila12-scl">
+! mavila12.scl
+!
+A 12-note mavila scale (for warping meantone-based music), 5-limit TOP
+ 12
+!
+-30.99719
+ 163.50770
+ 358.01258
+ 327.01540
+ 521.52028
+ 490.52310
+ 685.02798
+ 654.03080
+ 848.53568
+ 1043.04057
+ 1012.04338
+ 1206.54826
+</script>
+
+<script type="text/scale" id="carlos_alpha-scl">
+! carlos_alpha.scl
+!
+Wendy Carlos' Alpha scale with perfect fifth divided in nine
+ 18
+!
+ 78.00000
+ 156.00000
+ 234.00000
+ 312.00000
+ 390.00000
+ 468.00000
+ 546.00000
+ 624.00000
+ 702.00000
+ 780.00000
+ 858.00000
+ 936.00000
+ 1014.00000
+ 1092.00000
+ 1170.00000
+ 1248.00000
+ 1326.00000
+ 1404.00000
+</script>
+
 <pre>
 <script src="intonation.js"></script>
 <script>
@@ -115,6 +161,22 @@ write("meantone.scl:")
 write( s.range(0, s.scale.length+1).map(function(i){ return i.toFixed(0) }).join(delim) )
 write("")
 
+s = new Intonation({
+  scl: document.querySelector("#mavila12-scl").innerHTML
+})
+write("mavila12.scl:")
+write( s.range(0, s.scale.length+1).map(function(i){ return i.toFixed(0) }).join(delim) )
+write( s.range(0, (s.scale.length*2)+1).map(function(i){ return i.toFixed(0) }).join(delim) )
+write("")
+
+s = new Intonation({
+  scl: document.querySelector("#carlos_alpha-scl").innerHTML
+})
+write("carlos_alpha.scl (does not contain octave):")
+write( s.range(0, s.scale.length+1).map(function(i){ return i.toFixed(0) }).join(delim) )
+write( s.range(0, (s.scale.length*2)+1).map(function(i){ return i.toFixed(0) }).join(delim) )
+write("")
+
 </script>
 <script src="http://asdf.us/harp/js/vendor/Tone.min.js"></script>
 <script>
-- 
cgit v1.2.3-70-g09d2