Japan_v1

//+------------------------------------------------------------------+
//|                                                   Japan.mq4 |
//|                                                     Yuriy Tokman |
//|                                            yuriytokman@gmail.com |
//+------------------------------------------------------------------+
#property copyright "Yuriy Tokman"
#property link      "yuriytokman@gmail.com"

#property indicator_chart_window
//---- input parameters
extern int       barsToProcess=1000;
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
//---- indicators
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//----
   int i;
   for(i=0;i<Bars;i++)
     {
      ObjectDelete("Ïîâåøåííûé èëè ìîëîò "+DoubleToStr(i,0));
      ObjectDelete("áû÷üå ïîãëîùåíèå "+DoubleToStr(i,0));
      ObjectDelete("ìåäâåæüå ïîãëîùåíèå "+DoubleToStr(i,0));
      ObjectDelete("çàâåñà èç òåìíûõ îáëàêîâ "+DoubleToStr(i,0));
      ObjectDelete("ïðîñâåò â îáëàêàõ "+DoubleToStr(i,0));
      ObjectDelete("äîäæ "+DoubleToStr(i,0));
     }
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
  {
   int i=0;
   int counted_bars=IndicatorCounted();
   if(counted_bars < 0)  return(-1);
   if(counted_bars>0) counted_bars--;
   int limit=Bars-counted_bars;
   if(counted_bars==0) limit-=1+1;

//if(limit>barsToProcess) limit=barsToProcess;

   while(i<limit)
     {
      //Ïîâåøåííûé èëè ìîëîò
      double k=(High[i]-Low[i])/3;
      if((Open[i]>(Low[i]+2*k)) && (Close[i]>(Low[i]+2*k)))
        {
         ObjectCreate("Ïîâåøåííûé èëè ìîëîò "+DoubleToStr(i,0),OBJ_ARROW,0,Time[i],High[i]+10*Point);
         ObjectSet("Ïîâåøåííûé èëè ìîëîò "+DoubleToStr(i,0),OBJPROP_ARROWCODE,108);
         ObjectSet("Ïîâåøåííûé èëè ìîëîò "+DoubleToStr(i,0),OBJPROP_COLOR,DimGray);
        }
      //áû÷üå ïîãëîùåíèå
      if((Open[i+1]>Close[i+1]) && (Close[i+1]>Open[i]) && (Close[i]>Open[i+1]))
        {
         ObjectCreate("áû÷üå ïîãëîùåíèå "+DoubleToStr(i,0),OBJ_ARROW,0,Time[i],Low[i]-15*Point);
         ObjectSet("áû÷üå ïîãëîùåíèå "+DoubleToStr(i,0),OBJPROP_ARROWCODE,110);
        }
      //ìåäâåæüå ïîãëîùåíèå
      if((Close[i+1]>Open[i+1]) && (Open[i]>Close[i+1]) && (Open[i+1]>Close[i]))
        {
         ObjectCreate("ìåäâåæüå ïîãëîùåíèå "+DoubleToStr(i,0),OBJ_ARROW,0,Time[i],High[i]+15*Point);
         ObjectSet("ìåäâåæüå ïîãëîùåíèå "+DoubleToStr(i,0),OBJPROP_ARROWCODE,110);
         ObjectSet("ìåäâåæüå ïîãëîùåíèå "+DoubleToStr(i,0),OBJPROP_COLOR,Lime);
        }
      //çàâåñà èç òåìíûõ îáëàêîâ
      if((Open[i+1]<Close[i+1]) && (Open[i]>High[i+1]) && (Close[i]<(Open[i+1]+(Close[i+1]-Open[i+1])/2)))
        {
         ObjectCreate("çàâåñà èç òåìíûõ îáëàêîâ "+DoubleToStr(i,0),OBJ_ARROW,0,Time[i],High[i]+25*Point);
         ObjectSet("çàâåñà èç òåìíûõ îáëàêîâ "+DoubleToStr(i,0),OBJPROP_ARROWCODE,116);
         ObjectSet("çàâåñà èç òåìíûõ îáëàêîâ "+DoubleToStr(i,0),OBJPROP_COLOR,Lime);
        }
      //ïðîñâåò â îáëàêàõ
      if((Open[i+1]>Close[i+1]) && (Low[i+1]>Open[i]) && (Close[i]>(Close[i+1]+(Open[i+1]-Close[i+1])/2)))
        {
         ObjectCreate("ïðîñâåò â îáëàêàõ "+DoubleToStr(i,0),OBJ_ARROW,0,Time[i],Low[i]-25*Point);
         ObjectSet("ïðîñâåò â îáëàêàõ "+DoubleToStr(i,0),OBJPROP_ARROWCODE,116);
        }
      //äîäæ
      if(Open[i]==Close[i])
        {
         ObjectCreate("äîäæ "+DoubleToStr(i,0),OBJ_ARROW,0,Time[i],High[i]+30*Point);
         ObjectSet("äîäæ "+DoubleToStr(i,0),OBJPROP_ARROWCODE,174);
         ObjectSet("äîäæ "+DoubleToStr(i,0),OBJPROP_COLOR,Indigo);
        }
      i++;
     }

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

























//+------------------------------------------------------------------+