안녕하세요 예스스탁입니다. Input : Period(14), LPercent(30), SPercent(70); Var : Price(0),cnt(0), DownAmt(0), UpAmt(0), UpSum(0), DownSum(0), UpAvg(0), DownAvg(0),RSIV(0); Price = Bids-Asks; If CurrentBar == 1 AND Period > 0 Then Begin UpSum = 0; DownSum = 0; For cnt = 0 To Period - 1 Begin UpAmt = Price[cnt] - Price[cnt+1]; If UpAmt >= 0 Then DownAmt = 0; Else Begin DownAmt = -UpAmt; UpAmt = 0; End; UpSum = UpSum + UpAmt; DownSum = DownSum + DownAmt; End; UpAvg = UpSum / Period; DownAvg = DownSum / Period; End Else If CurrentBar > 1 AND Period > 0 Then Begin UpAmt = Price[0] - Price[1]; If UpAmt >= 0 Then DownAmt = 0; Else Begin DownAmt = -UpAmt; UpAmt = 0; End; UpAvg = (UpAvg[1] * (Period - 1) + UpAmt) / Period; DownAvg = (DownAvg[1] * (Period - 1) + DownAmt) / Period; End; If UpAvg + DownAvg <> 0 Then RSIv = 100 * UpAvg / (UpAvg + DownAvg); Else RSIv = 0; If (RSIv > LPercent) Then Buy("매수"); If (RSIv < SPercent) Then Sell("매도"); 즐거운 하루되세요 > dkfvkrh7 님이 쓴 글입니다. > 제목 : 문의 드립니다 > 항상 감사합니다 매수도 잔량(Bids-Asks)을 RSI에 적용하려 합니다 부탁 드립니다 Input : Period(14), LPercent(30), SPercent(70); Var : value(0); value = RSI((Bids-Asks),Period); If (value > LPercent) Then Buy("매수"); If (value < SPercent) Then Sell("매도");