//+------------------------------------------------------------------+
//|                                                      ProjectName |
//|                                   NO Copyright 2012, CompanyName |
//|                                       http://www.companyname.net |
//+------------------------------------------------------------------+
extern string INFO1="===== Volume ==============================";
extern double LotsSize=0.0;
extern string INFO_="----------------------------------------------";
extern double LotsPer1000=0.3;
extern double MinLots = 0.01;
extern double MaxLots = 60.0;
extern string INFO2="===== Protection ============================";
extern double def_MaxSpread=1.3;
extern string INFO3 = "===== Confirmation ==========================";
extern int BB_PARAM = 23;
extern int RSI_PARAM = 18;
extern double def_SL = 3.0;
extern string INFO4="===== More ===============================";
extern int MyMagicNumber=68000;
extern string Comment_="Price Action Scalping v1.68";

int Gi_180=0;
double G_pips_184= 0.0;
int G_digits_192 = 0;
double G_point_196=0.0;
int Gi_204;
double Gd_208;
double Gd_216;
double Gd_224;
double Gd_232;
double Gd_240;
double Gd_248;
double Gd_256;
int G_slippage_264=3;
bool Gi_268;
double Gd_272;
double Gda_280[30];
int Gi_284=0;
string Gs_dummy_288;
string Gs_unused_316 = "";
string Gs_unused_324 = "";
double Gd_336;
double Gd_344;
int G_time_352;
int Gi_356;
int G_datetime_360;
string Gs_364 = "000,000,000";
string Gs_372 = "000,000,255";
int Gi_380;
int Gi_384;
int Filter=185;
int StopLoss;
double Risk;
bool UseMM;
double MaxSpreadPlusCommission=10000.0;
int Limit=20;
int Distance = 21;
int MAPeriod = 3;
int MAMethod = 3;
string TimeFilter="----------Time Filter";
int StartHour=0;
int StartMinute=0;
int EndHour=23;
int EndMinute=59;
int Gi_388;
int Gi_392=40;
double G_timeframe_396=240.0;
bool Gi_404=TRUE;
color G_color_408 = DimGray;
string G_name_412 = "SpreadIndikatorObj";
double Gd_420;
color G_color_428 = Red;
color G_color_432 = DarkGray;
color G_color_436 = SpringGreen;
bool Gi_440=TRUE;
double G_ihigh_444;
double G_ilow_452;
double Gd_460;
int G_datetime_468;
// E37F0136AA3FFAF149B351F6A4C948E9
int init()
  {
   StopLoss=def_SL*10.0;
   def_MaxSpread=def_MaxSpread*10;
   if(LotsSize==0.0)
     {
      UseMM=TRUE;
     }
   else
     {
      UseMM=FALSE;
     }
   Risk=LotsPer1000*20;
   int timeframe_8;
   ArrayInitialize(Gda_280,0);
   G_digits_192= Digits;
   G_point_196 = Point;
   Print("Digits: "+G_digits_192+" Point: "+DoubleToStr(G_point_196,G_digits_192));
   double lotstep_0=MarketInfo(Symbol(),MODE_LOTSTEP);
   Gi_204 = MathLog(lotstep_0) / MathLog(0.1);
   Gd_208 = MathMax(MinLots, MarketInfo(Symbol(), MODE_MINLOT));
   Gd_216 = MathMin(MaxLots, MarketInfo(Symbol(), MODE_MAXLOT));
   Gd_224 = Risk / 100.0;
   Gd_232 = NormalizeDouble(MaxSpreadPlusCommission * G_point_196, G_digits_192 + 1);
   Gd_240 = NormalizeDouble(Limit * G_point_196, G_digits_192);
   Gd_248 = NormalizeDouble(Distance * G_point_196, G_digits_192);
   Gd_256 = NormalizeDouble(G_point_196 * Filter, G_digits_192);
   Gi_268 = FALSE;
   Gd_272 = NormalizeDouble(G_pips_184 * G_point_196, G_digits_192 + 1);
   if(!IsTesting())
     {
      f0_8();
      if(Gi_404)
        {
         timeframe_8=Period();
         switch(timeframe_8)
           {
            case PERIOD_M1:
               G_timeframe_396=5;
               break;
            case PERIOD_M5:
               G_timeframe_396=15;
               break;
            case PERIOD_M15:
               G_timeframe_396=30;
               break;
            case PERIOD_M30:
               G_timeframe_396=60;
               break;
            case PERIOD_H1:
               G_timeframe_396=240;
               break;
            case PERIOD_H4:
               G_timeframe_396=1440;
               break;
            case PERIOD_D1:
               G_timeframe_396=10080;
               break;
            case PERIOD_W1:
               G_timeframe_396=43200;
               break;
            case PERIOD_MN1:
               G_timeframe_396=43200;
           }
        }
      Gd_420=0.0001;
      f0_7();
      f0_2();
      f0_0();
      f0_3();
     }
   return (0);
  }
// 52D46093050F38C27267BCE42543EF60
int deinit()
  {
   if(!IsTesting())
     {
      for(int Li_0=1; Li_0<=Gi_392; Li_0++) ObjectDelete("Padding_rect"+Li_0);
      for(int count_4=0; count_4<10; count_4++)
        {
         ObjectDelete("BD"+count_4);
         ObjectDelete("SD"+count_4);
        }
      ObjectDelete("time");
      ObjectDelete(G_name_412);
     }
   Comment("");
   ObjectDelete("B3LLogo");
   ObjectDelete("B3LCopy");
   ObjectDelete("FiboUp");
   ObjectDelete("FiboDn");
   ObjectDelete("FiboIn");
   return (0);
  }
// EA2B2676C28C0DB26D39331A336C6B92
int start()
  {

//StopLoss = StopLoss + MarketInfo(Symbol(),MODE_SPREAD);
   int error_8;
   string Ls_12;
   int ticket_20;
   double price_24;
   bool bool_32;
   double Ld_36;
   double Ld_44;
   double price_60;
   double Ld_112;
   int Li_180;
   int cmd_188;
   double Ld_196;
   double Ld_204;
   double ihigh_68= iHigh(NULL,0,0);
   double ilow_76 = iLow(NULL,0,0);
// double ima_84 = iMA(NULL, 0, MAPeriod, Gi_180, MAMethod, PRICE_LOW, 0);
//  double ima_92 = iMA(NULL, 0, MAPeriod, Gi_180, MAMethod, PRICE_HIGH, 0);
   double ibands_84=iBands(Symbol(),Period(),BB_PARAM,2.0,0,PRICE_CLOSE,MODE_UPPER,0);
   double ibands_92=iBands(Symbol(),Period(),BB_PARAM,2.0,0,PRICE_CLOSE,MODE_LOWER,0);

   double irsi_96=iRSI(Symbol(),Period(),RSI_PARAM,PRICE_CLOSE,0);

   if(!Gi_268)
     {
      for(int pos_108=OrdersHistoryTotal()-1; pos_108>=0; pos_108--)
        {
         if(OrderSelect(pos_108,SELECT_BY_POS,MODE_HISTORY))
           {
            if(OrderProfit()!=0.0)
              {
               if(OrderClosePrice()!=OrderOpenPrice())
                 {
                  if(OrderSymbol()==Symbol())
                    {
                     Gi_268 = TRUE;
                     Ld_112 = MathAbs(OrderProfit() / (OrderClosePrice() - OrderOpenPrice()));
                     Gd_272 = (-OrderCommission()) / Ld_112;
                     break;
                    }
                 }
              }
           }
        }
     }

   double Ld_120=Ask-Bid;
   ArrayCopy(Gda_280,Gda_280,0,1,29);
   Gda_280[29]=Ld_120;
   if(Gi_284<30) Gi_284++;
   double Ld_128=0;
   pos_108=29;
   for(int count_136=0; count_136<Gi_284; count_136++)
     {
      Ld_128+=Gda_280[pos_108];
      pos_108--;
     }
   double Ld_140 = Ld_128 / Gi_284;
   double Ld_148 = NormalizeDouble(Ask + Gd_272, G_digits_192);
   double Ld_156 = NormalizeDouble(Bid - Gd_272, G_digits_192);
   double Ld_164 = NormalizeDouble(Ld_140 + Gd_272, G_digits_192 + 1);
   double Ld_172 = ihigh_68 - ilow_76;
   if(Ld_172>Gd_256)
     {
      if(Bid<ibands_92 && irsi_96<50.0) Li_180=-1;
      else
         if(Bid>ibands_84 && irsi_96>50.0) Li_180=1;
     }
   int count_184=0;
   for(pos_108=0; pos_108<OrdersTotal(); pos_108++)
     {
      if(OrderSelect(pos_108,SELECT_BY_POS,MODE_TRADES))
        {
         if(OrderMagicNumber()==MyMagicNumber)
           {
            cmd_188=OrderType();
            if(cmd_188==OP_BUYLIMIT || cmd_188==OP_SELLLIMIT) continue;
            if(OrderSymbol()==Symbol())
              {
               count_184++;
               switch(cmd_188)
                 {
                  case OP_BUY:
                     if(Distance<0) break;
                     Ld_44=NormalizeDouble(OrderStopLoss(),G_digits_192);
                     price_60=NormalizeDouble(Bid-Gd_248,G_digits_192);
                     if(!((Ld_44==0.0 || price_60>Ld_44))) break;
                     bool_32=OrderModify(OrderTicket(),OrderOpenPrice(),price_60,OrderTakeProfit(),0,Lime);
                     if(!(!bool_32)) break;
                     error_8=GetLastError();
                     Print("BUY Modify Error Code: "+error_8+" Message: "+Ls_12+" OP: "+DoubleToStr(price_24,G_digits_192)+" SL: "+DoubleToStr(price_60,G_digits_192)+
                           " Bid: "+DoubleToStr(Bid,G_digits_192)+" Ask: "+DoubleToStr(Ask,G_digits_192));
                     break;
                  case OP_SELL:
                     if(Distance<0) break;
                     Ld_44=NormalizeDouble(OrderStopLoss(),G_digits_192);
                     price_60=NormalizeDouble(Ask+Gd_248,G_digits_192);
                     if(!((Ld_44==0.0 || price_60<Ld_44))) break;
                     bool_32=OrderModify(OrderTicket(),OrderOpenPrice(),price_60,OrderTakeProfit(),0,Orange);
                     if(!(!bool_32)) break;
                     error_8=GetLastError();
                     Print("SELL Modify Error Code: "+error_8+" Message: "+Ls_12+" OP: "+DoubleToStr(price_24,G_digits_192)+" SL: "+DoubleToStr(price_60,G_digits_192)+
                           " Bid: "+DoubleToStr(Bid,G_digits_192)+" Ask: "+DoubleToStr(Ask,G_digits_192));
                     break;
                  case OP_BUYSTOP:
                     Ld_36=NormalizeDouble(OrderOpenPrice(),G_digits_192);
                     price_24=NormalizeDouble(Ask+Gd_240,G_digits_192);
                     if(!((price_24<Ld_36))) break;
                     price_60= NormalizeDouble(price_24 -(StopLoss+MarketInfo(Symbol(),MODE_SPREAD)) * Point,G_digits_192);
                     bool_32 = OrderModify(OrderTicket(),price_24,price_60,OrderTakeProfit(),0,Lime);
                     if(!(!bool_32)) break;
                     error_8=GetLastError();
                     Print("BUYSTOP Modify Error Code: "+error_8+" Message: "+Ls_12+" OP: "+DoubleToStr(price_24,G_digits_192)+" SL: "+DoubleToStr(price_60,G_digits_192)+
                           " Bid: "+DoubleToStr(Bid,G_digits_192)+" Ask: "+DoubleToStr(Ask,G_digits_192));
                     break;
                  case OP_SELLSTOP:
                     Ld_36=NormalizeDouble(OrderOpenPrice(),G_digits_192);
                     price_24=NormalizeDouble(Bid-Gd_240,G_digits_192);
                     if(!((price_24>Ld_36))) break;
                     price_60= NormalizeDouble(price_24+(StopLoss+MarketInfo(Symbol(),MODE_SPREAD)) * Point,G_digits_192);
                     bool_32 = OrderModify(OrderTicket(),price_24,price_60,OrderTakeProfit(),0,Orange);
                     if(!(!bool_32)) break;
                     error_8=GetLastError();
                     Print("SELLSTOP Modify Error Code: "+error_8+" Message: "+Ls_12+" OP: "+DoubleToStr(price_24,G_digits_192)+" SL: "+DoubleToStr(price_60,G_digits_192)+
                           " Bid: "+DoubleToStr(Bid,G_digits_192)+" Ask: "+DoubleToStr(Ask,G_digits_192));
                 }
              }
           }
        }
     }
   if(count_184==0 && Li_180!=0 && Ld_164<=Gd_232 && f0_4())
     {
      Ld_196=AccountBalance()*AccountLeverage()*Gd_224;
      if(!UseMM) Ld_196=LotsSize;
      Ld_204 = NormalizeDouble(Ld_196 / MarketInfo(Symbol(), MODE_LOTSIZE), Gi_204);
      Ld_204 = MathMax(Gd_208, Ld_204);
      Ld_204 = MathMin(Gd_216, Ld_204);
      if(Li_180<0)
        {
         price_24 = NormalizeDouble(Ask + Gd_240, G_digits_192);
         price_60 = NormalizeDouble(price_24 - (StopLoss+ MarketInfo(Symbol(),MODE_SPREAD)) * Point, G_digits_192);

         if(MarketInfo(Symbol(),MODE_SPREAD)<def_MaxSpread) ticket_20=OrderSend(Symbol(),OP_BUYSTOP,Ld_204,price_24,G_slippage_264,price_60,0,Comment_,MyMagicNumber,0,Lime);
         if(ticket_20<=0)
           {
            error_8=GetLastError();
            Print("BUYSTOP Send Error Code: "+error_8+" Message: "+Ls_12+" LT: "+DoubleToStr(Ld_204,Gi_204)+" OP: "+DoubleToStr(price_24,G_digits_192)+" SL: "+
                  DoubleToStr(price_60,G_digits_192)+" Bid: "+DoubleToStr(Bid,G_digits_192)+" Ask: "+DoubleToStr(Ask,G_digits_192));
           }
           } else {
         price_24 = NormalizeDouble(Bid - Gd_240, G_digits_192);
         price_60 = NormalizeDouble(price_24 + (StopLoss+ MarketInfo(Symbol(),MODE_SPREAD)) * Point, G_digits_192);
         if(MarketInfo(Symbol(),MODE_SPREAD)<def_MaxSpread) ticket_20=OrderSend(Symbol(),OP_SELLSTOP,Ld_204,price_24,G_slippage_264,price_60,0,Comment_,MyMagicNumber,0,Orange);
         if(ticket_20<=0)
           {
            error_8=GetLastError();
            Print("BUYSELL Send Error Code: "+error_8+" Message: "+Ls_12+" LT: "+DoubleToStr(Ld_204,Gi_204)+" OP: "+DoubleToStr(price_24,G_digits_192)+" SL: "+
                  DoubleToStr(price_60,G_digits_192)+" Bid: "+DoubleToStr(Bid,G_digits_192)+" Ask: "+DoubleToStr(Ask,G_digits_192));
           }
        }
     }
   string Ls_212="AvgSpread:"+DoubleToStr(Ld_140,G_digits_192)+"  Commission rate:"+DoubleToStr(Gd_272,G_digits_192+1)+"  Real avg. spread:"+DoubleToStr(Ld_164,
                                          G_digits_192+1);
   if(Ld_164>Gd_232)
     {
      Ls_212=Ls_212
             +"\n"
             +"The EA can not run with this spread ( "+DoubleToStr(Ld_164,G_digits_192+1)+" > "+DoubleToStr(Gd_232,G_digits_192+1)+" )";
     }
   if(count_184!=0 || Li_180!=0)
     {
     }
   if(!IsTesting())
     {
      f0_2();
      f0_7();
      f0_0();
      f0_3();
      f0_8();
     }
   return (0);
  }
