Per non usare i delay si può usare un metodo tipo questo
Inizio
Data una variabile unsigned long
Dato un intervalli di tempo da attendere
Setup
variabile=millis();
Loop
if (millis()-variabile >intervallo)
{
Azioni
Variabile=millis()
}
Resto loop