-- 作者:wjxkjs
-- 发布时间:2010/6/20 13:19:45
-- 文华中可以用,这里可以修改后用吗?
M60:MA(CLOSE,60),COLORRED; M120:=MA(CLOSE,120); M250:=MA(CLOSE,250);
HH1:=IFELSE(H<REF(H,2)&&REF(H,1)<REF(H,2),REF(H,2),0); LL1:=IFELSE(L>REF(L,2)&&REF(L,1)>REF(L,2),REF(L,2),0); HH2:=VALUEWHEN(HH1>0,HH1); LL2:=VALUEWHEN(LL1>0,LL1); K1:=IFELSE(CLOSE>HH2,-3,IFELSE(CLOSE<LL2,1,0)); K2:=VALUEWHEN(K1<>0,K1); G:=IFELSE(K2=1,HH2,LL2); G1:=VALUEWHEN(ISLASTBAR,G); DRAWNUMBER(L>0,G1,G1,0,COLORCYAN); W1:=K2; W2:=OPEN-CLOSE; HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE); LT:=IFELSE(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);
HH:=IFELSE(H>REF(H,1)&&H>REF(H,2)&&H>REF(H,3)&&H>REF(H,4)&&H>REF(H,5)&&L<REF(L,1)&&L<REF(L,2)
&&L<REF(L,3)&&L<REF(L,4)&&L<REF (L,5),H-(H-L)*0.333,H); LL:=IFELSE(H>REF(H,1)&&H>REF(H,2)&&H>REF(H,3)&&H>REF(H,4)&&H>REF(H,5)&&L<REF(L,1)&&L<REF(L,2)
&&L<REF(L,3)&&L<REF(L,4)&&L<REF (L,5),(H-L)*0.333+L,L); H1:=IFELSE(H>=REF(H,1)&&H>=REF(H,2)&&H>=REF(H,3)&&H>=REF(H,4)&&H>=REF(H,5)&& H>REFX(H,1)
&&H>REFX(H,2)&&H>REFX(H,3)&&H>REFX(H,4) &&H>REFX(H,5),HH,0); L1:=IFELSE(L<=REF(L,1)&&L<=REF(L,2)&&L<=REF(L,3)&&L<=REF(L,4)&&L<=REF(L,5)&& L<REFX(L,1)
&&L<REFX(L,2)&&L<REFX(L,3)&&L<REFX(L,4) &&L<REFX(L,5),LL,0); H2:=BARSLAST(H1); L2:=BARSLAST(L1); H3:=REFX(REF(H1,H2),2); L3:=REFX(REF(L1,L2),2);
|