Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- tpON(IN:=xON , PT:= tTIME_ON, Q=>, ET=> );
- tpOFF(IN:=xOFF , PT:= tTIME_OFF, Q=> , ET=> );
- xON_OUT:=tpON.Q AND NOT xSTATE AND NOT xERROR;
- xOFF_OUT:=tpOFF.Q AND xSTATE;
- ftON(CLK:=tpON.Q , Q=> );
- ftOFF(CLK:=tpOFF.Q , Q=> );
- rsTIME_OUT(SET:=ftON.Q AND NOT xSTATE , RESET1:=ftOFF.Q AND xSTATE , Q1=> );
- rsSTATE_EXPECTED(SET:= , RESET1:= , Q1=> );
- ftENABLE(CLK:=xEnable , Q=> );
- IF xENABLE AND NOT xERROR AND NOT xTIME_OUT THEN
- IF NOT tpon.q AND NOT tpoff.Q THEN
- IF xLOCAL_CONTROL THEN
- IF NOT xVISU_CONTROL THEN
- IF NOT xSTATE THEN
- xON:=xLOCAL_CONTROL_ON;
- rsSTATE_EXPECTED.SET:=xLOCAL_CONTROL_ON;
- ELSE
- xOFF:=xLOCAL_CONTROL_OFF;
- rsSTATE_EXPECTED.RESET1:=xLOCAL_CONTROL_OFF;
- END_IF
- ELSE
- xON:=xLOCAL_CONTROL_ON OR xVISU_CONTROL_ON;
- xOFF:=xLOCAL_CONTROL_OFF OR xVISU_CONTROL_OFF;
- END_IF
- ELSE
- xON:=xREMOTE_CONTROL_ON;
- xOFF:=xREMOTE_CONTROL_OFF;
- END_IF
- END_IF
- ELSE
- xON_OUT:=FALSE;
- xOFF_OUT:=FALSE;
- END_IF
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement