ich habe mal folgenden code erfolgreich getestet
Code:
$regfile = "m32def.dat"
$crystal = 1000000
$baud = 9600

Config Portd = Input

Dim _neu As Byte
Dim _alt As Byte


Do

_neu.0 = Pind.0
_neu.1 = Pind.1
_neu.2 = Pind.2
_neu.3 = Pind.3
_neu.4 = Pind.4
_neu.5 = Pind.5
_neu.6 = Pind.6
_neu.7 = Pind.7

If _neu <> _alt Then
   Printbin _neu
   _alt = _neu
End If

Loop
mit Hterm 0.6.3beta werden alle zustände angezeigt (auch &B00000000)