XR:=1; XK:=5;
HH:=HHV(HIGH,XK);
LL:=LLV(LOW ,XK);
OO:=IF(XK<=1,OPEN,REF(OPEN,XK-1));
CC:=CLOSE;
XH:=CONST(IF(ISLASTBAR,IF(XR<=1,HH,REF(HH,XR-1)),DRAWNULL));
XL:=CONST(IF(ISLASTBAR,IF(XR<=1,LL,REF(LL,XR-1)),DRAWNULL));
XO:=CONST(IF(ISLASTBAR,IF(XR<=1,OO,REF(OO,XR-1)),DRAWNULL));
XC:=CONST(IF(ISLASTBAR,IF(XR<=1,CC,REF(CC,XR-1)),DRAWNULL));
STICKLINE(CURRBARSCOUNT=XR+FLOOR(XK/2) ,XH,XL,XK*4+1 ,0),COLOR333333;
STICKLINE(CURRBARSCOUNT=XR+FLOOR(XK/2) AND XC>XO,XH,XL,XK*1+0.5,0),COLOR000055;
STICKLINE(CURRBARSCOUNT=XR+FLOOR(XK/2) AND XC<XO,XH,XL,XK*1+0.5,0),COLOR551100;
STICKLINE(CURRBARSCOUNT=XR+FLOOR(XK/2) AND XC>XO,XO,XC,XK*4+0.5,0),COLOR000055;
STICKLINE(CURRBARSCOUNT=XR+FLOOR(XK/2) AND XC<XO,XO,XC,XK*4+0.5,0),COLOR551100;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
MA5:MA(C,5);