以下是通达信免费流向指标公式源码和截图
通达信免费资金流向指标公式源码：
预量:IF(CURRBARSCOUNT=1ANDPERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;
STICKLINE(CURRBARSCOUNT=1ANDPERIOD=5,预量,0,3,-1),COLORFFFFFF;
量＿价:=1;CTKG:=1;
W:=量＿价;
EPSL:=0.0001;
ZZ:=(C+H+L)/3;
TJA:=ZZ =MAX(C,O)ANDCTKG=1;{倒锤头};
TJB:=ZZ =MIN(C,O)ANDCTKG=1;{正锤头};
ZF:=IF(TJA,1,IF(TJB,-1,0));{正负数};
TJ0:=TJAORTJB;
TJ1:=H=LANDC REF(C,1);{一字};
TJ2:=H=LANDC REF(C,1);{一字跌停};
TJ3:=H=LANDC=REF(C,1);{连续一字涨、跌停};
量_价:=IF(W=1,VOL,AMOUNT),STICK,COLOREEFFEE;{平盘量,白色}
{以下4句组合属核心公式，版权属于JIPGEMLING.见凌见}
EE:=IF(TJ1,EPSL,IF(TJ2,-EPSL,0));
ZL:=2*(H-L)+ABS(C-O)+3*IF(TJ3,EPSL,ABS(EE));
JGL_DX:=(IF(TJ0,2/3*(2*C-H-L)+ZF*ABS(C-O),(C-O))+EE)/ZL;
差:JGL_DX*量_价,COLOR13AADD,NODRAW;
DX%:JGL_DX*100,NODRAW;
买盘:量_价*(1+JGL_DX)/2,COLOR1133AA,NODRAW;
卖盘:量_价*(1-JGL_DX)/2,COLORFFFF00,NODRAW;
{加入移动平}
M5:MA(V,5),COLORRED;M10:MA(V,10);
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主动买盘:=IF(CLOSE OPEN,VAR1*(HIGH-LOW),IF(CLOSE OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK0;
主动卖盘:=IF(CLOSE OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE OPEN,0-VAR1*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORGREEN;
{因为可能会出现卖出量为0的BUG，所以放在最后参考}
净量:主动买盘+主动卖盘,NODRAW;
STICKLINE(C O,0,VOL,3.2,0),COLORFF1100;
STICKLINE(C O,0,VOL,2.7,0),COLORFF3300;
STICKLINE(C O,0,VOL,2.1,0),COLORFF5500;
STICKLINE(C O,0,VOL,1.5,0),COLORFF7700;
STICKLINE(C O,0,VOL,0.9,0),COLORFF9900;
STICKLINE(C O,0,VOL,0.3,0),COLORFFBB00;
STICKLINE(C=OANDC REF(C,1),0,VOL,3.2,0),COLOR006000;
STICKLINE(C=OANDC REF(C,1),0,VOL,2.7,0),COLOR007500;
STICKLINE(C=OANDC REF(C,1),0,VOL,2.1,0),COLOR009100;
STICKLINE(C=OANDC REF(C,1),0,VOL,1.5,0),COLOR00A600;
STICKLINE(C=OANDC REF(C,1),0,VOL,0.9,0),COLOR00BB00;
STICKLINE(C=OANDC REF(C,1),0,VOL,0.3,0),COLOR00CC00;
STICKLINE(C=OANDC REF(C,1),0,VOL,3.2,0),COLOR555555;
STICKLINE(C=OANDC REF(C,1),0,VOL,2.7,0),COLOR777777;
STICKLINE(C=OANDC REF(C,1),0,VOL,2.1,0),COLOR999999;
STICKLINE(C=OANDC REF(C,1),0,VOL,1.5,0),COLORBBBBBB;
STICKLINE(C=OANDC REF(C,1),0,VOL,0.9,0),COLORDDDDDD;
STICKLINE(C=OANDC REF(C,1),0,VOL,0.3,0),COLORFFFFFF;
STICKLINE(C O,0,VOL,3.2,0),COLORFF11FF;
STICKLINE(C O,0,VOL,2.7,0),COLORFF33FF;
STICKLINE(C O,0,VOL,2.1,0),COLORFF55FF;
STICKLINE(C O,0,VOL,1.5,0),COLORFF77FF;
STICKLINE(C O,0,VOL,0.9,0),COLORFF99FF;
STICKLINE(C O,0,VOL,0.3,0),COLORFFBBFF;
{这一句很好，也就是中间出现黄色，为活跃资金}
资金异动:VOL/MA(VOL,55)*100,COLORYELLOW;
STICKLINE(主动买盘 0,0,主动买盘,3.2,0),COLOR000055;
STICKLINE(主动买盘 0,0,主动买盘,2.7,0),COLOR000077;
STICKLINE(主动买盘 0,0,主动买盘,2.1,0),COLOR000099;
STICKLINE(主动买盘 0,0,主动买盘,1.5,0),COLOR0000BB;
STICKLINE(主动买盘 0,0,主动买盘,0.9,0),COLOR0000DD;
STICKLINE(主动买盘 0,0,主动买盘,0.3,0),COLOR0000FF;
STICKLINE(主动卖盘 0,0,主动卖盘,3.2,0),COLOR006000;
STICKLINE(主动卖盘 0,0,主动卖盘,2.7,0),COLOR007500;
STICKLINE(主动卖盘 0,0,主动卖盘,2.1,0),COLOR009100;
STICKLINE(主动卖盘 0,0,主动卖盘,1.5,0),COLOR00A600;
STICKLINE(主动卖盘 0,0,主动卖盘,0.9,0),COLOR00BB00;
STICKLINE(主动卖盘 0,0,主动卖盘,0.3,0),COLOR00CC00;
STICKLINE(资金异动 100,0,VOL,0.6,0),COLORYELLOW;
{这两句为放量，如果低位，当然要关注了，柱子中画一白一蓝两线，用于提示}
STICKLINE(V =3*REF(V,1),V/3,V/3,5.9,0),COLORBLUE,LINETHICK2;
STICKLINE(V =2*REF(V,1),V/2,V/2,3.9,0),COLORYELLOW,LINETHICK2;
总额:=AMOUNT;
买:=IF(O=CAND(C-REF(C,1))/REF(C,1)*100 9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L));
买%:=买/AMOUNT*100;
流入:=AMOUNT*买%/10000000000;
流出:=AMOUNT/100000000-流入;
净流:=流入-流出;
总额3:=SUM(AMOUNT,3);
流入3:=SUM(流入,3);
流出3:=SUM(流出,3);
净流3:=SUM(流入-流出,3);
总额5:=SUM(AMOUNT,5);
流入5:=SUM(流入,5);
流出5:=SUM(流出,5);
净流5:=SUM(流入-流出,5);
总额10:=SUM(AMOUNT,10);
流入10:=SUM(流入,10);
流出10:=SUM(流出,10);
净流10:=SUM(流入-流出,10);
画:=CONST(FINDHIGH(总额10,0,190,1));
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,30,0),ABS(画),DRAWNULL),RGB(0,30,50),0,DRAWNULL);
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,27,26),CONST(总额),DRAWNULL),RGB(150,10,0),0,DRAWNULL);
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,26,25),CONST(流入*100000000),DRAWNULL),RGB(250,0,250),0,DRAWNULL);
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,25,24),CONST(流出*100000000),DRAWNULL),RGB(0,255,255),0,DRAWNULL);
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,20,19),CONST(总额3),DRAWNULL),RGB(150,10,0),0,DRAWNULL);
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,19,18),CONST(流入3*100000000),DRAWNULL),RGB(250,0,250),0,DRAWNULL);
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,18,17),CONST(流出3*100000000),DRAWNULL),RGB(0,255,255),0,DRAWNULL);
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,13,12),CONST(总额5),DRAWNULL),RGB(150,10,0),0,DRAWNULL);
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,12,11),CONST(流入5*100000000),DRAWNULL),RGB(250,0,250),0,DRAWNULL);
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,11,10),CONST(流出5*100000000),DRAWNULL),RGB(0,255,255),0,DRAWNULL);
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,6,5),CONST(总额10),DRAWNULL),RGB(150,10,0),0,DRAWNULL);
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,5,4),CONST(流入10*100000000),DRAWNULL),RGB(250,0,250),0,DRAWNULL);
DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,4,3),CONST(流出10*100000000),DRAWNULL),RGB(0,255,255),0,DRAWNULL);
DRAWTEXT(CURRBARSCOUNT=30,画*0.89,'总额亿'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=30,画*0.78,'流入亿'),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=30,画*0.67,'流出亿'),COLORCYAN;
DRAWTEXT(CURRBARSCOUNT=30,画*0.57,'净流亿'),COLOR0099FF;
DRAWTEXT(CURRBARSCOUNT=24,画*0.95,'1日'),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=18,画*0.95,'3日'),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=12,画*0.95,'5日'),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=6,画*0.95,'10日'),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=30,画*0.015,'(一)'),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=23,画*0.015,'(三)'),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=16,画*0.015,'(五)'),COLORMAGENTA;
DRAWTEXT(CURRBARSCOUNT=9,画*0.015,'(十)'),COLORMAGENTA;
DRAWNUMBER(CURRBARSCOUNT=25,画*0.89,CONST(总额/100000000)),COLORYELLOW;
DRAWNUMBER(CURRBARSCOUNT=25,画*0.78,CONST(流入)),COLORYELLOW;
DRAWNUMBER(CURRBARSCOUNT=25,画*0.67,CONST(流出)),COLORYELLOW;
DRAWNUMBER(CURRBARSCOUNT=25,画*0.56,CONST(净流)),COLORYELLOW;
DRAWNUMBER(CURRBARSCOUNT=19,画*0.89,CONST(总额3/100000000)),COLORYELLOW;
DRAWNUMBER(CURRBARSCOUNT=19,画*0.78,CONST(流入3)),COLORYELLOW;
DRAWNUMBER(CURRBARSCOUNT=19,画*0.67,CONST(流出3)),COLORYELLOW;
DRAWNUMBER(CURRBARSCOUNT=19,画*0.56,CONST(净流3)),COLORYELLOW;
DRAWNUMBER(CURRBARSCOUNT=13,画*0.89,CONST(总额5/100000000)),COLORDDFFFF;
DRAWNUMBER(CURRBARSCOUNT=13,画*0.78,CONST(流入5)),COLORDDFFFF;
DRAWNUMBER(CURRBARSCOUNT=13,画*0.67,CONST(流出5)),COLORDDFFFF;
DRAWNUMBER(CURRBARSCOUNT=13,画*0.56,CONST(净流5)),COLORDDFFFF;
DRAWNUMBER(CURRBARSCOUNT=7,画*0.89,CONST(总额10/100000000)),COLORYELLOW;
DRAWNUMBER(CURRBARSCOUNT=7,画*0.78,CONST(流入10)),COLORYELLOW;
DRAWNUMBER(CURRBARSCOUNT=7,画*0.67,CONST(流出10)),COLORYELLOW;
DRAWNUMBER(CURRBARSCOUNT=7,画*0.56,CONST(净流10)),COLORYELLOW;
ma21:=MA(CLOSE,21)COLORLIRED,crOSSDOT;
UB:=MA21+2*stD(CLOSE,21)COLORLIRED,LINETHICK2;
LB:=MA21-2*STD(CLOSE,21)COLORLIRED,LINETHICK2;
DRAWBAND(UB,RGB(0,80,60),LB,RGB(0,0,0));
IF(MA21 REF(MA21,5),MA21,DRAWNULL)COLORLIRED,CROSSDOT;
IF(MA21 REF(MA21,5),MA21,DRAWNULL)COLORCYAN,CROSSDOT;
{大资金流向}
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=L2_AMO(0,3)/10000.0;
大S:=L2_AMO(1,3)/10000.0;
中S:=L2_AMO(2,3)/10000.0;
小S:=L2_AMO(3,3)/10000.0;
大资金流向:(超B+大B)-(超S+大S)COLORYELLOW,NODRAW;
STICKLINE(大资金流向 0,O,C,2,0),COLORFF3300;
STICKLINE(大资金流向 0,O,C,1.2,0),COLORFF6600;
STICKLINE(大资金流向 0,O,C,0.5,0),COLORFF9900;
STICKLINE(大资金流向 0,O,C,2,0),COLOR0066FF;
STICKLINE(大资金流向 0,O,C,1.2,0),COLOR099FFF;
STICKLINE(大资金流向 0,O,C,0.5,0),COLOR00FFFF;
连续流入天:BArslASTCOUNT(大资金流向 0)NODRAWCOLORYELLOW;
十三日内流入天:COUNT(大资金流向 0,13)NODRAW,COLORRED;
五日净流入:SUM(大资金流向,5),NODRAW,COLORMAGENTA;
重心:=(C+H+L+O)/4;
STICKLINE(重心 0,重心,重心,2,-1),COLORWHITE;
涨幅:=(C-REF(C,1))/REF(C,1)*100;
历史涨幅:SUM(涨幅,0),NODRAW;
一周涨幅:历史涨幅-REF(历史涨幅,5),NODRAW;
一月涨幅:历史涨幅-REF(历史涨幅,20),NODRAW;
一季涨幅:历史涨幅-REF(历史涨幅,60),NODRAW;
半年涨幅:历史涨幅-REF(历史涨幅,120),NODRAW;
一年涨幅:历史涨幅-REF(历史涨幅,240),NODRAW;
MA5:MA(CLOSE,5),LINETHICK2;
大:EMA(EMA(EMA(EMA(EMA(C,55),2),2),2),2),COLORYELLOWLINETHICK2;
通达信免费资金流向指标公式截图
