Re: [amibroker] Exporting data to ASCII format question

[Tony Lei]

Thanks for your response David

I'm trying to export US equities data from Amibroker into ASCII format.  Do
you have another way to do this more effectively?

thanks again



On 31 Mar 2007 13:11:20 -0700, dbw451 <[EMAIL PROTECTED]> wrote:

   I don't totally understand your logic because it looks like you're
looping through each bar of the same symbol BarCount times, but to create a
separate file for each symbol you could make the symbol name a part of your
file name:



  fh = fopen( "C:\\OHLC\\OHLC" + Name() + ".txt", "a");

 Regards,



David:




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

*From:* amibroker@yahoogroups.com [mailto:[EMAIL PROTECTED] *On
Behalf Of *Tony Lei
*Sent:* 03/31/2007 3:32 PM
*To:* amibroker@yahoogroups.com
*Subject:* [amibroker] Exporting data to ASCII format question



Hi,

I am using this AFL code to help me export data from AB into ASCII to be
used by another software.  But it creates only 1 text file for all the
symbols (130 US stocks).  How can I make AB create 1 file for every symbol
or 130 text files in my OHLC folder? Any help is appreciated,

thanks

Qitrader


///////////////////Code/////////////////////////////

fmkdir( "C:\\OHLC" );
Buy = ( (DateNum() >= 1051225) AND (DateNum() <= 1070330) );
for( i = 0; i < BarCount; i++ )
if( Buy[i] )
{
  fh = fopen( "C:\\OHLC\\OHLC.txt", "a");
  if( fh )
   {
     y = Year();
     m = Month();
     d = Day();
     r = Hour();
     e = Minute();

   for( i = 0; i < BarCount; i++ )
   if( Buy[i] )

   {
      fputs( Name() + "," , fh );
      ds = StrFormat("%02.0f%02.0f%02.0f,",
                     y[ i ], m[ i ], d[ i ] );
      fputs( ds, fh );

      ts = StrFormat("%02.0f:%02.0f,",
                     r[ i ],e[ i ]);
      fputs( ts, fh );

      qs = StrFormat("%.2f,%.2f,%.2f,%.2f,%.0f\n",
                     O[ i ],H[ i ],L[ i ],C[ i ],V[ i ] );
      fputs( qs, fh );
   }
      fclose( fh );
   }
}