RC6 min Bascom

OP #1188541
Lesenswert?
• ▲
▼
Hallo @all,

ich versuche seit ein paar Tagen den RC6-Code meiner MCE-Fernbedienung 
auszulesen. Leider funkt es nicht so ganz. Ich muss dazu Sagen ich 
beschäftige mich mit mC seit erst ein paar Wochen und hoffe ich 
langweile euch nicht mit meinem Kram :)

Hier also mein Quelltext:

$regfile = "m16def.dat"
$crystal = 8000000
$hwstack = 32
$swstack = 32
$framesize = 40

Enable Interrupts

Config Lcdpin = Pin , Rs = Portd.2 , E = Portd.3 , Db4 = Portd.4
Config Lcdpin = Pin , Db5 = Portd.5 , Db6 = Portd.6 , Db7 = Portd.7
Config Lcd = 16 * 2
Cursor Off
Cls


Dim W As Word

Do

W = Getrc(pinb , 0)
If W > 0 Then Goto Rc6
W = 0

Loop

Rc6:
Lcd W
Waitms 500
Cls
Return

Wenigstens macht es irgendwas.
Ich bekomme also jedes Mal eine andere Ausgabe.
Mal zweistellig, Mal vier stellen.

Hätte jemand Lust mir da weiter zu helfen?

Ich habe schon einiges hier im Forum über RC-Codierung gelesen. Das ist 
mir jedoch zu komplex. Kann man das nicht für den Anfang ganz simpel 
halten?


Gruß, Vitali

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

oder

Mit Google-Account einloggen

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren