Ilan_TrendRacing_3.51ME

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

extern string  Set1           = "======  ????? ?????????  =====";
extern double  Lots           = 0.01;                         // ???????? ??????? ????
extern double  LotExponent    = 1.4;                          // ??????????? ?????????????? ?????????? ????? ?????? ????
extern double  TakeProfit     = 8.0;                          // ?????? ? ???????
double         StopLoss       = 0;                            // ???? ? ???????
extern double  slip           = 5;                            // ??????????????? ???? ( ?????? ? ???????? ) ))
extern int     MaxTrades      = 30;                           // ?????????? ??????????? ??????????? ??????? ( ???? ?? "0" )
extern int     MagicNumberB   = 777;                          // ?????????????, ??????????? ???????? "????" ?????? ?? ????? ???
extern int     MagicNumberS   = 555;                          // ?????????????, ??????????? ???????? "????" ?????? ?? ????? ????
extern string  Set2           = "===== ?????????  ???????? =====";
extern string  Set3           = " ?? ???????? ??????? ????????? ";
extern double  FirstPipStep   = 6.0;                          // ????????? ???????
extern double  LongPipStep    = 100;                          // ???????, ???????????? ??? ??????? ??????????, ??? ?????????? EconomProfil ??????? ?? FirstEconomOrd
extern double  PipStepExponent= 1.8;                          // ?? ??????? ????????????? ??? ? ??????????? ?? ?????? ??????
extern string  Set4           = "== ?????????????? ?????????  ==";
extern bool    info           = True;                         // ??????????? ??????????
extern bool    Zero           = True;                         // ??????????? ?????? ????????? ???? ??????? ?? ???????????
extern bool    BarControl     = True;                         // ?????????? ????????? ????????
extern bool    debug          = False;                        // ???????
extern bool    EconomProfil   = False;                        // ????? ??? ?????????? ?????????? 
extern int     FirstEconomOrd = 4;                            // ?????, ? ???????? ?????????? ??????????? ?????. ????????, ???? 4, ?? 4, 5, 6 ... ?????? ????? 1 ? ??? ?? ???.
extern bool    Overlapping    = True;                         // ????????? ?????? ?????????? ????????? ??????? ?????????? ??????
extern int     LeadingOrder   = 4;                            // ? ?????? ?????? ???????? ??????????.
extern int     FLPersent      = 7;                            // ??????? ?????????? 

extern bool   UseTrailingStop = true;
extern double TrailTP = 5;          // ??, ??????? ????? ??????????     
extern double TrailDist = 5;        // ?????????? ?? ????, ?? ??????? ???????? ??
extern int    AutoTakeProfit = 50;  // ?? ??? TrailingStop

extern string v1 = "????? LastTP";
extern bool   SeparateLastTP = true;
extern int    LastTP  = 5;         //?? ?????????? ??????. ???? "0", ?? LastTP = TakeProfit
extern int    LastTPNo = 3;         //? ??????, ? ???????? ???????? ???????? LastTP
int ExcludeTicketB=0;
int ExcludeTicketS=0;

extern string  MASet          = "======== ?????????  ?? ========";   
int            MATimeFrame    = 0;                            // 0 (????)- ?????? ???????? ???????; 1 - PERIOD_M1; 5 - PERIOD_M5; 15 - PERIOD_M15; 30 - PERIOD_M30;  

extern int     MA1_Period     = 7;                            // ?????? ??????? ??
int            MA1_Shift      = 0;                            // ?????  ??????? ??
extern int     MA2_Period     = 21;                           // ?????? ????????? ??
int            MA2_Shift      = 0;                            // ?????  ????????? ??
extern string  DeltaSet       = "== ???? ???????????? ??????? ==";
extern string  Comm1          = " ???????? ????? ? ??????, 0 - 5";
extern double  DelFX          = 2;                            // ??????? ??????? ?? "?? ?????????"
int            MA_sf          = 1;                            // ????? "????-????" ??? ????? ??????????? ??????
extern string  Comm5          = "=== ??????? ???????? ?? CCI ===";
extern bool    CCI_kontr      = True;                         // ????????? ???????? CCI
extern double  CCI_Lim        = 170.0;                        // ??????? ?? ??????? CCI
int            CCI_tf         = 0;                            // ???? ????? CCI 0 - ???????
int            CCI_Per        = 14;                           // ?????? CCI
int            CCI_sf         = 1;                            // ????? "????-????" ??? ????? ????????? CCI
extern string  Comm6          = "= ????????? ????????????? ?????? =";
extern string  Comm7          = "===========   ?? ADX    ==========";
extern bool    ADX_kontr      = False;  
int            TF_ADX         = 0;                            // ????????? ADX, 0 - ???????
int            Per_ADX        = 7;                            // ?????? ADX
extern double  ADX_Trend      = 25;                           // ?????????? ???????? ????? ADX 
int            PriceADX       = 0;                            // 0 - ???? ????????, 1 - ???? ????????
int            Sh_ADX         = 1;                            // ????? "????-????" ??? ????? ????????? ADX ( ?? ????? ???? 0! )
extern string  Comm8          = "=== ????????? ????? ?? MAonRSI ===";
extern string  Comm9          = " (????????? ?????????? ??????????)";
extern bool    MAonRSI        = False;
int            MAonRSI_TimeFr = 0;                            // ?? ?????????? MAonRSI ( ?? ????????? - ??????? )
extern int     RSI_Period     = 8;                            // ?????? ?????????? RSI
int            RSI_Metod      = 6;                            // ????? ??????? ???? RSI
extern int     MA_Period      = 21;                           // ?????? ?? ?????????? MAonRSI
int            MA_Metod       = 1;                            // ????? ??????? ???? ??
double         Delta_MAonRSI  = 2.0;                          // ???? ?????????????????? ?????????? ( 0 - 5 )
extern int     RSI_max        = 70;                           // ??????? ??????? RSI
extern int     RSI_min        = 30;                           // ??????  ??????? RSI
extern string  Comm10         = "= ????????? ??????? ????? ?? ??=";
extern double  AClim          = 0.0001;                       // ?????? ?? ?? ???? ?? ????? ??? ?????????? ???????? ?? ???????? ??????? ??????
extern string  Comm11         = "== ??????, ????????, ???????? ==";
extern bool    CloseAll       = False;                        // ??????? ??????????? ???????? ???? "?????" ???????
extern double  TradeStop      = 0.0;                          // ?????? ???????? ????? ??????, ???? ????????? ????????/?????? ?????? ?????????? (0.1 - 10% ? ??? ?????.. )
extern bool    LL             = False;                        // ????????? ???????? ??????  ?? ???????? 
extern int     LossLevel      = 10;                           // ??????? ?????? ? ??????? ??????

int MA1_Price   = 0;             //0 - ???? ????????;  1 - ???? ????????; 2 - ???????????? ????; 3 - ??????????? ????;

int MA1_Method  = 0;             //0 - ??????? ?????????? ???????; 1 - ???????????????? ?????????? ???????; 

int MA2_Price   = 0;
int MA2_Method  = 0;

double StopperB    = 0.0, StopperS = 0.0;
double CCI_Del, ADX_Del, STOP_L, Lprofit, Profit_B, Profit_S, Cprofit;
double LastBuyPrice, LastSellPrice, PipStepB, PipStepS, iLotsB, iLotsS, SL,TP, PrevEquity, CCI_min, CCI_max, ACmax, ACmin, Dig;
double CProfit = 0, CProfit2 = 0, LProfit = 0, PrcCL1 = 0, PrcCL = 0;

bool flagB, flagS;
bool LongTrade = False, ShortTrade = False, NewOrdersPlacedB = True, NewOrdersPlacedS = True;

int timeprev = 0, NumOfTradesB = 0, NumOfTradesS = 0, cnt = 0, DCCoef = 10000;
int ticket, expiration, totalB, totalS, total, CheckTotalS, CheckTotalB, lotdecimal, Error, Lpos, StopSet, Cpos;
string title="???????? ??????????", msg="";
string EAName = "Ilan_TrendRacing_3.51ME";
string txt1, txt2, txt3, txt4, txt5, txt6;

int init() {
      // код доступен только после оплаты
   }
int deinit() {
    ObjectDelete("Lable1");
    ObjectDelete("Lable2");
    ObjectDelete("Lable3");
    ObjectDelete("Lable4");
    ObjectDelete("Lable5");
    ObjectDelete("Zero");
    ObjectDelete("LableB");
    ObjectDelete("LableS");
   return (0);
}

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

void RecalculationB() {
 double AveragePriceB = 0;
 double PriceTargetB  = 0;
 double CountB  = 0;
   for (cnt = OrdersTotal() - 1; cnt >= 0; cnt--) {
       if (OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES))  {
          if (OrderSymbol() == Symbol() && OrderMagicNumber() == MagicNumberB) {
             if (OrderType() == OP_BUY ) {
                AveragePriceB += OrderOpenPrice() * OrderLots();
                CountB += OrderLots();
             }
          }
       }  
   }
   if (totalB > 0) AveragePriceB = NormalizeDouble(AveragePriceB / CountB, Dig);
   if (NewOrdersPlacedB) {
      for (cnt = OrdersTotal() - 1; cnt >= 0; cnt--) {
          if (OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES)) {
             if (OrderSymbol() == Symbol() && OrderMagicNumber() == MagicNumberB) {
                if (OrderType() == OP_BUY) {
                   PriceTargetB = AveragePriceB + TakeProfit * Point;
                   StopperB = AveragePriceB - StopLoss * Point;
                   flagB = TRUE;
                }
             }
          }
      }
   }  
   if (NewOrdersPlacedB) {
      if (flagB == TRUE) {
         for (cnt = OrdersTotal() - 1; cnt >= 0; cnt--) {
             if (OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES)) {        
                if (OrderSymbol() == Symbol() && OrderMagicNumber() == MagicNumberB) {
                   if (OrderType() == OP_BUY ) {
                      bool res;
                      if(SeparateLastTP && totalB >= LastTPNo && OrderTakeProfit() == 0.0)
                        res = OrderModify(OrderTicket(), OrderOpenPrice(), OrderStopLoss(), NormalizeDouble( OrderOpenPrice() + LastTP * Point, Dig), 0, Blue);
                      else
                        res = OrderModify(OrderTicket(), AveragePriceB, OrderStopLoss(), PriceTargetB, 0, Blue);
                      if(res)
                        NewOrdersPlacedB = FALSE;
                   }
                }
             }  
         }
      }
   }
 }

void RecalculationS() {
   double AveragePriceS = 0;
   double PriceTargetS  = 0;
   double CountS  = 0;
   for (cnt = OrdersTotal() - 1; cnt >= 0; cnt--) {
     if (OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES))  {
       if (OrderSymbol() == Symbol() && OrderMagicNumber() == MagicNumberS) {
          if (OrderType() == OP_SELL ) {
             AveragePriceS += OrderOpenPrice() * OrderLots();
             CountS += OrderLots();
           }
        }
      }  
    }
   if (totalS > 0) AveragePriceS = NormalizeDouble(AveragePriceS / CountS, Dig);
   if (NewOrdersPlacedS) {
      for (cnt = OrdersTotal() - 1; cnt >= 0; cnt--) {
          if (OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES)) {
             if (OrderSymbol() == Symbol() && OrderMagicNumber() == MagicNumberS) {
                if (OrderType() == OP_SELL) {
                   PriceTargetS = AveragePriceS - TakeProfit * Point;
                   StopperS = AveragePriceS + StopLoss * Point;
                   flagS = TRUE; 
                }
             }
          }
      }
   }  
   if (NewOrdersPlacedS) {
      if (flagS == TRUE) {
         for (cnt = OrdersTotal() - 1; cnt >= 0; cnt--) {
            if (OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES)) {        
               if (OrderSymbol() == Symbol() && OrderMagicNumber() == MagicNumberS) {
                  if (OrderType() == OP_SELL) {
                     bool res;
                     if(SeparateLastTP && totalS >= LastTPNo && OrderTakeProfit() == 0.0)
                        res = OrderModify(OrderTicket(), OrderOpenPrice(), OrderStopLoss(),  NormalizeDouble( OrderOpenPrice() - LastTP * Point, Dig), 0, Red);
                     else
                        res = OrderModify(OrderTicket(), AveragePriceS, OrderStopLoss(), PriceTargetS, 0, Red);
                     if(res)
                        NewOrdersPlacedS = FALSE;
                 }
               }
            }  
         }
      }

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