通達(dá)信資金分析VOL預(yù)測副圖源碼

預(yù)測量:=IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,VOL),NODRAW; {股票公式網(wǎng)（www.gpgsw.com）為您整理}

STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,預(yù)測量,0,-1,-1),COLOR00C0C0;
量:VOL,VOLSTICK;
VOL5:MA(量,5);
VOL10:MA(量,10);
五換:SUM(100*V/CAPITAL,5),COLORRED,NODRAW;
十換:SUM(100*V/CAPITAL,10),COLORRED,NODRAW;
超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+大B)+(超S+大S);
超大單:=(超B)+(超S);
大單:=(大B)+(大S);
中單:=(中B)+(中S);
小單:=(小B)+(小S);
大宗進:=(超B)+(大B);
大宗出:=(超S)+(大S);
非大宗進:=(中B)+(小B);
非大宗出:=(中S)+(小S);
資金流向:=(超B+大B+中B+小B)+(超S+大S+中S+小S);
近5日流向:=SUM(資金流向,5);
近10日流向:=SUM(資金流向,10);
主力資金線:=(L2_AMO(0,0)+L2_AMO(1,0)-L2_AMO(0,1)-L2_AMO(1,1))/100.0,LINETHICK2;
主力買力度:=LARGEINTRDVOL*100/VOL;
主力賣力度:=LARGEOUTTRDVOL*100/VOL;
DRAWRECTREL(0,0,235,999,RGB(100,330,30));
DRAWRECTREL(0,0,235,515,RGB(0,30,50));
DRAWRECTREL(75,515,235,999,RGB(0,30,50));
DRAWRECTREL(144,0,235,515,RGB(100,330,30));

AA:=CONST(MAX(ABS(凈流入),MAX(ABS(大宗凈流入),MAX(ABS(大宗進),MAX(ABS(大宗出),MAX(ABS(非大宗進),ABS(非大宗出)))))))*3,NODRAW;
DRAWRECTREL(5,CONST(830-(ABS(凈流入)*500/AA)),35,945,IF(CONST(凈流入)>0,RGB(250,150,10),RGB(0,100,100)));
DRAWRECTREL(40,CONST(830-(ABS(大宗凈流入)*500/AA)),70,945,IF(CONST(大宗凈流入)>0,RGB(250,150,10),RGB(0,100,100)));
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.005,0.88,0,INTPART(凈流入)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.041,0.88,0,INTPART(大宗凈流入)),COLORWHITE;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.008,1,0,'凈流   大宗流'),COLORWHITE;

DRAWRECTREL(80,CONST(830-(ABS(大宗進)*500/AA)),115,945,IF(CONST(大宗進)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(117,CONST(830-(ABS(大宗出)*500/AA)),152,945,IF(CONST(大宗出)<0,RGB(0,50,0),RGB(0,50,0)));
DRAWRECTREL(158,CONST(830-(ABS(非大宗進)*500/AA)),193,945,IF(CONST(非大宗進)>0,RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(195,CONST(830-(ABS(非大宗出)*500/AA)),230,945,IF(CONST(非大宗出)<0,RGB(0,50,0),RGB(0,50,0)));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.09,1,0,'主力   進出         散戶   進出'),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.082,0.88,0,INTPART(大宗進)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.12,0.88,0,INTPART(大宗出)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.161,0.88,0,INTPART(非大宗進)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.196,0.88,0,INTPART(非大宗出)),COLORWHITE;
AAB:=CONST(MAX(ABS(超大單),MAX(ABS(大單),MAX(ABS(中單),ABS(小單))))),NODRAW;
DRAWRECTREL(5,CONST(830-(ABS(超大單)*500/AAB))/2,35,460,IF(CONST(超大單)>0,RGB(255,0,255),RGB(0,255,255)));
DRAWRECTREL(40,CONST(830-(ABS(大單)*500/AAB))/2,70,460,IF(CONST(大單)>0,RGB(255,0,255),RGB(0,255,255)));
DRAWRECTREL(75,CONST(830-(ABS(中單)*500/AAB))/2,105,460,IF(CONST(中單)>0,RGB(255,0,255),RGB(0,255,255)));
DRAWRECTREL(110,CONST(830-(ABS(小單)*500/AAB))/2,140,460,IF(CONST(小單)>0,RGB(255,0,255),RGB(0,255,255)));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.007,0.46,0,'超 戶    大 戶   中 戶    散 戶'),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.007,0.4,0,INTPART(超大單)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.042,0.4,0,INTPART(大單)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.076,0.4,0,INTPART(中單)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.112,0.4,0,INTPART(小單)),COLORWHITE;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0,0,'【綜合資金分析】     (￥萬元)'),COLORRED;
AAC:=CONST(MAX(ABS(近5日流向),ABS(近10日流向))),NODRAW;
DRAWRECTREL(149,CONST(830-(ABS(近5日流向)*500/AAC))/2,189,460,IF(CONST(近5日流向)>0,RGB(250,150,10),RGB(0,100,100)));
DRAWRECTREL(191,CONST(830-(ABS(近10日流向)*500/AAC))/2,230,460,IF(CONST(近10日流向)>0,RGB(250,150,10),RGB(0,100,100)));
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.15,0.4,0,INTPART(近5日流向)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.19,0.4,0,INTPART(近10日流向)),COLORWHITE;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.152,0.46,0,'五日流   十日流'),COLORWHITE;
DDX:=(LARGEINTRDVOL-LARGEOUTTRDVOL)*1000/FINANCE(7);
DDY:=IF(TRADENUM>0,(TRADEOUTNUM-TRADEINNUM)*100/TRADENUM,0);
DDZ:=IF(TRADENUM>0,(LARGETRDINNUM-LARGETRDOUTNUM)/TRADENUM*100,0);
DRAWRECTREL(144,0,235,40,IF(CONST(DDX)>0,RGB(255,0,0),RGB(0,50,0)));
DRAWRECTREL(144,45,235,85,IF(CONST(DDY)>0,RGB(255,0,0),RGB(0,50,0)));
DRAWRECTREL(144,90,235,130,IF(CONST(DDZ)>0,RGB(255,0,0),RGB(0,50,0)));
DRAWTEXT_FIX(1,0.15,0,0,STRCAT('DDX:',CON2STR(DDX,0))),COLORYELLOW;
DRAWTEXT_FIX(1,0.15,0.04,0,STRCAT('DDY:',CON2STR(DDY,0))),COLORYELLOW;
DRAWTEXT_FIX(1,0.15,0.09,0,STRCAT('DDZ:',CON2STR(DDZ,0))),COLORYELLOW;
AAD:=CONST(MAX(ABS(主力買力度),ABS(主力賣力度)))*4,NODRAW;
DRAWRECTREL(0,515,CONST(ABS(主力買力度)*500/AAD),568,IF(CONST(主力買力度)>0,RGB(250,150,10),RGB(0,255,255)));
DRAWRECTREL(0,570,CONST(ABS(主力賣力度)*500/AAD),623,IF(CONST(主力賣力度)>0,RGB(23,125,255),RGB(0,255,255)));
DRAWTEXT_FIX(1,0,0.512,0,STRCAT('主力買力度:',CON2STR(主力買力度,0))),COLORRED;
DRAWTEXT_FIX(1,0,0.57,0,STRCAT('主力賣力度:',CON2STR(主力賣力度,0))),COLORRED;