Advertisement
Guest User

Untitled

a guest
Jul 22nd, 2018
78
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 12.83 KB | None | 0 0
  1. // NB: ALL NOTES DEFINED WITH STANDARD ENGLISH NAMES, EXCEPT FROM "A"
  2. //THAT IS CALLED WITH THE ITALIAN NAME "LA" BECAUSE A0,A1...ARE THE ANALOG PINS ON ARDUINO.
  3. // (Ab IS CALLED Ab AND NOT LAb)
  4. #define C0 16.35
  5. #define Db0 17.32
  6. #define D0 18.35
  7. #define Eb0 19.45
  8. #define E0 20.60
  9. #define F0 21.83
  10. #define Gb0 23.12
  11. #define G0 24.50
  12. #define Ab0 25.96
  13. #define LA0 27.50
  14. #define Bb0 29.14
  15. #define B0 30.87
  16. #define C1 32.70
  17. #define Db1 34.65
  18. #define D1 36.71
  19. #define Eb1 38.89
  20. #define E1 41.20
  21. #define F1 43.65
  22. #define Gb1 46.25
  23. #define G1 49.00
  24. #define Ab1 51.91
  25. #define LA1 55.00
  26. #define Bb1 58.27
  27. #define B1 61.74
  28. #define C2 65.41
  29. #define Db2 69.30
  30. #define D2 73.42
  31. #define Eb2 77.78
  32. #define E2 82.41
  33. #define F2 87.31
  34. #define Gb2 92.50
  35. #define G2 98.00
  36. #define Ab2 103.83
  37. #define LA2 110.00
  38. #define Bb2 116.54
  39. #define B2 123.47
  40. #define C3 130.81
  41. #define Db3 138.59
  42. #define D3 146.83
  43. #define Eb3 155.56
  44. #define E3 164.81
  45. #define F3 174.61
  46. #define Gb3 185.00
  47. #define G3 196.00
  48. #define Ab3 207.65
  49. #define LA3 220.00
  50. #define Bb3 233.08
  51. #define B3 246.94
  52. #define C4 261.63
  53. #define Db4 277.18
  54. #define D4 293.66
  55. #define Eb4 311.13
  56. #define E4 329.63
  57. #define F4 349.23
  58. #define Gb4 369.99
  59. #define G4 392.00
  60. #define Ab4 415.30
  61. #define LA4 440.00
  62. #define Bb4 466.16
  63. #define B4 493.88
  64. #define C5 523.25
  65. #define Db5 554.37
  66. #define D5 587.33
  67. #define Eb5 622.25
  68. #define E5 659.26
  69. #define F5 698.46
  70. #define Gb5 739.99
  71. #define G5 783.99
  72. #define Ab5 830.61
  73. #define LA5 880.00
  74. #define Bb5 932.33
  75. #define B5 987.77
  76. #define C6 1046.50
  77. #define Db6 1108.73
  78. #define D6 1174.66
  79. #define Eb6 1244.51
  80. #define E6 1318.51
  81. #define F6 1396.91
  82. #define Gb6 1479.98
  83. #define G6 1567.98
  84. #define Ab6 1661.22
  85. #define LA6 1760.00
  86. #define Bb6 1864.66
  87. #define B6 1975.53
  88. #define C7 2093.00
  89. #define Db7 2217.46
  90. #define D7 2349.32
  91. #define Eb7 2489.02
  92. #define E7 2637.02
  93. #define F7 2793.83
  94. #define Gb7 2959.96
  95. #define G7 3135.96
  96. #define Ab7 3322.44
  97. #define LA7 3520.01
  98. #define Bb7 3729.31
  99. #define B7 3951.07
  100. #define C8 4186.01
  101. #define Db8 4434.92
  102. #define D8 4698.64
  103. #define Eb8 4978.03
  104.  
  105. int BPM;
  106. int Q;
  107. int H;
  108. int E;
  109. int S;
  110. int W;
  111.  
  112. void setup(){
  113. }
  114.  
  115. void loop(){
  116. despacito();
  117.  
  118. }
  119. void despacito(){
  120. BPM=75;
  121. Q=60000/BPM;
  122. W=4*Q;
  123. H=2*Q;
  124. E=Q/2;
  125. S=Q/4;
  126. //1
  127. tone(11, D5, H);
  128. delay(H+15);
  129. tone(11, Db5, H);
  130. delay(H+15);
  131. //2
  132. tone(11, B4, Q);
  133. delay(Q+15);
  134. tone(11, Gb4,Q);
  135. delay(Q+15);
  136. tone(11, Gb4,E);
  137. delay(E+15);
  138. tone(11, Gb4,E);
  139. delay(E+15);
  140. tone(11, Gb4,E);
  141. delay(E+15);
  142. tone(11, Gb4,E);
  143. delay(E+15);
  144. //3
  145. tone(11, Gb4,E);
  146. delay(E+15);
  147. tone(11, B4,E);
  148. delay(E+15);
  149. tone(11, B4,E);
  150. delay(E+15);
  151. tone(11, LA4,E);
  152. delay(E+15);
  153. tone(11, B4,Q);
  154. delay(Q+15);
  155. tone(11, LA4,E);
  156. delay(E+15);
  157. tone(11, B4,E);
  158. delay(E);
  159. //4
  160. tone(11, B4,E);
  161. delay(E+15);
  162. tone(11, G4,E);
  163. delay(E);
  164. tone(11, G4,Q);
  165. delay(Q+15);
  166. tone(11, G4,E);
  167. delay(E+15);
  168. tone(11, G4,E);
  169. delay(E+15);
  170. tone(11, G4,E);
  171. delay(E+15);
  172. tone(11, G4,E);
  173. delay(E+15);
  174. //5
  175. tone(11, G4,E);
  176. delay(E+15);
  177. tone(11, B4,E);
  178. delay(E+15);
  179. tone(11, B4,E);
  180. delay(E+15);
  181. tone(11, B4,E);
  182. delay(E+15);
  183. tone(11, B4,Q);
  184. delay(Q+15);
  185. tone(11, Db4,E);
  186. delay(E+15);
  187. tone(11, D4,E);
  188. delay(E);
  189. //6
  190. tone(11, D4,E);
  191. delay(E+15);
  192. tone(11, LA4,E);
  193. delay(E);
  194. tone(11, LA4,Q);
  195. delay(Q+15);
  196. tone(11, LA4,E);
  197. delay(E+15);
  198. tone(11, LA4,E);
  199. delay(E+15);
  200. tone(11, LA4,E);
  201. delay(E+15);
  202. tone(11, LA4,E);
  203. delay(E+15);
  204. tone(11, LA4,E);
  205. delay(E+15);
  206. //7
  207. tone(11,LA4,E);
  208. delay(E+15);
  209. tone(11,D5,E);
  210. delay(E+15);
  211. tone(11,D5,E);
  212. delay(E+15);
  213. tone(11,D5,E);
  214. delay(E+15);
  215. tone(11,D5,E);
  216. delay(E+15);
  217. tone(11,E5,Q);
  218. delay(Q+15);
  219. tone(11,E5,E);
  220. delay(E);
  221. //8
  222. tone(11,E5,E);
  223. delay(E+15);
  224. tone(11,Db5,E);
  225. delay(E);
  226. tone(11,Db5,Q);
  227. delay(Q+15);
  228. delay(H+15);
  229.  
  230. }
  231.  
  232.  
  233. void abba(){
  234. BPM=90;
  235. Q=60000/BPM;
  236. W=4*Q;
  237. H=2*Q;
  238. E=Q/2;
  239. S=Q/4;
  240. //pickup
  241. tone(11, D4,E);
  242. delay(E+15);
  243. tone(11, E4,E);
  244. delay(E+15);
  245. tone(11, Gb4,E+S);
  246. delay(E+S+15);
  247. tone(11, G4,S);
  248. delay(S+15);
  249. //1
  250. tone(11, B3,H+Q);
  251. delay(H+Q+15);
  252. delay(Q);
  253. //2
  254. delay(H);
  255. tone(11, B3,E);
  256. delay(E+15);
  257. tone(11, C4,E);
  258. delay(E+15);
  259. tone(11, D4,E+S);
  260. delay(E+S+15);
  261. tone(11, E4,S);
  262. delay(S+15);
  263. //3
  264. tone(11,E4,Q);
  265. delay(Q+15);
  266. tone(11, D4,H);
  267. delay(H+15);
  268. delay(Q);
  269. //4
  270. delay(H);
  271. tone(11, D4,E);
  272. delay(E+15);
  273. tone(11, C4,E);
  274. delay(E+15);
  275. tone(11, B3,E);
  276. delay(E+15);
  277. tone(11, LA3,E);
  278. delay(E+15);
  279. //5
  280. tone(11, C4,W);
  281. delay(W+15);
  282. //6
  283. delay(H);
  284. tone(11, D4,E);
  285. delay(E+15);
  286. tone(11, C4,E);
  287. delay(E+15);
  288. tone(11, B3,E);
  289. delay(E+15);
  290. tone(11, LA3,E);
  291. delay(E+15);
  292. //7
  293. tone(11, C4,W);
  294. delay(W+15);
  295. //8
  296. delay(H);
  297. tone(11, D4,E);
  298. delay(E+15);
  299. tone(11, E4,E);
  300. delay(E+15);
  301. tone(11, Gb4,E+S);
  302. delay(E+S+15);
  303. tone(11, G4,S);
  304. delay(S+15);
  305. //9
  306. tone(11, B3,H+Q);
  307. delay(H+Q+15);
  308. delay(Q);
  309. //10
  310. delay(H);
  311. tone(11, B3,E);
  312. delay(E+15);
  313. tone(11, C4,E);
  314. delay(E+15);
  315. tone(11, D4,E+S);
  316. delay(E+15+S);
  317. tone(11, E4,S);
  318. delay(S+15);
  319. //11
  320. tone(11, E4,Q);
  321. delay(Q+15);
  322. tone(11, D4,H);
  323. delay(H+15);
  324. delay(Q);
  325. //12
  326. delay(H);
  327. tone(11, D4,E);
  328. delay(E+15);
  329. tone(11, C4,E);
  330. delay(E+15);
  331. tone(11, B3,E);
  332. delay(E+15);
  333. tone(11, LA3,E);
  334. delay(E+15);
  335. //13
  336. tone(11, C4,W);
  337. delay(W+15);
  338. //14
  339. delay(H);
  340. tone(11, D4,E);
  341. delay(E+15);
  342. tone(11, C4,E);
  343. delay(E+15);
  344. tone(11, B3,E);
  345. delay(E+15);
  346. tone(11, LA3,E);
  347. delay(E+15);
  348. //15
  349. tone(11, C4,W);
  350. delay(W+15);
  351. //16
  352. delay(H);
  353. tone(11, D4,E);
  354. delay(E+15);
  355. tone(11, D4,E);
  356. delay(E+15);
  357. tone(11, C5,E+S);
  358. delay(E+15+S);
  359. tone(11, B4,S);
  360. delay(S+15);
  361. //17
  362. tone(11, B4,W);
  363. delay(W+15);
  364. //18
  365. delay(Q+E);
  366. tone(11, B3,E);
  367. delay(E+15);
  368. tone(11, B3,E);
  369. delay(E+15);
  370. tone(11, LA4,E);
  371. delay(E+15);
  372. tone(11, LA4,E+S);
  373. delay(E+15+S);
  374. tone(11, G4,S);
  375. delay(S+15);
  376. //19
  377. tone(11, G4,W);
  378. delay(W+15);
  379. //20 (37)
  380. delay(Q+S);
  381. tone(11, E4,E);
  382. delay(E+15);
  383. tone(11, E4,E);
  384. delay(E+15);
  385. tone(11, D5,E);
  386. delay(E+15);
  387. tone(11, D5,E+S);
  388. delay(E+S+15);
  389. tone(11, C5,S);
  390. delay(S+15);
  391. //21
  392. tone(11, C5,W);
  393. delay(W+15);
  394. //22
  395. delay(Q+S);
  396. tone(11, C5,E);
  397. delay(E+15);
  398. tone(11, C5,E);
  399. delay(E+15);
  400. tone(11, B4,E);
  401. delay(E+15);
  402. tone(11, LA4,S+E);
  403. delay(E+15+S);
  404. tone(11, B4,S);
  405. delay(S+15);
  406. //23
  407. tone(11, C5,W);
  408. delay(W+15);
  409. //24
  410. delay(Q+S);
  411. tone(11, D4,E);
  412. delay(E+15);
  413. tone(11, D4,E);
  414. delay(E+15);
  415. tone(11, C5,E);
  416. delay(E+15);
  417. tone(11, C5,E+S);
  418. delay(E+15+S);
  419. tone(11, B4,S);
  420. delay(S+15);
  421. //25
  422. tone(11, B4,W);
  423. delay(W+15);
  424. //26
  425. delay(Q+S);
  426. tone(11, B3,E);
  427. delay(E+15);
  428. tone(11, B3,E);
  429. delay(E+15);
  430. tone(11, LA4,E);
  431. delay(E+15);
  432. tone(11, LA4,E+S);
  433. delay(E+15+S);
  434. tone(11, G4,S);
  435. delay(S+15);
  436. //27
  437. tone(11, G4,W);
  438. delay(W+15);
  439. //28 (45)
  440. delay(Q+S);
  441. tone(11, E4,E);
  442. delay(E+15);
  443. tone(11, E4,E);
  444. delay(E+15);
  445. tone(11, D5,E);
  446. delay(E+15);
  447. tone(11, D5,E+S);
  448. delay(E+15+S);
  449. tone(11, C5,S);
  450. delay(S+15);
  451. //29
  452. tone(11, C5,W);
  453. delay(W+15);
  454. //30
  455. delay(Q+S);
  456. tone(11, C5,E);
  457. delay(E+15);
  458. tone(11, C5,E);
  459. delay(E+15);
  460. tone(11, B4,E);
  461. delay(E+15);
  462. tone(11, LA4,E+S);
  463. delay(E+15+S);
  464. tone(11, B4,S);
  465. delay(S+15);
  466. //31
  467. tone(11, C5,W);
  468. delay(W+15);
  469. //32 into pickup
  470. delay(Q+S);
  471. tone(11, D4,E);
  472. delay(E+15);
  473. }
  474.  
  475. void ievan(){
  476. BPM=120;
  477. Q=60000/BPM;
  478. W=4*Q;
  479. H=2*Q;
  480. E=Q/2;
  481. S=Q/4;
  482. //1
  483. tone(11, Gb3,E);
  484. delay(E+15);
  485. tone(11, LA4,S);
  486. delay(E+15);
  487. tone(11, Db3,E);
  488. delay(E+15);
  489. tone(11, LA4,S);
  490. delay(E+15);
  491. tone(11, Gb3,E);
  492. delay(E+15);
  493. tone(11, LA4,S);
  494. delay(E+15);
  495. tone(11, Db3,E);
  496. delay(E+15);
  497. tone(11, E3,E);
  498. delay(E+15);
  499. //2
  500. tone(11, Gb3,E);
  501. delay(E+15);
  502. tone(11, LA4,S);
  503. delay(E+15);
  504. tone(11, Db3,E);
  505. delay(E+15);
  506. tone(11, LA4,S);
  507. delay(E+15);
  508. tone(11, Gb3,E);
  509. delay(E+15);
  510. tone(11, LA4,S);
  511. delay(E+15);
  512. tone(11, Db3,E);
  513. delay(E+15);
  514. tone(11, E3,E);
  515. delay(E+15);
  516. //3
  517. tone(11, Gb3,E);
  518. delay(E+15);
  519. tone(11, LA4,S);
  520. delay(E+15);
  521. tone(11, Db3,E);
  522. delay(E+15);
  523. tone(11, LA4,S);
  524. delay(E+15);
  525. tone(11, Gb3,E);
  526. delay(E+15);
  527. tone(11, LA4,S);
  528. delay(E+15);
  529. tone(11, Db3,E);
  530. delay(E+15);
  531. tone(11, E3,E);
  532. delay(E+15);
  533. //4
  534. tone(11, Gb3,E);
  535. delay(E+15);
  536. tone(11, LA4,S);
  537. delay(E+15);
  538. tone(11, Db3,E);
  539. delay(E+15);
  540. tone(11, LA4,S);
  541. delay(E+15);
  542. tone(11, LA4,S);
  543. delay(S+15);
  544. delay(Q+E);
  545. tone(11, Gb4,E);
  546. delay(E+15);
  547. //5
  548. tone(11, Db4,E);
  549. delay(E+15);
  550. tone(11, Gb4,E);
  551. delay(E+15);
  552. tone(11, Gb4,E+S);
  553. delay(E+15+S);
  554. tone(11, Ab4,S);
  555. delay(S+15);
  556. tone(11, LA4,S);
  557. delay(S+15);
  558. tone(11, LA4,S);
  559. delay(S+15);
  560. tone(11, Gb4,E);
  561. delay(E+15);
  562. tone(11, Gb4,E);
  563. delay(E+15);
  564. tone(11, Gb4,S);
  565. delay(S+15);
  566. tone(11, LA4,S);
  567. delay(S+15);
  568. //6
  569. tone(11, Ab4,E);
  570. delay(E+15);
  571. tone(11, E4,E);
  572. delay(E+15);
  573. tone(11, E4,E);
  574. delay(E+15);
  575. tone(11, E4,E);
  576. delay(E+15);
  577. tone(11, Ab4,S);
  578. delay(S+15);
  579. tone(11, Ab4,S);
  580. delay(S+15);
  581. tone(11, Gb4,E);
  582. delay(E+15);
  583. tone(11, Gb4,E+S);
  584. delay(E+15+S);
  585. tone(11, Gb4,S);
  586. delay(S+15);
  587. //7
  588. tone(11, Db4,E);
  589. delay(E+15);
  590. tone(11, Gb4,E);
  591. delay(E+15);
  592. tone(11, Gb4,E+S);
  593. delay(E+15+S);
  594. tone(11, Ab4,S);
  595. delay(S+15);
  596. tone(11, LA4,S);
  597. delay(S+15);
  598. tone(11, LA4,S);
  599. delay(S+15);
  600. tone(11, Gb4,E);
  601. delay(E+15);
  602. tone(11, Gb4,E);
  603. delay(E+15);
  604. tone(11, Gb4,S);
  605. delay(S+15);
  606. tone(11, LA4,S);
  607. delay(S+15);
  608. //8
  609. tone(11, Db5,S);
  610. delay(S+15);
  611. tone(11, Db5,S);
  612. delay(S+15);
  613. tone(11, Db5,S);
  614. delay(S+15);
  615. tone(11, B4,S);
  616. delay(S+15);
  617. tone(11, LA4,S);
  618. delay(S+15);
  619. tone(11, LA4,S);
  620. delay(S+15);
  621. tone(11, Ab4,S);
  622. delay(S+15);
  623. tone(11, Ab4,S);
  624. delay(S+15);
  625. tone(11, LA4,E);
  626. delay(E+15);
  627. tone(11, Gb4,S);
  628. delay(S+15);
  629. tone(11, Gb4,S);
  630. delay(S+15);
  631. tone(11, Gb4,E);
  632. delay(E+15);
  633. tone(11, Gb4,S);
  634. delay(S+15);
  635. tone(11, LA4,S);
  636. delay(S+15);
  637. //9
  638. tone(11, Db5,E);
  639. delay(E+15);
  640. tone(11, Db5,E);
  641. delay(E+15);
  642. tone(11, B4,E);
  643. delay(E+15);
  644. tone(11, LA4,E);
  645. delay(E+15);
  646. tone(11, Ab4,E);
  647. delay(E+15);
  648. tone(11, E4,E);
  649. delay(E+15);
  650. tone(11, E4,E);
  651. delay(E+15);
  652. tone(11, E4,S);
  653. delay(S+15);
  654. tone(11, E4,S);
  655. delay(S+15);
  656. //10
  657. tone(11, B4,S);
  658. delay(S+15);
  659. tone(11, B4,S);
  660. delay(S+15);
  661. tone(11, B4,S);
  662. delay(S+15);
  663. tone(11, B4,S);
  664. delay(S+15);
  665. tone(11, LA4,E);
  666. delay(E+15);
  667. tone(11, Ab4,E);
  668. delay(E+15);
  669. tone(11, LA4,E);
  670. delay(E+15);
  671. tone(11, Gb4,S);
  672. delay(S+15);
  673. tone(11, Gb4,S);
  674. delay(S+15);
  675. tone(11, Gb4,E);
  676. delay(E+15);
  677. tone(11, Gb4,S);
  678. delay(S+15);
  679. tone(11, LA4,S);
  680. delay(S+15);
  681. //11
  682. tone(11, Db5,E);
  683. delay(E+15);
  684. tone(11, Db5,E);
  685. delay(E+15);
  686. tone(11, B4,E);
  687. delay(E+15);
  688. tone(11, LA4,E);
  689. delay(E+15);
  690. tone(11, Ab4,E);
  691. delay(E+15);
  692. tone(11, E4,E);
  693. delay(E+15);
  694. tone(11, E4,E);
  695. delay(E+15);
  696. tone(11, E4,S);
  697. delay(S+15);
  698. tone(11, E4,S);
  699. delay(S+15);
  700. //12
  701. tone(11, B4,S);
  702. delay(S+15);
  703. tone(11, B4,S);
  704. delay(S+15);
  705. tone(11, B4,S);
  706. delay(S+15);
  707. tone(11, B4,S);
  708. delay(S+15);
  709. tone(11, LA4,E);
  710. delay(E+15);
  711. tone(11, Ab4,E);
  712. delay(E+15);
  713. tone(11, Gb4,E);
  714. delay(E+15);
  715. delay(Q+S);
  716. tone(11, Gb4,S);
  717. delay(S+15);
  718. //13
  719. tone(11, C4,E);
  720. delay(E+15);
  721. tone(11, Gb4,E);
  722. delay(E+15);
  723. tone(11, Gb4,E+S);
  724. delay(E+15+S);
  725. tone(11, Ab4,S);
  726. delay(S+15);
  727. tone(11, LA4,S);
  728. delay(S+15);
  729. tone(11, LA4,S);
  730. delay(S+15);
  731. tone(11, Gb4,E);
  732. delay(E+15);
  733. tone(11, Gb4,S);
  734. delay(S+15);
  735. tone(11, LA4,S);
  736. delay(S+15);
  737. //14
  738. tone(11, Ab4,E);
  739. delay(E+15);
  740. tone(11, E4,E);
  741. delay(E+15);
  742. tone(11, E4,E);
  743. delay(E+15);
  744. tone(11, E4,E);
  745. delay(E+15);
  746. tone(11, Ab4,S);
  747. delay(S+15);
  748. tone(11, Ab4,S);
  749. delay(S+15);
  750. tone(11, Gb4,E);
  751. delay(E+15);
  752. tone(11, Gb4,E+S);
  753. delay(E+15+S);
  754. tone(11, Gb4,S);
  755. delay(S+15);
  756. //15
  757. tone(11, C4,E);
  758. delay(E+15);
  759. tone(11, Gb4,E);
  760. delay(E+15);
  761. tone(11, Gb4,E+S);
  762. delay(E+15+S);
  763. tone(11, Ab4,S);
  764. delay(S+15);
  765. tone(11, LA4,S);
  766. delay(S+15);
  767. tone(11, LA4,S);
  768. delay(S+15);
  769. tone(11, Gb4,E);
  770. delay(E+15);
  771. tone(11, Gb4,S);
  772. delay(S+15);
  773. tone(11, LA4,S);
  774. delay(S+15);
  775. //16
  776. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement