FXLMS Algorithm - Periodic noise cancellation
#define taps 8
#define Hz 0.763
#define mu 8e-3
#define Pz 0.817
void main()
{
float c[taps], y[taps], xn[10], x1[taps],
x[taps], w[taps], yn, rn, en, e_n, j, val;
int reg[14] = { 0,1, 0,0,0,0, 0,1,0,0, 0,1,0,1
};
int i, k, l=0, shift, value=0;
clrscr();
for( i=0; i<taps; i++ )
x1[i] = w[i]
= x[i] = c[i] = y[i] = 0;
for( i=0; i<200; i++ )
{
shift = (reg[0]
^ reg[2]) ^ (reg[9] ^ reg[11]);
for( k=13; k>0;
k-- )
reg[k] = reg[k-1];
reg[0] = shift;
for( k=13; k>=0;
k-- )
value += reg[k] * pow( 2, k );
value = value
- 8192;
yn = 5.0/8192
* value;
value = 0;
en = Hz * yn;
for( k=taps-1;
k>0; k-- )
y[k] = y[k-1];
y[0] = yn;
rn = 0;
for( k=0; k<taps;
k++ )
rn += c[k] * y[k];
e_n = en - rn;
for( k=0; k<taps;
k++ )
c[k] = c[k] + ( mu * e_n * y[k] );
}
for( i=0,j=0; j<=5e-3; j+=5e-4,i++ )
{
val = 5 * sin(
2*3.142*200*j );
xn[i] = val;
}
for( i=0; i<300; i++ )
{
for( k=taps-1;
k>0; k-- )
x[k] = x[k-1];
x[0] = xn[l];
en = Hz*Pz*x[0];
for( k=taps-1;
k>0; k-- )
x1[k] = x1[k-1];
x1[0] = 0;
for( k=0; k<taps;
k++ )
x1[0] += c[k] * x[k];
yn = 0;
for( k=0; k<taps;
k++ )
yn += w[k] * x[k];
rn = yn*Hz;
e_n = en + rn;
for( k=0; k<taps;
k++ )
w[k] = w[k] - ( mu * e_n * x1[k] );
printf( "%.2f\n", en );
l++;
l = l>9 ? 0
: l;
}
}