机构动向抖音杨凯老师送的指标通达信公式 副图 源码附图

VAR1:=EMA(EMA(CLOSE,9),9);

控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;

STICKLINE(控盘<0,控盘,0,3,0),COLORGREEN;

A10:=CROSS(控盘,0);

STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,3,0),COLORRED;

机构控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORRED,NODRAW;

VAR2:=100*WINNER(CLOSE*0.95);

STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,3,0),COLORFF00FF;

机构高度控盘:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORFF00FF,NODRAW;

STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,3,0),COLORYELLOW,NODRAW;

机构出货:=IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLORYELLOW;

机构撤退:IF(控盘<0,控盘,0),COLORGREEN,NODRAW;

机构试盘:IF(A10,5,0),LINETHICK1,COLOR00FFFF,NODRAW;

STICKLINE(机构试盘>0,0,5,3,0),COLOR00FFFF;

散户活跃:(   机构控盘=0 AND  机构撤退=0 AND 机构高度控盘=0),NODRAW;

STICKLINE(散户活跃=1 ,-0.3,0.3,3,0),COLORWHITE; 

原理解析：
VAR1赋值:收盘价的9日指数移动平均,9)
控盘赋值:(VAR1-1日前的VAR1)/1日前的VAR1*1000
当满足条件控盘<0时,在控盘和0之间画柱状线
A10赋值:控盘上穿0
STICKLINE(控盘>1日前的控盘 AND 控盘>0,控盘,0,3,0),画红色
机构输出控盘:IF(控盘>1日前的控盘 AND 控盘>0,控盘,0),画红色,NODRAW
VAR2赋值:100*收盘价*0.95计算的获利盘比例
STICKLINE(VAR2>50 AND 获利盘为85%的成本分布<收盘价 AND 控盘>0,控盘,0,3,0),COLORFF00FF
机构高度输出控盘:IF(VAR2>50 AND 获利盘为85%的成本分布<收盘价 AND 控盘>0,控盘,0),COLORFF00FF,NODRAW
STICKLINE(控盘<1日前的控盘 AND 控盘>0,控盘,0,3,0),画黄色,NODRAW
机构出货赋值:IF(控盘<1日前的控盘 AND 控盘>0,控盘,0),画黄色
如果控盘<0返回控盘否则返回0
如果A10返回5否则返回0
当满足条件机构试盘>0时,在0和5之间画柱状线
输出散户活跃:(   机构控盘=0 AND  机构撤退=0 AND 机构高度控盘=0),NODRAW
当满足条件散户活跃=1 时,在-0.3和0.3之间画柱状线