Advertisement
Guest User

Untitled

a guest
Nov 13th, 2019
109
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.52 KB | None | 0 0
  1. #define do 131
  2. #define do_diez 139
  3. #define re 147
  4. #define re 156
  5. #define mi 165
  6. #define fa 175
  7. #define fa_diez 185
  8. #define sol 196
  9. #define sol_diez 208
  10. #define la 220
  11. #define la_diez 233
  12. #define si 247
  13. #define Do 262
  14. #define Do_diez 277
  15. #define Re 294
  16. #define Re_diez 311
  17. #define Mi 330
  18. #define Fa 349
  19. #define Fa_diez 370
  20. #define Sol 392
  21. #define Sol_diez 415
  22. #define La 440
  23. #define La_diez 466
  24. #define Si 494
  25. #define DO 523
  26. #define DO_diez 554
  27. #define RE 587
  28. #define RE_diez 622
  29. #define MI 659
  30. #define FA 698
  31. #define FA_diez 740
  32. #define SOL 784
  33. #define SOL_diez 831
  34. #define LA 880
  35. #define LA_diez 932
  36. #define SI 988
  37.  
  38. int note[] = {
  39. Do,6, Do,2, Fa,12, Fa,4,
  40. Sol,6, Do,2, La,8, Fa,8,
  41. Fa,6, Mi,2, Re,8, Sol, 8,
  42. Fa,6, Mi,2, Fa,16,
  43.  
  44. Do,6, Do,2, Fa,12, Fa,4,
  45. Sol,6, Do,2, La,8, Fa,8,
  46. Fa,6, Mi,2, Re,8, La, 8,
  47. La,6, Sol,2,La,16,
  48.  
  49. La,6, Si,2, DO,12, La,4,
  50. Si,6, DO,2, RE,8, Si,4, Sol,4,
  51. Fa,6, Re,2, Do,8, Fa,8,
  52. La,6, Sol,2, Fa,18
  53. };
  54. void setup() {
  55. int octava=1; // puteti schimba cu 2,4,8 pentru a incerca alta octava - uneori se aude mai bine
  56. digitalWrite(4,0);
  57. for (int nota_curenta = 0; nota_curenta < 46; nota_curenta++)
  58. {
  59. tone(11, note[nota_curenta*2] * octava, 100*note[nota_curenta*2+1]); // 3 = pinul cu buzzer-ul, nota, delay
  60. delay(100*note[nota_curenta*2+1] + 100);
  61. noTone(11);
  62. }
  63. }
  64. void loop() {
  65.  
  66. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement