|
飞狐年后山分时指标1源码公式:
t:=TIME0-if(hour>11,5400,0);
K:=180;
s:=sumbars(t-ref(t,1),k);
w:=if(barscount(c)<k,barscount(c),k);
oc:=DYNAINFO(4)-DYNAINFO(3);
sc:=if(capital,sma(amount/v,3,1),sma(c,3,1));
cp:=if(BARPOS=1,if(oc=0,sc,if(oc>0,sc-0.01,sc+0.01)),ref(sc,1));
wp:=barslast(sc<>cp);
dv:=(ref(sc-cp,wp)<0)*v;
zv:=(ref(sc-cp,wp)>0)*v;
sv:=sum(zv-dv,w)/if(capital,capital,1)*10000;
动量:sv,linethick0,COLORMAGENTA;
p:=SYSPARAM(3)-SYSPARAM(2)-2;
q:=SYSPARAM(3);
kh:=hhv(c,p);
kL:=LLv(c,p);
vh:=hhv(sv,p);
vL:=LLv(sv,p);
b:=(kh-kL)/max(vh,-vL)/3;
y:=(kh+kL)/2;
PARTLINE(1,y[q])COLORGRAY;
STICKLINE(sv>0,y[q],sv*b[q]+y[q],0.1,0)COLORMAGENTA;
STICKLINE(sv<0,y[q],sv*b[q]+y[q],0.1,0)COLORGREEN;
PARTLINE(1,sma(sv*b[q]+y[q],5,1))COLORCYAN;
bj:=if(capital,amount/v/100,c);
收:c,COLORWHITE;
S1:sma(c,13,1)COLORRED,LINETHICK2;
均价:bj,COLORCYAN,POINTDOT,LINETHICK3;
drawtext(sysparam(2)=barpos,0,'板块:'+blkname),colorccffff,align4;
均线:if(capital=0,sum(c,0)/BARPOS,sum(amount,0)/sum(v,0)/100),COLORYELLOW,LINETHICK2;
tb:=t-ref(t,barscount(c)-1);
zs:=if(ref(time,barscount(c)-1)<102900,14400,10800);
量比:sma(sum(v,0)*zs/tb,5,1)/DYNAINFO(38),LINETHICK0,ColorFD2068;
vL:=LLv(量比,P);
vh:=hhv(量比,p);
bb:=(kH-kL)/(vh-vL)/1.6;
yb:=(kh+kL-(vh+vL)*bb)/2;
PARTLINE(1,量比*bb[q]+yb[q]),ColorFD2068; |
上一篇:[指南针] 指南针六月雪源码公式下一篇:[飞狐]飞狐年后山分时指标2源码公式
|