예스스탁
예스스탁 답변
2023-02-01 10:30:45
안녕하세요
예스스탁입니다.
작성하신 수식에서 text,p,va는 배열변수이어야 합니다.
일반변수는 한봉에 값을 하나만 가지게 되고
배열변수는 한봉에 여러개의 값을 가질수 있습니다.
식작성상 한봉에 여러개의 값을 가질수 있는 변수가 필요하면 배열변수로 선언해서 이용합니다.
텍스트는 최대한 오른쪽으로 정렬해서 표시되게 수정해 드립니다.
input : Per1(33.6),Per2(38.2),Per3(50.0),Per4(61.8),Per5(77.6);
var : HH(0),LL(0),cnt(0);
Array : Text[6](0),P[6](0),va[6](0);
P[1] = per1;
P[2] = per2;
P[3] = per3;
P[4] = per4;
P[5] = per5;
if date > date[1]+1 Then
{
HH = H;
LL = L;
}
if H > HH Then
HH = H;
if L < LL Then
LL = L;
if HH > 0 and LL > 0 Then
{
va[1] = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per1/100));
va[2] = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per2/100));
va[3] = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per3/100));
va[4] = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per4/100));
va[5] = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per5/100));
plot1(HH,"H");
plot2(va[1],"33.6");
plot3(va[2],"38.2");
plot4(va[3],"50.0");
plot5(va[4],"61.8");
plot6(va[5],"77.6");
plot7(LL,"L");
For cnt = 1 to 5
{
Text_Delete(Text[cnt]);
Text[cnt] = Text_New(NextBarSdate,NextBarStime,va[cnt],"("+NumToStr(P[cnt],2)+"%)"+NumToStr(va[cnt],2));
Text_SetStyle(text[cnt],0,1);
}
}
즐거운 하루되세요
> 비듬싸순 님이 쓴 글입니다.
> 제목 : 부탁 드립니다
>
오류가나서 수정부탁드립니다
챠트에 수치 띠울려고하는에 잘안되서 부탁드립니다
수고하세용
input : Per1(33.6),Per2(38.2),Per3(50.0),Per4(61.8),Per5(77.6);
var : HH(0),LL(0),cnt(0),text(5),p(0),va(5);
if date > date[1]+1 Then{
HH = H;
LL = L;
}
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));
plot1(HH,"H");
plot2(var1,"33.6");
plot3(var2,"38.2");
plot4(var3,"50.0");
plot5(var4,"61.8");
plot6(var5,"77.6");
plot7(LL,"L");
For cnt = 1 to 5
{
Text_Delete(Text[cnt]);
Text[cnt] = Text_New(sDate,sTime,p[cnt],"("+NumToStr(P[cnt],2)+"%)"+NumToStr(va[cnt],2));
Text_Delete(p[cnt]);
}