flash on 2010-4-28

/**
 * Copyright uwi ( http://wonderfl.net/user/uwi )
 * MIT License ( http://www.opensource.org/licenses/mit-license.php )
 * Downloaded from: http://wonderfl.net/c/4Rxi
 */

package {
    import flash.display.Sprite;
    import flash.events.*;
    import org.si.sion.*;
    import org.si.sion.utils.*;
    import org.si.sion.sequencer.*;
    
    [SWF(frameRate=60)]
    public class FlashTest extends Sprite {
    		private var _driver : SiONDriver;
    		private var _preset : SiONPresetVoice;
    		private var _scale : Scale;
    		private var _voice : SiONVoice;
    	
        public function FlashTest() {
        		_driver = new SiONDriver();
        		_preset = new SiONPresetVoice();
//        		_scale = new Scale("4Cd");
        		_scale = new Scale("4C");
        		_voice = _preset["midi.chrom5"];
       		
			var mml:String = "t120;#EFFECT1{chorus delay625,,1};";
			
        		addEventListener(Event.ENTER_FRAME, onEnterFrame);
        		
            	_driver.play(_driver.compile(mml));
//            	_driver.play();

        }
        
        private var _t : uint = 0;
        private var _u : uint = 0;
        
        private function onEnterFrame(e : Event) : void
        {
        		_t++;
        		if(_t % 4 == 0){
        			var r : int = _u % 8;
        			_u++;
        			for(var i : uint = 0;i < 1;i++){
		        		var track : SiMMLTrack = _driver.noteOn(_scale.getNote(r+i*2), _voice, 1, 0, 1);
       			}
        		}
        }
    }
}