커뮤니티

전환 부탁드립니다

프로필 이미지
pop700
2024-04-03 13:26:03
1019
글번호 178230
답변완료
input : atrPeriod(20); input : factor(3.0); var : hl2(0),src(0),atrv(0),direction(0),superTrend(0); var : upperBand(0),lowerBand(0); var : prevLowerBand(0),prevUpperBand(0),prevSuperTrend(0); hl2 = (H+L)/2; src = hl2; atrv = atr(atrPeriod); upperBand = src + factor * atrv; lowerBand = src - factor * atrv; prevLowerBand = iff(IsNan(lowerBand[1])==true,0,lowerBand[1]); prevUpperBand = iff(IsNan(upperBand[1])==true,0,upperBand[1]); lowerBand = iff(lowerBand > prevLowerBand or close[1] < prevLowerBand , lowerBand , prevLowerBand); upperBand = iff(upperBand < prevUpperBand or close[1] > prevUpperBand , upperBand , prevUpperBand); prevSuperTrend = superTrend[1]; if IsNan(atrv[1]) == true Then direction = 1; else if prevSuperTrend == prevUpperBand Then direction = iff(close > upperBand , -1 , 1); else direction = iff(close < lowerBand , 1 , -1); superTrend = iff(direction == -1 , lowerBand , upperBand); input : x1(23); input : alpha(0.9); var :x2(0),xh(0),xl(0); var : a1(0),a2(0),a3(0),a4(0); var : b1(0),Buycond(False),Sellcond(False); var : xs(0),tx(0); x2 = atr(x1) * alpha ; xh = close + x2; xl = close - x2 ; var1 = ma(hl2*volume * volume, Ceiling(x1/4)) / ma(volume, Ceiling(x1/4)); var2 = ma(volume * volume, Ceiling(x1/4)) / ma(volume, Ceiling(x1/4)); var3 = ma(hl2*volume * volume, Ceiling(x1/2)) / ma(volume, Ceiling(x1/2)); var4 = ma(volume * volume, Ceiling(x1/2)) / ma(volume, Ceiling(x1/2)); a1 = var1/Var2; a2 = Var3/Var4; a3 = 2*a1-a2; a4 = ma(a3*Volume, x1) / ma(volume, x1); b1 = IFf(IsNan(b1[1]) == true, ma(close, x1) , (b1[1] * (x1 - 1) + close) / x1); buycond = a4<=xl and close>b1; sellcond = a4>=xh and close<b1; xs = iff(buycond , 1 , iff(sellcond , -1 , xs[1])); if buycond and xs != xs[1] Then { tx = text_new(sDate,sTime,L,"▲"); Text_SetColor(tx,Magenta); Text_SetStyle(tx,2,0); } if sellcond and xs != xs[1] Then { tx = text_new(sDate,sTime,H,"▼"); Text_SetColor(tx,Cyan); Text_SetStyle(tx,2,1); } plot1(ema(close,200),"Ema 200",black); plot2(ema(close,50),"EMA 50",blue); plot3(ema(close,20),"EMA 20",orange); #################################################################################### 수고 많으십니다 일전에 만들어 주신 지표인데 이 지표를 시스템지표로 만들고 싶습니다, 하단에 보조지표는 그대로 뛰우면서 챠트에서 뜨는 삼각형은 없애주시고 하단의 보조지표에서 발생하는 기울기 즉,20일과50일선이 200일선을 위로 둘 다 관통하면 매수신호 반대이면 매도신호 부탁드립니다. 보조지표가 단순히 이평선으로만 만들어진게 아닌거 같아 부득히 하게 전체를 복사해서 보내드립니다 하단에 만들어지는 보조지표대로 화살표가 뜨도록 만들어 주시면 감사하겠습니다~~
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2024-04-03 16:49:21

