利用ming库来写PHP的flash动画

haulm

http://ftp.magiclinux.org.cn/hau ... astcgi_1mgc.src.rpm
http://ftp.magiclinux.org.cn/hau ... -0.4.2-1mgc.src.rpm

1. <?
   
2.   Ming_setScale(20.0);
   
3.   srand(time());
   
4.   $nb_stars = (!$nb_stars)?40:$nb_stars;
   
5.   $rate = (!$rate)?24:$rate;
   
6. 
   
7.   // Creates the star model and text shapes
   
8.   $s = new SWFShape();
   
9.   $s->setRightFill(rand()%64, rand()%64, rand()%64, rand()%64);
   
10.   $s->movePenTo(-70, 35);
    
11.   $s->drawLineTo(0, -70);
    
12.   $s->drawLineTo(70, 35);
    
13.   $s->drawLineTo(-70, 35);
    
14.   $s->movePenTo(-70, -35);
    
15.   $s->drawLineTo(70, -35);
    
16.   $s->drawLineTo(0, 70);
    
17.   $s->drawLineTo(-70, -35);
    
18.   $f = new SWFFont('/usr/share/fonts/ttf/zh_CN/wqy-zenhei.ttf');
    
19.   $t = new SWFShape();
    
20.   $t->setRightFill(rand()%64, rand()%64, rand()%64, rand()%64);
    
21.   $t->movePenTo(-($f->getWidth('MING')/2),-(($f->getAscent()+$f->getDescent())/2));
    
22.   for($c=0;$c<strlen('MING');$c++){
    
23.     $t->drawGlyph($f, substr('MING',$c,1));
    
24.     $t->movePen($f->getWidth(substr('MING',$c,1)),0);
    
25.   }
    
26.   $tt = new SWFShape();
    
27.   $tt->setRightFill(rand()%64, rand()%64, rand()%64, rand()%64);
    
28.   $tt->movePenTo(-($f->getWidth('PHP')/2),-(($f->getAscent()+$f->getDescent())/2));
    
29.   for($c=0;$c<strlen('PHP');$c++){
    
30.     $tt->drawGlyph($f, substr('PHP',$c,1));
    
31.     $tt->movePen($f->getWidth(substr('PHP',$c,1)),0);
    
32.   }
    
33.   $ttt = new SWFShape();
    
34.   $ttt->setRightFill(rand()%64, rand()%64, rand()%64, rand()%64);
    
35.   $ttt->movePenTo(-($f->getWidth('SWF')/2),-(($f->getAscent()+$f->getDescent())/2));
    
36.   for($c=0;$c<strlen('SWF');$c++){
    
37.     $ttt->drawGlyph($f, substr('SWF',$c,1));
    
38.     $ttt->movePen($f->getWidth(substr('SWF',$c,1)),0);
    
39.   }
    
40. 
    
41. 
    
42.   // Creates sprites
    
43.   $spriteCounter=0;
    
44.   for($c=0; $c<$nb_stars; $c++) {
    
45.     eval("\$p$c = new SWFSprite();");
    
46.     if($spriteCounter==0){eval("\$i$c = \$p$c"."->add(\$s);");$spriteCounter++;}else{
    
47.     if($spriteCounter==1){eval("\$i$c = \$p$c"."->add(\$t);");$spriteCounter++;}else{
    
48.     if($spriteCounter==2){eval("\$i$c = \$p$c"."->add(\$tt);");$spriteCounter++;}else{
    
49.     if($spriteCounter==3){eval("\$i$c = \$p$c"."->add(\$ttt);");$spriteCounter=0;}}}}
    
50.     eval("\$i$c"."->setName('triangle$c');");
    
51.     eval("\$p$c"."->nextFrame();");
    
52.   }
    
53. 
    
54.   // Creates the movie and the main sprite
    
55.   $m = new SWFMovie();
    
56.   $m->setRate($rate);
    
57.   $m->setBackground(0, 0, 0);
    
