Als Ausgang sollte der PIN nicht konfiguriert sein. An einen Softwarefehler habe ich noch gar nicht gedacht, kann da mal bitte jemand kurz rübergucken:
Code:$regfile = "m32def.dat"
$framesize = 32
$swstack = 32
$hwstack = 32
$crystal = 8000000
'LCD Pinbelegung:
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = Portd.6 , Db5 = Portb.7 , Db6 = Portd.5 , Db7 = Portd.1 , E = Portd.0 , Rs = Portd.4
Config Lcdbus = 4
Dim Wegz As Long
Dim Verbrauchz As Long
Config Int0 = Change
Enable Int0
Enable Interrupts
On Int0 Interrupt_verbrauch
Portd.2 = 1
Config Int1 = Rising
Enable Int1
Enable Interrupts
On Int1 Interrupt_weg
Portd.3 = 1
Wegz = 0
Verbrauchz = 0
Cls
Do
Locate 1 , 1
Lcd "weg: " ; Wegz
Locate 2 , 1
Lcd "verbrauch: " ; Verbrauchz
Loop
Interrupt_weg:
Incr Wegz
Return
Interrupt_verbrauch:
Incr Verbrauchz
Return