<?
/********************************************************************************
* @ File: grid.php
* @ Original date: February 2003 @ www16.brinkster.com/gazb/ming/
* @ Version: 1.2
* @ Summary: drawing a 16x16 grid
* @ Updated:  small improvements and summary text
* @ Copyright (c) 2003-2007, www.gazbming.com - all rights reserved.
* @ Author: gazb.ming [[@]] gmail.com - www.gazbming.com 
* @ Released under GNU Lesser General Public License - http://www.gnu.org/licenses/lgpl.html
********************************************************************************/

// some typical movie variables
Ming_setScale(20.0000000);
ming_useswfversion(6);
$movie = new SWFMovie();
$movie->setDimension(600,400);
$movie->setBackground(rand(0,0xFF),rand(0,0xFF),rand(0,0xFF));
$movie->setRate(31);

$gridLine=new SWFShape();
$gridLine->setLine(0,100,100,100);
$gridLine->drawLine(16*16,0);  
$gridSprite= new SWFSprite();

  for($i=0; $i<17; ++$i)  {
$f2 = $gridSprite->add($gridLine);
$f2->moveTo(0,$i*16);
  }

  for($i=0; $i<17; ++$i)  {
$f2 = $gridSprite->add($gridLine);
$f2->rotate(270);
$f2->moveTo($i*16,0);
  }

$gridSprite->nextFrame();
$movie->addExport($gridSprite, 'grid');
$movie->writeExports();
$strAction = "
_root.attachMovie('grid','grid',1);
grid._x=grid._y=50;
";
$movie->add(new SWFAction( $strAction));

// save swf with same name as filename
$swfname = basename(__FILE__,".php");
$movie->save("$swfname.swf",9);
?>