{MACD+KD}
DIFF : EMA(CLOSE,12) - EMA(CLOSE,26);
DEA
MACD : 2*(DIFF-DEA), COLORSTICK;
D1:=EMA(C,3)-EMA(C,8);
D2:=EMA(O,3)-EMA(O,8);
D3:=EMA(H,3)-EMA(H,8);
D4:=EMA(L,3)-EMA(L,8);
DRAWICON(cross(d1,diff) and diff<-0.05 ,d4-0.1,10);
DRAWICON(cross(diff,d1) and diff>0.1 ,d3+0.1,12);
STICKLINE(D1>=D2,D1,D2,8,0),COLOR0055AA;
STICKLINE(D1<=D2,D1,D2,8,0),COLOR006600;
STICKLINE(D1>=D2,D1,D2,5,0),COLOR0077CC;
STICKLINE(D1>=D2,D1,D2,3,0),COLOR0099DD;
STICKLINE(D1>=D2,D3,D4,0,0),COLOR00BBFF;
STICKLINE(D1<=D2,D1,D2,5,0),COLOR009900;
STICKLINE(D1<=D2,D1,D2,3,0),COLOR00BB00;
STICKLINE(D1<=D2,D3,D4,0,0),COLOR00EE00;
{MACD+KD解盤}
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA :=EMA(DIFF,9);
MACD:2*(DIFF-DEA), COLORSTICK;
MAC := DIFF>ref(DIFF ,1);
DIF:2*DIFF;
Var1:=EMA(CLOSE,34)-EMA(CLOSE,5);
Var2:=EMA(Var1,5);
趨勢:=(-3)*(Var1-Var2);
趨勢,colorred;
長期趨勢:EMA(Var1,10)*(-1);
Jm:=CROSS(DIFF,DEA)*0.2;
JmCount:=COUNT(Jm=0.2,BARSLAST(DEA>0));
DRAWTEXT(DEA<0 AND Jm=0.2,Jm,'0軸下第'),colorgreen;
DRAWNUMBER(DEA<0 AND Jm=0.2,0,JmCount,0),coloryellow;
DRAWTEXT(DEA<0 AND Jm=0.2,0,'
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
DRAWTEXT(CROSS(K,D)AND(COUNT(VOL>REF(VOL,1),30)>3AND(VOL/CAPITAL<=(10/100)))
DRAWTEXT(CROSS(K,D)AND(COUNT(VOL>REF(VOL,1),30)>3AND
b:=CROSS(D,K) AND K>60 AND D>60;
b1:=COUNT(b,BARSLAST( D<60));
DRAWTEXT(b AND b1=1,0.50, '短線KD死叉'),ColorFFFFFF,LINETHICK2,ALIGN2;
DRAWTEXT(b AND b1=2,0.70, '短線KD二次死叉'),ColorFFFFFF,LINETHICK2,ALIGN2;
{MACD背離}
input.:n(1,0.1,100);
dif:=stkindi('','macd.diff',0,6);
fz1:=PEAKBARSA(dif*17,1,1);
fz2:=PEAKBARSA(dif*17,1,2);
v1:=fz1=1 and ref(dif,fz1)>ref(dif,fz2) and ref(c,fz1)<ref(c,fz2);
v2:=fz1=1 and ref(dif,fz1)<ref(dif,fz2) and ref(c,fz1)>ref(c,fz2);
頂背離:STICKLINE(v1 or v2,0,1,3,0.1),colorffff54;
dz1:=TROUGHBARSA(dif*17,1,1);
dz2:=TROUGHBARSA(dif*17,1,2);
v3:=dz1=1 and ref(dif,dz1)>ref(dif,dz2) and ref(c,dz1)<ref(c,dz2);
v4:=dz1=1 and ref(dif,dz1)<ref(dif,dz2) and ref(c,dz1)>ref(c,dz2);
底背離:STICKLINE(v3 or v4,0,1,3,0.1),color5454ff;
{MACD選股}
input.:n(5,2,1000);
diff:=stkindi('','macd.diff',0,6);
dea:=stkindi('','macd.dea',0,6);
MACD:=stkindi('','macd.MACD',0,6);
T1:=REF(C,2)<REF(O,2) AND REF(C,2)<REF(C,3) AND C>O AND C>REF(C,1);
T2:=DIFF>DEA AND REF(MACD,1)<REF(MACD,2) AND REF(MACD,2)<REF(MACD,3);
T3:=DIFF<REFX(DIFF,1) AND REFX(DIFF,1)<REFX(DIFF,2);
{超級(jí)疊加MACD}
DIFF : EMA(CLOSE,12) - EMA(CLOSE,26);
DEA : EMA(DIFF,9);
MACD : 2*(DIFF-DEA), COLORSTICK;
D1:=EMA(C,3)-EMA(C,8);
D2:=EMA(O,3)-EMA(O,8);
D3:=EMA(H,3)-EMA(H,8);
D4:=EMA(L,3)-EMA(L,8);
DRAWICON(cross(d1,diff) and diff<-0.05 ,d4-0.1,1);
DRAWICON(cross(diff,d1) and diff>0.1 ,d3+0.1,2);
STICKLINE(D1>=D2,D1,D2,8,0),COLOR0055AA;
STICKLINE(D1<=D2,D1,D2,8,0),COLOR006600;
STICKLINE(D1>=D2,D1,D2,5,0),COLOR0077CC;
STICKLINE(D1>=D2,D1,D2,3,0),COLOR0099DD;
STICKLINE(D1>=D2,D3,D4,0,0),COLOR00BBFF;
STICKLINE(D1<=D2,D1,D2,5,0),COLOR009900;
STICKLINE(D1<=D2,D1,D2,3,0),COLOR00BB00;
STICKLINE(D1<=D2,D3,D4,0,0),COLOR00EE00;
{超前MACD}
aaa:=(C-MA(CLOSE,13))*100;
j值A(chǔ):EMA(MA(aaa,7),1),COLOR00ffff,PRECISION1;
j值B:EMA(j值A(chǔ),7),COLORff33ff,PRECISION1;
macd:(j值A(chǔ)-j值B)*2,COLORSTICK;
tj:=(j值A(chǔ)>j值B);
tj1:=(j值A(chǔ)>0);
PARTLINE(tj,j值A(chǔ)),colormagenta,linethick2;
partline(tj1 and tj,j值A(chǔ)),colorred,linethick2;
tj2:=j值A(chǔ)<-1 and j值A(chǔ)<j值B and macd<-1;
partline(tj2,j值A(chǔ)),colorblue,linethick2;
{超前MACD1}
DIFF:=(C-MA(CLOSE,13))*100;
AA:EMA(MA(DIFF,7),1),COLOR00ffff;
BB:EMA(AA,7),COLORff33ff;
MACD: (AA-BB)*2,COLORSTICK;
聯(lián)系客服