大智慧融大资金流指标源码

DRAWGBK((C> 0),STRIP(RGB(10,10,30),RGB(10,10,10),0));
{---------------------------------------------------------------------}
源码净 :="大额日线.主力#day";
特买:="大额日线.特买#day";
特卖:="大额日线.特卖#day";
大买:="大额日线.大买#day";
大卖:="大额日线.大卖#day";
中买:="大额日线.中买#day";
中卖:="大额日线.中卖#day";
小买:="大额日线.小买#day";
小卖:="大额日线.小卖#day";
超大买比:="大额日线.超大比#day";
大户买比:="大额日线.大户比#day";
中户买比:="大额日线.中户比#day";
散户买比:="大额日线.散户比#day";
★主力买比:="大额日线.主力比#day";

小净:=小买-小卖;
中净:=中买-中卖;
大净:=大买-大卖;
特净:=特买-特卖;
★主力买:=特买+大买;
★主力卖:=特卖+大卖;
总:=★主力买+★主力卖;
★主力净:=特净+大净;

JEDDX:=★主力净;
ZHDDX:=中净;
DHDDX:=大净;
JGDDX:=特净;
SHDDX:=小净;

DRAWRECTREL(-100,-200,0,1100,RGB(1,1,1)),LAYER1;
DRAWRECTREL(0,0,50,1100,RGB(1,1,1)),colorblack,LAYER1;
DRAWTEXTREL(10,100,'机构'),color990099;
DRAWTEXTREL(10,350,'大户'),colorred;
DRAWTEXTREL(10,600,'中户'),coloryellow;
DRAWTEXTREL(10,850,'散户'),colorcyan;

DRAWFLAGTEXT(1,0,'机构'+STR(P2)+'日累加：'+str(sum(JGDDX,P2))+'手'),COLORWHITE;
DRAWFLAGTEXT(1,0,'大户'+STR(P3)+'日累加：'+str(sum(DHDDX,P3))+'手'),COLORYELLOW;
DRAWFLAGTEXT(1,0,'中户'+STR(P4)+'日累加：'+str(sum(ZHDDX,P4))+'手'),COLORffaa00;
DRAWFLAGTEXT(1,0,'散户'+STR(P4)+'日累加：'+str(sum(SHDDX,P4))+'手'),COLORGREEN;
DRAWFLAGTEXT(1,0,'净额：'+STR(P4)+'日累加：'+str(sum(JEDDX,P4))+'手'),Color825BFF;

机构:JGDDX,colorwhite,LINETHICK0;
大户:DHDDX,coloryellow,LINETHICK0;
中户:ZHDDX,colorffaa00,LINETHICK0;
散户:SHDDX,colorgreen,LINETHICK0;
特大连红天数:last(JGDDX>0),Colorwhite,LINETHICK0;
大单连红天数:last(DHDDX>0),coloryellow,LINETHICK0;
小单连绿天数:last(shDDX<0),colorgreen,LINETHICK0;

D:=max(HHVALL(JGDDX),HHVALL(DHDDX),HHVALL(ZHDDX),HHVALL(SHDDX),ABS(LLVALL(JGDDX)),ABS(LLVALL(DHDDX)),ABS(LLVALL(ZHDDX)),ABS(LLVALL(SHDDX)));

