<?
/********************************************************************************
* @ File: mp3spec3.php
* @ Original date: August 2004 @ www16.brinkster.com/gazb/ming/
* @ Version: 1.2
* @ Summary: mp3 spectograph -  data output from an xmms plugin which I customised to output text
* @ Updated:  small improvements and summary text
* @ Copyright (c) 2003-2007, www.gazbming.com - all rights reserved.
* @ Author: gazb.ming [[@]] gmail.com - www.gazbming.com 
* @ Released under GNU Lesser General Public License - http://www.gnu.org/licenses/lgpl.html
********************************************************************************/

// some typical movie variables
Ming_setScale(20.0000000);
ming_useswfversion(6);
$movie = new SWFMovie();
$movie->setRate(6);
$movie->setDimension(550, 400);
$movie->setBackground(rand(0,0xFF),rand(0,0xFF),rand(0,0xFF));

## mp3 file info
include ('STARTUP.php');
$dur=11;
$mp3name="startup310q0.mp3";
$mp3path= "./";
$str = str_replace("\n", "", $str);
$tmp=explode(";",$str);

## as pt 1
$strAction.="
numofbars=8;
createEmptyMovieClip('bar', 1);
with(bar){
beginFill(255, 90); 
moveTo(0, 0); 
lineTo(0, -100); 
lineTo(40, -100);
lineTo(40, 0); 
lineTo(0, 0); 
endFill();
 _x=-500; 
 _y=-500;
}

i=0;
while(i<numofbars) {
bar.duplicateMovieClip('bar'+i,100+i);
with(_root['bar'+i]){
_y=400; 
_x=100+i*42;
_yscale=0;
}
var col=new Color(_root['bar'+i]);
col.setRGB(random(0x666666)+0x666666);
i++;
};
";

## add as pt 1
$movie->add(new SWFAction($strAction));
$movie->nextframe();

## add mp3 & data to movie
$snd = fopen($mp3path . $mp3name , "rb");
$len=$movie->streamMp3($snd);
fclose($snd);
for($i=0;$i<$len;$i++){ 
$tmp2=explode(",",$tmp[$i]);
$strAction2="";
for($j=0;$j<count($tmp2);$j++){ 
$strAction2.="
this['bar' + \"$j\"]._height=2*\"$tmp2[$j]\"; ";
}
$movie->add(new SWFAction($strAction2));
$movie->nextframe();
}
$movie->nextframe();
$movie->setFrames($len+2);

// save swf with same name as filename
$swfname = basename(__FILE__,".php");
$movie->save("$swfname.swf",9);
?>

//STARTUP.php
<?
/*
$str="0,0,0,0,0,0,0,0;
0,0,0,0,0,0,0,0;
0,0,0,0,0,12,39,0;
0,0,0,0,0,8,35,0;
0,0,0,0,0,4,31,0;
0,0,0,0,0,29,27,12;
0,0,0,0,0,35,23,37;
0,0,0,0,0,31,19,33;
0,0,0,0,0,27,15,29;
0,0,0,0,0,23,19,25;
0,0,0,12,35,19,37,21;
0,0,0,8,31,15,33,17;
0,0,0,4,32,11,29,13;
0,0,0,0,28,7,25,9;
0,0,0,0,24,3,21,5;
0,0,0,0,20,29,17,1;
0,0,0,0,16,25,13,25;
0,0,0,0,12,21,9,21;
0,0,0,0,8,17,19,17;
0,0,0,0,19,13,29,19;
0,0,0,0,35,9,25,15;
0,0,0,0,31,12,21,11;
0,0,0,0,27,8,17,7;
0,0,0,0,29,12,19,12;
0,0,0,0,25,8,15,8;
0,0,0,0,21,4,25,4;
0,0,0,0,17,0,21,0;
0,0,0,0,13,0,17,0;
43,32,32,12,9,0,13,0;
39,41,28,19,12,0,9,0;
35,37,24,15,8,0,5,0;
41,33,29,11,12,12,1,0;
37,29,35,25,8,8,0,0;
46,25,31,21,12,4,0,0;
42,32,27,25,8,0,0,0;
38,35,23,21,4,0,0,0;
34,31,19,25,12,0,0,0;
41,27,35,21,8,0,0,0;
44,23,31,17,12,0,0,0;
40,35,27,25,8,0,0,0;
36,43,32,21,4,12,0,0;
32,58,28,29,32,32,19,12;
28,54,43,35,28,28,15,19;
46,50,39,31,24,24,19,15;
42,46,35,27,25,20,25,11;
38,54,31,35,21,16,29,25;
34,50,27,31,17,29,32,21;
30,46,37,37,29,25,28,17;
43,47,41,39,32,29,29,19;
39,48,37,35,28,25,25,15;
35,53,33,31,24,21,21,11;
31,49,29,27,25,29,25,12;
27,45,25,23,21,25,21,19;
23,41,21,25,25,35,25,15;
19,37,17,21,21,31,21,11;
15,33,19,29,29,27,17,7;
11,46,15,25,25,23,13,12;
7,42,11,21,21,19,9,8;
3,38,7,17,17,15,5,4;
0,34,3,13,13,11,1,0;
0,30,0,9,9,7,0,0;
0,26,0,5,5,3,0,0;
0,22,0,1,1,0,0,0;
0,18,0,0,0,0,0,0;
0,14,0,0,0,0,0,0;
0,0,0,0,0,0,0,0";
*/
?>