通达信主力量差分时选股指标公式源码

通达信主力量差分时选股指标公式源码

源码正文：

A1:=(Dvol/C)/2,NODRAW{XG51};
A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE,1),A1,0),0){XG51};
A3:=SUM(IF(A1>100 AND CLOSE<REF(CLOSE,1),A1,0),0){XG51};
A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0){XG51};
A5:=SUM(IF(A1<100 AND CLOSE<REF(CLOSE,1),A1,0),0){XG51};
A6:=A2+A3+A4+A5{XG51};
机买:(A2/A6)*100,COLORWHITE,LINETHICK1,NODRAW{XG51};
机卖:(A3/A6)*100,LINETHICK1,COLORGREEN,NODRAW{XG51};
散买:(A4/A6)*100,LINETHICK1,COLORmaGENTA{XG51};
散卖:(A5/A6)*100,LINETHICK1,COLORCYAN{XG51};
主力差:机买-机卖,LINETHICK1,COLORWHITE{XG51};
IF(主力差<= REF(主力差,1),主力差,DRAWNULL),COLORGREEN,LINETHICK1{XG51};
stICKLINE(主力差>REF(主力差,1),主力差,REF(主力差,1)*3,2,0),COLORWHITE;
STICKLINE(主力差<=REF(主力差,1),主力差,REF(主力差,1)*3,2,0),COLORGREEN{XG51};
STICKLINE(主力差>REF(主力差,1) AND REF(主力差,1)>REF(主力差,2),主力差,REF(主力差,1),10,0),COLORWHITE{XG51};
STICKLINE(主力差>REF(主力差,1) AND REF(主力差,1)<REF(主力差,2),主力差,REF(主力差,1),10,1),COLORWHITE{XG51};
STICKLINE(主力差>REF(主力差,1) AND REF(主力差,1)<REF(主力差,2),主力差,REF(主力差,1),10,0),COLORWHITE{XG51};
STICKLINE(主力差<REF(主力差,1),主力差,REF(主力差,1),10,0),COLORGREEN;  
散户差:散买-散卖,LINETHICK1,COLORLIMAGENTA,NODRAW{XG51};
DRAWTEXT(主力差>0 AND REF(主力差,1)<0,主力差,'●机买'),COLORWHITE{XG51};
DRAWTEXT(主力差<0 AND REF(主力差,1)>0,主力差,'○机卖'),COLORGREEN{XG51};
DRAWTEXT(散户差>0 AND REF(散户差,1)<0,主力差,'▲散买'),COLORLIMAGENTA{XG51};
DRAWTEXT(散户差<0 AND REF(散户差,1)>0,主力差,'△散卖'),COLORCYAN{XG51};
T:=BARSCOUNT(主力差){XG51};
LLV(主力差,T),DOTLINE,COLORRED{XG51};
XG:=LLV(主力差,480),DOTLINE,COLORRED,NODRAW{XG51};
TP:= FILTER( 主力差>=LLV(主力差,T) AND 主力差>MA(主力差,0)*2 AND DYNAINFO(17)>1 AND
TIME>39600,240){XG51};
DRAWTEXT(TP,L,'★突破'),COLORWHITE{XG51};
STICKLINE(FILTER(crOSS(主力差,REF(XG,1)),10),主力差*0.99,LLV(O,T),15,0),COLORRED{XG51};
DRAWTEXT(FILTER(CROSS(主力差,REF(XG,1)),10),主力差*0.99,'下破'),COLORRED{XG51};
XG1:=HHV(主力差,480),DOTLINE,COLORBLUE,NODRAW{XG51};
HHV(主力差,T),DOTLINE,COLORBLUE,{XG51};
TP1:= FILTER(主力差>=HHV(主力差,T) AND 主力差>MA(主力差,0)*2 AND DYNAINFO(17)>1 AND TIME>39600,240) {XG51};
DRAWTEXT(TP1,L,'★突破'),COLORWHITE{XG51};
STICKLINE(FILTER(CROSS(主力差,REF(XG1,1)),10),主力差*0.99,HHV(O,T),10,0),COLORBLUE{XG51};
DRAWTEXT(FILTER(CROSS(主力差,REF(XG1,1)),10),主力差*0.99,'上突'),COLORBLUE;

{X^G_5~1^C^N^{}