//+------------------------------------------------------------------+
//| bbhisto.mq4 |
//| Copyright © 2005, Nick Bilak |
//| http://metatrader.50webs.com/ beluck[at]gmail.com |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2005, Nick Bilak"
#property link "http://metatrader.50webs.com/"
#property indicator_separate_window
#property indicator_buffers 2
#property indicator_color1 Lime
#property indicator_color2 Gold
//#property indicator_color3 MediumVioletRed
//#property indicator_maximum 4
#property indicator_level1 2
#property indicator_level2 1
#property indicator_level3 -1
#property indicator_level4 -2
#property indicator_levelcolor DarkSlateGray
//---- input parameters
extern int bolingerPeriod=20;
extern int BBsqueezArwLv=-2.0;
extern int bolPrd=20;
extern double bolDev=2.0;
extern int keltPrd=20;
extern double keltFactor=1.5;
//---- buffers
double bb[];
double arrowBuffer[];
double lo[];
double diff,std,bbs;
//
int i,j;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
SetIndexStyle(0,DRAW_HISTOGRAM);
SetIndexBuffer(0,bb);
SetIndexStyle(1,DRAW_ARROW);
SetIndexBuffer(1,arrowBuffer);
SetIndexArrow(1,158);
SetIndexLabel(1,"BBsquise ");
SetIndexLabel(0,"BB");
// SetIndexStyle(2,DRAW_ARROW);
// SetIndexBuffer(2,lo);
//
SetIndexEmptyValue(1,EMPTY_VALUE);
// SetIndexEmptyValue(2,EMPTY_VALUE);
// SetIndexArrow(2,159);
return(0);
}
//+------------------------------------------------------------------+
//| Custor indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
int counted_bars=IndicatorCounted();
int shift,limit;
double d,ku,kd,km;
if (counted_bars<0) return(-1);
if (counted_bars>0) counted_bars--;
limit=Bars-31;
if(counted_bars>=31) limit=Bars-counted_bars-1;
for (shift=limit+30;shift>=0;shift--) {
bb[shift]=0;
d=iStdDev(NULL,0,bolingerPeriod,MODE_SMA,0,PRICE_CLOSE,shift);
if( d<0.0001) d=0.0001;
bb[shift]=((Close[shift]+2*d - iMA(NULL,0,bolingerPeriod,0,MODE_SMA,PRICE_CLOSE,shift)) /
(4*d))*4-2;
// bb[shift]=bb[shift]/3;
// // up[shift]=EMPTY_VALUE;
// lo[shift]=EMPTY_VALUE;
// if (bb[shift]>0) {
// up[shift]=4;
// }
// if (bb[shift]<0) {
// // lo[shift]=-4;
}
for (shift=limit;shift>=0;shift--) {
diff = iATR(NULL,0,keltPrd,shift)*keltFactor;
std = iStdDev(NULL,0,bolPrd,MODE_SMA,0,PRICE_CLOSE,shift);
bbs = bolDev * std / diff;
arrowBuffer[shift]=EMPTY_VALUE;
if(bbs<1) {arrowBuffer[shift] = BBsqueezArwLv; }
// }
}
return(0);
}
//+------------------------------------------------------------------+
Sample
Analysis
Market Information Used:
Series array that contains close prices for each bar
Indicator Curves created:
Implements a curve of type DRAW_HISTOGRAM
Implements a curve of type DRAW_ARROW
Indicators Used:
Standard Deviation indicator
Moving average indicator
Indicator of the average true range
Custom Indicators Used:
Order Management characteristics:
Other Features: