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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → [求助]求助老师帮改文华公式,谢谢!

   

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


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

主题:[求助]求助老师帮改文华公式,谢谢!

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


加好友 发短信
等级:管理员 帖子:26632 积分:0 威望:0 精华:7 注册:2015/4/9 14:59:07
  发帖心情 Post By:2019/7/29 9:13:54    Post IP:180.169.30.6[显示全部帖子]

抱歉改不了,没有ISNULL匹配的函数。

CURR:=CURRBARSCOUNT;
N:=33;


UR:=6;


LR:=6;


TC1:=IF(H=HHV(H,8*UR),H,NULL);


TC2:=REFX(BARSLAST(TC1=H),10000)+1;


UPPER:=REFX(IF(TC2=1,H,REF(H,TC2-1)),10000);


BC1:=IF(L=LLV(L,8*LR),L,NULL);


BC2:=REFX(BARSLAST(BC1=L),10000)+1;


LOWER:=REFX(IF(BC2=1,L,REF(L,BC2-1)),10000);


LP:=CURR<=BC2 AND L=LOWER;

 


HP:=CURR<=TC2 AND H=UPPER;

 


STICKLINE(IF(1,HP,LP),LOWER,UPPER,1,0),COLORCYAN;


STICKLINE(IF(1,LP,HP),LOWER,UPPER,1,0),COLORRED;


NOD:=(IF(TC2>BC2,TC2,BC2)-IF(TC2>BC2,BC2,TC2));

 


LR1:=FORCAST(C,NOD+1);


NP:IF(CURR<=MAX(BC2,TC2),REFX(IF(MIN(TC2,BC2)=1,LR1,REF(LR1,MIN(TC2,BC2)-1)),10000),NULL),POINTDOT,COLORFFFFFF;

 


LR2:=SLOPE(C,NOD+1);


LR3:=REFX(IF(MIN(TC2,BC2)=1,LR2,REF(LR2,MIN(TC2,BC2)-1)),10000);


FP:NP-LR3*(NOD),POINTDOT,COLORFFFFFF;

 


EQU:(NP+FP)/2,POINTDOT,COLORFFFFFF;

 


AD:=ABS(NP-FP);



编程无捷径,技巧靠积累。
 回到顶部