通达信主力资金进出节奏选股指标公式源码

通达信主力资金进出节奏选股指标公式源码

源码正文：

量＿价:=1{XG51};
CTKG:=1{XG51};
W:=量＿价{XG51};
EPSL:=0.0001{XG51};
ZZ:=(C+H+L)/3{XG51};
TJA:=ZZ>=maX(C,O) AND CTKG=1{XG51};
TJB:=ZZ<=MIN(C,O) AND CTKG=1{XG51};
ZF:=IF(TJA,1,IF(TJB,-1,0)){XG51};
TJ0:=TJA OR TJB{XG51};
TJ1:=H=L AND C>REF(C,1){XG51};
TJ2:=H=L AND C<REF(C,1){XG51};
TJ3:=H=L AND C=REF(C,1){XG51};
量_价:=IF(W=1,vol,AMOUNT),stICK,COLOREEFFEE{XG51};
EE:=IF(TJ1,EPSL,IF(TJ2,-EPSL,0)){XG51};
ZL:=2*(H-L)+Abs(C-O)+3*IF(TJ3,EPSL,ABS(EE)){XG51};
JGL_DX:=(IF(TJ0,2/3*(2*C-H-L)+ZF*ABS(C-O),(C-O))+EE)/ZL{XG51};
买卖差:=JGL_DX*量_价,COLOR13AADD,NODRAW{XG51};
DX%:JGL_DX*100,NODRAW,COLORCYAN,LINETHICK0{XG51};
DX连红:BArslASTCOUNT(DX%>0),COLORWHITE,NODRAW,LINETHICK0{XG51};
买盘:=量_价*(1+JGL_DX)/2,COLOR1133AA,NODRAW{XG51};
卖盘:=量_价*(1-JGL_DX)/2,COLORFFFF00,NODRAW{XG51};
VAR11:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)){XG51};
ddx:=买盘-卖盘;
MADDX:=MA(DDX,5)*15{XG51};
DDX1:SMA(MADDX,3,1),COLORWHITE,LINETHICK1;
DDX2:SMA(DDX1,3,1),COLORCYAN,LINETHICK1;
DDX3:SMA(DDX2,3,1),COLORBLUE,LINETHICK1{XG51};
DRAwrECTREL(0,250,175,999.4,IF(120,RGB(10,0,0),0)){XG51};
超B:=L2_AMO(0,2)/10000.0{XG51};
大B:=L2_AMO(1,2)/10000.0{XG51};
中B:=L2_AMO(2,2)/10000.0{XG51};
小B:=L2_AMO(3,2)/10000.0{XG51};
超S:=L2_AMO(0,3)/10000.0{XG51};
大S:=L2_AMO(1,3)/10000.0{XG51};
中S:=L2_AMO(2,3)/10000.0{XG51};
小S:=L2_AMO(3,3)/10000.0{XG51};
净流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S),NODRAW{XG51};
超大单:=(超B)-(超S),NODRAW{XG51};
大单:=(大B)-(大S),NODRAW{XG51};
中单:=(中B)-(中S),NODRAW{XG51};
小单:=(小B)-(小S),NODRAW{XG51};
DAZHI:=CONST(MAX(ABS(净流入),MAX(ABS(超大单),MAX(ABS(大单),MAX(ABS(中单),ABS(小单)))))),NODRAW{XG51};
DRAWRECTREL(0,CONST(830-(ABS(超大单)*500/DAZHI)),30,935,IF(CONST(超大单)>0,RGB(255,0,0),RGB(23,125,255))){XG51};
DRAWRECTREL(35,CONST(830-(ABS(大单)*500/DAZHI)),65,935,IF(CONST(大单)>0,RGB(255,0,0),RGB(23,125,255))){XG51};
DRAWRECTREL(70,CONST(830-(ABS(中单)*500/DAZHI)),100,935,IF(CONST(中单)>0,RGB(255,0,0),RGB(23,125,255))){XG51};
DRAWRECTREL(105,CONST(830-(ABS(小单)*500/DAZHI)),135,935,IF(CONST(小单)>0,RGB(255,0,0),RGB(23,125,255))){XG51};
DRAWRECTREL(140,CONST(830-(ABS(净流入)*500/DAZHI)),170,935,IF(CONST(净流入)>0,RGB(255,0,0),RGB(23,125,255))){XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.002,0.25,0,'资金搏弈 (万元)'),COLORBLUE{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.002,0.55,0,INTPART(超大单)),COLORBLUE{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.035,0.555,0,INTPART(大单)),COLORBLUE{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.070,0.550,0,INTPART(中单)),COLORBLUE{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.106,0.55,0,INTPART(小单)),COLORBLUE{XG51};
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.145,0.55,0,INTPART(净流入)),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.002,1,0,'超大'),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.040,1,0,'大单'),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.075,1,0,'中单'),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.112,1,0,'小单'),COLORBLUE{XG51};
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.145,1,0,'净流'),COLORBLUE{XG51};
{X_G~5-1_C_N_{};