RC5 Code Bascom

Gast #1973890
Lesenswert?
• ▲
▼
Mein Code sieht bis jetzt so aus.Leider ist es bis jetzt ja nur möglich 
Relais1 zu schalten und das mit jedem RC5 Befehl der kommt.Ich möchte 
eine bestimmte Geräteadresse und Kommando bestimmen.

$regfile = "m8def.dat"
$crystal = 3686400

Config Portb.0 = Output
Config Portb.1 = Output
Config Portb.2 = Output

Config Rc5 = Pind.2

Enable Interrupts
Dim Address As Byte , Command As Byte

Relais1 Alias Portb.0
Relais2 Alias Portb.1
Relais3 Alias Portb.2

Do
Getrc5(address , Command)

If Address < 255 Then
Toggle Relais1

Command = Command And &B01111111

End If

Loop
End
Gast #1973927
Lesenswert?
• ▲
▼
Vielen dank!Ich hatte schon die ganze Zeit nach einer lib gesucht wo die 
Befehle drin stehen.Ich habe jetzt aber nochmal ein bißchen nachgedacht 
und folgende Lösung gefunden.

If adress=8 then
if command=87 then
toggle Relais1
if end
if end
else
if end

loop
end

Jetzt mache ich das noch mit Relais 2 und 3 und hoffe es geht.Ansonsten 
lese ich mal die Hilfe,kann nicht schaden.

Antwort schreiben

Hinweis: der ursprüngliche Beitrag ist mehr als 6 Monate alt. Bitte hier nur auf die ursprüngliche Frage antworten, für neue Fragen einen neuen Beitrag erstellen.

Formatierung
  • [c]C-Code[/c]
  • [code]Code in anderen Sprachen, ASCII-Zeichnungen[/code]
  • [math]Formel in LaTeX-Syntax[/math]
  • [[Titel]] – Link zu einem Artikel
  • Verweis auf einen anderen Beitrag: Rechtsklick auf dessen Beitrags-ID (#8078628), „Adresse kopieren“, in den Text einfügen

Mehr zur Formatierung

Längeren Sourcecode als Anhang, nicht in den Text. JPG nur für Fotos und Scans; Zeichnungen und Screenshots als PNG oder GIF. Siehe Bildformate.

Schon registriert? Anmelden

Wird nicht angezeigt. Wir schicken dir einen Link; sobald du damit bestätigst, erscheint dein Beitrag.

Mit dem Abschicken legst du einen kostenlosen Account an und erkennst die Nutzungsbedingungen und die Datenschutzerklärung an.