urdalanmovingm

//+------------------------------------------------------------------+
//|                                               urdala(moving).mq4 |
//|                                                 Ñåðãåé Ðàøåâñêèé |
//|                                        http://beststavki.ucoz.ua |
//+------------------------------------------------------------------+
#property copyright "Ñåðãåé Ðàøåâñêèé"
#property link      "http://beststavki.ucoz.ua"

#property indicator_separate_window
#property indicator_minimum 0
#property indicator_maximum 1
string Ïàðà[]={"EURUSD","GBPUSD","USDJPY","EURJPY","USDCHF"};
int Ïåðèîä[]={1,5,15,30,60,240,1440,10080,43200};
string Øàïêà[]={"M1","M5","M15","M30","H1","H4","D1","W1","MN"};
int Ãîðèçîíò[]={ 100, 150, 200, 250, 300, 350, 400, 450,500};
int Âåðòèêàëü=16;
//+------------------------------------------------------------------+
int start()
  {int Window=WindowFind("urdala(moving)"),Äàííûå[5,9];
  double ma,ma1,Îòêðûòèå;
  string name;
  color Öâåò;
 for (int y=0; y<5 ; y++)
     {
 for ( int i=0; i<9 ; i++)
     {ma=iMA(Ïàðà[y],Ïåðèîä[i],1,0,MODE_SMMA,PRICE_CLOSE,0);
      Îòêðûòèå=iOpen(Ïàðà[y],Ïåðèîä[i],0);
      Äàííûå[y,i]=(ma-Îòêðûòèå)/MarketInfo(Ïàðà[y],MODE_POINT);
      
     }
     }
  for( i=0; i<9; i++)
        {
         name="Øàïêà_"+i;
         ObjectCreate(name,OBJ_LABEL,Window,0,0);
         ObjectSet(name,OBJPROP_XDISTANCE,Ãîðèçîíò[i]);
         ObjectSet(name,OBJPROP_YDISTANCE,0);
         ObjectSetText(name,Øàïêà[i],10,"Arial",Blue);
         }
  for (y=0; y<5; y++)
      {
      name="Ïàðû_"+y;
         ObjectCreate(name,OBJ_LABEL,Window,0,0);
         ObjectSet(name,OBJPROP_XDISTANCE,0);
         ObjectSet(name,OBJPROP_YDISTANCE,Âåðòèêàëü*(y+1));
         ObjectSetText(name,Ïàðà[y],10,"Arial",Blue);
      }
  
  for ( y=0; y<5 ; y++)
     {      
  for(i=0; i<9; i++)
              {
               name="Äàííûå_"+Ïàðà[y]+"_"+i;
               ObjectCreate(name,OBJ_LABEL,Window,0,0);
               ObjectSet(name,OBJPROP_XDISTANCE,Ãîðèçîíò[i]);
               ObjectSet(name,OBJPROP_YDISTANCE,Âåðòèêàëü*(y+1));
               if (Äàííûå[y,i]<0)Öâåò=Red;
                 else Öâåò=Lime;
               ObjectSetText(name,DoubleToStr(Äàííûå[y,i],0),10,"Arial",Öâåò);
               }
      }
   return(0);
  }
//+------------------------------------------------------------------+