<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="ja"
xml:lang="ja" dir="ltr">
<head>
<title>sample1145(ImageMagick6.5.2)</title>
</head>
<body>
<?php
/* 画像サイズ */
$sx=200;
$sy=200;
/* 茎の幅 */
$rw = 20+rand(-2,2);
/* 根の位置 */
$rx = 100;
$ry = 200;
/* 繰り返し回数 */
$rt = 3;
/* 初期角度 */
$ia = 15;
/* 差分角度 */
$da = 26;
/* 描画色 */
$dc = "black";
/* 葉の長さ */
$ll = 90;
/* 葉の長さの差分 */
$dl = 10;
$im = new Imagick();
$im->newImage($sx, $sy, "none");
$im->setImageMatte(true);
$ca = $ia;
for($lc=0;$lc<$rt;$lc++){
$idraw = new ImagickDraw();
$idraw->setFillColor($dc);
$idraw->pathStart();
$idraw->pathMoveToAbsolute($rx-$rw/2, $ry);
$idraw->pathCurveToQuadraticBezierAbsolute(
$rx -$rw/2 + $ll/2*cos(pi()*($ca+40)/180),
$ry + $ll/2*sin(pi()*($ca+40)/180)*-1,
$rx -$rw/2 + $ll*cos(pi()*($ca)/180)+rand(0,10),
$ry + $ll*sin(pi()*($ca)/180)*-1+rand(0,10)
);
$idraw->pathCurveToQuadraticBezierAbsolute(
$rx +$rw/2 + $ll/2*cos(pi()*($ca+30)/180),
$ry + $ll/2*sin(pi()*($ca+30)/180)*-1,
$rx+$rw/2,
$ry
);
$idraw->pathClose();
$im->drawImage($idraw);
$idraw->destroy();
$idraw = new ImagickDraw();
$idraw->setFillColor($dc);
$idraw->pathStart();
$idraw->pathMoveToAbsolute($rx+$rw/2, $ry);
$idraw->pathCurveToQuadraticBezierAbsolute(
$rx +$rw/2 + $ll/2*cos(pi()*($ca+40)/180)*-1,
$ry + $ll/2*sin(pi()*($ca+40)/180)*-1,
$rx +$rw/2 + $ll*cos(pi()*($ca)/180)*-1+rand(0,10),
$ry + $ll*sin(pi()*($ca)/180)*-1+rand(0,10)
);
$idraw->pathCurveToQuadraticBezierAbsolute(
$rx -$rw/2 + $ll/2*cos(pi()*($ca+30)/180)*-1,
$ry + $ll/2*sin(pi()*($ca+30)/180)*-1,
$rx-$rw/2,
$ry
);
$idraw->pathClose();
$im->drawImage($idraw);
$idraw->destroy();
$rw -= 4;
$ca += $da+rand(-4,4);
$ll -= $dl;
}
$im->writeImage('sample1145a.png');
$idraw->destroy();
$im->destroy();
?>
<img src="sample1145a.png" /><br />
</body>
</html>
出力画像(sample1145a.png)
No comments:
Post a Comment