//marderchens rainbowmoving line idea
import flash.display.Sprite;
import flash.display.Graphics;
import flash.utils.ByteArray;
import flash.media.Sound;
import flash.media.SoundChannel;
import flash.media.SoundMixer;
//import flash.filters.BlurFilter;
//import flash.geom.*
var infoz = "Hihi its free use it or parts if usefull :3 MEOW fash by marderchen .. its java js isn't it? analysis sound for find beat timer..";
var rainbow: Array = new Array("0xFF0000", "0xFF1900", "0xFF3200", "0xFF4B00", "0xFF6400", "0xFF7D00", "0xFF9600", "0xFFAF00", "0xFFC800", "0xFFE100", "0xFFFA00", "0xEAFF00", "0xD1FF00", "0xB7FF00", "0x9EFF00", "0x85FF00", "0x6CFF00", "0x53FF00", "0x3AFF00", "0x21FF00", "0x08FF00", "0x00FF10", "0x00FF29", "0x00FF42", "0x00FF5B", "0x00FF75", "0x00FF8E", "0x00FFA7", "0x00FFC0", "0x00FFD9", "0x00FFF2", "0x00F2FF", "0x00D9FF", "0x00C0FF", "0x00A7FF", "0x008EFF", "0x0075FF", "0x005BFF", "0x0042FF", "0x0029FF", "0x0010FF", "0x0800FF", "0x2100FF", "0x3A00FF", "0x5300FF", "0x6C00FF", "0x8500FF", "0x9E00FF", "0xB700FF", "0xD100FF", "0xEA00FF", "0xFF00FA", "0xFF00E1", "0xFF00C8", "0xFF00AF", "0xFF0096", "0xFF007D", "0xFF0064", "0xFF004B", "0xFF0032", "0xFF0019");
stage.quality = "low";
var colorsr = 0;
var color = 0x00FF00;
var rspeed = 11;
var meow: Sprite = new Sprite();
var meow2: Sprite = new Sprite();
var oft=3; var xda=0; var yda=0;
var sizer=400;
var murmelz =8;var murmel =0;
addEventListener(Event.ENTER_FRAME, loopa);
function loopa(e: Event) {
	murmur();
    // linez();

	
	 beat();
	 seesound();
}
//beatanalyses--------------------------------------------------------------
var s1: SoundChannel;
var vocaloidz: Sound;
if (!vocaloidz) {vocaloidz = new vocaloid(); s1=vocaloidz.play(0,9999);}
var hear: ByteArray = new ByteArray();
var istes:Array = new Array();
var equ:Sprite = new Sprite();
var fine=128; var steps=2;
for (var pp=0; pp<fine;pp++){
	var daties:Array=new Array(0,0,0,0,50,0);
	istes.push(daties);
}
function beat(){
	SoundMixer.computeSpectrum(hear, true);
	for (var wo=0; wo<fine; wo+=steps) {istes[wo][0]= hear.readFloat() * (200+(wo*2));}
	for (var we=0; we<fine; we+=steps) {
		if(istes[we][0]>istes[we][1]){istes[we][1]+=3;}else{istes[we][1]-=3;}
		if(istes[we][0]>istes[we][2]){istes[we][2]+=10;}else{istes[we][2]-=10;}
		istes[we][4]=20+(istes[we][2]/16)+we/3;
		istes[we][3]=istes[we][1]+istes[we][4];
		if (istes[we][5] >1) {istes[we][5]-=2;}
	}
	murmelz=(istes[0][1]+istes[steps][1]+istes[steps*2][1]+istes[steps*3][1])/400+6;
	}
