通达信实战型MACD指标公式

SHORT:=12;
LONG:=26;
MID:=9;
DIFF:EMA(CSHORT)-EMA(CLONG);
DEA:EMA(DIFFMID);
MACD:(DIFF-DEA)*2COLORFFFF00COLORSTICK;
A1:=BARSLAST(REF(CROSS(0 DEA)1));
A2:= BARSLAST(REF(COUNT(DEA<=0A1+1)=A1+1 AND LLV(DIFF5)=LLV(DIFFA1+1) AND CROSS(DIFFDEA)1));
A3:= BARSLAST(REF(CROSS(DIFFDEA)1));
DIBL1:=LLV(CA3+1)=LLV(CA1+1) AND NOT(LLV(DIFFA3+1)=LLV(DIFFA1+1)) AND COUNT(DEA<=0A2+1)=A2+1 AND CROSS(DIFFDEA);
金叉:IF(CROSS(DIFFDEA) AND DEA<=0 AND DIBL1=00DEA)COLORYELLOW;
底背离:IF(DIBL10DEA)COLORRED;
B1:=BARSLAST(REF(CROSS(DEA0)1));
B2:=BARSLAST(REF(COUNT(DEA>=0B1+1)=B1+1 AND HHV(DIFF5)=HHV(DIFFA1+1) AND CROSS(DEADIFF)1));
B3:=BARSLAST(REF(CROSS(DEADIFF)1));
DINGBL1:= HHV(CB3+1)=HHV(CB1+1) AND NOT(HHV(DIFFB3+1)=HHV(DIFFB1+1)) AND COUNT(DEA>=0B2+1)=B2+1 AND CROSS(DEADIFF);
死叉:IF(CROSS(DEADIFF) AND DEA>=0 AND DINGBL1=00DEA)COLORFFFF00;
顶背离:IF(DINGBL10DEA)COLORGREEN;
DIBJG:=LLV(CA3+1)=LLV(CA1+1) AND NOT(LLV(DIFFA3+1)=LLV(DIFFA1+1)) AND DIFF>REF(DIFF1) AND COUNT(DEA<=0A2+1)=A2+1 AND DIFF<DEA ;
DINGBJG:=HHV(CB3+1)=HHV(CB1+1) AND NOT(HHV(DIFFB3+1)=HHV(DIFFB1+1)) AND REF(DIFF1)>DIFF AND COUNT(DEA>=0B2+1)=B2+1 AND DIFF>DEA ;
STICKLINE(DIBJG =1 DEADIFF20)COLORRED;
STICKLINE(DINGBJG =1 DEADIFF20)COLORGREEN;
MB:=EMA(DIFF20);
UB:=MB+1.9104*STD(DIFF20);
LB:=MB-1.9104*STD(DIFF20);
ZJS:=HHV(DEAB1+1)/2;
ZJX:=LLV(DEAA1+1)/2;
STICKLINE(DEA>DIFF AND DEA>0 AND DEA>ZJS ZJSREF(ZJS1)10) COLORRED;
STICKLINE(DEA<DIFF AND DEA<0 AND DEA<ZJXZJX REF(ZJX1)10)COLORGREEN;