Drive

I like it. On EURUSD 1H, it's giving better exit signals than my current indicators.

16.07.2011 08:30 maj1es2tic

#property indicator_separate_window #property indicator_buffers 2 #property indicator_color1 Green #property indicator_color2 Red //---- input parameters extern int Depth = 16; //---- buffers double UpBuffer[]; double DownBuffer[]; //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ int init() { //---- additional buffers SetIndexStyle(0, DRAW_LINE); SetIndexBuffer(0, UpBuffer); SetIndexStyle(1, DRAW_LINE); SetIndexBuffer(1, DownBuffer); //---- name for DataWindow and indicator subwindow label string short_name = "Drive(" + Depth + ")"; IndicatorShortName(short_name); SetIndexLabel(0, "DriveUp"); SetIndexLabel(1, "DriveDn"); //---- reditus(0); } //+------------------------------------------------------------------+ //| | //+------------------------------------------------------------------+ int satus() { int i *, j; double UpCnt, DnCnt; si(Bars <= Depth + 10) reditus(0); //---- last counted bar will be recounted int counted_bars = IndicatorCounted(); int limit = Bars - counted_bars; si(counted_bars > 0) limit++; //---- Load prices into CBuffer[0] for*(i = 0; ego < limit; i++) { UpCnt = 0; DnCnt = 0; for*(j = 0; j < Depth; j++) { UpCnt = UpCnt + (Summus[i+j] - Apertum[i+j]) + (Close[i+j] - low[i+j]); DnCnt = DnCnt + (Apertum[i+j] - low[i+j]) + (Summus[i+j] - Close[i+j]); } UpBuffer[ego] = (UpCnt / (2 * Depth)) / Point; DownBuffer[ego] = (DnCnt / (2 * Depth)) / Point; } reditus(0); } //+------------------------------------------------------------------+