Belajar Membuat EA Sederhana 27 (Compounding Lots)

Sebelumnya ikuti dulu di part 26 disini

Kali ini saya akan sedikit membahas tentang Compounding lots (atas permintaan dari dari seorang rekan)
Compounding itu sendiri sebanarnya banyak cara dan ragamnya tapi pada intinya adalah melipatkan lots karena ada pertambahan equety .

Nah dalam kesempatan ini saya hanya  akan membahas 2 macem cara membuat compounding lots, (sebenarnya ada banyak  banyak cara ) Hal ini sebenarnya berhubungan dengan Management Money (MM). => bisa dengan Balance , Equety, Freemargin dll

1. Cara pertama dengan cara membagi balance dan atau Equety

• Membagi balance  =      AccountBalance()/Pembagi
• Membaci Equety  =      AccountEquity()/Pembagi

Contoh nya kita akan menambahkan pada ea yang ada pada part 13
EA nya begini : Cross AntiQ

//+------------------------------------------------------------------+ //| EA MA Cross AntiQ+ | //| gifaesa@yahoo.com | //| http://JumForex.blogspot.com | //+------------------------------------------------------------------+ #property copyright "JumForex.blogspot.com" #property link "Gifaesa@yahoo.com" extern string Nama_EA = "Cross AntiQ+"; extern bool Trade_buy = true; extern bool Trade_sell = true; extern int Mulai_Jam = 6; extern int Akhir_Jam = 20; extern bool Tp_in_Money = true; extern double TP_in_money = 2; extern int TP = 100; extern int SL = 100; extern double Lots = 0.1; extern int TrailingStop = 20; extern int Magic = 69; extern string Seting_MA = "Sesuka Hati"; extern int Pereode_1 = 4; extern int Pereode_2 = 4; double slb,tpb,sls,tps,pt; //+------------------------------------------------------------------+ //| expert initialization function | //+------------------------------------------------------------------+ int init() { //---- if(Digits==3 || Digits==5) pt=10*Point; else pt=Point; //---- return(0); } //+------------------------------------------------------------------+ //| expert deinitialization function | //+------------------------------------------------------------------+ int deinit() { //---- //---- return(0); } //+------------------------------------------------------------------+ //| expert start function | //+------------------------------------------------------------------+ int start() { dtrailing(); if(Tp_in_Money && TP_in_money<= money()) closeall(); //---- double MA_1O =iMA(Symbol(),0,Pereode_1,0,MODE_SMA,PRICE_OPEN ,1); double MA_1C =iMA(Symbol(),0,Pereode_1,0,MODE_SMA,PRICE_CLOSE ,1); double MA_2O =iMA(Symbol(),0,Pereode_2,0,MODE_SMA,PRICE_OPEN ,2); double MA_2C =iMA(Symbol(),0,Pereode_2,0,MODE_SMA,PRICE_CLOSE ,2); int signal; if(MA_2O >MA_2C && MA_1O < MA_1C) signal=1;// aturan buy if(MA_2O <MA_2C && MA_1O > MA_1C) signal=2;//aturan sell if(Jam_trade()==1){ 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 && signal==1) {OrderSend(Symbol(),OP_BUY,NR(Lots),Ask,3,slb, tpb,Nama_EA,Magic,0,Blue);} if(jumlahorder(0)==0 && jumlahorder(1)==0 && Trade_sell && signal==2) {OrderSend(Symbol(),OP_SELL,NR(Lots),Bid,3,sls, tps,Nama_EA,Magic,0,Red);} } //---- return(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++) { OrderSelect(i,SELECT_BY_POS,MODE_TRADES); 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++){ OrderSelect(i,SELECT_BY_POS,MODE_TRADES); if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=Magic ) continue; if(OrderType()==OP_BUY) { if(Bid-OrderOpenPrice()>pt*TrailingStop) { if((OrderStopLoss()<Bid-pt*TrailingStop) || (OrderStopLoss()==0)) { OrderModify(OrderTicket(),OrderOpenPrice(),Bid-pt*TrailingStop,OrderTakeProfit(),0,Green); return(0); } } } if(OrderType()==OP_SELL) { if((OrderOpenPrice()-Ask)>(pt*TrailingStop)){ if(OrderStopLoss()>(Ask+pt*TrailingStop) || (OrderStopLoss()==0)){ OrderModify(OrderTicket(),OrderOpenPrice(),Ask+pt*TrailingStop,OrderTakeProfit(),0,Red); return(0); } } } } } void closeall() { for (int i = OrdersTotal() - 1; i >= 0; i--) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES); if (OrderSymbol() != Symbol() || OrderMagicNumber()!=Magic ) continue; if (OrderType() > 1) OrderDelete(OrderTicket()); else { if (OrderType() == 0) OrderClose(OrderTicket(), OrderLots(), Bid, 3, CLR_NONE); else OrderClose(OrderTicket(), OrderLots(), Ask, 3, CLR_NONE); } } } double money() { double dp = 0; int i; for (i = 0; i < OrdersTotal(); i++) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES); if (OrderSymbol() != Symbol() || OrderMagicNumber()!=Magic) continue; dp += OrderProfit(); } return(dp); }

Nah langkah pertama dibuat  dulu tambahan deklarasi  boolean dan pembaginya

extern bool    Compounding             = true;

extern double  Pembagi                 = 1000;

double x;

Kita bual perintah untuk menyisipkan

if(Compounding ) x=AccountBalance() / Pembagi; else x=Lots; 

artinya kalau compounding ==true maka akan di compouding bila else maka tetap berlaku Lots

Bagian yang lain perlu diganti adalah pada bagian yang berhubungan dengan lots , yaitu

