//Local parametersdatetime last;
int totalBars;
int Pips2Points; // slippage 3 pips 3=points 30=pointsdouble Pips2Double; // Stoploss 15 pips 0.015 0.0150double slippage;
double acSpread;
string strComment = "";
CPositionInfo m_position; // trade position object
CTrade m_trade; // trading object
CSymbolInfo m_symbol; // symbol info object
CAccountInfo m_account; // account info wrapper
COrderInfo m_order; // pending orders object
3. Main Code
Explaining the Strategy, Everyday Bot will delete All the old Orders and find Highest and Lowest value of the previous daily Bar and Send to two Pending orders “BUY_STOP“, “SELL_STOP“. (No TakeProfit).
//+------------------------------------------------------------------+//| Delele Old Orders |//+------------------------------------------------------------------+void DeleteOldOrds()
{
string sep=";"; // A separator as a characterushort u_sep; // The code of the separator characterstring result[]; // An array to get stringsfor(int i = OrdersTotal() - 1; i >= 0; i--) // returns the number of current orders
{
if(m_order.SelectByIndex(i)) // selects the pending order by index for further access to its properties
{
//--- Get the separator code
u_sep = StringGetCharacter(sep, 0);
string Ordcomment = m_order.Comment();
//Split OrderComment (EAName;Symbol;totalBar) to get Ordersymbolint k = StringSplit(Ordcomment, u_sep, result);
if(k > 2)
{
string sym = m_symbol.Name();
if((m_order.Magic() == InpMagicNumber) && (sym == result[1]))
{
m_trade.OrderDelete(m_order.Ticket());
}
}
}
}
}
3.3 EA has function “trailing StopLoss”,SL will change every time price change and make profit increase
//+------------------------------------------------------------------+//| Check the correctness of the order volume |//+------------------------------------------------------------------+bool CheckVolumeValue(double volume)
{
//--- minimal allowed volume for trade operationsdouble min_volume = m_symbol.LotsMin();
//--- maximal allowed volume of trade operationsdouble max_volume = m_symbol.LotsMax();
//--- get minimal step of volume changingdouble volume_step = m_symbol.LotsStep();
if(volume < min_volume || volume>max_volume)
{
return(false);
}
int ratio = (int)MathRound(volume/volume_step);
if(MathAbs(ratio*volume_step-volume)>0.0000001)
{
return(false);
}
return(true);
}
3.5 Check FreeLevel
//+------------------------------------------------------------------+//| CHECK FREEZE LEVEL |//+------------------------------------------------------------------+bool CheckOrderForFREEZE_LEVEL(ENUM_ORDER_TYPE type, double price)//change name of this function
{
int freeze_level = (int)SymbolInfoInteger(_Symbol, SYMBOL_TRADE_FREEZE_LEVEL);
bool check = false;
//--- check only two order typesswitch(type)
{
//--- Buy operationcaseORDER_TYPE_BUY_STOP:
{
//--- check the distance from the opening price to the activation price
check = ((price-Ask) > freeze_level*_Point);
//--- return the result of checkingreturn(check);
}
//--- Sell operationcaseORDER_TYPE_SELL_STOP:
{
//--- check the distance from the opening price to the activation price
check = ((Bid-price)>freeze_level*_Point);
//--- return the result of checkingreturn(check);
}
break;
}
//--- a slightly different function is required for pending ordersreturnfalse;
}
//+------------------------------------------------------------------+//| |//+------------------------------------------------------------------+bool CheckMoneyForTrade(string symb,double lots,ENUM_ORDER_TYPE type)
{
//--- Getting the opening priceMqlTick mqltick;
SymbolInfoTick(symb,mqltick);
double price=mqltick.ask;
if(type==ORDER_TYPE_SELL)
price=mqltick.bid;
//--- values of the required and free margindouble margin,free_margin=AccountInfoDouble(ACCOUNT_MARGIN_FREE);
//--- call of the checking functionif(!OrderCalcMargin(type,symb,lots,price,margin))
{
//--- something went wrong, report and return falsePrint("Error in ",__FUNCTION__," code=",GetLastError());
return(false);
}
//--- if there are insufficient funds to perform the operationif(margin>free_margin)
{
//--- report the error and return falsePrint("Not enough money for ",EnumToString(type)," ",lots," ",symb," Error code=",GetLastError());
return(false);
}
//--- checking successfulreturn(true);
}
3.7 Check Stoploss
//+------------------------------------------------------------------+//| |//+------------------------------------------------------------------+bool CheckStopLoss(double price, double SL)
{
//--- get the SYMBOL_TRADE_STOPS_LEVEL levelint stops_level = (int)SymbolInfoInteger(m_symbol.Name(), SYMBOL_TRADE_STOPS_LEVEL);
if(stops_level != 0)
{
PrintFormat("SYMBOL_TRADE_STOPS_LEVEL=%d: StopLoss and TakeProfit must"+
" not be nearer than %d points from the closing price", stops_level, stops_level);
}
//---bool SL_check=false;
//--- check the StopLossreturn SL_check = MathAbs(price - SL) > (stops_level * m_symbol.Point());
}
