ilan_16td_sct.mq4

extern string t1 = "????? Turbo";
extern bool   Turbo = true;         // ????? ????? 
extern string t2 = "????? Dynamic";
extern bool   Dynamic = true;       // ????? Dynamic
extern int          MarginPercent=0;
extern string t3 = "? ?????? ??? ?????? ?????? Dynamic (?? < 4)";
extern int    StartDynamic = 4;     // ?????, ? ???????? ???????? ???????? ????? Dynamic 
extern string t4 = "??????? CCI ??? ??????";
extern double PerMA = 14;           // ?????? ??
extern double timefr1 = 5;           // ?? CCI
extern double timefr2 = 15;           // ?? CCI1
extern double Drop1 = 100;           // ??????? CCI ??? ??????
extern double Drop2 = 100;           // ??????? CCI ??? ??????
extern string t5 = "??????? CCI";
extern double Per = 5;               // ?????? CCI
extern double Per1 = 15;              // ?????? CCI
extern double Per2 = 15;              // ?????? CCI
extern string t6 = "????? ?????????";
extern double LotExponent = 1.95;
extern double slip = 5.0;
extern double Lots = 0.01;
extern int lotdecimal = 2;
extern double TakeProfit = 10.0;
extern double PipStep_ = 30.0;
double PipStep,PipS ;
extern int MaxTrades = 10;
extern bool UseEquityStop = FALSE;
extern double TotalEquityRisk = 20.0;
extern bool UseTrailingStop = FALSE;
extern double TrailStart = 10.0;
extern double TrailStop = 10.0;
double Stoploss = 500.0;
bool UseTimeOut = FALSE;
double MaxTradeOpenHours = 48.0;
extern int g_magic_176 = 12324;
extern string t7 = "??????? ????????!";
double g_price_180, Balans, Sredstva ;
double gd_188;
double gd_unused_196;
double gd_unused_204;
double g_price_212;
double g_bid_220;
double g_ask_228;
double gd_236;
double gd_244;
double gd_260;
bool gi_268;
string gs_ilan_272 = "Ilan_16TD_CCI";
int g_time_280 = 0;
int gi_284,ord_16,ord_N ;
int gi_288 = 0;
double gd_292;
int g_pos_300 = 0;
int gi_304;
double gd_308 = 0.0;
bool gi_316 = FALSE;
bool gi_320 = FALSE;
bool gi_324 = FALSE;
int gi_328;
bool gi_332 = FALSE;
double gd_336;
double gd_344;

string    txt,txt1;
string    txt2="";
string    txt3="";
color col = ForestGreen;

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

int deinit() {

 ObjectDelete("Lable");
 ObjectDelete("Lable1");
 ObjectDelete("Lable2");
 ObjectDelete("Lable3"); 

   return (0);
}

int start() {
      // код доступен только после оплаты
   }
   double l_iclose_8;
   double l_iclose_16;
   if (UseTrailingStop) TrailingAlls(TrailStart, TrailStop, g_price_212);
   if (UseTimeOut) {
      if (TimeCurrent() >= gi_284) {
         CloseThisSymbolAll();
         Print("Closed All due to TimeOut");
      }
   }
       {
    Comment("" 
         + "\n" 
         + "Ilan_16TD_CCI" 
         + "\n" 
         + "________________________________"  
         + "\n" 
         + "??????:         " + AccountCompany()
         + "\n"
         + "????? ???????:  " + TimeToStr(TimeCurrent(), TIME_DATE|TIME_SECONDS)
         + "\n"        
         + "________________________________"  
         + "\n" 
         + "????:             " + AccountName() 
         + "\n" 
         + "????? ????        " + AccountNumber()
         + "\n" 
         + "_______________________________"
         + "\n"
         + "??????? ??????? Ilan_16TD_CCI :" + CountTrades()
         + "\n"
         + "_______________________________"
         + "\n"           
         + "??????:                       " + DoubleToStr(AccountBalance(), 2)          
         + "\n" 
         + "????????? ????????:   " + DoubleToStr(AccountEquity(), 2)
         + "\n"      
         + "_______________________________");
   }

   ord_16 = CountTrades();  
   if (Turbo)
   {   
   if (ord_16 == 1) PipStep = PipStep_/3;
   if (ord_16 == 2) PipStep = PipStep_/3*2;
   if (ord_16 >= 3) PipStep = PipStep_;
   }
   else PipStep = PipStep_;

{  //=================Dynamic-?????
  ord_N = CountTrades();
 {if (ord_N >= StartDynamic)
   if (Dynamic)  
   { double hival=High[iHighest(NULL,0,MODE_HIGH,36,1)];    // ?????????? ?????????? ???? ?? ????????? 36 ????
     double loval=Low[iLowest(NULL,0,MODE_LOW,36,1)];       // ?????????? ?????????? ???? ?? ????????? 36 ????//chart used for symbol and time period
     PipS=NormalizeDouble((hival-loval)/3/Point,2);         // ?????? PipStep

     if (PipS>PipStep_*2) PipStep = PipStep_*2;    // if dynamic pips fail, assign pips extreme value
   } else PipStep = PipStep_;
  }
}

{   //ForestGreen' YellowGreen' Yellow' OrangeRed' Red
  Balans = NormalizeDouble( AccountBalance(),2);
  Sredstva = NormalizeDouble(AccountEquity(),2);  
    if (Sredstva >= Balans/6*5) col = DodgerBlue; 
    if (Sredstva >= Balans/6*4 && Sredstva < Balans/6*5)col = DeepSkyBlue;
    if (Sredstva >= Balans/6*3 && Sredstva < Balans/6*4)col = Gold;
    if (Sredstva >= Balans/6*2 && Sredstva < Balans/6*3)col = OrangeRed;
    if (Sredstva >= Balans/6   && Sredstva < Balans/6*2)col = Crimson;
    if (Sredstva <  Balans/5                           )col = Red;

ObjectDelete("Lable2");
ObjectCreate("Lable2",OBJ_LABEL,0,0,1.0);
   ObjectSet("Lable2", OBJPROP_CORNER, 3);
   ObjectSet("Lable2", OBJPROP_XDISTANCE, 33);
   ObjectSet("Lable2", OBJPROP_YDISTANCE, 31);
   txt2=(DoubleToStr(AccountBalance(), 2));
   ObjectSetText("Lable2","??????     "+txt2+"",16,"Times New Roman",DodgerBlue);

ObjectDelete("Lable3");
ObjectCreate("Lable3",OBJ_LABEL,0,0,1.0);
   ObjectSet("Lable3", OBJPROP_CORNER, 3);
   ObjectSet("Lable3", OBJPROP_XDISTANCE, 33);
   ObjectSet("Lable3", OBJPROP_YDISTANCE, 11);
   txt3=(DoubleToStr(AccountEquity(), 2));
   ObjectSetText("Lable3","????????     "+txt3+"",16,"Times New Roman",col);
}

   if (g_time_280 == Time[0]) return (0);
   g_time_280 = Time[0];
   double ld_0 = CalculateProfit();
   if (UseEquityStop) {
      if (ld_0 < 0.0 && MathAbs(ld_0) > TotalEquityRisk / 100.0 * AccountEquityHigh()) {
         CloseThisSymbolAll();
         Print("Closed All due to Stop Out");
         gi_332 = FALSE;
      }
   }
   gi_304 = CountTrades();
   if (gi_304 == 0) gi_268 = FALSE;
   for (g_pos_300 = OrdersTotal() - 1; g_pos_300 >= 0; g_pos_300--) {
      OrderSelect(g_pos_300, SELECT_BY_POS, MODE_TRADES);
      if (OrderSymbol() != Symbol() || OrderMagicNumber() != g_magic_176) continue;
      if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_176) {
         if (OrderType() == OP_BUY) {
            gi_320 = TRUE;
            gi_324 = FALSE;
            break;
         }
      }
      if (OrderSymbol() == Symbol() && OrderMagicNumber() == g_magic_176) {
         if (OrderType() == OP_SELL) {
            gi_320 = FALSE;
            gi_324 = TRUE;
            break;
         }
      }
   }
   if (gi_304 > 0 && gi_304 <= MaxTrades) {
      RefreshRates();
      gd_236 = FindLastBuyPrice();
      gd_244 = FindLastSellPrice();
      if (gi_320 && gd_236 - Ask >= PipStep * Point) gi_316 = TRUE;
      if (gi_324 && Bid - gd_244 >= PipStep * Point) gi_316 = TRUE;
   }
   if (gi_304 < 1) {
      gi_324 = FALSE;
      gi_320 = FALSE;
      gi_316 = TRUE;
      gd_188 = AccountEquity();
   }
   if (gi_316) {
      gd_236 = FindLastBuyPrice();
      gd_244 = FindLastSellPrice();
      if (gi_324) {
         gi_288 = gi_304;
         gd_292 = NormalizeDouble(Lots * MathPow(LotExponent, gi_288), lotdecimal);
         RefreshRates();
         gi_328 = OpenPendingOrder(1, gd_292, NormalizeDouble(Bid,Digits), slip, NormalizeDouble(Ask,Digits), 0, 0, gs_ilan_272 + "-" + gi_288, g_magic_176, 0, HotPink);
         if (gi_328 < 0) {
            Print("Error: ", GetLastError());
            return (0);
         }
         gd_244 = FindLastSellPrice();
         gi_316 = FALSE;
         gi_332 = TRUE;
      } else {
         if (gi_320) {
            gi_288 = gi_304;
            gd_292 = NormalizeDouble(Lots * MathPow(LotExponent, gi_288), lotdecimal);
            gi_328 = OpenPendingOrder(0, gd_292, NormalizeDouble(Ask,Digits), slip, NormalizeDouble(Bid,Digits), 0, 0, gs_ilan_272 + "-" + gi_288, g_magic_176, 0, Lime);
            if (gi_328 < 0) {
               Print("Error: ", GetLastError());
               return (0);
            }
            gd_236 = FindLastBuyPrice();
            gi_316 = FALSE;
            gi_332 = TRUE;
         }
      }
   }
   if (gi_316 && gi_304 < 1) {
l_iclose_8 = iMA(NULL,0,PerMA,0,MODE_LWMA,PRICE_WEIGHTED,3);//????????? ???????????.. 
l_iclose_16 = iMA(NULL,0,PerMA,0,MODE_LWMA,PRICE_WEIGHTED,1);//..??????????? ??????
double mMA=iMA(NULL,0,PerMA,0,MODE_LWMA,PRICE_WEIGHTED,0);
g_bid_220 = NormalizeDouble(Bid,Digits);
g_ask_228 = NormalizeDouble(Ask,Digits);
if (!gi_324 && !gi_320) {
gi_288 = gi_304;
if (MarginPercent>0) Lots=LotsCounting(Symbol());                         
gd_292 = NormalizeDouble(Lots * MathPow(LotExponent, gi_288), lotdecimal);
if (l_iclose_8 != l_iclose_16) // ?? ??????, ???? ??? ???????? ????
{
if (l_iclose_8 > l_iclose_16)// ???? ???? ????????, ?????????? ???????????... 
{
if (iOpen(NULL, 0, 1)<l_iclose_16 && iClose(NULL, 0, 1)<l_iclose_16 && (iClose(NULL, 0, 1)-iOpen(NULL, 0, 1))/Point>0 && iClose(NULL, 240, 1)<iOpen(NULL, 240, 1) &&
   (l_iclose_16-iClose(NULL, 0, 1))/Point>10)

{
if (NumberOfPositions()==0 || NumberOfPositions(Symbol())>0) gi_328 = OpenPendingOrder(1, gd_292, g_bid_220, slip, g_bid_220, 0, 0, gs_ilan_272 + "-" + gi_288, g_magic_176, 0, HotPink);
if (gi_328 < 0) 
{
Print("Error: ", GetLastError());
return (0);
}
gd_236 = FindLastBuyPrice();
gi_332 = TRUE;
}
} else 
{if (iOpen(NULL, 0, 1)>l_iclose_16 && iClose(NULL, 0, 1)>l_iclose_16 && (iClose(NULL, 0, 1)-iOpen(NULL, 0, 1))/Point<0 && iClose(NULL, 240, 1)>iOpen(NULL, 240, 1) &&
    (l_iclose_16-iClose(NULL, 0, 1))/Point<-10)

{ 
if (NumberOfPositions()==0 || NumberOfPositions(Symbol())>0) gi_328 = OpenPendingOrder(0, gd_292, g_ask_228, slip, g_ask_228, 0, 0, gs_ilan_272 + "-"

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