Code: Select all

extern string           PairsToTrade   = "AUDCAD,AUDCHF,AUDNZD,AUDJPY,AUDUSD,CADCHF,CADJPY,CHFJPY,EURAUD,EURCAD,EURCHF,EURGBP,EURNZD,EURJPY,EURUSD,GBPCHF,GBPJPY,GBPUSD,NZDUSD,NZDJPY,USDCAD,USDCHF,USDJPY";

Code: Select all

void extractPairs()
{
   
   StringSplit(PairsToTrade,',',tradePair);
   noOfPairs = ArraySize(tradePair);

   ArrayResize(tradePair, noOfPairs);

}//End void extractPairs()

Code: Select all

int OnInit()
{
   //Extract the pairs traded by the user
   extractPairs();
}

Code: Select all

for (int pairIndex = 0; pairIndex < ArraySize(tradePair); pairIndex++)
{
      string symbol = tradePair[pairIndex];
      getBasics(symbol);

}//for (int pairIndex = 0; pairIndex < ArraySize(tradePair); pairIndex++)

Code: Select all

double         ask=0, bid=0, spread=0;//Replaces Ask. Bid, Digits. factor replaces Point
int            digits;//Replaces Digits.
double         longSwap=0, shortSwap=0;

Code: Select all

//Calculating the factor needed to turn pip values into their correct points value to accommodate different Digit size.
//Thanks to Tommaso for coding the function.
double         factor;//For pips/points stuff.

Code: Select all

void getBasics(string symbol)
{
   //Sets up bid, ask, digits, factor for the passed pair
   bid = MarketInfo(symbol, MODE_BID);
   ask = MarketInfo(symbol, MODE_ASK);
   digits = (int)MarketInfo(symbol, MODE_DIGITS);
   factor = getPipFactor(symbol);
   //spread = (ask - bid) * factor;
   longSwap = MarketInfo(symbol, MODE_SWAPLONG);
   shortSwap = MarketInfo(symbol, MODE_SWAPSHORT);
   
      
}//End void getBasics(string symbol)

Code: Select all

//Thomas and Rene provided this pip factor function. Thanks guys.
//There is also a contribution by lifesys, who gave us the first ever
//incarnation of this.
double getPipFactor(string symbolName)
{
   static bool brokerDigitsKnown=false;
   static int  brokerDigits=0;
 
   // We want the additional pip digits of the broker (only once)
   if(!brokerDigitsKnown)
   {  
      // Try to get the broker digits for plain EURUSD
      brokerDigits=(int)SymbolInfoInteger("EURUSD",SYMBOL_DIGITS)-4;
      
      // If plain EURUSD was found, we take that
      if(brokerDigits>=0)
         brokerDigitsKnown=true;
         
      // If plain EURUSD not found, we take the most precise of all symbols containing EURUSD 
      else
      {
         brokerDigits=0;
         
         // Cycle through all symbols
         for(int i=0; i<SymbolsTotal(false); i++) 
         {
            string symName=SymbolName(i,false);
            if(StringFind(symName,"EURUSD")>=0)
               brokerDigits=MathMax(brokerDigits,(int)SymbolInfoInteger(symName,SYMBOL_DIGITS)-4);
         }
         
         brokerDigitsKnown=true;
      }
   }

   // Now we can calculate the pip factor for the symbol
   double symbolDigits = (int) SymbolInfoInteger(symbolName,SYMBOL_DIGITS);
   double symbolFactor=MathPow(10,symbolDigits-brokerDigits);
   
   return(symbolFactor);
}//End int getPipFactor(string symbolName)

Code: Select all

void displayDetailsForBuyTrades(string symbol, int pairIndex)
{
   takeProfit = NormalizeDouble(ask + (takeProfit / factor), digits);
   stopLoss = NormalizeDouble(ask - (stopLoss / factor), digits);
   
   Alert(symbol, "  ", pairIndex, ": ask = ", DoubleToStr(ask, digits), ": TP = ", 
         DoubleToStr(takeProfit, digits), ": SL = ", DoubleToStr(stopLoss, digits));

}//End void displayDetailsForBuyTrades(string symbol, int pairIndex)

Code: Select all

for (int pairIndex = 0; pairIndex < ArraySize(tradePair); pairIndex++)
{
      string symbol = tradePair[pairIndex];
      getBasics(symbol);
      displayDetailsForBuyTrades(symbol, pairIndex);

}//for (int pairIndex = 0; pairIndex < ArraySize(tradePair); pairIndex++)