Leong Kum Loong (NYP) / tone_h

Dependents:   Tone_Example

Committer:
reesey
Date:
Sun Nov 19 06:08:29 2017 +0000
Revision:
0:2b4c66b3f6aa
Child:
1:3b00679c208a
tone.h;  Written by Leong Kum Loong.;  19 Nov 2017, REV. 0

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 0:2b4c66b3f6aa 6 19 Nov 2017, REV. 0
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 0:2b4c66b3f6aa 10 The mario_example routine "notes" are reference to the work of Gregory Kielian
reesey 0:2b4c66b3f6aa 11 an Electrical Engineer at Google ATAP Skunkworks via Avalon
reesey 0:2b4c66b3f6aa 12 from his Mario.ino sketch for Arduino.
reesey 0:2b4c66b3f6aa 13 */
reesey 0:2b4c66b3f6aa 14
reesey 0:2b4c66b3f6aa 15 PwmOut speaker(p26);
reesey 0:2b4c66b3f6aa 16
reesey 0:2b4c66b3f6aa 17 void tone(int frequency, int duration_ms){
reesey 0:2b4c66b3f6aa 18 float period = (float)1/(float)frequency;
reesey 0:2b4c66b3f6aa 19 speaker.period(period);
reesey 0:2b4c66b3f6aa 20 speaker.pulsewidth(period/(float)(2));
reesey 0:2b4c66b3f6aa 21 wait_ms(duration_ms); //If tone sounds weird, try modify delay here.
reesey 0:2b4c66b3f6aa 22 speaker = 0;
reesey 0:2b4c66b3f6aa 23 }
reesey 0:2b4c66b3f6aa 24
reesey 0:2b4c66b3f6aa 25 static void delay(int millis){
reesey 0:2b4c66b3f6aa 26 wait_ms(millis * 0.7); //If play speed sounds weird, try modify delay here.
reesey 0:2b4c66b3f6aa 27 }
reesey 0:2b4c66b3f6aa 28
reesey 0:2b4c66b3f6aa 29 void mario_example() {
reesey 0:2b4c66b3f6aa 30 tone(660,100);
reesey 0:2b4c66b3f6aa 31 delay(150);
reesey 0:2b4c66b3f6aa 32 tone(660,100);
reesey 0:2b4c66b3f6aa 33 delay(300);
reesey 0:2b4c66b3f6aa 34 tone(660,100);
reesey 0:2b4c66b3f6aa 35 delay(300);
reesey 0:2b4c66b3f6aa 36 tone(510,100);
reesey 0:2b4c66b3f6aa 37 delay(100);
reesey 0:2b4c66b3f6aa 38 tone(660,100);
reesey 0:2b4c66b3f6aa 39 delay(300);
reesey 0:2b4c66b3f6aa 40 tone(770,100);
reesey 0:2b4c66b3f6aa 41 delay(550);
reesey 0:2b4c66b3f6aa 42 tone(380,100);
reesey 0:2b4c66b3f6aa 43 delay(575);
reesey 0:2b4c66b3f6aa 44
reesey 0:2b4c66b3f6aa 45 tone(510,100);
reesey 0:2b4c66b3f6aa 46 delay(450);
reesey 0:2b4c66b3f6aa 47 tone(380,100);
reesey 0:2b4c66b3f6aa 48 delay(400);
reesey 0:2b4c66b3f6aa 49 tone(320,100);
reesey 0:2b4c66b3f6aa 50 delay(500);
reesey 0:2b4c66b3f6aa 51 tone(440,100);
reesey 0:2b4c66b3f6aa 52 delay(300);
reesey 0:2b4c66b3f6aa 53 tone(480,80);
reesey 0:2b4c66b3f6aa 54 delay(330);
reesey 0:2b4c66b3f6aa 55 tone(450,100);
reesey 0:2b4c66b3f6aa 56 delay(150);
reesey 0:2b4c66b3f6aa 57 tone(430,100);
reesey 0:2b4c66b3f6aa 58 delay(300);
reesey 0:2b4c66b3f6aa 59 tone(380,100);
reesey 0:2b4c66b3f6aa 60 delay(200);
reesey 0:2b4c66b3f6aa 61 tone(660,80);
reesey 0:2b4c66b3f6aa 62 delay(200);
reesey 0:2b4c66b3f6aa 63 tone(760,50);
reesey 0:2b4c66b3f6aa 64 delay(150);
reesey 0:2b4c66b3f6aa 65 tone(860,100);
reesey 0:2b4c66b3f6aa 66 delay(300);
reesey 0:2b4c66b3f6aa 67 tone(700,80);
reesey 0:2b4c66b3f6aa 68 delay(150);
reesey 0:2b4c66b3f6aa 69 tone(760,50);
reesey 0:2b4c66b3f6aa 70 delay(350);
reesey 0:2b4c66b3f6aa 71 tone(660,80);
reesey 0:2b4c66b3f6aa 72 delay(300);
reesey 0:2b4c66b3f6aa 73 tone(520,80);
reesey 0:2b4c66b3f6aa 74 delay(150);
reesey 0:2b4c66b3f6aa 75 tone(580,80);
reesey 0:2b4c66b3f6aa 76 delay(150);
reesey 0:2b4c66b3f6aa 77 tone(480,80);
reesey 0:2b4c66b3f6aa 78 delay(500);
reesey 0:2b4c66b3f6aa 79
reesey 0:2b4c66b3f6aa 80 tone(510,100);
reesey 0:2b4c66b3f6aa 81 delay(450);
reesey 0:2b4c66b3f6aa 82 tone(380,100);
reesey 0:2b4c66b3f6aa 83 delay(400);
reesey 0:2b4c66b3f6aa 84 tone(320,100);
reesey 0:2b4c66b3f6aa 85 delay(500);
reesey 0:2b4c66b3f6aa 86 tone(440,100);
reesey 0:2b4c66b3f6aa 87 delay(300);
reesey 0:2b4c66b3f6aa 88 tone(480,80);
reesey 0:2b4c66b3f6aa 89 delay(330);
reesey 0:2b4c66b3f6aa 90 tone(450,100);
reesey 0:2b4c66b3f6aa 91 delay(150);
reesey 0:2b4c66b3f6aa 92 tone(430,100);
reesey 0:2b4c66b3f6aa 93 delay(300);
reesey 0:2b4c66b3f6aa 94 tone(380,100);
reesey 0:2b4c66b3f6aa 95 delay(200);
reesey 0:2b4c66b3f6aa 96 tone(660,80);
reesey 0:2b4c66b3f6aa 97 delay(200);
reesey 0:2b4c66b3f6aa 98 tone(760,50);
reesey 0:2b4c66b3f6aa 99 delay(150);
reesey 0:2b4c66b3f6aa 100 tone(860,100);
reesey 0:2b4c66b3f6aa 101 delay(300);
reesey 0:2b4c66b3f6aa 102 tone(700,80);
reesey 0:2b4c66b3f6aa 103 delay(150);
reesey 0:2b4c66b3f6aa 104 tone(760,50);
reesey 0:2b4c66b3f6aa 105 delay(350);
reesey 0:2b4c66b3f6aa 106 tone(660,80);
reesey 0:2b4c66b3f6aa 107 delay(300);
reesey 0:2b4c66b3f6aa 108 tone(520,80);
reesey 0:2b4c66b3f6aa 109 delay(150);
reesey 0:2b4c66b3f6aa 110 tone(580,80);
reesey 0:2b4c66b3f6aa 111 delay(150);
reesey 0:2b4c66b3f6aa 112 tone(480,80);
reesey 0:2b4c66b3f6aa 113 delay(500);
reesey 0:2b4c66b3f6aa 114
reesey 0:2b4c66b3f6aa 115 tone(500,100);
reesey 0:2b4c66b3f6aa 116 delay(300);
reesey 0:2b4c66b3f6aa 117
reesey 0:2b4c66b3f6aa 118 tone(760,100);
reesey 0:2b4c66b3f6aa 119 delay(100);
reesey 0:2b4c66b3f6aa 120 tone(720,100);
reesey 0:2b4c66b3f6aa 121 delay(150);
reesey 0:2b4c66b3f6aa 122 tone(680,100);
reesey 0:2b4c66b3f6aa 123 delay(150);
reesey 0:2b4c66b3f6aa 124 tone(620,150);
reesey 0:2b4c66b3f6aa 125 delay(300);
reesey 0:2b4c66b3f6aa 126
reesey 0:2b4c66b3f6aa 127 tone(650,150);
reesey 0:2b4c66b3f6aa 128 delay(300);
reesey 0:2b4c66b3f6aa 129 tone(380,100);
reesey 0:2b4c66b3f6aa 130 delay(150);
reesey 0:2b4c66b3f6aa 131 tone(430,100);
reesey 0:2b4c66b3f6aa 132 delay(150);
reesey 0:2b4c66b3f6aa 133
reesey 0:2b4c66b3f6aa 134 tone(500,100);
reesey 0:2b4c66b3f6aa 135 delay(300);
reesey 0:2b4c66b3f6aa 136 tone(430,100);
reesey 0:2b4c66b3f6aa 137 delay(150);
reesey 0:2b4c66b3f6aa 138 tone(500,100);
reesey 0:2b4c66b3f6aa 139 delay(100);
reesey 0:2b4c66b3f6aa 140 tone(570,100);
reesey 0:2b4c66b3f6aa 141 delay(220);
reesey 0:2b4c66b3f6aa 142
reesey 0:2b4c66b3f6aa 143 tone(500,100);
reesey 0:2b4c66b3f6aa 144 delay(300);
reesey 0:2b4c66b3f6aa 145
reesey 0:2b4c66b3f6aa 146 tone(760,100);
reesey 0:2b4c66b3f6aa 147 delay(100);
reesey 0:2b4c66b3f6aa 148 tone(720,100);
reesey 0:2b4c66b3f6aa 149 delay(150);
reesey 0:2b4c66b3f6aa 150 tone(680,100);
reesey 0:2b4c66b3f6aa 151 delay(150);
reesey 0:2b4c66b3f6aa 152 tone(620,150);
reesey 0:2b4c66b3f6aa 153 delay(300);
reesey 0:2b4c66b3f6aa 154
reesey 0:2b4c66b3f6aa 155 tone(650,200);
reesey 0:2b4c66b3f6aa 156 delay(300);
reesey 0:2b4c66b3f6aa 157
reesey 0:2b4c66b3f6aa 158 tone(1020,80);
reesey 0:2b4c66b3f6aa 159 delay(300);
reesey 0:2b4c66b3f6aa 160 tone(1020,80);
reesey 0:2b4c66b3f6aa 161 delay(150);
reesey 0:2b4c66b3f6aa 162 tone(1020,80);
reesey 0:2b4c66b3f6aa 163 delay(300);
reesey 0:2b4c66b3f6aa 164
reesey 0:2b4c66b3f6aa 165 tone(380,100);
reesey 0:2b4c66b3f6aa 166 delay(300);
reesey 0:2b4c66b3f6aa 167 tone(500,100);
reesey 0:2b4c66b3f6aa 168 delay(300);
reesey 0:2b4c66b3f6aa 169
reesey 0:2b4c66b3f6aa 170 tone(760,100);
reesey 0:2b4c66b3f6aa 171 delay(100);
reesey 0:2b4c66b3f6aa 172 tone(720,100);
reesey 0:2b4c66b3f6aa 173 delay(150);
reesey 0:2b4c66b3f6aa 174 tone(680,100);
reesey 0:2b4c66b3f6aa 175 delay(150);
reesey 0:2b4c66b3f6aa 176 tone(620,150);
reesey 0:2b4c66b3f6aa 177 delay(300);
reesey 0:2b4c66b3f6aa 178
reesey 0:2b4c66b3f6aa 179 tone(650,150);
reesey 0:2b4c66b3f6aa 180 delay(300);
reesey 0:2b4c66b3f6aa 181 tone(380,100);
reesey 0:2b4c66b3f6aa 182 delay(150);
reesey 0:2b4c66b3f6aa 183 tone(430,100);
reesey 0:2b4c66b3f6aa 184 delay(150);
reesey 0:2b4c66b3f6aa 185
reesey 0:2b4c66b3f6aa 186 tone(500,100);
reesey 0:2b4c66b3f6aa 187 delay(300);
reesey 0:2b4c66b3f6aa 188 tone(430,100);
reesey 0:2b4c66b3f6aa 189 delay(150);
reesey 0:2b4c66b3f6aa 190 tone(500,100);
reesey 0:2b4c66b3f6aa 191 delay(100);
reesey 0:2b4c66b3f6aa 192 tone(570,100);
reesey 0:2b4c66b3f6aa 193 delay(420);
reesey 0:2b4c66b3f6aa 194
reesey 0:2b4c66b3f6aa 195 tone(585,100);
reesey 0:2b4c66b3f6aa 196 delay(450);
reesey 0:2b4c66b3f6aa 197
reesey 0:2b4c66b3f6aa 198 tone(550,100);
reesey 0:2b4c66b3f6aa 199 delay(420);
reesey 0:2b4c66b3f6aa 200
reesey 0:2b4c66b3f6aa 201 tone(500,100);
reesey 0:2b4c66b3f6aa 202 delay(360);
reesey 0:2b4c66b3f6aa 203
reesey 0:2b4c66b3f6aa 204 tone(380,100);
reesey 0:2b4c66b3f6aa 205 delay(300);
reesey 0:2b4c66b3f6aa 206 tone(500,100);
reesey 0:2b4c66b3f6aa 207 delay(300);
reesey 0:2b4c66b3f6aa 208 tone(500,100);
reesey 0:2b4c66b3f6aa 209 delay(150);
reesey 0:2b4c66b3f6aa 210 tone(500,100);
reesey 0:2b4c66b3f6aa 211 delay(300);
reesey 0:2b4c66b3f6aa 212
reesey 0:2b4c66b3f6aa 213 tone(500,100);
reesey 0:2b4c66b3f6aa 214 delay(300);
reesey 0:2b4c66b3f6aa 215
reesey 0:2b4c66b3f6aa 216 tone(760,100);
reesey 0:2b4c66b3f6aa 217 delay(100);
reesey 0:2b4c66b3f6aa 218 tone(720,100);
reesey 0:2b4c66b3f6aa 219 delay(150);
reesey 0:2b4c66b3f6aa 220 tone(680,100);
reesey 0:2b4c66b3f6aa 221 delay(150);
reesey 0:2b4c66b3f6aa 222 tone(620,150);
reesey 0:2b4c66b3f6aa 223 delay(300);
reesey 0:2b4c66b3f6aa 224
reesey 0:2b4c66b3f6aa 225 tone(650,150);
reesey 0:2b4c66b3f6aa 226 delay(300);
reesey 0:2b4c66b3f6aa 227 tone(380,100);
reesey 0:2b4c66b3f6aa 228 delay(150);
reesey 0:2b4c66b3f6aa 229 tone(430,100);
reesey 0:2b4c66b3f6aa 230 delay(150);
reesey 0:2b4c66b3f6aa 231
reesey 0:2b4c66b3f6aa 232 tone(500,100);
reesey 0:2b4c66b3f6aa 233 delay(300);
reesey 0:2b4c66b3f6aa 234 tone(430,100);
reesey 0:2b4c66b3f6aa 235 delay(150);
reesey 0:2b4c66b3f6aa 236 tone(500,100);
reesey 0:2b4c66b3f6aa 237 delay(100);
reesey 0:2b4c66b3f6aa 238 tone(570,100);
reesey 0:2b4c66b3f6aa 239 delay(220);
reesey 0:2b4c66b3f6aa 240
reesey 0:2b4c66b3f6aa 241 tone(500,100);
reesey 0:2b4c66b3f6aa 242 delay(300);
reesey 0:2b4c66b3f6aa 243
reesey 0:2b4c66b3f6aa 244 tone(760,100);
reesey 0:2b4c66b3f6aa 245 delay(100);
reesey 0:2b4c66b3f6aa 246 tone(720,100);
reesey 0:2b4c66b3f6aa 247 delay(150);
reesey 0:2b4c66b3f6aa 248 tone(680,100);
reesey 0:2b4c66b3f6aa 249 delay(150);
reesey 0:2b4c66b3f6aa 250 tone(620,150);
reesey 0:2b4c66b3f6aa 251 delay(300);
reesey 0:2b4c66b3f6aa 252
reesey 0:2b4c66b3f6aa 253 tone(650,200);
reesey 0:2b4c66b3f6aa 254 delay(300);
reesey 0:2b4c66b3f6aa 255
reesey 0:2b4c66b3f6aa 256 tone(1020,80);
reesey 0:2b4c66b3f6aa 257 delay(300);
reesey 0:2b4c66b3f6aa 258 tone(1020,80);
reesey 0:2b4c66b3f6aa 259 delay(150);
reesey 0:2b4c66b3f6aa 260 tone(1020,80);
reesey 0:2b4c66b3f6aa 261 delay(300);
reesey 0:2b4c66b3f6aa 262
reesey 0:2b4c66b3f6aa 263 tone(380,100);
reesey 0:2b4c66b3f6aa 264 delay(300);
reesey 0:2b4c66b3f6aa 265 tone(500,100);
reesey 0:2b4c66b3f6aa 266 delay(300);
reesey 0:2b4c66b3f6aa 267
reesey 0:2b4c66b3f6aa 268 tone(760,100);
reesey 0:2b4c66b3f6aa 269 delay(100);
reesey 0:2b4c66b3f6aa 270 tone(720,100);
reesey 0:2b4c66b3f6aa 271 delay(150);
reesey 0:2b4c66b3f6aa 272 tone(680,100);
reesey 0:2b4c66b3f6aa 273 delay(150);
reesey 0:2b4c66b3f6aa 274 tone(620,150);
reesey 0:2b4c66b3f6aa 275 delay(300);
reesey 0:2b4c66b3f6aa 276
reesey 0:2b4c66b3f6aa 277 tone(650,150);
reesey 0:2b4c66b3f6aa 278 delay(300);
reesey 0:2b4c66b3f6aa 279 tone(380,100);
reesey 0:2b4c66b3f6aa 280 delay(150);
reesey 0:2b4c66b3f6aa 281 tone(430,100);
reesey 0:2b4c66b3f6aa 282 delay(150);
reesey 0:2b4c66b3f6aa 283
reesey 0:2b4c66b3f6aa 284 tone(500,100);
reesey 0:2b4c66b3f6aa 285 delay(300);
reesey 0:2b4c66b3f6aa 286 tone(430,100);
reesey 0:2b4c66b3f6aa 287 delay(150);
reesey 0:2b4c66b3f6aa 288 tone(500,100);
reesey 0:2b4c66b3f6aa 289 delay(100);
reesey 0:2b4c66b3f6aa 290 tone(570,100);
reesey 0:2b4c66b3f6aa 291 delay(420);
reesey 0:2b4c66b3f6aa 292
reesey 0:2b4c66b3f6aa 293 tone(585,100);
reesey 0:2b4c66b3f6aa 294 delay(450);
reesey 0:2b4c66b3f6aa 295
reesey 0:2b4c66b3f6aa 296 tone(550,100);
reesey 0:2b4c66b3f6aa 297 delay(420);
reesey 0:2b4c66b3f6aa 298
reesey 0:2b4c66b3f6aa 299 tone(500,100);
reesey 0:2b4c66b3f6aa 300 delay(360);
reesey 0:2b4c66b3f6aa 301
reesey 0:2b4c66b3f6aa 302 tone(380,100);
reesey 0:2b4c66b3f6aa 303 delay(300);
reesey 0:2b4c66b3f6aa 304 tone(500,100);
reesey 0:2b4c66b3f6aa 305 delay(300);
reesey 0:2b4c66b3f6aa 306 tone(500,100);
reesey 0:2b4c66b3f6aa 307 delay(150);
reesey 0:2b4c66b3f6aa 308 tone(500,100);
reesey 0:2b4c66b3f6aa 309 delay(300);
reesey 0:2b4c66b3f6aa 310
reesey 0:2b4c66b3f6aa 311 tone(500,60);
reesey 0:2b4c66b3f6aa 312 delay(150);
reesey 0:2b4c66b3f6aa 313 tone(500,80);
reesey 0:2b4c66b3f6aa 314 delay(300);
reesey 0:2b4c66b3f6aa 315 tone(500,60);
reesey 0:2b4c66b3f6aa 316 delay(350);
reesey 0:2b4c66b3f6aa 317 tone(500,80);
reesey 0:2b4c66b3f6aa 318 delay(150);
reesey 0:2b4c66b3f6aa 319 tone(580,80);
reesey 0:2b4c66b3f6aa 320 delay(350);
reesey 0:2b4c66b3f6aa 321 tone(660,80);
reesey 0:2b4c66b3f6aa 322 delay(150);
reesey 0:2b4c66b3f6aa 323 tone(500,80);
reesey 0:2b4c66b3f6aa 324 delay(300);
reesey 0:2b4c66b3f6aa 325 tone(430,80);
reesey 0:2b4c66b3f6aa 326 delay(150);
reesey 0:2b4c66b3f6aa 327 tone(380,80);
reesey 0:2b4c66b3f6aa 328 delay(600);
reesey 0:2b4c66b3f6aa 329
reesey 0:2b4c66b3f6aa 330 tone(500,60);
reesey 0:2b4c66b3f6aa 331 delay(150);
reesey 0:2b4c66b3f6aa 332 tone(500,80);
reesey 0:2b4c66b3f6aa 333 delay(300);
reesey 0:2b4c66b3f6aa 334 tone(500,60);
reesey 0:2b4c66b3f6aa 335 delay(350);
reesey 0:2b4c66b3f6aa 336 tone(500,80);
reesey 0:2b4c66b3f6aa 337 delay(150);
reesey 0:2b4c66b3f6aa 338 tone(580,80);
reesey 0:2b4c66b3f6aa 339 delay(150);
reesey 0:2b4c66b3f6aa 340 tone(660,80);
reesey 0:2b4c66b3f6aa 341 delay(550);
reesey 0:2b4c66b3f6aa 342
reesey 0:2b4c66b3f6aa 343 tone(870,80);
reesey 0:2b4c66b3f6aa 344 delay(325);
reesey 0:2b4c66b3f6aa 345 tone(760,80);
reesey 0:2b4c66b3f6aa 346 delay(600);
reesey 0:2b4c66b3f6aa 347
reesey 0:2b4c66b3f6aa 348 tone(500,60);
reesey 0:2b4c66b3f6aa 349 delay(150);
reesey 0:2b4c66b3f6aa 350 tone(500,80);
reesey 0:2b4c66b3f6aa 351 delay(300);
reesey 0:2b4c66b3f6aa 352 tone(500,60);
reesey 0:2b4c66b3f6aa 353 delay(350);
reesey 0:2b4c66b3f6aa 354 tone(500,80);
reesey 0:2b4c66b3f6aa 355 delay(150);
reesey 0:2b4c66b3f6aa 356 tone(580,80);
reesey 0:2b4c66b3f6aa 357 delay(350);
reesey 0:2b4c66b3f6aa 358 tone(660,80);
reesey 0:2b4c66b3f6aa 359 delay(150);
reesey 0:2b4c66b3f6aa 360 tone(500,80);
reesey 0:2b4c66b3f6aa 361 delay(300);
reesey 0:2b4c66b3f6aa 362 tone(430,80);
reesey 0:2b4c66b3f6aa 363 delay(150);
reesey 0:2b4c66b3f6aa 364 tone(380,80);
reesey 0:2b4c66b3f6aa 365 delay(600);
reesey 0:2b4c66b3f6aa 366
reesey 0:2b4c66b3f6aa 367 tone(660,100);
reesey 0:2b4c66b3f6aa 368 delay(150);
reesey 0:2b4c66b3f6aa 369 tone(660,100);
reesey 0:2b4c66b3f6aa 370 delay(300);
reesey 0:2b4c66b3f6aa 371 tone(660,100);
reesey 0:2b4c66b3f6aa 372 delay(300);
reesey 0:2b4c66b3f6aa 373 tone(510,100);
reesey 0:2b4c66b3f6aa 374 delay(100);
reesey 0:2b4c66b3f6aa 375 tone(660,100);
reesey 0:2b4c66b3f6aa 376 delay(300);
reesey 0:2b4c66b3f6aa 377 tone(770,100);
reesey 0:2b4c66b3f6aa 378 delay(550);
reesey 0:2b4c66b3f6aa 379 tone(380,100);
reesey 0:2b4c66b3f6aa 380 delay(575);
reesey 0:2b4c66b3f6aa 381 }