//--- 启动脚本时显示输入参数的窗口
#property script_show_inputs
//--- 编写的文件名称
input string InpFileName="example.csv"; // 文件名
//+------------------------------------------------------------------+
//| 脚本程序启动函数 |
//+------------------------------------------------------------------+
void OnStart()
{
//--- 重置错误值
ResetLastError();
//--- 打开文件
int file_handle=FileOpen(InpFileName,FILE_READ|FILE_WRITE|FILE_CSV);
if(file_handle!=INVALID_HANDLE)
{
//--- 写入文件数据
for(int i=0;i<1000;i++)
{
//--- 调用编写函数
FileWrite(file_handle,TimeCurrent(),SymbolInfoDouble(Symbol(),SYMBOL_BID),SymbolInfoDouble(Symbol(),SYMBOL_ASK));
//--- 每128次迭代时,在磁盘中保存数据
if((i & 127)==127)
{
//--- 现在,数据将位于文件并且不会丢失,以防严重的错误。
FileFlush(file_handle);
PrintFormat("i = %d, OK",i);
}
//--- 0.01 秒暂停
Sleep(10);
}
//--- 关闭文件
FileClose(file_handle);
}
else
PrintFormat("Error, code = %d",GetLastError());
}
|