股性活跃度 用红绿蓝表示股性的活跃程度 通达信副图指标 源码 贴图

REFLINE:2,COLORGRAY,POINTDOT;

CS:=DMA(AMOUNT/(100*VOL),VOL/CAPITAL);
M20:=MA(C,20);
M30:=MA(C,30);
M2:=M20>REF(M20,1);
M3:=M30>REF(M30,1);
MCS:=CS>REF(CS,1);
TRD:=M2+M3+MCS>1;{趋势}

LBARS:=LLVBARS(L,21);
BARS:=IF(LBARS<13,13,LBARS);
ACT:=SMA(MAX(ABS(C-O),ABS(C-REF(C,1)))/REF(C,1)*100,10,1);{活跃度}

YD:=ACT>LLV(ACT,13)*1.2;{异动}

A1:=ACT<=2 AND NOT(YD);{弱}
A2:=ACT<=2 AND YD;{异动}
A3:=ACT>=2 AND TRD;{强}{WWW.GPXIAZAI.COM}
A4:=ACT>=2 AND NOT(TRD); {跌}

弱:IF(A1,ACT,DRAWNULL),COLORBLUE,LINETHICK3;
异:IF(A2,ACT,DRAWNULL),COLORBROWN,LINETHICK3;
强:IF(A3,ACT,DRAWNULL),COLORRED,LINETHICK3;
跌:IF(A4,ACT,DRAWNULL),COLORGREEN,LINETHICK3;