Hallo Klaus,
erst einmal vielen Dank das du diech gemeldet hast, ich habe auch nicht erwartet das ich eine Fertiglösung hier bekomme.
Leider weiß ich mit For-Next-Schleife und/oder Interrupts nichts anzufangen ,das da unten ist mein Erstes Programm!
Nun hier ist was ich bis jetzt gemacht habe:

'Zwischensteuerung PC/8-Kanal Relaiskarte seriell -> 4/4 Kanal tast Funksteuerung
'über CCBasic M-Unit 1
' by O.Patzki

' Relais
define relais1 port[1]
define relais2 port[2]
define relais3 port[3]
define relais4 port[4]
define relais5 port[5]
define relais6 port[6]
define relais7 port[7]
define relais8 port[8]

' Eingänge
define key1 port[9]
define key2 port[10]
define key3 port[11]
define key4 port[12]

'Abfrage der Eingänge und Zuordnung Kanal 1-4
#loop
if key1 = ON then gosub kanal1
if key2 = ON then gosub kanal2
if key3 = ON then gosub kanal3
if key4 = ON then gosub kanal4

'Hier liegt mein Hauptproblem ist einer der keys 1-4 akriv werden die andenen blockiert ,
'es muß aber jeder eingang zu jeder zeit abgefragt werden können und das Programm muß permanent
'durchlaufen so das auch bei aktiven keys/eingängen auch die anderen kes/eingänge schalten können!
'bis auf dieses Problem lauft es gans nach meinen vorstellungen.

goto loop

'Ablauf Kanal 1
#kanal1
relais1 = ON
pause 100
relais1 = OFF
if key1 = ON then wait key1 = OFF
if key1 = OFF then relais2 = ON
pause 100
relais2 = OFF
return

'Ablauf Kanal 2
#kanal2
relais3 = ON
pause 100
relais3 = OFF
if key2 = ON then wait key2 = OFF
if key2 = OFF then relais4 = ON
pause 100
relais4 = OFF
return

'Ablauf Kanal 3
#kanal3
relais5 = ON
pause 100
relais5 = OFF
if key3 = ON then wait key3 = OFF
if key3 = OFF then relais6 = ON
pause 100
relais6 = OFF
return

'Ablauf Kanal 4
#kanal4
relais7 = ON
pause 100
relais7 = OFF
if key4 = ON then wait key4 = OFF
if key4 = OFF then relais8 = ON
pause 100
relais8 = OFF
return

Gruß
OPatzki