커뮤니티
등가 수식변경
2022-06-15 15:38:47
1207
글번호 159881
늘 감사합니다.
아래의 수식을 수정해 주세요
1. data2용으로 바꾸어 주세요
2. 텍스트는 지워 주세요
3. 선의 굵기와 색상은 수동으로 지정하고 싶어요
------------
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);
}
}
감사합니다.
답변 1
예스스탁 예스스탁 답변
2022-06-16 12:47:48
안녕하세요
예스스탁입니다.
참조데이타위에 바로 적용되게 설정이 되지 않습니다.
식 적용 후에 마우스로 끌어 참조데이타 위로 올리셔야 하는데
수식에서 출력되는 추세선은 마우스로 잡을 수가 없습니다.
시초가선을 plot으로 추가해 드립니다.
해당선 잡고 참조데이타 위로 올리시면 됩니다.
input : 색1(Maroon),색2(Orange);
var : O1(0,Data2),V1(0,Data2),cnt(0,Data2),TL(0,Data2);
Array : HTL[100](0,Data2),LTL[100](0,Data2);
if Data2(Bdate != Bdate[1]) Then
{
O1 = Data2(O);
v1 = Floor(O1/2.5)*2.5;
TL_Delete(TL);
TL = data2(TL_New_Self(sDate[1],sTime[1],V1,sdate,Stime,v1));
TL_SetExtLeft(TL,true);
TL_SetExtRight(TL,true);
TL_SetSize(TL,1);
For cnt = 1 to 49
{
TL_Delete(HTL[cnt]);
TL_Delete(LTL[cnt]);
value1 = v1+1.25*cnt;
value2 = v1-1.25*cnt;
HTL[cnt] = TL_New_Self(sDate,sTime,value1,NextBarSdate,NextBarStime,Value1);
LTL[cnt] = TL_New_Self(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],색1);
TL_SetColor(LTL[cnt],색1);
}
Else
{
TL_SetSize(HTL[cnt],0);
TL_SetSize(LTL[cnt],0);
TL_SetColor(HTL[cnt],색2);
TL_SetColor(LTL[cnt],색2);
}
}
}
if O1 > 0 Then
Plot1(O1);
즐거운 하루되세요
> 상암동 님이 쓴 글입니다.
> 제목 : 등가 수식변경
> 늘 감사합니다.
아래의 수식을 수정해 주세요
1. data2용으로 바꾸어 주세요
2. 텍스트는 지워 주세요
3. 선의 굵기와 색상은 수동으로 지정하고 싶어요
------------
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);
}
}
감사합니다.
다음글
이전글