//+------------------------------------------------------------------+ //| Pivot.mq4 | //| Copyright © 2004, Poul_Trade_Forum | //| Aborigen | //| http://forex.kbpauk.ru/ | //+------------------------------------------------------------------+ #property copyright "Poul Trade Forum" #property link "http://forex.kbpauk.ru/" //---- #property indicator_chart_window //#property indicator_separate_window #property indicator_buffers 7 #property indicator_color1 Orange #property indicator_color2 DarkBlue #property indicator_color3 Maroon #property indicator_color4 DarkBlue #property indicator_color5 Maroon #property indicator_color6 Green #property indicator_color7 Green //---- input parameters //---- buffers double PBuffer[]; double S1Buffer[]; double R1Buffer[]; double S2Buffer[]; double R2Buffer[]; double S3Buffer[]; double R3Buffer[]; string Pivot="Pivot Point",Sup1="S 1",Res1="R 1"; string Sup2="S 2",Res2="R 2",Sup3="S 3",Res3="R 3"; int fontsize=10; double P,S1,R1,S2,R2,S3,R3; double LastHigh,LastLow,x; //+------------------------------------------------------------------+ //| Custor indicator deinitialization function | //+------------------------------------------------------------------+ int deinit() { //---- TODO: add your code here ObjectDelete("Pivot"); ObjectDelete("Sup1"); ObjectDelete("Res1"); ObjectDelete("Sup2"); ObjectDelete("Res2"); ObjectDelete("Sup3"); ObjectDelete("Res3"); //---- return(0); } //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int init() { string short_name; //---- indicator line SetIndexStyle(0,DRAW_LINE,0,2,Orange); SetIndexStyle(1,DRAW_LINE,0,2,DarkBlue); SetIndexStyle(2,DRAW_LINE,0,2,Maroon); SetIndexStyle(3,DRAW_LINE,0,2,DarkBlue); SetIndexStyle(4,DRAW_LINE,0,2,Maroon); SetIndexStyle(5,DRAW_LINE,0,2,Green); SetIndexStyle(6,DRAW_LINE,0,2,Green); 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="Pivot Point"; 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; if(counted_bars<0) return(-1); //---- indicator calculation if(counted_bars==0) { x=Period(); if(x>240) return(-1); ObjectCreate("Pivot",OBJ_TEXT,0,0,0); ObjectSetText("Pivot"," Pivot Point",fontsize,"Arial",Red); ObjectCreate("Sup1",OBJ_TEXT,0,0,0); ObjectSetText("Sup1"," S 1",fontsize,"Arial",Red); ObjectCreate("Res1",OBJ_TEXT,0,0,0); ObjectSetText("Res1"," R 1",fontsize,"Arial",Red); ObjectCreate("Sup2",OBJ_TEXT,0,0,0); ObjectSetText("Sup2"," S 2",fontsize,"Arial",Red); ObjectCreate("Res2",OBJ_TEXT,0,0,0); ObjectSetText("Res2"," R 2",fontsize,"Arial",Red); ObjectCreate("Sup3",OBJ_TEXT,0,0,0); ObjectSetText("Sup3"," S 3",fontsize,"Arial",Red); ObjectCreate("Res3",OBJ_TEXT,0,0,0); ObjectSetText("Res3"," R 3",fontsize,"Arial",Red); } if(counted_bars>0) counted_bars--; limit=Bars-counted_bars; if(counted_bars==0) limit-=1+1; //---- for(i=limit; i>=0;i--) { if(High[i+1]>LastHigh) LastHigh=High[i+1]; if(Low[i+1]