Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
ΠΑΡΑΡΤΗΜΑ Α 157<br />
case{'Y','y'}<br />
x=input('Θες να ηχογραφήσεις το πρώτο παράδειγμα για το<br />
μουσικό όργανο No 4; Y(για ΝΑΙ)/N(για ΟΧΙ)','s')<br />
while x13<br />
switch x<br />
case {'Y','y'}<br />
while running<br />
y=input('Έτοιμος/η για ηχογράφηση; Y/N','s')<br />
switch y<br />
case {'Y','y'}<br />
disp('Ηχογράφηση')<br />
y1=wavrecord(handles.diarkeiarec1*fs,fs);<br />
wavwrite(y1,'M041.wav');<br />
disp('Αποθηκεύτηκε ως MO41.wav')<br />
x123456=wavread('Hxosgiaprogramma.wav');<br />
sound(0.5*x123456);<br />
running=0;<br />
epdcode(y1);<br />
x='N'<br />
z1=1;<br />
while z1<br />
y=input('Θες να ξανακάνεις την ηχογράφηση;<br />
Y(για ΝΑΙ) or N(για ΟΧΙ)','s')<br />
switch y<br />
case {'Y','y'}<br />
disp('Ηχογράφηση')<br />
y1=wavrecord(handles.diarkeiarec1*fs,fs);<br />
wavwrite(y1,'MO41.wav');<br />
disp('Αποθηκεύτηκε ως MO41.wav')<br />
x123456=wavread('Hxosgiaprogramma.wav');<br />
sound(0.5*x123456);<br />
running=0;<br />
epdcode(y1);<br />
case {'N','n'}<br />
z1=0;<br />
end<br />
end<br />
case {'N','n'}<br />
running=1;<br />
otherwise<br />
disp('Λάθος κουμπί, πάτα Y για ΝΑΙ ή N<br />
για ΟΧΙ')<br />
end<br />
end<br />
case {'N','n'}<br />
x13=0;<br />
running=1;<br />
x=input('Θες να συνεχίσεις τις ηχογραφήσεις; Y(για<br />
ΝΑΙ)/N(για ΟΧΙ)','s')<br />
switch x<br />
case {'N','n'}<br />
case{'Y','y'}<br />
x=input('Θες να ηχογραφήσεις το δεύτερο παράδειγμα για το<br />
μουσικό όργανο No 4; Y(για ΝΑΙ)/N(για ΟΧΙ)','s')<br />
while x14