Re: Ascii file creator?

[Chris Cheatham <nchrisc@xxxxxxxxxx>]

here's the one I posted a while back.

CC


Input: DIR("c:\"), NAME("filename"),  oval(o), hval(h), Lval(l),Cval(c);

If currentbar = 1 then filedelete(DIR+name +".txt");


If currentbar >= 1 then FileAppend(DIR+name +".txt",
NumToStr(1900+year(date),0) +"/"+ NumToStr(month(date),0) +"/"+
NumToStr(FracPortion(date/100)*100,0) + ","  + NumToStr(oval,4) + ","  +
NumToStr(hval,4) + "," + NumToStr(lval,4) + "," + NumToStr(cval,4) +
newline );

if c<> c then plot1(1," ");


----- Original Message -----
From: "rb" <rbradshaw@xxxxxxxxxxxxxxxx>
To: "omegalist" <omega-list@xxxxxxxxxx>
Sent: Sunday, October 21, 2001 11:07 PM
Subject: Ascii file creator?


> Is anyone willing to share the code to create a continuously updating file
> creator.
>
> For example.to create 5 min ascii files from realtime globalserver data.
>
> I think this code was on the list before but I can't find it.
>
> Thanks, RBradshaw
>


Input: DIR("c:\"), NAME("filename"),  oval(o), hval(h), Lval(l),Cval(c);

If currentbar = 1 then filedelete(DIR+name +".txt");


If currentbar >= 1 then FileAppend(DIR+name +".txt",  NumToStr(1900+year(date),0) +"/"+ NumToStr(month(date),0) +"/"+ NumToStr(FracPortion(date/100)*100,0) + ","  + NumToStr(oval,4) + ","  + NumToStr(hval,4) + "," + NumToStr(lval,4) + "," + NumToStr(cval,4) + newline );

if c<> c then plot1(1," ");