资金净流买卖百分比+基本面财务组合副图源码 通达信 贴图 需要L2数据

资金净流计算精准，和软件一致，值得关注！
优化了一下，把大单更换为主力资金进出！


{1}
DRAWRECTREL(1,5,310,999,RGB(10,0,0));
DRAWTEXT_FIX(1,0.21,0.01,1,GNBLOCK),COLORRED;
DRAWTEXT_FIX(1,0.3,0.01,1,HYBLOCK),COLORLIGREEN;
净资收益率:=(FINANCE(33)/FINANCE(34)*100);
销售毛利率:=((FINANCE(20)-FINANCE(21))/FINANCE(20)*100);
净利润比率:=(FINANCE(30)/FINANCE(20)*100);
主营利润率:=(FINANCE(23)/FINANCE(20)*100);
优质资产率:=((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19));{理论上越大越好但不同行业有不同标准};
现金负债比:=(FINANCE(25)/FINANCE(15));{缺长期负债或负债总额，理论上越大越好但不同行业有不同标准};
净利同增率:=FINANCE(43);
总收入增率:=FINANCE(44);

DRAWTEXT_FIX(1,0.2,0.15,1,'净资收益率>15%：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.2,0.25,1,'销售毛利率>20%：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.2,0.35,1,'净利润率 ：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.2,0.45,1,'主营利润率>10%：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.2,0.55,1,'优质资产率：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.2,0.65,1,'现金负债比<30%：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.2,0.75,1,'净利同增率：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.2,0.85,1,'总收入增率：'),COLORYELLOW;
DRAWNUMBER_FIX(1,0.23,0.15,1,净资收益率),COLORWHITE;
DRAWNUMBER_FIX(1,0.23,0.25,1,销售毛利率),COLORWHITE;
DRAWNUMBER_FIX(1,0.23,0.35,1,净利润比率),COLORWHITE;
DRAWNUMBER_FIX(1,0.23,0.45,1,主营利润率),COLORWHITE;
DRAWNUMBER_FIX(1,0.23,0.55,1,优质资产率),COLORWHITE;
DRAWNUMBER_FIX(1,0.23,0.65,1,现金负债比),COLORWHITE;
DRAWNUMBER_FIX(1,0.23,0.75,1,净利同增率),COLORWHITE;
DRAWNUMBER_FIX(1,0.23,0.85,1,总收入增率),COLORWHITE;

市净率:=CONST(DYNAINFO(7) / FINANCE(34));
市销率:=CONST(FINANCE(1)*DYNAINFO(7)/FINANCE(20));
每股收益季:=CONST(FINANCE(33)/(5-FINANCE(37)));
每股收益年:=CONST(FINANCE(33));
每股现金流:=CONST((FINANCE(25)/FINANCE(1)));
每股未分配:=CONST(FINANCE(32));
每股公积金:=CONST(FINANCE(18));
资产负债率:=FINANCE(9);
DRAWTEXT_FIX(1,0.28,0.15,1,'市净率 ：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.28,0.25,1,'市销率 ：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.28,0.35,1,'每股收益季：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.28,0.45,1,'每股收益年：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.28,0.55,1,'每股现金流：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.28,0.65,1,'每股未分配：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.28,0.75,1,'每股公积金：'),COLORYELLOW;
DRAWTEXT_FIX(1,0.28,0.85,1,'资产负债率：'),COLORYELLOW;
DRAWNUMBER_FIX(1,0.3,0.15,1,市净率),COLORWHITE;
DRAWNUMBER_FIX(1,0.3,0.25,1,市销率),COLORWHITE;
DRAWNUMBER_FIX(1,0.3,0.35,1,每股收益季),COLORWHITE;
DRAWNUMBER_FIX(1,0.30,0.45,1,每股收益年),COLORWHITE;
DRAWNUMBER_FIX(1,0.3,0.55,1,每股现金流),COLORWHITE;
DRAWNUMBER_FIX(1,0.3,0.65,1,每股未分配),COLORWHITE;
DRAWNUMBER_FIX(1,0.3,0.75,1,每股公积金),COLORWHITE;
DRAWNUMBER_FIX(1,0.3,0.85,1,资产负债率),COLORWHITE;
{1}{好股票WWW.GOODGUPIAO.COM}
超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;
TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0);
净流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S);
超大单:=(超B)-(超S);
大单:=(大B)-(大S);
中单:=(中B)-(中S);
小单:=(小B)-(小S);
DAZHI:=CONST(MAX(ABS(净流入),MAX(ABS(超大单),MAX(ABS(大单),MAX(ABS(中单),ABS(小单)))))),NODRAW;
近5净入:=SUM(净流入,5);
近5超:=SUM(超大单,5);
近5大:=SUM(大单,5);
近5中:=SUM(中单,5),;
近5小:=SUM(小单,5);
近10净入:=SUM(净流入,10);
近10超:=SUM(超大单,10);
近10大:=SUM(大单,10);
近10中:=SUM(中单,10),;
近10小:=SUM(小单,10);
近20净入:=SUM(净流入,20);
近20超:=SUM(超大单,20);
近20大:=SUM(大单,20);
近20中:=SUM(中单,20);
近20小:=SUM(小单,20);
流入:=ABS(超B+大B+中B+小B)*1000/VOL;
流出:=ABS(超S+大S+中S+小S)*1000/VOL;
近5流入:=ABS(SUM(超B,5)+SUM(大B,5)+SUM(中B,5)+SUM(小B,5))*1000/VOL;
近5流出:=ABS(SUM(超S,5)+SUM(大S,5)+SUM(中S,5)+SUM(小S,5))*1000/VOL;
近10流入:=ABS(SUM(超B,10)+SUM(大B,10)+SUM(中B,10)+SUM(小B,10))*1000/VOL;
近10流出:=ABS(SUM(超S,10)+SUM(大S,10)+SUM(中S,10)+SUM(小S,10))*1000/VOL;
近20流入:=ABS(SUM(超B,20)+SUM(大B,20)+SUM(中B,20)+SUM(小B,20))*1000/VOL;
近20流出:=ABS(SUM(超S,20)+SUM(大S,20)+SUM(中S,20)+SUM(小S,20))*1000/VOL;
净流买比:=流入*100/(流入+流出);
净流买比5:=近5流入*100/(近5流入+近5流出);
净流买比10:=近10流入*100/(近10流入+近10流出);
净流买比20:=近20流入*100/(近20流入+近20流出);
AAS:=CONST(MAX(ABS(流入),ABS(流出)))*4,NODRAW;
{ 当日 }

