PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : IR Codes auf LCD ausgeben



Yogi
29.09.2005, 15:00
Hallo,

hat jemand einen Code (.bas) um RC5-Codes zeizeilig auf dem LCD auszugeben??

Gruß Yogi

hrei
29.09.2005, 15:41
Hallo,


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:



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

Yogi
29.09.2005, 15:51
Danke für das Posting,

hab gerade gesehen, dass es für den RP5 ein eigenes Forum gibt, sorry!

Gruß Yogi

PS: Wende mich mal dahin!