Ausgaben mit zb. set Portc.5
Eingaben aber mit zb if Pind.0
$regfile = "m8def.dat"
$crystal = 1000000
Config Portc = Output
Config Portd = Input
DO
if Pind.0 = 1 Then
Portc.5 = 1
Else
Portc.5 = 0
End If
LOOP
Probiere das mal.
Ausgaben mit zb. set Portc.5
Eingaben aber mit zb if Pind.0
$regfile = "m8def.dat"
$crystal = 1000000
Config Portc = Output
Config Portd = Input
DO
if Pind.0 = 1 Then
Portc.5 = 1
Else
Portc.5 = 0
End If
LOOP
Probiere das mal.
Lesezeichen