[MT4指标]Ehlers_iTrend_in_Color
主图指标
mt4指标类型:趋势指标
是否能用在mt4手机版上:否
是否含有未来函数:无
//+------------------------------------------------------------------+
//| Ehlers iTrend_in_Color.mq4 |
//| Copyright ? 2006, MetaQuotes Software Corp. |
//| http://www.metaquotes.net |
//+------------------------------------------------------------------+
// new coding attempt below:
//Model Ehler's iTrend.mq4, for Metatrader 4, 13 August 2006
// - this custom indicator plots an interesting TREND line
// on a chart
//this initial 'beta' version appears to 'work' -
// but every user should check it out before using it -
// this code below may still have unknown bugs?
// 'use at your own risk' please post suggestions for
// corrections and improvements to this code (.MQ4)
// - 'Bill_gigi' on YAHOO 'MetaTrader_Experts_and_Indicators'
// Robert Hill modified to be in color on Jan 17, 2007
#property indicator_chart_window
#property indicator_buffers 3
#property indicator_color1 Yellow
#property indicator_color2 Green
#property indicator_color3 Red
#property indicator_width1 2
#property indicator_width2 2
#property indicator_width3 2
//---- buffers
double ExtMapBuffer1;
double ExtMapBuffer2;
double ExtMapBuffer3;
//---- input parameters
extern int Length=10;
//---- buffers
double TREND; // otherwise called "Model" by Ehlers
double iTrend;
double Price;
double Slope;
double HP;
//---- Varibles
int j, i, n, counted_bars, limit, totalBars;
double SMA=0.0, SmoothSlope=0.0, twopi=6.2831853, X=0.0;
double Alpha=0.0, SmoothHP=0.0, Prev = 0.0;
// Custom indicator initialization function
int init()
{
string short_name;
//---- additional buffers used
IndicatorBuffers(8);
//---- indicator line
SetIndexBuffer(2,ExtMapBuffer1);
SetIndexBuffer(1,ExtMapBuffer2);
SetIndexBuffer(0,ExtMapBuffer3);
SetIndexBuffer(3,TREND);
SetIndexBuffer(4,iTrend);
SetIndexBuffer(5,Price);
SetIndexBuffer(6,Slope);
SetIndexBuffer(7,HP);
SetIndexStyle(2,DRAW_LINE,STYLE_SOLID,2);
SetIndexStyle(1,DRAW_LINE,STYLE_SOLID,2);
SetIndexStyle(0,DRAW_LINE,STYLE_SOLID,2);
//---- name for DataWindow and indicator subwindow label
short_name="TREND("+Length+")";
IndicatorShortName(short_name);
SetIndexLabel(0,short_name);
SetIndexLabel(1,short_name);
SetIndexLabel(2,short_name);
//----
// SetIndexDrawBegin(0,Length);
//----
return(0);
}
//+------------------------------------------------------------------+
int start()
{
counted_bars=IndicatorCounted();
totalBars = Bars;
//----
if(totalBars<=Length) return(0);
Alpha = (1 - MathSin(twopi/Length)) / MathCos(twopi/Length);
i=totalBars-counted_bars-1;
while(i>=0)
{
if(i >= (totalBars - Length))
{
Price = (High + Low)/2;
TREND = 0.0;
SMA = 0.0;
HP = 0.0;
Slope = 0.0;
}
else
{
Price = (High + Low)/2;
X = 0.0;
for(j = Length-1; j > -1; j--)
{
X = X + Price[i+j];
}
SMA = X/Length;
// below compute iTrend ~ "instantaneous Trend Line"
component of the Model trend
Slope = (Price - Price[i + Length - 1])/2.0;
SmoothSlope = (Slope + 2.0*Slope[i+1]+ 2.0*Slope
[i+2] + Slope[i+3])/6.0;
iTrend = (0.5 * SmoothSlope) + SMA;
// below is code for the Ehler's 'Cyclic Component'
HP = 0.5*(1+Alpha)* (Price - Price[i+1]) +
Alpha*HP[i+1];
SmoothHP = (HP + 2.0*HP[i+1] + 2.0*HP[i+2] + HP
[i+3])/6.0;
} // end of above 'else' condition
TREND = MathFloor((iTrend + SmoothHP)/Point)*Point;
//========== COLOR CODING ===========================================
ExtMapBuffer3 = TREND; //red
ExtMapBuffer2 = TREND; //green
ExtMapBuffer1 = TREND; //yellow
// for(c=loopbegin;c==shift;c++)
// {
if (TREND[i+1] > TREND)
{
ExtMapBuffer2 = EMPTY_VALUE;
//ExtMapBuffer3[shift+1] = EMPTY_VALUE;
//ExtMapBuffer3[shift+1] = EMPTY_VALUE;
}
else if (TREND[i+1] < TREND)
{
ExtMapBuffer1 = EMPTY_VALUE; //-1 red/greem tight
//ExtMapBuffer3[shift+1] = EMPTY_VALUE;
}
else
{
ExtMapBuffer1=EMPTY_VALUE;//EMPTY_VALUE;
ExtMapBuffer2=EMPTY_VALUE;//EMPTY_VALUE;
}
i--;
} // end of 'while' loop
return(0);
}
Ehlers_iTrend_in_Color.jpg
