//+------------------------------------------------------------------+
//| Keltner Channels.mq4 |
//| Coded by Gilani |
//| Copyright © 2005, MetaQuotes Software Corp. |
//| http://www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2005, MetaQuotes Software Corp."
#property link "http://www.metaquotes.net"
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
#property indicator_chart_window
#property indicator_buffers 3
#property indicator_color1 White
#property indicator_color2 White
#property indicator_color3 White
double upper[], middle[], lower[];
extern int period = 10;
extern int SoundAlert = 1; // 0 = disabled
extern int PopUpAlert = 1;
extern string BuySoundFile = "alert.wav";
extern string SellSoundFile = "alert2.wav";
extern int EmailAlert = 1;
datetime prevtime = 0;
int init()
{
SetIndexStyle(0,DRAW_LINE);
SetIndexShift(0,0);
SetIndexDrawBegin(0,0);
SetIndexBuffer(0,upper);
SetIndexStyle(1,DRAW_LINE);
SetIndexShift(1,0);
SetIndexDrawBegin(1,0);
SetIndexBuffer(1,middle);
SetIndexStyle(2,DRAW_LINE);
SetIndexShift(2,0);
SetIndexDrawBegin(2,0);
SetIndexBuffer(2,lower);
return(0);
}
int deinit(){return(0);}
int start() {
int limit;
int counted_bars=IndicatorCounted();
if(counted_bars<0) return(-1);
if(counted_bars>0) counted_bars--;
limit=Bars-counted_bars;
double avg;
for(int x=0; x<limit; x++) {
middle[x] = iMA(NULL, 0, period, 0, MODE_SMA, PRICE_CLOSE, x);
avg = findAvg(period, x);
upper[x] = middle[x] + avg;
lower[x] = middle[x] - avg;
}
if ((Bid >= lower[0]) && (Bid <= upper[0])) { prevtime = 0; }
if ((Bid > upper[0]) && (prevtime != Time[0]))
{
prevtime = Time[0];
if (SoundAlert != 0)PlaySound(BuySoundFile);
if (EmailAlert != 0) SendMail("Keltner breakout above Alert for " + Symbol(), " @ Hour " + Hour() + " Minute " + Minute());
if (PopUpAlert != 0)Alert(Symbol(),"Keltner breakout above @ Hour ",Hour()," Minute ",Minute());
}
if ((Bid < lower[0]) && (prevtime != Time[0]))
{
prevtime = Time[0];
if (SoundAlert != 0)PlaySound(SellSoundFile);
if (EmailAlert != 0) SendMail("Keltner breakout below Alert for " + Symbol(), " @ Hour " + Hour() + " Minute " + Minute());
if (PopUpAlert != 0)Alert(Symbol(),"Keltner breakout below @ Hour ",Hour()," Minute ",Minute());
}
return(0);
}
//+------------------------------------------------------------------+
double findAvg(int period, int shift) {
double sum=0;
for (int x=shift;x<(shift+period);x++) {
sum += High[x]-Low[x];
}
sum = sum/period;
return (sum);
}
Sample
Analysis
Market Information Used:
Series array that contains open time of each bar
Series array that contains the highest prices of each bar
Series array that contains the lowest prices of each bar
Indicator Curves created:
Implements a curve of type DRAW_LINE
Indicators Used:
Moving average indicator
Custom Indicators Used:
Order Management characteristics:
Other Features:
It plays sound alerts
It sends emails
It issuies visual alerts to the screen