//+------------------------------------------------------------------+
//|                                                       PosCnt.mq4 |
//|                                 Copyright ｩ 2010, Software Corp. |
//|                                        http://www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright "Copyright ｩ 2010, Software Corp."
#property link      "http://www.metaquotes.net"

//+------------------------------------------------------------------+
//| expert initialization function                                   |
//+------------------------------------------------------------------+
int init()
  {
//----
   
   // 現在保有中のポジションのロット数をアラート表示します。
   
   int total = OrdersTotal();    // 全ポジション数
   double CntAudjpyBuy=0;        // AUDJPY買いロット数
   double CntEurjpyBuy=0;        // EURJPY買いロット数
   double CntAudjpySell=0;       // AUDJPY売りロット数
   double CntEurjpySell=0;       // EURJPY売りロット数
   
   int cmd;
   
   Alert("");
   
   if(total > 0)
   {
      // 全ポジション分、繰り返し処理を行う。
   	for(int ii = 0; ii < total ; ii++ )
      {   	
         // 0番目からポジションを選択する
         if(OrderSelect(ii,SELECT_BY_POS,MODE_TRADES)>0)
         {
               // 売り、買いの判断
               cmd=OrderType();
               // 買いだったら
               if(cmd==OP_BUY)
               {
                  // AUDJPYだったら
                  if(OrderSymbol() ==  "AUDJPYFXF")
                  {
                     CntAudjpyBuy = CntAudjpyBuy + OrderLots();
                  }
                  //　EURJPYだったら、
                  else if(OrderSymbol() ==  "EURJPYFXF")
                  {
                     CntEurjpyBuy = CntEurjpyBuy + OrderLots();
                  }
               }
               //　売りだったら、
               else if(cmd==OP_SELL)
               {
                  // AUDJPYだったら
                  if(OrderSymbol() ==  "AUDJPYFXF")
                  {
                     CntAudjpySell = CntAudjpySell + OrderLots();
                  }
                  // EURJPYだったら
                  else if(OrderSymbol() ==  "EURJPYFXF")
                  {
                     CntEurjpySell = CntEurjpySell + OrderLots();
                  }
               }
           }
         else Alert( "Error when order select ", GetLastError());
      }
      
      // 全ポジの集計後、アラート表示を行う。
      Alert("CntAudjpyBuy:",CntAudjpyBuy);
      Alert("CntEurjpyBuy:",CntEurjpyBuy);
      Alert("CntAudjpySell:",CntAudjpySell);
      Alert("CntEurjpySell:",CntEurjpySell);
    }
//----
   return(0);
  }
      
//+------------------------------------------------------------------+
//| expert deinitialization function                                 |
//+------------------------------------------------------------------+
int deinit()
  {
//----
   
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| expert start function                                            |
//+------------------------------------------------------------------+
int start()
  {
//----
   
//----
   return(0);
  }
//+------------------------------------------------------------------+