%% DCT 信号処理
% Tom Wada
% 2011/6/27


%% 17-10 
% 
clear
Fs=8000;%サンプリング周波数
N=16;
% 
C=[0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1]';
wave=idct(C);
plot(wave);
wave2=[wave;wave(16:-1:1)]
plot(wave2);
longwave=[];
for I=1:500
    longwave=[longwave;wave2];
end
sound(longwave, Fs);