Blessing 2 v5.2 BBStoch V0.2

Author: Copyright FiFtHeLeMeNt/J Talon LLC � 2007-2009, .
Profit factor:
0.00

Okay, here's a breakdown of how the "Blessing 2 v5.2" MetaTrader script works, explained in a way that's easy to understand even if you don't know how to code:

In Simple Terms

This script is like an automated trading assistant that tries to make money by placing buy and sell orders in the market. It's designed to automatically manage trades based on a set of rules and settings. The key idea is that it trades in both directions. It tries to profit whether the price goes up or down.

Core Concepts

  1. The Goal: The script's main goal is to generate profit by opening and closing trades automatically.

  2. Money Management: It can be set to automatically determine how much money to risk on each trade, based on the size of your account (Money Management - MM). If this feature is off it will default to Manual Lots.

  3. Grid Trading: It uses a "grid" system. Imagine drawing evenly spaced lines above and below the current price. When the price reaches these lines, the script automatically places new orders. The grid spacing can be manual or calculated using the ATR - Average True Range - of the currency pair. This helps to calculate the volatility and dynamic grid sizing.

  4. Market Condition:

    • The EA can trade the market in 3 conditions: uptrend, downtrend and ranging markets.
    • The EA has an Moving Average Indicator to determine the trend direction by looking at the current price is above or below the Moving Average.

  5. Order Types:

    • Buy/Sell Stop Orders An order to buy above the current market price or to sell below the current market price.
    • Buy/Sell Limit Orders An order to buy below the current market price or to sell above the current market price.
    • The EA deletes orders automatically when criteria is met

  6. Lot Size: The script calculates the size of each trade (the "lot size"). It either calculates the lot size automatically based on account size (if Money Management is on) or uses a fixed lot size that you define.

  7. Take Profit: This is the level at which you automatically close the trade to grab profit.

  8. Stop Loss: The EA will automatically close all orders when negative Float is excessive.

  9. Hedge Multiplier: This determines how much larger each subsequent trade becomes. The idea is that if the price keeps moving against your trades, you increase the size of the next trade to try and recover losses faster.

  10. Break Even & Trailing Stop: These are automatic features. The Break Even system is to set the current trades stoploss in profit, and the Trailing Stop is to set the current trades stoploss to follow along with the price movement.

How It Works Step-by-Step

  1. Initialization (init): When the script starts up, it sets up some basic information, such as the "magic number" (used to identify trades opened by this specific script) and the number of decimal places in the currency pair's price.

  2. Deinitialization (deinit): When the script is stopped or removed from the chart.

  3. Start (start): This is where the main logic happens in every "tick" (price change).

    • Account Protection: Checks your account balance and equity to see if you're losing too much money. If so, it closes all trades to prevent further losses.
    • Position Calculation: Checks the number of open buy and sell orders.
    • Money Management (MM): If enabled, it determines the appropriate lot size for new trades based on your account balance and risk settings.
    • ATR Calculation: Calculate the ATR to determine the volatility and automatically sets the grid sizes.
    • Market Condition: Determine what market condition to trade.
    • Bollinger Bands: The EA has an added indicator to determine price action with Bollinger Bands.
    • Trade Placement:
      • If no trades are open, it places a buy or sell stop or limit order, depending on the market direction.
      • If trades are already open, it checks if it's time to place another order based on the grid spacing. If the price has moved far enough against the existing trade, it places another order.
      • The orders are dynamically created until Max Level is met.
    • Order Management: Manages open orders, adjusting stop losses and take profits as needed.
    • Trailing Stop: The EA implements a trailing stop strategy to lock in profits as the price moves favorably.
    • Break Even: The EA will move the stoploss to profit on all orders at a certain profit level.

External Parameters (Important Settings)

These are settings that you, as the user, can change to customize how the script behaves:

  • InitialAccount: The starting balance of your account (for money management calculations).
  • Portion: The portion of your account to trade on this pair.
  • UseEquityProtection: Whether to close all trades if losses become too high.
  • FloatPercent: The percentage of your account you're willing to risk.
  • UseMM: Whether to use money management.
  • LAF: Lot Adjustment Factor, to adjust the lot sizes.
  • Accounttype: Used for Money Management.
  • lot: The starting lot size (if not using money management).
  • Multiplier: How much to increase the lot size for each new trade in the grid.
  • AutoCal and other AutoCal related parameters: Whether to automatically calculate the grid spacing based on ATR.
  • GAF: Grid Adjustment Factor, to fine-tune the grid spacing.
  • GridSet1, TP_Set1 and GridSet2, TP_Set2 and GridSet3, TP_Set3 : Grid sizes and take profit levels at each level
  • TimeGrid: The minimum time (in seconds) between placing new trades.
  • MC: Market Condition (uptrend, downtrend, or ranging).
  • MA_Period: The period of the Moving Average.
  • MaxLevel: The maximum number of trades that can be open at one time.
  • BELevel: Close All level , when reaches this level, doesn't wait for TP to be hit
  • slippage: The acceptable slippage (difference between the requested price and the actual price) when closing trades.
  • Bollinger: To determine of Bollinger Bands is going to be on.