STICKLINE(JGDDX>0,4*D,4*D+JGDDX,6,0),Color6D40FF;
STICKLINE(JGDDX>0,4*D,4*D+JGDDX,4,0),Color825BFF;
STICKLINE(JGDDX>0,4*D,4*D+JGDDX,3,0),Color9C7DFF;
STICKLINE(JGDDX>0,4*D,4*D+JGDDX,1,0),ColorB9A3FF;
STICKLINE(JGDDX<0,4*D,4*D+JGDDX,6,0),ColorFF9900;
STICKLINE(JGDDX<0,4*D,4*D+JGDDX,4,0),ColorFFBB00;
STICKLINE(JGDDX<0,4*D,4*D+JGDDX,3,0),ColorFFDD00;
STICKLINE(JGDDX<0,4*D,4*D+JGDDX,1,0),ColorFFFF00;
STICKLINE(JGDDX=0,4*D,4*D,12,0),COLOR444444;
STICKLINE(DHDDX>0,2*D,2*D+DHDDX,6,0),Color6D40FF;
STICKLINE(DHDDX>0,2*D,2*D+DHDDX,4,0),Color825BFF;
STICKLINE(DHDDX>0,2*D,2*D+DHDDX,3,0),Color9C7DFF;
STICKLINE(DHDDX>0,2*D,2*D+DHDDX,1,0),ColorB9A3FF;
STICKLINE(DHDDX<0,2*D,2*D+DHDDX,6,0),ColorFF9900;
STICKLINE(DHDDX<0,2*D,2*D+DHDDX,4,0),ColorFFBB00;
STICKLINE(DHDDX<0,2*D,2*D+DHDDX,3,0),ColorFFDD00;
STICKLINE(DHDDX<0,2*D,2*D+DHDDX,1,0),ColorFFFF00;
STICKLINE(DHDDX=0,2*D,2*D,12,0),COLOR444444;
STICKLINE(ZHDDX>0,0,ZHDDX,6,0),Color6D40FF;
STICKLINE(ZHDDX>0,0,ZHDDX,4,0),Color825BFF;
STICKLINE(ZHDDX>0,0,ZHDDX,3,0),Color9C7DFF;
STICKLINE(ZHDDX>0,0,ZHDDX,1,0),ColorB9A3FF;
STICKLINE(ZHDDX<0,0,ZHDDX,6,0),ColorFF9900;
STICKLINE(ZHDDX<0,0,ZHDDX,4,0),ColorFFBB00;
STICKLINE(ZHDDX<0,0,ZHDDX,3,0),ColorFFDD00;
STICKLINE(ZHDDX<0,0,ZHDDX,1,0),ColorFFFF00;
STICKLINE(ZHDDX=0,0,0,12,0),COLOR444444;
STICKLINE(shdDx>0,-2*D,SHDDX-2*D,6,0),Color6D40FF;
STICKLINE(shddx>0,-2*D,SHDDX-2*D,4,0),Color825BFF;
STICKLINE(shddx>0,-2*D,SHDDX-2*D,3,0),Color9C7DFF;
STICKLINE(shddx>0,-2*D,SHDDX-2*D,1,0),ColorB9A3FF;
STICKLINE(shddx<0,-2*D,SHDDX-2*D,6,0),ColorFF9900;
STICKLINE(shddx<0,-2*D,SHDDX-2*D,4,0),ColorFFBB00;
STICKLINE(shddx<0,-2*D,SHDDX-2*D,3,0),ColorFFDD00;
STICKLINE(shddx<0,-2*D,SHDDX-2*D,1,0),ColorFFFF00;
STICKLINE(SHDDX=0,-2*D,-2*D,12,0),COLOR444444;

-----------------------------------------------------------------------------------------------------------

{大额日线}
REFLINE:0,20,40,60;
Chb:=sum(AMOUNT*bigorder(1,3),1);
Dhb:=sum(AMOUNT*(bigorder(1,2)-bigorder(1,3)),1);
Zhb:=sum(AMOUNT*(bigorder(1,1)-bigorder(1,2)),1);
Xhb:=sum(AMOUNT*(1-bigorder(1,1)),1);
Hj:=chb+dhb+zhb+xhb;
Chs:=sum(AMOUNT*bigorder(2,3),01);
Dhs:=sum(AMOUNT*(bigorder(2,2)-bigorder(2,3)),01);
Zhs:=sum(AMOUNT*(bigorder(2,1)-bigorder(2,2)),01);
Xhs:=sum(AMOUNT*(1-bigorder(2,1)),01);
hjs:=chs+dhs+zhs+xhs;

