今日资金流入流出净比例，以及机构购买比例，和内外盘比例！通达信指标公式源码.doc

多年使用的分时指标

分享一个我自己修改的分时指标，带今日资金流入流出净比例，以及机构购买比例，和内外盘比例！超引B1:=总引.超B#DAY;超引B2:=总引.大B#DAY;超引B3:=总引.中B#DAY;超引B4:=总引.小B#DAY;超引S1:=总引.超S#DAY;超引S2:=总引.大S#DAY;超引S3:=总引.中S#DAY;超引S4:=总引.小S#DAY;TESTSKIP(NOT(超引B1 OR 超引B2 OR 超引B3 OR 超引B4 OR 超引S1 OR 超引S2 OR 超引S3 OR 超引S4)!=0);总A:=(超引B1+超引B2+超引B3+超引B4)+(超引S1+超引S2+超引S3+超引S4),NODRAW;净流入1:=SUM((超引B1+超引B2+超引B3+超引B4)-(超引S1+超引S2+超引S3+超引S4),1),NODRAW,COLORCYAN;流入:=(超引B1+超引B2+超引B3+超引B4),COLORRED,NODRAW;流出:=(超引S1+超引S2+超引S3+超引S4),COLORGREEN,NODRAW;流入比:=(超引B1+超引B2+超引B3+超引B4)/总A*100;流出比:=(超引S1+超引S2+超引S3+超引S4)/总A*100;DRAWRECTREL(640,1000,940,940,RGB(190,190,190));DRAWRECTREL(640,995,940,945,RGB(200,200,200));DRAWRECTREL(640,990,940,950,RGB(210,210,210));DRAWRECTREL(640,985,940,955,RGB(220,220,220));DRAWRECTREL(640,980,940,960,RGB(230,230,230));DRAWRECTREL(640,975,940,965,RGB(240,240,240));DRAWRECTREL(640,970,940,970,RGB(250,250,250)); DRAWRECTREL(790-CONST(流入*300/总A),1000,790,940,RGB(140,0,0));DRAWRECTREL(790-CONST(流入*300/总A),995,790,945,RGB(148,0,0));DRAWRECTREL(790-CONST(流入*300/总A),990,790,950,RGB(168,0,0));DRAWRECTREL(790-CONST(流入*300/总A),985,790,955,RGB(188,0,0));DRAWRECTREL(790-CONST(流入*300/总A),980,790,960,RGB(208,0,0));DRAWRECTREL(790-CONST(流入*300/总A),975,790,965,RGB(228,0,0));DRAWRECTREL(790-CONST(流入*300/总A),970,790,970,RGB(248,0,0));DRAWRECTREL(790-CONST(流入*300/总A),940,790-CONST(流入*300/总A),1000,RGB(128,0,0));DRAWRECTREL(790,1000,790+CONST(流出*300/总A),940,RGB(0,128,0));DRAWRECTREL(790,995,790+CONST(流出*300/总A),945,RGB(0,148,0));DRAWRECTREL(790,990,790+CONST(流出*300/总A),950,RGB(0,168,0));DRAWRECTREL(790,985,790+CONST(流出*300/总A),955,RGB(0,188,0));DRAWRECTREL(790,980,790+CONST(流出*300/总A),960,RGB(0,208,0));DRAWRECTREL(790,975,790+CONST(流出*300/总A),965,RGB(0,228,0));DRAWRECTREL(790,970,790+CONST(流出*300/总A),970,RGB(0,248,0));DRAWRECTREL(790+CONST(流出*300/总A),940,790+CONST(流出*300/总A),1000,RGB(0,128,0));