Important Notes

  • Risk: This is an automated trading system. Like all trading systems, it has risks. You could lose money. It's crucial to understand the settings and test the script thoroughly on a demo account before using it with real money.
  • Customization: The script is highly customizable. You can adjust the settings to fit your trading style and risk tolerance.
  • Monitoring: Even though it's automated, it's essential to monitor the script's performance regularly and make adjustments as needed.

In essence, the script automates a grid trading strategy, adjusting trade sizes and managing risk based on market conditions and your account settings.

Orders Execution
Checks for the total of open ordersIt can change open orders parameters, due to possible stepping strategyIt Closes Orders by itself It automatically opens orders when conditions are reached
Indicators Used
Indicator of the average true rangeMoving average indicatorStandard Deviation indicatorStochastic oscillator
Miscellaneous
It plays sound alertsIt opens Message Boxes to the user
4 Views
1 Downloads
0 Favorites
Blessing 2 v5.2 BBStoch V0.2 
//+------------------------------------------------------------------+
//|                                                  Blessing 2 v5.2 |
//|                              Copyright © 2007-2009, MQLCoder.com |
//|                                                jta@jtatoday.com  |
//|                                             http://www.irxfx.com |
//|                                         fifthelement80@gmail.com |
//|                *** Addition Stochastic Indicator option by epmfx |
//|  In no event will authors be liable for any damages whatsoever.  |
//|                      Use at your own risk.                       |
//+------------------------------------------------------------------+

// Added AutoCal Timeframe and Period to External Variables by Bobster

#property copyright "Copyright FiFtHeLeMeNt/J Talon LLC © 2007-2009, ."
#property link      "http://www.mqlcoder.com"
#define  NL    "\n"

extern string  InitialAccountSet   = "Initial account balance";
extern int     InitialAccount      = 5000; 

extern string  TradeComment        = "Blessing";

extern string  NumberPortionSet    = "Account Portion";
extern int     Portion             = 1;    // Portion of account you want to trade on this pair

extern bool    UseEquityProtection = true; // Close all orders when negative Float is excessive.
extern double  FloatPercent        = 50;   // Percent of portion for max Float level.
extern bool    UsePowerOutSL       = true;   

extern bool    UseMM               = 1;    // Money Management - 1 = true & 0 = false.

extern string  LotAdjustmentSet    = "Only with MM enabled. (.01 - 5.0)";
extern double  LAF                 = 1.0;  // Adjusts MM base lot for large accounts

extern string  AccountTypeSet      = "1=standard, 10=micro for penny/pip)";
extern int     Accounttype         = 10;    // Used in Money Management feature only.

extern string  ManuallotSet        = "Lots used if MM is off";
extern double  lot                 = 0.01; // Starting lots if Money Management is off

extern string  LotHedgeSet         = "Hedge Multiplier.  Adjust by +/-.01 intervals ";
extern double  Multiplier          = 1.4;  // Multiplier on each level

extern string  AutoParametersSet   = "Autocalculates the Grid based on ATR";
extern bool    AutoCal             = true; // Auto calculation of TakeProfit and Grid size;
extern int     AutoCalTF           = 1440;
extern int     AutoCalPeriod       = 21;

extern string  AutoGridAdjust      = "Widens/squishes grid (.5 - 3.0)";
extern double  GAF                 = 1.0;  // Widens/Squishes Grid on increments/decrements of .1

extern string  GridSet             = "Default Grid size in Pips";
extern int     PF                  = 1;    // Multiplier for TakeProfit, Profitfactor
extern int     OffSet              = 25;   // OffSet for Moving to BE
extern int     TrailingStop        = 50;    // TrailingStop for Orders in Profit
extern int     GridSet1            = 25;   // Set 1 Grid Size
extern int     TP_Set1             = 50;   // Set 1 Take Profit
extern int     GridSet2            = 50;   // Level 2 Grid Size
extern int     TP_Set2             = 100;  // Level 2 Take Profit
extern int     GridSet3            = 100;  // Level 3 Grid Size
extern int     TP_Set3             = 200;  // Level 3 Take Profit

extern string  TimeGridSet         = "Default grid set time in seconds";
extern int     TimeGrid            = 2400; // Time Grid in seconds , to avoid opening of lots of levels in fast market

extern string  MarketConditionSet  = "Set MC to 2 for Ranging Market";
extern int     MC                  = 2;    // Market condition 0=uptrend 1=downtrend 2=range

extern string  MovingAverageSet    = "Changes MC for correct trend (up/down)";
extern bool    MCbyMA              = true; // Defines market condition by EMA , if price is above EMA,
                                           // it will take it as an uptrend and goes only long,
                                           // vice versa for below the EMA
extern int     MA_Period           = 100;   // Period of MA

extern string  MaxLevelSet         = "Default of 4 on each level, change sparingly";
extern int     Set1Count           = 4;    // Level 1 max levels
extern int     Set2Count           = 4;    // Level 2 max levels
extern int     MaxLevel            = 99;   // Level 2 max levels (stops placing orders when reaches maxlvl2)
extern int     BELevel             = 12;   // Close All level , when reaches this level, doesn't wait for TP to be hit

extern int     slippage            = 999; // Tolerance of order slips/requotes for closing

extern string  Boll                = "Set to False if you dont Want Bollinger Ind.";
extern bool    Bollinger           = true;



//+------------------------------------------------------------------+
//| Internal Parameters Set                                          |
//+------------------------------------------------------------------+

bool           ca                  = false;
string         EA_name             = "Blessing © FiFtHeLeMeNt/J Talon LLC";
int            magic               = 0;
double         slip                = 0;       
int            d                   = 5;      // Used to offset entry to round numbers , for example if you set d=5,
                                             // it will place its sell order on 1.5795 instead of 1.5780
double         LotInc              = 0;      // Lot Increment on each level, very dangerous
string         Filename;
int            BrokerDecimal       = 1;
string         POSL_On             = "No";
int            count;
double         PortionBalance;
double         InitialAccountMultiPortion;
double         PortionEquity;
string         trendUpDown         = "";
double         DD;
double         MaxDD;
double         MaxDDpercent;
//Bollinger
int            TradingOK           = 1;
extern int     BPeriod             = 21; // Bollinger Jepm:15, Change to 21
extern double  Deviation           = 2.0;
extern double  BDistance           = 14;
extern string  Stoch                = "Settings for Stochastic";
extern int     Stochdown           = 20;
extern int     Stochup             = 80;
extern int     per_K               = 14; // Stochastic parameters: Jepm:9, Change to 14
extern int     per_D               = 3;
extern int     slow                = 3;
extern double  VolumeMax           = 250;

//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+

int init()
  {
   if (Symbol() == "AUDCADm" || Symbol() == "AUDCAD") magic = 105101;
   if (Symbol() == "AUDJPYm" || Symbol() == "AUDJPY") magic = 105102;
   if (Symbol() == "AUDNZDm" || Symbol() == "AUDNZD") magic = 105103;
   if (Symbol() == "AUDUSDm" || Symbol() == "AUDUSD") magic = 105104;
   if (Symbol() == "CHFJPYm" || Symbol() == "CHFJPY") magic = 105105;
   if (Symbol() == "EURAUDm" || Symbol() == "EURAUD") magic = 105106;
   if (Symbol() == "EURCADm" || Symbol() == "EURCAD") magic = 105107;
   if (Symbol() == "EURCHFm" || Symbol() == "EURCHF") magic = 105108;
   if (Symbol() == "EURGBPm" || Symbol() == "EURGBP") magic = 105109;
   if (Symbol() == "EURJPYm" || Symbol() == "EURJPY") magic = 105110;
   if (Symbol() == "EURUSDm" || Symbol() == "EURUSD") magic = 105111;
   if (Symbol() == "GBPCHFm" || Symbol() == "GBPCHF") magic = 105112;
   if (Symbol() == "GBPJPYm" || Symbol() == "GBPJPY") magic = 105113;
   if (Symbol() == "GBPUSDm" || Symbol() == "GBPUSD") magic = 105114;
   if (Symbol() == "NZDJPYm" || Symbol() == "NZDJPY") magic = 105115;
   if (Symbol() == "NZDUSDm" || Symbol() == "NZDUSD") magic = 105116;
   if (Symbol() == "USDCHFm" || Symbol() == "USDCHF") magic = 105117;
   if (Symbol() == "USDJPYm" || Symbol() == "USDJPY") magic = 105118;
   if (Symbol() == "USDCADm" || Symbol() == "USDCAD") magic = 105119;
   
   if (magic == 0) magic = 705999;
   
   if(Digits==3 || Digits==5) BrokerDecimal = 10;
   
   Filename = StringConcatenate(EA_name+"_",Symbol(),"_",Period(),"_M",".txt");
   
   return(0);
  }

//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+

int deinit()
  {
//----
   
//----
   return(0);
  }

//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+

