input : MALEN(10),CONST(0.8),ATRs(0); var : HH(0),LL(0),cnt(0); var : sum(0),CENTLINE(0),sumTR(0),ATRV(0),UPPER(0), LOWER(0); Array : CC[100](0),TH[100](0),TL[100](0); if Bdate > Bdate[1]+30 Then { HH = H; LL = L; for cnt = 1 to 99 { TH[cnt] = TH[cnt-1][1]; TL[cnt] = TL[cnt-1][1]; CC[cnt] = CC[cnt-1][1]; } } if HH > 0 and H > HH Then HH = H; if LL > 0 and L < LL Then LL = L; CC[0] = c; if CC[1] > 0 then { TH[0] = max(CC[1],HH); TL[0] = Min(CC[1],LL); } if CC[MALEN-1] > 0 then { sum = 0; for cnt = 0 to MALEN-1 { sum = sum + CC[cnt]; } CENTLINE = sum/MALEN; } if TH[MALEN-1] > 0 and TL[MALEN-1] > 0 then { sumTR = 0; for cnt = 0 to MALEN-1 { sumTR = sumTR + (TH[cnt]-TL[cnt]); } ATRV = sumTR/MALEN; UPPER=CENTLINE+(ATRV*CONST); LOWER=CENTLINE-(ATRV*CONST); PLOT1(CENTLINE,"CENTLINE"); PLOT2(UPPER,"UPPER"); PLOT3(LOWER,"LOWER"); } > 롬롬7 님이 쓴 글입니다. > 제목 : 월봉의 켈트너 채널, 볼린저 밴드 > 안녕하세요? 월봉의 켈트너 채널, 볼린저 밴드를 일봉에서 사용하고 싶은데요. 공식 도움 부탁드립니다. 너무 오래걸리시는 건이면 패스해주세요... 감사합니다~