php 卡迪尔的秘密

<?php

/*

笛卡尔情书的秘密

心形图案的实现。重点是心形函数r=a(1-sin@),据说这是笛卡尔死前寄出的最后一封情书

内容。这里面隐藏着一个刻骨铭心的秘密；“一生只为等待能手绘这个函数给我的人”

*/

$width = 500;

$height = 500;

header("Content-type: image/gif");

$img = imagecreate($width,$height);//创建一张图片

$bg_color = imagecolorallocate($img,0,0,0);

$red = imagecolorallocate($img,255,0,0);

for($i=0;$i<=100;$i++){

for($j=0;$j<=100;$j++){

$r = M_PI/50*$i * (1-sin(M_PI/50*$j))*30;

$x = $r *cos(M_PI/50*$j)*sin(M_PI/50*$i)+$width/2;

$y = -$r*sin(M_PI/50*$j)+$height/6;

imagesetpixel($img,$x,$y,$red);

}

}

imagegif($img);

imagedestroy($img);

?>