fraktrak_xonax.mq4

#property version   "1.00"
#property strict

input int      Tfr=240;        //TimeFrame
input double   Lots=0.01;     //Lots size
input int      Tprof=1000;     //TakeProfit
input int      TreilSt=100;    //Trailing Stop
input int      TrStKor=10;     //The size of the correction Trailing Stop
input int      Magik=1001012;  //Magic Number

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

void OnDeinit(const int reason)
  {

  }

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

   static double Upf,Lowf;
   double Tupf=0,Tlowf=0;
   int i,k;
   for(i=2; i<5000; i++)
     {
      Tupf=iFractals(Symbol(),Tfr,MODE_UPPER,i);
      if(Tupf>0)
         break;
     }
   for(k=2; k<5000; k++)
     {
      Tlowf=iFractals(Symbol(),Tfr,MODE_LOWER,k);
      if(Tlowf>0)
         break;
     }

   int total=OrdersTotal();
/*if(total<1)
      {*/
   if(Ask>Tupf+15*_Point && Tupf!=Upf)
     {
      double StL=NormalizeDouble(Tlowf,_Digits);
      int ticket=OrderSend(NULL,OP_BUY,Lots,Ask,30,StL,Bid+Tprof*_Point,NULL,Magik,0,clrBlue);
      if(ticket<0)
        {
         Print("OrderSend error #",GetLastError());
        }
      else {Print("Ask=",Ask,"Upf=",Upf," StL=",StL); Upf=Tupf;}
     }
   if(Bid<Tlowf-15*_Point && Tlowf!=Lowf)
     {
      double StL=NormalizeDouble(Tupf,_Digits);
      int ticket=OrderSend(NULL,OP_SELL,Lots,Bid,

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