Buy_Sell_Signal

//+——————————————————————+
//| Heiken Ashi_Counter_Mtf .mq4 |
//| Copyright 2015, Awran5. |
//| awran5@yahoo.com |
//+——————————————————————+
#property copyright “”
#property link “”
#property version “1.00”
#property description “Heiken Ashi_Counter_Candle_Mtf ”
#property strict
#property indicator_chart_window

extern int FastEMA = 13;
extern int SlowEMA = 21;
extern int RSIPeriod = 9;
extern int X=0;
extern int Y=0;
input string lb_0 = “”; // ———– PANEL ———–
extern ENUM_BASE_CORNER Corner = 3; // Panel Side
extern bool AllowSubwindow = false; // Allow sub window
extern color Pbgc = C’10,10,10′; // Panel Backgroud color
extern color Ptc = clrTomato; // Panel Title color
extern string Pfn = “Calibri”; // Panel Font Name
extern color Pfc = clrSilver; // Panel Text Color
extern color Pvc = clrDodgerBlue; // Panel Values Color
extern color obic = clrLime; // icon color
extern color osic = clrRed; // icon color
extern color nic = clrGray; // Normal icon color
input string lb_1 = “”;
// RSI period
ENUM_APPLIED_PRICE RSIApplied = 0;
double CounterUp = 0;
double CounterDn = 0;

input string lb_2 = “”; // ———– NOTIFICATION ———–
input bool UseAlert = false; // Enable Alert
input bool UseEmail = false; // Enable Email
input bool UseNotification = false; // Enable Notification
input bool UseSound = false; // Enable Sound
input string SoundName = “alert2.wav”; // Sound Name
bool Display_On_Off=true; //Display_On_Off
bool TrendLine = false; //TrendLine
bool TrendLine2 = false; //TrendLine2
int Bar = 30; //BarTrendLine

double ZeroCrossUp = 0.0;
double ZeroCrossDn = -10.0;

