//+------------------------------------------------------------------+
//|                                                 Spread check.mq4 |
//|                                            coded by Rolands Auza |
//|                                                  www.rm-forex.lv |
//+------------------------------------------------------------------+
#property copyright "coded by Rolands Auza"
#property link      "www.rm-forex.lv"
//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
extern int SpreadToCheck=0;
int prevBars,out;
double standSpreads;
string Currency,file;
int init()
  {
   int handle;
   int size;
//----
   prevBars=Bars;
   Currency=Symbol();
   file=Currency+".csv";
   out=FileOpen(file,FILE_CSV|FILE_READ|FILE_WRITE,',');
   handle=FileOpen(file, FILE_BIN|FILE_READ);
   if(handle>0)
    {
     size=FileSize(handle);
     FileClose(handle);
    }
   if(size<3)
      {
      out=FileOpen(file,FILE_CSV|FILE_READ|FILE_WRITE,',');
         if(out<1) 
            {
               Print("File not found, the last error is ", GetLastError());
               return(0);
            }
         if(FileSeek(out,0,SEEK_END)) FileWrite(out,"Month","Day","Hour","Minute","Seconds","Current Spread",Year());
         FileClose(out);
      }
   
//----
   return(0);
  }

//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
  {
//----
  double CurrentSpread=MarketInfo(Currency, MODE_SPREAD);
  if(CurrentSpread>SpreadToCheck)
      {
         out=FileOpen(file,FILE_CSV|FILE_READ|FILE_WRITE,',');
         if(out<1) 
            {
               Print("File not found, the last error is ", GetLastError());
               return(0);
            }
         if(FileSeek(out,0,SEEK_END)) FileWrite(out,Month(),Day(),Hour(),Minute(),Seconds(),CurrentSpread * 0.1);
         FileClose(out);
      }
  return(0);
  }
//+------------------------------------------------------------------+