Line 1: | Line 1: | ||
+ | [[Homework 1_ECE301Fall2008mboutin]] | ||
+ | |||
+ | >[[HW1.1 Allen Humphreys_ECE301Fall2008mboutin| 1.1]] >[[HW1.2 Allen Humphreys_ECE301Fall2008mboutin| 1.2]] >[[HW1.3 Allen Humphreys_ECE301Fall2008mboutin| 1.3]] >[[HW1.4 Allen Humphreys_ECE301Fall2008mboutin| 1.4]] >[[HW1.5 Allen Humphreys_ECE301Fall2008mboutin| 1.5]] | ||
+ | |||
==M-file== | ==M-file== | ||
Revision as of 18:20, 5 September 2008
Homework 1_ECE301Fall2008mboutin
M-file
%Allen Humphreys %ECE301 %HW1.1 clear; clc; delta = 0.00005; %time between samples %Define the notes A = 220; Af = 207.65; Bf = 233.08; B = 246.94; C = 261.63; Df = 277.18; D = 293.66; Ef = 311.13; E = 329.63; F = 349.23; G = 392.00; R = 0; s = .75; %a scale factor W = 1 ; %desired play time for a whole note TQ = .75; H = .5 ; Q = .25; %create a vector corresponding to the sound song = []; notes= [Ef F G Af Bf C C Df Df Df Af Bf B C C R C Bf Af Bf ... C C Bf F G Af G F Bf Ef Ef R F G A Bf C C C Df ... Df Af Bf C F G Af R F Ef Af C Ef F C Bf Af Af]; duration = [W H H TQ Q H H H Q Q H Q Q W H H W H H T ... Q H H H Q Q H Q Q W H H TQ Q H H TQ Q H Q ... Q H H H H W H TQ H Q H H H H H H TQ Q TQ Q W H]; for i=1:1:length(notes) %each for loop generates a part of the song, this does part a t=(0:delta:(duration(i)*s)); %vector for length of notes note = sin(2*pi*notes(i)*t); %generates the discrete vector to represent the note song = [song note]; %concantenates each of the prior notes end s = .5*s; %changing the scaling factor by 1/2 doubles the speed of the song for i=1:1:length(notes) %part b t = (0:delta:(duration(i)*s)); note = sin(2*pi*notes(i)*t); song = [song note]; end s = .75; for i=1:1:length(notes) %part c t = (0:delta:(duration(i)*s)); note = sin(2*pi*notes(i)*t*2); %replace t by t*2 to get a time crunch song = [song note]; end sound (song, (1/(delta))); %play the sound