<?php
/*
笛卡尔情书的秘密
心形图案的实现。重点是心形函数r=a(1-sin@),据说这是笛卡尔死前寄出的最后一封情书
内容。这里面隐藏着一个刻骨铭心的秘密；“一生只为等待能手绘这个函数给我的人”
*/
$width = 500;
$height = 500;
header("Content-type: p_w_picpath/gif");
$img = p_w_picpathcreate($width,$height);//创建一张图片
$bg_color = p_w_picpathcolorallocate($img,0,0,0);
$red = p_w_picpathcolorallocate($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;//30是用来控制外观的
$x = $r *cos(M_PI/50*$j)*sin(M_PI/50*$i)+$width/2;
$y = -$r*sin(M_PI/50*$j)+$height/6;
p_w_picpathsetpixel($img,$x,$y,$red);
}
}
p_w_picpathgif($img);
p_w_picpathdestroy($img);
?>
