Achso. Dann musst du das so machen:
Code:
$regfile = "m32def.dat"
$crystal = 1000000
$baud = 1200

Config Pina.0 = Input
Porta.0=1

Do
If Pina.0 = 0 then print "Gegenstand"
If Pina.0 = 1 then print "FREI!!"
Loop

End
Sollte so stimmen.

jon