Hallo zusammen,

ich versuche drei Taster (STK500) mit einem ATmega8@16MHz abzufragen!

Ich bin grad wirklich am verzweifeln, ich habe das schon öffter gemacht, doch hier kann ich keinen Fehler finden! Trotzdem tut es nicht?!

Kann mir jemand einen Tipp geben, was ich hier noch ändern könnte?

Danke schon mal...

Gruß der EagleStar

Code:
$regfile = "m8def.dat"
$crystal = 16000000

Config Lcdpin = Pin , Rs = Portc.0 , E = Portc.1 , Db4 = Portc.2 , Db5 = Portc.3 , Db6 = Portc.4 , Db7 = Portc.5
Config Lcdbus = 4
Config Lcd = 16 * 2
Cursor Off Noblink

Taminus Alias Portd.0
Tamenu Alias Portd.1
Taplus Alias Portd.2

Config Taminus = Input
Config Tamenu = Input
Config Taplus = Input

Taminus = 1
Tamenu = 1
Taplus = 1

Dim Modi As Byte

Modi = 0

Cls
Lcd "Starte"
Lowerline
Lcd "DDS V1.0"
Wait 3
Cls

Do

Debounce Taminus , 0 , Klein , Sub
Debounce Tamenu , 0 , Modus , Sub
Debounce Taplus , 0 , Gross , Sub

Loop

Klein:
      Cls
      Lcd "Taster -"
      Lowerline
      Lcd "aktiv"
Return

Modus:
      Cls
      Lcd "Taster M"
      Lowerline
      Lcd "aktiv"
Return

Gross:
      Cls
      Lcd "Taster +"
      Lowerline
      Lcd "aktiv"
Return

End