function seesound(){
	equ.graphics.clear();
	addChild(equ);
	for (var wu=0; wu<fine; wu+=steps) {
	equ.graphics.beginFill(0x300030);
	equ.graphics.drawRect(wu*3,sizer-istes[wu][0],1,istes[wu][0]);
	equ.graphics.beginFill(rainbow[Math.round((rainbow.length/fine)*wu)]);
	equ.graphics.drawRect(wu*3+1,sizer-istes[wu][1],2,istes[wu][1]/4);
	equ.graphics.drawRect(wu*3+3,sizer-istes[wu][2],1,istes[wu][2]/2);
	if(istes[wu][0]>(istes[wu][1]+istes[wu][4]) && istes[wu][5]<=0){equ.graphics.beginFill(0xffffff); istes[wu][5]=10;}
	if (wu <(fine/4)) {				   equ.graphics.drawRect(wu*12,0,10,istes[wu][5]);}
	if (wu >(fine/4)&& wu <(fine/2))  {equ.graphics.drawRect(wu*12-390,15,10,istes[wu][5]);}
	if (wu >(fine/2)&& wu <(fine/4*3)) {equ.graphics.drawRect(wu*12-770,30,10,istes[wu][5]);}
	if (wu >(fine/4*3)) {				equ.graphics.drawRect(wu*12-1150,45,10,istes[wu][5]);}
	equ.graphics.drawRect(wu*3+3,sizer-istes[wu][3],1,istes[wu][3]/4+istes[wu][5]);
	}}
//end analyses---------------------------------------------------------------------
function linez(){
	meow2.graphics.clear();
	addChild(meow2);
	meow2.graphics.lineStyle(1,rainbow[Math.round(Math.random()*rainbow.length)],1);
	xda=Math.random()*sizer; yda=Math.random()*sizer;
	meow2.graphics.moveTo(xda,yda);
	oft=Math.random()*5+15;
	meow2.graphics.beginFill(rainbow[Math.round(Math.random()*rainbow.length)]);
	for (var viele=0;viele<oft;viele++){
		meow2.graphics.lineTo(Math.random()*sizer,Math.random()*sizer);
		if ((Math.random()*20)>10){meow2.graphics.moveTo(sizer/2,sizer/2);}
	}meow2.graphics.lineTo(xda,yda);
}

function murmur()  {
	meow.graphics.clear();//0nichts 1000max
	addChild(meow);
 for (var xer=0;xer<sizer; xer++){for (var yer=0;yer<sizer; yer++){
	if((Math.random()*1000)<murmelz)  {
	meow.graphics.lineStyle(1,rainbow[Math.round(Math.random()*rainbow.length)],1);
	meow.graphics.moveTo(xer,yer);
	meow.graphics.lineTo(xer,yer+1);
}}}

}

//thanks to http://www.roguebasin.com/index.php?title=Bresenham%27s_Line_Algorithm but
//have modified the set pixels in a line math it a little for use without geome points and mofing rainbow
function Mline(x0: int, y0: int, x1: int, y1: int) {
        calculate(x0, y0, x1, y1);
}
var randomyc=0;
var randomys=0;
var randomyc2=0;
var randomys2=0;
function calculate(x0: int, y0: int, x1: int, y1: int): void {
        var dx: int = Math.abs(x1 - x0);var dy: int = Math.abs(y1 - y0);
        var sx: int = x0 < x1 ? 1 : -1;var sy: int = y0 < y1 ? 1 : -1;
        var err: int = dx - dy;
       while (true) {colorsr += 0.481 + rspeed / 20;
                if (colorsr >= (rainbow.length)) {colorsr = 0;}
                var colf: uint = colorsr;
                meow.graphics.lineStyle(0.1,rainbow[colf], Math.random()*1);
                randomyc += Math.random()*3 ;
                if (randomyc >=20) { randomys= (Math.random()*20 -10);randomyc =0;}
                 	randomyc2 += Math.random()*2 ;
					meow.graphics.drawRect(x0+ randomys, y0, Math.random()*14 -7, 4);
				 if (x0 == x1 && y0 == y1)break;var e2: int = err * 2;if (e2 > -dx) { err -= dy;x0 += sx;}
                if (e2 < dx) {err += dx;y0 += sy;}}}
//meow moving rainbow line ide by marderchen =^.^= do wath you want with contend