// 3B8B9927CE5F3E077818404E64D1C252
int f0_4()
  {
   if((Hour() > StartHour && Hour() < EndHour) || (Hour() == StartHour && Minute() >= StartMinute) || (Hour() == EndHour && Minute() < EndMinute)) return (1);
   return (0);
  }
// DFF63C921B711879B02EDBCAFB9A05B0
void f0_8()
  {
   Gd_336 = WindowPriceMax();
   Gd_344 = WindowPriceMin();
   G_time_352=Time[WindowFirstVisibleBar()];
   Gi_356=WindowFirstVisibleBar()-WindowBarsPerChart();
   if(Gi_356<0) Gi_356=0;
   G_datetime_360=Time[Gi_356]+60*Period();
   for(int Li_0=1; Li_0<=Gi_392; Li_0++)
     {
      if(ObjectFind("Padding_rect"+Li_0)==-1) ObjectCreate("Padding_rect"+Li_0,OBJ_RECTANGLE,0,G_time_352,Gd_336 -(Gd_336-Gd_344)/Gi_392 *(Li_0-1),G_datetime_360,Gd_336 -(Gd_336-Gd_344)/Gi_392*Li_0);
      ObjectSet("Padding_rect"+Li_0,OBJPROP_TIME1,G_time_352);
      ObjectSet("Padding_rect"+Li_0,OBJPROP_TIME2,G_datetime_360-1);
      ObjectSet("Padding_rect"+Li_0,OBJPROP_PRICE1,Gd_336 -(Gd_336-Gd_344)/Gi_392 *(Li_0-1));
      ObjectSet("Padding_rect"+Li_0,OBJPROP_PRICE2,Gd_336 -(Gd_336-Gd_344)/Gi_392*Li_0);
      ObjectSet("Padding_rect"+Li_0,OBJPROP_BACK,TRUE);
      ObjectSet("Padding_rect"+Li_0,OBJPROP_COLOR,f0_9(Gs_364,Gs_372,Gi_392,Li_0));
     }
   WindowRedraw();
  }
