예스스탁
예스스탁 답변
2022-06-13 10:24:17
안녕하세요
예스스탁입니다.
var : cnt(0),TL(0),TX(0);
Array : HTL[100](0),LTL[100](0);
Array : HTX[100](0),LTX[100](0);
if Index == 1 or Bdate != Bdate[1] Then
{
var1 = Floor(DayOpen/2.5)*2.5;
TL_Delete(TL);
TL = TL_New(sDate,sTime,var1,NextBarSdate,NextBarStime,var1);
TL_SetExtLeft(TL,true);
TL_SetExtRight(TL,true);
TL_SetSize(TL,1);
Text_Delete(TX);
TX = Text_New(NextBarSdate,NextBarStime,var1,NumToStr(var1,2));
Text_SetStyle(tx,0,1);
For cnt = 1 to 49
{
TL_Delete(HTL[cnt]);
TL_Delete(LTL[cnt]);
value1 = var1+1.25*cnt;
value2 = var1-1.25*cnt;
HTL[cnt] = TL_New(sDate,sTime,value1,NextBarSdate,NextBarStime,Value1);
LTL[cnt] = TL_New(sDate,sTime,value2,NextBarSdate,NextBarStime,Value2);
TL_SetExtLeft(HTL[cnt],true);
TL_SetExtRight(HTL[cnt],true);
TL_SetExtLeft(LTL[cnt],true);
TL_SetExtRight(LTL[cnt],true);
if cnt%2 == 0 Then
{
TL_SetSize(HTL[cnt],1);
TL_SetSize(LTL[cnt],1);
TL_SetColor(HTL[cnt],Maroon);
TL_SetColor(HTL[cnt],Maroon);
}
Else
{
TL_SetSize(HTL[cnt],0);
TL_SetSize(LTL[cnt],0);
TL_SetColor(HTL[cnt],Orange);
TL_SetColor(HTL[cnt],Orange);
}
Text_Delete(HTX[cnt]);
Text_Delete(LTX[cnt]);
HTX[cnt] = Text_New(NextBarSdate,NextBarStime,Value1,NumToStr(value1,2));
LTX[cnt] = Text_New(NextBarSdate,NextBarStime,Value2,NumToStr(value2,2));
Text_SetStyle(HTX[cnt],0,1);
Text_SetStyle(LTX[cnt],0,1);
}
}
Else
{
Text_SetLocation(TX,NextBarSdate,NextBarStime,var1);
For cnt = 1 to 49
{
value1 = var1+1.25*cnt;
value2 = var1-1.25*cnt;
Text_SetLocation(HTL[cnt],NextBarSdate,NextBarStime,value1);
Text_SetLocation(LTL[cnt],NextBarSdate,NextBarStime,value2);
}
}
즐거운 하루되세요
> 볼라레 님이 쓴 글입니다.
> 제목 : 수식문의
> 그림과 같은 라인을 설정하고자 합니다
KP200 선물 연결 챠트에 옵션 행사가 2.5 point차이의 라인과 1.25 point 차이의
행사가 변경 라인을 그리고 싶습니다
수식을 부탁 드립니다
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 수식문의
> 안녕하세요
예스스탁입니다.
var : cnt(0),TL(0),TX(0);
Array : HTL[100](0),LTL[100](0);
Array : HTX[100](0),LTX[100](0);
if Index == 1 or Bdate != Bdate[1] Then
{
var1 = Floor(DayOpen/2.5)*2.5;
TL_Delete(TL);
TL = TL_New(sDate,sTime,var1,NextBarSdate,NextBarStime,var1);
TL_SetExtLeft(TL,true);
TL_SetExtRight(TL,true);
TL_SetSize(TL,1);
Text_Delete(TX);
TX = Text_New(NextBarSdate,NextBarStime,var1,NumToStr(var1,2));
Text_SetStyle(tx,0,1);
For cnt = 1 to 49
{
TL_Delete(HTL[cnt]);
TL_Delete(LTL[cnt]);
value1 = var1+1.25*cnt;
value2 = var1-1.25*cnt;
HTL[cnt] = TL_New(sDate,sTime,value1,NextBarSdate,NextBarStime,Value1);
LTL[cnt] = TL_New(sDate,sTime,value2,NextBarSdate,NextBarStime,Value2);
TL_SetExtLeft(HTL[cnt],true);
TL_SetExtRight(HTL[cnt],true);
TL_SetExtLeft(LTL[cnt],true);
TL_SetExtRight(LTL[cnt],true);
if cnt%2 == 0 Then
{
TL_SetSize(HTL[cnt],1);
TL_SetSize(LTL[cnt],1);
TL_SetColor(HTL[cnt],Maroon);
TL_SetColor(HTL[cnt],Maroon);
}
Else
{
TL_SetSize(HTL[cnt],0);
TL_SetSize(LTL[cnt],0);
TL_SetColor(HTL[cnt],Orange);
TL_SetColor(HTL[cnt],Orange);
}
Text_Delete(HTX[cnt]);
Text_Delete(LTX[cnt]);
HTX[cnt] = Text_New(NextBarSdate,NextBarStime,Value1,NumToStr(value1,2));
LTX[cnt] = Text_New(NextBarSdate,NextBarStime,Value2,NumToStr(value2,2));
Text_SetStyle(HTX[cnt],0,1);
Text_SetStyle(LTX[cnt],0,1);
}
}
Else
{
Text_SetLocation(TX,NextBarSdate,NextBarStime,var1);
For cnt = 1 to 49
{
value1 = var1+1.25*cnt;
value2 = var1-1.25*cnt;
Text_SetLocation(HTL[cnt],NextBarSdate,NextBarStime,value1);
Text_SetLocation(LTL[cnt],NextBarSdate,NextBarStime,value2);
}
}
즐거운 하루되세요
> 볼라레 님이 쓴 글입니다.
> 제목 : 수식문의
> 그림과 같은 라인을 설정하고자 합니다
KP200 선물 연결 챠트에 옵션 행사가 2.5 point차이의 라인과 1.25 point 차이의
행사가 변경 라인을 그리고 싶습니다
수식을 부탁 드립니다