Leong Kum Loong (NYP) / tone_h

Dependents:   Tone_Example

Committer:
reesey
Date:
Sun Nov 19 10:03:55 2017 +0000
Revision:
1:3b00679c208a
Parent:
0:2b4c66b3f6aa
Child:
2:7f2974b69b48
tone.h; Written by Leong Kum Loong.; 19 Nov 2017, REV. 1;

Who changed what in which revision?

UserRevisionLine numberNew contents of line
reesey 0:2b4c66b3f6aa 1 #include "mbed.h"
reesey 0:2b4c66b3f6aa 2 #include "tone.h"
reesey 0:2b4c66b3f6aa 3 /*
reesey 0:2b4c66b3f6aa 4 tone.h
reesey 0:2b4c66b3f6aa 5 Written by Leong Kum Loong.
reesey 1:3b00679c208a 6 19 Nov 2017, REV. 1
reesey 0:2b4c66b3f6aa 7
reesey 0:2b4c66b3f6aa 8 All routines and functions in this library are written by me solely with the purpose
reesey 0:2b4c66b3f6aa 9 of implementing an identical "tone" library that was introduced by Arduino IDE.
reesey 1:3b00679c208a 10
reesey 1:3b00679c208a 11 Example reference from Github
reesey 1:3b00679c208a 12 ===============================
reesey 1:3b00679c208a 13 The mario_example routine "notes" are reference to the work of Gregory Kielian.
reesey 1:3b00679c208a 14 The starwars_example routine "notes" are reference to the work of nicksort.
reesey 0:2b4c66b3f6aa 15 */
reesey 0:2b4c66b3f6aa 16
reesey 0:2b4c66b3f6aa 17 PwmOut speaker(p26);
reesey 0:2b4c66b3f6aa 18
reesey 1:3b00679c208a 19 //Note for starwars_example.
reesey 1:3b00679c208a 20 int c = 261, d = 294, e = 329, f = 349, g = 391, gS = 415, a = 440, aS = 455, b = 466, cH = 523;
reesey 1:3b00679c208a 21 int cSH = 554, dH = 587, dSH = 622, eH = 659, fH = 698, fSH = 740, gH = 784, gSH = 830, aH = 880;
reesey 1:3b00679c208a 22
reesey 0:2b4c66b3f6aa 23 void tone(int frequency, int duration_ms){
reesey 0:2b4c66b3f6aa 24 float period = (float)1/(float)frequency;
reesey 0:2b4c66b3f6aa 25 speaker.period(period);
reesey 0:2b4c66b3f6aa 26 speaker.pulsewidth(period/(float)(2));
reesey 0:2b4c66b3f6aa 27 wait_ms(duration_ms); //If tone sounds weird, try modify delay here.
reesey 0:2b4c66b3f6aa 28 speaker = 0;
reesey 0:2b4c66b3f6aa 29 }
reesey 0:2b4c66b3f6aa 30
reesey 0:2b4c66b3f6aa 31 static void delay(int millis){
reesey 0:2b4c66b3f6aa 32 wait_ms(millis * 0.7); //If play speed sounds weird, try modify delay here.
reesey 0:2b4c66b3f6aa 33 }
reesey 0:2b4c66b3f6aa 34
reesey 1:3b00679c208a 35 void mario_example(){
reesey 1:3b00679c208a 36 tone(660,100);
reesey 1:3b00679c208a 37 delay(150);
reesey 1:3b00679c208a 38 tone(660,100);
reesey 1:3b00679c208a 39 delay(300);
reesey 1:3b00679c208a 40 tone(660,100);
reesey 1:3b00679c208a 41 delay(300);
reesey 1:3b00679c208a 42 tone(510,100);
reesey 1:3b00679c208a 43 delay(100);
reesey 1:3b00679c208a 44 tone(660,100);
reesey 1:3b00679c208a 45 delay(300);
reesey 1:3b00679c208a 46 tone(770,100);
reesey 1:3b00679c208a 47 delay(550);
reesey 1:3b00679c208a 48 tone(380,100);
reesey 1:3b00679c208a 49 delay(575);
reesey 1:3b00679c208a 50
reesey 1:3b00679c208a 51 tone(510,100);
reesey 1:3b00679c208a 52 delay(450);
reesey 1:3b00679c208a 53 tone(380,100);
reesey 1:3b00679c208a 54 delay(400);
reesey 1:3b00679c208a 55 tone(320,100);
reesey 1:3b00679c208a 56 delay(500);
reesey 1:3b00679c208a 57 tone(440,100);
reesey 1:3b00679c208a 58 delay(300);
reesey 1:3b00679c208a 59 tone(480,80);
reesey 1:3b00679c208a 60 delay(330);
reesey 1:3b00679c208a 61 tone(450,100);
reesey 1:3b00679c208a 62 delay(150);
reesey 1:3b00679c208a 63 tone(430,100);
reesey 1:3b00679c208a 64 delay(300);
reesey 1:3b00679c208a 65 tone(380,100);
reesey 1:3b00679c208a 66 delay(200);
reesey 1:3b00679c208a 67 tone(660,80);
reesey 1:3b00679c208a 68 delay(200);
reesey 1:3b00679c208a 69 tone(760,50);
reesey 1:3b00679c208a 70 delay(150);
reesey 1:3b00679c208a 71 tone(860,100);
reesey 1:3b00679c208a 72 delay(300);
reesey 1:3b00679c208a 73 tone(700,80);
reesey 1:3b00679c208a 74 delay(150);
reesey 1:3b00679c208a 75 tone(760,50);
reesey 1:3b00679c208a 76 delay(350);
reesey 1:3b00679c208a 77 tone(660,80);
reesey 1:3b00679c208a 78 delay(300);
reesey 1:3b00679c208a 79 tone(520,80);
reesey 1:3b00679c208a 80 delay(150);
reesey 1:3b00679c208a 81 tone(580,80);
reesey 1:3b00679c208a 82 delay(150);
reesey 1:3b00679c208a 83 tone(480,80);
reesey 1:3b00679c208a 84 delay(500);
reesey 0:2b4c66b3f6aa 85
reesey 1:3b00679c208a 86 tone(510,100);
reesey 1:3b00679c208a 87 delay(450);
reesey 1:3b00679c208a 88 tone(380,100);
reesey 1:3b00679c208a 89 delay(400);
reesey 1:3b00679c208a 90 tone(320,100);
reesey 1:3b00679c208a 91 delay(500);
reesey 1:3b00679c208a 92 tone(440,100);
reesey 1:3b00679c208a 93 delay(300);
reesey 1:3b00679c208a 94 tone(480,80);
reesey 1:3b00679c208a 95 delay(330);
reesey 1:3b00679c208a 96 tone(450,100);
reesey 1:3b00679c208a 97 delay(150);
reesey 1:3b00679c208a 98 tone(430,100);
reesey 1:3b00679c208a 99 delay(300);
reesey 1:3b00679c208a 100 tone(380,100);
reesey 1:3b00679c208a 101 delay(200);
reesey 1:3b00679c208a 102 tone(660,80);
reesey 1:3b00679c208a 103 delay(200);
reesey 1:3b00679c208a 104 tone(760,50);
reesey 1:3b00679c208a 105 delay(150);
reesey 1:3b00679c208a 106 tone(860,100);
reesey 1:3b00679c208a 107 delay(300);
reesey 1:3b00679c208a 108 tone(700,80);
reesey 1:3b00679c208a 109 delay(150);
reesey 1:3b00679c208a 110 tone(760,50);
reesey 1:3b00679c208a 111 delay(350);
reesey 1:3b00679c208a 112 tone(660,80);
reesey 1:3b00679c208a 113 delay(300);
reesey 1:3b00679c208a 114 tone(520,80);
reesey 1:3b00679c208a 115 delay(150);
reesey 1:3b00679c208a 116 tone(580,80);
reesey 1:3b00679c208a 117 delay(150);
reesey 1:3b00679c208a 118 tone(480,80);
reesey 1:3b00679c208a 119 delay(500);
reesey 0:2b4c66b3f6aa 120
reesey 1:3b00679c208a 121 tone(500,100);
reesey 1:3b00679c208a 122 delay(300);
reesey 1:3b00679c208a 123
reesey 1:3b00679c208a 124 tone(760,100);
reesey 1:3b00679c208a 125 delay(100);
reesey 1:3b00679c208a 126 tone(720,100);
reesey 1:3b00679c208a 127 delay(150);
reesey 1:3b00679c208a 128 tone(680,100);
reesey 1:3b00679c208a 129 delay(150);
reesey 1:3b00679c208a 130 tone(620,150);
reesey 1:3b00679c208a 131 delay(300);
reesey 1:3b00679c208a 132
reesey 1:3b00679c208a 133 tone(650,150);
reesey 1:3b00679c208a 134 delay(300);
reesey 1:3b00679c208a 135 tone(380,100);
reesey 1:3b00679c208a 136 delay(150);
reesey 1:3b00679c208a 137 tone(430,100);
reesey 1:3b00679c208a 138 delay(150);
reesey 0:2b4c66b3f6aa 139
reesey 1:3b00679c208a 140 tone(500,100);
reesey 1:3b00679c208a 141 delay(300);
reesey 1:3b00679c208a 142 tone(430,100);
reesey 1:3b00679c208a 143 delay(150);
reesey 1:3b00679c208a 144 tone(500,100);
reesey 1:3b00679c208a 145 delay(100);
reesey 1:3b00679c208a 146 tone(570,100);
reesey 1:3b00679c208a 147 delay(220);
reesey 1:3b00679c208a 148
reesey 1:3b00679c208a 149 tone(500,100);
reesey 1:3b00679c208a 150 delay(300);
reesey 0:2b4c66b3f6aa 151
reesey 1:3b00679c208a 152 tone(760,100);
reesey 1:3b00679c208a 153 delay(100);
reesey 1:3b00679c208a 154 tone(720,100);
reesey 1:3b00679c208a 155 delay(150);
reesey 1:3b00679c208a 156 tone(680,100);
reesey 1:3b00679c208a 157 delay(150);
reesey 1:3b00679c208a 158 tone(620,150);
reesey 1:3b00679c208a 159 delay(300);
reesey 0:2b4c66b3f6aa 160
reesey 1:3b00679c208a 161 tone(650,200);
reesey 1:3b00679c208a 162 delay(300);
reesey 0:2b4c66b3f6aa 163
reesey 1:3b00679c208a 164 tone(1020,80);
reesey 1:3b00679c208a 165 delay(300);
reesey 1:3b00679c208a 166 tone(1020,80);
reesey 1:3b00679c208a 167 delay(150);
reesey 1:3b00679c208a 168 tone(1020,80);
reesey 1:3b00679c208a 169 delay(300);
reesey 0:2b4c66b3f6aa 170
reesey 1:3b00679c208a 171 tone(380,100);
reesey 1:3b00679c208a 172 delay(300);
reesey 1:3b00679c208a 173 tone(500,100);
reesey 1:3b00679c208a 174 delay(300);
reesey 0:2b4c66b3f6aa 175
reesey 1:3b00679c208a 176 tone(760,100);
reesey 1:3b00679c208a 177 delay(100);
reesey 1:3b00679c208a 178 tone(720,100);
reesey 1:3b00679c208a 179 delay(150);
reesey 1:3b00679c208a 180 tone(680,100);
reesey 1:3b00679c208a 181 delay(150);
reesey 1:3b00679c208a 182 tone(620,150);
reesey 1:3b00679c208a 183 delay(300);
reesey 0:2b4c66b3f6aa 184
reesey 1:3b00679c208a 185 tone(650,150);
reesey 1:3b00679c208a 186 delay(300);
reesey 1:3b00679c208a 187 tone(380,100);
reesey 1:3b00679c208a 188 delay(150);
reesey 1:3b00679c208a 189 tone(430,100);
reesey 1:3b00679c208a 190 delay(150);
reesey 0:2b4c66b3f6aa 191
reesey 1:3b00679c208a 192 tone(500,100);
reesey 1:3b00679c208a 193 delay(300);
reesey 1:3b00679c208a 194 tone(430,100);
reesey 1:3b00679c208a 195 delay(150);
reesey 1:3b00679c208a 196 tone(500,100);
reesey 1:3b00679c208a 197 delay(100);
reesey 1:3b00679c208a 198 tone(570,100);
reesey 1:3b00679c208a 199 delay(420);
reesey 1:3b00679c208a 200
reesey 1:3b00679c208a 201 tone(585,100);
reesey 1:3b00679c208a 202 delay(450);
reesey 0:2b4c66b3f6aa 203
reesey 1:3b00679c208a 204 tone(550,100);
reesey 1:3b00679c208a 205 delay(420);
reesey 1:3b00679c208a 206
reesey 1:3b00679c208a 207 tone(500,100);
reesey 1:3b00679c208a 208 delay(360);
reesey 0:2b4c66b3f6aa 209
reesey 1:3b00679c208a 210 tone(380,100);
reesey 1:3b00679c208a 211 delay(300);
reesey 1:3b00679c208a 212 tone(500,100);
reesey 1:3b00679c208a 213 delay(300);
reesey 1:3b00679c208a 214 tone(500,100);
reesey 1:3b00679c208a 215 delay(150);
reesey 1:3b00679c208a 216 tone(500,100);
reesey 1:3b00679c208a 217 delay(300);
reesey 0:2b4c66b3f6aa 218
reesey 1:3b00679c208a 219 tone(500,100);
reesey 1:3b00679c208a 220 delay(300);
reesey 1:3b00679c208a 221
reesey 1:3b00679c208a 222 tone(760,100);
reesey 1:3b00679c208a 223 delay(100);
reesey 1:3b00679c208a 224 tone(720,100);
reesey 1:3b00679c208a 225 delay(150);
reesey 1:3b00679c208a 226 tone(680,100);
reesey 1:3b00679c208a 227 delay(150);
reesey 1:3b00679c208a 228 tone(620,150);
reesey 1:3b00679c208a 229 delay(300);
reesey 0:2b4c66b3f6aa 230
reesey 1:3b00679c208a 231 tone(650,150);
reesey 1:3b00679c208a 232 delay(300);
reesey 1:3b00679c208a 233 tone(380,100);
reesey 1:3b00679c208a 234 delay(150);
reesey 1:3b00679c208a 235 tone(430,100);
reesey 1:3b00679c208a 236 delay(150);
reesey 0:2b4c66b3f6aa 237
reesey 1:3b00679c208a 238 tone(500,100);
reesey 1:3b00679c208a 239 delay(300);
reesey 1:3b00679c208a 240 tone(430,100);
reesey 1:3b00679c208a 241 delay(150);
reesey 1:3b00679c208a 242 tone(500,100);
reesey 1:3b00679c208a 243 delay(100);
reesey 1:3b00679c208a 244 tone(570,100);
reesey 1:3b00679c208a 245 delay(220);
reesey 0:2b4c66b3f6aa 246
reesey 1:3b00679c208a 247 tone(500,100);
reesey 1:3b00679c208a 248 delay(300);
reesey 0:2b4c66b3f6aa 249
reesey 1:3b00679c208a 250 tone(760,100);
reesey 1:3b00679c208a 251 delay(100);
reesey 1:3b00679c208a 252 tone(720,100);
reesey 1:3b00679c208a 253 delay(150);
reesey 1:3b00679c208a 254 tone(680,100);
reesey 1:3b00679c208a 255 delay(150);
reesey 1:3b00679c208a 256 tone(620,150);
reesey 1:3b00679c208a 257 delay(300);
reesey 1:3b00679c208a 258
reesey 1:3b00679c208a 259 tone(650,200);
reesey 1:3b00679c208a 260 delay(300);
reesey 0:2b4c66b3f6aa 261
reesey 1:3b00679c208a 262 tone(1020,80);
reesey 1:3b00679c208a 263 delay(300);
reesey 1:3b00679c208a 264 tone(1020,80);
reesey 1:3b00679c208a 265 delay(150);
reesey 1:3b00679c208a 266 tone(1020,80);
reesey 1:3b00679c208a 267 delay(300);
reesey 1:3b00679c208a 268
reesey 1:3b00679c208a 269 tone(380,100);
reesey 1:3b00679c208a 270 delay(300);
reesey 1:3b00679c208a 271 tone(500,100);
reesey 1:3b00679c208a 272 delay(300);
reesey 0:2b4c66b3f6aa 273
reesey 1:3b00679c208a 274 tone(760,100);
reesey 1:3b00679c208a 275 delay(100);
reesey 1:3b00679c208a 276 tone(720,100);
reesey 1:3b00679c208a 277 delay(150);
reesey 1:3b00679c208a 278 tone(680,100);
reesey 1:3b00679c208a 279 delay(150);
reesey 1:3b00679c208a 280 tone(620,150);
reesey 1:3b00679c208a 281 delay(300);
reesey 0:2b4c66b3f6aa 282
reesey 1:3b00679c208a 283 tone(650,150);
reesey 1:3b00679c208a 284 delay(300);
reesey 1:3b00679c208a 285 tone(380,100);
reesey 1:3b00679c208a 286 delay(150);
reesey 1:3b00679c208a 287 tone(430,100);
reesey 1:3b00679c208a 288 delay(150);
reesey 0:2b4c66b3f6aa 289
reesey 1:3b00679c208a 290 tone(500,100);
reesey 1:3b00679c208a 291 delay(300);
reesey 1:3b00679c208a 292 tone(430,100);
reesey 1:3b00679c208a 293 delay(150);
reesey 1:3b00679c208a 294 tone(500,100);
reesey 1:3b00679c208a 295 delay(100);
reesey 1:3b00679c208a 296 tone(570,100);
reesey 1:3b00679c208a 297 delay(420);
reesey 0:2b4c66b3f6aa 298
reesey 1:3b00679c208a 299 tone(585,100);
reesey 1:3b00679c208a 300 delay(450);
reesey 0:2b4c66b3f6aa 301
reesey 1:3b00679c208a 302 tone(550,100);
reesey 1:3b00679c208a 303 delay(420);
reesey 0:2b4c66b3f6aa 304
reesey 1:3b00679c208a 305 tone(500,100);
reesey 1:3b00679c208a 306 delay(360);
reesey 0:2b4c66b3f6aa 307
reesey 1:3b00679c208a 308 tone(380,100);
reesey 1:3b00679c208a 309 delay(300);
reesey 1:3b00679c208a 310 tone(500,100);
reesey 1:3b00679c208a 311 delay(300);
reesey 1:3b00679c208a 312 tone(500,100);
reesey 1:3b00679c208a 313 delay(150);
reesey 1:3b00679c208a 314 tone(500,100);
reesey 1:3b00679c208a 315 delay(300);
reesey 0:2b4c66b3f6aa 316
reesey 1:3b00679c208a 317 tone(500,60);
reesey 1:3b00679c208a 318 delay(150);
reesey 1:3b00679c208a 319 tone(500,80);
reesey 1:3b00679c208a 320 delay(300);
reesey 1:3b00679c208a 321 tone(500,60);
reesey 1:3b00679c208a 322 delay(350);
reesey 1:3b00679c208a 323 tone(500,80);
reesey 1:3b00679c208a 324 delay(150);
reesey 1:3b00679c208a 325 tone(580,80);
reesey 1:3b00679c208a 326 delay(350);
reesey 1:3b00679c208a 327 tone(660,80);
reesey 1:3b00679c208a 328 delay(150);
reesey 1:3b00679c208a 329 tone(500,80);
reesey 1:3b00679c208a 330 delay(300);
reesey 1:3b00679c208a 331 tone(430,80);
reesey 1:3b00679c208a 332 delay(150);
reesey 1:3b00679c208a 333 tone(380,80);
reesey 1:3b00679c208a 334 delay(600);
reesey 0:2b4c66b3f6aa 335
reesey 1:3b00679c208a 336 tone(500,60);
reesey 1:3b00679c208a 337 delay(150);
reesey 1:3b00679c208a 338 tone(500,80);
reesey 1:3b00679c208a 339 delay(300);
reesey 1:3b00679c208a 340 tone(500,60);
reesey 1:3b00679c208a 341 delay(350);
reesey 1:3b00679c208a 342 tone(500,80);
reesey 1:3b00679c208a 343 delay(150);
reesey 1:3b00679c208a 344 tone(580,80);
reesey 1:3b00679c208a 345 delay(150);
reesey 1:3b00679c208a 346 tone(660,80);
reesey 1:3b00679c208a 347 delay(550);
reesey 0:2b4c66b3f6aa 348
reesey 1:3b00679c208a 349 tone(870,80);
reesey 1:3b00679c208a 350 delay(325);
reesey 1:3b00679c208a 351 tone(760,80);
reesey 1:3b00679c208a 352 delay(600);
reesey 0:2b4c66b3f6aa 353
reesey 1:3b00679c208a 354 tone(500,60);
reesey 1:3b00679c208a 355 delay(150);
reesey 1:3b00679c208a 356 tone(500,80);
reesey 1:3b00679c208a 357 delay(300);
reesey 1:3b00679c208a 358 tone(500,60);
reesey 1:3b00679c208a 359 delay(350);
reesey 1:3b00679c208a 360 tone(500,80);
reesey 1:3b00679c208a 361 delay(150);
reesey 1:3b00679c208a 362 tone(580,80);
reesey 1:3b00679c208a 363 delay(350);
reesey 1:3b00679c208a 364 tone(660,80);
reesey 1:3b00679c208a 365 delay(150);
reesey 1:3b00679c208a 366 tone(500,80);
reesey 1:3b00679c208a 367 delay(300);
reesey 1:3b00679c208a 368 tone(430,80);
reesey 1:3b00679c208a 369 delay(150);
reesey 1:3b00679c208a 370 tone(380,80);
reesey 1:3b00679c208a 371 delay(600);
reesey 0:2b4c66b3f6aa 372
reesey 1:3b00679c208a 373 tone(660,100);
reesey 1:3b00679c208a 374 delay(150);
reesey 1:3b00679c208a 375 tone(660,100);
reesey 1:3b00679c208a 376 delay(300);
reesey 1:3b00679c208a 377 tone(660,100);
reesey 1:3b00679c208a 378 delay(300);
reesey 1:3b00679c208a 379 tone(510,100);
reesey 1:3b00679c208a 380 delay(100);
reesey 1:3b00679c208a 381 tone(660,100);
reesey 1:3b00679c208a 382 delay(300);
reesey 1:3b00679c208a 383 tone(770,100);
reesey 1:3b00679c208a 384 delay(550);
reesey 1:3b00679c208a 385 tone(380,100);
reesey 1:3b00679c208a 386 delay(575);
reesey 1:3b00679c208a 387 }
reesey 1:3b00679c208a 388
reesey 1:3b00679c208a 389
reesey 1:3b00679c208a 390 //Star wars theme section.
reesey 1:3b00679c208a 391 void firstSection(){
reesey 1:3b00679c208a 392 tone(a, 500);
reesey 1:3b00679c208a 393 tone(a, 500);
reesey 1:3b00679c208a 394 tone(a, 500);
reesey 1:3b00679c208a 395 tone(f, 350);
reesey 1:3b00679c208a 396 tone(cH, 150);
reesey 1:3b00679c208a 397 tone(a, 500);
reesey 1:3b00679c208a 398 tone(f, 350);
reesey 1:3b00679c208a 399 tone(cH, 150);
reesey 1:3b00679c208a 400 tone(a, 650);
reesey 1:3b00679c208a 401 wait_ms(500);
reesey 1:3b00679c208a 402
reesey 1:3b00679c208a 403 tone(eH, 500);
reesey 1:3b00679c208a 404 tone(eH, 500);
reesey 1:3b00679c208a 405 tone(eH, 500);
reesey 1:3b00679c208a 406 tone(fH, 350);
reesey 1:3b00679c208a 407 tone(cH, 150);
reesey 1:3b00679c208a 408 tone(gS, 500);
reesey 1:3b00679c208a 409 tone(f, 350);
reesey 1:3b00679c208a 410 tone(cH, 150);
reesey 1:3b00679c208a 411 tone(a, 650);
reesey 1:3b00679c208a 412 wait_ms(500);
reesey 1:3b00679c208a 413 }
reesey 1:3b00679c208a 414
reesey 1:3b00679c208a 415 void secondSection(){
reesey 1:3b00679c208a 416 tone(aH, 500);
reesey 1:3b00679c208a 417 tone(a, 300);
reesey 1:3b00679c208a 418 tone(a, 150);
reesey 1:3b00679c208a 419 tone(aH, 500);
reesey 1:3b00679c208a 420 tone(gSH, 325);
reesey 1:3b00679c208a 421 tone(gH, 175);
reesey 1:3b00679c208a 422 tone(fSH, 125);
reesey 1:3b00679c208a 423 tone(fH, 125);
reesey 1:3b00679c208a 424 tone(fSH, 250);
reesey 1:3b00679c208a 425 wait_ms(325);
reesey 1:3b00679c208a 426
reesey 1:3b00679c208a 427 tone(aS, 250);
reesey 1:3b00679c208a 428 tone(dSH, 500);
reesey 1:3b00679c208a 429 tone(dH, 325);
reesey 1:3b00679c208a 430 tone(cSH, 175);
reesey 1:3b00679c208a 431 tone(cH, 125);
reesey 1:3b00679c208a 432 tone(b, 125);
reesey 1:3b00679c208a 433 tone(cH, 250);
reesey 1:3b00679c208a 434 wait_ms(350);
reesey 1:3b00679c208a 435 }
reesey 0:2b4c66b3f6aa 436
reesey 1:3b00679c208a 437 void starwars_example(){
reesey 1:3b00679c208a 438 firstSection();
reesey 1:3b00679c208a 439
reesey 1:3b00679c208a 440 secondSection();
reesey 1:3b00679c208a 441
reesey 1:3b00679c208a 442 //Variant 1
reesey 1:3b00679c208a 443 tone(f, 250);
reesey 1:3b00679c208a 444 tone(gS, 500);
reesey 1:3b00679c208a 445 tone(f, 350);
reesey 1:3b00679c208a 446 tone(a, 125);
reesey 1:3b00679c208a 447 tone(cH, 500);
reesey 1:3b00679c208a 448 tone(a, 375);
reesey 1:3b00679c208a 449 tone(cH, 125);
reesey 1:3b00679c208a 450 tone(eH, 650);
reesey 1:3b00679c208a 451 wait_ms(500);
reesey 1:3b00679c208a 452
reesey 1:3b00679c208a 453 secondSection();
reesey 1:3b00679c208a 454
reesey 1:3b00679c208a 455 //Variant 2
reesey 1:3b00679c208a 456 tone(f, 250);
reesey 1:3b00679c208a 457 tone(gS, 500);
reesey 1:3b00679c208a 458 tone(f, 375);
reesey 1:3b00679c208a 459 tone(cH, 125);
reesey 1:3b00679c208a 460 tone(a, 500);
reesey 1:3b00679c208a 461 tone(f, 375);
reesey 1:3b00679c208a 462 tone(cH, 125);
reesey 1:3b00679c208a 463 tone(a, 650);
reesey 1:3b00679c208a 464 wait_ms(650);
reesey 1:3b00679c208a 465 }