A:=BUYVOL*DYNAINFO(7);
BZ:=SUM(A,0);
B:=DYNAINFO(7)*SELLVOL/100;
SZ:=SUM(B,0);
Z:=BZ+SZ;
CZ:=BZ-SZ;
XB5:=IF(A<=5,A,0);
B5:=SUM(XB5,0);
XS5:=IF(B<=5,B,0);
S5:=SUM(XS5,0);
XB10:=IF(A<=10 AND A>=5,A,0);
B10:=SUM(XB10,0);
XS10:=IF(B<=10 AND B>=5,B,0);
S10:=SUM(XS10,0);
XB30:=IF(A<=30 AND A>=10,A,0);
B30:=SUM(XB30,0);
XS30:=IF(B<=30 AND B>=10,B,0);
S30:=SUM(XS30,0);
XB50:=IF(A<=50 AND A>=30,A,0);
B50:=SUM(XB50,0);
XS50:=IF(B<=50 AND B>=30,B,0);
S50:=SUM(XS50,0);
XB70:=IF(A<=70 AND A>=50,A,0);
B70:=SUM(XB70,0);
XS70:=IF(B<=70 AND B>=50,B,0);
S70:=SUM(XS70,0);
XB100:=IF(A<=100 AND A>=70,A,0);
B100:=SUM(XB100,0);
XS100:=IF(B<=100 AND B>=70,B,0);
S100:=SUM(XS100,0);
XB150:=IF(A>=100,A,0);
B150:=SUM(XB150,0);
XS150:=IF(B>=100,B,0);
S150:=SUM(XS150,0);
J5:=B5-S5;
J10:=B10-S10;
J30:=B30-S30;
J50:=B50-S50;
J70:=B70-S70;
J100:=B100-S100;
J150:=B150-S150;
VAR4:=IF(DYNAINFO(7)<REF(ASKPRICE(1),1) AND REF(BIDVOL(1),1)>0 AND REF(ASKVOL(1),1)>0,BUYVOL,0);
VAR5:=IF(BUYVOL>REF(ASKVOL(1),1) AND DYNAINFO(7)>REF(ASKPRICE(1),1) AND DYNAINFO(7)<REF(ASKPRICE(2),1),BUYVOL,0);
VAR6:=IF(BUYVOL>REF(ASKVOL(1),1)+REF(ASKVOL(2),1) AND DYNAINFO(7)>REF(ASKPRICE(2),1) AND DYNAINFO(7)<REF(ASKPRICE(3),1),BUYVOL,0);
VARA:=IF(DYNAINFO(7)>REF(BIDPRICE(1),1) AND REF(ASKVOL(1),1)>0 AND REF(BIDVOL(1),1)>0,SELLVOL,0);
VARB:=IF(SELLVOL>REF(BIDVOL(1),1) AND DYNAINFO(7)<REF(BIDPRICE(1),1) AND DYNAINFO(7)>REF(BIDPRICE(2),1),SELLVOL,0);
VARC:=IF(SELLVOL>REF(BIDVOL(1),1)+REF(BIDVOL(2),1) AND DYNAINFO(7)<REF(BIDPRICE(2),1) AND DYNAINFO(7)>REF(BIDPRICE(3),1),SELLVOL,0);
DRAWTEXTEX(BARSTATUS=2 AND Z,1,18,10,' 总成金額(万元):'+NUMTOSTR(Z,2)),LINETHICK8,colorFFFF00;
流通:FINANCE(7)/10000,LINETHICK0,PRECISION2,colorFFFF00;
系数:=IF(流通>=10,1,IF(流通<10,0.75,0));
门限:=流通*系数/10*N;
主动买入:=SUM(BUYVOL,0);
主动卖出:=SUM(SELLVOL,0);
大单买:=IF(BUYVOL>=门限,BUYVOL,0);
大单卖:=IF(SELLVOL>门限,SELLVOL,0);
大单买入:=SUM(大单买,0);
大买金:=SUM((IF(BUYVOL>=门限,BUYVOL,0))*DYNAINFO(7),0);
大卖金:=SUM((IF(SELLVOL>门限,SELLVOL,0))*DYNAINFO(7),0);
大单卖出:=SUM(大单卖,0);
小单买入:=主动买入-大单买入;
小单卖出:=主动卖出-大单卖出;
成交笔数:=(SUM(IF(BUYVOL>0,1,0),0))+(SUM(IF(SELLVOL>0,1,0),0));
大单净量:=大单买入-大单卖出;
大单标准:=门限*100;
主力买入:=(主动买入/2-主动卖出/10)/2;
主力卖出:=(主动卖出/2-主动买入/10)/2;
DRAWTEXTEX(DYNAINFO(7),1,20,70,'■ 大单买入: '+NUMTOSTR(大单买入,0)),LINETHICK2,colorFF;
DRAWTEXTEX(DYNAINFO(7),1,300,70,'占:'+NUMTOSTR(FLOOR(大单买入/(主动买入+主动卖出)*100),0)+'%'),LINETHICK2,colorFF;
DRAWTEXTEX(DYNAINFO(7),1,20,130,'■ 大单卖出: '+NUMTOSTR(大单卖出,0)),LINETHICK2,colorFF00;
DRAWTEXTEX(DYNAINFO(7),1,300,130,'占:'+NUMTOSTR(FLOOR(大单卖出/(主动买入+主动卖出)*100),0)+'%'),LINETHICK2,colorFF00;
DRAWTEXTEX(DYNAINFO(7),1,20,190,'■ 小单买入: '+NUMTOSTR(小单买入,0)),LINETHICK2,colorFF00FF;
DRAWTEXTEX(DYNAINFO(7),1,300,190,'占:'+NUMTOSTR(FLOOR(小单买入/(主动买入+主动卖出)*100),0)+'%'),LINETHICK2,colorFF00FF;
DRAWTEXTEX(DYNAINFO(7),1,20,240,'■ 小单卖出: '+NUMTOSTR(小单卖出,0)),LINETHICK2,colorFFFF00;
DRAWTEXTEX(DYNAINFO(7),1,300,240,'占:'+NUMTOSTR(FLOOR(小单卖出/(主动买入+主动卖出)*100),0)+'%'),LINETHICK2,colorFFFF00;
DRAWTEXTEX(DYNAINFO(7),1,20,300,'■每笔成交手:'+NUMTOSTR(INTPART((主动买入+主动卖出)/成交笔数),2)),LINETHICK2,colorFFFF00;
VARA:=IF(BUYVOL<=REF(ASKVOL(1),1)+REF(ASKVOL(2),1)+REF(ASKVOL(3),1) AND CLOSE>=REF(ASKPRICE(3),1),BUYVOL,0);
上扫:=SUM(INTPART(IF(VARA>100 AND VARA<500 OR VARA>=500,BUYVOL,0)),0);
VARB:=IF(SELLVOL<=REF(BIDVOL(1),1)+REF(BIDVOL(2),1)+REF(BIDVOL(3),1) AND CLOSE<=REF(BIDPRICE(3),1),SELLVOL,0);
下扫:=SUM(INTPART(IF(VARB>100 AND VARA<500 OR VARB>=500,SELLVOL,0)),0);
对敲买:=VAR4+VAR5+VAR6;
对敲卖:=VARA+VARB+VARC;
撤买:=BIDVOL(1+2-3);
撤卖:=ASKVOL(1+2-3);
DRAWTEXTEX(DYNAINFO(7),1,20,725,'■上扫单 ;'+NUMTOSTR(上扫,0)),LINETHICK2,colorFFFF;
DRAWTEXTEX(DYNAINFO(7),1,20,785,'■下扫单 :'+NUMTOSTR(下扫,0)),LINETHICK2,colorFFFF00;
DRAWTEXTEX(DYNAINFO(7),1,20,475,'■对敲买 :'+NUMTOSTR(对敲买,0)),LINETHICK2,colorFF00FF;
DRAWTEXTEX(DYNAINFO(7),1,20,535,'■对敲卖 :'+NUMTOSTR(对敲卖,0)),LINETHICK2,colorFFFF00;
DRAWTEXTEX(DYNAINFO(7),1,20,595,'■撤 买 :'+NUMTOSTR(撤买,0)),LINETHICK2,colorFF00FF;
DRAWTEXTEX(DYNAINFO(7),1,20,655,'■撤 卖 :'+NUMTOSTR(撤卖,0)),LINETHICK2,colorFFFF00;
DRAWTEXTEX(DYNAINFO(7),1,20,355,'■主力买入:'+NUMTOSTR(B5,2)),LINETHICK1,colorFF;
DRAWTEXTEX(DYNAINFO(7),1,20,415,'■主力卖出:'+NUMTOSTR(S5,2)),LINETHICK1,colorFF00;
A:POLYLINE(CLOSE<COST(50),COST(20)),POINTDOT,color8800;
B:POLYLINE(CLOSE<COST(50),COST(80)),POINTDOT,color66CC00;
T:=OPENMINUTES(TIME);
CLOSE=DYNAINFO(7);
总量:=SUM(VOL,T);
总额:=SUM(AMOUNT,T);
均价:总额/(总量*100),LINETHICK0;
次数:COUNT(CLOSE>均价,T),LINETHICK0;
占比:次数/T*100,LINETHICK0;
分时强势:DRAWICON(CROSS(CLOSE,均价) AND CLOSE>均价 AND 占比>80 AND T>5,CLOSE*0.99,4);
P:=IF(FINANCE(7)*CLOSE/1000000000>=0.8,FINANCE(7)*CLOSE*3/1000,FINANCE(7)*CLOSE*5/1000);
DB:=IF(BUYVOL AND VOL*CLOSE>=P,VOL,0);
DS:=IF(SELLVOL AND VOL*CLOSE>=P,VOL,0);
ZS:=DYNAINFO(3)*0.91;
主力进:=SUM(DB,0)*CLOSE*100/10000;
主力出:=SUM(DS,0)*CLOSE*100/10000;
比:=主力进/主力出/200;
PP:=1;
KP:=IF(PP,ZS+8*比,0);
KP2:=IF(PP,ZS-8*比,0);
KK1:IF(比>=0.005,KP,ZS),colorFF00FF;
KK30:IF(比<0.005,KP2,ZS),colorFF00;
KK31:IF(比,ZS,ZS),colorFFFFFF;
|