커뮤니티
안녕하세요
2020-03-02 11:50:16
381
글번호 136475
study(title=ETA, shorttitle="RO", overlay=false)
source = close
length = 10
ma = sma(source,length)
devBB = stdev(source,length)
devKC = sma(tr,length)
//BB 2x
upBB = ma + devBB * 2
lowBB = ma - devBB * 2
//KC 2x
upKCWide = ma + devKC * 2
lowKCWide = ma - devKC * 2
//KC 1.5x
upKCNormal = ma + devKC * 1.5
lowKCNormal = ma - devKC * 1.5
//KC 1x
upKCNarrow = ma + devKC
lowKCNarrow = ma - devKC
OnWide = (lowBB >= lowKCWide) and (upBB <= upKCWide)
OnNormal = (lowBB >= lowKCNormal) and (upBB <= upKCNormal)
OnNarrow = (lowBB >= lowKCNarrow) and (upBB <= upKCNarrow)
OffWide = (lowBB < lowKCWide) and (upBB > upKCWide)
noS = (OnWide == false) and (OffWide == false)
//Momentum Oscillator
mom = LRL(source - avg(avg(highest(high, length), lowest(low, length)),sma(close,length)),length,0)
//Momentum histogram color
mom_color = iff( mom > 0,iff( mom > nz(mom[1]), aqua, blue),iff( mom < nz(mom[1]), red, yellow))
//Dots color
sq_color = noS ? blue : OnNarrow ? yellow : OnNormal ? red : OnWide ? orange : lime
plot(mom, title='MOM', color=mom_color, style=histogram, linewidth=5)
plot(0, title='SZ', color=sq_color, style=circles, transp=0, linewidth=3)
변환문의드립니다. 감사합니다.
답변 1
예스스탁 예스스탁 답변
2020-03-02 15:21:14
안녕하세요
예스스탁입니다.
input : length(10);
var : source(0),mav(0),devbb(0),devkc(0);
var : upbb(0),lowBB(0),upKCWide(0),lowKCWide(0),upKCNormal(0),lowKCNormal(0);
var : upKCNarrow(0),lowKCNarrow(0),OnWide(false),OnNormal(false),OnNarrow(false);
var : OffWide(false),noS(false),mom(0),mom_color(0),sq_color(0);
source = close;
if CurrentBar >= 1 then
{
mav = ma(source,length);
devBB = std(source,length);
devKC = ma(TrueRange,length);
//BB 2x
upBB = mav + devBB * 2;
lowBB = mav - devBB * 2;
//KC 2x
upKCWide = mav + devKC * 2;
lowKCWide = mav - devKC * 2;
//KC 1.5x
upKCNormal = mav + devKC * 1.5;
lowKCNormal = mav - devKC * 1.5;
//KC 1x
upKCNarrow = mav + devKC;
lowKCNarrow = mav - devKC;
OnWide = (lowBB >= lowKCWide) and (upBB <= upKCWide) ;
OnNormal = (lowBB >= lowKCNormal) and (upBB <= upKCNormal) ;
OnNarrow = (lowBB >= lowKCNarrow) and (upBB <= upKCNarrow) ;
OffWide = (lowBB < lowKCWide) and (upBB > upKCWide) ;
noS = (OnWide == false) and (OffWide == false) ;
//Momentum Oscillator
mom = LRL(source - avg(avg(highest(high, length), lowest(low, length)),ma(close,length)),length);
//Momentum histogram color
mom_color = iff( mom > 0,iff( mom > mom[1], MAGENTA, blue),iff( mom < mom[1], red, yellow));
//Dots color
sq_color = iff(noS , blue , iff( OnNarrow , yellow , iff( OnNormal , red , iff( OnWide , MAGENTA , CYAN))));
plot1(mom,"MOM",mom_color);
plot2(0,"SZ",sq_color);
}
즐거운 하루되세요
> thegin 님이 쓴 글입니다.
> 제목 : 안녕하세요
> study(title=ETA, shorttitle="RO", overlay=false)
source = close
length = 10
ma = sma(source,length)
devBB = stdev(source,length)
devKC = sma(tr,length)
//BB 2x
upBB = ma + devBB * 2
lowBB = ma - devBB * 2
//KC 2x
upKCWide = ma + devKC * 2
lowKCWide = ma - devKC * 2
//KC 1.5x
upKCNormal = ma + devKC * 1.5
lowKCNormal = ma - devKC * 1.5
//KC 1x
upKCNarrow = ma + devKC
lowKCNarrow = ma - devKC
OnWide = (lowBB >= lowKCWide) and (upBB <= upKCWide)
OnNormal = (lowBB >= lowKCNormal) and (upBB <= upKCNormal)
OnNarrow = (lowBB >= lowKCNarrow) and (upBB <= upKCNarrow)
OffWide = (lowBB < lowKCWide) and (upBB > upKCWide)
noS = (OnWide == false) and (OffWide == false)
//Momentum Oscillator
mom = LRL(source - avg(avg(highest(high, length), lowest(low, length)),sma(close,length)),length,0)
//Momentum histogram color
mom_color = iff( mom > 0,iff( mom > nz(mom[1]), aqua, blue),iff( mom < nz(mom[1]), red, yellow))
//Dots color
sq_color = noS ? blue : OnNarrow ? yellow : OnNormal ? red : OnWide ? orange : lime
plot(mom, title='MOM', color=mom_color, style=histogram, linewidth=5)
plot(0, title='SZ', color=sq_color, style=circles, transp=0, linewidth=3)
변환문의드립니다. 감사합니다.
다음글