通达信散户持仓-修改公式副图源码
说明:这个公式是谁写的我已经无从查找,在此先表达我的感谢~!!!但把里面的部分源码抽取了出来单独写成了这个程式,这个程式主要是看散户持仓,当图形显示出来后,我自己都看得笑了。散户真的是鱼肉被机构耍的团团转。高位接盘低位被套守仓,刚开始上涨急乎乎地忙着跑。好了,图形上我大致标注了。各位同学一看就清楚了。
源码:{作者:未知?修改:迷糊鱼2010}
{参数:N:2 1000 14; N1:2 1000 5}
JJ:=(H+L+C)/3{GPGS};
QJ0:=vol/IF(H=L,4,H-L){GPGS};
TD1:=QJ0*(MIN(O,C)-L){GPGS};
DD1:=QJ0*(JJ-MIN(C,O)){GPGS};
DD2:=QJ0*(H-maX(O,C)){GPGS};
TD2:=QJ0*(MAX(C,O)-JJ){GPGS};
TD:=TD1-TD2;DA:=DD1-DD2{GPGS};
XD1:=1-(TD1+DD1){GPGS};
XD2:=1-(TD2+DD2){GPGS};
TZ:=VOL/SUM(VOL,60)*100{GPGS};
DT:=((XD1-XD2)/10000)/TZ{GPGS};
SHCC:SUM(DT,N),COLORRED{GPGS};
MSHCC:ema(EMA(EMA(SHCC,N1),N1),N1),COLORCYAN{GPGS};
STICKLINE(DT>0,SHCC,SHCC+DT,1,0),COLORFF8800{GPGS};
STICKLINE(DT<0,SHCC+DT,SHCC,1,0),COLORFF00FF;