//+------------------------------------------------------------------+ //| Pivot_Fibs.mq4 | //| Copyright 2006, Archer Trading, LLC | //| http://www.archertrading.net/ | //+------------------------------------------------------------------+ #property copyright "Archer Trading, LLC" #property link "http://www.archertrading.net/" #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]