Tiny 45 und Getrc5

[meldano]

Hi Leute,

ich wollte heute mal ausprobieren, ob ich einen TSOP1736 ans laufen bekomme.
Schade...Ich erhalte folgende Fehlermeldung von Bascom (siehe Anhang)


Hier der Code:

'_________________________________________________ _____________________________
'_________________________________________________ ______________________________
' Tiny45 RC5
' Mai 2007
' meldano
'_________________________________________________ ______________________________
'_________________________________________________ ______________________________





$regfile = "ATtiny45.dat" 'Tiny45 Regfile

$crystal = 8000000
'8MHz
Config Rc5 = Pinb.4





Enable Interrupts


Dim Address As Byte , Command As Byte





Do



Getrc5(address , Command)






If Address = 0 Then


Command = Command And &B01111111

Toggle Portb.2

End If

Loop

End




Ich nutze die aktuelle Bascom-Demoversion.
Wisst ihr wie ich den Infrarot-Empfänger in Verbindung mit dem Tiny45 nutzen kann?
Läuft das Programm vielleicht mit eurer Vollversion?

Gruß
Daniel

[linux_80]

Hallo,

steht ja schön in der Fehlermeldung, der Code ist noch nicht für den Tiny45 portiert.

Der Name des Registers heisst beim T45 anders,
Du könntest aber mal diesen Workaround probieren:
Die Datei ATtiny45.DAT im Bascom-Verzeichnis öffnen, und nach TCCR0 suchen, diese Zeile kopieren und aus dem TCCR0B ein TCCR0 machen, speichern, und noch mal versuchen zu übersetzen. Der Fehler ist dann zwar weg, aber ob es auch läuft, siehst Du erst wenn es auf dem AVR läuft, oder eben nicht.