MA CrossOver

Hello semua,

Belajar Code MQL4 tidaklah rumit,
selama ini kita kesulitan karena tidak tahu harus memulai dari mana, menggunakan apa dan bagaimana tahapan kerja EA.

Saya mau share code yang simple untuk membuat EA yang menggunakan 2 indicator Moving Average (MA) yang saling bersilangan (cross over) sebagai signal entry.
Contoh ini juga sudah lengkap dengan peggunaan magicNumber.

Code ini dibuat untuk tujuan belajar ya...

Silahkan download file mql4 untuk dicoba dan pahami.
Bila ada yang kurang jelas, silahkan balas balas comment atau bisa join group sharing code mql
t.me/codeMQL

 

Code:

//+------------------------------------------------------------------+
//|                                                      MACross.mq4 |
//|                                     Copyright 2020, Signal Forex |
//|                                           https://signalforex.id |
//+------------------------------------------------------------------+
#property copyright "Copyright 2020, Signal Forex"
#property link      "https://signalforex.id"
#property version   "1.00"
#property strict

//--- input parameters
input    int      period_ma_fast = 8;
input    int      period_ma_slow = 20;

input    double   takeProfit  = 20.0;
input    double   stopLoss    = 20.0;

input    double   lotSize     = 0.01;
input    double   minEquity   = 100.0;

input    int Slippage = 3;
input    int MagicNumber = 889;

//Variabel Global
double   myPoint    = 0.0;
int      mySlippage = 0;
int      BuyTicket   = 0;
int      SellTicket  = 0;

//+------------------------------------------------------------------+
//| Expert initialization function                                   |
//+------------------------------------------------------------------+
int OnInit()
{
   //validasi input, sebaiknya kita selalu melakukan validasi pada initialisasi data input
   if (period_ma_fast >= period_ma_slow || takeProfit < 0.0 || stopLoss < 0.0 || lotSize < 0.01 || minEquity < 10){
      Alert("WARNING - Input data inisial tidak valid");
      return (INIT_FAILED);
   }
   
   myPoint = GetPipPoint(Symbol());
   mySlippage = GetSlippage(Symbol(),Slippage);

   return(INIT_SUCCEEDED);
}

//+------------------------------------------------------------------+
//| Expert deinitialization function                                 |
//+------------------------------------------------------------------+
void OnDeinit(const int reason)
{
   Print ("EA telah diberhentikan");
}

//+------------------------------------------------------------------+
//| Expert tick function                                             |
//+------------------------------------------------------------------+
void OnTick()
{
   if (cekMinEquity()){
     
     
      int signal = -1;
      bool isNewCandle = NewCandle(Period(), Symbol());
     
      signal = getSignal(isNewCandle);
      transaction(isNewCandle, signal);
      //setTPSL();
     
     
   }else{
      //Stop trading, karena equity tidak cukup
      Alert ("EA akan segera diberhentikan karena equity tidak mencukup");
      ExpertRemove();
   }
}

