//Examen 1° Parcial
//Inciso B (contador de pastillas)
//21/02/2013
//JEAL,SBA,AFRI,RJTO

//DECLARACION DE VARIABLES PASTILLAS
int motor= 2;
int RA= 27;
int RB= 26;
int RC= 25;
int C1= 5;
int C2= 21;
int C3= 23;

void setup() {
pinMode (motor, OUTPUT);
pinMode (RA, OUTPUT);
pinMode (RB, OUTPUT);
pinMode (RC, OUTPUT);
pinMode (C1, OUTPUT);
pinMode (C2, OUTPUT);
pinMode (C3, OUTPUT);
}

void loop() {
  //Conteo del Recipiente 1
  digitalWrite (RA, HIGH);
  digitalWrite (C1, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
  delay (200);
   digitalWrite (C1, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
  delay (200);
  digitalWrite (C1, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
  delay (200);
   digitalWrite (motor, HIGH);
   digitalWrite (RA, LOW);
  delay (1000);
   digitalWrite (motor, LOW);
   digitalWrite (RA, LOW);
  delay (1000);

// Conteo Recipiente 2

digitalWrite (RA, HIGH);
digitalWrite (RB, HIGH);
  digitalWrite (C1, HIGH);
  digitalWrite (C2, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
  delay (200);
   digitalWrite (C1, HIGH);
   digitalWrite (C2, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
    digitalWrite (C2, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
    digitalWrite (C2, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
    digitalWrite (C2, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
    digitalWrite (C2, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
    digitalWrite (C2, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
    digitalWrite (C2, HIGH);
  delay (200);
  digitalWrite (C1, LOW);
  digitalWrite (C2, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
    digitalWrite (C2, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
    digitalWrite (C2, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
  delay (200);
   digitalWrite (motor, HIGH);
   digitalWrite (RA, LOW);
   digitalWrite (RB, LOW);
  delay (1000);
   digitalWrite (motor, LOW);
   digitalWrite (RA, LOW);
   digitalWrite (RB, LOW);
  delay (1000);

//Conteo Recipiente 3
digitalWrite (RA, HIGH);
digitalWrite (RB, HIGH);
digitalWrite (RC, HIGH);
  digitalWrite (C1, HIGH);
  digitalWrite (C2, HIGH);
  digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
   digitalWrite (C1, HIGH);
   digitalWrite (C2, HIGH);
   digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
    digitalWrite (C2, HIGH);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
    digitalWrite (C2, HIGH);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
    digitalWrite (C2, HIGH);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
    digitalWrite (C2, HIGH);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
    digitalWrite (C2, HIGH);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
    digitalWrite (C2, HIGH);
    digitalWrite (C3, HIGH);
  delay (200);
  digitalWrite (C1, LOW);
  digitalWrite (C2, LOW);
  digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
    digitalWrite (C2, HIGH);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C1, HIGH);
    digitalWrite (C2, HIGH);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C1, LOW);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
   digitalWrite (motor, HIGH);
   digitalWrite (RA, LOW);
   digitalWrite (RB, LOW);
   digitalWrite (RC, LOW);
  delay (1000);
   digitalWrite (motor, LOW);
   digitalWrite (RA, LOW);
   digitalWrite (RB, LOW);
   digitalWrite (RC, LOW);
  delay (1000);

  //Conteo Penultimo Frasco
digitalWrite (RB, HIGH);
digitalWrite (RC, HIGH);
  digitalWrite (C2, HIGH);
  digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
   digitalWrite (C2, HIGH);
   digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C2, HIGH);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C2, HIGH);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C2, HIGH);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C2, HIGH);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C2, HIGH);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C2, HIGH);
    digitalWrite (C3, HIGH);
  delay (200);
  digitalWrite (C2, LOW);
  digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C2, HIGH);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C2, HIGH);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C2, LOW);
   digitalWrite (C3, LOW);
  delay (200);
   digitalWrite (motor, HIGH);
   digitalWrite (RB, LOW);
   digitalWrite (RC, LOW);
  delay (1000);
   digitalWrite (motor, LOW);
   digitalWrite (RB, LOW);
   digitalWrite (RC, LOW);
  delay (1000);

  //Conteo Ultimo Frasco
  digitalWrite (RC, HIGH);
  digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C3, LOW);
  delay (200);
   digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C3, HIGH);
  delay (200);
  digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C3, LOW);
  delay (200);
    digitalWrite (C3, HIGH);
  delay (200);
   digitalWrite (C3, LOW);
  delay (200);
   digitalWrite (motor, HIGH);
   digitalWrite (RC, LOW);
  delay (1000);
   digitalWrite (motor, LOW);
   digitalWrite (RC, LOW);
  delay (1000);
}