MATLAB

Halo selamat malam, malam-malam begini moe harus tetep bangun buat ngerjain tugas AOK dari MR. Dosen, hehe, sebenernya sih udah dari minggu kemaren, tapi lagi sibuk di UKM (cieh, curcol).
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 ... ^^