//+------------------------------------------------------------------+ //| Balance_EA.mq4 | //| Copyright 2014, _Techno_ Corp | //| niko@mx.uvttk.ru | //+------------------------------------------------------------------+ #property copyright "Copyright 2014, _Techno_ Corp" #property link "niko@mx.uvttk.ru" #property version "1.00" #property strict //--- input string file_name="dates.csv"; input int Interval_min=1; //--- int OnInit() { //--- //--- return(INIT_SUCCEEDED); } //+------------------------------------------------------------------+ //| Expert deinitialization function | //+------------------------------------------------------------------+ void OnDeinit(const int reason) { //--- } //+------------------------------------------------------------------+ //| Expert tick function | //+------------------------------------------------------------------+ void OnTick() { static datetime last_time=0; if(TimeCurrent()-last_time>=Interval_min*1) // проверяем не пора ли делать запись { last_time=TimeCurrent();// сохраняем текущее время int h=FileOpen(file_name,FILE_CSV|FILE_READ|FILE_WRITE);// открываем файл if(h>0)// получилось! { FileSeek(h,0,SEEK_END);// указатель перемещаем в конец FileWrite(h,TimeToStr(TimeCurrent()),AccountProfit());// запись. FileClose(h);// закрытие } } } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+