用了各位大师改通达信,优点是可以用vip功能,但闪退咔死搞的心情不好了.最后还是选择用普通版. 券商的通达信好象用不了资金流向功能,就造了个小工具,看图说明.
自已使用什么券商的通达信,就输入软件名字中的两个字模糊查找. {副图指标}
0,COLORCYAN,DOTLINE;
净流入:=TDXDLL1(1,DATE,8004,STR2CON(CODE));
STICKLINE(净流入>0,0,净流入,3,0),COLORLIRED;
STICKLINE(净流入<0,0,净流入,3,0),COLORGREEN;
超大单:TDXDLL1(1,DATE,8000,STR2CON(CODE)),COLORMAGENTA;
大单:TDXDLL1(1,DATE,8001,STR2CON(CODE)),COLORRED;
中单:TDXDLL1(1,DATE,8002,STR2CON(CODE)),COLORYELLOW;
小单:TDXDLL1(1,DATE,8003,STR2CON(CODE)),COLORGREEN;
DAZHI:=CONST(MAX(ABS(净流入),MAX(ABS(超大单),MAX(ABS(大单),MAX(ABS(中单),ABS(小单)))))),NODRAW;
DRAWRECTREL(0,0,180,999.4,IF(120,RGB(10,0,0),0));
DRAWRECTREL(0,CONST(830-(ABS(净流入)*500/DAZHI)),30,935,IF(CONST(净流入)>0,RGB(100,0,0{255,0,255}),RGB(0,100,100)));
DRAWRECTREL(35,CONST(830-(ABS(超大单)*500/DAZHI)),65,935,IF(CONST(超大单)>0,RGB(100,0,0),RGB(0,50,0)));
DRAWRECTREL(70,CONST(830-(ABS(大单)*500/DAZHI)),100,935,IF(CONST(大单)>0,RGB(100,0,0),RGB(0,50,0)));
DRAWRECTREL(105,CONST(830-(ABS(中单)*500/DAZHI)),135,935,IF(CONST(中单)>0,RGB(100,0,0),RGB(0,50,0)));
DRAWRECTREL(140,CONST(830-(ABS(小单)*500/DAZHI)),170,935,IF(CONST(小单)>0,RGB(100,0,0),RGB(0,50,0)));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.002,0.98,0,'净流 超大 大单 中单 小单'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0,0,'资金搏弈 (万元)'),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.002,0.55,0,INTPART(净流入)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.036,0.30,0,INTPART(超大单)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.070,0.55,0,INTPART(大单)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.106,0.30,0,INTPART(中单)),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.145,0.55,0,INTPART(小单)),COLORWHITE;
|
