Gast
#325540
Ich mache gerade meine ersten Gehversuche mit AVR, Bascom, Ponyprog und seriellem Programmer. Heute Morgen war ich noch glücklich, als die erste LED per Taster ein- uns ausschalten konnte. Und zwar mit ungefäher folgendem Programm: $regfile = "m8def.dat" $crystal = 3686400 Ddrb = &B00000010 Portb = &B00000001 Do If Portb.0 = 1 Then Portb.1 = 1 Else Portb.1 = 0 End If Loop End Nach einigen anderen Experimente merkte ich, das da irgend etwas nicht stimmt. Das obige Programm habe ich neu übertragen. Aber der Eingang in der Software sieht anscheinend immer eine "0", obwohl ich direkt am betreffenden Eingang eine "0" bzw. eine "1" je nach stellung des Tasters messe. Compilleren und Übertragen läuft reibungslos. Als Eingang habe ich auch Bit 1 bzw. Bit 2 verwendet. Erfolgslos. Als Ausgang deklarierte Bits reagieren, wenn ich die IF Abfrage ändere. Kann mir einer bitte sagen, woran es liegen kann oder was ich falsch mache? Gruss