Selasa, 24 Mei 2011

FILE AUDIO MENGGUNAKAN MATLAB

file ini digunkan untuk melihat gelombang sinus dengan menggunakan software matlab dengan menggunakan frekuensi 10000.
berikut adalah programnya.


%File Name: sinus.m
%oleh: denova
Fs=10000;
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')

jika kita benar mengetiknya maka akan dihasilkan gambar seperti berikut:


  1. Bunyi Sirine

%File Name:nada_02.m
%Oleh: denova
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);
Bila fs dirubah menjadi lebih besar maka suara audionya kan semakin kenceng dan sebaliknya.

  1. Pembangkitan Nada
  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)

Program diatas menghasilkan bunyi telepon bila Fs diubah lebih besar dari contoh diatas maka hasilnya lebih bagus & nyaring,jika sebaliknya dirubah lebih rendah maka hasil pelan & tidak nyaring.


  1. Memanggil Contoh Suara yang ada di Matlab

%File Name: suara.m
%Oleh: denova
%Lab Pengolah Sinyal, EEPIS - ITS
%SOUND(Y,FS,BITS) plays the sound using BITS bits/sample if possible.
%Most platforms support BITS=8 or 16.
clear all;
load chirp %memanggil audio data (MAT files).
sound(y,Fs)


Hasil program diatas akan muncul suara burung,bila dirubah gong maka hasil bunyi gong,splat hasil bunyi benda jatuh, train hasil bunyi kereta.
  
E.Menciptakan Kreasi Bunyi dan Membuat Plot

fs = 8100;                    % sampling rate
T = 8/fs;                      % sampling period
t = [0:T:0.80];                % time vector       (panjang waktu)

f1 = 48;                       % frequency in Hertz (frekuensi)
omega1 = 2*pi*f1;              % angular frequency in radians

phi = 2*pi*0.90;               % arbitrary phase offset = 3/4 cycle
x1 = cos(omega1*t + phi);      % sinusoidal signal, amplitude = 1

plot(t, x1);                   % plot the signal
xlabel('Time (seconds)');
ylabel('x1');
title('Simple Sinusoid');

sound(90*x1, fs);             % play the signal; Menentukan hasil suara, semakin besar angka untuk memainkannya, semakin lama & nyaring bunyi yang dihasilkan.

Hasil plot :