Creating EA Robot Trading Forex 32-40

Creating EA Robot Trading Forex 32 : Create EA Close All Order Dalam 1 Pair Pada Jam dan Menit Tertentu Ofx 1Mei24

//+-------------------------------------------------------------------------------------+ //| Create EA Close All Order Dalam 1 Pair Pada Jam dan Menit Tertentu Ofx 1Mei24.mq4 | //| Website Tutorial Cara Daftar MT4 | //| https://caradaftarmt4.net | //+-------------------------------------------------------------------------------------+ #property copyright "Website Tutorial Cara Daftar MT4" #property link "https://caradaftarmt4.net" #property version "1.00" #property strict extern string NamaRobot = "EA Close All Order Dalam 1 Pair Pada Jam dan Menit Tertentu 32"; extern bool CloseAllOrder = false; extern int Jam = 23; extern int Menit = 5; extern bool Senin = true; extern bool Selasa = true; extern bool Rabu = true; extern bool Kamis = true; extern bool Jumat = true; extern bool Sabtu = true; string j_1; //+------------------------------------------------------------------+ //| expert initialization function | //+------------------------------------------------------------------+ int init() { return(0); } //+------------------------------------------------------------------+ //| Expert deinitialization function | //+------------------------------------------------------------------+ void OnDeinit(const int reason) { //--- } //+------------------------------------------------------------------+ //| Expert tick function | //+------------------------------------------------------------------+ void OnTick() { Infonya(); if(CloseAllOrder) j_1=" On"; else j_1=" Off"; if(CloseAllOrder && Hour() == Jam && Minute()== Menit && tday()==1) c(); return; } //+------------------------------------------------------------------+ 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; if(Sabtu && DayOfWeek()==6) trd=1; return(trd); } //+------------------------------------------------------------------+ void c() { for(int i = OrdersTotal() - 1; i >= 0; i--) { OrderSelect(i, SELECT_BY_POS, MODE_TRADES); if(OrderSymbol() != Symbol()) 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); } } } //+------------------------------------------------------------------+ void Infonya() { static double deposit = AccountBalance(); string sigCandle = ""; if(Open[1]<Close[1]) sigCandle = "Grafik Naik"; else if(Open[1]>Close[1]) sigCandle = "Grafik Turun"; Comment("\n Spread : ", MarketInfo(Symbol(), MODE_SPREAD), ", Leverage 1 : ", AccountLeverage(), ", Deposit : ", DoubleToStr(deposit,2), ", Balance : ", DoubleToStr(AccountBalance(),2), ", Equity : ", DoubleToStr(AccountEquity(),2), ", Jam : ", Hour(), ":", Minute(), ":", Seconds(), ", Tren : ", sigCandle, "\n\n Program Close Order : ", j_1, ", Close Order Pada Jam : ", Jam, " Lebih : ",Menit, " Menit", "\n" ); } //+------------------------------------------------------------------+

Creating EA Robot Trading Forex 33: EA Jebakan News Berita NFP With Trailing Stop.

//+------------------------------------------------------------------+ //| Create EA Jebakan News NFP Ofx 1Mei24.mq4 | //| Website Tutorial Cara Daftar MT4 | //| https://caradaftarmt4.net | //+------------------------------------------------------------------+ #property copyright "Website Tutorial Cara Daftar MT4" #property link "https://caradaftarmt4.net" #property version "1.00" #property strict extern string Nama_EA = "EA Jebakan News NFP With Trailing Stop"; extern bool EntryBuyStop = true; extern bool EntrySellStop = true; extern int Jam = 0; extern int Menit = 30; extern bool UseTpinMoney = false; extern double TpinMoney = 5; extern double Lots = 0.01; extern int TP = 150; extern int SL = 15; extern int JarakPendingOrder = 25; extern bool UseTrailingStop = true; extern int TrailingStop = 12; extern int Magic = 77; 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() { label(); if(UseTrailingStop) trailingstop(); if(UseTpinMoney) { if(TpinMoney<= money(0)) { closeall(0); closeall(2); } if(TpinMoney<= 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 + JarakPendingOrder*pt; double bi = Bid - JarakPendingOrder*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()!=0 && Hour()==Jam && Minute()==Menit && jumlahorder(0)==0 && jumlahorder(1)==0) { if(jumlahorder(4)==0 && EntryBuyStop) { OrderSend(Symbol(),OP_BUYSTOP,NR(Lots),as,3,slb, tpb,Nama_EA,Magic,0,Blue); } if(jumlahorder(5)==0 && EntrySellStop) { 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 trailingstop() { 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; } } } 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; } } } } } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ 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 EA JEBAKAN NEWS NFP WITH TRAILING STOP", "\n\n Spread: ", MarketInfo(Symbol(), MODE_SPREAD), "\n\n Leverage: 1 : ", AccountLeverage(), "\n\n Balance: ", DoubleToStr(AccountBalance(),2), "\n\n Equity: ", DoubleToStr(AccountEquity(),2), "\n\n Jam MT4:", Hour(), ":", Minute(), "\n\n Floting buy : ", DoubleToStr(money(0),2), "\n\n Floting sell : ", DoubleToStr(money(1),2), "\n "); }

