-
Ich habe gerade ein neues Programm mit nur einem Taster geschrieben aber es funzt immer noch nicht , kann mir jemand mal sagen warum dass nicht geht??? Ich glaube dass Problem ist irgendwo bei der If- Anweisung
Code:
$regfile = "m8def.dat"
$crystal = 1000000
Config Pinb.1 = Output ' Enable 1
Config Pinb.2 = Output ' Input 1a
Config Pinb.3 = Output ' Input 1b
Config Pinc.5 = Output ' Enable2
Config Pinc.4 = Output ' Input 2a
Config Pinc.3 = Output ' Input 2b
Config Pinb.5 = Input ' Taster input
Dim Taster As Bit ' Taster Variable
Pinb.5 = 1 ' Pull up
Do ' Wertzuweisung Variable
If Pinb.5 = 1 Then
Taster = 1
Else
Taster = 0
End If
If Taster = 1 Then
Pinb.1 = 1
Pinc.5 = 1
Pinb.2 = 1
Pinc.4 = 1
Else
Pinb.1 = 0
Pinc.5 = 0
Waitms 150
Pinb.1 = 1
Pinc.5 = 1
Pinb.3 = 1
Pinc.3 = 1
Waitms 300
Pinb.3 = 0
Waitms 200
Pinc.3 = 0
Pinb.1 = 0
Pinc.5 = 0
Waitms 100
End If
Loop
-
Hallo, ich hab die Programierung immer noch nicht hingekriegt. Allerdings habe ich gerade mal ne LED angeschlossen und ein Programm geschrieben
dass sie an geht wenn man den Taster drückt:
Code:
$regfile = "m8def.dat"
$crystal = 1000000
Config Pind.0 = Output ' Enable 1
Config Pind.5 = Input ' Taster input
Pind.5 = 1 ' Pull up
Do
If Pind.5 = 0 Then
Portd.0 = 1
Else
Portd.0 = 0
End If
Loop
Wenn ich jetzt die Stromversorgung einschalte, Leuchtet die LED kurz, wierd dann immer dunkler und geht dann aus.
wenn ich den Taster drücke geht sie sofort aus. Kann mir jemand sagen woran dass liegt??? ist da irgendwo ein Fehler in der Hardware???
-
Wie hast du den Taster den beschaltet?
-
Den Taster habe ich einfach mit dem einen Anschluss an den Controler und mit dem anderen nach GND geschaltet.
-
Hallo,
Du hast Deinen Pin in einem undefinierten Zustand indem Du den Taster nur am Pin und zu GND geschaltet hast. Bau doch noch einen PullUp ein - dazu einefach einen 1kOhm Widerstand mit an den Pin und dann an VCC verbinden. Dann sollte wenigstens die Hardware etwas sicherer funktionieren.
mfg
-
Achso, danke. ich dachte der Pullup in Bascom würde reichen. Ich löte gleich mal nen Wiederstand dazwischen.
-
ähm, okay Bascom ist nicht meins, wenn du einen PullUp eingeschaltet hast dann benötigst du den nicht extra noch draussen. Das wäre dann mein Fehler.
Um gottes willen ...versuche es doch mal mit ner klemme oder ähnliches.
-
Hey,
schau mal hier:
http://halvar.at/elektronik/kleiner_...er_entprellen/
Das muss PORTX = 1 heißen und nicht PINX = 1.
-
Danke, dass werde ich gleich mal ändern.
EDIT: Jetzt läuft der Bot endlich:p. Danke nochmal für den Tipp!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
-
Ich wollte gerade ein Relais über einen Bc 337 an den atmega anschließen, allerdings Funktioniert dass nicht, da die Basis
ja an eine Positive spannung benötigt, am Controlerpin aber eine Negative Stannung ist. kann mir demand helfen, wie ich dass lösen kann???
