Belajar Membuat EA Sederhana 30

Assalamualaikum .............semuanya Salam profit dan sukses selalu! Sampai hari ternyata masih banyak email dan juga Ym ==>minta dibuatkan Ea ... Padahal dengan saya  share dari part 1 sampai ini part 30 ini dengan harapan temen2 mau belajar membuat EA , meski hanya sederhana.
Part 1 sampai dengan 30 tanpa terasa ternyata sudah banyak hee.

Disini kebetulan gak share tentang dasar2 mql tapi ini sebenarnya bisa dipelajari di metaeditor.
Coba aja buka metaeditor dan perhatikan di sebelah kanan tab atau klik di bagian dictionary buka satu persatu bagian dari semua hal yang terkait dengan pemrogram mql4 ada semuanya...atau kesini http://book.mql4.com  .....hem  lengkap kan?
Tinggal kemauan kita untuk mempelajarinya ...saya belajar juga mulai dai 0 (nol) kecil loh

Loh dulu saya juga belajar dari 0 dengan banyak i membaca dan praktek ditambah rajin bertanya kepada para master eeeeeeeeee , banyak di forum2 master yang selalu siap membantu kita ...gratis pula...,,Enak kan?
Dulu saya belajar tentang EA dimulai ketika sakit gara2 banyak nongkrong di depan komputer dan mata melotot ngelihat chart heee ditambah banyak berdebar debar gara2 loncatan news rilis dengan  floting menganga heeee

Ternyata dengan diberi sakit ada banyak hikmah ................ saya  jadi bisa membuat  EA , meski hanya EA yang sederhana.
Alhamdulillah  udah 1,5 tahun terakhir  semua Ea yang saya gunakan di account riel adalah buatan sendiri.
Nah mudaha2 ini memberi motivasi rekan2 trader untuk bisa membuat EAnya sendiri .

Alhamdulillah lagi deh......... sekarang saya santai gak banyak didepan kompi loh.......... buat apa capek2 di depan kompi kalo bisa ditinggal jalan2  dan eee profitnya juga sama ...ya kan?
Kalo udah rejeki yah gak akan kemana   ..........untuk apa capek heee didepan kompi eeee bisa vertigo itu sih pengalaman saya

Nah EA sebenarnya hanyalah pembantu yang mewakili trading kita ..
dengan pemahaman yang baik Ea juga sangat membantu transaksi kita.

Apa sih susah nya bikin EA?
Bikin Ea itu gampang koq (hee mentang2 udah bisa)
tapi ada yang bilang sulit yahhh bagi yang belum mempelajarinya haaahaa
Sampai hari ini saya juga masih belajar !

Yang penting ada kemauan pasti ada jalan ....
Jangan sungkan2 bertanya kepada siapapun ...loh itu kuncinya

Kalo belum bisa mulailah dari awal atau mulai klik sini http://jumforex.blogspot.com/2012/08/yuk-belajar-bikin-ea-sederhana-1.html

Oh ya hampir lupa nih EA di part 30  ini sebagai wawasan saja ... dan pada bagian ini saya sengaja tidak kasi penjelasan tapi harapan saya ada yang mau kasih comment dengan penjelasan2 hee


Semoga berhasil semuanya deh!

EAnya

//+------------------------------------------------------------------+ //| EA Jum+wPR | //| gifaesa@yahoo.com | //| http://JumForex.blogspot.com | //+------------------------------------------------------------------+ #property copyright "JumForex.blogspot.com" #property link "Gifaesa@yahoo.com" extern string wPR="Pro EA"; extern bool mm =true; extern double manage_balance =5; extern bool limit=true; extern int jarak =10; extern int tp =100; extern int sl =60; extern double lots =0.1; extern bool trailing=true; extern int trailingStop = 10; extern int magic = 69; double z,pt;int mg; string Nama_EA= "Jum+w",Nama = "Jum+ww"; double w(int p,int m){return(iWPR(NULL,0,p,m)); } double j(int m,int t,int p){ double a; for(int i=0; i<OrdersTotal(); i++){ OrderSelect(i,SELECT_BY_POS,MODE_TRADES); if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=m||OrderType()!=t) continue; if(p==1) a++; if(p==2) a=OrderOpenPrice();} return(a);} double k(double x){double maxlots = MarketInfo(Symbol(), MODE_MAXLOT),minilot = MarketInfo(Symbol(), MODE_MINLOT),lstep = MarketInfo(Symbol(), MODE_LOTSTEP); double lots = lstep * NormalizeDouble(x / lstep, 0);lots = MathMax(MathMin(maxlots, lots), minilot); return (lots);} int init(){if(Digits==3 || Digits==5) pt=10*Point; else pt=Point; mg=magic+5; return(0);} int start() { if((j(magic,0,1)==0 && j(mg,1,1)==1))tr(1,mg); if((j(magic,1,1)==0 && j(mg,0,1)==1))tr(0,mg); if(trailing){ if(j(magic,0,1)==1 && j(mg,1,1)==0 && (j(magic,0,2)+jarak*pt)<=Bid)tr(0,magic); if(j(magic,1,1)==1 && j(mg,0,1)==0 && (j(magic,1,2)-jarak*pt)>=Ask)tr(1,magic); } if(mm) z=lots* MathFloor(AccountBalance() / manage_balance); else z=lots; if( Hour()<12){ if(j(magic,0,1)==0 && w(12,0)<(-1)*90 ){OrderSend(Symbol(),OP_BUY,k(z),Ask,3,(Ask-sl*pt)*(sl>0), (Ask+tp*pt)*(tp>0),Nama_EA,magic,0,Blue); } if(j(magic,1,1)==0 && w(12,0)>(-1)*10 ){OrderSend(Symbol(),OP_SELL,k(z),Bid,3,(Bid+sl*pt)*(sl>0), (Bid-tp*pt)*(tp>0),Nama_EA,magic,0,Red);} double g=MarketInfo(Symbol(),MODE_SPREAD); double s=j(magic,1,2)-(jarak)*pt; double b=j(magic,0,2)+(jarak)*pt; if(limit){ if(j(magic,1,1)==1 && j(mg,2,1)==0 && j(mg,0,1)==0){OrderSend(Symbol(),2,k(z),s,3,(s-sl*pt)*(sl>0), (s+tp*pt)*(tp>0),Nama,magic+5,0,Blue); } if(j(magic,0,1)==1 && j(mg,3,1)==0 && j(mg,1,1)==0 ){OrderSend(Symbol(),3,k(z),b,3,(b+sl*pt)*(sl>0), (b-tp*pt)*(tp>0),Nama,magic+5,0,Red);} }} if(j(magic,1,1)==0 && j(mg,2,1)==1){c(2);} if(j(magic,0,1)==0 && j(mg,3,1)==1){c(3);} label(); return(0); } void c(int m) { for (int i = OrdersTotal() - 1; i >= 0; i--) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES); if (OrderSymbol() != Symbol() || OrderMagicNumber()!=magic+5 || 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); } } void tr(int t,int m) { for(int i=0; i<OrdersTotal(); i++){ OrderSelect(i,SELECT_BY_POS,MODE_TRADES); if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=m || OrderType()!=t ) continue; if(OrderType()==OP_BUY) { if((OrderStopLoss()<Bid-pt*trailingStop) || (OrderStopLoss()==0)) { OrderModify(OrderTicket(),OrderOpenPrice(),Bid-pt*trailingStop,OrderTakeProfit(),0,Green); return(0); } } if(OrderType()==OP_SELL) { 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+wPR<=", "\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 ------------------------------------------------"); }


Pastikan Juga 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 Part 27

Belajar Membuat EA sederhana part 28

Belajar Membuat EA sederhana Part 29

Belajar Membuat EA sederhana Part 30

Belajar Membuat EA Sederhana 29 (daily marti lepas)

Salam Profit semuanya .....pastikan sudah membaca pada part sebelumnya disini

Karena kali ini saya akan mengoprek EA pada  part 28  ini untuk di sesuaikan dengan rule yang ada pada permintaan di forum indomt5  ini 

Lansung aja deh silahkan di copas


//+------------------------------------------------------------------+ //| Jum+SpiderBoo | //| 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 = 45; extern int SL = 30; extern double Lots = 0.01; extern int Max_level = 12; extern double DiMarti = 2; extern int Magic = 69; string Nama_EA = "Jum+SpiderBoo+"; double slb,tpb,sls,tps,pt,bal;int s; //+------------------------------------------------------------------+ //| 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); } double O=iOpen(Symbol(),PERIOD_D1,1); double C=iClose(Symbol(),PERIOD_D1,1); if(O<C)s=1; if(O>C)s=2; if(Jam_trade()==1 && jumlahorder(0) + jumlahorder(1)==0 && DayOfWeek()>1 && trad(4)==0){ if((trad(1)>0) || (trad(1)==0)){ if(s==1) {OrderSend(Symbol(),OP_BUY,NR(Lots),Ask,3,Ask-SL*pt, Ask+TP*pt,Nama_EA,Magic,0,Blue);} if(s==2) {OrderSend(Symbol(),OP_SELL,NR(Lots),Bid,3,Bid+SL*pt, Bid-TP*pt,Nama_EA,Magic,0,Red);} } if( trad(3)< Max_level +Magic ){ if(trad(1)<0 && s==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 && s==2) {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(); datetime c=OrderCloseTime(); datetime o=OrderOpenTime(); if (iBarShift(Symbol(),PERIOD_D1,o)==0) { if (iBarShift(Symbol(),PERIOD_D1,c)==0){ if(m==4)pr++; } } } 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+SpiderBoo 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 ------------------------------------------------"); //+------------------------------------------------------------------+ }


