안녕하세요 예스스탁입니다. 중심선 색상은 기존색상을 그대로 사용하게 작성해 드립니다. input : 타주기분(30); var : S1(0),D1(0),TM(0),TF(0),box(0),dd(0),tt(0); var : oo(0),hh(0),ll(0),TL1(0),TL2(0),TL3(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 { dd = sDate; tt = sTime; 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); TL3 = TL_New(dd,tt,(hh+ll)/2,sDate,sTime,(hh+ll)/2); ii = 1; } Else { ii = ii +1; if h > hh Then hh = h; if l < ll Then ll = l; var1 = Round(ii/2,0); 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); TL_SetBegin(TL3,dd,tt,(hh+ll)/2); TL_SetEnd(TL3,sDate,sTime,(hh+ll)/2); } if C > oo Then clr = PINK; else if C < oo Then clr = LightBlue; Else clr = Green; Box_SetColor(box,clr); Box_SetSize(box,5); Box_SetFill(box,True);//내부채움 TL_SetColor(tl1,clr); TL_SetColor(tl2,clr); TL_SetColor(tl3,clr); TL_SetSize(TL1,5); TL_SetSize(TL2,5); } 즐거운 하루되세요 > 광팔 님이 쓴 글입니다. > 제목 : 부탁드립니다 > 안녕하세요 하기 수식 박스에 중심선(고가+저가/2)을 추가하고 싶습니다. 도움에 항상 감사드립니다. input : 타주기분(30); 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,0); 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 = PINK; else if C < oo Then clr = LightBlue; Else clr = Green; Box_SetColor(box,clr); Box_SetSize(box,5); Box_SetFill(box,True);//내부채움 TL_SetColor(tl1,clr); TL_SetColor(tl2,clr); TL_SetSize(TL1,5); TL_SetSize(TL2,5); }