Belajar Membuat EA Sederhana 19 Martiangel

Pastikan udah baca di part 18 disini
Berbicara EA martingel tentu gak ada habisnya !
Silahkan juga kunjungi penjelasannya di https://youtu.be/CsYk1Ts6UpU
Banyak trader yang anti dengan EA martiangel tapi juga banyak trader penggemar martingel
Haaaaa
Biasanya banyak trader yang kebetulan habis MC gara2 EA martingel pasti akan memberi sumpah serapah" Dasar EA martingel heeeee kapok deh menggunakan EA martingel....."

Sebagai pengguna EA martingel tentu saja bagi saya EA martingel merupakan EA yg profitabel terlepas dari kekurangan dan kelemahannya , yang penting bisa memahami dan memperhitungankan risikonya tentu tidak menjadi masalah.

Oke pada part 19 ini saya akan bahas tentang EA martingel sederhana dengan menggunakan 2 buah indikator yaitu zigzag dan candel mingguan

Rulesnya :
Buy :

Zigzag muncul dibawah (lower)
Harga di atas harga open candel minggu yang sedang berjalan
op tidak dalam candel yang sama seperti pada part 18

Untuk sel kebalikannya!

Tambahan lain pada EA kali ini adalah menggunakan target Equety ( jika target equety terpenuhi maka EA berhenti trading) EA yang akan kita gunakan masih sama seperti pada part 18...

Oke yang perlu dibahas dulu adalah indikator zigzag
Nah pada indikator zigzag yang perlu dipahami adalah bahwa indikator ini berubah mengikuti harga tertinggi (Uper) dan terendah (lower).
Kita buat customnya:


    double up=iCustom(Symbol(),0,"ZigZag",  ExtDepth , ExtDeviation, ExtBackstep, MODE_UPPER,0 );

    double lo=iCustom(Symbol(),0,"ZigZag", ExtDepth , ExtDeviation, ExtBackstep, MODE_LOWER, 0);

Jadi modenya MODE_UPPER ketika harga posisi diatas dan MODE_LOWER ketika posisi dibawah.

Kemudian mengingat kita akan mengacu pada posisi zigzag dan berapapun jarak candel maka pada shift nya kita buat fleksibel saya tambahkan operasi for sebagai berikut

for(int d=0; d<Bars ; d++){

double up=iCustom(Symbol(),0,"ZigZag", ExtDepth , ExtDeviation, ExtBackstep, MODE_UPPER, d);

double lo=iCustom(Symbol(),0,"ZigZag", ExtDepth , ExtDeviation, ExtBackstep, MODE_LOWER,d);

if(up!=0 || lo!=0) break;}

if(up>0 ) aturan buy

if(lo>0) aturan sell

Bars ini adalah angka yang jumlah tick candel untuk menunjukkan shift nya dalam menghitung candel , bisa juga diganti dengan angka 1000 atau lebih ,ini untuk menentukan dimasa candel kebelakang keberadaan posisi zigzag.

Sedangkan untuk membuat menentukan Open candel mingguan kita gunakan:

double OP=iOpen(Symbol(),PERIOD_W1,0);

if(Ask>OP) aturan buy

if(Bid<OP) aturan sell

Nah dari uraian diatas kita gunakan aturan buy sbb

int sigz, sigc;

if(up>0 ) sigz= 1;

if(lo>0) sigz= 5;

if(Ask>OP)sigc=1;

if(Bid<OP) sigc=5;




if(sigz+sigc==2) op buy

if(sigz+sigc==10) op sell

Penggunaan angka 1 dan 5 ini sebarang aja intinya untuk memudahkan identifikasi saja , jadi suka-suka saja!

Tambahan lain adalah target Equety (jika target equety terpenuhi maka EA berhenti trading).


extern double Target_Equety= 1000;

supaya bisa data balance ketika EA di attack ke chart tersimpan maka kita buat dulu data balance yang ditempatkan di bawah int init()


int init()

  {

bal= AccountBalance();

   return(0);

  }

dan untuk menghentikan ketika target terpenuhi maka harus dibuat coding target dibawah int start() , sbb:

if(Target_Equety<AccountEquity()) {


    closeall(0);

    closeall(1);

   Alert("Cek Target_Equetynya ");

   return(0);

   }

Setelah di rakit penampakannya sbb:

//+------------------------------------------------------------------+
//|                                              EA Sederhana 19.mq4 |
//|                        Copyright 2018, MetaQuotes Software Corp. |
//|                                             https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "JumForex.blogspot.com"
#property link      "Gifaesa@yahoo.com"
#property version   "1.00"
#property strict
//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+

