Creating 5.5 series from 4.5 code - error in way I apply PriceClose & Bar

Author: tedclimo

Creation Date: 11/24/2009 4:40 PM

Wealth Lab » WealthScript (.NET) » Creating 5.5 series from 4.5 code - error in way I apply PriceClose & Bar

tedclimo

11/24/2009 4:40 PM

I am attempting to create a new series in 5.5. Error msg tells me that I am mistaken in my usage of PRICECLOSE, BAR & BARNUM.
I've searched the programming guide, but can't figure out what I am doing wrong.
Would appreciate some help here. Below, you will find the 4.5 code, the WSTL translation & how far I got in 5.5 before I got stuck.

Here is 4.5 code: --- This works great

CODE:
Please log in to see this code.

Here is WSTL code: --- This also works great

CODE:
Please log in to see this code.

Here is the 5.5 code where I ran into trouble:
It tells me I am using PriceClose, Bar & Barnum incorrectly.

CODE:
Please log in to see this code.

Thanks in advance,
Ted

Size:

Color:

I am attempting to create a new series in 5.5.  Error msg tells me that I am mistaken in my usage of PRICECLOSE, BAR  & BARNUM.
I've searched the programming guide, but can't figure out what I am doing wrong.
Would appreciate some help here.  Below, you will find the 4.5 code, the WSTL translation & how far I got in 5.5 before I got stuck.

Here is 4.5 code: --- This works great
[CODE]
Pctleader := CreateSeries;
for Bar := 200 to BarCount - 1 do
begin
if lastbar(bar) then y := PriceClose(bar);
x := (PriceClose(bar) - y )/(y-0.01);
SetSeriesValue( Bar, Pctleader, x );
end;

DailyOpen := CreateSeries;
for Bar := 200 to BarCount - 1 do
begin
if Barnum(bar) = 0 then w := PriceOpen(bar);
SetSeriesValue( Bar, DailyOpen, w );
end;
[/CODE]

Here is WSTL code: --- This also works great
[CODE]
			
Pctleader = (int)CreateSeries();
for (Bar = 200; Bar <= (Bars.Count - 1); Bar++)
{
if (Bars.IsLastBarOfDay(Bar)) y = (double)PriceClose(Bar);
x = (double)(((PriceClose(Bar) - y)) / ((y - 0.01)));
SetSeriesValue(Bar, Pctleader, x);
}
			
DailyOpen = (int)CreateSeries();
for (Bar = 200; Bar <= (Bars.Count - 1); Bar++)
{
if ((BarNum(Bar) == 0)) w = (double)PriceOpen(Bar);
SetSeriesValue(Bar, DailyOpen, w);       
}
[/CODE]

Here is the 5.5 code where I ran into trouble:
It tells me I am using PriceClose, Bar & Barnum incorrectly.
[CODE]
			DataSeries PctLeader = Close*0; PctLeader.Description = "PctLeader";
			DataSeries DailyOpen = Close*0; DailyOpen.Description = "DailyOpen";
			double w = (double)0.0;
			double x = (double)0.0;
			double y = (double)0.0;

for (int Bar = (200); Bar <= (Bars.Count - 1); Bar++)
			{
				if (Bars.IsLastBarOfDay(Bar)) y = (double)PriceClose[bar];				
				x = (double)(((PriceClose(Bar) - y)) / ((y - 0.01)));
				PctLeader[bar] = x;
			}
			
			
			
			for (int Bar = (200); Bar <= (Bars.Count - 1); Bar++)
			{
				if ((BarNum(Bar) == 0)) w = (double)PriceOpen(Bar);
				DailyOpen[bar] = w;      
			}			
[/CODE]

Thanks in advance,
Ted

Eugene

11/24/2009 5:06 PM

There are no PriceClose, PriceOpen and BarNum any more:

PriceClose = Close[bar]
PriceOpen = Open[bar]
BarNum = IntradayBarNumber

Hint: see the WealthScript Guide > DataSeries and in the QuickRef.

tedclimo

11/24/2009 7:01 PM

Thanks Eugene,
I made the substitutions you suggested and all errors vanished.

One question:... Is "(double)Close[Bar]" same thing thing as "Bars.Close[Bar]" ? They both Compile, just want to be sure I used correct one.

Here's the code as it stands now:

CODE:
Please log in to see this code.

Thanks for tips!
Ted

Eugene

11/25/2009 1:59 AM

QUOTE:
One question:... Is "(double)Close[Bar]" same thing thing as "Bars.Close[Bar]" ? They both Compile, just want to be sure I used correct one.

Bingo! I just wanted it to keep it simple.

By the way, you may drop the so called cast i.e. (double) - it's not required here: Close[bar] would be enough.