A1:="HOUR$4$TIME";
A:=A1<>REF(A1,1);
B:=BARSLAST(A);
DRAWLINE3((0||REFX(A,1))&&C>REF(O,B),HHV(H,B+1),0,1,LLV(L,B+1),0,0),COLORLIGHTGREEN,DOT;
DRAWLINE3((0||REFX(A,1))&&C>REF(O,B),HHV(H,B+1),BARSLAST(A),1,LLV(L,B+1),BARSLAST(A),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((0||REFX(A,1))&&C>REF(O,B),HHV(H,B+1),0,1,HHV(H,B+1),BARSLAST(A),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((0||REFX(A,1))&&C>REF(O,B),LLV(L,B+1),0,1,LLV(L,B+1),BARSLAST(A),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((0||REFX(A,1))&&C<=REF(O,B),HHV(H,B+1),0,1,LLV(L,B+1),0,0),COLORLIGHTGREEN,DOT;
DRAWLINE3((0||REFX(A,1))&&C<=REF(O,B),HHV(H,B+1),BARSLAST(A),1,LLV(L,B+1),BARSLAST(A),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((0||REFX(A,1))&&C<=REF(O,B),HHV(H,B+1),0,1,HHV(H,B+1),BARSLAST(A),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((0||REFX(A,1))&&C<=REF(O,B),LLV(L,B+1),0,1,LLV(L,B+1),BARSLAST(A),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((ISLASTBAR||0)&&C>REF(O,B),HHV(H,B+1),-1*(HHV(B,BARPOS)-B),1,LLV(L,B+1),-1*(HHV(B,BARPOS)-B),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((ISLASTBAR||0)&&C>REF(O,B),HHV(H,B+1),BARSLAST(A),1,LLV(L,B+1),BARSLAST(A),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((ISLASTBAR||0)&&C>REF(O,B),HHV(H,B+1),0,1,HHV(H,B+1),BARSLAST(A),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((ISLASTBAR||0)&&C>REF(O,B),LLV(L,B+1),0,1,LLV(L,B+1),BARSLAST(A),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((ISLASTBAR||0)&&C>REF(O,B),HHV(H,B+1),0,1,HHV(H,B+1),-1*(HHV(B,BARPOS)-B),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((ISLASTBAR||0)&&C>REF(O,B),LLV(L,B+1),0,1,LLV(L,B+1),-1*(HHV(B,BARPOS)-B),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((ISLASTBAR||0)&&C<=REF(O,B),HHV(H,B+1),-1*(HHV(B,BARPOS)-B),1,LLV(L,B+1),-1*(HHV(B,BARPOS)-B),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((ISLASTBAR||0)&&C<=REF(O,B),HHV(H,B+1),BARSLAST(A),1,LLV(L,B+1),BARSLAST(A),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((ISLASTBAR||0)&&C<=REF(O,B),HHV(H,B+1),0,1,HHV(H,B+1),BARSLAST(A),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((ISLASTBAR||0)&&C<=REF(O,B),LLV(L,B+1),0,1,LLV(L,B+1),BARSLAST(A),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((ISLASTBAR||0)&&C<=REF(O,B),HHV(H,B+1),0,1,HHV(H,B+1),-1*(HHV(B,BARPOS)-B),0),COLORLIGHTGREEN,DOT;
DRAWLINE3((ISLASTBAR||0)&&C<=REF(O,B),LLV(L,B+1),0,1,LLV(L,B+1),-1*(HHV(B,BARPOS)-B),0),COLORLIGHTGREEN,DOT;
MA60:MA(C,60);
T:=EXIST(CROSS(C,MA60)||CROSSDOWN(C,MA60),BARSLAST(A)+1);
DRAWLINE3(T&&(0||REFX(A,1))&&C>REF(O,B),HHV(H,B+1),0,1,LLV(L,B+1),0,0),COLORYELLOW,DOT;
DRAWLINE3(T&&(0||REFX(A,1))&&C>REF(O,B),HHV(H,B+1),BARSLAST(A),1,LLV(L,B+1),BARSLAST(A),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(0||REFX(A,1))&&C>REF(O,B),HHV(H,B+1),0,1,HHV(H,B+1),BARSLAST(A),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(0||REFX(A,1))&&C>REF(O,B),LLV(L,B+1),0,1,LLV(L,B+1),BARSLAST(A),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(0||REFX(A,1))&&C<=REF(O,B),HHV(H,B+1),0,1,LLV(L,B+1),0,0),COLORYELLOW,DOT;
DRAWLINE3(T&&(0||REFX(A,1))&&C<=REF(O,B),HHV(H,B+1),BARSLAST(A),1,LLV(L,B+1),BARSLAST(A),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(0||REFX(A,1))&&C<=REF(O,B),HHV(H,B+1),0,1,HHV(H,B+1),BARSLAST(A),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(0||REFX(A,1))&&C<=REF(O,B),LLV(L,B+1),0,1,LLV(L,B+1),BARSLAST(A),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(ISLASTBAR||0)&&C>REF(O,B),HHV(H,B+1),-1*(HHV(B,BARPOS)-B),1,LLV(L,B+1),-1*(HHV(B,BARPOS)-B),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(ISLASTBAR||0)&&C>REF(O,B),HHV(H,B+1),BARSLAST(A),1,LLV(L,B+1),BARSLAST(A),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(ISLASTBAR||0)&&C>REF(O,B),HHV(H,B+1),0,1,HHV(H,B+1),BARSLAST(A),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(ISLASTBAR||0)&&C>REF(O,B),LLV(L,B+1),0,1,LLV(L,B+1),BARSLAST(A),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(ISLASTBAR||0)&&C>REF(O,B),HHV(H,B+1),0,1,HHV(H,B+1),-1*(HHV(B,BARPOS)-B),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(ISLASTBAR||0)&&C>REF(O,B),LLV(L,B+1),0,1,LLV(L,B+1),-1*(HHV(B,BARPOS)-B),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(ISLASTBAR||0)&&C<=REF(O,B),HHV(H,B+1),-1*(HHV(B,BARPOS)-B),1,LLV(L,B+1),-1*(HHV(B,BARPOS)-B),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(ISLASTBAR||0)&&C<=REF(O,B),HHV(H,B+1),BARSLAST(A),1,LLV(L,B+1),BARSLAST(A),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(ISLASTBAR||0)&&C<=REF(O,B),HHV(H,B+1),0,1,HHV(H,B+1),BARSLAST(A),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(ISLASTBAR||0)&&C<=REF(O,B),LLV(L,B+1),0,1,LLV(L,B+1),BARSLAST(A),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(ISLASTBAR||0)&&C<=REF(O,B),HHV(H,B+1),0,1,HHV(H,B+1),-1*(HHV(B,BARPOS)-B),0),COLORYELLOW,DOT;
DRAWLINE3(T&&(ISLASTBAR||0)&&C<=REF(O,B),LLV(L,B+1),0,1,LLV(L,B+1),-1*(HHV(B,BARPOS)-B),0),COLORYELLOW,DOT;