Hey,

das machst du einfach mit einem I2crbyte, statt dem I2cwbyte um die Daten zu schreiben.

Code:
I2cstart
I2cwbyte Adresse
I2crbyte MeineVariable, Nack
I2cstop
Das Datenbyte enthält den Status ALLER GPIOs.
Um den Status von GPIO 0 zu erhalten musst du es maskieren:

Status = MeineVariable AND &B00000001