Create Swf Flash Movie from PHP - Create-Button

Flash swf File Size: 1.34 KB

<?
    $Movie = new COM("eMarkASF.Movie");
    $Movie->SetSize( 600, 229 );
    $Movie->SetBackgroundColorEx("#FFD700");

' Use a color object
    $Color1 = new COM("eMarkASF.Color");
    $Color1->ColorString = "#FFFFFF";

    $Color2 = new COM("eMarkASF.Color");
    $Color2->ColorString = "red";

' Create flash objects and create four button shape for four button status of up, over, hit, down
    $obj = new COM("eMarkASF.FlashObject");
    $obj->CreatePolygon( 20, 50 );
    $obj->AddPolygonLineTo( 20,200 );
    $obj->AddPolygonLineTo( 200, 50 );
    $obj->AddPolygonLineTo( 20, 50 );
    $obj->LineWidth = 4;
    $obj->SetRadialFill( $Color1, $Color2 );

    $obj2 = new COM("eMarkASF.FlashObject");
    $obj2->CreatePolygon( 20, 50 );
    $obj2->AddPolygonLineTo( 20,200 );
    $obj2->AddPolygonLineTo( 200, 50 );
    $obj2->AddPolygonLineTo( 20, 50 );
    $obj2->LineWidth = 4;
    $obj2->SetRadialFill( $Color2, $Color1 );

' Create action object to set the button action
    $Action = new COM("eMarkASF.action");
    $Action->GetURL( "http://www.emarksoft.com", "blank" );

'//ActionConditions
'enum
'{

' OverDownToIdle	= 1,
' IdleToOverDown	= 2,
' OutDownToIdle	= 3,
' OutDownToOverDown	= 4,
' OverDownToOutDown	= 5,
' OverDownToOverUp	= 6,
' OverUpToOverDown	= 7,
' OverUpToIdle	= 8,
' IdleToOverUp	= 9

'};

' Create the button using the four shape
    $btn = new COM("eMarkASF.FlashObject");
    $btn->CreateButton( $obj, $obj2, $obj, $obj2 );
    $btn->QueueEvent( $Action, 7 );

    $Movie->Addobject( $btn );

    $obj->CreateOval( 250,70,550,210 );
    $obj->LineWidth = 0;
    $obj->SetRadialFill( $Color1, $Color2 );

    $obj2->CreateOval( 250,70,550,210 );
    $obj2->LineWidth = 0;
    $obj2->SetRadialFill( $Color2, $Color1 );

    $Color2->ColorString = "blue";

    $obj3 = new COM("eMarkASF.Flashobject");
    $obj3->CreateOval( 250,70,550,210 );
    $obj3->LineWidth = 0;

    $obj3->SetRadialFill( $Color1, $Color2 );

    $obj4 = new COM("eMarkASF.Flashobject");
    $obj4->CreateOval( 250,70,550,210 );
    $obj4->LineWidth = 0;
    $obj4->SetRadialFill( $Color2, $Color1 );

    $btn->CreateButton( $obj4, $obj3, $obj2, $obj );
    $Movie->Addobject( $btn );

    header ( "application/x-shockwave-flash" );
    print( base64_decode( $Movie->Content2 ));

    $obj->Free();
    $obj2->Free();
    $obj3->Free();
    $obj4->Free();
    $Movie->Free();
?>