int start()
  {
   int y;
   int cb=0; // Count buy
   int cs=0; // Count sell
   int cbl=0; // Count buy limit
   int csl=0; // Count sell limit
   int cbs=0; // Count buy limit
   int css=0; // Count sell limit
   double tbl=0; //Count lot size
   double tsl=0; //Count lot size
   double tl=0; //total lots out
   double to=0; //total buy and sell order out
   double buysl=0; //stop losses are set to zero if POSL off
   double sellsl=0; //stop losses are set to zero if POSL off
   double POSL=0; //Initialize POSL
   double m,lot2;
   double lp; // last buy price
   double ll; //last lot
   double ltp; //last tp
   double lopt; // last open time
   double g2;
   double tp2;
   double entry;
   double pr=0; // profit;
   double sumlot;
   int lticket;
   double mp,mp2; // median price
   //Bollingers Bands
   double ma;
	double stddev;
	double bup, bux;
	double bdn, bdx;
  
//+------------------------------------------------------------------+
//| Calculate Total Profits and Total Orders                         |
//+------------------------------------------------------------------+ 

for (y = 0; y < OrdersTotal(); y++)
   {
      OrderSelect (y, SELECT_BY_POS, MODE_TRADES);
      if ((OrderMagicNumber()==magic) && (OrderSymbol()==Symbol()) && (OrderType()==OP_BUY)) {
        cb++;
        pr=pr+OrderProfit();
        tbl=tbl+OrderLots();
      }
      if ((OrderMagicNumber()==magic) && (OrderSymbol()==Symbol()) && (OrderType()==OP_SELL)) {
        cs++;
        pr=pr+OrderProfit();
        tsl=tsl+OrderLots();
      }
      if ((OrderMagicNumber()==magic) && (OrderSymbol()==Symbol()) && (OrderType()==OP_BUYLIMIT)) cbl++;
      if ((OrderMagicNumber()==magic) && (OrderSymbol()==Symbol()) && (OrderType()==OP_SELLLIMIT)) csl++;
      if ((OrderMagicNumber()==magic) && (OrderSymbol()==Symbol()) && (OrderType()==OP_BUYSTOP)) cbs++;
      if ((OrderMagicNumber()==magic) && (OrderSymbol()==Symbol()) && (OrderType()==OP_SELLSTOP)) css++;
      tl=tbl+tsl;
      to=cb+cs;}
      
//+------------------------------------------------------------------+
//| Account Protection                                               |
//+------------------------------------------------------------------+ 
  
  PortionBalance = NormalizeDouble(AccountBalance()/Portion,2);
  PortionEquity  = NormalizeDouble(PortionBalance + pr,2);
  if(UseEquityProtection) {
       if ( PortionBalance - PortionEquity >= (PortionBalance * FloatPercent/100) )  
               ExitAllTrades(Red,"Equity Stop Loss Reached");
  }
  

//+------------------------------------------------------------------+
//| Trading with EA Criteria                                         |
//+------------------------------------------------------------------+

  InitialAccountMultiPortion = InitialAccount/Portion;
      if (PortionBalance < InitialAccountMultiPortion){ 
            PlaySound("alert.wav");
            Print("Account Balance is less than Initial Account Balance setting"); 
            MessageBox( "Account Balance is less than Initial Account Balance on " + Symbol()+ Period(), "Blessing 2: Warning", 48 );
  return(0);}

//+------------------------------------------------------------------+
//| Power Out Stop Loss Protection                                   |
//+------------------------------------------------------------------+ 

  if(UsePowerOutSL) {
     POSL_On = "Yes";
     int correct = 1;
     double pipvalue=MarketInfo(Symbol(),MODE_TICKVALUE);
     if(Accounttype == 1 && pipvalue < 5) correct = 10;
     if(tl == 0){
       POSL = 1600;
       if(Digits==3 || Digits==5) POSL = POSL * 10;
       buysl = Ask - POSL * Point;
       sellsl= Bid + POSL * Point;}
    
     if(tl > 0){
       POSL =  NormalizeDouble((PortionBalance * (FloatPercent + 1)/100)/(pipvalue * tl * correct),0);
       if(POSL > 1600) POSL = 1600;
       if(Digits==3 || Digits==5) POSL = POSL * 10;
       buysl = Ask - POSL * Point;
       sellsl= Bid + POSL * Point;}
       
     if(to == 0) count = 0;
     if(to > 0 && to > count){
     
     // sync up order stop losses
     for (int q = 0; q < OrdersTotal(); q++) {
        OrderSelect (q, SELECT_BY_POS, MODE_TRADES);
        if ((OrderMagicNumber()==magic) && (OrderSymbol()==Symbol()) && (OrderType()==OP_BUY)) {
            OrderModify(OrderTicket(), OrderOpenPrice(), buysl, OrderTakeProfit(), 0, Purple);}
        if ((OrderMagicNumber()==magic) && (OrderSymbol()==Symbol()) && (OrderType()==OP_SELL)) {
            OrderModify(OrderTicket(), OrderOpenPrice(), sellsl, OrderTakeProfit(), 0, Purple);} } } 
        count = to;}

//+------------------------------------------------------------------+
//| Money Management and Lot size coding                             |
//+------------------------------------------------------------------+
   
  if(UseMM){

  double Contracts, Factor, Lotsize;

          Contracts = (AccountBalance()/10000)/Portion;
          Factor    = Multiplier+
                MathPow(Multiplier,2)+
                MathPow(Multiplier,3)+
                MathPow(Multiplier,4)+
                MathPow(Multiplier,5)+
                MathPow(Multiplier,6);

          Lotsize=LAF*Accounttype*(Contracts/(1.0 + Factor));

    //Determine Lot size boundries from minimum to maximum

          lot=NormalizeDouble(Lotsize,2);

          if(Lotsize<0.01) lot=0.01;
          if(Lotsize>100/MathPow(Multiplier,6) && Accounttype == 1) lot=NormalizeDouble(100/MathPow(Multiplier,6),2);
          if(Lotsize>50/MathPow(Multiplier,6)  && Accounttype == 10) lot=NormalizeDouble(50/MathPow(Multiplier,6),2);}

//+------------------------------------------------------------------+
//| ATR to autocalculate the Grid                                    | 
//+------------------------------------------------------------------+     

  double GridStart,value1;
  double atrvalue = iATR(NULL,AutoCalTF,AutoCalPeriod,0);  // Bobster added external variables; default is 1440, 21
    if(AutoCal==True){
      if(Digits == 2 || Digits == 3) value1 = atrvalue*100;
      if(Digits == 4 || Digits == 5) value1 = atrvalue*10000;
      GridStart = value1*2/10;
      GridSet1  = GridStart;
      TP_Set1   = GridStart + GridSet1;
      GridSet2  = TP_Set1;
      TP_Set2   = (GridStart + GridSet1) * 2;
      GridSet3  = TP_Set2;
      TP_Set3   = (GridStart + GridSet1) * 4;}       
 
//+------------------------------------------------------------------+
//| Moving Average Indicator for Calculation of Trend Direction      |
//+------------------------------------------------------------------+      

  if (MCbyMA) {
     MC=-1;
     if (Bid<iMA(Symbol(),0,MA_Period,0,MODE_EMA,PRICE_CLOSE,0)) MC=1;
     if (Bid>iMA(Symbol(),0,MA_Period,0,MODE_EMA,PRICE_CLOSE,0)) MC=0;}
     
  if (MC==0) trendUpDown = "UP";
  
  if (MC==1) trendUpDown = "DOWN";
  
  double         Balance             = AccountBalance();
  double         Equity              = AccountEquity();
  
  
  DD = Balance - Equity;
  
  if (DD > MaxDD) MaxDD = DD;
  
  MaxDDpercent = (MaxDD / Balance) * 100;
  
  bool  volumeOK=false;
  if(Volume[0]<VolumeMax && Volume[1]<VolumeMax) volumeOK=true;
  if (VolumeMax==0) volumeOK=true;

//+------------------------------------------------------------------+
//| Bollinger Band trade Long/Short                                  |
//+------------------------------------------------------------------+ 
  if(TradingOK == 1)
	  {
	   ma = iMA(Symbol(),0,BPeriod,0,MODE_SMA,PRICE_OPEN,0);
	   stddev = iStdDev(Symbol(),0,BPeriod,0,MODE_SMA,PRICE_OPEN,0);   
      bup = ma+(Deviation*stddev);
      bdn = ma-(Deviation*stddev);
      
      bux=(bup+(BDistance*Point));
      bdx=(bdn-(BDistance*Point));
     }  

//+------------------------------------------------------------------+
//| Blessing Code                                                    |
//+------------------------------------------------------------------+   
   
  if (cs==0 && cb==0 && cbs==0 && cbl==0 && css==0 && csl==0) ca=false;
     
   slip = NormalizeDouble((slippage * BrokerDecimal),0);
  
   if (((cb>=BELevel || cs>=BELevel) && pr>0) || ca) {
     ca=true;
     for (y = 0; y < OrdersTotal(); y++){
       OrderSelect (y, SELECT_BY_POS, MODE_TRADES);
       if ((OrderMagicNumber()==magic) && (OrderSymbol()==Symbol()) && (OrderType()==OP_BUY || OrderType()==OP_SELL)) OrderClose(OrderTicket(),OrderLots(),OrderClosePrice(),slip,Lime);
       if ((OrderMagicNumber()==magic) && (OrderSymbol()==Symbol()) && (OrderType()==OP_BUYLIMIT || OrderType()==OP_SELLLIMIT || OrderType()==OP_BUYSTOP || OrderType()==OP_SELLSTOP)) OrderDelete(OrderTicket(),White);}
     return;}

      d = d;
      if (BrokerDecimal == 10) d=50;
      g2=GridSet1;
      tp2=TP_Set1;

   if (cb>=Set1Count || cs>=Set1Count) {
     g2=GridSet2;
     tp2=TP_Set2;}

   if (cb>=Set2Count+Set1Count || cs>=Set2Count+Set1Count) {
     g2=GridSet3;
     tp2=TP_Set3;}
   
//+------------------------------------------------------------------+
//| Broker Decimal Selection                                         |
//+------------------------------------------------------------------+ 

  if (BrokerDecimal == 10){
     g2 *= 10;
     tp2 *= 10;}

//+------------------------------------------------------------------+
//| Adjust Grid and Normalize Values                                 |
//+------------------------------------------------------------------+

  g2  = NormalizeDouble(g2*GAF,0);
  tp2 = NormalizeDouble(tp2*GAF,0);
  
  
//+------------------------------------------------------------------+
//| Trade Selection Logic                                            |
//+------------------------------------------------------------------+ 

   if ((cb==0) && (cs==0)) {
     for (y = 0; y < OrdersTotal(); y++)
     {
       OrderSelect (y, SELECT_BY_POS, MODE_TRADES);
       if ((OrderMagicNumber()==magic) && (OrderSymbol()==Symbol()) && (OrderLots()>lot)) OrderDelete(OrderTicket()); }
       
   if (Bollinger==false){
      if (MC==0) {
         if (cbs==0) {
            m=MathMod(Ask/Point,g2);
            if ((g2-m+d)>MarketInfo(Symbol(),MODE_STOPLEVEL)) {
               OrderSend(Symbol(),OP_BUYSTOP,lot,Ask*2-Bid+(g2-m+d)*Point,0,buysl,Ask*2-Bid+PF*(g2-m+d+tp2)*Point,TradeComment,magic,0,CLR_NONE);
               Print("b2");
               return;} }
         if (cbl==0) {
            m=MathMod(Ask/Point,g2);
            if ((m+d)>MarketInfo(Symbol(),MODE_STOPLEVEL)) {
               OrderSend(Symbol(),OP_BUYLIMIT,lot,Ask*2-Bid-(m+d)*Point,0,buysl,Ask*2-Bid-PF*(m+d-tp2)*Point,TradeComment,magic,0,CLR_NONE);
               Print("b1");
               return;} } }

      if (MC==1) {
         if (csl==0) {
            m=MathMod(Bid/Point,g2);
            if ((g2-m-d)>MarketInfo(Symbol(),MODE_STOPLEVEL)) {
               OrderSend(Symbol(),OP_SELLLIMIT,lot,Bid+(g2-m-d)*Point,0,sellsl,Bid+PF*(g2-m-d-tp2)*Point,TradeComment,magic,0,CLR_NONE);
               Print("s2");
               return;} }
         if (css==0) {
            m=MathMod(Bid/Point,g2);
            if ((m+d)>MarketInfo(Symbol(),MODE_STOPLEVEL)) {
               OrderSend(Symbol(),OP_SELLSTOP,lot,Bid-(m+d)*Point,0,sellsl,Bid-PF*(m+d+tp2)*Point,TradeComment,magic,0,CLR_NONE);
               Print("s1");
               return; } } }
       
      if (MC==2) {
         if (css==0) {
            m=MathMod(Bid/Point,g2);
            if ((m+d)>MarketInfo(Symbol(),MODE_STOPLEVEL)) {
               OrderSend(Symbol(),OP_SELLSTOP,lot,Bid-(m+d)*Point,0,sellsl,Bid-PF*(m+d+tp2)*Point,TradeComment,magic,0,CLR_NONE);
               Print("s1");
               return; } }
         if (cbs==0) {
            m=MathMod(Ask/Point,g2);
            if ((g2-m+d)>MarketInfo(Symbol(),MODE_STOPLEVEL)) {
               OrderSend(Symbol(),OP_BUYSTOP,lot,Ask*2-Bid+(g2-m+d)*Point,0,buysl,Ask*2-Bid+PF*(g2-m+d+tp2)*Point,TradeComment,magic,0,CLR_NONE);
               Print("b1");
               return;} } } }
   else if(Bollinger==true){
      //if (MC==0) {
     if (Close[0] < bdx && volumeOK && iStochastic(NULL,0,per_K,per_D,slow,MODE_LWMA,1,0,1) < Stochdown && iStochastic(NULL,0,per_K,per_D,slow,MODE_LWMA,1,1,1) < Stochdown){
        if (cbs==0) {
           if (tp2 >= 10) OrderSend(Symbol(),OP_BUY,lot,Ask,0,buysl,Ask+PF*tp2*Point,TradeComment,magic,0,Blue);
           return;
        }
     }
       
      //if (MC==1) {
     if (Close[0] > bux && volumeOK && iStochastic(NULL,0,per_K,per_D,slow,MODE_LWMA,1,0,1) > Stochup && iStochastic(NULL,0,per_K,per_D,slow,MODE_LWMA,1,1,1) > Stochup){
        if (css==0) {
           if (tp2 >= 10) OrderSend(Symbol(),OP_SELL,lot,Bid,0,sellsl,Bid-PF*tp2*Point,TradeComment,magic,0,Red);
           return;
        }
     }
     }
  }
        
   
      
   
   

   if (cb>0 || cs>0) {
     for (y = 0; y < OrdersTotal(); y++){
        OrderSelect (y, SELECT_BY_POS, MODE_TRADES);
        if ((OrderMagicNumber()==magic) && (OrderSymbol()==Symbol()) && (OrderType()!=OP_SELL) && (OrderType()!=OP_BUY) && OrderLots()==lot) OrderDelete(OrderTicket());} }
   
   if (cb>0) {
     sumlot=0;
     mp=0;
     for (y = 0; y < OrdersTotal(); y++){
       OrderSelect (y, SELECT_BY_POS, MODE_TRADES);
       if ((OrderMagicNumber() != magic) || (OrderType()!=OP_BUY) || (OrderSymbol()!=Symbol())) { continue; }
       lp=OrderOpenPrice();
       ll=OrderLots();
       ltp=OrderTakeProfit();
       lopt=OrderOpenTime();
       lticket=OrderTicket();
       sumlot=sumlot+ll;
       mp=mp+ll*lp;}

       mp=mp/sumlot;
 
   if ((TimeCurrent()-TimeGrid>lopt) && (cb<MaxLevel)) {
         if (lp>Ask) entry=NormalizeDouble(lp-(MathRound((lp-Ask)/Point/g2)+1)*g2*Point,Digits); else entry=NormalizeDouble(lp-g2*Point,Digits);
         if (ll <= 0.01) lot2=NormalizeDouble(ll*2+LotInc,2); else lot2=NormalizeDouble(ll*Multiplier+LotInc,2);
       
         if (cbl==0) {
           OrderSend(Symbol(),OP_BUYLIMIT,lot2,entry,0,buysl,entry+PF*tp2*Point,TradeComment,magic);
           Print("s3");
           return;}

         if (cbl==1) {
           for (y = 0; y < OrdersTotal(); y++){
              OrderSelect (y, SELECT_BY_POS, MODE_TRADES);
              if (OrderType()==OP_BUYLIMIT && OrderMagicNumber()==magic && (OrderSymbol()==Symbol()) && entry-OrderOpenPrice()>g2/2*Point) {
                OrderModify(OrderTicket(),entry,buysl,entry+PF*tp2*Point,0);
                Print("mo1");} } } } 
         
         for (y = 0; y < OrdersTotal(); y++){ // Sync TPs
           OrderSelect (y, SELECT_BY_POS, MODE_TRADES);
           if ((OrderMagicNumber() != magic) || (OrderType()!=OP_BUY) || (MathAbs(OrderTakeProfit()-ltp)<Point) || (OrderSymbol()!=Symbol())) { continue; }
           OrderModify(OrderTicket(),OrderOpenPrice(),buysl,ltp,0,Blue);
           Print("m1");
           return;} }

   if (cs>0) {
     sumlot=0;
     mp=0;
     for (y = 0; y < OrdersTotal(); y++){
       OrderSelect (y, SELECT_BY_POS, MODE_TRADES);
       if ((OrderMagicNumber() != magic) || (OrderType()!=OP_SELL) || (OrderSymbol()!=Symbol())) { continue; }
       lp=OrderOpenPrice();
       ll=OrderLots();
       ltp=OrderTakeProfit();
       lopt=OrderOpenTime();
       lticket=OrderTicket();
       sumlot=sumlot+ll;
       mp=mp+ll*lp;}
      
       mp=mp/sumlot;
 
   if ((TimeCurrent()-TimeGrid>lopt) && (cs<MaxLevel)) {
         if (Bid>lp) entry=NormalizeDouble(lp+(MathRound((-lp+Bid)/Point/g2)+1)*g2*Point,Digits); else entry=NormalizeDouble(lp+g2*Point,Digits);
         if (ll <= 0.01) lot2=NormalizeDouble(ll*2+LotInc,2); else lot2=NormalizeDouble(ll*Multiplier+LotInc,2);
         
         if (csl==0) {
            OrderSend(Symbol(),OP_SELLLIMIT,lot2,entry,0,sellsl,entry-PF*tp2*Point,TradeComment,magic);
            Print("s4");
            return;}

         if (csl==1) {
           for (y = 0; y < OrdersTotal(); y++)           {
              OrderSelect (y, SELECT_BY_POS, MODE_TRADES);
              if (OrderType()==OP_SELLLIMIT && OrderMagicNumber()==magic && (OrderSymbol()==Symbol()) && OrderOpenPrice()-entry>g2/2*Point) {
              OrderModify(OrderTicket(),entry,sellsl,entry-PF*tp2*Point,0);
              Print("mo2");} } } }

        for (y = 0; y < OrdersTotal(); y++){ // Sync TPs
          OrderSelect (y, SELECT_BY_POS, MODE_TRADES);
          if ((OrderMagicNumber() != magic) || (OrderType()!=OP_SELL) || (MathAbs(OrderTakeProfit()-ltp)<Point) || (OrderSymbol()!=Symbol())) { continue; }
          OrderModify(OrderTicket(),OrderOpenPrice(),sellsl,ltp,0,Red);
          Print("m2");
          return;} }

//+------------------------------------------------------------------+
//| Trade BreakEven Logic                                           |
//+------------------------------------------------------------------+ 

  if( OffSet > 0 ){
      double askPrice = Ask,
             bidPrice = Bid,
             stopLoss            = OrderStopLoss(),
             takeProfit          = OrderTakeProfit(),
             BEStoplong    = lp + tp2 * Point,
             BEStopshort   = lp - tp2 * Point;

            // OppBuy
            if (cb>0) {
               for (y = 0; y < OrdersTotal(); y++){
               OrderSelect (y, SELECT_BY_POS, MODE_TRADES);
                  if ((OrderMagicNumber() == magic) && (OrderType()==OP_BUY) || (OrderSymbol()==Symbol())) {
                     if( ((Bid - lp) > (tp2+OffSet) * Point) && (OrderStopLoss()<BEStoplong))
                     {
                     OrderModify( OrderTicket(), OrderOpenPrice(), BEStoplong, OrderTakeProfit(), 0, DarkBlue );
                     }
                  }
               }
            }
            // OppSell
            if (cs>0) {
               for (y = 0; y < OrdersTotal(); y++){
               OrderSelect (y, SELECT_BY_POS, MODE_TRADES);
                  if ((OrderMagicNumber() == magic) && (OrderType()==OP_SELL) || (OrderSymbol()==Symbol())) {
                     if( ((lp - Ask) > (tp2+OffSet) * Point) && (OrderStopLoss()>BEStopshort))
                     {
                     OrderModify( OrderTicket(), OrderOpenPrice(), BEStopshort, OrderTakeProfit(), 0, Green );
                     }
                  }
               }
            }
      }






//+------------------------------------------------------------------+
//| Trade Trailing Logic                                           |
//+------------------------------------------------------------------+ 

  // Update trailing stop
  if( TrailingStop > 0 ){
   double trailingStoplong    = bidPrice - TrailingStop * Point,
          trailingStopshort   = askPrice + TrailingStop * Point;
          
          askPrice = Ask;
          bidPrice = Bid;
          stopLoss            = OrderStopLoss();
          takeProfit          = OrderTakeProfit();
          

            // OppBuy
            if (cb>0) {
               for (y = 0; y < OrdersTotal(); y++){
               OrderSelect (y, SELECT_BY_POS, MODE_TRADES);
                  if ((OrderMagicNumber() == magic) && (OrderType()==OP_BUY) || (OrderSymbol()==Symbol())) {
                     if( ((Bid - lp) > (tp2+TrailingStop) * Point) && (OrderStopLoss()<Bid-TrailingStop*Point))
                     {
                     OrderModify( OrderTicket(), OrderOpenPrice(), trailingStoplong, OrderTakeProfit(), 0, DarkBlue );
                     }
                  }
               }
            }
            // OppSell
            if (cs>0) {
               for (y = 0; y < OrdersTotal(); y++){
               OrderSelect (y, SELECT_BY_POS, MODE_TRADES);
                  if ((OrderMagicNumber() == magic) && (OrderType()==OP_SELL) || (OrderSymbol()==Symbol())) {
                     if( ((lp - Ask) > (tp2+TrailingStop) * Point) && (OrderStopLoss()>Ask+TrailingStop*Point))
                     {
                     OrderModify( OrderTicket(), OrderOpenPrice(), trailingStopshort, OrderTakeProfit(), 0, Green );
                     }
                  }
               }
            }
      }

       
                  
//+------------------------------------------------------------------+
//| External Script Code                                             |
//+------------------------------------------------------------------+
 
  string Message;

   Message = "                "+EA_name + NL +
             "                            Current Time is      " +  TimeToStr(TimeCurrent(), TIME_SECONDS) + NL + NL +                        
             "                            Initial Account Set              " + DoubleToStr(InitialAccount, 0) + NL + NL +
             "                            Equity Protection % Set      " + DoubleToStr(FloatPercent, 0) + NL + NL +
             "                            Power Off Stop Loss on?         " + POSL_On + NL + NL +
             "                            Starting lot size                   " + DoubleToStr(lot, 2) + NL + NL +

             "                            Portion P/L                        " + DoubleToStr(pr, 2) + NL + NL +     
             
             "                            Buy   " + cb + "  Sell   " + cs + NL + NL +
             "                            Account Portion   " + DoubleToStr(Portion, 0) + "   Total Risk on Account Percent  " + DoubleToStr(FloatPercent/Portion, 0) + NL + NL +                
             "                            Portion Balance      " + DoubleToStr(PortionBalance, 2) + "    TREND : " + trendUpDown + NL + NL+
             "                            Equity : " + DoubleToStr(Equity,2) + NL + NL +
             "                            DrawDown : " + DoubleToStr(DD,2) + NL + NL +
             "                            Max DD : " + DoubleToStr(MaxDD,2) + "   Max DD Percent : " + DoubleToStr(MaxDDpercent,2) + " %";
                                         
             

   Comment(Message); 
   
    
return(0);
}
 
