三线归一主图和自编MACD信号副图，通达信公式 源码分享

{三线归一}

{三分归元气}

M1:MA(C,5)COLORBLUE,LINETHICK2;

M2:HHV(M1,3)COLORGREEN,LINETHICK2;

M3:(M1+M1-M2)COLORRED,LINETHICK3;

DRAWICON(C>LLV(REF(L,3),3) AND DYNAINFO(7)>=HHV(H,7) AND C>=HHV(H,7) AND C>MA(C,144),L*1.17,25);

DRAWNUMBER(CLOSE/REF(C,1)>=1.098  AND C=H,HIGH*0.97,C),LINETHICK3,COLORYELLOW;

DRAWNUMBER(EVERY(C<REF(C,1),3),L*0.99,L),LINETHICK3,COLORRED;

A1:=C>=HHV(H,7) AND C/REF(C,1)>=1.098 AND C=H ; 

DRAWTEXT(A1 ,HIGH*1.01,'起飞')COLORRED,LINETHICK3;

TJ:=COUNT(C/REF(C,1)>=1.098 AND C=H,13)>=1 AND C>MA(C,144);

凹形态:STICKLINE(REF(VOL,2)>REF(VOL,1)  AND VOL/REF(VOL,1)>=1.2 AND TJ,C,O,1,0),COLORWHITE;

倍量形态:STICKLINE(REF(VOL,1)>REF(VOL,2)  AND VOL>REF(VOL,1) AND TJ AND VOL/MA(VOL,3)<=2,C,O,1,0),COLORYELLOW;

缩量形态:STICKLINE(REF(VOL,2)>REF(VOL,1)  AND VOL<REF(VOL,1) AND TJ AND VOL/MA(VOL,3)<=1 AND EVERY(V/REF(V,1),4) AND EVERY(C/REF(C,1),6) ,C,O,1,0),COLORMAGENTA;

HS:=VOL/CAPITAL*100;

抄底信号:DRAWICON(HHV(HS,13)/HS>=3 AND EVERY(V/REF(V,1),6) AND EVERY(C/REF(C,1),6),L*0.98,7);

警示信号:DRAWICON(HS/REF(HHV(HS,13),1)>=2,H*0.98,15),COLORRED;

DRAWTEXT(COUNT(M3<M1 AND M3<M2 AND EVERY(L<MA(C,5),3) AND C<MA(C,5),2)>=1  AND COUNT(M3<M1 AND M3<M2 AND EVERY(L<MA(C,5),3) AND C<MA(C,5),2)<=1 AND C<MA(C,5) AND  EVERY(C<MA(C,5),2) AND NOT(M3=M1 AND M3=M2),H*1.05,'逃')COLORYELLOW,LINETHICK3;