항사 많은 도움에 고맙 습니다.

아래 수식에서 생기는 수평선이 길이가 다른데 기본 5봉 가지 나오도록 부탁 드림니다.

더 긴것은 그대로 나오면 됨니다.

즉 기본 5봉 (변수)까지 수평선이 나오도록 부탁 드림니다.

##

input : P(3),n(8),틱(20), 굵기(0);

var : TX(0);

var : cnt(0),LL(0),HH(0);

Array : LTL[10](0),HTL[10](0),LI[10](0),HI[10](0),Lv[10](0),Hv[10](0);;

var : LTL1(0),LTL2(0),LTL3(0),LTL4(0),LTL5(0),LTL6(0);

var : HTL1(0),HTL2(0),HTL3(0),HTL4(0),HTL5(0),HTL6(0);

if L < Lowest(L,P)[1] and (LL == 0 or (LL > 0 and abs(L-LL) >= PriceScale*틱)) Then

{

LL = L;

For cnt = 9 DownTo 1

{

LTL[cnt] = LTL[cnt-1];

Li[cnt] = Li[cnt-1];

Lv[cnt] = Lv[cnt-1];

}

LTL[0] = TL_new(sDate,sTime,LL,NextBarSdate,NextBarStime,LL);

Lv[0] = LL;

Li[0] = Index;

TL_SetColor(LTL[0],Rgb(0,0,0));

TL_SetSize(LTL[0],굵기);

TL_Delete(LTL[n]);

}

Else

{

TL_SetEnd(LTL[0],NextBarSdate,NextBarStime,LL[0]);

}

if H > highest(H,P)[1] and (HH == 0 or (HH > 0 and abs(H-HH) >= PriceScale*틱)) Then

{

HH = H;

For cnt = 9 DownTo 1

{

HTL[cnt] = HTL[cnt-1];

Hi[cnt] = Hi[cnt-1];

Hv[cnt] = Hv[cnt-1];

}

HTL[0] = TL_new(sDate,sTime,HH,NextBarSdate,NextBarStime,HH);

Hv[0] = HH;

Hi[0] = Index;

TL_SetColor(HTL[0],Rgb(220,0,255));

TL_SetSize(HTL[0],굵기);

TL_Delete(HTL[n]);

}

Else

{

TL_SetEnd(HTL[0],NextBarSdate,NextBarStime,HH);

}

For cnt = 1 to n-1

{

if LL[cnt] > 0 and Index <= Li[cnt]+5 Then

TL_SetEnd(LTL[cnt],NextBarSdate,NextBarStime,Lv[cnt]);

if HH[cnt] > 0 and Index <= Hi[cnt]+5 Then

TL_SetEnd(HTL[cnt],NextBarSdate,NextBarStime,Hv[cnt]);

}

고맙습니다.