Hallo,

also ich bin gerade dabei mit dem schnellsten TSOP zu spielen den ich auftreiben kann. Es handelt sich dabei um den TSOP 1756.

Folgendes :

Ich habe mir eine Senderschaltung zusammengebaut (geätzte Platine) mit einem ATTIny 2313 der mit 20MHz betrieben wird! Schalte ich ihn ein, reagiert der TSOP darauf (sogar wenn ich ihn in eine 6m entfernte Ecke des Zimmers lege und die LED abdunkel

Der Quellcode macht ca 57khz und läuft auch. Aber da der TSOP nur einen kurzen 56khz burst möchte, und dann ein wenig Pause will hab ich Programmechisch ein Problem :

Hier der Qellcode mit den Dauer-57khz :

Code:
$regfile = "2313def.dat"                                    'AT90S2313
$crystal = 2000000                                          'Quarz 8MHz

Ddrd.6 = 1
Laser Alias Portd.6

Dim I As Integer



'********************************************************************************


Do                                                         

                                                            ' 56khz
Set Portd.6
Waitus 3
Reset Portd.6
Waitus 2


Loop

End
Wenn ich jetzt aber eine Schleife einbaue, habe ich das Problem das die 56khz nicht mehr Funktionieren :

Code:
$regfile = "2313def.dat"                                    'AT90S2313
$crystal = 2000000                                          'Quarz 8MHz

Ddrd.6 = 1
Laser Alias Portd.6

Dim I As Integer

Do                                                          'Beginn der Schleife

For I = 1 To 20                                             ' 56khz / 20 Bursts pro Puls / 50 Pulse pro sekunde
Set Portd.6
Waitus 3
Reset Portd.6
Waitus 2


Next I

Waitms 100                                              '100mS mal zum Probieren ob der TSOP reagiert

Loop

End
Aber das klappt nicht! Ich denke das die Schleife mit der Abfrage (Next I) zu lange dauert und mir die Frequenz durcheinander bringt! Die Frequenzen kann ich gut mit einem Frequenzzähler messen. bei dem unteren Quellcode zeigt er mir aber nur ein paar Khz an. Ich denke das ist die Wiederhlung des Bursts.

Kann mir jemand weiterhelfen?

Grüße und schonmal Frohe Weinachten
Alex