|
Anzeige
|
Mega8 Anfängerproblem
Gast
#742494
Ich ahbe folgenden Code der bei der simulation auch funktioniert doch wennn ich es auf den Mega 8 überspiele leutet die Led immer und mehr passiert nicht egal was ich mit dem taster mache. $regfile = "m8def.dat" $crystal = 3579545 Config Portb.1 = Output Config Portb.0 = Input Portb.1 = 1 Do If Portb.0 = 0 Then Portb.1 = 1 Else Portb.1 = 0 Loop
Gast
#742503
Wie ist der Taster angeschlossen?
Gast
#742504
von null zum taster und dann an pin 14. Weiß echt nicht warum es nicht funktioniert.
Gast
#742511
Du musst den internen Pull-Up-Widerstand noch aktivieren mit einer 'Portb.0=1' Anweisung.
Gast
#742515
habe ich gemacht doch jetzt leuchtet die Led überhaupt nicht mehr.
Gast
#742521
Ich sehe gerade. Du musst die IF-Anweisung anders schreieben. Nicht: 'If Portb.0 Then ....' sondern 'If Pinb.0=0 then ...'
Gast
#742532
Danke wunderbar jetzt gehts. Vielendank
Gast
#742534
Gern geschehen. Kannst ja mal auf www.DieElektronikerseite.de vorbei schauen, da sind in der Computerecke noch einige Beispiele für Bascom und AVR. Antwort schreiben |
Anzeige
|
