안녕하세요 예스스탁입니다. 1 주봉이나 월봉의 시고저종가를 계산하는 식은 아래식 참고하시기 바랍니다. var : cnt(0); Array : MonthO[100](0),MonthC[100](0),MonthH[100](0),MonthL[100](0); Array : WeekO[100](0),WeekC[100](0),WeekH[100](0),WeekL[100](0); #월간 시고저종가 계산 if bdate > bdate[1]+30 Then{ MonthO[0] = O; MonthH[0] = H; MonthL[0] = L; for cnt = 1 to 99{ MonthO[cnt] = MonthO[cnt-1][1]; MonthH[cnt] = MonthH[cnt-1][1]; MonthL[cnt] = MonthL[cnt-1][1]; MonthC[cnt] = MonthC[cnt-1][1]; } } MonthC[0] = C; if H > MonthH[0] Then MonthH[0] = H; if L < MonthL[0] Then MonthL[0] = L; #주간 시고저종가 계산 if dayofweek(bdate) < dayofweek(bdate[1]) Then{ WeeKO[0] = O; WeekH[0] = H; WeekL[0] = L; for cnt = 1 to 99{ WeekO[cnt] = WeekO[cnt-1][1]; WeekH[cnt] = WeekH[cnt-1][1]; WeekL[cnt] = WeekL[cnt-1][1]; WeekC[cnt] = WeekC[cnt-1][1]; } } WeekC[0] = C; if H > WeekH[0] Then WeekH[0] = H; if L < WeekL[0] Then WeekL[0] = L; 2 아래는 주봉/월봉 볼린져 밴드를 그리는 식입니다. 2-1 주봉 input : Period(20),Dv(2); var : cnt(0),sum(0),mav(0),BBup(0),BBdn(0),SumSqrt(0),Counter(0),Stdv(0); Array : WeekO[100](0),WeekC[100](0),WeekH[100](0),WeekL[100](0); #주간 시고저종가 계산 if dayofweek(bdate) < dayofweek(bdate[1]) Then{ WeeKO[0] = O; WeekH[0] = H; WeekL[0] = L; for cnt = 1 to 99{ WeekO[cnt] = WeekO[cnt-1][1]; WeekH[cnt] = WeekH[cnt-1][1]; WeekL[cnt] = WeekL[cnt-1][1]; WeekC[cnt] = WeekC[cnt-1][1]; } } WeekC[0] = C; if H > WeekH[0] Then WeekH[0] = H; if L < WeekL[0] Then WeekL[0] = L; If WeekC[Period] != 0 Then { sum = 0; for cnt = 0 to Period-1{ sum = sum+WeekC[cnt]; } mav = sum/Period; SumSqrt = 0; For cnt = 0 To Period - 1 { SumSqrt = SumSqrt + (WeekC[cnt] - mav) * (WeekC[cnt] - mav); } Stdv = SquareRoot(SumSqrt / Period); BBup = mav + (Dv * Stdv); BBdn = mav - (Dv * Stdv); plot1(BBup); plot2(mav ); plot3(BBdn); } 2-2 월봉 input : Period(20),Dv(2); var : cnt(0),sum(0),mav(0),BBup(0),BBdn(0),SumSqrt(0),Counter(0),Stdv(0); Array : MonthO[100](0),MonthC[100](0),MonthH[100](0),MonthL[100](0); #월간 시고저종가 계산 if bdate > bdate[1]+30 Then{ MonthO[0] = O; MonthH[0] = H; MonthL[0] = L; for cnt = 1 to 99{ MonthO[cnt] = MonthO[cnt-1][1]; MonthH[cnt] = MonthH[cnt-1][1]; MonthL[cnt] = MonthL[cnt-1][1]; MonthC[cnt] = MonthC[cnt-1][1]; } } MonthC[0] = C; if H > MonthH[0] Then MonthH[0] = H; if L < MonthL[0] Then MonthL[0] = L; If MonthL[Period] != 0 Then { sum = 0; for cnt = 0 to Period-1{ sum = sum+MonthL[cnt]; } mav = sum/Period; SumSqrt = 0; For cnt = 0 To Period - 1 { SumSqrt = SumSqrt + (MonthL[cnt] - mav) * (MonthL[cnt] - mav); } Stdv = SquareRoot(SumSqrt / Period); BBup = mav + (Dv * Stdv); BBdn = mav - (Dv * Stdv); plot1(BBup); plot2(mav ); plot3(BBdn); } 3 파동관련 내용은 주관적인 기준들이 많은 부분이라 올리신 내용만으로 답변드기가 어렵습니다. 또한 해당 내용은 수식작성에 시간이 많이 걸려 저희가 답변드릴수 없습니다. 문의하신 내용은 게시판 검색하셔서 참고될 만한 내용을 찾으셔야 합니다. 즐거운 하루되세요 > 하늘이여o 님이 쓴 글입니다. > 제목 : 질문드립니다 > 볼밴지표를 매월 그리고 매주 고저점 기준해서 만들려고 합니다 // dayofweek(date)==5(금요일) if DayOfWeek(date) == 5 Then{ WH=max(dh,dayhigh(1), DayHigh(2), DayHigh(3), DayHigh(4)); Wl=min(dl,DayLow(1),DayLow(2),DayLow(3),DayLow(4)); } //dayofweek(date)==4(목요일) if DayOfWeek(date)==4 Then{ WH=max(dh,DayHigh(1),DayHigh(2),DayHigh(3)); Wl=min(dl,DayLow(1),DayLow(2),DayLow(3)); } //dayofweek(date)==3(수요일) if DayOfWeek(date)==3 Then{ wh=max(dh,DayHigh(1),DayHigh(2)); wl=min(dl,DayLow(1),DayLow(2)); } //DayOfWeek(date)==2(화요일) if DayOfWeek(date)==2 Then{ wh=max(dh,DayHigh(1)); wl=min(dl,DayLow(1)); } //DayOfWeek(date)==1(월요일) if DayOfWeek(date)==1 Then{ wh=max(dh); wl=min(dl); } 이런식으로 기준잡고 했는데 국선에서는 잘 적용되는거같더니 해선에서는 좀 다르네요 해선은 시간대가 달라서 다르게 잡아야 하나요?? 그리고 추가적인 질문인데요 고저점을 기준해서 어떤 선을 만들려고 합니다. 파동을 이용하고싶은데 파동 선 고저점 기준을 어디에 잡아야 할지 모르겠네요 수동으로 하면 잡을수있겠는데 프로그램으로 하자니 어떻게 해야 할지 도저히 감이 안잡힙니다. 고저점 차이가 150틱 이상 200틱 이하 경우에만 기준선이 형성되길 원하는데요 200틱이상 차이가 나면 초기화되고 다시 어느정도 상승후 형성된 저점에서 기준을 잡고 이런식으로 진행하고 싶습니다. 그런경우에 피봇을 예로 지표식좀 부탁드립니다. 질문이 복잡하네요 파동선 만드는 지표식같은거 공부할수있는 블로그나 까페 있으면 추천부탁드려요 답변부탁드립니다.