안녕하세요 예스스탁입니다. input : 타주기분(30),XAvgLen(15), HiLoLen(50), Retrace(0.382); var : S1(0),D1(0),TM(0),TF(0),cnt(0); Var: XAvg(0),HiHi(0),LoLo(0),Retracement(0),HRetrace(0),LRetrace(0); var : PreXavg(0),EP(0); Array : HH[100](0),LL[100](0); Ep = 2/(XAvgLen+1); 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 = TM%타주기분; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then { value1 = value1+1; PreXAvg = Xavg[1]; HH[0] = H; LL[0] = L; for cnt = 1 to 99 { HH[cnt] = HH[cnt-1][1]; LL[cnt] = LL[cnt-1][1]; } } if H > HH[0] Then HH[0] = H; if L < LL[0] Then LL[0] = L; if HH[HiLoLen] > 0 and LL[HiLoLen] > 0 then{ HiHi = HH[0]; LoLo = LL[0]; for cnt = 0 to HiLoLen-1 { if HH[cnt] > HiHi Then HiHi = HH[cnt]; if LL[cnt] < LoLo Then LoLo = LL[cnt]; } Retracement = (HiHi - LoLo) * Retrace; HRetrace = HiHi - Retracement; Lretrace = LoLo + Retracement; var1=c-HRetrace; var2=c-Lretrace; } if value1 <= 1 then XAvg = C; else XAvg = C * EP + PreXAvg * (1-EP); } 즐거운 하루되세요 > yes 님이 쓴 글입니다. > 제목 : 부탁드립니다. > 도움주심에 감사 드립니다. YesGlobal에서 제공하는 Fibonacci Retrace에서 일부를 변경한것 입니다. 이것을 타주기(분용)용으로 부탁 드립니다. 미리 감사 드립니다. Inputs: XAvgLen(15), HiLoLen(50), Retrace(0.382); Vars: XAvg(0),HiHi(0),LoLo(0),Retracement(0),HRetrace(0),LRetrace(0); XAvg = Ema(C, XAvgLen); HiHi = Highest(High, HiLoLen); LoLo = Lowest(Low, HiLoLen); Retracement = (HiHi - LoLo) * Retrace; HRetrace = HiHi - Retracement; Lretrace = LoLo + Retracement; var1=c-HRetrace; var2=c-Lretrace;