[Ac1d]

Если сократить исходники
то as2:

var s = new Sound();
s.loadSound("http://91.202.25.53:8000/;", true);
stop();

as3:

var ldr:Loader = new Loader();
ldr.load(new URLRequest("as2-sound.swf"));
addChild(ldr);
 
var ba:ByteArray = new ByteArray();
this.addEventListener(Event.ENTER_FRAME, spectrum);
var a:Number = 0;
 
function spectrum(event:Event)
{
		graphics.clear();
		SoundMixer.computeSpectrum(ba,true,0);
		for(var i=0; i < 512; i+=24)
		{
			a = ba.readFloat();
			var num:Number = a*180;
			graphics.lineStyle(1,0x333333,0);
			graphics.beginFill(0x003311|(num << 8),1);
			graphics.drawRect(i*(stage.stageWidth/768)+40, stage.stageHeight+5, 5, -num/7);
		}
} 
 
stop();

Добавлено через 12 часов 36 минут
Никто так и не попробовал?