Hola Angelito!
Quizas ayudaria un poco ver un esquema del hard que usas.
¿Como sensas la temperatura?
Ademas, dale una mirada a la funcion "SYMBOL"...si en lugar de utilizar "PORTA.1 = 1" pones "PUERTA = ABIERTA" es mucho mas claro. Eso lo haces con SYMBOL, definiendo los valores para PUERTA y ABIERTA
Symbol puerta = PORTA.1
Symbol abierta = 1
Y luego ya puedes, por ejemplo, ver si la puerta esta abierta:
IF PUERTA = ABIERTA THEN.....
Lo cual es mucho mas claro y facil de entender, para ti y para los demas.
Saludos!