Price Density Index

Quoting mikkom

Disliked

(Old thread but interesting topic so I thought I might reply)

I have done a similar overlay some time ago, it doesn't look lower timeframes just the same timeframe but see if this is what you are looking for. It looks at highs/lows so it's not exactly what you are looking for but probably quite close.

Code and example image is at another website, here is the url
http://www.forex-tsd.com/177626-post525.html

Ignored

#property copyright "Copyright © 2009, Kevin Kurka"
#property link      "http://www.hammerfund.org"

extern int Hours = 4;
extern int Munites = 0;

#property indicator_chart_window
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
  ObjectsDeleteAll();
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//----
    
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
  {
   int    counted_bars=IndicatorCounted();
//----
   GetBars();
//----
   return(0);
  }


void GetBars(){

int BarsToCheck = Hours * 60+ Munites;
double HighPoint = High[iHighest(Symbol(),1,MODE_HIGH,BarsToCheck,0)];ObjectCreate("HighWaterMark",OBJ_HLINE,0,TimeCurrent(),HighPoint);
double LowPoint  = Low[iLowest(Symbol(),1,MODE_LOW,BarsToCheck,0)];ObjectCreate("LowWaterMark",OBJ_HLINE,0,TimeCurrent(),LowPoint);

int Range = (HighPoint - LowPoint)/Point;

Comment (Range);

int a,b;
int Occourances;
int PriceDistribution[999];

for( a=0 ; a < Range+1 ; a++ ){
   
   for( b=0 ; b < BarsToCheck+1 ; b++ ){
      if((LowPoint + a * Point) <= iHigh(Symbol(),1,b)  &&  (LowPoint + a * Point >= iLow(Symbol(),1,b))){
         Occourances ++;
         }
      }
      PriceDistribution[a] = Occourances;
      Print(LowPoint + a * Point," Occourances ",PriceDistribution[a]);
      ObjectCreate(DoubleToStr(LowPoint + a * Point,Digits),OBJ_TEXT,0,iTime(Symbol(),1,Occourances),(LowPoint + a * Point));
      ObjectSetText(DoubleToStr(LowPoint + a * Point,Digits),DoubleToStr(Occourances,0),12,"Times New Roman",Blue);   
      Occourances =0;
}

    

   
} 

Quoting Kurka Fund

Disliked

MQL and Pic

Ignored

Quoting toddanderson

Disliked

Nice indicator, thank you for posting,
Can it be smoothed out or something to make it a little better to see
the high points or some type of line around it may make it better to see

its a little difficult when it is fuzzy looking

Ignored