[通达信指标]资金流向一目了然

ZI1:=AMOUNT;

TMP1:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L));

TMP2:=TMP1/AMOUNT*100;

ZI4:=AMOUNT*TMP2/10000000000;

ZI5:=AMOUNT/100000000-ZI4;

ZI6:=ZI4-ZI5;

ZI7:=SUM(AMOUNT,3);

ZI8:=SUM(ZI4,3);

ZI9:=SUM(ZI5,3);

ZI10:=SUM(ZI4-ZI5,3);

ZI11:=SUM(AMOUNT,5);

ZI12:=SUM(ZI4,5);

ZI13:=SUM(ZI5,5);

ZI14:=SUM(ZI4-ZI5,5);

ZI15:=SUM(AMOUNT,10);

ZI16:=SUM(ZI4,10);

ZI17:=SUM(ZI5,10);

ZI18:=SUM(ZI4-ZI5,10);

WEIZHI:=CONST(FINDHIGH(ZI15,0,190,1));

DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,30,0),ABS(WEIZHI),DRAWNULL),RGB(0,30,50),0,DRAWNULL);

DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,27,26),CONST(ZI1),DRAWNULL),RGB(150,10,0),0,DRAWNULL);

DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,26,25),CONST(ZI4*100000000),DRAWNULL),RGB(250,0,250),0,DRAWNULL);

DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,25,24),CONST(ZI5*100000000),DRAWNULL),RGB(0,255,255),0,DRAWNULL);

DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,20,19),CONST(ZI7),DRAWNULL),RGB(150,10,0),0,DRAWNULL);

DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,19,18),CONST(ZI8*100000000),DRAWNULL),RGB(250,0,250),0,DRAWNULL);

DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,18,17),CONST(ZI9*100000000),DRAWNULL),RGB(0,255,255),0,DRAWNULL);

DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,13,12),CONST(ZI11),DRAWNULL),RGB(150,10,0),0,DRAWNULL);

DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,12,11),CONST(ZI12*100000000),DRAWNULL),RGB(250,0,250),0,DRAWNULL);

DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,11,10),CONST(ZI13*100000000),DRAWNULL),RGB(0,255,255),0,DRAWNULL);

DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,6,5),CONST(ZI15),DRAWNULL),RGB(150,10,0),0,DRAWNULL);

DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,5,4),CONST(ZI16*100000000),DRAWNULL),RGB(250,0,250),0,DRAWNULL);

DRAWBAND(IF(BETWEEN(CURRBARSCOUNT,4,3),CONST(ZI17*100000000),DRAWNULL),RGB(0,255,255),0,DRAWNULL);

DRAWTEXT(CURRBARSCOUNT=30,WEIZHI*0.85,’总额亿’),COLORRED;

DRAWTEXT(CURRBARSCOUNT=30,WEIZHI*0.74,’流入亿’),COLORMAGENTA;

DRAWTEXT(CURRBARSCOUNT=30,WEIZHI*0.62,’流出亿’),COLORCYAN;

DRAWTEXT(CURRBARSCOUNT=30,WEIZHI*0.52,’净流亿’),COLOR0099FF;

DRAWTEXT(CURRBARSCOUNT=24,WEIZHI*0.95,’1日’),COLORMAGENTA;

DRAWTEXT(CURRBARSCOUNT=18,WEIZHI*0.95,’3日’),COLORMAGENTA;

DRAWTEXT(CURRBARSCOUNT=12,WEIZHI*0.95,’5日’),COLORMAGENTA;

DRAWTEXT(CURRBARSCOUNT=6,WEIZHI*0.95,’10日’),COLORMAGENTA;

DRAWTEXT(CURRBARSCOUNT=30,WEIZHI*0.015,'(一)’),COLORGREEN;

DRAWTEXT(CURRBARSCOUNT=23,WEIZHI*0.015,'(三)’),COLORGREEN;

DRAWTEXT(CURRBARSCOUNT=16,WEIZHI*0.015,'(五)’),COLORGREEN;

DRAWTEXT(CURRBARSCOUNT=9,WEIZHI*0.015,'(十)’),COLORGREEN;

DRAWNUMBER(CURRBARSCOUNT=25,WEIZHI*0.89,CONST(ZI1/100000000)),COLORYELLOW;

DRAWNUMBER(CURRBARSCOUNT=25,WEIZHI*0.78,CONST(ZI4)),COLORYELLOW;

DRAWNUMBER(CURRBARSCOUNT=25,WEIZHI*0.67,CONST(ZI5)),COLORYELLOW;

DRAWNUMBER(CURRBARSCOUNT=25,WEIZHI*0.56,CONST(ZI6)),COLORYELLOW;

DRAWNUMBER(CURRBARSCOUNT=19,WEIZHI*0.89,CONST(ZI7/100000000)),COLORYELLOW;

DRAWNUMBER(CURRBARSCOUNT=19,WEIZHI*0.78,CONST(ZI8)),COLORYELLOW;

DRAWNUMBER(CURRBARSCOUNT=19,WEIZHI*0.67,CONST(ZI9)),COLORYELLOW;

DRAWNUMBER(CURRBARSCOUNT=19,WEIZHI*0.56,CONST(ZI10)),COLORYELLOW;

DRAWNUMBER(CURRBARSCOUNT=13,WEIZHI*0.89,CONST(ZI11/100000000)), COLORDDFFFF;

DRAWNUMBER(CURRBARSCOUNT=13,WEIZHI*0.78,CONST(ZI12)), COLORDDFFFF;

DRAWNUMBER(CURRBARSCOUNT=13,WEIZHI*0.67,CONST(ZI13)), COLORDDFFFF;

DRAWNUMBER(CURRBARSCOUNT=13,WEIZHI*0.56,CONST(ZI14)), COLORDDFFFF;

DRAWNUMBER(CURRBARSCOUNT=7,WEIZHI*0.89,CONST(ZI15/100000000)),COLORYELLOW;

DRAWNUMBER(CURRBARSCOUNT=7,WEIZHI*0.78,CONST(ZI16)),COLORYELLOW;

DRAWNUMBER(CURRBARSCOUNT=7,WEIZHI*0.67,CONST(ZI17)),COLORYELLOW;

DRAWNUMBER(CURRBARSCOUNT=7,WEIZHI*0.56,CONST(ZI18)),COLORYELLOW;