高度控盘分时公式

源码：含未来，谨慎！

VAR1:=EMA(EMA(NEW,13),13);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
 STICKLINE(控盘<0,控盘,0,1,1),COLOR00FF00;
 STICKLINE(控盘>REF(控盘,1) AND 控盘<0,控盘,0,1,1),COLORFF00FF;
无庄控盘:=控盘<0;
 STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLOR0000FF;
有庄控盘:=控盘>REF(控盘,1) AND 控盘>0;
 VAR2:=100*WINNER(CLOSE*0.95);
 STICKLINE(控盘0,控盘,0,1,1),COLORFFFF00;
主力出货:=控盘0;
 STICKLINE(VAR2>50 AND COST(85)0,控盘,0,1,1),COLOR00FFFF;
高度控盘: VAR2>50 AND COST(85)0,COLOR00FFFF,LINETHICK2;
 A10:=CROSS(控盘,0);
控盘B:=FILTER(IF(A10,1,0),5);
 JJ:=MONEY/VOL;
 P:=55;S:=8;M1:=3;
财:(EMA(NEW,S)-EMA(NEW,P))*10,colorred,LINETHICK1;
神:EMA(财,M1),colorgreen,LINETHICK1;
 FILLRGN(财,神,财>神,RGB(255,0,0),神>财,RGB(0,255,255));
 BTJ1:=(NEW-JJ)/JJ<-0.005;
 BTJ11:=(NEW-JJ)/JJ<-0.03;
 BTJ12:=BARSLAST(JJ  STJ1:=(NEW-JJ)/JJ>0.005;
 STJ01:=控盘0.5;
 STJ02:=控盘>0;
 BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2;
 BTJ22:=控盘>REF(控盘,1) AND 控盘<0 ;
 BTJ3:=CROSS(财,神) AND  财<-0.3;
 BTJ32:=CROSS(财,神) AND  财<-0.1;
 STJ31:=CROS