hi ich habe wieder mal einproblem mit meiner atiny 12 ich habe einen
Schalter mit dem i/o port verbunden und mit masse und dann den
internern pull up aktiviert nur was ich auch mache es passiert nichts.

hier der code

$regfile = "1200def.dat"
$crystal = 1000000
$tiny
Config Pinb.1 = Input
Ddrb = &B00001001
Portb = &B00000010
Dim X As Iram Byte
Dim Y As Iram Byte
X = 0
Y = 0
Do

If Pinb.1 = 1 Then
Portb.0 = 1
Else
Portb.0 = 0
End If

Loop

End