안녕하세요. 예스스탁 입니다. 1. 숫자 위치 옮기기 띄어쓰기를 추가해서 옮길 수 있으나, 현재 수식에서 한 번만 띄어쓰기를 하셔도 크게 이동이 되어서 수식에 적용해 드리지는 않았습니다. 필요하시면 아래와 같이 수정해 보시기 바랍니다. - (기존) Text_SetString(tx,NumToStr(value12-value11,2)); - (변경) Text_SetString(tx,NumToStr(value12-value11,2)+" "); 2. 직전 박스 대비 상승(하향) 값 표기 input : Period(110); Var:j(0),T(0); Var: date11(0),date12(0),time11(0),time12(0),TL1(0),TL(0), date21(0),date22(0),time21(0),time22(0), date31(0),date32(0),time31(0),time32(0),tx(0),tx1(0),tl4(0); Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0); Array:r[7](0),fr[7](0),TL2[7](0),TL3[7](0),TX2[7](0),TX3[7](0); var : box(0),box1(0),Tx10(0); Plot1(0); For j = 0 To 19 { HiBar[j] = HiBar[j] + 1; LoBar[j] = LoBar[j] + 1; } if crossup(c,highest(H,Period)[1]) Then T = 1; if CrossDown(c,Lowest(L,Period)[1]) Then T = -1; If T == -1 Then { Condition1 = False; If T[1] != -1 Then { For j = 18 DownTo 0 { LoVal[j+1] = LoVal[j]; LoBar[j+1] = LoBar[j]; } LoVal[0] = L; LoBar[0] = 0; date11 = date[HiBar[0]]; time11 = stime[HiBar[0]]; Value11 = HiVal[0]; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { fr[j] = LoVal[1] + ((HiVal[0] - LoVal[1]) * r[j]); } box = box_new(date11,time11,Value11,date12,time12,Value12); Box_SetColor(box,Lime); Box_SetFill(box,true,40); Text_SetSize(tx,25); if abs(value12[1]-value11[1]) < 0.7 Then Text_Delete(tx); tx = text_new(sDate,stime,value12,NumToStr(value12-value11,2)); Text_SetColor(Tx,Blue); Text_SetStyle(tx,1,0); Text_SetSize(tx,30); Text_SetBold(tx,1); if LoVal[1] > LoVal[0] Then { Condition2 = True; Tx10 = Text_new(sDate,sTime,Value12,NewLine+NewLine+NumToStr(LoVal[0]-LoVal[1],2)); Text_SetStyle(Tx10,1,0); Text_SetSize(Tx10,15); Text_SetColor(Tx10,Blue); } } If LoVal[0] > L Then { LoVal[0] = L; LoBar[0] = 0; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; date22 = date[0]; time22 = stime[0]; Box_SetEnd(box,date12,time12,Value12); Text_SetString(tx,NumToStr(value12-value11,2)); Text_SetLocation(tx,sDate,sTime,value12); if Condition2 == True Then { Text_SetString(Tx10,NewLine+NewLine+NumToStr(LoVal[0]-LoVal[1],2)); Text_SetLocation(Tx10,sDate,sTime,value12); } Else if Condition2 == False and LoVal[0] < LoVal[1] Then { Condition2 = True; Tx10 = Text_new(sDate,sTime,Value12,NewLine+NewLine+NumToStr(LoVal[0]-LoVal[1],2)); Text_SetStyle(Tx10,1,0); Text_SetSize(Tx10,15); Text_SetColor(Tx10,Blue); } } } If T == 1 Then { Condition2 = False; If T[1] != 1 Then { For j = 18 DownTo 0 { HiVal[j+1] = HiVal[j]; HiBar[j+1] = HiBar[j]; } HiVal[0] = H; HiBar[0] = 0; date11 = date[LoBar[0]]; time11 = stime[LoBar[0]]; Value11 = LoVal[0]; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; for j = 0 to 5 { fr[j] = LoVal[0] + ((HiVal[1] - LoVal[0]) * r[j]); } box = Box_New(date11,time11,Value11,date12,time12,Value12); Box_SetColor(box,Magenta); Box_SetFill(box,true,40); Text_SetSize(tx,25); if abs(value12[1]-value11[1]) < 0.7 Then Text_Delete(tx); tx = text_new(sDate,stime,value12,NumToStr(value12-value11,2)); Text_SetColor(Tx,Red); Text_SetStyle(tx,1,1); Text_SetSize(tx,30); Text_SetBold(tx,1); if HiVal[1] < Hival[0] Then { Condition1 = True; Tx10 = Text_new(sDate,sTime,Value12+(PriceScale*10),NumToStr(Hival[0]-Hival[1],2)+NewLine+NewLine); Text_SetStyle(Tx10,1,1); Text_SetSize(Tx10,15); Text_SetColor(Tx10,Red); } } If HiVal[0] < H Then { HiVal[0] = H; HiBar[0] = 0; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date32 = date[0]; time32 = stime[0]; Box_SetEnd(box,date12,time12,Value12); Text_SetString(tx,NumToStr(value12-value11,2)); Text_SetLocation(tx,sDate,sTime,value12); if Condition1 == True Then { Text_SetString(Tx10,NumToStr(Hival[0]-Hival[1],2)+NewLine+NewLine); Text_SetLocation(Tx10,sDate,sTime,Value12); } Else if Condition1 == False and Hival[1] < Hival[0] Then { Condition1 = True; Tx10 = Text_new(sDate,sTime,Value12,NumToStr(Hival[0]-Hival[1],2)+NewLine+NewLine); Text_SetStyle(Tx10,1,1); Text_SetSize(Tx10,15); Text_SetColor(Tx10,Red); } } } 새해 복 많이 받으세요. > 고성 님이 쓴 글입니다. > 제목 : 텍스트 위치 > input : Period(110); Var:j(0),T(0); Var: date11(0),date12(0),time11(0),time12(0),TL1(0),TL(0), date21(0),date22(0),time21(0),time22(0), date31(0),date32(0),time31(0),time32(0),tx(0),tx1(0),tl4(0); Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0); Array:r[7](0),fr[7](0),TL2[7](0),TL3[7](0),TX2[7](0),TX3[7](0); var : box(0),box1(0); Plot1(0); For j = 0 To 19 { HiBar[j] = HiBar[j] + 1; LoBar[j] = LoBar[j] + 1; } if crossup(c,highest(H,Period)[1]) Then T = 1; if CrossDown(c,Lowest(L,Period)[1]) Then T = -1; If T == -1 Then { If T[1] != -1 Then { For j = 18 DownTo 0 { LoVal[j+1] = LoVal[j]; LoBar[j+1] = LoBar[j]; } LoVal[0] = L; LoBar[0] = 0; date11 = date[HiBar[0]]; time11 = stime[HiBar[0]]; Value11 = HiVal[0]; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { fr[j] = LoVal[1] + ((HiVal[0] - LoVal[1]) * r[j]); } box = box_new(date11,time11,Value11,date12,time12,Value12); Box_SetColor(box,Lime); Box_SetFill(box,true,40); Text_SetSize(tx,25); if abs(value12[1]-value11[1]) < 0.7 Then Text_Delete(tx); tx = text_new(sDate,stime,value12,NumToStr(value12-value11,2)); Text_SetColor(Tx,Blue); Text_SetStyle(tx,1,0); Text_SetSize(tx,30); Text_SetBold(tx,1); } If LoVal[0] > L Then { LoVal[0] = L; LoBar[0] = 0; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; date22 = date[0]; time22 = stime[0]; Box_SetEnd(box,date12,time12,Value12); Text_SetString(tx,NumToStr(value12-value11,2)); Text_SetLocation(tx,sDate,sTime,value12); } } If T == 1 Then { If T[1] != 1 Then { For j = 18 DownTo 0 { HiVal[j+1] = HiVal[j]; HiBar[j+1] = HiBar[j]; } HiVal[0] = H; HiBar[0] = 0; date11 = date[LoBar[0]]; time11 = stime[LoBar[0]]; Value11 = LoVal[0]; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; for j = 0 to 5 { fr[j] = LoVal[0] + ((HiVal[1] - LoVal[0]) * r[j]); } box = Box_New(date11,time11,Value11,date12,time12,Value12); Box_SetColor(box,Magenta); Box_SetFill(box,true,40); Text_SetSize(tx,25); if abs(value12[1]-value11[1]) < 0.7 Then Text_Delete(tx); tx = text_new(sDate,stime,value12,NumToStr(value12-value11,2)); Text_SetColor(Tx,Red); Text_SetStyle(tx,1,1); Text_SetSize(tx,30); Text_SetBold(tx,1); } If HiVal[0] < H Then { HiVal[0] = H; HiBar[0] = 0; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date32 = date[0]; time32 = stime[0]; Box_SetEnd(box,date12,time12,Value12); Text_SetString(tx,NumToStr(value12-value11,2)); Text_SetLocation(tx,sDate,sTime,value12); } } 1.박스 크기 숫자 표시 위치를 왼쪽으로 약간만 더 옮길수 있나요? setstyle 조정으로는 한계가 있네요. 2.바로 직전 상승박스를 돌파하는 새로운 상승 박스가 나오면, 돌파한 만큼의 폭을 그때 그때 수정하면서 직전 상승박스 상단 크기 표기된 숫자 위에 포개서 추가로 같이 표기. 하향돌파하면 반대로 바로 직전 하락박스 하단의 크기 표시 밑에 포개서 추가로 같이 표기. 감사합니다