안녕하세요 예스스탁입니다. input : Period(14);#기본차트 RSI기간 Input : 타분봉주기(15), Length(14); #타분봉의 주기와 RSI기간 var : cnt(0),S1(0),D1(0),TM(0),TF(0); var : SigSum(0),count2(0),RSIsig(0); Var : Counter(0), DownAmt(0), UpAmt(0), UpSum(0), DownSum(0), UpAvg(0), DownAvg(0); var : idx(0), PreUpAvg(0), preDownAvg(0),RSI1(0),RSI2(0); Array : C1[100](0); RSI1 = RSI(Period); if Bdate != Bdate[1] Then { S1 = TimeToMinutes(stime); D1 = sdate; } if D1 > 0 then { if sdate == D1 Then TM = TimeToMinutes(stime)-S1; Else TM = TimeToMinutes(stime)+1440-S1; TF = TimeToMinutes(stime)%타분봉주기; if Bdate != Bdate[1] or (Bdate == Bdate[1] and 타분봉주기 > 1 and TF < TF[1]) or (Bdate == Bdate[1] and 타분봉주기 > 1 and TM >= TM[1]+타분봉주기) or (Bdate == Bdate[1] and 타분봉주기 == 1 and TM > TM[1]) Then { for cnt = 1 to 99 { C1[cnt] = C1[cnt-1][1]; } PreUpAvg = UpAvg[1]; preDownAvg = DownAvg[1]; idx = idx + 1; } C1[0] = C; If idx == Length+2 Then { UpSum = 0; DownSum = 0; For Counter = 0 To Length - 1 { UpAmt = C1[Counter] - C1[Counter+1]; If UpAmt >= 0 Then DownAmt = 0; Else{ DownAmt = -UpAmt; UpAmt = 0; } UpSum = UpSum + UpAmt; DownSum = DownSum + DownAmt; } UpAvg = UpSum / Length; DownAvg = DownSum / Length; } If idx > Length+2 Then { UpAmt = C1[0] - C1[1]; If UpAmt >= 0 Then DownAmt = 0; Else { DownAmt = -UpAmt; UpAmt = 0; } UpAvg = (PreUpAvg * (Length - 1) + UpAmt) / Length; DownAvg = (preDownAvg * (Length - 1) + DownAmt) / Length; } If UpAvg + DownAvg <> 0 Then RSI2 = 100 * UpAvg / (UpAvg + DownAvg); Else RSI2 = 0; if RSI2 > 70 Then Plot1(RSI1,"RSI",RED); else if RSI2 < 30 Then Plot1(RSI1,"RSI",BLUE); Else Plot1(RSI1,"RSI",BLACK); PlotBaseLine1(20, "기준선 30"); PlotBaseLine2(70, "기준선 70"); } 즐거운 하루되세요 > 묻어가는자 님이 쓴 글입니다. > 제목 : 타분봉 rsi 정보 > 1분봉 차트 사용 중입니다. 1분봉에서 RSI(1분봉)지표 표시에서 그 RSI 선색상을 표시할때 15분봉기준 RSI(15분봉)>70 이상이면 빨간색 RSI(15분봉)<30 이하면 파랑색, 그외는 검정색으로 표시하고 싶습니다. 매번 답변 감사드립니다. (__)