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