通达信主力控盘副图指标 控盘开始 随后一波拉升 源码 附图

ZLCM:=EMA(WINNER(CLOSE)*70,3);{//主力筹码估算}


SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);{//散户筹码估算}


ZSHTL:=SHCM/(ZLCM+SHCM)*100;{//散户套牢筹码比率}


ZZLKP:=ZLCM/(ZLCM+SHCM)*100;{//主力控盘筹码比率}


ZCMZL:=MA(ZLCM+SHCM,13);{//市场筹码总量}


ZZNTS:=BARSLAST(ZSHTL<90 AND REF(ZSHTL,1)>90);{//走牛天数}


ZSHJJ:=EMA(ZSHTL,89);{//散户警戒}


ZZLJJ:=EMA(ZZLKP,89);{//主力警戒}


ZJLRQD:=INTPART(ZZLKP-ZZLJJ);{//资金流入强度}


SH8:=EMA(ZSHTL,8);


DKB:=IF(ZZLKP-REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0);{散户套牢筹码}


STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,20,3,0),COLOR00BBBB;


STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,20,2.5,0),COLOR00CCCC;


STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,20,2,0),COLOR00DDDD;


STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,20,1.5,0),COLOR00EEEE;


STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,20,1,0),COLOR00FFFF;


STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,20,0.5,0),COLOR00FFFF;



{筑底散兵坑}{底部:(ZSHTL>=90),COLOR66FFCC;}


STICKLINE(ZSHTL>=90,ZZLKP,0,3,0),COLORFF0011;


STICKLINE(ZSHTL>=90,ZZLKP,0,2.5,0),COLORFF0022;


STICKLINE(ZSHTL>=90,ZZLKP,0,2,0),COLORFF0033;


STICKLINE(ZSHTL>=90,ZZLKP,0,1.5,0),COLORFF0044;


STICKLINE(ZSHTL>=90,ZZLKP,0,1,0),COLORFF0055;


STICKLINE(ZSHTL>=90,ZZLKP,0,0.5,0),COLORFF0066;


0;


散户套牢:INTPART(ZSHTL),COLORGREEN;


主力控盘:INTPART(ZZLKP),COLORRED;


市场筹码总量:=INTPART(ZCMZL),COLORWHITE,NODRAW;

轴:40,COLORWHITE,DOTLINE,LINETHICK1;


箱顶:=MA(REF(HHV(C,30),1),2);


DRAWTEXT(CROSS(主力控盘,轴) AND C>=箱顶,ZZLKP+5,'高度控盘'),COLORMAGENTA;

原理解析：
ZLCM赋值:EMA(收盘价计算的获利盘比例*70,3)
{//主力筹码估算}

SHCM赋值:EMA((收盘价*1.1计算的获利盘比例-WINNER(收盘价*0.9))*80,3)
{//散户筹码估算}

ZSHTL赋值:SHCM/(ZLCM+SHCM)*100
{//散户套牢筹码比率}

ZZLKP赋值:ZLCM/(ZLCM+SHCM)*100
{//主力控盘筹码比率}

ZCMZL赋值:ZLCM+SHCM的13日简单移动平均
{//市场筹码总量}

ZZNTS赋值:上次ZSHTL<90 AND 1日前的ZSHTL>90距今天数
{//走牛天数}

ZSHJJ赋值:ZSHTL的89日指数移动平均
{//散户警戒}

ZZLJJ赋值:ZZLKP的89日指数移动平均
{//主力警戒}

ZJLRQD赋值:INTPART(ZZLKP-ZZLJJ)
{//资金流入强度}

SH8赋值:ZSHTL的8日指数移动平均

DKB赋值:IF(ZZLKP-1日前的ZZLKP>ZSHTL-1日前的ZSHTL,1,0)
{散户套牢筹码}

STICKLINE(ZZLJJ>1日前的ZZLJJ,ZZLKP,20,3,0),COLOR00BBBB

STICKLINE(ZZLJJ>1日前的ZZLJJ,ZZLKP,20,2.5,0),COLOR00CCCC

STICKLINE(ZZLJJ>1日前的ZZLJJ,ZZLKP,20,2,0),COLOR00DDDD

STICKLINE(ZZLJJ>1日前的ZZLJJ,ZZLKP,20,1.5,0),COLOR00EEEE

STICKLINE(ZZLJJ>1日前的ZZLJJ,ZZLKP,20,1,0),COLOR00FFFF

STICKLINE(ZZLJJ>1日前的ZZLJJ,ZZLKP,20,0.5,0),COLOR00FFFF

输出{筑底散兵坑}{底部:(ZSHTL>=90),COLOR66FFCC
当满足条件ZSHTL>=90时,在ZZLKP和0之间画柱状线
当满足条件ZSHTL>=90时,在ZZLKP和0之间画柱状线
当满足条件ZSHTL>=90时,在ZZLKP和0之间画柱状线
当满足条件ZSHTL>=90时,在ZZLKP和0之间画柱状线
当满足条件ZSHTL>=90时,在ZZLKP和0之间画柱状线
当满足条件ZSHTL>=90时,在ZZLKP和0之间画柱状线

0

输出散户套牢:INTPART(ZSHTL),画绿色

输出主力控盘:INTPART(ZZLKP),画红色

市场筹码总量赋值:INTPART(ZCMZL),画白色,NODRAW
输出轴:40,画白色,DOTLINE,LINETHICK1

箱顶赋值:MA(REF(30日内C最高值,1),2)

DRAWTEXT(主力控盘上穿轴 AND C>=箱顶,ZZLKP+5,'高度控盘'),画洋红色