안녕하세요 예스스탁입니다. 올려주신 내용은 저희가 작성해 드리기 어렵습니다. 작성해 보는데 시간이 많이 소모됩니다. 도움을 드리지 못해 죄송합니다. 즐거운 하루되세요 > 흑수돌 님이 쓴 글입니다. > 제목 : 77747 수식 재문의 > 덧붙여 수정을 부탁드렸던 내용을 빠트리신 것 같습니다. 바쁘신 와중에도 친절히 봐주시고 항상 감사드리고 있습니다. 다시 부탁드립니다. ************ 고쳐주신 수식에 추가 덧붙여서 아래수식 upv, dnv을 (70,30을 가격에 plot1,2로 그린 것처럼) plot3,4로 가격에 표시하고 싶습니다. RSIv = RSI(RSI_Period); upv = Ma(RSIv,BB_Period) + D1 * std(RSIv,BB_Period); dnv = ma(RSIv,BB_Period) - D1 * std(RSIv,BB_Period) ; 부탁드리겠습니다. 감사합니다. Input : Length(9); Var : Counter(0), DownAmt(0), UpAmt(0), UpSum(0), DownSum(0), UpAvg(0), DownAvg(0),RSIV(0),Current(0); var : cnt1(0),current1(0),UpAmt1(0),DownAmt1(0),UpAvg1(0),DownAvg1(0),RSIv1(0); var : cnt2(0),current2(0),UpAmt2(0),DownAmt2(0),UpAvg2(0),DownAvg2(0),RSIv2(0); var : upPrice(0),dnPrice(0); If CurrentBar == 1 AND Length > 0 Then Begin UpSum = 0; DownSum = 0; For Counter = 0 To Length - 1 Begin UpAmt = C[Counter] - C[Counter+1]; If UpAmt >= 0 Then DownAmt = 0; Else Begin DownAmt = -UpAmt; UpAmt = 0; End; UpSum = UpSum + UpAmt; DownSum = DownSum + DownAmt; End; UpAvg = UpSum / Length; DownAvg = DownSum / Length; End Else If CurrentBar > 1 AND Length > 0 Then Begin UpAmt = C[0] - C[1]; If UpAmt >= 0 Then DownAmt = 0; Else Begin DownAmt = -UpAmt; UpAmt = 0; End; UpAvg = (UpAvg[1] * (Length - 1) + UpAmt) / Length; DownAvg = (DownAvg[1] * (Length - 1) + DownAmt) / Length; End; If UpAvg + DownAvg <> 0 Then RSIv = 100 * UpAvg / (UpAvg + DownAvg); Else RSIv = 0; IF rsiv[1] >= 30 AND rsiv[1] <= 70 Then { for cnt1 = 0 to 100 { Current1 = C+PriceScale*cnt1; UpAmt1 = current1 - C[1]; If UpAmt1 >= 0 Then DownAmt1 = 0; Else Begin DownAmt1 = -UpAmt1; UpAmt1 = 0; End; UpAvg1 = (UpAvg[1] * (Length - 1) + UpAmt1) / Length; DownAvg1 = (DownAvg[1] * (Length - 1) + DownAmt1) / Length; If UpAvg1 + DownAvg1 <> 0 Then RSIv1 = 100 * UpAvg1 / (UpAvg1 + DownAvg1); Else RSIv1 = 0; IF rsiv1 >= 70 Then { upPrice = CURRENT1; cnt1 = 101; } } for cnt2 = 0 to 100 { Current2 = C-PriceScale*cnt2; UpAmt2 = current2 - C[1]; If UpAmt2 >= 0 Then DownAmt2 = 0; Else Begin DownAmt2 = -UpAmt2; UpAmt2 = 0; End; UpAvg2 = (UpAvg[1] * (Length - 1) + UpAmt2) / Length; DownAvg2 = (DownAvg[1] * (Length - 1) + DownAmt2) / Length; If UpAvg2 + DownAvg2 <> 0 Then RSIv2 = 100 * UpAvg2 / (UpAvg2 + DownAvg2); Else RSIv2 = 0; IF rsiv2 <= 30 Then { dnPrice = CURRENT2; cnt2 = 101; } } plot1(upPrice); plot2(dnPrice); } 즐거운 하루되세요 > 흑수돌 님이 쓴 글입니다. > 제목 : 수식 재문의 > 지난번에 도움 받았던 수식입니다만, 깔아보니 그림과 같이 나옵니다. 하단선만 저멀리 떨어져 있는데, 어디가 잘못된 것인지 찾을 길이 없어 다시 문의드립니다. 이를 수정하고, 본 수식에 추가 덧붙여서 아래수식 upv, dnv을 (70,30을 가격에 plot1,2로 그린 것처럼) plot3,4로 가격에 표시하고 싶습니다. RSIv = RSI(RSI_Period); upv = Ma(RSIv,BB_Period) + D1 * std(RSIv,BB_Period); dnv = ma(RSIv,BB_Period) - D1 * std(RSIv,BB_Period) ; 부탁드리겠습니다. 감사합니다.