1.通达信控盘程度指标公式源码副
通达信控盘程度指标公式源码副
通达信控盘程度指标公式源码副图
ZLCM:=EMA(WINNER(CLOSE)*,散兵式源udp监听源码3);
{ 主力筹码估算}
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*,3);
{ 散户筹码估算}
ZSHTL:=SHCM/(ZLCM+SHCM)*;
{ 散户套牢筹码比率}
ZZLKP:=ZLCM/(ZLCM+SHCM)*;
{ 主力控盘筹码比率}
ZCMZL:=MA(ZLCM+SHCM,);
{ 市场筹码总量}
ZZNTS:=BArslAST(ZSHTL);
{ 走牛天数}
ZSHJJ:=EMA(ZSHTL,);
{ 散户警戒}
ZZLJJ:=EMA(ZZLKP,);
{ 主力警戒}
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,,3,0),COLORBBBB;
STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,,2.5,0),COLORCCCC;
STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,,2,0),COLORDDDD;
STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,,1.5,0),COLOREEEE;
STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,,1,0),COLORFFFF;
STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,,0.5,0),COLORFFFF;
{ 筑底散兵坑}
{ 底部:(ZSHTL>=),COLORFFCC;}
STICKLINE(ZSHTL>=,ZZLKP,0,3,0),COLORFF;
STICKLINE(ZSHTL>=,ZZLKP,0,2.5,0),COLORFF;
STICKLINE(ZSHTL>=,ZZLKP,0,2,0),COLORFF;
STICKLINE(ZSHTL>=,ZZLKP,0,1.5,0),COLORFF;
STICKLINE(ZSHTL>=,ZZLKP,0,1,0),COLORFF;
STICKLINE(ZSHTL>=,ZZLKP,0,0.5,0),COLORFF;
0;
散户套牢:INTPART(ZSHTL),COLORGREEN;
主力控盘:INTPART(ZZLKP),COLORRED;
市场筹码总量:=INTPART(ZCMZL),COLORWHITE,NODRAW;
轴:,COLORWHITE,DOTLINE,LINETHICK1;
箱顶:=MA(REF(HHV(C,),1),2);
DRAWTEXT(crOSS(主力控盘,轴) AND C>=箱顶,ZZLKP+5,'高度控盘'),COLORMAGENTA;