-         
+ Antworten
Ergebnis 1 bis 4 von 4

Thema: Bascom RC5 mit 89c2051

  1. #1
    NormBot
    Gast

    Bascom RC5 mit 89c2051

    Hallo ich Suche vergeblich wie ich im Bascom ein RC5 Signal auslesen kann alle Codes die ich finde bringen mir abhängig vom Quarz die Meldung

    Address 21 comand 1

    oder

    Address 40 comand 1
    Address 41 comand 1

    hab schon versucht am Code zu basteln komm leider nicht drauf

    Arbeite mit Philips FBs die ansich RC5 sein sollten !!!!!

    habe insgesammt 5 FBs da die alle auch am TSOP reagieren (mit Oszi signal da)

    zum Aufbau habe einen 89c2051 an Pin3.2 beschaltet (int0) mit dem TSOP signal !!

    am Pin 3.1 hab ich ne LED über nen BC547 hängen die ich beim Empfang mit ansteuer (die Blinkt auch, also irgendwas kommt an)

    wäre für HILFE dankbar find hier fast nur AVR Codes

  2. #2
    Erfahrener Benutzer Robotik Einstein
    Registriert seit
    20.06.2004
    Beiträge
    1.941

    adresse von der fernbedienung

    hallo, im beispiel vom Bascom für rc5 "getrc" können sie die adressen abfragen.
    einfach die "if-then" schleife weglassen , dann "address" und "command"
    auf einem display ausgeben oder seriell zum pc zur ausgabe und schon haben sie raus ob die fernbedienung anspricht oder nicht.
    mfg pebisoft

  3. #3
    Erfahrener Benutzer Robotik Einstein
    Registriert seit
    09.06.2004
    Ort
    Aachen
    Beiträge
    2.674
    Das der TSOP reagiert heißt ja erstmal garnix. Versuch doch einfach mal von einem Controller RC5-Befahle an den anderen zu senden, dann kannst du sicher gehen, dass es RC% ist, und weißt, was rauskommen müsste.

    MFg Moritz

  4. #4
    Neuer Benutzer Öfters hier
    Registriert seit
    27.05.2004
    Beiträge
    24

    Re: Bascom RC5 mit 89c2051

    Hallo,

    Zitat Zitat von NormBot
    Hallo ich Suche vergeblich wie ich im Bascom ein RC5 Signal auslesen kann alle Codes die ich finde bringen mir abhängig vom Quarz die Meldung

    Arbeite mit Philips FBs die ansich RC5 sein sollten !!!!!
    habe insgesammt 5 FBs da die alle auch am TSOP reagieren (mit Oszi signal da)
    ich hänge mal was ran, ist zwar schon Jahre her, hat aber bei mir geklappt.
    Ist nur ne Anpassung der Sample Datei, vielleicht hilft es ja.

    Code:
    'Test ein IR Signal von Fernbedienung zu empfangen
    'und an die 8 Bit I/O Karte auszugeben, Relais schalten
    
    'Empfänger an Pin 3.2
    '9600 Baud
    Config I2cdelay = 1
    
    Dim New As Bit
    Dim Command As Byte , Subaddress As Byte
    Dim Adresse As Byte
    Dim Wert As Byte
    
    Adresse = 112                   'Adresse des PCF 8574A
    
    Reset Tcon.0                    'triggered by rising edge
    
    On Int0 Receiverc5
    Enable Int0
    Enable Interrupts
    Do
            If New = 1 Then         'received new code
                    Disable Int0
                    Print Command ; "  " ; Subaddress
                    If Command = 0 Then Wert = 255
                    If Command = 1 Then Wert = 254
                    If Command = 2 Then Wert = 253
                    If Command = 3 Then Wert = 251
                    If Command = 4 Then Wert = 247
                    If Command = 5 Then Wert = 239
                    If Command = 6 Then Wert = 223
                    If Command = 7 Then Wert = 191
                    If Command = 8 Then Wert = 127
    
                    I2csend Adresse , Wert
    
                    New = 0         'reset new bit
                    Enable Int0
            End If
    Loop
    
    
    
    Receiverc5:                     'interrupt routine
       Getrc5(subaddress , Command)
       New = 1                      'set flag
    Return
    Aber ich kann mich erinnern, daß von wasweißichdreitausend FB nur eine wirklich RC5 hatte!

    mfG schnuppel

+ Antworten

Benutzer, die dieses Thema gelesen haben: 0

Derzeit gibt es keine Benutzer zum Anzeigen.

Berechtigungen

  • Neue Themen erstellen: Ja
  • Themen beantworten: Ja
  • Anhänge hochladen: Nein
  • Beiträge bearbeiten: Nein
  •