커뮤니티
피보나치 폭
지정한 시간대 내에서(시작시간~153500) 최고점으로부터 최저점과의 차이를, 최저가봉 하단에 표기. 감사합니다.
input : 저점(822.9),시작시간(134000);
var : TL1(0),TL2(0),TL3(0),TL4(0),TL5(0),TL6(0),TL7(0);
var : Tcond(False),HH(0),d1(0),t1(0);
if Bdate != Bdate[1] Then
{
Tcond = False;
}
if (sdate != sDate[1] and sTime >= 시작시간) or
(sdate == sDate[1] and sTime >= 시작시간 and sTime[1] < 시작시간) Then
{
Tcond = true;
d1 = sDate;
t1 = sTime;
HH = H;
}
if (sdate != sDate[1] and Time >= 153500) or
(sdate == sDate[1] and Time >= 153500 and Time[1] < 153500) Then
{
Tcond = False;
}
if tcond == true Then
{
if H > HH Then
HH = H;
var1 = HH;
Var2 = 저점;
Var3 = 저점-(HH-저점)*0.587;
Var4 = 저점-(HH-저점)*0.95;
Var5 = 저점-(HH-저점)*1.537;
var6 = HH-8;
var7 = HH-16;
if tcond == true and tcond != tcond[1] Then
{
TL_Delete(TL1);
TL_Delete(TL2);
TL_Delete(TL3);
TL_Delete(TL4);
TL_Delete(TL5);
TL_Delete(TL6);
TL_Delete(TL7);
TL1 = TL_New(sDate,sTime,var1,NextBarSdate,NextBarStime,var1);
TL2 = TL_New(sDate,sTime,var2,NextBarSdate,NextBarStime,var2);
TL3 = TL_New(sDate,sTime,var3,NextBarSdate,NextBarStime,var3);
TL4 = TL_New(sDate,sTime,var4,NextBarSdate,NextBarStime,var4);
TL5 = TL_New(sDate,sTime,var5,NextBarSdate,NextBarStime,var5);
TL6 = TL_New(sDate,sTime,var6,NextBarSdate,NextBarStime,var6);
TL7 = TL_New(sDate,sTime,var7,NextBarSdate,NextBarStime,var7);
TL_SetExtRight(TL1,true);
TL_SetExtRight(TL2,true);
TL_SetExtRight(TL3,true);
TL_SetExtRight(TL4,true);
TL_SetExtRight(TL5,true);
TL_SetExtRight(TL6,true);
TL_SetExtRight(TL7,true);
TL_SetColor(TL1,Red);
TL_SetColor(TL2,Green);
TL_SetColor(TL3,Red);
TL_SetColor(TL4,Blue);
TL_SetColor(TL5,Magenta);
TL_SetColor(TL6,Gold);
TL_SetColor(TL7,Gold);
TL_SetSize(TL6,2);
TL_SetSize(TL7,2);
}
Else
{
TL_SetBegin(TL1,d1,t1,var1);
TL_SetBegin(TL2,d1,t1,var2);
TL_SetBegin(TL3,d1,t1,var3);
TL_SetBegin(TL4,d1,t1,var4);
TL_SetBegin(TL5,d1,t1,var5);
TL_SetBegin(TL6,d1,t1,var6);
TL_SetBegin(TL7,d1,t1,var7);
TL_SetEnd(TL1,NextBarSdate,NextBarStime,var1);
TL_SetEnd(TL2,NextBarSdate,NextBarStime,var2);
TL_SetEnd(TL3,NextBarSdate,NextBarStime,var3);
TL_SetEnd(TL4,NextBarSdate,NextBarStime,var4);
TL_SetEnd(TL5,NextBarSdate,NextBarStime,var5);
TL_SetEnd(TL6,NextBarSdate,NextBarStime,var6);
TL_SetEnd(TL7,NextBarSdate,NextBarStime,var7);
}
}
if Bdate != Bdate[1] Then
{
Condition1 = False;
Condition2 = False;
Condition3 = False;
Condition4 = False;
Condition5 = False;
}
if Tcond == true Then
{
if MarketPosition == 1 Then
{
if IsEntryName("b3") == true Then
Condition1 = true;
if IsEntryName("b4") == true Then
Condition2 = true;
if IsEntryName("b5") == true Then
Condition3 = true;
}
if Condition1 == False and L > var3 Then
Buy("b3",Atlimit,var3);
if Condition2 == False and L > var4 Then
Buy("b4",Atlimit,var4);
if Condition3 == False and L > var5 Then
Buy("b5",Atlimit,var5);
if MarketPosition == 1 and BarsSinceEntry == 1 Then ExitLong("bx");
if MarketPosition == -1 Then
{
if IsEntryName("b6") == true Then
Condition4 = true;
if IsEntryName("b7") == true Then
Condition5 = true;
}
if Condition4 == False and L > var6 Then
Sell("b6",AtStop,var6);
if Condition5 == False and L > var7 Then
Sell("b7",AtStop,var7);
if MarketPosition == -1 and BarsSinceEntry == 1 Then ExitShort();
}
답변 1
예스스탁 예스스탁 답변
2026-02-19 14:49:07