N:=20;M:=8;P:=4;GDG:CLOSE-REF(MA(CLOSE,N),N/2+1),colorgreen,LINETHICK1;KK:=MA(GDG,P),COLOR776600,LINETHICK1;RG:MA(GDG,M),coloryellow,LINETHICK3;TJ1:EMA(RG,4),colorcyan,,LINETHICK3;TJ2:EMA(TJ1,2),COLOR779900,,LINETHICK4;IF(GDG>REF(RG,1),GDG,DRAWNULL),coloryellow,LINETHICK1;{IF(KK>REF(KK,1),KK,DRAWNULL),COLOR1474FF,LINETHICK1;}IF(RG>REF(TJ1,1),RG,DRAWNULL),colorred,LINETHICK3;IF(TJ1>REF(TJ1,1),TJ1,DRAWNULL),colormagenta,LINETHICK3;IF(TJ2>REF(TJ2,1),TJ2,DRAWNULL),COLOR330099,LINETHICK4;DRAWBAND(RG,RGB(255,195,0),TJ2,RGB(16,60,57));DRAWBAND(GDG,RGB(255,29,0),RG,RGB(0,128,128));0,colorgray;0.6,colorred,POINTDOT;-0.6,colorliblue,POINTDOT;F:=CROSS(GDG,KK);DRAWICON(F,KK-0.01,11);G:=CROSS(GDG,0);DRAWICON(G,0+0.01,16);D:=CROSS(GDG,TJ2);DRAWICON(D,TJ2-0.01,5);E:=CROSS(TJ2,GDG);DRAWICON(E,TJ2+0.01,6);