Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #tempo_att_ganasce := S_PEXT(T_NO := "timer_emerg_ganasce",
- S := "start_timer_emerg_ganasce" ,
- TV := #tempo_preimpostato,
- Q => "stato_timer_emerg_ganasce",
- R := "reset_timer_emerg_ganasce");
- #tempo_att_piatto := S_PEXT(T_NO := "timer_emerg_piatto",
- S := "start_timer_emerg_piatto" ,
- TV := #tempo_preimpostato,
- Q => "stato_timer_emerg_piatto",
- R := "reset_timer_emerg_piatto");
- "sequenza" := 11;
- // azzeramento della variabile #emergenza
- IF ((#richiesta AND (("sensore_piatto_alto") OR ("sensore_ganasce_aperte")))
- AND "stato_emergenza") THEN
- #emergenza := 0;
- RETURN;
- END_IF;
- // test per uscita dalla funzione
- IF (("stato_timer_emerg_ganasce" OR "stato_timer_emerg_piatto") AND
- #uscita_ciclo) THEN
- #uscita_ciclo := 0;
- END_IF;
- // test per avvenuto errore
- IF ((((#richiesta AND ((NOT "stato_timer_emerg_ganasce") OR
- (NOT "stato_timer_emerg_piatto"))) AND ((NOT "comando_valv_ganasce")
- OR (NOT "comando_valv_piatto"))) AND ((NOT "sensore_piatto_alto") OR
- (NOT "sensore_ganasce_aperte"))) AND #emergenza) THEN
- "start_timer_emerg_ganasce" := 0;
- "start_timer_emerg_piatto" := 0;
- "errore" := 'A'; //errore apertura
- #emergenza := 0;
- RETURN;
- END_IF;
- // avvio temporizzatori e attivazione dei comandi
- IF ((#richiesta AND ((NOT "sensore_piatto_alto") OR
- (NOT "sensore_ganasce_aperte"))) AND ((NOT "stato_timer_emerg_ganasce")
- OR (NOT "stato_timer_emerg_piatto"))) THEN
- "reset_timer_emerg_ganasce" := 0;
- "reset_timer_emerg_piatto" := 0;
- "start_timer_emerg_ganasce" := 1;
- "start_timer_emerg_piatto" := 1;
- "comando_valv_ganasce" := 0; // apertura ganasce
- "comando_valv_piatto" := 0; // salita del piatto
- #emergenza := 1;
- RETURN;
- END_IF;
- // arresto dei temporizzatori
- IF ((#richiesta AND ("stato_timer_emerg_ganasce" AND
- "stato_timer_emerg_piatto")) AND (("sensore_ganasce_aperte") AND
- ("sensore_piatto_alto"))) THEN
- "start_timer_emerg_ganasce" := 0;
- "start_timer_emerg_piatto" := 0;
- "reset_timer_emerg_ganasce" := 1;
- "reset_timer_emerg_piatto" := 1;
- #emergenza := 0;
- RETURN;
- END_IF;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement