커뮤니티

문의드립니다.

프로필 이미지
플로스트
2020-10-05 20:31:17
830
글번호 142860
답변완료
안녕하세요 연휴는 잘 보내셨나요? 제가 어떻게 한번 해보려고 했는데 랭귀지 해석이 안 되어서 이렇게 지표 변환을 부탁드립니다. 아래 게시물을 보니 RSI 밴드 지표가 있어서 제가 사용하는 보조지표를 캔들과 같이 볼 수 있도록 RSI 밴드처럼 바꾸고 싶습니다. 제가 사용하는 지표와 참고용으로 RSI밴드 수식도 같이 올립니다. 참고로 제가 원하는건 중심선, 상단선, 하단선입니다. 변환 부탁드리며 미리 감사합니다. =============================== 제가 사용하는 지표 =============================== input : st_mult(2),st_period(14),len(20); var : price(0),up_lev(0),dn_lev(0),upz(0),downv(0); var : trur(0),plus(0),minus(0),sum(0),adxv(0); var : di(0),x(0),zz(0); price = (H+L)/2; up_lev = price - (st_mult * atr(st_period)); dn_lev = price + (st_mult * atr(st_period)); if CurrentBar >= 1 then { upz = up_lev-up_lev[1]; downv = -(dn_lev-dn_lev[1]); trur = (TrueRange + (len - 1) * trur) / len; var1 = iff(upz > downv and upz > 0 , upz , 0); var11 = (var1 + (len - 1) * var11) / len; plus = var11/trur; var2 = iff(downv > upz and downv > 0 , downv , 0); var22 = (var2 + (len - 1) * var22) / len; minus = var22/trur; sum = plus + minus; var3 = abs(plus - minus) / iff(sum == 0 , 1 , sum); adxv = (var3 + (len - 1) * adxv) / len; di = plus - minus; x=adxv-di*100; zz=x/-1; plot1(zz,"시그널"); plot2(20,"상단"); plot3(-20,"하단"); plot4(0,"중심"); =============================== RSI밴드지표 =============================== Input : Length(14),UpLevel(70),DnLevel(30), NxtYn(0); var : oUpBand(0),oDnBand(0),oMidLine(0); Var : Counter(0), DownAmt(0), UpAmt(0), UpSum(0), DownSum(0), UpAvg(0), DownAvg(0),MidLevel(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 Value1 = 100 * UpAvg / (UpAvg + DownAvg); Else Value1 = 0; If nxtYn == 1 Then // 다음 봉 여부가 1일 경우 { If Value1 > UpLevel Then // 상단밴드 oUpBand = (((UpLevel - 100) / UpLevel * UpAvg) + DownAvg) * (Length - 1) + C; Else oUpBand = ((UpLevel / (100 - UpLevel) * DownAvg) - UpAvg) * (Length - 1) + C; If Value1 > DnLevel Then // 하단밴드 oDnBand = (((DnLevel - 100) / DnLevel * UpAvg) + DownAvg) * (Length - 1) + C; Else oDnBand = ((DnLevel / (100 - DnLevel) * DownAvg) - UpAvg) * (Length - 1) + C; MidLevel = (UpLevel + DnLevel) / 2; // 중간라인 If Value1 > MidLevel Then oMidLine = (((MidLevel - 100) / MidLevel * UpAvg) + DownAvg) * (Length - 1) + C; Else oMidline = ((MidLevel / (100 - MidLevel) * DownAvg) - UpAvg) * (Length - 1) + C; } Else { If Value1[1] > UpLevel Then oUpBand = (((UpLevel - 100) / UpLevel * UpAvg[1]) + DownAvg[1]) * (Length - 1) + C[1]; Else oUpBand = ((UpLevel / (100 - UpLevel) * DownAvg[1]) - UpAvg[1]) * (Length - 1) + C[1]; If Value1[1] > DnLevel Then oDnBand = (((DnLevel - 100) / DnLevel * UpAvg[1]) + DownAvg[1]) * (Length - 1) + C[1]; Else oDnBand = ((DnLevel / (100 - DnLevel) * DownAvg[1]) - UpAvg[1]) * (Length - 1) + C[1]; MidLevel = (UpLevel + DnLevel) / 2; If Value1[1] > MidLevel Then oMidLine = (((MidLevel - 100) / MidLevel * UpAvg[1]) + DownAvg[1]) * (Length - 1) + C[1]; Else oMidline = ((MidLevel / (100 - MidLevel) * DownAvg[1]) - UpAvg[1]) * (Length - 1) + C[1]; } Plot1(oUpBand); Plot2(oMidLine); Plot3(oDnBand);
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2020-10-06 13:21:57

안녕하세요 예스스탁입니다. 올려주신 수식은 변환할 방법을 잘 모르겠습니다. 도움을 드리지 못해 죄송합니다. 즐거운 하루되세요 > 플로스트 님이 쓴 글입니다. > 제목 : 문의드립니다. > 안녕하세요 연휴는 잘 보내셨나요? 제가 어떻게 한번 해보려고 했는데 랭귀지 해석이 안 되어서 이렇게 지표 변환을 부탁드립니다. 아래 게시물을 보니 RSI 밴드 지표가 있어서 제가 사용하는 보조지표를 캔들과 같이 볼 수 있도록 RSI 밴드처럼 바꾸고 싶습니다. 제가 사용하는 지표와 참고용으로 RSI밴드 수식도 같이 올립니다. 참고로 제가 원하는건 중심선, 상단선, 하단선입니다. 변환 부탁드리며 미리 감사합니다. =============================== 제가 사용하는 지표 =============================== input : st_mult(2),st_period(14),len(20); var : price(0),up_lev(0),dn_lev(0),upz(0),downv(0); var : trur(0),plus(0),minus(0),sum(0),adxv(0); var : di(0),x(0),zz(0); price = (H+L)/2; up_lev = price - (st_mult * atr(st_period)); dn_lev = price + (st_mult * atr(st_period)); if CurrentBar >= 1 then { upz = up_lev-up_lev[1]; downv = -(dn_lev-dn_lev[1]); trur = (TrueRange + (len - 1) * trur) / len; var1 = iff(upz > downv and upz > 0 , upz , 0); var11 = (var1 + (len - 1) * var11) / len; plus = var11/trur; var2 = iff(downv > upz and downv > 0 , downv , 0); var22 = (var2 + (len - 1) * var22) / len; minus = var22/trur; sum = plus + minus; var3 = abs(plus - minus) / iff(sum == 0 , 1 , sum); adxv = (var3 + (len - 1) * adxv) / len; di = plus - minus; x=adxv-di*100; zz=x/-1; plot1(zz,"시그널"); plot2(20,"상단"); plot3(-20,"하단"); plot4(0,"중심"); =============================== RSI밴드지표 =============================== Input : Length(14),UpLevel(70),DnLevel(30), NxtYn(0); var : oUpBand(0),oDnBand(0),oMidLine(0); Var : Counter(0), DownAmt(0), UpAmt(0), UpSum(0), DownSum(0), UpAvg(0), DownAvg(0),MidLevel(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 Value1 = 100 * UpAvg / (UpAvg + DownAvg); Else Value1 = 0; If nxtYn == 1 Then // 다음 봉 여부가 1일 경우 { If Value1 > UpLevel Then // 상단밴드 oUpBand = (((UpLevel - 100) / UpLevel * UpAvg) + DownAvg) * (Length - 1) + C; Else oUpBand = ((UpLevel / (100 - UpLevel) * DownAvg) - UpAvg) * (Length - 1) + C; If Value1 > DnLevel Then // 하단밴드 oDnBand = (((DnLevel - 100) / DnLevel * UpAvg) + DownAvg) * (Length - 1) + C; Else oDnBand = ((DnLevel / (100 - DnLevel) * DownAvg) - UpAvg) * (Length - 1) + C; MidLevel = (UpLevel + DnLevel) / 2; // 중간라인 If Value1 > MidLevel Then oMidLine = (((MidLevel - 100) / MidLevel * UpAvg) + DownAvg) * (Length - 1) + C; Else oMidline = ((MidLevel / (100 - MidLevel) * DownAvg) - UpAvg) * (Length - 1) + C; } Else { If Value1[1] > UpLevel Then oUpBand = (((UpLevel - 100) / UpLevel * UpAvg[1]) + DownAvg[1]) * (Length - 1) + C[1]; Else oUpBand = ((UpLevel / (100 - UpLevel) * DownAvg[1]) - UpAvg[1]) * (Length - 1) + C[1]; If Value1[1] > DnLevel Then oDnBand = (((DnLevel - 100) / DnLevel * UpAvg[1]) + DownAvg[1]) * (Length - 1) + C[1]; Else oDnBand = ((DnLevel / (100 - DnLevel) * DownAvg[1]) - UpAvg[1]) * (Length - 1) + C[1]; MidLevel = (UpLevel + DnLevel) / 2; If Value1[1] > MidLevel Then oMidLine = (((MidLevel - 100) / MidLevel * UpAvg[1]) + DownAvg[1]) * (Length - 1) + C[1]; Else oMidline = ((MidLevel / (100 - MidLevel) * DownAvg[1]) - UpAvg[1]) * (Length - 1) + C[1]; } Plot1(oUpBand); Plot2(oMidLine); Plot3(oDnBand);