跟庄擒牛（通达信公式 副图 源码 测试图）无加密
，一目了然，稍加思考就能体会到了
{跟庄擒牛}
VAR1:=EMA(EMA(CLOSE,9),9);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,1,0),COLORWHITE;
A10:=CROSS(控盘,0);
无庄控盘:IF(控盘<0,控盘,0),COLORWHITE,NODRAW;
开始控盘:IF(A10,5,0),LINETHICK1,COLORYELLOW;
VAR2:=100*WINNER(CLOSE*0.95);
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,0),COLORRED;
有庄控盘:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORRED,NODRAW;
VAR3:=控盘>REF(控盘,1) AND 控盘>0;
STICKLINE(VAR3,控盘,0,1,0),COLORFF00FF;
高度控盘:IF(VAR3,控盘,0),COLORFF00FF,NODRAW;
VAR4:=控盘<REF(控盘,1) AND 控盘>0;
STICKLINE(VAR4,控盘,0,1,0),COLORGREEN;
主力出货:IF(VAR4,控盘,0),COLORGREEN,NODRAW;
DRAWTEXT(CROSS(控盘,0),0,'始'),COLORYELLOW;
DRAWTEXT(CROSS(0,控盘),0,'终'),COLORWHITE;
