커뮤니티
피보나치 조정대 임의의 기준점부터 표시
2022-05-23 15:14:03
1265
글번호 159177
input : Per1(23.6),Per2(38.2),Per3(50.0),Per4(61.8),Per5(76.4);
var : HH(0),LL(0),D1(0),T1(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0);
HH = DayHigh;
LL = daylow;
var1 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per1/100));
var2 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per2/100));
var3 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per3/100));
var4 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per4/100));
var5 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per5/100));
if Bdate != Bdate[1] Then
{
D1 = sDate;
T1 = sTime;
TL1 = TL_New(D1,T1,HH,NextBarSdate,NextBarStime,HH);
TL2 = TL_New(D1,T1,var1,NextBarSdate,NextBarStime,var1);
TL3 = TL_New(D1,T1,var2,NextBarSdate,NextBarStime,var2);
TL4 = TL_New(D1,T1,var3,NextBarSdate,NextBarStime,var3);
TL5 = TL_New(D1,T1,var4,NextBarSdate,NextBarStime,var4);
TL6 = TL_New(D1,T1,var5,NextBarSdate,NextBarStime,var5);
TL7 = TL_New(D1,T1,LL,NextBarSdate,NextBarStime,LL);
#굵기
TL_SetSize(TL1,1);
TL_SetSize(TL2,1);
TL_SetSize(TL3,1);
TL_SetSize(TL4,4);
TL_SetSize(TL5,1);
TL_SetSize(TL6,1);
TL_SetSize(TL7,1);
#색상
TL_SetColor(TL1,Green);
TL_SetColor(TL2,Cyan);
TL_SetColor(TL3,Red);
TL_SetColor(TL4,Pink);
TL_SetColor(TL5,Blue);
TL_SetColor(TL6,Cyan);
TL_SetColor(TL7,Green);
}
Else
{
TL_SetBegin(TL1,D1,T1,HH);
TL_SetBegin(TL2,D1,T1,var1);
TL_SetBegin(TL3,D1,T1,Var2);
TL_SetBegin(TL4,D1,T1,Var3);
TL_SetBegin(TL5,D1,T1,Var4);
TL_SetBegin(TL6,D1,T1,var5);
TL_SetBegin(TL7,D1,T1,LL);
TL_SetEnd(TL1,Sdate,Stime,HH);
TL_SetEnd(TL2,Sdate,Stime,var1);
TL_SetEnd(TL3,Sdate,Stime,Var2);
TL_SetEnd(TL4,Sdate,Stime,Var3);
TL_SetEnd(TL5,Sdate,Stime,Var4);
TL_SetEnd(TL6,Sdate,Stime,var5);
TL_SetEnd(TL7,Sdate,Stime,LL);
}
반등파가 아닌 횡보 파동이 생길 때에는 일중 최고점 최저점 기준의 피보나치 조정대가 아닌 새로운 피보나치 조정대를 살펴봐야 해서,
장중에 임의의 어느 한 지점을 선택해서 숫자를 기입하거나 클릭하거나 안되면 최저점이나 최고점을 기준으로 그 지점부터 상승하면 위로,하락하면 아래로 선이 꺾이면서 벌어지지 않고,고저에 따라 수평 이동하면서 첫 라인도 같이 평행선으로 넓어지게 하는 조정대 부탁합니다.
숫자를 바뀌주면 기존 조정대 없어지고 새로 다시 시작되면 더욱 좋겠습니다.
여러번 감사합니다.
답변 1
예스스탁 예스스탁 답변
2022-05-23 16:29:51
안녕하세요
예스스탁입니다.
수식에서 마우스클릭은 감지하지 못합니다.
날짜와 시간을 지정해 지정한 날짜의 시간부터 최고가 최저가 계산해서
그려지게 수정해 드립니다.
input : ndate(20220523),ntime(100000);
input : Per1(23.6),Per2(38.2),Per3(50.0),Per4(61.8),Per5(76.4);
var : HH(0),LL(0),D1(0),T1(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0);
if sDate >= ndate and sTime >= ntime Then
{
Condition1 = True;
if hh == 0 or (hh > 0 and h > hh) Then
hh = h;
if ll == 0 or (ll > 0 and L < ll) Then
ll = l;
var1 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per1/100));
var2 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per2/100));
var3 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per3/100));
var4 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per4/100));
var5 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per5/100));
if Condition1[1] == False Then
{
D1 = sDate;
T1 = sTime;
TL1 = TL_New(D1,T1,HH,NextBarSdate,NextBarStime,HH);
TL2 = TL_New(D1,T1,var1,NextBarSdate,NextBarStime,var1);
TL3 = TL_New(D1,T1,var2,NextBarSdate,NextBarStime,var2);
TL4 = TL_New(D1,T1,var3,NextBarSdate,NextBarStime,var3);
TL5 = TL_New(D1,T1,var4,NextBarSdate,NextBarStime,var4);
TL6 = TL_New(D1,T1,var5,NextBarSdate,NextBarStime,var5);
TL7 = TL_New(D1,T1,LL,NextBarSdate,NextBarStime,LL);
#굵기
TL_SetSize(TL1,1);
TL_SetSize(TL2,1);
TL_SetSize(TL3,1);
TL_SetSize(TL4,4);
TL_SetSize(TL5,1);
TL_SetSize(TL6,1);
TL_SetSize(TL7,1);
#색상
TL_SetColor(TL1,Green);
TL_SetColor(TL2,Cyan);
TL_SetColor(TL3,Red);
TL_SetColor(TL4,Pink);
TL_SetColor(TL5,Blue);
TL_SetColor(TL6,Cyan);
TL_SetColor(TL7,Green);
}
Else
{
TL_SetBegin(TL1,D1,T1,HH);
TL_SetBegin(TL2,D1,T1,var1);
TL_SetBegin(TL3,D1,T1,Var2);
TL_SetBegin(TL4,D1,T1,Var3);
TL_SetBegin(TL5,D1,T1,Var4);
TL_SetBegin(TL6,D1,T1,var5);
TL_SetBegin(TL7,D1,T1,LL);
TL_SetEnd(TL1,Sdate,Stime,HH);
TL_SetEnd(TL2,Sdate,Stime,var1);
TL_SetEnd(TL3,Sdate,Stime,Var2);
TL_SetEnd(TL4,Sdate,Stime,Var3);
TL_SetEnd(TL5,Sdate,Stime,Var4);
TL_SetEnd(TL6,Sdate,Stime,var5);
TL_SetEnd(TL7,Sdate,Stime,LL);
}
}
즐거운 하루되세요
> 고성 님이 쓴 글입니다.
> 제목 : 피보나치 조정대 임의의 기준점부터 표시
> input : Per1(23.6),Per2(38.2),Per3(50.0),Per4(61.8),Per5(76.4);
var : HH(0),LL(0),D1(0),T1(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0);
HH = DayHigh;
LL = daylow;
var1 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per1/100));
var2 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per2/100));
var3 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per3/100));
var4 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per4/100));
var5 = 10^(LOG10(HH)-(LOG10(HH)-LOG10(LL))*(Per5/100));
if Bdate != Bdate[1] Then
{
D1 = sDate;
T1 = sTime;
TL1 = TL_New(D1,T1,HH,NextBarSdate,NextBarStime,HH);
TL2 = TL_New(D1,T1,var1,NextBarSdate,NextBarStime,var1);
TL3 = TL_New(D1,T1,var2,NextBarSdate,NextBarStime,var2);
TL4 = TL_New(D1,T1,var3,NextBarSdate,NextBarStime,var3);
TL5 = TL_New(D1,T1,var4,NextBarSdate,NextBarStime,var4);
TL6 = TL_New(D1,T1,var5,NextBarSdate,NextBarStime,var5);
TL7 = TL_New(D1,T1,LL,NextBarSdate,NextBarStime,LL);
#굵기
TL_SetSize(TL1,1);
TL_SetSize(TL2,1);
TL_SetSize(TL3,1);
TL_SetSize(TL4,4);
TL_SetSize(TL5,1);
TL_SetSize(TL6,1);
TL_SetSize(TL7,1);
#색상
TL_SetColor(TL1,Green);
TL_SetColor(TL2,Cyan);
TL_SetColor(TL3,Red);
TL_SetColor(TL4,Pink);
TL_SetColor(TL5,Blue);
TL_SetColor(TL6,Cyan);
TL_SetColor(TL7,Green);
}
Else
{
TL_SetBegin(TL1,D1,T1,HH);
TL_SetBegin(TL2,D1,T1,var1);
TL_SetBegin(TL3,D1,T1,Var2);
TL_SetBegin(TL4,D1,T1,Var3);
TL_SetBegin(TL5,D1,T1,Var4);
TL_SetBegin(TL6,D1,T1,var5);
TL_SetBegin(TL7,D1,T1,LL);
TL_SetEnd(TL1,Sdate,Stime,HH);
TL_SetEnd(TL2,Sdate,Stime,var1);
TL_SetEnd(TL3,Sdate,Stime,Var2);
TL_SetEnd(TL4,Sdate,Stime,Var3);
TL_SetEnd(TL5,Sdate,Stime,Var4);
TL_SetEnd(TL6,Sdate,Stime,var5);
TL_SetEnd(TL7,Sdate,Stime,LL);
}
반등파가 아닌 횡보 파동이 생길 때에는 일중 최고점 최저점 기준의 피보나치 조정대가 아닌 새로운 피보나치 조정대를 살펴봐야 해서,
장중에 임의의 어느 한 지점을 선택해서 숫자를 기입하거나 클릭하거나 안되면 최저점이나 최고점을 기준으로 그 지점부터 상승하면 위로,하락하면 아래로 선이 꺾이면서 벌어지지 않고,고저에 따라 수평 이동하면서 첫 라인도 같이 평행선으로 넓어지게 하는 조정대 부탁합니다.
숫자를 바뀌주면 기존 조정대 없어지고 새로 다시 시작되면 더욱 좋겠습니다.
여러번 감사합니다.