YN1:=CURRBARSCOUNT;
YN2:=BARSSINCE(C)+1;
YN3:=CONST(BARSSINCE(C));
H1:=REFX(H,YN3-YN2*2+2);
H2:=REF(H,YN3-YN1*2+2);
L1:=REFX(L,YN3-YN2*2+2);
L2:=REF(L,YN3-YN1*2+2);
LL:=IF(YN1>YN2,L1,L2);
HH:=IF(YN1>YN2,H1,H2);
YN4:=HH< REF(LL,1);
YN5:=YN4 AND HH< REF(LLV(LL,0),1);
YN6:=SUM(YN5,BARSSINCE(C))=1 AND YN5;
YN7:CONST(REF(IF(YN6,REF(LLV(LL,0),1),0),BARSLAST(YN6))),NODRAW;
HD:=CONST(YN7);
YN8:=REF(YN6,YN3-YN1*2+2) OR REFX(YN6,YN3-YN2*2+2);
LD:=CONST(REF(H,BARSLAST(YN8)));
YN9:REF(H,BARSLAST(YN8)),NODRAW;
STICKLINE(ISLASTBAR,YN7,REF(H,BARSLAST(YN8)),BARSLAST(YN8)*8,0),COLOR00009B;
DRAWBAND(YN7,RGB(155,0,0),REF(H,BARSLAST(YN8)),0);
PD1:=Abs(HD-LD)/MIN(HD,LD)*100< 3 AND L<=CONST(MAX(HD,LD))*1.01 AND L>CONST(MAX(HD,LD)) AND YN9<>HH AND C< O;
YN10:=LL>REF(HH,1);
YN11:=YN10 AND LL>REF(HHV(HH,0),1);
YN12:=SUM(YN11,BARSSINCE(C))=1 AND YN11;
YN13:=CONST(REF(IF(YN12,REF(HHV(HH,0),1),0),BARSLAST(YN12))),NODRAW;
YN14:=REF(YN12,YN3-YN1*2+2) OR REFX(YN12,YN3-YN2*2+2);
STICKLINE(ISLASTBAR,YN13,REF(L,BARSLAST(YN14)),BARSLAST(YN14)*8,0),COLOR54AD02;
PD2:=ABS(HD-LD)/MIN(HD,LD)*100< 3 AND L=CONST(MAX(HD,LD)) AND C< O AND YN9<>HH;
DRAWBAND(REF(L,BARSLAST(YN14)),RGB(2,173,84),YN13,0);
DRAWKLINE(H,O,L,C);
PD3:=BARSLASTCOUNT(YN9<>HH);
DRAWICON((PD1 OR PD2) AND PD3>4,L,3);
