커뮤니티
수식부탁드립니다
2019-04-09 09:39:22
234
글번호 127691
#,안녕하세요.
1,최대조회건수(만건)를 적용해도 틱차트에는 적용이 안되네요,도움 부탁드립니다.
input : Per1(18),Per2(38),per3(61.8),per4(88.2);
Var : pivot(0),S1(0),S2(1),S3(1),S4(1),S5(0),S6(0),cnt(0),t1(0),t2(0),t3(0),t4(0),t5(0),t6(0),t7(0),t8(0),T9(0),T10(0);
Array : oo[10](0),hh[10](0),ll[10](0),cc[10](0);
if DayOfWeek(bdate) < DayOfWeek(bdate[1]) then
{
oo[0] = o;
hh[0] = h;
ll[0] = L;
for cnt = 1 to 9
{
oo[cnt] = oo[cnt-1][1];
hh[cnt] = hh[cnt-1][1];
ll[cnt] = ll[cnt-1][1];
cc[cnt] = cc[cnt-1][1];
}
}
if h > hh[0] Then
hh[0] = h;
if l < ll[0] Then
ll[0] = l;
cc[0] = c;
if hh[1] > 0 and ll[1] > 0 then
{
S1 = (hh[0]+ll[0])/2;
S2 = (hh[1]+ll[1])/2;
S3 = hh[1];
S4 = ll[1];
S5 = oo[0];
S6 = cc[1];
plot1(10^(LOG10(oo[0])),"주간시가");
plot2(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per1/100)),"주간B");
plot3(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per1/100)),"주간S");
plot4(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per2/100)),"주간h");
plot5(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per2/100)),"주간h");
plot6(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per3/100)),"주간R");
plot7(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per3/100)),"주간R");
plot8(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per4/100)),"주간F");
plot9(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per4/100)),"주간F");
plot10(10^(LOG10(CC[1])),"주간종가");
}
Text_Delete(t1);
Text_Delete(t2);
Text_Delete(t3);
Text_Delete(t4);
Text_Delete(t5);
Text_Delete(t6);
Text_Delete(t7);
Text_Delete(t8);
Text_Delete(t9);
Text_Delete(t10);
t1 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per1/100))," 주간B:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per1/100)),2));
t2 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per1/100))," 주간S:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per1/100)),2));
t3 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per2/100))," 주간h:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per2/100)),2));
t4 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per2/100))," 주간h:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per2/100)),2));
t5 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per3/100))," 주간R:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per3/100)),2));
t6 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per3/100))," 주간R:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per3/100)),2));
t7 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per4/100))," 주간F:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per4/100)),2));
t8 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per4/100))," 주간F:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per4/100)),2));
t9 = Text_New(sdate,stime,s5," 주간O:"+NumToStr(s5,2));
t10 = Text_New(sdate,stime,s6," 주간c:"+NumToStr(s6,2));
Text_SetStyle(t1,5,2);
Text_SetStyle(t2,5,2);
Text_SetStyle(t3,5,2);
Text_SetStyle(t4,5,2);
Text_SetStyle(t5,5,2);
Text_SetStyle(t6,5,2);
Text_SetStyle(t7,5,2);
Text_SetStyle(t8,5,2);
Text_SetStyle(t9,5,2);
Text_SetStyle(t10,5,2);
Text_SetColor(t1,RED);
Text_SetColor(t2,BLUE);
Text_SetColor(t3,RED);
Text_SetColor(t4,BLUE);
Text_SetColor(t5,RED);
Text_SetColor(t6,BLUE);
Text_SetColor(t7,RED);
Text_SetColor(t8,BLUE);
Text_SetColor(t9,LGREEN);
Text_SetColor(t10,BLACK);
Text_SetSize(t1,0);
Text_SetSize(t2,0);
Text_SetSize(t3,0);
Text_SetSize(t4,0);
Text_SetSize(t5,0);
Text_SetSize(t6,0);
Text_SetSize(t7,0);
Text_SetSize(t8,0);
Text_SetSize(t9,0);
Text_SetSize(t10,0);
2,아래수식에서 20일선과 60일선의 간격이 수축이나 확장될때 이격간격을(완성봉기준) 실시간
수치로 텍스트 출력 할수있는지요,도움부탁드립니다.
Input : Length1(5),Length2(20),Length3(60),Length4(120),Length5(240);
Var : TLen1(0),TLen2(0),TLen3(0),TLen4(0),TLen5(0);
var : Tma1(0),Tma2(0),Tma3(0),Tma4(0),Tma5(0);
TLen1 = Ceiling((Length1 + 1) * .5);
TLen2 = Ceiling((Length2 + 1) * .5);
TLen3 = Ceiling((Length3 + 1) * .5);
TLen4 = Ceiling((Length4 + 1) * .5);
TLen5 = Ceiling((Length5 + 1) * .5);
Tma1 = ma(ma(C, TLen1), TLen1);
Tma2 = ma(ma(C, TLen2), TLen2);
Tma3 = ma(ma(C, TLen3), TLen3);
Tma4 = ma(ma(C, TLen4), TLen4);
Tma5 = ma(ma(C, TLen5), TLen5);
Plot1(Tma1, "삼각가중1",iff(tma1>tma1[1],MAGENTA,BLUE));
Plot2(Tma2, "삼각가중2",iff(tma2>tma2[1],MAGENTA,BLUE));
Plot3(Tma3, "삼각가중3",iff(tma3>tma3[1],RED,LGREEN));
Plot4(Tma4, "삼각가중4",iff(tma4>tma4[1],RED,LGREEN));
Plot5(Tma5, "삼각가중5",iff(tma4>tma4[1],RED,LGREEN));
답변 3
예스스탁 예스스탁 답변
2019-04-09 14:00:34
안녕하세요
예스스탁입니다.
1
1번, 2번 수식에 별도로 수정할 부분이 없습니다.
수식은 정상적으로 계산하고 출력되고 있습니다.
차트에는 최소 2주치의 데이타가 있어야 합니다.
차트에 2주분의 데이타가 없으면 출력되지 않습니다.
2
첨부한 차트는 선물 90틱차트 만개봉에 적용한 그림입니다.
정상적으로 지표가 출력되고 있습니다.
출력하는 텍스트의 앞에 빈공간을 많이 지정하셨으므로
x축에 여백을 글자가 보일만큼 주셔야 합니다.
3
글자 폰트는 크기를 0으로 지정하시면 안됩니다.
차트는 기본으로 폰트의 크기가 12입니다.
4
input : Per1(18),Per2(38),per3(61.8),per4(88.2);
Var : pivot(0),S1(0),S2(1),S3(1),S4(1),S5(0),S6(0),cnt(0),t1(0),t2(0),t3(0),t4(0),t5(0),t6(0),t7(0),t8(0),T9(0),T10(0);
Array : oo[10](0),hh[10](0),ll[10](0),cc[10](0);
if DayOfWeek(bdate) < DayOfWeek(bdate[1]) then
{
oo[0] = o;
hh[0] = h;
ll[0] = L;
for cnt = 1 to 9
{
oo[cnt] = oo[cnt-1][1];
hh[cnt] = hh[cnt-1][1];
ll[cnt] = ll[cnt-1][1];
cc[cnt] = cc[cnt-1][1];
}
}
if h > hh[0] Then
hh[0] = h;
if l < ll[0] Then
ll[0] = l;
cc[0] = c;
if hh[1] > 0 and ll[1] > 0 then
{
S1 = (hh[0]+ll[0])/2;
S2 = (hh[1]+ll[1])/2;
S3 = hh[1];
S4 = ll[1];
S5 = oo[0];
S6 = cc[1];
plot1(10^(LOG10(oo[0])),"주간시가");
plot2(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per1/100)),"주간B");
plot3(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per1/100)),"주간S");
plot4(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per2/100)),"주간h");
plot5(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per2/100)),"주간h");
plot6(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per3/100)),"주간R");
plot7(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per3/100)),"주간R");
plot8(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per4/100)),"주간F");
plot9(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per4/100)),"주간F");
plot10(10^(LOG10(CC[1])),"주간종가");
}
Text_Delete(t1);
Text_Delete(t2);
Text_Delete(t3);
Text_Delete(t4);
Text_Delete(t5);
Text_Delete(t6);
Text_Delete(t7);
Text_Delete(t8);
Text_Delete(t9);
Text_Delete(t10);
t1 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per1/100))," 주간B:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per1/100)),2));
t2 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per1/100))," 주간S:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per1/100)),2));
t3 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per2/100))," 주간h:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per2/100)),2));
t4 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per2/100))," 주간h:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per2/100)),2));
t5 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per3/100))," 주간R:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per3/100)),2));
t6 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per3/100))," 주간R:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per3/100)),2));
t7 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per4/100))," 주간F:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per4/100)),2));
t8 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per4/100))," 주간F:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per4/100)),2));
t9 = Text_New(sdate,stime,s5," 주간O:"+NumToStr(s5,2));
t10 = Text_New(sdate,stime,s6," 주간c:"+NumToStr(s6,2));
Text_SetStyle(t1,5,2);
Text_SetStyle(t2,5,2);
Text_SetStyle(t3,5,2);
Text_SetStyle(t4,5,2);
Text_SetStyle(t5,5,2);
Text_SetStyle(t6,5,2);
Text_SetStyle(t7,5,2);
Text_SetStyle(t8,5,2);
Text_SetStyle(t9,5,2);
Text_SetStyle(t10,5,2);
Text_SetColor(t1,RED);
Text_SetColor(t2,BLUE);
Text_SetColor(t3,RED);
Text_SetColor(t4,BLUE);
Text_SetColor(t5,RED);
Text_SetColor(t6,BLUE);
Text_SetColor(t7,RED);
Text_SetColor(t8,BLUE);
Text_SetColor(t9,LGREEN);
Text_SetColor(t10,BLACK);
Text_SetSize(t1,12);
Text_SetSize(t2,12);
Text_SetSize(t3,12);
Text_SetSize(t4,12);
Text_SetSize(t5,12);
Text_SetSize(t6,12);
Text_SetSize(t7,12);
Text_SetSize(t8,12);
Text_SetSize(t9,12);
Text_SetSize(t10,12);
즐거운 하루되세요
> 골든키 님이 쓴 글입니다.
> 제목 : 수식부탁드립니다
> #,안녕하세요.
1,최대조회건수(만건)를 적용해도 틱차트에는 적용이 안되네요,도움 부탁드립니다.
input : Per1(18),Per2(38),per3(61.8),per4(88.2);
Var : pivot(0),S1(0),S2(1),S3(1),S4(1),S5(0),S6(0),cnt(0),t1(0),t2(0),t3(0),t4(0),t5(0),t6(0),t7(0),t8(0),T9(0),T10(0);
Array : oo[10](0),hh[10](0),ll[10](0),cc[10](0);
if DayOfWeek(bdate) < DayOfWeek(bdate[1]) then
{
oo[0] = o;
hh[0] = h;
ll[0] = L;
for cnt = 1 to 9
{
oo[cnt] = oo[cnt-1][1];
hh[cnt] = hh[cnt-1][1];
ll[cnt] = ll[cnt-1][1];
cc[cnt] = cc[cnt-1][1];
}
}
if h > hh[0] Then
hh[0] = h;
if l < ll[0] Then
ll[0] = l;
cc[0] = c;
if hh[1] > 0 and ll[1] > 0 then
{
S1 = (hh[0]+ll[0])/2;
S2 = (hh[1]+ll[1])/2;
S3 = hh[1];
S4 = ll[1];
S5 = oo[0];
S6 = cc[1];
plot1(10^(LOG10(oo[0])),"주간시가");
plot2(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per1/100)),"주간B");
plot3(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per1/100)),"주간S");
plot4(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per2/100)),"주간h");
plot5(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per2/100)),"주간h");
plot6(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per3/100)),"주간R");
plot7(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per3/100)),"주간R");
plot8(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per4/100)),"주간F");
plot9(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per4/100)),"주간F");
plot10(10^(LOG10(CC[1])),"주간종가");
}
Text_Delete(t1);
Text_Delete(t2);
Text_Delete(t3);
Text_Delete(t4);
Text_Delete(t5);
Text_Delete(t6);
Text_Delete(t7);
Text_Delete(t8);
Text_Delete(t9);
Text_Delete(t10);
t1 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per1/100))," 주간B:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per1/100)),2));
t2 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per1/100))," 주간S:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per1/100)),2));
t3 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per2/100))," 주간h:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per2/100)),2));
t4 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per2/100))," 주간h:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per2/100)),2));
t5 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per3/100))," 주간R:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per3/100)),2));
t6 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per3/100))," 주간R:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per3/100)),2));
t7 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per4/100))," 주간F:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per4/100)),2));
t8 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per4/100))," 주간F:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per4/100)),2));
t9 = Text_New(sdate,stime,s5," 주간O:"+NumToStr(s5,2));
t10 = Text_New(sdate,stime,s6," 주간c:"+NumToStr(s6,2));
Text_SetStyle(t1,5,2);
Text_SetStyle(t2,5,2);
Text_SetStyle(t3,5,2);
Text_SetStyle(t4,5,2);
Text_SetStyle(t5,5,2);
Text_SetStyle(t6,5,2);
Text_SetStyle(t7,5,2);
Text_SetStyle(t8,5,2);
Text_SetStyle(t9,5,2);
Text_SetStyle(t10,5,2);
Text_SetColor(t1,RED);
Text_SetColor(t2,BLUE);
Text_SetColor(t3,RED);
Text_SetColor(t4,BLUE);
Text_SetColor(t5,RED);
Text_SetColor(t6,BLUE);
Text_SetColor(t7,RED);
Text_SetColor(t8,BLUE);
Text_SetColor(t9,LGREEN);
Text_SetColor(t10,BLACK);
Text_SetSize(t1,0);
Text_SetSize(t2,0);
Text_SetSize(t3,0);
Text_SetSize(t4,0);
Text_SetSize(t5,0);
Text_SetSize(t6,0);
Text_SetSize(t7,0);
Text_SetSize(t8,0);
Text_SetSize(t9,0);
Text_SetSize(t10,0);
2,아래수식에서 20일선과 60일선의 간격이 수축이나 확장될때 이격간격을(완성봉기준) 실시간
수치로 텍스트 출력 할수있는지요,도움부탁드립니다.
Input : Length1(5),Length2(20),Length3(60),Length4(120),Length5(240);
Var : TLen1(0),TLen2(0),TLen3(0),TLen4(0),TLen5(0);
var : Tma1(0),Tma2(0),Tma3(0),Tma4(0),Tma5(0);
TLen1 = Ceiling((Length1 + 1) * .5);
TLen2 = Ceiling((Length2 + 1) * .5);
TLen3 = Ceiling((Length3 + 1) * .5);
TLen4 = Ceiling((Length4 + 1) * .5);
TLen5 = Ceiling((Length5 + 1) * .5);
Tma1 = ma(ma(C, TLen1), TLen1);
Tma2 = ma(ma(C, TLen2), TLen2);
Tma3 = ma(ma(C, TLen3), TLen3);
Tma4 = ma(ma(C, TLen4), TLen4);
Tma5 = ma(ma(C, TLen5), TLen5);
Plot1(Tma1, "삼각가중1",iff(tma1>tma1[1],MAGENTA,BLUE));
Plot2(Tma2, "삼각가중2",iff(tma2>tma2[1],MAGENTA,BLUE));
Plot3(Tma3, "삼각가중3",iff(tma3>tma3[1],RED,LGREEN));
Plot4(Tma4, "삼각가중4",iff(tma4>tma4[1],RED,LGREEN));
Plot5(Tma5, "삼각가중5",iff(tma4>tma4[1],RED,LGREEN));
회원
2019-04-09 14:56:29
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 수식부탁드립니다
> 안녕하세요
예스스탁입니다.
1
1번, 2번 수식에 별도로 수정할 부분이 없습니다.
수식은 정상적으로 계산하고 출력되고 있습니다.
차트에는 최소 2주치의 데이타가 있어야 합니다.
차트에 2주분의 데이타가 없으면 출력되지 않습니다.
2
첨부한 차트는 선물 90틱차트 만개봉에 적용한 그림입니다.
정상적으로 지표가 출력되고 있습니다.
출력하는 텍스트의 앞에 빈공간을 많이 지정하셨으므로
x축에 여백을 글자가 보일만큼 주셔야 합니다.
3
글자 폰트는 크기를 0으로 지정하시면 안됩니다.
차트는 기본으로 폰트의 크기가 12입니다.
4
input : Per1(18),Per2(38),per3(61.8),per4(88.2);
Var : pivot(0),S1(0),S2(1),S3(1),S4(1),S5(0),S6(0),cnt(0),t1(0),t2(0),t3(0),t4(0),t5(0),t6(0),t7(0),t8(0),T9(0),T10(0);
Array : oo[10](0),hh[10](0),ll[10](0),cc[10](0);
if DayOfWeek(bdate) < DayOfWeek(bdate[1]) then
{
oo[0] = o;
hh[0] = h;
ll[0] = L;
for cnt = 1 to 9
{
oo[cnt] = oo[cnt-1][1];
hh[cnt] = hh[cnt-1][1];
ll[cnt] = ll[cnt-1][1];
cc[cnt] = cc[cnt-1][1];
}
}
if h > hh[0] Then
hh[0] = h;
if l < ll[0] Then
ll[0] = l;
cc[0] = c;
if hh[1] > 0 and ll[1] > 0 then
{
S1 = (hh[0]+ll[0])/2;
S2 = (hh[1]+ll[1])/2;
S3 = hh[1];
S4 = ll[1];
S5 = oo[0];
S6 = cc[1];
plot1(10^(LOG10(oo[0])),"주간시가");
plot2(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per1/100)),"주간B");
plot3(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per1/100)),"주간S");
plot4(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per2/100)),"주간h");
plot5(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per2/100)),"주간h");
plot6(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per3/100)),"주간R");
plot7(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per3/100)),"주간R");
plot8(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per4/100)),"주간F");
plot9(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per4/100)),"주간F");
plot10(10^(LOG10(CC[1])),"주간종가");
}
Text_Delete(t1);
Text_Delete(t2);
Text_Delete(t3);
Text_Delete(t4);
Text_Delete(t5);
Text_Delete(t6);
Text_Delete(t7);
Text_Delete(t8);
Text_Delete(t9);
Text_Delete(t10);
t1 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per1/100))," 주간B:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per1/100)),2));
t2 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per1/100))," 주간S:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per1/100)),2));
t3 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per2/100))," 주간h:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per2/100)),2));
t4 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per2/100))," 주간h:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per2/100)),2));
t5 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per3/100))," 주간R:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per3/100)),2));
t6 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per3/100))," 주간R:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per3/100)),2));
t7 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per4/100))," 주간F:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per4/100)),2));
t8 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per4/100))," 주간F:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per4/100)),2));
t9 = Text_New(sdate,stime,s5," 주간O:"+NumToStr(s5,2));
t10 = Text_New(sdate,stime,s6," 주간c:"+NumToStr(s6,2));
Text_SetStyle(t1,5,2);
Text_SetStyle(t2,5,2);
Text_SetStyle(t3,5,2);
Text_SetStyle(t4,5,2);
Text_SetStyle(t5,5,2);
Text_SetStyle(t6,5,2);
Text_SetStyle(t7,5,2);
Text_SetStyle(t8,5,2);
Text_SetStyle(t9,5,2);
Text_SetStyle(t10,5,2);
Text_SetColor(t1,RED);
Text_SetColor(t2,BLUE);
Text_SetColor(t3,RED);
Text_SetColor(t4,BLUE);
Text_SetColor(t5,RED);
Text_SetColor(t6,BLUE);
Text_SetColor(t7,RED);
Text_SetColor(t8,BLUE);
Text_SetColor(t9,LGREEN);
Text_SetColor(t10,BLACK);
Text_SetSize(t1,12);
Text_SetSize(t2,12);
Text_SetSize(t3,12);
Text_SetSize(t4,12);
Text_SetSize(t5,12);
Text_SetSize(t6,12);
Text_SetSize(t7,12);
Text_SetSize(t8,12);
Text_SetSize(t9,12);
Text_SetSize(t10,12);
즐거운 하루되세요
> 골든키 님이 쓴 글입니다.
> 제목 : 수식부탁드립니다
> #,안녕하세요.
1,최대조회건수(만건)를 적용해도 틱차트에는 적용이 안되네요,도움 부탁드립니다.
input : Per1(18),Per2(38),per3(61.8),per4(88.2);
Var : pivot(0),S1(0),S2(1),S3(1),S4(1),S5(0),S6(0),cnt(0),t1(0),t2(0),t3(0),t4(0),t5(0),t6(0),t7(0),t8(0),T9(0),T10(0);
Array : oo[10](0),hh[10](0),ll[10](0),cc[10](0);
if DayOfWeek(bdate) < DayOfWeek(bdate[1]) then
{
oo[0] = o;
hh[0] = h;
ll[0] = L;
for cnt = 1 to 9
{
oo[cnt] = oo[cnt-1][1];
hh[cnt] = hh[cnt-1][1];
ll[cnt] = ll[cnt-1][1];
cc[cnt] = cc[cnt-1][1];
}
}
if h > hh[0] Then
hh[0] = h;
if l < ll[0] Then
ll[0] = l;
cc[0] = c;
if hh[1] > 0 and ll[1] > 0 then
{
S1 = (hh[0]+ll[0])/2;
S2 = (hh[1]+ll[1])/2;
S3 = hh[1];
S4 = ll[1];
S5 = oo[0];
S6 = cc[1];
plot1(10^(LOG10(oo[0])),"주간시가");
plot2(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per1/100)),"주간B");
plot3(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per1/100)),"주간S");
plot4(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per2/100)),"주간h");
plot5(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per2/100)),"주간h");
plot6(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per3/100)),"주간R");
plot7(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per3/100)),"주간R");
plot8(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per4/100)),"주간F");
plot9(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per4/100)),"주간F");
plot10(10^(LOG10(CC[1])),"주간종가");
}
Text_Delete(t1);
Text_Delete(t2);
Text_Delete(t3);
Text_Delete(t4);
Text_Delete(t5);
Text_Delete(t6);
Text_Delete(t7);
Text_Delete(t8);
Text_Delete(t9);
Text_Delete(t10);
t1 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per1/100))," 주간B:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per1/100)),2));
t2 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per1/100))," 주간S:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per1/100)),2));
t3 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per2/100))," 주간h:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per2/100)),2));
t4 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per2/100))," 주간h:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per2/100)),2));
t5 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per3/100))," 주간R:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per3/100)),2));
t6 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per3/100))," 주간R:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per3/100)),2));
t7 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per4/100))," 주간F:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per4/100)),2));
t8 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per4/100))," 주간F:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per4/100)),2));
t9 = Text_New(sdate,stime,s5," 주간O:"+NumToStr(s5,2));
t10 = Text_New(sdate,stime,s6," 주간c:"+NumToStr(s6,2));
Text_SetStyle(t1,5,2);
Text_SetStyle(t2,5,2);
Text_SetStyle(t3,5,2);
Text_SetStyle(t4,5,2);
Text_SetStyle(t5,5,2);
Text_SetStyle(t6,5,2);
Text_SetStyle(t7,5,2);
Text_SetStyle(t8,5,2);
Text_SetStyle(t9,5,2);
Text_SetStyle(t10,5,2);
Text_SetColor(t1,RED);
Text_SetColor(t2,BLUE);
Text_SetColor(t3,RED);
Text_SetColor(t4,BLUE);
Text_SetColor(t5,RED);
Text_SetColor(t6,BLUE);
Text_SetColor(t7,RED);
Text_SetColor(t8,BLUE);
Text_SetColor(t9,LGREEN);
Text_SetColor(t10,BLACK);
Text_SetSize(t1,0);
Text_SetSize(t2,0);
Text_SetSize(t3,0);
Text_SetSize(t4,0);
Text_SetSize(t5,0);
Text_SetSize(t6,0);
Text_SetSize(t7,0);
Text_SetSize(t8,0);
Text_SetSize(t9,0);
Text_SetSize(t10,0);
2,아래수식에서 20일선과 60일선의 간격이 수축이나 확장될때 이격간격을(완성봉기준) 실시간
수치로 텍스트 출력 할수있는지요,도움부탁드립니다.
Input : Length1(5),Length2(20),Length3(60),Length4(120),Length5(240);
Var : TLen1(0),TLen2(0),TLen3(0),TLen4(0),TLen5(0);
var : Tma1(0),Tma2(0),Tma3(0),Tma4(0),Tma5(0);
TLen1 = Ceiling((Length1 + 1) * .5);
TLen2 = Ceiling((Length2 + 1) * .5);
TLen3 = Ceiling((Length3 + 1) * .5);
TLen4 = Ceiling((Length4 + 1) * .5);
TLen5 = Ceiling((Length5 + 1) * .5);
Tma1 = ma(ma(C, TLen1), TLen1);
Tma2 = ma(ma(C, TLen2), TLen2);
Tma3 = ma(ma(C, TLen3), TLen3);
Tma4 = ma(ma(C, TLen4), TLen4);
Tma5 = ma(ma(C, TLen5), TLen5);
Plot1(Tma1, "삼각가중1",iff(tma1>tma1[1],MAGENTA,BLUE));
Plot2(Tma2, "삼각가중2",iff(tma2>tma2[1],MAGENTA,BLUE));
Plot3(Tma3, "삼각가중3",iff(tma3>tma3[1],RED,LGREEN));
Plot4(Tma4, "삼각가중4",iff(tma4>tma4[1],RED,LGREEN));
Plot5(Tma5, "삼각가중5",iff(tma4>tma4[1],RED,LGREEN));
2번 질문내용 확인부탁드립니다.
예스스탁 예스스탁 답변
2019-04-09 15:07:21
안녕하세요
예스스탁입니다.
2번도 이상이 없습니다.
이전답변의 그림에서 하단에 적용한 지표가 2번지표입니다.
수정해 드릴내용이 없습니다.
즐거운 하루되세요
> 골든키 님이 쓴 글입니다.
> 제목 : Re : Re : 수식부탁드립니다
>
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 수식부탁드립니다
> 안녕하세요
예스스탁입니다.
1
1번, 2번 수식에 별도로 수정할 부분이 없습니다.
수식은 정상적으로 계산하고 출력되고 있습니다.
차트에는 최소 2주치의 데이타가 있어야 합니다.
차트에 2주분의 데이타가 없으면 출력되지 않습니다.
2
첨부한 차트는 선물 90틱차트 만개봉에 적용한 그림입니다.
정상적으로 지표가 출력되고 있습니다.
출력하는 텍스트의 앞에 빈공간을 많이 지정하셨으므로
x축에 여백을 글자가 보일만큼 주셔야 합니다.
3
글자 폰트는 크기를 0으로 지정하시면 안됩니다.
차트는 기본으로 폰트의 크기가 12입니다.
4
input : Per1(18),Per2(38),per3(61.8),per4(88.2);
Var : pivot(0),S1(0),S2(1),S3(1),S4(1),S5(0),S6(0),cnt(0),t1(0),t2(0),t3(0),t4(0),t5(0),t6(0),t7(0),t8(0),T9(0),T10(0);
Array : oo[10](0),hh[10](0),ll[10](0),cc[10](0);
if DayOfWeek(bdate) < DayOfWeek(bdate[1]) then
{
oo[0] = o;
hh[0] = h;
ll[0] = L;
for cnt = 1 to 9
{
oo[cnt] = oo[cnt-1][1];
hh[cnt] = hh[cnt-1][1];
ll[cnt] = ll[cnt-1][1];
cc[cnt] = cc[cnt-1][1];
}
}
if h > hh[0] Then
hh[0] = h;
if l < ll[0] Then
ll[0] = l;
cc[0] = c;
if hh[1] > 0 and ll[1] > 0 then
{
S1 = (hh[0]+ll[0])/2;
S2 = (hh[1]+ll[1])/2;
S3 = hh[1];
S4 = ll[1];
S5 = oo[0];
S6 = cc[1];
plot1(10^(LOG10(oo[0])),"주간시가");
plot2(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per1/100)),"주간B");
plot3(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per1/100)),"주간S");
plot4(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per2/100)),"주간h");
plot5(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per2/100)),"주간h");
plot6(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per3/100)),"주간R");
plot7(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per3/100)),"주간R");
plot8(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per4/100)),"주간F");
plot9(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per4/100)),"주간F");
plot10(10^(LOG10(CC[1])),"주간종가");
}
Text_Delete(t1);
Text_Delete(t2);
Text_Delete(t3);
Text_Delete(t4);
Text_Delete(t5);
Text_Delete(t6);
Text_Delete(t7);
Text_Delete(t8);
Text_Delete(t9);
Text_Delete(t10);
t1 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per1/100))," 주간B:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per1/100)),2));
t2 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per1/100))," 주간S:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per1/100)),2));
t3 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per2/100))," 주간h:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per2/100)),2));
t4 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per2/100))," 주간h:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per2/100)),2));
t5 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per3/100))," 주간R:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per3/100)),2));
t6 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per3/100))," 주간R:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per3/100)),2));
t7 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per4/100))," 주간F:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per4/100)),2));
t8 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per4/100))," 주간F:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per4/100)),2));
t9 = Text_New(sdate,stime,s5," 주간O:"+NumToStr(s5,2));
t10 = Text_New(sdate,stime,s6," 주간c:"+NumToStr(s6,2));
Text_SetStyle(t1,5,2);
Text_SetStyle(t2,5,2);
Text_SetStyle(t3,5,2);
Text_SetStyle(t4,5,2);
Text_SetStyle(t5,5,2);
Text_SetStyle(t6,5,2);
Text_SetStyle(t7,5,2);
Text_SetStyle(t8,5,2);
Text_SetStyle(t9,5,2);
Text_SetStyle(t10,5,2);
Text_SetColor(t1,RED);
Text_SetColor(t2,BLUE);
Text_SetColor(t3,RED);
Text_SetColor(t4,BLUE);
Text_SetColor(t5,RED);
Text_SetColor(t6,BLUE);
Text_SetColor(t7,RED);
Text_SetColor(t8,BLUE);
Text_SetColor(t9,LGREEN);
Text_SetColor(t10,BLACK);
Text_SetSize(t1,12);
Text_SetSize(t2,12);
Text_SetSize(t3,12);
Text_SetSize(t4,12);
Text_SetSize(t5,12);
Text_SetSize(t6,12);
Text_SetSize(t7,12);
Text_SetSize(t8,12);
Text_SetSize(t9,12);
Text_SetSize(t10,12);
즐거운 하루되세요
> 골든키 님이 쓴 글입니다.
> 제목 : 수식부탁드립니다
> #,안녕하세요.
1,최대조회건수(만건)를 적용해도 틱차트에는 적용이 안되네요,도움 부탁드립니다.
input : Per1(18),Per2(38),per3(61.8),per4(88.2);
Var : pivot(0),S1(0),S2(1),S3(1),S4(1),S5(0),S6(0),cnt(0),t1(0),t2(0),t3(0),t4(0),t5(0),t6(0),t7(0),t8(0),T9(0),T10(0);
Array : oo[10](0),hh[10](0),ll[10](0),cc[10](0);
if DayOfWeek(bdate) < DayOfWeek(bdate[1]) then
{
oo[0] = o;
hh[0] = h;
ll[0] = L;
for cnt = 1 to 9
{
oo[cnt] = oo[cnt-1][1];
hh[cnt] = hh[cnt-1][1];
ll[cnt] = ll[cnt-1][1];
cc[cnt] = cc[cnt-1][1];
}
}
if h > hh[0] Then
hh[0] = h;
if l < ll[0] Then
ll[0] = l;
cc[0] = c;
if hh[1] > 0 and ll[1] > 0 then
{
S1 = (hh[0]+ll[0])/2;
S2 = (hh[1]+ll[1])/2;
S3 = hh[1];
S4 = ll[1];
S5 = oo[0];
S6 = cc[1];
plot1(10^(LOG10(oo[0])),"주간시가");
plot2(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per1/100)),"주간B");
plot3(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per1/100)),"주간S");
plot4(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per2/100)),"주간h");
plot5(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per2/100)),"주간h");
plot6(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per3/100)),"주간R");
plot7(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per3/100)),"주간R");
plot8(10^(LOG10(cc[1])+(LOG10(S3)-LOG10(S4))*(Per4/100)),"주간F");
plot9(10^(LOG10(cc[1])-(LOG10(S3)-LOG10(S4))*(Per4/100)),"주간F");
plot10(10^(LOG10(CC[1])),"주간종가");
}
Text_Delete(t1);
Text_Delete(t2);
Text_Delete(t3);
Text_Delete(t4);
Text_Delete(t5);
Text_Delete(t6);
Text_Delete(t7);
Text_Delete(t8);
Text_Delete(t9);
Text_Delete(t10);
t1 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per1/100))," 주간B:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per1/100)),2));
t2 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per1/100))," 주간S:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per1/100)),2));
t3 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per2/100))," 주간h:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per2/100)),2));
t4 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per2/100))," 주간h:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per2/100)),2));
t5 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per3/100))," 주간R:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per3/100)),2));
t6 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per3/100))," 주간R:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per3/100)),2));
t7 = Text_New(sdate,stime,10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per4/100))," 주간F:"+NumToStr(10^(LOG10(cc[1])+(Log10(S3)-log10(S4))*(Per4/100)),2));
t8 = Text_New(sdate,stime,10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per4/100))," 주간F:"+NumToStr(10^(LOG10(cc[1])-(Log10(S3)-log10(S4))*(Per4/100)),2));
t9 = Text_New(sdate,stime,s5," 주간O:"+NumToStr(s5,2));
t10 = Text_New(sdate,stime,s6," 주간c:"+NumToStr(s6,2));
Text_SetStyle(t1,5,2);
Text_SetStyle(t2,5,2);
Text_SetStyle(t3,5,2);
Text_SetStyle(t4,5,2);
Text_SetStyle(t5,5,2);
Text_SetStyle(t6,5,2);
Text_SetStyle(t7,5,2);
Text_SetStyle(t8,5,2);
Text_SetStyle(t9,5,2);
Text_SetStyle(t10,5,2);
Text_SetColor(t1,RED);
Text_SetColor(t2,BLUE);
Text_SetColor(t3,RED);
Text_SetColor(t4,BLUE);
Text_SetColor(t5,RED);
Text_SetColor(t6,BLUE);
Text_SetColor(t7,RED);
Text_SetColor(t8,BLUE);
Text_SetColor(t9,LGREEN);
Text_SetColor(t10,BLACK);
Text_SetSize(t1,0);
Text_SetSize(t2,0);
Text_SetSize(t3,0);
Text_SetSize(t4,0);
Text_SetSize(t5,0);
Text_SetSize(t6,0);
Text_SetSize(t7,0);
Text_SetSize(t8,0);
Text_SetSize(t9,0);
Text_SetSize(t10,0);
2,아래수식에서 20일선과 60일선의 간격이 수축이나 확장될때 이격간격을(완성봉기준) 실시간
수치로 텍스트 출력 할수있는지요,도움부탁드립니다.
Input : Length1(5),Length2(20),Length3(60),Length4(120),Length5(240);
Var : TLen1(0),TLen2(0),TLen3(0),TLen4(0),TLen5(0);
var : Tma1(0),Tma2(0),Tma3(0),Tma4(0),Tma5(0);
TLen1 = Ceiling((Length1 + 1) * .5);
TLen2 = Ceiling((Length2 + 1) * .5);
TLen3 = Ceiling((Length3 + 1) * .5);
TLen4 = Ceiling((Length4 + 1) * .5);
TLen5 = Ceiling((Length5 + 1) * .5);
Tma1 = ma(ma(C, TLen1), TLen1);
Tma2 = ma(ma(C, TLen2), TLen2);
Tma3 = ma(ma(C, TLen3), TLen3);
Tma4 = ma(ma(C, TLen4), TLen4);
Tma5 = ma(ma(C, TLen5), TLen5);
Plot1(Tma1, "삼각가중1",iff(tma1>tma1[1],MAGENTA,BLUE));
Plot2(Tma2, "삼각가중2",iff(tma2>tma2[1],MAGENTA,BLUE));
Plot3(Tma3, "삼각가중3",iff(tma3>tma3[1],RED,LGREEN));
Plot4(Tma4, "삼각가중4",iff(tma4>tma4[1],RED,LGREEN));
Plot5(Tma5, "삼각가중5",iff(tma4>tma4[1],RED,LGREEN));
2번 질문내용 확인부탁드립니다.
다음글
이전글