커뮤니티
수정부탁드립니다
2017-07-18 14:12:51
88
글번호 111414
input : Per1(0),Per2(23.6),Per3(38.2),Per4(50.00),Per5(61.80),Per6(76.40),Per7(100.00);
var : HH(0),LL(0),RR(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0);
var : Tx1(0),Tx2(0),Tx3(0),Tx4(0),Tx5(0),Tx6(0),Tx7(0);
HH = dayhigh(1);
LL = daylow(1);
RR = HH-LL;
if Bdate != Bdate[1] Then{
TL_Delete(TL1);
TL_Delete(TL2);
TL_Delete(TL3);
TL_Delete(TL4);
TL_Delete(TL5);
TL_Delete(TL6);
TL_Delete(TL7);
TL1 = TL_New(sdate[1],stime[1],HH-RR*(Per1/100),Sdate,stime,HH-RR*(Per1/100));
TL2 = TL_New(sdate[1],stime[1],HH-RR*(Per2/100),Sdate,stime,HH-RR*(Per2/100));
TL3 = TL_New(sdate[1],stime[1],HH-RR*(Per3/100),Sdate,stime,HH-RR*(Per3/100));
TL4 = TL_New(sdate[1],stime[1],HH-RR*(Per4/100),Sdate,stime,HH-RR*(Per4/100));
TL5 = TL_New(sdate[1],stime[1],HH-RR*(Per5/100),Sdate,stime,HH-RR*(Per5/100));
TL6 = TL_New(sdate[1],stime[1],HH-RR*(Per6/100),Sdate,stime,HH-RR*(Per6/100));
TL7 = TL_New(sdate[1],stime[1],HH-RR*(Per7/100),Sdate,stime,HH-RR*(Per7/100));
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_SetStyle(TL1,3);
TL_SetStyle(TL2,3);
TL_SetStyle(TL3,3);
TL_SetStyle(TL4,3);
TL_SetStyle(TL5,3);
TL_SetStyle(TL6,3);
TL_SetStyle(TL7,3);
}
Text_Delete(tx1);
Text_Delete(tx2);
Text_Delete(tx3);
Text_Delete(tx4);
Text_Delete(tx5);
Text_Delete(tx6);
Text_Delete(tx7);
tx1 = Text_New(sdate,stime,HH-RR*(Per1/100),NumToStr(Per1,2)+"% :" +NumToStr(HH-RR*(Per1/100),2));
tx2 = Text_New(sdate,stime,HH-RR*(Per2/100),NumToStr(Per2,2)+"% :" +NumToStr(HH-RR*(Per2/100),2));
tx3 = Text_New(sdate,stime,HH-RR*(Per3/100),NumToStr(Per3,2)+"% :" +NumToStr(HH-RR*(Per3/100),2));
tx4 = Text_New(sdate,stime,HH-RR*(Per4/100),NumToStr(Per4,2)+"% :" +NumToStr(HH-RR*(Per4/100),2));
tx5 = Text_New(sdate,stime,HH-RR*(Per5/100),NumToStr(Per5,2)+"% :" +NumToStr(HH-RR*(Per5/100),2));
tx6 = Text_New(sdate,stime,HH-RR*(Per6/100),NumToStr(Per6,2)+"% :" +NumToStr(HH-RR*(Per6/100),2));
tx7 = Text_New(sdate,stime,HH-RR*(Per7/100),NumToStr(Per7,2)+"% :" +NumToStr(HH-RR*(Per7/100),2));
수치와점선이 하얀색으로 나오게 수정부탁드립니다~~항상감사드립니다
답변 1
예스스탁 예스스탁 답변
2017-07-18 14:53:11
안녕하세요
예스스탁입니다.
input : Per1(0),Per2(23.6),Per3(38.2),Per4(50.00),Per5(61.80),Per6(76.40),Per7(100.00);
var : HH(0),LL(0),RR(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0);
var : Tx1(0),Tx2(0),Tx3(0),Tx4(0),Tx5(0),Tx6(0),Tx7(0);
HH = dayhigh(1);
LL = daylow(1);
RR = HH-LL;
if Bdate != Bdate[1] Then{
TL_Delete(TL1);
TL_Delete(TL2);
TL_Delete(TL3);
TL_Delete(TL4);
TL_Delete(TL5);
TL_Delete(TL6);
TL_Delete(TL7);
TL1 = TL_New(sdate[1],stime[1],HH-RR*(Per1/100),Sdate,stime,HH-RR*(Per1/100));
TL2 = TL_New(sdate[1],stime[1],HH-RR*(Per2/100),Sdate,stime,HH-RR*(Per2/100));
TL3 = TL_New(sdate[1],stime[1],HH-RR*(Per3/100),Sdate,stime,HH-RR*(Per3/100));
TL4 = TL_New(sdate[1],stime[1],HH-RR*(Per4/100),Sdate,stime,HH-RR*(Per4/100));
TL5 = TL_New(sdate[1],stime[1],HH-RR*(Per5/100),Sdate,stime,HH-RR*(Per5/100));
TL6 = TL_New(sdate[1],stime[1],HH-RR*(Per6/100),Sdate,stime,HH-RR*(Per6/100));
TL7 = TL_New(sdate[1],stime[1],HH-RR*(Per7/100),Sdate,stime,HH-RR*(Per7/100));
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_SetStyle(TL1,3);
TL_SetStyle(TL2,3);
TL_SetStyle(TL3,3);
TL_SetStyle(TL4,3);
TL_SetStyle(TL5,3);
TL_SetStyle(TL6,3);
TL_SetStyle(TL7,3);
TL_SetColor(TL1,white);
TL_SetColor(TL2,white);
TL_SetColor(TL3,white);
TL_SetColor(TL4,white);
TL_SetColor(TL5,white);
TL_SetColor(TL6,white);
TL_SetColor(TL7,white);
}
Text_Delete(tx1);
Text_Delete(tx2);
Text_Delete(tx3);
Text_Delete(tx4);
Text_Delete(tx5);
Text_Delete(tx6);
Text_Delete(tx7);
tx1 = Text_New(sdate,stime,HH-RR*(Per1/100),NumToStr(Per1,2)+"% :" +NumToStr(HH-RR*(Per1/100),2));
tx2 = Text_New(sdate,stime,HH-RR*(Per2/100),NumToStr(Per2,2)+"% :" +NumToStr(HH-RR*(Per2/100),2));
tx3 = Text_New(sdate,stime,HH-RR*(Per3/100),NumToStr(Per3,2)+"% :" +NumToStr(HH-RR*(Per3/100),2));
tx4 = Text_New(sdate,stime,HH-RR*(Per4/100),NumToStr(Per4,2)+"% :" +NumToStr(HH-RR*(Per4/100),2));
tx5 = Text_New(sdate,stime,HH-RR*(Per5/100),NumToStr(Per5,2)+"% :" +NumToStr(HH-RR*(Per5/100),2));
tx6 = Text_New(sdate,stime,HH-RR*(Per6/100),NumToStr(Per6,2)+"% :" +NumToStr(HH-RR*(Per6/100),2));
tx7 = Text_New(sdate,stime,HH-RR*(Per7/100),NumToStr(Per7,2)+"% :" +NumToStr(HH-RR*(Per7/100),2));
Text_SetColor(tx1,white);
Text_SetColor(tx2,white);
Text_SetColor(tx3,white);
Text_SetColor(tx4,white);
Text_SetColor(tx5,white);
Text_SetColor(tx6,white);
Text_SetColor(tx7,white);
즐거운 하루되세요
> 장군 님이 쓴 글입니다.
> 제목 : 수정부탁드립니다
> input : Per1(0),Per2(23.6),Per3(38.2),Per4(50.00),Per5(61.80),Per6(76.40),Per7(100.00);
var : HH(0),LL(0),RR(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0);
var : Tx1(0),Tx2(0),Tx3(0),Tx4(0),Tx5(0),Tx6(0),Tx7(0);
HH = dayhigh(1);
LL = daylow(1);
RR = HH-LL;
if Bdate != Bdate[1] Then{
TL_Delete(TL1);
TL_Delete(TL2);
TL_Delete(TL3);
TL_Delete(TL4);
TL_Delete(TL5);
TL_Delete(TL6);
TL_Delete(TL7);
TL1 = TL_New(sdate[1],stime[1],HH-RR*(Per1/100),Sdate,stime,HH-RR*(Per1/100));
TL2 = TL_New(sdate[1],stime[1],HH-RR*(Per2/100),Sdate,stime,HH-RR*(Per2/100));
TL3 = TL_New(sdate[1],stime[1],HH-RR*(Per3/100),Sdate,stime,HH-RR*(Per3/100));
TL4 = TL_New(sdate[1],stime[1],HH-RR*(Per4/100),Sdate,stime,HH-RR*(Per4/100));
TL5 = TL_New(sdate[1],stime[1],HH-RR*(Per5/100),Sdate,stime,HH-RR*(Per5/100));
TL6 = TL_New(sdate[1],stime[1],HH-RR*(Per6/100),Sdate,stime,HH-RR*(Per6/100));
TL7 = TL_New(sdate[1],stime[1],HH-RR*(Per7/100),Sdate,stime,HH-RR*(Per7/100));
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_SetStyle(TL1,3);
TL_SetStyle(TL2,3);
TL_SetStyle(TL3,3);
TL_SetStyle(TL4,3);
TL_SetStyle(TL5,3);
TL_SetStyle(TL6,3);
TL_SetStyle(TL7,3);
}
Text_Delete(tx1);
Text_Delete(tx2);
Text_Delete(tx3);
Text_Delete(tx4);
Text_Delete(tx5);
Text_Delete(tx6);
Text_Delete(tx7);
tx1 = Text_New(sdate,stime,HH-RR*(Per1/100),NumToStr(Per1,2)+"% :" +NumToStr(HH-RR*(Per1/100),2));
tx2 = Text_New(sdate,stime,HH-RR*(Per2/100),NumToStr(Per2,2)+"% :" +NumToStr(HH-RR*(Per2/100),2));
tx3 = Text_New(sdate,stime,HH-RR*(Per3/100),NumToStr(Per3,2)+"% :" +NumToStr(HH-RR*(Per3/100),2));
tx4 = Text_New(sdate,stime,HH-RR*(Per4/100),NumToStr(Per4,2)+"% :" +NumToStr(HH-RR*(Per4/100),2));
tx5 = Text_New(sdate,stime,HH-RR*(Per5/100),NumToStr(Per5,2)+"% :" +NumToStr(HH-RR*(Per5/100),2));
tx6 = Text_New(sdate,stime,HH-RR*(Per6/100),NumToStr(Per6,2)+"% :" +NumToStr(HH-RR*(Per6/100),2));
tx7 = Text_New(sdate,stime,HH-RR*(Per7/100),NumToStr(Per7,2)+"% :" +NumToStr(HH-RR*(Per7/100),2));
수치와점선이 하얀색으로 나오게 수정부탁드립니다~~항상감사드립니다
다음글
이전글