<?

$movie = new SWFMovie();
$movie->setBackground(0x0,0x00,0xff);
$movie->setRate(2);
$movie->setDimension(400,300);

$morph = new SWFMorph();

$shape1 = $morph->getShape1();
$shape2 = $morph->getShape2();

$shape1->setLine(2, 0xff, 0x0, 0x0);
$shape1->movePenTo(200,200);
$shape1->drawCircle(100);

$shape2->setLine(1, 0x0, 0x0, 0xff);
$shape2->movePenTo(200, 200);
$shape2->drawLine(1,1);

$dMorph = $movie->add($morph);

for($r=0.0; $r<=1.0; $r+=0.02) {
    $dMorph->setRatio($r);
    $movie->nextFrame();
}

header('Content-type: application/x-shockwave-flash');
$movie->output();

?>