Share JumStoch v2.6

Setelah sekian lama gak posting karena banyaknya kesibukan baru kali ini sempat post

Pada posting kali ini sayare a akan coba share satu EA sy, sebagai kelanjutan dari EA yang pernah saya share pada forum Indomt5 di sini  dan kelanjutan dari posting di sini. Sebenarnya versi ini telah dikembangkan sampai versi 9 (masih untuk pribadi).

Pada  versi ini sebenar sedikit berbeda dengan versi sebelumnya karena pada versi ini sebenarnya disamping untuk mengejar profit tapi juga mengejar rabat.
Masih tetep trigernya cuma sedikit ditambah pengembangan sehingga lebih agresif dengan model
average dan lotsnya tetep , tetapi mengacu pada kelipatan balance

Penasaran ini Parameternya

Ada parameter Slow_aja  ini bisa dipilih true atau false
untuk mengetahui kegunaannya silahkan di coba dibuat demo atu di Becktest.

Penampakannya sbb:

Bagi yang mau nyoba silahkan sedot disini

Share terbatas silahkan kontak Ym : gifaesa | email: gifaesa@yahoo.com , untuk mendapat nomor keberuntungan dan sertakan no account yg mau digunakan Hee heee

gitu deh  ...
Jangan lupa comment ya di bawah ..!

Salam Profit semuanya

Coding Jadul

Lama sekali tidak Posting !!
Karena Banyaknya kesibukan dan kegiatan2 yang menyita waktu dan pikiran sehingga jarang posting

Beberapa waktu yang lalu,  banyak temen lama sempat ngontek gimana mengatasi coding yang udah jadul, ketika di compile selalu ada muncul warning.
Emang ini menyebalkan.... meski sebenarnya warning ini tetep jalan dan dapat digunakan
Perkembang mt4 dan program mql4 juga perlu ada penyesuaian2.

Contoh Kasus fungsi berikut ini:

 fungsinya:

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

Cara menghilangkan dengan memperhatikan bagian OrderSelect int j( int tipe){ int total=0;for(int i=0; i<OrdersTotal(); i++) { if(!OrderSelect(i,SELECT_BY_POS,MODE_TRADES))continue; if(OrderSymbol()!=Symbol() || OrderType()!=tipe) continue;total++; } return(total);}

Contoh lain pada bagian perintah order

if(j(1)==1 ) {OrderSend(Symbol(),4,NR(Lots),as,3,0,0,"",0,0,Blue);} if(j(0)==1 ) {OrderSend(Symbol(),5,NR(Lots),bi,3,0,0,"",0,0,Red);}

Perbaikannya dengan menambahkan nilai integer (contoh int res), pada coding dibawah ini if(j(1)==1 ) {res=OrderSend(Symbol(),4,NR(Lots),as,3,0,0,"",0,0,Blue);} if(j(0)==1 ) {res=OrderSend(Symbol(),5,NR(Lots),bi,3,0,0,"",0,0,Red);}

Kasus lain sebenarnya seperti OrderClose dan OrderDelet sama bisa ditambah kan  integer !
dll.....


Semoga bermanfaat

Belajar Membuat EA sederhana 40

Semoga tahun 2017 penuh dengan berkah dan kesuksesan....

Lama beberapa waktu ini tidak sempat share dan menjawab pertanyaan dan komentar-komentar dari temen-temen setia pengunjung Jumforex, untuk itu mohon maaf yang sebesar-besarnya belum bisa melayani semuanya karena banyaknya kesibukan dll.
Order juga Alhamdulillah selalu antri maaf bila ada yang belum terlayani karena kadang antrian yang panjang sehingga waktu pengerjaan juga panjang.

Sebagai ganti maaf ini saya akan share sebuah EA Jum+MACD+ yang merupakan model EA averaging.
Ea ini sudah golongan Ea OKe.....karena sudah menggunakan perhitung BEP sederhana untuk Tpnya (hiden tp), sehingga closingnya kecil kemungkinan negatif kecuali kondisi pergerakan yang cepat atau kondisi yg ekstrim.
Untuk Riel account ... siapa takut.
Ea juga ada proteksi demo tapi sederhana
Untuk menghilangkan coding demonya pastikan mengikuti part sebelumnya tentang proteksi.
Perhatikan image Becktesnya

Sesuai nama Eanya MACD indikator untuk trigernya  ,coba perhatikan triger dan pertintah order berikut;

int sig(){ if(mc(2)<mcs(2) && mc(1)>mcs(1) ){x=1;}if(mc(2)>mcs(2) && mc(1)<mcs(1)){x=2;}return(x);} double mc(int i){return(iMACD(NULL,0,Fast,Slow,Macd_,PRICE_CLOSE,MODE_MAIN,i));} double mcs(int i){return(iMACD(NULL,0,Fast,Slow,Macd_,PRICE_CLOSE,MODE_SIGNAL,i));}

 Untuk Order juga menggunakan filter candel sehingga Order akan dibatasi setiap candel 1 kali order , semakin besar time framenya maka akan semakin jarang

if( ti!=Time[0]&& hr()==1 && IsDemo()) { if(j(1,0)+j(1,1)<max_order ) {if(sig()==1)p[1]=OrderSend(Symbol(),0,NR(lx),Ask,3,(Ask-sl*pt)*(sl>0), (Ask+tp*pt)*(tp>0),Nama,Magic,0,Blue); if(sig()==2)p[1]=OrderSend(Symbol(),1,NR(lx),Bid,3,(Bid+ sl*pt)*(sl>0), (Bid-tp*pt)*(tp>0),Nama,Magic,0,Red);} ti=Time[0];}return(0);}

Tpnya menggunakan perhitungan sebagai berikut

if(j(3,0)*TP<=j(2,0))c(0); if(j(3,1)*TP<=j(2,1))c(1);

Parameter juga sudah dilengkapi CloseAll (close_panik) digunakan untuk menutup semua order dalam kondisi panik hehe , ketika Close_Panik= true maka semua order akan diclose dan berhenti trading

dan juga yang tidak kalah penting sudah dilengkapi dengan fasilitas componding lots
.

Okey deh sudah jadi
Perhatikan codingnya untuk lebih memahaminya

//+------------------------------------------------------------------+ //| Jum+MACD+.mq4 | //| gifaesa@yahoo.com | //| http://JumForex.blogspot.com | //+------------------------------------------------------------------+ //+------------------------------------------------------------------+ #property copyright "JumForex.blogspot.com" #property link "Gifaesa@yahoo.com" extern string Share_EA_Jumforex = "Seting Parameter"; extern bool CLose_Panik = false; extern string Seting_waktu = "broker time"; extern int Mulai_Jam = 0; extern int Akhir_Jam = 20; extern string Compounding_Lots_ = "true compounding , false lot manual"; extern bool Compounding_Lots = true; extern double Ketahanan = 5000; extern string Manual_Lots = " lot manual"; extern double Lots = 0.1; extern double TP = 10; extern int Max_order = 20; extern string MACD = "Macd indikator"; extern int Fast = 12; extern int Slow = 26; extern int Macd_ = 6; extern int Magic = 69; bool nx=false; double pt,lx,tp,sl; string Nama = "Jum+MACD+ "; double op,os,opx,osx; int sg,sn,ti,x; int p[10]; int init() { if(Digits==3 || Digits==5) pt=10*Point; else pt=Point; return(0); } int start() {label(); if(Compounding_Lots)lx=AccountEquity()/Ketahanan; else lx=Lots; if(CLose_Panik ){c(0);c(1); return(0);} if(j(3,0)*TP<=j(2,0))c(0); if(j(3,1)*TP<=j(2,1))c(1); if( ti!=Time[0]&& hr()==1 && IsDemo()) { if(j(1,0)+j(1,1)< Max_order ) {if(sig()==1)p[1]=OrderSend(Symbol(),0,NR(lx),Ask,3,(Ask-sl*pt)*(sl>0), (Ask+tp*pt)*(tp>0),Nama,Magic,0,Blue); if(sig()==2)p[1]=OrderSend(Symbol(),1,NR(lx),Bid,3,(Bid+ sl*pt)*(sl>0), (Bid-tp*pt)*(tp>0),Nama,Magic,0,Red);} ti=Time[0];}return(0);} int sig(){ if(mc(2)<mcs(2) && mc(1)>mcs(1) ){x=1;}if(mc(2)>mcs(2) && mc(1)<mcs(1)){x=2;}return(x);} double mc(int i){return(iMACD(NULL,0,Fast,Slow,Macd_,PRICE_CLOSE,MODE_MAIN,i));} double mcs(int i){return(iMACD(NULL,0,Fast,Slow,Macd_,PRICE_CLOSE,MODE_SIGNAL,i));} int hr(){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 j(int n,int tipe){double t=0;for(int i=0; i<OrdersTotal(); i++){ if(!OrderSelect(i,SELECT_BY_POS,MODE_TRADES))continue;if(OrderSymbol()!=Symbol() || OrderType()!=tipe|| OrderMagicNumber()!=Magic ) continue; if(n==1)t++; if(n==2)t+=OrderProfit();if(n==3)t+=OrderLots();}return(t);} 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 c(int m){ for (int i = OrdersTotal() - 1; i >= 0; i--) { if(!OrderSelect(i, SELECT_BY_POS, MODE_TRADES))continue; if (OrderSymbol() != Symbol() || OrderType()!=m || OrderMagicNumber()!=Magic ) continue; if (m >1 && OrderType() > 1) p[2]=OrderDelete(OrderTicket()); if (OrderType() == 0 && m==0)p[3]= OrderClose(OrderTicket(), OrderLots(), Bid, 3, CLR_NONE); if (OrderType() == 1 && m==1)p[4]=OrderClose(OrderTicket(), OrderLots(), Ask, 3, CLR_NONE); }} void label(){ ObjectCreate("a",OBJ_LABEL,0,0,0);ObjectSet("a",OBJPROP_CORNER,4);ObjectSet("a",OBJPROP_XDISTANCE,10); ObjectSet("a",OBJPROP_YDISTANCE,10); ObjectSetText("a",Nama,21,"Mistral",Aqua); ObjectCreate("j",OBJ_LABEL,0,0,0);ObjectSet("j",OBJPROP_CORNER,3);ObjectSet("j",OBJPROP_XDISTANCE,10); ObjectSet("j",OBJPROP_YDISTANCE,10); ObjectSetText("j","@ 2017 || JumForex.blogspot.com ",15,"Mistral",Yellow); Comment("\n ", "\n ------------------------------------------------", "\n :: Spread : ", MarketInfo(Symbol(), MODE_SPREAD), "\n :: Leverage : 1 : ", AccountLeverage(), "\n :: Equity : ", AccountEquity(), "\n :: Jam Server :", Hour(), ":", Minute(), "\n ------------------------------------------------", "\n :: Floting Trade : ",j(2,0)+j(2,1), "\n :: Level Buy : ",j(1,0) , "\n :: Level Sell : ", j(1,1), "\n ------------------------------------------------", "\n :: by: Jum69 -: ", "\n ------------------------------------------------"); }

Dengan perhitungan dan penggunaan yang baik tentu ea ini akan berhasil guna, pastikan untuk dibuat demo dulu supaya lebih memahami cara kerjanya..

Okey
semoga bermanfaat
Jangan lupa beri komen ya!!!!

JUMFOREX

Belajar Membuat EA sederhana 39 (martiangel dengan Modif Tp)

Selamat Tahun Baru 2016
Semoga tahun penuh dengan berkah dan kesuksesan....

Pada kesempatan awal tahun ini saya akan share tentang belajar membuat ea  model martiangel dengan modif takeprofit (semua order takeprofitnya di jadikan satu dengan acuan titik pada takeprofit order terakhir).
Ea ini juga sengaja saya sematkan coding hanya untuk demo, hal ini supaya teman-teman lebih bersemangat untuk mempelajarinya.
Untuk menghilangkan coding demonya pastikan mengikuti part sebelumnya tentang proteksi.
Perhatikan image Becktesnya

Pada kesempatan awal tahun ini saya akan share tentang belajar membuat ea  model martiangel dengan modif takeprofit (semua order takeprofitnya di jadikan satu dengan acuan titik pada takeprofit order terakhir).
Ea ini juga sengaja saya sematkan coding hanya untuk demo, hal ini supaya teman-teman lebih bersemangat untuk mempelajarinya.
Untuk menghilangkan coding demonya pastikan mengikuti part sebelumnya tentang proteksi.
Perhatikan image Becktesnya

Triger saya ambil berdasarkan acuan candel tranding , coba perhatikan trager dan pertintah order berikut;

if(Open[1]<Close[1]){ res=OrderSend(Symbol(),OP_BUY,(Lots),Ask,3,SLb,TPb,Nama_EA,Magic,0,Blue); } if(Open[1]>Close[1]){ res=OrderSend(Symbol(),OP_SELL,(Lots),Bid,3,SLs,TPs,Nama_EA,Magic,0,Red); }

dan untuk modif tpnya dibuat dalam fungsi sebagi berikut:

void md(){int i,r;double tpnya,dtp; for (i = 0; i < OrdersTotal(); i++) { if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue; if (OrderSymbol() != Symbol()) continue; tpnya=OrderTakeProfit();} for (i = OrdersTotal() - 1; i >= 0; i--) {if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue; if(OrderSymbol() != Symbol()) continue; dtp=OrderTakeProfit(); if( tpnya!=dtp)r=OrderModify(OrderTicket(), OrderOpenPrice(), OrderStopLoss(), tpnya, 0, CLR_NONE); }}

Untuk memanggil fungsinya tinggal di ambil codingnya " md(): "

Ea model ini tentu untuk menentukan besaran takeprofitnya ,jarak antar order dan perkalian lotnya harus diperhitungkan supaya tidak terjadi closing dengan total negatif.

EA ini sebenarnya kelanjutan dari pembelajaran pada part 22 di http://jumforex.blogspot.co.id/2013/01/belajar-membuat-ea-sederhana-22-jebakan.html

Perhatikan codingnya dan bandingkan untuk lebih memahaminya

