japan-indicator
//+------------------------------------------------------------------+
//| 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-Low)/3;
if ((Open>(Low+2*k))&&(Close>(Low+2*k)))
{
ObjectCreate("Повешенный ил?моло?"+DoubleToStr(i,0),OBJ_ARROW,0,Time,High+10*Point);
ObjectSet("Повешенный ил?моло?"+DoubleToStr(i,0),OBJPROP_ARROWCODE,108);
ObjectSet("Повешенный ил?моло?"+DoubleToStr(i,0),OBJPROP_COLOR,DimGray);
}
//бычь?поглощение
if((Open>Close)&&(Close>Open)&&(Close>Open))
{
ObjectCreate("бычь?поглощение "+DoubleToStr(i,0),OBJ_ARROW,0,Time,Low-15*Point);
ObjectSet("бычь?поглощение "+DoubleToStr(i,0),OBJPROP_ARROWCODE,110);
}
//медвежье поглощение
if((Close>Open)&&(Open>Close)&&(Open>Close))
{
ObjectCreate("медвежье поглощение "+DoubleToStr(i,0),OBJ_ARROW,0,Time,High+15*Point);
ObjectSet("медвежье поглощение "+DoubleToStr(i,0),OBJPROP_ARROWCODE,110);
ObjectSet("медвежье поглощение "+DoubleToStr(i,0),OBJPROP_COLOR,Lime);
}
//завеса из темных облако?
if((Open<Close)&&(Open>High)&&(Close<(Open+(Close-Open)/2)))
{
ObjectCreate("завеса из темных облако?"+DoubleToStr(i,0),OBJ_ARROW,0,Time,High+25*Point);
ObjectSet("завеса из темных облако?"+DoubleToStr(i,0),OBJPROP_ARROWCODE,116);
ObjectSet("завеса из темных облако?"+DoubleToStr(i,0),OBJPROP_COLOR,Lime);
}
//просве??облака?
if((Open>Close)&&(Low>Open)&&(Close>(Close+(Open-Close)/2)))
{
ObjectCreate("просве??облака?"+DoubleToStr(i,0),OBJ_ARROW,0,Time,Low-25*Point);
ObjectSet("просве??облака?"+DoubleToStr(i,0),OBJPROP_ARROWCODE,116);
}
//додж
if(Open==Close)
{
ObjectCreate("додж "+DoubleToStr(i,0),OBJ_ARROW,0,Time,High+30*Point);
ObjectSet("додж "+DoubleToStr(i,0),OBJPROP_ARROWCODE,174);
ObjectSet("додж "+DoubleToStr(i,0),OBJPROP_COLOR,Indigo);
}
i++;
}
//----
return(0);
}
С§П°јјКхЅ»Бч °пД㶥ПВ№юЈЎЈЎ лл¥Цч·ЦПн {:1_181:} {:1_179:}
Ті:
[1]