通达信分时决策资金公式
非本人原创,感觉此指标非常好,特分享给大家,感谢原作者
源码
A1:=(VOL/CLOSE)/3;
{A222:=IF(A1 0.29 AND CLOSE REF(CLOSE,1),A1,0);}
{A22:=SUM(A222,0);}
A2:=SUM((IF(((A1 0.29) AND (CLOSE (REF(CLOSE,1)))),A1,0)),0);
A3:=SUM((IF(((A1 0.29) AND (CLOSE (REF(CLOSE,1)))),A1,0)),0);
A4:=SUM((IF(((A1 0.29) AND (CLOSE (REF(CLOSE,1)))),A1,0)),0);
A5:=SUM((IF(((A1 0.29) AND (CLOSE (REF(CLOSE,1)))),A1,0)),0);
A6:=((A2+A3)+A4)+A5;
A7:=IF((ISLASTBAR=1),((100*A2)/A6),0);
A8:=((IF((ISLASTBAR=1),((100*A3)/A6),0)));
A9:=((IF((ISLASTBAR=1),((100*A4)/A6),0)));
A10:=((IF((ISLASTBAR=1),((100*A5)/A6),0)));
机构买盘:(A2),LINETHICK3,COLORFF55FF;
机构卖盘:(A3),LINETHICK3,COLORFFFF55;
散户买盘:(A4),COLOR5555FF;
散户卖盘:(A5),COLOR55FF55;
DRAWTEXT(ISLASTBAR=1,机构买盘*0.9, 机构买盘 ),LINETHICK2,COLORFF55FF;
DRAWTEXT(ISLASTBAR=1,机构卖盘, 机构卖盘 ),LINETHICK2,COLORFFFF55;
DRAWTEXT(ISLASTBAR=1,散户买盘, 散户买盘 ),LINETHICK2,COLOR5555FF;
DRAWTEXT(ISLASTBAR=1,散户卖盘, 散户卖盘 ),LINETHICK2,COLOR55FF55;