// Indicator HEIKEN-AHSI MA:

float* fMAOpen  = CreateSeries();
float* fMAHigh  = CreateSeries();
float* fMALow   = CreateSeries();
float* fMAClose = CreateSeries();

indMA(iNumBars, fOpen,  fMAOpen,  param.fMAPeriod, param.iMAMethod, 0, 0, 0);
indMA(iNumBars, fHigh,  fMAHigh,  param.fMAPeriod, param.iMAMethod, 0, 0, 0);
indMA(iNumBars, fLow,   fMALow,   param.fMAPeriod, param.iMAMethod, 0, 0, 0);
indMA(iNumBars, fClose, fMAClose, param.fMAPeriod, param.iMAMethod, 0, 0, 0);

fO[0] = fOpen [0];
fH[0] = fHigh [0];
fL[0] = fLow  [0];
fC[0] = fClose[0];

float haHigh, haLow;

for (int i=1; i<iNumBars; i++) {

  fO[i] = fMAOpen[i];
  fH[i] = fMAHigh[i];
  fL[i] = fMALow[i];
  fC[i] = fMAClose[i];


  fO[i] = (fO[i-1] + fC[i-1]) / 2.0f;
  fC[i] = (fMAOpen[i] + fMAHigh[i] + fMALow[i] + fMAClose[i]) / 4.0f;
  if (fO[i]> fC[i]) haHigh = fO[i]; else haHigh = fC[i];
  if (fMAHigh[i]> haHigh) haHigh = fMAHigh[i];
  if (fO[i]< fC[i]) haLow = fO[i]; else haLow = fC[i];

  if (haLow > fMALow[i])
      haLow = fMALow[i];

  if (fO[i]< fC[i]) { fH[i] = haLow;  fL[i] = haHigh;  }
  else              { fH[i] = haHigh; fL[i] = haLow;   }

}

int iCount = 0;

int nDecDigit = nDigit;
if (nDecDigit>9) nDecDigit = 9;
if (nDecDigit<0) nDecDigit = 0;

float fPoint = 1;
while (nDecDigit-- >0) fPoint /= 10.0f;

if (param.iStep>0) {
  float fStep = param.iStep*fPoint;
  for (int i=1; i<iNumBars; i++) {
    if (fabs(fO[i]-fO[i-1])< fStep) fO[i] = fO[i-1];
    if (fabs(fH[i]-fH[i-1])< fStep) fH[i] = fH[i-1];
    if (fabs(fL[i]-fL[i-1])< fStep) fL[i] = fL[i-1];
    if (fabs(fC[i]-fC[i-1])< fStep) fC[i] = fC[i-1];
  }
}

DestroySeries(fMAClose);
DestroySeries(fMALow);
DestroySeries(fMAHigh);
DestroySeries(fMAOpen);