//+------------------------------------------------------------------+
//|                                             ADXcross EXPERT      |
//+------------------------------------------------------------------+

#property link "http://www.forex-instruments.info"


extern double    Lots=0.1;
extern int       Stoploss=20;
extern int       TakeProfit=999;
extern double    TrailingStop = 10;
extern int       Slip=5;

double b4plusdi,b4minusdi,nowplusdi,nowminusdi,Opentrades,cnt,total;

//+------------------------------------------------------------------+
//| Setting internal variables for quick access to data              |
//+------------------------------------------------------------------+
int start()
  {
  
   Opentrades=0;
   for (cnt=0;cnt<OrdersTotal();cnt++) 
   {
      if ( OrderSelect (cnt, SELECT_BY_POS) == false )  continue;
      if ( OrderSymbol()==Symbol()) Opentrades=Opentrades+1;
   }

   if (Opentrades!=0)  //and iATR(5,2)<StopLoss*Point 
   
     {
      total=OrdersTotal();
     
      for(cnt=0;cnt<total;cnt++)
        {
         if ( OrderSelect (cnt, SELECT_BY_POS) == false )  continue;
         if ( OrderSymbol() != Symbol())  continue;
         if((OrderType() == OP_BUY || OrderType() == OP_BUYSTOP) && (OrderSymbol()==Symbol()))
             {
                //TradesInThisSymbol++;
                if(TrailingStop>0) 
                  {                
                   if(Bid-OrderOpenPrice()>Point*TrailingStop)
                     {
                      if(OrderStopLoss()<Bid-Point*TrailingStop)
                        {
                         OrderModify(OrderTicket(),OrderOpenPrice(),Bid-Point*TrailingStop,OrderTakeProfit(),0,Aqua);
                         return(0);
                        }
                     }
                  }
             }
         if((OrderType() == OP_SELL || OrderType() == OP_SELLSTOP) && (OrderSymbol()==Symbol()))
             {
                //TradesInThisSymbol++;
                if(TrailingStop>0)  
                  {                
                   if((OrderOpenPrice()-Ask)>(Point*TrailingStop))
                     {
                      if(OrderStopLoss()==0.0 || 
                         OrderStopLoss()>(Ask+Point*TrailingStop))
                        {
                         OrderModify(OrderTicket(),OrderOpenPrice(),Ask+Point*TrailingStop,OrderTakeProfit(),0,Aqua);
                         return(0);
                        }
                     }
                  }
             }
        }
   }
   
   if (Opentrades==0)  //and iATR(5,2)<StopLoss*Point 
   
     {

         b4plusdi=iADX(NULL,0,14,PRICE_CLOSE,MODE_PLUSDI,1);
         nowplusdi=iADX(NULL,0,14,PRICE_CLOSE,MODE_PLUSDI,0);
   
         b4minusdi=iADX(NULL,0,14,PRICE_CLOSE,MODE_MINUSDI,1);
         nowminusdi=iADX(NULL,0,14,PRICE_CLOSE,MODE_MINUSDI,0);
   
      //Comment (nowplusdi);
      //+------------------------------------------------------------------+
      //| Money Management mm=0(lots) mm=-1(Mini) mm=1(full compounding)   |
      //+------------------------------------------------------------------+   
  
         if(b4plusdi>b4minusdi &&
               nowplusdi<nowminusdi)
            {
            //Alert(Symbol()," ",Period()," ADX SELLING");
            OrderSend(Symbol(),OP_SELL,Lots,Bid,Slip,Bid+Stoploss*Point,Bid-TakeProfit*Point,"ADX",0,0,Red);
            }   
            if(b4plusdi<b4minusdi &&
               nowplusdi>nowminusdi)
             {
               //Alert(Symbol()," ",Period()," ADX BUYING");
               OrderSend(Symbol(),OP_BUY,Lots,Ask,Slip,Ask-Stoploss*Point,Ask+TakeProfit*Point,"ADX",0,0,White);
              }
        
     
            }
      }
   return(0);
  // }