通达信股性副图及选股源码 贴图

股性指标，通过一根线的颜色变化可以直观反映出股票各阶段的变化，本指标是由大智慧指标改编过来，现拉出来分享，希望对大家有用。



{股性}
REFLINE:2;
{-----------趋势与股性-----------}
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),LINETHICK2;{活跃度}

YD:=ACT>LLV(ACT,13)*1.2;{异动}
A1:=ACT<2 AND NOT(YD);{弱}
A2:=ACT<2 AND YD;{异动}
A3:=ACT>=2 AND TRD;{强}
A4:=ACT>=2 AND NOT(TRD); {跌}
2,COLOR5E5E5E;
IF(A1>0,ACT,DRAWNULL),COLORBLUE,LINETHICK3;
IF(A2>0,ACT,DRAWNULL),COLORLIRED,LINETHICK3;
IF(A3>0,ACT,DRAWNULL),COLORRED,LINETHICK3;
IF(A4>0,ACT,DRAWNULL),COLORGREEN,LINETHICK3;

DRAWTEXT_FIX(1,0.05,0.02,1,'弱势'),COLORBLUE;
DRAWTEXT_FIX(1,0.05,0.17,1,'异动'),COLORLIRED;
DRAWTEXT_FIX(1,0.05,0.32,1,'强势'),COLORRED;
DRAWTEXT_FIX(1,0.05,0.47,1,'跌秃'),COLORGREEN;
DRAWTEXT_FIX(1,0.5,0.42,1,'短线：异动或强势——参与？！股性处于2以上比较活跃'),COLOR5E5E5E;