PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : UART über IR geht nicht



Athlonxp2000
29.12.2006, 20:58
Tach ich versuch gerade ein paar Daten über ir zu schicken habe aber irgendwie kein Erfolg!

Mein IR Empfänger arbeitet mit 36khz.

Ist meine Code zur 36khz erzeugung richtig??

Sender Code:


$regfile = "2313def.dat"
$crystal = 8000000
$baud = 9600
Const T_oc1 = 110

Config Pinb.3 = Output

Config Pind.5 = Input

Portd.5 = 1


Config Timer1 = Timer , Prescale = 1 , Compare A = Toggle , Clear Timer = 1
Timer1 = 0
Compare1a = T_oc1 'Pb.3 = OC1 = IR carrier output 36 kHz

Dim Test1 As Byte
Dim Test2 As Byte

Test1 = 11
Test2 = 22



Do


If Pind.5 = 1 Then
Print Test1
Else
Print Test2
End If


Loop


Empfänger Code:


$regfile = "2313def.dat"
$crystal = 8000000
$baud = 9600

Config Pind.3 = Output
Led Alias Portd.5

Dim I As Byte

Do
I = Inkey()

If I = 11 Then
Led = 0
Else
Led = 1
End If

Loop


Ich hoff mir kann jemand helfen!?


MfG

Athlon

linux_80
29.12.2006, 23:29
Hallo,
wie hast Du denn die IR-LED angeschlossen,
zwischen OCR1A und TxD sollte sie sein.

Und ich glaub deine Abfrage beim Empfänger läuft zu schnell, auch wenn die 11 mal erkannt werden sollte, schaltet die LED nur kurz um, denn beim nächsten durchlauf ist sie wieder 1.
Evtl. mal eine kleine Pause einbauen.

Hast Du einen AT90S2313 oder einen Tiny2313 ?

Athlonxp2000
30.12.2006, 00:34
Ups falsche Datei am Anfang :-b
Das IR Led ist richtig angeschlossen.

Das mit der Pasue werd ich mal austesten.

Athlonxp2000
30.12.2006, 13:39
Mh irgendwie haut das immer noch nicht hin?

Athlonxp2000
07.01.2007, 11:35
Mhr ist bekomm das einfach nicht hin hat jemand noch ne idea?

Rofo88
07.01.2007, 12:14
Kommt aus deiner Sende-LED was raus (überprüfs ma mit ner Digi-Cam).
Funktioniert dein Empfänger (mit ner Fernbedienung testen wenn möglich).

veit
07.01.2007, 16:21
sagt mal geht das überhaupt ???
direkt an den uart und dann über ir???

ich such schon länger ne möglichkeit hab aber noch nie beispiele gefunden.

gehe vom uart auf rs485 und dann über kabel an geräte und würde soo gern was mit ir machen ...


wird auch hier im forum hin- und wieder gesucht, z.b. hier:
https://www.roboternetz.de/phpBB2/zeigebeitrag.php?p=240321

Rofo88
07.01.2007, 16:33
Ja geht. Kannst ja mal die Anleitung für den Asuro ziehen (gibts z.B. bei Conrad) , da haste gleich nen Schaltplan mit drinn.

@Athlonxp2000
Mit wieviel Baud Arbeitest Du??

veit
08.01.2007, 18:17
naja der schaltplan ist nicht sooo das problem oder?

Rofo88
08.01.2007, 20:53
Nö, der ist ganz einfach. Aber wenn das da so gabaut wird, wirds wohl auch gehen. Und das war ja deine Frage!

robby-fant
09.01.2007, 21:42
wenn du mal die arbeitszeit der diode betrachtest kommst du nur ca auf 900bit /8 sind ca 110byte bzw 900 baud.

Rofo88
09.01.2007, 21:51
Ich habs nie nachgerechnet aber in der Anleitung zum Asuro steht was von 2400Baud. Das die Datenübertragung nicht all zu groß sein kann is mir klar wegen den 36kHz der IR.

Lenox
13.02.2007, 12:16
Hey, kann mal jemand den Schaltplan posten?
Einfach ein Pin von der IR Diode an TxD und das andere per Vorwiderstand an GND?
Und dann einen TSOP mit der Signalleitung an RxD?

Ich suche noch eine gute Methode um mein Lauflicht fernzusteuern.
Diese wir erscheint mir wesentlich leichter als RC5.

Bammel
20.03.2007, 18:12
so ich hole den thread nocmal hoch weil es mich auch interesieren würde... (letzter post)