Hallo,
Zitat von
Yogi
Hallo,
hat jemand einen Code (.bas) um RC5-Codes zeizeilig auf dem LCD auszugeben??
was Du genau meinst, weiß ich jetzt nicht, aber für Basic++ sieht meine Testroutine, die Address und command ausgibt, so aus:
Code:
define addr as byte
define cmd as byte
define tempval as byte
'-------------------------------------------------------------------
'Initialisierungen
'pullups auf beiden Ports einschalten -----------------------------
config.init
config.get TEMPval 'den aktuellen Wert lesen,
tempval = (TEMPval or 00011000b)
config.put TEMPval 'Bits setzten und zurück schreiben
config.off
lcd.init 'LCD initialisieren
'-------------------------------------------------------------------
'----- Einfachsttest, der in einer Endlosschleife die Eckdaten -----
'-------------- der gesendeten RC5 Signale anzeigt -----------------
#IR_Test
lcd.clear
#LP
LCD.off
IR.init
ir.get ADDR, CMD
if ADDR and CMD = FFh then 'IR Daten empfangen?
'Keine Daten
IR.off
LCD.init switchonly
lcd.pos 1,1
LCD.print "Keine Taste"
lcd.pos 2,1
LCD.print " "
LCD.off
pause 25
else
'Zeige Daten
IR.off
LCD.init switchonly
LCD.clear
lcd.pos 1,1
LCD.print "ADDR: "
LCD.print ADDR AND 11011111b 'toggle herausgeundet
lcd.pos 2,1
LCD.print "CMD: "
LCD.print CMD
pieps() 'Quittungsbeep ausgeben
LCD.off
pause 25
end if
goto LP
Weitere Beispiele finden sich in den Beispielsammlungen, die man sich von der C-Control Supportseite herunterladen kann.
Grüße
Henrik
Zitieren
Lesezeichen