I found a way. I added a for loop around the buy and that works. I
don't understand why I had to do that.
aDate = DateNum();
for (a=0; a < BarCount; a++)
{
Buy[a] = ifDate(aDate[a]);
}
--- In amibroker@yahoogroups.com, "Barry Scarborough" <[EMAIL PROTECTED]>
wrote:
>
> I am trying to create a file that will show trades on dates from an
> input file. The program almost works but the entire array either
has
> 0 or 1. Scan does not output anything. It appears that Buy is an
> integer rather then an array. What I mean is when I plot Buy it is
a
> flat line, 1 if the condition is true, 0 if not when I move the
> cursor over the buy dates. I expected to see spikes where buy is
true
> and 0 if not. What is wrong?
>
> Thanks in advance,
> Barry
>
> // Plot dates for Druster signals
>
> function ifDate(num)
> {
> Cond = 0;
> fh = fopen( "C:\\Program
> Files\\AmiBroker\\TradeDates\\DrusterBuyDates.csv", "r");
> if( fh )
> {
> while( ! feof( fh ) AND Cond == 0)
> {
> data = fgets( fh );
> mm = StrToNum(StrLeft(data ,2));
> dd = StrToNum(StrMid(data ,3,2));
> yy = StrToNum(StrRight(data ,2));
> if (yy < 20)
> yy = 2000 + yy;
> else
> yy = 1900 + yy;
> dNum = (10000 * (yy - 1900)) + (100 * mm) +
> dd;
> if(dNum == num)
> Cond = 1;
> }
> fclose( fh );
> }
> else
> {
> printf("Error opening read file");
> }
> return Cond;
> }
>
> //Buy = ifDate(SelectedValue(DateNum()));
> // NOTE the above and following line produce the same results.
>
> Buy = IIf(ifDate(SelectedValue(DateNum())), 1, 0);
> Plot(Buy, "Buy", colorGreen);
> Plot(DateNum(), "DateNum", colorRed, styleOwnScale | styleNoLine |
> styleNoLabel);
> Filter = Buy;
>
