//+------------------------------------------------------------------+
//|                                                        FX3MA.mq4 |
//|                                              Copyright 2014, AM2 |
//|                                      http://www.forexsystems.biz |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2011, AM2"
#property link      "http://www.forexsystems.biz"
#property description "FX expert advisor"

#define MAGICMA  20141020
//--- Inputs
input double StopLoss     = 500;
input double TakeProfit   = 500;
input double Lots         = 0.1;
//----
//+------------------------------------------------------------------+
//| Check for close order conditions                                 |
//+------------------------------------------------------------------+
void CheckForClose()
  {
   double BluePoint=iCustom(Symbol(),0,"FX_3MA_ARROW",5,1);
   double RedPoint=iCustom(Symbol(),0,"FX_3MA_ARROW",6,1);
//---
   for(int i=0;i<OrdersTotal();i++)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==false) break;
      if(OrderMagicNumber()!=MAGICMA || OrderSymbol()!=Symbol()) continue;
      //--- check order type 
      if(OrderType()==OP_BUY)
        {
         if(RedPoint<BluePoint)
           {
            if(!OrderClose(OrderTicket(),OrderLots(),Bid,3,White))
               Print("OrderClose error ",GetLastError());
           }
         break;
        }
      if(OrderType()==OP_SELL)
        {
         if(BluePoint<RedPoint)
           {
            if(!OrderClose(OrderTicket(),OrderLots(),Ask,3,White))
               Print("OrderClose error ",GetLastError());
           }
         break;
        }
     }
//---
  }
//+------------------------------------------------------------------+
//| OnTick function                                                  |
//+------------------------------------------------------------------+
void OnTick()
  {
   int    res;
   double BluePoint=0;
   double RedPoint=0;
   BluePoint=iCustom(Symbol(),0,"FX_3MA_ARROW",5,1);
   RedPoint=iCustom(Symbol(),0,"FX_3MA_ARROW",6,1);   

//--- sell conditions
   if(RedPoint<BluePoint && OrdersTotal()<1)
     {
      res=OrderSend(Symbol(),OP_SELL,Lots,Bid,3,Bid+StopLoss*Point,Bid-TakeProfit*Point,"",MAGICMA,0,Red);
     }
//--- buy conditions
   if(BluePoint<RedPoint && OrdersTotal()<1)
     {
      res=OrderSend(Symbol(),OP_BUY,Lots,Ask,3,Ask-StopLoss*Point,Ask+TakeProfit*Point,"",MAGICMA,0,Blue);
     }
//--- calculate open orders by current symbol
   CheckForClose();
   Comment("\nBlue Point ",BluePoint,"\nRed Point ",RedPoint);
//---
  }
//+------------------------------------------------------------------+

input double StopLoss     = 500; // лось
input double TakeProfit   = 500; // язь
input double Profit       = 50;  // профит в рублях
input double Lots         = 0.1; // лот
input double KLot         = 2;   // увеличение лота
input int    MaxLot       = 5;   // максимальный лот
input int    StartHour    = 9;   // торгуем с 9 до 24
input int    Slip         = 100; // реквот