/*
   Generated by EX4-TO-MQ4 decompiler V4.0.224.1 []
   Website: http://purebeam.biz
   E-mail : purebeam@gmail.com
*/
#property copyright "Copyright © 2004, MetaQuotes Software Corp."
#property link      "http://www.metaquotes.net"

#property indicator_chart_window

extern bool midpivots = FALSE;
extern bool Fhr = FALSE;
extern bool daily = FALSE;
extern bool weekly = TRUE;
extern bool monthly = TRUE;
extern color r1color = Bisque;
extern color r2color = Bisque;
extern color r3color = Bisque;
extern int r1width = 2;
extern int r2width = 2;
extern int r3width = 2;
extern color pcolor = PaleGreen;
extern int pwidth = 2;
extern color s1color = Bisque;
extern color s2color = Bisque;
extern color s3color = Bisque;
extern int s1width = 2;
extern int s2width = 2;
extern int s3width = 2;
extern int m5color = YellowGreen;
extern int m4color = YellowGreen;
extern int m3color = YellowGreen;
extern int m2color = YellowGreen;
extern int m1color = YellowGreen;
extern int m0color = YellowGreen;
double gd_unused_176 = 0.0;
double gd_unused_184 = 0.0;
double gd_unused_192 = 0.0;
double gd_unused_200 = 0.0;
double gd_unused_208 = 0.0;
double gd_unused_216 = 0.0;
double gd_unused_224 = 0.0;
double gd_unused_232 = 0.0;
double gd_unused_240 = 0.0;
double gd_unused_248 = 0.0;
double gd_unused_256 = 0.0;
double gd_unused_264;
double gd_unused_272;
double gd_unused_280;
double gd_unused_288;
double gd_unused_296;
double gd_unused_304;
double gd_unused_312;
double gd_unused_320;
double gd_unused_328;
double gd_unused_336;
double gd_unused_344;
double gd_unused_352;
double gd_unused_360 = 0.0;
double gd_unused_368 = 0.0;
double gd_unused_376 = 0.0;
double gda_unused_384[2][6];
double gda_unused_388[];
double gd_unused_392 = 0.0;
double gd_unused_400 = 0.0;
double gd_unused_408 = 0.0;
double gd_unused_416 = 0.0;
double gd_unused_424 = 0.0;
double gd_unused_432 = 0.0;
double gd_unused_440 = 0.0;
double gd_unused_448 = 0.0;
double gd_unused_456 = 0.0;
double gd_unused_464 = 0.0;
double gd_unused_472 = 0.0;
double gd_unused_480;
double gd_unused_488;
double gd_unused_496;
double gd_unused_504;
double gd_unused_512;
double gd_unused_520;
double gd_unused_528;
double gd_unused_536;
double gd_unused_544;
double gd_unused_552;
double gd_unused_560;
double gd_unused_568;
double gd_unused_576 = 0.0;
double gd_unused_584 = 0.0;
double gd_unused_592 = 0.0;
double gda_unused_600[2][6];
double gda_unused_604[];
double gd_unused_608 = 0.0;
double gd_unused_616 = 0.0;
double gd_unused_624 = 0.0;
double gd_unused_632 = 0.0;
double gd_unused_640 = 0.0;
double gd_unused_648 = 0.0;
double gd_unused_656 = 0.0;
double gd_unused_664 = 0.0;
double gd_unused_672 = 0.0;
double gd_unused_680 = 0.0;
double gd_unused_688 = 0.0;
double gd_unused_696;
double gd_unused_704;
double gd_unused_712;
double gd_unused_720;
double gd_unused_728;
double gd_unused_736;
double gd_unused_744;
double gd_unused_752;
double gd_unused_760;
double gd_unused_768;
double gd_unused_776;
double gd_unused_784;
double gd_unused_792 = 0.0;
double gd_unused_800 = 0.0;
double gd_unused_808 = 0.0;
double gda_unused_816[2][6];
double gda_unused_820[];
double gd_unused_824 = 0.0;
double gd_unused_832 = 0.0;
double gd_unused_840 = 0.0;
double gd_unused_848 = 0.0;
double gd_unused_856 = 0.0;
double gd_unused_864 = 0.0;
double gd_unused_872 = 0.0;
double gd_unused_880 = 0.0;
double gd_unused_888 = 0.0;
double gd_unused_896 = 0.0;
double gd_unused_904 = 0.0;
double gd_unused_912;
double gd_unused_920;
double gd_unused_928;
double gd_unused_936;
double gd_unused_944;
double gd_unused_952;
double gd_unused_960;
double gd_unused_968;
double gd_unused_976;
double gd_unused_984;
double gd_unused_992;
double gd_unused_1000;
double gd_unused_1008 = 0.0;
double gd_unused_1016 = 0.0;
double gd_unused_1024 = 0.0;
double gda_unused_1032[2][6];
double gda_unused_1036[];

int init() {
   gd_unused_480 = 0;
   gd_unused_488 = 0;
   gd_unused_496 = 0;
   gd_unused_504 = 0;
   gd_unused_512 = 0;
   gd_unused_520 = 0;
   gd_unused_528 = 0;
   gd_unused_536 = 0;
   gd_unused_544 = 0;
   gd_unused_552 = 0;
   gd_unused_560 = 0;
   gd_unused_568 = 0;
   gd_unused_696 = 0;
   gd_unused_704 = 0;
   gd_unused_712 = 0;
   gd_unused_720 = 0;
   gd_unused_728 = 0;
   gd_unused_736 = 0;
   gd_unused_744 = 0;
   gd_unused_752 = 0;
   gd_unused_760 = 0;
   gd_unused_768 = 0;
   gd_unused_776 = 0;
   gd_unused_784 = 0;
   gd_unused_912 = 0;
   gd_unused_920 = 0;
   gd_unused_928 = 0;
   gd_unused_936 = 0;
   gd_unused_944 = 0;
   gd_unused_952 = 0;
   gd_unused_960 = 0;
   gd_unused_968 = 0;
   gd_unused_976 = 0;
   gd_unused_984 = 0;
   gd_unused_992 = 0;
   gd_unused_1000 = 0;
   gd_unused_264 = 0;
   gd_unused_272 = 0;
   gd_unused_280 = 0;
   gd_unused_288 = 0;
   gd_unused_296 = 0;
   gd_unused_304 = 0;
   gd_unused_312 = 0;
   gd_unused_320 = 0;
   gd_unused_328 = 0;
   gd_unused_336 = 0;
   gd_unused_344 = 0;
   gd_unused_352 = 0;
   return (0);
}

int deinit() {
   ObjectDelete("Fhr_R1 Label");
   ObjectDelete("Fhr_R1 Line");
   ObjectDelete("Fhr_R2 Label");
   ObjectDelete("Fhr_R2 Line");
   ObjectDelete("Fhr_R3 Label");
   ObjectDelete("Fhr_R3 Line");
   ObjectDelete("Fhr_S1 Label");
   ObjectDelete("Fhr_S1 Line");
   ObjectDelete("Fhr_S2 Label");
   ObjectDelete("Fhr_S2 Line");
   ObjectDelete("Fhr_S3 Label");
   ObjectDelete("Fhr_S3 Line");
   ObjectDelete("Fhr_P Label");
   ObjectDelete("Fhr_P Line");
   ObjectDelete("Fhr_M5 Label");
   ObjectDelete("Fhr_M5 Line");
   ObjectDelete("Fhr_M4 Label");
   ObjectDelete("Fhr_M4 Line");
   ObjectDelete("Fhr_M3 Label");
   ObjectDelete("Fhr_M3 Line");
   ObjectDelete("Fhr_M2 Label");
   ObjectDelete("Fhr_M2 Line");
   ObjectDelete("Fhr_M1 Label");
   ObjectDelete("Fhr_M1 Line");
   ObjectDelete("Fhr_M0 Label");
   ObjectDelete("Fhr_M0 Line");
   ObjectDelete("D_R1 Label");
   ObjectDelete("D_R1 Line");
   ObjectDelete("D_R2 Label");
   ObjectDelete("D_R2 Line");
   ObjectDelete("D_R3 Label");
   ObjectDelete("D_R3 Line");
   ObjectDelete("D_S1 Label");
   ObjectDelete("D_S1 Line");
   ObjectDelete("D_S2 Label");
   ObjectDelete("D_S2 Line");
   ObjectDelete("D_S3 Label");
   ObjectDelete("D_S3 Line");
   ObjectDelete("D_P Label");
   ObjectDelete("D_P Line");
   ObjectDelete("D_M5 Label");
   ObjectDelete("D_M5 Line");
   ObjectDelete("D_M4 Label");
   ObjectDelete("D_M4 Line");
   ObjectDelete("D_M3 Label");
   ObjectDelete("D_M3 Line");
   ObjectDelete("D_M2 Label");
   ObjectDelete("D_M2 Line");
   ObjectDelete("D_M1 Label");
   ObjectDelete("D_M1 Line");
   ObjectDelete("D_M0 Label");
   ObjectDelete("D_M0 Line");
   ObjectDelete("W_R1 Label");
   ObjectDelete("W_R1 Line");
   ObjectDelete("W_R2 Label");
   ObjectDelete("W_R2 Line");
   ObjectDelete("W_R3 Label");
   ObjectDelete("W_R3 Line");
   ObjectDelete("W_S1 Label");
   ObjectDelete("W_S1 Line");
   ObjectDelete("W_S2 Label");
   ObjectDelete("W_S2 Line");
   ObjectDelete("W_S3 Label");
   ObjectDelete("W_S3 Line");
   ObjectDelete("W_P Label");
   ObjectDelete("W_P Line");
   ObjectDelete("W_M5 Label");
   ObjectDelete("W_M5 Line");
   ObjectDelete("W_M4 Label");
   ObjectDelete("W_M4 Line");
   ObjectDelete("W_M3 Label");
   ObjectDelete("W_M3 Line");
   ObjectDelete("W_M2 Label");
   ObjectDelete("W_M2 Line");
   ObjectDelete("W_M1 Label");
   ObjectDelete("W_M1 Line");
   ObjectDelete("W_M0 Label");
   ObjectDelete("W_M0 Line");
   ObjectDelete("M_R1 Label");
   ObjectDelete("M_R1 Line");
   ObjectDelete("M_R2 Label");
   ObjectDelete("M_R2 Line");
   ObjectDelete("M_R3 Label");
   ObjectDelete("M_R3 Line");
   ObjectDelete("M_S1 Label");
   ObjectDelete("M_S1 Line");
   ObjectDelete("M_S2 Label");
   ObjectDelete("M_S2 Line");
   ObjectDelete("M_S3 Label");
   ObjectDelete("M_S3 Line");
   ObjectDelete("M_P Label");
   ObjectDelete("M_P Line");
   ObjectDelete("M_M5 Label");
   ObjectDelete("M_M5 Line");
   ObjectDelete("M_M4 Label");
   ObjectDelete("M_M4 Line");
   ObjectDelete("M_M3 Label");
   ObjectDelete("M_M3 Line");
   ObjectDelete("M_M2 Label");
   ObjectDelete("M_M2 Line");
   ObjectDelete("M_M1 Label");
   ObjectDelete("M_M1 Line");
   ObjectDelete("M_M0 Label");
   ObjectDelete("M_M0 Line");
   return (0);
}

int start() {
   double lda_208[2][6];
   double lda_420[2][6];
   double lda_632[2][6];
   double lda_844[2][6];
   double ld_0 = 0;
   double ld_8 = 0;
   double ld_16 = 0;
   double ld_unused_24 = 0;
   double ld_32 = 0;
   double ld_40 = 0;
   double ld_unused_48 = 0;
   double ld_unused_56 = 0;
   double ld_unused_64 = 0;
   double l_price_72 = 0;
   double ld_80 = 0;
   double ld_184 = 0;
   double ld_192 = 0;
   double ld_200 = 0;
   double ld_212 = 0;
   double ld_220 = 0;
   double ld_228 = 0;
   double ld_unused_236 = 0;
   double ld_244 = 0;
   double ld_252 = 0;
   double ld_unused_260 = 0;
   double ld_unused_268 = 0;
   double ld_unused_276 = 0;
   double l_price_284 = 0;
   double ld_292 = 0;
   double ld_396 = 0;
   double ld_404 = 0;
   double ld_412 = 0;
   double ld_424 = 0;
   double ld_432 = 0;
   double ld_440 = 0;
   double ld_unused_448 = 0;
   double ld_456 = 0;
   double ld_464 = 0;
   double ld_unused_472 = 0;
   double ld_unused_480 = 0;
   double ld_unused_488 = 0;
   double l_price_496 = 0;
   double ld_504 = 0;
   double ld_608 = 0;
   double ld_616 = 0;
   double ld_624 = 0;
   double ld_636 = 0;
   double ld_644 = 0;
   double ld_652 = 0;
   double ld_unused_660 = 0;
   double ld_668 = 0;
   double ld_676 = 0;
   double ld_unused_684 = 0;
   double ld_unused_692 = 0;
   double ld_unused_700 = 0;
   double l_price_708 = 0;
   double ld_716 = 0;
   double ld_820 = 0;
   double ld_828 = 0;
   double ld_836 = 0;
   double l_price_300 = 0;
   double l_price_308 = 0;
   double l_price_316 = 0;
   double l_price_324 = 0;
   double l_price_332 = 0;
   double l_price_340 = 0;
   double l_price_348 = 0;
   double l_price_356 = 0;
   double l_price_364 = 0;
   double l_price_372 = 0;
   double l_price_380 = 0;
   double l_price_388 = 0;
   double l_price_512 = 0;
   double l_price_520 = 0;
   double l_price_528 = 0;
   double l_price_536 = 0;
   double l_price_544 = 0;
   double l_price_552 = 0;
   double l_price_560 = 0;
   double l_price_568 = 0;
   double l_price_576 = 0;
   double l_price_584 = 0;
   double l_price_592 = 0;
   double l_price_600 = 0;
   double l_price_724 = 0;
   double l_price_732 = 0;
   double l_price_740 = 0;
   double l_price_748 = 0;
   double l_price_756 = 0;
   double l_price_764 = 0;
   double l_price_772 = 0;
   double l_price_780 = 0;
   double l_price_788 = 0;
   double l_price_796 = 0;
   double l_price_804 = 0;
   double l_price_812 = 0;
   double l_price_88 = 0;
   double l_price_96 = 0;
   double l_price_104 = 0;
   double l_price_112 = 0;
   double l_price_120 = 0;
   double l_price_128 = 0;
   double l_price_136 = 0;
   double l_price_144 = 0;
   double l_price_152 = 0;
   double l_price_160 = 0;
   double l_price_168 = 0;
   double l_price_176 = 0;
   ArrayCopyRates(lda_208, Symbol(), PERIOD_H4);
   ld_40 = lda_208[1][4];
   ld_unused_24 = lda_208[1][1];
   ld_unused_48 = lda_208[0][1];
   ld_16 = lda_208[1][3];
   ld_32 = lda_208[1][2];
   ld_0 = lda_208[0][3];
   ld_8 = lda_208[0][2];
   ld_200 = ld_0 - ld_8;
   ld_80 = ld_16 - ld_32;
   l_price_72 = (ld_16 + ld_32 + ld_40) / 3.0;
   l_price_88 = 2.0 * l_price_72 - ld_32;
   l_price_160 = 2.0 * l_price_72 - ld_16;
   l_price_96 = l_price_72 + (ld_16 - ld_32);
   l_price_168 = l_price_72 - (ld_16 - ld_32);
   l_price_104 = 2.0 * l_price_72 + (ld_16 - 2.0 * ld_32);
   l_price_152 = (l_price_96 + l_price_104) / 2.0;
   l_price_144 = (l_price_88 + l_price_96) / 2.0;
   l_price_136 = (l_price_72 + l_price_88) / 2.0;
   l_price_128 = (l_price_72 + l_price_160) / 2.0;
   l_price_120 = (l_price_160 + l_price_168) / 2.0;
   l_price_176 = 2.0 * l_price_72 - (2.0 * ld_16 - ld_32);
   l_price_112 = (l_price_168 + l_price_176) / 2.0;
   if (ld_80 > 5.0) ld_184 = ld_80;
   else ld_184 = 10000.0 * ld_80;
   if (ld_200 > 5.0) ld_192 = ld_200;
   else ld_192 = 10000.0 * ld_200;
   if (StringSubstr(Symbol(), 3, 3) == "JPY") {
      ld_184 /= 100.0;
      ld_192 /= 100.0;
   }
   ArrayCopyRates(lda_420, Symbol(), PERIOD_D1);
   ld_252 = lda_420[1][4];
   ld_unused_236 = lda_420[1][1];
   ld_unused_260 = lda_420[0][1];
   ld_228 = lda_420[1][3];
   ld_244 = lda_420[1][2];
   ld_212 = lda_420[0][3];
   ld_220 = lda_420[0][2];
   ld_412 = ld_212 - ld_220;
   ld_292 = ld_228 - ld_244;
   l_price_284 = (ld_228 + ld_244 + ld_252) / 3.0;
   l_price_300 = 2.0 * l_price_284 - ld_244;
   l_price_372 = 2.0 * l_price_284 - ld_228;
   l_price_308 = l_price_284 + (ld_228 - ld_244);
   l_price_380 = l_price_284 - (ld_228 - ld_244);
   l_price_316 = 2.0 * l_price_284 + (ld_228 - 2.0 * ld_244);
   l_price_364 = (l_price_308 + l_price_316) / 2.0;
   l_price_356 = (l_price_300 + l_price_308) / 2.0;
   l_price_348 = (l_price_284 + l_price_300) / 2.0;
   l_price_340 = (l_price_284 + l_price_372) / 2.0;
   l_price_332 = (l_price_372 + l_price_380) / 2.0;
   l_price_388 = 2.0 * l_price_284 - (2.0 * ld_228 - ld_244);
   l_price_324 = (l_price_380 + l_price_388) / 2.0;
   if (ld_292 > 5.0) ld_396 = ld_292;
   else ld_396 = 10000.0 * ld_292;
   if (ld_412 > 5.0) ld_404 = ld_412;
   else ld_404 = 10000.0 * ld_412;
   if (StringSubstr(Symbol(), 3, 3) == "JPY") {
      ld_396 /= 100.0;
      ld_404 /= 100.0;
   }
   ArrayCopyRates(lda_632, Symbol(), PERIOD_W1);
   ld_464 = lda_632[1][4];
   ld_unused_448 = lda_632[1][1];
   ld_unused_472 = lda_632[0][1];
   ld_440 = lda_632[1][3];
   ld_456 = lda_632[1][2];
   ld_424 = lda_632[0][3];
   ld_432 = lda_632[0][2];
   ld_624 = ld_424 - ld_432;
   ld_504 = ld_440 - ld_456;
   l_price_496 = (ld_440 + ld_456 + ld_464) / 3.0;
   l_price_512 = 2.0 * l_price_496 - ld_456;
   l_price_584 = 2.0 * l_price_496 - ld_440;
   l_price_520 = l_price_496 + (ld_440 - ld_456);
   l_price_592 = l_price_496 - (ld_440 - ld_456);
   l_price_528 = 2.0 * l_price_496 + (ld_440 - 2.0 * ld_456);
   l_price_576 = (l_price_520 + l_price_528) / 2.0;
   l_price_568 = (l_price_512 + l_price_520) / 2.0;
   l_price_560 = (l_price_496 + l_price_512) / 2.0;
   l_price_552 = (l_price_496 + l_price_584) / 2.0;
   l_price_544 = (l_price_584 + l_price_592) / 2.0;
   l_price_600 = 2.0 * l_price_496 - (2.0 * ld_440 - ld_456);
   l_price_536 = (l_price_592 + l_price_600) / 2.0;
   if (ld_504 > 5.0) ld_608 = ld_504;
   else ld_608 = 10000.0 * ld_504;
   if (ld_624 > 5.0) ld_616 = ld_624;
   else ld_616 = 10000.0 * ld_624;
   if (StringSubstr(Symbol(), 3, 3) == "JPY") {
      ld_608 /= 100.0;
      ld_616 /= 100.0;
   }
   ArrayCopyRates(lda_844, Symbol(), PERIOD_MN1);
   ld_676 = lda_844[1][4];
   ld_unused_660 = lda_844[1][1];
   ld_unused_684 = lda_844[0][1];
   ld_652 = lda_844[1][3];
   ld_668 = lda_844[1][2];
   ld_636 = lda_844[0][3];
   ld_644 = lda_844[0][2];
   ld_836 = ld_636 - ld_644;
   ld_716 = ld_652 - ld_668;
   l_price_708 = (ld_652 + ld_668 + ld_676) / 3.0;
   l_price_724 = 2.0 * l_price_708 - ld_668;
   l_price_796 = 2.0 * l_price_708 - ld_652;
   l_price_732 = l_price_708 + (ld_652 - ld_668);
   l_price_804 = l_price_708 - (ld_652 - ld_668);
   l_price_740 = 2.0 * l_price_708 + (ld_652 - 2.0 * ld_668);
   l_price_788 = (l_price_732 + l_price_740) / 2.0;
   l_price_780 = (l_price_724 + l_price_732) / 2.0;
   l_price_772 = (l_price_708 + l_price_724) / 2.0;
   l_price_764 = (l_price_708 + l_price_796) / 2.0;
   l_price_756 = (l_price_796 + l_price_804) / 2.0;
   l_price_812 = 2.0 * l_price_708 - (2.0 * ld_652 - ld_668);
   l_price_748 = (l_price_804 + l_price_812) / 2.0;
   if (ld_716 > 5.0) ld_820 = ld_716;
   else ld_820 = 10000.0 * ld_716;
   if (ld_836 > 5.0) ld_828 = ld_836;
   else ld_828 = 10000.0 * ld_836;
   if (StringSubstr(Symbol(), 3, 3) == "JPY") {
      ld_820 /= 100.0;
      ld_828 /= 100.0;
   }
   if (Fhr == TRUE) {
      if (ObjectFind("Fhr_R1 label") != 0) {
         ObjectCreate("Fhr_R1 label", OBJ_TEXT, 0, Time[0], l_price_88);
         ObjectSetText("Fhr_R1 label", "Fhr_R1 " + DoubleToStr(l_price_88, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("Fhr_R1 label", 0, Time[0], l_price_88);
      if (ObjectFind("Fhr_R2 label") != 0) {
         ObjectCreate("Fhr_R2 label", OBJ_TEXT, 0, Time[20], l_price_96);
         ObjectSetText("Fhr_R2 label", "Fhr_R2 " + DoubleToStr(l_price_96, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("Fhr_R2 label", 0, Time[0], l_price_96);
      if (ObjectFind("Fhr_R3 label") != 0) {
         ObjectCreate("Fhr_R3 label", OBJ_TEXT, 0, Time[20], l_price_104);
         ObjectSetText("Fhr_R3 label", "Fhr_R3 " + DoubleToStr(l_price_104, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("Fhr_R3 label", 0, Time[0], l_price_104);
      if (ObjectFind("Fhr_P label") != 0) {
         ObjectCreate("Fhr_P label", OBJ_TEXT, 0, Time[0], l_price_72);
         ObjectSetText("Fhr_P label", "Fhr_Pivot " + DoubleToStr(l_price_72, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("Fhr_P label", 0, Time[0], l_price_72);
      if (ObjectFind("Fhr_S1 label") != 0) {
         ObjectCreate("Fhr_S1 label", OBJ_TEXT, 0, Time[0], l_price_160);
         ObjectSetText("Fhr_S1 label", "Fhr_S1 " + DoubleToStr(l_price_160, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("Fhr_S1 label", 0, Time[0], l_price_160);
      if (ObjectFind("Fhr_S2 label") != 0) {
         ObjectCreate("Fhr_S2 label", OBJ_TEXT, 0, Time[20], l_price_168);
         ObjectSetText("Fhr_S2 label", "Fhr_S2 " + DoubleToStr(l_price_168, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("Fhr_S2 label", 0, Time[0], l_price_168);
      if (ObjectFind("Fhr_S3 label") != 0) {
         ObjectCreate("Fhr_S3 label", OBJ_TEXT, 0, Time[20], l_price_176);
         ObjectSetText("Fhr_S3 label", "Fhr_S3 " + DoubleToStr(l_price_176, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("Fhr_S3 label", 0, Time[0], l_price_176);
      if (ObjectFind("Fhr_S1 line") != 0) {
         ObjectCreate("Fhr_S1 line", OBJ_HLINE, 0, Time[0], l_price_160);
         ObjectSet("Fhr_S1 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("Fhr_S1 STYLE_SOLID", OBJPROP_WIDTH, 1);
         ObjectSet("Fhr_S1 line", OBJPROP_COLOR, s1color);
      } else ObjectMove("Fhr_S1 line", 0, Time[40], l_price_160);
      if (ObjectFind("Fhr_S2 line") != 0) {
         ObjectCreate("Fhr_S2 line", OBJ_HLINE, 0, Time[40], l_price_168, Time[0], l_price_168);
         ObjectSet("Fhr_S2 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("Fhr_S2 line", OBJPROP_WIDTH, 1);
         ObjectSet("Fhr_S2 line", OBJPROP_COLOR, s2color);
      } else ObjectMove("Fhr_S2 line", 0, Time[40], l_price_168);
      if (ObjectFind("Fhr_S3 line") != 0) {
         ObjectCreate("Fhr_S3 line", OBJ_HLINE, 0, Time[40], l_price_176, Time[0], l_price_176);
         ObjectSet("Fhr_S3 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("Fhr_S3 line", OBJPROP_WIDTH, s3width);
         ObjectSet("Fhr_S3 line", OBJPROP_COLOR, s3color);
      } else ObjectMove("Fhr_S3 line", 0, Time[40], l_price_176);
      if (ObjectFind("Fhr_P line") != 0) {
         ObjectCreate("Fhr_P line", OBJ_HLINE, 0, Time[40], l_price_72, Time[0], l_price_72);
         ObjectSet("Fhr_P line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("Fhr_P line", OBJPROP_WIDTH, pwidth);
         ObjectSet("Fhr_P line", OBJPROP_COLOR, pcolor);
      } else ObjectMove("Fhr_P line", 0, Time[40], l_price_72);
      if (ObjectFind("Fhr_R1 line") != 0) {
         ObjectCreate("Fhr_R1 line", OBJ_HLINE, 0, Time[40], l_price_88, Time[0], l_price_88);
         ObjectSet("Fhr_R1 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("Fhr_R1 line", OBJPROP_WIDTH, 1);
         ObjectSet("Fhr_R1 line", OBJPROP_COLOR, r1color);
      } else ObjectMove("Fhr_R1 line", 0, Time[40], l_price_88);
      if (ObjectFind("Fhr_R2 line") != 0) {
         ObjectCreate("Fhr_R2 line", OBJ_HLINE, 0, Time[0], l_price_96);
         ObjectSet("Fhr_R2 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("Fhr_R2 line", OBJPROP_WIDTH, 1);
         ObjectSet("Fhr_R2 line", OBJPROP_COLOR, r2color);
      } else ObjectMove("Fhr_R2 line", 0, Time[40], l_price_96);
      if (ObjectFind("Fhr_R3 line") != 0) {
         ObjectCreate("Fhr_R3 line", OBJ_HLINE, 0, Time[40], l_price_104, Time[0], l_price_104);
         ObjectSet("Fhr_R3 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("Fhr_R3 line", OBJPROP_WIDTH, r3width);
         ObjectSet("Fhr_R3 line", OBJPROP_COLOR, r3color);
      } else ObjectMove("Fhr_R3 line", 0, Time[40], l_price_104);
   }
   if (Fhr == TRUE && midpivots == TRUE) {
      if (ObjectFind("Fhr_M5 label") != 0) {
         ObjectCreate("Fhr_M5 label", OBJ_TEXT, 0, Time[20], l_price_152);
         ObjectSetText("Fhr_M5 label", " Fhr_M5 " + DoubleToStr(l_price_152, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("Fhr_M5 label", 0, Time[0], l_price_152);
      if (ObjectFind("Fhr_M4 label") != 0) {
         ObjectCreate("Fhr_M4 label", OBJ_TEXT, 0, Time[20], l_price_144);
         ObjectSetText("Fhr_M4 label", "Fhr_M4 " + DoubleToStr(l_price_144, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("Fhr_M4 label", 0, Time[0], l_price_144);
      if (ObjectFind("Fhr_M3 label") != 0) {
         ObjectCreate("Fhr_M3 label", OBJ_TEXT, 0, Time[20], l_price_136);
         ObjectSetText("Fhr_M3 label", "Fhr_M3 " + DoubleToStr(l_price_136, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("Fhr_M3 label", 0, Time[0], l_price_136);
      if (ObjectFind("Fhr_M2 label") != 0) {
         ObjectCreate("Fhr_M2 label", OBJ_TEXT, 0, Time[20], l_price_128);
         ObjectSetText("Fhr_M2 label", "Fhr_M2 " + DoubleToStr(l_price_128, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("Fhr_M2 label", 0, Time[0], l_price_128);
      if (ObjectFind("Fhr_M1 label") != 0) {
         ObjectCreate("Fhr_M1 label", OBJ_TEXT, 0, Time[20], l_price_120);
         ObjectSetText("Fhr_M1 label", "Fhr_M1 " + DoubleToStr(l_price_120, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("Fhr_M1 label", 0, Time[0], l_price_120);
      if (ObjectFind("Fhr_M0 label") != 0) {
         ObjectCreate("Fhr_M0 label", OBJ_TEXT, 0, Time[20], l_price_112);
         ObjectSetText("Fhr_M0 label", "Fhr_M0 " + DoubleToStr(l_price_112, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("Fhr_M0 label", 0, Time[0], l_price_112);
      if (ObjectFind("Fhr_M5 line") != 0) {
         ObjectCreate("Fhr_M5 line", OBJ_HLINE, 0, Time[0], l_price_152, Time[0], l_price_152);
         ObjectSet("Fhr_M5 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("Fhr_M5 line", OBJPROP_WIDTH, 1);
         ObjectSet("Fhr_M5 line", OBJPROP_COLOR, m5color);
      } else ObjectMove("Fhr_M5 line", 0, Time[40], l_price_152);
      if (ObjectFind("Fhr_M4 line") != 0) {
         ObjectCreate("Fhr_M4 line", OBJ_HLINE, 0, Time[40], l_price_144, Time[0], l_price_144);
         ObjectSet("Fhr_M4 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("Fhr_M4 line", OBJPROP_WIDTH, 1);
         ObjectSet("Fhr_M4 line", OBJPROP_COLOR, m4color);
      } else ObjectMove("Fhr_M4 line", 0, Time[40], l_price_144);
      if (ObjectFind("Fhr_M3 line") != 0) {
         ObjectCreate("Fhr_M3 line", OBJ_HLINE, 0, Time[0], l_price_136, Time[0], l_price_136);
         ObjectSet("Fhr_M3 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("Fhr_M3 line", OBJPROP_WIDTH, 1);
         ObjectSet("Fhr_M3 line", OBJPROP_COLOR, m3color);
      } else ObjectMove("Fhr_M3 line", 0, Time[40], l_price_136);
      if (ObjectFind("Fhr_M2 line") != 0) {
         ObjectCreate("Fhr_M2 line", OBJ_HLINE, 0, Time[40], l_price_128);
         ObjectSet("Fhr_M2 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("Fhr_M2 line", OBJPROP_WIDTH, 1);
         ObjectSet("Fhr_M2 line", OBJPROP_COLOR, m2color);
      } else ObjectMove("Fhr_M2 line", 0, Time[40], l_price_128);
      if (ObjectFind("Fhr_M1 line") != 0) {
         ObjectCreate("Fhr_M1 line", OBJ_HLINE, 0, Time[40], l_price_120);
         ObjectSet("Fhr_M1 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("Fhr_M1 line", OBJPROP_WIDTH, 1);
         ObjectSet("Fhr_M1 line", OBJPROP_COLOR, m1color);
      } else ObjectMove("Fhr_M1 line", 0, Time[40], l_price_120);
      if (ObjectFind("Fhr_M0 line") != 0) {
         ObjectCreate("Fhr_M0 line", OBJ_HLINE, 0, Time[40], l_price_112);
         ObjectSet("Fhr_M0 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("Fhr_M0 line", OBJPROP_WIDTH, 1);
         ObjectSet("Fhr_M0 line", OBJPROP_COLOR, m0color);
      } else ObjectMove("Fhr_M0 line", 0, Time[40], l_price_112);
   }
   if (daily == TRUE) {
      if (ObjectFind("D_R1 label") != 0) {
         ObjectCreate("D_R1 label", OBJ_TEXT, 0, Time[0], l_price_300);
         ObjectSetText("D_R1 label", "                                                 D_R1 " + DoubleToStr(l_price_300, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("D_R1 label", 0, Time[0], l_price_300);
      if (ObjectFind("D_R2 label") != 0) {
         ObjectCreate("D_R2 label", OBJ_TEXT, 0, Time[20], l_price_308);
         ObjectSetText("D_R2 label", "                                                 D_R2 " + DoubleToStr(l_price_308, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("D_R2 label", 0, Time[0], l_price_308);
      if (ObjectFind("D_R3 label") != 0) {
         ObjectCreate("D_R3 label", OBJ_TEXT, 0, Time[20], l_price_316);
         ObjectSetText("D_R3 label", "                                                 D_R3 " + DoubleToStr(l_price_316, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("D_R3 label", 0, Time[0], l_price_316);
      if (ObjectFind("D_P label") != 0) {
         ObjectCreate("D_P label", OBJ_TEXT, 0, Time[0], l_price_284);
         ObjectSetText("D_P label", "                                                  D_Pivot " + DoubleToStr(l_price_284, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("D_P label", 0, Time[0], l_price_284);
      if (ObjectFind("D_S1 label") != 0) {
         ObjectCreate("D_S1 label", OBJ_TEXT, 0, Time[0], l_price_372);
         ObjectSetText("D_S1 label", "                                                 D_S1 " + DoubleToStr(l_price_372, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("D_S1 label", 0, Time[0], l_price_372);
      if (ObjectFind("D_S2 label") != 0) {
         ObjectCreate("D_S2 label", OBJ_TEXT, 0, Time[20], l_price_380);
         ObjectSetText("D_S2 label", "                                                 D_S2 " + DoubleToStr(l_price_380, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("D_S2 label", 0, Time[0], l_price_380);
      if (ObjectFind("D_S3 label") != 0) {
         ObjectCreate("D_S3 label", OBJ_TEXT, 0, Time[20], l_price_388);
         ObjectSetText("D_S3 label", "                                                 D_S3 " + DoubleToStr(l_price_388, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("D_S3 label", 0, Time[0], l_price_388);
      if (ObjectFind("D_S1 line") != 0) {
         ObjectCreate("D_S1 line", OBJ_HLINE, 0, Time[0], l_price_372, Time[0], l_price_372);
         ObjectSet("D_S1 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("D_S1 line", OBJPROP_WIDTH, 1);
         ObjectSet("D_S1 line", OBJPROP_COLOR, s1color);
      } else ObjectMove("D_S1 line", 0, Time[40], l_price_372);
      if (ObjectFind("D_S2 line") != 0) {
         ObjectCreate("D_S2 line", OBJ_HLINE, 0, Time[40], l_price_380);
         ObjectSet("D_S2 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("D_S2 line", OBJPROP_WIDTH, 1);
         ObjectSet("D_S2 line", OBJPROP_COLOR, s2color);
      } else ObjectMove("D_S2 line", 0, Time[40], l_price_380);
      if (ObjectFind("D_S3 line") != 0) {
         ObjectCreate("D_S3 line", OBJ_HLINE, 0, Time[40], l_price_388);
         ObjectSet("D_S3 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("D_S3 line", OBJPROP_WIDTH, s3width);
         ObjectSet("D_S3 line", OBJPROP_COLOR, s3color);
      } else ObjectMove("D_S3 line", 0, Time[40], l_price_388);
      if (ObjectFind("D_P line") != 0) {
         ObjectCreate("D_P line", OBJ_HLINE, 0, Time[40], l_price_284);
         ObjectSet("D_P line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("D_P line", OBJPROP_WIDTH, pwidth);
         ObjectSet("D_P line", OBJPROP_COLOR, pcolor);
      } else ObjectMove("D_P line", 0, Time[40], l_price_284);
      if (ObjectFind("D_R1 line") != 0) {
         ObjectCreate("D_R1 line", OBJ_HLINE, 0, Time[40], l_price_300);
         ObjectSet("D_R1 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("D_R1 line", OBJPROP_WIDTH, 1);
         ObjectSet("D_R1 line", OBJPROP_COLOR, r1color);
      } else ObjectMove("D_R1 line", 0, Time[40], l_price_300);
      if (ObjectFind("D_R2 line") != 0) {
         ObjectCreate("D_R2 line", OBJ_HLINE, 0, Time[40], l_price_308);
         ObjectSet("D_R2 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("D_R2 line", OBJPROP_WIDTH, 1);
         ObjectSet("D_R2 line", OBJPROP_COLOR, r2color);
      } else ObjectMove("D_R2 line", 0, Time[40], l_price_308);
      if (ObjectFind("D_R3 line") != 0) {
         ObjectCreate("D_R3 line", OBJ_HLINE, 0, Time[40], l_price_316);
         ObjectSet("D_R3 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("D_R3 line", OBJPROP_WIDTH, r3width);
         ObjectSet("D_R3 line", OBJPROP_COLOR, r3color);
      } else ObjectMove("D_R3 line", 0, Time[40], l_price_316);
   }
   if (daily == TRUE && midpivots == TRUE) {
      if (ObjectFind("D_M5 label") != 0) {
         ObjectCreate("D_M5 label", OBJ_TEXT, 0, Time[20], l_price_364);
         ObjectSetText("D_M5 label", "                              D_M5 " + DoubleToStr(l_price_364, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("D_M5 label", 0, Time[0], l_price_364);
      if (ObjectFind("D_M4 label") != 0) {
         ObjectCreate("D_M4 label", OBJ_TEXT, 0, Time[20], l_price_356);
         ObjectSetText("D_M4 label", "                              D_M4 " + DoubleToStr(l_price_356, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("D_M4 label", 0, Time[0], l_price_356);
      if (ObjectFind("D_M3 label") != 0) {
         ObjectCreate("D_M3 label", OBJ_TEXT, 0, Time[20], l_price_348);
         ObjectSetText("D_M3 label", "                              D_M3 " + DoubleToStr(l_price_348, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("D_M3 label", 0, Time[0], l_price_348);
      if (ObjectFind("D_M2 label") != 0) {
         ObjectCreate("D_M2 label", OBJ_TEXT, 0, Time[20], l_price_340);
         ObjectSetText("D_M2 label", "                              D_M2 " + DoubleToStr(l_price_340, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("D_M2 label", 0, Time[0], l_price_340);
      if (ObjectFind("D_M1 label") != 0) {
         ObjectCreate("D_M1 label", OBJ_TEXT, 0, Time[20], l_price_332);
         ObjectSetText("D_M1 label", "                              D_M1 " + DoubleToStr(l_price_332, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("D_M1 label", 0, Time[0], l_price_332);
      if (ObjectFind("D_M0 label") != 0) {
         ObjectCreate("D_M0 label", OBJ_TEXT, 0, Time[20], l_price_324);
         ObjectSetText("D_M0 label", "                              D_M0 " + DoubleToStr(l_price_324, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("D_M0 label", 0, Time[0], l_price_324);
      if (ObjectFind("D_M5 line") != 0) {
         ObjectCreate("D_M5 line", OBJ_HLINE, 0, Time[40], l_price_364);
         ObjectSet("D_M5 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("D_M5 line", OBJPROP_WIDTH, 1);
         ObjectSet("D_M5 line", OBJPROP_COLOR, m5color);
      } else ObjectMove("D_M5 line", 0, Time[40], l_price_364);
      if (ObjectFind("D_M4 line") != 0) {
         ObjectCreate("D_M4 line", OBJ_HLINE, 0, Time[40], l_price_356);
         ObjectSet("D_M4 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("D_M4 line", OBJPROP_WIDTH, 1);
         ObjectSet("D_M4 line", OBJPROP_COLOR, m4color);
      } else ObjectMove("D_M4 line", 0, Time[40], l_price_356);
      if (ObjectFind("D_M3 line") != 0) {
         ObjectCreate("D_M3 line", OBJ_HLINE, 0, Time[40], l_price_348);
         ObjectSet("D_M3 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("D_M3 line", OBJPROP_WIDTH, 1);
         ObjectSet("D_M3 line", OBJPROP_COLOR, m3color);
      } else ObjectMove("D_M3 line", 0, Time[40], l_price_348);
      if (ObjectFind("D_M2 line") != 0) {
         ObjectCreate("D_M2 line", OBJ_HLINE, 0, Time[40], l_price_340);
         ObjectSet("D_M2 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("D_M2 line", OBJPROP_WIDTH, 1);
         ObjectSet("D_M2 line", OBJPROP_COLOR, m2color);
      } else ObjectMove("D_M2 line", 0, Time[40], l_price_340);
      if (ObjectFind("D_M1 line") != 0) {
         ObjectCreate("D_M1 line", OBJ_HLINE, 0, Time[40], l_price_332);
         ObjectSet("D_M1 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("D_M1 line", OBJPROP_WIDTH, 1);
         ObjectSet("D_M1 line", OBJPROP_COLOR, m1color);
      } else ObjectMove("D_M1 line", 0, Time[40], l_price_332);
      if (ObjectFind("D_M0 line") != 0) {
         ObjectCreate("D_M0 line", OBJ_HLINE, 0, Time[40], l_price_324);
         ObjectSet("D_M0 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("D_M0 line", OBJPROP_WIDTH, 1);
         ObjectSet("D_M0 line", OBJPROP_COLOR, m0color);
      } else ObjectMove("D_M0 line", 0, Time[40], l_price_324);
   }
   if (weekly == TRUE) {
      if (ObjectFind("W_R1 label") != 0) {
         ObjectCreate("W_R1 label", OBJ_TEXT, 0, Time[0], l_price_512);
         ObjectSetText("W_R1 label", "                                               W R1 " + DoubleToStr(l_price_512, 2), 8, "Arial", Yellow);
      } else ObjectMove("W_R1 label", 0, Time[0], l_price_512);
      if (ObjectFind("W_R2 label") != 0) {
         ObjectCreate("W_R2 label", OBJ_TEXT, 0, Time[20], l_price_520);
         ObjectSetText("W_R2 label", "                                               W R2 " + DoubleToStr(l_price_520, 2), 8, "Arial", Yellow);
      } else ObjectMove("W_R2 label", 0, Time[0], l_price_520);
      if (ObjectFind("W_R3 label") != 0) {
         ObjectCreate("W_R3 label", OBJ_TEXT, 0, Time[20], l_price_528);
         ObjectSetText("W_R3 label", "                                               W R3 " + DoubleToStr(l_price_528, 2), 8, "Arial", Yellow);
      } else ObjectMove("W_R3 label", 0, Time[0], l_price_528);
      if (ObjectFind("W_P label") != 0) {
         ObjectCreate("W_P label", OBJ_TEXT, 0, Time[0], l_price_496);
         ObjectSetText("W_P label", "                                                W P " + DoubleToStr(l_price_496, 2), 8, "Arial", Aqua);
      } else ObjectMove("W_P label", 0, Time[150], l_price_496);
      if (ObjectFind("W_S1 label") != 0) {
         ObjectCreate("W_S1 label", OBJ_TEXT, 0, Time[0], l_price_584);
         ObjectSetText("W_S1 label", "                                               W S1 " + DoubleToStr(l_price_584, 2), 8, "Arial", SteelBlue);
      } else ObjectMove("W_S1 label", 0, Time[0], l_price_584);
      if (ObjectFind("W_S2 label") != 0) {
         ObjectCreate("W_S2 label", OBJ_TEXT, 0, Time[20], l_price_592);
         ObjectSetText("W_S2 label", "                                               W S2 " + DoubleToStr(l_price_592, 2), 8, "Arial", SteelBlue);
      } else ObjectMove("W_S2 label", 0, Time[0], l_price_592);
      if (ObjectFind("W_S3 label") != 0) {
         ObjectCreate("W_S3 label", OBJ_TEXT, 0, Time[20], l_price_600);
         ObjectSetText("W_S3 label", "                                               W S3 " + DoubleToStr(l_price_600, 2), 8, "Arial", SteelBlue);
      } else ObjectMove("W_S3 label", 0, Time[0], l_price_600);
      if (ObjectFind("W_S1 line") != 0) {
         ObjectCreate("W_S1 line", OBJ_HLINE, 0, Time[40], l_price_584);
         ObjectSet("W_S1 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("W_S1 line", OBJPROP_WIDTH, 1);
         ObjectSet("W_S1 line", OBJPROP_COLOR, s1color);
      } else ObjectMove("W_S1 line", 0, Time[40], l_price_584);
      if (ObjectFind("W_S2 line") != 0) {
         ObjectCreate("W_S2 line", OBJ_HLINE, 0, Time[40], l_price_592);
         ObjectSet("W_S2 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("W_S2 line", OBJPROP_WIDTH, 1);
         ObjectSet("W_S2 line", OBJPROP_COLOR, s2color);
      } else ObjectMove("W_S2 line", 0, Time[40], l_price_592);
      if (ObjectFind("W_S3 line") != 0) {
         ObjectCreate("W_S3 line", OBJ_HLINE, 0, Time[40], l_price_600);
         ObjectSet("W_S3 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("W_S3 line", OBJPROP_WIDTH, s3width);
         ObjectSet("W_S3 line", OBJPROP_COLOR, s3color);
      } else ObjectMove("W_S3 line", 0, Time[40], l_price_600);
      if (ObjectFind("W_P line") != 0) {
         ObjectCreate("W_P line", OBJ_HLINE, 0, Time[40], l_price_496);
         ObjectSet("W_P line", OBJPROP_STYLE, STYLE_DASH);
         ObjectSet("W_P line", OBJPROP_WIDTH, pwidth);
         ObjectSet("W_P line", OBJPROP_COLOR, pcolor);
      } else ObjectMove("W_P line", 0, Time[40], l_price_496);
      if (ObjectFind("W_R1 line") != 0) {
         ObjectCreate("W_R1 line", OBJ_HLINE, 0, Time[40], l_price_512);
         ObjectSet("W_R1 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("W_R1 line", OBJPROP_WIDTH, 1);
         ObjectSet("W_R1 line", OBJPROP_COLOR, r1color);
      } else ObjectMove("W_R1 line", 0, Time[40], l_price_512);
      if (ObjectFind("W_R2 line") != 0) {
         ObjectCreate("W_R2 line", OBJ_HLINE, 0, Time[40], l_price_520);
         ObjectSet("W_R2 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("W_R2 line", OBJPROP_WIDTH, 1);
         ObjectSet("W_R2 line", OBJPROP_COLOR, r2color);
      } else ObjectMove("W_R2 line", 0, Time[40], l_price_520);
      if (ObjectFind("W_R3 line") != 0) {
         ObjectCreate("W_R3 line", OBJ_HLINE, 0, Time[40], l_price_528);
         ObjectSet("W_R3 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("W_R3 line", OBJPROP_WIDTH, r3width);
         ObjectSet("W_R3 line", OBJPROP_COLOR, r3color);
      } else ObjectMove("W_R3 line", 0, Time[40], l_price_528);
   }
   if (weekly == TRUE && midpivots == TRUE) {
      if (ObjectFind("W_M5 label") != 0) {
         ObjectCreate("W_M5 label", OBJ_TEXT, 0, Time[20], l_price_576);
         ObjectSetText("W_M5 label", "W_M5 " + DoubleToStr(l_price_576, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("W_M5 label", 0, Time[0], l_price_576);
      if (ObjectFind("W_M4 label") != 0) {
         ObjectCreate("W_M4 label", OBJ_TEXT, 0, Time[20], l_price_568);
         ObjectSetText("W_M4 label", "W_M4 " + DoubleToStr(l_price_568, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("W_M4 label", 0, Time[0], l_price_568);
      if (ObjectFind("W_M3 label") != 0) {
         ObjectCreate("W_M3 label", OBJ_TEXT, 0, Time[20], l_price_560);
         ObjectSetText("W_M3 label", "W_M3 " + DoubleToStr(l_price_560, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("W_M3 label", 0, Time[0], l_price_560);
      if (ObjectFind("W_M2 label") != 0) {
         ObjectCreate("W_M2 label", OBJ_TEXT, 0, Time[20], l_price_552);
         ObjectSetText("W_M2 label", "W_M2 " + DoubleToStr(l_price_552, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("W_M2 label", 0, Time[0], l_price_552);
      if (ObjectFind("W_M1 label") != 0) {
         ObjectCreate("W_M1 label", OBJ_TEXT, 0, Time[20], l_price_544);
         ObjectSetText("W_M1 label", "W_M1 " + DoubleToStr(l_price_544, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("W_M1 label", 0, Time[0], l_price_544);
      if (ObjectFind("W_M0 label") != 0) {
         ObjectCreate("W_M0 label", OBJ_TEXT, 0, Time[20], l_price_536);
         ObjectSetText("W_M0 label", "W_M0 " + DoubleToStr(l_price_536, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("W_M0 label", 0, Time[0], l_price_536);
      if (ObjectFind("W_M5 line") != 0) {
         ObjectCreate("W_M5 line", OBJ_HLINE, 0, Time[40], l_price_576);
         ObjectSet("W_M5 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("W_M5 line", OBJPROP_WIDTH, 1);
         ObjectSet("W_M5 line", OBJPROP_COLOR, m5color);
      } else ObjectMove("W_M5 line", 0, Time[40], l_price_576);
      if (ObjectFind("W_M4 line") != 0) {
         ObjectCreate("W_M4 line", OBJ_HLINE, 0, Time[40], l_price_568);
         ObjectSet("W_M4 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("W_M4 line", OBJPROP_WIDTH, 1);
         ObjectSet("W_M4 line", OBJPROP_COLOR, m4color);
      } else ObjectMove("W_M4 line", 0, Time[40], l_price_568);
      if (ObjectFind("W_M3 line") != 0) {
         ObjectCreate("W_M3 line", OBJ_HLINE, 0, Time[40], l_price_560);
         ObjectSet("W_M3 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("W_M3 line", OBJPROP_WIDTH, 1);
         ObjectSet("W_M3 line", OBJPROP_COLOR, m3color);
      } else ObjectMove("W_M3 line", 0, Time[40], l_price_560);
      if (ObjectFind("W_M2 line") != 0) {
         ObjectCreate("W_M2 line", OBJ_HLINE, 0, Time[40], l_price_552);
         ObjectSet("W_M2 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("W_M2 line", OBJPROP_WIDTH, 1);
         ObjectSet("W_M2 line", OBJPROP_COLOR, m2color);
      } else ObjectMove("W_M2 line", 0, Time[40], l_price_552);
      if (ObjectFind("W_M1 line") != 0) {
         ObjectCreate("W_M1 line", OBJ_HLINE, 0, Time[40], l_price_544);
         ObjectSet("W_M1 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("W_M1 line", OBJPROP_WIDTH, 1);
         ObjectSet("W_M1 line", OBJPROP_COLOR, m1color);
      } else ObjectMove("W_M1 line", 0, Time[40], l_price_544);
      if (ObjectFind("W_M0 line") != 0) {
         ObjectCreate("W_M0 line", OBJ_HLINE, 0, Time[40], l_price_536);
         ObjectSet("W_M0 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("W_M0 line", OBJPROP_WIDTH, 1);
         ObjectSet("W_M0 line", OBJPROP_COLOR, m0color);
      } else ObjectMove("W_M0 line", 0, Time[40], l_price_536);
   }
   if (monthly == TRUE) {
      if (ObjectFind("M_R1 label") != 0) {
         ObjectCreate("M_R1 label", OBJ_TEXT, 0, Time[0], l_price_724);
         ObjectSetText("M_R1 label", "                                                Mth R1 " + DoubleToStr(l_price_724, 4), 8, "Arial", Lime);
      } else ObjectMove("M_R1 label", 0, Time[0], l_price_724);
      if (ObjectFind("M_R2 label") != 0) {
         ObjectCreate("M_R2 label", OBJ_TEXT, 0, Time[20], l_price_732);
         ObjectSetText("M_R2 label", "                                                Mth R2 " + DoubleToStr(l_price_732, 4), 8, "Arial", Lime);
      } else ObjectMove("M_R2 label", 0, Time[0], l_price_732);
      if (ObjectFind("M_R3 label") != 0) {
         ObjectCreate("M_R3 label", OBJ_TEXT, 0, Time[20], l_price_740);
         ObjectSetText("M_R3 label", "                                                Mth R3 " + DoubleToStr(l_price_740, 4), 8, "Arial", Lime);
      } else ObjectMove("M_R3 label", 0, Time[0], l_price_740);
      if (ObjectFind("M_P label") != 0) {
         ObjectCreate("M_P label", OBJ_TEXT, 0, Time[0], l_price_708);
         ObjectSetText("M_P label", "                                                 Mth Pivot " + DoubleToStr(l_price_708, 4), 8, "Arial", White);
      } else ObjectMove("M_P label", 0, Time[0], l_price_708);
      if (ObjectFind("M_S1 label") != 0) {
         ObjectCreate("M_S1 label", OBJ_TEXT, 0, Time[0], l_price_796);
         ObjectSetText("M_S1 label", "                                                Mth S1 " + DoubleToStr(l_price_796, 4), 8, "Arial", Violet);
      } else ObjectMove("M_S1 label", 0, Time[0], l_price_796);
      if (ObjectFind("M_S2 label") != 0) {
         ObjectCreate("M_S2 label", OBJ_TEXT, 0, Time[20], l_price_804);
         ObjectSetText("M_S2 label", "                                                Mth S2 " + DoubleToStr(l_price_804, 4), 8, "Arial", Violet);
      } else ObjectMove("M_S2 label", 0, Time[0], l_price_804);
      if (ObjectFind("M_S3 label") != 0) {
         ObjectCreate("M_S3 label", OBJ_TEXT, 0, Time[20], l_price_812);
         ObjectSetText("M_S3 label", "                                                Mth S3 " + DoubleToStr(l_price_812, 4), 8, "Arial", Violet);
      } else ObjectMove("M_S3 label", 0, Time[0], l_price_812);
      if (ObjectFind("M_S1 line") != 0) {
         ObjectCreate("M_S1 line", OBJ_HLINE, 0, Time[40], l_price_796);
         ObjectSet("M_S1 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("M_S1 line", OBJPROP_WIDTH, 1);
         ObjectSet("M_S1 line", OBJPROP_COLOR, s1color);
      } else ObjectMove("M_S1 line", 0, Time[40], l_price_796);
      if (ObjectFind("M_S2 line") != 0) {
         ObjectCreate("M_S2 line", OBJ_HLINE, 0, Time[40], l_price_804);
         ObjectSet("M_S2 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("M_S2 line", OBJPROP_WIDTH, 1);
         ObjectSet("M_S2 line", OBJPROP_COLOR, s2color);
      } else ObjectMove("M_S2 line", 0, Time[40], l_price_804);
      if (ObjectFind("M_S3 line") != 0) {
         ObjectCreate("M_S3 line", OBJ_HLINE, 0, Time[40], l_price_812);
         ObjectSet("M_S3 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("M_S3 line", OBJPROP_WIDTH, s3width);
         ObjectSet("M_S3 line", OBJPROP_COLOR, s3color);
      } else ObjectMove("M_S3 line", 0, Time[40], l_price_812);
      if (ObjectFind("M_P line") != 0) {
         ObjectCreate("M_P line", OBJ_HLINE, 0, Time[40], l_price_708);
         ObjectSet("M_P line", OBJPROP_STYLE, STYLE_DASHDOT);
         ObjectSet("M_P line", OBJPROP_WIDTH, pwidth);
         ObjectSet("M_P line", OBJPROP_COLOR, pcolor);
      } else ObjectMove("M_P line", 0, Time[40], l_price_708);
      if (ObjectFind("M_R1 line") != 0) {
         ObjectCreate("M_R1 line", OBJ_HLINE, 0, Time[40], l_price_724);
         ObjectSet("M_R1 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("M_R1 line", OBJPROP_WIDTH, 1);
         ObjectSet("M_R1 line", OBJPROP_COLOR, r1color);
      } else ObjectMove("M_R1 line", 0, Time[40], l_price_724);
      if (ObjectFind("M_R2 line") != 0) {
         ObjectCreate("M_R2 line", OBJ_HLINE, 0, Time[40], l_price_732);
         ObjectSet("M_R2 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("M_R2 line", OBJPROP_WIDTH, 1);
         ObjectSet("M_R2 line", OBJPROP_COLOR, r2color);
      } else ObjectMove("M_R2 line", 0, Time[40], l_price_732);
      if (ObjectFind("M_R3 line") != 0) {
         ObjectCreate("M_R3 line", OBJ_HLINE, 0, Time[40], l_price_740);
         ObjectSet("M_R3 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("M_R3 line", OBJPROP_WIDTH, r3width);
         ObjectSet("M_R3 line", OBJPROP_COLOR, r3color);
      } else ObjectMove("M_R3 line", 0, Time[40], l_price_740);
   }
   if (monthly == TRUE && midpivots == TRUE) {
      if (ObjectFind("M_M5 label") != 0) {
         ObjectCreate("M_M5 label", OBJ_TEXT, 0, Time[20], l_price_788);
         ObjectSetText("M_M5 label", " M_M5 " + DoubleToStr(l_price_788, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("M_M5 label", 0, Time[0], l_price_788);
      if (ObjectFind("M_M4 label") != 0) {
         ObjectCreate("M_M4 label", OBJ_TEXT, 0, Time[20], l_price_780);
         ObjectSetText("M_M4 label", " M_M4 " + DoubleToStr(l_price_780, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("M_M4 label", 0, Time[0], l_price_780);
      if (ObjectFind("M_M3 label") != 0) {
         ObjectCreate("M_M3 label", OBJ_TEXT, 0, Time[20], l_price_772);
         ObjectSetText("M_M3 label", " M_M3 " + DoubleToStr(l_price_772, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("M_M3 label", 0, Time[0], l_price_772);
      if (ObjectFind("M_M2 label") != 0) {
         ObjectCreate("M_M2 label", OBJ_TEXT, 0, Time[20], l_price_764);
         ObjectSetText("M_M2 label", " M_M2 " + DoubleToStr(l_price_764, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("M_M2 label", 0, Time[0], l_price_764);
      if (ObjectFind("M_M1 label") != 0) {
         ObjectCreate("M_M1 label", OBJ_TEXT, 0, Time[20], l_price_756);
         ObjectSetText("M_M1 label", " M_M1 " + DoubleToStr(l_price_756, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("M_M1 label", 0, Time[0], l_price_756);
      if (ObjectFind("M_M0 label") != 0) {
         ObjectCreate("M_M0 label", OBJ_TEXT, 0, Time[20], l_price_748);
         ObjectSetText("M_M0 label", " M_M0 " + DoubleToStr(l_price_748, 4), 8, "Arial", CLR_NONE);
      } else ObjectMove("M_M0 label", 0, Time[0], l_price_748);
      if (ObjectFind("M_M5 line") != 0) {
         ObjectCreate("M_M5 line", OBJ_HLINE, 0, Time[40], l_price_788, Time[20], l_price_788);
         ObjectSet("M_M5 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("M_M5 line", OBJPROP_WIDTH, 1);
         ObjectSet("M_M5 line", OBJPROP_COLOR, m5color);
      } else ObjectMove("M_M5 line", 0, Time[40], l_price_788);
      if (ObjectFind("M_M4 line") != 0) {
         ObjectCreate("M_M4 line", OBJ_HLINE, 0, Time[40], l_price_780);
         ObjectSet("M_M4 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("M_M4 line", OBJPROP_WIDTH, 1);
         ObjectSet("M_M4 line", OBJPROP_COLOR, m4color);
      } else ObjectMove("M_M4 line", 0, Time[40], l_price_780);
      if (ObjectFind("M_M3 line") != 0) {
         ObjectCreate("M_M3 line", OBJ_HLINE, 0, Time[40], l_price_772);
         ObjectSet("M_M3 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("M_M3 line", OBJPROP_WIDTH, 1);
         ObjectSet("M_M3 line", OBJPROP_COLOR, m3color);
      } else ObjectMove("M_M3 line", 0, Time[40], l_price_772);
      if (ObjectFind("M_M2 line") != 0) {
         ObjectCreate("M_M2 line", OBJ_HLINE, 0, Time[40], l_price_764);
         ObjectSet("M_M2 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("M_M2 line", OBJPROP_WIDTH, 1);
         ObjectSet("M_M2 line", OBJPROP_COLOR, m2color);
      } else ObjectMove("M_M2 line", 0, Time[40], l_price_764);
      if (ObjectFind("M_M1 line") != 0) {
         ObjectCreate("M_M1 line", OBJ_HLINE, 0, Time[40], l_price_756);
         ObjectSet("M_M1 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("M_M1 line", OBJPROP_WIDTH, 1);
         ObjectSet("M_M1 line", OBJPROP_COLOR, m1color);
      } else ObjectMove("M_M1 line", 0, Time[40], l_price_756);
      if (ObjectFind("M_M0 line") != 0) {
         ObjectCreate("M_M0 line", OBJ_HLINE, 0, Time[40], l_price_748);
         ObjectSet("M_M0 line", OBJPROP_STYLE, STYLE_SOLID);
         ObjectSet("M_M0 line", OBJPROP_WIDTH, 1);
         ObjectSet("M_M0 line", OBJPROP_COLOR, m0color);
      } else ObjectMove("M_M0 line", 0, Time[40], l_price_748);
   }
   return (0);
}