通达信《另类黄金分割》

[复制链接]
查看67 | 回复0 | 2022-7-24 07:37:09 | 显示全部楼层 |阅读模式

{线}
 {T:10 10000 150;TT:1,100,3 ; N1: 0 , 500 , 0}
 高1:=REF(HHV(H,T),TT);
低1:=REF(LLV(L,T),TT);
 H1:=高1-(高1-低1)*0.191;
H2:=高1-(高1-低1)*0.382;
H3:=高1-(高1-低1)*0.5;
H4:=高1-(高1-低1)*0.618;
H5:=高1-(高1-低1)*0.809;
 顶:REFDATE(高1,DATE),COLORFFFF00 DOTLINE;
 一:REFDATE(H1,DATE),COLORYELLOW DOTLINE;
 二:REFDATE(H2,DATE),COLORMAGENTA DOTLINE;
 三:REFDATE(H3,DATE),COLOR00FFFF DOTLINE;
 四:REFDATE(H4,DATE),COLORMAGENTA DOTLINE;
 五:REFDATE(H5,DATE),COLORYELLOW DOTLINE;
 低:REFDATE(低1,DATE),COLOR00FF00 DOTLINE;
 TT3:=(CURRBARSCOUNT=5);
 TT4:=(CURRBARSCOUNT=5+3);
 DRAWTEXT(TT4 AND 顶,顶,'高:'),COLOR208FFF;
 DRAWTEXT(TT4 AND 一,一,'191:'),COLOR208FFF;
 DRAWTEXT(TT4 AND 二,二,'382:'),COLOR208FFF;
 DRAWTEXT(TT4 AND 三,三,'1/2:'),COLOR208FFF;
 DRAWTEXT(TT4 AND 四,四,'618:'),COLOR208FFF;
 DRAWTEXT(TT4 AND 五,五,'809:'),COLOR208FFF;
 DRAWTEXT(TT4 AND 低,低*1.009,'低:'),COLOR208FFF;

03666407.PNG

03666407.PNG

 

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则