转文华指标 变色

  

 

N:=8;

MA4:=MA(C,N);

AA:=FORCAST(MA4,N );

BB:=REF( AA,1 );

DRAWCOLORLINE(AA>BB,AA,COLORRED,COLORGREEN),LINETHICK2;

A:=AA-BB;

A线 :=EMA(C,12) - EMA(C,26);

B线:=EMA(A线,9);

MACD := 3*(A线-B线), COLORSTICK;

DRAWNUMBER1(A>0 AND ISLASTBAR,C,C,0),COLORRED,ALIGN0,VALIGN1,FONTSIZE25;

DRAWNUMBER1(A<=0 AND ISLASTBAR,C,C,0),COLORGREEN,ALIGN0,VALIGN1,FONTSIZE25;

A1:=A>0 AND MACD>=REF(MACD,1) AND L<=REF( C,1 ) ;// AND ISLASTBAR;

A2:=A<0 AND MACD<=REF(MACD,1) AND H>=REF( C,1 ) ;// AND ISLASTBAR;

B:=REF( C,1 )  ; 

DRAWICON(CROSS(A1,0.5),L,'ICO4');

DRAWICON(CROSS(A2,0.5),H,'ICO5');

DRAWSL1(A1&&BARSLASTCOUNT(A1)>1,VALUEWHEN(CROSS(A1,0.5),B),0,BARSLASTCOUNT(A1)-1,1),COLORWHITE;

DRAWSL1(A2&&BARSLASTCOUNT(A2)>1,VALUEWHEN(CROSS(A2,0.5),B),0,BARSLASTCOUNT(A2)-1,1),COLORWHITE;

AX:VALUEWHEN(CROSS(A2,0.5),B),NODRAW;

BX:VALUEWHEN(CROSS(A1,0.5),B),NODRAW;

 

 

 

 E:=EMA(C,22);

PARTLINE1(C>E AND 1,E),COLOR0000FF,LINETHICK2;

PARTLINE1(C<=E  AND 1,E),COLOR00FFFF,LINETHICK2;

MA85:=MA(C,85);

PARTLINE1(C>MA85 AND 1,MA85),COLOR0000FF,LINETHICK2;

PARTLINE1(C<MA85 AND 1,MA85),COLOR00FF00,LINETHICK2;