以文本方式查看主题 -  金字塔客服中心 - 专业程序化交易软件提供商  (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=2008)

--  作者：wjxkjs --  发布时间：2010/7/1 17:41:04 --  一个在文华中可以用的高手们指教一下改编 HH1:=IF(HIGH <REF(HIGH,2)&&REF(HIGH,1)<REF(HIGH,2),REF(HIGH,2),0); LL1:=IF(LOW >REF(LOW,2)&&REF(LOW,1)>REF(LOW,2),REF(LOW,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); G1:=VALUEWHEN(ISLASTBAR,G); DRAWNUMBER(L>0,G1,G1,0,COLORCYAN); W1:=K2; W2:=OPEN-CLOSE; HT:=IF(OPEN>CLOSE,OPEN,CLOSE); LT:=IF(OPEN<CLOSE,OPEN,CLOSE); DRAWLINE(W1=1,HIGH,W1=1,HT,COLORCYAN); DRAWLINE(W1=1,LOW,W1=1,LT,COLORCYAN); DRAWLINE(W1=-3,HIGH,W1=-3,HT,COLORRED); DRAWLINE(W1=-3,LOW,W1=-3,LT,COLORRED); STICKLINE(W1>0,OPEN,CLOSE,COLORCYAN,1); STICKLINE(W1<=0,OPEN,CLOSE,COLORRED,1); STICKLINE(W2>0&&W1<=0,OPEN,CLOSE,COLORRED,0); STICKLINE(W2>0&&W1>0,OPEN,CLOSE,COLORCYAN,0); DRAWLINE(W1=1&&REF(W1,1)=1,G,W1=1&&REF(W1,1)=1,REF(G,1),COLORGREEN); DRAWLINE(W1=-3&&REF(W1,1)=-3,G,W1=-3&&REF(W1,1)=-3,REF(G,1),COLORYELLOW); DRAWSL(K2=1,G,0,1,0,COLORGREEN); DRAWSL(K2=-3,G,0,1,0,COLORYELLOW);