PHP繪製心電形狀曲線統計圖表[源碼]_PHP教程

　　 先看下最終效果:

下面為PHP代碼:

 

  
/****************************** 
  
* 折線圖產生函數 
  
******************************/ 
  
function line_stats_pic($value_y,$width,$high,$strong=1,$fix=0){ 
  
//y值處理函數 
  
function line_point_y($num,$width,$high,$max_num_add,$min_num_add,$y_pxdensity){ 
  
 $return=$high-floor(($num-$min_num_add+$y_pxdensity)/(($max_num_add-$min_num_add)/$high)); 
  
 return $return; 
  
} 
  
 
  
//參數處理 
  
$allnum=sizeof($value_y); 
  
$maxmax_num=max($value_y); //最大值 
  
$minmin_num=min($value_y); //最小值 
  
$limit_m=$max_num-$min_num; //極差 
  
$max_num_add=$max_num+$limit_m*0.1; //軸最大值 
  
$min_num_add=$min_num-$limit_m*0.1; //軸最小值 
  
$limit=$max_num_add-$min_num_add; //極差-座標軸y 
  
$y_pxdensity=($max_num_add-$min_num_add)/$high; //y軸密度 
  
$x_pxdensity=floor($width/$allnum); //x軸密度 
  
reset($value_y); //將數組指標歸零 
  
$i=0; 
  
foreach($value_y as $val){ 
  
 $point_y[$i]=line_point_y($val,$width,$high,$max_num_add,$min_num_add,$y_pxdensity); 
  
 $i++; 
  
} 
  
$zero_y=line_point_y(0,$width,$high,$max_num_add,$min_num_add,$y_pxdensity); //零點的y值 
  
$empty_size_x=(strlen($max_num) > strlen($min_num) ? strlen($max_num) : strlen($min_num))*5+3; //左邊空白 
  
 
  
//圖片流開始 
  
header("Content-type:image/png"); 
  
$pic=imagecreate($width+$empty_size_x+10,$high+13); 
  
imagecolorallocate($pic,255,255,255); //背景色 
  
$color_1=imagecolorallocate($pic,30,144,255); //線條色 
  
$color_2=imagecolorallocate($pic,0,0,0); //黑色 
  
$color_3=imagecolorallocate($pic,194,194,194);//灰色 
  
//繪製網格 
  
imagesetthickness($pic,1); //網格線寬 
  
$y_line_width=floor($width/100); //縱網格線數目 
  
$y_line_density=$y_line_width==0 ? 0 :floor($width/$y_line_width); //縱網格線密度 
  
$point_zero_y=$zero_y > $high ? $high : $zero_y; 
  
imagestring($pic,1,$empty_size_x-1,$high+4,"0",$color_2); //零點數軸標記 
  
for($i=1;$i <= $y_line_width;$i++){ //繪製縱網格線 
  
 imagesetthickness($pic,1); //網格線寬 
  
 imageline($pic,$y_line_density*$i+$empty_size_x,0,$y_line_density*$i+$empty_size_x,$high,$color_3); 
  
 imagesetthickness($pic,2); //軸點線寬 
  
 imageline($pic,$y_line_density*$i+$empty_size_x,$point_zero_y-4,$y_line_density*$i+$empty_size_x,$point_zero_y,$color_2); 
  
 imagestring($pic,1,10
http://www.bkjia.com/PHPjc/486091.htmlwww.bkjia.comtruehttp://www.bkjia.com/PHPjc/486091.htmlTechArticle先看下最終效果: 下面為PHP代碼: /****************************** *折線圖產生函數 ******************************/ functionline_stats_pic($value_y,$width,$high,$ str...
  
