커뮤니티
문의드립니다.
2022-08-21 03:53:48
1605
글번호 161637
직전구간의 고점이나 저점과 현재진행구간의 저점이나 고점 사이의 중간가격을 나타내는 선을 현재진행구간에서 추가했으면 좋겠습니다. 현재구간은 진행중이기 때문에 고점이나 저점이 높아지거나 낮아짐으로 인해 중간가격도 위치가 진행과정에서 새롭게 변할텐데요. 이렇게 변할 경우 다시 변경된 가격위치부터 새롭게 옆으로 그려지는 선으로 현재진행구간이 끝날때까지 그려지고 가격도 선위에 TEXT로 표시되도록 부탁드리겠습니다.
var : a(0),b(0);
var : HH(0),HD(0),HT(0);
var : HH1(0),HD1(0),HT1(0);
var : LL(0),LD(0),LT(0);
var : LL1(0),LD1(0),LT1(0);
var : TL(0),TL1(0),TL2(0),TL3(0),TL4(0),TL5(0);
var : T(0);
a = ma(C,5);
b = ma(c,20);
Condition1 = C > a and C > b;
Condition2 = C < a and C < b;
if T <= 0 and Condition1 == true and Condition1[1] == False Then
{
T = 1;
}
if T >= 0 and Condition2 == true and Condition2[1] == False Then
{
T = -1;
}
if T == 1 Then
{
if T != T[1] Then
{
HD = sDate;
HT = sTime;
HH = H;
HD1 = HD[1];
HT1 = HT[1];
HH1 = HH[1];
if HH1 > 0 and LL > 0 Then
{
value1 = HH1;
Value2 = LL;
TL = TL_new(HD1,HT1,value1,LD,LT,Value2);
TL1 = TL_new(sdate,sTime,value1,NextBarSdate,NextBarStime,value1);
TL2 = TL_new(sdate,sTime,value2,NextBarSdate,NextBarStime,value2);
TL3 = TL_new(sdate,sTime,value1-(value1-Value2)*0.382,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.382);
TL4 = TL_new(sdate,sTime,value1-(value1-Value2)*0.500,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.500);
TL5 = TL_new(sdate,sTime,value1-(value1-Value2)*0.618,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.618);
TL_SetColor(TL,Red);
TL_SetColor(TL1,Magenta);
TL_SetColor(TL2,Magenta);
TL_SetColor(TL3,Magenta);
TL_SetColor(TL4,Magenta);
TL_SetColor(TL5,Magenta);
}
}
if H > HH Then
{
HD = sDate;
HT = sTime;
HH = H;
}
if HH1 > 0 and LL > 0 Then
{
TL_SetEnd(TL1,sDate,sTime,value1);
TL_SetEnd(TL2,sDate,sTime,value2);
TL_SetEnd(TL3,sDate,sTime,value1-(value1-Value2)*0.382);
TL_SetEnd(TL4,sDate,sTime,value1-(value1-Value2)*0.500);
TL_SetEnd(TL5,sDate,sTime,value1-(value1-Value2)*0.618);
}
}
if T == -1 Then
{
if T != T[1] Then
{
LD = sDate;
LT = sTime;
LL = L;
LD1 = LD[1];
LT1 = LT[1];
LL1 = LL[1];
if LL1 > 0 and HH > 0 Then
{
value1 = HH;
Value2 = LL1;
TL = TL_new(LD1,LT1,LL1,HD,HT,HH);
TL1 = TL_new(sdate,sTime,value1,NextBarSdate,NextBarStime,value1);
TL2 = TL_new(sdate,sTime,value2,NextBarSdate,NextBarStime,value2);
TL3 = TL_new(sdate,sTime,value1-(value1-Value2)*0.382,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.382);
TL4 = TL_new(sdate,sTime,value1-(value1-Value2)*0.500,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.500);
TL5 = TL_new(sdate,sTime,value1-(value1-Value2)*0.618,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.618);
TL_SetColor(TL,Blue);
TL_SetColor(TL1,Cyan);
TL_SetColor(TL2,Cyan);
TL_SetColor(TL3,Cyan);
TL_SetColor(TL4,Cyan);
TL_SetColor(TL5,Cyan);
}
}
if L < LL Then
{
LD = sDate;
LT = sTime;
LL = L;
}
if HH1 > 0 and LL > 0 Then
{
TL_SetEnd(TL1,sDate,sTime,value1);
TL_SetEnd(TL2,sDate,sTime,value2);
TL_SetEnd(TL3,sDate,sTime,value1-(value1-Value2)*0.382);
TL_SetEnd(TL4,sDate,sTime,value1-(value1-Value2)*0.500);
TL_SetEnd(TL5,sDate,sTime,value1-(value1-Value2)*0.618);
}
}
답변 1
예스스탁 예스스탁 답변
2022-08-22 14:14:46
안녕하세요
예스스탁입니다.
var : a(0),b(0);
var : HH(0),HD(0),HT(0);
var : HH1(0),HD1(0),HT1(0);
var : LL(0),LD(0),LT(0);
var : LL1(0),LD1(0),LT1(0);
var : TL(0),TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TX6(0);
var : T(0);
a = ma(C,5);
b = ma(c,20);
Condition1 = C > a and C > b;
Condition2 = C < a and C < b;
if T <= 0 and Condition1 == true and Condition1[1] == False Then
{
T = 1;
}
if T >= 0 and Condition2 == true and Condition2[1] == False Then
{
T = -1;
}
if T == 1 Then
{
if T != T[1] Then
{
HD = sDate;
HT = sTime;
HH = H;
HD1 = HD[1];
HT1 = HT[1];
HH1 = HH[1];
if HH1 > 0 and LL > 0 Then
{
value1 = HH1;
Value2 = LL;
TL = TL_new(HD1,HT1,value1,LD,LT,Value2);
#TL1 = TL_new(sdate,sTime,value1,NextBarSdate,NextBarStime,value1);
#TL2 = TL_new(sdate,sTime,value2,NextBarSdate,NextBarStime,value2);
#TL3 = TL_new(sdate,sTime,value1-(value1-Value2)*0.382,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.382);
#TL4 = TL_new(sdate,sTime,value1-(value1-Value2)*0.500,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.500);
#TL5 = TL_new(sdate,sTime,value1-(value1-Value2)*0.618,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.618);
TL_SetColor(TL,Red);
TL_SetColor(TL1,Magenta);
TL_SetColor(TL2,Magenta);
TL_SetColor(TL3,Magenta);
TL_SetColor(TL4,Magenta);
TL_SetColor(TL5,Magenta);
}
if LL > 0 Then
{
TL6 = TL_New(LD,LT,HH-(HH-LL)*0.5,sDate,sTime,HH-(HH-LL)*0.5);
TL_SetColor(TL6,Green);
TX6 = Text_New(sDate,sTime,HH-(HH-LL)*0.5,NumToStr(HH-(HH-LL)*0.5,2));
Text_SetStyle(TX6,0,1);
}
}
Else
{
if H > HH Then
{
HD = sDate;
HT = sTime;
HH = H;
if LL > 0 Then
{
TL_SetBegin(TL6,LD,LT,HH-(HH-LL)*0.5);
TL_Setend(TL6,HD,HT,HH-(HH-LL)*0.5);
Text_SetString(TX6,NumToStr(HH-(HH-LL)*0.5,2));
Text_SetLocation(TX6,sDate,sTime,HH-(HH-LL)*0.5);
}
}
}
if HH1 > 0 and LL > 0 Then
{
TL_SetEnd(TL1,sDate,sTime,value1);
TL_SetEnd(TL2,sDate,sTime,value2);
TL_SetEnd(TL3,sDate,sTime,value1-(value1-Value2)*0.382);
TL_SetEnd(TL4,sDate,sTime,value1-(value1-Value2)*0.500);
TL_SetEnd(TL5,sDate,sTime,value1-(value1-Value2)*0.618);
}
}
if T == -1 Then
{
if T != T[1] Then
{
LD = sDate;
LT = sTime;
LL = L;
LD1 = LD[1];
LT1 = LT[1];
LL1 = LL[1];
if LL1 > 0 and HH > 0 Then
{
value1 = HH;
Value2 = LL1;
TL = TL_new(LD1,LT1,LL1,HD,HT,HH);
#TL1 = TL_new(sdate,sTime,value1,NextBarSdate,NextBarStime,value1);
#TL2 = TL_new(sdate,sTime,value2,NextBarSdate,NextBarStime,value2);
#TL3 = TL_new(sdate,sTime,value1-(value1-Value2)*0.382,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.382);
#TL4 = TL_new(sdate,sTime,value1-(value1-Value2)*0.500,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.500);
#TL5 = TL_new(sdate,sTime,value1-(value1-Value2)*0.618,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.618);
TL_SetColor(TL,Blue);
TL_SetColor(TL1,Cyan);
TL_SetColor(TL2,Cyan);
TL_SetColor(TL3,Cyan);
TL_SetColor(TL4,Cyan);
TL_SetColor(TL5,Cyan);
}
if HH > 0 Then
{
TL6 = TL_New(HD,HT,HH-(HH-LL)*0.5,NextBarSdate,NextBarStime,HH-(HH-LL)*0.5);
TL_SetColor(TL6,Green);
TX6 = Text_New(sDate,sTime,HH-(HH-LL)*0.5,NumToStr(HH-(HH-LL)*0.5,2));
Text_SetStyle(TX6,0,1);
}
}
Else
{
if L < LL Then
{
LD = sDate;
LT = sTime;
LL = L;
if HH > 0 Then
{
TL_SetBegin(TL6,HD,HT,HH-(HH-LL)*0.5);
TL_SetEnd(TL6,LD,LT,HH-(HH-LL)*0.5);
Text_SetString(TX6,NumToStr(HH-(HH-LL)*0.5,2));
Text_SetLocation(TX6,sDate,sTime,HH-(HH-LL)*0.5);
}
}
}
if HH1 > 0 and LL > 0 Then
{
TL_SetEnd(TL1,sDate,sTime,value1);
TL_SetEnd(TL2,sDate,sTime,value2);
TL_SetEnd(TL3,sDate,sTime,value1-(value1-Value2)*0.382);
TL_SetEnd(TL4,sDate,sTime,value1-(value1-Value2)*0.500);
TL_SetEnd(TL5,sDate,sTime,value1-(value1-Value2)*0.618);
}
}
즐거운 하루되세요
> 아름다운아침 님이 쓴 글입니다.
> 제목 : 문의드립니다.
> 직전구간의 고점이나 저점과 현재진행구간의 저점이나 고점 사이의 중간가격을 나타내는 선을 현재진행구간에서 추가했으면 좋겠습니다. 현재구간은 진행중이기 때문에 고점이나 저점이 높아지거나 낮아짐으로 인해 중간가격도 위치가 진행과정에서 새롭게 변할텐데요. 이렇게 변할 경우 다시 변경된 가격위치부터 새롭게 옆으로 그려지는 선으로 현재진행구간이 끝날때까지 그려지고 가격도 선위에 TEXT로 표시되도록 부탁드리겠습니다.
var : a(0),b(0);
var : HH(0),HD(0),HT(0);
var : HH1(0),HD1(0),HT1(0);
var : LL(0),LD(0),LT(0);
var : LL1(0),LD1(0),LT1(0);
var : TL(0),TL1(0),TL2(0),TL3(0),TL4(0),TL5(0);
var : T(0);
a = ma(C,5);
b = ma(c,20);
Condition1 = C > a and C > b;
Condition2 = C < a and C < b;
if T <= 0 and Condition1 == true and Condition1[1] == False Then
{
T = 1;
}
if T >= 0 and Condition2 == true and Condition2[1] == False Then
{
T = -1;
}
if T == 1 Then
{
if T != T[1] Then
{
HD = sDate;
HT = sTime;
HH = H;
HD1 = HD[1];
HT1 = HT[1];
HH1 = HH[1];
if HH1 > 0 and LL > 0 Then
{
value1 = HH1;
Value2 = LL;
TL = TL_new(HD1,HT1,value1,LD,LT,Value2);
TL1 = TL_new(sdate,sTime,value1,NextBarSdate,NextBarStime,value1);
TL2 = TL_new(sdate,sTime,value2,NextBarSdate,NextBarStime,value2);
TL3 = TL_new(sdate,sTime,value1-(value1-Value2)*0.382,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.382);
TL4 = TL_new(sdate,sTime,value1-(value1-Value2)*0.500,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.500);
TL5 = TL_new(sdate,sTime,value1-(value1-Value2)*0.618,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.618);
TL_SetColor(TL,Red);
TL_SetColor(TL1,Magenta);
TL_SetColor(TL2,Magenta);
TL_SetColor(TL3,Magenta);
TL_SetColor(TL4,Magenta);
TL_SetColor(TL5,Magenta);
}
}
if H > HH Then
{
HD = sDate;
HT = sTime;
HH = H;
}
if HH1 > 0 and LL > 0 Then
{
TL_SetEnd(TL1,sDate,sTime,value1);
TL_SetEnd(TL2,sDate,sTime,value2);
TL_SetEnd(TL3,sDate,sTime,value1-(value1-Value2)*0.382);
TL_SetEnd(TL4,sDate,sTime,value1-(value1-Value2)*0.500);
TL_SetEnd(TL5,sDate,sTime,value1-(value1-Value2)*0.618);
}
}
if T == -1 Then
{
if T != T[1] Then
{
LD = sDate;
LT = sTime;
LL = L;
LD1 = LD[1];
LT1 = LT[1];
LL1 = LL[1];
if LL1 > 0 and HH > 0 Then
{
value1 = HH;
Value2 = LL1;
TL = TL_new(LD1,LT1,LL1,HD,HT,HH);
TL1 = TL_new(sdate,sTime,value1,NextBarSdate,NextBarStime,value1);
TL2 = TL_new(sdate,sTime,value2,NextBarSdate,NextBarStime,value2);
TL3 = TL_new(sdate,sTime,value1-(value1-Value2)*0.382,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.382);
TL4 = TL_new(sdate,sTime,value1-(value1-Value2)*0.500,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.500);
TL5 = TL_new(sdate,sTime,value1-(value1-Value2)*0.618,NextBarSdate,NextBarStime,value1-(value1-Value2)*0.618);
TL_SetColor(TL,Blue);
TL_SetColor(TL1,Cyan);
TL_SetColor(TL2,Cyan);
TL_SetColor(TL3,Cyan);
TL_SetColor(TL4,Cyan);
TL_SetColor(TL5,Cyan);
}
}
if L < LL Then
{
LD = sDate;
LT = sTime;
LL = L;
}
if HH1 > 0 and LL > 0 Then
{
TL_SetEnd(TL1,sDate,sTime,value1);
TL_SetEnd(TL2,sDate,sTime,value2);
TL_SetEnd(TL3,sDate,sTime,value1-(value1-Value2)*0.382);
TL_SetEnd(TL4,sDate,sTime,value1-(value1-Value2)*0.500);
TL_SetEnd(TL5,sDate,sTime,value1-(value1-Value2)*0.618);
}
}