Re: nincs cím

Gup = L>Ref(H,-1);

Gdn = HGap = Gup OR Gdn;

LinLen = Param("Gap Line length",10,1,100,1);

ShowLine = BarsSince(Gup OR Gdn) < LinLen;

TextPos = Showline < Ref(ShowLine,-1);

GapUpHi = IIf( ShowLine, ValueWhen(Gup,Ref(H,-1)),Null);

GapUpLo = IIf( ShowLine, ValueWhen(Gup,L), Null); // OK

GapDnHi = IIf( ShowLine, ValueWhen(GDn,Ref(L,-1)), Null); // OK

GapDnLo = IIf( ShowLine, ValueWhen(GDn,H), Null);

GapLineHi = IIf( ShowLine, ValueWhen(Gap,IIf( Gup, L, IIf( GDn, Ref(L,-1), Null))), Null);

GapLineLo = IIf( ShowLine, ValueWhen(Gap,IIf( Gdn, H, IIf( Gup, Ref(H,-1), Null))), Null);

Plot(C,"",colorBlack,styleBar);

Plot(GapLineHi,"",5,styleStaircase);

Plot(GapLineLo,"",4,styleStaircase);

FirstVisibleBar = Status( "FirstVisibleBar" );

Lastvisiblebar = Status("LastVisibleBar");

for( b = Max(LinLen,Firstvisiblebar); b <= Lastvisiblebar AND b < BarCount; b++)

{

if( Gap[b-LinLen+1] )

{

PlotText(NumToStr(GapLineHi[b],1.2),b,GapLineHi[b],5);

PlotText("\n"+NumToStr(GapLineLo[b],1.2),b,GapLineLo[b],4);

}

}