以下是神奕分笔看盘资金进出情况尽收眼底，源码奉送
分笔看盘资金进出情况尽收眼底，源码奉送
a1:=BARSCOUNT(CLOSE);
DRAWTEXTREL(50,10,\’资金净流\’),linethick2,colorYellow;
DRAWTEXTREL(200,10,\’ 代码: \’+STKLABEL+\’ \’+STKNAME+\’ 日期: \’+YEAR+\’年\’+MONTH+\’月 \’+DAY+\’日 \’),linethick2,CulorFFFF80;
a2:=DATE;
a3:=(WEEKDAY);
if (((BARSTATUS = 2) AND (a3 = 5)) ) Then DRAWTEXTREL(800,10,\’星期五\’),linethick2,CulorFFEF40;
if (((BARSTATUS = 2) AND (a3 = 4)) ) Then DRAWTEXTREL(800,10,\’星期四\’),linethick2,CulorFFEF40;
if (((BARSTATUS = 2) AND (a3 = 3)) ) Then DRAWTEXTREL(800,10,\’星期三\’),linethick2,CulorFFEF40;
if (((BARSTATUS = 2) AND (a3 = 2)) ) Then DRAWTEXTREL(800,10,\’星期二\’),linethick2,CulorFFEF40;
if (((BARSTATUS = 2) AND (a3 = 1)) ) Then DRAWTEXTREL(800,10,\’星期一\’),linethick2,CulorFFEF40;
if (((BARSTATUS = 2) AND (a3 = 6)) ) Then DRAWTEXTREL(800,10,\’星期六\’),linethick2,CulorFFEF40;
if (((BARSTATUS = 2) AND (a3 = 0)) ) Then DRAWTEXTREL(800,10,\’星期日\’),linethick2,CulorFFEF40;
a4:=(BUYVOL * CLOSE) / 100;a5:=SUM(a4,0);
a6:=(CLOSE * SELLVOL) / 100;a7:=SUM(a6,0);
a8:=a5 + a7;
a9:=a5 – a7;
a10:=IF(((a4 = 5)),a4,0);a11:=SUM(a10,0);
a12:=IF(((a6 = 5)),a6,0);a13:=SUM(a12,0);
a14:=IF(((a4 = 20)),a4,0);a15:=SUM(a14,0);
a16:=IF(((a6 = 20)),a6,0);a17:=SUM(a16,0);
a18:=IF((a4 >= 100),a4,0);a19:=SUM(a18,0);
a20:=IF((a6 >= 100),a6,0);a21:=SUM(a20,0);
a22:=IF((a4 >= 20),a4,0);a23:=SUM(a22,0);
a24:=IF((a6 >= 20),a6,0);a25:=SUM(a24,0);
a26:=a11 – a13;
a27:=a15 – a17;
a28:=a19 – a21;
a29:=a23 – a25;
a30:=(100 * ((SUM((IF((a4 >= 10),VOL,0)),0)) – (SUM((IF((a6 >= 10),VOL,0)),0)))) / CAPITAL;
a31:=(100 * ((SUM((IF((a4 >= 20),VOL,0)),0)) – (SUM((IF((a6 >= 20),VOL,0)),0)))) / CAPITAL;
a32:=(a26);
a33:=(a27);
a34:=(a28);
a35:=(a29);
a36:=350 / (MAX(ABS(a32),ABS(a33),ABS(a34),ABS(a35)));
a37:=500 – (a32 * a36);
a38:=500 – (a33 * a36);
a39:=500 – (a34 * a36);
a40:=500 – (a35 * a36);
DRAWRECTREL(0,505,320,510,3289855),colorRed;
DRAWRECTREL(50,a37,80,500,(IF((a32 >= 0),3289855,3342080))),colorYellow;
DRAWRECTREL(130,a38,160,500,(IF((a33 >= 0),3289855,3342080))),colorYellow;
DRAWRECTREL(210,a39,240,500,(IF((a34 >= 0),3289855,3342080))),colorYellow;
DRAWRECTREL(290,a40,320,500,(IF((a35 >= 0),3289855,3342080))),colorYellow;
DRAWTEXTREL(18,440,\’中户\’),CulorDDFFFF;
DRAWTEXTREL(95,440,\’大户\’),CulorDDFFFF;
DRAWTEXTREL(175,440,\’机构\’),CulorDDFFFF;
DRAWTEXTREL(255,440,\’主力\’),CulorDDFFFF;
a41:=(a11);
a42:=(a13);
a43:=(a15);
a44:=(a17);
a45:=(a19);
a46:=(a21);
a47:=(a23);
a48:=(a25);
a49:=700 / (MAX(a41,a42,a43,a44,a45,a46,a47,a48));
a50:=940 – (a41 * a49);
a51:=940 – (a42 * a49);
a52:=940 – (a43 * a49);
a53:=940 – (a44 * a49);
a54:=940 – (a45 * a49);
a55:=940 – (a46 * a49);
a56:=940 – (a47 * a49);
a57:=940 – (a48 * a49);
DRAWRECTREL(700,a50,720,940,250),colorYellow;
DRAWRECTREL(720,a51,740,940,6617600),colorYellow;
DRAWRECTREL(780,a52,800,940,250),colorYellow;
DRAWRECTREL(800,a53,820,940,6617600),colorYellow;
DRAWRECTREL(860,a54,880,940,250),colorYellow;
DRAWRECTREL(880,a55,900,940,6617600),colorYellow;
DRAWRECTREL(940,a56,960,940,250),colorYellow;
DRAWRECTREL(960,a57,980,940,6617600),colorYellow;
DRAWTEXTREL(2,930,\’主力净流:\’+NUMTOSTR(a29)+\’万\’+\’ 机构净流:\’+NUMTOSTR(a28)+\’万\’+\’ 大户净流:\’+NUMTOSTR(a27)+\’万\’+\’ 中户净流:\’+NUMTOSTR(a26)+\’万\’),colorWhite;
DRAWTEXTREL(2,820,\’控盘系数:\’+NUMTOSTR(a30)+\’%\’+\’ 主力增仓:\’+NUMTOSTR(a31)
+\’%\’),linethick2,colorYellow;
DRAWTEXTREL(940,965,\’主力\’),CulorDDFFFF;
DRAWTEXTREL(865,965,\’机构\’),CulorDDFFFF;
DRAWTEXTREL(785,965,\’大户\’),CulorDDFFFF;
DRAWTEXTREL(705,965,\’中户\’),CulorDDFFFF;
DRAWGBK((CLOSE > 0),STRIP(RGB(4,1,28),RGB(4,1,35),0));