DRAWRECTREL(10,ABS(CONST(780-(ABS(净流入)*50/DAZHI))),28,999,IF(CONST(净流入)>0,RGB(255,0,0),RGB(0,125,50)));

DRAWRECTREL(30,205,190,145,RGB(0,140,0));
DRAWRECTREL(30,195,190,155,RGB(0,160,0));
DRAWRECTREL(30,185,190,165,RGB(0,180,0));
DRAWRECTREL(30,175,190,175,RGB(0,210,0));
DRAWRECTREL(30,205,30+CONST(净流买比*160/100),145,RGB(140,0,0));
DRAWRECTREL(30,195,30+CONST(净流买比*160/100),155,RGB(160,0,0));
DRAWRECTREL(30,185,30+CONST(净流买比*160/100),165,RGB(180,0,0));
DRAWRECTREL(30,175,30+CONST(净流买比*160/100),175,RGB(210,0,0));
DRAWTEXT_FIX(1,0.02,0.14,0,STRCAT(STRCAT('净流买比',CON2STR(净流买比,2)),'％')),COLORWHITE;
DRAWRECTREL(110,205,110,145,RGB(250,250,0));
DRAWTEXT_FIX(1,0.2,0.15,1,'净资收益率>15%：'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.011,1,0,'净流入'),COLORFFFFFF;

DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.010,0.79,0,CEILING(净流入)),COLORYELLOW;

{主力进出}

大宗进:=(超B)+(大B),NODRAW;
大宗出:=(超S)+(大S),NODRAW;
非大宗进:=(中B)+(小B),NODRAW;
非大宗出:=(中S)+(小S),NODRAW;
DAZHIV:=CONST(MAX(ABS(大宗进),MAX(ABS(大宗出),MAX(ABS(非大宗进),ABS(非大宗出))))),NODRAW;
DRAWRECTREL(70,CONST(950-(ABS(大宗进)*250/DAZHIV))-20,90,990,IF(CONST(大宗进>0),RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(105,CONST(950-(ABS(大宗出)*250/DAZHIV))-20,125,990,IF(CONST(大宗出>0),RGB(23,125,255),RGB(255,0,0)));
{调整105和125是左右移动，850调整高度}
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.086,1,0,'主力进出'),COLORWHITE;