|
指南针成本均线源码公式:
VARIABLE: ljhs=0,cyc5=0,ljhs2=0,cyc13=0,ljhs3=0,cyc34=0,ljhsm=0,cycmax=0;
mid:=(o+c)/2;
hsl:=if(capital=0,v/sum(v,100),v/capital);
ljhs:=if(BARPOS=1,hsl,ljhs*(1-hsl)*(5-1)/5+hsl);
cyc5:if(BARPOS=1,mid,(mid*hsl+cyc5*ref(ljhs,1)*(1-hsl)*(5-1)/5)/ljhs);
ljhs2:=if(BARPOS=1,hsl,ljhs2*(1-hsl)*(13-1)/13+hsl);
cyc13:if(BARPOS=1,mid,(mid*hsl+cyc13*ref(ljhs2,1)*(1-hsl)*(13-1)/13)/ljhs2);
ljhs3:=if(BARPOS=1,hsl,ljhs3*(1-hsl)*(34-1)/34+hsl);
cyc34:if(BARPOS=1,mid,(mid*hsl+cyc34*ref(ljhs3,1)*(1-hsl)*(34-1)/34)/ljhs3);
ljhsm:=if(BARPOS=1,hsl,ljhsm*(1-hsl)+hsl);
cycmax:if(BARPOS=1,mid,(mid*hsl+cycmax*ref(ljhsm,1)*(1-hsl))/ljhsm);
----------------------------
CYW 主力控盘
variable: b=0,d=0,e=0,f=0;
hsl:=if(capital=0,v/sum(v,100),v/capital);
a:=h-l;
b:=IF(a>0,20/21*(1-hsl)*b+hsl*(c-l)/(h-l), 20/21*b*(1-hsl)+hsl);
d:=IF(a>0,20/21*(1-hsl)*d+hsl*(h-c)/(h-l), 20/21*(1-hsl)*d);
e:=ref(b,1)/58+e*57/58;
f:=ref(d,1)/58+ref(f,1)*57/58;
g:=IF(f>e,1,f/e);
主力控盘b*g-d)*100,colorstick;
-------------------------------
LFS 锁定因子
variable:a=0,b=0;
hsl:=v/capital;
a:=hsl+0.8*(1-hsl)*a;
b:=hsl+12/13*(1-hsl)*b;
锁定因子:100*(1-a/b); |
上一篇:[指南针] 指南针筹码承接率源码公式下一篇:[指南针] 指南针三重超跌源码公式
|