策略编写求助区-求助统计金字塔客服中心 - 专业程序化交易软件提供商

以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  策略编写求助区  (http://222.73.7.161/bbs/list.asp?boardid=11)
----  求助统计  (http://222.73.7.161/bbs/dispbbs.asp?boardid=11&id=9385)

--  作者：狼啊狼
--  发布时间：2011/12/14 20:32:20
--  求助统计
1、每日开盘第一个小时K线收阳，当日也收阳（或者每日开盘第一小时K线与当日K线都为阴），作为一个成功数目；依此累计成功数目，除以累计天数，计算成功率； 2、上市以来，分别提取阳线、阴线；针对阳线统计：符合条件：（开盘价-最低价）/前一天波幅<0.3占所统计阳线比例；针对阴线统计：符合条件：（最高价-开盘价）/前一天波幅<0.3占所统计阴线比例以上都是采用新交易系统编制。请领导们帮帮忙吧。

--  作者：26327756l
--  发布时间：2011/12/15 8:45:07
--

问题正在解决中

--  作者：26327756l
--  发布时间：2011/12/15 13:38:22
--

首先新建一个公式取名 tr1

公式语句如下

tr1:tr;
cc:c;
oo:o;

然后在新建一个指标语句如下即可

仅供参考

variable:tz=0,tt=0,qtt:=0,yang1=0,yin1=0,yang2=0,yin2=0,yang22=0,yin22=0;
tref:=ref(time,1);
tr1:=STKINDI( \'\',\'tr1.tr1\',2 ,6 ,-1);
oo:=STKINDI( \'\',\'tr1.oo\',2 ,6 ,-1);
cc:=STKINDI( \'\',\'tr1.cc\',2 ,6 ,-1);
if date<>ref(date,1) then begin tt:=time; tz:=tref; end
if time-tt=010000 then qtt:=time;

ctt:tt,linethick0;
qqtt:qtt,linethick0;
if time=tz then
    begin
      if REFDATE(o,date,qtt)>REFDATE(c,date,qtt) and oo>cc then yin1:=yin1+1;
      if REFDATE(o,date,qtt)<REFDATE(c,date,qtt) and oo<cc then yang1:=yang1+1;

    end

if o>c then
begin
      yang2:=yang2+1;
      if (o-l)/tr1<0.3 then yang22:=yang22+1;
end

if o<c then
begin
      yin2:=yin2+1;
      if (h-o)/tr1<0.3 then yin22:=yin22+1;
end
条件1阴:yin1;
条件1阳:yang1;
条件2阳:yang22/yang2;
条件2阴:yin22/yin2;

--  作者：狼啊狼
--  发布时间：2011/12/15 21:32:55
--
第一个、没有统计上市以来的K线数；第二个、不知道哪里显示了第一个小时，没看懂；第三个、能不能在每个语句后面提示中文语言，让我看的明白一些。

--  作者：狼啊狼
--  发布时间：2011/12/15 21:34:08
--  回复：（26327756l）首先新建一个公式取名 tr1 ...

第一个、没有统计上市以来的K线数；第二个、不知道哪里显示了第一个小时，没看懂；第三个、能不能在每个语句后面提示中文语言，让我看的明白一些。