VAR1:=EMA(EMA(CLOSE,9),9);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*500;
STICKLINE(控盘<0,控盘,0,0.99,0),COLOR00FF00;
A10:=CROSS(控盘,0);
开始控盘:=IF(A10,5,0);
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,0.99,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,0.99,0),COLORFF00FF;
高度控盘:=IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORFF00FF,NODRAW;
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,0.99,0),COLORYELLOW;
洗盘:IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLOR00FF00,NODRAW;
出货:IF(控盘<0,控盘,0),COLOR00FF00,NODRAW;
比例1:=进货+洗盘;
比例2:=-出货;
差额:(SUM(比例1,0)-SUM(比例2,0))/20,COLORRED;
差额平均:MA(差额,40);
DRAWTEXT(差额>0.5 AND REF(差额,1)<=0.5,差额,'●'),COLORWHITE;
DRAWTEXT(差额>0.5 AND REF(差额,1)<=0.5,差额+0.3,''),COLORWHITE;
最高价1:=HHV(H,240);
最高价2:=HHV(C,240);
DRAWTEXT(差额>0.5 AND C=最高价1  AND REF(最高价2,1)>REF(C,1)AND C>REF(C,1)AND(进货+洗盘)>0.15,差额,'●'),COLORWHITE;

DRAWTEXT(差额<-0.5 AND REF(差额,1)>=-0.5,差额,'●'),COLORGREEN;
DRAWTEXT(差额<-0.5 AND REF(差额,1)>=-0.5,差额-0.3,''),COLORWHITE;
最低价:=LLV(C,240);
DRAWTEXT(差额>0.5 AND C=最低价 AND REF(最低价,1)<REF(C,1)AND C<REF(C,1)AND 出货<-0.15,差额,'●'),COLORGREEN;
正:0.5,COLORBROWN;
负:-0.5,COLORBROWN;



{机构}
A11:=(DVOL/C)/2,NODRAW;
A2:=SUM(IF(A11>100 AND CLOSE>REF(CLOSE,1),A11,0),0);
A3:=SUM(IF(A11>100 AND CLOSE<REF(CLOSE,1),A11,0),0);
A4:=SUM(IF(A11<100 AND CLOSE>REF(CLOSE,1),A11,0),0);
A5:=SUM(IF(A11<100 AND CLOSE<REF(CLOSE,1),A11,0),0);
A6:=A2+A3+A4+A5;
机买:=(A2/A6)*100,LINETHICK2,COLORRED;
机卖:=(A3/A6)*100,LINETHICK2,COLORGREEN;
主力差:=机买-机卖,LINETHICK2,NODRAW;
DRAWTEXT(差额>0.1 AND 主力差>0 AND REF(主力差,1)<=0,差额,'●'),COLORRED;
DRAWTEXT(差额>0.1 AND 主力差>0 AND REF(主力差,1)<=0,差额+0.3,'买'),COLORWHITE;
DRAWTEXT(差额<-0.1 AND 主力差<0 AND REF(主力差,1)>=0,差额,'●'),COLORGREEN;
DRAWTEXT(差额<-0.1 AND 主力差<0 AND REF(主力差,1)>=0,差额-0.3,'卖'),COLORWHITE;