Order_Percent

#property indicator_chart_window
extern color cvet_m = Turquoise;
extern color cvet_p = Yellow;
extern color cvet_o = Blue;
color cvet;
int vertikal;
int start(){
int i=0;
//+------------------------------------------------------------------+
for(;i<OrdersTotal();i++)
{
//+------------------------------------------------------------------+
OrderSelect(i,SELECT_BY_POS);
double proc=OrderProfit()/(AccountBalance()/100);
if(proc>0)cvet=cvet_p;
if(proc<0)cvet=cvet_m;
if(OrderType()>1)cvet=cvet_o;
string text=DoubleToStr(proc,2);
//+------------------------------------------------------------------+
switch(i)
{
case 0 : vertikal=20;break;
case 1 : vertikal=40;break;
case 2 : vertikal=60;break;
case 3 : vertikal=80;break;
case 4 : vertikal=100;break;

}
//+------------------------------------------------------------------+
string z=i;
ObjectCreate(z,OBJ_LABEL,0,0,0);
ObjectSet(z, OBJPROP_CORNER, 1);
ObjectSet(z,OBJPROP_XDISTANCE,20);  
ObjectSet(z,OBJPROP_YDISTANCE,vertikal);
ObjectSetText(z,OrderSymbol()+" : "+text+" %",11,"Verdana",cvet);
}
//+------------------------------------------------------------------+
while(i<4){string s=i;ObjectDelete(s);i++;}
//+------------------------------------------------------------------+
   return;}
//+------------------------------------------------------------------+