input: N(20,1,100);
ma(c,N),LINETHICK0;
Z_X1:=REF(EMA(C,N),1);
Z_X2:=(EMA(C,N)-Z_X1)/Z_X1*100;
Z_X3:=REF(EMA(C,N),BARSLAST(CROSS(Z_X2,0))+1);
Z_X4:=REF(EMA(C,N),BARSLAST(CROSS(0,Z_X2))+1);
PARTLINE(Z_X2>=0 and Z_X3=ref(Z_X3,1),Z_X3),LINETHICK2,COLORRED;
DRAWLINE(CROSS(Z_X2,0),Z_X1,CROSS(0,Z_X2),Z_X1,0),LINETHICK2,COLORRED;
PARTLINE(Z_X2<0 and Z_X4=ref(Z_X4,1),Z_X4),LINETHICK2,COLORGREEN;
DRAWLINE(CROSS(0,Z_X2),Z_X1,CROSS(Z_X2,0),Z_X1,0),LINETHICK2,COLORGREEN;
DRAWLINE(CROSS(0,Z_X2) OR CROSS(Z_X2,0),Z_X1,ISLASTBAR,Z_X1,0),LINETHICK2,COLORYELLOW; |
