PPP:=STKTYPE;//
AD:=IF(PPP=7,1,1),NODRAW;
STT:IF(DATE>250215,1,1),NODRAW;//
MA3:=MA(C,170);
HH1:=IFELSE(H<REF(H,1) AND REF(H,1)<REF(H,2),REF(H,2),0);
LL1:=IFELSE(L>REF(L,1) AND REF(L,1)>REF(L,2),REF(L,2),0);
HH2:=VALUEWHEN(HH1>0,HH1);
LL2:=VALUEWHEN(LL1>0,LL1);
HH:=HHV(HIGH,1)/10+HHV(HIGH,2)/10+HHV(HIGH,2)/10+HHV(HIGH,4)/10+HHV(HIGH,4)/10+HHV(HIGH,8)/10+HHV(HIGH,8)/10+HHV(HIGH,13)/10+HHV(HIGH,40)/10+HHV(HIGH,20)/10;
LL:=LLV(LOW,1)/10+LLV(LOW,2)/10+LLV(LOW,2)/10+LLV(LOW,4)/10+LLV(LOW,4)/10+LLV(LOW,8)/10+LLV(LOW,8)/10+LLV(LOW,13)/10+LLV(LOW,40)/10+LLV(LOW,20)/10;
H1:=IFELSE(HH<REF(HH,1) AND LL<REF(LL,1) AND REF(OPEN,1)>CLOSE AND OPEN>CLOSE AND (HHV(OPEN,0)-CLOSE)>0,REF(HH,2),0);
L1:=IFELSE(LL>REF(LL,1) AND HH>REF(HH,1) AND REF(OPEN,1)<CLOSE AND OPEN<CLOSE AND (CLOSE-LLV(OPEN,0))>0,REF(LL,2),0);
X:=DATE;
X0:=H1*STT*AD,DOT;
X00:=L1;
XXX0:=O*STT*AD,DOT;
XXX00:=C;
XXX000:=H;
XXX0000:=L;
H2:=VALUEWHEN(X0>0,X0)*STT*AD,DOT;
L2:=VALUEWHEN(X00>0,X00)*STT*AD,DOT;
K1:=IFELSE(CLOSE>H2,-3,IFELSE(CLOSE<L2,1,0));
K2:=VALUEWHEN(K1<>0,K1);
G:=IFELSE(K2=1,H2,L2);
G1:=VALUEWHEN(BARSTATUS=2,G);
DRAWNUMBER(L>0,G1,G1,0,COLORLIGHTGREEN);
DRAWNUMBER(LL>0,G1,G1,0,RGB(80,171,226)),ALIGN0,FONTSIZE20,VALIGN0;
X000:=K2*STT*AD,DOT;
TMP:=K2*STT*AD,DOT;
W1:=X000*STT*AD,DOT;
X0000:=OPEN-CLOSE*STT*AD,DOT;
W2:=X0000*STT*AD,DOT;
HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE)*STT*AD,DOT;
LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE)*STT*AD,DOT;
DRAWLINE(TMP=1 AND REF(TMP,1)=1,G,TMP=1 AND REF(TMP,1)=1,REF(G,1),COLORLIGHTGREEN),DOT;
DRAWLINE(TMP=-3 AND REF(TMP,1)=-3,G,TMP=-3 AND REF(TMP,1)=-3,REF(G,1),COLORRED),DOT;
DRAWSL(K2=1,G,0,1,0,COLORLIGHTGREEN),DOT;
DRAWSL(K2=-3,G,0,1,0,COLORRED),DOT;
DRAWTEXT(CROSS(TMP,0),HH,'空'),COLORLIGHTGREEN,FONTSIZE20;
DRAWTEXT(CROSS(0,TMP),LL,'多'),FONTSIZE20,VALIGN0,COLORRED;
N3:=BARSLAST(CROSS(W1>0,0.5))*STT*AD,DOT;
N4:=BARSLAST(CROSS(W1<=0,0.5))*STT*AD,DOT;
HH3:=IF(W1<=0,REF(HV(H,N4),N3),NULL),COLORRED,DOT;
LL3:=IF(W1>0,REF(LV(L,N3),N4),NULL),COLORLIGHTGREEN,DOT;
B:=CROSSUP(C,HH3) OR REF(ISNULL(HH3),1) AND C>HH3;
S:=CROSSDOWN(C,LL3) OR REF(ISNULL(LL3),1) AND C<LL3;