Thanks for the help. I was able to find a code that Graham wrote a while back that meets my criteria.
On 3/31/07, Tony Lei <[EMAIL PROTECTED]> wrote:
Thanks David, but I'm not getting any data (O, H, L, C) in my text files. On 31 Mar 2007 14:19:02 -0700, dbw451 < [EMAIL PROTECTED]> wrote: > > I've never tried to do it before. I think you can delete your > outside for loop and the first if(Buy[i]) statement. Pick the formula in > Automatic Analysis and select "Apply to: all symbols". Next press the Scan > button. > > > > I updated your code and tested it using Scan in AA (below is the updated > code). Seems to work fine. > > > > Regards, > > > > David > > > > > > ///////////////////Code///////////////////////////// > > fmkdir( "C:\\OHLC" ); > > *Buy* = ( (DateNum () >= 1051225 ) *AND* (DateNum () <= 1070330 ) ); > > fh = fopen ( "C:\\OHLC\\OHLC-" + Name () + ".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 ); > > } > > > > > > >> >
