SHORT:=12;
LONG:=26;
M:=9;
DIF:=EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
DEA:=EMA(DIF,M);
MACD:=2*(DIF-DEA),STICK;
PJMA:MA(C,50),LINETHICK1,COLORCYAN,POINTDOT;
TOZ:=MA(C,50),COLORYELLOW,DOT;
TMACD:=MA(C,50)+(MACD)*3;
HD0:=CROSS(DIF,DEA);
DDDDS:=REF(L,BARSLAST(HD0)),COLORYELLOW,DOT;
LD0:=CROSS(DEA,DIF);
KKKKS:=REF(H,BARSLAST(LD0)),COLOR00FF00,DOT;
JCSC:=(M-1)/(M+1)*DEA/(1-2/(M+1));
DD:=(MACD/2+(DEA*(M-1)/(M+1)))/(1-2/(M+1));
TTZZ1:(DIF*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),COLORYELLOW,LINETHICK1;
TTZZ2:=(DD*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),COLORWHITE,LINETHICK1;
TTZZ3:=IF(TTZZ2>=TTZZ1,TTZZ1,NULL),COLORYELLOW,CIRCLEDOT,LINETHICK1;
TTZZ4:=IF(TTZZ2>=TTZZ1,PJMA,NULL),COLORYELLOW,CIRCLEDOT,LINETHICK1;
TTZZ5:=(JCSC*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),COLORCYAN,NODRAW;
TTZZ6:=(((M+1)*(2*REF(DEA,1)*(M-1)+REF(MACD,1)*(M+1)))/(2*(M+1)*(M-1))+(REF(EMA(C,26),1)*(26-1)/(26+1))-(REF(EMA(C,12),1)*(12-1)/(12+1)))*(12+1)*(26+1)/(2*(26-12));
ES:=REF(EMA(C,26),1);
EP:=REF(EMA(C,12),1);
DI:=REF(DIF,1);
TTZZ7:=((12+1)*(26-1)*ES-(26+1)*(12-1)*EP)/(2*(26+1)-2*(12+1)),NODRAW,COLORWHITE;
ZJ:=DIF>DEA;
HY:=DIF<DEA;
XG1:=ZJ AND C>KKKKS AND C>PJMA;
STICKLINE1(XG1,L,H,0,0),COLOR0000AA;
STICKLINE1(XG1,CLOSE,OPEN,3,0),COLOR550000;
STICKLINE1(XG1,CLOSE,OPEN,2.8,0),COLOR660000;
STICKLINE1(XG1,CLOSE,OPEN,2.5,0),COLOR770000;
STICKLINE1(XG1,CLOSE,OPEN,2.2,0),COLOR880000;
STICKLINE1(XG1,CLOSE,OPEN,1.7,0),COLOR990000;
STICKLINE1(XG1,CLOSE,OPEN,1.2,0),COLORAA0000;
STICKLINE1(XG1,CLOSE,OPEN,0.7,0),COLORCC0000;
STICKLINE1(XG1,CLOSE,OPEN,0.2,0),COLORFF0000;
W1:= C<KKKKS AND ZJ;
STICKLINE1(W1,H,L,0,1),COLORFF55FF;
STICKLINE1(W1,C,O,3.2,0),COLOR880088;
STICKLINE1(W1,C,O,2.6,0),COLORAA00AA;
STICKLINE1(W1,C,O,1.9,0),COLORCC00CC;
STICKLINE1(W1,C,O,1.1,0),COLOREE00EE;
STICKLINE1(W1,C,O,0.3,0),COLORFF44FF;
W2:= C<PJMA AND ZJ;
STICKLINE1(W2,H,L,0,1),COLORFF55FF;
STICKLINE1(W2,C,O,3.2,0),COLOR880088;
STICKLINE1(W2,C,O,2.6,0),COLORAA00AA;
STICKLINE1(W2,C,O,1.9,0),COLORCC00CC;
STICKLINE1(W2,C,O,1.1,0),COLOREE00EE;
STICKLINE1(W2,C,O,0.3,0),COLORFF44FF;
XG2:=C<TTZZ1 AND HY;
STICKLINE1(XG2,H,L,0,0),COLOR00FF00;
STICKLINE1(XG2,C,O,3,0),COLOR009900;
STICKLINE1(XG2,C,O,2,0),COLOR00BB00;
STICKLINE1(XG2,C,O,1,0),COLOR00DD00;
STICKLINE1(XG2,C,O,0.3,0),COLOR00FF00;
XG3:=C>TTZZ1 AND HY;
STICKLINE1(XG3,H,L,0,0),COLOR00FF00;
STICKLINE1(XG3,C,O,3,0),COLOR009900;
STICKLINE1(XG3,C,O,2,0),COLOR00BB00;
STICKLINE1(XG3,C,O,1,0),COLOR00DD00;
STICKLINE1(XG3,C,O,0.3,0),COLOR00FF00;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1),COLORWHITE,LINETHICK1,NODRAW;
D:=SMA(K,3,1),COLORYELLOW,LINETHICK1,NODRAW;
LC:=REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
IF(COUNT(RSI1>80,3)=3,H,NULL),POINTDOT,COLORGREEN,LINETHICK7;
IF(COUNT(RSI1<20,3)=3,L,NULL),POINTDOT,COLORYELLOW,LINETHICK7;
IF(COUNT(K>80,3)=3,H,NULL),POINTDOT,COLORGREEN,LINETHICK5;
IF(COUNT(K<20,3)=3,L,NULL),POINTDOT,COLORFF33FF,LINETHICK5;
DRAWICON(COUNT(RSI1>80,3)=3 OR   COUNT(K>80,3)=3,H,5),VALIGN2;
DRAWICON(COUNT(RSI1<20,3)=3 OR   COUNT(K<20,3)=3,L,4),VALIGN0;