通达信主力筹码【源码、副图、说明】

首先申明有未来函数WINNER，担心的慎用。指标非原创

主力筹码:=IF(C<0,0,EMA(WINNER(CLOSE)*70,3));
散户筹码:=IF(C<0,0,EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3));
散户持仓:IF(C<0,0,散户筹码/(主力筹码+散户筹码)*100),COLORGREEN,NODRAW;
主力持仓:IF(C<0,0,主力筹码/(主力筹码+散户筹码)*100),COLORRED,NODRAW;

散户资金:=IF(C<0,0,EMA(散户持仓,89));
主力资金:=IF(C<0,0,EMA(主力持仓,89));
资金流入强度:IF(C<0,0,INTPART(主力持仓-主力资金)),NODRAW,COLOR0000FF;

SH8:=IF(C<0,0,EMA(散户持仓,8));

STICKLINE(CLOSE>0,散户持仓,主力持仓,1,0),COLORGRAY;
STICKLINE(散户资金>REF(散户资金,1),散户持仓,散户资金,1,0),COLORWHITE;
STICKLINE(CLOSE>0,主力持仓,0,1,0),COLORBROWN;
STICKLINE(主力持仓>75,主力持仓,0,1,0),COLORRED;
STICKLINE(主力资金>REF(主力资金,1),主力持仓,主力资金,1,0),COLORLIMAGENTA;
STICKLINE(散户持仓>=90,主力持仓,0,1,0),COLORGREEN;
STICKLINE(REF(散户持仓,1)>90 AND 散户持仓<90,0,散户持仓,1,0),COLORYELLOW;
主力介入:REF(散户持仓,1)>90 AND 散户持仓<90,NODRAW;

筹码总量:IF(C<0,0,MA(主力筹码+散户筹码,13)),NODRAW;
筹码绿:IF(CLOSE>0,筹码总量,DRAWNULL),COLORGREEN,LINETHICK2;
筹码红:IF(筹码总量>REF(筹码总量,1),筹码总量,DRAWNULL),COLORRED,LINETHICK2;
资金流入:IF(主力资金>REF(主力资金,1),主力持仓,DRAWNULL),COLORMAGENTA,NODRAW;
DRAWTEXT(筹码总量>REF(筹码总量,1) AND SH8<REF(SH8,1) AND ISLASTBAR,筹码总量,'←增量资金');
选股:COUNT(主力介入=1,3) AND 筹码红 AND 资金流入,NODRAW,COLORYELLOW;