커뮤니티
문의드립니다
2017-02-17 06:50:10
130
글번호 106928
1)input : Per1(23.6),Per2(38.2),Per3(50.0),Per4(61.8),Per5(76.4);
var : HH(0),LL(0),DD(0),TT(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0);
var : TL11(0),TL12(0),TL13(0),TL14(0),TL15(0),TL16(0),TL17(0);
if DayOfWeek(bdate) < DayOfWeek(bdate[1]) and bdate != bdate[1] Then{
HH = H;
LL = L;
DD = sdate;
TT = stime;
if HH[1] > 0 and LL[1] > 0 then{
TL11 = TL_New(DD[1],TT[1],HH[1],sdate[1],stime[1],HH[1]);
TL12 = TL_New(DD[1],TT[1],var1[1],sdate[1],stime[1],var1[1]);
TL13 = TL_New(DD[1],TT[1],var2[1],sdate[1],stime[1],var2[1]);
TL14 = TL_New(DD[1],TT[1],var3[1],sdate[1],stime[1],var3[1]);
TL15 = TL_New(DD[1],TT[1],var4[1],sdate[1],stime[1],var4[1]);
TL16 = TL_New(DD[1],TT[1],var5[1],sdate[1],stime[1],var5[1]);
TL17 = TL_New(DD[1],TT[1],LL[1],sdate[1],stime[1],LL[1]);
}
}
if H > HH Then
HH = H;
if L < LL Then
LL = L;
var1 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per1/100));
var2 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per2/100));
var3 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per3/100));
var4 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per4/100));
var5 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per5/100));
TL_Delete(TL1);
TL1 = TL_New(DD,TT,HH,sdate,stime,HH);
TL_SetExtRight(TL1,true);
TL_Delete(TL2);
TL2 = TL_New(DD,TT,var1,sdate,stime,var1);
TL_SetExtRight(TL2,true);
TL_Delete(TL3);
TL3 = TL_New(DD,TT,var2,sdate,stime,var2);
TL_SetExtRight(TL3,true);
TL_Delete(TL4);
TL4 = TL_New(DD,TT,var3,sdate,stime,var3);
TL_SetExtRight(TL4,true);
TL_Delete(TL5);
TL5 = TL_New(DD,TT,var4,sdate,stime,var4);
TL_SetExtRight(TL5,true);
TL_Delete(TL6);
TL6 = TL_New(DD,TT,var5,sdate,stime,var5);
TL_SetExtRight(TL6,true);
TL_Delete(TL7);
TL7 = TL_New(DD,TT,LL,sdate,stime,LL);
TL_SetExtRight(TL7,true);
선을지금보다두껍게하고 50프로는 선을더두껍게하고십습니다 ~~
2)전일중심가를기준으로23.6,38.2,50,61.8,76.4프로 우측에 텍스트출력도부탁드립니다 ~~항상감사드립니다
답변 1
예스스탁 예스스탁 답변
2017-02-17 11:40:20
안녕하세요
예스스탁입니다.
1.
input : Per1(23.6),Per2(38.2),Per3(50.0),Per4(61.8),Per5(76.4);
input : 최고가굵기(2),Per1굵기(2),Per2굵기(2),Per3굵기(3),Per4굵기(2),Per5굵기(2),최저가굵기(2);
var : HH(0),LL(0),DD(0),TT(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0);
var : TL11(0),TL12(0),TL13(0),TL14(0),TL15(0),TL16(0),TL17(0);
if DayOfWeek(bdate) < DayOfWeek(bdate[1]) and bdate != bdate[1] Then{
HH = H;
LL = L;
DD = sdate;
TT = stime;
if HH[1] > 0 and LL[1] > 0 then{
TL11 = TL_New(DD[1],TT[1],HH[1],sdate[1],stime[1],HH[1]);
TL12 = TL_New(DD[1],TT[1],var1[1],sdate[1],stime[1],var1[1]);
TL13 = TL_New(DD[1],TT[1],var2[1],sdate[1],stime[1],var2[1]);
TL14 = TL_New(DD[1],TT[1],var3[1],sdate[1],stime[1],var3[1]);
TL15 = TL_New(DD[1],TT[1],var4[1],sdate[1],stime[1],var4[1]);
TL16 = TL_New(DD[1],TT[1],var5[1],sdate[1],stime[1],var5[1]);
TL17 = TL_New(DD[1],TT[1],LL[1],sdate[1],stime[1],LL[1]);
TL_SetSize(TL11,최고가굵기);
TL_SetSize(TL12,Per1굵기);
TL_SetSize(TL13,Per2굵기);
TL_SetSize(TL14,Per3굵기);
TL_SetSize(TL15,Per4굵기);
TL_SetSize(TL16,Per5굵기);
TL_SetSize(TL17,최저가굵기);
}
}
if H > HH Then
HH = H;
if L < LL Then
LL = L;
var1 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per1/100));
var2 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per2/100));
var3 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per3/100));
var4 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per4/100));
var5 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per5/100));
TL_Delete(TL1);
TL_Delete(TL2);
TL_Delete(TL3);
TL_Delete(TL4);
TL_Delete(TL5);
TL_Delete(TL6);
TL_Delete(TL7);
TL1 = TL_New(DD,TT,HH,sdate,stime,HH);
TL2 = TL_New(DD,TT,var1,sdate,stime,var1);
TL3 = TL_New(DD,TT,var2,sdate,stime,var2);
TL4 = TL_New(DD,TT,var3,sdate,stime,var3);
TL5 = TL_New(DD,TT,var4,sdate,stime,var4);
TL6 = TL_New(DD,TT,var5,sdate,stime,var5);
TL7 = 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_SetSize(TL1,최고가굵기);
TL_SetSize(TL2,Per1굵기);
TL_SetSize(TL3,Per2굵기);
TL_SetSize(TL4,Per3굵기);
TL_SetSize(TL5,Per4굵기);
TL_SetSize(TL6,Per5굵기);
TL_SetSize(TL7,최저가굵기);
2
input : Per1(23.6),Per2(38.2),Per3(50.0),Per4(61.8),Per5(76.4);
input : 최고가굵기(2),Per1굵기(2),Per2굵기(2),Per3굵기(3),Per4굵기(2),Per5굵기(2),최저가굵기(2);
var : HH(0),LL(0),DD(0),TT(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0);
var : TL11(0),TL12(0),TL13(0),TL14(0),TL15(0),TL16(0),TL17(0);
if bdate != bdate[1] Then{
HH = dayhigh(1);
LL = daylow(1);
DD = sdate;
TT = stime;
if HH[1] > 0 and LL[1] > 0 then{
TL11 = TL_New(DD[1],TT[1],HH[1],sdate[1],stime[1],HH[1]);
TL12 = TL_New(DD[1],TT[1],var1[1],sdate[1],stime[1],var1[1]);
TL13 = TL_New(DD[1],TT[1],var2[1],sdate[1],stime[1],var2[1]);
TL14 = TL_New(DD[1],TT[1],var3[1],sdate[1],stime[1],var3[1]);
TL15 = TL_New(DD[1],TT[1],var4[1],sdate[1],stime[1],var4[1]);
TL16 = TL_New(DD[1],TT[1],var5[1],sdate[1],stime[1],var5[1]);
TL17 = TL_New(DD[1],TT[1],LL[1],sdate[1],stime[1],LL[1]);
TL_SetSize(TL11,최고가굵기);
TL_SetSize(TL12,Per1굵기);
TL_SetSize(TL13,Per2굵기);
TL_SetSize(TL14,Per3굵기);
TL_SetSize(TL15,Per4굵기);
TL_SetSize(TL16,Per5굵기);
TL_SetSize(TL17,최저가굵기);
}
}
var1 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per1/100));
var2 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per2/100));
var3 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per3/100));
var4 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per4/100));
var5 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per5/100));
TL_Delete(TL1);
TL_Delete(TL2);
TL_Delete(TL3);
TL_Delete(TL4);
TL_Delete(TL5);
TL_Delete(TL6);
TL_Delete(TL7);
TL1 = TL_New(DD,TT,HH,sdate,stime,HH);
TL2 = TL_New(DD,TT,var1,sdate,stime,var1);
TL3 = TL_New(DD,TT,var2,sdate,stime,var2);
TL4 = TL_New(DD,TT,var3,sdate,stime,var3);
TL5 = TL_New(DD,TT,var4,sdate,stime,var4);
TL6 = TL_New(DD,TT,var5,sdate,stime,var5);
TL7 = 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_SetSize(TL1,최고가굵기);
TL_SetSize(TL2,Per1굵기);
TL_SetSize(TL3,Per2굵기);
TL_SetSize(TL4,Per3굵기);
TL_SetSize(TL5,Per4굵기);
TL_SetSize(TL6,Per5굵기);
TL_SetSize(TL7,최저가굵기);
var : tx1(0),tx2(0),tx3(0),tx4(0),tx5(0),tx6(0),tx7(0);
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,NumToStr(hh,2));
tx2 = Text_New(sdate,stime,var1,NumToStr(var1,2));
tx3 = Text_New(sdate,stime,var2,NumToStr(var2,2));
tx4 = Text_New(sdate,stime,var3,NumToStr(var3,2));
tx5 = Text_New(sdate,stime,var4,NumToStr(var4,2));
tx6 = Text_New(sdate,stime,var5,NumToStr(var5,2));
tx7 = Text_New(sdate,stime,ll,NumToStr(LL,2));
즐거운 하루되세요
> 장군 님이 쓴 글입니다.
> 제목 : 문의드립니다
> 1)input : Per1(23.6),Per2(38.2),Per3(50.0),Per4(61.8),Per5(76.4);
var : HH(0),LL(0),DD(0),TT(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0);
var : TL11(0),TL12(0),TL13(0),TL14(0),TL15(0),TL16(0),TL17(0);
if DayOfWeek(bdate) < DayOfWeek(bdate[1]) and bdate != bdate[1] Then{
HH = H;
LL = L;
DD = sdate;
TT = stime;
if HH[1] > 0 and LL[1] > 0 then{
TL11 = TL_New(DD[1],TT[1],HH[1],sdate[1],stime[1],HH[1]);
TL12 = TL_New(DD[1],TT[1],var1[1],sdate[1],stime[1],var1[1]);
TL13 = TL_New(DD[1],TT[1],var2[1],sdate[1],stime[1],var2[1]);
TL14 = TL_New(DD[1],TT[1],var3[1],sdate[1],stime[1],var3[1]);
TL15 = TL_New(DD[1],TT[1],var4[1],sdate[1],stime[1],var4[1]);
TL16 = TL_New(DD[1],TT[1],var5[1],sdate[1],stime[1],var5[1]);
TL17 = TL_New(DD[1],TT[1],LL[1],sdate[1],stime[1],LL[1]);
}
}
if H > HH Then
HH = H;
if L < LL Then
LL = L;
var1 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per1/100));
var2 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per2/100));
var3 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per3/100));
var4 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per4/100));
var5 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per5/100));
TL_Delete(TL1);
TL1 = TL_New(DD,TT,HH,sdate,stime,HH);
TL_SetExtRight(TL1,true);
TL_Delete(TL2);
TL2 = TL_New(DD,TT,var1,sdate,stime,var1);
TL_SetExtRight(TL2,true);
TL_Delete(TL3);
TL3 = TL_New(DD,TT,var2,sdate,stime,var2);
TL_SetExtRight(TL3,true);
TL_Delete(TL4);
TL4 = TL_New(DD,TT,var3,sdate,stime,var3);
TL_SetExtRight(TL4,true);
TL_Delete(TL5);
TL5 = TL_New(DD,TT,var4,sdate,stime,var4);
TL_SetExtRight(TL5,true);
TL_Delete(TL6);
TL6 = TL_New(DD,TT,var5,sdate,stime,var5);
TL_SetExtRight(TL6,true);
TL_Delete(TL7);
TL7 = TL_New(DD,TT,LL,sdate,stime,LL);
TL_SetExtRight(TL7,true);
선을지금보다두껍게하고 50프로는 선을더두껍게하고십습니다 ~~
2)전일중심가를기준으로23.6,38.2,50,61.8,76.4프로 우측에 텍스트출력도부탁드립니다 ~~항상감사드립니다
다음글
이전글