커뮤니티
수식 문의
2023-04-20 09:26:35
766
글번호 168335
안녕하세요. 아래의 수식을 예스수식으로
변환하고 싶습니다.
부탁드리겠습니다. 감사합니다.
========================================
study(title="[RS][UNTESTED]CAP Fibo Channel V2", shorttitle="[RS][UNTESTED]CFC.V2", overlay=true)
length = input(120)
Smooth = input(2), SmoothOutside = input(type=bool, defval=false)
midline = sum(avg(ohlc4,ohlc4[1]),length)/(length)//ema(ohlc4, input(6))
c = cum(close)/(1+n)
h = cum(high)/(1+n)
l = cum(low)/(1+n)
factor = avg((h-c), (c-l))// - stdev(midline, length) //<-- uncomment for psicadelic bubbling effect :p
p0 = plot(midline, color=black, linewidth=2)
//p1 = plot(midline + factor, color=black, linewidth=1, style=circles)
//p2 = plot(midline + factor * 2, color=black, linewidth=1, style=circles)
p3 = plot(ema(midline + factor * 3, SmoothOutside ? Smooth*3 : 1), color=black, linewidth=1, style=circles)
p4 = plot(ema(midline + factor * 5, SmoothOutside ? Smooth*5 : 1), color=black, linewidth=2)
p5 = plot(ema(midline + factor * 8, SmoothOutside ? Smooth*8 : 1), color=black, linewidth=1)
p6 = plot(ema(midline + factor * 13, SmoothOutside ? Smooth*13 : 1), color=black, linewidth=1, style=circles)
p7 = plot(ema(midline + factor * 21, SmoothOutside ? Smooth*21 : 1), color=black, linewidth=4)
p8 = plot(ema(midline + factor * 34, SmoothOutside ? Smooth*34 : 1), color=black, linewidth=1, style=circles)
p9 = plot(ema(midline + factor * 55, SmoothOutside ? Smooth*55 : 1), color=black, linewidth=1, style=circles)
//m1 = plot(midline - factor, color=black, linewidth=1, style=circles)
//m2 = plot(midline - factor * 2, color=black, linewidth=1, style=circles)
m3 = plot(ema(midline - factor * 3, SmoothOutside ? Smooth*3 : 1), color=black, linewidth=1, style=circles)
m4 = plot(ema(midline - factor * 5, SmoothOutside ? Smooth*5 : 1), color=black, linewidth=2)
m5 = plot(ema(midline - factor * 8, SmoothOutside ? Smooth*8 : 1), color=black, linewidth=1)
m6 = plot(ema(midline - factor * 13, SmoothOutside ? Smooth*13 : 1), color=black, linewidth=1, style=circles)
m7 = plot(ema(midline - factor * 21, SmoothOutside ? Smooth*21 : 1), color=black, linewidth=4)
m8 = plot(ema(midline - factor * 34, SmoothOutside ? Smooth*34 : 1), color=black, linewidth=1, style=circles)
m9 = plot(ema(midline - factor * 55, SmoothOutside ? Smooth*55 : 1), color=black, linewidth=1, style=circles)
fill(p3, p5, color=black, transp=80)
fill(m3, m5, color=black, transp=80)
fill(p4, p6, color=#ec8014, transp=80)
fill(m4, m7, color=#ec8014, transp=80)
fill(m4, m8, color=lime, transp=90)
fill(p4, p8, color=red, transp=90)
fill(p6,p7, color=maroon, transp=60)
fill(m6,m7, color=green, transp=60)
답변 1
예스스탁 예스스탁 답변
2023-04-20 13:03:19
안녕하세요
예스스탁입니다.
input : length(120),Smooth(2),SmoothOutside(false),n(10);
var : midline(0);
var : cc(0),hh(0),ll(0),factor(0);
var1 = (o+h+l+c)/4;
midline = ma(avg(var1,var1[1]),length);
cc = Accum(close)/(1+CurrentBar);
hh = Accum(high)/(1+CurrentBar);
ll = Accum(low)/(1+CurrentBar);
factor = avg((hh-cc), (cc-ll));
plot1(midline,"p0",black);
plot2(ema(midline + factor * 3, iff(SmoothOutside , Smooth*3 , 1)),"p3", black);
plot3(ema(midline + factor * 5, iff(SmoothOutside , Smooth*5 , 1)),"p4", black);
plot4(ema(midline + factor * 8, iff(SmoothOutside , Smooth*8 , 1)),"p5", black);
plot5(ema(midline + factor * 13, iff(SmoothOutside , Smooth*13 , 1)),"p6", black);
plot6(ema(midline + factor * 21, iff(SmoothOutside , Smooth*21 , 1)),"p7", black);
plot7(ema(midline + factor * 34, iff(SmoothOutside , Smooth*34 , 1)),"p8", black);
plot8(ema(midline + factor * 55, iff(SmoothOutside , Smooth*55 , 1)),"p9", black);
plot9(ema(midline - factor * 3, iff(SmoothOutside , Smooth*3 , 1)),"m3", black);
plot10(ema(midline - factor * 5, iff(SmoothOutside , Smooth*5 , 1)),"m4", black);
plot11(ema(midline - factor * 8, iff(SmoothOutside , Smooth*8 , 1)),"m5", black);
plot12(ema(midline - factor * 13, iff(SmoothOutside , Smooth*13 , 1)),"m6", black);
plot13(ema(midline - factor * 21, iff(SmoothOutside , Smooth*21 , 1)),"m7", black);
plot14(ema(midline - factor * 34, iff(SmoothOutside , Smooth*34 , 1)),"m8", black);
plot15(ema(midline - factor * 55, iff(SmoothOutside , Smooth*55 , 1)),"m9", black);
즐거운 하루되세요
> 흑수돌 님이 쓴 글입니다.
> 제목 : 수식 문의
> 안녕하세요. 아래의 수식을 예스수식으로
변환하고 싶습니다.
부탁드리겠습니다. 감사합니다.
========================================
study(title="[RS][UNTESTED]CAP Fibo Channel V2", shorttitle="[RS][UNTESTED]CFC.V2", overlay=true)
length = input(120)
Smooth = input(2), SmoothOutside = input(type=bool, defval=false)
midline = sum(avg(ohlc4,ohlc4[1]),length)/(length)//ema(ohlc4, input(6))
c = cum(close)/(1+n)
h = cum(high)/(1+n)
l = cum(low)/(1+n)
factor = avg((h-c), (c-l))// - stdev(midline, length) //<-- uncomment for psicadelic bubbling effect :p
p0 = plot(midline, color=black, linewidth=2)
//p1 = plot(midline + factor, color=black, linewidth=1, style=circles)
//p2 = plot(midline + factor * 2, color=black, linewidth=1, style=circles)
p3 = plot(ema(midline + factor * 3, SmoothOutside ? Smooth*3 : 1), color=black, linewidth=1, style=circles)
p4 = plot(ema(midline + factor * 5, SmoothOutside ? Smooth*5 : 1), color=black, linewidth=2)
p5 = plot(ema(midline + factor * 8, SmoothOutside ? Smooth*8 : 1), color=black, linewidth=1)
p6 = plot(ema(midline + factor * 13, SmoothOutside ? Smooth*13 : 1), color=black, linewidth=1, style=circles)
p7 = plot(ema(midline + factor * 21, SmoothOutside ? Smooth*21 : 1), color=black, linewidth=4)
p8 = plot(ema(midline + factor * 34, SmoothOutside ? Smooth*34 : 1), color=black, linewidth=1, style=circles)
p9 = plot(ema(midline + factor * 55, SmoothOutside ? Smooth*55 : 1), color=black, linewidth=1, style=circles)
//m1 = plot(midline - factor, color=black, linewidth=1, style=circles)
//m2 = plot(midline - factor * 2, color=black, linewidth=1, style=circles)
m3 = plot(ema(midline - factor * 3, SmoothOutside ? Smooth*3 : 1), color=black, linewidth=1, style=circles)
m4 = plot(ema(midline - factor * 5, SmoothOutside ? Smooth*5 : 1), color=black, linewidth=2)
m5 = plot(ema(midline - factor * 8, SmoothOutside ? Smooth*8 : 1), color=black, linewidth=1)
m6 = plot(ema(midline - factor * 13, SmoothOutside ? Smooth*13 : 1), color=black, linewidth=1, style=circles)
m7 = plot(ema(midline - factor * 21, SmoothOutside ? Smooth*21 : 1), color=black, linewidth=4)
m8 = plot(ema(midline - factor * 34, SmoothOutside ? Smooth*34 : 1), color=black, linewidth=1, style=circles)
m9 = plot(ema(midline - factor * 55, SmoothOutside ? Smooth*55 : 1), color=black, linewidth=1, style=circles)
fill(p3, p5, color=black, transp=80)
fill(m3, m5, color=black, transp=80)
fill(p4, p6, color=#ec8014, transp=80)
fill(m4, m7, color=#ec8014, transp=80)
fill(m4, m8, color=lime, transp=90)
fill(p4, p8, color=red, transp=90)
fill(p6,p7, color=maroon, transp=60)
fill(m6,m7, color=green, transp=60)
다음글
이전글