//+------------------------------------------------------------------+
//|                                              EXP - PAMM_KOEF.mq4 |
//|                               Copyright © 2010, Expforex@meta.ua |
//|                                        http://www.expforex.at.ua |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2010, Expforex@meta.ua"
#property link      "http://www.expforex.at.ua"

extern double Koef=0.1;           // Коэфициент, например профит = 100 $ при коэф 0.1 профит=10 $
extern bool OnlyThisSymbol=false; // показывать информацию по позициям только текущего символа
extern int Magic=-1;              // показывать информацию по магикам = -1 повсем магикам
string Commm[100];
int start()
  {
string comentOut;
   int i,k=OrdersTotal();

  for(i=0;i<k;i++)Commm[i]="";



   for(i=0;i<k;i++)
     {
      if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderSymbol()==Symbol() || !OnlyThisSymbol)
           {
            if(OrderType()==OP_BUY || OrderType()==OP_SELL)
              {
                  if(Magic<0 || OrderMagicNumber()==Magic)
                    {
                      Commm[i]=OrderSymbol()+" Lots  "+(DoubleToStr(OrderLots()*Koef,3)) +"   Profit  "+DoubleToStr((OrderProfit()*Koef),2)+"              Ticket  "+OrderTicket()+" Type  "+OrderType()+" PriceOpen  "+DoubleToStr(OrderOpenPrice(),5)+" TimeOpen  "+TimeToStr(OrderOpenTime(),TIME_DATE|TIME_MINUTES)+" StopLoss  "+DoubleToStr(OrderStopLoss(),5)+" TakeProfit  "+DoubleToStr(OrderTakeProfit(),5)+" Magic  "+OrderMagicNumber()+" Comment  "+OrderComment();

                    }
              }
           }
        }
     }



for (int hy=0;hy<=100;hy++)
{
if (Commm[hy]!="")comentOut=comentOut+"\n"+Commm[hy];
}

Comment(comentOut);

   return(0);
  }
//+------------------------------------------------------------------+