通达信分时决策资金 源码
- 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;
733188001.jpg
|