
Y:=1;
HH1:=IF(Y&&H<REF(H,2) AND REF(H,1)<REF(H,2),REF(H,2),0);
LL1:=IF(Y&&L>REF(L,2) AND REF(L,1)>REF(L,2),REF(L,2),0);
HH2:=VALUEWHEN(HH1>0,HH1);
LL2:=VALUEWHEN(LL1>0,LL1);
K1:=IF(CLOSE>HH2,-3,IF(CLOSE<LL2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
W1:=K2;
W2:=OPEN-CLOSE;
HT:=IF(Y&&OPEN>CLOSE,OPEN,CLOSE);
LT:=IF(Y&&OPEN<CLOSE,OPEN,CLOSE);
JC:=CROSS(Y&&W1<0,0.5);
SC:=CROSS(Y&&W1>=0,0.5);
N3:=BARSLAST(JC)+1;
N4:=BARSLAST(SC)+1;
HH:=VALUEWHEN(SC,HHV(H,N3));
LL:=VALUEWHEN(JC,LLV(L,N4));
NH:=HHVBARS(H,N3);
NL:=LLVBARS(L,N4);
A5:=BACKSET(SC||ISLASTBAR&&Y&&W1<0,NH+1);
A6:=BACKSET(JC||ISLASTBAR&&Y&&W1>=0 ,NL+1);
DRAWLINE1(CROSS(A5,0.5),H,CROSS(A6,0.5),L,0),COLORGREEN,LINETHICK2;
DRAWLINE1(CROSS(A6,0.5),L,CROSS(A5,0.5),H,0),COLORRED,LINETHICK2;
DRAWHORIZONTALLINE( CROSS(A5,0.5)&&BACKSET(ISLASTBAR,SUMBARS(CROSS(A5,0.5),2)),IF(CROSS(A5,0.5),H,L) ,COLORYELLOW );
DRAWHORIZONTALLINE( CROSS(A6,0.5)&&BACKSET(ISLASTBAR,SUMBARS(CROSS(A6,0.5),2)),IF(CROSS(A6,0.5),L,H) ,COLORYELLOW );
DRAWCOLORKLINE(CROSS(A5,0.5)&&BACKSET(ISLASTBAR,SUMBARS(CROSS(A5,0.5),2)),COLORYELLOW,1);
DRAWCOLORKLINE(CROSS(A5,0.5)&&BACKSET(ISLASTBAR,SUMBARS(CROSS(A5,0.5),2)) AND ISDOWN,COLORBLUE,0);
DRAWCOLORKLINE(CROSS(A6,0.5)&&BACKSET(ISLASTBAR,SUMBARS(CROSS(A6,0.5),2)),COLORYELLOW,1);
DRAWCOLORKLINE(CROSS(A6,0.5)&&BACKSET(ISLASTBAR,SUMBARS(CROSS(A6,0.5),2)) AND ISDOWN,COLORBLUE,0);
