欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


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

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有4290人关注过本帖树形打印复制链接

主题:求助统计

帅哥哟,离线,有人找我吗?
26327756l
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:黑侠 帖子:676 积分:2548 威望:0 精华:3 注册:2011/4/13 16:18:50
  发帖心情 Post By:2011/12/15 8:45:07 [显示全部帖子]

问题正在解决中


 回到顶部
帅哥哟,离线,有人找我吗?
26327756l
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:黑侠 帖子:676 积分:2548 威望:0 精华:3 注册:2011/4/13 16:18:50
  发帖心情 Post By: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;


 回到顶部