HH1:=IFELSE(HREF(L,2)&&REF(L,1)>REF(L,2),REF(L,2),0); HH2:=VALUEWHEN(HH1>0,HH1); LL2:=VALUEWHEN(LL1>0,LL1);
K1:=IFELSE(CLOSE>HH2,-3,IFELSE(CLOSE
G1:=VALUEWHEN(ISLASTBAR,G);
DRAWNUMBER(L>0,G1,G1,0,COLORCYAN); W1:=K2;
W2:=OPEN-CLOSE;
HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE); LT:=IFELSE(OPEN DRAWLINE(W1=1,HIGH,W1=1,HT,COLORCYAN); DRAWLINE(W1=1,LOW,W1=1,LT,COLORCYAN); DRAWLINE(W1=-3,HIGH,W1=-3,HT,COLORRED); DRAWLINE(W1=-3,LOW,W1=-3,LT,COLORRED); STICKLINE(W1>0,OPEN,CLOSE,COLORCYAN,1); STICKLINE(W1<=0,OPEN,CLOSE,COLORRED,1); STICKLINE(W2>0&&W1<=0,OPEN,CLOSE,COLORRED,0); STICKLINE(W2>0&&W1>0,OPEN,CLOSE,COLORCYAN,0); HH:=IFELSE(H>REF(H,1)&&H>REF(H,2)&&H>REF(H,3)&&H>REF(H,4)&&L LL:=IFELSE(H>REF(H,1)&&H>REF(H,2)&&H>REF(H,3)&&H>REF(H,4)&&L H1:=IFELSE(H>=REF(H,1)&&H>=REF(H,2)&&H>=REF(H,3)&&H>=REF(H,4)&& H>REFX(H,1)&&H>REFX(H,2)&&H>REFX(H,3)&&H>REFX(H,4),HH,0); L1:=IFELSE(L<=REF(L,1)&&L<=REF(L,2)&&L<=REF(L,3)&&L<=REF(L,4)&& L H3:=REFX(REF(H1,H2),2); L3:=REFX(REF(L1,L2),2); H4:=ZIGZAG(H3,0,0); L4:=ZIGZAG(L3,0,0); H5:=VALUEWHEN(H4REF(H4,2),HH); L5:=VALUEWHEN(L4>REF(L4,1)&&REF(L4,1)0,H5,COLORRED); POLYLINE(L5>0,L5,COLORWHITE); DRAWNUMBER(H5<>REF(H5,1),H5,H5-L5,0,COLORMAGENTA); DRAWNUMBER(L5<>REF(L5,1),L5,H5-L5,0,COLORMAGENTA); D:=VALUEWHEN(ISLASTBAR,H5); E:=VALUEWHEN(ISLASTBAR,L5); DRAWNUMBER(LOW>0,D,D,0,COLORWHITE); DRAWNUMBER(LOW>0,E,E,0,COLORWHITE); DRAWTEXT(CROSS(CLOSE,H5)||CROSS(CLOSE,L5),L,'★'); DRAWTEXT(CROSS(H5,CLOSE)||CROSS(L5,CLOSE),H,'●');