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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 求助,编译通过,为何不显示,也没提示。

   

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


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

主题:求助,编译通过,为何不显示,也没提示。

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


加好友 发短信
等级:新手上路 帖子:63 积分:0 威望:0 精华:0 注册:2012/1/14 19:49:32
求助,编译通过,为何不显示,也没提示。  发帖心情 Post By:2015/7/5 11:02:38    Post IP:60.209.184.216[只看该作者]

帮忙看看哪里出错了,代码如下:

VARIABLE:
fc:=close,fh:=h,fl:=l,fcolor:=0,ft1:=0,fb1:=0,fi:=0,t[4]=0,b[4]=0,pt=1,pb=1;
if datacount<2 then exit;
  for i=1 to 4 do begin t[i]:=i;b[i]:=1; end;
  for i=2 to datacount do begin
      if fc[i]>fc[t[pt]] then begin
         fh[i]:=fc[i];fl[i]:=fc[t[1]];fcolor[i]:=1;
         b[4]:=b[3];b[3]:=b[2];b[2]:=b[1];b[1]:=t[1];
         t[4]:=t[3];t[3]:=t[2];t[2]:=t[1];t[1]:=i;
         pt:=1;
         pb:=if(pb=3,3,pb+1);
      end;
      else if fc[i]<fc[b[pb]] then begin
           fh[i]:=fc[b[1]];fl[i]:=fc[i];fcolor[i]:=-1;
           t[4]:=t[3];t[3]:=t[2];t[2]:=t[1];t[1]:=b[1];
           b[4]:=b[3];b[3]:=b[2];b[2]:=b[1];b[1]:=i;
           pb:=1;
           pt:=if(pt=3,3,pt+1);
      end;
      else if fc[i]<=fc[t[pt]] and fc[i]>=fc[b[pb]] then begin
           fh[i]:=fh[i-1];fl[i]:=fl[i-1]; fcolor[i]:=fcolor[i-1];
      end;
      ft1[i]:=t[1];fb1[i]:=b[1];fi[i]:=i;
  end;
STICKLINE(fcolor=1,fh,fl,10,0),colorred;
STICKLINE(fcolor=-1,fh,fl,10,0),colorgreen;


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


加好友 发短信
等级:新手上路 帖子:63 积分:0 威望:0 精华:0 注册:2012/1/14 19:49:32
  发帖心情 Post By:2015/7/5 11:06:43    Post IP:60.209.184.216[只看该作者]

本人水平有限,对复杂的代码无能为力了。真心希望有人能帮助一下。

 

别的软件提示 fh[i]:=fh[i-1];fl[i]:=fl[i-1]; fcolor[i]:=fcolor[i-1];此行数据类型错误。


 回到顶部