//+------------------------------------------------------------------+ //| Jum+KampRetZ .mq4 | //| gifaesa@yahoo.com | //| http://JumForex.blogspot.com | //+------------------------------------------------------------------+ #property copyright "JumForex.blogspot.com" #property link "Gifaesa@yahoo.com" input string Nama_EA = "Jum+KampRetZ"; input int TP = 40; input int SL = 0; input double Lots = 0.01; input string Menu_Martingel = "Seting"; input int Jarak_Order = 25; input double Kali_Lots = 2; input int Max_Order = 10; input int Magic = 69; double pt,SLb,TPb,SLs,TPs; int res,ras; int OnInit() { //--- if(Digits==3 || Digits==5) pt=10*Point; else pt=Point; //--- return(INIT_SUCCEEDED); } void OnTick() { md(); lab(); if(TP==0)TPb=0;else TPb=Ask+TP*pt; if(TP==0)TPs=0;else TPs=Bid-TP*pt; if(SL==0)SLb=0;else SLb=Ask-SL*pt; if(SL==0)SLs=0;else SLs=Bid+SL*pt; if( IsDemo() && JumlahOrder(0)+JumlahOrder(1)==0){ if(Open[1]<Close[1]){ res=OrderSend(Symbol(),OP_BUY,(Lots),Ask,3,SLb,TPb,Nama_EA,Magic,0,Blue); } if(Open[1]>Close[1]){ res=OrderSend(Symbol(),OP_SELL,(Lots),Bid,3,SLs,TPs,Nama_EA,Magic,0,Red); } } if(trad()==1 && JumlahOrder(0)>=1 && JumlahOrder(0)< Max_Order ) {res=OrderSend(Symbol(),OP_BUY,xlot(0),Ask,3,SLb, TPb,Nama_EA,Magic,0,Blue); } if(trad()==2 && JumlahOrder(1)>=1 && JumlahOrder(1)< Max_Order ) {res=OrderSend(Symbol(),OP_SELL,xlot(1),Bid,3,SLs,TPs,Nama_EA,Magic,0,Red); } } //+------------------------------------------------------------------+ void md(){int i,r;double tpnya,dtp; for (i = 0; i < OrdersTotal(); i++) { if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue; if (OrderSymbol() != Symbol()) continue; tpnya=OrderTakeProfit();} for (i = OrdersTotal() - 1; i >= 0; i--) {if (!OrderSelect(i, SELECT_BY_POS, MODE_TRADES)) continue; if(OrderSymbol() != Symbol()) continue; dtp=OrderTakeProfit(); if( tpnya!=dtp)r=OrderModify(OrderTicket(), OrderOpenPrice(), OrderStopLoss(), tpnya, 0, CLR_NONE); }} int trad(){ int type,dp; double opb,ops; 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=(Lots*MathPow(Kali_Lots,JumlahOrder(m))); return(ylot);} int JumlahOrder(int Tipe){ int Total = 0; for(int i=0; i<OrdersTotal(); i++) { if(!OrderSelect(i,SELECT_BY_POS,MODE_TRADES))continue; if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=Magic || OrderType()!=Tipe) continue; if(IsDemo())Total++; } return(Total);} double man(){double Total = 0; for(int i=0; i<OrdersTotal(); i++) { if(!OrderSelect(i,SELECT_BY_POS,MODE_TRADES))continue; if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=Magic ) continue; if(IsDemo())Total+=OrderProfit(); } return(Total);} void closeall(){ for (int i = OrdersTotal() - 1; i >= 0; i--) { if(!OrderSelect(i, SELECT_BY_POS, MODE_TRADES))continue; if (OrderSymbol() != Symbol() || OrderMagicNumber()!=Magic ) continue; if (OrderType() > 1) ras=OrderDelete(OrderTicket()); if (OrderType() == 0)ras= OrderClose(OrderTicket(), OrderLots(), Bid, 3, CLR_NONE); if (OrderType() == 1)ras=OrderClose(OrderTicket(), OrderLots(), Ask, 3, CLR_NONE); }} void lab(){ ObjectCreate("a",OBJ_LABEL,0,0,0);ObjectSet("a",OBJPROP_CORNER,4);ObjectSet("a",OBJPROP_XDISTANCE,10); ObjectSet("a",OBJPROP_YDISTANCE,10); ObjectSetText("a","Jum+KampRetZ",25,"Mistral",Yellow); ObjectCreate("j",OBJ_LABEL,0,0,0);ObjectSet("j",OBJPROP_CORNER,3);ObjectSet("j",OBJPROP_XDISTANCE,10); ObjectSet("j",OBJPROP_YDISTANCE,10); ObjectSetText("j","@ 2016 || JumForex.blogspot.com ",16,"Mistral",Yellow); Comment("\n ", "\n ------------------------------------------------", "\n :: Spread : ", MarketInfo(Symbol(), MODE_SPREAD), "\n :: Leverage : 1 : ", AccountLeverage(), "\n :: Equity : ", AccountEquity(), "\n :: Jam Server :", Hour(), ":", Minute(), "\n ------------------------------------------------", "\n :: Ploting : ",man(), "\n :: Level Op Buy : ",JumlahOrder(0), "\n :: Level Op Sell : ",JumlahOrder(1), "\n ------------------------------------------------", "\n :: >>By: Jum69<<", "\n ------------------------------------------------"); }

Dengan perhitungan dan penggunaan yang baik tentu ea ini akan berhasil guna, pastikan untuk dibuat demo dulu supaya lebih memahami cara kerjanya..

Okey
semoga bermanfaat
Jangan lup beri komen ya!!!!

https://jumforex.blogspot.com/2016/01/belajar-membuat-ea-sederhana-39.html

Belajar Membuat EA Sederhana 38 (terapan indikator IFX_Keltner_Channel III)

Belajar Membuat EA Sederhana 38 (terapan indikator IFX_Keltner_Channel III)

Kita sambung deh part sebelumnya http://jumforex.blogspot.com/2013/07/belajar-membuat-ea-sederhana-37-terapan.html

Dibagian sebelumnya sudah di jelaskan tentang model indikator ini. dan juga ada teman yang sudah bikin eanya di part sebelum nya .
Kali saya juga agan share tentang ea yg berdasarkan indikator ini dengan model averaging .

EA ini cococok untuk mengejar rabat !

Tapi jangan lupa Ea ini ada proteksi demonya  | jadi harus dihilangkan dulu

