Robert:

Take a look at SetBarsRequired() and QuickAFL in Help.  Try this:

SetBarsRequired(100000, 100000);
sbi = SelectedValue(BarIndex());
Title = "SBI = " + sbi + "  BarCount = " + BarCount;

Bill

----- Original Message ----- 
From: "rhoemke" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Friday, March 02, 2007 4:32 AM
Subject: [amibroker] Re: Mirroring the Chart


> It seems that there is at least a problem with Barcount and BarIndex().
> As i understand, Barcount is just a number, showing the total number
> of bars in the chart (starts counting at 0), and BarIndex() shows the
> actual number of the single bar.
> But this code shows  different figures even for BarCount at selected
> bar and i don't know why.
> Anybody who can help?
> 
> SBI = SelectedValue(BarIndex()); 
> "Selected BarIndex = "+WriteVal(SBI);
> "BarCount = "+WriteVal(BarCount);
> 
> 
> Regards
> Robert
> --- In [email protected], "rhoemke" <[EMAIL PROTECTED]> wrote:
>>
>> Thank you Zoli,
>> 
>> what i try to do is to mirror horizontaly at the avg of selected bar
>> AND vertically from selected bar.
>> This is why i think i need the loop.
>> 
>> I try to mirror the past into the future, as it is described in Welles
>> Wilders Book about Adam Theory.
>> 
>> Regards Robert 
>> 
>> 
>> 
>> --- In [email protected], "zoli_j" <novizoli@> wrote:
>> >
>> > mySelectedBI = SelectedValue(BarIndex());
>> > WriteVal(mySelectedBI);
>> > 
>> > myMirrorHorizontalValue = ValueWhen(BarIndex() == mySelectedBI, Avg);
>> > Plot(myMirrorHorizontalValue, "myMHV", colorBlue, styleLine);
>> > 
>> > myDiffO = O - myMirrorHorizontalValue;
>> > myDiffH = H - myMirrorHorizontalValue;
>> > myDiffL = L - myMirrorHorizontalValue;
>> > myDiffC = C - myMirrorHorizontalValue;
>> > //PlotOHLC(myDiffO, myDiffH, myDiffL, myDiffC, "myDiff", colorBlue, 
>> > styleCandle);
>> > 
>> > myO = IIf(NOT IsNull(myMirrorHorizontalValue), 
>> > myMirrorHorizontalValue - myDiffO, O);
>> > myH = IIf(NOT IsNull(myMirrorHorizontalValue), 
>> > myMirrorHorizontalValue - myDiffH, H);
>> > myL = IIf(NOT IsNull(myMirrorHorizontalValue), 
>> > myMirrorHorizontalValue - myDiffL, L);
>> > myC = IIf(NOT IsNull(myMirrorHorizontalValue), 
>> > myMirrorHorizontalValue - myDiffC, C);
>> > 
>> > BR, Zoli.
>> > 
>> > PlotOHLC(O, H, L, C, "PriceChart", colorBlack, styleCandle);
>> > PlotOHLC(myO, myH, myL, myC, "MirroRchart", colorBlue, styleCandle);
>> > 
>> > --- In [email protected], "rhoemke" <robert@> wrote:
>> > >
>> > > Hello,
>> > > i am trying to mirror the chart from the selected bar.
>> > > 
>> > > My code is this, but it doesn't plot a chart but only a single bar.
>> > > Can someone see what is wrong. It is difficult for me to describe in
>> > > english how the mirroring idea works, but maybe the code shows it.
>> > > 
>> > > Thank you.
>> > > 
>> > > selectedBI  = SelectedValue(BarIndex()); WriteVal(SelectedBI);
>> > > mirroropen  = 0;
>> > > mirrorhigh  = 0;
>> > > mirrorlow   = 0;
>> > > mirrorclose = 0;
>> > > WriteVal(BarCount-SelectedBI-1);
>> > > 
>> > > for (i = 0;i<BarCount-1;i++);
>> > > {
>> > > if(i>=selectedBI)
>> > > {
>> > > mirroropen[i]  =  2*Avg[SelectedBI] - O[2*SelectedBI-i];
>> > > mirrorhigh[i]  =  2*Avg[SelectedBI] - H[2*SelectedBI-i];
>> > > mirrorlow[i]   =  2*Avg[SelectedBI] - L[2*SelectedBI-i];
>> > > mirrorclose[i] =  2*Avg[SelectedBI] - C[2*SelectedBI-i];
>> > > }
>> > > else
>> > > {
>> > > mirroropen[i]  =  O[i];
>> > > mirrorhigh[i]  =  H[i];
>> > > mirrorlow[i]   =  L[i];
>> > > mirrorclose[i] =  C[i];
>> > > }
>> > > }
>> > > 
>> > > 
>> > > 
>> > > PlotOHLC(mirroropen, mirrorhigh, mirrorlow, mirrorclose,
>> > > "Mirrorchart", colorBlue);
>> > >
>> >
>>
> 
> 
> 
> 
> 
> Please note that this group is for discussion between users only.
> 
> To get 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
> 
> 
> 
> 
> 
> 
> -- 
> No virus found in this incoming message.
> Checked by AVG Free Edition.
> Version: 7.5.446 / Virus Database: 268.18.4/703 - Release Date: 2/26/2007 
> 2:56 PM
> 
>

Reply via email to