#include <EEPROM.h>
int DireccionEEPROM=0; //Posición de la memoria donde guardamos el dato
byte pinMi=7, pinMd=8; //Salidas para que el "motor" o cinta transportadora vaya a izquierda Mi y vaya a derecha Md
byte pinFb=10, pinFa=11; //pines de entrada, de los finales de carrera punto A y punto B
byte pinMa=3, pinP=2; //pines de entrada para pulsador de (Ma)rcha y (P)aro
byte motorD=0, motorI=0; // variables para poner el valor de salida inicializados en 0 para evitar problemas
byte memoria=1; // Cuando en la memoria se tenga el valor o dato 1 iremos hacia la derecha, cuando tengamos el valor o dato 2 irá hacia la izquierda
void setup()
{
memoria=EEPROM.read(DireccionEEPROM); //Recogemos el calor que hay en la posición de la EEPROM
if(memoria !=1 && memoria !=2)
{
memoria=1;
EEPROM.write(DireccionEEPROM,memoria);
}
pinMode(pinMi,OUTPUT);//Salida motor izquierda pin 7
pinMode(pinMd,OUTPUT);//Salida motor izquierda pin 8
pinMode(pinFa,INPUT);//Entrada final de carrea izquierda, pin 11
pinMode(pinFb,INPUT);//Entrada final de carrera derecha, pin 10
pinMode(pinMa,INPUT);//Entrada pulsador de marcha, pin 3
pinMode(pinP,INPUT);//Entrada pulsador de paro, pin 2
}
void loop()
{
byte Fb,Fa,Ma,P; //Variables para almacenar valores
Fa = digitalRead(pinFa);
Fb = digitalRead(pinFb);
Ma = digitalRead(pinMa);
P = digitalRead(pinP);
if(P==1)
{
motorD=0;
motorI=0;
}
else
{
if (motorD==0 && motorI==0 && Ma==1) //Si estando parado, se pulsa el boton de marcha "Ma"
{
memoria=EEPROM.read(DireccionEEPROM);
if(memoria !=1 && memoria !=2){memoria=1; EEPROM.write(DireccionEEPROM,memoria);}
if(memoria==1) {motorD=1;motorI=0;}//Si iba hacia la derecha, ve a la derecha
if(memoria==2){motorD=0;motorI=1;}//Si iba hacia la izquierda, ve a la izquierda
}
if(motorD==1 && Fb==1){motorD=0; motorI=0; memoria=2; EEPROM.write(DireccionEEPROM,memoria);}//Si va hacia la derecha y llega al final de carrera (Fb=1): para y guarda la memoria para ir a la izquierda
if(motorI==1 && Fa==1){motorD=0;motorI=0; memoria=1; EEPROM.write(DireccionEEPROM,memoria);}//Si va hacia la izquierda y llega al final de carrera izquierdo (Fa=1) para y guada en memoria para ir a la derecha
}
digitalWrite(pinMi,motorI);
digitalWrite(pinMd,motorD);
}
}
Vlad Cristian Lungu
- 11
- 2