通达信大盘资金异动选股指标公式源码

通达信大盘资金异动选股指标公式源码

源码正文：

DP1:=INDEXADV/(INDEXADV+INDEXDEC)*INDEXA/100000000{XG51};
DP2:=ma(ema(DP1,3),3){XG51};
A:=(HHV(DP2,5)-DP2)/(HHV(DP2,5)-LLV(DP2,5))*100-80{XG51};
空头:EMA(3*A-2*SMA(A,18,1),5),COLORCYAN{XG51};
B:=(DP2-LLV(DP2,5))/(HHV(DP2,5)-LLV(DP2,5))*80-80{XG51};
多头:3*SMA(B,3,1)-2*SMA(SMA(B,3,1),5,1),COLORLIMAGENTA{XG51};
大盘1:=(INDEXC*2+INDEXH+INDEXL)/4{XG51};
大盘K := EMA(大盘1,13) - EMA(大盘1,34){XG51};
大盘D := EMA(大盘K,3){XG51};
大盘B:=(大盘K-大盘D){XG51};
大资金进:IF(大盘B>=0,大盘B*8.8,0),COLORWHITE{XG51};
大资金撤:IF(大盘B<=0,大盘B*2.58,0),COLORRED{XG51};
stICKLINE(大盘B<=0 AND 大资金撤<=REF(大资金撤,1),0,大资金撤,2,0),COLORGREEN{XG51};
STICKLINE(大盘B<=0 AND 大资金撤>=REF(大资金撤,1),0,大资金撤,2,0),COLORFFA6FF{XG51};
STICKLINE(大盘B>=0 AND 大资金进>=REF(大资金进,1),0,大资金进,2,0),COLORWHITE{XG51};
STICKLINE(大盘B>=0 AND 大资金进<=REF(大资金进,1),0,大资金进,2,0),COLORBLUE{XG51};
PLOYLINE(1,大资金进),COLORBLUE{XG51};
PLOYLINE(1,0),LINETHICK2,COLORBROWN{X~G_5!1~C~N~{};