Creating EA Robot Trading Forex 34: EA Fractals di Edit Jadi EA Osma Signal Buy Sell Buy Sell Lot diGandakan.

//+------------------------------------------------------------------+ //| OSMA SINYAL MT4.mq4 | //| Website Tutorial Daftar Akun Metatrader4 | //| https://daftarmt4.my.id | //+------------------------------------------------------------------+ #property copyright "Website Tutorial Daftar Akun Metatrader4" #property link "https://daftarmt4.my.id" #property version "1.00" //#property strict /* agus mursalim <vipninjatrader@gmail.com> 30/4/2024 pak saya minta ea ini yg sebelumnya di mt5 mau dibuatkan ke mt4 saja pak, saya akan donasi ke bapak ya. terus pak untuk perkalian martingalenya kalau bisa ada angka desimalnya pak. terus pak tambahkan detailnya pak profitnya dsb ya. saya sudah transfer y pak */ extern string NamaRobot = "OSMA SINYAL MT4"; extern int PriceDigits = 3; bool UseTargetEquity = False; double TargetEquity = 10000; extern double LevelBuyOsma = 0.0005; extern double LevelSellOsma = -0.0005; int Mulai_Jam = 0; int Akhir_Jam = 24; extern double Lots = 0.01; extern int TP = 5; extern int SL = 5; extern int MaxOrder = 12; extern double Multiplier = 2; extern int Magic = 99; double slb,tpb,sls,tps,pt,bal; //+------------------------------------------------------------------+ //| expert initialization function | //+------------------------------------------------------------------+ int init() { //---- bal= AccountBalance(); if(Digits==PriceDigits || 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("TP dan SL Tidak Boleh di Isi 0"); return(0); } label(); /*if(UseTargetEquity) { if(TargetEquity<AccountEquity()) { closeall(0); closeall(1); Alert("Kolom Target Equity Harus di Isi Lebih Besar dari Balance"); 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;*/ double iOSMA = iOsMA(NULL,0,12,26,9,PRICE_OPEN,0); if(Jam_trade()==1 && DayOfWeek()>0) { if((trad(1)>0) || (trad(1)==0)) { if(jumlahorder(0)==0 && jumlahorder(1)==0) { //if(signal==1) if(iOSMA > LevelBuyOsma) { OrderSend(Symbol(),OP_BUY,NR(Lots),Ask,3,Ask-SL*pt, Ask+TP*pt,"Osma Buy",Magic,0,Blue); } //if(signal==2) if(iOSMA < LevelSellOsma) { OrderSend(Symbol(),OP_SELL,NR(Lots),Bid,3,Bid+SL*pt, Bid-TP*pt,"Osma Sell",Magic,0,Red); } } } } if(jumlahorder(0)==0 && jumlahorder(1)==0 && trad(3)<MaxOrder+Magic) { if(trad(1)<0 && trad(2)==1)// && iOSMA > LevelBuyOsma) { OrderSend(Symbol(),OP_BUY,xlot(),Ask,3,Ask-SL*pt, Ask+TP*pt,"Osma Martingale Buy",trad(3)+1,0,Blue); } if(trad(1)<0 && trad(2)==0)// && iOSMA < LevelSellOsma) { OrderSend(Symbol(),OP_SELL,xlot(),Bid,3,Bid+SL*pt, Bid-TP*pt,"Osma Martingale Sell",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() || OrderType()!=tipe) //|| OrderComment() != Nama_EA) 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() || OrderType()!=m) //|| OrderComment() != Nama_EA) 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*Multiplier); return(ylot); } //+------------------------------------------------------------------+ void label() { static double deposit = AccountBalance(); double iOSMA = iOsMA(NULL,0,12,26,9,PRICE_OPEN,0); string sinyal = ""; if(OrdersTotal()>0 && iOSMA > LevelBuyOsma) sinyal = "Harga Naik"; else if(OrdersTotal()>0 && iOSMA < LevelSellOsma) sinyal = "Harga Turun"; else sinyal = ""; Comment("\n ", AccountCompany(), ", ", AccountName(), ", ", AccountNumber(), ", Spread : ", MarketInfo(Symbol(), MODE_SPREAD), ", Leverage 1 : ", AccountLeverage(), "\n\n Deposit : ", DoubleToStr(deposit,2), ", Balance : ", DoubleToStr(AccountBalance(),2), ", Equity : ", DoubleToStr(AccountEquity(),2), //", Target Equity : ", DoubleToStr(TargetEquity,2), "\n\n Tanggal : ", Day(), "-", Month(), "-", Year(),", Jam : ", Hour(), ":", Minute(), ":", Seconds(), "\n\n Profits :", DoubleToStr(money(),2), //", Level :", trad(3)-Magic, ", Tren : ", sinyal, "" ); } //+------------------------------------------------------------------+

