//+------------------------------------------------------------------+
//| 3 S & R.mq4 |
//| Copyright © 2006 |
//| |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2006"
#property link ""
#property indicator_chart_window
//---- input parameters
extern int DD=4;//--- decimal places
//---- buffers
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- indicators
//---- Objects
double R1,R2,R3,S1,S2,S3;
R1 = iHigh(NULL,PERIOD_MN1,1);
R2 = iHigh(NULL,PERIOD_W1,1);
R3 = iHigh(NULL,PERIOD_D1,1);
S1 = iLow(NULL,PERIOD_MN1,1);
S2 = iLow(NULL,PERIOD_W1,1);
S3 = iLow(NULL,PERIOD_D1,1);
ObjectCreate("MR",OBJ_HLINE,0,0,R1);
ObjectSet("MR",OBJPROP_COLOR,Yellow);
ObjectSet("MR",OBJPROP_STYLE,STYLE_SOLID);
ObjectCreate("WR",OBJ_HLINE,0,0,R2);
ObjectSet("WR",OBJPROP_COLOR,SpringGreen);
ObjectSet("WR",OBJPROP_STYLE,STYLE_SOLID);
ObjectCreate("DR",OBJ_HLINE,0,0,R3);
ObjectSet("DR",OBJPROP_COLOR,Tan);
ObjectSet("DR",OBJPROP_STYLE,STYLE_SOLID);
ObjectCreate("MS",OBJ_HLINE,0,0,S1);
ObjectSet("MS",OBJPROP_COLOR,Yellow);
ObjectSet("MS",OBJPROP_STYLE,STYLE_SOLID);
ObjectCreate("WS",OBJ_HLINE,0,0,S2);
ObjectSet("WS",OBJPROP_COLOR,SpringGreen);
ObjectSet("WS",OBJPROP_STYLE,STYLE_SOLID);
ObjectCreate("DS",OBJ_HLINE,0,0,S3);
ObjectSet("DS",OBJPROP_COLOR,Tan);
ObjectSet("DS",OBJPROP_STYLE,STYLE_SOLID);
ObjectsRedraw();
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
ObjectsDeleteAll();
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
double R1,R2,R3,S1,S2,S3,rg1,rg2,rg3,fx,bcl,bch,bc,sch,scl,sc;
int rg1a,rg2a,rg3a;
if(DD==2)
{
fx=100;
}
else
{
fx=10000;
}
R1 = iHigh(NULL,PERIOD_MN1,1);
R2 = iHigh(NULL,PERIOD_W1,1);
R3 = iHigh(NULL,PERIOD_D1,1);
S1 = iLow(NULL,PERIOD_MN1,1);
S2 = iLow(NULL,PERIOD_W1,1);
S3 = iLow(NULL,PERIOD_D1,1);
rg1=(R1-S1)*fx;
rg2=(R2-S2)*fx;
rg3=(R3-S3)*fx;
rg1a=MathRound(rg1);
rg2a=MathRound(rg2);
rg3a=MathRound(rg3);
string R1a=DoubleToStr(R1,DD);
string R2a=DoubleToStr(R2,DD);
string R3a=DoubleToStr(R3,DD);
string S1a=DoubleToStr(S1,DD);
string S2a=DoubleToStr(S2,DD);
string S3a=DoubleToStr(S3,DD);
drawLabel("RL","MR: "+R1a+" WR: "+R2a+" DR: "+R3a,12,SkyBlue,5,35,"Arial Narrow");
drawLabel("SRR","MRg: "+rg1a+" pips WRg: "+rg2a+" pips DRg: "+rg3a+" pips",10,SpringGreen,5,20,"Arial Narrow");
drawLabel("SL","MS: "+S1a+" WS: "+S2a+" DS: "+S3a,12,Tan,5,5,"Arial Narrow");
ObjectsRedraw();
//----
return(0);
}
//+------------------------------------------------------------------+
void drawLabel(string id, string text,int fsize, color fcolor,int x,int y,string font="Arial Narrow",int window = 0)
{ if(ObjectFind(id)==-1)
{
ObjectCreate(id, OBJ_LABEL, window, 0, 0);
ObjectSetText(id,text, fsize, font, fcolor);
ObjectSet(id, OBJPROP_CORNER, 2);
ObjectSet(id, OBJPROP_XDISTANCE, x);
ObjectSet(id, OBJPROP_YDISTANCE, y);
}
}
Sample
Analysis
Market Information Used:
Series array that contains the highest prices of each bar
Series array that contains the lowest prices of each bar
Indicator Curves created:
Indicators Used:
Custom Indicators Used:
Order Management characteristics:
Other Features: