通达信MACD启动走强副图指标 源码 贴图

N1:=6;N2:=12;
Q1:=(CLOSE*VOL)/SUM(VOL,100);
A1:=MA(Q1,N1);
ZM1:=SMA(A1,N1,1);
ZM2:=SMA(A1,N2,1);
ZMF:(ZM1-ZM2)*10000,COLORSTICK,LINETHICK2;
FM:SMA(ZMF,3,1);
T1:=IF(C>MA(CLOSE,13),1,0);
T2:=IF(C<MA(CLOSE,13),1,0);
T3:=COUNT(IF(ZMF>0 AND ZMF>REF(ZMF,1),1,0),4)>=4;
T4:=COUNT(IF(ZMF<0,1,0),5)>=5;
T5:=FILTER(T1 AND T4,20);
T6:=FILTER(T2 AND T3,20);
DRAWTEXT(FILTER(T5,4),ZMF-3,'洗盘谷'),COLORGREEN;
启动线:SUM(EMA((C+L)/2,2),5)/10.158,COLORRED;
平衡线:LLV(SUM( EMA((C+L)/2,2),5)/10.158,4),COLORFF00FF;
平台线:LLV(SUM( EMA((C+L)/2,2),5)/10.158,10),COLORFFFFFF;
强弱线:EMA(启动线,21),COLORYELLOW;
STICKLINE(平台线<启动线,启动线,平台线,0.1,0),COLORFFCCAA;
STICKLINE(平衡线<启动线,启动线,平衡线,0.1,0),COLORRED;
VAR1:=2*MA(LLV((C+L)/2,8)*1.1,13)-EMA((C+L)/2,3)-((C+L)/2)*0.1;
VAR2:=IF((EMA((C+L)/2,3)-VAR1)*5>0,POW((EMA((C+L)/2,3)-VAR1)*5,2)/10,-1*POW((EMA((C+L)/2,3)-VAR1)*5,2)/10);
VAR3:=IF(VAR2>0,VAR2-0,0);{公式网WWW.GPXIAZAI.COM}
STICKLINE(VAR3>0 AND REF(VAR3,1)=0 AND (C+L)/2>MA((C+L)/2,8),
强弱线,强弱线+0.2,4,0),COLORFFAACC;
DRAWTEXT(VAR3>0 AND REF(VAR3,1)=0 AND (C+L)/2>MA((C+L)/2,8),
强弱线+0.35,'启动'),LINETHICK3,COLORFFAACC;
DRAWICON(VAR3>0 AND REF(VAR3,1)=0 AND (C+L)/2>MA((C+L)/2,8),强弱线+1,1);