//+------------------------------------------------------------------+ //| TrendStrengthEMA.mq4 | //| Xaoc 2006 | //| http://forex.xcd.ru/ | //| modified by Braindancer | //+------------------------------------------------------------------+ #property copyright "][aoc 2006" #property link "http://forex.xcd.ru/" #property indicator_separate_window #property indicator_buffers 1 #property indicator_color1 Yellow #property indicator_level1 0 //#property indicator_maximum 0.02 //#property indicator_minimum -0.02 double TS[]; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int init() { IndicatorBuffers(1); IndicatorShortName("TrendStrenghtEMA"); SetIndexBuffer(0,TS); SetIndexStyle(0, DRAW_HISTOGRAM, STYLE_SOLID, 1, Blue); SetIndexDrawBegin(0,2); SetIndexLabel(0,"TS"); //---- indicators //---- return(0); } //+------------------------------------------------------------------+ //| Custor indicator deinitialization function | //+------------------------------------------------------------------+ int deinit() { //---- TODO: add your code here //---- return(0); } //+------------------------------------------------------------------+ //| Custom indicator iteration function | //+------------------------------------------------------------------+ int start() { int shift,counted_bars=IndicatorCounted(); //double ma40dbl; double ma0, ma1, ma2, ma3, ma4, ma5, ma6, ma7, ma8, ma9, tmp; //---- TODO: add your code here //---- check for possible errors if(counted_bars<0) return(-1); //---- last counted bar will be recounted if(counted_bars>0) counted_bars--; //limit=Bars-counted_bars; //---- main loop //---- main calculation loop shift=Bars-1; while(shift>=0) { tmp=iMA(NULL,0,11,0,MODE_EMA,PRICE_CLOSE,shift); ma1=tmp-iMA(NULL,0,5,0,MODE_EMA,PRICE_CLOSE,shift); ma2=tmp-iMA(NULL,0,10,0,MODE_EMA,PRICE_CLOSE,shift); ma3=tmp-iMA(NULL,0,15,0,MODE_EMA,PRICE_CLOSE,shift); ma4=tmp-iMA(NULL,0,20,0,MODE_EMA,PRICE_CLOSE,shift); ma5=tmp-iMA(NULL,0,25,0,MODE_EMA,PRICE_CLOSE,shift); ma6=tmp-iMA(NULL,0,30,0,MODE_EMA,PRICE_CLOSE,shift); ma7=tmp-iMA(NULL,0,40,0,MODE_EMA,PRICE_CLOSE,shift); TS[shift]=(ma1+ma2+ma3+ma4+ma5+ma6+ma7)/7; shift--;// } //---- return(0); } //+------------------------------------------------------------------+