chbb:=chb/hj;
dhbb:=dhb/hj;
zhbb:=zhb/hj;
xhbb:=xhb/hj;
xhj:=(xhb-xhs)/10000;
zhj:=(zhb-zhs)/10000;
dhj:=(dhb-dhs)/10000;
chj:=(chb-chs)/10000;
流入:=chj+dhj;

超大:=chb/hj*100;
大户:=dhb/hj*100;
中户:=zhb/hj*100;
散户:=xhb/hj*100;
主力A:=超大+大户;
{超赢特大}
特买A:MA(chb/10000,1),linethick0;
特卖A:MA(chs/10000,1),linethick0;
{超赢大户持仓}
大买A:MA(dhb/10000,1),linethick0;
大卖A:MA(dhs/10000,1),linethick0;
{超赢中户@}
中买A:MA(zhb/10000,1),linethick0;
中卖A:MA(zhs/10000,1),linethick0;
{超赢散户&}
小买A:MA(xhb/10000,1),linethick0;
小卖A:MA(xhs/10000,1),linethick0;

{大额日线}
特买:特买A,LINETHICK7,COLORred;
特卖:特卖A,LINETHICK7,COLORgreen;
大买:大买A,LINETHICK5,COLORred;
大卖:大卖A,LINETHICK5,COLORgreen;
中买:中买A,LINETHICK3,COLORred;
中卖:中卖A,LINETHICK3,COLORgreen;
小买:小买A,LINETHICK1,COLORred;
小卖:小卖A,LINETHICK1,COLORgreen;
主力:主力A,Color00ffff;

超大比:超大;
大户比:大户;
中户比:中户;
散户比:散户;
主力比:主力A;
 

DRAWGBKLAST(CLOSE>0,STRIP(RGB(0,50,0),RGB(0,50,0),0));
{---------------------------------------------------------------------}
源码净 :="大额日线.主力#day";
特买:="大额日线.特买#day";
特卖:="大额日线.特卖#day";
大买:="大额日线.大买#day";
大卖:="大额日线.大卖#day";
中买:="大额日线.中买#day";
中卖:="大额日线.中卖#day";
小买:="大额日线.小买#day";
小卖:="大额日线.小卖#day";
超大买比:="大额日线.超大比#day";
大户买比:="大额日线.大户比#day";
中户买比:="大额日线.中户比#day";
散户买比:="大额日线.散户比#day";
★主力买比:="大额日线.主力比#day";

小净:=小买-小卖;
中净:=中买-中卖;
大净:=大买-大卖;
特净:=特买-特卖;
★主力买:=特买+大买;
★主力卖:=特卖+大卖;
总:=★主力买+★主力卖;
★主力净:=特净+大净;
实际:SUM(★主力净,10)*0.5;
散户:小净,COLORFFFF00,LINETHICK0;
中户:中净,COLOR09BAFD,LINETHICK0;
大户:大净,COLORRED,LINETHICK0;
机构:特净,COLOR9F009F,LINETHICK0;

