• 커뮤니티
  • 질의응답
  • 예스랭귀지 Q&A

커뮤니티

수식부탁드립니다

프로필 이미지
회원
2019-02-09 15:06:25
203
글번호 126000
답변완료
#,안녕하세요 #,61185 답변수식 2)번에서 도움 요청입니다 TL라인의 색,형태,굵기 및 색채우기를 지표속성창에서 수정할수 있도록 식을 수정 부탁드립니다. 미리 감사드립니다.
지표
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2019-02-11 13:12:27

안녕하세요 예스스탁입니다. 추세선은 선사이에 색채우기가 되지 안습니다. 색상,형태,굵기만 외부변수 처리해 드립니다. input : per1(11.8),per2(23.6),per3(38.2),per4(50.0),per5(61.8),per6(76.4),per7(88.2); input : 색상1(MAGENTA),형태1(1),굵기1(0); input : 색상2(MAGENTA),형태2(5),굵기2(0); input : 색상3(MAGENTA),형태3(5),굵기3(0); input : 색상4(MAGENTA),형태4(5),굵기4(0); input : 색상5(LMAGENTA),형태5(1),굵기5(1); input : 색상6(BLUE),형태6(5),굵기6(0); input : 색상7(BLUE),형태7(5),굵기7(0); input : 색상8(BLUE),형태8(5),굵기8(0); input : 색상9(BLUE),형태9(1),굵기9(0); var : hh(0),ll(0),h1(0),l1(0),dd(0),tt(0),d1(0),t1(0); var : tl1(0),tl2(0),tl3(0),tl4(0),tl5(0),tl6(0),tl7(0),tl8(0),tl9(0); var : Tx1(0),Tx2(0),Tx3(0),Tx4(0),Tx5(0),Tx6(0),Tx7(0),tx8(0),tx9(0); if bdate > bdate[1]+30 then { hh = h; ll = l; h1 = hh[1]; l1 = ll[1]; dd = sdate[1]; tt = stime[1]; d1 = dd[1]; t1 = tt[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,sdate,stime,hh); tl2 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100)); tl3 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100)); tl4 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100)); tl5 = TL_New(dd,tt,hh-(hh-ll)*(per4/100),sdate,stime,hh-(hh-ll)*(per4/100)); tl6 = TL_New(dd,tt,hh-(hh-ll)*(per5/100),sdate,stime,hh-(hh-ll)*(per5/100)); tl7 = TL_New(dd,tt,hh-(hh-ll)*(per6/100),sdate,stime,hh-(hh-ll)*(per6/100)); tl8 = TL_New(dd,tt,hh-(hh-ll)*(per7/100),sdate,stime,hh-(hh-ll)*(per7/100)); tl9 = TL_New(dd,tt,ll,sdate,stime,ll); } if h > hh 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,sdate,stime,hh); tl2 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100)); tl3 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100)); tl4 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100)); tl5 = TL_New(dd,tt,hh-(hh-ll)*(per4/100),sdate,stime,hh-(hh-ll)*(per4/100)); tl6 = TL_New(dd,tt,hh-(hh-ll)*(per5/100),sdate,stime,hh-(hh-ll)*(per5/100)); tl7 = TL_New(dd,tt,hh-(hh-ll)*(per6/100),sdate,stime,hh-(hh-ll)*(per6/100)); tl8 = TL_New(dd,tt,hh-(hh-ll)*(per7/100),sdate,stime,hh-(hh-ll)*(per7/100)); tl9 = TL_New(dd,tt,ll,sdate,stime,ll); } if l < ll 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,sdate,stime,hh); tl2 = TL_New(dd,tt,hh-(hh-ll)*(per1/100),sdate,stime,hh-(hh-ll)*(per1/100)); tl3 = TL_New(dd,tt,hh-(hh-ll)*(per2/100),sdate,stime,hh-(hh-ll)*(per2/100)); tl4 = TL_New(dd,tt,hh-(hh-ll)*(per3/100),sdate,stime,hh-(hh-ll)*(per3/100)); tl5 = TL_New(dd,tt,hh-(hh-ll)*(per4/100),sdate,stime,hh-(hh-ll)*(per4/100)); tl6 = TL_New(dd,tt,hh-(hh-ll)*(per5/100),sdate,stime,hh-(hh-ll)*(per5/100)); tl7 = TL_New(dd,tt,hh-(hh-ll)*(per6/100),sdate,stime,hh-(hh-ll)*(per6/100)); tl8 = TL_New(dd,tt,hh-(hh-ll)*(per7/100),sdate,stime,hh-(hh-ll)*(per7/100)); tl9 = TL_New(dd,tt,ll,sdate,stime,ll); } TL_SetExtRight(tl1,true); TL_SetExtRight(tl2,true); TL_SetExtRight(tl3,true); TL_SetExtRight(tl4,true); TL_SetExtRight(tl5,true); TL_SetExtRight(tl6,true); TL_SetExtRight(tl7,true); TL_SetExtRight(tl8,true); TL_SetExtRight(tl9,true); TL_SetStyle(TL1,형태1); TL_SetStyle(TL2,형태2); TL_SetStyle(TL3,형태3); TL_SetStyle(TL4,형태4); TL_SetStyle(TL5,형태5); TL_SetStyle(TL6,형태6); TL_SetStyle(TL7,형태7); TL_SetStyle(TL8,형태8); TL_SetStyle(TL9,형태9); TL_SetColor(tl1,색상1); TL_SetColor(tl2,색상2); TL_SetColor(tl3,색상3); TL_SetColor(tl4,색상4); TL_SetColor(tl5,색상5); TL_SetColor(tl6,색상6); TL_SetColor(tl7,색상7); TL_SetColor(tl8,색상8); TL_SetColor(tl9,색상9); TL_SetSize(tl1,굵기1); TL_SetSize(tl2,굵기2); TL_SetSize(tl3,굵기3); TL_SetSize(tl4,굵기4); TL_SetSize(tl5,굵기5); TL_SetSize(tl6,굵기6); TL_SetSize(tl7,굵기7); TL_SetSize(tl8,굵기8); TL_SetSize(tl9,굵기9); Text_Delete(tx1); Text_Delete(tx2); Text_Delete(tx3); Text_Delete(tx4); Text_Delete(tx5); Text_Delete(tx6); Text_Delete(tx7); Text_Delete(tx8); Text_Delete(tx9); tx1 = Text_New(sdate,stime,hh,NumToStr(hh,2)); tx2 = Text_New(sdate,stime,hh-(hh-ll)*(Per1/100),NumToStr(Per1,2)+"% :" +NumToStr(hh-(hh-ll)*(Per1/100),2)); tx3 = Text_New(sdate,stime,hh-(hh-ll)*(Per2/100),NumToStr(Per2,2)+"% :" +NumToStr(hh-(hh-ll)*(Per2/100),2)); tx4 = Text_New(sdate,stime,hh-(hh-ll)*(Per3/100),NumToStr(Per3,2)+"% :" +NumToStr(hh-(hh-ll)*(Per3/100),2)); tx5 = Text_New(sdate,stime,hh-(hh-ll)*(Per4/100),NumToStr(Per4,2)+"% :" +NumToStr(hh-(hh-ll)*(Per4/100),2)); tx6 = Text_New(sdate,stime,hh-(hh-ll)*(Per5/100),NumToStr(Per5,2)+"% :" +NumToStr(hh-(hh-ll)*(Per5/100),2)); tx7 = Text_New(sdate,stime,hh-(hh-ll)*(Per6/100),NumToStr(Per6,2)+"% :" +NumToStr(hh-(hh-ll)*(Per6/100),2)); tx8 = Text_New(sdate,stime,hh-(hh-ll)*(Per7/100),NumToStr(Per7,2)+"% :" +NumToStr(hh-(hh-ll)*(Per7/100),2)); tx9 = Text_New(sdate,stime,ll,NumToStr(ll,2)); Text_SetStyle(tx1,1,3); Text_SetStyle(tx2,1,3); Text_SetStyle(tx3,1,3); Text_SetStyle(tx4,1,3); Text_SetStyle(tx5,1,3); Text_SetStyle(tx6,1,3); Text_SetStyle(tx7,1,3); Text_SetStyle(tx8,1,3); Text_SetStyle(tx9,1,3); Text_SetColor(tx1,BLACK); Text_SetColor(tx2,BLACK); Text_SetColor(tx3,BLACK); Text_SetColor(tx4,BLACK); Text_SetColor(tl5,BLACK); Text_SetColor(tx6,BLACK); Text_SetColor(tx7,BLACK); Text_SetColor(tx8,BLACK); Text_SetColor(tx9,BLACK); 즐거운 하루되세요 > 골든키 님이 쓴 글입니다. > 제목 : 수식부탁드립니다 > #,안녕하세요 #,61185 답변수식 2)번에서 도움 요청입니다 TL라인의 색,형태,굵기 및 색채우기를 지표속성창에서 수정할수 있도록 식을 수정 부탁드립니다. 미리 감사드립니다.
등록