setBackground(155,155,155); $myMovie->setDimension(300, 300); include('MingFunctions.php'); $face=$myMovie->add(gradoval(SWFFILL_LINEAR_GRADIENT,255,220,255,100,100)); $face->moveTo(60,35); $Face=$myMovie->add(oval(3,0,0,0,255,100,100)); $Face->moveTo(60,35); $Hair=$myMovie->add(font('SWF/FDB/Hair.fdb',55,30,0,255,235,X)); $Hair->moveTo(50,195); $Eyes=$myMovie->add(font('SWF/FDB/AnimeEyes.fdb',0,0,0,255,115,H)); $Eyes->moveTo(70,125); $nose=$myMovie->add(bezierH(3,0,0,0,255,15,-10)); $nose->moveTo(105,82); function teeth($size,$w,$h){ $Teeth = new SWFShape(); $Teeth->setLine($size+2,255,255,255); $Teeth->movePenTo(0,$h); $Teeth->drawCurveTo(0,$h,$w/2,$h*2,$w,$h); $Teeth->setLine($size*1.3,0,0,0); $Teeth->movePenTo(0,$h+$size); $Teeth->drawCurveTo(0,$h+$size,$w/2,($h*2)+$size*2,$w,$h+$size); return $Teeth; } function toplip($size,$r,$g,$b,$w,$h){ $TopLip = new SWFShape(); $TopLip->setLine($size,0,0,0); $TopLip->movePenTo(0,$h); $TopLip->drawCurveTo(0,$h,$w/2,$h-$h*3,$w,$h); $TopLip->drawCurveTo($w,$h,$w+$w/2,$h-$h*3,$w*2,$h); $TopLip->setLine($size,$r,$g,$b); $TopLip->movePenTo(0,$h); $TopLip->drawCurveTo(0,$h,$w/2,$h-$h*2,$w,$h); $TopLip->drawCurveTo($w,$h,$w+$w/2,$h-$h*2,$w*2,$h); $TopLip->setLine($size,0,0,0); $TopLip->movePenTo(0,$h); $TopLip->drawCurveTo(0,$h,$w/2,$h-$h,$w,$h); $TopLip->drawCurveTo($w,$h,$w+$w/2,$h-$h,$w*2,$h); return $TopLip; } function botlip($size,$r,$g,$b,$w,$h){ $BotLip = new SWFShape(); $BotLip->setLine($size,0,0,0); $BotLip->movePenTo(0,$h); $BotLip->drawCurveTo(0,$h,$w/2,$h+$h*3,$w,$h); $BotLip->setLine($size,$r,$g,$b); $BotLip->movePenTo(0,$h); $BotLip->drawCurveTo(0,$h,$w/2,$h+$h*2,$w,$h); $BotLip->setLine($size,0,0,0); $BotLip->movePenTo(0,$h); $BotLip->drawCurveTo(0,$h,$w/2,$h+$h,$w,$h); return $BotLip; } $Teeth=$myMovie->add(teeth(2,48,5)); $Teeth->moveTo(-87,-105); $mouthT2=$myMovie->add(toplip(4,255,0,0,25,5)); $mouthT2->moveTo(85,105); $mouthB2=$myMovie->add(botlip(5,255,0,0,50,7)); $mouthB2->moveTo(85,102); $myMovie->nextframe(); for($i=0;$i<30;$i++){ $myMovie->nextframe(); $Teeth->moveTo(87,105-$i/6); $mouthT2->moveTo(85,105-$i/6); } for($i=0;$i<30;$i++){ $myMovie->nextframe(); $Teeth->moveTo(87,100+$i/6); $mouthT2->moveTo(85,100+$i/6); } header('Content-type: application/x-shockwave-flash'); //$myMovie->output(); $myMovie->save("MouthLoop.swf"); ?>