커뮤니티
부탁드립니다
2025-11-25 10:18:56
35
글번호 228381
20개 캔들이 아니고
ma(c,20)선의 직전 고저점을 기준으로 하는 피보나치 수식좀 부탁드립니다
답변 1
예스스탁 예스스탁 답변
2025-11-25 15:41:22
안녕하세요
예스스탁입니다.
20선기준 고저점은 종가 이평 크로스기준으로 작성해 드립니다.
input : P(20),Per1(76.4),Per2(61.8),Per3(50.0),Per4(38.2),Per5(23.6);
var : mav(0),t(0),hh(0),ll(0),d1(0),t1(0);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0);
mav = ma(c,P);
Plot1(mav);
if CrossUp(C,mav) Then
{
t = 1;
hh = h;
d1 = sDate;
t1 = sTime;
if ll > 0 and hh > 0 Then
{
value1 = hh;
value2 = LL+(hh-LL)*(Per1/100);
value3 = LL+(hh-LL)*(Per2/100);
value4 = LL+(hh-LL)*(Per3/100);
value5 = LL+(hh-LL)*(Per4/100);
value6 = LL+(hh-LL)*(Per5/100);
value7 = LL;
TL1 = TL_New(d1,t1,value1,NextBarSdate,NextBarStime,value1);
TL2 = TL_New(d1,t1,value2,NextBarSdate,NextBarStime,value2);
TL3 = TL_New(d1,t1,value3,NextBarSdate,NextBarStime,value3);
TL4 = TL_New(d1,t1,value4,NextBarSdate,NextBarStime,value4);
TL5 = TL_New(d1,t1,value5,NextBarSdate,NextBarStime,value5);
TL6 = TL_New(d1,t1,value6,NextBarSdate,NextBarStime,value6);
TL7 = TL_New(d1,t1,value7,NextBarSdate,NextBarStime,value7);
TL_SetColor(TL1,Red);
TL_SetColor(TL2,Red);
TL_SetColor(TL3,Red);
TL_SetColor(TL4,Red);
TL_SetColor(TL5,Red);
TL_SetColor(TL6,Red);
TL_SetColor(TL7,Red);
}
}
Else if CrossDown(C,mav) Then
{
t = -1;
ll = l;
d1 = sDate;
t1 = sTime;
if ll > 0 and ll > 0 Then
{
value1 = hh;
value2 = LL+(hh-LL)*(Per1/100);
value3 = LL+(hh-LL)*(Per2/100);
value4 = LL+(hh-LL)*(Per3/100);
value5 = LL+(hh-LL)*(Per4/100);
value6 = LL+(hh-LL)*(Per5/100);
value7 = LL;
TL1 = TL_New(d1,t1,value1,NextBarSdate,NextBarStime,value1);
TL2 = TL_New(d1,t1,value2,NextBarSdate,NextBarStime,value2);
TL3 = TL_New(d1,t1,value3,NextBarSdate,NextBarStime,value3);
TL4 = TL_New(d1,t1,value4,NextBarSdate,NextBarStime,value4);
TL5 = TL_New(d1,t1,value5,NextBarSdate,NextBarStime,value5);
TL6 = TL_New(d1,t1,value6,NextBarSdate,NextBarStime,value6);
TL7 = TL_New(d1,t1,value7,NextBarSdate,NextBarStime,value7);
TL_SetColor(TL1,Blue);
TL_SetColor(TL2,Blue);
TL_SetColor(TL3,Blue);
TL_SetColor(TL4,Blue);
TL_SetColor(TL5,Blue);
TL_SetColor(TL6,Blue);
TL_SetColor(TL7,Blue);
}
}
Else
{
if t == 1 Then
{
if h > hh Then
hh = h;
}
if t == -1 Then
{
if l < ll Then
ll = l;
}
value1 = hh;
value2 = LL+(hh-LL)*(Per1/100);
value3 = LL+(hh-LL)*(Per2/100);
value4 = LL+(hh-LL)*(Per3/100);
value5 = LL+(hh-LL)*(Per4/100);
value6 = LL+(hh-LL)*(Per5/100);
value7 = LL;
TL_SetBegin(TL1,d1,t1,value1);
TL_SetBegin(TL2,d1,t1,value2);
TL_SetBegin(TL3,d1,t1,value3);
TL_SetBegin(TL4,d1,t1,value4);
TL_SetBegin(TL5,d1,t1,value5);
TL_SetBegin(TL6,d1,t1,value6);
TL_SetBegin(TL7,d1,t1,value7);
TL_SetEnd(TL1,NextBarSdate,NextBarStime,value1);
TL_SetEnd(TL2,NextBarSdate,NextBarStime,value2);
TL_SetEnd(TL3,NextBarSdate,NextBarStime,value3);
TL_SetEnd(TL4,NextBarSdate,NextBarStime,value4);
TL_SetEnd(TL5,NextBarSdate,NextBarStime,value5);
TL_SetEnd(TL6,NextBarSdate,NextBarStime,value6);
TL_SetEnd(TL7,NextBarSdate,NextBarStime,value7);
}
즐거운 하루되세요
다음글