//+------------------------------------------------------------------+ //| 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 i; int counted_bars=IndicatorCounted(); if(counted_bars<0) return(-1); if(counted_bars>0) counted_bars--; int limit=Bars-counted_bars; if(counted_bars==0) limit-=1+1; //---- 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); } //---- for(i=limit; i>=0;i--) { if(High[i+1]>LastHigh) LastHigh=High[i+1]; if(Low[i+1]