furelise - 0 0 0 0 0 25 32 37 0 0 20 32 36 0 0 25 32 39 0 0...

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
treble = [ 56 55 56 55 56 51 54 52 49 0 40 44 49 51 0 44 48 51 52 0 44 56 55 . .. 56 55 56 51 54 52 49 0 40 44 49 51 0 44 52 51 49 0 51 52 54 56 56 47 57 56 . .. 54 54 45 56 54 52 52 44 54 52 51 0 44 56 0 0 56 68 0 0 55 56 0 0 55 56 55 . .. 56 55 56 51 54 52 49 0 40 44 49 51 0 44 48 51 52 0 44 56 55 56 55 56 51 54 52 . .. 49 0 40 44 49 51 0 44 52 51 49 0 0 0]; tre_dur = [ .5 .5 .5 .5 .5 .5 .5 .5 1 .5 .5 .5 .5 1 .5 .5 . 5 .5 1 .5 .5 .5 .5 . .. .5 .5 .5 .5 .5 .5 1 .5 .5 .5 .5 1 .5 .5 .5 .5 1 .5 .5 . 5 .5 1 .5 .5 .5 .5 . .. 1 .5 .5 .5 .5 1 .5 .5 .5 .5 1 .5 .5 .5 .5 .5 .5 .5 . 5 .5 .5 .5 .5 .5 .5 .5 .5 . .. .5 .5 .5 .5 .5 .5 1 .5 .5 .5 .5 1 .5 .5 .5 .5 1 .5 .5 . 5 .5 .5 .5 .5 .5 .5 .5 . .. 1 .5 .5 .5 .5 1 .5 .5 .5 .5 .5 .5 .5 .5]; fs = 11025; xx = zeros(1,fs*sum(tre_dur)); n1 = 1; for kk = 1:length(treble) keynum = treble(kk); k1 = tre_dur(kk)/2; tone = note(keynum,sum(tre_dur)); n2 = n1 + length(tone) - 1; xx(n1:n2) = xx(n1:n2) + tone; end bass = [ 0 0 0
Background image of page 1
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: 0 0 0 0 0 25 32 37 0 0 20 32 36 0 0 25 32 39 0 0 . .. 0 0 0 0 0 0 25 32 37 0 0 20 32 36 0 0 25 32 37 0 0 28 35 40 0 0 . .. 23 35 39 0 0 25 32 3 0 0 20 32 44 0 44 56 0 0 55 56 0 0 55 56 0 0 0 . .. 0 0 0 0 0 0 25 32 37 0 0 20 32 36 0 0 25 32 37 0 0 0 0 0 0 0 0 . .. 25 32 37 0 0 20 32 36 0 0 25 32 37 0]; bss_dur = [ .5 .5 .5 .5 .5 .5 .5 .5 .5 .5 .5 .5 1 .5 .5 .5 .5 1 .5 .5 .5 .5 1 . .. .5 .5 .5 .5 .5 .5 .5 .5 .5 .5 1 .5 .5 .5 .5 1 .5 .5 .5 .5 1 .5 .5 .5 .5 1 . .. .5 .5 .5 .5 1 .5 .5 .5 .5 1 .5 .5 .5 1 .5 .5 .5 .5 .5 .5 .5 .5 .5 .5 .5 .5 .5 . .. .5 .5 .5 .5 .5 .5 .5 .5 .5 .5 1 .5 .5 .5 .5 1 .5 .5 .5 .5 1 .5 .5 .5 .5 .5 .5 . .. .5 .5 .5 .5 1 .5 .5 .5 .5 1 .5 .5 .5 .5]; yy = zeros(1,fs*sum(bss_dur)); n1 = 1; for kk = 1:length(bass) keynum = bass(kk); k1 = bss_dur; tone = note(keynum,k1); n2 = n1 + length(tone) - 1; yy(n1:n2) = yy(n1:n2) + tone; end zz=xx+yy; soundsc(zz,fs) specgram (zz,1024,fs)...
View Full Document

This note was uploaded on 04/15/2010 for the course ECTE 906 taught by Professor Pd during the Three '10 term at University of Wollongong, Australia.

Ask a homework question - tutors are online