//+------------------------------------------------------------------+
//| Exit Trade Function                                              |
//+------------------------------------------------------------------+ 

  void ExitAllTrades(color Color, string reason){
    slip = NormalizeDouble((slippage * BrokerDecimal),0);
    bool success;
    for (int cnt = OrdersTotal() - 1; cnt >= 0; cnt --){
      OrderSelect(cnt, SELECT_BY_POS, MODE_TRADES);
      if (OrderSymbol() == Symbol() && OrderMagicNumber() == magic){
         OrderDelete(OrderTicket(),Color);
         success=OrderClose(OrderTicket(), OrderLots(), OrderClosePrice(), slip, Color);
         if(success==true){
            Print("Closed all positions because ",reason);} } } }   


//+------------------------------------------------------------------+
//| expert end function                                              |
//+------------------------------------------------------------------+

Similar scripts

Blessing 2 v5.2 withStochasticMOD4

Blessing 2 v5.2 withStochasticMOD3.2

Blessing 2 v5.2 with Stoch

Blessing 2 v5.2 Stoch

Blessing 2 v5.2 Bollinger

Blessing 2 v5.2 BBStoch1

Blessing 2 v5.2 BBStoch

Blessing 2 v5.2 BBStoch V0.2_001

5Min EUR.CHF smooth

5Min EUR.CHF Aggressive

15min blessing EUR.CHF

Comments