string iName;
//+——————————————————————+
//| Custom indicator initialization function |
//+——————————————————————+
int OnInit()
{
//— indicator buffers mapping
if(Display_On_Off)
ObjectDelete(“Cand”);
iName=”Heiken Ashi_Counter_Mtf “;
IndicatorShortName(iName);
//—
return(INIT_SUCCEEDED);
}
//+——————————————————————+
//| deinitialization function |
//+——————————————————————+
void OnDeinit(const int reason)
{
//—
for(int i=ObjectsTotal(); i>=0; i–)
{
string name=ObjectName(i);
if(StringFind(name,iName)==0) ObjectDelete(name);
}
//—
}
//+——————————————————————+
//| Custom indicator iteration function |
//+——————————————————————+
int OnCalculate(const int rates_total,
const int prev_calculated,
const datetime &time[],
const double &open[],
const double &high[],
const double &low[],
const double &close[],
const long &tick_volume[],
const long &volume[],
const int &spread[])
{
//— draw background “webdings” font
Draw(“BG”,”ggg”,70,”Webdings”,Pbgc,Corner,1,1);
//— draw background title
Draw(“Title”,”Buy_Sell.Signal”,10,Pfn,Ptc,Corner,80,10);
//— define arrays and vars
string TimeFrames[9]={“1m”,”5m”,”15m”,”30m”,”1h”,”4h”,”D1″,”W1″,”M1″};
int period[9]={1,5,15,30,60,240,1440,10080,43200};
double rsi[9]={};
double rsi2[9]={};
//— create timeframe labels
for(int i=0; i<9; i++)
{
Draw(“Period “+(string)i,TimeFrames[i],8,Pfn,Pfc,Corner,i*30+13,35);
//— create values and icons
rsi[i]= iMA(NULL, period[i], FastEMA, 0, MODE_EMA, PRICE_CLOSE, 0)/Point-
iMA(NULL,period[i] , SlowEMA, 0, MODE_EMA, PRICE_CLOSE, 0)/Point;
rsi2[i]= iRSI(NULL,period[i] , RSIPeriod, PRICE_CLOSE, 0);

if( // rsi[0]>MaxRSI
rsi[i]>0
&& rsi2[i]>50
//&& rsi[5]>0
)
Draw(“Title”,”Buy_Sell.Signal”,10,Pfn,Lime,Corner,80,10);

if(

rsi[i]<0
&& rsi2[i]<50
)
Draw(“Title”,”Buy_Sell.Signal”,10,Pfn,Red,Corner,80,10);

Draw(“Value “+(string)i,DoubleToStr(rsi2[i],1),8,Pfn,Pvc,Corner,i*30+10,55);

if(Display_On_Off)
ObjectDelete(“Cand”);

// rsi[i]= iCustom(NULL,period[i],”Heiken Ashi Candle Count Alert_Mod_Display”,4,0);
// if(TrendLine)
// rsi[i]= iCustom(NULL,period[i],”1_NEW ABHAFXS TIMING V2_5-1_modified_30_chart_window”,2,0)/Point-
// iCustom(NULL,period[i],”1_NEW ABHAFXS TIMING V2_5-1_modified_30_chart_window”,2,Bar)/Point;

// if(TrendLine2)
// rsi[i]= iClose(NULL,period[i],0)/Point-
// iCustom(NULL,period[i],”1_NEW ABHAFXS TIMING V2_5-1_modified_30_chart_window”,2,Bar)/Point;

Draw(“Value “+(string)i,DoubleToStr(rsi2[i],1),8,Pfn,Pvc,Corner,i*30+10,55);

if(rsi2[i]>50)
Draw(“Value “+(string)i,DoubleToStr(rsi2[i],1),8,Pfn,Lime,Corner,i*30+10,55);

if(rsi2[i]<50)
Draw(“Value “+(string)i,DoubleToStr(rsi2[i],1),8,Pfn,Red,Corner,i*30+10,55);

// Draw(“Value “+(string)i,DoubleToStr(rsi2/10,1),8,Pfn,Pvc,Corner,i*30+10,55);
// if( rsi2>0)
// Draw(“Value “+(string)i,DoubleToStr(rsi2/10,1),8,Pfn,Lime,Corner,i*30+10,55);
// if( rsi2<0)
// Draw(“Value “+(string)i,DoubleToStr(rsi2/10,1),8,Pfn,Red,Corner,i*30+10,55);

//— overbought, oversold icons and alert
if( // rsi[i]
rsi[i]>0
&& rsi2[i]>50
)
{
Draw(“Overbought “+(string)i,CharToStr(108),14,”Wingdings”,obic,Corner,i*30+15,75);
if( rsi[i]<CounterDn
)
doAlert(“Heiken Ashi Candle Count “+Symbol()+” on “+PeriodToStr(period[i])+” time frame”);
}
else if(rsi[i]<0
&& rsi2[i]<50
)
{
Draw(“Oversold “+(string)i,CharToStr(108),14,”Wingdings”,osic,Corner,i*30+15,75);
//if(rsi[0]<MinRSI && rsi2>50 )
// doAlert(“RSI has entered in OVERSOLD Zone at “+Symbol()+” on “+PeriodToStr(period[i])+” time frame”);
}
else Draw(“Normal “+(string)i,CharToStr(108),14,”Wingdings”,nic,Corner,i*30+15,75);

}
//— return value of prev_calculated for next call
return(rates_total);
}
//+——————————————————————+
//| alert function
//+——————————————————————+
bool doAlert(string message)
{
//— See if this bar is new and conditions are met
static datetime TimeNow;
if(TimeNow!=Time[0])
{
if(UseAlert) Alert(message);
if(UseEmail) SendMail(“RSI Notification!”,message);
if(UseSound) PlaySound(SoundName);
if(UseNotification) SendNotification(message);
// Store the time of the current bar, preventing further action during this bar
TimeNow=Time[0];
return(true);
}
return(false);
//—
}
//+——————————————————————+
//| draw function
//+——————————————————————+
void Draw(string name,string label,int size,string font,color clr,int corner,int x,int y)
{
//—
name=iName+”: “+name;
int windows=0;
if(AllowSubwindow && WindowsTotal()>1) windows=1;
ObjectDelete(name);
ObjectCreate(name,OBJ_LABEL,windows,0,0);
ObjectSetText(name,label,size,font,clr);
ObjectSet(name,OBJPROP_CORNER,corner);
ObjectSet(name,OBJPROP_XDISTANCE,x+X);
ObjectSet(name,OBJPROP_YDISTANCE,y+Y);
//—
}
//+——————————————————————+
//| Period To String – Credit to the author
//+——————————————————————+

string PeriodToStr(int tf)
{
//—
if(tf == NULL) return(PeriodToStr(Period()));
int p[9]={1,5,15,30,60,240,1440,10080,43200};
string sp[9]={“M1″,”M5″,”M15″,”M30″,”H1″,”H4″,”D1″,”W1″,”MN1”};
for(int i= 0; i < 9; i++) if(p[i] == tf) return(sp[i]);
return(“–“);
//—
}
//+————————– END ———————————–+