void transaction(bool isNewCandle, int signal){
   if (isNewCandle==false) return;
   
   int   tOrder = 0;
   int   tOrderBuy = 0, tOrderSell = 0;
   string   strMN = "", pair = "";
   int   tiketBuy = 0, tiketSell = 0;
   double   lotBuy = 0.0, lotSell = 0.0;
   
   pair = Symbol();
   
   tOrder = OrdersTotal();
   for (int i=tOrder-1; i>=0; i--){
      bool hrsSelect = OrderSelect(i, SELECT_BY_POS, MODE_TRADES);
      strMN = IntegerToString(OrderMagicNumber());
      if (StringFind(strMN, IntegerToString(MagicNumber), 0) == 0 && StringFind(OrderSymbol(), pair, 0) == 0 ){
         if (OrderType() == OP_BUY){
            tOrderBuy++;
            tiketBuy = OrderTicket();
            lotBuy   = OrderLots();
         }
         if (OrderType() == OP_SELL){
            tOrderSell++;
            tiketSell = OrderTicket();
            lotSell   = OrderLots();
         }
         
      }//end if magic number && pair
     
   }//end for
   
   double lot = 0.0;
   double hargaOP = 0.0;
   double sl = 0.0, tp = 0.0;
   int    tiket = 0;
   int    orderType = -1;
   
   //Open pertama kali
   if (signal == OP_BUY && tOrderBuy == 0){
      lot = getLotSize();
      orderType = signal;
      hargaOP = Ask;
      tiket = OrderSend(Symbol(), orderType, lot, hargaOP, mySlippage, sl, tp, "OP BUY", MagicNumber, 0, clrBlue);
      if (tiketSell > 0){
         if (OrderClose(tiketSell, lotBuy, Ask, mySlippage, clrRed)){
            Print ("Close successful");
         }
      }
   }else if (signal == OP_SELL && tOrderSell == 0){
      lot = getLotSize();
      orderType = signal;
      hargaOP = Bid;
      tiket = OrderSend(Symbol(), orderType, lot, hargaOP, mySlippage, sl, tp, "OP SELL", MagicNumber, 0, clrRed);
      if (tiketBuy > 0){
         if (OrderClose(tiketBuy, lotSell, Bid, mySlippage, clrRed)){
            Print ("Close successful");
         }
      }
   }
   
}

int getSignal(bool isNewCandle){
   int signal = -1;
   
   if (isNewCandle==true){
      //Moving Averages
      double maFast1 = iMA(NULL, 0, period_ma_fast, 0, MODE_SMA, 0, 1);
      double maSlow1 = iMA(NULL, 0, period_ma_slow, 0, MODE_SMA, 0, 1);
      double maFast2 = iMA(NULL, 0, period_ma_fast, 0, MODE_SMA, 0, 2);
      double maSlow2 = iMA(NULL, 0, period_ma_slow, 0, MODE_SMA, 0, 2);
     
      if(maFast2 <= maSlow2 && maFast1 > maSlow1){
         signal = OP_BUY;
      }else if(maFast2 >= maSlow2 && maFast1 < maSlow1){
         signal = OP_SELL;
      }
   }
   
   return (signal);
}


double getLotSize(){
   double lot = 0.0;
   lot = NormalizeDouble(lotSize, 2);
   return (lot);
}

//fungsi tambahan untuk cek equity minimum
bool cekMinEquity(){
   bool valid = false;
   double equity = 0.0;
   equity = AccountEquity();
   
   if (equity > minEquity){
      valid = true;
   }
   return (valid);
}

// Fungsi GetPipPoint
double GetPipPoint(string pair)
{
   double point= 0.0;
   int digits = (int) MarketInfo(pair, MODE_DIGITS);
   if(digits == 2 || digits== 3) point= 0.01;
   else if(digits== 4 || digits== 5) point= 0.0001;
   return(point);
}

// Fungsi GetSlippage
int GetSlippage(string pair, int SlippagePips)
{
   int slippage = 0;
   int digit = (int) MarketInfo(pair,MODE_DIGITS);
   if(digit == 2 || digit == 4) slippage = SlippagePips;
   else if(digit == 3 || digit == 5) slippage = SlippagePips * 10;
   return(slippage );
}

bool NewCandle(int tf, string pair = "" ){
   bool isNewCS  = false;
   static datetime prevTime   = TimeCurrent();
   if (pair == "") pair = Symbol();
   if (prevTime < iTime(pair, tf, 0)){
      isNewCS  = true;
      prevTime = iTime(pair, tf, 0);
   }
   return isNewCS;
}

 

Apakah Script di atas langsung bisa kita gunakan ? Kita hanya edit MA saja ?

 

Bisa langsung digunakan.

untuk aplikasi lebih luas atau pengembangannya, bisa ikut group diskusi kami t.me/codeMQL.
Disitu kita bisa belajar dan sharing lebih banyak ttg code MQL4

 

This is my review for this thread:
Tema yang bagus, sangat bermanfaat buat materi belajar.
Terima kasih.