b:=SMA((3*h+2*c+o+l)/7,10,1);
w1:=-100*(HHV(Hhv(b,1),h)-b)/(HHV(Hhv(b,1),h)-LLV(Llv(b,1),h));
w2:=-100*(HHV(Hhv(b,1),h)-b)/(HHV(Hhv(b,1),h)-LLV(Llv(b,1),h));
w3:=-100*(HHV(Hhv(b,1),h)-b)/(HHV(Hhv(b,1),h)-LLV(Llv(b,1),h));
w4:=-100*(HHV(Hhv(b,1),h)-b)/(HHV(Hhv(b,1),h)-LLV(Llv(b,1),h));
价格:=(w1+w2+w3+w4)/4;
a:=SMA(vol,10,1);
wr1:=-100*(HHV(Hhv(a,1),h)-a)/(HHV(Hhv(a,1),h)-LLV(Llv(a,1),h));
wr2:=-100*(HHV(Hhv(a,1),h)-a)/(HHV(Hhv(a,1),h)-LLV(Llv(a,1),h));
wr3:=-100*(HHV(Hhv(a,1),h)-a)/(HHV(Hhv(a,1),h)-LLV(Llv(a,1),h));
wr4:=-100*(HHV(Hhv(a,1),h)-a)/(HHV(Hhv(a,1),h)-LLV(Llv(a,1),h));
量:=(wr1+wr2+wr3+wr4)/4;
wr:=-100*(HHV(HIGH,55)-CLOSE)/(HHV(HIGH,55)-LLV(LOW,55));
m:= WR1=WR2 AND WR1=WR3 ;
Var2:=VOL*CLOSE;
Var3:=EMA(Var2,11)/EMA(VOL,11);
Var4:=(EMA(CLOSE,5)-Var3)/Var3*100;
Var5:=EMA(Var4,5);
卖出:= CROSS(Var5,Var4) AND Var5>2;
DRAWTEXT(卖出,HIGH*1.02,'▼卖出'),COLORgreen;
卖:=CLOSE>REF(CLOSE,1)AND WR/1.5<REF(WR,1);
DRAWICON(卖,HIGH*1.015,5);
DRAWTEXT(卖,HIGH*1.02,'绝顶'),COLORgreen;
绝顶:=WR=0 and 量=0 and 价格>-10;
DRAWICON(绝顶,HIGH*1.015,2);
DRAWTEXT(绝顶,HIGH*1.02,'绝顶1'),COLORgreen;
Var7:=REF(CLOSE,1);
Var8:=SMA(MAX(CLOSE-Var7,0),7,1)/SMA(ABS(CLOSE-Var7),7,1)*100;
Var9:=CROSS(69,Var8);
VarA:=FILTER(Var9,4);
DRAWICON(VarA,HIGH*1.015,5);
DRAWTEXT(VarA,HIGH*1.02,'卖出'),COLORgreen;

分析家源码.gif
点击免费获取最新VIP内参
最新回复
gpdjtbbwy (2008-4-11 21:20:31)
yzq (2008-8-12 04:00:00)