[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[amibroker] Looping Barcount suggested fix failed



PureBytes Links

Trading Reference Links

I followed the suggestion made to fix the barcount loop by removing 
last value as shown below.  Can anyone help me identify and fix the 
problem?

Thanks,

David K.

Changes made to remove LastValue
bc = abs(xr0-xs0);//Changed to calculate BarIndex difference
//bc=LastValue(bcount,1);//Removed to use current value


bi = SelectedValue(BarIndex());
sbi = BarIndex();
x1=BarCount-1;
bcol=IIf(C>O,colorLime,IIf(C<O,colorRed,colorWhite));
Plot(C,"",bcol,128);
dec = (Param("Decimals",2,0,7,1)/10)+1;
////////////////////
_SECTION_BEGIN("Bar Count");
pct=Param("Pivot %",0.80,0.10,60,0.10);
Zigl = ParamToggle("Zig Line","Off|On",1);
hLb=Param("High Look Back",1,1,30,1);
lLb=Param("Low Look Back",1,1,30,1);
vs = Param ("Pivot $ V Shift",1.50,0,30,0.10);
////////////////////
SetBarsRequired( 999999,999999);
pk=PeakBars(H,pct)==0; tr=TroughBars(L,pct)==0;
zHi=Zig(H,pct); zLo=Zig(L,pct); HLAvg=(zHi+zLo)/2;
zp=IIf(pk,zHi,IIf(tr,zLo,IIf(HLAvg>Ref(HLAvg,-1),H,L)));
za=Zig(zp,pct);
if(Zigl==1)Plot(za,"",45,1|styleNoLabel);
////////////////////
SetBarsRequired( 999999,999999);
pk=PeakBars(H,pct)==0;
tr=TroughBars(L,pct)==0;
zH=Zig(H,pct); zL=Zig(L,pct); HLAvg=(zH+zL)/2;
zp=IIf(pk,zH,IIf(tr,zL,IIf(HLAvg>Ref(HLAvg,-1),H,L)));
za=Zig(zp,pct);
////////////////////
if(Zigl==1)Plot(za,"",45,1|styleNoLabel);
PlotShapes(shapeDownArrow*pk,colorBrightGreen,0,H,-15);
PlotShapes(shapeUpArrow*tr,colorYellow,0,L,-15);
////////////////////
pR=Ref(za,-1)<za AND za>Ref(za,1);
xr0=SelectedValue(ValueWhen(pR,sbi,hLb));
yr0=SelectedValue(ValueWhen(pR,zp,hLb));
////////////////////
pS=Ref(za,-1)>za AND za<Ref(za,1);
xs0=SelectedValue(ValueWhen(pS,sbi,lLb));
ys0=SelectedValue(ValueWhen(pS,zp,lLb));
////////////////////
bc = abs(xr0-xs0);//Changed to calculate BarIndex difference
//bc=LastValue(bcount,1);//Removed to use current value
txtH = pk + vs*ATR(2);
txtL = tr + vs*ATR(2);
////////////////////
for( i = 0; i < BarCount; i++ ){
if(pR [i]) PlotText("" + bc[i] +" Bars", i, H [i] + txtH[i], 25);
if(pS [i]) PlotText("" + bc[i] +" Bars", i, L [i] - txtL[i], 42);
}
_SECTION_END();
////////////////////////////////////////
Title = EncodeColor(55)+ Title = Name() + " " + EncodeColor(55)
+ Date() + " " + EncodeColor(3) + "{{INTERVAL}} " +
EncodeColor(55)+ " Open = "+ EncodeColor(10)+ NumToStr(O,dec) +
EncodeColor(55)+ " High = "+ EncodeColor(43)+ NumToStr(H,dec) +
EncodeColor(55)+ " Low = "+ EncodeColor(32)+ NumToStr(L,dec) +
EncodeColor(55)+ " Close = "+ EncodeColor(55)+ NumToStr(L,dec) +
EncodeColor(55)+ " xs0 = "+ EncodeColor(43)+ NumToStr(xs0,1.0) +
EncodeColor(32)+ " xr0 = "+ EncodeColor(32)+ NumToStr(xr0,1.0) +
EncodeColor(55)+ " ys0 = "+ EncodeColor(43) + NumToStr(ys0,1.2) +
EncodeColor(32)+ " yr0 = "+ EncodeColor(32)+ NumToStr(yr0,1.2);

GraphXSpace=10;



------------------------------------

**** IMPORTANT ****
This group is for the discussion between users only.
This is *NOT* technical support channel.

*********************
TO GET TECHNICAL SUPPORT from AmiBroker please send an e-mail directly to 
SUPPORT {at} amibroker.com
*********************

For NEW RELEASE ANNOUNCEMENTS and other news always check DEVLOG:
http://www.amibroker.com/devlog/

For other support material please check also:
http://www.amibroker.com/support.html

*********************************
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/amibroker/

<*> Your email settings:
    Individual Email | Traditional

<*> To change settings online go to:
    http://groups.yahoo.com/group/amibroker/join
    (Yahoo! ID required)

<*> To change settings via email:
    mailto:amibroker-digest@xxxxxxxxxxxxxxx 
    mailto:amibroker-fullfeatured@xxxxxxxxxxxxxxx

<*> To unsubscribe from this group, send an email to:
    amibroker-unsubscribe@xxxxxxxxxxxxxxx

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/