以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  [求助]请高手改成金字塔用 黄金分割线  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=5156)
--  作者：bdggl
--  发布时间：2011/2/14 3:45:34
--  [求助]请高手改成金字塔用 黄金分割线
T:=150;TT:=3; 
高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;
一:REFDATE(H1,DATE),DOTLINE,COLORYELLOW;
二:REFDATE(H2,DATE),DOTLINE,COLORMAGENTA;
三:REFDATE(H3,DATE),COLOR00FFFF;
四:REFDATE(H4,DATE),DOTLINE,COLORMAGENTA;
五:REFDATE(H5,DATE),DOTLINE,COLORYELLOW;
低:REFDATE(低1,DATE),COLOR00FF00;
--  作者：z7c9
--  发布时间：2011/2/14 8:54:16
--  
上面的是什么语言编写的？
--  作者：bdggl
--  发布时间：2011/2/14 14:44:30
--  

是通达信用的   改成金字塔用  refdate函数不支持

--  作者：admin
--  发布时间：2011/2/14 15:04:05
--  
请把refdate的使用详细说明回复说明
--  作者：阿火
--  发布时间：2011/2/14 16:03:13
--  
T:=150;TT:=3;
高1:=REF(HHV(H,T),3);
低1:=REF(LLV(L,T),3);
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;
for i=1 to datacount do begin
顶[i]:高1[datacount],POINTDOT,COLORFFFF00;
一[i]:H1[datacount],POINTDOT,COLORYELLOW;
二[i]:H2[datacount],POINTDOT,COLORMAGENTA;
三[i]:H3[datacount],POINTDOT,COLOR00FFFF;
四[i]:H4[datacount],POINTDOT,COLORMAGENTA;
五[i]:H5[datacount],POINTDOT,COLORYELLOW;
低[i]:低1[datacount],POINTDOT,COLOR00FF00;
end