<?php


    $root = "/php/PHPPresentation/PHPPresentation-develop-Jan-2016";

    use PhpOffice\PhpPresentation\PhpPresentation;
    use PhpOffice\PhpPresentation\Shape\RichText;
    use PhpOffice\PhpPresentation\IOFactory;
    use PhpOffice\PhpPresentation\Style\Fill;
    use PhpOffice\PhpPresentation\Slide\Animation;

    require_once $root.'/src/PhpPresentation/Autoloader.php';
    \PhpOffice\PhpPresentation\Autoloader::register();

    use PhpOffice\Common;
    $commonRoot = "/php/PHPOffice-Common-7-29-2015";
    require_once $commonRoot.'/src/Common/Autoloader.php';
    \PhpOffice\Common\Autoloader::register(); 

    //Create Presentation
    $pp = new PhpPresentation();
    $pp->getProperties()->setCreator('Test')
              ->setLastModifiedBy('Test')
              ->setTitle('Test Animation PPT')
              ->setSubject('Test Animation Example')
              ->setDescription('Testing the appear animation')
              ->setKeywords('powerpoint animation test')
              ->setCategory('Testing');

    //Start Example
    $currentSlide = $pp->getActiveSlide(); 

    //add a shape to apply the animation to
    $shape = $currentSlide->createRichTextShape()->setWidth(100)->setHeight(100)->setOffsetX(100)->setOffsetY(100)->setAutoFit(RichText::AUTOFIT_NOAUTOFIT);
    $shape->getFill()->setFillType(Fill::FILL_SOLID);
    $shape->getFill()->getStartColor()->setRGB('FF0000');

    //add a shape to demonstrate shape grouping 
    $shape2 = $currentSlide->createRichTextShape()->setWidth(100)->setHeight(100)->setOffsetX(300)->setOffsetY(300)->setAutoFit(RichText::AUTOFIT_NOAUTOFIT);
    $shape2->getFill()->setFillType(Fill::FILL_SOLID);
    $shape2->getFill()->getStartColor()->setRGB('FF0000');


    //create animation object
    $animation = new Animation();
    //add the shape we made to the animtion
    $animation->addShape($shape);
    //add the second shape 
    $animation->addShape($shape2); 


    //add the animation to the slide
    $currentSlide->addAnimation($animation);

    //create another shape to demonstrate animation order 
    $shape3 = $currentSlide->createRichTextShape()->setWidth(100)->setHeight(100)->setOffsetX(400)->setOffsetY(400)->setAutoFit(RichText::AUTOFIT_NOAUTOFIT);
    $shape3->getFill()->setFillType(Fill::FILL_SOLID);
    $shape3->getFill()->getStartColor()->setRGB('00FF00');

    //make second animation 
    $animation2 = new Animation(); 
    //add the new shape
    $animation2->addShape($shape3);
    //add the second animation to the slid
    $currentSlide->addAnimation($animation2); 

    //save powerpoint
    $fullPath = "test-ppt.pptx";
    @unlink($fullPath);
    $oWriterPPTX = IOFactory::createWriter($pp, 'PowerPoint2007');
    $oWriterPPTX->save($fullPath);      
?>