Peter Cooper
/
diags
test code for our MBED board
sound.c@1:6877bb99aa17, 2011-05-04 (annotated)
- Committer:
- lolpcc
- Date:
- Wed May 04 08:30:52 2011 +0000
- Revision:
- 1:6877bb99aa17
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
lolpcc | 1:6877bb99aa17 | 1 | #include "mbed.h" |
lolpcc | 1:6877bb99aa17 | 2 | #include "Synth.h" |
lolpcc | 1:6877bb99aa17 | 3 | Synth s(p18); |
lolpcc | 1:6877bb99aa17 | 4 | void fly_me_to_the_moon(Synth *s) { |
lolpcc | 1:6877bb99aa17 | 5 | //Fly me to the moon |
lolpcc | 1:6877bb99aa17 | 6 | s->add_note(NOTE_C5, 1.5); |
lolpcc | 1:6877bb99aa17 | 7 | s->add_note(NOTE_B4, 0.5); |
lolpcc | 1:6877bb99aa17 | 8 | s->add_note(NOTE_A4, 0.5); |
lolpcc | 1:6877bb99aa17 | 9 | s->add_note(NOTE_G4, 0.5); |
lolpcc | 1:6877bb99aa17 | 10 | s->add_note(NOTE_F4, 1.5); |
lolpcc | 1:6877bb99aa17 | 11 | s->add_note(NOTE_G4, 0.5); |
lolpcc | 1:6877bb99aa17 | 12 | s->add_note(NOTE_A4, 0.5); |
lolpcc | 1:6877bb99aa17 | 13 | s->add_note(NOTE_C5, 0.5); |
lolpcc | 1:6877bb99aa17 | 14 | s->add_note(NOTE_B4, 1.5); |
lolpcc | 1:6877bb99aa17 | 15 | s->add_note(NOTE_A4, 0.5); |
lolpcc | 1:6877bb99aa17 | 16 | s->add_note(NOTE_G4, 0.5); |
lolpcc | 1:6877bb99aa17 | 17 | s->add_note(NOTE_F4, 0.5); |
lolpcc | 1:6877bb99aa17 | 18 | s->add_note(NOTE_E4, 3); |
lolpcc | 1:6877bb99aa17 | 19 | s->add_note(NOTE_A4, 1.5); |
lolpcc | 1:6877bb99aa17 | 20 | s->add_note(NOTE_G4, 0.5); |
lolpcc | 1:6877bb99aa17 | 21 | s->add_note(NOTE_F4, 0.5); |
lolpcc | 1:6877bb99aa17 | 22 | s->add_note(NOTE_E4, 0.5); |
lolpcc | 1:6877bb99aa17 | 23 | s->add_note(NOTE_D4, 1.5); |
lolpcc | 1:6877bb99aa17 | 24 | s->add_note(NOTE_E4, 0.5); |
lolpcc | 1:6877bb99aa17 | 25 | s->add_note(NOTE_F4, 0.5); |
lolpcc | 1:6877bb99aa17 | 26 | s->add_note(NOTE_A4, 0.5); |
lolpcc | 1:6877bb99aa17 | 27 | s->add_note(NOTE_A_FLAT4, 1.5); |
lolpcc | 1:6877bb99aa17 | 28 | s->add_note(NOTE_F4, 0.5); |
lolpcc | 1:6877bb99aa17 | 29 | s->add_note(NOTE_E4, 0.5); |
lolpcc | 1:6877bb99aa17 | 30 | s->add_note(NOTE_D4, 0.5); |
lolpcc | 1:6877bb99aa17 | 31 | s->add_note(NOTE_C4, 2); |
lolpcc | 1:6877bb99aa17 | 32 | s->add_note(NOTE_C_SHARP4, 1); |
lolpcc | 1:6877bb99aa17 | 33 | s->add_note(NOTE_D4, 0.5); |
lolpcc | 1:6877bb99aa17 | 34 | s->add_note(NOTE_A4, 0.5); |
lolpcc | 1:6877bb99aa17 | 35 | s->add_note(NOTE_A4, 3); |
lolpcc | 1:6877bb99aa17 | 36 | s->add_note(NOTE_C5, 1); |
lolpcc | 1:6877bb99aa17 | 37 | s->add_note(NOTE_B4, 1); |
lolpcc | 1:6877bb99aa17 | 38 | s->add_note(NOTE_G4, 5); |
lolpcc | 1:6877bb99aa17 | 39 | s->add_note(NOTE_B3, 1); |
lolpcc | 1:6877bb99aa17 | 40 | s->add_note(NOTE_C4, 0.5); |
lolpcc | 1:6877bb99aa17 | 41 | s->add_note(NOTE_F4, 0.5); |
lolpcc | 1:6877bb99aa17 | 42 | s->add_note(NOTE_F4, 3); |
lolpcc | 1:6877bb99aa17 | 43 | s->add_note(NOTE_A4, 1); |
lolpcc | 1:6877bb99aa17 | 44 | s->add_note(NOTE_G4, 1); |
lolpcc | 1:6877bb99aa17 | 45 | s->add_note(NOTE_F4, 1); |
lolpcc | 1:6877bb99aa17 | 46 | s->add_note(NOTE_E4, 5); |
lolpcc | 1:6877bb99aa17 | 47 | s->add_note(NOTE_C5, 1.5); |
lolpcc | 1:6877bb99aa17 | 48 | s->add_note(NOTE_B4, 0.5); |
lolpcc | 1:6877bb99aa17 | 49 | s->add_note(NOTE_A4, 0.5); |
lolpcc | 1:6877bb99aa17 | 50 | s->add_note(NOTE_G4, 0.5); |
lolpcc | 1:6877bb99aa17 | 51 | s->add_note(NOTE_F4, 1.5); |
lolpcc | 1:6877bb99aa17 | 52 | s->add_note(NOTE_G4, 0.5); |
lolpcc | 1:6877bb99aa17 | 53 | s->add_note(NOTE_A4, 0.5); |
lolpcc | 1:6877bb99aa17 | 54 | s->add_note(NOTE_C5, 0.5); |
lolpcc | 1:6877bb99aa17 | 55 | s->add_note(NOTE_B4, 1.5); |
lolpcc | 1:6877bb99aa17 | 56 | s->add_note(NOTE_A4, 0.5); |
lolpcc | 1:6877bb99aa17 | 57 | s->add_note(NOTE_G4, 0.5); |
lolpcc | 1:6877bb99aa17 | 58 | s->add_note(NOTE_F4, 0.5); |
lolpcc | 1:6877bb99aa17 | 59 | s->add_note(NOTE_E4, 3); |
lolpcc | 1:6877bb99aa17 | 60 | s->add_note(NOTE_A4, 1.5); |
lolpcc | 1:6877bb99aa17 | 61 | s->add_note(NOTE_G4, 0.5); |
lolpcc | 1:6877bb99aa17 | 62 | s->add_note(NOTE_F4, 0.5); |
lolpcc | 1:6877bb99aa17 | 63 | s->add_note(NOTE_E4, 0.5); |
lolpcc | 1:6877bb99aa17 | 64 | s->add_note(NOTE_D4, 1.5); |
lolpcc | 1:6877bb99aa17 | 65 | s->add_note(NOTE_E4, 0.5); |
lolpcc | 1:6877bb99aa17 | 66 | s->add_note(NOTE_F4, 0.5); |
lolpcc | 1:6877bb99aa17 | 67 | s->add_note(NOTE_G4, 0.5); |
lolpcc | 1:6877bb99aa17 | 68 | s->add_note(NOTE_A_FLAT4, 1.5); |
lolpcc | 1:6877bb99aa17 | 69 | s->add_note(NOTE_F4, 0.5); |
lolpcc | 1:6877bb99aa17 | 70 | s->add_note(NOTE_E4, 0.5); |
lolpcc | 1:6877bb99aa17 | 71 | s->add_note(NOTE_D4, 0.5); |
lolpcc | 1:6877bb99aa17 | 72 | s->add_note(NOTE_C4, 2); |
lolpcc | 1:6877bb99aa17 | 73 | s->add_note(NOTE_C_SHARP4, 1); |
lolpcc | 1:6877bb99aa17 | 74 | s->add_note(NOTE_D4, 0.5); |
lolpcc | 1:6877bb99aa17 | 75 | s->add_note(NOTE_A4, 0.5); |
lolpcc | 1:6877bb99aa17 | 76 | s->add_note(NOTE_A4, 3); |
lolpcc | 1:6877bb99aa17 | 77 | s->add_note(NOTE_C5, 1); |
lolpcc | 1:6877bb99aa17 | 78 | s->add_note(NOTE_B4, 1); |
lolpcc | 1:6877bb99aa17 | 79 | s->add_note(NOTE_G4, 5); |
lolpcc | 1:6877bb99aa17 | 80 | s->add_note(NOTE_A_FLAT4, 1); |
lolpcc | 1:6877bb99aa17 | 81 | s->add_note(NOTE_A4, 0.5); |
lolpcc | 1:6877bb99aa17 | 82 | s->add_note(NOTE_C4, 0.5); |
lolpcc | 1:6877bb99aa17 | 83 | s->add_note(NOTE_C4, 3); |
lolpcc | 1:6877bb99aa17 | 84 | s->add_note(NOTE_C4, 1); |
lolpcc | 1:6877bb99aa17 | 85 | s->add_note(NOTE_D4, 1); |
lolpcc | 1:6877bb99aa17 | 86 | s->add_note(NOTE_C4, 3); |
lolpcc | 1:6877bb99aa17 | 87 | } |
lolpcc | 1:6877bb99aa17 | 88 | int sound(void) |
lolpcc | 1:6877bb99aa17 | 89 | { |
lolpcc | 1:6877bb99aa17 | 90 | PluckedGuitar *g = new PluckedGuitar(); |
lolpcc | 1:6877bb99aa17 | 91 | s.set_bpm(200); |
lolpcc | 1:6877bb99aa17 | 92 | s.set_instrument(g); |
lolpcc | 1:6877bb99aa17 | 93 | fly_me_to_the_moon(&s); |
lolpcc | 1:6877bb99aa17 | 94 | s.set_repeat(true); |
lolpcc | 1:6877bb99aa17 | 95 | s.play(); |
lolpcc | 1:6877bb99aa17 | 96 | return(0); |
lolpcc | 1:6877bb99aa17 | 97 | } |