MING FUNCTIONS

All of these swf images were created using a page of functions. The MingFunctions.php is used as an include on the Ming script page. Each shape is called from the Functions script. You can see the swf shape and script used to achieve it by clicking on the link on the left. Below you can download the MingFunctions script required to get the swf script to work.

Zip Download

then copy (CMD-C) & paste (CMD-V)

<? /* Cloud codes courtesy of SewSally (cloud(linesize,red,green,blue,alpha,cloud-width)) $WhiteCloud=$myMovie->add(cloud(5,255,255,255,120)); $WhiteCloud->moveTo(20,30); */ function cloud($size,$r,$g,$b,$w){ $cloudGradient=new SWFGradient(); $cloudGradient->addEntry(0.1,$r/2,$g/2,$b/2); $cloudGradient->addEntry(0.4,$r/1.15,$g/1.15,$b/1.15); $cloudGradient->addEntry(0.5,$r,$g,$b); $cloudGradient->addEntry(0.6,$r,$g,$b); $cloudGradient->addEntry(0.7,$r,$g,$b); $cloudGradient->addEntry(0.8,$r/1.15,$g/1.15,$b/1.15); $cloudGradient->addEntry(1.0,$r/2,$g/2,$b/2); $myCloud=new SWFShape(); $cloudFill=$myCloud->addFill($cloudGradient, SWFFILL_LINEAR_GRADIENT); $cloudFill->scaleTo(0.45); $cloudFill->moveTo($w/2,0); $myCloud->setLine($size,$r/1.2,$g/1.2,$b/1.2); $myCloud->setleftFill($cloudFill); $myCloud->drawCurve(0, $w/3, $w/3, (-$w/3)/2.6); $myCloud->drawCurve(($w/3)/2.6, ($w/3)/1.6, ($w/3)/1.6, (-$w/3)/1.6); $myCloud->drawCurve(($w/3)/1.6, ($w/3)/2.6, ($w/3)/4, -$w/3); $myCloud->drawLine(-$w/3,0); $myCloud->drawLine((-$w/3)*1.9,0); return $myCloud; } /* (tilecloud(image,linesize,outline-red,green,blue,cloud-width)) $TileCloud=$myMovie->add(tilecloud('textile.png',5,255,255,255,120)); $TileCloud->moveTo(160,30); */ function tilecloud($image,$size, $r, $g, $b, $w){ $bitmapfilename = $image; $fob = fopen($bitmapfilename,"rb"); $img = new SWFBitmap($fob); $myCloud=new SWFShape(); $myCloud->setRIGHTFill($myCloud->addFill($img, SWFFILL_TILED_BITMAP)); $myCloud->movePenTo(0,0); $myCloud->setLine($size,$r/1.2,$g/1.2,$b/1.2); $myCloud->drawCurve(0, $w/3, $w/3, (-$w/3)/2.6); $myCloud->drawCurve(($w/3)/2.6, ($w/3)/1.6, ($w/3)/1.6, (-$w/3)/1.6); $myCloud->drawCurve(($w/3)/1.6, ($w/3)/2.6, ($w/3)/4, -$w/3); $myCloud->drawLine(-$w/3,0); $myCloud->drawLine((-$w/3)*1.9,0); return $myCloud; } /* Tree Codes courtesy of SewSally (tree(linesize,red,green,blue,alpha,bottom-width)) $GreenTree=$myMovie->add(tree(3,0,255,0,80)); $GreenTree->moveTo(80,50); */ function tree($size,$r,$g,$b,$w){ $treeGradient=new SWFGradient(); $treeGradient->addEntry(0.1,$r/2,$g/2,$b/2); $treeGradient->addEntry(0.4,$r/1.15,$g/1.15,$b/1.15); $treeGradient->addEntry(0.5,$r,$g,$b); $treeGradient->addEntry(0.6,$r,$g,$b); $treeGradient->addEntry(0.7,$r,$g,$b); $treeGradient->addEntry(0.8,$r/1.15,$g/1.15,$b/1.15); $treeGradient->addEntry(1.0,$r/2,$g/2,$b/2); $myTree=new SWFShape(); $treeFill=$myTree->addFill($treeGradient, SWFFILL_LINEAR_GRADIENT); $treeFill->scaleTo(0.1); $treeFill->moveTo(0,0); $myTree->setLine($size,$r/1.5,$g/1.5,$b/1.5); $myTree->setRightFill($treeFill); $myTree->drawLine($w/4, $w/5.4); $myTree->drawLine(-$w/5.4, 0); $myTree->drawLine($w/3.2, $w/5.4); $myTree->drawLine(-$w/4, 0); $myTree->drawLine($w/2.6, $w/5.4); $myTree->drawLine(-$w/3.2, 0); $myTree->drawLine($w/2.3, $w/5.4); $myTree->drawLine(-$w/2.6, 0); $myTree->drawLine($w/2, $w/5.4); $myTree->drawLine(-$w, 0); $myTree->drawLine(-$w/2.6, 0); $myTree->drawLine($w/2.3, -$w/5.4); $myTree->drawLine(-$w/3.2, 0); $myTree->drawLine($w/2.6, -$w/5.4); $myTree->drawLine(-$w/4, 0); $myTree->drawLine($w/3.2, -$w/5.4); $myTree->drawLine(-$w/5.4, 0); $myTree->drawLine($w/4, -$w/5.4); $myTree->drawLine(-$w/5.4, 0); $myTree->drawLine($w/4, -$w/5.4); return $myTree; } /* (tiletree(image,linesize,outline-red,green,blue,bottom-width)) $TileTree=$myMovie->add(tiletree('textile.png',2,255,255,255,60)); $TileTree->moveTo(80,150); */ function tiletree($image,$size, $r, $g, $b, $w){ $bitmapfilename = $image; $fob = fopen($bitmapfilename,"rb"); $img = new SWFBitmap($fob); $myTree=new SWFShape(); $myTree->setRIGHTFill($myTree->addFill($img, SWFFILL_TILED_BITMAP)); $myTree->movePenTo(0,0); $myTree->setLine($size,$r,$g,$b); $myTree->drawLine($w/4, $w/5.3); $myTree->drawLine(-$w/5.3, 0); $myTree->drawLine($w/3.2, $w/5.3); $myTree->drawLine(-$w/4, 0); $myTree->drawLine($w/2.6, $w/5.3); $myTree->drawLine(-$w/3.2, 0); $myTree->drawLine($w/2.3, $w/5.3); $myTree->drawLine(-$w/2.6, 0); $myTree->drawLine($w/2, $w/5.3); $myTree->drawLine(-$w, 0); $myTree->drawLine(-$w/2.6, 0); $myTree->drawLine($w/2.3, -$w/5.3); $myTree->drawLine(-$w/3.2, 0); $myTree->drawLine($w/2.6, -$w/5.3); $myTree->drawLine(-$w/4, 0); $myTree->drawLine($w/3.2, -$w/5.3); $myTree->drawLine(-$w/5.3, 0); $myTree->drawLine($w/4, -$w/5.3); $myTree->drawLine(-$w/5.3, 0); $myTree->drawLine($w/4, -$w/5.3); return $myTree; } /* font(font('font',red,green,blue,alpha,pointsize,label) $Font=$myMovie->add(font('Bimini.fdb',255,0,255,255,80,LingoLinda)); $Font->moveTo(10,80); */ function font($font,$r,$g,$b,$a,$pointsize,$label){ $Font=new SWFFont("$font"); $Text=new SWFText(); $Text->setFont($Font); $Text->setColor($r,$g,$b,$a); $Text->setHeight($pointsize); $Text->addString("$label"); return $Text; } /* HORIZONTAL LINE $horizontalline-$myMovie->(hline(size,length,red,green,blue,alpha)); $horizontalline->moveTo(x,y); */ function hline($sz,$w,$r,$g,$b,$a){ $s = new SWFShape(); $s->setLine($sz,$r,$g,$b,$a); $s->drawLine($w,0); return $s; } /* VERTICAL LINE $verticalline-$myMovie->(vline(size,length,red,green,blue,alpha)); $verticalline->moveTo(x,y); */ function vline($sz,$w,$r,$g,$b,$a){ $s = new SWFShape(); $s->setLine($sz,$r,$g,$b,$a); $s->drawLine(0,$w); return $s; } /* DIAGONAL LINE $diagonalline=$myMovie->add(dline(linesize,red,green,blue,alpha,rotation,length)); $diagonalline->moveTo(x,y); */ function dline($sz,$r,$g,$b,$a,$x,$y){ $s = new SWFShape(); $s->setLine($sz,$r,$g,$b,$a); $s->movePen($x-$x,$y-$y); $s->drawLineTo($x,$y); return $s; } /* BEZIER CURVE bezier(line size,red,green,blue,alpha,width,height) positive height up, negative height down $GreenBezier=$myMovie->add(bezier(10,0,255,0,255,100,50)); $GreenBezier->moveTo(10,60); */ function bezier($size,$r,$g,$b,$a,$w,$h){ $s = new SWFShape(); $s->setLine($size,$r,$g,$b,$a); $s->movePenTo(0, $h-$h); $s->drawCurveTo(0, $h-$h, $w/2,-$h-$h, $w, $h-$h); return $s; } /* corner(line size,red,green,blue,alpha,width,height) positive height and positive width Northeast tilecorner negative width, negative height Southwest tilecorner positive width negative height Southeast tilecorner negative width, positive height Northwest tilecorner */ function corner($size,$r,$g,$b,$a,$w,$h){ $s = new SWFShape(); $s->setLine($size,$r,$g,$b,$a); $s->movePenTo(0, $h-$h); $s->drawLineTo($w, 0); $s->drawLineTo($w, $h); $s->drawCurveTo(-$c, $h, 0, 0); return $s; } function fillcorner($r,$g,$b,$a,$w,$h){ $s = new SWFShape(); $s->setLine(1,$r,$g,$b,0); $s->setRIGHTFill($s->addFill($r, $g, $b, $a)); $s->movePenTo(0, $h-$h); $s->drawLineTo($w, 0); $s->drawLineTo($w, $h); $s->drawCurveTo(-$c, $h, 0, 0); return $s; } function tilecorner($image,$w,$h){ $bitmapfilename = $image; $fob = fopen($bitmapfilename,"rb"); $img = new SWFBitmap($fob); $s = new SWFShape(); $s->setRIGHTFill($s->addFill($img, SWFFILL_TILED_BITMAP)); $s->setLine(1,$r,$g,$b,0); $s->movePenTo(0, $h-$h); $s->drawLineTo($w, 0); $s->drawLineTo($w, $h); $s->drawCurveTo(-$c, $h, 0, 0); return $s; } //TILED SHAPE CIRCLE /* Codes modified from Author: gazb.ming [[@]] gmail.com - www.gazbming.com */ function tile($image,$sz){ $bitmapfilename = $image; $fob = fopen($bitmapfilename,"rb"); $img = new SWFBitmap($fob); // draw circle shape add bitmap fill $circleshape = new SWFShape(); $myfill=$circleshape->addFill($img, SWFFILL_TILED_BITMAP); $circleshape->setRightFill($myfill); $circleshape->drawCircle($sz/2); return $circleshape; } //TILED SHAPE SQUARE function tileSq($image,$W,$H){ $bitmapfilename = $image; $fob = fopen($bitmapfilename,"rb"); $img = new SWFBitmap($fob); $squareshape = new SWFShape(); $squareshape->setRIGHTFill($squareshape->addFill($img, SWFFILL_TILED_BITMAP)); $squareshape->drawCircle($sz/2); $squareshape->setLine(1,0,0,0,0); $squareshape->drawLine($W,0); $squareshape->drawLine(0,$H); $squareshape->drawLine(-$W,0); $squareshape->drawLine(0,-$H); return $squareshape; } /* TILE TRIANGLE UP */ function tiletriup($image, $W) { $bitmapfilename = $image; $fob = fopen($bitmapfilename,"rb"); $img = new SWFBitmap($fob); $triangle = new SWFShape(); $triangle->setRIGHTFill($triangle->addFill($img, SWFFILL_TILED_BITMAP)); $triangle->movePenTo($W-$W,$W); $triangle->drawLineTo($W/2,$W-$W); $triangle->drawLineTo($W/2+$W/2,$W); $triangle->drawLineTo($W-$W,$W); return $triangle; } /* TILE TRIANGLE DOWN */ function tiletridown($image, $W) { $bitmapfilename = $image; $fob = fopen($bitmapfilename,"rb"); $img = new SWFBitmap($fob); $triangle = new SWFShape(); $triangle->setRIGHTFill($triangle->addFill($img, SWFFILL_TILED_BITMAP)); $triangle->movePenTo($W-$W, $W-$W); $triangle->drawLineTo($W,$W-$W); $triangle->drawLineTo($W/2,$W); $triangle->drawLineTo($W-$W,$W-$W); return $triangle; } /* TILED OVAL(image, width, height) $PinkOval=$myMovie->add(tileoval(image, width, height)); $PinkOval->moveTo(100,15); */ function tileoval($image,$c,$d){ $x=$c/2; $y=$d/2; $w=$c/2; $h=$d/2; $j = $w * 0.70711; $n = $h * 0.70711; $i = $j - ($h - $n) * $w / $h; $m = $n - ($w - $j) * $h / $w; $bitmapfilename = $image; $fob = fopen($bitmapfilename,"rb"); $img = new SWFBitmap($fob); $filloval=new SWFShape(); $filloval->setLine(1,0,0,0,0); $filloval->setRIGHTFill($filloval->addFill($img, SWFFILL_TILED_BITMAP)); $filloval->movePenTo($x+$w, $y); $filloval->drawCurveTo($x + $w, $y - $m, $x + $j, $y - $n); $filloval->drawCurveTo($x + $i, $y - $h, $x, $y - $h); $filloval->drawCurveTo($x - $i, $y - $h, $x - $j, $y - $n); $filloval->drawCurveTo($x - $w, $y - $m, $x - $w, $y); $filloval->drawCurveTo($x - $w, $y + $m, $x - $j, $y + $n); $filloval->drawCurveTo($x - $i, $y + $h, $x, $y + $h); $filloval->drawCurveTo($x + $i, $y + $h, $x + $j, $y + $n); $filloval->drawCurveTo($x + $w, $y + $m, $x + $w, $y); return $filloval; } /* FILLED SQUARE OR RECTANGLE $LILACSquare=$myMovie->add(square(red,green,blue,alpha,width,height)); $LILACSquare->moveTo(x,y); */ function square($r, $g, $b, $a, $W, $H) { $s = new SWFShape(); $s->setLine(1,$r,$g,$b,$a); $s->setRIGHTFill($s->addFill($r, $g, $b, $a)); $s->drawLine($W,0); $s->drawLine(0,$H); $s->drawLine(-$W,0); $s->drawLine(0,-$H); return $s; } /* EMPTY SQUARE OR RECTANGLE $BlankSquare=$myMovie->add(blanksquare(size,red,green,blue,alpha,width,height)); $BlankSquare->moveTo(x,y); */ function blanksquare($sz, $r, $g, $b, $a, $W, $H) { $s = new SWFShape(); $s->setLine($sz, $r,$g,$b, $a); $s->drawLine($W,0); $s->drawLine(0,$H); $s->drawLine(-$W,0); $s->drawLine(0,-$H); return $s; } /* TRIANGLE DOWN $triangleDown=$myMovie->add(triangled(linesize, red, green, blue, alpha, width)); $triangleDown->moveTo(x,y); */ function triangled($sz, $r, $g, $b, $a, $W) { $triangle = new SWFShape(); $triangle->setLine($sz, $r,$g,$b, $a); $triangle->movePenTo($W-$W, $W-$W); $triangle->drawLineTo($W,$W-$W); $triangle->drawLineTo($W/2,$W); $triangle->drawLineTo($W-$W,$W-$W); return $triangle; } /* TRIANGLE UP $coltriangleUp=$myMovie->add(coltriangleu(red, green, blue, alpha, width)); $coltriangleUp->moveTo(x,y); */ function triangleu($sz, $r, $g, $b, $a, $W) { $triangle = new SWFShape(); $triangle->setLine($sz, $r,$g,$b, $a); $triangle->movePenTo($W-$W,$W); $triangle->drawLineTo($W/2,$W-$W); $triangle->drawLineTo($W/2+$W/2,$W); $triangle->drawLineTo($W-$W,$W); return $triangle; } /* COLORED TRIANGLE DOWN $coltriangleDown=$myMovie->add(coltriangled(red, green, blue, alpha, width)); $coltriangleDown->moveTo(x,y); */ function coltriangled($r, $g, $b, $a, $W) { $triangle = new SWFShape(); $triangle->setLine(1, $r,$g,$b, $a); $triangle->setRIGHTFill($triangle->addFill($r, $g, $b, $a)); $triangle->movePenTo($W-$W, $W-$W); $triangle->drawLineTo($W,$W-$W); $triangle->drawLineTo($W/2,$W); $triangle->drawLineTo($W-$W,$W-$W); return $triangle; } /* COLORED TRIANGLE UP $triangleUp=$myMovie->add(triangleu(linesize, red, green, blue, alpha, width)); $triangleUp->moveTo(x,y); */ function coltriangleu($r, $g, $b, $a, $W) { $triangle = new SWFShape(); $triangle->setLine(1, $r,$g,$b, $a); $triangle->setRIGHTFill($triangle->addFill($r, $g, $b, $a)); $triangle->movePenTo($W-$W,$W); $triangle->drawLineTo($W/2,$W-$W); $triangle->drawLineTo($W/2+$W/2,$W); $triangle->drawLineTo($W-$W,$W); return $triangle; } /* OCTAGON $Octagon=$myMovie->add(octagon(size, red, green, blue, alpha, side-length)); $Octagon->moveTo(0,0); */ function octagon($sz, $r, $g, $b, $a, $W) { $Octagon = new SWFShape(); $Octagon->setLine($sz, $r,$g,$b, $a); $Octagon->movePenTo($W/4*3,0); $Octagon->drawLineTo($W/4*7,0); $Octagon->drawLineTo($W/4*10,$W/4*3); $Octagon->drawLineTo($W/4*10,$W/4*7); $Octagon->drawLineTo($W/4*7,$W/4*10); $Octagon->drawLineTo($W/4*3,$W/4*10); $Octagon->drawLineTo(0,$W/4*7); $Octagon->drawLineTo(0,$W/4*3); $Octagon->drawLineTo($W/4*3,0); return $Octagon; } /* COLORED OCTAGON $Octagon=$myMovie->add(coloctagon(red, green, blue, alpha, side-length)); $Octagon->moveTo(0,0); */ function coloctagon($r, $g, $b, $a, $W) { $Octagon = new SWFShape(); $Octagon->setLine(1, $r,$g,$b, $a); $Octagon->setRIGHTFill($Octagon->addFill($r, $g, $b, $a)); $Octagon->movePenTo($W/4*3,0); $Octagon->drawLineTo($W/4*7,0); $Octagon->drawLineTo($W/4*10,$W/4*3); $Octagon->drawLineTo($W/4*10,$W/4*7); $Octagon->drawLineTo($W/4*7,$W/4*10); $Octagon->drawLineTo($W/4*3,$W/4*10); $Octagon->drawLineTo(0,$W/4*7); $Octagon->drawLineTo(0,$W/4*3); $Octagon->drawLineTo($W/4*3,0); return $Octagon; } /* TILED OCTAGON $Octagon=$myMovie->add(tileoctagon(image, side-length)); $Octagon->moveTo(0,0); */ function tileoctagon($image, $W) { $bitmapfilename = $image; $fob = fopen($bitmapfilename,"rb"); $img = new SWFBitmap($fob); $Octagon = new SWFShape(); $Octagon->setRIGHTFill($Octagon->addFill($img, SWFFILL_TILED_BITMAP)); $Octagon->setLine(1, $r,$g,$b, $a); $Octagon->movePenTo($W/4*3,0); $Octagon->drawLineTo($W/4*7,0); $Octagon->drawLineTo($W/4*10,$W/4*3); $Octagon->drawLineTo($W/4*10,$W/4*7); $Octagon->drawLineTo($W/4*7,$W/4*10); $Octagon->drawLineTo($W/4*3,$W/4*10); $Octagon->drawLineTo(0,$W/4*7); $Octagon->drawLineTo(0,$W/4*3); $Octagon->drawLineTo($W/4*3,0); return $Octagon; } /* EMPTY OVAL(linesize,red,green,blue,alpha,width,height) $YellowOval=$myMovie->add(oval(10,255,255,0,255,100,200)); $YellowOval->moveTo(100,15); */ function oval($sz,$red,$gr,$bl,$a,$c,$d){ $x=$c/2; $y=$d/2; $w=$c/2; $h=$d/2; $j = $w * 0.70711; $n = $h * 0.70711; $i = $j - ($h - $n) * $w / $h; $m = $n - ($w - $j) * $h / $w; $oval=new SWFShape(); $oval->setLine($sz,$red,$gr,$bl,$a); $oval->movePenTo($x+$w, $y); $oval->drawCurveTo($x + $w, $y - $m, $x + $j, $y - $n); $oval->drawCurveTo($x + $i, $y - $h, $x, $y - $h); $oval->drawCurveTo($x - $i, $y - $h, $x - $j, $y - $n); $oval->drawCurveTo($x - $w, $y - $m, $x - $w, $y); $oval->drawCurveTo($x - $w, $y + $m, $x - $j, $y + $n); $oval->drawCurveTo($x - $i, $y + $h, $x, $y + $h); $oval->drawCurveTo($x + $i, $y + $h, $x + $j, $y + $n); $oval->drawCurveTo($x + $w, $y + $m, $x + $w, $y); return $oval; } /* FILLED OVAL(linesize,red,green,blue,alpha,width,height) $PinkOval=$myMovie->add(filloval(10,255,0,255,255,100,200)); $PinkOval->moveTo(100,15); */ function filloval($sz,$red,$gr,$bl,$a,$c,$d){ $x=$c/2; $y=$d/2; $w=$c/2; $h=$d/2; $j = $w * 0.70711; $n = $h * 0.70711; $i = $j - ($h - $n) * $w / $h; $m = $n - ($w - $j) * $h / $w; $filloval=new SWFShape(); $filloval->setLine($sz,$red,$gr,$bl,$a); $filloval->setLeftFill($red,$gr,$bl,$a); $filloval->movePenTo($x+$w, $y); $filloval->drawCurveTo($x + $w, $y - $m, $x + $j, $y - $n); $filloval->drawCurveTo($x + $i, $y - $h, $x, $y - $h); $filloval->drawCurveTo($x - $i, $y - $h, $x - $j, $y - $n); $filloval->drawCurveTo($x - $w, $y - $m, $x - $w, $y); $filloval->drawCurveTo($x - $w, $y + $m, $x - $j, $y + $n); $filloval->drawCurveTo($x - $i, $y + $h, $x, $y + $h); $filloval->drawCurveTo($x + $i, $y + $h, $x + $j, $y + $n); $filloval->drawCurveTo($x + $w, $y + $m, $x + $w, $y); return $filloval; } /* GRADIENT OVAL gradoval(type,red,green,blue,width, height) type = SWFFILL_RADIAL_GRADIENT or SWFFILL_LINEAR_GRADIENT $WhiteLOval=$myMovie->add(gradoval(SWFFILL_LINEAR_GRADIENT,255,255,255,100,50)); $WhiteLOval->moveTo(5,15); $WhiteROval=$myMovie->add(gradoval(SWFFILL_RADIAL_GRADIENT,255,255,255,100,50)); $WhiteROval->moveTo(150,15); */ function gradoval($type,$red,$green,$blue,$c,$d){ $GradientOval=new SWFGradient(); $GradientOval->addEntry(0.0,$red,$green,$blue); $GradientOval->addEntry(0.2,$red,$green,$blue); $GradientOval->addEntry(0.4,$red/1.1,$green/1.1,$blue/1.1); $GradientOval->addEntry(0.6,$red/1.15,$green/1.15,$blue/1.15); $GradientOval->addEntry(0.8,$red/1.2,$green/1.2,$blue/1.2); $GradientOval->addEntry(1.0,$red/1.5,$green/1.5,$blue/1.5); $x=$c/2; $y=$d/2; $w=$c/2; $h=$d/2; $GradOval=new SWFShape(); $GradOval->setLine(1,$red,$green,$blue,0); $myFill=$GradOval->addFill($GradientOval, $type); $myFill->scaleTo(0.05); $myFill->moveTo($x+10,$y); $GradOval->setleftfill($myFill); $j = $w * 0.70711; $n = $h * 0.70711; $i = $j - ($h - $n) * $w / $h; $m = $n - ($w - $j) * $h / $w; $GradOval->movePenTo($x+$w, $y); $GradOval->drawCurveTo($x + $w, $y - $m, $x + $j, $y - $n); $GradOval->drawCurveTo($x + $i, $y - $h, $x, $y - $h); $GradOval->drawCurveTo($x - $i, $y - $h, $x - $j, $y - $n); $GradOval->drawCurveTo($x - $w, $y - $m, $x - $w, $y); $GradOval->drawCurveTo($x - $w, $y + $m, $x - $j, $y + $n); $GradOval->drawCurveTo($x - $i, $y + $h, $x, $y + $h); $GradOval->drawCurveTo($x + $i, $y + $h, $x + $j, $y + $n); $GradOval->drawCurveTo($x + $w, $y + $m, $x + $w, $y); return $GradOval; } /* CIRCLE $LilacCircle=$myMovie->add(circle(red,green,blue,size)); $LilacCircle->moveTo(60,150); */ function circle($red, $gr, $bl, $ra){ $x=$ra/2; $y=$ra/2; $ra=$ra/2; $a = $ra * 0.414213562; // = tan(22.5 deg) $b = $ra * 0.707106781; // = sqrt(2)/2 = sin(45 deg) $circ=new SWFShape(); $circ->setLine(1,0,0,0,0); $circ->setLeftFill($red,$gr,$bl); $circ->movePenTo($x+$ra, $y); $circ->drawCurveTo($x+$ra, $y-$a, $x+$b, $y-$b); $circ->drawCurveTo($x+$a, $y-$ra, $x, $y-$ra); $circ->drawCurveTo($x-$a, $y-$ra, $x-$b, $y-$b); $circ->drawCurveTo($x-$ra, $y-$a, $x-$ra, $y); $circ->drawCurveTo($x-$ra, $y+$a, $x-$b, $y+$b); $circ->drawCurveTo($x-$a, $y+$ra, $x, $y+$ra); $circ->drawCurveTo($x+$a, $y+$ra, $x+$b, $y+$b); $circ->drawCurveTo($x+$ra, $y+$a, $x+$ra, $y); return $circ; } /* LINEAR GRADIENT-SINGLE COLOR gradient(red, green, blue, width, height) $GREENtube=$myMovie->add(gradient(0,85,0,50,100)); $GREENtube->moveTo(50,50); */ function gradient($r, $g, $b, $W, $H){ $GRAD=new SWFGradient(); $GRAD->addEntry(0.0,$r-$r,$g-$g,$b-$b); $GRAD->addEntry(0.2,$r/2,$g/2,$b/2); $GRAD->addEntry(0.4,$r/1.15,$g/1.15,$b/1.15); $GRAD->addEntry(0.5,$r,$g,$b); $GRAD->addEntry(0.6,$r/1.15,$g/1.15,$b/1.15); $GRAD->addEntry(0.8,$r/2,$g/2,$b/2); $GRAD->addEntry(1.0,$r-$r,$g-$g,$b-$b); $GRADsquare=new SWFShape(); $GRADsquare->setLine(1,0,0,0,0); $GRADfill=$GRADsquare->addFill($GRAD, SWFFILL_LINEAR_GRADIENT); $GRADfill->scaleTo(0.05); $GRADfill->moveTo($W/2,$H/2); $GRADsquare->setLeftFill($GRADfill); $GRADsquare->drawLine($W, 0); $GRADsquare->drawLine(0, $H); $GRADsquare->drawLine(-$W, 0); $GRADsquare->drawLine(0, -$H); return $GRADsquare; } /* GRADCIRCLE, SINGLE COLOR $PINKball=$myMovie->add(gradCircle(red,green,blue,size)); $PINKball->moveTo(0,70); */ function gradCircle($rd, $gr, $bl, $size){ $GRAD=new SWFGradient(); $GRAD->addEntry(0.0,$rd,$gr,$bl); $GRAD->addEntry(1.0,$rd-$rd/1.5,$gr-$gr/1.5,$bl-$bl/1.5); $GRADcircle=new SWFShape(); $GRADcircle->setLine(1,0,0,0,0); $GRADfill=$GRADcircle->addFill($GRAD, SWFFILL_RADIAL_GRADIENT); $GRADfill->scaleTo(0.09); $GRADfill->moveTo(0,0); $GRADcircle->setLeftFill($GRADfill); $GRADcircle->drawCircle($size/2); return $GRADcircle; } /* RAINBOW CIRCLE 3 COLORS. LINEAR FILLS STRAIGHT UP AND DOWN. RADIAL FILLS ANGLED $firstCircle=$myMovie->add(RainbowCir(255,0,0,255,255,0,0,0,255,40,40,40,SWFFILL_RADIAL_GRADIENT)); $firstCircle->moveTo(10,0); */ function RainbowCir( $red,$green,$blue,$red2,$green2,$blue2,$red3,$green3,$blue3,$ra,$DIRECT){ $myGradient=new SWFGradient(); $myGradient->addEntry(0.0,$red,$green,$blue); $myGradient->addEntry(0.2,$red2,$green2,$blue2); $myGradient->addEntry(0.4,$red3,$green3,$blue3); $myGradient->addEntry(0.6,$red,$green,$blue); $myGradient->addEntry(0.8,$red2,$green2,$blue2); $myGradient->addEntry(1.0,$red3,$green3,$blue3); $RainbowRound=new SWFShape(); $RainbowRound->setLine(1,0,0,0,0); $myFill=$RainbowRound->addFill($myGradient, $DIRECT); $myFill->scaleTo(0.1); $myFill->moveTo(10,10); $RainbowRound->setRightFill($myFill); $ra = $ra; $x = $ra; $y = $ra; $a = $ra * 0.414213562; // = tan(22.5 deg) $b = $ra * 0.707106781; // = sqrt(2)/2 = sin(45 deg) $RainbowRound->movePenTo($x+$ra, $y); $RainbowRound->drawCurveTo($x+$ra, $y-$a, $x+$b, $y-$b); $RainbowRound->drawCurveTo($x+$a, $y-$ra, $x, $y-$ra); $RainbowRound->drawCurveTo($x-$a, $y-$ra, $x-$b, $y-$b); $RainbowRound->drawCurveTo($x-$ra, $y-$a, $x-$ra, $y); $RainbowRound->drawCurveTo($x-$ra, $y+$a, $x-$b, $y+$b); $RainbowRound->drawCurveTo($x-$a, $y+$ra, $x, $y+$ra); $RainbowRound->drawCurveTo($x+$a, $y+$ra, $x+$b, $y+$b); $RainbowRound->drawCurveTo($x+$ra, $y+$a, $x+$ra, $y); return $RainbowRound; } /* RAINBOW GRADIENT (RainGradient(red,blue,green,red2,blue2,green2,width,height) $RedGreen=$myMovie->add(RainGradient(255,0,0,0,255,0,100,250)); $RedGreen->moveTo(0,50); */ function RainGradient($rd, $gr, $bl, $rd2, $gr2, $bl2,$w, $h){ $GRAD=new SWFGradient(); $GRAD->addEntry(0.0,$rd,$gr,$bl); $GRAD->addEntry(1.0,$rd2,$gr2,$bl2); $GRADsquare=new SWFShape(); $GRADsquare->setLine(1,0,0,0,0); $GRADfill=$GRADsquare->addFill($GRAD, SWFFILL_LINEAR_GRADIENT); $GRADfill->scaleTo(0.05); $GRADfill->moveTo($w/2,$h/2); $GRADsquare->setleftFill($GRADfill); $GRADsquare->drawLine($w, 0); $GRADsquare->drawLine(0, $h); $GRADsquare->drawLine(-$w, 0); $GRADsquare->drawLine(0, -$h); return $GRADsquare; } /* $GOLDball=$myMovie->add(Bullseye(85,85,0,50)); $GOLDball->moveTo(100,70); */ function Bullseye($rd, $gr, $bl, $size){ $GRAD=new SWFGradient(); $GRAD->addEntry(0.0,$rd*3,$gr*3,$bl*3); $GRAD->addEntry(0.2,0,0,0); $GRAD->addEntry(0.4,$rd*3,$gr*3,$bl*3); $GRAD->addEntry(0.6,0,0,0); $GRAD->addEntry(0.8,$rd*3,$gr*3,$bl*3); $GRAD->addEntry(1.0,$rd*3,$gr*3,$bl*3); $GRADcircle=new SWFShape(); $GRADcircle->setLine(1,0,0,0,0); $GRADfill=$GRADcircle->addFill($GRAD, SWFFILL_RADIAL_GRADIENT); $GRADfill->scaleTo(0.075); $GRADfill->moveTo(0,0); $GRADcircle->setLeftFill($GRADfill); $GRADcircle->drawCircle($size); return $GRADcircle; } /* RAINBOW BULLSEYE use even numbers only Rainfill(red,green,blue,red2,green2,blue2,red3,green3,blue3,size) $RainBull1=$myMovie->add(Rainfill(255,0,0,0,255,0,0,0,255,100)); $RainBull1->moveTo(10,160); */ function Rainfill($r,$g,$b,$r2,$g2,$b2,$r3,$g3,$b3,$sz){ $myGradient=new SWFGradient(); $myGradient->addEntry(0.0,$r,$g,$b); $myGradient->addEntry(0.2,$r2,$g2,$b2); $myGradient->addEntry(0.4,$r3,$g3,$b3); $myGradient->addEntry(0.6,$r,$g,$b); $myGradient->addEntry(0.8,$r2,$g2,$b2); $myGradient->addEntry(1.0,$r3,$g3,$b3); $myShape=new SWFShape(); $myShape->setLine(1,0,0,0); $myFill=$myShape->addFill($myGradient, SWFFILL_RADIAL_GRADIENT); $myFill->scaleTo(0.0525); $myFill->moveTo(0,0); $myShape->setLeftFill($myFill); $myShape->drawCircle($sz/2); return $myShape; } ?>