Trendstrength

#property indicator_separate_window
#property indicator_buffers 2
#property indicator_color1 DeepSkyBlue
#property indicator_color2 Red

int gi_76 = 7;
double gd_80 = 50.6;
int g_bars_88 = 300;
double g_ibuf_92[];
double g_ibuf_96[];
double g_ibuf_100[];
double g_ibuf_104[];

int init() {
   IndicatorBuffers(4);
   SetIndexStyle(0, DRAW_HISTOGRAM, STYLE_SOLID, 4);
   SetIndexBuffer(0, g_ibuf_100);
   SetIndexStyle(1, DRAW_HISTOGRAM, STYLE_SOLID, 4);
   SetIndexBuffer(1, g_ibuf_104);
   SetIndexBuffer(2, g_ibuf_92);
   SetIndexBuffer(3, g_ibuf_96);
   IndicatorShortName("dpt9(" + gi_76 + ")");
   return (0);
}

int deinit() {
   return (0);
}

int start() {
   double ld_8;
   double ld_16;
   double ld_32;
   if (g_bars_88 >= Bars) g_bars_88 = Bars;
   SetIndexDrawBegin(0, Bars - g_bars_88 + gi_76);
   SetIndexDrawBegin(1, Bars - g_bars_88 + gi_76);
   int l_ind_counted_4 = IndicatorCounted();
   if (Bars <= gi_76 + 1) return (0);
   if (l_ind_counted_4 < gi_76 + 1) {
      for (int li_0 = 1; li_0 <= gi_76; li_0++) g_ibuf_92[g_bars_88 - li_0] = 0.0;
      for (li_0 = 1; li_0 <= gi_76; li_0++) g_ibuf_96[g_bars_88 - li_0] = 0.0;
   }
   for (li_0 = g_bars_88 - gi_76; li_0 >= 0; li_0--) {
      ld_8 = High[iHighest(NULL, 0, MODE_HIGH, gi_76, li_0 - gi_76 + 1)];
      ld_16 = Low[iLowest(NULL, 0, MODE_LOW, gi_76, li_0 - gi_76 + 1)];
      ld_32 = ld_8 - (ld_8 - ld_16) * gd_80 / 100.0;
      g_ibuf_92[li_0 - gi_76 + 6] = ld_32;
      g_ibuf_96[li_0 - gi_76 - 1] = ld_32;
   }
   for (int li_40 = g_bars_88 - gi_76; li_40 >= 0; li_40--) {
      if (g_ibuf_92[li_40] > g_ibuf_96[li_40]) {
         g_ibuf_100[li_40] = 1;
         g_ibuf_104[li_40] = 0;
      } else {
         g_ibuf_100[li_40] = 0;
         g_ibuf_104[li_40] = 1;
      }
   }
   return (0);
}