MA1:EMA(CLOSE,5);
MA2:EMA(CLOSE,10);
MA3:EMA(CLOSE,20);
MA4:EMA(CLOSE,30);
MA5:EMA(CLOSE,60),COLORRED;
MA6:EMA(CLOSE,120);
MA7:EMA(CLOSE,240);
最大:=MAX(MA1,MAX(MA2,MAX(MA3,MA4)));
最小:=MIN(MA1,MIN(MA2,MIN(MA3,MA4)));
差值:=(最大-最小)/最小*1000;{放大1000倍}
多头:=MA1>REF(MA1,1) AND MA2>REF(MA2,1) AND MA3>REF(MA3,1) AND MA4>REF(MA4,1) AND MA5>REF(MA5,1),linethick0;
粘合度:差值<2,linethick0;
粘合:=COUNT(粘合度=1,4)>0;
金叉:CROSS(MA1,MA4),linethick0;
T:=多头 AND 粘合 AND 金叉 ;
DRAWICON(差值<2 AND 多头,L,5);
DRAWICON(T,L*0.99,3);
DRAWICON(金叉,L*0.995,4);
drawtext(多头 and cross(ma1,ma2) ,l,'--穿');
KS:=(C-MA(C,13))/MA(C,13)*(-100);
RKS:=REF(KS,1);
MLS:=RKS/KS>=1.23 AND RKS>=13 AND C/REF(C,1)>=1.02;
超跌:STICKLINE(KS>=13,H,L,0,1),colorwhite,linethick2;
反弹:STICKLINE(MLS=1,H,L,0,1),colormagenta,linethick2;
STICKLINE(C>=O,C,O,8,0),COLORred;
STICKLINE(C>=O,H,L,0,0),COLORred;
STICKLINE(C< O,C,O,8,0),COLORgreen;
STICKLINE(C< O,H,L,0,0),COLORgreen;
STICKLINE(KS>=13,O,C,8,1),colorwhite,linethick2;
STICKLINE(MLS=1,O,C,8,1),colormagenta,linethick2;
VAR1:=(H-MAX(CLOSE,OPEN))/C;
上影:=VAR1>2.5/100;{上影}
VAR3:=(MIN(CLOSE,OPEN)-L)/C;
下影:=(MIN(CLOSE,OPEN)-L)/C>2.5/100;{下影}
VAR5:=COUNT(MA(CLOSE,5)>MA(CLOSE,10),2)=2 AND COUNT(MA(CLOSE,10)>MA(CLOSE,20),2)=2;{三线多头排列}
换手:=VOL/CAPITAL*100;
振幅:=(H-L)/C;{振幅}
DRAWICON(上影 AND VAR5 AND 换手>5 AND 振幅>0.05,h,5),COLORGREEN;


DRAWTEXT(l>REF(H,1),REF(H,1),'上缺'),COLORRED;{上涨缺口}
DRAWTEXT(h<REF(L,1),REF(L,1),'下缺'),COLORGREEN;{下跌缺口}
限制:=EMA((((H+C)/2+L+(C+L)/2)/3-EMA(LLV(((H+C)/2+L+(C+L)/2)/3,89),2))/(EMA(HHV(((H+C)/2+L+(C+L)/2)/3,21),2)-EMA(LLV(((H+C)/2+L+(C+L)/2)/3,89),2)),8)*100;
平衡:=SMA(EMA(SMA((C+L)/2,3,1),3),5,1);
DRAWICON(FILTER(平衡>REF(平衡,1)AND HHV(MA((H+C)/2,13),10)<REF(HHV(MA((H+C)/2,13),10),1)AND ((C+L)/2)>REF((C+L)/2,1),5) AND 限制<88,L*0.99,4),ALIGN1;
DRAWTEXT(FILTER(平衡>REF(平衡,1)AND HHV(MA((H+C)/2,13),10)<REF(HHV(MA((H+C)/2,13),10),1)AND ((C+L)/2)>REF((C+L)/2,1),5) AND 限制<88,L*0.96,'追涨'),ALIGN1,COLORFFFFFF;

 

http://www.qxtz.com/bbs/images/upload/2005/11/25/110509.gif520)this.width=520;" align=absMiddle border=0>