58.   $m->setDimension(640,480);
    
59.   $mp = new SWFSprite();
    
60. 
    
61.   // Adds each sprite to the main one
    
62.   for($c=0; $c<$nb_stars; $c++) {
    
63.     $sc=0.1+(rand()%85)/100;
    
64.     $rot=rand()%10+1;
    
65.     eval("\$i$c=\$mp"."->add(\$p$c);");
    
66.     eval("\$i$c"."->addColor(rand()%256, rand()%256, rand()%256, rand()%192);");
    
67.     eval("\$i$c"."->moveTo(-320+rand()%620, -240+rand()%460);");
    
68.     eval("\$i$c"."->scaleTo($sc, $sc);");
    
69. 
    
70.     // When a sprite is loaded, creates the actionscript code needed to make it
    
71.     eval("\$i$c"."->addAction(new SWFAction('
    
72.       o=0;
    
73.       sc=$sc*100;
    
74.       sensX=(Math.random()*2-1)*7;
    
75.       sensY=(Math.random()*2-1)*7;
    
76. 
    
77.       function doXform$c() {
    
78.         o+=$rot;
    
79.         triangle$c._xscale=$sc*100*Math.cos(o*Math.PI/180);
    
80.         triangle$c._rotation=o;
    
81.         if (triangle$c._x>320) {sensX=-sensX;};
    
82.         if (triangle$c._x<-320) {sensX=-sensX;};
    
83.         triangle$c._x+=sensX;
    
84.         if (triangle$c._y>320) {sensY=-sensY;};
    
85.         if (triangle$c._y<-320) {sensY=-sensY;};
    
86.         triangle$c._y+=sensY;
    
87.       }
    
88.     '), SWFACTION_ONLOAD);");
    
89. 
    
90.     // When one sprite is entered then call the doXform function
    
91.     eval("\$i$c"."->addAction(new SWFAction('doXform$c();'), SWFACTION_ENTERFRAME);");
    
92.   }
    
93. 
    
94.   // Adds the main sprite to the movie
    
95.   $i = $m->add($mp);
    
96.   $i->setName("MainClip");
    
97.   $i->moveTo(320, 240);
    
98. 
    
99.   // Create the link button
    
100.   $s = new SWFShape();
     
101.   $s->setRightFill(0,0,0,1);
     
102.   $s->drawLine(640,0);
     
103.   $s->drawLine(0,480);
     
104.   $s->drawLine(-640,0);
     
105.   $s->drawLine(0,-480);
     
106.   $b = new SWFButton();
     
107.   $b->addShape($s,SWFBUTTON_OVER | SWFBUTTON_DOWN | SWFBUTTON_OUT | SWFBUTTON_HIT);
     
108.   $b->setAction(new SWFAction("getURL('skewing-source.php','_top');"));
     
109.   $i=$m->add($b);
     
110. 
     
111.   // Creates the actionscript code to make the main sprite rotate
     
112.   $i->addAction(new SWFAction('o=0; function DoRotation() {o+=0.5;_root.MainClip._rotation=o;}'), SWFACTION_ONLOAD);
     
113.   $i->addAction(new SWFAction('DoRotation();'), SWFACTION_ENTERFRAME);
     
114.   $mp->nextFrame();
     
115. 
     
116. $m->nextFrame();
     
117. $m->save("skewing.swf");
     
118. 
     
119. $revitalizer=rand();
     
120. print "<OBJECT classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://active.macromedia.com/flash2/cabs/swflash.cab#version=4,0,0,0" ID=objects WIDTH=640 HEIGHT=480>
     
121. <PARAM NAME=movie VALUE="skewing.swf?$revitalizer">
     
122. <EMBED src="skewing.swf?$revitalizer" WIDTH=640 HEIGHT=480 TYPE="application/x-shockwave-flash" PLUGINSPAGE="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash">
     
123. </OBJECT>
     
124. ";
     
125. ?>

复制代码

asmcos

不知道为什么，我的没有出来