note 32477 added to function.imageline
| From: | joeldg at rack1 dot php dot net | Date: | Wed, 28 May 2003 19:12:42 +0000 |
| Subject: | note 32477 added to function.imageline | ||
| Groups: | php.notes | ||
| Request: | Send a blank email to php-notes+get-49200@lists.php.net to get a copy of this message | ||
<?
#
# generate the julia fractal set
# Joel De Gan
# http://lucifer.intercosmos.net (for more examples)
#
$currimage = imagecreatefrompng("wallpaper_blank.png");
imagealphablending($currimage, true);
$xcorner = -1.5;
$y2corner = 1.5;
$x2corner = 1.5;
$ycorner = -1.5;
$max = 50;
$xsize = 400;
$ysize = 400;
$xgap = 10;
$ygap = 10;
for ($k=$ysize;$k>1;$k--){
for($i=1;$i < $xsize;$i++){
$za = ($i / $xsize) * ($x2corner - $xcorner) + $xcorner;
$zb = ($k / $ysize) * ($y2corner - $ycorner) + $ycorner;
$ca = 0.360284;
$cb = 0.100376;
$count = 0;
$za2 = $za;
while (1){
$za1 = $za2;
$za2 = ($za1 * $za1 - $zb * $zb) + $ca;
$zb = $za1 * $zb * 2 + $cb;
IF (($za2 * $za2 + $zb * $zb) > 4){ break; }
$count++;
if($count > $max){ break; }
}
if($count > $max){ $count = 0; }
$color = imagecolorallocate($currimage, $count, $count, $count);
imageline ($currimage, $xgap+$i, $ygap+$ysize-$k, $xgap+$i, $ygap+$ysize-$k,$color);
#LINE (xgap + i, ygap +ysize- k, xgap+i, ygap +ysize- k)
}
}
if(!imagepng($currimage, "./crap.png")){
echo "shit screwed up\n";
}
?>
----
Manual Page -- http://www.php.net/manual/en/function.imageline.php
Edit Note -- http://master.php.net/manage/user-notes.php?action=edit+32477
Delete Note -- http://master.php.net/manage/user-notes.php?action=delete+32477&report=yes
Reject Note -- http://master.php.net/manage/user-notes.php?action=reject+32477&report=yes