Changeset 29152

Timestamp:

01/28/09 05:36:50 (4 years ago)

Author:

moriyoshi

Message:

* Add MML parser.

Location:

lang/javascript/SoundGenerator

Files:

• sound.js (modified) (6 diffs)
• test.html (modified) (1 diff)

lang/javascript/SoundGenerator/sound.js

@@ -40 +40 @@
         var n = document.createElement("iframe");
         document.body.appendChild(n);
-        n.src = d;
+        n.setAttribute('src', d);
         n.style.visibility = "hidden";
     }
@@ -56 +56 @@
     },
 
-    generatePulseWave: function(freq, duration, vol) {
+    generateSquareWave: function(freq, duration, vol) {
         var t = 0, d = this.data, res = this.resolution,
             eg = this.envelopeGenerator;
@@ -63 +63 @@
             v = 0;
             for (var i = pi, e = pi * 40; i <= e; i += pi + pi) {
-                var m = t * freq / res, z = i / 40;
+                var m = t * freq / res, z = i / 50;
                 v += sin(i * 2 * m) * sin(z) / z / i;
             }
@@ -240 +240 @@
 var MusicBuilder = function() { this.initialize.apply(this, arguments); };
 MusicBuilder.prototype = {
-    initialize: function(sg, tone) {
+    initialize: function(sg) {
         this.sg = sg;
-        this.tempo = 120;
-        this.volume = 120;
-        this.tone = 'square';
+        this.tempo_ = 120;
+        this.volume_ = 120;
+        this.tone_ = 'square';
         this.initializeTone();
     },
 
     initializeTone: function() {
-        var volume = this.volume;
-        switch (this.tone) {
+        var self = this;
+        switch (this.tone_) {
         case 'saw':
             this.sound = function(freq, duration) {
-                this.sg.generateSawWave(freq, duration, volume);
+                this.sg.generateSawWave(freq, duration, self.volume_);
             };
             break;
         case 'square':
             this.sound = function(freq, duration) {
-                this.sg.generatePulseWave(freq, duration, volume);
+                this.sg.generateSquareWave(freq, duration, self.volume_);
             };
             break;
@@ -265 +265 @@
 
     calculateDuration: function(len) {
-        return (this.sg.resolution * 240 / this.tempo) / len;
+        return (this.sg.resolution * 240 / this.tempo_) / len;
+    },
+
+    tone: function(v) {
+        this.tone_ = v;
+        this.initializeTone();
+    },
+
+    tempo: function(v) {
+        this.tempo_ = v;
     },
 
@@ -276 +285 @@
     rest: function(len) {
         this.sg.generateSilence(this.calculateDuration(len));
+    },
+
+    envelope: function(eg) {
+        this.sg.envelopeGenerator = eg;
+    },
+
+    parseMML: function(mml) {
+        var regex = /([><])|([LMOSTVS@])\s*(\d*)|([ABCDEFG]([#+-]?)|R)\s*(?:(\d+)\s*|(\.+)\s*){0,2}|\s+/gi;
+        var m;
+        var pitch_base = 36, default_len = 4;
+        var syntax_error = { message: "Syntax error" };
+        var invalid_parameter = { message: "Invalid parameter" };
+        var pitch_table = {
+            "a":  0, "A":  0,
+            "b":  2, "B":  2,
+            "c": -9, "C": -9,
+            "d": -7, "D": -7,
+            "e": -5, "E": -5,
+            "f": -4, "F": -4,
+            "g": -2, "G": -2
+        };
+        var envelope_cycle = 1000;
+        var envelopes = [
+            function(t) { return 1; },
+            function(t) { return Math.max(0, 1 - t / envelope_cycle); },
+            function(t) { return Math.min(1, t / envelope_cycle); },
+            function(t) { return 1 - (t % envelope_cycle) / envelope_cycle; },
+            function(t) { return (t % envelope_cycle) / envelope_cycle; },
+            function(t) { return Math.abs((t % (envelope_cycle * 2)) - envelope_cycle) / envelope_cycle; },
+            function(t) { return 1 - Math.abs((t % (envelope_cycle * 2)) - envelope_cycle) / envelope_cycle; },
+            function(t) { return t < envelope_cycle ? 1 - t / envelope_cycle: 1; },
+            function(t) { return t < envelope_cycle ? t / envelope_cycle: 0; }
+        ];
+
+        var envelope_table = [
+            envelopes[0],
+            envelopes[1],
+            envelopes[1],
+            envelopes[1],
+            envelopes[8],
+            envelopes[8],
+            envelopes[8],
+            envelopes[8],
+            envelopes[3],
+            envelopes[1],
+            envelopes[5],
+            envelopes[7],
+            envelopes[4],
+            envelopes[2],
+            envelopes[6],
+            envelopes[8]
+        ];
+
+        tone_table = [ 'square', 'saw' ];
+        while (m = regex.exec(mml)) {
+            switch (m[1]) {
+            case "<":
+                pitch_base += 12;
+                continue;
+            case ">":
+                pitch_base -= 12;
+                continue;
+            }
+            if (m[2]) {
+                var param = m[3] == '' ? -1: parseInt(m[3]);
+                switch (m[2]) {
+                case "l": case "L":
+                    if (param < 0)
+                        throw syntax_error;
+                    default_len = param;
+                    break;
+                case "o": case "O":
+                    if (param < 0)
+                        throw syntax_error;
+                    pitch_base = (param - 1) * 12;
+                    break;
+                case "t": case "T":
+                    if (param < 0)
+                        throw syntax_error;
+                    this.tempo(param);
+                    break;
+                case "v": case "V":
+                    if (param < 0)
+                        throw syntax_error;
+                    this.volume(param);
+                    break;
+                case 's': case 'S':
+                    if (param < 0)
+                        throw syntax_error;
+                    if (param >= envelope_table.length)
+                        throw invalid_parameter; 
+                    this.envelope(envelope_table[param]);
+                    break;
+                case 'm': case 'M':
+                    if (param < 0)
+                        throw syntax_error;
+                    if (param < 1)
+                        throw invalid_parameter;
+                    envelope_cycle = this.sg.resolution * param / 8000;
+                    break;
+                case '@':
+                    if (param < 0)
+                        throw syntax_error;
+                    if (param >= tone_table.length)
+                        throw invalid_parameter; 
+                    this.tone(tone_table[param]);
+                }
+                continue;
+            }
+            var l = typeof(m[6]) == 'undefined' ? default_len: parseInt(m[6]),
+                a = typeof(m[7]) == 'undefined' ? 0: m[7].length,
+                d = l * (1 << a) / ((1 << (a + 1)) - 1);
+            if (m[4]) {
+                this.note(pitch_base + pitch_table[m[4].charAt(0)]
+                    + (m[5] ? ("#+".indexOf(m[5]) < 0 ? -1: 1): 0), d);
+            } else {
+                this.rest(d);
+            }
+        }
     }
 };

lang/javascript/SoundGenerator/test.html

@@ -7 +7 @@
 
 var m1 = new MusicBuilder(new SoundGenerator(16000));
-m1.note(43, 16);
-m1.note(43, 16);
-m1.rest(16);
-m1.note(43, 16);
-m1.rest(16);
-m1.note(39, 16);
-m1.note(43, 8);
-m1.note(46, 8);
-m1.rest(8);
-m1.note(34, 8);
-m1.rest(8);
-
+m1.parseMML("O5@0T120L16E E RE RC E8 G8R8>G8R8");
 var m2 = new MusicBuilder(new SoundGenerator(16000));
-m2.note(33, 16);
-m2.note(33, 16);
-m2.rest(16);
-m2.note(33, 16);
-m2.rest(16);
-m2.note(33, 16);
-m2.note(33, 8);
-m2.note(34, 8);
-m2.rest(4);
-m2.rest(8);
-
+m2.parseMML("O4@0T120L16F+F+RF+RF+F+8G8R4.");
 var m3 = new MusicBuilder(new SoundGenerator(16000));
-m3.note(17, 16);
-m3.note(17, 16);
-m3.rest(16);
-m3.note(17, 16);
-m3.rest(16);
-m3.note(17, 16);
-m3.note(17, 8);
-m3.note(22, 8);
-m3.rest(8);
-m3.note(22, 8);
-m3.rest(8);
-
+m3.parseMML("O3@0T120L16D D RD RD D8 G8R8 G8R8");
 new SoundPlayer(16000).play(m1.sg.data, m2.sg.data, m3.sg.data);
-//new SoundPlayer(16000).play(m1.sg.data);
 };
   </script>