Anche questo fa la stessa cosa
byte Val=PINA;
byte bit_0 = bitRead(Val, 0); //resituisce 0 o 1
byte bit_1 = bitRead(Val, 1); //resituisce 0 o 1
byte bit_2 = bitRead(Val, 2); //resituisce 0 o 1
...
...
dove PINA non è la moglie di Fantozzi :), ma il byte restituito che raccoglie lo status degli 8 pin
ad esempio nella 2560 i bit appartengono a questi pin
// PA 7 ** 29 ** D29
// PA 6 ** 28 ** D28
// PA 5 ** 27 ** D27
// PA 4 ** 26 ** D26
// PA 3 ** 25 ** D25
// PA 2 ** 24 ** D24
// PA 1 ** 23 ** D23
// PA 0 ** 22 ** D22
dovrei fare un test di efficienza tra questa funzione e quella di Mauro... oramai siamo in ballo 
ciao