ea_rsi_stocho_ma.mq4

#property version   "1.00"
#property strict

extern string             nameInd1           = "___________RSI__________"; // RSi 
extern int                RSI_period         = 3;                          // RSi period
extern ENUM_APPLIED_PRICE RSI_applied_price  = PRICE_CLOSE;                // RSi applied price
extern int                RSI_up_level       = 80;                         // level up - RSi 
extern int                RSI_dn_level       = 20;                         // level down - RSi 
extern string             nameInd2           = "________Stochastic______"; // Stochastic
extern int                STh_K_period       = 6;                          // K period
extern int                STh_D_period       = 3;                          // D period
extern int                STh_slowing        = 3;                          // slowing
extern ENUM_MA_METHOD     STh_method         = MODE_SMA;                   // Stochastic method
extern int                STh_price_field    = 0;                          // 0 - Low/High; 1 - Close/Close
extern int                STh_up_level       = 70;                         // level up - Stochastic
extern int                STh_dn_level       = 30;                         // level down - Stochastic
extern string             nameInd3           = "___________MA___________"; // MA
extern int                MA_period          = 150;                        // MA period
extern int                MA_shift           = 0;                          // MA shift
extern ENUM_MA_METHOD     MA_method          = MODE_SMA;                   // MA method
extern ENUM_APPLIED_PRICE MA_applied_price   = PRICE_CLOSE;                // MA applied price
extern string             EA_properties      = "_________Expert_________"; // Expert properties
extern double             Lot                = 0.01;                       // Lot
extern int                AllowLoss          = 300;                        // allow Loss, 0 - close by Stocho
extern int                TrailingStop       = 300;                        // Trailing Stop, 0 - close by Stocho
extern int                Slippage           = 30;                         // Slippage
extern int                NumberOfTry        = 5;                          // number of trade attempts
extern int                MagicNumber        = 5577555;                    // Magic Number

string   NameEA="Expert_RSI_Stochastic_MA";
string   Symb;
datetime candleTime=0;
string   txt="";

int OnInit()
  {
      // код доступен только после оплаты
   }

void OnDeinit(const int reason) { Comment(""); }

void OnTick()
  {
      // код доступен только после оплаты
   }
   if(!IsTradeAllowed())
     {
      string _txt_new="You must allow trading!";
      if(txt!=_txt_new) { txt=_txt_new; Print(txt); Comment(txt);}
      return;
     }

   double _ma      = iMA        (Symb, 0, MA_period, MA_shift, MA_method, MA_applied_price, 0);
   double _rsi     = iRSI       (Symb, 0, RSI_period, RSI_applied_price, 0);
   double _STh_0_0 = iStochastic(Symb, 0, STh_K_period, STh_D_period, STh_slowing, STh_method, STh_price_field, 0, 0);
   double _STh_1_0 = iStochastic(Symb, 0, STh_K_period, STh_D_period, STh_slowing, STh_method, STh_price_field, 1, 0);

   string _dn_up="DOWN price"; if(Bid>_ma) _dn_up="UP price";
   txt="\n"+NameEA+"\nMA = "+double_to_str(_ma,Digits)+" ---> "+_dn_up
       +"\nRSI ("+(string)RSI_dn_level+"/"+(string)RSI_up_level+") = "+double_to_str(_rsi)
       +"\nStochastic ("+(string)STh_dn_level+"/"+(string)STh_up_level+") = "+double_to_str(_STh_0_0)+" _ "+double_to_str(_STh_1_0);
   Comment(txt);

   double _openPriceBuy  = OpenPrice(0);
   double _openPriceSell = OpenPrice(1);

   if(_openPriceBuy!=0 && _openPriceBuy>Bid)
     {
      if(AllowLoss==0)
        {
         if(_STh_0_0>STh_up_level) { CloseOpenPos(0); return;} // negative result - close
           } else {
         if(_openPriceBuy-Bid>=AllowLoss*Point && _STh_0_0>STh_dn_level)
           { // close by allow loss
            CloseOpenPos(0);
            return;
           }
        }
     }

   if(_openPriceSell!=0 && _openPriceSell<Ask)
     {
      if(AllowLoss==0)
        {
         if(_STh_0_0<STh_dn_level) { CloseOpenPos(1); return;} // negative result - close
           } else {
         if(Ask-_openPriceSell>=AllowLoss*Point && _STh_0_0<STh_up_level)
           { // close by allow loss
            CloseOpenPos(1);
            return;
           }
        }
     }

   if(_openPriceBuy!=0 && _STh_0_0>STh_up_level && _openPriceBuy<=Bid)
     {

      if(TrailingStop>0)
        {

         if(candleTime!=Time[0])
           {

            Modify_SL_trail(0,TrailingStop);
            candleTime=Time[0];
           }
        }
      else CloseOpenPos(0); // close     
     }

  

Показано первые 50% кода (символов: 7568)