Program 1 : Pembangkitan Sinyal Sinus
Dibawan ini adalah sebuah percobaan untuk membangkitnkan sinyal sinus sebelum dirubah Frekuesnsi dan y1 nya.
Fs=8000;
t=0:0.001:1.0;
y1=sin(2*pi*852*t);%+sin(2*pi*1209*t);
wavplay(y1,Fs)
plot(t,y1);axis([0 0.2 -1 1]);
title('Sinyal Sinus (f=852 Hz), sampling 8000 Hz')
Gambar 1 hasil dari frekuensi 1
Setelah dirubah frekuensinya menjadi f=952 Hz maka hasilnya sebagai berikut :
Fs=9000;
t=0:0.001:1.0;
y1=sin(2*pi*952*t);%+sin(2*pi*1209*t);
wavplay(y1,Fs)
plot(t,y1);axis([0 0.2 -1 1]);
title('Sinyal Sinus (f=952 Hz), sampling 8000 Hz')
Program 2: Membangkitkan Sirine
Dibawah ini adalah sintax matlab bunyi sirine yang belum dirubah.
fs=8000;
dt=1/fs;
dur=2.8;
t=0:dt:dur;
psi=2*pi*(100 + 200*t + 500*t.*t);
xx= 7.7*sin(psi);
sound(xx,fs);
Dalam sintax ini tidak memunculkan figure gambar,namun hanya mengeluarkan bunyi sirine. Bandingkan dengan bunyi sirine dengan sintak di bawah ini. Jika ada perbedaan maka anda telah mencobanya dengan seksama dan memahaminya.
fs=12000;
dt=1/fs;
dur=2.8;
t=0:dt:dur;
psi=2*pi*(800 + 900*t + 600*t.*t);
xx= 7.7*sin(psi);
sound(xx,fs);
Program 3: Pembangkitan Nada DTMF
Dibawan ini adalah sintak untuk nada tombol pada telephone.
% Freq : 1209 | 1336 | 1477
%===========================
% 697 : 1 | 2 | 3
%---------------------------
% 770 : 4 | 5 | 6
%---------------------------
% 852 : 7 | 8 | 9
%---------------------------
% 941 : * | 0 | #
%---------------------------
Fs=8000; t=0:0.001:1.5;
y1=sin(2*pi*852*t)+sin(2*pi*1209*t);
y2=sin(2*pi*770*t)+sin(2*pi*1477*t);
y3=sin(2*pi*770*t)+sin(2*pi*1477*t);
y4=sin(2*pi*697*t)+sin(2*pi*1209*t);
y5=sin(2*pi*697*t)+sin(2*pi*1336*t);
y6=sin(2*pi*697*t)+sin(2*pi*1209*t);
y7=sin(2*pi*941*t)+sin(2*pi*1477*t);
wavplay(y1,Fs)
wavplay(y2,Fs)
wavplay(y3,Fs)
wavplay(y4,Fs)
wavplay(y5,Fs)
wavplay(y6,Fs)
wavplay(y7,Fs)
Jika Fs diganti menjadi ukuran lebih kecil maka bunyi nada akan diperlambat namun jika ditambah menjadi diatas Fs=8000 maka akan mempercepat nadanya.
Misal :
% Freq : 1209 | 1336 | 1477
%===========================
% 697 : 1 | 2 | 3
%---------------------------
% 770 : 4 | 5 | 6
%---------------------------
% 852 : 7 | 8 | 9
%---------------------------
% 941 : * | 0 | #
%---------------------------
Fs=5000; t=0:0.001:1.5;
y1=sin(2*pi*770*t)+sin(2*pi*1209*t);
y2=sin(2*pi*852*t)+sin(2*pi*1477*t);
y3=sin(2*pi*697*t)+sin(2*pi*1477*t);
y4=sin(2*pi*770*t)+sin(2*pi*1209*t);
y5=sin(2*pi*697*t)+sin(2*pi*1336*t);
y6=sin(2*pi*941*t)+sin(2*pi*1209*t);
y7=sin(2*pi*697*t)+sin(2*pi*1336*t);
wavplay(y1,Fs)
wavplay(y2,Fs)
wavplay(y3,Fs)
wavplay(y4,Fs)
wavplay(y5,Fs)
wavplay(y6,Fs)
wavplay(y7,Fs)
ini adalah contoh nada yang diperlambat.
Ø Yang berwana merah adalah jumlah kecepatan nada
Ø Yang berwarna hijau adalah frekuensi angka/tombol pada telephone
Ø Yang berwana biru adalah
Program 4: Memanggil contoh suara yang ada di Matlab
%SOUND(Y,FS,BITS) plays the sound using BITS bits/sample if possible.
%Most platforms support BITS=8 or 16.
clear all;
load laughter %memanggil audio data (MAT files).
sound(y,Fs)
Ini adalah sintax dimana kita bisa memangil suara yang ada pada matlab. Jika mat files nya diganti dengan train maka akan menghasilkan bunyi kereta.
Contoh :
%SOUND(Y,FS,BITS) plays the sound using BITS bits/sample if possible.
%Most platforms support BITS=8 or 16.
clear all;
load train %memanggil audio data (MAT files).
sound(y,Fs)
anada juga bisa mengubah mat files nya dengan nada-nada sebaperti chirp, gong, handel, dan splat. Silahkan mencobanya.
Program 5: Memanggil file *.wav
clear all;
[y, fs, nbits] = wavread('file_aiueo.wav'); %read in the wav file
sound(y,fs) %play back the wav file
tt=length(y);
t=1:tt;
plot(t,y) %plot the original waveform
grid
Coba jalankan sintak berikut. Namun sebelumnya anda harus mengganti file wav yang akan anda gunakan. Contoh :
clear all;
[y, fs, nbits] = wavread('Wondercall.wav'); %read in the wav file
sound(y,fs) %play back the wav file
tt=length(y);
t=1:tt;
plot(t,y) %plot the original waveform
grid
Program 6: Recording Sinyal Wicara
%WAVRECORD(N,FS,CH) me-record N sampel audio pada frekuensi FS Hertz
%dari CH channel input yang disediakan Windows WAVE audio device.
%Standar audio rate adalah 8000, 11025, 22050, dan 44100 Hz.
%Sample-sampel dikembalikan dalam suatu matrik dengan ukuran N x CH.
%Jika tidak ditetapkan maka, secara default FS=11025 Hz, dan CH=1.
clear all;
fs = 8000;
y = wavrecord(0.8*fs, fs, 'double');
wavplay(y,fs);
wavwrite(y,fs,’aaa.wav’);
t=1:length(y);
plot(t/fs,y)
grid on
title('Hasil Perekaman Suara')
ylabel('Nilai')
xlabel('waktu (detik)')
0 komentar:
Posting Komentar