特别注明,始作俑者为九散人。本人仅仅为进一步完善。
九散人原作,开盘价等于收盘价的情况,不尽合理,尽管影响不大,但不够严谨。
本人将开盘价等于收盘价的情况分为3种情况:
一种为涨,则变通为开盘价等于最低价等于昨日收盘价;
一种为跌,则变通为开盘价等于最高价等于昨日收盘价;
一种平盘,则买卖成交量各一半。
这样处理,尽管仍不算100%严谨,但已经影响微乎其微了。
同时,本人不喜欢做买卖提示,故去除原作中买卖提示。
因为取自于理想论坛同学的理念,所以不敢独享,再此分享给大家,祝各位新春愉快!
预量:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,VOL),NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,预量,0,-1,-1),COLOR00C0C0;
实量:VOL,VOLSTICK,COLORLIGREEN;
STICKLINE(C=REF(C,1),0,V,0,0),COLORYELLOW;
STICKLINE(C REF(C,1) AND C O,0,V,0,0),COLOR3232FF;
STICKLINE(C REF(C,1) AND C O,0,V,0,0),COLORFFFF54;
BASED:=IF(O!=C,VOL/((H-L)*2-ABS(C-O)),IF(C REF(C,1), VOL/((H-REF(C,1))*2-ABS(C-REF(C,1))),VOL/((REF(C,1)-L)*2-ABS(C-REF(C,1)))));
BUY:=IF(C O,BASED*(H-L),IF(C O,BASED*((H-O)+(C-L)),IF(C REF(C,1),BASED*(H-REF(C,1)),IF(C REF(C,1),BASED*((REF(C,1)-REF(C,1))+(C-L)),V*0.5))));
SALE:=IF(C O,BASED*((H-C)+(O-L)),IF(C O,BASED*(H-L),IF(C REF(C,1),BASED*((H-C)+(REF(C,1)-REF(C,1))),IF(C REF(C,1),BASED*(REF(C,1)-L),V*0.5))));
买净值%:IF(BUY =SALE,(BUY-SALE)/VOL*100,0),NODRAW;
卖净值%:IF(BUY =SALE,(SALE-BUY)/VOL*100,0),NODRAW;
LEN:=IF(BUY SALE,BUY-SALE,SALE-BUY);
STICKLINE(BUY SALE,0,LEN,0.1,0),COLOR00F7F7;
STICKLINE(BUY SALE,0,LEN,0.1,0),COLORFF1717;
DDX:=BUY-SALE;
MADDX:=MA(DDX,5)*5;
DDX1:SMA(MADDX,3,1),COLORFFFFFF,LINETHICK1;
DDX2:SMA(DDX1,3,1),COLORF100F1,LINETHICK1;
DDX3:SMA(DDX2,3,1),COLOR00D900,LINETHICK1