Willst Du bei Tastendruck nur den Zustand des Relais toggeln? Dann musst Du das so in etwa machen
Code:
define STATION_IO   as  byte

define REL1 ref STATION_IO at bit[5]
define REL2 ref STATION_IO at bit[6]
define REL3 ref STATION_IO at bit[7]
define REL4 ref STATION_IO at bit[8]

define Taster1 as Port[1] ' Taster auf GND
define Taster2 as Port[2] ' Taster auf GND
define Taster3 as Port[3] ' Taster auf GND
define Taster4 as Port[4] ' Taster auf GND

PULLUP1_ENABLE()
LIGHT=off
LCD.INIT
SDA=on
SCL=on

STATION_IO=OFF

#HAUPTSCHLEIFE
If Not(Taster1) then 
  REL1=Not(REL1)
  Do
  Loop Until Not(Taster1) 'Warten solange Taste gedrückt wird
end if
If Not(Taster2) then 
  REL2=Not(REL2)
  Do
  Loop Until Not(Taster2) 'Warten solange Taste gedrückt wird
end if
If Not(Taster3) then 
  REL3=Not(REL3)
  Do
  Loop Until Not(Taster3) 'Warten solange Taste gedrückt wird
end if
If Not(Taster4) then 
  REL4=Not(REL4)
  Do
  Loop Until Not(Taster4) 'Warten solange Taste gedrückt wird
end if

EXTPORT=STATION_IO   ' Auf Byteport schreiben


LCD.POS 1,1
LCD.PRINT "BINARY: "
SHOW_BINARY(STATION_IO)

goto HAUPTSCHLEIFE