新量能成交量通达信指标公式源码

新量能成交量通达信指标公式源码

{量能饱和度}

{N=1,100,30;

M=1,100,1.2;

N1:=10,100,34;}

N2:=N1*1.05;

N3:=N1+3;

SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20)); 量能饱和

度:IF(SAT>1,1,SAT)*100,COLORLIBLUE,NODRAW;

中点:=REFDATE(HHV(V,100)/2,DATE);{量能饱和的变色切换}

STICKLINE(CURRBARSCOUNT=N1,中点*1.9,中点*1.5,100,1),COLOR00DDDD;

STICKLINE(CURRBARSCOUNT=N1,中点*1.88,中点*1.52,量能饱和度,0),COLOR0033FF;

STICKLINE(CURRBARSCOUNT=N1,中点*1.82,中点*1.58,量能饱和度,0),COLOR0077FF;

STICKLINE(CURRBARSCOUNT=N1,中点*1.76,中点*1.64,量能饱和度,0),COLOR0099FF;

STICKLINE(CURRBARSCOUNT=N1,中点*1.7,中点*1.7,量能饱和度,0),COLORFFDD55;

DRAWTEXT(CURRBARSCOUNT=N3,中点*1.82,'量能饱和度'),COLORBLUE; VOLUME:VOL,VOLSTICK;

{主力量能}

SHORT:=12;

LONG:=26; MID:=9;

DIF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);

DEA:=EMA(DIF,MID);

MACD:=(DIF-DEA)*2,COLORSTICK;

STICKLINE(DIF>DEA,0,VOL,3,0),COLORRED;

STICKLINE(DIF<DEA,0,VOL,3,0),COLORGREEN; N:=9; M1:=3; M2:=3;

RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N

))*100;

K:=SMA(RSV,M1,1);

D:=SMA(K,M2,1);

J:=3*K-2*D;

STICKLINE(J>D,VOL/2,VOL,3,0),COLORRED;

STICKLINE(J<D,VOL/2,VOL,3,0),COLORGREEN; {量能潮}

VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);

OBV1:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);

OBV2:=EMA(OBV1,3)-MA(OBV1,9);

OBV3:=EMA(IF(OBV2>0,OBV2,0),3);

MAC3:=MA(C,3);

限制:=IF(OBV3>=VOL,VOL,IF(OBV3<VOL,OBV3,0));

STICKLINE(OBV3>REF(OBV3,1) AND

MAC3>REF(MAC3,1),0,限制,2,0),COLORYELLOW; {量:=V,VOLSTICK;}

PJJ:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4),0.9);

JJ:=REF(EMA(PJJ,3),1);

QJJ:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN)))); XVL:=(IF((CLOSE > OPEN),(QJJ * (HIGH - LOW)),IF((CLOSE < OPEN),(QJJ * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2))) + IF((CLOSE > OPEN)

,(0 - (QJJ * ((HIGH - CLOSE) + (OPEN -

LOW)))),IF((CLOSE < OPEN),(0 - (QJJ * (HIGH - LOW))),(0 - (VOL / 2)))));

ZLL:=(VOL / CAPITAL);