//+------------------------------------------------------------------+
//| Ichimoku.mq4 |
//| Copyright © 2004, MetaQuotes Software Corp. |
//| http://www.metaquotes.net/ |
//+------------------------------------------------------------------+
//mod2008fxtsd
#property copyright "Copyright © 2004, MetaQuotes Software Corp."
#property link "http://www.metaquotes.net/"
#property indicator_chart_window
#property indicator_buffers 8
#property indicator_color1 Red
#property indicator_color2 Blue
#property indicator_color3 Tomato
#property indicator_color4 Gold
#property indicator_color5 Teal
#property indicator_color6 SandyBrown
#property indicator_color7 Thistle
#property indicator_color8 MediumTurquoise
#property indicator_width3 3
#property indicator_width4 4
#property indicator_width5 1
#property indicator_width8 2
//---- input parameters
extern int Tenkan=9;
extern int Kijun=26;
extern int Senkou=52;
extern int KumoShift= 26;
//extern bool Chinkou_line= false;
extern bool ChinkouTencan= false;
extern bool ChinkouKijun = false;
//---- buffers
double Tenkan_Buffer[];
double Kijun_Buffer[];
double SpanA_Buffer[];
double SpanB_Buffer[];
double Chinkou_Buffer[];
double SpanA2_Buffer[];
double SpanB2_Buffer[];
double TKcross_Buffer[];
double Chinkou_Cross_Buffer[];
//----
int a_begin;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//----
SetIndexStyle(0,DRAW_LINE);
SetIndexBuffer(0,Tenkan_Buffer);
SetIndexDrawBegin(0,Tenkan-1);
SetIndexLabel(0,"Tenkan Sen");
//----
SetIndexStyle(1,DRAW_LINE);
SetIndexBuffer(1,Kijun_Buffer);
SetIndexDrawBegin(1,Kijun-1);
SetIndexLabel(1,"Kijun Sen");
//----
a_begin=Kijun; if(a_begin<Tenkan) a_begin=Tenkan;
// SetIndexStyle(2,DRAW_HISTOGRAM,STYLE_DOT);
SetIndexBuffer(2,SpanA_Buffer);
SetIndexStyle (2, DRAW_ARROW);
SetIndexArrow(2, 115); //romb
SetIndexEmptyValue(2, EMPTY_VALUE);
SetIndexLabel(2, "KumCross"); //SenkouABCross;KumoCroos
SetIndexDrawBegin(2,Kijun+a_begin-1);
// SetIndexShift(2,Kijun);
// SetIndexLabel(2,NULL);
SetIndexStyle(5,DRAW_LINE);
SetIndexBuffer(5,SpanA2_Buffer);
SetIndexDrawBegin(5,Kijun+a_begin-1);
SetIndexShift(5,KumoShift);
SetIndexLabel(5,"Senkou Span A");
//----
// SetIndexStyle(3,DRAW_HISTOGRAM,STYLE_DOT);
SetIndexBuffer(7,SpanB_Buffer);
SetIndexDrawBegin(7,Kijun+Senkou-1);
// SetIndexShift(3,Kijun);
// SetIndexLabel(3,NULL);
SetIndexStyle (7, DRAW_ARROW);
SetIndexArrow(7, 158);
SetIndexEmptyValue(3, EMPTY_VALUE);
SetIndexLabel(7, "ChikoCross"); //ChinkouPriceCross
SetIndexStyle(6,DRAW_LINE);
SetIndexBuffer(6,SpanB2_Buffer);
SetIndexDrawBegin(6,Kijun+Senkou-1);
SetIndexShift(6,KumoShift);
SetIndexLabel(6,"Senkou Span B");
//----
SetIndexBuffer(4,Chinkou_Buffer);
SetIndexDrawBegin(4,Kijun-1);
// SetIndexStyle (4, DRAW_ARROW);
// SetIndexArrow (4, 158);
// SetIndexShift(4,NULL);
// SetIndexEmptyValue(4, EMPTY_VALUE);
// SetIndexLabel(4, "ChinkouPriceCross");
//if(Chinkou_line){ }
SetIndexStyle(4,DRAW_LINE);
SetIndexShift(4,-KumoShift);
SetIndexLabel(4,"Chiko Span");//Chinkou Span"
//----
SetIndexBuffer(3,TKcross_Buffer);
SetIndexDrawBegin(3,Kijun-1);
SetIndexStyle (3, DRAW_ARROW);
SetIndexArrow (3, 158);
SetIndexEmptyValue(3, EMPTY_VALUE);
SetIndexLabel(3, "TenkanKijunCross");
return(0);
}
//+------------------------------------------------------------------+
//| Ichimoku Kinko Hyo |
//+------------------------------------------------------------------+
int start()
{
int i,k;
int counted_bars=IndicatorCounted();
double high,low,price;
//----
if(Bars<=Tenkan || Bars<=Kijun || Bars<=Senkou) return(0);
//---- initial zero
if(counted_bars<1)
{
for(i=1;i<=Tenkan;i++) Tenkan_Buffer[Bars-i]=0;
for(i=1;i<=Kijun;i++) Kijun_Buffer[Bars-i]=0;
for(i=1;i<=a_begin;i++) { SpanA_Buffer[Bars-i]=0; SpanA2_Buffer[Bars-i]=0; }
for(i=1;i<=Senkou;i++) { SpanB_Buffer[Bars-i]=0; SpanB2_Buffer[Bars-i]=0; }
}
//---- Tenkan Sen
i=Bars-Tenkan;
if(counted_bars>Tenkan) i=Bars-counted_bars-1;
while(i>=0)
{
high=High[i]; low=Low[i]; k=i-1+Tenkan;
while(k>=i)
{
price=High[k];
if(high<price) high=price;
price=Low[k];
if(low>price) low=price;
k--;
}
Tenkan_Buffer[i]=(high+low)/2;
i--;
}
//---- Kijun Sen
i=Bars-Kijun;
if(counted_bars>Kijun) i=Bars-counted_bars-1;
while(i>=0)
{
high=High[i]; low=Low[i]; k=i-1+Kijun;
while(k>=i)
{
price=High[k];
if(high<price) high=price;
price=Low[k];
if(low>price) low=price;
k--;
}
Kijun_Buffer[i]=(high+low)/2;
i--;
}
//---- Senkou Span A
i=Bars-a_begin+1;
if(counted_bars>a_begin-1) i=Bars-counted_bars-1;
while(i>=0)
{
price=(Kijun_Buffer[i]+Tenkan_Buffer[i])/2;
SpanA2_Buffer[i]=price;
// SpanA_Buffer[i]=price;
i--;
}
//---- Senkou Span B
i=Bars-Senkou;
if(counted_bars>Senkou) i=Bars-counted_bars-1;
while(i>=0)
{
high=High[i]; low=Low[i]; k=i-1+Senkou;
while(k>=i)
{
price=High[k];
if(high<price) high=price;
price=Low[k];
if(low>price) low=price;
k--;
}
price=(high+low)/2;
SpanB2_Buffer[i]=price;
i--;
}
//---- Chinkou Span
i=Bars-Senkou;
if(counted_bars>Senkou) i=Bars-counted_bars-1;
// i=Bars-1;
// if(counted_bars>1) i=Bars-counted_bars-1;
while(i>=0) {
double Range = 0.0;
for (int counter=i ;counter<=i+9;counter++)
Range += MathAbs(High[counter]-Low[counter]);
Range /= 10;
if (Tenkan_Buffer[i+1]<=Kijun_Buffer[i+1] && Tenkan_Buffer[i]>Kijun_Buffer[i])
TKcross_Buffer[i] =Low[i]-0.75*Range;
if (Tenkan_Buffer[i+1]>=Kijun_Buffer[i+1] && Tenkan_Buffer[i]<Kijun_Buffer[i])
TKcross_Buffer[i] =High[i]+0.75*Range;
if (SpanA2_Buffer[i+1]<=SpanB2_Buffer[i+1] && SpanA2_Buffer[i]>SpanB2_Buffer[i])
SpanA_Buffer[i] =Low[i]-Range;
if (SpanA2_Buffer[i+1]>=SpanB2_Buffer[i+1] && SpanA2_Buffer[i]<SpanB2_Buffer[i])
SpanA_Buffer[i] =High[i]+Range;
if (ChinkouTencan)Chinkou_Buffer[i]=Tenkan_Buffer[i];
else
if (ChinkouKijun) Chinkou_Buffer[i]=Kijun_Buffer[i];
else Chinkou_Buffer[i]=Close[i];
if (Chinkou_Buffer[KumoShift+i+1]<=Chinkou_Buffer[i+1]&&Chinkou_Buffer[KumoShift+i]>Chinkou_Buffer[i])
SpanB_Buffer[i] =High[i]+0.5*Range;
if (Chinkou_Buffer[KumoShift+i+1]>=Chinkou_Buffer[i+1]&&Chinkou_Buffer[KumoShift+i]<Chinkou_Buffer[i])
SpanB_Buffer[i] =Low[i]-0.5*Range;
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
Indicator Curves created:
Implements a curve of type DRAW_LINE
Indicators Used:
Custom Indicators Used:
Order Management characteristics:
Other Features: