forex gold investor mt4.mq4

???#include <stdlib.mqh>
#include <stderror.mqh> 

extern bool WinLargeFonts = FALSE;
extern bool UseSystem1 = TRUE;
extern bool UseSystem2 = TRUE;
extern string EA_Comment = "";
extern double MaxSpread = 40.0;
extern int Slippage = 20;
extern string BR = "==== Basic Rules ====";
extern bool LongTrades = TRUE;
extern bool ShortTrades = TRUE;
extern bool AutoGMT_Offset = TRUE;
extern int ManualGMT_Offset = 2;
extern bool DST_Usage = TRUE;
extern bool NFA = FALSE;
extern bool No_Hedge = FALSE;
extern bool StealthMode = FALSE;
extern int PendingOrderDist = 0;
extern int StopLimitExpire = 15;
extern string ER = "==== Extra Rules ====";
extern int MondayStartHour = 0;
extern bool FridayExit = FALSE;
extern int LastTradeHour = 19;
extern int ExitHour = 20;
extern string MM1 = "==== System 1 Risk Management ====";
extern bool RecoveryMode1 = FALSE;
extern double FixedLots1 = 0.01;
extern double AutoMM1 = 0.0;
extern double AutoMM_Max1 = 10.0;
extern string MM2 = "==== System 2 Risk Management ====";
extern bool RecoveryMode2 = FALSE;
extern double FixedLots2 = 0.01;
extern double AutoMM2 = 0.0;
extern double AutoMM_Max2 = 10.0;
extern double Add_Lot_Multiplier = 1.0;
extern string SYS1 = "==== System 1 Settings ====";
extern bool Sys1_LongOnly = FALSE;
extern int Magic1 = 30001;
extern int StopLoss1 = 1500;
extern int TakeProfit1 = 1300;
extern string SYS2 = "==== System 2 Settings ====";
extern int Magic2 = 30002;
extern int StopLoss2 = 1700;
extern int TakeProfit2 = 0;
extern int Sys2MaxOrders = 2;
extern bool TurboMode2 = TRUE;
extern string NF = "==== News Filter Settings ====";
extern bool Avoid_News = FALSE;
extern bool Include_Medium_News = TRUE;
extern int Wait_Before_News = 30;
extern int Wait_After_News = 30;
extern string TM = "==== Time Management System ====";
extern string AllowedHour_ForBacktest = "-1";
extern bool MondayTrading = TRUE;
extern string MondayTradingHours = "all";
extern bool TuesdayTrading = TRUE;
extern string TuesdayTradingHours = "all";
extern bool WednesdayTrading = TRUE;
extern string WednesdayTradingHours = "all";
extern bool ThursdayTrading = TRUE;
extern string ThursdayTradingHours = "all";
extern bool FridayTrading = TRUE;
extern string FridayTradingHours = "all";
extern bool SaturdayTrading = TRUE;
extern bool SundayTrading = TRUE;
extern string BS = "==== Broker Spy Settings ====";
extern bool BSM_Alerts = TRUE;
extern int BSM_Alert_Open_Delay = 500;
extern double BSM_Alert_Open_Slippage = 20.0;
extern int BSM_Alert_StopLimit_Delay = 500;
extern double BSM_Alert_StopLimit_Slippage = 20.0;
extern int BSM_Alert_Close_Delay = 500;
extern double BSM_Alert_Close_Slippage = 20.0;
extern bool ProtectionPanel = TRUE;
extern double m_maxlot = 0.0;
extern string cd0 = "--- Daily Protections ---";
extern double m_maxdloss = 0.0;
extern double m_maxd_DD_p = 0.0;
extern int m_resethr = 0;
extern string cd1 = "--- Account Protections ---";
extern double m_minEquity = 0.0;
extern double m_maxEquity_DD_p = 0.0;
extern double m_maxEquity = 0.0;
extern int m_lossPause = 0;

 string  Expert_Name    = "";
 int     MagicNumberBase = 10000;

 double  Lots=0.1;

 string  ps1 = "--pSAR inputs--";
 int     pSAR_Step = 0.01;
 double  pSAR_Max = 0.1;
 int     pSAR1_TimeFrame = 60;
 int     pSAR2_TimeFrame = 15;
 int     pSAR3_TimeFrame = 1;

 string  st6 = "--Profit Controls--";
 double  StopLoss=15;
 double  TakeProfit=0;

 int     MaxTrades = 1;

