N:=10;
HH:=HHV(HIGH,N);
LL:=LLV(LOW,N);
HH1:=BARSLAST((HH > REF(HH,1)));
LL1:=BARSLAST((LL < REF(LL,1)));
PARTLINE((HH1 < LL1),LL,COLORYELLOW),LINETHICK3;
PARTLINE((HH1 > LL1),HH,COLORBLUE),LINETHICK3;
STICKLINE((HH1 < LL1),CLOSE,OPEN,COLORRED,0);
DRAWLINE((HH1 < LL1),HIGH,(HH1 < LL1),LOW,COLORRED);
STICKLINE((HH1 > LL1),CLOSE,OPEN,COLORGREEN,0);
DRAWLINE((HH1 > LL1),HIGH,(HH1 > LL1),LOW,COLORGREEN);
HH:=HHV(HIGH,N);
LL:=LLV(LOW,N);
HH1:=BARSLAST((HH > REF(HH,1)));
LL1:=BARSLAST((LL < REF(LL,1)));
PARTLINE((HH1 < LL1),LL,COLORYELLOW),LINETHICK3;
PARTLINE((HH1 > LL1),HH,COLORBLUE),LINETHICK3;
STICKLINE((HH1 < LL1),CLOSE,OPEN,COLORRED,0);
DRAWLINE((HH1 < LL1),HIGH,(HH1 < LL1),LOW,COLORRED);
STICKLINE((HH1 > LL1),CLOSE,OPEN,COLORGREEN,0);
DRAWLINE((HH1 > LL1),HIGH,(HH1 > LL1),LOW,COLORGREEN);