Hallo Toastbrot,

ich blicke zwar bei deinem Programm nicht so richtig durch, ich glaube aber du hast noch Fehler drin.

Die Zeilen

Config Pina.1 = Input 'Für Sensorabfrage
Porta.7 = 1

sollen doch sicher so lauten

Config Pina.1 = Input 'Für Sensorabfrage
Porta.1 = 1