//double STOX[ 100 ], MA_bar[100] ;
ArrayInitialize ( STOX, (double)0.0 );
ArrayInitialize ( MA_bar, (double)0.0 );
bool ee = ArraySetAsSeries( MA_bar, true );
int limit=100;
for(i=0; i<limit; i++)
{
m1 = 2
* NormalizeDouble(iStochastic(Symbol_t, TF, KK10, DD10, SS10, StochMode, StochPrice, MODE_MAIN,i)- 50, Digits+1);
m2 = 2* NormalizeDouble(iStochastic(Symbol_t, TF, KK11, DD11, SS11, StochMode, StochPrice, MODE_MAIN,i)- 50, Digits+1);
m3 = 2* NormalizeDouble(iStochastic(Symbol_t, TF, KK12, DD12, SS12, StochMode, StochPrice, MODE_MAIN,i)- 50, Digits+1);
m4 = 2* NormalizeDouble(iStochastic(Symbol_t, TF, KK13, DD13, SS13, StochMode, StochPrice, MODE_MAIN,i)- 50, Digits+1);
m5 = 2* NormalizeDouble(iStochastic(Symbol_t, TF, KK14, DD14, SS14, StochMode, StochPrice, MODE_MAIN,i)- 50, Digits+1);
m6 = 2* NormalizeDouble(iStochastic(Symbol_t, TF, KK15, DD15, SS15, StochMode, StochPrice, MODE_MAIN,i)- 50, Digits+1);
m7 = 2* NormalizeDouble(iStochastic(Symbol_t, TF, KK16, DD16, SS16, StochMode, StochPrice, MODE_MAIN,i)- 50, Digits+1);
m8 = 2* NormalizeDouble(iStochastic(Symbol_t, TF, KK17, DD17, SS17, StochMode, StochPrice, MODE_MAIN,i)- 50, Digits+1);
STOX = (m1+m2+m3+m4+m5+m6+m7+m8)/8;
} // for
for(i=0; i<limit; i++)
MA_bar[ i ] = iMAOnArray(STOX, 100, MASignal, 0, MAMode, i);
if( ticscount < 3)
{
Print(" i STOX MA_bar ");
for( i = 0; i < 10 ; i++) PrintFormat ( " %4i %8.2f %8.2f ", i, STOX, MA_bar[ i ] );
Print(" ");
for( i=90; i < 100; i++) PrintFormat ( " %4i %8.2f %8.2f ", i, STOX, MA_bar[ i ] );
}