extern string  Nama_EA                 = "Jum+Donchian+v2";
extern double  Target_Equety           = 1000;
extern bool    Trade_buy               = true;
extern bool    Trade_sell              = true;
extern int     Mulai_Jam               = 0;
extern int     Akhir_Jam               = 24;
extern bool    Tp_in_Money             = true;
extern double  TP_in_money             = 10;
extern int     TP                      = 100;
extern int     SL                      = 0;
extern double  Lots                    = 0.1;
extern int     Jarak_order             = 35;
extern int     Max_order               = 10;
extern double  DiMarti                 = 1.3;
extern bool    TrailingStop_           = false;
extern int     TrailingStop            = 20;
extern int     Magic                   = 69;
extern string  Seting_Donchian         = "Sesuka Hati";
extern int     ExtDepth                = 12;
input  int     ExtDeviation            = 5;
input  int     ExtBackstep             = 3;

double slb,tpb,sls,tps,pt;
int tiket,signal,sig,sigjadi,type;;
double opb,ops, lan,ylot,dlot,up,lo,bal;  
 static datetime wt,wk;
 bool targ=0;
int OnInit()
  {
//---
   bal= AccountBalance();
   if(Digits==3 || Digits==5) pt=10*Point;   else   pt=Point;
//---
   return(INIT_SUCCEEDED);
  }
//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
  {
//---
   
  }
//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
  {
//---
label();
if(TrailingStop_)dtrailing();
if(Tp_in_Money && TP_in_money<= money()){ 
   closeall(0);
   closeall(1);
   targ=1;
   }
//----
 if(Target_Equety<AccountEquity()) {
    closeall(0);
    closeall(1);
      targ=1;

Alert("Cek Target_Equetynya ");
    }
   //--------------
    for(int d=0; d<bars  ; d++){
     up=iCustom(Symbol(),0,"ZigZag",   ExtDepth , ExtDeviation, ExtBackstep, MODE_UPPER, d);
     lo=iCustom(Symbol(),0,"ZigZag",   ExtDepth , ExtDeviation, ExtBackstep, MODE_LOWER,d);
    if(up!=0 || lo!=0) break;}
     if(up>0 )  signal=1;// aturan buy
     if(lo>0)  signal=2;//aturan sell
 double  OP=iOpen(Symbol(),PERIOD_W1,0);
if(Ask>OP) sig=1;//aturan buy 
if(Bid<OP) sig=2; //aturan sell

if(signal+sig==2)sigjadi=1;
if(signal+sig==4)sigjadi=2;

if(Jam_trade()==1 && !targ){
   if(SL==0)slb=0;else slb=Ask-SL*pt;
   if(SL==0)sls=0;else sls=Bid+SL*pt;
   if(TP==0)tpb=0;else tpb=Ask+TP*pt;
   if(TP==0)tps=0;else tps=Bid-TP*pt;
  if(jumlahorder(0)==0 && jumlahorder(1)==0 && Trade_buy  && sigjadi==1) {if(OrderSend(Symbol(),OP_BUY,NR(Lots),Ask,3,slb, tpb,Nama_EA,Magic,0,Blue))Print("JumForex Buy");}
  if(jumlahorder(0)==0  && jumlahorder(1)==0 && Trade_sell && sigjadi==2) {if(OrderSend(Symbol(),OP_SELL,NR(Lots),Bid,3,sls, tps,Nama_EA,Magic,0,Red))Print("JumForex Buy");}
   } 
   double asi = open(0) - Jarak_order * pt;
   double bi  = open(1) + Jarak_order * pt;
 if( Ask <= asi &&  jumlahorder(0)> 0 && wt!=Time[0] && jumlahorder(1)==0 && jumlahorder(0)<max_order  && Trade_buy  && signal==2) {if(OrderSend(Symbol(),OP_BUY,xlot(0),Ask,3,slb, tpb,Nama_EA,Magic,0,Blue))Print("JumForex Buy");  wt=Time[0]; }
 if( Bid >= bi &&  jumlahorder(1)> 0 && wk!=Time[0] && jumlahorder(0)==0 && jumlahorder(1)<max_order  && Trade_sell  && signal==1) {if(OrderSend(Symbol(),OP_SELL,xlot(1),Bid,3,sls, tps,Nama_EA,Magic,0,Red))Print("JumForex Sell");  wk=Time[0];}

}
//+------------------------------------------------------------------+
int Jam_trade()
{
   bool trade = false;
   if(Mulai_Jam > Akhir_Jam){
     if (Hour() >= Mulai_Jam || Hour() < Akhir_Jam) trade = true;
   } else
     if (Hour() >= Mulai_Jam && Hour() < Akhir_Jam) trade = true;

return (trade);
}