// F7E068A881FC08598B50EAA72BECD80C
int f0_9(string As_0,string As_8,int Ai_16,int Ai_20)
  {
   int str2int_24 = StrToInteger(StringSubstr(As_0, 0, 3));
   int str2int_28 = StrToInteger(StringSubstr(As_0, 4, 3));
   int str2int_32 = StrToInteger(StringSubstr(As_0, 8, 3));
   int str2int_36 = StrToInteger(StringSubstr(As_8, 0, 3));
   int str2int_40 = StrToInteger(StringSubstr(As_8, 4, 3));
   int str2int_44 = StrToInteger(StringSubstr(As_8, 8, 3));
   if(str2int_24 > str2int_36) Gi_380 = str2int_24 + (str2int_36 - str2int_24) / Ai_16 * Ai_20;
   if(str2int_24 < str2int_36) Gi_380 = str2int_24 - (str2int_24 - str2int_36) / Ai_16 * Ai_20;
   if(str2int_28 > str2int_40) Gi_384 = str2int_28 + (str2int_40 - str2int_28) / Ai_16 * Ai_20;
   if(str2int_28 < str2int_40) Gi_384 = str2int_28 - (str2int_28 - str2int_40) / Ai_16 * Ai_20;
   if(str2int_32 > str2int_44) Gi_388 = str2int_32 + (str2int_44 - str2int_32) / Ai_16 * Ai_20;
   if(str2int_32 < str2int_44) Gi_388 = str2int_32 - (str2int_32 - str2int_44) / Ai_16 * Ai_20;
   Gi_384 *= 256;
   Gi_388<<= 16;
   return (Gi_380 + Gi_384 + Gi_388);
  }
