예스스탁
예스스탁 답변
2021-11-01 13:38:08
안녕하세요
예스스탁입니다.
1
input : per1(14),per2(20),per3(30),per4(50),per5(60),per6(80),per7(120),per8(150),
per9(250);
var : cnt(0);
Array : va[14](0), Text[14](0),p[14](0);
P[1] = per1;
P[2] = per2;
P[3] = per3;
P[4] = per4;
P[5] = per5;
P[6] = per6;
P[7] = per7;
P[8] = per8;
P[9] = per9;
va[1] = DayLow*(1+P[1]/100);
va[2] = DayLow*(1+P[2]/100);
va[3] = DayLow*(1+P[3]/100);
va[4] = DayLow*(1+P[4]/100);
va[5] = DayLow*(1+P[5]/100);
va[6] = DayLow*(1+P[6]/100);
va[7] = DayLow*(1+P[7]/100);
va[8] = DayLow*(1+P[8]/100);
va[9] = DayLow*(1+P[9]/100);
plot1(va[1]);
plot2(va[2]);
plot3(va[3]);
plot4(va[4]);
plot5(va[5]);
plot6(va[6]);
plot7(va[7]);
plot8(va[8]);
plot9(va[9]);
For cnt = 1 to 9
{
Text_Delete(Text[cnt]);
Text[cnt] = Text_New(sDate,sTime,va[cnt],"("+NumToStr(P[cnt],2)+"%)"+NumToStr(va[cnt],2));
Text_Delete(p[cnt]);
}
2
작성하신 식은 당일최저가 기준 지정한 %입니다.
비율을 당일폭 대비로 하면 아래와 같습니다.
input : per1(14),per2(20),per3(30),per4(50),per5(60),per6(80),per7(120),per8(150),
per9(250);
var : cnt(0);
Array : va[14](0), Text[14](0),p[14](0);
var1 = DayHigh-DayLow;
P[1] = per1;
P[2] = per2;
P[3] = per3;
P[4] = per4;
P[5] = per5;
P[6] = per6;
P[7] = per7;
P[8] = per8;
P[9] = per9;
va[1] = DayLow+var1*(P[1]/100);
va[2] = DayLow+var1*(P[2]/100);
va[3] = DayLow+var1*(P[3]/100);
va[4] = DayLow+var1*(P[4]/100);
va[5] = DayLow+var1*(P[5]/100);
va[6] = DayLow+var1*(P[6]/100);
va[7] = DayLow+var1*(P[7]/100);
va[8] = DayLow+var1*(P[8]/100);
va[9] = DayLow+var1*(P[9]/100);
plot1(va[1]);
plot2(va[2]);
plot3(va[3]);
plot4(va[4]);
plot5(va[5]);
plot6(va[6]);
plot7(va[7]);
plot8(va[8]);
plot9(va[9]);
For cnt = 1 to 9
{
Text_Delete(Text[cnt]);
Text[cnt] = Text_New(sDate,sTime,va[cnt],"("+NumToStr(P[cnt],2)+"%)"+NumToStr(va[cnt],2));
Text_Delete(p[cnt]);
}
즐거운 하루되세요
> 비듬싸순 님이 쓴 글입니다.
> 제목 : 문의드립니다
> 수고 하십니다
그림과 같이 %와가격을 나타내고 싶은데
하다가 막혀서 문의드립니다
input : per1(14),per2(20),per3(30),per4(50),per5(60),per6(80),per7(120),per8(150),
per9(250);
var : cnt(0);
Array : va[14](0), Text[14](0),p[14](0);
va[1] = DayLow*(1+per1/100);
va[2] = DayLow*(1+per2/100);
va[3] = DayLow*(1+per3/100);
va[4] = DayLow*(1+per4/100);
va[5] = DayLow*(1+per5/100);
va[6] = DayLow*(1+per6/100);
va[7] = DayLow*(1+per7/100);
va[8] = DayLow*(1+per8/100);
va[9] = DayLow*(1+per9/100);
plot1(va[1]);
plot2(va[2]);
plot3(va[3]);
plot4(va[4]);
plot5(va[5]);
plot6(va[6]);
plot7(va[7]);
plot8(va[8]);
plot9(va[9]);
For cnt = 0 to 8 Begin
Text_Delete(Text[cnt]);
Text[cnt] = Text_New(CurrentDate,CurrentTime,va[cnt],NumToStr(va[cnt],2));
End;
For cnt = 0 to 8 Begin
Text_Delete(p[cnt]);
End;