안녕하세요 예스스탁입니다. 1 질문이 많아 페이지가 넘어가면 놓치는 경우가 있을 수 있으므로 가능하시면 새글로 올려주시기 바랍니다. 2 틱수 초기화에 문제가 있어 수정해 드립니다. 기존 질문에 20000개 이하일때, 50000개 이상일때으로 되어 있어 수식에 if TT[1] > 20000 and TT[1] < 50000 then로 제한되어 있습니다. 원하시는 최소 최대값으로 변경하시기 바랍니다. input : 타주기분(120); var : S1(0),D1(0),TM(0),TF(0),cnt(0); Array : TT[50](0),hh[50](0),ll[50](0);; 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 타주기분 > 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 { #120분 단위 수직선 TL_New(sDate,sTime,0,sDate,sTime,999999999); #120분 단위 Ticks와 최고가 죄저가 for cnt = 49 downto 1 { TT[cnt] = TT[cnt-1]; HH[cnt] = HH[cnt-1]; LL[cnt] = LL[cnt-1]; } hh[0] = h; ll[0] = l; TT[0] = 0; } if h > hh[0] Then hh[0] = h; if L < ll[0] Then ll[0] = l; TT[0] = TT[0]+Ticks; if TT[1] > 20000 and TT[1] < 50000 then { var1 = hh[1]; Var2 = ll[1]; } if var1 > 0 and Var2 > 0 Then { plot1(var1); plot2(Var2); } } 3 수식에 모두 주석을 붙여드릴수 없습니다. 올리신 내용만 주석붙여 드립니다. 아래식에서 사용되는 TimeToMinutes함수는 봉의 시간을 0시이후 몇분이 경과했는지 리턴해주는 함수입니다. 9시이면 540리턴, 9시 30분이면 570리턴. #영업일(거래소 영업일) 변경 if Bdate != Bdate[1] Then { #첫봉의 시간(0시이후 경과분) S1 = TimeToMinutes(stime); #첫봉 날짜(달력상 날짜, 0시 기준 변경된 날짜) D1 = sdate; } #영업일 변경이후 if D1 > 0 then { #TM은 장시작후 몇분이 경과되었는지 계산해서 저장되는 변수 #봉의 날짜가 영엽일변경일과 같으면 if sdate == D1 Then #현재봉 경과분값과 영업일 첫봉의 경과분의 차이를 TM에 저장 TM = TimeToMinutes(stime)-S1; Else #영업일 변경 후 0시를 넘어가면(다음날) #현재 경과분에 24시에 해당하는 분을 더하고 영업일 첫봉의 경과분을 차감 TM = TimeToMinutes(stime)+1440-S1; #FM을 120으로 나누어 나머지를 구함 TF = TM%타주기분; 위식은 장시작후 봉을 120분 단위로 끊어서 파악하기 위한 식입니다. 장시작후 현재봉까지 몇분이 경과했는지 계산하고 해당 경과분을 (120)으로 나누어서 나머지를 구해서 나머지 값이 상승하다가 하락하면 120분 시작으로 구분합니다. 4 답변에서 지정해 드리는 배열의 갯수는 임의로 필요한 사이즈보다 크게 지정해 드리고 있습니다. 사용하시는 내용에서 필요한 사이즈로 가감하시면 됩니다. 즐거운 하루되세요 > yamu 님이 쓴 글입니다. > 제목 : 혹시 대댓글은 > 대댓글로 올린 질문은 확인을 안하시나요?? 대댓으로 질문을 했는데 글을 새로 올려야하나 해서 여ㅉ ㅓ봅니다

감사합니다 더운 날 조심히 보내세요 > 예스스탁 님이 쓴 글입니다. > 제목 : Re : 혹시 대댓글은 > 안녕하세요 예스스탁입니다. 1 질문이 많아 페이지가 넘어가면 놓치는 경우가 있을 수 있으므로 가능하시면 새글로 올려주시기 바랍니다. 2 틱수 초기화에 문제가 있어 수정해 드립니다. 기존 질문에 20000개 이하일때, 50000개 이상일때으로 되어 있어 수식에 if TT[1] > 20000 and TT[1] < 50000 then로 제한되어 있습니다. 원하시는 최소 최대값으로 변경하시기 바랍니다. input : 타주기분(120); var : S1(0),D1(0),TM(0),TF(0),cnt(0); Array : TT[50](0),hh[50](0),ll[50](0);; 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 타주기분 > 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 { #120분 단위 수직선 TL_New(sDate,sTime,0,sDate,sTime,999999999); #120분 단위 Ticks와 최고가 죄저가 for cnt = 49 downto 1 { TT[cnt] = TT[cnt-1]; HH[cnt] = HH[cnt-1]; LL[cnt] = LL[cnt-1]; } hh[0] = h; ll[0] = l; TT[0] = 0; } if h > hh[0] Then hh[0] = h; if L < ll[0] Then ll[0] = l; TT[0] = TT[0]+Ticks; if TT[1] > 20000 and TT[1] < 50000 then { var1 = hh[1]; Var2 = ll[1]; } if var1 > 0 and Var2 > 0 Then { plot1(var1); plot2(Var2); } } 3 수식에 모두 주석을 붙여드릴수 없습니다. 올리신 내용만 주석붙여 드립니다. 아래식에서 사용되는 TimeToMinutes함수는 봉의 시간을 0시이후 몇분이 경과했는지 리턴해주는 함수입니다. 9시이면 540리턴, 9시 30분이면 570리턴. #영업일(거래소 영업일) 변경 if Bdate != Bdate[1] Then { #첫봉의 시간(0시이후 경과분) S1 = TimeToMinutes(stime); #첫봉 날짜(달력상 날짜, 0시 기준 변경된 날짜) D1 = sdate; } #영업일 변경이후 if D1 > 0 then { #TM은 장시작후 몇분이 경과되었는지 계산해서 저장되는 변수 #봉의 날짜가 영엽일변경일과 같으면 if sdate == D1 Then #현재봉 경과분값과 영업일 첫봉의 경과분의 차이를 TM에 저장 TM = TimeToMinutes(stime)-S1; Else #영업일 변경 후 0시를 넘어가면(다음날) #현재 경과분에 24시에 해당하는 분을 더하고 영업일 첫봉의 경과분을 차감 TM = TimeToMinutes(stime)+1440-S1; #FM을 120으로 나누어 나머지를 구함 TF = TM%타주기분; 위식은 장시작후 봉을 120분 단위로 끊어서 파악하기 위한 식입니다. 장시작후 현재봉까지 몇분이 경과했는지 계산하고 해당 경과분을 (120)으로 나누어서 나머지를 구해서 나머지 값이 상승하다가 하락하면 120분 시작으로 구분합니다. 4 답변에서 지정해 드리는 배열의 갯수는 임의로 필요한 사이즈보다 크게 지정해 드리고 있습니다. 사용하시는 내용에서 필요한 사이즈로 가감하시면 됩니다. 즐거운 하루되세요 > yamu 님이 쓴 글입니다. > 제목 : 혹시 대댓글은 > 대댓글로 올린 질문은 확인을 안하시나요?? 대댓으로 질문을 했는데 글을 새로 올려야하나 해서 여ㅉ ㅓ봅니다