RC5 Fernbedinung ATtiny2313 und powerdown Mode Proplem

**Der bastler** · 17.09.2017, 20:50

Hallo Forum Gemeinde und Bastler

Ich wollte gern eine RC5-FGernbedinung Bauen 4Tasten und dann in den schlaf modus gehen, aber irgendwie haut mein code nicht hin
Bitte um Rat und Tipps

Code:

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

Ddrd = &B00000010

Config Portd.6 = Output
Led_gelb Alias Portd.6   'LED GELB - Ob Programm Arbeitet ( Nur zum TESTEN)

'Config Portd.2 = Input
'Portd.2 = 0
Config Portd.3 = Input
Portd.3 = 1
Config Portd.4 = Input
Portd.4 = 1
Config Portd.5 = Input
Portd.5 = 1
Config Portd.5 = Input
Portd.6 = 1

Config Int0 = Low Level
Enable Interrupts
On Int0 Isr_int0
Disable Int0

Dim Geraet As Byte , Kommando As Byte
Dim Togglebit As Byte
Togglebit = 0

Do
  If Pind.3 = 0 Then
    Led_gelb = 1
    Geraet = 0           'Blinker / Lauflicht / Radio
    Kommando = 1         'Was wird geschaltet
    Rc5send Togglebit , Geraet , Kommando
    Waitms 50
    Gosub Code
  End If
  If Pind.4 = 0 Then
    Led_gelb = 1
    Geraet = 0           'Blinker / Lauflicht / Radio
    Kommando = 2         'Was wird geschaltet
    Rc5send Togglebit , Geraet , Kommando
    Waitms 50
    Gosub Code
  End If
  If Pind.5 = 0 Then
    Geraet = 0           'Blinker / Lauflicht / Radio
    Kommando = 4         'Was wird geschaltet
    Rc5send Togglebit , Geraet , Kommando
    Waitms 50
    Gosub Code
  End If
  Loop
End

Code:
Togglebit = 0
Geraet = 0
Rc5send Togglebit , Geraet , Kommando
Waitms 80
Enable Int0
'powerdown
Return
End

Isr_int0:
Disable Int0
Return

Schaltung wird nachgereicht
Vielen Dank und einen schönen Abend Noch
Gruß T Sch.

- - - Aktualisiert - - -

Hier die bilder und schaltung