// 2795031E32D1FE85C9BD72823A8B4142
void f0_2()
  {
   double Lda_0[10];
   double Lda_4[10];
   double Lda_8[10];
   double Lda_12[10];
   int Li_16;
   int Li_20;
   int Li_24;
   int Li_32;
   if(Period()<G_timeframe_396)
     {
      ArrayCopySeries(Lda_0,2,Symbol(),G_timeframe_396);
      ArrayCopySeries(Lda_4,1,Symbol(),G_timeframe_396);
      ArrayCopySeries(Lda_8,0,Symbol(),G_timeframe_396);
      ArrayCopySeries(Lda_12,3,Symbol(),G_timeframe_396);
      Li_32=3;
      for(int Li_28=2; Li_28>=0; Li_28--)
        {
         Li_20 = Time[0] + Period() * (90 * Li_32);
         Li_24 = Time[0] + 90 * (Period() * (Li_32 + 1));
         if(ObjectFind("BD"+Li_28)==-1)
           {
            if(Lda_8[Li_28]>Lda_12[Li_28]) Li_16=170;
            else Li_16=43520;
            f0_6("D"+Li_28,Li_20,Li_24,Lda_8[Li_28],Lda_12[Li_28],Lda_4[Li_28],Lda_0[Li_28],Li_16);
              } else {
            if(Lda_8[Li_28]>Lda_12[Li_28]) Li_16=170;
            else Li_16=43520;
            f0_5("D"+Li_28,Li_20,Li_24,Lda_8[Li_28],Lda_12[Li_28],Lda_4[Li_28],Lda_0[Li_28],Li_16);
           }
         Li_32++;
         Li_32++;
        }
     }
  }
// 9F92396C933453E2D1202389D9EFB0E5
void f0_6(string As_0,int A_datetime_8,int A_datetime_12,double A_price_16,double A_price_24,double A_price_32,double A_price_40,color A_color_48)
  {
   if(A_price_16==A_price_24) A_color_48=Gray;
   ObjectCreate("B"+As_0,OBJ_RECTANGLE,0,A_datetime_8,A_price_16,A_datetime_12,A_price_24);
   ObjectSet("B"+As_0,OBJPROP_STYLE,STYLE_SOLID);
   ObjectSet("B"+As_0,OBJPROP_COLOR,A_color_48);
   ObjectSet("B"+As_0,OBJPROP_BACK,TRUE);
   int datetime_52=A_datetime_8+(A_datetime_12-A_datetime_8)/2;
   ObjectCreate("S"+As_0,OBJ_TREND,0,datetime_52,A_price_32,datetime_52,A_price_40);
   ObjectSet("S"+As_0,OBJPROP_COLOR,A_color_48);
   ObjectSet("S"+As_0,OBJPROP_BACK,TRUE);
   ObjectSet("S"+As_0,OBJPROP_RAY,FALSE);
   ObjectSet("S"+As_0,OBJPROP_WIDTH,2);
  }
// 88F07BF2A3E2A04159AC984719B3F549
void f0_5(string As_0,int A_datetime_8,int A_datetime_12,double Ad_16,double Ad_24,double Ad_32,double Ad_40,color A_color_48)
  {
   if(Ad_16==Ad_24) A_color_48=Gray;
   ObjectSet("B"+As_0,OBJPROP_TIME1,A_datetime_8);
   ObjectSet("B"+As_0,OBJPROP_PRICE1,Ad_16);
   ObjectSet("B"+As_0,OBJPROP_TIME2,A_datetime_12);
   ObjectSet("B"+As_0,OBJPROP_PRICE2,Ad_24);
   ObjectSet("B"+As_0,OBJPROP_BACK,TRUE);
   ObjectSet("B"+As_0,OBJPROP_COLOR,A_color_48);
   int datetime_52=A_datetime_8+(A_datetime_12-A_datetime_8)/2;
   ObjectSet("S"+As_0,OBJPROP_TIME1,datetime_52);
   ObjectSet("S"+As_0,OBJPROP_PRICE1,Ad_32);
   ObjectSet("S"+As_0,OBJPROP_TIME2,datetime_52);
   ObjectSet("S"+As_0,OBJPROP_PRICE2,Ad_40);
   ObjectSet("S"+As_0,OBJPROP_BACK,TRUE);
   ObjectSet("S"+As_0,OBJPROP_WIDTH,2);
   ObjectSet("S"+As_0,OBJPROP_COLOR,A_color_48);
  }
// CDF7118C61A4AA4E389CF2547874D314
void f0_7()
  {
   double Ld_0=(Ask-Bid)/Gd_420;
   string text_8="Spread: "+DoubleToStr(Ld_0,1)+" pips";
   if(ObjectFind(G_name_412)<0)
     {
      ObjectCreate(G_name_412,OBJ_LABEL,0,0,0);
      ObjectSet(G_name_412,OBJPROP_CORNER,1);
      ObjectSet(G_name_412,OBJPROP_YDISTANCE,260);
      ObjectSet(G_name_412,OBJPROP_XDISTANCE,10);
      ObjectSetText(G_name_412,text_8,13,"Arial",G_color_408);
     }
   ObjectSetText(G_name_412,text_8);
   WindowRedraw();
  }
// 39C409D2E4985FE63B2929843BE560CF
void f0_3()
  {
   int Li_8=Time[0]+60*Period()-TimeCurrent();
   double Ld_0=Li_8/60.0;
   int Li_12=Li_8%60;
   Li_8=(Li_8-Li_8%60)/60;
   Comment(Li_8+" minutes "+Li_12+" seconds left to bar end");
   ObjectDelete("time");
   if(ObjectFind("time")!=0)
     {
      ObjectCreate("time",OBJ_TEXT,0,Time[0],Close[0]+0.0005);
      ObjectSetText("time","                                 <--"+Li_8+":"+Li_12,13,"Verdana",Yellow);
      return;
     }
   ObjectMove("time",0,Time[0],Close[0]+0.0005);
  }
// 0D09CCEE6F8BC2AF782594ED51D3E1A7
void f0_0()
  {
   int Li_0=iBarShift(NULL,PERIOD_D1,Time[0])+1;
   G_ihigh_444= iHigh(NULL,PERIOD_D1,Li_0);
   G_ilow_452 = iLow(NULL,PERIOD_D1,Li_0);
   G_datetime_468=iTime(NULL,PERIOD_D1,Li_0);
   if(TimeDayOfWeek(G_datetime_468)==0)
     {
      G_ihigh_444= MathMax(G_ihigh_444,iHigh(NULL,PERIOD_D1,Li_0+1));
      G_ilow_452 = MathMin(G_ilow_452,iLow(NULL,PERIOD_D1,Li_0+1));
     }
   Gd_460=G_ihigh_444-G_ilow_452;
   f0_1();
  }
