[gelöst] I2C_MCP23017 Eingänge schalten nur verzögert

[Burny4600]

Irgend wie schaffe ich es nicht das die Eingänge sofort schalten.
Die Eingänge ändern den Status erst nach einer gewissen Zeit.
Die Ausgänge schalten sofort, wobei der Status ausgeschaltet die Relais einschaltet.
Wie kann ich die Funktion verbessern damit der betätigte Schalter auch sofort eine Statusänderung an den Eingängen bewirkt.

Code Auswählen Erweitern


########################################
###         MCP23017 Modul           ###
########################################

### Eingänge
define mcp23017_B1 I2C_MCP23017 0x20
attr mcp23017_B1 IODev RPiI2C_1
attr mcp23017_B1 Interrupt A0,A1,A2,A3,A4,A5,A6,A7,B0,B1,B2,B3,B4,B5,B6,B7
attr mcp23017_B1 InterruptOut connected_open-drain
attr mcp23017_B1 Pullup A0,A1,A2,A3,A4,A5,A6,A7,B0,B1,B2,B3,B4,B5,B6,B7
attr mcp23017_B1 alias Digital Eingänge Port 1 A0-7,B0-7
attr mcp23017_B1 devStateIcon Ok:it_net@green Initialized:it_net@yellow disconnected:it_net@red error:it_net@red
attr mcp23017_B1 icon it_net
attr mcp23017_B1 invert_input A0,A1,A2,A3,A4,A5,A6,A7,B0,B1,B2,B3,B4,B5,B6,B7
attr mcp23017_B1 room _RxTx

# -----------------------------------------------------------------------------------------------

### Ausgänge
define mcp23017_B2 I2C_MCP23017 0x21
attr mcp23017_B2 IODev RPiI2C_1
attr mcp23017_B2 OnStartup A0=off,A1=off,A2=off,A3=off,A4=off,A5=off,A6=off,A7=off,B0=off,B1=off,B2=off,B3=off,B4=off,B5=off,B6=on,B7=last
attr mcp23017_B2 OutputPorts A0,A1,A2,A3,A4,A5,A6,A7,B0,B1,B2,B3,B4,B5,B6,B7
attr mcp23017_B2 alias Digital Ausgänge Port 2 A0-7,B0-7
attr mcp23017_B2 devStateIcon Ok:it_net@green Initialized:it_net@yellow disconnected:it_net@red error:it_net@red
attr mcp23017_B2 icon it_net
attr mcp23017_B2 room _RxTx

# -----------------------------------------------------------------------------------------------

########################################
###      Interrupt für MCP23017      ###
########################################

### RPI_GPIO MCP23017 Modul 1
define INT RPI_GPIO 29
attr INT active_low yes
attr INT alias GIPO.29 Interupt für MCP23017 Modul 1
attr INT devStateIcon EIN:control_on_off@lightgreen AUS:control_home@red
attr INT direction input
attr INT eventMap off:AUS on:EIN
attr INT icon control_on_off
attr INT interrupt both
attr INT poll_interval 1
attr INT pud_resistor up
attr INT room _GPIO,_IO
attr INT userReadings get_int {fhem ("get mcp23017_B1,mcp23017_B2")}

# -----------------------------------------------------------------------------------------------

########################################
###        Eingänge MCP23017         ###
########################################

### Bank 1 Kanal A
### Poolbeleuchtung
define mcp23017_B1_A0 readingsProxy mcp23017_B1:PortA0
attr mcp23017_B1_A0 alias Aussenbereich - Pool - Schalter LED Beleuchtung
attr mcp23017_B1_A0 devStateIcon EIN:control_on_off@lightgreen AUS:control_home@red
attr mcp23017_B1_A0 eventMap on:EIN off:AUS
attr mcp23017_B1_A0 group InputPorts
attr mcp23017_B1_A0 icon control_on_off
attr mcp23017_B1_A0 room AB-Pool,_IO
attr mcp23017_B1_A0 valueFn {($VALUE eq "on")?"on":"off"}

# -----------------------------------------------------------------------------------------------

########################################
###        Ausgänge MCP23017         ###
########################################

### Poolbeleuchtung
define mcp23017_B2_A3 readingsProxy mcp23017_B2:PortA3
attr mcp23017_B2_A3 alias Aussenbereich - Pool - LED Beleuchtung
attr mcp23017_B2_A3 cmdIcon EIN:remotecontrol/black_btn_GREEN AUS:remotecontrol/black_btn_RED
attr mcp23017_B2_A3 devStateIcon EIN:light_led@yellow AUS:light_led@gray
attr mcp23017_B2_A3 eventMap off:EIN on:AUS
attr mcp23017_B2_A3 group OutputPorts
attr mcp23017_B2_A3 icon light_led
attr mcp23017_B2_A3 room AB-Pool,_IO
attr mcp23017_B2_A3 setFn {($CMD eq "on")?"PortA3 on":"PortA3 off"}
attr mcp23017_B2_A3 setList on off
attr mcp23017_B2_A3 valueFn {($VALUE eq "on")?"on":"off"}
attr mcp23017_B2_A3 webCmd ::EIN:AUS

Eine defekte Leitung vom GIPO zum INTA war an dem Fehler schuld.