안녕하세요 예스스탁입니다. 1-1 input : P1(5),P2(20),P3(60); var : value(0),mav1(0),mav2(0),mav3(0); value = obv; mav1 = ma(value,P1); mav2 = ma(value,P2); mav3 = ma(value,P3); plot1(mav1,"이평1",iff(var2>var2[1],MAGENTA,GREEN)); plot2(mav2,"이평2",iff(var3>var3[1],MAGENTA,GREEN)); plot3(mav3,"이평3",iff(var4>var4[1],MAGENTA,GREEN)); 1-2 input : Period(20),dv(2); var : value(0),BBup(0),BBmd(0),BBdn(0); value = obv; BBmd = ma(value,Period); BBup = BBmd+std(value,Period)*dv; BBdn = BBmd-std(value,Period)*dv; plot1(BBup,"상단"); plot2(BBmd,"중단"); plot3(BBdn,"하단"); 1-3 input : short(12),long(26),sig(9); var : value(0),macdv(0),macds(0); value = obv; macdv = ema(value,short)-ema(value,long); macds = ema(macdv,sig); plot1(macdv,"macd",iff(macdv>macdv[1],red,blue)); plot2(macds,"signal"); PlotBaseLine1(0); 2-2 input : ATRPeriod(10),maPeriod(5); var : TH(0),TL(0),TR(0),ATRV(0),mav(0); TH = max(V,V[1]); TL = min(V,V[1]); TR = TH-TL; ATRV = ma(TR,ATRPeriod); mav = ma(ATRV,maPeriod); plot1(mav,"이평",iff(ATRV> ATRV[1],MAGENTA,GREEN)); 2-3 input : ATRPeriod(10),BBPeriod(0),dv(2); var : TH(0),TL(0),TR(0),ATRV(0),BBup(0),BBmd(0),BBdn(0); TH = max(V,V[1]); TL = min(V,V[1]); TR = TH-TL; ATRV = ma(TR,ATRPeriod); BBmd = ma(ATRV,BBPeriod); BBup = BBmd+std(ATRV,BBPeriod)*dv; BBdn = BBmd-std(ATRV,BBPeriod)*dv; plot1(BBup); plot2(BBmd); plot3(BBdn); 3-1 input : ADXPeriod(14); var : ADXv(0); ADXv = ADX(ADXPeriod); plot1(ADXv,"ADX",iff(ADXv > ADXv[1],RED,blue)); 3-2 input : ADXPeriod(14),maPeriod(5); var : ADXv(0),mav(0); ADXv = ADX(ADXPeriod); mav = ma(ADXV,maPeriod); plot1(mav,"이평",iff(mav > mav[1],MAGENTA,GREEN)); 3-3 input : ADXPeriod(14),BBPeriod(20),dv(2); var : ADXv(0),BBup(0),BBmd(0),BBdn(0); ADXv = ADX(ADXPeriod); BBmd = ma(ADXV,BBPeriod); BBup = BBmd + std(adxv,BBPeriod)*dv; BBdn = BBmd - std(adxv,BBPeriod)*dv; plot1(BBup); plot2(BBmd); plot3(BBdn); 3-4 input : ADXPeriod(14),short(12),long(26),sig(9); var : ADXv(0),MACDV(0),MACDS(0); ADXv = ADX(ADXPeriod); MACDV = ema(ADXV,short)-ema(ADXV,long); MACDS = ema(MACDV,sig); plot1(MACDV,"macd"); plot2(MACDS,"signal"); PlotBaseLine1(0); 4 input : short(12),long(26),VRPeriod(20),VRsig(10),P1(5),P2(20),P3(60); var : macdv(0),value(0),emaVR(0); macdv = macd(short,long); value = VR(VRPeriod); emaVR = ema(value,VRsig); if MACDV > MACDV[1] Then var1 = 1; if MACDV == MACDV[1] Then var1 = 0; if MACDV < MACDV[1] Then var1 = -1; if emaVR > emaVR[1] Then var2 = 1; if emaVR == emaVR[1] Then var2 = 0; if emaVR < emaVR[1] Then var2 = -1; var3 = var3+(var1+var2); var4 = ma(var3,P1); var5 = ma(var3,P2); var6 = ma(var3,P3); plot1(var3); plot2(var4); plot3(var5); plot4(var6); 즐거운 하루되세요 > 애널박 님이 쓴 글입니다. > 제목 : 문의드립니다. > 안녕하십니까. 최근에 보조지표의 지표를 이것저것 구현해보고 싶은데, 혼자서는 좀 어려운 것 같습니다. 1. OBV 지표값의 (1) 이동평균선(5일, 20일, 60일선 3개)(상승은 주황색, 하락은 초록색, 또는 사용자 색 깔 지정) (2) 볼린저밴드 구현 (3) MACD (MACD값이 상승은 레드, 하락은 블루, 또는 사용자 색깔 지정) 2. 거래량을 기준값으로 하여 (1) ATR 지표(ATR 지표가 상승시 레드, 하락시 블루) (2) 상기 ATR 값의 이동평균선(5일선, 사용자지정)(상승은 주황색, 하락은 초록색, 또는 사용자 색깔 지정) (3) 상기 ATR 값으로 볼린저밴드 구현 3. 가격을 기준값인 ADX 지표값으로 (1) ADX 지표(예스스탁 기제공 해주고 있는데, ADX가 상승시 레드, 하락시 블루로 수정) (2) 상기 ATR 값의 이동평균선(5일선, 사용자지정)(상승은 주황색, 하락은 초록색, 또는 사용자 색깔 지정) (3) 상기 ATR 값으로 볼린저밴드 구현 (4) MACD 4. 마지막인데, 이건 조금 깁니다. 두개의 보조지표를 가지고 합성지표를 구현해보려고 합니다. (1) 2개의 지표 : MACD(가격기준, ShortPeriod 12, LongPeriod 26), VR(Volume Ratio)(거래량 기준)의 n일 ema 값 (2) MACD 현재의 값이 직전 MACD 값보다 크면 1, 같으면 0, 낮으면 -1 (3) VR ema 현재의 값이 직전 VR ema 값보다 크면 1, 같으면 0, 낮으면 -1 (4) (2)와 (3)의 값을 더해서, 누적값으로 차트를 표시(차트가 상승은 주황색, 하락은 초록색, 또는 사용자 색깔 지정) ex. 예를 들면, MACD 값도 직전값대비 계속 상승, VR ema 값도 직전값대비 계속 상승이면, 처음에 각 1, 더해서 2, 누적으로는 첫 지표값은 2, 그 다음에는 4,6,8 이런식으로 표시됩니다) (5) 마지막으로, (4)의 값의 이동평균선(5, 20, 60일 정도, 3개 정도) 이상입니다. 내용이 좀 많네요. 감사합니다.