Creating EA Robot Trading Forex 35: EA Challenges News and Markets Trending With Compound Lots Buy Sell Stop Sell Buy Stop Lots diLipat Gandakan

//+------------------------------------------------------------------+ //| Create EA Challenges News and Markets Trending Ofx 1Mei24.mq4 | //| Website Tutorial Cara Daftar MT4 | //| https://caradaftarmt4.net | //+------------------------------------------------------------------+ #property copyright "Website Tutorial Cara Daftar MT4" #property link "https://caradaftarmt4.net" #property version "1.00" #property strict extern string NamaEA = "EA Challenges News and Markets Trending With Compound Lots Buy Sell Stop Sell Buy Stop Lots diLipat Gandakan"; extern bool CloseAllStopTrade = false; extern bool Buy = true; extern bool Sell = true; extern double Lots = 0.01; extern int TP = 50; extern int SL = 25; extern int MaxLevel = 10; extern color HariTrading = Blue; extern bool Senin = false; extern bool Selasa = true; extern bool Rabu = true; extern bool Kamis = true; extern bool Jumat = true; extern bool Sabtu = true; extern color SetingJam = Red; extern int Mulai_Jam = 3; extern int Akhir_Jam = 24; extern bool UseCompoundLots = False; extern double ManageBalance = 10000; extern int Magic = 345; double slbx,tpbx,slsx,tpsx,slb,tpb,sls,tps,pt,lslb,ltpb,x,slbk,tpbk,slsk,tpsk; int s,p,pp; string k="EA_Profit",kk="EA_Profit"; //+------------------------------------------------------------------+ //| expert initialization function | //+------------------------------------------------------------------+ 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(CloseAllStopTrade) { 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(UseCompoundLots) x = AccountEquity() / ManageBalance; else x=Lots; 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 && !CloseAllStopTrade && tday()==1) { 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 < MaxLevel) { 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 < MaxLevel) { 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; if(Sabtu && DayOfWeek()==6) 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; { dp += OrderProfit(); } } return(dp); } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ void label() { static double deposit = AccountBalance(); 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 Spread : ", MarketInfo(Symbol(), MODE_SPREAD), ", Leverage 1 : ", AccountLeverage(), ", Deposit : ", DoubleToStr(deposit,2), ", Balance : ", DoubleToStr(AccountBalance(),2), ", Equity : ", DoubleToStr(AccountEquity(),2), ", Jam : ", Hour(), ":", Minute(), ":", Seconds(), ", Floating Buy: ", DoubleToStr(f(k,0)+f(kk,0),2), ", Floating Sell: ", DoubleToStr(f(k,1)+f(kk,1),2), ", Level Pro : ", x, ", Level Fit : ", y, "" ); } //+------------------------------------------------------------------+

Creating EA Robot Trading Forex 38: EA Keltner Averaging OP 1x Per Candle UseTPinMoney.

//+------------------------------------------------------------------+ //| Create EA Keltner Averaging Ofx 1Mei24.mq4 | //| Website Tutorial Cara Daftar MT4 | //| https://caradaftarmt4.net | //+------------------------------------------------------------------+ #property copyright "Website Tutorial Cara Daftar MT4" #property link "https://caradaftarmt4.net" #property version "1.00" #property strict extern string NamaEA = "EA Keltner Averaging OP 1x Per Candle 38"; extern bool UseTPinMoney = true; extern int TPinMoney = 15; extern double Lot = 0.01; extern int TP = 11; extern int SL = 20; extern bool SL_otomatis = false; extern int MaxOrder = 10; extern int Magic = 55; extern int ModeMA = 0; extern int PriceTip = 5; extern int PeriodMA = 10; 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 tick function | //+------------------------------------------------------------------+ int start() { lab(); if(UseTPinMoney) { if(TPinMoney<=man())closeall(); } double kfa = iCustom(Symbol(),0,"IFX_Keltner_Channel",PeriodMA,ModeMA,PriceTip,0,0); double kfm = iCustom(Symbol(),0,"IFX_Keltner_Channel",PeriodMA,ModeMA,PriceTip,1,0); double kfb = iCustom(Symbol(),0,"IFX_Keltner_Channel",PeriodMA,ModeMA,PriceTip,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; } if(w!=Time[0] && Open[0]==Close[0] && High[0]==Low[0]) { if(Ask<kfb && JumlahOrder(0)<MaxOrder) { OrderSend(Symbol(),OP_BUY,Lot,Ask,3,SLb,TPb,"EA Keltner Channel Buy",Magic,0,Blue); } if(Bid>kfa && JumlahOrder(1)<MaxOrder) { OrderSend(Symbol(),OP_SELL,Lot,Bid,3,SLs,TPs,"EA Keltner Channel Sell",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; 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; 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() { static double deposit = AccountBalance(); string sigKeltner = ""; double kfa = iCustom(Symbol(),0,"IFX_Keltner_Channel",PeriodMA,ModeMA,PriceTip,0,0); double kfb = iCustom(Symbol(),0,"IFX_Keltner_Channel",PeriodMA,ModeMA,PriceTip,2,0); if(Ask < kfb) sigKeltner = "Grafik Naik"; else if(Bid > kfa) sigKeltner = "Grafik Turun"; Comment("\n Spread : ", MarketInfo(Symbol(), MODE_SPREAD), ", Leverage 1 : ", AccountLeverage(), ", Deposit : ", DoubleToStr(deposit,2), ", Balance : ", DoubleToStr(AccountBalance(),2), ", Equity : ", DoubleToStr(AccountEquity(),2), ", Jam : ", Hour(), ":", Minute(), ":", Seconds(), ", Op Buy : ", JumlahOrder(0), ", Op Sell : ", JumlahOrder(1), ", Tren : ", sigKeltner, "\n" ); } //+------------------------------------------------------------------+

Creating EA Robot Trading Forex 39. EA Martingale Modify TP TPnya Ikut TP OP EA Yang Terakhir.

//+------------------------------------------------------------------+ //| Create EA Martingale Modify TP Ofx 1Mei24.mq4 | //| Website Tutorial Cara Daftar MT4 | //| https://caradaftarmt4.net | //+------------------------------------------------------------------+ #property copyright "Website Tutorial Cara Daftar MT4" #property link "https://caradaftarmt4.net" #property version "1.00" #property strict input string BotName = "EA Martingale Modify TP 39"; input double Lots = 0.01; input int TP = 40; input int SL = 0; input int JarakOrder = 25; input double Multiplier = 2; input int MaxOrder = 10; input int Magic = 88; double pt,SLb,TPb,SLs,TPs; int res,ras; //+------------------------------------------------------------------+ //| expert initialization function | //+------------------------------------------------------------------+ int OnInit() { //--- if(Digits==3 || Digits==5) pt=10*Point; else pt=Point; //--- return(INIT_SUCCEEDED); } //+------------------------------------------------------------------+ //| Expert deinitialization function | //+------------------------------------------------------------------+ void OnDeinit(const int reason) { //--- } //+------------------------------------------------------------------+ //| Expert tick function | //+------------------------------------------------------------------+ void OnTick() { md(); label(); 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(JumlahOrder(0)+JumlahOrder(1)==0) { if(Open[1]<Close[1]) { res=OrderSend(Symbol(),OP_BUY,(Lots),Ask,3,SLb,TPb,"EA Buy",Magic,0,Blue); } if(Open[1]>Close[1]) { res=OrderSend(Symbol(),OP_SELL,(Lots),Bid,3,SLs,TPs,"EA Sell",Magic,0,Red); } } if(trad()==1 && JumlahOrder(0)>=1 && JumlahOrder(0)< MaxOrder) { res=OrderSend(Symbol(),OP_BUY,xlot(0),Ask,3,SLb, TPb,"EA Martingale Buy",Magic,0,Blue); } if(trad()==2 && JumlahOrder(1)>=1 && JumlahOrder(1)< MaxOrder) { res=OrderSend(Symbol(),OP_SELL,xlot(1),Bid,3,SLs,TPs,"EA Martingale Sell",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 - JarakOrder * pt; double bi = ops + JarakOrder * 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(Multiplier,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; 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; 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 label() { static double deposit = AccountBalance(); string sigtren = ""; if(Open[1]<Close[1]) sigtren = "Grafik Naik"; else if(Open[1]>Close[1]) sigtren = "Grafik Turun"; Comment("\n Spread : ", MarketInfo(Symbol(), MODE_SPREAD), ", Leverage 1 : ", AccountLeverage(), ", Deposit : ", DoubleToStr(deposit,2), ", Balance : ", DoubleToStr(AccountBalance(),2), ", Equity : ", DoubleToStr(AccountEquity(),2), ", Jam : ", Hour(), ":", Minute(), ":", Seconds(), ", Floating : ", DoubleToStr(man(),2), ", Buy : ", JumlahOrder(0), ", Sell : ", JumlahOrder(1), ", Tren : ", sigtren, "\n" ); } //+------------------------------------------------------------------+

