-
-
Neuer Benutzer
Öfters hier
Hallo Vitis,
Danke für die Tipps, eine Art der Übertragung funktioniert jetzt schon, man kann den Port schalten, jedoch überträgt der Sensor Zeichen solange man den Taster drückt und der Aktor bringt diese auch so auf den Port.
Wie es geht hab ich bisher nicht verstanden, ich sende ja nur eine 1 und diese wird auf Port B übertragen, meine Ausgangs-Led ist aber an Port B.1 angeschlossen die 1 kann aber eigentlich nur Port B.0 ansteuern ?? Rutschen die da irgendwie durch ?
'Sensor
$regfile = "attiny2313.dat"
$crystal = 3579545
$baud = 4800
Portb = &B11111111
Config Portd = Output
Do
Portd.2 = 1
If Pinb.1 = 0 Then
Waitms 5
Print "1"
Waitms 5
Portd.2 = 0
Waitms 5
End If
Loop
'Aktor
$regfile = "attiny2313.dat"
$crystal = 3579545
$baud = 4800
Config Portb = Output
Dim S As String * 5
Portd.2 = 0
Do
Portb = Waitkey()
Loop
Trotzdem versteh ich nicht ganz warum die anderen Versuche gar nicht liefen, an der Hardware hab ich auch was geändert, die Pullup-Wiederstände zu GND und VSS am Bus hab ich entfernt, der LTC 485 scheint ohne besser zu laufen vielleicht lags auch daran.
Mfg Jürgen
Berechtigungen
- Neue Themen erstellen: Nein
- Themen beantworten: Nein
- Anhänge hochladen: Nein
- Beiträge bearbeiten: Nein
-
Foren-Regeln
Lesezeichen