| ",8)!=0)
break;
$Powp=strpos($aryDat,"KWh");
$aryPow[$i]=substr($aryDat,$Powp-5,5);
$i++;
}
$n=$i-1;
fclose($fl);
for($i=$n;$i>=0;$i--) {
$aryVal[$n-$i]=(int)substr($aryPow[$i],0,5);
}
/* 棒グラフ作成 */
$img2=imagecreatetruecolor($width,$height);
$white=imagecolorallocate($img2,255,255,255);
$black=imagecolorallocate($img2,0,0,0);
$red=imagecolorallocate($img2,255,0,0);
$green=imagecolorallocate($img2,0,255,0);
$blue=imagecolorallocate($img2,0,0,255);
imagesetthickness($img2,2);
imageline($img2,50,10,50,$height-30,$white);
$xs=60;
$ys=$height-30;
$mm=$startMM;
$yy=$startYY;
$total=0;
$n++;
for($i=0;$i<$n;$i++) {
imagefilledrectangle($img2,$xs,$ys-$aryVal[$i],$xs+20,$ys,$red);
imagestring($img2,2,$xs+7,$height-30,(string)$mm,$white);
imagestring($img2,2,$xs+3,$ys-$aryVal[$i]-14,(string)$aryVal[$i],$white);
$mm++;
if($mm>12) {
$mm=1;
$yy++;
imagestring($img2,2,$xs+35,$height-18,(string)$yy,$white);
}
$xs+=30;
$total+=$aryVal[$i];
}
for($i=0;$i<$height-50;$i+=100) {
imagestring($img2,2,10,$ys-$i-7,(string)$i."KWh",$white);
for($j=0;$j<$width-90;$j+=10)
imagesetpixel($img2,$j+50,$ys-$i,$white);
}
imagestring($img2,2,$width-100,10,$yyyy0."/".$mm0."/".$dd0,$white);
imagesetthickness($img2,2);
imageline($img2,50,$height-30,$width-50,$height-30,$white);
/* 写真合成 */
$img3=imagecreatefromjpeg("http://cgi.tiny.jp/solar/solar01.jpg");
imagecopy($img2,$img3,65,20,0,0,imagesx($img3),imagesy($img3));
imagestring($img2,2,70,150,"Since 2003/08/09 [180W*20=3.6KW]",$white);
imagestring($img2,2,170,175,"Total: ".(string)$total."KWh",$white);
imagejpeg($img2);
?>
|