int            MagicNumber=0;
string         setup;
int            TradesInThisSymbol = 0;
datetime       timeprev = 0;

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

int deinit()
{
 return(0);
}

int CheckExitCondition(int cmd)
{

   return (false);
}

bool CheckEntryCondition(int cmd)
{
   double pSAR_H1, pSAR_M15, pSAR_M1, pSAR_M1Prev;

   pSAR_H1 = iSAR(Symbol(), pSAR1_TimeFrame, pSAR_Step, pSAR_Max, 1);
   pSAR_M15 = iSAR(Symbol(), pSAR2_TimeFrame, pSAR_Step, pSAR_Max, 1);
   pSAR_M1 = iSAR(Symbol(), pSAR3_TimeFrame, pSAR_Step, pSAR_Max, 1);
   pSAR_M1Prev = iSAR(Symbol(), pSAR3_TimeFrame, pSAR_Step, pSAR_Max, 2);

   switch (cmd)
   {
     case OP_BUY  : if (pSAR_H1 < Bid)
                    {
                       if (pSAR_M15 < Bid)
                       {
                          if (pSAR_M1 < Bid && pSAR_M1Prev > Bid) return (true);
                       }
                    }
                    break;
     case OP_SELL : if (pSAR_H1 > Bid)
                    {
                       if (pSAR_M15 > Bid)
                       {
                          if (pSAR_M1 > Bid && pSAR_M1Prev < Bid) return (true);
                       }
                    }   }

   return (false);
}

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

int OpenBuyOrder(double mLots, double mStopLoss, double mTakeProfit, int mSlippage, string mComment, int mMagic, color mColor)
{
   int err,ticket;
   double myStopLoss = 0, myTakeProfit = 0;

   RefreshRates();
   myStopLoss = StopLong(Bid,mStopLoss);
   myTakeProfit = TakeLong(Bid,mTakeProfit);

   if (Digits > 0) 
   {
     myStopLoss = NormalizeDouble( myStopLoss, Digits);
     myTakeProfit = NormalizeDouble( myTakeProfit, Digits); 
   }
   ticket=OrderSend(Symbol(),OP_BUY,mLots,Ask,mSlippage,myStopLoss,myTakeProfit,mComment,mMagic,0,mColor); 
   if (ticket > 0)
   {
    if (OrderSelect( ticket,SELECT_BY_TICKET, MODE_TRADES) ) 
     {
      Print("BUY order opened : ", OrderOpenPrice( ));

     }
   }
   else
   {
      err = GetLastError();
      Print("Error opening BUY order [" + setup + "]: (" + err + ") " + ErrorDescription(err)); 
   }

   return(ticket);
}

int OpenSellOrder(double mLots, double mStopLoss, double mTakeProfit, int mSlippage, string mComment, int mMagic, color mColor)
{
   int err, ticket;
   double myBid, myAsk, myStopLoss = 0, myTakeProfit = 0;

   myStopLoss = StopShort(Ask,mStopLoss);
   myTakeProfit = TakeShort(Ask,mTakeProfit);

   if (Digits > 0) 
   {
     myStopLoss = NormalizeDouble( myStopLoss, Digits);
     myTakeProfit = NormalizeDouble( myTakeProfit, Digits); 
   }
   ticket=OrderSend(Symbol(),OP_SELL,mLots,Bid,mSlippage,myStopLoss,myTakeProfit,mComment,mMagic,0,mColor); 
   if (ticket > 0)
   {
     if (OrderSelect( ticket,SELECT_BY_TICKET, MODE_TRADES) ) 
     {
      Print("Sell order opened : ", OrderOpenPrice());

     }
   }
   else
  

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