以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://www.weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://www.weistock.com/bbs/list.asp?boardid=4)
----  求帮忙改一下,改成金字塔的。不太会编程  (http://www.weistock.com/bbs/dispbbs.asp?boardid=4&id=31325)

--  作者:雨飞雪飘
--  发布时间:2012/12/9 15:36:11
--  求帮忙改一下,改成金字塔的。不太会编程
HH1:=IF(H<REF(H,2) AND REF(H,1)<REF(H,2),REF(H,2),0);
LL1:=IF(L>REF(L,2) AND REF(L,1)>REF(L,2),REF(L,2),0);
HH2:=VALUEWHEN(HH1>0,HH1);
LL2:=VALUEWHEN(LL1>0,LL1);
K1:=IF(CLOSE>HH2,-3,IF(CLOSE<LL2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
G:IF(K2=1,HH2,LL2),COLOR00FFFF;
DRAWNUMBER(ISLASTBAR,G,G,2),ALIGN0;
G1:=VALUEWHEN(ISLASTBAR,G);
W1:=K2;
W2:=OPEN-CLOSE;
HT:=IF(OPEN>CLOSE,OPEN,CLOSE);
LT:=IF(OPEN<CLOSE,OPEN,CLOSE);
STICKLINE(W1<0,O,C,0.5,0 ),COLORRED;
STICKLINE(W1<0,O,H,0.3,0 ),COLORRED;
STICKLINE(W1<0,O,L,0.3,0 ),COLORRED;
STICKLINE(W1>=0,O,C,0.5,0 ),COLORCYAN;
STICKLINE(W1>=0,O,L,0.3,0 ),COLORCYAN;
STICKLINE(W1>=0,O,H,0.3,0 ),COLORCYAN;
STICKLINE(W1>=0,O,C,3,0),COLORFF6600;
STICKLINE(W1>=0,O,C,2,0),COLORFF9900;
STICKLINE(W1>=0,O,C,1.2,0),COLORFFCC00;
STICKLINE(W1>=0,O,C,0.2,0),COLORCYAN;
STICKLINE(W1<0,O,C,3,0),COLOR000099;
STICKLINE(W1<0,O,C,2,0),COLOR0000CC;
STICKLINE(W1<0,O,C,1.3,0),COLOR0000FF;
STICKLINE(W1<0,O,C,0.3,0),COLORCC66FF;

--  作者:千一编写程序
--  发布时间:2012/12/9 18:48:58
--  
你已重复发贴