// Beneficiometro. Programando Forex. 27/05/09
#property copyright "GNU GPL v3.0 Programando Forex"
#property link      "http://www.programandoforex.com"
 
// Propiedades generales
#property indicator_separate_window
#property indicator_buffers 1
#property indicator_color1 Lime
 
// Buffers
double ExtMapBuffer1[];

int init()
  {
   // Propiedades gráficas
   SetIndexStyle(0,DRAW_LINE);
   SetIndexBuffer(0,ExtMapBuffer1);
 
   // Mostrar una linea de texto sobre el indicador
   string nombre = "Profit/Loss total: ";
   IndicatorShortName(nombre);
 
   return(0);
  }
 
int start()
  { 
   ExtMapBuffer1[0] = profitTotal();      
   
   return(0);
  }

int
profitTotal()
{
   int ordenes = OrdersTotal();
   int profitTotal = 0;
   
   for(int pos=0; pos<ordenes; pos++)
   {
   if(OrderSelect(pos,SELECT_BY_POS)==false) continue;
   if(OrderType() == OP_BUY)
    profitTotal += (OrderClosePrice()-OrderOpenPrice())/MarketInfo(OrderSymbol(),MODE_POINT);
   else if(OrderType() == OP_SELL)
    profitTotal += (OrderOpenPrice()-OrderClosePrice())/MarketInfo(OrderSymbol(),MODE_POINT);
   } 
   
   return(profitTotal);
}