Michael Meyer: ECE 301 Homework 1
Invalid language.
You need to specify a language like this: <source lang="html4strict">...</source>
Supported languages for syntax highlighting:
4cs, 6502acme, 6502kickass, 6502tasm, 68000devpac, abap, actionscript, actionscript3, ada, algol68, apache, applescript, apt_sources, arm, asm, asp, asymptote, autoconf, autohotkey, autoit, avisynth, awk, bascomavr, bash, basic4gl, bf, bibtex, blitzbasic, bnf, boo, c, c_loadrunner, c_mac, caddcl, cadlisp, cfdg, cfm, chaiscript, cil, clojure, cmake, cobol, coffeescript, cpp, cpp-qt, csharp, css, cuesheet, d, dcl, dcpu16, dcs, delphi, diff, div, dos, dot, e, ecmascript, eiffel, email, epc, erlang, euphoria, f1, falcon, fo, fortran, freebasic, freeswitch, fsharp, gambas, gdb, genero, genie, gettext, glsl, gml, gnuplot, go, groovy, gwbasic, haskell, haxe, hicest, hq9plus, html4strict, html5, icon, idl, ini, inno, intercal, io, j, java, java5, javascript, jquery, kixtart, klonec, klonecpp, latex, lb, ldif, lisp, llvm, locobasic, logtalk, lolcode, lotusformulas, lotusscript, lscript, lsl2, lua, m68k, magiksf, make, mapbasic, matlab, mirc, mmix, modula2, modula3, mpasm, mxml, mysql, nagios, netrexx, newlisp, nsis, oberon2, objc, objeck, ocaml, ocaml-brief, octave, oobas, oorexx, oracle11, oracle8, oxygene, oz, parasail, parigp, pascal, pcre, per, perl, perl6, pf, php, php-brief, pic16, pike, pixelbender, pli, plsql, postgresql, povray, powerbuilder, powershell, proftpd, progress, prolog, properties, providex, purebasic, pycon, pys60, python, q, qbasic, rails, rebol, reg, rexx, robots, rpmspec, rsplus, ruby, sas, scala, scheme, scilab, sdlbasic, smalltalk, smarty, spark, sparql, sql, stonescript, systemverilog, tcl, teraterm, text, thinbasic, tsql, typoscript, unicon, upc, urbi, uscript, vala, vb, vbnet, vedit, verilog, vhdl, vim, visualfoxpro, visualprolog, whitespace, whois, winbatch, xbasic, xml, xorg_conf, xpp, yaml, z80, zxbasic
clear all; %%Question 1. Part 1.%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% bpm = 112; delta = 0.00005; %%Note lengths. half = [0:delta:120/bpm]; quart = [0:delta:60/bpm]; eighth = [0:delta:30/bpm]; dotquart = [0:delta:90/bpm]; %%Note Frequencies. gfreq = 2^(-2/12)*440; bffreq = 2^(1/12)*440; cfreq = 2^(3/12)*440; dffreq = 2^(4/12)*440; %%Notes G = sin(2*pi*gfreq*quart); Bf = sin(2*pi*bffreq*quart); Cdq = sin(2*pi*cfreq*dotquart); Df = sin(2*pi*dffreq*eighth); Ch = sin(2*pi*cfreq*half); %%Song song = [G, Bf, Cdq, G, Bf, Df, Ch, G, Bf, Cdq, Bf, G]; sound(song, 1/delta) wavwrite(song, 1/delta, '112bpm.wav') pause(1); %%Question 1. Part 2.%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% bpmfast = 224; %%Note lengths. half = [0:delta:120/bpmfast]; quart = [0:delta:60/bpmfast]; eighth = [0:delta:30/bpmfast]; dotquart = [0:delta:90/bpmfast]; %%Notes G = sin(2*pi*gfreq*quart); Bf = sin(2*pi*bffreq*quart); Cdq = sin(2*pi*cfreq*dotquart); Df = sin(2*pi*dffreq*eighth); Ch = sin(2*pi*cfreq*half); %%Fast Song fastsong = [G, Bf, Cdq, G, Bf, Df, Ch, G, Bf, Cdq, Bf, G]; sound(fastsong, 1/delta) wavwrite(fastsong, 1/delta, '224bpm.wav') pause(1); %%Question 1. Part 3.%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% bpm = 112; delta = 0.00005; %%Note lengths. half = [0:delta:120/bpm]; quart = [0:delta:60/bpm]; eighth = [0:delta:30/bpm]; dotquart = [0:delta:90/bpm]; %%Note Frequencies. gfreq = 2^(-2/12)*440; bffreq = 2^(1/12)*440; cfreq = 2^(3/12)*440; dffreq = 2^(4/12)*440; %%Notes G = sin(4*pi*gfreq*quart); Bf = sin(4*pi*bffreq*quart); Cdq = sin(4*pi*cfreq*dotquart); Df = sin(4*pi*dffreq*eighth); Ch = sin(4*pi*cfreq*half); %%Song highsong = [G, Bf, Cdq, G, Bf, Df, Ch, G, Bf, Cdq, Bf, G]; sound(highsong, 1/delta) wavwrite(highsong, 1/delta, 'highpitch.wav') %%Combining all songs into one. combined = horzcat(1, song, fastsong, highsong); wavwrite(combined, 1/delta, 'combined.wav')
%%Question 2. %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% [Beatles, fs, N] = wavread('Beatles.wav'); RevBeatles = flipud(Beatles); sound(RevBeatles, fs) wavwrite(RevBeatles, fs, N, 'seltaeB.wav');
Output Files:
