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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件金字塔软件问题提交 → 请版主测试一下即可发现“跨周期引用”BUG

   

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


  共有5295人关注过本帖平板打印复制链接

主题:请版主测试一下即可发现“跨周期引用”BUG

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


加好友 发短信
等级:论坛游侠 帖子:182 积分:363 威望:0 精华:0 注册:2010/4/18 10:45:35
请版主测试一下即可发现“跨周期引用”BUG  发帖心情 Post By:2010/10/11 10:53:01 [只看该作者]

请版主测试一下加入“跨周期引用”在5分钟图里画日开盘线,就能看到错误了!

 


INPUT:N1(0.2,0.1,100),N2(1,0,1),ZQ(6,-1,20);

fc:=c;
fo:=o;
cc:0*c,linethick0;
oo:0*c,linethick0;
t1:=0*c;
t2:=0*c;

for i=1 to datacount do begin
  if i=1 and fc[i]>fo[i] then
    cc[i]:=fc[i];
    oo[i]:=fc[i];
  if i=1 and fc[i]<fo[i] then
    cc[i]:=fc[i];
    oo[i]:=fc[i];
  if i>1 then
    cc[i]:=cc[i-1];
    oo[i]:=oo[i-1];
  if i>1 and fc[i]>cc[i]*(1+n1/100) then begin
    cc[i]:=cc[i-1]*(1+n1/100);
    oo[i]:=cc[i-1];
end;
  if i>1 and fc[i]<oo[i]/(1+n1/100) then begin
    oo[i]:=oo[i-1]/(1+n1/100);
    cc[i]:=oo[i-1];
end;
  if oo[i]=oo[i-1] then
     t1[i]:=t1[i-1]+1;
  if cc[i]=cc[i-1] then
     t2[i]:=t2[i-1]+1;
end;
o1:=ref(oo,t1+1);
c1:=ref(cc,t2+1);
STICKLINE(c1=oo,cc,oo,8,1)COLORRED;
STICKLINE(o1=cc,cc,oo,8,1)COLORCYAN;

 

{加入跨周期引用画日开盘线}
QSX:=STKINDI('','KPX.开盘线',0,6);   //引用KPX指标的任意(ZQ)周期开盘线;
DRAWSL(N2<>0,QSX,0,2,1),COLORFF00FF;

 

/////////
说明:引用的KPX指标内容
开盘线:OPEN;

 


 回到顶部