php＋java的程序
.....................
java program:
/*
以下程序为余姚塑料城期货交易数据的定时追踪分析程序
是对数据的初步分析，绘图分析则交给进一步的php程序来完成
本程序完成策划于2005-5-17（友谊日）
本程序可以作为k线图原始数据库
*/
import java.net.*;
import java.io.*;
import java.nio.*;
import java.text.*;
import java.util.*;
import java.util.date;
import java.util.regex.*;
class suliao
{
final static int line=11;
public static void main(string args[])
{
string url="http://www.ex-cp.com//yy_data/quot.txt";
string url1="http://www.51kk7.com/forum/user/companyinfo.aspx?companyid=0";
for(;;)
{
try
{
thread.sleep(10000);
string ori[][]=new string[line][14];
int sta=0;
//
for(;;)
{
thread.sleep(1000);
date date;
simpledateformat hua=new simpledateformat("h m s");
string time=hua.format(date=new date());
string[] hua1=time.split("/s");
int i=integer.parseint(hua1[0])*3600+integer.parseint(hua1[1])*60+integer.parseint(hua1[2]);
if(i<34100)
break;
if(i>39900)
break;
url hp=new url(url);
urlconnection hpcon=hp.openconnection();
int len=hpcon.getcontentlength();
inputstream input=hpcon.getinputstream();
int c;
stringbuffer hu=new stringbuffer("");
string hu1[]=new string[line];
int k=0;
while(((c=input.read())!=-1)&&(--len>0))
{
if(c==10)
{
hu1[k]=hu.tostring();
hu=new stringbuffer("");
k++;
}
else
{
char c1=(char)c;
hu.append(c1);
}
}
hu1[line-1]=hu.tostring();
string hu2[][]=new string[line][14];
suliao he=new suliao();
for(int k1=0;k1<line;k1++)
hu2[k1]=he.zz(hu1[k1]);
/*
for(int k2=0;k2<10;k2++)
{
for(int k3=0;k3<14;k3++)
system.out.print(hu2[k2][k3]+"/t");
system.out.println("");
}
*/
int k2;
if(sta==0)
{
ori=hu2;
sta=1;
for(k2=0;k2<line;k2++)
he.writeinfo(hu2[k2],i);
}
else if(sta==1)
{
//he.writeinfo(hu2[0]);
//let's start the compare program,go go go
for(k2=0;k2<line;k2++)
{
//system.out.println(hu2[k2][12]+"-"+ori[k2][12]);
if(true)//he.zv(hu2[k2][12])!=he.zv(ori[k2][12]))
{
he.writeinfo(hu2[k2],i);
}
}
ori=hu2;
}
}
//
}
catch(exception e)
{
//system.out.println("wrong wrong wrong!!!");
e.printstacktrace();
}
}
}
public string[] zz(string a)
{
string[] hello=a.split("/,");
for(int i=0;i<hello.length;i++)
hello[i]=hello[i].trim();
return hello;
}
public int zv(string a)
{
return integer.parseint(a);
}
public void writeinfo(string[] a,int i)//写入文本数据库中
{
calendar cn=calendar.getinstance();
int mon=cn.get(calendar.month)+1;
string dir=cn.get(calendar.year)+"-"+mon+"-"+cn.get(calendar.day_of_month);
string file=cn.get(calendar.year)+"-"+mon+"-"+cn.get(calendar.day_of_month)+"/"+a[0]+".txt";
file hu=new file(file);
file ha=new file(dir);
try
{
if(!ha.exists())
ha.mkdir();
if(!hu.exists())
hu.createnewfile();
//date date;
//simpledateformat hua=new simpledateformat("h m s");
//string time=hua.format(date=new date());
//string[] hua1=time.split("/s");
//int i=integer.parseint(hua1[0])*3600+integer.parseint(hua1[1])*60+integer.parseint(hua1[2]);
int k;
stringbuffer kv=new stringbuffer("");
for(k=0;k<14;k++)
{
kv.append(a[k]+"/t");
}
kv.append(i+"/n");
system.out.println(kv.tostring());
filewriter rar=new filewriter(hu,true);
rar.write(kv.tostring());
rar.close();
}
catch(exception e)
{
e.printstacktrace();
}
}
}
php program
<?
$go=$_post['go'];
if(!$go)
$go=$_get['go'];
if($go==1)
{
$dir=$_post['time'];
$file1=$_post['file'];
$handle=opendir('./'.$dir);
print"<form action=index.php method=post>
<input type=hidden name=go value=1>
时间:<input type=/"text/" value=/"$dir/" readonly name=/"time/" />
品种:<select name=file onchange=/"this.form.submit()/">
<option value=/"/">选择品种</option>";
while ($file = readdir($handle)) {
if(($file!=".")&&($file!=".."))
{
$file=explode(".",$file);
$file=$file[0];
echo "<option value=$file>$file</option>";
}
}
print"</select></form>";
closedir($handle);
if($file1)
{
print"<hr><img src=index.php?go=2&time=$dir&file=$file1>";
}
}
elseif($go==2)
{
set_time_limit(10);
$time=$_get['time'];
$file=$_get['file'].".txt";
$file1=explode(".",$file);
$str=$file1[0].':'.$time.' 绘制时间('.date("y-m-d h:i:s").')';
$afile="./".$time."/".$file;
$a=file($afile);
for($i=0;$i<count($a);$i++)
{
$b=explode("/t",$a[$i]);
if($i==0)
{
$p=0;
$hu[$p][0]=$b[12];
$hu[$p][1]=$b[13];
$hu[$p][2]=$b[14];
$p++;
}
else
{
$b1=explode("/t",$a[$i-1]);
if($b[12]!=$b1[12])
{
$dis=$b[12]-$b1[12];
$hu[$p][0]=$dis;
$hu[$p][1]=$b[13];
$hu[$p][2]=$b[14];
$p++;
}
}
}
/*
echo"<table border=1><tr><td>成交量</td><td>报价</td><td>时间</td></tr>";
for($i=0;$i<$p;$i++)
{
$h=floor($hu[$i][2]/3600);
$h1=$hu[$i][2]-$h*3600;
$m=floor($h1/60);
$s=$h1-$m*60;
$time=$h.':'.$m.':'.$s;
echo"<tr><td>".$hu[$i][0]."</td><td>".$hu[$i][1]."</td><td>".$time."</td></tr>";
}
echo"</table>";
*/
//绘图开始
header("content-type: image/gif");
$im=imagecreate(600,400);
$backcolor=imagecolorallocate($im,236,236,236);
$linecolor1=imagecolorallocate($im,255,0,0);//涨区间线，红线
$linecolor2=imagecolorallocate($im,0,255,0);//跌区间线，绿线
$linecolor3=imagecolorallocate($im,0,0,255);//平区间线，蓝线
$linecolor4=imagecolorallocate($im,247,198,166);//表格线
$linecolor5=imagecolorallocate($im,156,54,143);//报价曲线
//$linecolor4=imagecolorallocate($im,,,);
imagefill($im,0,0,$backcolor);
//标尺线开始(曲线部分)
imageline($im,30,10,30,110,$linecolor1);
imageline($im,30,110,30,210,$linecolor2);
imageline($im,30,110,570,110,$linecolor3);
imageline($im,570,110,570,10,$linecolor1);
imageline($im,570,110,570,210,$linecolor2);
imagestring($im,2,5,105,0,$linecolor3);
imagestring($im,2,572,105,0,$linecolor3);
for($i=0;$i<=4;$i++)
{
$up="+".(5-$i)*40;
$down="-".($i+1)*40;
imageline($im,30,(10+20*$i),570,(10+20*$i),$linecolor4);
imagestring($im,2,5,(5+20*$i),$up,$linecolor1);
imagestring($im,2,572,(5+20*$i),$up,$linecolor1);
imageline($im,30,(130+20*$i),570,(130+20*$i),$linecolor4);
imagestring($im,2,5,(125+20*$i),$down,$linecolor2);
imagestring($im,2,572,(125+20*$i),$down,$linecolor2);
}
$t[0]="9:30";
$t[1]="9:45";
$t[2]="10:00";
$t[3]="10:15";
$t[4]="10:30";
$t[5]="10:45";
$t[6]="11:00";
for($i=0;$i<=6;$i++)
{
if(($i!=0)&&($i!=6))
{
imageline($im,(30+90*$i),10,(30+90*$i),210,$linecolor4);
}
$t1=$t[$i];
imagestring($im,2,(15+90*$i),212,$t1,$linecolor3);
}
//标尺线开始(成交量部分)
for($i=0;$i<=5;$i++)
{
$ii=290+20*$i;
$iii=(5-$i)*10;
imageline($im,30,$ii,570,$ii,$linecolor4);
imagestring($im,2,5,$ii-5,$iii,$linecolor1);
imagestring($im,2,575,$ii-5,($iii*10),$linecolor3);
}
imageline($im,30,290,30,390,$linecolor4);
imageline($im,570,290,570,390,$linecolor4);
for($i=1;$i<=5;$i++)
{
$ii=30+90*$i;
imagedashedline($im,$ii,290,$ii,390,$linecolor4);
}
//标尺线结束
//曲线绘制开始
$a=file($afile);
for($i=0;$i<count($a);$i++)
{
$b=explode("/t",$a[$i]);
$b1=$b[13];
$b2=$b[14];
$x=($b2-34100)/10;
$y=-$b1*0.5+110;
if($i==0)
{
$x1=$x;
$y1=$y;
}
else
{
imageline($im,$x,$y,$x1,$y1,$linecolor5);
$x1=$x;
$y1=$y;
}
}
//成交量绘制开始
$sum=0;
for($i=0;$i<$p;$i++)
{
$y=390-2*$hu[$i][0];
$x=($hu[$i][2]-34100)/10;
imageline($im,$x,390,$x,$y,$linecolor1);
$sum+=$hu[$i][0];
$ysum=390-0.2*$sum;
if($i==0)
{
$x1=$x;
$y1=$ysum;
}
else
{
imageline($im,$x1,$y1,$x,$y1,$linecolor3);
imageline($im,$x,$y1,$x,$ysum,$linecolor3);
$x1=$x;
$y1=$ysum;
}
}
imageline($im,$x1,$y1,570,$y1,$linecolor3);
//结算价格曲线绘制
$sum=0;
$allprice=0;
for($i=0;$i<$p;$i++)
{
$sum+=$hu[$i][0];
$allprice+=$hu[$i][1]*$hu[$i][0];
if($sum==0)$nowprice=0;
else
$nowprice=$allprice/$sum;
$x=($hu[$i][2]-34100)/10;
$y=-$nowprice*0.5+110;
if($i==0)
{
$x1=$x;
$y1=$y;
}
else
{
imageline($im,$x1,$y1,$x,$y1,$linecolor1);
imageline($im,$x,$y1,$x,$y,$linecolor1);
$x1=$x;
$y1=$y;
}
}
imageline($im,$x1,$y1,570,$y1,$linecolor1);
//绘制结束
//************图片解释部分开始*******************//
$str0=iconv("gb2312","utf-8",$str);
$str1=iconv("gb2312","utf-8","上图红线表示结算价格线，紫线表示价格曲线，下图红线表示当时成交量，蓝线表示总成交量");
imagettftext($im,10,0,30,240,$linecolor1,"d:/winnt/fonts/simhei.ttf",$str0);
imagettftext($im,10,0,30,255,$linecolor1,"d:/winnt/fonts/simhei.ttf",$str1);
//************图片解释部分结束*******************//
imagegif($im);
imagedestroy($im);
}
else
{
//时间从2005-05-24开始
print"<form action=index.php method=post>
<input type=hidden name=go value=1>
选择时间:
<select name=time>";
for($i=0;$i<100;$i++)
{
$time1=date("y-n-j",mktime(0,0,0,date("m"),date("d")-$i,date("y")));
$time2=date("y-m-d",mktime(0,0,0,date("m"),date("d")-$i,date("y")));
if(is_dir($time1))
print"<option value=/"$time1/">$time2</option>
";
}
print"</select>
<p>
<input type=submit name=submit value=提交>
</form>";
}
?>
新闻热点
疑难解答
