上次說到用GD作各種幾何圖形,以及填滿顏色。其中故意把這樣一個較複雜的情況留到後面,這就是任意多邊形和任意多邊形的填充顏色。
<?
Header("Content-type: image/png");
$im = ImageCreate (200, 100);
$col_blk = ImageColorAllocate($im, 0,0,0);
$col_grn = ImageColorAllocate($im, 0,255,0);
$parray = array(40,10,60,10,70,20,60,50,40,50,30,20);
// 定義一個數組,12個成員是6個點的橫縱座標。
ImagePolygon($im,$parray,6,$col_grn);
// 這就是繪製任意多邊形的函數,$parray是剛才定義的陣列,
// 6表示六個點。注意六個點連成的是六邊形。
// 不必人為地為了閉合圖形而在最後增加一個與第一點相同的點。
ImagePNG($im);
ImageDestroy($im);
?>
你應該已經想到了,任意多邊形填滿顏色的函數:
<?
Header("Content-type: image/png");
$im = ImageCreate (200, 100);
$col_blk = ImageColorAllocate($im, 0,0,0);
$col_orn = ImageColorAllocate($im, 255,192,0);
$col_yel = ImageColorAllocate($im, 255,255,0);
$col_red = ImageColorAllocate($im, 255,0,0);
$col_grn = ImageColorAllocate($im, 0,255,0);
$col_blu = ImageColorAllocate($im, 0,0,255);
$parray = array(40,10,60,10,70,20,60,50,40,50,30,20);
ImageFilledPolygon($im,$parray,6,$col_grn);
ImagePNG($im);
ImageDestroy($im);
?>
嗯。下面我們可以在圖像上寫字了。不過,先別高興,要寫漢字還得費一些麻煩。
這個以後再逐漸解釋。先看看怎麼簡單地寫西文。
<?
Header("Content-type: image/png");
$im = ImageCreate (200, 250);
$col_blk = ImageColorAllocate($im, 0,0,0);
$col_orn = ImageColorAllocate($im, 255,192,0);
$str="This is a test.";
ImageString($im,1,10,10,$str,$col_orn);
ImageString($im,2,10,30,$str,$col_orn);
ImageString($im,3,10,60,$str,$col_orn);
ImageString($im,4,10,100,$str,$col_orn);
ImageString($im,5,10,150,$str,$col_orn);
// 這裡連續五次呼叫ImageString,在不同位置,
// 分別用從小到大的字體輸出了字串$str。
// ImageString 函數只支援五種字體(1~5)
ImagePNG($im);
ImageDestroy($im);
?>
再看:
<?
//Header("Content-type: image/png");
$im = ImageCreate (200, 250);
$col_blk = ImageColorAllocate($im, 0,0,0);
$col_orn = ImageColorAllocate($im, 255,192,0);
$str="This is a test.";
ImageStringUp($im,1,10,180,$str,$col_orn);
ImageStringUp($im,2,20,180,$str,$col_orn);
ImageStringUp($im,3,40,180,$str,$col_orn);
ImageStringUp($im,4,70,180,$str,$col_orn);
ImageStringUp($im,5,110,180,$str,$col_orn);
// 函數名稱換成了ImageStringUp,用法不變。
// 是輸出垂直排的文字。
ImagePNG($im);
ImageDestroy($im);
?>
在使用輸出字元的函數同時,如果能知道不同字型的字在圖像裡要佔用的寬度、高度,
對於安排輸出字元的位置將是多麼方便的啊! PHP提供給我們了:ImageFontWidth()和
ImageFontHeight(),其參數很簡單,只有一個:即字體的編號。例如ImageFontWidth(5)
就是取得5號字每個字元的寬度,ImageFontHeight(3)就是取得3號字每個字元的高度。這麼簡單,就不舉例了,等一下在後面的程式碼還有用到。
跟輸出字串類似,ImageChar和ImageCharUp輸出單個字符,用途比較少,甚至可以不用——無論字符還是字符串,都用ImageString和ImageStringUp就可以了嘛!
下面,我就利用我做過的繪製股票K線分析圖的其中一部分程式碼,把前面講到的內容系統地應用一下。因為有牽涉到資料庫,不能把原始碼拿過來給大家拿回去測試。只能建構一些數據,模擬從資料庫取得的股市行情。鑑於這裡懂股票K線的人可能不多,大家可能不知道K線圖該怎麼畫法。然而,我也不能在這裡講K線具體是怎麼回事,只是介紹這樣一系列方法。等畫好以後,你一定可以看出,以前確實看過這樣的圖。
<?php
Header("Content-type: image/png");
$im = ImageCreate(640,260);
$bkground = ImageColorAllocate($im,255,255,255);
$data = ImageColorAllocate($im,0,0,0);
$gird = ImageColorAllocate($im,200,200,160);
$upline = ImageColorAllocate($im,255,0,0);
$dnline = ImageColorAllocate($im,0,175,175);
$d5line = ImageColorAllocate($im,255,127,0);
$d20line = ImageColorAllocate($im,0,0,127);
$d10line = ImageColorAllocate($im,255,0,255);
// 先定義好繪各種物件所用的顏色。
for($i=20;$i<=220;$i+=25)
ImageLine($im, 60, $i, 560, $i, $gird);
for($j=60;$j<=560;$j+=25)
ImageLine($im, $j, 20, $j, 220, $gird);
// 事先計算好位置、格子寬度,用for迴圈畫線,省事多了。
$zzg=10.55;
$zzd=7.63;
$lzg=10350;
// 假設的股市數據,
// $zzg是需要分析的這段時間的最高價,假設是10.55元。
// $zzd是需要分析的這段時間的最低價,假設是7.63元。
// $lzg是需要分析的這段時間的最高成交量,假設是10350手。
// 這是計算座標網格的「刻度」的重要資料。
$bl=$zzg-$zzd;
// 最高價跟最低價的差額。根據它跟網格總高度之間的比例,
// 就可以得出一個實際的價格在網格裡的位置。
for($i=1;$i<=7;$i++)
{
$y=$i*25-10;
// 根據網格線的位置計算標註刻度的適當高度(縱座標)。
$str=Number_Format($zzg-($i-1)/6*$bl,2,".",",");
// 計算每根刻度線對應的價格、並格式化該字串。
$x=55-ImageFontWidth(2)*StrLen($str);
// 根據這個字串將要佔用的寬度,計算出適當的橫座標。
ImageString($im, 2,$x, $y,$str, $data);
// 寫出這個字串。
}
$str=Number_Format($lzg,0,".",",");
ImageString($im,2,564,164,$str,$data);
$str=Number_Format($lzg/2,0,".",",");
ImageString($im,2,564,189,$str,$data);
// 由於寫成交量的刻度只有兩處,用循環寫就不合算了。
// 如果數量比較多,也應該用循環。
// 由於一張K線圖要畫無數根小K線柱,所以,把畫一根小K線柱寫成函數
function kline($img,$kp,$zg,$zd,$sp,$cjl,$ii)
// 參數:$img 圖象;$kp $zg $zd $sp 是開盤、最高、最低、收盤;
// $cjl 成交量;$ii 計數器,表示K線柱的序號。
{
global $bl,$zzd,$lzg;
// 宣告函數裡用到的$bl,$zzd,$lzg三個變數是全域變數。
$h=150; // K線柱區域高度是150。
$hh=200; // K線柱區域、成交量柱區域總高度是200。
if($sp<$kp)
$linecolor = ImageColorAllocate($img,0,175,175);
// 若收盤價低於開盤,是陰線,用青色
else
$linecolor = ImageColorAllocate($img,255,0,0);
// 否則為陽線,用紅色。
$x=58+$ii*4;
// 根據K線柱序號計算橫座標。
$y1=20+$h-($kp-$zzd)/$bl*$h;
// 根據開盤價計算對應縱座標。
$y2=20+$h-($sp-$zzd)/$bl*$h;
// 根據收盤價計算對應縱座標。
$y3=20+$h-($zg-$zzd)/$bl*$h;
// 根據最高價計算對應縱座標。
$y4=20+$h-($zd-$zzd)/$bl*$h;
// 根據最低價計算對應縱座標。
$y5=20+$hh-$cjl/$lzg*($hh-$h);
// 根據成交量計算對應縱座標。
if($y1<=$y2) ImageFilledRectangle($img,$x-1,$y1,$x+1,$y2,$linecolor);
else ImageFilledRectangle($img,$x-1,$y2,$x+1,$y1,$linecolor);
// 橫座標減1到加1,跨度為3。即繪寬度為3的小填充矩形。
// 高度和縱座標則是由開盤、收盤價決定的。
// 經測試發現,這個函數必須是左上點座標寫在右下點座標之前,
// 而非自動判斷兩點孰為左上,孰為右下。
ImageFilledRectangle($img,$x-1,$y5,$x+1,220,$linecolor);
// 依成交量繪成交量柱體。
ImageLine($img,$x,$y3,$x,$y4,$linecolor);
// 依最高價、最低價繪上下影線。
}
// 試畫一根。開盤8.50 最高8.88 最低8.32 收盤8.80 成交6578手。
kline($im,8.50,8.88,8.32,8.80,6578,1);
// 再畫一根。開盤8.80 最高9.50 最低8.80 收盤9.50 成交8070手。
// 光頭光腳的大陽線啊!
kline($im,8.80,9.50,8.80,9.50,8070,2);
// 再來一根陰線。開盤9.80 最高9.80 最低8.90 收盤9.06 成交10070手。
// 賠了!昨天拋掉多好呀。
kline($im,9.80,9.80,8.90,9.06,10070,3);
// ……
ImagePNG($im);
ImageDestroy($im);
?>
當然,要每一天的數據都這麼寫,太麻煩了。我做的是從資料庫取資料的。
這次就說到這裡。