clear;

[Y, Fs, Bits] = wavread('s13104.wav'); % ‰¹Œ¹“Ç‚Ý�ž‚Ý
whos

wavplay(Y,Fs);

L = floor(size(Y,1)/2)

X = zeros(L,1);
X(1:L,1) = (Y(1:L,1)+ Y((L+1):(2*L),1))/2; % �¶‰E�¬‚º�‡‚í‚¹
wavplay(X, Fs);
wavwrite(X, Fs, Bits, 'wine1.wav');


X = zeros(L,2);

X(1:L,1) = Y(1:L,1);  % �¶ƒ`ƒƒƒ“ƒlƒ‹
X(1:L,2) = Y((L+1):(2*L),1); % ‰Eƒ`ƒƒƒ“ƒlƒ‹

wavplay(X, Fs);

wavwrite(X, Fs, Bits, 'wine2.wav');


