/*
   Generated by EX4-TO-MQ4 decompiler ONE FILE V4.0.218.3
   EX4 ID : 04E20A41724C2645BAEB3FDF008C44EC
   Website: http://purebeam.biz
   E-mail : purebeam@gmail.com
*/
#property copyright "Copyright © 2007, cja Trading"
#property link      "ccjjaa@gmail.com"

#property indicator_chart_window

extern int Dynamic_Number = 789789;
extern string SSSSSSSSSSSSSSSSSSSSSSSSSS1 = "$$$$$$$$$$$$$$$$$$$$$$$$$$$$$";
extern string Please_NOTE__Currency_Symbol = " must be  EURUSD  not  eurusd";
extern string Currency_Symbol = "";
extern string SSSSSSSSSSSSSSSSSSSSSSSSSS2 = "$$$$$$$$$$$$$$$$$$$$$$$$$$$$$";
extern int BarsShift_Side = 0;
extern int BarsShift_UP_DN = 20;
extern int WindowToUse = 0;
extern string SSSSSSSSSSSSSSSSSSSSSSSSSS3 = "$$$$$$$$$$$$$$$$$$$$$$$$$$$$$";
extern string SSSSSSSSSSSSSSSSSSSSSSSSSS4 = "Title &  Border Color Settings";
extern color Border_color = SlateGray;
extern color BackGround_color = Black;
extern color Currency_color = DarkOrange;
extern color PeriodTitles_color = Silver;
extern color DynamicTitle_color = Gray;
extern color DottedSeparator_color = SlateGray;
extern string SSSSSSSSSSSSSSSSSSSSSSSSSS5 = "$$$$$$$$$$$$$$$$$$$$$$$$$$$$$";
extern string SSSSSSSSSSSSSSSSSSSSSSSSSS6 = "AutoUP Bar Color Settings";
extern string NOTE_Auto_UPColors_avaliable = "* Lime  * Olive * SeaGreen * Gray";
extern string _ = "* RoyalBlue * Blue * Gold";
extern color AutoUP_color = Lime;
extern string SSSSSSSSSSSSSSSSSSSSSSSSSS7 = "$$$$$$$$$$$$$$$$$$$$$$$$$$$$$";
extern string SSSSSSSSSSSSSSSSSSSSSSSSSS8 = "AutoDN Bar Color Settings";
extern string NOTE_Auto_DNColors_avaliable = "* Red  * Magenta * RoyalBlue * Gray";
extern string NOTE_ = "* MediumVioletRed * Blue * Orange";
extern color AutoDN_color = Red;
extern string SSSSSSSSSSSSSSSSSSSSSSSSSS9 = "$$$$$$$$$$$$$$$$$$$$$$$$$$$$$";
extern string SSSSSSSSSSSSSSSSSSSSSSSSSS10 = "Manual Bar Color Settings";
extern color UPcolor_1 = Lime;
extern color UPcolor_2 = Lime;
extern color UPcolor_3 = Lime;
extern color UPcolor_4 = C'0x00,0xDC,0x00';
extern color UPcolor_5 = C'0x00,0xC8,0x00';
extern color UPcolor_6 = C'0x00,0xA0,0x00';
extern color UPcolor_7 = C'0x00,0x82,0x00';
extern color UPcolor_8 = DarkGreen;
extern color UPcolor_9 = C'0x00,0x50,0x00';
extern color DNcolor_1 = Red;
extern color DNcolor_2 = Red;
extern color DNcolor_3 = Red;
extern color DNcolor_4 = Red;
extern color DNcolor_5 = C'0xDC,0x00,0x00';
extern color DNcolor_6 = C'0xB4,0x00,0x00';
extern color DNcolor_7 = C'0x96,0x00,0x00';
extern color DNcolor_8 = C'0x78,0x00,0x00';
extern color DNcolor_9 = C'0x64,0x00,0x00';
extern color EQUALcolor = Silver;
int gi_328;
string gs_dummy_332;
double g_color_340;

int CreateDynamic(string a_name_0, int a_y_8, int a_x_12) {
   ObjectCreate(a_name_0, OBJ_LABEL, WindowToUse, 0, 0);
   ObjectSet(a_name_0, OBJPROP_CORNER, 0);
   ObjectSet(a_name_0, OBJPROP_XDISTANCE, a_x_12);
   ObjectSet(a_name_0, OBJPROP_YDISTANCE, a_y_8);
   ObjectSet(a_name_0, OBJPROP_BACK, FALSE);
   return (0);
}

int CreateDyAlert(string a_name_0, int a_x_8, int a_y_12) {
   ObjectCreate(a_name_0, OBJ_LABEL, 0, 0, 0);
   ObjectSet(a_name_0, OBJPROP_CORNER, 0);
   ObjectSet(a_name_0, OBJPROP_XDISTANCE, a_x_8);
   ObjectSet(a_name_0, OBJPROP_YDISTANCE, a_y_12);
   ObjectSet(a_name_0, OBJPROP_BACK, FALSE);
   return (0);
}

int init() {
   if (AutoUP_color == Blue) {
      UPcolor_1 = C'0x6E,0x6E,0xFF';
      UPcolor_2 = C'0x5E,0x5E,0xFF';
      UPcolor_3 = C'0x4A,0x4A,0xFF';
      UPcolor_4 = C'0x36,0x36,0xFF';
      UPcolor_5 = Blue;
      UPcolor_6 = C'0x00,0x00,0xDC';
      UPcolor_7 = C'0x00,0x00,0xBE';
      UPcolor_8 = C'0x00,0x00,0xA0';
      UPcolor_9 = C'0x00,0x00,0x8C';
   }
   if (AutoDN_color == Blue) {
      DNcolor_1 = C'0x6E,0x6E,0xFF';
      DNcolor_2 = C'0x5E,0x5E,0xFF';
      DNcolor_3 = C'0x4A,0x4A,0xFF';
      DNcolor_4 = C'0x36,0x36,0xFF';
      DNcolor_5 = Blue;
      DNcolor_6 = C'0x00,0x00,0xDC';
      DNcolor_7 = C'0x00,0x00,0xBE';
      DNcolor_8 = C'0x00,0x00,0xA0';
      DNcolor_9 = C'0x00,0x00,0x8C';
   }
   if (AutoUP_color == SeaGreen) {
      UPcolor_1 = C'0x66,0xCC,0x94';
      UPcolor_2 = C'0x54,0xC7,0x88';
      UPcolor_3 = C'0x46,0xC1,0x7D';
      UPcolor_4 = C'0x3C,0xB5,0x72';
      UPcolor_5 = C'0x37,0xA8,0x6A';
      UPcolor_6 = C'0x31,0x93,0x5C';
      UPcolor_7 = C'0x2C,0x7E,0x53';
      UPcolor_8 = C'0x26,0x6E,0x49';
      UPcolor_9 = C'0x22,0x5F,0x3F';
   }
   if (AutoUP_color == Gold) {
      UPcolor_1 = Gold;
      UPcolor_2 = Gold;
      UPcolor_3 = Gold;
      UPcolor_4 = C'0xDC,0xBE,0x00';
      UPcolor_5 = C'0xD2,0xB4,0x00';
      UPcolor_6 = C'0xB4,0xA0,0x00';
      UPcolor_7 = C'0xA0,0x82,0x00';
      UPcolor_8 = C'0x82,0x6E,0x00';
      UPcolor_9 = C'0x6E,0x5A,0x00';
   }
   if (AutoDN_color == Orange) {
      DNcolor_1 = C'0xFF,0xBE,0x3C';
      DNcolor_2 = C'0xFF,0xB4,0x1E';
      DNcolor_3 = C'0xFF,0xAA,0x0D';
      DNcolor_4 = C'0xFF,0x96,0x0B';
      DNcolor_5 = C'0xFF,0x82,0x09';
      DNcolor_6 = C'0xF0,0x78,0x00';
      DNcolor_7 = C'0xDC,0x6E,0x00';
      DNcolor_8 = C'0xBE,0x5A,0x00';
      DNcolor_9 = C'0x96,0x46,0x00';
   }
   if (AutoUP_color == Gray) {
      UPcolor_1 = C'0xB4,0xB4,0xB4';
      UPcolor_2 = C'0xA5,0xA5,0xA5';
      UPcolor_3 = C'0x96,0x96,0x96';
      UPcolor_4 = C'0x87,0x87,0x87';
      UPcolor_5 = C'0x78,0x78,0x78';
      UPcolor_6 = DimGray;
      UPcolor_7 = C'0x5A,0x5A,0x5A';
      UPcolor_8 = C'0x4B,0x4B,0x4B';
      UPcolor_9 = C'0x3C,0x3C,0x3C';
   }
   if (AutoDN_color == Gray) {
      DNcolor_1 = C'0xB4,0xB4,0xB4';
      DNcolor_2 = C'0xA5,0xA5,0xA5';
      DNcolor_3 = C'0x96,0x96,0x96';
      DNcolor_4 = C'0x87,0x87,0x87';
      DNcolor_5 = C'0x78,0x78,0x78';
      DNcolor_6 = DimGray;
      DNcolor_7 = C'0x5A,0x5A,0x5A';
      DNcolor_8 = C'0x4B,0x4B,0x4B';
      DNcolor_9 = C'0x3C,0x3C,0x3C';
   }
   if (AutoUP_color == RoyalBlue) {
      UPcolor_1 = C'0x98,0xAE,0xEF';
      UPcolor_2 = C'0x8B,0xA4,0xED';
      UPcolor_3 = C'0x7E,0x9A,0xEB';
      UPcolor_4 = C'0x66,0x87,0xE8';
      UPcolor_5 = C'0x52,0x77,0xE4';
      UPcolor_6 = C'0x42,0x6A,0xE1';
      UPcolor_7 = C'0x2E,0x5A,0xDE';
      UPcolor_8 = C'0x20,0x4B,0xCC';
      UPcolor_9 = C'0x1B,0x3E,0xA7';
   }
   if (AutoDN_color == RoyalBlue) {
      DNcolor_1 = C'0x98,0xAE,0xEF';
      DNcolor_2 = C'0x8B,0xA4,0xED';
      DNcolor_3 = C'0x7E,0x9A,0xEB';
      DNcolor_4 = C'0x66,0x87,0xE8';
      DNcolor_5 = C'0x52,0x77,0xE4';
      DNcolor_6 = C'0x42,0x6A,0xE1';
      DNcolor_7 = C'0x2E,0x5A,0xDE';
      DNcolor_8 = C'0x20,0x4B,0xCC';
      DNcolor_9 = C'0x1B,0x3E,0xA7';
   }
   if (AutoDN_color == MediumVioletRed) {
      DNcolor_1 = C'0xEE,0x60,0xB9';
      DNcolor_2 = C'0xEA,0x37,0xA7';
      DNcolor_3 = C'0xDB,0x17,0x92';
      DNcolor_4 = C'0xC4,0x15,0x83';
      DNcolor_5 = C'0xB3,0x13,0x77';
      DNcolor_6 = C'0x9F,0x11,0x6A';
      DNcolor_7 = C'0x8C,0x0F,0x5E';
      DNcolor_8 = C'0x7C,0x0D,0x52';
      DNcolor_9 = C'0x68,0x0C,0x47';
   }
   if (AutoUP_color == Olive) {
      UPcolor_1 = C'0xDF,0xDF,0x00';
      UPcolor_2 = C'0xCB,0xCB,0x00';
      UPcolor_3 = C'0xB7,0xB7,0x00';
      UPcolor_4 = C'0xA3,0xA3,0x00';
      UPcolor_5 = C'0x8F,0x8F,0x00';
      UPcolor_6 = C'0x7B,0x7B,0x00';
      UPcolor_7 = C'0x67,0x67,0x00';
      UPcolor_8 = C'0x53,0x53,0x00';
      UPcolor_9 = C'0x3F,0x3F,0x00';
   }
   if (AutoDN_color == Fuchsia) {
      DNcolor_1 = C'0xFF,0xA0,0xFF';
      DNcolor_2 = C'0xFF,0x82,0xFF';
      DNcolor_3 = C'0xFF,0x64,0xFF';
      DNcolor_4 = C'0xFF,0x50,0xFF';
      DNcolor_5 = C'0xFA,0x00,0xFA';
      DNcolor_6 = C'0xDC,0x00,0xDC';
      DNcolor_7 = C'0xBE,0x00,0xBE';
      DNcolor_8 = C'0xA0,0x00,0xA0';
      DNcolor_9 = C'0x82,0x00,0x82';
   }
   return (0);
}

int deinit() {
   ObjectDelete("ALLTrend_UP");
   ObjectDelete("ALLTrend_DOWN");
   ObjectDelete("SIG_LEVEL" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_1" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_2" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_3" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_4" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_5" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_6" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_7" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_8" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_9" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_10" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_11" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_12" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_13" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_14" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_15" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_16" + Dynamic_Number);
   ObjectDelete("SIG_LEVEL_17" + Dynamic_Number);
   ObjectDelete("H4_LEVEL" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_1" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_2" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_3" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_4" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_5" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_6" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_7" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_8" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_9" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_10" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_11" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_12" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_13" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_14" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_15" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_16" + Dynamic_Number);
   ObjectDelete("H4_LEVEL_17" + Dynamic_Number);
   ObjectDelete("M30_LEVEL" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_1" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_2" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_3" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_4" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_5" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_6" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_7" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_8" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_9" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_10" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_11" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_12" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_13" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_14" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_15" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_16" + Dynamic_Number);
   ObjectDelete("M30_LEVEL_17" + Dynamic_Number);
   ObjectDelete("M5_LEVEL" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_1" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_2" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_3" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_4" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_5" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_6" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_7" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_8" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_9" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_10" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_11" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_12" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_13" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_14" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_15" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_16" + Dynamic_Number);
   ObjectDelete("M5_LEVEL_17" + Dynamic_Number);
   ObjectDelete("TREND_Display" + Dynamic_Number);
   ObjectDelete("TREND_Display1" + Dynamic_Number);
   ObjectDelete("TREND_Display2" + Dynamic_Number);
   ObjectDelete("TREND_Display3" + Dynamic_Number);
   ObjectDelete("TREND_Display4" + Dynamic_Number);
   ObjectDelete("TREND_Display5" + Dynamic_Number);
   ObjectDelete("TREND_Display6" + Dynamic_Number);
   ObjectDelete("TREND_Display7" + Dynamic_Number);
   ObjectDelete("TREND_Display8" + Dynamic_Number);
   ObjectDelete("SIG_RESULTS" + Dynamic_Number);
   ObjectDelete("EXPIRED" + Dynamic_Number);
   ObjectDelete("EXPIRED1" + Dynamic_Number);
   ObjectDelete("EXPIRED2" + Dynamic_Number);
   ObjectDelete("EXPIRED3" + Dynamic_Number);
   ObjectDelete("EXPIRED4" + Dynamic_Number);
   ObjectDelete("EXPIRED5" + Dynamic_Number);
   ObjectDelete("EXPIRED6" + Dynamic_Number);
   ObjectDelete("EXPIRED7" + Dynamic_Number);
   ObjectDelete("EXPIRED8" + Dynamic_Number);
   ObjectDelete("BCKGRND01" + Dynamic_Number);
   ObjectDelete("BCKGRND02" + Dynamic_Number);
   ObjectDelete("BCKGRND03" + Dynamic_Number);
   ObjectDelete("BCKGRND04" + Dynamic_Number);
   return (0);
}

int start() {
   color l_color_28;
   double ld_432;
   double ld_440;
   double ld_448;
   double ld_456;
   double ld_472;
   double ld_480;
   double ld_488;
   double ld_496;
   double ld_504;
   double ld_512;
   double ld_520;
   double ld_528;
   double ld_536;
   double ld_544;
   double ld_552;
   double ld_560;
   double ld_568;
   double ld_576;
   double ld_584;
   double ld_592;
   double ld_600;
   double ld_608;
   double ld_616;
   double ld_624;
   double ld_632;
   double ld_640;
   double ld_648;
   double ld_656;
   double ld_664;
   double ld_672;
   double ld_680;
   double ld_688;
   double ld_696;
   double ld_704;
   double ld_712;
   double ld_720;
   double ld_728;
   double ld_736;
   double ld_744;
   double ld_unused_752;
   double ld_760;
   double ld_768;
   double ld_776;
   double ld_784;
   double ld_792;
   double ld_800;
   double ld_808;
   double ld_816;
   double ld_824;
   double ld_832;
   double ld_840;
   double ld_848;
   double ld_856;
   double ld_864;
   double ld_872;
   double ld_880;
   double ld_888;
   double ld_896;
   double ld_904;
   double ld_912;
   double ld_920;
   double ld_928;
   double ld_936;
   double ld_944;
   double ld_952;
   double ld_960;
   double ld_968;
   double ld_976;
   double ld_984;
   double ld_992;
   double ld_1000;
   double ld_1424;
   double ld_1432;
   double ld_1440;
   double ld_1448;
   double ld_1456;
   double ld_1464;
   double ld_1472;
   double ld_1480;
   double ld_1488;
   double ld_1496;
   double ld_1504;
   double ld_1512;
   double ld_1520;
   double ld_1528;
   double ld_1536;
   double ld_1544;
   double ld_1552;
   double ld_1560;
   double ld_1568;
   double ld_1576;
   double ld_1584;
   double ld_1592;
   double ld_1600;
   double ld_1608;
   double ld_1616;
   double ld_1624;
   double ld_1632;
   double ld_1640;
   double ld_1648;
   double ld_1656;
   double ld_1664;
   double ld_1672;
   double ld_1680;
   double ld_1688;
   double ld_1696;
   double ld_1704;
   double ld_1712;
   double ld_1720;
   double ld_1728;
   double ld_1736;
   double ld_1744;
   double ld_1752;
   double ld_1760;
   double ld_1768;
   double ld_1776;
   double ld_1784;
   double ld_1792;
   double ld_1800;
   double ld_1808;
   double ld_1816;
   double ld_1824;
   double ld_1832;
   double ld_1840;
   double ld_1848;
   double ld_1856;
   double ld_1864;
   double ld_1872;
   double ld_1880;
   double ld_1888;
   double ld_1896;
   double ld_1904;
   double ld_1912;
   double ld_1920;
   double ld_1928;
   double ld_1936;
   double ld_1944;
   double ld_1952;
   double ld_1960;
   double ld_1968;
   double ld_1976;
   double ld_1984;
   double ld_1992;
   double ld_2416;
   double ld_2424;
   double ld_2432;
   double ld_2440;
   double ld_2448;
   double ld_2456;
   double ld_2464;
   double ld_2472;
   double ld_2480;
   double ld_2488;
   double ld_2496;
   double ld_2504;
   double ld_2512;
   double ld_2520;
   double ld_2528;
   double ld_2536;
   double ld_2544;
   double ld_2552;
   double ld_2560;
   double ld_2568;
   double ld_2576;
   double ld_2584;
   double ld_2592;
   double ld_2600;
   double ld_2608;
   double ld_2616;
   double ld_2624;
   double ld_2632;
   double ld_2640;
   double ld_2648;
   double ld_2656;
   double ld_2664;
   double ld_2672;
   double ld_2680;
   double ld_2688;
   double ld_2696;
   double ld_2704;
   double ld_2712;
   double ld_2720;
   double ld_2728;
   double ld_2736;
   double ld_2744;
   double ld_2752;
   double ld_2760;
   double ld_2768;
   double ld_2776;
   double ld_2784;
   double ld_2792;
   double ld_2800;
   double ld_2808;
   double ld_2816;
   double ld_2824;
   double ld_2832;
   double ld_2840;
   double ld_2848;
   double ld_2856;
   double ld_2864;
   double ld_2872;
   double ld_2880;
   double ld_2888;
   double ld_2896;
   double ld_2904;
   double ld_2912;
   double ld_2920;
   double ld_2928;
   double ld_2936;
   double ld_2944;
   double ld_2952;
   double ld_2960;
   double ld_2968;
   double ld_2976;
   double ld_2984;
   double ld_3408;
   double ld_3416;
   double ld_3424;
   double ld_3432;
   double ld_3440;
   double ld_3448;
   double ld_3456;
   double ld_3464;
   double ld_3472;
   double ld_3480;
   double ld_3488;
   double ld_3496;
   double ld_3504;
   double ld_3512;
   double ld_3520;
   double ld_3528;
   double ld_3536;
   double ld_3544;
   double ld_3552;
   double ld_3560;
   double ld_3568;
   double ld_3576;
   double ld_3584;
   double ld_3592;
   double ld_3600;
   double ld_3608;
   double ld_3616;
   double ld_3624;
   double ld_3632;
   double ld_3640;
   double ld_3648;
   double ld_3656;
   double ld_3664;
   double ld_3672;
   double ld_3680;
   double ld_3688;
   double ld_3696;
   double ld_3704;
   double ld_3712;
   double ld_3720;
   double ld_3728;
   double ld_3736;
   double ld_3744;
   double ld_3752;
   double ld_3760;
   double ld_3768;
   double ld_3776;
   double ld_3784;
   double ld_3792;
   double ld_3800;
   double ld_3808;
   double ld_3816;
   double ld_3824;
   double ld_3832;
   double ld_3840;
   double ld_3848;
   double ld_3856;
   double ld_3864;
   double ld_3872;
   double ld_3880;
   double ld_3888;
   double ld_3896;
   double ld_3904;
   double ld_3912;
   double ld_3920;
   double ld_3928;
   double ld_3936;
   double ld_3944;
   double ld_3952;
   double ld_3960;
   double ld_3968;
   double ld_3976;
   double ld_4400;
   double ld_4408;
   double ld_4416;
   double ld_4424;
   double ld_4432;
   double ld_4440;
   double ld_4448;
   double ld_4456;
   double ld_4464;
   double ld_4472;
   double ld_4480;
   double ld_4488;
   double ld_4496;
   double ld_4504;
   double ld_4512;
   double ld_4520;
   double ld_4528;
   double ld_4536;
   double ld_4544;
   double ld_4552;
   double ld_4560;
   double ld_4568;
   double ld_4576;
   double ld_4584;
   double ld_4592;
   double ld_4600;
   double ld_4608;
   double ld_4616;
   double ld_4624;
   double ld_4632;
   double ld_4640;
   double ld_4648;
   double ld_4656;
   double ld_4664;
   double ld_4672;
   double ld_4680;
   double ld_4688;
   double ld_4696;
   double ld_4704;
   double ld_4712;
   double ld_4720;
   double ld_4728;
   double ld_4736;
   double ld_4744;
   double ld_4752;
   double ld_4760;
   double ld_4768;
   double ld_4776;
   double ld_4784;
   double ld_4792;
   double ld_4800;
   double ld_4808;
   double ld_4816;
   double ld_4824;
   double ld_4832;
   double ld_4840;
   double ld_4848;
   double ld_4856;
   double ld_4864;
   double ld_4872;
   double ld_4880;
   double ld_4888;
   double ld_4896;
   double ld_4904;
   double ld_4912;
   double ld_4920;
   double ld_4928;
   double ld_4936;
   double ld_4944;
   double ld_4952;
   double ld_4960;
   double ld_4968;
   double ld_5392;
   double ld_5400;
   double ld_5408;
   double ld_5416;
   double ld_5424;
   double ld_5432;
   double ld_5440;
   double ld_5448;
   double ld_5456;
   double ld_5464;
   double ld_5472;
   double ld_5480;
   double ld_5488;
   double ld_5496;
   double ld_5504;
   double ld_5512;
   double ld_5520;
   double ld_5528;
   double ld_5536;
   double ld_5544;
   double ld_5552;
   double ld_5560;
   double ld_5568;
   double ld_5576;
   double ld_5584;
   double ld_5592;
   double ld_5600;
   double ld_5608;
   double ld_5616;
   double ld_5624;
   double ld_5632;
   double ld_5640;
   double ld_5648;
   double ld_5656;
   double ld_5664;
   double ld_5672;
   double ld_5680;
   double ld_5688;
   double ld_5696;
   double ld_5704;
   double ld_5712;
   double ld_5720;
   double ld_5728;
   double ld_5736;
   double ld_5744;
   double ld_5752;
   double ld_5760;
   double ld_5768;
   double ld_5776;
   double ld_5784;
   double ld_5792;
   double ld_5800;
   double ld_5808;
   double ld_5816;
   double ld_5824;
   double ld_5832;
   double ld_5840;
   double ld_5848;
   double ld_5856;
   double ld_5864;
   double ld_5872;
   double ld_5880;
   double ld_5888;
   double ld_5896;
   double ld_5904;
   double ld_5912;
   double ld_5920;
   double ld_5928;
   double ld_5936;
   double ld_5944;
   double ld_5952;
   double ld_5960;
   color l_color_6176;
   color l_color_6180;
   color l_color_6184;
   color l_color_6188;
   color l_color_6192;
   color l_color_6196;
   color l_color_6200;
   color l_color_6204;
   color l_color_6208;
   color l_color_6212;
   color l_color_6216;
   color l_color_6220;
   color l_color_6224;
   color l_color_6228;
   color l_color_6232;
   color l_color_6236;
   color l_color_6240;
   color l_color_6244;
   color l_color_6256;
   color l_color_6404;
   color l_color_6408;
   color l_color_6412;
   color l_color_6416;
   color l_color_6420;
   color l_color_6424;
   color l_color_6428;
   color l_color_6432;
   color l_color_6436;
   color l_color_6440;
   color l_color_6444;
   color l_color_6448;
   color l_color_6452;
   color l_color_6456;
   color l_color_6460;
   color l_color_6464;
   color l_color_6468;
   color l_color_6472;
   color l_color_6620;
   color l_color_6624;
   color l_color_6628;
   color l_color_6632;
   color l_color_6636;
   color l_color_6640;
   color l_color_6644;
   color l_color_6648;
   color l_color_6652;
   color l_color_6656;
   color l_color_6660;
   color l_color_6664;
   color l_color_6668;
   color l_color_6672;
   color l_color_6676;
   color l_color_6680;
   color l_color_6684;
   color l_color_6688;
   color l_color_6836;
   color l_color_6840;
   color l_color_6844;
   color l_color_6848;
   color l_color_6852;
   color l_color_6856;
   color l_color_6860;
   color l_color_6864;
   color l_color_6868;
   color l_color_6872;
   color l_color_6876;
   color l_color_6880;
   color l_color_6884;
   color l_color_6888;
   color l_color_6892;
   color l_color_6896;
   color l_color_6900;
   color l_color_6904;
   double ld_4 = NormalizeDouble(MarketInfo(Symbol(), MODE_BID), Digits);
   double l_ima_12 = iMA(Symbol(), PERIOD_M1, 1, 0, MODE_EMA, PRICE_CLOSE, 1);
   string ls_unused_20 = "";
   if (l_ima_12 > ld_4) {
      ls_unused_20 = "";
      l_color_28 = DarkBlue;
      g_color_340 = DarkOrange;
   }
   if (l_ima_12 < ld_4) {
      ls_unused_20 = "";
      l_color_28 = Silver;
      g_color_340 = Red;
   }
   if (l_ima_12 == ld_4) {
      ls_unused_20 = "";
      l_color_28 = DarkOrange;
      g_color_340 = Blue;
   }
   if (BarsShift_UP_DN < 0) return (0);
   if (Currency_Symbol == "") Currency_Symbol = Symbol();
   if (StringFind(Currency_Symbol, "JPY", 0) != -1) gi_328 = 2;
   else gi_328 = 4;
   double ld_40 = NormalizeDouble(MarketInfo(Currency_Symbol, MODE_BID), gi_328);
   double ld_48 = (iHigh(Currency_Symbol, PERIOD_M1, 0) + iLow(Currency_Symbol, PERIOD_M1, 0) + iClose(Currency_Symbol, PERIOD_M1, 0)) / 3.0;
   double ld_56 = (iHigh(Currency_Symbol, PERIOD_M1, 1) + iLow(Currency_Symbol, PERIOD_M1, 1) + iClose(Currency_Symbol, PERIOD_M1, 1)) / 3.0;
   double ld_64 = (iHigh(Currency_Symbol, PERIOD_M1, 2) + iLow(Currency_Symbol, PERIOD_M1, 2) + iClose(Currency_Symbol, PERIOD_M1, 2)) / 3.0;
   double ld_72 = (iHigh(Currency_Symbol, PERIOD_M1, 3) + iLow(Currency_Symbol, PERIOD_M1, 3) + iClose(Currency_Symbol, PERIOD_M1, 3)) / 3.0;
   double ld_80 = (iHigh(Currency_Symbol, PERIOD_M1, 4) + iLow(Currency_Symbol, PERIOD_M1, 4) + iClose(Currency_Symbol, PERIOD_M1, 4)) / 3.0;
   double ld_88 = (iHigh(Currency_Symbol, PERIOD_M1, 5) + iLow(Currency_Symbol, PERIOD_M1, 5) + iClose(Currency_Symbol, PERIOD_M1, 5)) / 3.0;
   double ld_96 = 2.0 * ld_48 + (iHigh(Currency_Symbol, PERIOD_M1, 0) - 2.0 * iLow(Currency_Symbol, PERIOD_M1, 0));
   double ld_104 = 2.0 * ld_56 + (iHigh(Currency_Symbol, PERIOD_M1, 1) - 2.0 * iLow(Currency_Symbol, PERIOD_M1, 1));
   double ld_112 = 2.0 * ld_64 + (iHigh(Currency_Symbol, PERIOD_M1, 2) - 2.0 * iLow(Currency_Symbol, PERIOD_M1, 2));
   double ld_120 = 2.0 * ld_72 + (iHigh(Currency_Symbol, PERIOD_M1, 3) - 2.0 * iLow(Currency_Symbol, PERIOD_M1, 3));
   double ld_128 = 2.0 * ld_80 + (iHigh(Currency_Symbol, PERIOD_M1, 4) - 2.0 * iLow(Currency_Symbol, PERIOD_M1, 4));
   double ld_136 = 2.0 * ld_88 + (iHigh(Currency_Symbol, PERIOD_M1, 5) - 2.0 * iLow(Currency_Symbol, PERIOD_M1, 5));
   double ld_144 = ld_48 + (iHigh(Currency_Symbol, PERIOD_M1, 0) - iLow(Currency_Symbol, PERIOD_M1, 0));
   double ld_152 = ld_56 + (iHigh(Currency_Symbol, PERIOD_M1, 1) - iLow(Currency_Symbol, PERIOD_M1, 1));
   double ld_160 = ld_64 + (iHigh(Currency_Symbol, PERIOD_M1, 2) - iLow(Currency_Symbol, PERIOD_M1, 2));
   double ld_168 = ld_72 + (iHigh(Currency_Symbol, PERIOD_M1, 3) - iLow(Currency_Symbol, PERIOD_M1, 3));
   double ld_176 = ld_80 + (iHigh(Currency_Symbol, PERIOD_M1, 4) - iLow(Currency_Symbol, PERIOD_M1, 4));
   double ld_184 = ld_88 + (iHigh(Currency_Symbol, PERIOD_M1, 5) - iLow(Currency_Symbol, PERIOD_M1, 5));
   double ld_192 = 2.0 * ld_48 - iLow(Currency_Symbol, PERIOD_M1, 0);
   double ld_200 = 2.0 * ld_56 - iLow(Currency_Symbol, PERIOD_M1, 1);
   double ld_208 = 2.0 * ld_64 - iLow(Currency_Symbol, PERIOD_M1, 2);
   double ld_216 = 2.0 * ld_72 - iLow(Currency_Symbol, PERIOD_M1, 3);
   double ld_224 = 2.0 * ld_80 - iLow(Currency_Symbol, PERIOD_M1, 4);
   double ld_232 = 2.0 * ld_88 - iLow(Currency_Symbol, PERIOD_M1, 5);
   double ld_240 = (iHigh(Currency_Symbol, PERIOD_M1, 0) + iLow(Currency_Symbol, PERIOD_M1, 0) + iClose(Currency_Symbol, PERIOD_M1, 0)) / 3.0;
   double ld_248 = (iHigh(Currency_Symbol, PERIOD_M1, 1) + iLow(Currency_Symbol, PERIOD_M1, 1) + iClose(Currency_Symbol, PERIOD_M1, 1)) / 3.0;
   double ld_256 = (iHigh(Currency_Symbol, PERIOD_M1, 2) + iLow(Currency_Symbol, PERIOD_M1, 2) + iClose(Currency_Symbol, PERIOD_M1, 2)) / 3.0;
   double ld_264 = (iHigh(Currency_Symbol, PERIOD_M1, 3) + iLow(Currency_Symbol, PERIOD_M1, 3) + iClose(Currency_Symbol, PERIOD_M1, 3)) / 3.0;
   double ld_272 = (iHigh(Currency_Symbol, PERIOD_M1, 4) + iLow(Currency_Symbol, PERIOD_M1, 4) + iClose(Currency_Symbol, PERIOD_M1, 4)) / 3.0;
   double ld_280 = (iHigh(Currency_Symbol, PERIOD_M1, 5) + iLow(Currency_Symbol, PERIOD_M1, 5) + iClose(Currency_Symbol, PERIOD_M1, 5)) / 3.0;
   double ld_288 = 2.0 * ld_48 - iHigh(Currency_Symbol, PERIOD_M1, 0);
   double ld_296 = 2.0 * ld_56 - iHigh(Currency_Symbol, PERIOD_M1, 1);
   double ld_304 = 2.0 * ld_64 - iHigh(Currency_Symbol, PERIOD_M1, 2);
   double ld_312 = 2.0 * ld_72 - iHigh(Currency_Symbol, PERIOD_M1, 3);
   double ld_320 = 2.0 * ld_80 - iHigh(Currency_Symbol, PERIOD_M1, 4);
   double ld_328 = 2.0 * ld_88 - iHigh(Currency_Symbol, PERIOD_M1, 5);
   double ld_336 = ld_48 - (iHigh(Currency_Symbol, PERIOD_M1, 0) - iLow(Currency_Symbol, PERIOD_M1, 0));
   double ld_344 = ld_56 - (iHigh(Currency_Symbol, PERIOD_M1, 1) - iLow(Currency_Symbol, PERIOD_M1, 1));
   double ld_352 = ld_64 - (iHigh(Currency_Symbol, PERIOD_M1, 2) - iLow(Currency_Symbol, PERIOD_M1, 2));
   double ld_360 = ld_72 - (iHigh(Currency_Symbol, PERIOD_M1, 3) - iLow(Currency_Symbol, PERIOD_M1, 3));
   double ld_368 = ld_80 - (iHigh(Currency_Symbol, PERIOD_M1, 4) - iLow(Currency_Symbol, PERIOD_M1, 4));
   double ld_376 = ld_88 - (iHigh(Currency_Symbol, PERIOD_M1, 5) - iLow(Currency_Symbol, PERIOD_M1, 5));
   double ld_384 = 2.0 * ld_48 - (2.0 * iHigh(Currency_Symbol, PERIOD_M1, 0) - iLow(Currency_Symbol, PERIOD_M1, 0));
   double ld_392 = 2.0 * ld_56 - (2.0 * iHigh(Currency_Symbol, PERIOD_M1, 1) - iLow(Currency_Symbol, PERIOD_M1, 1));
   double ld_400 = 2.0 * ld_64 - (2.0 * iHigh(Currency_Symbol, PERIOD_M1, 2) - iLow(Currency_Symbol, PERIOD_M1, 2));
   double ld_408 = 2.0 * ld_72 - (2.0 * iHigh(Currency_Symbol, PERIOD_M1, 3) - iLow(Currency_Symbol, PERIOD_M1, 3));
   double ld_416 = 2.0 * ld_80 - (2.0 * iHigh(Currency_Symbol, PERIOD_M1, 4) - iLow(Currency_Symbol, PERIOD_M1, 4));
   double ld_424 = 2.0 * ld_88 - (2.0 * iHigh(Currency_Symbol, PERIOD_M1, 5) - iLow(Currency_Symbol, PERIOD_M1, 5));
   if (ld_48 > ld_40) {
      ld_432 = 0;
      ld_720 = 1;
   }
   if (ld_48 < ld_40) {
      ld_432 = 1;
      ld_720 = 0;
   }
   if (ld_56 > ld_40) {
      ld_440 = 0;
      ld_728 = 1;
   }
   if (ld_56 < ld_40) {
      ld_440 = 1;
      ld_728 = 0;
   }
   if (ld_64 > ld_40) {
      ld_448 = 0;
      ld_736 = 1;
   }
   if (ld_64 < ld_40) {
      ld_448 = 1;
      ld_736 = 0;
   }
   if (ld_72 > ld_40) {
      ld_456 = 0;
      ld_744 = 1;
   }
   if (ld_72 < ld_40) {
      ld_456 = 1;
      ld_744 = 0;
   }
   if (ld_80 > ld_40) {
      ld_432 = 0;
      ld_unused_752 = 1;
   }
   if (ld_80 < ld_40) {
      ld_432 = 1;
      ld_unused_752 = 0;
   }
   if (ld_192 > ld_40) {
      ld_472 = 0;
      ld_760 = 1;
   }
   if (ld_192 < ld_40) {
      ld_472 = 1;
      ld_760 = 0;
   }
   if (ld_200 > ld_40) {
      ld_480 = 0;
      ld_768 = 1;
   }
   if (ld_200 < ld_40) {
      ld_480 = 1;
      ld_768 = 0;
   }
   if (ld_208 > ld_40) {
      ld_488 = 0;
      ld_776 = 1;
   }
   if (ld_208 < ld_40) {
      ld_488 = 1;
      ld_776 = 0;
   }
   if (ld_216 > ld_40) {
      ld_496 = 0;
      ld_784 = 1;
   }
   if (ld_216 < ld_40) {
      ld_496 = 1;
      ld_784 = 0;
   }
   if (ld_224 > ld_40) {
      ld_504 = 0;
      ld_792 = 1;
   }
   if (ld_224 < ld_40) {
      ld_504 = 1;
      ld_792 = 0;
   }
   if (ld_232 > ld_40) {
      ld_512 = 0;
      ld_800 = 1;
   }
   if (ld_232 < ld_40) {
      ld_512 = 1;
      ld_800 = 0;
   }
   if (ld_288 > ld_40) {
      ld_520 = 0;
      ld_808 = 1;
   }
   if (ld_288 < ld_40) {
      ld_520 = 1;
      ld_808 = 0;
   }
   if (ld_296 > ld_40) {
      ld_528 = 0;
      ld_816 = 1;
   }
   if (ld_296 < ld_40) {
      ld_528 = 1;
      ld_816 = 0;
   }
   if (ld_304 > ld_40) {
      ld_536 = 0;
      ld_824 = 1;
   }
   if (ld_304 < ld_40) {
      ld_536 = 1;
      ld_824 = 0;
   }
   if (ld_312 > ld_40) {
      ld_544 = 0;
      ld_832 = 1;
   }
   if (ld_312 < ld_40) {
      ld_544 = 1;
      ld_832 = 0;
   }
   if (ld_320 > ld_40) {
      ld_552 = 0;
      ld_840 = 1;
   }
   if (ld_320 < ld_40) {
      ld_552 = 1;
      ld_840 = 0;
   }
   if (ld_328 > ld_40) {
      ld_560 = 0;
      ld_848 = 1;
   }
   if (ld_328 < ld_40) {
      ld_560 = 1;
      ld_848 = 0;
   }
   if (ld_144 > ld_40) {
      ld_568 = 0;
      ld_856 = 1;
   }
   if (ld_144 < ld_40) {
      ld_568 = 1;
      ld_856 = 0;
   }
   if (ld_152 > ld_40) {
      ld_576 = 0;
      ld_864 = 1;
   }
   if (ld_152 < ld_40) {
      ld_576 = 1;
      ld_864 = 0;
   }
   if (ld_160 > ld_40) {
      ld_584 = 0;
      ld_872 = 1;
   }
   if (ld_160 < ld_40) {
      ld_584 = 1;
      ld_872 = 0;
   }
   if (ld_168 > ld_40) {
      ld_592 = 0;
      ld_880 = 1;
   }
   if (ld_168 < ld_40) {
      ld_592 = 1;
      ld_880 = 0;
   }
   if (ld_176 > ld_40) {
      ld_600 = 0;
      ld_888 = 1;
   }
   if (ld_176 < ld_40) {
      ld_600 = 1;
      ld_888 = 0;
   }
   if (ld_184 > ld_40) {
      ld_608 = 0;
      ld_896 = 1;
   }
   if (ld_184 < ld_40) {
      ld_608 = 1;
      ld_896 = 0;
   }
   if (ld_336 > ld_40) {
      ld_616 = 0;
      ld_904 = 1;
   }
   if (ld_336 < ld_40) {
      ld_616 = 1;
      ld_904 = 0;
   }
   if (ld_344 > ld_40) {
      ld_624 = 0;
      ld_912 = 1;
   }
   if (ld_344 < ld_40) {
      ld_624 = 1;
      ld_912 = 0;
   }
   if (ld_352 > ld_40) {
      ld_632 = 0;
      ld_920 = 1;
   }
   if (ld_352 < ld_40) {
      ld_632 = 1;
      ld_920 = 0;
   }
   if (ld_360 > ld_40) {
      ld_640 = 0;
      ld_928 = 1;
   }
   if (ld_360 < ld_40) {
      ld_640 = 1;
      ld_928 = 0;
   }
   if (ld_368 > ld_40) {
      ld_648 = 0;
      ld_936 = 1;
   }
   if (ld_368 < ld_40) {
      ld_648 = 1;
      ld_936 = 0;
   }
   if (ld_376 > ld_40) {
      ld_656 = 0;
      ld_944 = 1;
   }
   if (ld_376 < ld_40) {
      ld_656 = 1;
      ld_944 = 0;
   }
   if (ld_96 > ld_40) {
      ld_664 = 0;
      ld_952 = 1;
   }
   if (ld_96 < ld_40) {
      ld_664 = 1;
      ld_952 = 0;
   }
   if (ld_104 > ld_40) {
      ld_672 = 0;
      ld_960 = 1;
   }
   if (ld_104 < ld_40) {
      ld_672 = 1;
      ld_960 = 0;
   }
   if (ld_112 > ld_40) {
      ld_680 = 0;
      ld_968 = 1;
   }
   if (ld_112 < ld_40) {
      ld_680 = 1;
      ld_968 = 0;
   }
   if (ld_120 > ld_40) {
      ld_688 = 0;
      ld_984 = 1;
   }
   if (ld_120 < ld_40) {
      ld_688 = 1;
      ld_984 = 0;
   }
   if (ld_128 > ld_40) {
      ld_704 = 0;
      ld_992 = 1;
   }
   if (ld_128 < ld_40) {
      ld_704 = 1;
      ld_992 = 0;
   }
   if (ld_136 > ld_40) {
      ld_712 = 0;
      ld_1000 = 1;
   }
   if (ld_136 < ld_40) {
      ld_712 = 1;
      ld_1000 = 0;
   }
   double ld_1008 = ld_432 + ld_440 + ld_448 + ld_456 + ld_432 + ld_472 + ld_480 + ld_488 + ld_496 + ld_504 + ld_512 + ld_520 + ld_528 + ld_536 + ld_544 + ld_552 + ld_560 + ld_568 + ld_576 + ld_584 + ld_592 + ld_600 + ld_608 + ld_616 + ld_624 + ld_632 + ld_640 + ld_648 + ld_656 + ld_664 + ld_672 + ld_680 + ld_688 + ld_696 + ld_704 + ld_712;
   double ld_1016 = ld_720 + ld_728 + ld_736 + ld_744 + ld_720 + ld_760 + ld_768 + ld_776 + ld_784 + ld_792 + ld_800 + ld_808 + ld_816 + ld_824 + ld_832 + ld_840 + ld_848 + ld_856 + ld_864 + ld_872 + ld_880 + ld_888 + ld_896 + ld_904 + ld_912 + ld_920 + ld_928 + ld_936 + ld_944 + ld_952 + ld_960 + ld_968 + ld_976 + ld_984 + ld_992 + ld_1000;
   string l_dbl2str_1024 = DoubleToStr(100.0 * (ld_1008 / 36.0), 0);
   string ls_unused_1032 = DoubleToStr(100 - StrToDouble(l_dbl2str_1024), 0);
   double ld_1040 = (iHigh(Currency_Symbol, PERIOD_M5, 0) + iLow(Currency_Symbol, PERIOD_M5, 0) + iClose(Currency_Symbol, PERIOD_M5, 0)) / 3.0;
   double ld_1048 = (iHigh(Currency_Symbol, PERIOD_M5, 1) + iLow(Currency_Symbol, PERIOD_M5, 1) + iClose(Currency_Symbol, PERIOD_M5, 1)) / 3.0;
   double ld_1056 = (iHigh(Currency_Symbol, PERIOD_M5, 2) + iLow(Currency_Symbol, PERIOD_M5, 2) + iClose(Currency_Symbol, PERIOD_M5, 2)) / 3.0;
   double ld_1064 = (iHigh(Currency_Symbol, PERIOD_M5, 3) + iLow(Currency_Symbol, PERIOD_M5, 3) + iClose(Currency_Symbol, PERIOD_M5, 3)) / 3.0;
   double ld_1072 = (iHigh(Currency_Symbol, PERIOD_M5, 4) + iLow(Currency_Symbol, PERIOD_M5, 4) + iClose(Currency_Symbol, PERIOD_M5, 4)) / 3.0;
   double ld_1080 = (iHigh(Currency_Symbol, PERIOD_M5, 5) + iLow(Currency_Symbol, PERIOD_M5, 5) + iClose(Currency_Symbol, PERIOD_M5, 5)) / 3.0;
   double ld_1088 = 2.0 * ld_1040 + (iHigh(Currency_Symbol, PERIOD_M5, 0) - 2.0 * iLow(Currency_Symbol, PERIOD_M5, 0));
   double ld_1096 = 2.0 * ld_1048 + (iHigh(Currency_Symbol, PERIOD_M5, 1) - 2.0 * iLow(Currency_Symbol, PERIOD_M5, 1));
   double ld_1104 = 2.0 * ld_1056 + (iHigh(Currency_Symbol, PERIOD_M5, 2) - 2.0 * iLow(Currency_Symbol, PERIOD_M5, 2));
   double ld_1112 = 2.0 * ld_1064 + (iHigh(Currency_Symbol, PERIOD_M5, 3) - 2.0 * iLow(Currency_Symbol, PERIOD_M5, 3));
   double ld_1120 = 2.0 * ld_1072 + (iHigh(Currency_Symbol, PERIOD_M5, 4) - 2.0 * iLow(Currency_Symbol, PERIOD_M5, 4));
   double ld_1128 = 2.0 * ld_1080 + (iHigh(Currency_Symbol, PERIOD_M5, 5) - 2.0 * iLow(Currency_Symbol, PERIOD_M5, 5));
   double ld_1136 = ld_1040 + (iHigh(Currency_Symbol, PERIOD_M5, 0) - iLow(Currency_Symbol, PERIOD_M5, 0));
   double ld_1144 = ld_1048 + (iHigh(Currency_Symbol, PERIOD_M5, 1) - iLow(Currency_Symbol, PERIOD_M5, 1));
   double ld_1152 = ld_1056 + (iHigh(Currency_Symbol, PERIOD_M5, 2) - iLow(Currency_Symbol, PERIOD_M5, 2));
   double ld_1160 = ld_1064 + (iHigh(Currency_Symbol, PERIOD_M5, 3) - iLow(Currency_Symbol, PERIOD_M5, 3));
   double ld_1168 = ld_1072 + (iHigh(Currency_Symbol, PERIOD_M5, 4) - iLow(Currency_Symbol, PERIOD_M5, 4));
   double ld_1176 = ld_1080 + (iHigh(Currency_Symbol, PERIOD_M5, 5) - iLow(Currency_Symbol, PERIOD_M5, 5));
   double ld_1184 = 2.0 * ld_1040 - iLow(Currency_Symbol, PERIOD_M5, 0);
   double ld_1192 = 2.0 * ld_1048 - iLow(Currency_Symbol, PERIOD_M5, 1);
   double ld_1200 = 2.0 * ld_1056 - iLow(Currency_Symbol, PERIOD_M5, 2);
   double ld_1208 = 2.0 * ld_1064 - iLow(Currency_Symbol, PERIOD_M5, 3);
   double ld_1216 = 2.0 * ld_1072 - iLow(Currency_Symbol, PERIOD_M5, 4);
   double ld_1224 = 2.0 * ld_1080 - iLow(Currency_Symbol, PERIOD_M5, 5);
   double ld_1232 = (iHigh(Currency_Symbol, PERIOD_M5, 0) + iLow(Currency_Symbol, PERIOD_M5, 0) + iClose(Currency_Symbol, PERIOD_M5, 0)) / 3.0;
   double ld_1240 = (iHigh(Currency_Symbol, PERIOD_M5, 1) + iLow(Currency_Symbol, PERIOD_M5, 1) + iClose(Currency_Symbol, PERIOD_M5, 1)) / 3.0;
   double ld_1248 = (iHigh(Currency_Symbol, PERIOD_M5, 2) + iLow(Currency_Symbol, PERIOD_M5, 2) + iClose(Currency_Symbol, PERIOD_M5, 2)) / 3.0;
   double ld_1256 = (iHigh(Currency_Symbol, PERIOD_M5, 3) + iLow(Currency_Symbol, PERIOD_M5, 3) + iClose(Currency_Symbol, PERIOD_M5, 3)) / 3.0;
   double ld_1264 = (iHigh(Currency_Symbol, PERIOD_M5, 4) + iLow(Currency_Symbol, PERIOD_M5, 4) + iClose(Currency_Symbol, PERIOD_M5, 4)) / 3.0;
   double ld_1272 = (iHigh(Currency_Symbol, PERIOD_M5, 5) + iLow(Currency_Symbol, PERIOD_M5, 5) + iClose(Currency_Symbol, PERIOD_M5, 5)) / 3.0;
   double ld_1280 = 2.0 * ld_1040 - iHigh(Currency_Symbol, PERIOD_M5, 0);
   double ld_1288 = 2.0 * ld_1048 - iHigh(Currency_Symbol, PERIOD_M5, 1);
   double ld_1296 = 2.0 * ld_1056 - iHigh(Currency_Symbol, PERIOD_M5, 2);
   double ld_1304 = 2.0 * ld_1064 - iHigh(Currency_Symbol, PERIOD_M5, 3);
   double ld_1312 = 2.0 * ld_1072 - iHigh(Currency_Symbol, PERIOD_M5, 4);
   double ld_1320 = 2.0 * ld_1080 - iHigh(Currency_Symbol, PERIOD_M5, 5);
   double ld_1328 = ld_1040 - (iHigh(Currency_Symbol, PERIOD_M5, 0) - iLow(Currency_Symbol, PERIOD_M5, 0));
   double ld_1336 = ld_1048 - (iHigh(Currency_Symbol, PERIOD_M5, 1) - iLow(Currency_Symbol, PERIOD_M5, 1));
   double ld_1344 = ld_1056 - (iHigh(Currency_Symbol, PERIOD_M5, 2) - iLow(Currency_Symbol, PERIOD_M5, 2));
   double ld_1352 = ld_1064 - (iHigh(Currency_Symbol, PERIOD_M5, 3) - iLow(Currency_Symbol, PERIOD_M5, 3));
   double ld_1360 = ld_1072 - (iHigh(Currency_Symbol, PERIOD_M5, 4) - iLow(Currency_Symbol, PERIOD_M5, 4));
   double ld_1368 = ld_1080 - (iHigh(Currency_Symbol, PERIOD_M5, 5) - iLow(Currency_Symbol, PERIOD_M5, 5));
   double ld_1376 = 2.0 * ld_1040 - (2.0 * iHigh(Currency_Symbol, PERIOD_M5, 0) - iLow(Currency_Symbol, PERIOD_M5, 0));
   double ld_1384 = 2.0 * ld_1048 - (2.0 * iHigh(Currency_Symbol, PERIOD_M5, 1) - iLow(Currency_Symbol, PERIOD_M5, 1));
   double ld_1392 = 2.0 * ld_1056 - (2.0 * iHigh(Currency_Symbol, PERIOD_M5, 2) - iLow(Currency_Symbol, PERIOD_M5, 2));
   double ld_1400 = 2.0 * ld_1064 - (2.0 * iHigh(Currency_Symbol, PERIOD_M5, 3) - iLow(Currency_Symbol, PERIOD_M5, 3));
   double ld_1408 = 2.0 * ld_1072 - (2.0 * iHigh(Currency_Symbol, PERIOD_M5, 4) - iLow(Currency_Symbol, PERIOD_M5, 4));
   double ld_1416 = 2.0 * ld_1080 - (2.0 * iHigh(Currency_Symbol, PERIOD_M5, 5) - iLow(Currency_Symbol, PERIOD_M5, 5));
   if (ld_1040 > ld_40) {
      ld_1424 = 0;
      ld_1712 = 1;
   }
   if (ld_1040 < ld_40) {
      ld_1424 = 1;
      ld_1712 = 0;
   }
   if (ld_1048 > ld_40) {
      ld_1432 = 0;
      ld_1720 = 1;
   }
   if (ld_1048 < ld_40) {
      ld_1432 = 1;
      ld_1720 = 0;
   }
   if (ld_1056 > ld_40) {
      ld_1440 = 0;
      ld_1728 = 1;
   }
   if (ld_1056 < ld_40) {
      ld_1440 = 1;
      ld_1728 = 0;
   }
   if (ld_1064 > ld_40) {
      ld_1448 = 0;
      ld_1736 = 1;
   }
   if (ld_1064 < ld_40) {
      ld_1448 = 1;
      ld_1736 = 0;
   }
   if (ld_1072 > ld_40) {
      ld_1456 = 0;
      ld_1744 = 1;
   }
   if (ld_1072 < ld_40) {
      ld_1456 = 1;
      ld_1744 = 0;
   }
   if (ld_1184 > ld_40) {
      ld_1464 = 0;
      ld_1752 = 1;
   }
   if (ld_1184 < ld_40) {
      ld_1464 = 1;
      ld_1752 = 0;
   }
   if (ld_1192 > ld_40) {
      ld_1472 = 0;
      ld_1760 = 1;
   }
   if (ld_1192 < ld_40) {
      ld_1472 = 1;
      ld_1760 = 0;
   }
   if (ld_1200 > ld_40) {
      ld_1480 = 0;
      ld_1768 = 1;
   }
   if (ld_1200 < ld_40) {
      ld_1480 = 1;
      ld_1768 = 0;
   }
   if (ld_1208 > ld_40) {
      ld_1488 = 0;
      ld_1776 = 1;
   }
   if (ld_1208 < ld_40) {
      ld_1488 = 1;
      ld_1776 = 0;
   }
   if (ld_1216 > ld_40) {
      ld_1496 = 0;
      ld_1784 = 1;
   }
   if (ld_1216 < ld_40) {
      ld_1496 = 1;
      ld_1784 = 0;
   }
   if (ld_1224 > ld_40) {
      ld_1504 = 0;
      ld_1792 = 1;
   }
   if (ld_1224 < ld_40) {
      ld_1504 = 1;
      ld_1792 = 0;
   }
   if (ld_1280 > ld_40) {
      ld_1512 = 0;
      ld_1800 = 1;
   }
   if (ld_1280 < ld_40) {
      ld_1512 = 1;
      ld_1800 = 0;
   }
   if (ld_1288 > ld_40) {
      ld_1520 = 0;
      ld_1808 = 1;
   }
   if (ld_1288 < ld_40) {
      ld_1520 = 1;
      ld_1808 = 0;
   }
   if (ld_1296 > ld_40) {
      ld_1528 = 0;
      ld_1816 = 1;
   }
   if (ld_1296 < ld_40) {
      ld_1528 = 1;
      ld_1816 = 0;
   }
   if (ld_1304 > ld_40) {
      ld_1536 = 0;
      ld_1824 = 1;
   }
   if (ld_1304 < ld_40) {
      ld_1536 = 1;
      ld_1824 = 0;
   }
   if (ld_1312 > ld_40) {
      ld_1544 = 0;
      ld_1832 = 1;
   }
   if (ld_1312 < ld_40) {
      ld_1544 = 1;
      ld_1832 = 0;
   }
   if (ld_1320 > ld_40) {
      ld_1552 = 0;
      ld_1840 = 1;
   }
   if (ld_1320 < ld_40) {
      ld_1552 = 1;
      ld_1840 = 0;
   }
   if (ld_1136 > ld_40) {
      ld_1560 = 0;
      ld_1848 = 1;
   }
   if (ld_1136 < ld_40) {
      ld_1560 = 1;
      ld_1848 = 0;
   }
   if (ld_1144 > ld_40) {
      ld_1568 = 0;
      ld_1856 = 1;
   }
   if (ld_1144 < ld_40) {
      ld_1568 = 1;
      ld_1856 = 0;
   }
   if (ld_1152 > ld_40) {
      ld_1576 = 0;
      ld_1864 = 1;
   }
   if (ld_1152 < ld_40) {
      ld_1576 = 1;
      ld_1864 = 0;
   }
   if (ld_1160 > ld_40) {
      ld_1584 = 0;
      ld_1872 = 1;
   }
   if (ld_1160 < ld_40) {
      ld_1584 = 1;
      ld_1872 = 0;
   }
   if (ld_1168 > ld_40) {
      ld_1592 = 0;
      ld_1880 = 1;
   }
   if (ld_1168 < ld_40) {
      ld_1592 = 1;
      ld_1880 = 0;
   }
   if (ld_1176 > ld_40) {
      ld_1600 = 0;
      ld_1888 = 1;
   }
   if (ld_1176 < ld_40) {
      ld_1600 = 1;
      ld_1888 = 0;
   }
   if (ld_1328 > ld_40) {
      ld_1608 = 0;
      ld_1896 = 1;
   }
   if (ld_1328 < ld_40) {
      ld_1608 = 1;
      ld_1896 = 0;
   }
   if (ld_1336 > ld_40) {
      ld_1616 = 0;
      ld_1904 = 1;
   }
   if (ld_1336 < ld_40) {
      ld_1616 = 1;
      ld_1904 = 0;
   }
   if (ld_1344 > ld_40) {
      ld_1624 = 0;
      ld_1912 = 1;
   }
   if (ld_1344 < ld_40) {
      ld_1624 = 1;
      ld_1912 = 0;
   }
   if (ld_1352 > ld_40) {
      ld_1632 = 0;
      ld_1920 = 1;
   }
   if (ld_1352 < ld_40) {
      ld_1632 = 1;
      ld_1920 = 0;
   }
   if (ld_1360 > ld_40) {
      ld_1640 = 0;
      ld_1928 = 1;
   }
   if (ld_1360 < ld_40) {
      ld_1640 = 1;
      ld_1928 = 0;
   }
   if (ld_1368 > ld_40) {
      ld_1648 = 0;
      ld_1936 = 1;
   }
   if (ld_1368 < ld_40) {
      ld_1648 = 1;
      ld_1936 = 0;
   }
   if (ld_1088 > ld_40) {
      ld_1656 = 0;
      ld_1944 = 1;
   }
   if (ld_1088 < ld_40) {
      ld_1656 = 1;
      ld_1944 = 0;
   }
   if (ld_1096 > ld_40) {
      ld_1664 = 0;
      ld_1952 = 1;
   }
   if (ld_1096 < ld_40) {
      ld_1664 = 1;
      ld_1952 = 0;
   }
   if (ld_1104 > ld_40) {
      ld_1672 = 0;
      ld_1960 = 1;
   }
   if (ld_1104 < ld_40) {
      ld_1672 = 1;
      ld_1960 = 0;
   }
   if (ld_1112 > ld_40) {
      ld_1680 = 0;
      ld_1976 = 1;
   }
   if (ld_1112 < ld_40) {
      ld_1680 = 1;
      ld_1976 = 0;
   }
   if (ld_1120 > ld_40) {
      ld_1696 = 0;
      ld_1984 = 1;
   }
   if (ld_1120 < ld_40) {
      ld_1696 = 1;
      ld_1984 = 0;
   }
   if (ld_1128 > ld_40) {
      ld_1704 = 0;
      ld_1992 = 1;
   }
   if (ld_1128 < ld_40) {
      ld_1704 = 1;
      ld_1992 = 0;
   }
   double ld_2000 = ld_1424 + ld_1432 + ld_1440 + ld_1448 + ld_1456 + ld_1464 + ld_1472 + ld_1480 + ld_1488 + ld_1496 + ld_1504 + ld_1512 + ld_1520 + ld_1528 + ld_1536 + ld_1544 + ld_1552 + ld_1560 + ld_1568 + ld_1576 + ld_1584 + ld_1592 + ld_1600 + ld_1608 + ld_1616 + ld_1624 + ld_1632 + ld_1640 + ld_1648 + ld_1656 + ld_1664 + ld_1672 + ld_1680 + ld_1688 + ld_1696 + ld_1704 + ld_432 + ld_440 + ld_448 + ld_456 + ld_432 + ld_472 + ld_480 + ld_488 + ld_496 + ld_504 + ld_512 + ld_520 + ld_528 + ld_536 + ld_544 + ld_552 + ld_560 + ld_568 + ld_576 + ld_584 + ld_592 + ld_600 + ld_608 + ld_616 + ld_624 + ld_632 + ld_640 + ld_648 + ld_656 + ld_664 + ld_672 + ld_680 + ld_688 + ld_696 + ld_704 + ld_712;
   double ld_2008 = ld_1712 + ld_1720 + ld_1728 + ld_1736 + ld_1744 + ld_1752 + ld_1760 + ld_1768 + ld_1776 + ld_1784 + ld_1792 + ld_1800 + ld_1808 + ld_1816 + ld_1824 + ld_1832 + ld_1840 + ld_1848 + ld_1856 + ld_1864 + ld_1872 + ld_1880 + ld_1888 + ld_1896 + ld_1904 + ld_1912 + ld_1920 + ld_1928 + ld_1936 + ld_1944 + ld_1952 + ld_1960 + ld_1968 + ld_1976 + ld_1984 + ld_1992 + ld_720 + ld_728 + ld_736 + ld_744 + ld_720 + ld_760 + ld_768 + ld_776 + ld_784 + ld_792 + ld_800 + ld_808 + ld_816 + ld_824 + ld_832 + ld_840 + ld_848 + ld_856 + ld_864 + ld_872 + ld_880 + ld_888 + ld_896 + ld_904 + ld_912 + ld_920 + ld_928 + ld_936 + ld_944 + ld_952 + ld_960 + ld_968 + ld_976 + ld_984 + ld_992 + ld_1000;
   string l_dbl2str_2016 = DoubleToStr(100.0 * (ld_2000 / 72.0), 0);
   string l_dbl2str_2024 = DoubleToStr(100 - StrToDouble(l_dbl2str_2016), 0);
   double ld_2032 = (iHigh(Currency_Symbol, PERIOD_M15, 0) + iLow(Currency_Symbol, PERIOD_M15, 0) + iClose(Currency_Symbol, PERIOD_M15, 0)) / 3.0;
   double ld_2040 = (iHigh(Currency_Symbol, PERIOD_M15, 1) + iLow(Currency_Symbol, PERIOD_M15, 1) + iClose(Currency_Symbol, PERIOD_M15, 1)) / 3.0;
   double ld_2048 = (iHigh(Currency_Symbol, PERIOD_M15, 2) + iLow(Currency_Symbol, PERIOD_M15, 2) + iClose(Currency_Symbol, PERIOD_M15, 2)) / 3.0;
   double ld_2056 = (iHigh(Currency_Symbol, PERIOD_M15, 3) + iLow(Currency_Symbol, PERIOD_M15, 3) + iClose(Currency_Symbol, PERIOD_M15, 3)) / 3.0;
   double ld_2064 = (iHigh(Currency_Symbol, PERIOD_M15, 4) + iLow(Currency_Symbol, PERIOD_M15, 4) + iClose(Currency_Symbol, PERIOD_M15, 4)) / 3.0;
   double ld_2072 = (iHigh(Currency_Symbol, PERIOD_M15, 5) + iLow(Currency_Symbol, PERIOD_M15, 5) + iClose(Currency_Symbol, PERIOD_M15, 5)) / 3.0;
   double ld_2080 = 2.0 * ld_2032 + (iHigh(Currency_Symbol, PERIOD_M15, 0) - 2.0 * iLow(Currency_Symbol, PERIOD_M15, 0));
   double ld_2088 = 2.0 * ld_2040 + (iHigh(Currency_Symbol, PERIOD_M15, 1) - 2.0 * iLow(Currency_Symbol, PERIOD_M15, 1));
   double ld_2096 = 2.0 * ld_2048 + (iHigh(Currency_Symbol, PERIOD_M15, 2) - 2.0 * iLow(Currency_Symbol, PERIOD_M15, 2));
   double ld_2104 = 2.0 * ld_2056 + (iHigh(Currency_Symbol, PERIOD_M15, 3) - 2.0 * iLow(Currency_Symbol, PERIOD_M15, 3));
   double ld_2112 = 2.0 * ld_2064 + (iHigh(Currency_Symbol, PERIOD_M15, 4) - 2.0 * iLow(Currency_Symbol, PERIOD_M15, 4));
   double ld_2120 = 2.0 * ld_2072 + (iHigh(Currency_Symbol, PERIOD_M15, 5) - 2.0 * iLow(Currency_Symbol, PERIOD_M15, 5));
   double ld_2128 = ld_2032 + (iHigh(Currency_Symbol, PERIOD_M15, 0) - iLow(Currency_Symbol, PERIOD_M15, 0));
   double ld_2136 = ld_2040 + (iHigh(Currency_Symbol, PERIOD_M15, 1) - iLow(Currency_Symbol, PERIOD_M15, 1));
   double ld_2144 = ld_2048 + (iHigh(Currency_Symbol, PERIOD_M15, 2) - iLow(Currency_Symbol, PERIOD_M15, 2));
   double ld_2152 = ld_2056 + (iHigh(Currency_Symbol, PERIOD_M15, 3) - iLow(Currency_Symbol, PERIOD_M15, 3));
   double ld_2160 = ld_2064 + (iHigh(Currency_Symbol, PERIOD_M15, 4) - iLow(Currency_Symbol, PERIOD_M15, 4));
   double ld_2168 = ld_2072 + (iHigh(Currency_Symbol, PERIOD_M15, 5) - iLow(Currency_Symbol, PERIOD_M15, 5));
   double ld_2176 = 2.0 * ld_2032 - iLow(Currency_Symbol, PERIOD_M15, 0);
   double ld_2184 = 2.0 * ld_2040 - iLow(Currency_Symbol, PERIOD_M15, 1);
   double ld_2192 = 2.0 * ld_2048 - iLow(Currency_Symbol, PERIOD_M15, 2);
   double ld_2200 = 2.0 * ld_2056 - iLow(Currency_Symbol, PERIOD_M15, 3);
   double ld_2208 = 2.0 * ld_2064 - iLow(Currency_Symbol, PERIOD_M15, 4);
   double ld_2216 = 2.0 * ld_2072 - iLow(Currency_Symbol, PERIOD_M15, 5);
   double ld_2224 = (iHigh(Currency_Symbol, PERIOD_M15, 0) + iLow(Currency_Symbol, PERIOD_M15, 0) + iClose(Currency_Symbol, PERIOD_M15, 0)) / 3.0;
   double ld_2232 = (iHigh(Currency_Symbol, PERIOD_M15, 1) + iLow(Currency_Symbol, PERIOD_M15, 1) + iClose(Currency_Symbol, PERIOD_M15, 1)) / 3.0;
   double ld_2240 = (iHigh(Currency_Symbol, PERIOD_M15, 2) + iLow(Currency_Symbol, PERIOD_M15, 2) + iClose(Currency_Symbol, PERIOD_M15, 2)) / 3.0;
   double ld_2248 = (iHigh(Currency_Symbol, PERIOD_M15, 3) + iLow(Currency_Symbol, PERIOD_M15, 3) + iClose(Currency_Symbol, PERIOD_M15, 3)) / 3.0;
   double ld_2256 = (iHigh(Currency_Symbol, PERIOD_M15, 4) + iLow(Currency_Symbol, PERIOD_M15, 4) + iClose(Currency_Symbol, PERIOD_M15, 4)) / 3.0;
   double ld_2264 = (iHigh(Currency_Symbol, PERIOD_M15, 5) + iLow(Currency_Symbol, PERIOD_M15, 5) + iClose(Currency_Symbol, PERIOD_M15, 5)) / 3.0;
   double ld_2272 = 2.0 * ld_2032 - iHigh(Currency_Symbol, PERIOD_M15, 0);
   double ld_2280 = 2.0 * ld_2040 - iHigh(Currency_Symbol, PERIOD_M15, 1);
   double ld_2288 = 2.0 * ld_2048 - iHigh(Currency_Symbol, PERIOD_M15, 2);
   double ld_2296 = 2.0 * ld_2056 - iHigh(Currency_Symbol, PERIOD_M15, 3);
   double ld_2304 = 2.0 * ld_2064 - iHigh(Currency_Symbol, PERIOD_M15, 4);
   double ld_2312 = 2.0 * ld_2072 - iHigh(Currency_Symbol, PERIOD_M15, 5);
   double ld_2320 = ld_2032 - (iHigh(Currency_Symbol, PERIOD_M15, 0) - iLow(Currency_Symbol, PERIOD_M15, 0));
   double ld_2328 = ld_2040 - (iHigh(Currency_Symbol, PERIOD_M15, 1) - iLow(Currency_Symbol, PERIOD_M15, 1));
   double ld_2336 = ld_2048 - (iHigh(Currency_Symbol, PERIOD_M15, 2) - iLow(Currency_Symbol, PERIOD_M15, 2));
   double ld_2344 = ld_2056 - (iHigh(Currency_Symbol, PERIOD_M15, 3) - iLow(Currency_Symbol, PERIOD_M15, 3));
   double ld_2352 = ld_2064 - (iHigh(Currency_Symbol, PERIOD_M15, 4) - iLow(Currency_Symbol, PERIOD_M15, 4));
   double ld_2360 = ld_2072 - (iHigh(Currency_Symbol, PERIOD_M15, 5) - iLow(Currency_Symbol, PERIOD_M15, 5));
   double ld_2368 = 2.0 * ld_2032 - (2.0 * iHigh(Currency_Symbol, PERIOD_M15, 0) - iLow(Currency_Symbol, PERIOD_M15, 0));
   double ld_2376 = 2.0 * ld_2040 - (2.0 * iHigh(Currency_Symbol, PERIOD_M15, 1) - iLow(Currency_Symbol, PERIOD_M15, 1));
   double ld_2384 = 2.0 * ld_2048 - (2.0 * iHigh(Currency_Symbol, PERIOD_M15, 2) - iLow(Currency_Symbol, PERIOD_M15, 2));
   double ld_2392 = 2.0 * ld_2056 - (2.0 * iHigh(Currency_Symbol, PERIOD_M15, 3) - iLow(Currency_Symbol, PERIOD_M15, 3));
   double ld_2400 = 2.0 * ld_2064 - (2.0 * iHigh(Currency_Symbol, PERIOD_M15, 4) - iLow(Currency_Symbol, PERIOD_M15, 4));
   double ld_2408 = 2.0 * ld_2072 - (2.0 * iHigh(Currency_Symbol, PERIOD_M15, 5) - iLow(Currency_Symbol, PERIOD_M15, 5));
   if (ld_2032 > ld_40) {
      ld_2416 = 0;
      ld_2704 = 1;
   }
   if (ld_2032 < ld_40) {
      ld_2416 = 1;
      ld_2704 = 0;
   }
   if (ld_2040 > ld_40) {
      ld_2424 = 0;
      ld_2712 = 1;
   }
   if (ld_2040 < ld_40) {
      ld_2424 = 1;
      ld_2712 = 0;
   }
   if (ld_2048 > ld_40) {
      ld_2432 = 0;
      ld_2720 = 1;
   }
   if (ld_2048 < ld_40) {
      ld_2432 = 1;
      ld_2720 = 0;
   }
   if (ld_2056 > ld_40) {
      ld_2440 = 0;
      ld_2728 = 1;
   }
   if (ld_2056 < ld_40) {
      ld_2440 = 1;
      ld_2728 = 0;
   }
   if (ld_2064 > ld_40) {
      ld_2448 = 0;
      ld_2736 = 1;
   }
   if (ld_2064 < ld_40) {
      ld_2448 = 1;
      ld_2736 = 0;
   }
   if (ld_2176 > ld_40) {
      ld_2456 = 0;
      ld_2744 = 1;
   }
   if (ld_2176 < ld_40) {
      ld_2456 = 1;
      ld_2744 = 0;
   }
   if (ld_2184 > ld_40) {
      ld_2464 = 0;
      ld_2752 = 1;
   }
   if (ld_2184 < ld_40) {
      ld_2464 = 1;
      ld_2752 = 0;
   }
   if (ld_2192 > ld_40) {
      ld_2472 = 0;
      ld_2760 = 1;
   }
   if (ld_2192 < ld_40) {
      ld_2472 = 1;
      ld_2760 = 0;
   }
   if (ld_2200 > ld_40) {
      ld_2480 = 0;
      ld_2768 = 1;
   }
   if (ld_2200 < ld_40) {
      ld_2480 = 1;
      ld_2768 = 0;
   }
   if (ld_2208 > ld_40) {
      ld_2488 = 0;
      ld_2776 = 1;
   }
   if (ld_2208 < ld_40) {
      ld_2488 = 1;
      ld_2776 = 0;
   }
   if (ld_2216 > ld_40) {
      ld_2496 = 0;
      ld_2784 = 1;
   }
   if (ld_2216 < ld_40) {
      ld_2496 = 1;
      ld_2784 = 0;
   }
   if (ld_2272 > ld_40) {
      ld_2504 = 0;
      ld_2792 = 1;
   }
   if (ld_2272 < ld_40) {
      ld_2504 = 1;
      ld_2792 = 0;
   }
   if (ld_2280 > ld_40) {
      ld_2512 = 0;
      ld_2800 = 1;
   }
   if (ld_2280 < ld_40) {
      ld_2512 = 1;
      ld_2800 = 0;
   }
   if (ld_2288 > ld_40) {
      ld_2520 = 0;
      ld_2808 = 1;
   }
   if (ld_2288 < ld_40) {
      ld_2520 = 1;
      ld_2808 = 0;
   }
   if (ld_2296 > ld_40) {
      ld_2528 = 0;
      ld_2816 = 1;
   }
   if (ld_2296 < ld_40) {
      ld_2528 = 1;
      ld_2816 = 0;
   }
   if (ld_2304 > ld_40) {
      ld_2536 = 0;
      ld_2824 = 1;
   }
   if (ld_2304 < ld_40) {
      ld_2536 = 1;
      ld_2824 = 0;
   }
   if (ld_2312 > ld_40) {
      ld_2544 = 0;
      ld_2832 = 1;
   }
   if (ld_2312 < ld_40) {
      ld_2544 = 1;
      ld_2832 = 0;
   }
   if (ld_2128 > ld_40) {
      ld_2552 = 0;
      ld_2840 = 1;
   }
   if (ld_2128 < ld_40) {
      ld_2552 = 1;
      ld_2840 = 0;
   }
   if (ld_2136 > ld_40) {
      ld_2560 = 0;
      ld_2848 = 1;
   }
   if (ld_2136 < ld_40) {
      ld_2560 = 1;
      ld_2848 = 0;
   }
   if (ld_2144 > ld_40) {
      ld_2568 = 0;
      ld_2856 = 1;
   }
   if (ld_2144 < ld_40) {
      ld_2568 = 1;
      ld_2856 = 0;
   }
   if (ld_2152 > ld_40) {
      ld_2576 = 0;
      ld_2864 = 1;
   }
   if (ld_2152 < ld_40) {
      ld_2576 = 1;
      ld_2864 = 0;
   }
   if (ld_2160 > ld_40) {
      ld_2584 = 0;
      ld_2872 = 1;
   }
   if (ld_2160 < ld_40) {
      ld_2584 = 1;
      ld_2872 = 0;
   }
   if (ld_2168 > ld_40) {
      ld_2592 = 0;
      ld_2880 = 1;
   }
   if (ld_2168 < ld_40) {
      ld_2592 = 1;
      ld_2880 = 0;
   }
   if (ld_2320 > ld_40) {
      ld_2600 = 0;
      ld_2888 = 1;
   }
   if (ld_2320 < ld_40) {
      ld_2600 = 1;
      ld_2888 = 0;
   }
   if (ld_2328 > ld_40) {
      ld_2608 = 0;
      ld_2896 = 1;
   }
   if (ld_2328 < ld_40) {
      ld_2608 = 1;
      ld_2896 = 0;
   }
   if (ld_2336 > ld_40) {
      ld_2616 = 0;
      ld_2904 = 1;
   }
   if (ld_2336 < ld_40) {
      ld_2616 = 1;
      ld_2904 = 0;
   }
   if (ld_2344 > ld_40) {
      ld_2624 = 0;
      ld_2912 = 1;
   }
   if (ld_2344 < ld_40) {
      ld_2624 = 1;
      ld_2912 = 0;
   }
   if (ld_2352 > ld_40) {
      ld_2632 = 0;
      ld_2920 = 1;
   }
   if (ld_2352 < ld_40) {
      ld_2632 = 1;
      ld_2920 = 0;
   }
   if (ld_2360 > ld_40) {
      ld_2640 = 0;
      ld_2928 = 1;
   }
   if (ld_2360 < ld_40) {
      ld_2640 = 1;
      ld_2928 = 0;
   }
   if (ld_2080 > ld_40) {
      ld_2648 = 0;
      ld_2936 = 1;
   }
   if (ld_2080 < ld_40) {
      ld_2648 = 1;
      ld_2936 = 0;
   }
   if (ld_2088 > ld_40) {
      ld_2656 = 0;
      ld_2944 = 1;
   }
   if (ld_2088 < ld_40) {
      ld_2656 = 1;
      ld_2944 = 0;
   }
   if (ld_2096 > ld_40) {
      ld_2664 = 0;
      ld_2952 = 1;
   }
   if (ld_2096 < ld_40) {
      ld_2664 = 1;
      ld_2952 = 0;
   }
   if (ld_2104 > ld_40) {
      ld_2672 = 0;
      ld_2968 = 1;
   }
   if (ld_2104 < ld_40) {
      ld_2672 = 1;
      ld_2968 = 0;
   }
   if (ld_2112 > ld_40) {
      ld_2688 = 0;
      ld_2976 = 1;
   }
   if (ld_2112 < ld_40) {
      ld_2688 = 1;
      ld_2976 = 0;
   }
   if (ld_2120 > ld_40) {
      ld_2696 = 0;
      ld_2984 = 1;
   }
   if (ld_2120 < ld_40) {
      ld_2696 = 1;
      ld_2984 = 0;
   }
   double ld_2992 = ld_2416 + ld_2424 + ld_2432 + ld_2440 + ld_2448 + ld_2456 + ld_2464 + ld_2472 + ld_2480 + ld_2488 + ld_2496 + ld_2504 + ld_2512 + ld_2520 + ld_2528 + ld_2536 + ld_2544 + ld_2552 + ld_2560 + ld_2568 + ld_2576 + ld_2584 + ld_2592 + ld_2600 + ld_2608 + ld_2616 + ld_2624 + ld_2632 + ld_2640 + ld_2528 + ld_2656 + ld_2664 + ld_2672 + ld_2680 + ld_2688 + ld_2696;
   double ld_3000 = ld_2704 + ld_2712 + ld_2720 + ld_2728 + ld_2736 + ld_2744 + ld_2752 + ld_2760 + ld_2768 + ld_2776 + ld_2784 + ld_2792 + ld_2800 + ld_2808 + ld_2816 + ld_2824 + ld_2832 + ld_2840 + ld_2848 + ld_2856 + ld_2864 + ld_2872 + ld_2880 + ld_2888 + ld_2896 + ld_2904 + ld_2912 + ld_2920 + ld_2928 + ld_2816 + ld_2944 + ld_2952 + ld_2960 + ld_2968 + ld_2976 + ld_2984;
   string l_dbl2str_3008 = DoubleToStr(100.0 * (ld_2992 / 36.0), 0);
   string ls_unused_3016 = DoubleToStr(100 - StrToDouble(l_dbl2str_3008), 0);
   double ld_3024 = (iHigh(Currency_Symbol, PERIOD_M30, 0) + iLow(Currency_Symbol, PERIOD_M30, 0) + iClose(Currency_Symbol, PERIOD_M30, 0)) / 3.0;
   double ld_3032 = (iHigh(Currency_Symbol, PERIOD_M30, 1) + iLow(Currency_Symbol, PERIOD_M30, 1) + iClose(Currency_Symbol, PERIOD_M30, 1)) / 3.0;
   double ld_3040 = (iHigh(Currency_Symbol, PERIOD_M30, 2) + iLow(Currency_Symbol, PERIOD_M30, 2) + iClose(Currency_Symbol, PERIOD_M30, 2)) / 3.0;
   double ld_3048 = (iHigh(Currency_Symbol, PERIOD_M30, 3) + iLow(Currency_Symbol, PERIOD_M30, 3) + iClose(Currency_Symbol, PERIOD_M30, 3)) / 3.0;
   double ld_3056 = (iHigh(Currency_Symbol, PERIOD_M30, 4) + iLow(Currency_Symbol, PERIOD_M30, 4) + iClose(Currency_Symbol, PERIOD_M30, 4)) / 3.0;
   double ld_3064 = (iHigh(Currency_Symbol, PERIOD_M30, 5) + iLow(Currency_Symbol, PERIOD_M30, 5) + iClose(Currency_Symbol, PERIOD_M30, 5)) / 3.0;
   double ld_3072 = 2.0 * ld_3024 + (iHigh(Currency_Symbol, PERIOD_M30, 0) - 2.0 * iLow(Currency_Symbol, PERIOD_M30, 0));
   double ld_3080 = 2.0 * ld_3032 + (iHigh(Currency_Symbol, PERIOD_M30, 1) - 2.0 * iLow(Currency_Symbol, PERIOD_M30, 1));
   double ld_3088 = 2.0 * ld_3040 + (iHigh(Currency_Symbol, PERIOD_M30, 2) - 2.0 * iLow(Currency_Symbol, PERIOD_M30, 2));
   double ld_3096 = 2.0 * ld_3048 + (iHigh(Currency_Symbol, PERIOD_M30, 3) - 2.0 * iLow(Currency_Symbol, PERIOD_M30, 3));
   double ld_3104 = 2.0 * ld_3056 + (iHigh(Currency_Symbol, PERIOD_M30, 4) - 2.0 * iLow(Currency_Symbol, PERIOD_M30, 4));
   double ld_3112 = 2.0 * ld_3064 + (iHigh(Currency_Symbol, PERIOD_M30, 5) - 2.0 * iLow(Currency_Symbol, PERIOD_M30, 5));
   double ld_3120 = ld_3024 + (iHigh(Currency_Symbol, PERIOD_M30, 0) - iLow(Currency_Symbol, PERIOD_M30, 0));
   double ld_3128 = ld_3032 + (iHigh(Currency_Symbol, PERIOD_M30, 1) - iLow(Currency_Symbol, PERIOD_M30, 1));
   double ld_3136 = ld_3040 + (iHigh(Currency_Symbol, PERIOD_M30, 2) - iLow(Currency_Symbol, PERIOD_M30, 2));
   double ld_3144 = ld_3048 + (iHigh(Currency_Symbol, PERIOD_M30, 3) - iLow(Currency_Symbol, PERIOD_M30, 3));
   double ld_3152 = ld_3056 + (iHigh(Currency_Symbol, PERIOD_M30, 4) - iLow(Currency_Symbol, PERIOD_M30, 4));
   double ld_3160 = ld_3064 + (iHigh(Currency_Symbol, PERIOD_M30, 5) - iLow(Currency_Symbol, PERIOD_M30, 5));
   double ld_3168 = 2.0 * ld_3024 - iLow(Currency_Symbol, PERIOD_M30, 0);
   double ld_3176 = 2.0 * ld_3032 - iLow(Currency_Symbol, PERIOD_M30, 1);
   double ld_3184 = 2.0 * ld_3040 - iLow(Currency_Symbol, PERIOD_M30, 2);
   double ld_3192 = 2.0 * ld_3048 - iLow(Currency_Symbol, PERIOD_M30, 3);
   double ld_3200 = 2.0 * ld_3056 - iLow(Currency_Symbol, PERIOD_M30, 4);
   double ld_3208 = 2.0 * ld_3064 - iLow(Currency_Symbol, PERIOD_M30, 5);
   double ld_3216 = (iHigh(Currency_Symbol, PERIOD_M30, 0) + iLow(Currency_Symbol, PERIOD_M30, 0) + iClose(Currency_Symbol, PERIOD_M30, 0)) / 3.0;
   double ld_3224 = (iHigh(Currency_Symbol, PERIOD_M30, 1) + iLow(Currency_Symbol, PERIOD_M30, 1) + iClose(Currency_Symbol, PERIOD_M30, 1)) / 3.0;
   double ld_3232 = (iHigh(Currency_Symbol, PERIOD_M30, 2) + iLow(Currency_Symbol, PERIOD_M30, 2) + iClose(Currency_Symbol, PERIOD_M30, 2)) / 3.0;
   double ld_3240 = (iHigh(Currency_Symbol, PERIOD_M30, 3) + iLow(Currency_Symbol, PERIOD_M30, 3) + iClose(Currency_Symbol, PERIOD_M30, 3)) / 3.0;
   double ld_3248 = (iHigh(Currency_Symbol, PERIOD_M30, 4) + iLow(Currency_Symbol, PERIOD_M30, 4) + iClose(Currency_Symbol, PERIOD_M30, 4)) / 3.0;
   double ld_3256 = (iHigh(Currency_Symbol, PERIOD_M30, 5) + iLow(Currency_Symbol, PERIOD_M30, 5) + iClose(Currency_Symbol, PERIOD_M30, 5)) / 3.0;
   double ld_3264 = 2.0 * ld_3024 - iHigh(Currency_Symbol, PERIOD_M30, 0);
   double ld_3272 = 2.0 * ld_3032 - iHigh(Currency_Symbol, PERIOD_M30, 1);
   double ld_3280 = 2.0 * ld_3040 - iHigh(Currency_Symbol, PERIOD_M30, 2);
   double ld_3288 = 2.0 * ld_3048 - iHigh(Currency_Symbol, PERIOD_M30, 3);
   double ld_3296 = 2.0 * ld_3056 - iHigh(Currency_Symbol, PERIOD_M30, 4);
   double ld_3304 = 2.0 * ld_3064 - iHigh(Currency_Symbol, PERIOD_M30, 5);
   double ld_3312 = ld_3024 - (iHigh(Currency_Symbol, PERIOD_M30, 0) - iLow(Currency_Symbol, PERIOD_M30, 0));
   double ld_3320 = ld_3032 - (iHigh(Currency_Symbol, PERIOD_M30, 1) - iLow(Currency_Symbol, PERIOD_M30, 1));
   double ld_3328 = ld_3040 - (iHigh(Currency_Symbol, PERIOD_M30, 2) - iLow(Currency_Symbol, PERIOD_M30, 2));
   double ld_3336 = ld_3048 - (iHigh(Currency_Symbol, PERIOD_M30, 3) - iLow(Currency_Symbol, PERIOD_M30, 3));
   double ld_3344 = ld_3056 - (iHigh(Currency_Symbol, PERIOD_M30, 4) - iLow(Currency_Symbol, PERIOD_M30, 4));
   double ld_3352 = ld_3064 - (iHigh(Currency_Symbol, PERIOD_M30, 5) - iLow(Currency_Symbol, PERIOD_M30, 5));
   double ld_3360 = 2.0 * ld_3024 - (2.0 * iHigh(Currency_Symbol, PERIOD_M30, 0) - iLow(Currency_Symbol, PERIOD_M30, 0));
   double ld_3368 = 2.0 * ld_3032 - (2.0 * iHigh(Currency_Symbol, PERIOD_M30, 1) - iLow(Currency_Symbol, PERIOD_M30, 1));
   double ld_3376 = 2.0 * ld_3040 - (2.0 * iHigh(Currency_Symbol, PERIOD_M30, 2) - iLow(Currency_Symbol, PERIOD_M30, 2));
   double ld_3384 = 2.0 * ld_3048 - (2.0 * iHigh(Currency_Symbol, PERIOD_M30, 3) - iLow(Currency_Symbol, PERIOD_M30, 3));
   double ld_3392 = 2.0 * ld_3056 - (2.0 * iHigh(Currency_Symbol, PERIOD_M30, 4) - iLow(Currency_Symbol, PERIOD_M30, 4));
   double ld_3400 = 2.0 * ld_3064 - (2.0 * iHigh(Currency_Symbol, PERIOD_M30, 5) - iLow(Currency_Symbol, PERIOD_M30, 5));
   if (ld_3024 > ld_40) {
      ld_3408 = 0;
      ld_3696 = 1;
   }
   if (ld_3024 < ld_40) {
      ld_3408 = 1;
      ld_3696 = 0;
   }
   if (ld_3032 > ld_40) {
      ld_3416 = 0;
      ld_3704 = 1;
   }
   if (ld_3032 < ld_40) {
      ld_3416 = 1;
      ld_3704 = 0;
   }
   if (ld_3040 > ld_40) {
      ld_3424 = 0;
      ld_3712 = 1;
   }
   if (ld_3040 < ld_40) {
      ld_3424 = 1;
      ld_3712 = 0;
   }
   if (ld_3048 > ld_40) {
      ld_3432 = 0;
      ld_3720 = 1;
   }
   if (ld_3048 < ld_40) {
      ld_3432 = 1;
      ld_3720 = 0;
   }
   if (ld_3056 > ld_40) {
      ld_3440 = 0;
      ld_3728 = 1;
   }
   if (ld_3056 < ld_40) {
      ld_3440 = 1;
      ld_3728 = 0;
   }
   if (ld_3168 > ld_40) {
      ld_3448 = 0;
      ld_3736 = 1;
   }
   if (ld_3168 < ld_40) {
      ld_3448 = 1;
      ld_3736 = 0;
   }
   if (ld_3176 > ld_40) {
      ld_3456 = 0;
      ld_3744 = 1;
   }
   if (ld_3176 < ld_40) {
      ld_3456 = 1;
      ld_3744 = 0;
   }
   if (ld_3184 > ld_40) {
      ld_3464 = 0;
      ld_3752 = 1;
   }
   if (ld_3184 < ld_40) {
      ld_3464 = 1;
      ld_3752 = 0;
   }
   if (ld_3192 > ld_40) {
      ld_3472 = 0;
      ld_3760 = 1;
   }
   if (ld_3192 < ld_40) {
      ld_3472 = 1;
      ld_3760 = 0;
   }
   if (ld_3200 > ld_40) {
      ld_3480 = 0;
      ld_3768 = 1;
   }
   if (ld_3200 < ld_40) {
      ld_3480 = 1;
      ld_3768 = 0;
   }
   if (ld_3208 > ld_40) {
      ld_3488 = 0;
      ld_3776 = 1;
   }
   if (ld_3208 < ld_40) {
      ld_3488 = 1;
      ld_3776 = 0;
   }
   if (ld_3264 > ld_40) {
      ld_3496 = 0;
      ld_3784 = 1;
   }
   if (ld_3264 < ld_40) {
      ld_3496 = 1;
      ld_3784 = 0;
   }
   if (ld_3272 > ld_40) {
      ld_3504 = 0;
      ld_3792 = 1;
   }
   if (ld_3272 < ld_40) {
      ld_3504 = 1;
      ld_3792 = 0;
   }
   if (ld_3280 > ld_40) {
      ld_3512 = 0;
      ld_3800 = 1;
   }
   if (ld_3280 < ld_40) {
      ld_3512 = 1;
      ld_3800 = 0;
   }
   if (ld_3288 > ld_40) {
      ld_3520 = 0;
      ld_3808 = 1;
   }
   if (ld_3288 < ld_40) {
      ld_3520 = 1;
      ld_3808 = 0;
   }
   if (ld_3296 > ld_40) {
      ld_3528 = 0;
      ld_3816 = 1;
   }
   if (ld_3296 < ld_40) {
      ld_3528 = 1;
      ld_3816 = 0;
   }
   if (ld_3304 > ld_40) {
      ld_3536 = 0;
      ld_3824 = 1;
   }
   if (ld_3304 < ld_40) {
      ld_3536 = 1;
      ld_3824 = 0;
   }
   if (ld_3120 > ld_40) {
      ld_3544 = 0;
      ld_3832 = 1;
   }
   if (ld_3120 < ld_40) {
      ld_3544 = 1;
      ld_3832 = 0;
   }
   if (ld_3128 > ld_40) {
      ld_3552 = 0;
      ld_3840 = 1;
   }
   if (ld_3128 < ld_40) {
      ld_3552 = 1;
      ld_3840 = 0;
   }
   if (ld_3136 > ld_40) {
      ld_3560 = 0;
      ld_3848 = 1;
   }
   if (ld_3136 < ld_40) {
      ld_3560 = 1;
      ld_3848 = 0;
   }
   if (ld_3144 > ld_40) {
      ld_3568 = 0;
      ld_3856 = 1;
   }
   if (ld_3144 < ld_40) {
      ld_3568 = 1;
      ld_3856 = 0;
   }
   if (ld_3152 > ld_40) {
      ld_3576 = 0;
      ld_3864 = 1;
   }
   if (ld_3152 < ld_40) {
      ld_3576 = 1;
      ld_3864 = 0;
   }
   if (ld_3160 > ld_40) {
      ld_3584 = 0;
      ld_3872 = 1;
   }
   if (ld_3160 < ld_40) {
      ld_3584 = 1;
      ld_3872 = 0;
   }
   if (ld_3312 > ld_40) {
      ld_3592 = 0;
      ld_3880 = 1;
   }
   if (ld_3312 < ld_40) {
      ld_3592 = 1;
      ld_3880 = 0;
   }
   if (ld_3320 > ld_40) {
      ld_3600 = 0;
      ld_3888 = 1;
   }
   if (ld_3320 < ld_40) {
      ld_3600 = 1;
      ld_3888 = 0;
   }
   if (ld_3328 > ld_40) {
      ld_3608 = 0;
      ld_3896 = 1;
   }
   if (ld_3328 < ld_40) {
      ld_3608 = 1;
      ld_3896 = 0;
   }
   if (ld_3336 > ld_40) {
      ld_3616 = 0;
      ld_3904 = 1;
   }
   if (ld_3336 < ld_40) {
      ld_3616 = 1;
      ld_3904 = 0;
   }
   if (ld_3344 > ld_40) {
      ld_3624 = 0;
      ld_3912 = 1;
   }
   if (ld_3344 < ld_40) {
      ld_3624 = 1;
      ld_3912 = 0;
   }
   if (ld_3352 > ld_40) {
      ld_3632 = 0;
      ld_3920 = 1;
   }
   if (ld_3352 < ld_40) {
      ld_3632 = 1;
      ld_3920 = 0;
   }
   if (ld_3072 > ld_40) {
      ld_3640 = 0;
      ld_3928 = 1;
   }
   if (ld_3072 < ld_40) {
      ld_3640 = 1;
      ld_3928 = 0;
   }
   if (ld_3080 > ld_40) {
      ld_3648 = 0;
      ld_3936 = 1;
   }
   if (ld_3080 < ld_40) {
      ld_3648 = 1;
      ld_3936 = 0;
   }
   if (ld_3088 > ld_40) {
      ld_3656 = 0;
      ld_3944 = 1;
   }
   if (ld_3088 < ld_40) {
      ld_3656 = 1;
      ld_3944 = 0;
   }
   if (ld_3096 > ld_40) {
      ld_3664 = 0;
      ld_3960 = 1;
   }
   if (ld_3096 < ld_40) {
      ld_3664 = 1;
      ld_3960 = 0;
   }
   if (ld_3104 > ld_40) {
      ld_3680 = 0;
      ld_3968 = 1;
   }
   if (ld_3104 < ld_40) {
      ld_3680 = 1;
      ld_3968 = 0;
   }
   if (ld_3112 > ld_40) {
      ld_3688 = 0;
      ld_3976 = 1;
   }
   if (ld_3112 < ld_40) {
      ld_3688 = 1;
      ld_3976 = 0;
   }
   double ld_3984 = ld_3408 + ld_3416 + ld_3424 + ld_3432 + ld_3440 + ld_3448 + ld_3456 + ld_3464 + ld_3472 + ld_3480 + ld_3488 + ld_3496 + ld_3504 + ld_3512 + ld_3520 + ld_3528 + ld_3536 + ld_3544 + ld_3552 + ld_3560 + ld_3568 + ld_3576 + ld_3584 + ld_3592 + ld_3600 + ld_3608 + ld_3616 + ld_3624 + ld_3632 + ld_3640 + ld_3648 + ld_3656 + ld_3664 + ld_3672 + ld_3680 + ld_3688 + ld_2416 + ld_2424 + ld_2432 + ld_2440 + ld_2448 + ld_2456 + ld_2464 + ld_2472 + ld_2480 + ld_2488 + ld_2496 + ld_2504 + ld_2512 + ld_2520 + ld_2528 + ld_2536 + ld_2544 + ld_2552 + ld_2560 + ld_2568 + ld_2576 + ld_2584 + ld_2592 + ld_2600 + ld_2608 + ld_2616 + ld_2624 + ld_2632 + ld_2640 + ld_2648 + ld_2656 + ld_2664 + ld_2672 + ld_2680 + ld_2688 + ld_2696;
   double ld_3992 = ld_3696 + ld_3704 + ld_3712 + ld_3720 + ld_3728 + ld_3736 + ld_3744 + ld_3752 + ld_3760 + ld_3768 + ld_3776 + ld_3784 + ld_3792 + ld_3800 + ld_3808 + ld_3816 + ld_3824 + ld_3832 + ld_3840 + ld_3848 + ld_3856 + ld_3864 + ld_3872 + ld_3880 + ld_3888 + ld_3896 + ld_3904 + ld_3912 + ld_3920 + ld_3928 + ld_3936 + ld_3944 + ld_3952 + ld_3960 + ld_3968 + ld_3976 + ld_2704 + ld_2712 + ld_2720 + ld_2728 + ld_2736 + ld_2744 + ld_2752 + ld_2760 + ld_2768 + ld_2776 + ld_2784 + ld_2792 + ld_2800 + ld_2808 + ld_2816 + ld_2824 + ld_2832 + ld_2840 + ld_2848 + ld_2856 + ld_2864 + ld_2872 + ld_2880 + ld_2888 + ld_2896 + ld_2904 + ld_2912 + ld_2920 + ld_2928 + ld_2936 + ld_2944 + ld_2952 + ld_2960 + ld_2968 + ld_2976 + ld_2984;
   string l_dbl2str_4000 = DoubleToStr(100.0 * (ld_3984 / 72.0), 0);
   string l_dbl2str_4008 = DoubleToStr(100 - StrToDouble(l_dbl2str_4000), 0);
   double ld_4016 = (iHigh(Currency_Symbol, PERIOD_H1, 0) + iLow(Currency_Symbol, PERIOD_H1, 0) + iClose(Currency_Symbol, PERIOD_H1, 0)) / 3.0;
   double ld_4024 = (iHigh(Currency_Symbol, PERIOD_H1, 1) + iLow(Currency_Symbol, PERIOD_H1, 1) + iClose(Currency_Symbol, PERIOD_H1, 1)) / 3.0;
   double ld_4032 = (iHigh(Currency_Symbol, PERIOD_H1, 2) + iLow(Currency_Symbol, PERIOD_H1, 2) + iClose(Currency_Symbol, PERIOD_H1, 2)) / 3.0;
   double ld_4040 = (iHigh(Currency_Symbol, PERIOD_H1, 3) + iLow(Currency_Symbol, PERIOD_H1, 3) + iClose(Currency_Symbol, PERIOD_H1, 3)) / 3.0;
   double ld_4048 = (iHigh(Currency_Symbol, PERIOD_H1, 4) + iLow(Currency_Symbol, PERIOD_H1, 4) + iClose(Currency_Symbol, PERIOD_H1, 4)) / 3.0;
   double ld_4056 = (iHigh(Currency_Symbol, PERIOD_H1, 5) + iLow(Currency_Symbol, PERIOD_H1, 5) + iClose(Currency_Symbol, PERIOD_H1, 5)) / 3.0;
   double ld_4064 = 2.0 * ld_4016 + (iHigh(Currency_Symbol, PERIOD_H1, 0) - 2.0 * iLow(Currency_Symbol, PERIOD_H1, 0));
   double ld_4072 = 2.0 * ld_4024 + (iHigh(Currency_Symbol, PERIOD_H1, 1) - 2.0 * iLow(Currency_Symbol, PERIOD_H1, 1));
   double ld_4080 = 2.0 * ld_4032 + (iHigh(Currency_Symbol, PERIOD_H1, 2) - 2.0 * iLow(Currency_Symbol, PERIOD_H1, 2));
   double ld_4088 = 2.0 * ld_4040 + (iHigh(Currency_Symbol, PERIOD_H1, 3) - 2.0 * iLow(Currency_Symbol, PERIOD_H1, 3));
   double ld_4096 = 2.0 * ld_4048 + (iHigh(Currency_Symbol, PERIOD_H1, 4) - 2.0 * iLow(Currency_Symbol, PERIOD_H1, 4));
   double ld_4104 = 2.0 * ld_4056 + (iHigh(Currency_Symbol, PERIOD_H1, 5) - 2.0 * iLow(Currency_Symbol, PERIOD_H1, 5));
   double ld_4112 = ld_4016 + (iHigh(Currency_Symbol, PERIOD_H1, 0) - iLow(Currency_Symbol, PERIOD_H1, 0));
   double ld_4120 = ld_4024 + (iHigh(Currency_Symbol, PERIOD_H1, 1) - iLow(Currency_Symbol, PERIOD_H1, 1));
   double ld_4128 = ld_4032 + (iHigh(Currency_Symbol, PERIOD_H1, 2) - iLow(Currency_Symbol, PERIOD_H1, 2));
   double ld_4136 = ld_4040 + (iHigh(Currency_Symbol, PERIOD_H1, 3) - iLow(Currency_Symbol, PERIOD_H1, 3));
   double ld_4144 = ld_4048 + (iHigh(Currency_Symbol, PERIOD_H1, 4) - iLow(Currency_Symbol, PERIOD_H1, 4));
   double ld_4152 = ld_4056 + (iHigh(Currency_Symbol, PERIOD_H1, 5) - iLow(Currency_Symbol, PERIOD_H1, 5));
   double ld_4160 = 2.0 * ld_4016 - iLow(Currency_Symbol, PERIOD_H1, 0);
   double ld_4168 = 2.0 * ld_4024 - iLow(Currency_Symbol, PERIOD_H1, 1);
   double ld_4176 = 2.0 * ld_4032 - iLow(Currency_Symbol, PERIOD_H1, 2);
   double ld_4184 = 2.0 * ld_4040 - iLow(Currency_Symbol, PERIOD_H1, 3);
   double ld_4192 = 2.0 * ld_4048 - iLow(Currency_Symbol, PERIOD_H1, 4);
   double ld_4200 = 2.0 * ld_4056 - iLow(Currency_Symbol, PERIOD_H1, 5);
   double ld_4208 = (iHigh(Currency_Symbol, PERIOD_H1, 0) + iLow(Currency_Symbol, PERIOD_H1, 0) + iClose(Currency_Symbol, PERIOD_H1, 0)) / 3.0;
   double ld_4216 = (iHigh(Currency_Symbol, PERIOD_H1, 1) + iLow(Currency_Symbol, PERIOD_H1, 1) + iClose(Currency_Symbol, PERIOD_H1, 1)) / 3.0;
   double ld_4224 = (iHigh(Currency_Symbol, PERIOD_H1, 2) + iLow(Currency_Symbol, PERIOD_H1, 2) + iClose(Currency_Symbol, PERIOD_H1, 2)) / 3.0;
   double ld_4232 = (iHigh(Currency_Symbol, PERIOD_H1, 3) + iLow(Currency_Symbol, PERIOD_H1, 3) + iClose(Currency_Symbol, PERIOD_H1, 3)) / 3.0;
   double ld_4240 = (iHigh(Currency_Symbol, PERIOD_H1, 4) + iLow(Currency_Symbol, PERIOD_H1, 4) + iClose(Currency_Symbol, PERIOD_H1, 4)) / 3.0;
   double ld_4248 = (iHigh(Currency_Symbol, PERIOD_H1, 5) + iLow(Currency_Symbol, PERIOD_H1, 5) + iClose(Currency_Symbol, PERIOD_H1, 5)) / 3.0;
   double ld_4256 = 2.0 * ld_4016 - iHigh(Currency_Symbol, PERIOD_H1, 0);
   double ld_4264 = 2.0 * ld_4024 - iHigh(Currency_Symbol, PERIOD_H1, 1);
   double ld_4272 = 2.0 * ld_4032 - iHigh(Currency_Symbol, PERIOD_H1, 2);
   double ld_4280 = 2.0 * ld_4040 - iHigh(Currency_Symbol, PERIOD_H1, 3);
   double ld_4288 = 2.0 * ld_4048 - iHigh(Currency_Symbol, PERIOD_H1, 4);
   double ld_4296 = 2.0 * ld_4056 - iHigh(Currency_Symbol, PERIOD_H1, 5);
   double ld_4304 = ld_4016 - (iHigh(Currency_Symbol, PERIOD_H1, 0) - iLow(Currency_Symbol, PERIOD_H1, 0));
   double ld_4312 = ld_4024 - (iHigh(Currency_Symbol, PERIOD_H1, 1) - iLow(Currency_Symbol, PERIOD_H1, 1));
   double ld_4320 = ld_4032 - (iHigh(Currency_Symbol, PERIOD_H1, 2) - iLow(Currency_Symbol, PERIOD_H1, 2));
   double ld_4328 = ld_4040 - (iHigh(Currency_Symbol, PERIOD_H1, 3) - iLow(Currency_Symbol, PERIOD_H1, 3));
   double ld_4336 = ld_4048 - (iHigh(Currency_Symbol, PERIOD_H1, 4) - iLow(Currency_Symbol, PERIOD_H1, 4));
   double ld_4344 = ld_4056 - (iHigh(Currency_Symbol, PERIOD_H1, 5) - iLow(Currency_Symbol, PERIOD_H1, 5));
   double ld_4352 = 2.0 * ld_4016 - (2.0 * iHigh(Currency_Symbol, PERIOD_H1, 0) - iLow(Currency_Symbol, PERIOD_H1, 0));
   double ld_4360 = 2.0 * ld_4024 - (2.0 * iHigh(Currency_Symbol, PERIOD_H1, 1) - iLow(Currency_Symbol, PERIOD_H1, 1));
   double ld_4368 = 2.0 * ld_4032 - (2.0 * iHigh(Currency_Symbol, PERIOD_H1, 2) - iLow(Currency_Symbol, PERIOD_H1, 2));
   double ld_4376 = 2.0 * ld_4040 - (2.0 * iHigh(Currency_Symbol, PERIOD_H1, 3) - iLow(Currency_Symbol, PERIOD_H1, 3));
   double ld_4384 = 2.0 * ld_4048 - (2.0 * iHigh(Currency_Symbol, PERIOD_H1, 4) - iLow(Currency_Symbol, PERIOD_H1, 4));
   double ld_4392 = 2.0 * ld_4056 - (2.0 * iHigh(Currency_Symbol, PERIOD_H1, 5) - iLow(Currency_Symbol, PERIOD_H1, 5));
   if (ld_4016 > ld_40) {
      ld_4400 = 0;
      ld_4688 = 1;
   }
   if (ld_4016 < ld_40) {
      ld_4400 = 1;
      ld_4688 = 0;
   }
   if (ld_4024 > ld_40) {
      ld_4408 = 0;
      ld_4696 = 1;
   }
   if (ld_4024 < ld_40) {
      ld_4408 = 1;
      ld_4696 = 0;
   }
   if (ld_4032 > ld_40) {
      ld_4416 = 0;
      ld_4704 = 1;
   }
   if (ld_4032 < ld_40) {
      ld_4416 = 1;
      ld_4704 = 0;
   }
   if (ld_4040 > ld_40) {
      ld_4424 = 0;
      ld_4712 = 1;
   }
   if (ld_4040 < ld_40) {
      ld_4424 = 1;
      ld_4712 = 0;
   }
   if (ld_4048 > ld_40) {
      ld_4432 = 0;
      ld_4720 = 1;
   }
   if (ld_4048 < ld_40) {
      ld_4432 = 1;
      ld_4720 = 0;
   }
   if (ld_4160 > ld_40) {
      ld_4440 = 0;
      ld_4728 = 1;
   }
   if (ld_4160 < ld_40) {
      ld_4440 = 1;
      ld_4728 = 0;
   }
   if (ld_4168 > ld_40) {
      ld_4448 = 0;
      ld_4736 = 1;
   }
   if (ld_4168 < ld_40) {
      ld_4448 = 1;
      ld_4736 = 0;
   }
   if (ld_4176 > ld_40) {
      ld_4456 = 0;
      ld_4744 = 1;
   }
   if (ld_4176 < ld_40) {
      ld_4456 = 1;
      ld_4744 = 0;
   }
   if (ld_4184 > ld_40) {
      ld_4464 = 0;
      ld_4752 = 1;
   }
   if (ld_4184 < ld_40) {
      ld_4464 = 1;
      ld_4752 = 0;
   }
   if (ld_4192 > ld_40) {
      ld_4472 = 0;
      ld_4760 = 1;
   }
   if (ld_4192 < ld_40) {
      ld_4472 = 1;
      ld_4760 = 0;
   }
   if (ld_4200 > ld_40) {
      ld_4480 = 0;
      ld_4768 = 1;
   }
   if (ld_4200 < ld_40) {
      ld_4480 = 1;
      ld_4768 = 0;
   }
   if (ld_4256 > ld_40) {
      ld_4488 = 0;
      ld_4776 = 1;
   }
   if (ld_4256 < ld_40) {
      ld_4488 = 1;
      ld_4776 = 0;
   }
   if (ld_4264 > ld_40) {
      ld_4496 = 0;
      ld_4784 = 1;
   }
   if (ld_4264 < ld_40) {
      ld_4496 = 1;
      ld_4784 = 0;
   }
   if (ld_4272 > ld_40) {
      ld_4504 = 0;
      ld_4792 = 1;
   }
   if (ld_4272 < ld_40) {
      ld_4504 = 1;
      ld_4792 = 0;
   }
   if (ld_4280 > ld_40) {
      ld_4512 = 0;
      ld_4800 = 1;
   }
   if (ld_4280 < ld_40) {
      ld_4512 = 1;
      ld_4800 = 0;
   }
   if (ld_4288 > ld_40) {
      ld_4520 = 0;
      ld_4808 = 1;
   }
   if (ld_4288 < ld_40) {
      ld_4520 = 1;
      ld_4808 = 0;
   }
   if (ld_4296 > ld_40) {
      ld_4528 = 0;
      ld_4816 = 1;
   }
   if (ld_4296 < ld_40) {
      ld_4528 = 1;
      ld_4816 = 0;
   }
   if (ld_4112 > ld_40) {
      ld_4536 = 0;
      ld_4824 = 1;
   }
   if (ld_4112 < ld_40) {
      ld_4536 = 1;
      ld_4824 = 0;
   }
   if (ld_4120 > ld_40) {
      ld_4544 = 0;
      ld_4832 = 1;
   }
   if (ld_4120 < ld_40) {
      ld_4544 = 1;
      ld_4832 = 0;
   }
   if (ld_4128 > ld_40) {
      ld_4552 = 0;
      ld_4840 = 1;
   }
   if (ld_4128 < ld_40) {
      ld_4552 = 1;
      ld_4840 = 0;
   }
   if (ld_4136 > ld_40) {
      ld_4560 = 0;
      ld_4848 = 1;
   }
   if (ld_4136 < ld_40) {
      ld_4560 = 1;
      ld_4848 = 0;
   }
   if (ld_4144 > ld_40) {
      ld_4568 = 0;
      ld_4856 = 1;
   }
   if (ld_4144 < ld_40) {
      ld_4568 = 1;
      ld_4856 = 0;
   }
   if (ld_4152 > ld_40) {
      ld_4576 = 0;
      ld_4864 = 1;
   }
   if (ld_4152 < ld_40) {
      ld_4576 = 1;
      ld_4864 = 0;
   }
   if (ld_4304 > ld_40) {
      ld_4584 = 0;
      ld_4872 = 1;
   }
   if (ld_4304 < ld_40) {
      ld_4584 = 1;
      ld_4872 = 0;
   }
   if (ld_4312 > ld_40) {
      ld_4592 = 0;
      ld_4880 = 1;
   }
   if (ld_4312 < ld_40) {
      ld_4592 = 1;
      ld_4880 = 0;
   }
   if (ld_4320 > ld_40) {
      ld_4600 = 0;
      ld_4888 = 1;
   }
   if (ld_4320 < ld_40) {
      ld_4600 = 1;
      ld_4888 = 0;
   }
   if (ld_4328 > ld_40) {
      ld_4608 = 0;
      ld_4896 = 1;
   }
   if (ld_4328 < ld_40) {
      ld_4608 = 1;
      ld_4896 = 0;
   }
   if (ld_4336 > ld_40) {
      ld_4616 = 0;
      ld_4904 = 1;
   }
   if (ld_4336 < ld_40) {
      ld_4616 = 1;
      ld_4904 = 0;
   }
   if (ld_4344 > ld_40) {
      ld_4624 = 0;
      ld_4912 = 1;
   }
   if (ld_4344 < ld_40) {
      ld_4624 = 1;
      ld_4912 = 0;
   }
   if (ld_4064 > ld_40) {
      ld_4632 = 0;
      ld_4920 = 1;
   }
   if (ld_4064 < ld_40) {
      ld_4632 = 1;
      ld_4920 = 0;
   }
   if (ld_4072 > ld_40) {
      ld_4640 = 0;
      ld_4928 = 1;
   }
   if (ld_4072 < ld_40) {
      ld_4640 = 1;
      ld_4928 = 0;
   }
   if (ld_4080 > ld_40) {
      ld_4648 = 0;
      ld_4936 = 1;
   }
   if (ld_4080 < ld_40) {
      ld_4648 = 1;
      ld_4936 = 0;
   }
   if (ld_4088 > ld_40) {
      ld_4656 = 0;
      ld_4952 = 1;
   }
   if (ld_4088 < ld_40) {
      ld_4656 = 1;
      ld_4952 = 0;
   }
   if (ld_4096 > ld_40) {
      ld_4672 = 0;
      ld_4960 = 1;
   }
   if (ld_4096 < ld_40) {
      ld_4672 = 1;
      ld_4960 = 0;
   }
   if (ld_4104 > ld_40) {
      ld_4680 = 0;
      ld_4968 = 1;
   }
   if (ld_4104 < ld_40) {
      ld_4680 = 1;
      ld_4968 = 0;
   }
   double ld_4976 = ld_4400 + ld_4408 + ld_4416 + ld_4424 + ld_4432 + ld_4440 + ld_4448 + ld_4456 + ld_4464 + ld_4472 + ld_4480 + ld_4488 + ld_4496 + ld_4504 + ld_4512 + ld_4520 + ld_4528 + ld_4536 + ld_4544 + ld_4552 + ld_4560 + ld_4568 + ld_4576 + ld_4584 + ld_4592 + ld_4600 + ld_4608 + ld_4616 + ld_4624 + ld_4632 + ld_4640 + ld_4648 + ld_4656 + ld_4664 + ld_4672 + ld_4680;
   double ld_4984 = ld_4688 + ld_4696 + ld_4704 + ld_4712 + ld_4720 + ld_4728 + ld_4736 + ld_4744 + ld_4752 + ld_4760 + ld_4768 + ld_4776 + ld_4784 + ld_4792 + ld_4800 + ld_4808 + ld_4816 + ld_4824 + ld_4832 + ld_4840 + ld_4848 + ld_4856 + ld_4864 + ld_4872 + ld_4880 + ld_4888 + ld_4896 + ld_4904 + ld_4912 + ld_4920 + ld_4928 + ld_4936 + ld_4944 + ld_4952 + ld_4960 + ld_4968;
   string l_dbl2str_4992 = DoubleToStr(100.0 * (ld_4976 / 36.0), 0);
   string ls_unused_5000 = DoubleToStr(100 - StrToDouble(l_dbl2str_4992), 0);
   double ld_5008 = (iHigh(Currency_Symbol, PERIOD_H4, 0) + iLow(Currency_Symbol, PERIOD_H4, 0) + iClose(Currency_Symbol, PERIOD_H4, 0)) / 3.0;
   double ld_5016 = (iHigh(Currency_Symbol, PERIOD_H4, 1) + iLow(Currency_Symbol, PERIOD_H4, 1) + iClose(Currency_Symbol, PERIOD_H4, 1)) / 3.0;
   double ld_5024 = (iHigh(Currency_Symbol, PERIOD_H4, 2) + iLow(Currency_Symbol, PERIOD_H4, 2) + iClose(Currency_Symbol, PERIOD_H4, 2)) / 3.0;
   double ld_5032 = (iHigh(Currency_Symbol, PERIOD_H4, 3) + iLow(Currency_Symbol, PERIOD_H4, 3) + iClose(Currency_Symbol, PERIOD_H4, 3)) / 3.0;
   double ld_5040 = (iHigh(Currency_Symbol, PERIOD_H4, 4) + iLow(Currency_Symbol, PERIOD_H4, 4) + iClose(Currency_Symbol, PERIOD_H4, 4)) / 3.0;
   double ld_5048 = (iHigh(Currency_Symbol, PERIOD_H4, 5) + iLow(Currency_Symbol, PERIOD_H4, 5) + iClose(Currency_Symbol, PERIOD_H4, 5)) / 3.0;
   double ld_5056 = 2.0 * ld_5008 + (iHigh(Currency_Symbol, PERIOD_H4, 0) - 2.0 * iLow(Currency_Symbol, PERIOD_H4, 0));
   double ld_5064 = 2.0 * ld_5016 + (iHigh(Currency_Symbol, PERIOD_H4, 1) - 2.0 * iLow(Currency_Symbol, PERIOD_H4, 1));
   double ld_5072 = 2.0 * ld_5024 + (iHigh(Currency_Symbol, PERIOD_H4, 2) - 2.0 * iLow(Currency_Symbol, PERIOD_H4, 2));
   double ld_5080 = 2.0 * ld_5032 + (iHigh(Currency_Symbol, PERIOD_H4, 3) - 2.0 * iLow(Currency_Symbol, PERIOD_H4, 3));
   double ld_5088 = 2.0 * ld_5040 + (iHigh(Currency_Symbol, PERIOD_H4, 4) - 2.0 * iLow(Currency_Symbol, PERIOD_H4, 4));
   double ld_5096 = 2.0 * ld_5048 + (iHigh(Currency_Symbol, PERIOD_H4, 5) - 2.0 * iLow(Currency_Symbol, PERIOD_H4, 5));
   double ld_5104 = ld_5008 + (iHigh(Currency_Symbol, PERIOD_H4, 0) - iLow(Currency_Symbol, PERIOD_H4, 0));
   double ld_5112 = ld_5016 + (iHigh(Currency_Symbol, PERIOD_H4, 1) - iLow(Currency_Symbol, PERIOD_H4, 1));
   double ld_5120 = ld_5024 + (iHigh(Currency_Symbol, PERIOD_H4, 2) - iLow(Currency_Symbol, PERIOD_H4, 2));
   double ld_5128 = ld_5032 + (iHigh(Currency_Symbol, PERIOD_H4, 3) - iLow(Currency_Symbol, PERIOD_H4, 3));
   double ld_5136 = ld_5040 + (iHigh(Currency_Symbol, PERIOD_H4, 4) - iLow(Currency_Symbol, PERIOD_H4, 4));
   double ld_5144 = ld_5048 + (iHigh(Currency_Symbol, PERIOD_H4, 5) - iLow(Currency_Symbol, PERIOD_H4, 5));
   double ld_5152 = 2.0 * ld_5008 - iLow(Currency_Symbol, PERIOD_H4, 0);
   double ld_5160 = 2.0 * ld_5016 - iLow(Currency_Symbol, PERIOD_H4, 1);
   double ld_5168 = 2.0 * ld_5024 - iLow(Currency_Symbol, PERIOD_H4, 2);
   double ld_5176 = 2.0 * ld_5032 - iLow(Currency_Symbol, PERIOD_H4, 3);
   double ld_5184 = 2.0 * ld_5040 - iLow(Currency_Symbol, PERIOD_H4, 4);
   double ld_5192 = 2.0 * ld_5048 - iLow(Currency_Symbol, PERIOD_H4, 5);
   double ld_5200 = (iHigh(Currency_Symbol, PERIOD_H4, 0) + iLow(Currency_Symbol, PERIOD_H4, 0) + iClose(Currency_Symbol, PERIOD_H4, 0)) / 3.0;
   double ld_5208 = (iHigh(Currency_Symbol, PERIOD_H4, 1) + iLow(Currency_Symbol, PERIOD_H4, 1) + iClose(Currency_Symbol, PERIOD_H4, 1)) / 3.0;
   double ld_5216 = (iHigh(Currency_Symbol, PERIOD_H4, 2) + iLow(Currency_Symbol, PERIOD_H4, 2) + iClose(Currency_Symbol, PERIOD_H4, 2)) / 3.0;
   double ld_5224 = (iHigh(Currency_Symbol, PERIOD_H4, 3) + iLow(Currency_Symbol, PERIOD_H4, 3) + iClose(Currency_Symbol, PERIOD_H4, 3)) / 3.0;
   double ld_5232 = (iHigh(Currency_Symbol, PERIOD_H4, 4) + iLow(Currency_Symbol, PERIOD_H4, 4) + iClose(Currency_Symbol, PERIOD_H4, 4)) / 3.0;
   double ld_5240 = (iHigh(Currency_Symbol, PERIOD_H4, 5) + iLow(Currency_Symbol, PERIOD_H4, 5) + iClose(Currency_Symbol, PERIOD_H4, 5)) / 3.0;
   double ld_5248 = 2.0 * ld_5008 - iHigh(Currency_Symbol, PERIOD_H4, 0);
   double ld_5256 = 2.0 * ld_5016 - iHigh(Currency_Symbol, PERIOD_H4, 1);
   double ld_5264 = 2.0 * ld_5024 - iHigh(Currency_Symbol, PERIOD_H4, 2);
   double ld_5272 = 2.0 * ld_5032 - iHigh(Currency_Symbol, PERIOD_H4, 3);
   double ld_5280 = 2.0 * ld_5040 - iHigh(Currency_Symbol, PERIOD_H4, 4);
   double ld_5288 = 2.0 * ld_5048 - iHigh(Currency_Symbol, PERIOD_H4, 5);
   double ld_5296 = ld_5008 - (iHigh(Currency_Symbol, PERIOD_H4, 0) - iLow(Currency_Symbol, PERIOD_H4, 0));
   double ld_5304 = ld_5016 - (iHigh(Currency_Symbol, PERIOD_H4, 1) - iLow(Currency_Symbol, PERIOD_H4, 1));
   double ld_5312 = ld_5024 - (iHigh(Currency_Symbol, PERIOD_H4, 2) - iLow(Currency_Symbol, PERIOD_H4, 2));
   double ld_5320 = ld_5032 - (iHigh(Currency_Symbol, PERIOD_H4, 3) - iLow(Currency_Symbol, PERIOD_H4, 3));
   double ld_5328 = ld_5040 - (iHigh(Currency_Symbol, PERIOD_H4, 4) - iLow(Currency_Symbol, PERIOD_H4, 4));
   double ld_5336 = ld_5048 - (iHigh(Currency_Symbol, PERIOD_H4, 5) - iLow(Currency_Symbol, PERIOD_H4, 5));
   double ld_5344 = 2.0 * ld_5008 - (2.0 * iHigh(Currency_Symbol, PERIOD_H4, 0) - iLow(Currency_Symbol, PERIOD_H4, 0));
   double ld_5352 = 2.0 * ld_5016 - (2.0 * iHigh(Currency_Symbol, PERIOD_H4, 1) - iLow(Currency_Symbol, PERIOD_H4, 1));
   double ld_5360 = 2.0 * ld_5024 - (2.0 * iHigh(Currency_Symbol, PERIOD_H4, 2) - iLow(Currency_Symbol, PERIOD_H4, 2));
   double ld_5368 = 2.0 * ld_5032 - (2.0 * iHigh(Currency_Symbol, PERIOD_H4, 3) - iLow(Currency_Symbol, PERIOD_H4, 3));
   double ld_5376 = 2.0 * ld_5040 - (2.0 * iHigh(Currency_Symbol, PERIOD_H4, 4) - iLow(Currency_Symbol, PERIOD_H4, 4));
   double ld_5384 = 2.0 * ld_5048 - (2.0 * iHigh(Currency_Symbol, PERIOD_H4, 5) - iLow(Currency_Symbol, PERIOD_H4, 5));
   if (ld_5008 > ld_40) {
      ld_5392 = 0;
      ld_5680 = 1;
   }
   if (ld_5008 < ld_40) {
      ld_5392 = 1;
      ld_5680 = 0;
   }
   if (ld_5016 > ld_40) {
      ld_5400 = 0;
      ld_5688 = 1;
   }
   if (ld_5016 < ld_40) {
      ld_5400 = 1;
      ld_5688 = 0;
   }
   if (ld_5024 > ld_40) {
      ld_5408 = 0;
      ld_5696 = 1;
   }
   if (ld_5024 < ld_40) {
      ld_5408 = 1;
      ld_5696 = 0;
   }
   if (ld_5032 > ld_40) {
      ld_5416 = 0;
      ld_5704 = 1;
   }
   if (ld_5032 < ld_40) {
      ld_5416 = 1;
      ld_5704 = 0;
   }
   if (ld_5040 > ld_40) {
      ld_5424 = 0;
      ld_5712 = 1;
   }
   if (ld_5040 < ld_40) {
      ld_5424 = 1;
      ld_5712 = 0;
   }
   if (ld_5152 > ld_40) {
      ld_5432 = 0;
      ld_5720 = 1;
   }
   if (ld_5152 < ld_40) {
      ld_5432 = 1;
      ld_5720 = 0;
   }
   if (ld_5160 > ld_40) {
      ld_5440 = 0;
      ld_5728 = 1;
   }
   if (ld_5160 < ld_40) {
      ld_5440 = 1;
      ld_5728 = 0;
   }
   if (ld_5168 > ld_40) {
      ld_5448 = 0;
      ld_5736 = 1;
   }
   if (ld_5168 < ld_40) {
      ld_5448 = 1;
      ld_5736 = 0;
   }
   if (ld_5176 > ld_40) {
      ld_5456 = 0;
      ld_5744 = 1;
   }
   if (ld_5176 < ld_40) {
      ld_5456 = 1;
      ld_5744 = 0;
   }
   if (ld_5184 > ld_40) {
      ld_5464 = 0;
      ld_5752 = 1;
   }
   if (ld_5184 < ld_40) {
      ld_5464 = 1;
      ld_5752 = 0;
   }
   if (ld_5192 > ld_40) {
      ld_5472 = 0;
      ld_5760 = 1;
   }
   if (ld_5192 < ld_40) {
      ld_5472 = 1;
      ld_5760 = 0;
   }
   if (ld_5248 > ld_40) {
      ld_5480 = 0;
      ld_5768 = 1;
   }
   if (ld_5248 < ld_40) {
      ld_5480 = 1;
      ld_5768 = 0;
   }
   if (ld_5256 > ld_40) {
      ld_5488 = 0;
      ld_5776 = 1;
   }
   if (ld_5256 < ld_40) {
      ld_5488 = 1;
      ld_5776 = 0;
   }
   if (ld_5264 > ld_40) {
      ld_5496 = 0;
      ld_5784 = 1;
   }
   if (ld_5264 < ld_40) {
      ld_5496 = 1;
      ld_5784 = 0;
   }
   if (ld_5272 > ld_40) {
      ld_5504 = 0;
      ld_5792 = 1;
   }
   if (ld_5272 < ld_40) {
      ld_5504 = 1;
      ld_5792 = 0;
   }
   if (ld_5280 > ld_40) {
      ld_5512 = 0;
      ld_5800 = 1;
   }
   if (ld_5280 < ld_40) {
      ld_5512 = 1;
      ld_5800 = 0;
   }
   if (ld_5288 > ld_40) {
      ld_5520 = 0;
      ld_5808 = 1;
   }
   if (ld_5288 < ld_40) {
      ld_5520 = 1;
      ld_5808 = 0;
   }
   if (ld_5104 > ld_40) {
      ld_5528 = 0;
      ld_5816 = 1;
   }
   if (ld_5104 < ld_40) {
      ld_5528 = 1;
      ld_5816 = 0;
   }
   if (ld_5112 > ld_40) {
      ld_5536 = 0;
      ld_5824 = 1;
   }
   if (ld_5112 < ld_40) {
      ld_5536 = 1;
      ld_5824 = 0;
   }
   if (ld_5120 > ld_40) {
      ld_5544 = 0;
      ld_5832 = 1;
   }
   if (ld_5120 < ld_40) {
      ld_5544 = 1;
      ld_5832 = 0;
   }
   if (ld_5128 > ld_40) {
      ld_5552 = 0;
      ld_5840 = 1;
   }
   if (ld_5128 < ld_40) {
      ld_5552 = 1;
      ld_5840 = 0;
   }
   if (ld_5136 > ld_40) {
      ld_5560 = 0;
      ld_5848 = 1;
   }
   if (ld_5136 < ld_40) {
      ld_5560 = 1;
      ld_5848 = 0;
   }
   if (ld_5144 > ld_40) {
      ld_5568 = 0;
      ld_5856 = 1;
   }
   if (ld_5144 < ld_40) {
      ld_5568 = 1;
      ld_5856 = 0;
   }
   if (ld_5296 > ld_40) {
      ld_5576 = 0;
      ld_5864 = 1;
   }
   if (ld_5296 < ld_40) {
      ld_5576 = 1;
      ld_5864 = 0;
   }
   if (ld_5304 > ld_40) {
      ld_5584 = 0;
      ld_5872 = 1;
   }
   if (ld_5304 < ld_40) {
      ld_5584 = 1;
      ld_5872 = 0;
   }
   if (ld_5312 > ld_40) {
      ld_5592 = 0;
      ld_5880 = 1;
   }
   if (ld_5312 < ld_40) {
      ld_5592 = 1;
      ld_5880 = 0;
   }
   if (ld_5320 > ld_40) {
      ld_5600 = 0;
      ld_5888 = 1;
   }
   if (ld_5320 < ld_40) {
      ld_5600 = 1;
      ld_5888 = 0;
   }
   if (ld_5328 > ld_40) {
      ld_5608 = 0;
      ld_5896 = 1;
   }
   if (ld_5328 < ld_40) {
      ld_5608 = 1;
      ld_5896 = 0;
   }
   if (ld_5336 > ld_40) {
      ld_5616 = 0;
      ld_5904 = 1;
   }
   if (ld_5336 < ld_40) {
      ld_5616 = 1;
      ld_5904 = 0;
   }
   if (ld_5056 > ld_40) {
      ld_5624 = 0;
      ld_5912 = 1;
   }
   if (ld_5056 < ld_40) {
      ld_5624 = 1;
      ld_5912 = 0;
   }
   if (ld_5064 > ld_40) {
      ld_5632 = 0;
      ld_5920 = 1;
   }
   if (ld_5064 < ld_40) {
      ld_5632 = 1;
      ld_5920 = 0;
   }
   if (ld_5072 > ld_40) {
      ld_5640 = 0;
      ld_5928 = 1;
   }
   if (ld_5072 < ld_40) {
      ld_5640 = 1;
      ld_5928 = 0;
   }
   if (ld_5080 > ld_40) {
      ld_5648 = 0;
      ld_5944 = 1;
   }
   if (ld_5080 < ld_40) {
      ld_5648 = 1;
      ld_5944 = 0;
   }
   if (ld_5088 > ld_40) {
      ld_5664 = 0;
      ld_5952 = 1;
   }
   if (ld_5088 < ld_40) {
      ld_5664 = 1;
      ld_5952 = 0;
   }
   if (ld_5096 > ld_40) {
      ld_5672 = 0;
      ld_5960 = 1;
   }
   if (ld_5096 < ld_40) {
      ld_5672 = 1;
      ld_5960 = 0;
   }
   double ld_5968 = ld_5392 + ld_5400 + ld_5408 + ld_5416 + ld_5424 + ld_5432 + ld_5440 + ld_5448 + ld_5456 + ld_5464 + ld_5472 + ld_5480 + ld_5488 + ld_5496 + ld_5504 + ld_5512 + ld_5520 + ld_5528 + ld_5536 + ld_5544 + ld_5552 + ld_5560 + ld_5568 + ld_5576 + ld_5584 + ld_5592 + ld_5600 + ld_5608 + ld_5616 + ld_5624 + ld_5632 + ld_5640 + ld_5648 + ld_5656 + ld_5664 + ld_5672 + ld_4400 + ld_4408 + ld_4416 + ld_4424 + ld_4432 + ld_4440 + ld_4448 + ld_4456 + ld_4464 + ld_4472 + ld_4480 + ld_4488 + ld_4496 + ld_4504 + ld_4512 + ld_4520 + ld_4528 + ld_4536 + ld_4544 + ld_4552 + ld_4560 + ld_4568 + ld_4576 + ld_4584 + ld_4592 + ld_4600 + ld_4608 + ld_4616 + ld_4624 + ld_4632 + ld_4640 + ld_4648 + ld_4656 + ld_4664 + ld_4672 + ld_4680;
   double ld_5976 = ld_5680 + ld_5688 + ld_5696 + ld_5704 + ld_5712 + ld_5720 + ld_5728 + ld_5736 + ld_5744 + ld_5752 + ld_5760 + ld_5768 + ld_5776 + ld_5784 + ld_5792 + ld_5800 + ld_5808 + ld_5816 + ld_5824 + ld_5832 + ld_5840 + ld_5848 + ld_5856 + ld_5864 + ld_5872 + ld_5880 + ld_5888 + ld_5896 + ld_5904 + ld_5912 + ld_5920 + ld_5928 + ld_5936 + ld_5944 + ld_5952 + ld_5960 + ld_4688 + ld_4696 + ld_4704 + ld_4712 + ld_4720 + ld_4728 + ld_4736 + ld_4744 + ld_4752 + ld_4760 + ld_4768 + ld_4776 + ld_4784 + ld_4792 + ld_4800 + ld_4808 + ld_4816 + ld_4824 + ld_4832 + ld_4840 + ld_4848 + ld_4856 + ld_4864 + ld_4872 + ld_4880 + ld_4888 + ld_4896 + ld_4904 + ld_4912 + ld_4920 + ld_4928 + ld_4936 + ld_4944 + ld_4952 + ld_4960 + ld_4968;
   string l_dbl2str_5984 = DoubleToStr(100.0 * (ld_5968 / 72.0), 0);
   string l_dbl2str_5992 = DoubleToStr(100 - StrToDouble(l_dbl2str_5984), 0);
   double ld_6000 = ld_1424 + ld_1432 + ld_1440 + ld_1448 + ld_1456 + ld_1464 + ld_1472 + ld_1480 + ld_1488 + ld_1496 + ld_1504 + ld_1512 + ld_1520 + ld_1528 + ld_1536 + ld_1544 + ld_1552 + ld_1560 + ld_1568 + ld_1576 + ld_1584 + ld_1592 + ld_1600 + ld_1608 + ld_1616 + ld_1624 + ld_1632 + ld_1640 + ld_1648 + ld_1656 + ld_1664 + ld_1672 + ld_1680 + ld_1688 + ld_1696 + ld_1704 + ld_432 + ld_440 + ld_448 + ld_456 + ld_432 + ld_472 + ld_480 + ld_488 + ld_496 + ld_504 + ld_512 + ld_520 + ld_528 + ld_536 + ld_544 + ld_552 + ld_560 + ld_568 + ld_576 + ld_584 + ld_592 + ld_600 + ld_608 + ld_616 + ld_624 + ld_632 + ld_640 + ld_648 + ld_656 + ld_664 + ld_672 + ld_680 + ld_688 + ld_696 + ld_704 + ld_712 + ld_3408 + ld_3416 + ld_3424 + ld_3432 + ld_3440 + ld_3448 + ld_3456 + ld_3464 + ld_3472 + ld_3480 + ld_3488 + ld_3496 + ld_3504 + ld_3512 + ld_3520 + ld_3528 + ld_3536 + ld_3544 + ld_3552 + ld_3560 + ld_3568 + ld_3576 + ld_3584 + ld_3592 + ld_3600 + ld_3608 + ld_3616 + ld_3624 + ld_3632 + ld_3640 + ld_3648 + ld_3656 + ld_3664 + ld_3672 + ld_3680 + ld_3688 + ld_2416 + ld_2424 + ld_2432 + ld_2440 + ld_2448 + ld_2456 + ld_2464 + ld_2472 + ld_2480 + ld_2488 + ld_2496 + ld_2504 + ld_2512 + ld_2520 + ld_2528 + ld_2536 + ld_2544 + ld_2552 + ld_2560 + ld_2568 + ld_2576 + ld_2584 + ld_2592 + ld_2600 + ld_2608 + ld_2616 + ld_2624 + ld_2632 + ld_2640 + ld_2648 + ld_2656 + ld_2664 + ld_2672 + ld_2680 + ld_2688 + ld_2696 + ld_5392 + ld_5400 + ld_5408 + ld_5416 + ld_5424 + ld_5432 + ld_5440 + ld_5448 + ld_5456 + ld_5464 + ld_5472 + ld_5480 + ld_5488 + ld_5496 + ld_5504 + ld_5512 + ld_5520 + ld_5528 + ld_5536 + ld_5544 + ld_5552 + ld_5560 + ld_5568 + ld_5576 + ld_5584 + ld_5592 + ld_5600 + ld_5608 + ld_5616 + ld_5624 + ld_5632 + ld_5640 + ld_5648 + ld_5656 + ld_5664 + ld_5672 + ld_4400 + ld_4408 + ld_4416 + ld_4424 + ld_4432 + ld_4440 + ld_4448 + ld_4456 + ld_4464 + ld_4472 + ld_4480 + ld_4488 + ld_4496 + ld_4504 + ld_4512 + ld_4520 + ld_4528 + ld_4536 + ld_4544 + ld_4552 + ld_4560 + ld_4568 + ld_4576 + ld_4584 + ld_4592 + ld_4600 + ld_4608 + ld_4616 + ld_4624 + ld_4632 + ld_4640 + ld_4648 + ld_4656 + ld_4664 + ld_4672 + ld_4680;
   double ld_6008 = ld_1712 + ld_1720 + ld_1728 + ld_1736 + ld_1744 + ld_1752 + ld_1760 + ld_1768 + ld_1776 + ld_1784 + ld_1792 + ld_1800 + ld_1808 + ld_1816 + ld_1824 + ld_1832 + ld_1840 + ld_1848 + ld_1856 + ld_1864 + ld_1872 + ld_1880 + ld_1888 + ld_1896 + ld_1904 + ld_1912 + ld_1920 + ld_1928 + ld_1936 + ld_1944 + ld_1952 + ld_1960 + ld_1968 + ld_1976 + ld_1984 + ld_1992 + ld_720 + ld_728 + ld_736 + ld_744 + ld_720 + ld_760 + ld_768 + ld_776 + ld_784 + ld_792 + ld_800 + ld_808 + ld_816 + ld_824 + ld_832 + ld_840 + ld_848 + ld_856 + ld_864 + ld_872 + ld_880 + ld_888 + ld_896 + ld_904 + ld_912 + ld_920 + ld_928 + ld_936 + ld_944 + ld_952 + ld_960 + ld_968 + ld_976 + ld_984 + ld_992 + ld_1000 + ld_3696 + ld_3704 + ld_3712 + ld_3720 + ld_3728 + ld_3736 + ld_3744 + ld_3752 + ld_3760 + ld_3768 + ld_3776 + ld_3784 + ld_3792 + ld_3800 + ld_3808 + ld_3816 + ld_3824 + ld_3832 + ld_3840 + ld_3848 + ld_3856 + ld_3864 + ld_3872 + ld_3880 + ld_3888 + ld_3896 + ld_3904 + ld_3912 + ld_3920 + ld_3928 + ld_3936 + ld_3944 + ld_3952 + ld_3960 + ld_3968 + ld_3976 + ld_2704 + ld_2712 + ld_2720 + ld_2728 + ld_2736 + ld_2744 + ld_2752 + ld_2760 + ld_2768 + ld_2776 + ld_2784 + ld_2792 + ld_2800 + ld_2808 + ld_2816 + ld_2824 + ld_2832 + ld_2840 + ld_2848 + ld_2856 + ld_2864 + ld_2872 + ld_2880 + ld_2888 + ld_2896 + ld_2904 + ld_2912 + ld_2920 + ld_2928 + ld_2936 + ld_2944 + ld_2952 + ld_2960 + ld_2968 + ld_2976 + ld_2984 + ld_5680 + ld_5688 + ld_5696 + ld_5704 + ld_5712 + ld_5720 + ld_5728 + ld_5736 + ld_5744 + ld_5752 + ld_5760 + ld_5768 + ld_5776 + ld_5784 + ld_5792 + ld_5800 + ld_5808 + ld_5816 + ld_5824 + ld_5832 + ld_5840 + ld_5848 + ld_5856 + ld_5864 + ld_5872 + ld_5880 + ld_5888 + ld_5896 + ld_5904 + ld_5912 + ld_5920 + ld_5928 + ld_5936 + ld_5944 + ld_5952 + ld_5960 + ld_4688 + ld_4696 + ld_4704 + ld_4712 + ld_4720 + ld_4728 + ld_4736 + ld_4744 + ld_4752 + ld_4760 + ld_4768 + ld_4776 + ld_4784 + ld_4792 + ld_4800 + ld_4808 + ld_4816 + ld_4824 + ld_4832 + ld_4840 + ld_4848 + ld_4856 + ld_4864 + ld_4872 + ld_4880 + ld_4888 + ld_4896 + ld_4904 + ld_4912 + ld_4920 + ld_4928 + ld_4936 + ld_4944 + ld_4952 + ld_4960 + ld_4968;
   string l_dbl2str_6016 = DoubleToStr(100.0 * (ld_6000 / 216.0), 0);
   string l_dbl2str_6024 = DoubleToStr(100 - StrToDouble(l_dbl2str_6016), 0);
   string l_text_6032 = "";
   string l_text_6040 = "";
   string l_text_6048 = "";
   string l_text_6056 = "";
   string l_text_6064 = "";
   string l_text_6072 = "";
   string l_text_6080 = "";
   string l_text_6088 = "";
   string l_text_6096 = "";
   string l_text_6104 = "";
   string l_text_6112 = "";
   string l_text_6120 = "";
   string l_text_6128 = "";
   string l_text_6136 = "";
   string l_text_6144 = "";
   string l_text_6152 = "";
   string l_text_6160 = "";
   string l_text_6168 = "";
   if (StrToDouble(l_dbl2str_6016) >= 90.0) {
      l_text_6032 = "-";
      l_color_6176 = UPcolor_1;
   }
   if (StrToDouble(l_dbl2str_6016) >= 80.0) {
      l_text_6040 = "-";
      l_color_6180 = UPcolor_2;
   }
   if (StrToDouble(l_dbl2str_6016) >= 70.0) {
      l_text_6048 = "-";
      l_color_6184 = UPcolor_3;
   }
   if (StrToDouble(l_dbl2str_6016) >= 60.0) {
      l_text_6056 = "-";
      l_color_6188 = UPcolor_4;
   }
   if (StrToDouble(l_dbl2str_6016) >= 50.0) {
      l_text_6064 = "-";
      l_color_6192 = UPcolor_5;
   }
   if (StrToDouble(l_dbl2str_6016) >= 40.0) {
      l_text_6072 = "-";
      l_color_6196 = UPcolor_6;
   }
   if (StrToDouble(l_dbl2str_6016) >= 30.0) {
      l_text_6080 = "-";
      l_color_6200 = UPcolor_7;
   }
   if (StrToDouble(l_dbl2str_6016) >= 20.0) {
      l_text_6088 = "-";
      l_color_6204 = UPcolor_8;
   }
   if (StrToDouble(l_dbl2str_6016) >= 0.0) {
      l_text_6096 = "-";
      l_color_6208 = UPcolor_9;
   }
   if (StrToDouble(l_dbl2str_6024) > 90.0) {
      l_text_6104 = "-";
      l_color_6212 = DNcolor_1;
   }
   if (StrToDouble(l_dbl2str_6024) > 80.0) {
      l_text_6112 = "-";
      l_color_6216 = DNcolor_2;
   }
   if (StrToDouble(l_dbl2str_6024) > 70.0) {
      l_text_6120 = "-";
      l_color_6220 = DNcolor_3;
   }
   if (StrToDouble(l_dbl2str_6024) > 60.0) {
      l_text_6128 = "-";
      l_color_6224 = DNcolor_4;
   }
   if (StrToDouble(l_dbl2str_6024) > 50.0) {
      l_text_6136 = "-";
      l_color_6228 = DNcolor_5;
   }
   if (StrToDouble(l_dbl2str_6024) > 40.0) {
      l_text_6144 = "-";
      l_color_6232 = DNcolor_6;
   }
   if (StrToDouble(l_dbl2str_6024) > 30.0) {
      l_text_6152 = "-";
      l_color_6236 = DNcolor_7;
   }
   if (StrToDouble(l_dbl2str_6024) > 20.0) {
      l_text_6160 = "-";
      l_color_6240 = DNcolor_8;
   }
   if (StrToDouble(l_dbl2str_6024) > 0.0) {
      l_text_6168 = "-";
      l_color_6244 = DNcolor_9;
   }
   string l_text_6248 = "";
   if (StrToDouble(l_dbl2str_6016) >= 90.0) {
      l_text_6248 = "+ UP Xtreme +";
      l_color_6256 = UPcolor_1;
   }
   if (StrToDouble(l_dbl2str_6024) >= 90.0) {
      l_text_6248 = "+ DN Xtreme +";
      l_color_6256 = DNcolor_1;
   }
   if (StrToDouble(l_dbl2str_6016) >= 75.0 && StrToDouble(l_dbl2str_6016) < 90.0) {
      l_text_6248 = "+ UP Strong +";
      l_color_6256 = UPcolor_1;
   }
   if (StrToDouble(l_dbl2str_6024) >= 75.0 && StrToDouble(l_dbl2str_6024) < 90.0) {
      l_text_6248 = "+ DN Strong +";
      l_color_6256 = DNcolor_1;
   }
   if (StrToDouble(l_dbl2str_6016) >= 60.0 && StrToDouble(l_dbl2str_6016) < 75.0) {
      l_text_6248 = "+ UP Medium +";
      l_color_6256 = UPcolor_4;
   }
   if (StrToDouble(l_dbl2str_6024) >= 60.0 && StrToDouble(l_dbl2str_6024) < 75.0) {
      l_text_6248 = "+ DN Medium +";
      l_color_6256 = DNcolor_5;
   }
   if (StrToDouble(l_dbl2str_6016) >= 55.0 && StrToDouble(l_dbl2str_6016) < 60.0) {
      l_text_6248 = "+  UP Weak  +";
      l_color_6256 = UPcolor_7;
   }
   if (StrToDouble(l_dbl2str_6024) >= 55.0 && StrToDouble(l_dbl2str_6024) < 60.0) {
      l_text_6248 = "+  Dn Weak  +";
      l_color_6256 = DNcolor_6;
   }
   if (StrToDouble(l_dbl2str_6024) >= 50.0 && StrToDouble(l_dbl2str_6024) < 55.0) {
      l_text_6248 = "+   Neutral   +";
      l_color_6256 = EQUALcolor;
   }
   if (StrToDouble(l_dbl2str_6016) >= 50.0 && StrToDouble(l_dbl2str_6016) < 55.0) {
      l_text_6248 = "+   Neutral   +";
      l_color_6256 = EQUALcolor;
   }
   CreateDynamic("SIG_RESULTS" + Dynamic_Number, BarsShift_UP_DN + 106, BarsShift_Side + 18);
   ObjectSetText("SIG_RESULTS" + Dynamic_Number, l_text_6248, 10, "Tahoma Bold", l_color_6256);
   CreateDynamic("SIG_LEVEL" + Dynamic_Number, BarsShift_UP_DN + 25, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL" + Dynamic_Number, l_text_6032, 40, "Tahoma", l_color_6176);
   CreateDynamic("SIG_LEVEL_1" + Dynamic_Number, BarsShift_UP_DN + 30, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_1" + Dynamic_Number, l_text_6040, 40, "Tahoma", l_color_6180);
   CreateDynamic("SIG_LEVEL_2" + Dynamic_Number, BarsShift_UP_DN + 35, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_2" + Dynamic_Number, l_text_6048, 40, "Tahoma", l_color_6184);
   CreateDynamic("SIG_LEVEL_3" + Dynamic_Number, BarsShift_UP_DN + 40, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_3" + Dynamic_Number, l_text_6056, 40, "Tahoma", l_color_6188);
   CreateDynamic("SIG_LEVEL_4" + Dynamic_Number, BarsShift_UP_DN + 45, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_4" + Dynamic_Number, l_text_6064, 40, "Tahoma", l_color_6192);
   CreateDynamic("SIG_LEVEL_5" + Dynamic_Number, BarsShift_UP_DN + 50, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_5" + Dynamic_Number, l_text_6072, 40, "Tahoma", l_color_6196);
   CreateDynamic("SIG_LEVEL_6" + Dynamic_Number, BarsShift_UP_DN + 55, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_6" + Dynamic_Number, l_text_6080, 40, "Tahoma", l_color_6200);
   CreateDynamic("SIG_LEVEL_7" + Dynamic_Number, BarsShift_UP_DN + 60, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_7" + Dynamic_Number, l_text_6088, 40, "Tahoma", l_color_6204);
   CreateDynamic("SIG_LEVEL_8" + Dynamic_Number, BarsShift_UP_DN + 65, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_8" + Dynamic_Number, l_text_6096, 40, "Tahoma", l_color_6208);
   CreateDynamic("SIG_LEVEL_9" + Dynamic_Number, BarsShift_UP_DN + 65, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_9" + Dynamic_Number, l_text_6104, 40, "Tahoma", l_color_6212);
   CreateDynamic("SIG_LEVEL_10" + Dynamic_Number, BarsShift_UP_DN + 60, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_10" + Dynamic_Number, l_text_6112, 40, "Tahoma", l_color_6216);
   CreateDynamic("SIG_LEVEL_11" + Dynamic_Number, BarsShift_UP_DN + 55, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_11" + Dynamic_Number, l_text_6120, 40, "Tahoma", l_color_6220);
   CreateDynamic("SIG_LEVEL_12" + Dynamic_Number, BarsShift_UP_DN + 50, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_12" + Dynamic_Number, l_text_6128, 40, "Tahoma", l_color_6224);
   CreateDynamic("SIG_LEVEL_13" + Dynamic_Number, BarsShift_UP_DN + 45, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_13" + Dynamic_Number, l_text_6136, 40, "Tahoma", l_color_6228);
   CreateDynamic("SIG_LEVEL_14" + Dynamic_Number, BarsShift_UP_DN + 40, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_14" + Dynamic_Number, l_text_6144, 40, "Tahoma", l_color_6232);
   CreateDynamic("SIG_LEVEL_15" + Dynamic_Number, BarsShift_UP_DN + 35, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_15" + Dynamic_Number, l_text_6152, 40, "Tahoma", l_color_6236);
   CreateDynamic("SIG_LEVEL_16" + Dynamic_Number, BarsShift_UP_DN + 30, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_16" + Dynamic_Number, l_text_6160, 40, "Tahoma", l_color_6240);
   CreateDynamic("SIG_LEVEL_17" + Dynamic_Number, BarsShift_UP_DN + 25, BarsShift_Side + 20);
   ObjectSetText("SIG_LEVEL_17" + Dynamic_Number, l_text_6168, 40, "Tahoma", l_color_6244);
   string l_text_6260 = "";
   string l_text_6268 = "";
   string l_text_6276 = "";
   string l_text_6284 = "";
   string l_text_6292 = "";
   string l_text_6300 = "";
   string l_text_6308 = "";
   string l_text_6316 = "";
   string l_text_6324 = "";
   string l_text_6332 = "";
   string l_text_6340 = "";
   string l_text_6348 = "";
   string l_text_6356 = "";
   string l_text_6364 = "";
   string l_text_6372 = "";
   string l_text_6380 = "";
   string l_text_6388 = "";
   string l_text_6396 = "";
   if (StrToDouble(l_dbl2str_5984) >= 90.0) {
      l_text_6260 = "-";
      l_color_6404 = UPcolor_1;
   }
   if (StrToDouble(l_dbl2str_5984) >= 80.0) {
      l_text_6268 = "-";
      l_color_6408 = UPcolor_2;
   }
   if (StrToDouble(l_dbl2str_5984) >= 70.0) {
      l_text_6276 = "-";
      l_color_6412 = UPcolor_3;
   }
   if (StrToDouble(l_dbl2str_5984) >= 60.0) {
      l_text_6284 = "-";
      l_color_6416 = UPcolor_4;
   }
   if (StrToDouble(l_dbl2str_5984) >= 50.0) {
      l_text_6292 = "-";
      l_color_6420 = UPcolor_5;
   }
   if (StrToDouble(l_dbl2str_5984) >= 40.0) {
      l_text_6300 = "-";
      l_color_6424 = UPcolor_6;
   }
   if (StrToDouble(l_dbl2str_5984) >= 30.0) {
      l_text_6308 = "-";
      l_color_6428 = UPcolor_7;
   }
   if (StrToDouble(l_dbl2str_5984) >= 20.0) {
      l_text_6316 = "-";
      l_color_6432 = UPcolor_8;
   }
   if (StrToDouble(l_dbl2str_5984) >= 0.0) {
      l_text_6324 = "-";
      l_color_6436 = UPcolor_9;
   }
   if (StrToDouble(l_dbl2str_5992) > 90.0) {
      l_text_6332 = "-";
      l_color_6440 = DNcolor_1;
   }
   if (StrToDouble(l_dbl2str_5992) > 80.0) {
      l_text_6340 = "-";
      l_color_6444 = DNcolor_2;
   }
   if (StrToDouble(l_dbl2str_5992) > 70.0) {
      l_text_6348 = "-";
      l_color_6448 = DNcolor_3;
   }
   if (StrToDouble(l_dbl2str_5992) > 60.0) {
      l_text_6356 = "-";
      l_color_6452 = DNcolor_4;
   }
   if (StrToDouble(l_dbl2str_5992) > 50.0) {
      l_text_6364 = "-";
      l_color_6456 = DNcolor_5;
   }
   if (StrToDouble(l_dbl2str_5992) > 40.0) {
      l_text_6372 = "-";
      l_color_6460 = DNcolor_6;
   }
   if (StrToDouble(l_dbl2str_5992) > 30.0) {
      l_text_6380 = "-";
      l_color_6464 = DNcolor_7;
   }
   if (StrToDouble(l_dbl2str_5992) > 20.0) {
      l_text_6388 = "-";
      l_color_6468 = DNcolor_8;
   }
   if (StrToDouble(l_dbl2str_5992) > 0.0) {
      l_text_6396 = "-";
      l_color_6472 = DNcolor_9;
   }
   CreateDynamic("H4_LEVEL" + Dynamic_Number, BarsShift_UP_DN + 25, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL" + Dynamic_Number, l_text_6260, 40, "Tahoma", l_color_6404);
   CreateDynamic("H4_LEVEL_1" + Dynamic_Number, BarsShift_UP_DN + 30, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_1" + Dynamic_Number, l_text_6268, 40, "Tahoma", l_color_6408);
   CreateDynamic("H4_LEVEL_2" + Dynamic_Number, BarsShift_UP_DN + 35, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_2" + Dynamic_Number, l_text_6276, 40, "Tahoma", l_color_6412);
   CreateDynamic("H4_LEVEL_3" + Dynamic_Number, BarsShift_UP_DN + 40, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_3" + Dynamic_Number, l_text_6284, 40, "Tahoma", l_color_6416);
   CreateDynamic("H4_LEVEL_4" + Dynamic_Number, BarsShift_UP_DN + 45, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_4" + Dynamic_Number, l_text_6292, 40, "Tahoma", l_color_6420);
   CreateDynamic("H4_LEVEL_5" + Dynamic_Number, BarsShift_UP_DN + 50, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_5" + Dynamic_Number, l_text_6300, 40, "Tahoma", l_color_6424);
   CreateDynamic("H4_LEVEL_6" + Dynamic_Number, BarsShift_UP_DN + 55, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_6" + Dynamic_Number, l_text_6308, 40, "Tahoma", l_color_6428);
   CreateDynamic("H4_LEVEL_7" + Dynamic_Number, BarsShift_UP_DN + 60, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_7" + Dynamic_Number, l_text_6316, 40, "Tahoma", l_color_6432);
   CreateDynamic("H4_LEVEL_8" + Dynamic_Number, BarsShift_UP_DN + 65, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_8" + Dynamic_Number, l_text_6324, 40, "Tahoma", l_color_6436);
   CreateDynamic("H4_LEVEL_9" + Dynamic_Number, BarsShift_UP_DN + 65, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_9" + Dynamic_Number, l_text_6332, 40, "Tahoma", l_color_6440);
   CreateDynamic("H4_LEVEL_10" + Dynamic_Number, BarsShift_UP_DN + 60, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_10" + Dynamic_Number, l_text_6340, 40, "Tahoma", l_color_6444);
   CreateDynamic("H4_LEVEL_11" + Dynamic_Number, BarsShift_UP_DN + 55, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_11" + Dynamic_Number, l_text_6348, 40, "Tahoma", l_color_6448);
   CreateDynamic("H4_LEVEL_12" + Dynamic_Number, BarsShift_UP_DN + 50, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_12" + Dynamic_Number, l_text_6356, 40, "Tahoma", l_color_6452);
   CreateDynamic("H4_LEVEL_13" + Dynamic_Number, BarsShift_UP_DN + 45, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_13" + Dynamic_Number, l_text_6364, 40, "Tahoma", l_color_6456);
   CreateDynamic("H4_LEVEL_14" + Dynamic_Number, BarsShift_UP_DN + 40, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_14" + Dynamic_Number, l_text_6372, 40, "Tahoma", l_color_6460);
   CreateDynamic("H4_LEVEL_15" + Dynamic_Number, BarsShift_UP_DN + 35, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_15" + Dynamic_Number, l_text_6380, 40, "Tahoma", l_color_6464);
   CreateDynamic("H4_LEVEL_16" + Dynamic_Number, BarsShift_UP_DN + 30, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_16" + Dynamic_Number, l_text_6388, 40, "Tahoma", l_color_6468);
   CreateDynamic("H4_LEVEL_17" + Dynamic_Number, BarsShift_UP_DN + 25, BarsShift_Side + 36);
   ObjectSetText("H4_LEVEL_17" + Dynamic_Number, l_text_6396, 40, "Tahoma", l_color_6472);
   string l_text_6476 = "";
   string l_text_6484 = "";
   string l_text_6492 = "";
   string l_text_6500 = "";
   string l_text_6508 = "";
   string l_text_6516 = "";
   string l_text_6524 = "";
   string l_text_6532 = "";
   string l_text_6540 = "";
   string l_text_6548 = "";
   string l_text_6556 = "";
   string l_text_6564 = "";
   string l_text_6572 = "";
   string l_text_6580 = "";
   string l_text_6588 = "";
   string l_text_6596 = "";
   string l_text_6604 = "";
   string l_text_6612 = "";
   if (StrToDouble(l_dbl2str_4000) >= 90.0) {
      l_text_6476 = "-";
      l_color_6620 = UPcolor_1;
   }
   if (StrToDouble(l_dbl2str_4000) >= 80.0) {
      l_text_6484 = "-";
      l_color_6624 = UPcolor_2;
   }
   if (StrToDouble(l_dbl2str_4000) >= 70.0) {
      l_text_6492 = "-";
      l_color_6628 = UPcolor_3;
   }
   if (StrToDouble(l_dbl2str_4000) >= 60.0) {
      l_text_6500 = "-";
      l_color_6632 = UPcolor_4;
   }
   if (StrToDouble(l_dbl2str_4000) >= 50.0) {
      l_text_6508 = "-";
      l_color_6636 = UPcolor_5;
   }
   if (StrToDouble(l_dbl2str_4000) >= 40.0) {
      l_text_6516 = "-";
      l_color_6640 = UPcolor_6;
   }
   if (StrToDouble(l_dbl2str_4000) >= 30.0) {
      l_text_6524 = "-";
      l_color_6644 = UPcolor_7;
   }
   if (StrToDouble(l_dbl2str_4000) >= 20.0) {
      l_text_6532 = "-";
      l_color_6648 = UPcolor_8;
   }
   if (StrToDouble(l_dbl2str_4000) >= 0.0) {
      l_text_6540 = "-";
      l_color_6652 = UPcolor_9;
   }
   if (StrToDouble(l_dbl2str_4008) > 90.0) {
      l_text_6548 = "-";
      l_color_6656 = DNcolor_1;
   }
   if (StrToDouble(l_dbl2str_4008) > 80.0) {
      l_text_6556 = "-";
      l_color_6660 = DNcolor_2;
   }
   if (StrToDouble(l_dbl2str_4008) > 70.0) {
      l_text_6564 = "-";
      l_color_6664 = DNcolor_3;
   }
   if (StrToDouble(l_dbl2str_4008) > 60.0) {
      l_text_6572 = "-";
      l_color_6668 = DNcolor_4;
   }
   if (StrToDouble(l_dbl2str_4008) > 50.0) {
      l_text_6580 = "-";
      l_color_6672 = DNcolor_5;
   }
   if (StrToDouble(l_dbl2str_4008) > 40.0) {
      l_text_6588 = "-";
      l_color_6676 = DNcolor_6;
   }
   if (StrToDouble(l_dbl2str_4008) > 30.0) {
      l_text_6596 = "-";
      l_color_6680 = DNcolor_7;
   }
   if (StrToDouble(l_dbl2str_4008) > 20.0) {
      l_text_6604 = "-";
      l_color_6684 = DNcolor_8;
   }
   if (StrToDouble(l_dbl2str_4008) > 0.0) {
      l_text_6612 = "-";
      l_color_6688 = DNcolor_9;
   }
   CreateDynamic("M30_LEVEL" + Dynamic_Number, BarsShift_UP_DN + 25, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL" + Dynamic_Number, l_text_6476, 40, "Tahoma", l_color_6620);
   CreateDynamic("M30_LEVEL_1" + Dynamic_Number, BarsShift_UP_DN + 30, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_1" + Dynamic_Number, l_text_6484, 40, "Tahoma", l_color_6624);
   CreateDynamic("M30_LEVEL_2" + Dynamic_Number, BarsShift_UP_DN + 35, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_2" + Dynamic_Number, l_text_6492, 40, "Tahoma", l_color_6628);
   CreateDynamic("M30_LEVEL_3" + Dynamic_Number, BarsShift_UP_DN + 40, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_3" + Dynamic_Number, l_text_6500, 40, "Tahoma", l_color_6632);
   CreateDynamic("M30_LEVEL_4" + Dynamic_Number, BarsShift_UP_DN + 45, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_4" + Dynamic_Number, l_text_6508, 40, "Tahoma", l_color_6636);
   CreateDynamic("M30_LEVEL_5" + Dynamic_Number, BarsShift_UP_DN + 50, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_5" + Dynamic_Number, l_text_6516, 40, "Tahoma", l_color_6640);
   CreateDynamic("M30_LEVEL_6" + Dynamic_Number, BarsShift_UP_DN + 55, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_6" + Dynamic_Number, l_text_6524, 40, "Tahoma", l_color_6644);
   CreateDynamic("M30_LEVEL_7" + Dynamic_Number, BarsShift_UP_DN + 60, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_7" + Dynamic_Number, l_text_6532, 40, "Tahoma", l_color_6648);
   CreateDynamic("M30_LEVEL_8" + Dynamic_Number, BarsShift_UP_DN + 65, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_8" + Dynamic_Number, l_text_6540, 40, "Tahoma", l_color_6652);
   CreateDynamic("M30_LEVEL_9" + Dynamic_Number, BarsShift_UP_DN + 65, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_9" + Dynamic_Number, l_text_6548, 40, "Tahoma", l_color_6656);
   CreateDynamic("M30_LEVEL_10" + Dynamic_Number, BarsShift_UP_DN + 60, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_10" + Dynamic_Number, l_text_6556, 40, "Tahoma", l_color_6660);
   CreateDynamic("M30_LEVEL_11" + Dynamic_Number, BarsShift_UP_DN + 55, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_11" + Dynamic_Number, l_text_6564, 40, "Tahoma", l_color_6664);
   CreateDynamic("M30_LEVEL_12" + Dynamic_Number, BarsShift_UP_DN + 50, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_12" + Dynamic_Number, l_text_6572, 40, "Tahoma", l_color_6668);
   CreateDynamic("M30_LEVEL_13" + Dynamic_Number, BarsShift_UP_DN + 45, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_13" + Dynamic_Number, l_text_6580, 40, "Tahoma", l_color_6672);
   CreateDynamic("M30_LEVEL_14" + Dynamic_Number, BarsShift_UP_DN + 40, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_14" + Dynamic_Number, l_text_6588, 40, "Tahoma", l_color_6676);
   CreateDynamic("M30_LEVEL_15" + Dynamic_Number, BarsShift_UP_DN + 35, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_15" + Dynamic_Number, l_text_6596, 40, "Tahoma", l_color_6680);
   CreateDynamic("M30_LEVEL_16" + Dynamic_Number, BarsShift_UP_DN + 30, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_16" + Dynamic_Number, l_text_6604, 40, "Tahoma", l_color_6684);
   CreateDynamic("M30_LEVEL_17" + Dynamic_Number, BarsShift_UP_DN + 25, BarsShift_Side + 52);
   ObjectSetText("M30_LEVEL_17" + Dynamic_Number, l_text_6612, 40, "Tahoma", l_color_6688);
   string l_text_6692 = "";
   string l_text_6700 = "";
   string l_text_6708 = "";
   string l_text_6716 = "";
   string l_text_6724 = "";
   string l_text_6732 = "";
   string l_text_6740 = "";
   string l_text_6748 = "";
   string l_text_6756 = "";
   string l_text_6764 = "";
   string l_text_6772 = "";
   string l_text_6780 = "";
   string l_text_6788 = "";
   string l_text_6796 = "";
   string l_text_6804 = "";
   string l_text_6812 = "";
   string l_text_6820 = "";
   string l_text_6828 = "";
   if (StrToDouble(l_dbl2str_2016) >= 90.0) {
      l_text_6692 = "-";
      l_color_6836 = UPcolor_1;
   }
   if (StrToDouble(l_dbl2str_2016) >= 80.0) {
      l_text_6700 = "-";
      l_color_6840 = UPcolor_2;
   }
   if (StrToDouble(l_dbl2str_2016) >= 70.0) {
      l_text_6708 = "-";
      l_color_6844 = UPcolor_3;
   }
   if (StrToDouble(l_dbl2str_2016) >= 60.0) {
      l_text_6716 = "-";
      l_color_6848 = UPcolor_4;
   }
   if (StrToDouble(l_dbl2str_2016) >= 50.0) {
      l_text_6724 = "-";
      l_color_6852 = UPcolor_5;
   }
   if (StrToDouble(l_dbl2str_2016) >= 40.0) {
      l_text_6732 = "-";
      l_color_6856 = UPcolor_6;
   }
   if (StrToDouble(l_dbl2str_2016) >= 30.0) {
      l_text_6740 = "-";
      l_color_6860 = UPcolor_7;
   }
   if (StrToDouble(l_dbl2str_2016) >= 20.0) {
      l_text_6748 = "-";
      l_color_6864 = UPcolor_8;
   }
   if (StrToDouble(l_dbl2str_2016) >= 0.0) {
      l_text_6756 = "-";
      l_color_6868 = UPcolor_9;
   }
   if (StrToDouble(l_dbl2str_2024) > 90.0) {
      l_text_6764 = "-";
      l_color_6872 = DNcolor_1;
   }
   if (StrToDouble(l_dbl2str_2024) > 80.0) {
      l_text_6772 = "-";
      l_color_6876 = DNcolor_2;
   }
   if (StrToDouble(l_dbl2str_2024) > 70.0) {
      l_text_6780 = "-";
      l_color_6880 = DNcolor_3;
   }
   if (StrToDouble(l_dbl2str_2024) > 60.0) {
      l_text_6788 = "-";
      l_color_6884 = DNcolor_4;
   }
   if (StrToDouble(l_dbl2str_2024) > 50.0) {
      l_text_6796 = "-";
      l_color_6888 = DNcolor_5;
   }
   if (StrToDouble(l_dbl2str_2024) > 40.0) {
      l_text_6804 = "-";
      l_color_6892 = DNcolor_6;
   }
   if (StrToDouble(l_dbl2str_2024) > 30.0) {
      l_text_6812 = "-";
      l_color_6896 = DNcolor_7;
   }
   if (StrToDouble(l_dbl2str_2024) > 20.0) {
      l_text_6820 = "-";
      l_color_6900 = DNcolor_8;
   }
   if (StrToDouble(l_dbl2str_2024) > 0.0) {
      l_text_6828 = "-";
      l_color_6904 = DNcolor_9;
   }
   CreateDynamic("M5_LEVEL" + Dynamic_Number, BarsShift_UP_DN + 25, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL" + Dynamic_Number, l_text_6692, 40, "Tahoma", l_color_6836);
   CreateDynamic("M5_LEVEL_1" + Dynamic_Number, BarsShift_UP_DN + 30, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_1" + Dynamic_Number, l_text_6700, 40, "Tahoma", l_color_6840);
   CreateDynamic("M5_LEVEL_2" + Dynamic_Number, BarsShift_UP_DN + 35, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_2" + Dynamic_Number, l_text_6708, 40, "Tahoma", l_color_6844);
   CreateDynamic("M5_LEVEL_3" + Dynamic_Number, BarsShift_UP_DN + 40, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_3" + Dynamic_Number, l_text_6716, 40, "Tahoma", l_color_6848);
   CreateDynamic("M5_LEVEL_4" + Dynamic_Number, BarsShift_UP_DN + 45, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_4" + Dynamic_Number, l_text_6724, 40, "Tahoma", l_color_6852);
   CreateDynamic("M5_LEVEL_5" + Dynamic_Number, BarsShift_UP_DN + 50, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_5" + Dynamic_Number, l_text_6732, 40, "Tahoma", l_color_6856);
   CreateDynamic("M5_LEVEL_6" + Dynamic_Number, BarsShift_UP_DN + 55, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_6" + Dynamic_Number, l_text_6740, 40, "Tahoma", l_color_6860);
   CreateDynamic("M5_LEVEL_7" + Dynamic_Number, BarsShift_UP_DN + 60, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_7" + Dynamic_Number, l_text_6748, 40, "Tahoma", l_color_6864);
   CreateDynamic("M5_LEVEL_8" + Dynamic_Number, BarsShift_UP_DN + 65, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_8" + Dynamic_Number, l_text_6756, 40, "Tahoma", l_color_6868);
   CreateDynamic("M5_LEVEL_9" + Dynamic_Number, BarsShift_UP_DN + 65, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_9" + Dynamic_Number, l_text_6764, 40, "Tahoma", l_color_6872);
   CreateDynamic("M5_LEVEL_10" + Dynamic_Number, BarsShift_UP_DN + 60, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_10" + Dynamic_Number, l_text_6772, 40, "Tahoma", l_color_6876);
   CreateDynamic("M5_LEVEL_11" + Dynamic_Number, BarsShift_UP_DN + 55, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_11" + Dynamic_Number, l_text_6780, 40, "Tahoma", l_color_6880);
   CreateDynamic("M5_LEVEL_12" + Dynamic_Number, BarsShift_UP_DN + 50, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_12" + Dynamic_Number, l_text_6788, 40, "Tahoma", l_color_6884);
   CreateDynamic("M5_LEVEL_13" + Dynamic_Number, BarsShift_UP_DN + 45, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_13" + Dynamic_Number, l_text_6796, 40, "Tahoma", l_color_6888);
   CreateDynamic("M5_LEVEL_14" + Dynamic_Number, BarsShift_UP_DN + 40, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_14" + Dynamic_Number, l_text_6804, 40, "Tahoma", l_color_6892);
   CreateDynamic("M5_LEVEL_15" + Dynamic_Number, BarsShift_UP_DN + 35, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_15" + Dynamic_Number, l_text_6812, 40, "Tahoma", l_color_6896);
   CreateDynamic("M5_LEVEL_16" + Dynamic_Number, BarsShift_UP_DN + 30, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_16" + Dynamic_Number, l_text_6820, 40, "Tahoma", l_color_6900);
   CreateDynamic("M5_LEVEL_17" + Dynamic_Number, BarsShift_UP_DN + 25, BarsShift_Side + 68);
   ObjectSetText("M5_LEVEL_17" + Dynamic_Number, l_text_6828, 40, "Tahoma", l_color_6904);
   CreateDynamic("TREND_Display" + Dynamic_Number, BarsShift_UP_DN + 10, BarsShift_Side + 21);
   ObjectSetText("TREND_Display" + Dynamic_Number, "Dynamic Trend", 10, "Tahoma Bold", DynamicTitle_color);
   CreateDynamic("TREND_Display1" + Dynamic_Number, BarsShift_UP_DN + 25, BarsShift_Side + 21);
   ObjectSetText("TREND_Display1" + Dynamic_Number, "" + Currency_Symbol + "", 14, "Tahoma Narrow", Currency_color);
   CreateDynamic("TREND_Display2" + Dynamic_Number, BarsShift_UP_DN + 45, BarsShift_Side + 20);
   ObjectSetText("TREND_Display2" + Dynamic_Number, "Curr  H4 / H1   to   M5 / M1", 6, "Tahoma Narrow", PeriodTitles_color);
   CreateDynamic("TREND_Display3" + Dynamic_Number, BarsShift_UP_DN + 4, BarsShift_Side + 19);
   ObjectSetText("TREND_Display3" + Dynamic_Number, "--------------------------------", 7, "Tahoma Narrow", DottedSeparator_color);
   CreateDynamic("TREND_Display4" + Dynamic_Number, BarsShift_UP_DN + 82, BarsShift_Side + 88);
   ObjectSetText("TREND_Display4" + Dynamic_Number, l_dbl2str_6016 + "%", 10, "Tahoma Narrow", UPcolor_4);
   CreateDynamic("TREND_Display5" + Dynamic_Number, BarsShift_UP_DN + 62, BarsShift_Side + 88);
   ObjectSetText("TREND_Display5" + Dynamic_Number, l_dbl2str_6024 + "%", 10, "Tahoma Narrow", DNcolor_4);
   CreateDynamic("TREND_Display6" + Dynamic_Number, BarsShift_UP_DN + 99, BarsShift_Side + 20);
   ObjectSetText("TREND_Display6" + Dynamic_Number, "-------------------------------- ", 7, "Tahoma", DottedSeparator_color);
   CreateDynamic("TREND_Display7" + Dynamic_Number, BarsShift_UP_DN + 50, BarsShift_Side + 20);
   ObjectSetText("TREND_Display7" + Dynamic_Number, "-------------------------------- ", 7, "Tahoma", DottedSeparator_color);
   CreateDynamic("TREND_Display8" + Dynamic_Number, BarsShift_UP_DN + 117, BarsShift_Side + 20);
   ObjectSetText("TREND_Display8" + Dynamic_Number, "-------------------------------- ", 7, "Tahoma", DottedSeparator_color);
   return (0);
}