int jumlahorder( int tipe)
{
int total=0;
for(int i=0; i<OrdersTotal(); i++)
  {
      if(!OrderSelect(i,SELECT_BY_POS,MODE_TRADES))continue;
      if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=Magic || OrderType()!=tipe) continue;
     total++;
  }

return(total);
}
double NR(double thelot)
{
    double maxlots = MarketInfo(Symbol(), MODE_MAXLOT),
    minilot = MarketInfo(Symbol(), MODE_MINLOT),
    lstep = MarketInfo(Symbol(), MODE_LOTSTEP);
    double lots = lstep * NormalizeDouble(thelot / lstep, 0);
    lots = MathMax(MathMin(maxlots, lots), minilot);
    return (lots);
}

void dtrailing()
{
for(int i=0; i<OrdersTotal(); i++){
      if(!OrderSelect(i,SELECT_BY_POS,MODE_TRADES))continue;
        if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=Magic ) continue;
        if(OrderType()==OP_BUY)  {
         if(Bid-OrderOpenPrice()>pt*TrailingStop)  {
           if((OrderStopLoss()<Bid-pt*TrailingStop) || (OrderStopLoss()==0)) {
              tiket=OrderModify(OrderTicket(),OrderOpenPrice(),Bid-pt*TrailingStop,OrderTakeProfit(),0,Green);
              }
              }
           }
        if(OrderType()==OP_SELL)  {
         if((OrderOpenPrice()-Ask)>(pt*TrailingStop)){
           if(OrderStopLoss()>(Ask+pt*TrailingStop) || (OrderStopLoss()==0)){
             tiket= OrderModify(OrderTicket(),OrderOpenPrice(),Ask+pt*TrailingStop,OrderTakeProfit(),0,Red);
              }
              }
           }
     }
  
}
void closeall(int m)
{
 for (int i = OrdersTotal() - 1; i >= 0; i--) {
  if(!OrderSelect(i, SELECT_BY_POS, MODE_TRADES))continue;
  if (OrderSymbol() != Symbol() || OrderMagicNumber()!=Magic || m!= OrderType()) continue;
  if (OrderType() > 1) tiket=OrderDelete(OrderTicket());
   else {
    if (OrderType() == 0)tiket= OrderClose(OrderTicket(), OrderLots(), Bid, 3, CLR_NONE);
    else               tiket=OrderClose(OrderTicket(), OrderLots(), Ask, 3, CLR_NONE);
  }
 }
}
double money()
{
 int i;
 for (i = 0; i < OrdersTotal(); i++) {
  if(!OrderSelect(i, SELECT_BY_POS, MODE_TRADES))continue;
  if (OrderSymbol() != Symbol()  || OrderMagicNumber()!=Magic) continue;
  dlot += OrderProfit();
 }
 return(dlot);
}
 double open(int m)
{
  for (int i = 0; i < OrdersTotal(); i++) {
   if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue;
   if (OrderSymbol() != Symbol() || OrderMagicNumber() != Magic ||OrderType()!=m) continue;
     dlot=OrderOpenPrice();
     }
return(dlot);
}
double xlot(int m)
{
  for (int i = 0; i < OrdersTotal(); i++) {
   if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue;
   if (OrderSymbol() != Symbol() || OrderMagicNumber() != Magic ||OrderType()!=m) continue;
     dlot=OrderLots();
     }
if(OrderType()==m)ylot=NR(Lots*MathPow(DiMarti,jumlahorder(m)));
return(ylot);
}
void label()
{
 Comment("\n ",
   "\n ",
   "\n ------------------------------------------------",
   "\n :: =>+Jum+Zigzag<=",
   "\n :: =>JumForex.blogspot.com<=",
   "\n ------------------------------------------------",
   "\n :: Spread                 : ", MarketInfo(Symbol(), MODE_SPREAD),
   "\n :: Leverage               : 1 : ", AccountLeverage(),
   "\n :: Equity                 : ", AccountEquity(),
   "\n :: Jam Server             :", Hour(), ":", Minute(),
   "\n ------------------------------------------------",
   "\n :: >>By: Jum69<<",
   "\n ------------------------------------------------");
}