m-files fixed wavwrite

This commit is contained in:
2025-08-22 13:39:23 +02:00
parent 21411d2c56
commit 2ab8c68c9b
4 changed files with 21 additions and 18 deletions
+4 -4
View File
@@ -9,7 +9,7 @@ df = (fend-fstart)/L;
fcut = 16000;
x = (0:Nb*Nphases-1) - (Nb*Nphases-1)/2;
H = sinc(2*fcut/fs.*x/Nphases);%.*Kaiser(Nphases*Nb, 8)';
H = sinc(2*fcut/fs.*x/Nphases);%.*kaiser(Nphases*Nb, 8)';
Hw = kaiser(Nb, 18)';
for ii=0:Nphases-1,
@@ -62,7 +62,7 @@ plot(saw); grid;
figure;
plot(saw_nodc); grid;
wavw16(0.8*blit, fs, 'blit.wav');
wavw16(0.7*saw_nodc, fs, 'saw.wav');
wavw16(0.5*sqr_nodc, fs, 'sqr.wav');
wavwrite(0.8*blit, fs, 'blit.wav');
wavwrite(0.7*saw_nodc, fs, 'saw.wav');
wavwrite(0.5*sqr_nodc, fs, 'sqr.wav');