ISMAININDEX:=1;
VAR1:=(2*C+O+H+L)/5;
VAR2:=MAX(REF(C,1)-L,MAX(REF(C,1)-H,H-L));
VAR3:=MA(VAR2,15);
M1:MA(VAR1,15),COLORWHITE, LINETHICK2;
M2:=(M1-VAR3),COLORWHITE,LINETHICK2;
M3:=(M1+VAR3),COLORWHITE,LINETHICK2;
M3X:M1-5,COLORWHITE,LINETHICK2;
IF(M1-REF(M1,1)>0,M1,NULL),COLORRED,LINETHICK2;
IF(M1-REF(M1,1)=0,M1,NULL),COLORWHITE,LINETHICK2;
IF(M1-REF(M1,1)<0,M1,NULL),COLORGREEN,LINETHICK2;
IF(M1-REF(M1,1)>0,M1-5,NULL),COLORRED,LINETHICK2;
IF(M1-REF(M1,1)=0,M1-5,NULL),COLORWHITE,LINETHICK2;
IF(M1-REF(M1,1)<0,M1-5,NULL),COLORGREEN,LINETHICK2;
STICKLINE1(M1-REF(M1,1)>0,M1,M1-5,0,0),COLORYELLOW;
STICKLINE1(M1-REF(M1,1)<0,M1,M1-5,0,0),COLORLIGHTRED;
STICKLINE(CROSS(M1-REF(M1,1)>0&&M2-REF(M2,1)>0&&M3-REF(M3,1)>0,0.5)&&C<M1,C,O,3,0),COLORYELLOW;
STICKLINE1(CROSS(M1-REF(M1,1)>0&&M2-REF(M2,1)>0&&M3-REF(M3,1)>0,0.5)&&C<M1,H,L,0,0), COLORYELLOW;
STICKLINE(CROSS(M1-REF(M1,1)<0&&M2-REF(M2,1)<0&&M3-REF(M3,1)<0,0.5)&&C>M1,C,O,3,0),COLORYELLOW;
STICKLINE1(CROSS(M1-REF(M1,1)<0&&M2-REF(M2,1)<0&&M3-REF(M3,1)<0,0.5)&&C>M1,H,L,0,0),COLORYELLOW;
STICKLINE(CROSS(M1-REF(M1,1)>0&&M2-REF(M2,1)>0&&M3-REF(M3,1)>0,0.5)&&C>M1,C,O,3,0),COLORMAGENTA;
STICKLINE1(CROSS(M1-REF(M1,1)>0&&M2-REF(M2,1)>0&&M3-REF(M3,1)>0,0.5)&&C>M1,H,L,0,0),COLORMAGENTA ;
STICKLINE(CROSS(M1-REF(M1,1)<0&&M2-REF(M2,1)<0&&M3-REF(M3,1)<0,0.5)&&C<M1,C,O,3,0),COLORGREEN;
STICKLINE1(CROSS(M1-REF(M1,1)<0&&M2-REF(M2,1)<0&&M3-REF(M3,1)<0,0.5)&&C<M1,H,L,0,0),COLORGREEN;