thanks
- Code: Select all
//+------------------------------------------------------------------+
//| RSI BDv09_01_26.mq4 |
//| Jeff |
//| wolfboy@att.net |
//+------------------------------------------------------------------+
// RSI BDv8_12_31: Original indicator modified for the Black Dog Trading System.
// RSI BDv09_01_26: Adds 50 level as an indicator property.
// Charts Color RSI with the EMA of the Color RSI. Original 'Color RSI' by 'mladen'.
#property indicator_separate_window
#property indicator_buffers 4
#property indicator_minimum 30
#property indicator_maximum 70
#property indicator_color1 DimGray
#property indicator_color2 DarkGreen
#property indicator_color3 Red
#property indicator_color4 Blue
#property indicator_width2 2
#property indicator_width3 2
#property indicator_width4 1
#property indicator_style4 STYLE_SOLID
#property indicator_level1 50
#property indicator_levelcolor Black
#property indicator_levelstyle 0
//---- input parameters
extern int RSIPeriod = 50;
extern int EMAPeriod = 25;
extern string note1 = "0=close;1=open;2=hi;3=low";
extern string note2 = "4=median;5=typical;6=weighted";
extern int PriceType = 0;
extern string note3 = "Chart Time Frame";
extern string note4 = "1=M1, 5=M5, 15=M15, 30=M30";
extern string note5 = "60=H1, 240=H4, 1440=D1";
extern string note6 = "10080=W1, 43200=MN1";
extern string timeFrame = "Current time frame";
extern int overBought = 50;
extern int overSold = 50;
extern bool showArrows = false;
extern bool alertsOn = false;
extern bool alertsMessage = false;
extern bool alertsSound = false;
extern bool alertsEmail = false;
//---- buffers
double RSIBuffer[];
double EMABuffer[];
double Upper[];
double Lower[];
int TimeFrame;
datetime TimeArray[];
int maxArrows;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
SetIndexBuffer(0,RSIBuffer);
SetIndexBuffer(1,Upper);
SetIndexBuffer(2,Lower);
SetIndexBuffer(3,EMABuffer);
SetIndexLabel(0,"RSI");
SetIndexLabel(1,NULL);
SetIndexLabel(2,NULL);
SetIndexLabel(3,"EMA of RSI");
TimeFrame = stringToTimeFrame(timeFrame);
string shortName = "RSI ("+TimeFrameToString(TimeFrame)+","+RSIPeriod+","+PriceTypeToString(PriceType);
if (overBought < overSold)
{
overBought = overSold;
}
if (overBought < 100)
{
shortName = shortName+","+overBought;
}
if (overSold > 0)
{
shortName = shortName+","+overSold;
}
IndicatorShortName(shortName+")");
return(0);
}
int deinit()
{
DeleteArrows();
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
int counted_bars=IndicatorCounted();
int limit;
int i,y;
if(counted_bars<0) return(-1);
limit=Bars-counted_bars;
ArrayCopySeries(TimeArray ,MODE_TIME ,NULL,TimeFrame);
for(i=0,y=0; i<limit; i++)
{
if(Time[i]<TimeArray[y]) y++;
{
RSIBuffer[i] = iRSI(NULL,TimeFrame,RSIPeriod,PriceType,y);
}
}
for(i=0,y=0; i<limit; i++)
{
if(Time[i]<TimeArray[y]) y++;
{
EMABuffer[i] = iMAOnArray(RSIBuffer,Bars,EMAPeriod,0,MODE_EMA,i);
}
}
for(i=limit; i>=0; i--)
{
if (RSIBuffer[i] > overBought)
{
Upper[i] = RSIBuffer[i]; Upper[i+1] = RSIBuffer[i+1];
}
else
{ Upper[i] = EMPTY_VALUE;
if (Upper[i+2] == EMPTY_VALUE)
{
Upper[i+1] = EMPTY_VALUE;
}
if (RSIBuffer[i] < overSold)
{
Lower[i] = RSIBuffer[i]; Lower[i+1] = RSIBuffer[i+1];
}
else
{
Lower[i] = EMPTY_VALUE;
if (Lower[i+2] == EMPTY_VALUE)
{
Lower[i+1] = EMPTY_VALUE;
}
}
}
}
if (showArrows)
for (i=0; i<WindowBarsPerChart() ;i++)
{
if (RSIBuffer[i]>overBought && RSIBuffer[i+1]<overBought)
{
DrawArrow(i,"down");
}
if (RSIBuffer[i]<overSold && RSIBuffer[i+1]>overSold)
{
DrawArrow(i,"up");
}
}
if (alertsOn)
{
if (RSIBuffer[0]>overBought && RSIBuffer[1]<overBought)
{
doAlert(overBought+" line crossed up");
}
if (RSIBuffer[0]<overSold && RSIBuffer[1]>overSold)
{
doAlert(overBought+" line crossed down");
}
}
return(0);
}
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
void DrawArrow(int i,string type)
{
maxArrows++;
ObjectCreate("RSISignal"+maxArrows,OBJ_ARROW,0,Time[i],0);
if (type=="up")
{
ObjectSet("RSISignal"+maxArrows,OBJPROP_PRICE1,High[i]+(8*Point));
ObjectSet("RSISignal"+maxArrows,OBJPROP_ARROWCODE,242);
ObjectSet("RSISignal"+maxArrows,OBJPROP_COLOR,Red);
}
else
{
ObjectSet("RSISignal"+maxArrows,OBJPROP_PRICE1,Low[i]-(6*Point));
ObjectSet("RSISignal"+maxArrows,OBJPROP_ARROWCODE,241);
ObjectSet("RSISignal"+maxArrows,OBJPROP_COLOR,LimeGreen);
}
}
void DeleteArrows()
{
while(maxArrows>0)
{
ObjectDelete("RSISignal"+maxArrows); maxArrows--;
}
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void doAlert(string doWhat)
{
static string previousAlert="nothing";
static datetime previousTime;
string message;
if (previousAlert != doWhat || previousTime != Time[0])
{
previousAlert = doWhat;
previousTime = Time[0];
message = StringConcatenate(Symbol()," at ",TimeToStr(TimeLocal(),TIME_SECONDS)," RSI ",doWhat);
if (alertsMessage)
{
Alert(message);
}
if (alertsSound)
{
PlaySound("alert2.wav");
}
if (alertsEmail)
{
SendMail(StringConcatenate(Symbol()," RSI crossing"),message);
}
}
}
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
string PriceTypeToString(int pt)
{
string answer;
switch(pt)
{
case 0: answer = "Close" ; break;
case 1: answer = "Open" ; break;
case 2: answer = "High" ; break;
case 3: answer = "Low" ; break;
case 4: answer = "Median" ; break;
case 5: answer = "Typical" ; break;
case 6: answer = "Wighted" ; break;
default: answer = "Invalid price field requested";
Alert(answer);
}
return(answer);
}
int stringToTimeFrame(string tfs)
{
int tf=0;
tfs = StringUpperCase(tfs);
if (tfs=="M1" || tfs=="1") tf=PERIOD_M1;
if (tfs=="M5" || tfs=="5") tf=PERIOD_M5;
if (tfs=="M15"|| tfs=="15") tf=PERIOD_M15;
if (tfs=="M30"|| tfs=="30") tf=PERIOD_M30;
if (tfs=="H1" || tfs=="60") tf=PERIOD_H1;
if (tfs=="H4" || tfs=="240") tf=PERIOD_H4;
if (tfs=="D1" || tfs=="1440") tf=PERIOD_D1;
if (tfs=="W1" || tfs=="10080") tf=PERIOD_W1;
if (tfs=="MN" || tfs=="43200") tf=PERIOD_MN1;
if (tf<Period()) tf=Period();
return(tf);
}
string TimeFrameToString(int tf)
{
string tfs="Current time frame";
switch(tf)
{
case PERIOD_M1: tfs="M1" ; break;
case PERIOD_M5: tfs="M5" ; break;
case PERIOD_M15: tfs="M15" ; break;
case PERIOD_M30: tfs="M30" ; break;
case PERIOD_H1: tfs="H1" ; break;
case PERIOD_H4: tfs="H4" ; break;
case PERIOD_D1: tfs="D1" ; break;
case PERIOD_W1: tfs="W1" ; break;
case PERIOD_MN1: tfs="MN1";
}
return(tfs);
}
string StringUpperCase(string str)
{
string s = str;
int lenght = StringLen(str) - 1;
int char;
while(lenght >= 0)
{
char = StringGetChar(s, lenght);
if((char > 96 && char < 123) || (char > 223 && char < 256))
{
s = StringSetChar(s, lenght, char - 32);
}
else
if(char > -33 && char < 0)
{
s = StringSetChar(s, lenght, char + 224);
}
lenght--;
}
return(s);
}