//+------------------------------------------------------------------+
//|                                                     SpeedSov.mq4 |
//|                                                         SnowBars |
//|                           https://www.mql5.com/ru/users/snowbars |
//+------------------------------------------------------------------+
#property copyright "SnowBars"
#property link      "https://www.mql5.com/ru/users/snowbars"
#property version   "1.00"
#property strict
double LastBid;
ulong LastTime,T;
//-------------------------------------------------------------------+
void OnTick()
  {
//---
   string NameFile="Speed.csv";
   int file_handle=FileOpen(NameFile,FILE_READ|FILE_WRITE|FILE_CSV);
   if(file_handle!=INVALID_HANDLE)
     {
      T=GetMicrosecondCount();
      FileSeek(file_handle,0,SEEK_END);
      if(LastBid==0){FileWrite(file_handle,TimeCurrent(),Bid,T);}
      if(LastBid!=Bid){FileWrite(file_handle,TimeCurrent(),Bid,T,LastBid,LastTime,((Bid-LastBid)/_Point),(((Bid-LastBid)/_Point)/(T-LastTime)));}
     }
//------------------------------
   FileClose(file_handle);
//---
   LastBid=Bid;LastTime=T;
  }
//+------------------------------------------------------------------+