예스스탁
예스스탁 답변
2025-09-19 11:10:37.0
안녕하세요
예스스탁입니다.
input : len(14);
input : price_enable(true);
input : AD_weight(0.0);
var : AD_ratio(0),trl(0),trh(0),vol(0),alpha(0),rmav(0);
AD_ratio = (close-close[1])/TrueRange;
AD_ratio = (1-AD_weight)*AD_ratio+sin(AD_ratio)*AD_weight;
trl = min(low,close[1]);
trh = max(high,close[1]);
vol= iff(price_enable,volume*((h+l+c)/3),volume);
alpha = 1 / len ;
rmav = IFf(IsNan(rmav[1]) == true, ma(vol*AD_ratio,len) , alpha * (vol*AD_ratio) + (1 - alpha) * IFf(isnan(rmav[1])==true,0,rmav[1]));
plot1(rmav,"A/D Money Flow");
Plot2(0,"0 line");
즐거운 하루되세요
> 삼손감자 님이 쓴 글입니다.
> 제목 : 지표 변환 부탁드립니다.
> //@version=3
//@author=cI8DH
study(title="Accumulation/Distribution Money Flow (ADMF) [cI8DH]", shorttitle="ADMF [cI8DH]", precision=0)
len = input(14, minval=1, title="length") // EMA27 = SMMA/RMA14 ~ lunar month
price_enable = input(true, title="factor price (=money flow)")
AD_weight = input(0.0, minval=0.0, maxval=1.0, step=0.5, title="A/D weight (at 1 all volume is included)")
AD_ratio = nz(change(close)/tr(true)) // 'True Range' fixes issues caused by gaps in price
AD_ratio := (1-AD_weight)*AD_ratio+sign(AD_ratio)*AD_weight
trl = min(low,close[1]), trh = max(high,close[1])
vol = if price_enable
volume*hlc3
else
volume
plot(rma(vol*AD_ratio,len), style=line, color=#4477ffff, title="A/D Money Flow")
hline(0, color=#88888888, linestyle=dotted, title="0 line")