TJ1:=EVERY(L<REF(L,1),3);
TJ2:(C-REF(C,3))/REF(C,3)*100 NODRAW;
TJ3:=COUNT(C>O,3)=1 AND C>O AND C>=REF((O-C)/2+C,1);
XG1:=TJ1 AND TJ2<-4 AND TJ3;
STICKLINE(XG1,C,O,2,0),COLORLIMAGENTA;
STICKLINE(XG1,H,L,0,0),COLORLIMAGENTA;
DRAWICON(XG1,L*0.95,1);
TJ1_X:=EVERY(L<REF(L,1),3);
TJ2_X:=(C-REF(C,3))/REF(C,3)*100;
TJ3_X:=COUNT(C>O,3)=1 AND C>O AND C>=REF((O-C)/2+C,1);
XG2:=TJ1_X AND TJ2_X<-4 AND TJ3_X;
STICKLINE(XG2,0,8,1.5,0),COLORLIMAGENTA;
TJ1_XX:=EVERY(L<REF(L,1),3);
TJ2_XX:=(C-REF(C,3))/REF(C,3)*100;
TJ3_XX:=COUNT(C>O,3)=1 AND C>O AND C>=REF((O-C)/2+C,1);
XG:TJ1_XX AND TJ2_XX<-4 AND TJ3_XX;
