//+------------------------------------------------------------------+
//|                                                 mn Fibo Size.mq4 |
//+------------------------------------------------------------------+
#property copyright "mn"
#property indicator_chart_window

extern int mCorner         = 2,
           mXdist          = 20,
           mYdist          = 2,
           mFontSize       = 10;
extern color  mColour      = Blue;
int mPipFact = 1;
          
//+------------------------------------------------------------------+
int init()
 {
      ObjectCreate("mFibSize", OBJ_LABEL, 0, 0, 0);
      ObjectSet("mFibSize", OBJPROP_XDISTANCE, mXdist);
      ObjectSet("mFibSize", OBJPROP_YDISTANCE, mYdist);
      ObjectSet("mFibSize", OBJPROP_CORNER, mCorner);
      ObjectSetText("mFibSize", "", 16, "Arial", CLR_NONE);

   if(Digits == 3 || Digits == 5)
    mPipFact = 10;
  
   return (0);
}

//+------------------------------------------------------------------+
int deinit()
 {
   ObjectDelete("mFibSize");
   
   return (0);
 }

//+------------------------------------------------------------------+
int start()
 {
   double mP1 = ObjectGet("Fib1", OBJPROP_PRICE1);
   double mP2 = ObjectGet("Fib1", OBJPROP_PRICE2);
   double mDist = MathAbs(mP1 - mP2);
   mDist = mDist / Point / mPipFact;

   ObjectSetText("mFibSize", "Fib " + DoubleToStr(mDist, 1), mFontSize, "Arial", mColour);

   return (0);
 }

//+------------------------------------------------------------------+

