交易数据还是有错 [复制链接]

牛肉炒面

初级散户

Rank: 2

精华: 0
UID: 1873
积分: 105
帖子: 44
主题: 12
阅读权限: 30
注册时间: 2008-7-13
最后登录: 2019-11-26

电梯直达

1^#

发表于 2013-7-5 17:59:26 |显示全部楼层 |倒序浏览

经过前天交易量为负的事，我在我的代码里加上一段数据检查的功能。
在多个指数合约上运行后发现以下数据错误（红色部分）。
不知是TB的错，还是交易所数据的错，希望以后都不要有错。
TB 你们自己从来都不做类似检查吗？

if (BarStatus == 2)
{
  str1="";

  if (open<0 or close<0 or high<0 or low<0)
str1=str1+"今日价格小于0,";
  if (open>high or close>high or low>high or open<low or close<low or high<low)
str1=str1+"今日价格数据有误"+" O"+text(open)+", C"+text(close)+", H"+text(high)+", L"+text(low);
  if (vol<0)
str1=str1+"今日成交量小于0,";
  if (Openint<0)
str1=str1+"今日持仓量小于0,";

  For i = 1 To Barcount-1    //从上一根k线回溯到历史第一根k线做上面同样的检查
  {
if (open<0 or close<0 or high<0 or low<0)
   str1=str1+datetostring(date)+"价格小于0,";
if (open>high or close>high or low>high or open<low or close<low or high<low)
   str1=str1+datetostring(date)+"价格数据有误"+" O"+text(open)+", C"+text(close)+", H"+text(high)+", L"+text(low);
if (vol<0)
   str1=str1+datetostring(date)+"成交量小于0,";
if (Openint<0)
   str1=str1+datetostring(date)+"持仓量小于0,";
  }

  //输出 str1
}

RU000 橡胶指数 2001-05-31价格数据有误 O7398, C7386, H7393, L7382;  (开盘价大于最高价)
C9000 玉米指数 2005-12-19价格数据有误 O1305, C1313, H1318, L1312;  (开盘价小于最低价)
CF000 棉花指数 2004-12-17价格数据有误 O12330, C12297, H12345, L12306; (收盘价小于最低价)