分时决策资金
A1:=(VOL/CLOSE)/3; A2:=SUM((IF(((A1>29) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0); A3:=SUM((IF(((A1>29) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0); A4:=SUM((IF(((A1<29) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0); A5:=SUM((IF(((A1<29) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0); A6:=((A2+A3)+A4)+A5; A7:=IF((DISPSTATUS=1),((100*A2)/A6),0); A8:=((IF((DISPSTATUS=1),((100*A3)/A6),0))); A9:=((IF((DISPSTATUS=1),((100*A4)/A6),0))); A10:=((IF((DISPSTATUS=1),((100*A5)/A6),0))); 机构买盘:(A2),LINETHICK2,COLORFF55FF; 机构卖盘:(A3),LINETHICK2,COLORFFFF55; 小股民买盘:(A4),COLOR5555FF; 小股民卖盘:(A5),COLOR55FF55; DRAWTEXT(DISPSTATUS=1,机构买盘,'机构买盘'),LINETHICK2,COLORFF55FF; DRAWTEXT(DISPSTATUS=1,机构卖盘,'机构卖盘'),LINETHICK2,COLORFFFF55; DRAWTEXT(DISPSTATUS=1,小股民买盘,'小股民买盘'),LINETHICK2,COLOR5555FF; DRAWTEXT(DISPSTATUS=1,小股民卖盘,'小股民卖盘'),LINETHICK2,COLOR55FF55;
本人引用 飞天下 老师的(通达信 源码)改编 望各位老师多多指教
|