커뮤니티
수식문의드립니다.
2020-01-19 01:33:58
252
글번호 135249
안녕하세요.
시스템 수식 문의드립니다.
tradingwiew 에 있던 것들 중 하나인데..
에스차트에서 적용이 될지 궁금합니다.
아래수식에서 hl2는 (h+l)/2 입니다.
//Author - Rajandran R
//www.marketcalls.in
study("Supertrend V1.0 - Buy or Sell Signal", overlay = true)
Factor=input(3, minval=1,maxval = 100)
Pd=input(7, minval=1,maxval = 100)
Up=hl2-(Factor*atr(Pd))
Dn=hl2+(Factor*atr(Pd))
TrendUp=close[1]>TrendUp[1]? max(Up,TrendUp[1]) : Up
TrendDown=close[1]<TrendDown[1]? min(Dn,TrendDown[1]) : Dn
Trend = close > TrendDown[1] ? 1: close< TrendUp[1]? -1: nz(Trend[1],1)
Tsl = Trend==1? TrendUp: TrendDown
linecolor = Trend == 1 ? green : red
plot(Tsl, color = linecolor , style = line , linewidth = 2,title = "SuperTrend")
plotshape(cross(close,Tsl) and close>Tsl , "Up Arrow", shape.triangleup,location.belowbar,green,0,0)
plotshape(cross(Tsl,close) and close<Tsl , "Down Arrow", shape.triangledown , location.abovebar, red,0,0)
//plot(Trend==1 and Trend[1]==-1,color = linecolor, style = circles, linewidth = 3,title="Trend")
plotarrow(Trend == 1 and Trend[1] == -1 ? Trend : na, title="Up Entry Arrow", colorup=lime, maxheight=60, minheight=50, transp=0)
plotarrow(Trend == -1 and Trend[1] == 1 ? Trend : na, title="Down Entry Arrow", colordown=red, maxheight=60, minheight=50, transp=0)
답변 1
예스스탁 예스스탁 답변
2020-01-20 19:50:37
안녕하세요
예스스탁입니다.
input : Factor(3),Pd(7);
var : hl2(0),upv(0),dnv(0),TrendUp(0),TrendDown(0);
var : Trend(0),Tsl(0);
hl2 = (h+L)/2;
Upv=hl2-(Factor*atr(Pd));
Dnv=hl2+(Factor*atr(Pd));
TrendUp = iff(close[1] > TrendUp[1],max(Upv,TrendUp[1]),Upv);
TrendDown = iff(close[1]<TrendDown[1], min(Dnv,TrendDown[1]), Dnv);
Trend = iff(close > TrendDown[1],1,iff(close < TrendUp[1], -1,0));
Tsl = iff(Trend==1,TrendUp,TrendDown);
plot1(Tsl,"Trend",iff(Trend==1,GREEN,RED));
즐거운 하루되세요
> 롤러마스터 님이 쓴 글입니다.
> 제목 : 수식문의드립니다.
> 안녕하세요.
시스템 수식 문의드립니다.
tradingwiew 에 있던 것들 중 하나인데..
에스차트에서 적용이 될지 궁금합니다.
아래수식에서 hl2는 (h+l)/2 입니다.
//Author - Rajandran R
//www.marketcalls.in
study("Supertrend V1.0 - Buy or Sell Signal", overlay = true)
Factor=input(3, minval=1,maxval = 100)
Pd=input(7, minval=1,maxval = 100)
Up=hl2-(Factor*atr(Pd))
Dn=hl2+(Factor*atr(Pd))
TrendUp=close[1]>TrendUp[1]? max(Up,TrendUp[1]) : Up
TrendDown=close[1]<TrendDown[1]? min(Dn,TrendDown[1]) : Dn
Trend = close > TrendDown[1] ? 1: close< TrendUp[1]? -1: nz(Trend[1],1)
Tsl = Trend==1? TrendUp: TrendDown
linecolor = Trend == 1 ? green : red
plot(Tsl, color = linecolor , style = line , linewidth = 2,title = "SuperTrend")
plotshape(cross(close,Tsl) and close>Tsl , "Up Arrow", shape.triangleup,location.belowbar,green,0,0)
plotshape(cross(Tsl,close) and close<Tsl , "Down Arrow", shape.triangledown , location.abovebar, red,0,0)
//plot(Trend==1 and Trend[1]==-1,color = linecolor, style = circles, linewidth = 3,title="Trend")
plotarrow(Trend == 1 and Trend[1] == -1 ? Trend : na, title="Up Entry Arrow", colorup=lime, maxheight=60, minheight=50, transp=0)
plotarrow(Trend == -1 and Trend[1] == 1 ? Trend : na, title="Down Entry Arrow", colordown=red, maxheight=60, minheight=50, transp=0)