M:=0;
CL:=1;
HI:=0;
S:=IFELSE(CL,CLOSE,IFELSE(HI,HIGH,LOW)),LINETHICK3;
Z:=IFELSE(M,ZIGZAG(S,N,M),ZIGZAG(S,N,M)),LINETHICK3;
P:=PEAK(S,N,1,M);
PB:=PEAKBARS(S,N,1,M);
T:=TROUGH(S,N,1,M);
TB:=TROUGHBARS(S,N,1,M);
CHA:=IFELSE(PB<TB,P-IFELSE(PB,LLV(S,PB),P),IFELSE(TB,HHV(S,TB),T)-T);
N1:=IFELSE(M&&PB<TB,100*CHA/P,IFELSE(M&&PB>TB,100*CHA/T,CHA));
TPTJ:=(CROSS(N1,N)&&PB<TB)||(PB>TB&&TB=0&&NOT(ISLASTBAR)&&BARSLAST(CROSS(N1,N)&&PB<TB)>PB);
TTTJ:=(CROSS(N1,N)&&PB>TB)||(PB<TB&&PB=0&&NOT(ISLASTBAR)&&BARSLAST(CROSS(N1,N)&&PB>TB)>TB);
DRAWTEXT(REFX(CROSSDOWN(Z,REF(Z,1)),1),Z,'空'),COLORGREEN;
DRAWTEXT(REFX(CROSS(Z,REF(Z,1)),1),Z,'多'),VALIGN0,COLORRED;
HH:=REFX(CROSSDOWN(Z,REF(Z,1)),1);
LL:=REFX(CROSS(Z,REF(Z,1)),1);
DRAWLINE1(HH,Z,LL,Z,0),COLORCYAN,LINETHICK3;
DRAWLINE1(LL,Z,HH,Z,0),COLORMAGENTA,LINETHICK3;
COND1:=REF(BARSLAST(HH)<BARSLAST(LL),1);
COND2:=REF(BARSLAST(HH)>BARSLAST(LL),1);
DRAWLINE3(ISLASTBAR&&COND1,Z,0,ISLASTBAR&&COND1,REF(REF(Z,BARSLAST(HH)),1),REF(BARSLAST(HH),1)+1,0),COLORCYAN,LINETHICK3;
DRAWLINE3(ISLASTBAR&&COND2,Z,0,ISLASTBAR&&COND2,REF(REF(Z,BARSLAST(LL)),1),REF(BARSLAST(LL),1)+1,0),COLORMAGENTA,LINETHICK3;