N:=158;
BBI:=(2*C+H+L+O/2)/4.5;
VARBR:=EMA(((SLOPE(BBI,18)*27)+BBI),45);
STICKLINE(VARBR<=REF(VARBR,1),REFDATE(HHV(H,N),DATE),REFDATE(LLV(L,N),DATE),5,0),COLOR300020;
STICKLINE(VARBR> REF(VARBR,1),REFDATE(HHV(H,N),DATE),REFDATE(LLV(L,N),DATE),5,0),COLOR001040;
DRAWKLINE(H,O,L,C);