通达信上涨能量副图指标 短线阻力 短线拉升 源码 贴图

N:=100;M:=1;P:=20;
MAV:=(C*2+H+L)/4;
SK:=EMA(MAV,1)-EMA(MAV,40);
SD:=EMA(SK,5);
B:=(SK-SD)*N;
短线拉升:IF(B<-20,-20,IF(B>100,100,B)),COLORRED,LINETHICK2;
T:=(C-LLV(1.02*L,20))/(HHV(H,20)-LLV(L,20))*100;
上涨量能:IF(T>100,100,IF(T<0,0,T)),COLORFF00FF,LINETHICK1;
A:=(HHV(HIGH,5)-CLOSE)/(HHV(HIGH,5)-LLV(LOW,5))*20;
A1:=(3*A-2*SMA(A,3,1))*M;{爱股网 WWW.72GU.COM}
短线阻力:IF(A1>100,100,IF(A1<-5,-5,A1)),COLORBLUE,LINETHICK2;
Q1:=(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*120,COLOR009900,LINETHICK2;
中线阻力:IF(Q1>100,100,Q1),COLOR009900,LINETHICK1;
STICKLINE(短线阻力>短线拉升 ,短线拉升,短线阻力,1,0),COLORBLUE;
累计涨幅:SUM((CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100-(INDEXC-REF(INDEXC,1))/REF(INDEXC,1)*100,3),COLORBLACK;
累计振幅:SUM((HIGH-LOW)/LOW*100-(INDEXH-INDEXL)/INDEXL*100,3);
Y:=FILTER(累计涨幅>=20 OR 累计涨幅<=-20 OR 累计振幅>=45,4);
STICKLINE(Y,累计涨幅,累计涨幅+20,5,2),COLORWHITE;