//+------------------------------------------------------------------+
//|                                                   M15_USDJPY.mq4 |
//|                                        Copyright ｩ 2008, Aki0307 |
//|                                  http://aki0307.blog.shinobi.jp/ |
//+------------------------------------------------------------------+
#property copyright "Copyright ｩ 2008, Aki0307"
#property link      "http://aki0307.blog.shinobi.jp/"

// 時間足用
datetime dtTimeFrame = 0;

// ログファイル名
string filename = "";

//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
  {
//----
   // ファイル名を生成する（EA名+YYYYMMDD)
   filename = "M15_USDJPY"+TimeYear(TimeLocal())+TimeMonth(TimeLocal())+TimeDay(TimeLocal())+".csv";
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
int deinit()
  {
//----
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
  {
//----
    // 今の時間を取得時間足に変化があると中に入る
    if(dtTimeFrame<iTime(NULL,0,0)) {
        dtTimeFrame=iTime(NULL,0,0);
        // 現在の時間足の４値をファイルに出力する
        int handle; 
        handle = FileOpen(filename,FILE_READ|FILE_WRITE|FILE_CSV,'\t');
        FileSeek(handle, 0, SEEK_END);
        FileWrite(handle,TimeToStr(iTime(NULL,0,1), TIME_DATE),TimeToStr(iTime(NULL,0,1), TIME_SECONDS), iOpen(NULL,0,1),iHigh(NULL,0,1),iLow(NULL,0,1),iClose(NULL,0,1));
        FileClose(handle);
    }
   
//----
   return(0);
  }
//+------------------------------------------------------------------+