Tocadiscos Binario IesLaEstrella

1/*
2* BinaryLP
3* 
4* This sort of works as an LP player. The difference  is 
5* that instead of using a needle on a plastic disc, 
6* we use three IR  sensors in a row to read a pattern from 
7* a paper disc. 
8* 
9* If you are  both musically and digitally inclined, 
10* you will have lots of fun creating  melodies with this.
11*
12* (c) 2013-2016 Arduino LLC.
13*/
14
15
16#include  <EducationShield.h>
17#include "pitches.h"
18
19//IRArray(left, middle, right);
20IRArray  ir = IRArray(A1, A2, A3);
21
22int piezo = 8; //Piezo pin
23int lastReading =  0; 
24
25void setup(){
26  pinMode(piezo, OUTPUT);
27  
28  //Use this line  to set the threshold of the IR sensors. 
29  //If you are using the Uno board,  set the threshold to 380,if you're using the 101 board, set it to 530.
30  //Use  ir.test() to check the values of each sensor in the loop()
31  ir.setThreshold(530);
32  
33  Serial.begin(9600);
34}
35
36void loop(){
37  //Use this line to check  the values from each IR sensor
38  //ir.test();
39  
40  //Read the binary pattern  and get a number from 0 to 7
41  int reading = ir.readBinary(); 
42  
43  //Play  a note depending on the read value
44  playNote(reading);
45
46}
47
48void  playNote(int r){
49  //If the last note we played is the same as the new note
50  //we make a short break so that two notes are distinguished
51  if(lastReading==r){
52    noTone(piezo);
53    delay(20);
54  }
55  
56  //Play a different note depending  on the value of b.
57  //Check pitches.h to see which notes you can use.
58  //In  this case the scale is C Major.
59  switch (r){
60    case 0:
61      break;
62    case 1:
63      tone(piezo, NOTE_C4);
64      break;
65    case 2:
66      tone(piezo,  NOTE_D4);
67      break;
68    case 3:
69      tone(piezo, NOTE_E4);
70      break;
71    case 4:
72      tone(piezo, NOTE_F4);
73      break;
74    case 5:
75      tone(piezo,  NOTE_G4);
76      break;
77    case 6:
78      tone(piezo, NOTE_A4);
79      break;
80    case 7:
81      tone(piezo, NOTE_B4);
82      break;   
83  }
84  
85  //If  r is more than 0 we save that value to lastByte
86  if(r>0)lastReading = r;
87}
88
89

1/*
2* BinaryLP
3* 
4* This sort of works as an LP player. The difference
5  is 
6* that instead of using a needle on a plastic disc, 
7* we use three IR
8  sensors in a row to read a pattern from 
9* a paper disc. 
10* 
11* If you are
12  both musically and digitally inclined, 
13* you will have lots of fun creating
14  melodies with this.
15*
16* (c) 2013-2016 Arduino LLC.
17*/
18
19
20#include
21  <EducationShield.h>
22#include "pitches.h"
23
24//IRArray(left, middle, right);
25IRArray
26  ir = IRArray(A1, A2, A3);
27
28int piezo = 8; //Piezo pin
29int lastReading =
30  0; 
31
32void setup(){
33  pinMode(piezo, OUTPUT);
34  
35  //Use this line
36  to set the threshold of the IR sensors. 
37  //If you are using the Uno board,
38  set the threshold to 380,if you're using the 101 board, set it to 530.
39  //Use
40  ir.test() to check the values of each sensor in the loop()
41  ir.setThreshold(530);
42
43  
44  Serial.begin(9600);
45}
46
47void loop(){
48  //Use this line to check
49  the values from each IR sensor
50  //ir.test();
51  
52  //Read the binary pattern
53  and get a number from 0 to 7
54  int reading = ir.readBinary(); 
55  
56  //Play
57  a note depending on the read value
58  playNote(reading);
59
60}
61
62void
63  playNote(int r){
64  //If the last note we played is the same as the new note
65
66  //we make a short break so that two notes are distinguished
67  if(lastReading==r){
68
69    noTone(piezo);
70    delay(20);
71  }
72  
73  //Play a different note depending
74  on the value of b.
75  //Check pitches.h to see which notes you can use.
76  //In
77  this case the scale is C Major.
78  switch (r){
79    case 0:
80      break;
81
82    case 1:
83      tone(piezo, NOTE_C4);
84      break;
85    case 2:
86      tone(piezo,
87  NOTE_D4);
88      break;
89    case 3:
90      tone(piezo, NOTE_E4);
91      break;
92
93    case 4:
94      tone(piezo, NOTE_F4);
95      break;
96    case 5:
97      tone(piezo,
98  NOTE_G4);
99      break;
100    case 6:
101      tone(piezo, NOTE_A4);
102      break;
103
104    case 7:
105      tone(piezo, NOTE_B4);
106      break;   
107  }
108  
109  //If
110  r is more than 0 we save that value to lastByte
111  if(r>0)lastReading = r;
112}
113
114