STICKLINE(散户>0,0,散户,8,0),COLOR303000;
STICKLINE(散户>0,0,散户,7,0),COLOR353500;
STICKLINE(散户>0,0,散户,6,0),COLOR404000;
STICKLINE(散户>0,0,散户,5,0),COLOR454500;
STICKLINE(散户>0,0,散户,4,0),COLOR525200;
STICKLINE(散户>0,0,散户,3,0),COLOR595900;
STICKLINE(散户>0,0,散户,2,0),COLOR666600;
STICKLINE(散户>0,0,散户,1,0),COLOR737300;
STICKLINE(散户>0,0,散户,0,0),COLOR929200;
STICKLINE(散户<0,0,散户,8,0),COLOR303000;
STICKLINE(散户<0,0,散户,7,0),COLOR353500;
STICKLINE(散户<0,0,散户,6,0),COLOR404000;
STICKLINE(散户<0,0,散户,5,0),COLOR454500;
STICKLINE(散户<0,0,散户,4,0),COLOR525200;
STICKLINE(散户<0,0,散户,3,0),COLOR595900;
STICKLINE(散户<0,0,散户,2,0),COLOR666600;
STICKLINE(散户<0,0,散户,1,0),COLOR737300;
STICKLINE(散户<0,0,散户,0,0),COLOR929200;
AA1:=IF(散户>0,散户,IF(散户<0,0,IF(散户>0,散户+中户,中户)));
AA2:=IF(散户>0,散户+中户,IF(散户<0,中户,IF(散户>0,散户,0)));
STICKLINE(中户>0,AA1,AA2,8,0),COLOR023D53;
STICKLINE(中户>0,AA1,AA2,7,0),COLOR024D68;
STICKLINE(中户>0,AA1,AA2,6,0),COLOR025473;
STICKLINE(中户>0,AA1,AA2,5,0),COLOR025A7B;
STICKLINE(中户>0,AA1,AA2,4,0),COLOR026286;
STICKLINE(中户>0,AA1,AA2,3,0),COLOR02688E;
STICKLINE(中户>0,AA1,AA2,2,0),COLOR026F97;
STICKLINE(中户>0,AA1,AA2,1,0),COLOR027EAE;
STICKLINE(中户>0,AA1,AA2,0,0),COLOR018DC2;
AA3:=IF(散户<0,散户,IF(散户>0,0,IF(散户<0,散户+中户,中户)));
AA4:=IF(散户<0,散户+中户,IF(散户>0,中户,IF(散户<0,散户,0)));
STICKLINE(中户<0,AA3,AA4,8,0),COLOR023D53;
STICKLINE(中户<0,AA3,AA4,7,0),COLOR024D68;
STICKLINE(中户<0,AA3,AA4,6,0),COLOR025473;
STICKLINE(中户<0,AA3,AA4,5,0),COLOR025A7B;
STICKLINE(中户<0,AA3,AA4,4,0),COLOR026286;
STICKLINE(中户<0,AA3,AA4,3,0),COLOR02688E;
STICKLINE(中户<0,AA3,AA4,2,0),COLOR026F97;
STICKLINE(中户<0,AA3,AA4,1,0),COLOR027EAE;
STICKLINE(中户<0,AA3,AA4,0,0),COLOR018DC2;
AA5:=IF(中户>0 AND 散户>0,散户+中户,IF(中户>0 AND 散户<0,中户,IF(中户<0 AND 散户>0,散户,IF(中户<0 AND 散户<0,0,IF(中户>0 AND 散户>0,散户+中户+大户,IF(中户>0 AND 散户<0,中户+大户,IF(中户<0 AND 散户>0,散户+大户,大户)))))));
AA6:=IF(中户>0 AND 散户>0,散户+中户+大户,IF(中户>0 AND 散户<0,中户+大户,IF(中户<0 AND 散户>0,散户+大户,IF(中户<0 AND 散户<0,大户,IF(中户>0 AND 散户>0,散户+中户,IF(中户>0 AND 散户<0,中户,IF(中户<0 AND 散户>0,散户,0)))))));
STICKLINE(大户>0,AA5,AA6,8,0),COLOR000042;
STICKLINE(大户>0,AA5,AA6,7,0),COLOR000055;
STICKLINE(大户>0,AA5,AA6,6,0),COLOR000064;
STICKLINE(大户>0,AA5,AA6,5,0),COLOR000075;
STICKLINE(大户>0,AA5,AA6,4,0),COLOR000086;
STICKLINE(大户>0,AA5,AA6,3,0),COLOR000094;
STICKLINE(大户>0,AA5,AA6,2,0),COLOR0000AA;
STICKLINE(大户>0,AA5,AA6,1,0),COLOR0000BB;
STICKLINE(大户>0,AA5,AA6,0,0),COLOR1717FF;
AA7:=IF(中户<0 AND 散户<0,散户+中户,IF(中户<0 AND 散户>0,中户,IF(中户>0 AND 散户<0,散户,IF(中户>0 AND 散户>0,0,IF(中户<0 AND 散户<0,散户+中户+大户,IF(中户<0 AND 散户>0,中户+大户,IF(中户>0 AND 散户<0,散户+大户,大户)))))));
AA8:=IF(中户<0 AND 散户<0,散户+中户+大户,IF(中户<0 AND 散户>0,中户+大户,IF(中户>0 AND 散户<0,散户+大户,IF(中户>0 AND 散户>0,大户,IF(中户<0 AND 散户<0,散户+中户,IF(中户<0 AND 散户>0,中户,IF(中户>0 AND 散户<0,散户,0)))))));
STICKLINE(大户<0,AA7,AA8,8,0),COLOR000042;
STICKLINE(大户<0,AA7,AA8,7,0),COLOR000055;
STICKLINE(大户<0,AA7,AA8,6,0),COLOR000064;
STICKLINE(大户<0,AA7,AA8,5,0),COLOR000075;
STICKLINE(大户<0,AA7,AA8,4,0),COLOR000086;
STICKLINE(大户<0,AA7,AA8,3,0),COLOR000094;
STICKLINE(大户<0,AA7,AA8,2,0),COLOR0000AA;
STICKLINE(大户<0,AA7,AA8,1,0),COLOR0000BB;
STICKLINE(大户<0,AA7,AA8,0,0),COLOR1717FF;
AA9:=IF(大户>0 AND 中户>0 AND 散户>0,散户+中户+大户,IF(大户<0 AND 中户>0 AND 散户>0,散户+中户,IF(大户>0 AND 中户<0 AND 散户>0,散户+大户,IF(大户>0 AND 中户>0 AND 散户<0,中户+大户,IF(大户<0 AND 中户<0 AND 散户>0,散户,IF(大户>0 AND 中户<0 AND 散户<0,大户,IF(大户<0 AND 中户>0 AND 散户<0,中户,0)))))));
AA10:=IF(大户>0 AND 中户>0 AND 散户>0,散户+中户+大户+机构,IF(大户<0 AND 中户>0 AND 散户>0,散户+中户+机构,IF(大户>0 AND 中户<0 AND 散户>0,散户+大户+机构,IF(大户>0 AND 中户>0 AND 散户<0,中户+大户+机构,IF(大户<0 AND 中户<0 AND 散户>0,散户+机构,IF(大户>0 AND 中户<0 AND 散户<0,大户+机构,IF(大户<0 AND 中户>0 AND 散户<0,中户+机构,机构)))))));
STICKLINE(机构>0,AA9,AA10,8,0),COLOR300030;
STICKLINE(机构>0,AA9,AA10,7,0),COLOR350035;
STICKLINE(机构>0,AA9,AA10,6,0),COLOR400040;
STICKLINE(机构>0,AA9,AA10,5,0),COLOR450045;
STICKLINE(机构>0,AA9,AA10,4,0),COLOR520052;
STICKLINE(机构>0,AA9,AA10,3,0),COLOR590059;
STICKLINE(机构>0,AA9,AA10,2,0),COLOR650065;
STICKLINE(机构>0,AA9,AA10,1,0),COLOR730073;
STICKLINE(机构>0,AA9,AA10,0,0),COLOR980098;
AA11:=IF(大户<0 AND 中户<0 AND 散户<0,散户+中户+大户,IF(大户>0 AND 中户<0 AND 散户<0,散户+中户,IF(大户<0 AND 中户>0 AND 散户<0,散户+大户,IF(大户<0 AND 中户<0 AND 散户>0,中户+大户,IF(大户>0 AND 中户>0 AND 散户<0,散户,IF(大户<0 AND 中户>0 AND 散户>0,大户,IF(大户>0 AND 中户<0 AND 散户>0,中户,0)))))));
AA12:=IF(大户<0 AND 中户<0 AND 散户<0,散户+中户+大户+机构,IF(大户>0 AND 中户<0 AND 散户<0,散户+中户+机构,IF(大户<0 AND 中户>0 AND 散户<0,散户+大户+机构,IF(大户<0 AND 中户<0 AND 散户>0,中户+大户+机构,IF(大户>0 AND 中户>0 AND 散户<0,散户+机构,IF(大户<0 AND 中户>0 AND 散户>0,大户+机构,IF(大户>0 AND 中户<0 AND 散户>0,中户+机构,机构)))))));
STICKLINE(机构<0,AA11,AA12,8,0),COLOR300030;
STICKLINE(机构<0,AA11,AA12,7,0),COLOR350035;
STICKLINE(机构<0,AA11,AA12,6,0),COLOR400040;
STICKLINE(机构<0,AA11,AA12,5,0),COLOR450045;
STICKLINE(机构<0,AA11,AA12,4,0),COLOR520052;
STICKLINE(机构<0,AA11,AA12,3,0),COLOR590059;
STICKLINE(机构<0,AA11,AA12,2,0),COLOR660066;
STICKLINE(机构<0,AA11,AA12,1,0),COLOR730073;
STICKLINE(机构<0,AA11,AA12,0,0),COLOR980098;
S3:=SUM(散户,3);
Z3:=SUM(中户,3);
D3:=SUM(大户,3);
J3:=SUM(机构,3);
S5:=SUM(散户,5);
Z5:=SUM(中户,5);
D5:=SUM(大户,5);
J5:=SUM(机构,5);
S10:=SUM(散户,10);
Z10:=SUM(中户,10);
D10:=SUM(大户,10);
J10:=SUM(机构,10);
S20:=SUM(散户,20);
Z20:=SUM(中户,20);
D20:=SUM(大户,20);
J20:=SUM(机构,20);
DRAWRECTREL(0,0,300,1000,RGB(30,30,30));
DRAWTEXTREL(10,50,'今日'),COLORDDFFFF;
DRAWTEXTREL(45,50,NUMTOSTRN(散户,0)),COLORFFFF00;
DRAWTEXTREL(105,50,NUMTOSTRN(中户,0)),COLOR09BAFD;
DRAWTEXTREL(165,50,NUMTOSTRN(大户,0)),COLORRED;
DRAWTEXTREL(235,50,NUMTOSTRN(机构,0)),COLOR9F009F;
DRAWTEXTREL(10,290,'三日'),COLORDDFFFF;
DRAWTEXTREL(45,290,NUMTOSTRN(S3,0)),COLORFFFF00;
DRAWTEXTREL(105,290,NUMTOSTRN(Z3,0)),COLOR09BAFD;
DRAWTEXTREL(165,290,NUMTOSTRN(D3,0)),COLORRED;
DRAWTEXTREL(235,290,NUMTOSTRN(J3,0)),COLOR9F009F;
DRAWTEXTREL(10,550,'五日'),COLORDDFFFF;
DRAWTEXTREL(45,550,NUMTOSTRN(S5,0)),COLORFFFF00;
DRAWTEXTREL(105,550,NUMTOSTRN(Z5,0)),COLOR09BAFD;

DRAWTEXTREL(165,550,NUMTOSTRN(D5,0)),COLORRED;
DRAWTEXTREL(235,550,NUMTOSTRN(J5,0)),COLOR9F009F;
DRAWTEXTREL(10,770,'十日'),COLORDDFFFF;
DRAWTEXTREL(45,770,NUMTOSTRN(S10,0)),COLORFFFF00;
DRAWTEXTREL(105,770,NUMTOSTRN(Z10,0)),COLOR09BAFD;
DRAWTEXTREL(165,770,NUMTOSTRN(D10,0)),COLORRED;
DRAWTEXTREL(235,770,NUMTOSTRN(J10,0)),COLOR9F009F;