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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → TB代码转到金字塔求助

   

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


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

主题:TB代码转到金字塔求助

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


加好友 发短信
等级:论坛游侠 帖子:292 积分:652 威望:0 精华:0 注册:2012/6/3 11:46:45
TB代码转到金字塔求助  发帖心情 Post By:2014/4/1 17:00:52    Post IP:115.215.152.86[显示全部帖子]


if ((CurrentBar <= 30))        //当前k线位置小于30            
{a24=((Close - Close[30]) / 30);      //当前收盘减去30天前收盘除以30
 a25=Average(Abs((Close - Close[1])),30);}    //求abs(c-ref(c,1))的30平均     
else
{               
 aa2=(Close - Close[1]) ;                 //当收跟前收差
 a24=(a24[1] + ((aa2- a24[1]) * (1 / 30) ));       
 a25=(a25[1] + ((Abs(aa2) - a25[1]) * (1 / 30) ));}


这是我写的金字塔代码
variable:a24=0,a25=0;
bs:=count(c);
r30:=ref(c,30);
rc:=ref(c,1);
a25p:=ma(abs(c-ref(c,1)),30);
if bs<=30 then BEGIN
a24:=(c-r30)/30;
a25:=a25p;

end;
else BEGIN
aa2:=c-rc;
a24:=a24+(aa2-a24)*(1/30);
a25:=a25+(abs(aa2)-a25)*(1/30);

end;


可是计算出来的结果a25始终是0,我不知道问题出在哪里


[此贴子已经被作者于2014/4/1 17:01:31编辑过]

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


加好友 发短信
等级:论坛游侠 帖子:292 积分:652 威望:0 精华:0 注册:2012/6/3 11:46:45
  发帖心情 Post By:2014/4/1 17:18:59    Post IP:115.215.152.86[显示全部帖子]

variable:a24=0,a25=0;
bs:=count(c);
r30:=ref(c,30);
rc:=ref(c,1);
a25p:=ma(abs(c-ref(c,1)),30);
if bs<=30 then BEGIN
a24:=(c-r30)/30;
a25:=a25p;

end;
else BEGIN
aa2:=c-rc;
a24:=a24+(aa2-a24)*(1/30);
a25:=a25+(abs(aa2)-a25)*(1/30);

end;

ddd:a25;

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


加好友 发短信
等级:论坛游侠 帖子:292 积分:652 威望:0 精华:0 注册:2012/6/3 11:46:45
  发帖心情 Post By:2014/4/1 17:21:39    Post IP:115.215.152.86[显示全部帖子]

variable:a24=0,a25=0;
bs:=barscount(c);
r30:=ref(c,30);
rc:=ref(c,1);
a25p:=ma(abs(c-ref(c,1)),30);
if bs<=30 then BEGIN
a24:=(c-r30)/30;
a25:=a25p;

end;
else BEGIN
aa2:=c-rc;
a24:=a24+(aa2-a24)*(1/30);
a25:=a25+(abs(aa2)-a25)*(1/30);

end;

ddd:a25;

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


加好友 发短信
等级:论坛游侠 帖子:292 积分:652 威望:0 精华:0 注册:2012/6/3 11:46:45
  发帖心情 Post By:2014/4/1 17:45:31    Post IP:115.215.152.86[显示全部帖子]

variable:a24=0,a25=0;
bs:=barscount(c);
r30:=ref(c,30);
rc:=ref(c,1);
a25p:=ma(abs(c-ref(c,1)),30);
if bs<=30 then BEGIN
a24:=(c-r30)/30;
a25:=a25p;

end;
else BEGIN
aa2:=c-rc;
a24:=a24+(aa2-a24)*(1/30);
a25:=a25+(abs(aa2)-a25)*(1/30);

end;

ddd:a25;

 回到顶部