Martingale code

I wrote a piece of code to do what you ask, I hope this helps.
There is not a expert adviser, is a code to add to yours experts.
=================================================


//+------------------------------------------------------------------+
//|                                                        test1.mq4 |
//|                        Copyright 2012, MetaQuotes Software Corp. |
//|                                        http://www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright "Copyright 2012, MetaQuotes Software Corp."
#property link      "http://www.metaquotes.net"
extern int MagicNumber=123;
extern double StartLotsize=0.01;
extern double MultiplierLot=2.0;
extern double StepOrder=10;
extern int MaxGrid=3;
//---------------------------------------------------------------------------------------
  int MultiplierPoint;
  double DigitsPoints;
  int BuyCnt;
  int SellCnt;
  double PipsBuy;
  double PipsSell;
  bool SendBuy;
  bool SendSell;
  double LotBuy;
  double LotSell;
//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
  {
//----
MultiplierPoint=1;
if(MarketInfo(Symbol(),MODE_DIGITS)==5||MarketInfo(Symbol(),MODE_DIGITS)==3) MultiplierPoint=10;
DigitsPoints=MarketInfo(Symbol(),MODE_POINT)*MultiplierPoint;
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
int deinit()
  {
//----
 
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
  {
   BuyCnt=0;
   SellCnt=0;
   PipsBuy=0;
   PipsSell=0;
   SendBuy=false;
   SendSell=false;
   LotBuy=StartLotsize;
   LotSell=StartLotsize;
//----
   for(int i=0; i<OrdersTotal(); i++)
   {
   if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
   {
   if(OrderMagicNumber()==MagicNumber)
   {
   if(OrderType()==OP_BUY)
   {
   BuyCnt++;
   PipsBuy=(Bid-OrderOpenPrice())/DigitsPoints;
   }
   if(OrderType()==OP_SELL)
   {
   SellCnt++;
   PipsSell=(OrderOpenPrice()-Ask)/DigitsPoints;
   }
   }
   }
   }
//----
   if((BuyCnt<MaxGrid)&&(PipsBuy>=StepOrder))
   {
   LotBuy=NormLot(StartLotsize*MathMax(1,MathPow(MultiplierLot,BuyCnt)));
   SendBuy=true;
   }
   if((SellCnt<MaxGrid)&&(PipsSell>=StepOrder))
   {
   LotSell=NormLot(StartLotsize*MathMax(1,MathPow(MultiplierLot,SellCnt)));
   SendSell=true;
   }
//----
  if(SendBuy==true)
  {
  //send orders buy... with lot=LotBuy
  return(0);
  }
//----
  if(SendSell==true)
  {
  //send orders sell... with lot=LotSell
  return(0);
  }
//----
   return(0);
  }
//+------------------------------------------------------------------+
//Normalize lot                                                                                                        //
double NormLot(double LotSize)
{
int LotDigit;
//------------------------------------------------------
//Broker lot info
double MinLot=MarketInfo(Symbol(),MODE_MINLOT);
double MaxLot=MarketInfo(Symbol(),MODE_MAXLOT);
double LotStep=MarketInfo(Symbol(),MODE_LOTSTEP);
//------------------------------------------------------
//Calculate lot digits
if(LotStep==1) LotDigit=0;
if(LotStep==0.1) LotDigit=1;
if(LotStep==0.01) LotDigit=2;
if(LotStep==0.001) LotDigit=3;
//------------------------------------------------------
return(NormalizeDouble(MathMin(MathMax(LotSize,MinLot),MaxLot),LotDigit));
}

iCustom fxsniper3cci

supaya indinya bisa di set di EA juga di deklarasikan
"extern int CCI_Period = 14"
"extern int T3_Period = 5"
"extern double b = 0.618"

Nah untuk nilai indi ini bisa di lihat pada mt4 --->terkan CTRL D , maka akan kelihatan nilai nya output keluaran hanya satu macam aja 
double x=iCustom(Symbol(),0,"fxsniper3cci",CCI_Period,T3_ Period,b,0,shif);
shif bisa di isi 0 (sekarang), 1( satu candel sebelum sekarang, 2(dua candel sebelum sekarang) dst.......

PHP Code:

double x=iCustom(Symbol(),0,"fxsniper3cci",CCI_Period,T3_Period,b,0,0);//(sekarang)
   double xx=iCustom(Symbol(),0,"fxsniper3cci",CCI_Period,T3_Period,b,0,1);//satu candel sebelum sekarang
   double xxx=iCustom(Symbol(),0,"fxsniper3cci",CCI_Period,T3_Period,b,0,2);//dua candel sebelum sekarang  

gitu deh gambarannya

==========================
kalau dilihat didata windows nya nilai outputnya hanya 1 nilainya bro
coba untuk cek value coba ini

PHP Code:

   double x=iCustom(Symbol(),0,"fxsniper3cci",CCI_Period,T3_Period,b,0,0);
   double y=iCustom(Symbol(),0,"fxsniper3cci",CCI_Period,T3_Period,b,1,0);
   double z=iCustom(Symbol(),0,"fxsniper3cci",CCI_Period,T3_Period,b,2,0);
   Comment("nilai x",x,
          "\n nilai y",y,
          "\n nilai z",z);

iCustom CCI EMA

CCI EMA

the code in your post refers to it below.

for(i = limit; i >= 0; i--) {
cciTrendNow = iCustom(NULL, 0, "CCI EMA", CCIPeriod, MAPeriod, 1, i);
cciTrendPrevious = iCustom(NULL, 0, "CCI EMA", CCIPeriod, MAPeriod, 1, i+1);

================
All is says is: if CCI > 0 the trend is up: if < 0 the trend is down

for(i=limit; i>=0; i--)
            {
               int y = iBarShift(NULL,TimeFrame,Time[i]);
               double cciTrend = iCCI(NULL, TimeFrame, 50, PRICE_TYPICAL, y);
                      
                  
               TrendDoA[i]  = EMPTY_VALUE;
               TrendDoB[i]  = EMPTY_VALUE;
               Trend[i]     = iCustom(NULL,TimeFrame,IndicatorFileName,0,y);
               Direction[i] = Direction[i+1];
                  if (cciTrend>0) Direction[i] =  1;
                  if (cciTrend<0) Direction[i] = -1;
                  if (Direction[i]==-1) PlotPoint(i,TrendDoA,TrendDoB,Trend);
            }
         return(0);         
      }

Supertrend 3

The name of the indicator is Supertrend.
It only changes the color and know I think of adding a few pips when the indicator changes the signal, so I can search after the jump of the pips.

---

The code is something like this.

bool indBuy=false; 
bool indSell=false;

double sigBuy = iCustom(NULL,0,"SuperTrend",10,3,0,0);
double sigSell = iCustom(NULL,0,"SuperTrend",10,3,1,0);

if (sigBuy != EMPTY_VALUE) indBuy=true;
if (sigSell != EMPTY_VALUE) indSell=true; 

if (indBuy==true)
{
// place a buy order
}

if (indSell==true)
{
// place a sell order
}

Hope it helps.

======================

Lot's of thanks!! This was a really great help!! I haven't seen the fact with that EMPTY_VALUE

You're welcome.

As you know the value in the current bar may change since the bar is till not closed and the price can move up or down. You may want to take the signal from the previous closed bar by changing the code to

double sigBuy = iCustom(NULL,0,"SuperTrend",10,3,0,1);
double sigSell = iCustom(NULL,0,"SuperTrend",10,3,1,1);

===============================

SuperTrend 2

int trade() 
{
double trend4 = iCustom(NULL,0,"SuperTrend",5,1.5,1,3); //achat -> vente
double trend1 = iCustom(NULL,0,"SuperTrend",5,1.5,0,2); //achat -> vente


double trend3 = iCustom(NULL,0,"SuperTrend",5,1.5,1,2); //vente -> achat
double trend2 = iCustom(NULL,0,"SuperTrend",5,1.5,0,3); //vente -> achat

int total = OrdersTotal();
double ordre1;
double ordre2;


if(trend2 < 5 && trend3 < 5 && total == 0)//vente
{
ordre1 = OrderSend(Symbol(),OP_SELL,0.08,Bid,3,Bid+(5000*Point),Bid-(5000*Point),"EA de Greg3395",1,0,Red);
}

  if(trend2 > 5 && trend3 > 5 && total == 1) //achat
{
   if(OrderSelect(ordre1, SELECT_BY_TICKET))
  {
   if(OrderType()==OP_SELL)
   {
   OrderClose(OrderTicket(), 0.08, Bid, 3, CLR_NONE);
   }  
  } 
} 


if(trend1 < 5 && trend4 < 5 && total == 0) //achat
{
ordre2 = OrderSend(Symbol(),OP_BUY,0.08,Ask,3,Ask-(5000*Point),Ask+(5000*Point),"EA de Greg3395",2,0,Blue);
} 


if(trend1 > 5 && trend4 > 5 && total == 1) //achat
{
   if(OrderSelect(ordre2, SELECT_BY_TICKET))
  {
    if(OrderType()==OP_BUY)
    {
    OrderClose(OrderTicket(), 0.08, Ask, 3, CLR_NONE);
    }
  }
}

return(0);
}

supertrend value

i made something approaching what i want but i cant understand the behaviour of this EA : its following supertrend switches sometimes, but it also reacts when the market reaches supertrend value...

here are the interresting lines of this code :

//green supertrend and previous value

double super0 = iCustom(NULL,0,"SuperTrend",0,1);
double prevsuper0 = iCustom(NULL,0,"SuperTrend",0,2);

//red supertrend and previous value

double super1 = iCustom(NULL,0,"SuperTrend",1,1);
double prevsuper1 = iCustom(NULL,0,"SuperTrend",1,2);

// turns to red

if ((super1!=2147483647) && (prevsuper1==2147483647)) Order=SIGNAL_CLOSEBUY;

if ((super1!=2147483647) && (prevsuper1==2147483647)) Order=SIGNAL_SELL;

//turns to green

if ((super0!=2147483647) && (prevsuper0==2147483647)) Order=SIGNAL_CLOSESELL;

if ((super0!=2147483647) && (prevsuper0==2147483647)) Order=SIGNAL_BUY;

i also wonder why this weird value of 2147483647 when the line isnt of the same color as the buffer, instead of a clean EMPTY_VALUE...

thanks again!!!

iCustom(NULL, 0, "SuperTrend",Periods,Multiplier,TimeFrame,0,1); //uptrend value

Code:

 
iCustom(NULL,0,"SuperTrend",10,3,0,1) //buffer 0 ie uptrend
 
iCustom(NULL,0,"SuperTrend",10,3,1,1) //buffer 1 ie downtrend

Code:

int start()
  {
//----
   
      ExtMapBuffer1[1] = iCustom(NULL, 0, "SuperTrend",Periods,Multiplier,TimeFrame,0,1);  //uptrend value
 
      ExtMapBuffer1[2] = iCustom(NULL, 0, "SuperTrend",Periods,Multiplier,TimeFrame,1,1);  //downtrend value
      
      if(Bid <= ExtMapBuffer1[1]) 
      {
         TrendDirection = "Up!";
      }
      if(Bid >= ExtMapBuffer1[2]) 
      {
         TrendDirection = "Down!";
      }
   
      Comment("UpTrend: ", ExtMapBuffer1[1], "n", "DownTrend: ", ExtMapBuffer2[2], "n", "Trade Direction: ", TrendDirection);
   
//----
   return(0);
  }

We are our own best indicator.

I have put the following for a call to the indicator, would this be correct to get the current price? It only works on the output of the bar I am asking (which is fine) I believe and does this seem right?

Code:

//+------------------------------------------------------------------+
//|                                                SuperTrend V1.mq4 |
//|                      Copyright © 2010, MetaQuotes Software Corp. |
//|                                        http://www.metaquotes.net |
//+------------------------------------------------------------------+
double ExtMapBuffer1[];
double ExtMapBuffer2[];

int      Periods = 3;
double   Multiplier = 1.25;
int      TimeFrame = 240;
string   TrendDirection = "Long";

//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
  {
//----
  
      
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
int deinit()
  {
//----
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
  {
//----
   
      ExtMapBuffer1[1] = iCustom(NULL, 0, "SuperTrend",Periods,Multiplier,TimeFrame,0,1);  //downtrend value
 
      ExtMapBuffer1[2] = iCustom(NULL, 0, "SuperTrend",Periods,Multiplier,TimeFrame,1,1);  //uptrend value
      
      if(ExtMapBuffer1[1] < ExtMapBuffer1[2])
      {
         TrendDirection = "Down";
      }
   
      Comment("UpTrend: ", ExtMapBuffer1[1], "n", "DownTrend: ", ExtMapBuffer2[2], "n", "Trade Direction: ", TrendDirection);
   
//----
   return(0);
  }

I added the Timeframe option in the indicator so I can switch through the timeframes...

I think I got it! 

I changed to the following and it is outputting fine!

Code:

//+------------------------------------------------------------------+
//|                                                SuperTrend V1.mq4 |
//|                      Copyright © 2010, MetaQuotes Software Corp. |
//|                                        http://www.metaquotes.net |
//+------------------------------------------------------------------+
double ExtMapBuffer1[];
double ExtMapBuffer2[];

int      Periods = 3;
double   Multiplier = 1.25;
int      TimeFrame = 240;
string   TrendDirection = "Long";


double   UpTrend,DownTrend;
//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
  {
//----
  
      
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
int deinit()
  {
//----
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
  {
//----
   
      //ExtMapBuffer1[1] = iCustom(NULL, 0, "SuperTrend",Periods,Multiplier,TimeFrame,0,1);  //uptrend value
 
      //ExtMapBuffer1[2] = iCustom(NULL, 0, "SuperTrend",Periods,Multiplier,TimeFrame,1,1);  //downtrend value
      UpTrend = iCustom(NULL, 0, "SuperTrend",Periods,Multiplier,TimeFrame,0,1);
      DownTrend = iCustom(NULL, 0, "SuperTrend",Periods,Multiplier,TimeFrame,1,1);
      
      /*if(Bid <= ExtMapBuffer1[1]) 
      {
         TrendDirection = "Up!";
      }
      if(Bid >= ExtMapBuffer1[2]) 
      {
         TrendDirection = "Down!";
      }
   
      //Comment("UpTrend: ", ExtMapBuffer1[1], "n", "DownTrend: ", ExtMapBuffer2[2], "n", "Trade Direction: ", TrendDirection);
   */
      Comment("UpTrend: ", UpTrend, "n", "DownTrend: ", DownTrend);
//----
   return(0);
  }

We are our own best indicator.