php股票K线图生成代码
<?php header("content-type: image/gif"); $data = array ("-1174.58","-1865.41","1961.24","-1174.58","-1865.41","1961.24","-1174.58","-1865.41","1961.24","-1174.58","-1865.41","1961.24","-1174.58","-1865.41","1961.24","-1174.58","-1865.41","1961.24","-1174.58","-1865.41","1961.24","-1174.58","-1865.41","1961.24","-1174.58","-1865.41","1961.24","-1174.58","-1865.41","1961.24"); $colors = array (array (255,0,0 ),array (0,255,0 ) ); $path = "gg15_600050.gif"; $title = "中国联通(600050)30日资金进出"; $date = array ("2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00","2010-05-20 00:00:00"); $hai = array(7203,6037,1931,9605,7405,8855,228,7771,8671,8791,1290,426,3265,4298,4809,3350,8204,8682,5523,7569,5853,593,3124,9062,3329,3236,2252,8756,2796,5164,2599,2630,1470,9779,8805,1512,1517,5635,760,1380,152,6035,2905,3163,9443,9432,5031,2838,6802,9330,1878,1333,4297,4180,3037,4527,9043,7287,3248,3448,3405,7204,2203,3974,4399,7333,4541,7033,4292,6128,9955,8603,297,6992,3282,9612,4483,8379,4016,6038,4163,3789,6896,8710,1502,1579,1712,3705,3619,5150,3007,1853,2776,3056,569,9031,6092,8600,8941,6366,5829,433,8011,9637,9106,1761,2422,9873,8186,1136,1763,3050,285,1962,775,9900,7371,2691,9051,6596,6858,6726,1527,3970,910,2621,7598,7899,6546,3678,2202,9411,6129,8352,4830,4484,6776,243,323,3946,751,7508,8173,3776,5071,3847,3318,4901,2102,7516,5251,3299,8859,2114,8711,9800,7707,5898,3489,580,5763,2470,4126,6269,5191,182,412,3043,3208,2438,6889,1732,1979,7692,3445,8214,8620,9446,4624,3615,5496,6152,213,3715,9623,1215,4757,9443,3366,2988,8043,6874,3742,4974,4812,6839,3016,5625,4656,5315,8303,8346,2315,3230,1969,1688,7381,6463,1030,8856,4691,6042,7652,8502,3839,7844,9149,4029,9465,2897,7688,3791,1458,6981,484,1290,4261,1222,9503,4881,7663,1399,2260,8066,6405,8442,722,9297,177,8426,2103,2078,3521,2280,8570,4663,6227,5784,7438,654,3036,9965,872,8306,3537,899,5888,1319,2472,9218,4853,7849,9433,1196,4880,1597,9258,7465,8138,817,1637,4201,1939,8914,1114,2232,8251,4538,7378,7438,4489,993,5269,944,2718,6633,4378,8431,155,5061,9347,1125,8865,4629,9965,4706,6263,8742,971,301); draw(600,300,$data,$colors,$path,$title,$date); function draw($w,$h,$data,$colors,$path,$title,$date) //创建新空白图形 //箭头50像素,内容400*300 $width = $w; $height = $h; //取得左下角的坐标点,左边50像素和最下边50像素用于写标尺 $l_b_x = 50; $l_b_y = $height / 2; $chartfont = 2; //图表字体 $font = 'c:/windows/fonts/simsun.ttc'; //支持汉字的字体 $chartfontheight = imagefontheight($chartfont); //图表字体的大小 //取得最大的数据 $max = abs(max($data)); $max = $max > abs(min($data)) ? $max : abs(min($data)); $image = imagecreate($width, $height); //填充背景为白色 $color_white = imagecolorallocate($image, 0xff, 0xff, 0xff); //白色 $color_diwen = imagecolorallocate($image, 0xd8, 0xd8, 0xd8); //暗灰色 imagefill($image, 0, 0, $color_white); //写入logo //imagettftext($image,20,0,$l_b_x+20,45,$color_diwen,$font,'华南财经网'); //画坐标 //坐标颜色为黑色,先画坐标,再画箭头 $black_color = imagecolorallocate($image, 0x00, 0x00, 0x00); imageline($image, $l_b_x, $l_b_y, $l_b_x, 10, $black_color); imageline($image, $l_b_x, $l_b_y, $width - 10, $l_b_y, $black_color); //箭头 imageline($image, $l_b_x, 10, $l_b_x - 3, 14, $black_color); imageline($image, $l_b_x, 10, $l_b_x + 3, 14, $black_color); imageline($image, $width - 10, $l_b_y, $width - 13, $l_b_y - 3, $black_color); imageline($image, $width - 10, $l_b_y, $width - 13, $l_b_y + 3, $black_color); //画底纹,灰色;画20条底纹;虚线 $pit = floor(($l_b_y - 50) / 10); //每一段的高度 $pit_x = floor(($width - $l_b_x - 30) / count($data)); //每一段的宽度 //计算单位 $x_max = $max; $flag_danwei = 0; while ($x_max > 1000) { $x_max/= 100; $flag_danwei++; } switch ($flag_danwei) { // case 0:$danwei = '(元)';break; case 0: $danwei = '(万)'; break; case 1: $danwei = '(百万)'; break; case 2: $danwei = '(亿)'; break; case 3: $danwei = '(百亿)'; break; } for ($i = 1; $i < 11; $i++) { imageline($image, $l_b_x + 1, $l_b_y - $i * $pit, $width - 15, $l_b_y - $i * $pit, $color_diwen); //从坐标的值 $v_v = number_format(($max / (10 * pow(100, $flag_danwei)) * $i) , 2); $v_v = substr($v_v, 0, 5); imagestring($image, $chartfont, $l_b_x - 40, $l_b_y - $i * $pit - 10, $v_v, $black_color); } //原点坐标 imagestring($image, $chartfont, $l_b_x - 20, $l_b_y - 10, 0, $black_color); //写入汉字,单位 和标题 imagettftext($image, 10, 0, $l_b_x - 45, 20, $black_color, $font, $danwei); //imagettftext($image, 11,0,$width/2-70,$l_b_y+20,$black_color, $font,$title); //画柱体,长方形,并着色 $color_big = imagecolorallocate($image, $colors[0][0], $colors[0][1], $colors[0][2]); $color_small = imagecolorallocate($image, $colors[1][0], $colors[1][1], $colors[1][2]); for ($j = 0; $j < count($data); $j++) { $d_h = floor(abs($data[$j] / $max * 10 * $pit)); //柱体高度 $current_date = substr($date[$j], 5, 5); // $current_date .= substr($date[$j],8,2); imagerectangle($image, $l_b_x + $j * $pit_x + 1, $l_b_y, $l_b_x + ($j + 1) * $pit_x - 2, $l_b_y - $d_h, $black_color); //为矩形着色 $current_color = $data[$j] > 0 ? $color_big : $color_small; imagefilltoborder($image, $l_b_x + $j * $pit_x + 1 + floor($pit_x / 2) , $l_b_y - floor($d_h / 2) , $black_color, $current_color); //写入日期 /*imagestring($image, $chartfont, $l_b_x+$j*$pit_x, $l_b_y+2, $current_date, $black_color);*/ imagettftext($image, 8, 90, $l_b_x + $j * $pit_x + 10, $l_b_y - $d_h, $black_color, $font, $current_date); } if ($path != "") imagegif($image, $path); else imagegif($image); imagedestroy($image); } //画图函数结束
本文地址:http://www.phprm.com/tuxiang/fs4449.html
转载随意,但请附上文章地址:-)