WMACD
2016-4-13 22:18:54点击:
DIFF : EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
DEA : EMA(DIFF,M);
MACD : 2*(DIFF-DEA);
Zero : 0;
A1:=C>=REF(C,4);
A:=C<REF(C,4);
AA:=C<REF(C,4) AND REF(A1,1);
T:=BARSLAST(AA),NODRAW;
M:=(T=0 AND REFX(&T=1 AND NOT(A),1)) OR (REFX(&T=2 AND NOT(A),2)) OR (REFX(&T=3 AND NOT(A),3)) OR (REFX(&T=4 AND NOT(A),4)) OR (REFX(&T=5 AND NOT(A),5))
OR (REFX(&T=6 AND NOT(A),6)) OR (REFX(&T=7 AND NOT(A),7)) OR (REFX(&T=8 AND NOT(A),8));
M1:=T=1 AND REFX(&T=2 AND NOT(A),1) OR (REFX(&T=3 AND NOT(A),2)) OR (REFX(&T=4 AND NOT(A),3)) OR (REFX(&T=5 AND NOT(A),4)) OR (REFX(&T=6 AND NOT(A),5))
OR (REFX(&T=7 AND NOT(A),6)) OR (REFX(&T=8 AND NOT(A),7));
M2:=T=2 AND REFX(&T=3 AND NOT(A),1) OR (REFX(&T=4 AND NOT(A),2)) OR (REFX(&T=5 AND NOT(A),3)) OR (REFX(&T=6 AND NOT(A),4)) OR (REFX(&T=7 AND NOT(A),5)) OR (REFX(&T=8 AND NOT(A),6));
M3:=T=3 AND REFX(&T=4 AND NOT(A),1)OR (REFX(&T=5 AND NOT(A),2)) OR (REFX(&T=6 AND NOT(A),3)) OR (REFX(&T=7 AND NOT(A),4)) OR (REFX(&T=8 AND NOT(A),5));
M4:=T=4 AND REFX(&T=5 AND NOT(A),1) OR (REFX(&T=6 AND NOT(A),2)) OR (REFX(&T=7 AND NOT(A),3)) OR (REFX(&T=8 AND NOT(A),4));
M5:=T=5 AND REFX(&T=6 AND NOT(A),1) OR (REFX(&T=7 AND NOT(A),2)) OR (REFX(&T=8 AND NOT(A),3));
M6:=T=6 AND REFX(&T=7 AND NOT(A),1) OR (REFX(&T=8 AND NOT(A),2));
M7:=T=7 AND REFX(&T=8 AND NOT(A),1);
N:=T=1 AND REF(T=0 AND AA,1) AND A;
N1:=T=2 AND REF(N,1) AND A;
N2:=T=3 AND REF(N1,1) AND A;
N3:=T=4 AND REF(N2,1) AND A;
N4:=T=5 AND REF(N3,1) AND A;
N5:=T=6 AND REF(N4,1) AND A;
N6:=T=7 AND REF(N5,1) AND A;
N7:=T=8 AND REF(N6,1) AND A;
DRAWTEXT(T=0,MACD*0.98,'1'),colorgreen;
DRAWTEXT(N,MACD*0.98,'2'),colorgreen;
DRAWTEXT(N1,MACD*0.98,'3'),colorgreen;
DRAWTEXT(N2,MACD*0.98,'4'),colorgreen;
DRAWTEXT(N3,MACD*0.98,'5'),colorgreen;
DRAWTEXT(N4,MACD*0.98,'6'),colorgreen;
DRAWTEXT(N5,MACD*0.98,'7'),colorgreen;
DRAWTEXT(N6,MACD*0.98,'8'),colorgreen;
DRAWTEXT(N7,MACD*0.98,'9'),coloryellow;
DRAWICON(N7,MACD*0.98,1),colorgreen;
DRAWTEXT(M,MACD*0.98,'1'),colorblack;
DRAWTEXT(M1,MACD*0.98,'2'),colorblack;
DRAWTEXT(M2,MACD*0.98,'3'),colorblack;
DRAWTEXT(M3,MACD*0.98,'4'),colorblack;
DRAWTEXT(M4,MACD*0.98,'5'),colorblack;
DRAWTEXT(M5,MACD*0.98,'6'),colorblack;
DRAWTEXT(M6,MACD*0.98,'7'),colorblack;
DRAWTEXT(M7,MACD*0.98,'8'),colorblack;
B1:=C<=REF(C,4);
B:=C>REF(C,4);
BB:=C>REF(C,4) AND REF(B1,1);
T1:=BARSLAST(BB),NODRAW;
M111:=(T1=0 AND REFX(&T1=1 AND NOT(B),1)) OR (REFX(&T1=2 AND NOT(B),2)) OR (REFX(&T1=3 AND NOT(B),3)) OR (REFX(&T1=4 AND NOT(B),4)) OR (REFX(&T1=5 AND NOT(B),5))
OR (REFX(&T1=6 AND NOT(B),6)) OR (REFX(&T1=7 AND NOT(B),7)) OR (REFX(&T1=8 AND NOT(B),8));
M11:=T1=1 AND REFX(&T1=2 AND NOT(B),1) OR (REFX(&T1=3 AND NOT(B),2)) OR (REFX(&T1=4 AND NOT(B),3)) OR (REFX(&T1=5 AND NOT(B),4)) OR (REFX(&T1=6 AND NOT(B),5))
OR (REFX(&T1=7 AND NOT(B),6)) OR (REFX(&T1=8 AND NOT(B),7));
M22:=T1=2 AND REFX(&T1=3 AND NOT(B),1) OR (REFX(&T1=4 AND NOT(B),2)) OR (REFX(&T1=5 AND NOT(B),3)) OR (REFX(&T1=6 AND NOT(B),4)) OR (REFX(&T1=7 AND NOT(B),5)) OR (REFX(&T1=8 AND NOT(B),6));
M33:=T1=3 AND REFX(&T1=4 AND NOT(B),1)OR (REFX(&T1=5 AND NOT(B),2)) OR (REFX(&T1=6 AND NOT(B),3)) OR (REFX(&T1=7 AND NOT(B),4)) OR (REFX(&T1=8 AND NOT(B),5));
M44:=T1=4 AND REFX(&T1=5 AND NOT(B),1) OR (REFX(&T1=6 AND NOT(B),2)) OR (REFX(&T1=7 AND NOT(B),7)) OR (REFX(&T1=8 AND NOT(B),4));
M55:=T1=5 AND REFX(&T1=6 AND NOT(B),1) OR (REFX(&T1=7 AND NOT(B),2)) OR (REFX(&T1=8 AND NOT(B),3));
M66:=T1=6 AND REFX(&T1=7 AND NOT(B),1) OR (REFX(&T1=8 AND NOT(B),2));
M77:=T1=7 AND REFX(&T1=8 AND NOT(B),1);
N111:=T1=1 AND REF(T1=0 AND BB,1) AND B;
N11:=T1=2 AND REF(N111,1) AND B;
N22:=T1=3 AND REF(N11,1) AND B;
N33:=T1=4 AND REF(N22,1) AND B;
N44:=T1=5 AND REF(N33,1) AND B;
N55:=T1=6 AND REF(N44,1) AND B;
N66:=T1=7 AND REF(N55,1) AND B;
N77:=T1=8 AND REF(N66,1) AND B;
DRAWTEXT(T1=0,MACD*1.12,'1'),COLOR9900CC;
DRAWTEXT(N111,MACD*1.12,'2'),COLOR9900CC;
DRAWTEXT(N11,MACD*1.12,'3'),COLOR9900CC;
DRAWTEXT(N22,MACD*1.02,'4'),COLOR9900CC;
DRAWTEXT(N33,MACD*1.02,'5'),COLOR9900CC;
DRAWTEXT(N44,MACD*1.02,'6'),COLOR9900CC;
DRAWTEXT(N55,MACD*1.02,'7'),COLOR9900CC;
DRAWTEXT(N66,MACD*1.02,'8'),COLOR9900CC;
DRAWTEXT(N77,MACD*1.02,'9'),COLORFFFF00;
DRAWICON(N77,MACD*1.02,2),colorred;
DRAWTEXT(M111,MACD*1.02,'1'),colorblack;
DRAWTEXT(M11,MACD*1.02,'2'),colorblack;
DRAWTEXT(M22,MACD*1.02,'3'),colorblack;
DRAWTEXT(M33,MACD*1.02,'4'),colorblack;
DRAWTEXT(M44,MACD*1.02,'5'),colorblack;
DRAWTEXT(M55,MACD*1.02,'6'),colorblack;
DRAWTEXT(M66,MACD*1.02,'7'),colorblack;
DRAWTEXT(M77,MACD*1.02,'8'),colorblack;