Japan





//+------------------------------------------------------------------+
//|                                                   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    counted_bars=IndicatorCounted(),
//----
   limit,
   i=0; 
   if(counted_bars>0)
      counted_bars--;
   
   limit=Bars-counted_bars;
   
   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);
  }





































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



Sample





Analysis



Market Information Used:

Series array that contains the highest prices of each bar
Series array that contains the lowest prices of each bar
Series array that contains close prices for each bar
Series array that contains open prices of each bar
Series array that contains open time of each bar


Indicator Curves created:


Indicators Used:



Custom Indicators Used:

Order Management characteristics:

Other Features: