Changeset 18868 for lang/actionscript

Timestamp:

09/05/08 02:16:34 (4 months ago)

Author:

tekisuke

Message:

lang/actionscript/flmml/: 試しにノートシフト入れてみた。バグってたらすんません。

Location:

lang/actionscript/flmml/trunk/src

Files:

• com/txt_nifty/sketch/flmml/MML.as (modified) (6 diffs)
• flmml.swf (modified) (previous)

lang/actionscript/flmml/trunk/src/com/txt_nifty/sketch/flmml/MML.as

@@ -19 +19 @@
         protected var m_maxGate:int;
         protected var m_form:int;
+        protected var m_noteShift:int;
         protected var m_warning:String;
 
@@ -53 +54 @@
         protected function note(noteNo:int):void {
             //trace("note"+noteNo);
-            noteNo += getKeySig();
+            noteNo += m_noteShift + getKeySig();
             var len:int;
             len = getUInt(0);
@@ -195 +196 @@
         protected function firstLetter():void {
             var c:String = getCharNext();
+            var c0:String;
             var i:int;
             switch(c) {
@@ -205 +207 @@
             case "b": note(11); break;
             case "r": rest(); break;
-            case "o":
+            case "o": // Octave
                 m_octave = getUInt(m_octave);
                 if (m_octave < -2) m_octave = -2;
                 if (m_octave >  8) m_octave =  8;
                 break;
-            case "v":
+            case "v": // Volume
                 m_velocity = getUInt((m_velocity-7)/8) * 8 + 7;
                 if (m_velocity < 0)   m_velocity = 0;
                 if (m_velocity > 127) m_velocity = 127;
                 break;
-            case "l":
+            case "l": // Length
                 m_length = len2tick(getUInt(0));
                 m_length = getDot(m_length);
                 break;
-            case "t":
+            case "t": // Tempo
                 m_tempo = getUInt(m_tempo);
                 if (m_tempo == 0) m_tempo = 1;
                 m_tracks[MTrack.TEMPO_TRACK].recTempo(m_tracks[m_trackNo].getRecGlobalTick(), m_tempo);
                 break;
-            case "q":
+            case "q": // gate time (rate)
                 m_gate = getUInt(m_gate);
                 m_tracks[m_trackNo].recGate(m_gate / m_maxGate);
                 break;
-            case "<" :
+            case "<" : // octave shift
                 if (m_relativeDir) m_octave++; else m_octave--;
                 break;
-            case ">":
+            case ">": // octave shift
                 if (m_relativeDir) m_octave--; else m_octave++;
                 break;
-            case ';':
-                //trace("nexttrack");
+            case ";": // end of track
                 if (m_tracks[m_trackNo].getNumEvents() > 0) {
                     m_tracks[++m_trackNo] = createTrack();
                 }
                 break;
-            case '@':
+            case "@":
                 atmark();
                 break;
-            case 'x':
+            case "x":
                 m_tracks[m_trackNo].recVolMode(getUInt(1));
+                break;
+            case "n":
+                c0 = getChar();
+                if (c0 == "s") { // Note Shift
+                    next();
+                    m_noteShift = getSInt(m_noteShift);
+                }
+                else
+                    warning(MWarning.UNKNOWN_COMMAND, c + c0);
                 break;
             default:
@@ -328 +338 @@
             m_octave = 4;
             m_velocity = 100;
+            m_noteShift = 0;
             return new MTrack();
         }
@@ -576 +587 @@
             m_maxGate = 16;
             m_form = MOscillator.PULSE;
+            m_noteShift = 0;
 
             processComment(str);