DIF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIF,9);
MACD:(DIF-DEA)*2,COLORSTICK;
T:=BARSLAST(CROSS(DIF,DEA) AND DIF<0);
T1:=SUMBARS(T=0,2);
T2:=SUMBARS(T=0,3);
M:=BARSLAST(CROSS(0,MACD));
M1:=SUMBARS(M=0,2);
M2:=SUMBARS(M=0,3);
D1:=REF(DIF,BARSLAST(DIF=LLV(DIF,M+1)));
D2:=REF(D1,T1-1);
D3:=REF(D2,T1-1);
LT:=BARSLAST(L=LLV(L,M+1));
MT:=BARSLAST(DIF=LLV(DIF,M+1));
L1:=REF(L,LT);
L2:=REF(L1,T1-1);
L3:=REF(L2,T1-1);
XG:=T=0 AND L1<L2 AND L2<L3 AND D1>D2 AND D2>D3;
VAR1:BACKSET(XG,T2+REF(MT,T2-1)),NODRAW;
VAR2:BACKSET(XG,T1+REF(MT,T1-1)),NODRAW;
VAR3:BACKSET(XG,T+REF(MT,T)+1),NODRAW;
DRAWLINE1(CROSS(VAR1=1,0.5),DIF,CROSS(VAR2=1,0.5) AND VAR1=1,DIF,0),COLORYELLOW,LINETHICK2;
DRAWLINE1(CROSS(VAR2=1,0.5) AND VAR1=1,DIF,VAR1=1 AND VAR2=1 AND CROSS(VAR3=1,0.5),DIF,0),COLORMAGENTA,LINETHICK2;
DRAWICON(XG,DIF,4);
SHORT:=12;
LONG:=26;
MID:=9;
DIFF:EMA(C,SHORT)-EMA(C,LONG);
DEA:EMA(DIFF,MID);
MACD:(DIFF-DEA)*2,COLORFFFF00,COLORSTICK;
A1:=BARSLAST(REF(CROSS(0, DEA),1));
A2:= BARSLAST(REF(COUNT(DEA<=0,A1+1)=A1+1 AND LLV(DIFF,5)=LLV(DIFF,A1+1) AND CROSS(DIFF,DEA),1));
A3:= BARSLAST(REF(CROSS(DIFF,DEA),1));
DIBL1:=LLV(C,A3+1)=LLV(C,A1+1) AND NOT(LLV(DIFF,A3+1)=LLV(DIFF,A1+1)) AND COUNT(DEA<=0,A2+1)=A2+1 AND CROSS(DIFF,DEA);
金叉:IF(CROSS(DIFF,DEA) AND DEA<=0 AND DIBL1=0,0,DEA),COLORYELLOW;
底背离:IF(DIBL1,0,DEA),COLORRED;
B1:=BARSLAST(REF(CROSS(DEA,0),1));
B2:=BARSLAST(REF(COUNT(DEA>=0,B1+1)=B1+1 AND HHV(DIFF,5)=HHV(DIFF,A1+1) AND CROSS(DEA,DIFF),1));
B3:=BARSLAST(REF(CROSS(DEA,DIFF),1));
DINGBL1:= HHV(C,B3+1)=HHV(C,B1+1) AND NOT(HHV(DIFF,B3+1)=HHV(DIFF,B1+1)) AND COUNT(DEA>=0,B2+1)=B2+1 AND CROSS(DEA,DIFF);
死叉:IF(CROSS(DEA,DIFF) AND DEA>=0 AND DINGBL1=0,0,DEA),COLORFFFF00;
顶背离:IF(DINGBL1,0,DEA),COLORGREEN;
DIBJG:=LLV(C,A3+1)=LLV(C,A1+1) AND NOT(LLV(DIFF,A3+1)=LLV(DIFF,A1+1)) AND DIFF>REF(DIFF,1) AND COUNT(DEA<=0,A2+1)=A2+1 AND DIFF<DEA ;
DINGBJG:=HHV(C,B3+1)=HHV(C,B1+1) AND NOT(HHV(DIFF,B3+1)=HHV(DIFF,B1+1)) AND REF(DIFF,1)>DIFF AND COUNT(DEA>=0,B2+1)=B2+1 AND DIFF>DEA ;
STICKLINE(DIBJG =1 ,DEA,DIFF,2,0),COLORRED;
STICKLINE(DINGBJG =1 ,DEA,DIFF,2,0),COLORGREEN;
MB:=EMA(DIFF,20);
UB:=MB+1.9104*STD(DIFF,20);
LB:=MB-1.9104*STD(DIFF,20);
ZJS:=HHV(DEA,B1+1)/2;
ZJX:=LLV(DEA,A1+1)/2;
STICKLINE(DEA>DIFF AND DEA>0 AND DEA>ZJS, ZJS,REF(ZJS,1),1,0), COLORRED;
STICKLINE(DEA<DIFF AND DEA<0 AND DEA<ZJX,ZJX, REF(ZJX,1),1,0),COLORGREEN;