Creating EA Robot Trading Forex 40. EA Averaging. EA Hidden TP Pakai Perhitungan BEP. Trigger Entry EA Pakai Signal Indikator MACD Dengan OP nya diBatasi 1 Kali Entry Per Candle. EA diLengkapi Dengan Setingan Input CloseAll Jika diPilih True Maka Semua Entry Akan diClose Oleh EA dan Setelah Itu EA Akan Berhenti Trading.

//+------------------------------------------------------------------+ //| Create EA MACD Fixed/ Compound Lots Ofx 1Mei24.mq4 | //| Website Tutorial Cara Daftar MT4 | //| https://caradaftarmt4.net | //+------------------------------------------------------------------+ #property copyright "Website Tutorial Cara Daftar MT4" #property link "https://caradaftarmt4.net" #property version "1.00" #property strict extern string EAname = "EA MACD 40"; extern bool CLoseAll = false; extern int Mulai_Jam = 0; extern int Akhir_Jam = 24; extern bool UseCompoundLots = true; extern double Ketahanan = 10000; extern double LotsFixed = 0.01; extern double TP = 10; extern int MaxOrder = 20; extern int FastEMA = 12; extern int SlowEMA = 26; extern int MACDSMA = 6; extern int Magic = 77; bool nx=false; double pt,lx,tp,sl; string Nama = "EA MACD 40"; double op,os,opx,osx; int sg,sn,ti,x; int p[10]; //+------------------------------------------------------------------+ //| expert initialization function | //+------------------------------------------------------------------+ int init() { if(Digits==3 || Digits==5) pt=10*Point; else pt=Point; return(0); } //+------------------------------------------------------------------+ //| Expert deinitialization function | //+------------------------------------------------------------------+ void OnDeinit(const int reason) { //--- } //+------------------------------------------------------------------+ //| Expert tick function | //+------------------------------------------------------------------+ int start() { label(); if(UseCompoundLots) lx=AccountEquity()/Ketahanan; else lx=LotsFixed; if(CLoseAll) { 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) { if(j(1,0)+j(1,1)< MaxOrder) { 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,FastEMA,SlowEMA,MACDSMA,PRICE_CLOSE,MODE_MAIN,i)); } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ double mcs(int i) { return(iMACD(NULL,0,FastEMA,SlowEMA,MACDSMA,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() { static double deposit = AccountBalance(); string sigMACD = ""; if(sig()==1) sigMACD = "Grafik Naik"; else if(sig()==2) sigMACD = "Grafik Turun"; Comment("\n Spread : ", MarketInfo(Symbol(), MODE_SPREAD), ", Leverage 1 : ", AccountLeverage(), ", Deposit : ", DoubleToStr(deposit,2), ", Balance : ", DoubleToStr(AccountBalance(),2), ", Equity : ", DoubleToStr(AccountEquity(),2), ", Jam : ", Hour(), ":", Minute(), ":", Seconds(), ", Floating : ", DoubleToStr(j(2,0)+j(2,1),2), ", Buy : " , j(1,0), ", Sell : ", j(1,1), ", Tren : ", sigMACD, "\n" ); } //+------------------------------------------------------------------+

Baca Juga: Kursus Membuat EA Forex 2-6.

Ada Pertanyaan Mengenai Creating EA Robot Trading Forex? atau Anda Berminat dan Serius Untuk Daftar Kursus Belajar Membuat EA Robot Trading Forex atau Gold? Silahkan Anda Hubungi ke Kontak Kami.