Amon, it is actually easier than exporting multiple symbols into a single file.
The following code will export data in the following format:
- each file has a header
- no ticker column (ticker is included in the file name)
- US date format: mm/dd/yy
To remove the header simply delete this line:
fputs( "Date,Open,High,Low,Close,Volume,OpenInt\n", fh );
/****START****/
output_folder = "C:\\Test\\";
fh = fopen(output_folder + Name() + ".csv", "w");
if (fh)
{
fputs( "Date,Open,High,Low,Close,Volume,OpenInt\n", fh );
y = Year()%100;
m = Month();
d = Day();
for( i = 0; i < BarCount; i++ )
{
ds = StrFormat("%02.0f/%02.0f/%02.0f, ", m[i], d[i], y[i] );
fputs( ds, fh );
qs = StrFormat("%.4f, %.4f, %.4f, %.4f, %.0f, %.0f\n", O[i], H[i], L[i],
C[i], V[i], OI[i] );
fputs( qs, fh );
}
fclose( fh );
}
Buy = 0;
/****END****/
--- In [email protected], Amon Ra <[EMAIL PROTECTED]> wrote:
>
> Hi Lester.
> Your code works Ok but how can export all simbols with a single click into
> different csv files? ex: MSFT in MSFT.csv, IBM into IBM.csv etc. ?
>
>
>
> Lester Vanhoff <[EMAIL PROTECTED]> wrote:
> Thanks, Dingo, for your help. Your code had some problems when scan was
> applied to a watch list so I modified it a little. The following formula
> seems to be working fine with both "current symbol" and "filters" set to
> watch lists. The old data in the file is always overwritten and all watch
> list tickers are included in export:
>
> /****START****/
>
> output_folder = "C:\\Test";
> output_file = "Mseod.csv";
>
> if ( Status("stocknum") == 0 )
> {
> fmkdir( output_folder ); // if the directory doesn't exists it will be
> automatically created
> fopen( output_folder + "\\" + output_file, "w"); // if the file already
> exists all data will be w=overwritten
> }
>
> fh = fopen( output_folder + "\\" + output_file, "a"); // a=append needed to
> get all tickers from watch list
> if (fh)
> {
> t = Name();
> p = "D";
> y = Year()%100;
> m = Month();
> d = Day();
> for( i = 0; i < BarCount; i++ ) // loop
> {
> fputs( t + "," , fh );
> fputs( p + "," , fh );
> ds = StrFormat( "%02.0f%02.0f%02.0f,", y[i], m[i], d[i] ); // date string
> fputs( ds, fh );
> qs = StrFormat("%.4f,%.4f,%.4f,%.4f,%.0f,%.0f\n", O[i], H[i], L[i], C[i],
> V[i], OI[i] ); // quote string
> fputs( qs, fh );
> }
> fclose( fh );
> }
> Buy = 0; // link to "scan" button
>
> /****END****/
>
------------------------ Yahoo! Groups Sponsor --------------------~-->
Everything you need is one click away. Make Yahoo! your home page now.
http://us.click.yahoo.com/AHchtC/4FxNAA/yQLSAA/GHeqlB/TM
--------------------------------------------------------------------~->
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 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/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
