커뮤니티
문의
2021-07-25 22:08:29
1134
글번호 151067
항생10시15분기준으로 전일고가, 전일저가, 당일고가, 당일저가, 당일시가,를 횡선이 나오도록 부탁드리고 text도 나오도록 부탁드립니다.
답변 1
예스스탁 예스스탁 답변
2021-07-26 16:53:35
안녕하세요
예스스탁입니다.
input : 기준시간(101500);
input : 표시소숫점자리(0);
var : cnt(0),D1(0),T1(0);
var : TX1(0),TX2(0),TX3(0),TX4(0),TX5(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0);
Array : DO[20](0),DH[20](0),DL[20](0),DC[20](0);
if (sdate != sdate[1] and stime >= 기준시간) or
(sdate == sdate[1] and stime >= 기준시간 and stime[1] < 기준시간) Then
{
D1 = sDate;
T1 = sTime;
DO[0] = O;
DH[0] = H;
DL[0] = L;
for cnt = 1 to 19
{
DO[cnt] = DO[cnt-1][1];
DH[cnt] = DH[cnt-1][1];
DL[cnt] = DL[cnt-1][1];
DC[cnt] = DC[cnt-1][1];
}
if DO[1] > 0 Then
{
TL_Delete(TL1);
TL_Delete(TL2);
TL1 = TL_New(sdate,stime,DH[1],NextBarSdate,NextBarStime,DH[1]);
TL2 = TL_New(sdate,stime,DL[1],NextBarSdate,NextBarStime,DL[1]);
TL_SetColor(TL1,RED);
TL_SetColor(TL2,BLUE);
Text_Delete(TX1);
Text_Delete(TX2);
TX1 = Text_New(NextBarSdate,NextBarStime,DH[1],"전고"+NumToStr(DH[1],표시소숫점자리));
TX2 = Text_New(NextBarSdate,NextBarStime,DL[1],"전저"+NumToStr(DL[1],표시소숫점자리));
Text_SetStyle(TX1,0,1);
Text_SetStyle(TX2,0,1);
Text_SetColor(TX1,RED);
Text_SetColor(TX2,BLUE);
}
if DO[0] > 0 Then
{
TL_Delete(TL3);
TL_Delete(TL4);
TL_Delete(TL5);
TL3 = TL_New(sdate,stime,DO[0],NextBarSdate,NextBarStime,DO[0]);
TL4 = TL_New(sdate,stime,DH[0],NextBarSdate,NextBarStime,DH[0]);
TL5 = TL_New(sdate,stime,DL[0],NextBarSdate,NextBarStime,DL[0]);
TL_SetColor(TL3,GREEN);
TL_SetColor(TL4,MAGENTA);
TL_SetColor(TL5,CYAN);
Text_Delete(TX3);
Text_Delete(TX4);
Text_Delete(TX5);
TX3 = Text_New(NextBarSdate,NextBarStime,DO[0],"시가"+NumToStr(DO[0],표시소숫점자리));
TX4 = Text_New(NextBarSdate,NextBarStime,DH[0],"고가"+NumToStr(DH[0],표시소숫점자리));
TX5 = Text_New(NextBarSdate,NextBarStime,DL[0],"저가"+NumToStr(DL[0],표시소숫점자리));
Text_SetStyle(TX3,0,1);
Text_SetStyle(TX4,0,1);
Text_SetStyle(TX5,0,1);
Text_SetColor(TX3,GREEN);
Text_SetColor(TX4,MAGENTA);
Text_SetColor(TX5,CYAN);
}
}
DC[0] = C;
if H > DH[0] Then
DH[0] = H;
if L < DL[0] Then
DL[0] = L;
if DO[1] > 0 Then
{
TL_SetEnd(TL1,NextBarSdate,NextBarStime,DH[1]);
TL_SetEnd(TL2,NextBarSdate,NextBarStime,DL[1]);
Text_SetLocation(TX1,NextBarSdate,NextBarStime,DH[1]);
Text_SetLocation(TX2,NextBarSdate,NextBarStime,DL[1]);
}
if DO[0] > 0 Then
{
TL_SetBegin(TL3,D1,T1,DO[0]);
TL_SetBegin(TL4,D1,T1,DH[0]);
TL_SetBegin(TL5,D1,T1,DL[0]);
TL_SetEnd(TL3,NextBarSdate,NextBarStime,DO[0]);
TL_SetEnd(TL4,NextBarSdate,NextBarStime,DH[0]);
TL_SetEnd(TL5,NextBarSdate,NextBarStime,DL[0]);
Text_SetLocation(TX3,NextBarSdate,NextBarStime,DO[0]);
Text_SetLocation(TX4,NextBarSdate,NextBarStime,DH[0]);
Text_SetLocation(TX5,NextBarSdate,NextBarStime,DL[0]);
}
즐거운 하루되세요
> 레전드 님이 쓴 글입니다.
> 제목 : 문의
> 항생10시15분기준으로 전일고가, 전일저가, 당일고가, 당일저가, 당일시가,를 횡선이 나오도록 부탁드리고 text도 나오도록 부탁드립니다.
다음글
이전글