通达信188分时资金副图分时指标（源码 附图）

{188分时资金}

成交额:=V*C/100,NODRAW;{万元}

A2:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);

A3:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);

A4:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);

A5:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);

A6:=((A2+A3)+A4)+A5;

A7:=IF((ISLASTBAR),((100*A2)/A6),0);

A8:=IF((ISLASTBAR),((100*A3)/A6),0);

A9:=IF((ISLASTBAR),((100*A4)/A6),0);

A10:=IF((ISLASTBAR),((100*A5)/A6),0);

大鳄买:(A2),LINETHICK6,COLORRED;

刘氏鱼卖:(A3),LINETHICK6,COLORFFFF55;

大单进出:=大鳄买-刘氏鱼卖,NODRAW;

青蛙买:(A4),COLOR5555FF;{细红线}

武大郎卖:(A5),COLOR55FF55;{细绿线}

强势:=((100*A2)/A6>50);

STICKLINE(强势,大鳄买*1.02,大鳄买*1.1,1,0),COLORYELLOW;

拉升:=((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18;

STICKLINE(拉升,大鳄买*1.1,大鳄买*1.2,1,0),COLORFF00FF;

DRAWTEXT(ISLASTBAR=1,大鳄买*0.95,'●大鳄买'),LINETHICK2,COLORRED;

DRAWTEXT(ISLASTBAR=1,刘氏鱼卖*0.95,'○刘氏鱼卖'),LINETHICK2,COLORFFFF55;

DRAWTEXT(大单进出>0 AND REF(大单进出,1)<=0,大鳄买*1.02,'●大鳄买'),COLORRED;

DRAWTEXT(大单进出<0 AND REF(大单进出,1)>=0,大鳄买*0.98,'○刘氏鱼 卖'),COLORFFFF55;

AAA1:=STRCAT(STRCAT('大鳄买',CON2STR((100*A2)/A6,0)),'%%');

AAA2:=STRCAT(STRCAT('刘氏鱼卖',CON2STR((100*A3)/A6,0)),'%%');

AAA3:=STRCAT(STRCAT('青蛙买',CON2STR((100*A4)/A6,0)),'%%');

AAA4:=STRCAT(STRCAT('武大郎卖',CON2STR((100*A5)/A6,0)),'%%');

DRAWTEXT_FIX(1,0,0.02,0,AAA1),COLORRED;

DRAWTEXT_FIX(1,0,0.13,0,AAA2),COLORFFFF55;

DRAWTEXT_FIX(1,0,0.24,0,AAA3),COLOR5555FF;

DRAWTEXT_FIX(1,0,0.35,0,AAA4),COLOR55FF55;