|
//+------------------------------------------------------------------+
//| Pivot_Fibs.mq4 |
//| Copyright ?2006, Archer Trading, LLC |
//+------------------------------------------------------------------+
#property copyright "Archer Trading, LLC"
#property indicator_chart_window
#property indicator_buffers 7
#property indicator_color1 White
#property indicator_color2 Lime
#property indicator_color3 Lime
#property indicator_color4 Yellow
#property indicator_color5 Yellow
#property indicator_color6 Red
#property indicator_color7 Red
double PBuffer[];
double S1Buffer[];
double R1Buffer[];
double S2Buffer[];
double R2Buffer[];
double S3Buffer[];
double R3Buffer[];
double S0Buffer[];
double R0Buffer[];
string Pivot="Pivot Point",FibS1="S 1", FibR1="R 1";
string FibS2="S 2", FibR2="R 2", FibS3="S 3", FibR3="R 3";
int fontsize=10;
double P,R,S1,R1,S2,R2,S3,R3;
double LastHigh,LastLow,x;
//+------------------------------------------------------------------+
//| Custor indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
ObjectDelete("Pivot");
ObjectDelete("FibS1");
ObjectDelete("FibR1");
ObjectDelete("FibS2");
ObjectDelete("FibR1");
ObjectDelete("FibS3");
ObjectDelete("FibR2");
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
string short_name;
SetIndexStyle(0,DRAW_LINE,0,2,White);
SetIndexStyle(1,DRAW_LINE,0,2,Lime);
SetIndexStyle(2,DRAW_LINE,0,2,Lime);
SetIndexStyle(3,DRAW_LINE,0,2,Yellow);
SetIndexStyle(4,DRAW_LINE,0,2,Yellow);
SetIndexStyle(5,DRAW_LINE,0,2,Red);
SetIndexStyle(6,DRAW_LINE,0,2,Red);
SetIndexBuffer(0,PBuffer);
SetIndexBuffer(1,S1Buffer);
SetIndexBuffer(2,R1Buffer);
SetIndexBuffer(3,S2Buffer);
SetIndexBuffer(4,R2Buffer);
SetIndexBuffer(5,S3Buffer);
SetIndexBuffer(6,R3Buffer);
//---- name for DataWindow and indicator subwindow label
short_name="Fibonacci Pivot Points";
IndicatorShortName(short_name);
SetIndexLabel(0,short_name);
//----
SetIndexDrawBegin(0,1);
//----
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
int counted_bars=IndicatorCounted();
int limit, i;
//---- indicator calculation
if (counted_bars==0)
{
x=Period();
if (x>240) return(-1);
ObjectCreate("Pivot", OBJ_TEXT, 0, 0,0);
ObjectSetText("Pivot", "Pivot",fontsize,"Arial",White);
ObjectCreate("FibS1", OBJ_TEXT, 0, 0, 0);
ObjectSetText("FibS1", "Fib S1",fontsize,"Arial",Lime);
ObjectCreate("FibR1", OBJ_TEXT, 0, 0, 0);
ObjectSetText("FibR1", "Fib R1",fontsize,"Arial",Lime);
ObjectCreate("FibS2", OBJ_TEXT, 0, 0, 0);
ObjectSetText("FibS2", "Fib S2",fontsize,"Arial",Yellow);
ObjectCreate("FibR2", OBJ_TEXT, 0, 0, 0);
ObjectSetText("FibR2", "Fib R2",fontsize,"Arial",Yellow);
ObjectCreate("FibS3", OBJ_TEXT, 0, 0, 0);
ObjectSetText("FibS3", "Fib S3",fontsize,"Arial",Red);
ObjectCreate("FibR3", OBJ_TEXT, 0, 0, 0);
ObjectSetText("FibR3", "Fib R3",fontsize,"Arial",Red);
}
if(counted_bars<0) return(-1);
//---- last counted bar will be recounted
// if(counted_bars>0) counted_bars--;
limit=(Bars-counted_bars)-1;
for (i=limit; i>=0;i--)
{
if (High[i+1]>LastHigh) LastHigh=High[i+1];
if (Low[i+1]<LastLow) LastLow=Low[i+1];
if (TimeDay(Time[i])!=TimeDay(Time[i+1]))
{
P=(LastHigh+LastLow+Close[i+1])/3;
R = LastHigh-LastLow;
R1 = P + (R * 0.382);
S1 = P - (R * 0.382);
R2 = P + (R * 0.618);
S2 = P - (R * 0.618);
R3 = P + (R * 0.99);
S3 = P - (R * 0.99);
LastLow=Open[i]; LastHigh=Open[i];
ObjectMove("Pivot", 0, Time[i],P);
ObjectMove("FibS1", 0, Time[i],S1);
ObjectMove("FibR1", 0, Time[i],R1);
ObjectMove("FibS2", 0, Time[i],S2);
ObjectMove("FibR2", 0, Time[i],R2);
ObjectMove("FibS3", 0, Time[i],S3);
ObjectMove("FibR3", 0, Time[i],R3);
}
PBuffer[i]=P;
S1Buffer[i]=S1;
R1Buffer[i]=R1;
S2Buffer[i]=S2;
R2Buffer[i]=R2;
S3Buffer[i]=S3;
R3Buffer[i]=R3;
}
//----
return(0);
}
//+------------------------------------------------------------------+
|
|