e //+------------------------------------------------------------------+ //| Jum+Keltner Chan .mq4 | //| Copyright 2013, Annura | //| gifaesa@yahoo.com | //| http://JumForex.blogspot.com | //+------------------------------------------------------------------+ #property copyright "JumForex.blogspot.com" #property link "Gifaesa@yahoo.com" extern string Nama_EA = "Jum+Keltner+Chan"; extern int TP = 11; extern int TP_money = 11; extern int SL = 20; extern bool SL_otomatis = false; extern double Lot = 0.01; extern int Magic = 69; extern int Mode_Ma = 0; extern int Ma_Pareode = 10; extern int Price_tip = 5; extern int Max_order = 2; double pt,SLb,TPb,SLs,TPs; int init() { if(Digits==3 || Digits==5) pt=10*Point; else pt=Point; return(0); } int deinit() { return(0); } int start() {lab(); if(!IsDemo()){Alert("hanya untuk demo boss"); return(0);} if(TP_money<=man())closeall(); double kfa = iCustom(Symbol(),0,"IFX_Keltner_Channel",Ma_Pareode,Mode_Ma,Price_tip,0,0); double kfm = iCustom(Symbol(),0,"IFX_Keltner_Channel",Ma_Pareode,Mode_Ma,Price_tip,1,0); double kfb = iCustom(Symbol(),0,"IFX_Keltner_Channel",Ma_Pareode,Mode_Ma,Price_tip,2,0); static datetime w; if(TP==0)TPb=0;else TPb=Ask+TP*pt; if(TP==0)TPs=0;else TPs=Bid-TP*pt; if(SL==0)SLb=0;else SLb=Ask-SL*pt; if(SL==0)SLs=0;else SLs=Bid+SL*pt; if(SL_otomatis){ SLb=kfb; SLs=kfa;}//else if(!SL_otomatis){SLb=Ask-SL*pt; SLs=Bid +SL*pt;} if(w!=Time[0] && IsDemo()){ if(Ask<kfb && JumlahOrder(0)<Max_order) { OrderSend(Symbol(),OP_BUY,Lot,Ask,3,SLb,TPb,Nama_EA,Magic,0,Blue); } if(Bid>kfa && JumlahOrder(1)<Max_order) { OrderSend(Symbol(),OP_SELL,Lot,Bid,3,SLs,TPs,Nama_EA,Magic,0,Red); } w=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; if(IsDemo())Total++; } return(Total);} double man(){double Total = 0; for(int i=0; i<OrdersTotal(); i++) { OrderSelect(i,SELECT_BY_POS,MODE_TRADES); if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=Magic ) continue; if(IsDemo())Total+=OrderProfit(); } return(Total);} 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()); if (OrderType() == 0) OrderClose(OrderTicket(), OrderLots(), Bid, 3, CLR_NONE); if (OrderType() == 1)OrderClose(OrderTicket(), OrderLots(), Ask, 3, CLR_NONE); }} void lab(){ Comment("\n ", "\n ------------------------------------------------", "\n :: Spread : ", MarketInfo(Symbol(), MODE_SPREAD), "\n :: Leverage : 1 : ", AccountLeverage(), "\n :: Equity : ", AccountEquity(), "\n :: Jam Server :", Hour(), ":", Minute(), "\n ------------------------------------------------", "\n :: Total Op Buy : ",JumlahOrder(0), "\n :: Total Op Sell : ",JumlahOrder(1), "\n ------------------------------------------------", "\n :: >>By: Jum69<<", "\n ------------------------------------------------"); }

gitu deh sementara

 //+------------------------------------------------------------------+
//|                                            Jum+Keltner Chan .mq4 |
//|                                           Copyright 2013, Annura |
//|                                                gifaesa@yahoo.com |
//|                                     http://JumForex.blogspot.com |
//+------------------------------------------------------------------+
#property copyright "JumForex.blogspot.com"
#property link      "Gifaesa@yahoo.com"

extern string Nama_EA               = "Jum+Keltner+Chan";
extern int    TP                    = 11;
extern int    TP_money              = 11;
extern int    SL                    = 20;
extern bool   SL_otomatis           = false;
extern double Lot                   = 0.01;
extern int    Magic                 = 69;
extern int    Mode_Ma               = 0;
extern int    Ma_Pareode            = 10;
extern int    Price_tip             = 5;
extern int    Max_order             = 2;
double pt,SLb,TPb,SLs,TPs;

int init()
  {
   if(Digits==3 || Digits==5) pt=10*Point;   else   pt=Point;
   return(0);
  }
int deinit()
  {
   return(0);
  }
int start()  {lab();
if(!IsDemo()){Alert("hanya untuk demo boss"); return(0);}
  if(TP_money<=man())closeall();
 
      double kfa  = iCustom(Symbol(),0,"IFX_Keltner_Channel",Ma_Pareode,Mode_Ma,Price_tip,0,0);
      double kfm  = iCustom(Symbol(),0,"IFX_Keltner_Channel",Ma_Pareode,Mode_Ma,Price_tip,1,0);
      double kfb  = iCustom(Symbol(),0,"IFX_Keltner_Channel",Ma_Pareode,Mode_Ma,Price_tip,2,0);
      static datetime w;
      if(TP==0)TPb=0;else TPb=Ask+TP*pt;
      if(TP==0)TPs=0;else TPs=Bid-TP*pt;
      if(SL==0)SLb=0;else SLb=Ask-SL*pt;
      if(SL==0)SLs=0;else SLs=Bid+SL*pt;
      if(SL_otomatis){  SLb=kfb; SLs=kfa;}//else if(!SL_otomatis){SLb=Ask-SL*pt; SLs=Bid +SL*pt;}
      if(w!=Time[0] && IsDemo()){
      if(Ask<kfb && JumlahOrder(0)<Max_order)   {
         OrderSend(Symbol(),OP_BUY,Lot,Ask,3,SLb,TPb,Nama_EA,Magic,0,Blue);
      }
      if(Bid>kfa && JumlahOrder(1)<Max_order) {
        OrderSend(Symbol(),OP_SELL,Lot,Bid,3,SLs,TPs,Nama_EA,Magic,0,Red);
          }
      w=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;
 if(IsDemo())Total++; }
 return(Total);}
double man(){double Total = 0;
 for(int i=0; i<OrdersTotal(); i++)   {
 OrderSelect(i,SELECT_BY_POS,MODE_TRADES);
 if(OrderSymbol()!=Symbol() || OrderMagicNumber()!=Magic ) continue;
 if(IsDemo())Total+=OrderProfit(); }
 return(Total);}
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());
 if (OrderType() == 0) OrderClose(OrderTicket(), OrderLots(), Bid, 3, CLR_NONE);
 if (OrderType() == 1)OrderClose(OrderTicket(), OrderLots(), Ask, 3, CLR_NONE); }}
void lab(){
 Comment("\n ",
   "\n ------------------------------------------------",
   "\n :: Spread                 : ", MarketInfo(Symbol(), MODE_SPREAD),
   "\n :: Leverage               : 1 : ", AccountLeverage(),
   "\n :: Equity                 : ", AccountEquity(),
   "\n :: Jam Server             :", Hour(), ":", Minute(),
   "\n ------------------------------------------------",
   "\n :: Total Op Buy  : ",JumlahOrder(0),
   "\n :: Total Op Sell : ",JumlahOrder(1),
   "\n ------------------------------------------------",
   "\n :: >>By: Jum69<<",
   "\n ------------------------------------------------");
}

Belajar Membuat EA Sederhana 37 (terapan indikator IFX_Keltner_Channel II)

Kita lanjutin deh setelah di part 36    , Kita sudah sedikit membahas tentang indikator IFX_Keltner_Channel.
dari gambaran di part sebelumnya indi ini mempunyai 3 mode yaitu 0,1,2
terus bagimana untuk membaca indikator tersebut supaya bisa dipanggil di dalam Ea .

Pada pembahasan yang dulu kita sudah pernah membahas membuat ea dengan indikator diluar mt4 (custom indikator)
kita coba:

di pembahasan sebelumnya sudah diketahui bahwa indikator ini mempunyai 3 mode dan 3 input parameter , Nah dari situ bisa kita buat custom indikatornya begini

Nah dengan dibuat custom indi IFX_Keltner ini maka akan mudah diimplementasikan kedalam EA

Rule Ea yang akan kita bikin adalah  (untuk mode market trending)
1. Buy ketika harga menembus garis upper
2. sell ketika harga menembus garis lower
3. op dibuat stiap candel ada signal

apalagi ya

itu aja deh
silahkan yang mau bikin bisa dibuat kan EAnya

Nah ini salah satu Ea yang di bikin oleh master "Anie Budi Raharjo " yang udah ngirimkan melalui FB
SLnya dibuat otomatis digaris indinya:


//+------------------------------------------------------------------+
//|                                          IFX_Keltner_Channel.mq4 |
//|                                           Copyright 2013, Annura |
//|                                                                  |
//+------------------------------------------------------------------+
#property copyright "Copyright 2013, Annura"
#property link      ""

extern string Nama_EA               = "IFX Keltner Channel";
extern int    TP                    = 11;
extern int    SL                    = 20;
extern double Lot                   = 0.01;
extern int    Magic                 = 69;
extern int    Mode_Ma               = 0;
extern int    Ma_Pareode            = 10;
extern int    Price_tip             = 5;
extern int    Max_order             = 2;


int signalBuy,signalSell;
double pt,SLb,TPb,SLs,TPs;

//+------------------------------------------------------------------+
//| 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()
  {
//----
      double kfa  = iCustom(Symbol(),0,"IFX_Keltner_Channel",Ma_Pareode,Mode_Ma,Price_tip,0,0);
      double kfm  = iCustom(Symbol(),0,"IFX_Keltner_Channel",Ma_Pareode,Mode_Ma,Price_tip,1,0);
      double kfb  = iCustom(Symbol(),0,"IFX_Keltner_Channel",Ma_Pareode,Mode_Ma,Price_tip,2,0);

      if(Open[1]<kfa && Close[1]>kfa && Open[0]>kfa)
      {
         signalBuy=1;
      }
      if(Open[1]>kfb && Close[1]<kfb && Open[0]<kfb)
      {
         signalSell=1;
      }
     
      SLb=kfb;
      SLs=kfa;
      if(TP==0)TPb=0;else TPb=Ask+TP*pt;
      if(TP==0)TPs=0;else TPs=Bid-TP*pt;
     
      if(signalBuy==1 && JumlahOrder(0)<Max_order)
      {
         OrderSend(Symbol(),OP_BUY,Lot,Ask,3,SLb,TPb,Nama_EA,Magic,0,Blue); 
      }
      if(signalSell==1 && JumlahOrder(1)<Max_order)
      {
         OrderSend(Symbol(),OP_SELL,Lot,Bid,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);
}



//+------------------------------------------------------------------+ //| IFX_Keltner_Channel.mq4 | //| Copyright 2013, Annura | //| | //+------------------------------------------------------------------+ #property copyright "Copyright 2013, Annura" #property link "" extern string Nama_EA = "IFX Keltner Channel"; extern int TP = 11; extern int SL = 20; extern double Lot = 0.01; extern int Magic = 69; extern int Mode_Ma = 0; extern int Ma_Pareode = 10; extern int Price_tip = 5; extern int Max_order = 2; int signalBuy,signalSell; double pt,SLb,TPb,SLs,TPs; //+------------------------------------------------------------------+ //| 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() { //---- double kfa = iCustom(Symbol(),0,"IFX_Keltner_Channel",Ma_Pareode,Mode_Ma,Price_tip,0,0); double kfm = iCustom(Symbol(),0,"IFX_Keltner_Channel",Ma_Pareode,Mode_Ma,Price_tip,1,0); double kfb = iCustom(Symbol(),0,"IFX_Keltner_Channel",Ma_Pareode,Mode_Ma,Price_tip,2,0); if(Open[1]<kfa && Close[1]>kfa && Open[0]>kfa) { signalBuy=1; } if(Open[1]>kfb && Close[1]<kfb && Open[0]<kfb) { signalSell=1; } SLb=kfb; SLs=kfa; if(TP==0)TPb=0;else TPb=Ask+TP*pt; if(TP==0)TPs=0;else TPs=Bid-TP*pt; if(signalBuy==1 && JumlahOrder(0)<Max_order) { OrderSend(Symbol(),OP_BUY,Lot,Ask,3,SLb,TPb,Nama_EA,Magic,0,Blue); } if(signalSell==1 && JumlahOrder(1)<Max_order) { OrderSend(Symbol(),OP_SELL,Lot,Bid,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); }

Trims mbak Anie  atas kirimannya.

Belajar Membuat EA Sederhana 36 (terapan indikator IFX_Keltner_Channel)

http://jumforex.blogspot.com/2013/07/belajar-membuat-ea-sederhana-36-terapan.html

Salam sukses semuanya

Kita lanjutkan lagi  part 36 setelah pada sebelumnya 35     kita suda memabahas sedikit tentang proteksi EA.
Pada kesempatan kali ini kita akan membuat EA scalping dengan menggunakan indikator  IFX_Kletner_Channel  . Indikator ini bawaan mt4 untuk broker instaforex

Ini akan menambah wawasan bagi temen2 yang masih bingung menerapkan coding bila indikatornya tidak ada di standart mt4. 
Nah ini tampilan indikator  IFX_Keltner_Channel , sebenarnya sih mirip dengan indikator anvelope cuma ini terdiri dari 3 garis atas, tengah dan bawah

 Nah untuk memasang indikator ini di chart maka silahkan cek di mt4...

 Nah setelah itu akan muncul parametenya ada 3 macem inputan

Nah kaloudah tampil di Mt4 kita akan lihat buffernya , tekan CTRL D maka akan tampil

 

Maka akan tampil 3 nilai didalam modenya , untuk mengetahui posisinya maka bisa digunakan pointer untuk menunjuk pada garis indinya dan akan sesuai dengan nilainya
Dari pengamatan maka di peroleh garis atas (upper)  di mode 0, garis tengah mode 1, dan garis bawah (lowwer) mode 2.

 Loh aterus gunanya untuk apa ya ? 
Ini digunakan untuk membuat coding memanggil indikator tersebut!

Tentu masih ingat pada part sebelumnya pernah di bahas tentang coding memanggil indikator yang bukan standart yang ada pada mt4....

gitu dulu deh kita lanjut pas santai...

Belajar Membuat EA Sederhana 35 (Proteksi EA 3)

http://jumforex.blogspot.com/2013/05/belajar-membuat-ea-sederhana-35.html 

Salam profit semuanya

Di Part sebelum (part 33 dan 34 ) kita sudah bahas proteksi Ea dengan account demo dan account khusus

Nah kali ini saya akan share sebuah Ea saya yang cocok untuk menantang news dan juga pas untuk kondisi market yang trending ...

Problemnya EA ini di proteksi dengan menggunakan account demo   dan mungkin sedikit dibuat agak rumit ...meski sebenarnya sih gak rumit2 amat...(-___-)
Ini akan menambah wawasan bagi temen2 yang ingin memproteksi EAnya............

Oke langsung aja deh ini penampakan EAnya

//+-----------------------------------------------------------------------------------------+ //| EA Jum+Profit+v3 | //| gifaesa@yahoo.com | //| http://JumForex.blogspot.com | //+------------------------------------------------------------------+ //v3 (16-4-2013) #property copyright "JumForex.blogspot.com" #property link "Gifaesa@yahoo.com" extern string Nama_EA = "Jum+Profit+v3"; extern bool Close_Panic = false; extern string Hari_Trade = "=>Sesuai selera::"; extern bool Senin = false; extern bool Selasa = true; extern bool Rabu = true; extern bool Kamis = true; extern bool Jumat = true; extern string Jam_server = "Set sesuai selera"; extern int Mulai_Jam = 9; extern int Akhir_Jam = 19; extern string Sesuaikan_risk = "Set sesuai selera"; extern bool Compound_lot = true; extern double Manage_Balance = 130; extern bool Buy = true; extern bool Sell = true; extern int TP = 35; extern int SL = 27; extern double Lots = 0.01; extern int Max_level = 10; extern int Magic = 69; double slbx,tpbx,slsx,tpsx,slb,tpb,sls,tps,pt,lslb,ltpb,x,slbk,tpbk,slsk,tpsk;int s,p,pp;string k="JumProFit",kk="JumpRoFit"; int init(){p=Magic;pp=Magic+99;if(Digits==3 || Digits==5) pt=10*Point;else pt=Point;return(0);} int deinit(){ return(0); } int start(){label();if(!IsDemo()){Alert("Maaf bos hanya untuk demo");return(0);} {if(Close_Panic){c(k,0);c(k,1);c(k,4);c(k,5);c(kk,0);c(kk,1);c(kk,4);c(kk,5); return(0); }} if(IsDemo()){if(Compound_lot ) x=Lots* MathFloor(AccountBalance() / Manage_Balance); else x=Lots;}else x=MarketInfo(Symbol(), MODE_MAXLOT); if(j(k,0,0)==0 && j(k,0,5)==1){c(k,5);}if(j(k,0,1)==0 && j(k,0,4)==1){c(k,4);}if(j(kk,0,0)==0 && j(kk,0,5)==1){c(kk,5);}if(j(kk,0,1)==0 && j(kk,0,4)==1){c(kk,4);} double as = j(k,3,1); double bi = j(k,3,0);double ask = j(kk,3,1); double bik = j(kk,3,0); if(SL==0){slb=0;sls=0;slbx=0;slsx=0;}else if(SL>0){slbk=ask-SL*pt;slsk=bik+SL*pt; slb=as-SL*pt;sls=bi+SL*pt;slbx=Ask-SL*pt;slsx=Bid+SL*pt;} if(TP==0){tpb=0;tps=0;tpbx=0;tpsx=0;}else if(TP>0){tpbk=ask+TP*pt;tpsk=bik-TP*pt;tpb=as+TP*pt;tps=bi-TP*pt;tpbx=Ask+TP*pt;tpsx=Bid-TP*pt;} if( Jam()==1 && !Close_Panic && tday()==1 && IsDemo()){ if(Buy && ju()==0) OrderSend(Symbol(),0,NR(x),Ask,3,slbx, tpbx,k,p,0,Blue); if(Sell&& jum()==0) OrderSend(Symbol(),1,NR(x),Bid,3,slsx, tpsx,kk,pp,0,Red); } if(j(k,2,0)+j(k,2,1)-p < Max_level && IsDemo()){ if(j(k,0,1)==1 && j(k,0,4)==0) {OrderSend(Symbol(),4,(j(k,1,1)),as,3,slb, tpb,k,j(k,2,1)+1,0,Blue);} if(j(k,0,0)==1 && j(k,0,5)==0) {OrderSend(Symbol(),5,(j(k,1,0)),bi,3,sls, tps,k,j(k,2,0)+1,0,Red);} } if(j(kk,2,0)+j(kk,2,1)-pp < Max_level && IsDemo()){ if(j(kk,0,1)==1 && j(kk,0,4)==0) {OrderSend(Symbol(),4,(j(kk,1,1)),ask,3,slbk, tpbk,kk,j(kk,2,1)+1,0,Blue);} if(j(kk,0,0)==1 && j(kk,0,5)==0) {OrderSend(Symbol(),5,(j(kk,1,0)),bik,3,slsk, tpsk,kk,j(kk,2,0)+1,0,Red);} } return(0); } //+------------------------------------------------------------------+ double j(string m,int n, int tipe){double t=0;for(int i=0; i<OrdersTotal(); i++){ OrderSelect(i,SELECT_BY_POS,MODE_TRADES);if(OrderSymbol()!=Symbol() || OrderComment()!=m || OrderType()!=tipe) continue;if(IsDemo()){if(n==0)t++;if(n==1)t=OrderLots()*2;if(n==2)t=OrderMagicNumber(); if(n==3)t=OrderStopLoss(); }}return(t);} double ju(){return(j(k,0,0)+j(k,0,1)+j(k,0,2)+j(k,0,3)+j(k,0,4)+j(k,0,5));} double jum(){return(j(kk,0,0)+j(kk,0,1)+j(kk,0,2)+j(kk,0,3)+j(kk,0,4)+j(kk,0,5));} 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);} int Jam(){ 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 tday(){int trd=0;if(Senin && DayOfWeek()==1) trd=1;if(Selasa && DayOfWeek()==2) trd=1;if(Rabu && DayOfWeek()==3) trd=1;if(Kamis && DayOfWeek()==4) trd=1;if(Jumat && DayOfWeek()==5) trd=1;return(trd);} void c(string m,int t){for (int i = OrdersTotal() - 1; i >= 0; i--) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES);if (OrderSymbol() != Symbol() || OrderComment()!=m|| OrderType()!=t) continue;if(IsDemo()){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 f(string m,int t){ double dp = 0;int i; for (i = 0; i < OrdersTotal(); i++) {OrderSelect(i, SELECT_BY_POS, MODE_TRADES);if (OrderSymbol() != Symbol() || OrderComment()!=m|| t!=OrderType()) continue;if(IsDemo()){ dp += OrderProfit(); }} return(dp);} void label(){int x,y;if((j(k,0,0)==1 && j(k,2,0)==p)||(ju()==0)) x=0; else x=j(k,2,0)+j(k,2,1)-p;if((j(kk,0,1)==1 && j(kk,2,1)==p)||(jum()==0)) y=0; else y=j(kk,2,0)+j(kk,2,1)-pp; Comment("\n ", "\n ", "\n ------------------------------------------------", "\n :: =>+Jum+Profit+v3<=", "\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 : ",f(k,0)+f(kk,0),"\n :: Floting sell : ",f(k,1)+f(kk,1), "\n :: Level pro : ",x, "\n :: Level Fit : ",y, "\n ------------------------------------------------", "\n :: >>By: Jum69<<", "\n ------------------------------------------------"); }

Nah oke deh silahkan dicopas dan di coba >>>>>bagi yang mau di riel account ya tantangan sih harus bisa menghilangkan proteksi account demonya

Untuk memastikan proteksinya telah hilang silahkan di BT di account demo dan accoun riel kalo hasilnya sama  berarti sudah berhasil

Bagi yang udah berhasil kasih komen yah!

Selamat berkreasi

------------------------------------------------------------------------------------------
Pastikan mengikuti part sebelumnya
Belajar Membuat EA Sederhana 33
Belajar Membuat EA Sederhana 34

3 komentar:

1. 
   U-J-E-S24 Mei 2013 09.51

   Mantaps Kang...
   
   maju terus lah trader Indonesia khusus nya dibawah bendera JumForex

   Balas
2. 
   forexdibuatmudah24 Mei 2013 14.48

   salam kenal ya kang, saya arifin...sukses selalu buat akang yang sudah mau share mengenai membuat ea sederhana, tentunya ilmu yg kang jum share sangat bermanfaat buat saya dan teman2....oh iya saya punya indikator bisa akang bantu saya agar indikator itu bisa jadi EA ?

   Balas
3. 
   U-J-E-S24 Mei 2013 23.41

   @Kang Arifin salam kenal kembali dari saya,
   kalo berkenan share indikatornya disini, kita oprek sama2, sekalian belajar
   
   @Kang Jum,
   Jika posisi pasar sideways keci (dibawah 50 poin) l..lumayan report EA part35 ini, BTW thank you
   
   salam,

   Balas

Belajar Membuat EA Sederhana 34 (Proteksi EA 2)

http://jumforex.blogspot.com/2013/05/belajar-membuat-ea-sederhana-34.html 

Kita lanjutin deh hee
Setelah pada part sebelumnya kita sudah bahas proteksi hanya untuk account demo
Kali ini kita bahas proteksi untuk account number khusus, sehingga Ea yang di proteksi dengan ini akan hanya dapat digunakan pada nomor account yang sudah ditetapkan.

Nah sebenarnya proteksi ini hanya pangaman account saja tidak berarti proteksi ini tidak bisa dirubah...
Sofware terus berkembang ,  file ex4 juga bisa di ubah lagi ke file mql4 melalui sofware decompile sehingga proteksi hanyalah bersifat sementara. Ketika kita share pada orang lain tentu akan mengalami bahwasanya EA kita suatu ketika juga akan di bongkar oleh trader lain.

Ok bagian yang perlu ditambahakan sama mirip dengan pada protek demo pada part 33

  int No_accnya=0000;// ganti nomor account nya disini
  if(AccountNumber()!=No_accnya){Alert("maaf bOSS no account anda gak cocok ..Kacian deh Loh");     return(0); }

Nah  ini yang perlu disuntik di bawah int start()

heee kita coba suntik ke EA di part 25


//+------------------------------------------------------------------+ //| 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() { int No_accnya=0000;// ganti nomor account nya disini if(AccountNumber()!=No_accnya){Alert("maaf bOSS no account anda gak cocok ..Kacian deh Loh"); return(0); } 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 ------------------------------------------------"); //+------------------------------------------------------------------+ }


He semoga menambah wawasan deh


Salam profit All

Ngoprek EA 1

http://jumforex.blogspot.com/2013/04/ngoprek-ea-1.html

Ha bagi para  trader yang sudah biasa bermain dengan coding EA tentu hal yang lumrah bila sekali waktu ngoprek ,..............Tentu ngoprek EA maksudnya!
Nah Kali ini saya akan mengajak temen2 untuk mencoba mengoprek sebuah EA yang cukup baik yang berasal dari library mql4 , dan asal EA nya dari negeri beruang ==>Rusia
VR---SETKA---3 ini nama aslinya dari sononya

Begini Eanya!

//===========================================================================================================================// // Author VOLDEMAR227 site WWW.TRADING-GO.RU SKYPE: TRADING-GO e-mail: TRADING-GO@List.ru //===========================================================================================================================// #property copyright "Copyright © 2012, WWW.TRADING-GO.RU ." #property link "http://WWW.TRADING-GO.RU" //WWW.TRADING-GO.RU full version free //===========================================================================================================================// extern string Comment_1 = "settings"; extern int Plus= 50; extern int TakeProfit = 300; extern int Distanciya = 300; extern double Lots = 0.00; extern double Percent = 1; extern bool Martin = true; extern string Comment_2 = "signalMA"; extern bool SignalMA = false; extern int PeriodMA1 = 8 ; extern int PeriodMA2 = 14 ; extern string Comment_3 = "signalRSI"; extern bool SignalRSI = false; extern int PeriodRSI = 14 ; extern int up= 50; extern int dw= 50; extern string Comment_4 = "signalProc"; extern bool Proc =true; extern double Procent =1.3; extern string Comment_5 = "Monitor"; extern bool Monitor = true; extern int CORNER = 0; extern int Slip=2; extern int Magic=1; int start() { double Lots_New=0; string Symb =Symbol(); double One_Lot=MarketInfo(Symb,MODE_MARGINREQUIRED); double Min_Lot=MarketInfo(Symb,MODE_MINLOT); double Step =MarketInfo(Symb,MODE_LOTSTEP); double Free =AccountFreeMargin(); //--------------------------------------------------------------- 3 -- if (Lots>0) { double Money=Lots*One_Lot; if(Money<=AccountFreeMargin()) Lots_New=Lots; else Lots_New=MathFloor(Free/One_Lot/Step)*Step; } //--------------------------------------------------------------- 4 -- else { if (Percent > 100) Percent=100; if (Percent==0) Lots_New=Min_Lot; else Lots_New=MathFloor(Free*Percent/100/One_Lot/Step)*Step;//???? } //--------------------------------------------------------------- 5 -- if (Lots_New < Min_Lot) Lots_New=Min_Lot; if (Lots_New*One_Lot > AccountFreeMargin()) { return(false); } //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~// ObjectCreate("R",OBJ_LABEL,0,0,0); ObjectSet("R",OBJPROP_CORNER,2); ObjectSet("R",OBJPROP_XDISTANCE,10); ObjectSet("R",OBJPROP_YDISTANCE,10); ObjectSetText("R","WWW.TRADING-GO.RU full version free",15,"Arial Black",Red); //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~// double opB=2000; double opS=0; double orderProfitbuy=0; double Sum_Profitbuy=0; double orderProfitsel; double Sum_Profitsel; int orderType; double LotB=Lots_New; double LotS=Lots_New; int total=OrdersTotal(); int b=0,s=0,n=0; for(int i=total-1; i>=0; i--) { if(OrderSelect(i, SELECT_BY_POS)) { if(OrderSymbol()==Symbol() ) { n++; if(OrderType()==OP_BUY && OrderMagicNumber()==Magic) { b++; LotB=OrderLots(); double ProfitB=OrderTakeProfit(); double openB=OrderOpenPrice(); if(openB<opB) {opB=openB;} } //--------------------------------- if(OrderType()==OP_SELL && OrderMagicNumber()==Magic) { s++; LotS=OrderLots(); double ProfitS=OrderTakeProfit(); double openS=OrderOpenPrice(); if(openS>opS) {opS=openS;} } } } } double max = NormalizeDouble(iHigh(Symbol(),1440,0),Digits); double min = NormalizeDouble(iLow (Symbol(),1440,0),Digits); double opp=NormalizeDouble(iOpen(Symbol(),1440,0),Digits); double cl=NormalizeDouble(iClose(Symbol(),1440,0),Digits); //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~// double dis =NormalizeDouble(Distanciya*Point,Digits); double spred =NormalizeDouble(MarketInfo(Symbol(),MODE_SPREAD)*Point,Digits); double CORR=NormalizeDouble(Plus *Point,Digits); //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~// int sigup=0; int sigdw=0; //WWW.TRADING-GO.RU full version free if (SignalMA == true) { //WWW.TRADING-GO.RU full version free } //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~// if (SignalRSI == true) { //WWW.TRADING-GO.RU full version free } //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~// if (Proc ==true) { if(cl>min) { double x=NormalizeDouble(cl*100/min-100,2); } if(cl<max) { double y=NormalizeDouble(cl*100/max-100,2); } if (Procent*(-1)<=y&&Close[1]>Open[1]){ sigup=1; sigdw=0; } if (Procent >=x&&Close[1]<Open[1]){ sigup=0; sigdw=1; } } //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~// int f=0; if(Martin==true) { if (total==0){f=1 ;} if (total>=1){f=total;} LotB=Lots_New*f; LotS=Lots_New*f; } //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~// if(Martin==false) { LotB=LotS; LotS=LotB; } //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~// if((b==0&&sigup==1&&s==0)||(Ask<opB-dis+spred&&b>=1&&s==0)) { OrderSend(Symbol(),OP_BUY ,LotB,Ask,Slip,0,0,"Buy ",Magic,0,Green); } if((s==0&&sigdw==1&&b==0)||(Bid>opS+dis+spred&&s>=1&&b==0)) { OrderSend(Symbol(),OP_SELL,LotS,Bid,Slip,0,0,"Sell",Magic,0,Green); } //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~// double TP= NormalizeDouble (spred+TakeProfit*Point,Digits); //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~// for (int iq=total-1; iq>=0; iq--) { if(OrderSelect(iq, SELECT_BY_POS)) { if(OrderSymbol()==Symbol()&&OrderMagicNumber()==Magic) { if (OrderType()==OP_BUY && OrderTakeProfit()==0 && b==1) { OrderModify(OrderTicket(),OrderOpenPrice(),OrderStopLoss(),NormalizeDouble(OrderOpenPrice()+TP,Digits),0,Blue); } if (OrderType()==OP_SELL && OrderTakeProfit()==0 && s==1) { OrderModify(OrderTicket(),OrderOpenPrice(),OrderStopLoss(),NormalizeDouble(OrderOpenPrice()-TP,Digits),0,Blue); } }}} //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~// double nn=0,bb=0; for(int ui=total-1; ui>=0; ui--) { if(OrderSelect(ui,SELECT_BY_POS)) { if(OrderSymbol()==Symbol()) { if(OrderType()==OP_BUY && OrderMagicNumber()==Magic) { double op=OrderOpenPrice(); double llot=OrderLots(); double itog=op*llot; bb=bb+itog; nn=nn+llot; double factb=bb/nn; } } } } double nnn=0,bbb=0; for(int usi=total-1; usi>=0; usi--) { if(OrderSelect(usi,SELECT_BY_POS)) { if(OrderSymbol()==Symbol()) { if(OrderType()==OP_SELL && OrderMagicNumber()==Magic) { double ops=OrderOpenPrice(); double llots=OrderLots(); double itogs=ops*llots; bbb=bbb+itogs; nnn=nnn+llots; double facts=bbb/nnn; } } } } for(int uui=total-1; uui>=0; uui--) { if(OrderSelect(uui,SELECT_BY_POS)) { if(OrderSymbol()==Symbol()) { if(b>=2 && OrderType()==OP_BUY && OrderMagicNumber()==Magic) { OrderModify(OrderTicket(),OrderOpenPrice(),OrderStopLoss(),factb+CORR,0,Blue); } if(s>=2 && OrderType()==OP_SELL && OrderMagicNumber()==Magic) { OrderModify(OrderTicket(),OrderOpenPrice(),OrderStopLoss(),facts-CORR,0,Blue); } } } } //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~// if ( Monitor == true ) { //WWW.TRADING-GO.RU full version free } } //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~//

Bagi temen2 yang mau nyoba silahkan di copas  dan mungkin bisa diamati programnya.
Ea ini termsuk sudah cukup baik karena sudah menggunakan perhitungan Bep untuk Take profitnya. (emang ada sedikit error untuk modifikasi ordernya tapi tidak menggganggu).

Kalo diamati emang sepertinya EA ini edisi free dan untuk signalnya belum lengkap tetapi sudah cukup baik untuk di coba di buat demo atau riel heeeee dan mungkin edisi lengkapnya dibuat premium (kali aja loh)

Nah Pada kesempatan kali ini saya akan ngoprek dengan sedikit saya tambahakan:

1. Target persen = artinya kalo target equety sudah tercapai maka EA akan berhenti trading
2. Penambahan signal berdasarkan indikator yang ada 
3. dan sedikit diberi pemanis buatan heeeeeeee

Nah sementara di sini dulu yah

hasil ngopreknya sabar dulu atau ada temen2 yang akan menyumbangkan hasil oprekannya , silahkan di kasih link atau email juga boleh

3 komentar:

1. 
   Freeware17 April 2013 19.47

   gan ini ea nga ada SL nya ya?
   takut MC gara2 nga ada SL nya
   klo ditambahkan SL nya gimana ya cara naruhnya yang pas.
   
   ditunggu jawabnnya
   makasih

   Balas
2. 
   Bang Jay21 April 2013 09.05

   Maaf master mau nanya, apakah ada EA yang bisa mengaktifkan stop order setelah harga melewati sekian pips dari harga patokan. ilustrasinya begini. misal untuk EU harga sedang bergerak naik dari level 1.2950 ke 1.3000, biasanya kalo kita mau sell di 1.3000 kan pake order Sell limit di 1.30000, tapi sering harga malah terus naik sampai menyentuh SL kita. nah saya pengennya sell stop di harga 1.30000 setelah harga menyentuh misal 1.3020. jadi EA nya mengkatifkan sell stop setelah harga naik 20 pips dari level 1.3020. terimakasi sebelumya

   Balas
   Balasan

   
   
   Jum Mian23 April 2013 14.01
   Kalo ea yang udah jadi sy gak punya bro , tapi seperti bisa dibuat silahkan kunjungi kisaran part 21 untuk referensi membuatnya!

Belajar Membuat EA Sederhana 33 (Proteksi EA)

http://jumforex.blogspot.com/2013/05/belajar-membuat-ea-sederhana-33.html

Salam Profit semuanya!

Sepertinya udah banyak sih share coding EA  sampai part 32.......

Nah kali ini kita akan belajar tentang proteksi EA ....karena ada bebepa temen di Ym yang minta di ajari proteksi EA ...............

Ada banyak cara untuk proteksi EA ataupun script dan Indikator al:

1. Proteksi Demo ==> EA hanya bisa digunakan untuk account demo.
2. Proteksi accout khusus ==> hanya bisa digunakan account tertentu saja.
3. Proteksi Broker ==> hanya bisa digunakan broker tertentu saja
4. Proteksi Pair ==> hanya bisaa digunakan pair tertentu saja.
5. Proteksi waktu ==> dibatasi sampai waktu tertentu : tgl -bulan-tahun
6. Proteksi Nama==>hanya bisa digunakan dengan nama account tertentu
7. Proteksi Pasword==> menggunakan pasword tertentu ,lisensi number 
8. Proteksi dll ==>menggunakan file dll
9. Proteksi webs==> harus tersambung dengan webs
10. dll.

Nah kita akan bahas beberapa proteksi ..............

Yang Pertama 

Proteksi account demo
Untuk memproteksi supaya  EA hanya bisa digunakandi account demo disini kita tambahkan pembaca account demo yaitu:  IsDemo()
Nah dari sini kita kembangkan dalam sebuah operasi

if(!IsDemo()){Alert("Maaf bos hanya untuk demo");return(0);}

Nah , if(!IsDemo()){ ini artinya bila tidak demo maka blabla.............yaitu Alert("Maaf bos hanya untuk demo") =>maka alert akan berbunyi dan memberi tahu ..............
ditambahkan untuk menghentikan perintah berikutnya yaitu return(0);

Code tersebut di tempatkan di dalam atau dibawah  int start(){ 
contoh:

int start(){ if(!IsDemo()){Alert("Maaf bos hanya untuk demo");return(0);}

Nah untuk lebih jelasnya saya akan proteksi EA di part 21

sehingga jadinya begini

//+-----------------------------------------------------------------------------------------+ //| 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 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; //+------------------------------------------------------------------+ //| 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(!IsDemo()){Alert("Maaf bos hanya untuk demo");return(0);} 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);} } 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|| 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; int i; for (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 ------------------------------------------------"); }

Ternyata hanya dengan sebaris perintah tersebut cukup ampuh bahwasanya EA   hanya akan bisa digunakan di account demo he he he..............Mudah kan?

Oke deh sementara disini dulu ya nanti kita saambung lagi

sabar deh