мт4 в мт5

Новый комментарий
 

помогите перевести советника из мт4 в мт5

//+------------------------------------------------------------------+
//|                                                  ProjectName.mq4 |
//|                                      Copyright 2012, CompanyName |
//|                                       http://www.companyname.net |
//+------------------------------------------------------------------+
int i,File_Handle;
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int init()
  {
   return(0);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int deinit()
  {
   return(0);
  }
//+------------------------------------------------------------------+
//|                                                                  |
//+------------------------------------------------------------------+
int start()
  {
   while(true)
     {
      if(File_Handle>0)
        {
         FileDelete("Сделки.csv");
        }
      File_Handle=FileOpen("Сделки.csv",FILE_CSV|FILE_WRITE,';');
      for(i=0; i<OrdersTotal(); i++)
        {
         OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
         if(OrderType() == OP_BUY) FileWrite(File_Handle,OrderTicket(),TimeToStr(OrderOpenTime(),TIME_DATE),TimeToStr(OrderOpenTime(),TIME_MINUTES),"OP_BUY",OrderLots(),OrderSymbol(),OrderOpenPrice(),OrderStopLoss(),OrderTakeProfit(),Bid,OrderCommission(),OrderSwap(),OrderProfit(),OrderComment());
         if(OrderType() == OP_SELL) FileWrite(File_Handle,OrderTicket(),TimeToStr(OrderOpenTime(),TIME_DATE),TimeToStr(OrderOpenTime(),TIME_MINUTES),"OP_SELL",OrderLots(),OrderSymbol(),OrderOpenPrice(),OrderStopLoss(),OrderTakeProfit(),Bid,OrderCommission(),OrderSwap(),OrderProfit(),OrderComment());
        }
      FileWrite(File_Handle,"Выгрузка окончена");
      FileClose(File_Handle);
      Sleep(1000); //пауза 1 сек.
     }
  }
//+------------------------------------------------------------------+
 

отвечу сам себе ))))

 

#property version "1.00" #property strict int i, File_Handle; //+------------------------------------------------------------------+ void OnStart() { File_Handle = FileOpen("Сделки.csv",FILE_CSV|FILE_WRITE); if(File_Handle != INVALID_HANDLE) { for(i = 0; i < PositionsTotal(); i++) { ulong тикет = PositionGetTicket(i); if(PositionSelectByTicket(тикет)) { long тип_ордера = OrderGetInteger(ORDER_TYPE);// идентификатор свойства string ордер; if(тип_ордера == ORDER_TYPE_BUY) {ордер = "OP_BUY";} if(тип_ордера == ORDER_TYPE_SELL){ордер = "OP_SELL";} MqlTick тик; SymbolInfoTick(Symbol(),тик); datetime дата =(datetime) PositionGetInteger(POSITION_TIME); FileWrite( File_Handle, тикет, TimeToString(дата,TIME_DATE), TimeToString(дата,TIME_MINUTES), ордер, PositionGetDouble(POSITION_VOLUME), PositionGetSymbol(POSITION_SYMBOL), PositionGetDouble(POSITION_PRICE_OPEN), PositionGetDouble(POSITION_SL), PositionGetDouble(POSITION_TP), тик.bid, PositionGetDouble(POSITION_COMMISSION), PositionGetDouble(POSITION_SWAP), PositionGetDouble(POSITION_PROFIT), PositionGetString(POSITION_COMMENT)); }else { Print("OrderSelect() вернул ошибку - ",GetLastError());} } FileWrite(File_Handle,"Выгрузка окончена"); }else{ Alert("Неудалось открыть фаил"); } FileClose(File_Handle); Sleep(1000); //пауза 1 сек } 

//+------------------------------------------------------------------+ 

 
Aleksandr Sizov:

отвечу сам себе ))))

 

#property version "1.00" #property strict int i, File_Handle; //+------------------------------------------------------------------+ void OnStart() { File_Handle = FileOpen("Сделки.csv",FILE_CSV|FILE_WRITE); if(File_Handle != INVALID_HANDLE) { for(i = 0; i < PositionsTotal(); i++) { ulong тикет = PositionGetTicket(i); if(PositionSelectByTicket(тикет)) { long тип_ордера = OrderGetInteger(ORDER_TYPE);// идентификатор свойства string ордер; if(тип_ордера == ORDER_TYPE_BUY) {ордер = "OP_BUY";} if(тип_ордера == ORDER_TYPE_SELL){ордер = "OP_SELL";} MqlTick тик; SymbolInfoTick(Symbol(),тик); datetime дата =(datetime) PositionGetInteger(POSITION_TIME); FileWrite( File_Handle, тикет, TimeToString(дата,TIME_DATE), TimeToString(дата,TIME_MINUTES), ордер, PositionGetDouble(POSITION_VOLUME), PositionGetSymbol(POSITION_SYMBOL), PositionGetDouble(POSITION_PRICE_OPEN), PositionGetDouble(POSITION_SL), PositionGetDouble(POSITION_TP), тик.bid, PositionGetDouble(POSITION_COMMISSION), PositionGetDouble(POSITION_SWAP), PositionGetDouble(POSITION_PROFIT), PositionGetString(POSITION_COMMENT)); }else { Print("OrderSelect() вернул ошибку - ",GetLastError());} } FileWrite(File_Handle,"Выгрузка окончена"); }else{ Alert("Неудалось открыть фаил"); } FileClose(File_Handle); Sleep(1000); //пауза 1 сек } 

//+------------------------------------------------------------------+ 

Конкурсы есть по обфускации кода - туда еще рановато, но позыв прослеживается )
Новый комментарий