DIFF:EMA(CLOSE,8) - EMA(CLOSE,24);
DEA:EMA(DIFF,6);
MACD:2*(DIFF-DEA),COLORSTICK,colorbrown;
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);
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;
LC:=REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSI2:=SMA(MAX(CLOSE-LC,0),12,1)/SMA(ABS(CLOSE-LC),12,1)*100;
A2:=BARSLAST(REF(CROSS(K,D),1));
B2:=REF(C,A2+1)>C AND REF(K,A2+1)<K AND CROSS(K,D);
A3:=BARSLAST(REF(CROSS(RSI1,RSI2),1));
B3:=REF(C,A3+1)>C AND REF(RSI1,A3+1)<RSI1 AND CROSS(RSI1,RSI2);
C1:=BARSLAST(REF(CROSS(DEA,DIFF),1));
D1:=REF(C,C1+1)<C AND REF(DIFF,C1+1)>DIFF AND CROSS(DEA,DIFF);
C2:=BARSLAST(REF(CROSS(D,K),1));
D2:=REF(C,C2+1)<C AND REF(K,C2+1)>K AND CROSS(D,K);
C3:=BARSLAST(REF(CROSS(RSI2,RSI1),1));
D3:=REF(C,C3+1)<C AND REF(RSI1,C3+1)>RSI1 AND CROSS(RSI2,RSI1);
LL:= CONST(LLV(MACD, 180));
HH:= CONST(HHV(MACD, 180));
MACD底背:IF(B1>0, 1,0),NODRAW,colorred;
RSI底背:IF(B3>0, 1,0),NODRAW,COLORPURPLE;
KDJ底背:IF(B2>0, 1,0),NODRAW,COLORFF00FF;
MACD顶背:IF(D1>0, 1,0),NODRAW,COLOR00FF00;
KDJ顶背:IF(D2>0, 1,0),NODRAW,COLORFFCC66;
RSI顶背:IF(D3>0,1,0),NODRAW,colorblack;
STICKLINE(B1>0, LL,0,2,0), colorred;
STICKLINE(B2>0, LL * 0.75 ,0,2,0), COLORFF00FF;
STICKLINE(B3>0, LL * 0.5, 0,2,0), COLORPURPLE;
STICKLINE(D1>0,0,HH,2,0), COLOR00FF00;
STICKLINE(D2>0,0,HH * 0.75,2,0), COLORFFCC66;
STICKLINE(D3>0,0,HH * 0.75,2,0), colorblack;
M1 := EMA( CLOSE, 9 );
M2 := EMA( CLOSE, 18 );
MD : M1 - M2, colorwhite, LINETHICK3;
MM := EMA( MD, 3 );
吸 : IF( MD >= MM AND MD < 0, MD, DRAWNULL ), colorlired, LINETHICK3;
拉 : IF( MD >= MM AND MD >= 0, MD, DRAWNULL ), colorred, LINETHICK3;
派 : IF( MD < MM AND MD >= 0, MD, DRAWNULL ), colorgreen, LINETHICK3;
落 : IF( MD < MM AND MD < 0, MD, DRAWNULL ), colorwhite, LINETHICK3;
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA/2);
AH:=HHV(MACD,13*1);
AL:=LLV(MACD,13*0.3);
STICKLINE(MACD>0 ,MACD,0,1,0),COLOR0000AA,LINETHICK1;
STICKLINE(MACD<0 ,MACD,0,1,0),COLOR008800,LINETHICK1;
趋势线:=EMA(MACD,34,1);
PARTLINE(趋势线,趋势线>REF(趋势线,1),RGB(255,255,0),趋势线<REF(趋势线,1),RGB(0,80,255)),LINETHICK1;
FILLRGN(趋势线,REF(趋势线,1),趋势线>REF(趋势线,1),RGB(255,255,0),趋势线<=REF(趋势线,1),RGB(0,88,255));
K:=SMA(MACD,2,1);
D:=SMA(K,2,1);
J:SMA(D,2,1);
STICKLINE(MACD>0,0.000001,0.000003,15,0),colorred;
STICKLINE(MACD<0,0.000001,0.000003,15,0),colorgreen;
PARTLINE(K,K>REF(K,1),RGB(255,0,0),K<REF(K,1),RGB(0,255,0)),LINETHICK1;
PARTLINE(D,D>REF(D,1),RGB(255,0,0),D<REF(D,1),RGB(0,255,0)),LINETHICK1;
PARTLINE(J,J>REF(J,1),RGB(255,0,0),J<REF(J,1),RGB(0,255,0)),LINETHICK2;
STICKLINE(REF(MACD,1)<MACD,MACD,REF(MACD,1),7,0),coloryellow;
STICKLINE(MACD=AH,AH,K,8,0),LINETHICK1,colorred;
STICKLINE(REF(MACD,2)>MACD,MACD,REF(MACD,1),8,1),colorgreen;
爱查股 网 www.aichagu.c om