Leong Kum Loong (NYP) / tone_h

Dependents:   Tone_Example

Committer:
reesey
Date:
Mon Nov 20 03:53:48 2017 +0000
Revision:
3:9ddabd24f48c
Parent:
2:7f2974b69b48
tone.h; Written by Leong Kum Loong.; 20 Nov 2017, REV. 2

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