// 177469F06A7487E6FDDCBE94FDB6FD63
int f0_1()
  {
   if(ObjectFind("FiboUp")==-1) ObjectCreate("FiboUp",OBJ_FIBO,0,G_datetime_468,G_ihigh_444+Gd_460,G_datetime_468,G_ihigh_444);
   else
     {
      ObjectSet("FiboUp",OBJPROP_TIME2,G_datetime_468);
      ObjectSet("FiboUp",OBJPROP_TIME1,G_datetime_468);
      ObjectSet("FiboUp",OBJPROP_PRICE1,G_ihigh_444+Gd_460);
      ObjectSet("FiboUp",OBJPROP_PRICE2,G_ihigh_444);
     }
   ObjectSet("FiboUp",OBJPROP_LEVELCOLOR,G_color_428);
   ObjectSet("FiboUp",OBJPROP_FIBOLEVELS,13);
   ObjectSet("FiboUp",OBJPROP_FIRSTLEVEL,0.0);
   ObjectSetFiboDescription("FiboUp",0,"(100.0%) -  %$");
   ObjectSet("FiboUp",211,0.236);
   ObjectSetFiboDescription("FiboUp",1,"(123.6%) -  %$");
   ObjectSet("FiboUp",212,0.382);
   ObjectSetFiboDescription("FiboUp",2,"(138.2%) -  %$");
   ObjectSet("FiboUp",213,0.5);
   ObjectSetFiboDescription("FiboUp",3,"(150.0%) -  %$");
   ObjectSet("FiboUp",214,0.618);
   ObjectSetFiboDescription("FiboUp",4,"(161.8%) -  %$");
   ObjectSet("FiboUp",215,0.764);
   ObjectSetFiboDescription("FiboUp",5,"(176.4%) -  %$");
   ObjectSet("FiboUp",216,1.0);
   ObjectSetFiboDescription("FiboUp",6,"(200.0%) -  %$");
   ObjectSet("FiboUp",217,1.236);
   ObjectSetFiboDescription("FiboUp",7,"(223.6%) -  %$");
   ObjectSet("FiboUp",218,1.5);
   ObjectSetFiboDescription("FiboUp",8,"(250.0%) -  %$");
   ObjectSet("FiboUp",219,1.618);
   ObjectSetFiboDescription("FiboUp",9,"(261.8%) -  %$");
   ObjectSet("FiboUp",220,2.0);
   ObjectSetFiboDescription("FiboUp",10,"(300.0%) -  %$");
   ObjectSet("FiboUp",221,2.5);
   ObjectSetFiboDescription("FiboUp",11,"(350.0%) -  %$");
   ObjectSet("FiboUp",222,3.0);
   ObjectSetFiboDescription("FiboUp",12,"(400.0%) -  %$");
   ObjectSet("FiboUp",223,3.5);
   ObjectSetFiboDescription("FiboUp",13,"(450.0%) -  %$");
   ObjectSet("FiboUp",224,4.0);
   ObjectSetFiboDescription("FiboUp",14,"(500.0%) -  %$");
   ObjectSet("FiboUp",OBJPROP_RAY,TRUE);
   ObjectSet("FiboUp",OBJPROP_BACK,TRUE);
   if(ObjectFind("FiboDn")==-1) ObjectCreate("FiboDn",OBJ_FIBO,0,G_datetime_468,G_ilow_452-Gd_460,G_datetime_468,G_ilow_452);
   else
     {
      ObjectSet("FiboDn",OBJPROP_TIME2,G_datetime_468);
      ObjectSet("FiboDn",OBJPROP_TIME1,G_datetime_468);
      ObjectSet("FiboDn",OBJPROP_PRICE1,G_ilow_452-Gd_460);
      ObjectSet("FiboDn",OBJPROP_PRICE2,G_ilow_452);
     }
   ObjectSet("FiboDn",OBJPROP_LEVELCOLOR,G_color_436);
   ObjectSet("FiboDn",OBJPROP_FIBOLEVELS,19);
   ObjectSet("FiboDn",OBJPROP_FIRSTLEVEL,0.0);
   ObjectSetFiboDescription("FiboDn",0,"(0.0%) -  %$");
   ObjectSet("FiboDn",211,0.236);
   ObjectSetFiboDescription("FiboDn",1,"(-23.6%) -  %$");
   ObjectSet("FiboDn",212,0.382);
   ObjectSetFiboDescription("FiboDn",2,"(-38.2%) -  %$");
   ObjectSet("FiboDn",213,0.5);
   ObjectSetFiboDescription("FiboDn",3,"(-50.0%) -  %$");
   ObjectSet("FiboDn",214,0.618);
   ObjectSetFiboDescription("FiboDn",4,"(-61.8%) -  %$");
   ObjectSet("FiboDn",215,0.764);
   ObjectSetFiboDescription("FiboDn",5,"(-76.4%) -  %$");
   ObjectSet("FiboDn",216,1.0);
   ObjectSetFiboDescription("FiboDn",6,"(-100.0%) -  %$");
   ObjectSet("FiboDn",217,1.236);
   ObjectSetFiboDescription("FiboDn",7,"(-123.6%) -  %$");
   ObjectSet("FiboDn",218,1.382);
   ObjectSetFiboDescription("FiboDn",8,"(-138.2%) -  %$");
   ObjectSet("FiboDn",219,1.5);
   ObjectSetFiboDescription("FiboDn",9,"(-150.0%) -  %$");
   ObjectSet("FiboDn",220,1.618);
   ObjectSetFiboDescription("FiboDn",10,"(-161.8%) -  %$");
   ObjectSet("FiboDn",221,1.764);
   ObjectSetFiboDescription("FiboDn",11,"(-176.4%) -  %$");
   ObjectSet("FiboDn",222,2.0);
   ObjectSetFiboDescription("FiboDn",12,"(-200.0%) -  %$");
   ObjectSet("FiboDn",223,2.5);
   ObjectSetFiboDescription("FiboDn",13,"(-250.0%) -  %$");
   ObjectSet("FiboDn",224,3.0);
   ObjectSetFiboDescription("FiboDn",14,"(-300.0%) -  %$");
   ObjectSet("FiboDn",225,3.5);
   ObjectSetFiboDescription("FiboDn",15,"(-350.0%) -  %$");
   ObjectSet("FiboDn",226,4.0);
   ObjectSetFiboDescription("FiboDn",16,"(-400.0%) -  %$");
   ObjectSet("FiboDn",227,4.5);
   ObjectSetFiboDescription("FiboDn",17,"(-450.0%) -  %$");
   ObjectSet("FiboDn",228,5.0);
   ObjectSetFiboDescription("FiboDn",18,"(-500.0%) -  %$");
   ObjectSet("FiboDn",OBJPROP_RAY,TRUE);
   ObjectSet("FiboDn",OBJPROP_BACK,TRUE);
   if(Gi_440)
     {
      if(ObjectFind("FiboIn")==-1) ObjectCreate("FiboIn",OBJ_FIBO,0,G_datetime_468,G_ihigh_444,G_datetime_468+86400,G_ilow_452);
      else
        {
         ObjectSet("FiboIn",OBJPROP_TIME2,G_datetime_468);
         ObjectSet("FiboIn",OBJPROP_TIME1,G_datetime_468+86400);
         ObjectSet("FiboIn",OBJPROP_PRICE1,G_ihigh_444);
         ObjectSet("FiboIn",OBJPROP_PRICE2,G_ilow_452);
        }
      ObjectSet("FiboIn",OBJPROP_LEVELCOLOR,G_color_432);
      ObjectSet("FiboIn",OBJPROP_FIBOLEVELS,7);
      ObjectSet("FiboIn",OBJPROP_FIRSTLEVEL,0.0);
      ObjectSetFiboDescription("FiboIn",0,"Daily LOW (0.0) -  %$");
      ObjectSet("FiboIn",211,0.236);
      ObjectSetFiboDescription("FiboIn",1,"(23.6) -  %$");
      ObjectSet("FiboIn",212,0.382);
      ObjectSetFiboDescription("FiboIn",2,"(38.2) -  %$");
      ObjectSet("FiboIn",213,0.5);
      ObjectSetFiboDescription("FiboIn",3,"(50.0) -  %$");
      ObjectSet("FiboIn",214,0.618);
      ObjectSetFiboDescription("FiboIn",4,"(61.8) -  %$");
      ObjectSet("FiboIn",215,0.764);
      ObjectSetFiboDescription("FiboIn",5,"(76.4) -  %$");
      ObjectSet("FiboIn",216,1.0);
      ObjectSetFiboDescription("FiboIn",6,"Daily HIGH (100.0) -  %$");
      ObjectSet("FiboIn",OBJPROP_RAY,TRUE);
      ObjectSet("FiboIn",OBJPROP_BACK,TRUE);
     }
   else ObjectDelete("FiboIn");
   return (0);
  }
//+------------------------------------------------------------------+