- Este debate tiene 8 respuestas, 2 mensajes y ha sido actualizado por última vez el hace 1 semana, 1 día por
.
-
Entradas
-
Buenas tardes compañeros.
Soy nuevo en el foro y no se si en este tema esta bien la duda que voy a plantear.
Tengo que hacer un control de temperatura por escalones con SCL. Es decir tengo que regular una temperatura con 2 variables, calentar al 100% o al 50% según una serie de criterios.
Os lo pongo a modo de ejemplo para que se entienda mejor.
Tengo un temperatura de consiga de 180º con una histeresis de +-10º. Cuando la temperatura supera los 190º activo la salida de calentar a 50% y cuando esta por debajo de 170º activo 100%.
Esto lo quiero controlar con escalones y hacerlo con SCL.
Si no me equivoco tengo 3 escalones
- escalón 1 temperatura menor que 170º
- escalón 2 temperatura a 180º
- escalón 3 temperatura mayor que 180º
Con esto tengo que activar la salida de calentar al 100% y el 50%. cuando estoy en el escalón 1 y 2 tengo que activar la salida de 100% y cuando estoy en el escalón 3 activo la salida de 50%.
Principalmente la duda que tengo es como hacer los escalones y hacerlo en SCL. Es decir tengo un lectura de la temperatura y con esa lectura subo un escalón o le bajo.
Muchas gracias por vuestro tiempo de antemano y un saludo.
Hola,
Haciéndolo en scl sería tan sencillo como un select case.
En función del valor de la temperatura eliges un caso, por debajo de 170, entre 170 y 180, y por encima de 180.Hola Iñigo.
He hecho esto no se si así esta bien.
Static tipo de datos Valor
Estado_Tem Int 0
Constant
TEMP_MIN Int 0
TEMP_OK Int 1
TEMP_MAX Int 2========================================
CASE #Estado_Tem OF
#TEMP_MIN:
IF #Gas
AND (#Temp < #Temp_MIn_1
OR #Maquina_Calentando)
THEN
#Estado_Tem := #TEMP_MIN;
END_IF;#TEMP_OK:
IF #Gas
AND #Temp > #Temp_MIn_1
AND #Temp < #»Temp _Max»
THEN
#Estado_Tem := #TEMP_OK
END_IF;#TEMP_MAX:
IF #Gas
AND #Temp > #»Temp _Max»
AND NOT #Maquina_Calentando
THEN
#Estado_Tem := #TEMP_MAX;
END_IF;ELSE
;
END_CASE;#»Salida_50%» := #Estado_Tem =2 ;
#»Salida_100%» := #Estado_Tem = 1 OR #Estado_Tem = 0;============================================
Ahora he hecho esta versión
IF #Temp < #Temp_MIn_1
THEN
#Estado_Tem := 0;
END_IF;
IF #Temp > #Temp_MIn_1
AND #Temp < #»Temp _Max»
THEN
#Estado_Tem := 1;
END_IF;
IF #Temp < #»Temp _Max»
THEN
#Estado_Tem := 2;
END_IF;CASE #Estado_Tem OF
0:
#aux1:=1
;
1:
#aux2:=1
;
2:
#aux3:=1
;
ELSE
;
END_CASE;#»Salida_100%» := #Gas AND NOT #Alarma AND NOT #Marcha AND (#aux1 OR #aux2 OR #Maquina_Calentando);
#»Salida_50%» := #Gas AND (#aux3 OR #Alarma OR NOT #Marcha);
#»Temp _OK»:= #aux2;Creo que te estás complicando bastante la vida.
Tendría que ser tan simple como:
CASE temperatura
< temperatura minima -> salida_temporal = 100 (o lo que consideres)
temperatura minima .. Salida_temporal = 50 (o lo que consideres)
> temperatura maxima -> Salida_temporal = 0 (o lo que consideres)
Fin caseSalida = Salida_temporal
Y ya está
Muchas gracias Iñigo.
Lo del complicarme la vida creo que lo llevo en el ADN…..Y ahora estoy en método 5000 y es un método largo.
Hola Iñigo.
He visto que tienes un libro que se llama 7 pasos para programar mas ordenados……Me gustaría hacerme con el, pero no veo como descargarle.
No se si me lo puedes pasar de alguna manera, por lo que he visto creo que le regalas, si no es así me dices como conseguirle .
Un saludo.
Hola Iñigo.
He visto que tienes un libro que se llama 7 pasos para programar mas ordenados……Me gustaría hacerme con el, pero no veo como descargarle.
No se si me lo puedes pasar de alguna manera, por lo que he visto creo que le regalas, si no es así me dices como conseguirle .
Un saludo.
No te llega debido a que ya eres cliente/suscriptor.
El enlace es este: https://1drv.ms/b/s!Aq_6QgrSLhbti8IAH62rkarNh9Ak1w
- Debes estar registrado para responder a este debate.