打印本文
關閉窗口
?
?來源:程序化99
參考：
?
DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);//短周期與長周期的收盤價的指數平滑移動平均值做差。
DEA:= EMA(DIFF,9);//DIFF的M個周期指數平滑移動平均
MACD:=2*(DIFF-DEA),COLORSTICK;//DIFF減DEA的2倍畫柱狀線
J:=CROSS(DIFF,DEA);
S:=CROSSDOWN(DIFF,DEA);
LL:=CROSS( BACKSET(REFX(J,1)||ISLASTBAR&&DIFF<DEA,LLVBARS(L,BARSLAST(S)+1)+1),0.5),NODRAW;
HH:=CROSS( BACKSET(REFX(S,1)||ISLASTBAR&&DIFF>DEA,HHVBARS(H,BARSLAST(J)+1)+1),0.5),NODRAW;
DRAWLINE1(HH,H,LL,L,0),COLORGREEN,LINETHICK1;
DRAWLINE1(LL,L,HH,H,0),COLORRED,LINETHICK1;
A:=BACKSET(ISLASTBAR,SUMBARS(HH||LL,2));
HHH:=REFX1(VALUEWHEN(HH,H),9999);
LLL:=REFX1(VALUEWHEN(LL,L),9999);
DRAWSL(A,HHH-0.382*(HHH-LLL),0,1,0,COLORRED);
DRAWSL(A,HHH-0.500*(HHH-LLL),0,1,0,COLORWHITE);
DRAWSL(A,HHH-0.618*(HHH-LLL),0,1,0,COLORGREEN);
DRAWNUMBER(CROSS(A,0.5),HHH-0.382*(HHH-LLL),HHH-0.382*(HHH-LLL),2,COLORRED),VALIGN2;
DRAWTEXT(CROSS(A,0.5),HHH-0.382*(HHH-LLL),'0.382'),COLORRED,VALIGN0;
DRAWNUMBER(CROSS(A,0.5),HHH-0.500*(HHH-LLL),HHH-0.382*(HHH-LLL),2,COLORWHITE),VALIGN2;
DRAWTEXT(CROSS(A,0.5),HHH-0.500*(HHH-LLL),'0.382'),COLORWHITE,VALIGN0;
DRAWNUMBER(CROSS(A,0.5),HHH-0.618*(HHH-LLL),HHH-0.382*(HHH-LLL),2,COLORGREEN),VALIGN2;
DRAWTEXT(CROSS(A,0.5),HHH-0.618*(HHH-LLL),'0.382'),COLORGREEN,VALIGN0;
?
?來源: m.kzuj.com.cn
?
參考：
?
DIFF:= EMA(CLOSE,12) - EMA(CLOSE,26);//短周期與長周期的收盤價的指數平滑移動平均值做差。
DEA:= EMA(DIFF,9);//DIFF的M個周期指數平滑移動平均
MACD:=2*(DIFF-DEA),COLORSTICK;//DIFF減DEA的2倍畫柱狀線
J:=CROSS(DIFF,DEA);
S:=CROSSDOWN(DIFF,DEA);
LL:=CROSS( BACKSET(REFX(J,1)||ISLASTBAR&&DIFF<DEA,LLVBARS(L,BARSLAST(S)+1)+1),0.5),NODRAW;
HH:=CROSS( BACKSET(REFX(S,1)||ISLASTBAR&&DIFF>DEA,HHVBARS(H,BARSLAST(J)+1)+1),0.5),NODRAW;
DRAWLINE1(HH,H,LL,L,0),COLORGREEN,LINETHICK1;
DRAWLINE1(LL,L,HH,H,0),COLORRED,LINETHICK1;
A:=BACKSET(ISLASTBAR,SUMBARS(HH||LL,2));
HHH:=REFX1(VALUEWHEN(HH,H),9999);
LLL:=REFX1(VALUEWHEN(LL,L),9999);
DRAWSL(A,HHH-0.382*(HHH-LLL),0,1,0,COLORRED);
DRAWSL(A,HHH-0.500*(HHH-LLL),0,1,0,COLORWHITE);
DRAWSL(A,HHH-0.618*(HHH-LLL),0,1,0,COLORGREEN);
DRAWNUMBER(CROSS(A,0.5),HHH-0.382*(HHH-LLL),HHH-0.382*(HHH-LLL),2,COLORRED),VALIGN2;
DRAWTEXT(CROSS(A,0.5),HHH-0.382*(HHH-LLL),'0.382'),COLORRED,VALIGN0;
DRAWNUMBER(CROSS(A,0.5),HHH-0.500*(HHH-LLL),HHH-0.382*(HHH-LLL),2,COLORWHITE),VALIGN2;
DRAWTEXT(CROSS(A,0.5),HHH-0.500*(HHH-LLL),'0.500),COLORWHITE,VALIGN0;
DRAWNUMBER(CROSS(A,0.5),HHH-0.618*(HHH-LLL),HHH-0.382*(HHH-LLL),2,COLORGREEN),VALIGN2;
DRAWTEXT(CROSS(A,0.5),HHH-0.618*(HHH-LLL),'0.618),COLORGREEN,VALIGN0;
?