setelah di becktes EA ini udah jalan

karena ada penyesuaian rule di forum maka sedikit disesuaikan
cuma filter doji nya belum ada ><

//+------------------------------------------------------------------+ //| Jum+SpiderBoo | //| 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 = 80; extern int SL = 1000; extern double Lots = 0.01; extern int Max_level = 12; extern double DiMarti = 2; extern int Magic = 69; string Nama_EA = "Jum+SpiderBoo+"; double slb,tpb,sls,tps,pt,bal;int s; //+------------------------------------------------------------------+ //| 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); } if( jumlahorder(1,0) + jumlahorder(1,1)>0 && jumlahorder(2,0)+jumlahorder(2,1)<0 && jumlahorder(3,0)+jumlahorder(3,1)+ (24*3600)<=TimeCurrent() ){closeall(0);closeall(1);} double O=iOpen(Symbol(),PERIOD_D1,1); double C=iClose(Symbol(),PERIOD_D1,1); if(O<C)s=1; if(O>C)s=2; if(Jam_trade()==1 && jumlahorder(1,0) + jumlahorder(1,1)==0 && DayOfWeek()>1 && trad(4)==0 && trad(5)==0){ if((trad(1)>0) || (trad(1)==0)){ if(s==1) {OrderSend(Symbol(),OP_BUY,NR(Lots),Ask,3,Ask-SL*pt, Ask+TP*pt,Nama_EA,Magic,0,Blue);} if(s==2) {OrderSend(Symbol(),OP_SELL,NR(Lots),Bid,3,Bid+SL*pt, Bid-TP*pt,Nama_EA,Magic,0,Red);} } if( trad(3)< Max_level +Magic ){ if(trad(1)<0 && s==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 && s==2) {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); } double jumlahorder( int a,int tipe) { double 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; if(a==1) total++; if(a==2) total+=OrderProfit(); if(a==3) total=OrderOpenTime(); } 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(); datetime c=OrderCloseTime(); datetime o=OrderOpenTime(); if (iBarShift(Symbol(),PERIOD_D1,o)==0) { if (iBarShift(Symbol(),PERIOD_D1,c)==0){ if(m==4)pr++; if(m==5)pr=OrderClosePrice(); } } } 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+SpiderBoo 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 ------------------------------------------------"); //+------------------------------------------------------------------+ }

Hasil BTnya

Okey semuanya........................Salam profit

Jangan Lupa kasih comment ya

Pastikan Juga 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 Part 27

Belajar Membuat EA sederhana part 28

Belajar Membuat EA sederhana Part 29

Belajar Membuat EA sederhana Part 30

Belajar Membuat EA Sederhana 28 ( order Harian)

Kita lanjut lagi deh  ....
Dan pastikan sudah mengikuti part 27 disini

Pada kesempatan ini saya akan sedikit mengoprek EA Cutswicting pada part 25 untuk ditambahkan boolean  supaya dalam sehari trading kalo sudah takeprofit berhenti trading.
Jadi ditambahkan :
extern bool    Trading_Continue = false; // artinya kalau false kalo sudah nyentuh takeprofit dalam hari itu akan berhenti trade, sebaliknya bila true akan terus trading .

Bagian yang penting didalam hal ini perlu ditambahkan adalah membaca history  jumlah trade dalam sehari.
adalah bagian ini :
sebelumnya
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);
}
ditambahkan menghitung jumlah order dalam sehari  jadinya sbb:

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();
   datetime tclose=OrderCloseTime();
   datetime topen=OrderOpenTime();
   if (iBarShift(Symbol(),PERIOD_D1,topen)==0) {
   if (iBarShift(Symbol(),PERIOD_D1,tclose)==0){
   if(m==4)pr++;
   }
   }
 }
return(pr);
}

Jadi untuk memanggil / menghitung jumlah order dalam sehari adalah trade(4) 
Nah dari script diatas dibuatlah logika sbb
  bool  trs=false;

  if(!Trading_Continue){if(trad(4)>0)trs=true;else trs=false; }else trs=false;

Nah di coding di atas bila dirangkai maka jadinya sebagai berikut:

//+------------------------------------------------------------------+ //| Jum+switch+2.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 = 100000; extern int Mulai_Jam = 0; extern int Akhir_Jam = 20; extern bool Trading_Continue = false; 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+"; bool trs=false; 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); } if(!Trading_Continue){if(trad(4)>0)trs=true;else trs=false; }else trs=false; 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 && !trs){ 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(); datetime tclose=OrderCloseTime(); datetime topen=OrderOpenTime(); if (iBarShift(Symbol(),PERIOD_D1,topen)==0) { if (iBarShift(Symbol(),PERIOD_D1,tclose)==0){ if(m==4)pr++; } } } 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_2 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 jadi deh
Siap tempur !

Jangan Lupa kasih comment ya !

Bacaan yang lain:

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 Paret 28