malam ini, ane mau urhat soal MATLAB, berhubung ane lagi rada males nulis, langsung aja ya ...
1. Memanggil file .WAV lewat matlab.
ini dia mantranya
%Oleh: Isneni Nur Hasanah %Lab Pengolah Sinyal, EEPIS-ITS
clear all;
[y, fs, nbits] = wavread('Rock Mafia & Miley Cyrus - The Big Bang.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
hasilnya ... tara ...
2. Suara Sirine Mobil
%File Name:sirine.m %Oleh: Isneni Nur Hasanah
fs=8000;
dt=5/fs;
dur=50;
t=0:dt:dur;
psi=2*pi*(100 + 200*t + 500*t.*t);
xx= 7.7*sin(psi);
sound(xx,fs);
3. Suara Telpon putus
%Oleh: Isneni Nur Hasanah %Lab Pengolah Sinyal, EEPIS-ITS %===========================
% Freq : 1209 | 1336 | 1477
%===========================
% 697 : 1 | 2 | 3 %---------------------------
% 770 : 4 | 5 | 6 %---------------------------
% 852 : 7 | 8 | 9 %---------------------------
% 941 : * | 0 | # %---------------------------
Fs=5000; t=0:0.001:2.5;
y1=sin(3*pi*200*t)+sin(1*pi*8890*t);
y2=sin(3*pi*200*t)+sin(1*pi*8890*t);
y3=sin(3*pi*200*t)+sin(1*pi*8890*t);
y4=sin(3*pi*200*t)+sin(1*pi*8890*t);
wavplay(y1,Fs)
wavplay(y2,Fs)
wavplay(y3,Fs)
wavplay(y4,Fs)
4. Merekam Suara
clear all;
fs = 8000;
y = wavrecord(0.8*fs, fs, 'double');
wavplay(y,fs);
wavwrite(y,fs,'moe.wav');
t=1:length(y);
plot(t/fs,y)
grid on
title('Hasil Perekaman Suara')
ylabel('Nilai')
xlabel('waktu (detik)')
Dan
yah, semua mantra yang ada di dapat dari MR. Dosen, dan saya hanya merubah angka dalam mantra itu sahaja ... terimakasih sudah menyimak ... ^^
