用在PHP中的股票分析写的一个类

tznktg · 发表于 2007-10-4 16:15:45

<?php
/*******************************************************

  做股票就是跟庄.跟庄就赚钱.哈哈.

  功能:用于分析股票数据的记录值

********************************************************/

class get_stock_data

{
//PHP里的这些意思不大,先写上吧,用不用再说

var $b_price;
var $b_total;
var $p_price;
var $p_total;
var $z_price;
var $z_total;

var $b_a_price;
var $p_a_price;
var $z_a_price;

var $hd;
var $filename;

function get_stock_data()
{
  global $filename;
  $this -> hd = file("$filename");
}
function open_all_data()
{

  foreach($this -> hd as $values)
  {

$fc = explode("\t",$values);
$l_a = ereg_replace("[[:space:]]","",$fc[0]);
$l_b = ereg_replace("[[:space:]]","",$fc[1]);
$l_c = ereg_replace("[[:space:]]","",$fc[2]);
$l_d = ereg_replace("[[:space:]]","",$fc[3]);

if($l_d == "买盘")
{

$b_total .= $i."----)))".$l_a."___".$l_b."___".$l_c."___".$l_d."___总价格:".$l_b*$l_c."人民币<br>";  ////买盘所有值

$b_time .= $l_a.",";    ////买盘各条时间
$b_price_only_total[] = $l_c;    ////买盘的价格
$b_price_only_nums[] = $l_b;    ////买盘的数量
$b_price_nums += $l_b;    ////买盘总数量
$b_price_all_total += $l_c*$l_b; ////买盘总值

$i++;

}elseif($l_d == "卖盘"){

$p_total .= $l_a."___".$l_b."___".$l_c."___".$l_d."___总价格:".$l_b*$l_c."人民币<br>";  ////卖盘所有值

$p_time .= $l_a.",";    ////卖盘各条时间
$p_price_only_total[] = $l_c;    ////卖盘的价格
$p_price_only_nums[] = $l_b;    ////卖盘的数量
$p_price_nums += $l_b;
$p_price_all_total += $l_c*$l_b; ////卖盘总值

}else{

//"中性盘";
$t++;
$z_total .= $l_a."___".$l_b."___".$l_c."___".$l_d."<br>";

$z_time .= $l_a.",";       ////中性盘各条时间
$z_price_only_total .= $l_c.",";    ////中性盘所有的价格
$z_price_nums .= $l_b.",";    ////中性盘各条数量
$z_price_all_total += $l_c*$l_b;    ////中性盘总值

}

$all_pp[] = $l_c;

  }


  $all_mydata = array
   (
   'b_price' => $b_price_only_total,
   'p_price' => $p_price_only_total,
   'a_price' => $all_pp,
   'b_a' => $b_price_all_total,
   'p_a' => $p_price_all_total,
   'b_num' => $b_price_nums,
   'p_num' => $p_price_nums,
   );
  return $all_mydata;
}

//测试用了
function get_arr_value($s)
{
  $i = 0;
  foreach ($s as $key => $values)
  {
echo $i++."___".$key ."=>".$values."<br>";

  }
  //return substr($val,0,-1);
}

//这部份暂时没用
function re_max($s,$model=1)
{
  $s = explode(",",$s);
  for ( $i = 0 ; $i < count($s) ; $i ++ )
  {
if ( $i == 0 )
{
   $max = $s[$i];
   $min = $s[++$i];
   $i--;

}else{

   $min = $s[$i];
}

if($model)
{
if ( $max <= $min )    $max = $s[$i];

}else{

if ( $max > $min )    $max = $s[$i];
}
  }
  return $max;
}

//取唯一

function get_lines($a)
{
  return array_unique($a);
}

function get_once_detail($cu,$param,$model=1)
{
  foreach($this -> hd as $values)
  {
$fc = explode("\t",$values);
$l_a = ereg_replace("[[:space:]]","",$fc[0]);
$l_b = ereg_replace("[[:space:]]","",$fc[1]);
$l_c = ereg_replace("[[:space:]]","",$fc[2]);
$l_d = ereg_replace("[[:space:]]","",$fc[3]);

if($l_d == "$param")
{
//echo $l_d;
if($l_c == $cu)
{
   $cu_nums += $l_b;
   $cu_values += $l_b*$l_c;
}
$all_nums += $l_b;
$all_values += $l_b*$l_c;
}
  }

  switch($model)
  {
case 0: return $cu_nums; break;
case 1: return $cu_values; break;
case 2: return "买入总股数:".$all_nums." 买入总值".$all_values; break;
  }
}
}
?>

		自动登录	找回密码
密码			注册

全国各地医院查询	重量转换换算	RGB颜色查询	交通标志大全	各类快递查询
简体繁体转换	黄金价格实时走势	万年历查询	实时汇率转换	列车时刻查询
在线翻译工具	CSS中文手册	HTML学习教程	MySQL中文手册	JavaScript中文手册
PHP安全基础手册	PHP5面向对象编程教程	正则表达式系统教程	SQL Server精华	Apache 2.2 中文手册
DOS命令全集指南	windows脚本技术中文版	股票行情查询	历史上的今天	邮编区号查询
长度转换换算	货币汇率转换	常用电话号码	体育彩票查询	手机位置查询
域名Whois信息查询	谷歌PR值查询	台州网站建设	台州网站开发	台州域名注册
天气预报查询	长度转换换算器	在线电子地图	车牌号码查询	中国百家姓查询

用在PHP中的股票分析写的一个类

相关帖子