通达信量价合一指标源码副图

分享一个通达信量价合一指标给朋友们，好不好，只有用过才知道。

{量价合一}

DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);

DEA:=EMA(DIF,9);

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

DIFL:=EMA(VOL,12)-EMA(VOL,26);

DEAL:=EMA(DIFL,9);

MACL:=(DIFL-DEAL)*2,COLORSTICK;

基点:=CONST(LLV(MACL,250));

基:=CONST(HHV(MACL,250))-基点;

STICKLINE(MACL>=0,0,MACL,2,-1),COLORLIRED;

STICKLINE(MACL<=0,0,MACL,2,-1),COLORLIBLUE;

分:=CONST(LLV(MACD,250));

百:=CONST(HHV(MACD,250))-分;

C比:=(MACD-分)/百;

价柱:C比*基+基点,COLORSTICK;

DIF1:DIFL,COLORGREEN;

DEA1:DEAL,COLORMAGENTA;

分1:=CONST(LLV(DIF,250));

百1:=CONST(HHV(DIF,250))-分1;

C比1:=(DIF-分1)/百1;

价F:C比1*基+基点,COLORWHITE,LINETHICK1;

分2:=CONST(LLV(DEA,250));

百2:=CONST(HHV(DEA,250))-分2; C比2:=(DEA-分2)/百2;

价A:C比2*基+基点,COLORYELLOW,LINETHICK1; {攻击波}

HS:=V/CAPITAL*100;

十日换手:=SUM(HS,10)>15;

攻击波:=(DYNAINFO(7)-L>0.3 AND DYNAINFO(17)>3 AND HS>2 AND 十日换手);

STICKLINE(攻击波,0,MACL/2,1,0),COLORMAGENTA;

强势出关:=COUNT("KDJ.J"<0,4)>=3 AND 100*(WINNER(C)-WINNER(O))>15;

STICKLINE(强势出关,0,MACL/0.75,1,0),COLORYELLOW;