안녕하세요 예스스탁입니다. 색상은 수식안에서 별도로 지정하셔야 합니다. input : per1(23.6),per2(50.0),per3(76.4),Per4(123.6),per5(176.4),per6(200); var : hh(0),ll(0),dd(0),tt(0); var : tl1(0),tl2(0),tl3(0),tl4(0),tl5(0),tl6(0),tl7(0),tl8(0),tl9(0); if bdate > bdate[1] then { hh = h; ll = l; dd = sdate[1]; tt = stime[1]; TL_Delete(tl1); TL_Delete(tl2); TL_Delete(tl3); TL_Delete(tl4); TL_Delete(tl5); TL_Delete(tl6); TL_Delete(tl7); TL_Delete(tl8); TL_Delete(tl9); tl1 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100)); tl2 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100)); tl3 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100)); tl4 = TL_New(dd,tt,hh-(hh-ll)*(per4/100),sdate,stime,hh-(hh-ll)*(per4/100)); tl5 = TL_New(dd,tt,hh-(hh-ll)*(per5/100),sdate,stime,hh-(hh-ll)*(per5/100)); tl6 = TL_New(dd,tt,hh-(hh-ll)*(per6/100),sdate,stime,hh-(hh-ll)*(per6/100)); tl7 = TL_New(dd,tt,ll+(hh-ll)*(per4/100),sdate,stime,ll+(hh-ll)*(per4/100)); tl8 = TL_New(dd,tt,ll+(hh-ll)*(per5/100),sdate,stime,ll+(hh-ll)*(per5/100)); tl9 = TL_New(dd,tt,ll+(hh-ll)*(per6/100),sdate,stime,ll+(hh-ll)*(per6/100)); } if h > hh and hh > 0 Then { hh = h; TL_Delete(tl1); TL_Delete(tl2); TL_Delete(tl3); TL_Delete(tl4); TL_Delete(tl5); TL_Delete(tl6); TL_Delete(tl7); TL_Delete(tl8); TL_Delete(tl9); tl1 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100)); tl2 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100)); tl3 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100)); tl4 = TL_New(dd,tt,hh-(hh-ll)*(per4/100),sdate,stime,hh-(hh-ll)*(per4/100)); tl5 = TL_New(dd,tt,hh-(hh-ll)*(per5/100),sdate,stime,hh-(hh-ll)*(per5/100)); tl6 = TL_New(dd,tt,hh-(hh-ll)*(per6/100),sdate,stime,hh-(hh-ll)*(per6/100)); tl7 = TL_New(dd,tt,ll+(hh-ll)*(per4/100),sdate,stime,ll+(hh-ll)*(per4/100)); tl8 = TL_New(dd,tt,ll+(hh-ll)*(per5/100),sdate,stime,ll+(hh-ll)*(per5/100)); tl9 = TL_New(dd,tt,ll+(hh-ll)*(per6/100),sdate,stime,ll+(hh-ll)*(per6/100)); } if l < ll and ll > 0 Then { ll = L; TL_Delete(tl1); TL_Delete(tl2); TL_Delete(tl3); TL_Delete(tl4); TL_Delete(tl5); TL_Delete(tl6); TL_Delete(tl7); TL_Delete(tl8); TL_Delete(tl9); tl1 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100)); tl2 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100)); tl3 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100)); tl4 = TL_New(dd,tt,hh-(hh-ll)*(per4/100),sdate,stime,hh-(hh-ll)*(per4/100)); tl5 = TL_New(dd,tt,hh-(hh-ll)*(per5/100),sdate,stime,hh-(hh-ll)*(per5/100)); tl6 = TL_New(dd,tt,hh-(hh-ll)*(per6/100),sdate,stime,hh-(hh-ll)*(per6/100)); tl7 = TL_New(dd,tt,ll+(hh-ll)*(per4/100),sdate,stime,ll+(hh-ll)*(per4/100)); tl8 = TL_New(dd,tt,ll+(hh-ll)*(per5/100),sdate,stime,ll+(hh-ll)*(per5/100)); tl9 = TL_New(dd,tt,ll+(hh-ll)*(per6/100),sdate,stime,ll+(hh-ll)*(per6/100)); } TL_SetColor(TL1,CYAN); TL_SetSize(TL1,1); TL_SetExtRight(TL1,true); TL_SetColor(TL2,WHITE); TL_SetSize(TL2,1); TL_SetExtRight(TL2,true); TL_SetColor(TL3,RED); TL_SetSize(TL3,1); TL_SetExtRight(TL3,true); TL_SetColor(TL4,CYAN); TL_SetSize(TL4,1); TL_SetExtRight(TL4,true); TL_SetColor(TL5,CYAN); TL_SetSize(TL5,1); TL_SetExtRight(TL5,true); TL_SetColor(TL6,CYAN); TL_SetSize(TL6,1); TL_SetExtRight(TL6,true); TL_SetColor(TL7,CYAN); TL_SetSize(TL7,1); TL_SetExtRight(TL7,true); TL_SetColor(TL8,CYAN); TL_SetSize(TL8,1); TL_SetExtRight(TL8,true); TL_SetColor(TL9,CYAN); TL_SetSize(TL9,1); TL_SetExtRight(TL9,true); 즐거운 하루되세요 > 유선 님이 쓴 글입니다. > 제목 : 문의드립니다 > input : per1(23.6),per2(50.0),per3(76.4); var : hh(0),ll(0),dd(0),tt(0); var : tl1(0),tl2(0),tl3(0); if bdate > bdate[1] then { hh = h; ll = l; dd = sdate[1]; tt = stime[1]; TL_Delete(tl1); TL_Delete(tl2); TL_Delete(tl3); tl1 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100)); tl2 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100)); tl3 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100)); } if h > hh and hh > 0 Then { hh = h; TL_Delete(tl1); TL_Delete(tl2); TL_Delete(tl3); tl1 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100)); tl2 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100)); tl3 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100)); } if l < ll and ll > 0 Then { ll = l; TL_Delete(tl1); TL_Delete(tl2); TL_Delete(tl3); tl1 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100)); tl2 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100)); tl3 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100)); } TL_SetColor(TL1,CYAN); TL_SetSize(TL1,1); TL_SetExtRight(TL1,true); TL_SetColor(TL2,WHITE); TL_SetSize(TL2,1); TL_SetExtRight(TL2,true); TL_SetColor(TL3,RED); TL_SetSize(TL3,1); TL_SetExtRight(TL3,true); 위수식에서 +1.236,1.764,2.0, -1.236,1.764,2.0을 추가하고십습니다 부탁드립니다