分时跟庄的公式很准确！

DRAWGBK(C>0, RGB(0,10,10),RGB(48,0,0),0,'11',0);
A1:=(DVOL/C)/2,NODRAW;
A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A3:=SUM(IF(A1>100 AND CLOSE A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A5:=SUM(IF(A1<100 AND CLOSE A6:=A2+A3+A4+A5;
主买:(A2/A6)*100,LINETHICK1,COLORRED;
主卖:(A3/A6)*100,LINETHICK1,COLORCYAN;
散买:(A4/A6)*100,LINETHICK0;
散卖:(A5/A6)*100,LINETHICK0;
主差:主买-主卖,LINETHICK1,NODRAW;
散差:散买-散卖,LINETHICK0,NODRAW;
DRAWTEXT(主差>0 AND REF(主差,1)<=0,C*2,'抢'),COLOR5B91FF;
DRAWTEXT(主差<0 AND REF(主差,1)>=0,C*1,'主'),COLORWHITE;
DRAWTEXT(散差>0 AND REF(散差,1)<=0,C*2,'散'),COLORCYAN;
DRAWTEXT(散差<0 AND REF(散差,1)>=0,C*1,'入'),COLOR5B91FF;
VAR1:=((CLOSE - LLV(LOW,50))/(HHV(HIGH,50) - LLV(LOW,50)))*(100);
VAR2:=REVERSE(VAR1);
VAR3:=SMA(VAR1,6,1);
K:=SMA(VAR3,4,1);
D:=SMA(K,4,1);
DRAWTEXT(CROSS(K,D) AND MA(CLOSE,5) DRAW