Convert MQL4 expert to MQL5

MQL4 to MQL5
//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
  {
//----
   Comment("");
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
int deinit()
  {
//----
   Comment("");
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
  {
//----
int random;
int ord[8];
double tp,step,sr_cena,lot,sumlot,lotprice;
double maxlot=-1;
double minbuyprice=1000000000000;
double maxsellprice=-1;
double MA=iMA(Symbol(),0,MA_Period,0,MA_averaging_method,MA_Used_Price,0);
if (Digits==2 || Digits==4){tp=TakeProfit*Point;step=OrderStep*Point;}
if (Digits==3 || Digits==5){tp=TakeProfit*Point*10;step=OrderStep*Point*10;}
lot=StartLot;
Uchet_orderov(Magic,Symbol(),ord);
if (ord[6]==0 && ord[7]==0)
{
   if (!Use_Trend_Analysis)
   {
      MathSrand(TimeLocal());
      random = MathRand();
      if (random<16384)
      {
         OrderSend(Symbol(),OP_SELL,lot,Bid,100,0,Bid-tp,NULL,Magic,0,Red);
         OrderSend(Symbol(),OP_SELLLIMIT,NormalizeDouble(lot*Multiplicator,2),Bid+step,100,0,0,NULL,Magic,0,Red);

      }
      else
      {
         OrderSend(Symbol(),OP_BUY,lot,Ask,100,0,Ask+tp,NULL,Magic,0,Blue);
         OrderSend(Symbol(),OP_BUYLIMIT,NormalizeDouble(lot*Multiplicator,2),Ask-step,100,0,0,NULL,Magic,0,Blue);

      }
   
   }
   else
   {
    if (Close[1] > MA )
    {
        OrderSend(Symbol(),OP_BUY,lot,Ask, 100,0,Ask+tp,NULL,Magic,0,Blue);
        OrderSend(Symbol(),OP_BUYLIMIT,NormalizeDouble(lot*Multiplicator,2),Ask-step,100,0,0,NULL,Magic,0,Blue);

    }
    else if (Close[1] < MA)
    {
         OrderSend(Symbol(),OP_SELL,lot,Bid,100,0,Bid-tp,NULL,Magic,0,Red);
         OrderSend(Symbol(),OP_SELLLIMIT,NormalizeDouble(lot*Multiplicator,2),Bid+step,100,0,0,NULL,Magic,0,Red);

    }
   }
}

if (ord[6]==0 && ord[7]==1)
{
   OrderSelect(0,SELECT_BY_POS);
   OrderDelete(OrderTicket());   
}
if (ord[6]>0 && ord[7]==0)
{
   for (int pos=0; pos<OrdersTotal(); pos++)
   {
      OrderSelect(pos,SELECT_BY_POS);
      if (OrderMagicNumber()==Magic && OrderSymbol()==Symbol())
      {
         lotprice=lotprice+OrderOpenPrice()*OrderLots();
         sumlot=sumlot+OrderLots();
         if (maxlot < OrderLots()) maxlot = OrderLots();
         if (OrderType()==OP_BUY && minbuyprice > OrderOpenPrice()) minbuyprice=OrderOpenPrice();
         if (OrderType()==OP_SELL && maxsellprice < OrderOpenPrice()) maxsellprice = OrderOpenPrice();
         int tipsdelok = OrderType();
      }
   }
   sr_cena = NormalizeDouble(lotprice/sumlot,Digits);
   for(pos=0; pos<OrdersTotal(); pos++)
   {
      OrderSelect(pos,SELECT_BY_POS);
      if (OrderMagicNumber()==Magic && OrderSymbol()==Symbol() && tipsdelok == OP_BUY)
      {
      OrderModify(OrderTicket(),0,0,sr_cena+tp,0,CLR_NONE);
      }
      if (OrderMagicNumber()==Magic && OrderSymbol()==Symbol() && tipsdelok == OP_SELL)
      {
      OrderModify(OrderTicket(),0,0,sr_cena-tp,0,CLR_NONE);
      }
   }
   if (tipsdelok==OP_BUY) OrderSend(Symbol(),OP_BUYLIMIT,NormalizeDouble(maxlot*Multiplicator,2),minbuyprice-step,100,0,0,NULL,Magic,0,Blue);
   if (tipsdelok==OP_SELL) OrderSend(Symbol(),OP_SELLLIMIT,NormalizeDouble(maxlot*Multiplicator,2),maxsellprice+step,100,0,0,NULL,Magic,0,Red);
   
}
Comment("Balance: ", DoubleToStr(AccountBalance(),2),   "\n Equity: ",DoubleToStr(AccountEquity(),2));   
//----
   return(0);
  }
//+------------------------------------------------------------------+

void Uchet_orderov(int Mag,string Symb, int &mas[8])
{

ArrayInitialize(mas,0);

int tip;
for (int pos=0; pos<OrdersTotal(); pos++)
   {
      OrderSelect(pos,SELECT_BY_POS,MODE_TRADES);
      tip=OrderType();
      switch(tip)
      {
         case 0:{mas[0]++;mas[6]++;break;}
         case 1:{mas[1]++;mas[6]++;break;}
         case 2:{mas[2]++;mas[7]++;break;}
         case 3:{mas[3]++;mas[7]++;break;}
         case 4:{mas[4]++;mas[7]++;break;}
         case 5:{mas[5]++;mas[7]++;break;}
         
      
      }
   }
}