通达信抓牛股启动资金异常量能均线指标副图源码

HH0:=CONST(HHV(H,120))*1;
LL0:=CONST(LLV(L,120))*1;
MM0:=CONST((HH0+LL0)/2);
HH1:=IF(CONST(C) LL1:=LL0;HLMAX:=MAX(HH1,LL1);
HLMIN:=MIN(HH1,LL1);
HLMN1:=(HLMAX+HLMIN)/2;
HLMN2:=(HLMAX-HLMIN);
HLMN3:=HHV(V,250)/2;
HLMN4:=HHV(V,250);
VZ:=(V-HLMN3)*HLMN2/HLMN4+HLMN1;
T:=V=LLV(V,20);
{量能显示涨跌停}
STICKLINE(C/REF(C,1)>1.099,VZ,(0-HLMN3)*HLMN2/HLMN4+HLMN1,2,0),COLORRED;
STICKLINE(C/REF(C,1)<0.901,VZ,(0-HLMN3)*HLMN2/HLMN4+HLMN1,2,0),COLORGREEN;
{资金异常动能显示}
VY:=(0-HLMN3)*HLMN2/HLMN4+HLMN1;
STICKLINE(V>=2*REF(V,1),VZ,VY,0.9,0),COLORGREEN;
STICKLINE(V>=3*REF(V,1),VZ,VY,0.6,0),COLOR3300CC;
VPT:SUM(VOL*(CLOSE-REF(CLOSE,1))/REF(CLOSE,1),0);
M:=6;{公式在线网提