Notes to Lesson 7

Below are some samples of font functions using a hair dingbat. The first sample is filled in with color. The second sample is filled in with a gradient. The third sample is filled in using a gif image.

You can download other fdb fonts at dingbats Here.

Font Effects Sample:

<?
$myMovie=new SWFMovie();
$myMovie->setDimension(350,200);
$myMovie->setBackground(rand(0xFF,0xFF,0xFF));

function dingbat($font,$ding,$r,$g,$b){
$s=new SWFShape();
$f = new SWFFont("$font");
$s->setRightFill($r,$g,$b);
$s->setLine(1, $r*.75, $g*.75, $b*.75,255);
$s->drawGlyph($f,"$ding");
return $s;
}
//colored dingbat(quote-font,letter,red,green,blue)
$Ding=$myMovie->add(dingbat('Hair.fdb',N,255,255,0)); 
$Ding->moveTo(0,100);
$Ding->scaleTo(2.0);

function dinggrad($font,$ding,$r,$g,$b){
$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); 
$s=new SWFShape();
$f = new SWFFont("$font");
$Fill=$s->addFill($GRAD, SWFFILL_LINEAR_GRADIENT); 
$Fill->scaleTo(0.50); 
$Fill->moveTo($f->getWidth("$ding"), 0);
$s->setLine(1, $r*.75, $g*.75, $b*.75,255);
$s->setLeftFill($Fill); 
$s->drawGlyph($f,"$ding");
return $s;
}

//Call gradient dinggrad(quote-font,letter,red,green,blue)
$Ding2=$myMovie->add(dinggrad('Hair.fdb',N,255,255,0)); 
$Ding2->moveTo(100,100);
$Ding2->scaleTo(2.0);

function dingtile($image,$font,$ding,$r,$g,$b){
$bitmapfilename = $image;
$fob = fopen($bitmapfilename,"rb");
$img = new SWFBitmap($fob);  
$s=new SWFShape();
$f = new SWFFont("$font");
$s->setLEFTFill($s->addFill($img, SWFFILL_TILED_BITMAP));
$s->setLine(1, $r*.75, $g*.75, $b*.75,255);
$s->drawGlyph($f,"$ding");
return $s;
}

//Call tiled dingbat(quote-image,quote-font,letter,outline r,g,b)
$Ding3=$myMovie->add(dingtile('blonde.gif','Hair.fdb',N,200,100,0)); 
$Ding3->moveTo(200,100);
$Ding3->scaleTo(2.0);

header('Content-type: application/x-shockwave-flash');
$myMovie->output();
$myMovie->save('Note7.swf');
?>