Ticket: 4436 Complete

valFvgMt5.mq5

@@ -9,6 +9,8 @@
 #include <Trade\Trade.mqh>
 CTrade  trade;
 #resource "\\Indicators\\SequentialVolumeProfileWithFVG.ex5"
+#define previousBullish "previousBullish"
+#define previousBearish "previousBearish"
 //+------------------------------------------------------------------+
 //| Expert initialization function                                   |
 //+------------------------------------------------------------------+
@@ -20,15 +22,21 @@ enum lotcalculator
   };
 enum tp_options
   {
-   zone_based,
-   risk_reward_based,
+   zone_based,          // Zone Based Tp
+   risk_reward_based,   // Risk to Reward
+  };
+enum sl_options
+  {
+   zone_based_sl,       // Zone Based Sl
+   fvg_third,           // FVG third candle high and low + buffer
   };
 
 sinput       string                  string_0                   = "<><><><><><> General SETTINGS <><><><><><>";   //__
 input        int                     magic_no                   = 333;             // Magic no
 input        tp_options              select_tp                  = zone_based;      // Select Tp
-input        double                  stoploss                   = 10;              // Fixed Stop Loss in Pips
-input        double                  takeprofit                 = 10;              // Fixed Take Profit in Pips
+input        sl_options              select_sl                  = zone_based_sl;   // Select Sl
+input        double                  stoploss                   = 4;               // FVG Third High/Low Stop Loss in Buffer
+input        double                  tpMultiplier               = 2;               // Take Profit Multiplier Risk to Reward
 
 input        string                  string_0_3                 = "<><><><><><> Lot Management<><><><><><>";   //__
 input        double                  lot_size                   = 0.1;             // Lot Size
@@ -63,6 +71,10 @@ input        color                   BearishFVGColor            = clrDeepPink;
 input        double                  MinFVGSize                 = 0.0;              // Minimum FVG size in points (0 = any size)
 input        int                     MaxBarsBack                = 300;              // How many bars to look back for FVG
 
+input       string                fvg_setting                = "<><><><><> FVG Color Setting <><><><><>";             //_
+input       color                 bullish_color              = clrAqua;     // Bullish FVG Color
+input       color                 bearish_color              = clrYellow;   // Bearish FVG Color
+
 
 // Global Variables
 int sequential_handler;
@@ -130,33 +142,42 @@ void OnTick()
    double absHigh = lines("AbsHigh");
    double absLow = lines("AbsLow");
 
-
-
-
 // Print("Val: ", val, "  Vah: ", vah, "  AbsHigh: ", absHigh, "  AbsLow: ", absLow);
    double Ask = SymbolInfoDouble(Symbol(),SYMBOL_ASK);
    double Bid = SymbolInfoDouble(Symbol(),SYMBOL_BID);
    timeConversion();
-// Comment(" Start Time: ", startTradingTime, " Close time: ", endTradingTime);
+
    if((EnableTimeFilter && TimeCurrent() >= startTradingTime && TimeCurrent() < endTradingTime) ||  !EnableTimeFilter)
      {
-      if(todayTradesCount(DEAL_TYPE_BUY) == 0)
+      if(newBar())
         {
-         if(Ask < val && Ask > absLow)
+         string gapCreated = fvg_gap();
+         if(todayTradesCount(DEAL_TYPE_BUY) == 0)
            {
-            //if(fvgOverLap("VProfFVG_up_", val))
+            if(gapCreated == previousBullish)
               {
-               placeBuyTrade();
+               double open_2 = iOpen(Symbol(), PERIOD_CURRENT, 2);
+               double close_2 = iClose(Symbol(), PERIOD_CURRENT, 2);
+               double upper_price = MathMax(open_2, close_2);
+               double lower_price = MathMin(open_2, close_2);
+               if(((upper_price > val) && (lower_price < val)) || ((upper_price < val) && (lower_price < val)))
+                 {
+                  placeBuyTrade();
+                 }
               }
            }
-        }
-      if(todayTradesCount(DEAL_TYPE_SELL) == 0)
-        {
-         if(Bid > vah && Bid < absHigh)
+         if(todayTradesCount(DEAL_TYPE_SELL) == 0)
            {
-            //if(fvgOverLap("VProfFVG_dn_", vah))
+            if(gapCreated == previousBearish)
               {
-               placeSellTrade();
+               double open_2 = iOpen(Symbol(), PERIOD_CURRENT, 2);
+               double close_2 = iClose(Symbol(), PERIOD_CURRENT, 2);
+               double upper_price = MathMax(open_2, close_2);
+               double lower_price = MathMin(open_2, close_2);  
+               if(((upper_price > vah) && (lower_price < vah)) || ((upper_price > vah) && (lower_price > vah)))
+                 {
+                  placeSellTrade();
+                 }
               }
            }
         }
@@ -278,25 +299,38 @@ void placeBuyTrade()
    double Ask = SymbolInfoDouble(Symbol(),SYMBOL_ASK);
    double Bid = SymbolInfoDouble(Symbol(),SYMBOL_BID);
 
-   if(stoploss != 0)
+//if(stoploss != 0)
+//  {
+//   buySL = Ask - (stoploss * 10 * Point());
+//  }
+   if(select_sl == zone_based_sl)
      {
-      buySL = Ask - (stoploss * 10 * Point());
+      buySL = lines("AbsLow");
+     }
+   if(select_sl == fvg_third)
+     {
+      //if(stoploss != 0)
+        {
+         buySL = iLow(Symbol(), PERIOD_CURRENT, 3) - (stoploss * 10 * Point());
+        }
      }
    if(select_tp == zone_based)
      {
       buyTp = lines("VAH");
      }
-   //if(select_tp == risk_reward_based)
-   //  {
-   //distance = ((price - buySl) / Point());
-   //distance = (distance * tpMultiplier);
-   //  }
+   if(select_tp == risk_reward_based)
+     {
+      double distance = MathAbs((Ask - buySL) / Point());
+      distance  = (distance * tpMultiplier);
+      buyTp    = Ask + (distance * Point());
+     }
 //if(takeprofit != 0)
 //  {
 //   buyTp = Ask + (takeprofit * 10 * Point());
 //  }
 
-   if(trade.PositionOpen(Symbol(),ORDER_TYPE_BUY,getlot(stoploss * 10),Ask,buySL,buyTp,"Buy Trade Placed"))
+   double distance_sl = MathAbs((Ask - buySL) / Point());
+   if(trade.PositionOpen(Symbol(),ORDER_TYPE_BUY,getlot(distance_sl),Ask,buySL,buyTp,"Buy Trade Placed"))
      {
       Print("Buy Trade Placed: ",trade.ResultOrder());
      }
@@ -316,16 +350,40 @@ void placeSellTrade()
    double Ask = SymbolInfoDouble(Symbol(),SYMBOL_ASK);
    double Bid = SymbolInfoDouble(Symbol(),SYMBOL_BID);
 
-   if(stoploss != 0)
+//if(stoploss != 0)
+//  {
+//   sellSL = Bid + (stoploss * 10 * Point());
+//  }
+   if(select_sl == zone_based_sl)
+     {
+      sellSL = lines("AbsHigh");
+     }
+
+   if(select_sl == fvg_third)
+     {
+      //if(stoploss != 0)
+        {
+         sellSL = iHigh(Symbol(), PERIOD_CURRENT, 3) + (stoploss * 10 * Point());
+        }
+     }
+//if(takeprofit != 0)
+//  {
+//   sellTp = Bid - (takeprofit * 10 * Point());
+//  }
+
+   if(select_tp == zone_based)
      {
-      sellSL = Bid + (stoploss * 10 * Point());
+      sellTp = lines("VAL");
      }
-   if(takeprofit != 0)
+   if(select_tp == risk_reward_based)
      {
-      sellTp = Bid - (takeprofit * 10 * Point());
+      double distance = MathAbs((Bid - sellSL) / Point());
+      distance  = (distance * tpMultiplier);
+      sellTp    = Bid - (distance * Point());
      }
 
-   if(trade.PositionOpen(Symbol(),ORDER_TYPE_SELL,getlot(stoploss * 10),Bid,sellSL,sellTp,"Sell Trade Placed"))
+   double distance_sl = MathAbs((Bid - sellSL) / Point());
+   if(trade.PositionOpen(Symbol(),ORDER_TYPE_SELL,getlot(distance_sl),Bid,sellSL,sellTp,"Sell Trade Placed"))
      {
       Print("Sell Trade PLaced: ",trade.ResultOrder());
      }
@@ -386,4 +444,122 @@ double getlot(double stop_loss)
 //+------------------------------------------------------------------+
 //|                                                                  |
 //+------------------------------------------------------------------+
+string check_bearish_bullish()
+  {
+
+   int bullishCount = 0;
+   int bearishCount = 0;
+
+   for(int i = 1; i <= 3; i++)
+     {
+      double open = iOpen(Symbol(), PERIOD_CURRENT, i);
+      double close = iClose(Symbol(), PERIOD_CURRENT, i);
+
+      if(close > open)
+        {
+         bullishCount++;
+        }
+      else
+         if(close < open)
+           {
+            bearishCount++;
+           }
+     }
+
+// Output the result
+   if(bullishCount > bearishCount)
+     {
+      return previousBullish;
+     }
+   else
+      if(bearishCount > bullishCount)
+        {
+         return previousBearish;
+        }
+      else
+        {
+         return NULL;
+        }
+
+  }
+//+------------------------------------------------------------------+
+//|                                                                  |
+//+------------------------------------------------------------------+
+string fvg_gap()
+  {
+//Print("Imbalance: ");
+   if(check_bearish_bullish() == previousBullish)
+     {
+      if(iLow(Symbol(), PERIOD_CURRENT, 1) > iHigh(Symbol(), PERIOD_CURRENT, 3))
+        {
+         //double fvg_body = imbalance_gap * 10; // FVG Body
+         double fvg_size = MathAbs((iLow(Symbol(), PERIOD_CURRENT, 1) - iHigh(Symbol(), PERIOD_CURRENT, 3))/Point());
+         //fvg_size = fvg_size * 10 * Point();
+
+         //if(fvg_size > fvg_body)
+           {
+            if(!ObjectCreate(0, "Buy" + (string) TimeCurrent(), OBJ_RECTANGLE, 0, iTime(Symbol(), PERIOD_CURRENT, 3), iHigh(Symbol(), PERIOD_CURRENT, 3), iTime(Symbol(), PERIOD_CURRENT, 1), iLow(Symbol(), PERIOD_CURRENT, 1)))
+              {
+               Print(" Error in Drawing Buy Rectangle : "," rectangle "+(string)iTime(Symbol(),PERIOD_CURRENT,1)," ",GetLastError());
+              }
+            else
+              {
+               ObjectSetInteger(0, "Buy"+ (string) TimeCurrent(), OBJPROP_COLOR, bullish_color);
+               ObjectSetInteger(0,"Buy"+ (string) TimeCurrent(), OBJPROP_FILL, true);
+               //ObjectSetInteger(0,"Range",OBJPROP_BACK,false);
+               Print("Bullish Fvg Body Size: ", fvg_size, " Name: ", "Buy" + (string) TimeCurrent());
+               return previousBullish;
+              }
+           }
+        }
+     }
+   if(check_bearish_bullish() == previousBearish)
+     {
+      if(iLow(Symbol(), PERIOD_CURRENT, 3) > iHigh(Symbol(), PERIOD_CURRENT, 1))
+        {
+         //double fvg_body = imbalance_gap * 10; // FVG Body
+         double fvg_size = MathAbs((iLow(Symbol(), PERIOD_CURRENT, 3) - iHigh(Symbol(), PERIOD_CURRENT, 1))/Point());
+         //fvg_size = fvg_size * 10 * Point();
+
+         //if(fvg_size > fvg_body)
+           {
+
+            if(!ObjectCreate(0, "Sell" + (string) TimeCurrent(), OBJ_RECTANGLE, 0, iTime(Symbol(), PERIOD_CURRENT, 3), iLow(Symbol(), PERIOD_CURRENT, 3), iTime(Symbol(), PERIOD_CURRENT, 1), iHigh(Symbol(), PERIOD_CURRENT, 1)))
+              {
+               Print(" Error in Drawing Sell Rectangle : "," rectangle "+(string)iTime(Symbol(),PERIOD_CURRENT,1)," ",GetLastError());
+              }
+            else
+              {
+               ObjectSetInteger(0, "Sell"+ (string) TimeCurrent(), OBJPROP_COLOR, bearish_color);
+               ObjectSetInteger(0,"Sell"+ (string) TimeCurrent(), OBJPROP_FILL, true);
+               //ObjectSetInteger(0,"Range",OBJPROP_BACK,false);
+               Print("Bearish Fvg Body Size: ", fvg_size, " Name: ", "Buy" + (string) TimeCurrent());
+               return previousBearish;
+              }
+           }
+        }
+     }
+   return NULL;
+  }
+//+------------------------------------------------------------------+
+//|                                                                  |
+//+------------------------------------------------------------------+
+bool newBar()
+  {
+   static datetime lastbar;
+   datetime curbar = iTime(Symbol(), PERIOD_CURRENT, 0);
+   if(lastbar != curbar)
+     {
+      lastbar = curbar;
+      Print("<<<<<<<<>>>>>>>>>>>>New Bar Time V1.1. ", curbar, "<<<<<<<<>>>>>>>>>>>>");
+      return (true);
+     }
+   else
+     {
+      return (false);
+     }
+  }
+//+------------------------------------------------------------------+
+//|                                                                  |
+//+------------------------------------------------------------------+
 //+------------------------------------------------------------------+