안녕하세요 예스스탁입니다. 1-1 틱차트에서 타분봉 지표는 해당식 그대로 사용하셔야 합니다. 틱차트에서 분봉의 시간경계가 봉 중간에 있을 경우가 많아 틱봉에서 분봉지표는 근사값정도로 보셔야 합니다. 틱봉에서 당일봉이 모두 나오지 않아 지표가 나오지 않는 경웅이면 아래식 적용하시면 됩니다. input : 타주기분(5); var : S1(0),D1(0),TM(0),TF(0),box(0); var : oo(0),hh(0),ll(0),TL1(0),TL2(0),clr(0),ii(0); if Bdate != Bdate[1] or Index == 0 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 { oo = O; hh = H; ll = L; box = Box_New(sDate,sTime,oo,NextBarSdate,NextBarStime,c); TL1 = TL_New(sDate,sTime,max(C,oo),sDate,sTime,hh); TL2 = TL_New(sDate,sTime,min(C,oo),sDate,sTime,ll); ii = 1; } Else { ii = ii +1; if h > hh Then hh = h; if l < ll Then ll = l; var1 = Round(ii/2,1); Box_SetEnd(box,sDate,sTime,C); TL_SetBegin(TL1,sDate[var1],sTime[var1],max(c,oo)); TL_SetEnd(TL1,sDate[var1],sTime[var1],hh); TL_SetBegin(TL2,sDate[var1],sTime[var1],min(c,oo)); TL_SetEnd(TL2,sDate[var1],sTime[var1],ll); } if C > oo Then clr = Red; else if C < oo Then clr = Blue; Else clr = Green; Box_SetColor(box,clr); Box_SetSize(box,1); Box_SetFill(box,true,50,True); #박스채움 투명도 설정 0(투명) ~ 255(불투명), 마지막 True 봉 뒤 배치 TL_SetStyle(TL1,3); # 윗꼬리 아랫꼬리 점선처리 TL_SetStyle(TL2,3); # 윗꼬리 아랫꼬리 점선처리 TL_SetColor(tl1,clr); TL_SetColor(tl2,clr); } 1-2 틱봉에서 타주기틱봉을 계산하시면 아래식 이용하시면 됩니다. 50틱봉에서 150틱봉의 값은 3배이므로 N을 3으로 지정하시면 됩니다. 배수로 높은 주기만 가능합니다. input : N(3); var : S1(0),D1(0),TF(0),box(0),idx(0); var : oo(0),hh(0),ll(0),TL1(0),TL2(0),clr(0),ii(0); if Bdate != Bdate[1] Then { S1 = TimeToMinutes(stime); D1 = sdate; idx = 0; } Else idx = idx+1; if D1 > 0 then { TF = idx%N; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then { oo = O; hh = H; ll = L; box = Box_New(sDate,sTime,oo,NextBarSdate,NextBarStime,c); TL1 = TL_New(sDate,sTime,max(C,oo),sDate,sTime,hh); TL2 = TL_New(sDate,sTime,min(C,oo),sDate,sTime,ll); ii = 1; } Else { ii = ii +1; if h > hh Then hh = h; if l < ll Then ll = l; var1 = Round(ii/2,1); Box_SetEnd(box,sDate,sTime,C); TL_SetBegin(TL1,sDate[var1],sTime[var1],max(c,oo)); TL_SetEnd(TL1,sDate[var1],sTime[var1],hh); TL_SetBegin(TL2,sDate[var1],sTime[var1],min(c,oo)); TL_SetEnd(TL2,sDate[var1],sTime[var1],ll); } if C > oo Then clr = Red; else if C < oo Then clr = Blue; Else clr = Green; Box_SetColor(box,clr); Box_SetSize(box,1); Box_SetFill(box,true,50,True); #박스채움 투명도 설정 0(투명) ~ 255(불투명), 마지막 True 봉 뒤 배치 TL_SetStyle(TL1,3); # 윗꼬리 아랫꼬리 점선처리 TL_SetStyle(TL2,3); # 윗꼬리 아랫꼬리 점선처리 TL_SetColor(tl1,clr); TL_SetColor(tl2,clr); } 2 input : P(20); var : idx(0); if Bdate != Bdate[1] Then { var1 = dayopen; idx = 0; } Else { var1 = ma(c,P); idx = idx+1; } value1 = highest(var1,idx+1); value2 = Lowest(var1,idx+1); value3 = (value1+value2)/2; if CurrentDate == sdate Then { plot1(value1); plot2((value1+value3)/2); plot3(value3); plot4((value3+value2)/2); plot5(value2); } 즐거운 하루되세요 > 삼족오 님이 쓴 글입니다. > 제목 : 문의 드립니다 > 1> 아래 수식은 분봉에 적용 되는 수식입니다 틱차트에 적용 할수 있도록 수정 부탁드립니다 input : 타주기분(5); var : S1(0),D1(0),TM(0),TF(0),box(0); var : oo(0),hh(0),ll(0),TL1(0),TL2(0),clr(0),ii(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 { oo = O; hh = H; ll = L; box = Box_New(sDate,sTime,oo,NextBarSdate,NextBarStime,c); TL1 = TL_New(sDate,sTime,max(C,oo),sDate,sTime,hh); TL2 = TL_New(sDate,sTime,min(C,oo),sDate,sTime,ll); ii = 1; } Else { ii = ii +1; if h > hh Then hh = h; if l < ll Then ll = l; var1 = Round(ii/2,1); Box_SetEnd(box,sDate,sTime,C); TL_SetBegin(TL1,sDate[var1],sTime[var1],max(c,oo)); TL_SetEnd(TL1,sDate[var1],sTime[var1],hh); TL_SetBegin(TL2,sDate[var1],sTime[var1],min(c,oo)); TL_SetEnd(TL2,sDate[var1],sTime[var1],ll); } if C > oo Then clr = Red; else if C < oo Then clr = Blue; Else clr = Green; Box_SetColor(box,clr); Box_SetSize(box,1); Box_SetFill(box,true,50,True); #박스채움 투명도 설정 0(투명) ~ 255(불투명), 마지막 True 봉 뒤 배치 TL_SetStyle(TL1,3); # 윗꼬리 아랫꼬리 점선처리 TL_SetStyle(TL2,3); # 윗꼬리 아랫꼬리 점선처리 TL_SetColor(tl1,clr); TL_SetColor(tl2,clr); } ======================================= 2> 아래 수식을 해선에서 사용하려 합니다 시작시간을 국내기준으로 08시로 변경 해주세요 시간을 변경할수 있는 부분에... 표시 부탁드립니다 input : P(20); if dayindex == 0 Then var1 = dayopen; Else var1 = ma(c,P); value1 = highest(var1,dayindex+1); value2 = Lowest(var1,dayindex+1); value3 = (value1+value2)/2; if CurrentDate == sdate Then{ plot1(value1); plot2((value1+value3)/2); plot3(value3); plot4((value3+value2)/2); plot5(value2); }