当前位置:→ 公式网 > 飞狐公式 > 正文 ℃ 公式解密、改选股等业务 联系点击查看详情...
以下是动力线优化版:抓牛股请用动力线 源码 副图(无源码的请下载附件导入)
优化"要抓牛股请用动力线"原码,动力线已找到!
{动力线抓牛股(可设置排序)}优化版,飞狐用
{用法注释:a,绿线看多;b,白线看空;c,在"0"轴之下所有的线空空也;d,"动力线 "--可设置排序.}
量:=V;
换手:V/CAPITAL*100,LINETHICK0;
VAR1:=VOL/((H-L)*2-ABS(C-O));
买盘:=IF(C>O,VAR1*(H-L),IF(C<O,VAR1*((H-O)+(C-L)),VOL/2));
卖盘:=IF(C>O,0-VAR1*((H-C)+(O-L)),IF(C<O,0-VAR1*(H-L),0-VOL/2));
DLX:(买盘-(-卖盘))/量*换手,COLORAAFF3D,LINETHICK0;
STICKLINE((买盘-(-卖盘))/量*换手<0,DLX,0,8,0),COLORFF8800;
STICKLINE((买盘-(-卖盘))/量*换手>=0,DLX,0,8,0),COLORred;
动力线:SUM(DLX,5),ColorGREEN,linethick2;
0,Colorffff;
xx:=动力线>0;
yy:=动力线<0;
PARTLINE(动力线> REF(动力线,xx),动力线),colorGREEN,linethick2;
PARTLINE(动力线< REF(动力线,yy),动力线),colorffffff,linethick2;
A1:=SUMBARS(VOL,CAPITAL);
CMA:=IF(CAPITAL>0,SUM(AMOUNT,A1)/SUM(VOL,A1)/100,EMA(CLOSE,120));
百分之百换手价:CMA,LINETHICK0,ColorFFC0FF;{100%换手平均成本价};