TudorGirl_Vorticity_2_001

/*
   Generated by EX4-TO-MQ4 decompiler V4.0.224.1 []
   Website: http://purebeam.biz
   E-mail : purebeam@gmail.com
*/
#property copyright "Copyright © 2009, Anne"
#property link      "http://xxx"

#property indicator_separate_window
#property indicator_minimum 0.0
#property indicator_maximum 2.0
#property indicator_buffers 2
#property indicator_color1 Blue
#property indicator_color2 Red

int gi_76 = 8;
extern int WingDingUp = 110;
extern int WingDingDn = 110;
double g_ibuf_88[];
double g_ibuf_92[];

int init() {
   IndicatorBuffers(3);
   SetIndexBuffer(0, g_ibuf_88);
   SetIndexStyle(0, DRAW_ARROW, EMPTY);
   SetIndexArrow(0, WingDingUp);
   SetIndexBuffer(1, g_ibuf_92);
   SetIndexStyle(1, DRAW_ARROW, EMPTY);
   SetIndexArrow(1, WingDingDn);
   IndicatorShortName("TudorGirl Hydrodynamic Vorticity 2.0a");
   return (0);
}

int start() {
   double ld_40;
   int li_4 = IndicatorCounted();
   double ld_8 = 0;
   double ld_16 = 0;
   double ld_24 = 0;
   double ld_32 = 0;
   double l_low_48 = 0;
   double l_high_56 = 0;
   if (li_4 > 0) li_4--;
   int li_0 = Bars - li_4;
   for (int li_64 = 0; li_64 < li_0; li_64++) {
      l_high_56 = High[iHighest(NULL, 0, MODE_HIGH, gi_76, li_64)];
      l_low_48 = Low[iLowest(NULL, 0, MODE_LOW, gi_76, li_64)];
      ld_40 = (High[li_64] + Low[li_64]) / 2.0;
      ld_8 = 0.66 * ((ld_40 - l_low_48) / (l_high_56 - l_low_48) - 0.5) + 0.67 * ld_16;
      ld_8 = MathMin(MathMax(ld_8, -0.999), 0.999);
      ld_24 = MathLog((ld_8 + 1.0) / (1 - ld_8)) / 2.0 + ld_32 / 2.0;
      ld_16 = ld_8;
      ld_32 = ld_24;
      if (ld_24 > 0.0) {
         g_ibuf_88[li_64] = 1.0;
         g_ibuf_92[li_64] = EMPTY_VALUE;
      } else {
         g_ibuf_92[li_64] = 1.0;
         g_ibuf_88[li_64] = EMPTY_VALUE;
      }
   }
   return (0);
}