VKP:=IF(AMOUNT=0,(C+L+H+O)/4,AMOUNT/VOL);
RR:=VKP;
D1:=20;
SMD:=5;
WIDTH:=1.5;
RCCI:=(RR-MA(RR,D1))*100/(WIDTH*STDP(RR,D1));
VD:=120;
RV:=(VOL-LLV(VOL,VD))*100/(HHV(VOL,VD)-LLV(VOL,VD));
RVB:=RV*2-100;
VM:=EMA(RVB,SMD);
CCI:RCCI,COLORFF9300,NODRAW;
V％:RV,COLORFFFB00,NODRAW;
T:100,COLORLICYAN,DOTLINE;
Ｍ:0,COLORWHITE,DOTLINE;
G:-100,COLORLICYAN,DOTLINE;
X:=VKP;
Y:=REF(X,1);
STICKLINE(C>=O AND X>=Y,-100,RVB,0.2,0),COLORRED;
STICKLINE(C<O AND X>=Y,-100,RVB,0.2,0),COLORLIRED;
STICK...

VKP:=IF(AMOUNT=0,(C+L+H+O)/4,AMOUNT/VOL);
{- - - -OBV END - - - -}
SR:=VKP-REF(VKP,1);
OBR:=IF(AMOUNT>0,AMOUNT,VOL);
OBV:=TMA(OBR*SIGN(SR),1,1);
{- - - -OBV END - - - -}
RR:=OBV;
D1:=20;
M1:=WMA(2*WMA(RR,ROUND(D1/2))-WMA(RR,D1),ROUND(SQRT(D1)));
NR:=CONST(RR);
R:RR,COLORFF9300,NODRAW;
R％:(NR-RR)*100/RR,COLORFF9300,NODRAW;
Ｈ:M1,COLORLIMAGENTA,NODRAW;
rh％：（RR-M1）*100/RR、カラーリマジェンタ、NODRAW;
O1:=M1;
O1,COLORLIMAGENTA,LINETHICK2;
IF(O1>=REF(O1,1),O1,DRAWNULL),COLORMAGENTA,LINETHICK2;
O...

{RSIとvol}
KD:=IF(PERIOD=14,2,IF(PERIOD=13,4,IF(PERIOD=4,7,IF(PERIOD=18,3,1))))
VDP:=IF(TOTALAMOUNT=0,IF(AMOUNT=0,(C+L+H)/3,AMOUNT/VOL),TOTALAMOUNT/TOTALVOL)
RR:=VDP;
D1 = 20 * KD;
LC = RR - REF(RR, 1)
TEMP1 = MAX(RR - REF(RR, 1), 0);
TEMP2 = ABS(RR - REF(RR, 1));
RSI1S := WMA（2 * WMA（TEMP1、ROUND（D1 / 2））-WMA（TEMP1、D1）、ROUND（SQRT（D1）））* 100 / WMA（2 * WMA（TEMP2、ROUND（D1 / 2））-WMA（TEMP2、D1）、ROUND（SQRT（D1）））;
VD := 60 * KD;
RV:=(VOL-LLV(VOL,VD))*100/(HHV(VOL,VD)-LLV(VOL,VD));
RVB := RV;
VMD:=5*KD;
VM:=MA(RV,V...

{VWAP}
RVWAP:=IF(TOTALAMOUNT=0,IF(AMOUNT=0,(C+L+H)/3,AMOUNT/VOL),TOTALAMOUNT/TOTALVOL);
VWAP:RVWAP,COLORBLUE,NODRAW;
O0:=RVWAP;
O0,COLORBLUE,LINETHICK2;
O0,COLORFF9300,POINTDOT,LINETHICK1;
IF(O0>=REF(O0,1) ,O0,DRAWNULL),COLORFFFB00,POINTDOT,LINETHICK1;