안녕하세요 예스스탁입니다. 하단 지표는 20,50,200 지수이평이므로 상단의 내용과는 관계없습니다. var1 = ema(close,20); var2 = ema(close,50); var3 = ema(close,200); Condition1 = var1 > Var3 and Var2 > Var3; Condition2 = var1 < Var3 and Var2 < Var3; if Condition1 == true and Condition1[1] == False Then Buy(); if Condition2 == true and Condition2[1] == False Then Sell(); 즐거운 하루되세요 > pop700 님이 쓴 글입니다. > 제목 : 전환 부탁드립니다 > input : atrPeriod(20); input : factor(3.0); var : hl2(0),src(0),atrv(0),direction(0),superTrend(0); var : upperBand(0),lowerBand(0); var : prevLowerBand(0),prevUpperBand(0),prevSuperTrend(0); hl2 = (H+L)/2; src = hl2; atrv = atr(atrPeriod); upperBand = src + factor * atrv; lowerBand = src - factor * atrv; prevLowerBand = iff(IsNan(lowerBand[1])==true,0,lowerBand[1]); prevUpperBand = iff(IsNan(upperBand[1])==true,0,upperBand[1]); lowerBand = iff(lowerBand > prevLowerBand or close[1] < prevLowerBand , lowerBand , prevLowerBand); upperBand = iff(upperBand < prevUpperBand or close[1] > prevUpperBand , upperBand , prevUpperBand); prevSuperTrend = superTrend[1]; if IsNan(atrv[1]) == true Then direction = 1; else if prevSuperTrend == prevUpperBand Then direction = iff(close > upperBand , -1 , 1); else direction = iff(close < lowerBand , 1 , -1); superTrend = iff(direction == -1 , lowerBand , upperBand); input : x1(23); input : alpha(0.9); var :x2(0),xh(0),xl(0); var : a1(0),a2(0),a3(0),a4(0); var : b1(0),Buycond(False),Sellcond(False); var : xs(0),tx(0); x2 = atr(x1) * alpha ; xh = close + x2; xl = close - x2 ; var1 = ma(hl2*volume * volume, Ceiling(x1/4)) / ma(volume, Ceiling(x1/4)); var2 = ma(volume * volume, Ceiling(x1/4)) / ma(volume, Ceiling(x1/4)); var3 = ma(hl2*volume * volume, Ceiling(x1/2)) / ma(volume, Ceiling(x1/2)); var4 = ma(volume * volume, Ceiling(x1/2)) / ma(volume, Ceiling(x1/2)); a1 = var1/Var2; a2 = Var3/Var4; a3 = 2*a1-a2; a4 = ma(a3*Volume, x1) / ma(volume, x1); b1 = IFf(IsNan(b1[1]) == true, ma(close, x1) , (b1[1] * (x1 - 1) + close) / x1); buycond = a4<=xl and close>b1; sellcond = a4>=xh and close<b1; xs = iff(buycond , 1 , iff(sellcond , -1 , xs[1])); if buycond and xs != xs[1] Then { tx = text_new(sDate,sTime,L,"▲"); Text_SetColor(tx,Magenta); Text_SetStyle(tx,2,0); } if sellcond and xs != xs[1] Then { tx = text_new(sDate,sTime,H,"▼"); Text_SetColor(tx,Cyan); Text_SetStyle(tx,2,1); } plot1(ema(close,200),"Ema 200",black); plot2(ema(close,50),"EMA 50",blue); plot3(ema(close,20),"EMA 20",orange); #################################################################################### 수고 많으십니다 일전에 만들어 주신 지표인데 이 지표를 시스템지표로 만들고 싶습니다, 하단에 보조지표는 그대로 뛰우면서 챠트에서 뜨는 삼각형은 없애주시고 하단의 보조지표에서 발생하는 기울기 즉,20일과50일선이 200일선을 위로 둘 다 관통하면 매수신호 반대이면 매도신호 부탁드립니다. 보조지표가 단순히 이평선으로만 만들어진게 아닌거 같아 부득히 하게 전체를 복사해서 보내드립니다 하단에 만들어지는 보조지표대로 화살표가 뜨도록 만들어 주시면 감사하겠습니다~~