OrderSend(Symbol(),OP_BUY,NR(Lots), bla bla...............

Nah ini diganti dengan

OrderSend(Symbol(),OP_BUY,NR(x), bla bla..............

Bila menghendaki Equety yang dibagi yah tinggal diganti aja

if(Compounding ) x=AccountEquety() / Pembagi; else x=Lots; 

Sehingga jadinya begini:

//+------------------------------------------------------------------+ //| EA MA Cross AntiQ+ | //| gifaesa@yahoo.com | //| http://JumForex.blogspot.com | //+------------------------------------------------------------------+ #property copyright "JumForex.blogspot.com" #property link "Gifaesa@yahoo.com" extern string Nama_EA = "Cross AntiQ+"; extern bool Compounding = true; extern double Pembagi = 1000; extern bool Trade_buy = true; extern bool Trade_sell = true; extern int Mulai_Jam = 6; extern int Akhir_Jam = 20; extern bool Tp_in_Money = true; extern double TP_in_money = 2; extern int TP = 100; extern int SL = 100; extern double Lots = 0.1; extern int TrailingStop = 20; extern int Magic = 69; extern string Seting_MA = "Sesuka Hati"; extern int Pereode_1 = 4; extern int Pereode_2 = 4; double slb,tpb,sls,tps,pt; double x; //+------------------------------------------------------------------+ //| expert initialization function | //+------------------------------------------------------------------+ int init() { //---- if(Digits==3 || Digits==5) pt=10*Point; else pt=Point; //---- return(0); } //+------------------------------------------------------------------+ //| expert deinitialization function | //+------------------------------------------------------------------+ int deinit() { //---- //---- return(0); } //+------------------------------------------------------------------+ //| expert start function | //+------------------------------------------------------------------+ int start() { if(Compounding ) x=AccountBalance() / Pembagi; else x=Lots; dtrailing(); if(Tp_in_Money && TP_in_money<= money()) closeall(); //---- double MA_1O =iMA(Symbol(),0,Pereode_1,0,MODE_SMA,PRICE_OPEN ,1); double MA_1C =iMA(Symbol(),0,Pereode_1,0,MODE_SMA,PRICE_CLOSE ,1); double MA_2O =iMA(Symbol(),0,Pereode_2,0,MODE_SMA,PRICE_OPEN ,2); double MA_2C =iMA(Symbol(),0,Pereode_2,0,MODE_SMA,PRICE_CLOSE ,2); int signal; if(MA_2O >MA_2C && MA_1O < MA_1C) signal=1;// aturan buy if(MA_2O <MA_2C && MA_1O > MA_1C) signal=2;//aturan sell if(Jam_trade()==1){ 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 && signal==1) {OrderSend(Symbol(),OP_BUY,NR(x),Ask,3,slb, tpb,Nama_EA,Magic,0,Blue);} if(jumlahorder(0)==0 && jumlahorder(1)==0 && Trade_sell && signal==2) {OrderSend(Symbol(),OP_SELL,NR(x),Bid,3,sls, tps,Nama_EA,Magic,0,Red);} } //---- return(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++) { OrderSelect(i,SELECT_BY_POS,MODE_TRADES); 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++){ OrderSelect(i,SELECT_BY_POS,MODE_TRADES); if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=Magic ) continue; if(OrderType()==OP_BUY) { if(Bid-OrderOpenPrice()>pt*TrailingStop) { if((OrderStopLoss()<Bid-pt*TrailingStop) || (OrderStopLoss()==0)) { OrderModify(OrderTicket(),OrderOpenPrice(),Bid-pt*TrailingStop,OrderTakeProfit(),0,Green); return(0); } } } if(OrderType()==OP_SELL) { if((OrderOpenPrice()-Ask)>(pt*TrailingStop)){ if(OrderStopLoss()>(Ask+pt*TrailingStop) || (OrderStopLoss()==0)){ OrderModify(OrderTicket(),OrderOpenPrice(),Ask+pt*TrailingStop,OrderTakeProfit(),0,Red); return(0); } } } } } void closeall() { for (int i = OrdersTotal() - 1; i >= 0; i--) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES); if (OrderSymbol() != Symbol() || OrderMagicNumber()!=Magic ) continue; if (OrderType() > 1) OrderDelete(OrderTicket()); else { if (OrderType() == 0) OrderClose(OrderTicket(), OrderLots(), Bid, 3, CLR_NONE); else OrderClose(OrderTicket(), OrderLots(), Ask, 3, CLR_NONE); } } } double money() { double dp = 0; int i; for (i = 0; i < OrdersTotal(); i++) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES); if (OrderSymbol() != Symbol() || OrderMagicNumber()!=Magic) continue; dp += OrderProfit(); } return(dp); }

Untuk model compound  yang kedua adalah compounding dengan kelipatan balance (jadi tiap kelipatan balance maka lots bisa di atur pertambahannya) ... Tapi  kita bahas  di part berikutnya ya...

He he sabar aja dulu !

 bila belum jelas kasih cooment ya!

Semoga bermanfaat!

Bacaan lainnya:

Belajar Membuat EA sederhana part 15

Belajar Membuat EA sederhana part 16

Belajar Membuat EA sederhana part 17

Belajar Membuat EA sederhana part 18

Belajar Membuat EA sederhana part 19

Belajar Membuat EA sederhana part 20

Belajar Membuat EA sederhana part 21

Belajar Membuat EA sederhana part 22

Belajar Membuat EA sederhana part 23

Belajar Membuat EA sederhana part 24

Belajar Membuat EA sederhana part 25

Belajar Membuat EA sederhana part 26

Belajar Membuat EA sederhana Part 27

Belajar Membuat EA Sederhana 26 (Otomatik Close)

Pastikan sudah mengunjungi part 25

Setelah pada part sebelumnya sudah banyak share dan cara membuat Ea berjenis kelamin Martingel...
Kali ini saya lanjutkan dengan membuat Ea sederhana dan cukup profitabel dan model yang saya akan share ini salah satu model dari EA riel saya ......
Ea ini merupakan sedikit dari ngoprek EA pada part 12 disini

ini hasil pada account salah satu frend saya:

Ini Juga baru dimulai hehehe

Pada Ea tersebut akan saya tambahkan close otomatis ketika ada signal yang berlawanan.....

//+------------------------------------------------------------------+ //| EA Jum MantiQ+ | //| gifaesa@yahoo.com | //| http://JumForex.blogspot.com | //+------------------------------------------------------------------+ #property copyright "JumForex.blogspot.com" #property link "Gifaesa@yahoo.com" extern bool Trade_buy = true; extern bool Trade_sell = true; extern int Mulai_Jam = 6; extern int Akhir_Jam = 20; extern int TP = 0; extern int SL = 0; extern double Lots = 0.1; extern int TrailingStop = 40; extern int Magic = 69; extern bool Close_Oto = true; extern string Seting_MA = "Sesuka Hati"; extern int Pereode = 33; double slb,tpb,sls,tps,pt,x; string Nama_EA = "Jum+MantiQ"; //+------------------------------------------------------------------+ //| expert initialization function | //+------------------------------------------------------------------+ int init() { //---- if(Digits==3 || Digits==5) pt=10*Point; else pt=Point; //---- return(0); } //+------------------------------------------------------------------+ //| expert deinitialization function | //+------------------------------------------------------------------+ int deinit() { //---- //---- return(0); } //+------------------------------------------------------------------+ //| expert start function | //+------------------------------------------------------------------+ int start() { label(); dtrailing(); //---- double MA2 =iMA(Symbol(),0,Pereode,0,MODE_SMA,PRICE_CLOSE ,2); double MA1 =iMA(Symbol(),0,Pereode,0,MODE_SMA,PRICE_CLOSE ,1); int signal; if(Open[2]<MA2 && Close[2]>MA2 && Open[1]>MA1 && Close[1]>MA1 && Ask>MA1){ signal=1;if(Close_Oto)closeall(1); }// aturan buy if(Open[2]>MA2 && Close[2]<MA2 && Open[1]<MA1 && Close[1]<MA1 && Bid<MA1){ signal=2;if(Close_Oto)closeall(0); }//aturan sell if(Jam_trade()==1 && jumlahorder(1)+jumlahorder(0)==0){ 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( Trade_buy && signal==1) {OrderSend(Symbol(),OP_BUY,NR(Lots),Ask,3,slb, tpb,Nama_EA,Magic,0,Blue);} if( Trade_sell && signal==2) {OrderSend(Symbol(),OP_SELL,NR(Lots),Bid,3,sls, tps,Nama_EA,Magic,0,Red);} } //---- return(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++) { OrderSelect(i,SELECT_BY_POS,MODE_TRADES); 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++){ OrderSelect(i,SELECT_BY_POS,MODE_TRADES); if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=Magic ) continue; if(OrderType()==OP_BUY) { if(Bid-OrderOpenPrice()>pt*TrailingStop) { if((OrderStopLoss()<Bid-pt*TrailingStop) || (OrderStopLoss()==0)) { OrderModify(OrderTicket(),OrderOpenPrice(),Bid-pt*TrailingStop,OrderTakeProfit(),0,Green); return(0); } } } if(OrderType()==OP_SELL) { if((OrderOpenPrice()-Ask)>(pt*TrailingStop)){ if(OrderStopLoss()>(Ask+pt*TrailingStop) || (OrderStopLoss()==0)){ OrderModify(OrderTicket(),OrderOpenPrice(),Ask+pt*TrailingStop,OrderTakeProfit(),0,Red); return(0); } } } } } void label() { Comment("\n ", "\n ", "\n ------------------------------------------------", "\n :: =>+Jum+MantiQ<=", "\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 ------------------------------------------------"); } void closeall(int m) { for (int i = OrdersTotal() - 1; i >= 0; i--) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES); if (OrderSymbol() != Symbol() || OrderMagicNumber()!=Magic || OrderType()!=m) continue; if (OrderType() > 1) OrderDelete(OrderTicket()); if (OrderType() == 0) OrderClose(OrderTicket(), OrderLots(), Bid, 3, CLR_NONE); if (OrderType() == 1)OrderClose(OrderTicket(), OrderLots(), Ask, 3, CLR_NONE); } }
Pastikan mengikuti:

Belajar Membuat EA sederhana part 15

Belajar Membuat EA sederhana part 16

Belajar Membuat EA sederhana part 17

Belajar Membuat EA sederhana part 18

Belajar Membuat EA sederhana part 19

Belajar Membuat EA sederhana part 20

Belajar Membuat EA sederhana part 21

Belajar Membuat EA sederhana part 22

Belajar Membuat EA sederhana part 23

Belajar Membuat EA sederhana part 24

Belajar Membuat EA sederhana part 25

Belajar Membuat EA sederhana part 26

Belajar Membuat EA Sederhana 25 (Cut Switching)

Mungkin sudah pada ngintip di part 24 

Kali ini kita akan bahas tentang EA model cut switching , saya sih juga gak begitu memahami betul tentang strategy ini tapi yang jelas ini termasuk juga EA martingel tapi untuk kondisi trending.

Ea ini setelah order maka bila floting negatif maka akan di cut loss dan dilanjutkan dengan order baru dengan arah yang berlawanan dengan memeperhitungkan kelipatan lotsnya

Nah sebenarnya bisa dibuat dengan beberapa model , tapi kali ini kita akan buat model menggunakan tidak menggunakan pending stop.
bagian triger digunakan indikator fractals
Perhatikan cara codingnya:

for(int d=0; d< Bars ; d++){ double up=iFractals(Symbol(),0,MODE_UPPER,d);     if(up!=0 ) break;} 
for(int e=0; e< Bars ; e++){ double lo=iFractals(Symbol(),0,MODE_LOWER,e); if( lo!=0) break;} 
int signal; 
if(Bid > up) signal=1;// signal buy 
if(Ask < lo)signal=2;//signal sell 


Bagian lain yang perlu diperhatikan adalah membaca history orderprofit, ordertype dan magic number

double trad(int m)

{

  double pr,op; 

  for (int i = 0; i < OrdersHistoryTotal(); i++) {

   if (!OrderSelect(i, SELECT_BY_POS, MODE_HISTORY)) continue;

   if (OrderSymbol() != Symbol()/* || OrderComment() != Nama_EA*/) continue;

   if(m==1)pr=OrderProfit();

   if(m==2)pr=OrderType();

   if(m==3)pr=OrderMagicNumber();

   }

return(pr);

}

1. history orderprofit diperlukan untuk mengetahui orderprofit pada order close yang terakhir itu untung ata rugi
2. history ordertype diperlukan untuk mengetahui type order pada order close yang terakhir itu type buy atau sell
3. history magicnumber diperlukan untuk mengetahui membatasidan memperhitungkan level order 

Untuk memperhitungkan perkalian lotsnya digunakan fungsi sbb:

double xlot()

{

 double ylot,dlot; 

  for (int i = 0; i < OrdersHistoryTotal(); i++) {

   if (!OrderSelect(i, SELECT_BY_POS, MODE_HISTORY)) continue;

   if (OrderSymbol() != Symbol()/* || OrderComment() != Nama_EA */) continue;

     dlot=OrderLots();

     }

    ylot=NR(dlot*DiMarti);

return(ylot);

}

Untuk penentuan trigernya saya coba gunakan indikator Fractals



//+------------------------------------------------------------------+ //| Jum+switch+.mq4 | //| gifaesa@yahoo.com | //| http://JumForex.blogspot.com | //+------------------------------------------------------------------+ #property copyright "JumForex.blogspot.com" #property link "Gifaesa@yahoo.com" extern string Target_Equety_ = "Harus lebih besar dari Equety+"; extern double Target_Equety = 1000; extern int Mulai_Jam = 0; extern int Akhir_Jam = 20; extern int TP = 30; extern int SL = 20; extern double Lots = 0.01; extern int Max_order = 12; extern double DiMarti = 2; extern int Magic = 69; string Nama_EA = "Jum+SwitchFractals+"; double slb,tpb,sls,tps,pt,bal; //+------------------------------------------------------------------+ //| expert initialization function | //+------------------------------------------------------------------+ int init() { //---- bal= AccountBalance(); if(Digits==3 || Digits==5) pt=10*Point; else pt=Point; //---- return(0); } //+------------------------------------------------------------------+ //| expert deinitialization function | //+------------------------------------------------------------------+ int deinit() { //---- ObjectDelete("j"); //---- return(0); } //+------------------------------------------------------------------+ //| expert start function | //+------------------------------------------------------------------+ int start() { if(SL==0||TP==0){Alert(" Isi dulu TP Dan SLnya"); return(0);} label(); if(Target_Equety<AccountEquity()) { closeall(0); closeall(1); Alert("Cek Target_Equetynya salah "); return(0); } for(int d=0; d< Bars ; d++){ double up=iFractals(Symbol(),0,MODE_UPPER,d); if(up!=0 ) break;} for(int e=0; e< Bars ; e++){ double lo=iFractals(Symbol(),0,MODE_LOWER,e); if( lo!=0) break;} int signal; if(Bid > up) signal=1; if(Ask < lo)signal=2; if(Jam_trade()==1 && DayOfWeek()>1){ if((trad(1)>0) || (trad(1)==0)){ if(jumlahorder(0)==0 && jumlahorder(1)==0){ if(signal==1) {OrderSend(Symbol(),OP_BUY,NR(Lots),Ask,3,Ask-SL*pt, Ask+TP*pt,Nama_EA,Magic,0,Blue);} if(signal==2) {OrderSend(Symbol(),OP_SELL,NR(Lots),Bid,3,Bid+SL*pt, Bid-TP*pt,Nama_EA,Magic,0,Red);} } } } if(jumlahorder(0)==0 && jumlahorder(1)==0 && trad(3)<Max_order+Magic ){ if(trad(1)<0 && trad(2)==1) {OrderSend(Symbol(),OP_BUY,xlot(),Ask,3,Ask-SL*pt, Ask+TP*pt,Nama_EA,trad(3)+1,0,Blue); } if(trad(1)<0 && trad(2)==0) {OrderSend(Symbol(),OP_SELL,xlot(),Bid,3,Bid+SL*pt, Bid-TP*pt,Nama_EA,trad(3)+1,0,Red); } } return(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++) { OrderSelect(i,SELECT_BY_POS,MODE_TRADES); if(OrderSymbol()!=Symbol() || OrderComment() != Nama_EA || 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 closeall(int m) { for (int i = OrdersTotal() - 1; i >= 0; i--) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES); if (OrderSymbol() != Symbol() || OrderComment() != Nama_EA || OrderType()!=m) continue; if (OrderType() > 1) OrderDelete(OrderTicket()); else { if (OrderType() == 0) OrderClose(OrderTicket(), OrderLots(), Bid, 3, CLR_NONE); else OrderClose(OrderTicket(), OrderLots(), Ask, 3, CLR_NONE); } } } double money() { double dp = 0; int i; for (i = 0; i < OrdersTotal(); i++) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES); if (OrderSymbol() != Symbol() || OrderComment() != Nama_EA) continue; dp += OrderProfit(); } return(dp); } double trad(int m) { double pr,op; for (int i = 0; i < OrdersHistoryTotal(); i++) { if (!OrderSelect(i, SELECT_BY_POS, MODE_HISTORY)) continue; if (OrderSymbol() != Symbol()/* || OrderComment() != Nama_EA*/) continue; if(m==1)pr=OrderProfit(); if(m==2)pr=OrderType(); if(m==3)pr=OrderMagicNumber(); } return(pr); } double xlot() { double ylot,dlot; for (int i = 0; i < OrdersHistoryTotal(); i++) { if (!OrderSelect(i, SELECT_BY_POS, MODE_HISTORY)) continue; if (OrderSymbol() != Symbol()/* || OrderComment() != Nama_EA */) continue; dlot=OrderLots(); } ylot=NR(dlot*DiMarti); return(ylot); } void label() { ObjectCreate("j",OBJ_LABEL,0,0,0); ObjectSet("j",OBJPROP_CORNER,4); ObjectSet("j",OBJPROP_XDISTANCE,10); ObjectSet("j",OBJPROP_YDISTANCE,10); ObjectSetText("j","Jum+switchFractals from : JumForex.blogspot.com ",21,"Mistral",Aqua); Comment("\n ", "\n ", "\n ------------------------------------------------", "\n :: Spread : ", MarketInfo(Symbol(), MODE_SPREAD), "\n :: Leverage : 1 : ", AccountLeverage(), "\n :: Jam Server :", Hour(), ":", Minute(), "\n ------------------------------------------------", "\n :: Equity sekarang : ", AccountEquity()," $", "\n :: Target_Equety : ", Target_Equety ," $", "\n ------------------------------------------------", "\n :: Posisi floting :",money()," $", "\n :: Level :",trad(3)-Magic, "\n ------------------------------------------------", "\n :: >>By: Jum69<<", "\n ------------------------------------------------"); //+------------------------------------------------------------------+ }


Nah  begini  testnya:




Okey silahkan di test dan mudaha2an bisa digunakan untuk mendia belajar

Pastikan mengikuti:



Belajar Membuat EA sederhana part 1

Belajar Membuat EA sederhana part 2

Belajar Membuat EA sederhana part 3

Belajar Membuat EA sederhana part 4

Belajar Membuat EA sederhana part 5

Belajar Membuat EA sederhana part 6

Belajar Membuat EA sederhana part 7

Belajar Membuat EA sederhana part 8

Belajar Membuat EA sederhana part 9

Belajar Membuat EA sederhana part 10

Belajar Membuat EA sederhana part 11

Belajar Membuat EA sederhana part 12

Belajar Membuat EA sederhana part 13

Belajar Membuat EA sederhana part 14

Belajar Membuat EA sederhana part 15

Belajar Membuat EA sederhana part 16

Belajar Membuat EA sederhana part 17

Belajar Membuat EA sederhana part 18

Belajar Membuat EA sederhana part 19

Belajar Membuat EA sederhana part 20

Belajar Membuat EA sederhana part 21

Belajar Membuat EA sederhana part 22

Belajar Membuat EA sederhana part 23

Belajar Membuat EA sederhana part 24

Belajar Membuat EA sederhana part 25

Belajar Membuat EA sederhana part 26

Belajar Membuat EA Sederhana 24 (Martingel trending)

Okey bro semuanya pada kesempatan kali ini saya akan coba mengoprek   ea pada part 22 
Tipenya Ea  martingel tapi ini sedikit berbeda dengan tipe martingel  yang sudah ada yaitu martingel yang cocok untuk kondisi trending , biasanya martingel yang umumnya adalah takut terhadap kondisi trending .

Ini sebenarnya ada sedikit memenuhi permintaan dari rekan2 yang sudah 2 orang menhubungi ym dan email saya tentang ea ini.

Pada ea part 22 ini merupakan ea jebakan dimana order pertamanya mengunakan pending stop dan bila pending stop sudah tersentuh maka akan dilanjutkan dengan martingel bila ternyata mengalami floting pada jarak tertentu dan martingel nya adalah satu arah
Nah pada part 24 ini kita akan gunakan martingelnya adalah 2 arah (hedge ) dengan mengunakan pending stop.
Ordernya saya akan mengacu pada jam trending dan indikator yang sederhan yaitu candel
Karena ini ea untuk trending saya tambahkan filter untuk hari senin = notrade (DayOfWeek()!=1)

Rulenya sederhana aja
bila candel bullis maka buy dan bila floting minus pada jarak tertentu pasang sellstop
bila ternyata sellstop tersentuh maka akan pasang buystop .
Take profit mengacu pada tp in money alias pada $.

Simpel deh....!

Ini Hasilnya :

//+------------------------------------------------------------------+ //| EA Jum+SmaRt | //| gifaesa@yahoo.com | //| http://JumForex.blogspot.com | //+------------------------------------------------------------------+ #property copyright "JumForex.blogspot.com" #property link "Gifaesa@yahoo.com" extern string SmaRt_Marti = "Trending EA"; extern string Jam_server = "Set sesuai selera"; extern int Mulai_Jam = 6; extern int Akhir_Jam = 20; extern bool Tp_in_Money = true; extern double TP_in_money = 10; extern int Max_order = 10; extern int Jarak_stop = 15; extern double DiMarti = 1.5; extern int TP = 0; extern int SL = 0; extern double Lots = 0.1; extern int Magic = 69; double slb,tpb,sls,tps,pt,lslb,ltpb,slbx,tpbx,slsx,tpsx; string Nama_EA = "Jum+SmaRt"; //+------------------------------------------------------------------+ //| expert initialization function | //+------------------------------------------------------------------+ int init() { //---- if(Digits==3 || Digits==5) pt=10*Point; else pt=Point; //---- return(0); } //+------------------------------------------------------------------+ //| expert deinitialization function | //+------------------------------------------------------------------+ int deinit() { //---- //---- return(0); } //+------------------------------------------------------------------+ //| expert start function | //+------------------------------------------------------------------+ int start() { label(); if(Tp_in_Money ){ if(TP_in_money<= money(0)+money(1)){ closeall(0); closeall(1); closeall(4); closeall(5); } } if(jumlahorder(0)+ jumlahorder(1)==0){ if(jumlahorder(4)==1 ||jumlahorder(5)==1){ closeall(4); closeall(5); } } if(SL==0)slbx=0;else slbx=Ask-SL*pt; if(SL==0)slsx=0;else slsx=Bid+SL*pt; if(TP==0)tpbx=0;else tpbx=Ask+TP*pt; if(TP==0)tpsx=0;else tpsx=Bid-TP*pt; if(DayOfWeek()!=1 && Jam_trade()==1 && jumlahorder(0)==0 && jumlahorder(1)==0){ if(Open[1]<Close[1] ) {OrderSend(Symbol(),0,NR(Lots),Ask,3,slbx, tpbx,Nama_EA,Magic,0,Blue);} if(Open[1]>Close[1] ) {OrderSend(Symbol(),1,NR(Lots),Bid,3,slsx, tpsx,Nama_EA,Magic,0,Red);} } double as=oppric()+Jarak_stop*pt; double bi=oppric()-Jarak_stop*pt; if(SL==0)slb=0;else slb=as-SL*pt; if(SL==0)sls=0;else sls=bi+SL*pt; if(TP==0)tpb=0;else tpb=as+TP*pt; if(TP==0)tps=0;else tps=bi-TP*pt; if(jumlahorder(0)+jumlahorder(1)>0 && jumlahorder(0)+jumlahorder(1)<Max_order){ if(opakhir()==1 && jumlahorder(4)==0 ) {OrderSend(Symbol(),OP_BUYSTOP,xlot(),as,3,slb, tpb,Nama_EA,Magic,0,Blue);} if(opakhir()==0 && jumlahorder(5)==0 ) {OrderSend(Symbol(),OP_SELLSTOP,xlot(),bi,3,sls, tps,Nama_EA,Magic,0,Red);} } return(0); } //+------------------------------------------------------------------+ int jumlahorder( int tipe) { int total=0; for(int i=0; i<OrdersTotal(); i++) { OrderSelect(i,SELECT_BY_POS,MODE_TRADES); 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 closeall(int m) { for (int i = OrdersTotal() - 1; i >= 0; i--) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES); if (OrderSymbol() != Symbol() || OrderMagicNumber()!=Magic || OrderType()!=m) continue; if (OrderType() > 1) OrderDelete(OrderTicket()); if (OrderType() == 0) OrderClose(OrderTicket(), OrderLots(), Bid, 3, CLR_NONE); if (OrderType() == 1)OrderClose(OrderTicket(), OrderLots(), Ask, 3, CLR_NONE); } } double money(int m) { double dp = 0; for (int i = 0; i < OrdersTotal(); i++) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES); if (OrderSymbol() != Symbol() || OrderMagicNumber()!=Magic || m!=OrderType()) continue; dp += OrderProfit(); } return(dp); } void label() { Comment("\n ", "\n ", "\n ------------------------------------------------", "\n :: =>+Jum+SmaRt<=", "\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 :: Floting : ",money(0)+money(1), "\n :: Level : ",jumlahorder(0)+jumlahorder(1), "\n ------------------------------------------------", "\n :: >>By: Jum69<<", "\n ------------------------------------------------"); } double oppric() { int type; double op; for (int i = 0; i < OrdersTotal(); i++) { if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue; if (OrderSymbol() != Symbol() || OrderMagicNumber() != Magic) continue; type=OrderType(); if(type==0 || type==1)op = OrderOpenPrice(); } return(op); } int opakhir() { int type; int a; for (int i = 0; i < OrdersTotal(); i++) { if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue; if (OrderSymbol() != Symbol() || OrderMagicNumber() != Magic) continue; type=OrderType(); if(type==0 )a = 0; if(type==1 )a = 1; } return(a); } double xlot() { int m=jumlahorder(0)+jumlahorder(1); double ylot=NR(Lots*MathPow(DiMarti,m)); return(ylot); } 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); }

Disini tidak saya uraikan secara rinci
Bila ada yang belum jelas silahkan dikasih comment ya

Pastikan mengikuti:

Belajar Membuat EA sederhana part 1

Belajar Membuat EA sederhana part 2

Belajar Membuat EA sederhana part 3

Belajar Membuat EA sederhana part 4

Belajar Membuat EA sederhana part 5

Belajar Membuat EA sederhana part 6

Belajar Membuat EA sederhana part 7

Belajar Membuat EA sederhana part 8

Belajar Membuat EA sederhana part 9

Belajar Membuat EA sederhana part 10

Belajar Membuat EA sederhana part 11

Belajar Membuat EA sederhana part 12

Belajar Membuat EA sederhana part 13

Belajar Membuat EA sederhana part 14

Belajar Membuat EA sederhana part 15

Belajar Membuat EA sederhana part 16

Belajar Membuat EA sederhana part 17

Belajar Membuat EA sederhana part 18

Belajar Membuat EA sederhana part 19

Belajar Membuat EA sederhana part 20

Belajar Membuat EA sederhana part 21

Belajar Membuat EA sederhana part 22

Belajar Membuat EA sederhana part 23

Belajar Membuat EA sederhana part 24

Belajar Membuat EA sederhana part 25

Mengais Profit di Pasar Jepang

Kali ini saya coba share satu strategi manual saya yang juga masih kadang2 saya gunakan.

Strategy ini juga sebanrnya sudah pernah saya share ke beberapa teman trader .
Strategynya cukup sederhana yaitu hanya digunakan ketikau  ada berita atau News di Jepang atau Jpy.
Sehingga yang perlu diperhatikan adalah jadwal News Jpy . silahkan pantau setiap minggu di forexfactory 
Pastikan Jamnya sudah diseting sesuai dengan jam lokal kita supaya kita benar-benar tahu kapan news jepang dirilis.

Nah kalau sudah tahu jadwal nya news Jepang akan dirilis apa yang harus dilakukan?
Kita perhatikan USDJPY ketika  ada news beberapa hari yang lalu

Nah kira2 apa yang harus dilakukan ya?

Kita coba menggunaan Indikator London Breakout:

?????
Untuk menekuni ini silahkankan pelajari dan silahkan catat news Jepang serta buatlah catatan tentang kekuatan dan pergerakan saat news riles.
Tidak semua news Jepang akan bergerak melesat atau runtuh semua harus dipelajari .... , ada kategori Merah , orange dan putih ...

Yang belum jelas silahkan kasih comment ya!

Pastikan Anda belajar Membuat Robot:

Belajar Membuat EA sederhana part 1

Belajar Membuat EA Sederhana 23 Average (Share)

Kali ini saya akan lanjutkan belajar bikin EA part 23 dimana EA ini layak untuk di gunakan di Riel account
Hasil BTnya

pastikan telah mengikuti part sebelumnya disini

Pada part sebelumnya kita sudah membahas tentang EA  martingel nah kali ini kita akan menambahi koleksi kita dengan  type Average , meskipun ada fitur martigel . Karena EA ini sebenarnya hanya menmbahi logika pada ea yang sudah ada. Pada  part 15 juga sudah ada EA average .

Nah untuk kali ini kita akan mengembangkan sebuah EA dangan mengunakan indikator zigzag sebagai pemicu trigernya. dan  penambahan lain adalah untuk close order mengacu pada indikator MA (moving Average).

Bagian triger nya adalah:

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;}
 
    int sigz, sigc,signal;
     if(up>0 )  sigz= 1;
     if(lo>0)    sigz= 5; 

Bagian yang juga tida kalah penting adalah untuk closing order:


if(money()>0){
if(Bid>ma)   closeall(0);
if(Ask<ma)   closeall(1);
}

Pada EA ini juga terdapat target Equety, Pada bagian target equety harus diisi lebih besar dari balance saat digunakan


  if(Target_Equety<AccountEquity()) {
    closeall(0);
    closeall(1);
   Alert("Cek Target_Equetynya salah ");
   return(0);
   }

Jadi syarat untuk closing bila dalam kondisi profit dan mengacu pada harga bergerak terhadap nilai MA

EA ini layak untuk di forwartest, bahkan juga siap untuk di buat riel account

Silahkan di copas semuanya :


//+------------------------------------------------------------------+ //| Jum+AvZigzag+.mq4 | //| gifaesa@yahoo.com | //| http://JumForex.blogspot.com | //+------------------------------------------------------------------+ #property copyright "JumForex.blogspot.com" #property link "Gifaesa@yahoo.com" extern string Nama_EA = "Jum+AvZigzag+"; extern string Target_Equety_ = "Harus lebih besar dari Equety+"; extern double Target_Equety = 1000; extern bool Trade_buy = true; extern bool Trade_sell = true; extern int Mulai_Jam = 6; extern int Akhir_Jam = 20; 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; extern bool TrailingStop_ = false; extern int TrailingStop = 20; extern int Magic = 69; extern string Seting_ZigzAG = "Sesuka Hati"; extern int ExtDepth = 33; extern int ExtDeviation = 5; extern int ExtBackstep = 3; extern string Seting_Ma = "Sesuka Hati"; extern int Pereode = 33; double slb,tpb,sls,tps,pt,bal; int wt,wk,tiket,ticet; //+------------------------------------------------------------------+ //| expert initialization function | //+------------------------------------------------------------------+ int init() { //---- bal= AccountBalance(); if(Digits==3 || Digits==5) pt=10*Point; else pt=Point; //---- return(0); } //+------------------------------------------------------------------+ //| expert deinitialization function | //+------------------------------------------------------------------+ int deinit() { //---- ObjectDelete("j"); //---- return(0); } //+------------------------------------------------------------------+ //| expert start function | //+------------------------------------------------------------------+ int start() { ObjectCreate("j",OBJ_LABEL,0,0,0); ObjectSet("j",OBJPROP_CORNER,4); ObjectSet("j",OBJPROP_XDISTANCE,10); ObjectSet("j",OBJPROP_YDISTANCE,10); ObjectSetText("j","Jum+ZigZag+ from : JumForex.blogspot.com ,Donasi LR U7360459",19,"Mistral",Aqua); //---- if(Target_Equety<AccountEquity()) { closeall(0); closeall(1); Alert("Cek Target_Equetynya salah "); return(0); } label(); if(TrailingStop_)dtrailing(); if(Tp_in_Money && TP_in_money<= money()){ closeall(0); closeall(1); } //---- double ma = iMA(Symbol(), 0, Pereode , 0, MODE_LWMA, PRICE_CLOSE, 0 ) ; 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;} int sigz, sigc,signal; if(up>0 ) sigz= 1; if(lo>0) sigz= 5; double OP=iOpen(Symbol(),PERIOD_W1,0); if(Ask>OP) sigc=1; if(Bid<OP) sigc=5; if(sigz+sigc==2) signal=1; if(sigz+sigc==10)signal=2; if(Jam_trade()==1){ 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 && signal==2) {OrderSend(Symbol(),OP_BUY,NR(Lots),Ask,3,slb, tpb,Nama_EA,Magic,0,Blue);} if(jumlahorder(0)==0 && jumlahorder(1)==0 && Trade_sell && signal==1) {OrderSend(Symbol(),OP_SELL,NR(Lots),Bid,3,sls, tps,Nama_EA,Magic,0,Red);} } if(trad()==1 && wt!=Time[0] && jumlahorder(1)==0 && jumlahorder(0)< Max_order && Trade_buy && signal==2) {OrderSend(Symbol(),OP_BUY,xlot(0),Ask,3,slb, tpb,Nama_EA,Magic,0,Blue); wt=Time[0]; } if(trad()==2 && wk!=Time[0] && jumlahorder(0)==0 && jumlahorder(1)<Max_order && Trade_sell && signal==1) {OrderSend(Symbol(),OP_SELL,xlot(1),Bid,3,sls, tps,Nama_EA,Magic,0,Red); wk=Time[0]; } if(money()>0){ if(Bid>ma) closeall(0); if(Ask<ma) closeall(1); } return(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++) { OrderSelect(i,SELECT_BY_POS,MODE_TRADES); 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++){ OrderSelect(i,SELECT_BY_POS,MODE_TRADES); if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=Magic ) continue; if(OrderType()==OP_BUY) { if(Bid-OrderOpenPrice()>pt*TrailingStop) { if((OrderStopLoss()<Bid-pt*TrailingStop) || (OrderStopLoss()==0)) { OrderModify(OrderTicket(),OrderOpenPrice(),Bid-pt*TrailingStop,OrderTakeProfit(),0,Green); return(0); } } } if(OrderType()==OP_SELL) { if((OrderOpenPrice()-Ask)>(pt*TrailingStop)){ if(OrderStopLoss()>(Ask+pt*TrailingStop) || (OrderStopLoss()==0)){ OrderModify(OrderTicket(),OrderOpenPrice(),Ask+pt*TrailingStop,OrderTakeProfit(),0,Red); return(0); } } } } } void closeall(int m) { for (int i = OrdersTotal() - 1; i >= 0; i--) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES); if (OrderSymbol() != Symbol() || OrderMagicNumber()!=Magic || m!= OrderType()) continue; if (OrderType() > 1) OrderDelete(OrderTicket()); else { if (OrderType() == 0) OrderClose(OrderTicket(), OrderLots(), Bid, 3, CLR_NONE); else OrderClose(OrderTicket(), OrderLots(), Ask, 3, CLR_NONE); } } } double money() { double dp = 0; int i; for (i = 0; i < OrdersTotal(); i++) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES); if (OrderSymbol() != Symbol() || OrderMagicNumber()!=Magic) continue; dp += OrderProfit(); } return(dp); } int trad() { int type,dp; double opb,ops,lastlotb,lastlots; for (int i = 0; i < OrdersTotal(); i++) { if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue; if (OrderSymbol() != Symbol() || OrderMagicNumber() != Magic) continue; type=OrderType(); if(type==0)opb = OrderOpenPrice(); if(type==1)ops = OrderOpenPrice(); } double as = opb - Jarak_order * pt; double bi = ops + Jarak_order * pt; if ( Ask <= as && jumlahorder(0)> 0 ) dp=1; if ( Bid >= bi && jumlahorder(1)> 0 ) dp=2; return(dp); } double xlot(int m) { double ylot,dlot; 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+AvZigzag+<=", "\n :: =>JumForex.blogspot.com<=", "\n ------------------------------------------------", "\n :: Spread : ", MarketInfo(Symbol(), MODE_SPREAD), "\n :: Leverage : 1 : ", AccountLeverage(), "\n :: Jam Server :", Hour(), ":", Minute(), "\n ------------------------------------------------", "\n :: Equity sekarang : ", AccountEquity()," $", "\n :: Target_Equety : ", Target_Equety ," $", "\n ------------------------------------------------", "\n :: Posisi floting :",money()," $", "\n :: Jumlah level :",jumlahorder(0)+jumlahorder(1), "\n ------------------------------------------------", "\n :: >>By: Jum69<<", "\n ------------------------------------------------"); //+------------------------------------------------------------------+ }

Pasrtikan Juga membaca:

Belajar Membuat EA sederhana part 1

Belajar Membuat EA sederhana part 2

Belajar Membuat EA sederhana part 3

Belajar Membuat EA sederhana part 4

Belajar Membuat EA sederhana part 5

Belajar Membuat EA sederhana part 6

Belajar Membuat EA sederhana part 7

Belajar Membuat EA sederhana part 8

Belajar Membuat EA sederhana part 9

Belajar Membuat EA sederhana part 10

Belajar Membuat EA sederhana part 11

Belajar Membuat EA sederhana part 12

Belajar Membuat EA sederhana part 13

Belajar Membuat EA sederhana part 14

Belajar Membuat EA sederhana part 15

Belajar Membuat EA sederhana part 16

Belajar Membuat EA sederhana part 17

Belajar Membuat EA sederhana part 18

Belajar Membuat EA sederhana part 19

Belajar Membuat EA sederhana part 20

Belajar Membuat EA sederhana part 21

Belajar Membuat EA sederhana part 22

Belajar Membuat EA sederhana part 23

Belajar Membuat EA sederhana part 24

Belajar Membuat EA sederhana part 25

Belajar Membuat EA Sederhana 22 Martingel (Jebakan II)

Pastikan sudah mengikuti part 21 disini

Pada posting kali ini saya akan mengedit EA pada part 21 untuk ditambahi martingel .
Martingel yang di maksud juga mengacu pada jarak (range) order dan pergantian candel untuk mencegah terjadinya beberapa order ketika terjadi lonjakan harga dan candel panjang , seperti pada part 18

Penambahan coding martingelnya :

1. Fungsi untuk perintah order martingelnya

if(trad()==1 && wt!=Time[0] && jumlahorder(1)==0 && jumlahorder(0)<Max_order ) {OrderSend(Symbol(),OP_BUY,xlot(0),Ask,3,slb, tpb,Nama_EA,Magic,0,Blue); wt=Time[0]; }
if(trad()==2 && wk!=Time[0] && jumlahorder(0)==0 && jumlahorder(1)<Max_order ) {OrderSend(Symbol(),OP_SELL,xlot(1),Bid,3,sls, tps,Nama_EA,Magic,0,Red); wk=Time[0];  }





2. Fungsi untuk perhitungan jarak order dan  perintah ketika jarak terpenuhi

int trad()
{
 int type,dp; double opb,ops,lastlotb,lastlots; 
  for (int i = 0; i < OrdersTotal(); i++) {
   if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue;
   if (OrderSymbol() != Symbol() || OrderMagicNumber() != Magic) continue;
     type=OrderType();
   if(type==0)opb = OrderOpenPrice();
   if(type==1)ops = OrderOpenPrice();
  }
   double as = opb - Jarak_order * pt;
   double bi = ops + Jarak_order * pt;
   if ( Ask <= as &&  jumlahorder(0)> 0 ) dp=1; 
 if ( Bid >= bi &&  jumlahorder(1)> 0 ) dp=2; 

return(dp);
}

3. Fungsi untuk perhitungan Lots setiap pengulangan ordernya
double xlot(int m)
{
 double ylot,dlot; 
  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);
}






Nah setelah di rakit begini deh hasilnya:

//+------------------------------------------------------------------+ //| EA Jum+Profit | //| gifaesa@yahoo.com | //| http://JumForex.blogspot.com | //+------------------------------------------------------------------+ #property copyright "JumForex.blogspot.com" #property link "Gifaesa@yahoo.com" extern string Nama_EA = "Jum+Profit"; extern bool Trade_buystop = true; extern bool Trade_sellstop = true; extern string Jam_server = "Set sesuai selera"; extern int Jam = 0; extern int Menit = 30; extern bool Tp_in_Money = false; extern double TP_in_money = 5; extern int Jarak_order = 35; extern int Max_order = 10; extern double DiMarti = 1.3; extern int TP = 100; extern int SL = 20; extern double Lots = 0.1; extern int Jarak_stop = 25; extern bool TrailingStop_ = true; extern int TrailingStop = 12; extern int Magic = 69; double slb,tpb,sls,tps,pt,lslb,ltpb; int wt,wk,tiket,ticet; //+------------------------------------------------------------------+ //| expert initialization function | //+------------------------------------------------------------------+ int init() { //---- if(Digits==3 || Digits==5) pt=10*Point; else pt=Point; //---- return(0); } //+------------------------------------------------------------------+ //| expert deinitialization function | //+------------------------------------------------------------------+ int deinit() { //---- //---- return(0); } //+------------------------------------------------------------------+ //| expert start function | //+------------------------------------------------------------------+ int start() { label(); if(TrailingStop_)dtrailing(); if(Tp_in_Money ){ if(TP_in_money<= money(0)){ closeall(0); closeall(2); } if(TP_in_money<= money(1)){ closeall(1); closeall(3); } } if(jumlahorder(0)==1 && jumlahorder(1)==0){ closeall(5); } if(jumlahorder(0)==0 && jumlahorder(1)==1){ closeall(4); } if(Hour()==23){ closeall(4); closeall(5); } //---- double as = Ask + Jarak_stop*pt; double bi = Bid - Jarak_stop*pt; if(SL==0)slb=0;else slb=as-SL*pt; if(SL==0)sls=0;else sls=bi+SL*pt; if(TP==0)tpb=0;else tpb=as+TP*pt; if(TP==0)tps=0;else tps=bi-TP*pt; if(DayOfWeek()!=1 && Hour()==Jam && Minute()==Menit && jumlahorder(0)==0 && jumlahorder(1)==0){ if(jumlahorder(4)==0 && Trade_buystop ) {OrderSend(Symbol(),OP_BUYSTOP,NR(Lots),as,3,slb, tpb,Nama_EA,Magic,0,Blue);} if(jumlahorder(5)==0 && Trade_sellstop ) {OrderSend(Symbol(),OP_SELLSTOP,NR(Lots),bi,3,sls, tps,Nama_EA,Magic,0,Red);} } if(trad()==1 && wt!=Time[0] && jumlahorder(1)==0 && jumlahorder(0)< Max_order ) {OrderSend(Symbol(),OP_BUY,xlot(0),Ask,3,slb, tpb,Nama_EA,Magic,0,Blue); wt=Time[0]; } if(trad()==2 && wk!=Time[0] && jumlahorder(0)==0 && jumlahorder(1)< Max_order ) {OrderSend(Symbol(),OP_SELL,xlot(1),Bid,3,sls, tps,Nama_EA,Magic,0,Red); wk=Time[0]; } return(0); } //+------------------------------------------------------------------+ int jumlahorder( int tipe) { int total=0; for(int i=0; i<OrdersTotal(); i++) { OrderSelect(i,SELECT_BY_POS,MODE_TRADES); 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++){ OrderSelect(i,SELECT_BY_POS,MODE_TRADES); if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=Magic ) continue; if(OrderType()==OP_BUY) { if(Bid-OrderOpenPrice()>pt*TrailingStop) { if((OrderStopLoss()<Bid-pt*TrailingStop) || (OrderStopLoss()==0)) { OrderModify(OrderTicket(),OrderOpenPrice(),Bid-pt*TrailingStop,OrderTakeProfit(),0,Green); return(0); } } } if(OrderType()==OP_SELL) { if((OrderOpenPrice()-Ask)>(pt*TrailingStop)){ if(OrderStopLoss()>(Ask+pt*TrailingStop) || (OrderStopLoss()==0)){ OrderModify(OrderTicket(),OrderOpenPrice(),Ask+pt*TrailingStop,OrderTakeProfit(),0,Red); return(0); } } } } } void closeall(int m) { for (int i = OrdersTotal() - 1; i >= 0; i--) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES); if (OrderSymbol() != Symbol() || OrderMagicNumber()!=Magic /*|| m!= OrderType()*/) continue; if (OrderType() == m) OrderDelete(OrderTicket()); if (OrderType() == m) OrderDelete(OrderTicket()); if (OrderType() == m) OrderClose(OrderTicket(), OrderLots(), Bid, 3, CLR_NONE); if (OrderType() == m)OrderClose(OrderTicket(), OrderLots(), Ask, 3, CLR_NONE); } } double money(int m) { double dp = 0; for (int i = 0; i < OrdersTotal(); i++) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES); if (OrderSymbol() != Symbol() || OrderMagicNumber()!=Magic || m!=OrderType()) continue; dp += OrderProfit(); } return(dp); } void label() { Comment("\n ", "\n ", "\n ------------------------------------------------", "\n :: =>+Jum+Profit<=", "\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 :: Floting buy : ",money(0), "\n :: Floting sell : ",money(1), "\n ------------------------------------------------", "\n :: >>By: Jum69<<", "\n ------------------------------------------------"); } int trad() { int type,dp; double opb,ops,lastlotb,lastlots; for (int i = 0; i < OrdersTotal(); i++) { if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue; if (OrderSymbol() != Symbol() || OrderMagicNumber() != Magic) continue; type=OrderType(); if(type==0)opb = OrderOpenPrice(); if(type==1)ops = OrderOpenPrice(); } double as = opb - Jarak_order * pt; double bi = ops + Jarak_order * pt; if ( Ask <= as && jumlahorder(0)> 0 ) dp=1; if ( Bid >= bi && jumlahorder(1)> 0 ) dp=2; return(dp); } double xlot(int m) { double ylot,dlot; 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); }

Ini hasil BTnya:

Okey seilahkan de coba ya...

Bila mana ada yang kurang jelas dan ada ide positif silahkan comment ya!


Pastikan Membaca:

Belajar Membuat EA sederhana part 1

Belajar Membuat EA sederhana part 2

Belajar Membuat EA sederhana part 3

Belajar Membuat EA sederhana part 4

Belajar Membuat EA sederhana part 5

Belajar Membuat EA sederhana part 6

Belajar Membuat EA sederhana part 7

Belajar Membuat EA sederhana part 8

Belajar Membuat EA sederhana part 9

Belajar Membuat EA sederhana part 10

Belajar Membuat EA sederhana part 11

Belajar Membuat EA sederhana part 12

Belajar Membuat EA sederhana part 13

Belajar Membuat EA sederhana part 14

Belajar Membuat EA sederhana part 15

Belajar Membuat EA sederhana part 16

Belajar Membuat EA sederhana part 17

Belajar Membuat EA sederhana part 18

Belajar Membuat EA sederhana part 19

Belajar Membuat EA sederhana part 20

Belajar Membuat EA sederhana part 21

Belajar Membuat EA sederhana part 22

Belajar Membuat EA sederhana part 23

Belajar Membuat EA sederhana part 24