OGIC; P2_nT1, P2_nT2, P2_nT3, P2_nT4: STD_LOGIC; P2_A1, P2_A2, P2_A3, P2_A4: STD_LOGIC; P2_B1, P2_B2, P2_B3, P2_B4: STD_LOGIC; Blok: STD_LOGIC:=« 0 »;
- ____
- тривалість імпульсів і провалів: 5 ms _ | | __ | | _P2_T «event and P2_T =» 1 «- Якщо прийшов фронт сигналу Тfor 1.5 ms; _A1:=P2_A; _B1:=P2_B; _T1:=P2_T; _nT1:=P2_nT; for 1.5 ms; _A2:=P2_A; _B2:=P2_B; _T2:=P2_T; _nT2:=P2_nT; for 3.5 ms; _A3:=P2_A; _B3:=P2_B; _T3:=P2_T; _nT3:=P2_nT; for 1.5 ms; _A4:=P2_A; _B4:=P2_B; _T4:=P2_T; _nT4:=P2_nT; P2_A1=P2_T1 and P2_A2=P2_T2 and P2_T1=P2_T2 then P2_B1=P2_nT1 and P2_B2=P2_nT2 and P2_nT1=P2_nT2 then P2_A3=P2_T3 and P2_A4= P2_T4 and P2_T3=P2_T4 then P2_B3=P2_nT3 and P2_B4=P2_nT4 and P2_nT3=P2_nT4 then P2_A1 /=P2_A3 and P2_A2 /=P2_A4 then:=»1«; <= »1 ';- Колійне реле 2 замкнутоif; if;
end if; if; if; P2_A1=P2_nT1 and P2_A2=P2_nT2 and P2_nT1=P2_nT2 then P2_B1=P2_T1 and P2_B2=P2_T2 and P2_T1=P2_T2 then P2_A3=P2_nT3 and P2_A4=P2_nT4 and P2_nT3=P2_nT4 then P2_B3=P2_T3 and P2_B4=P2_T4 and P2_T3=P2_T4 then P2_A1 /=P2_A3 and P2_A2 /=P2_A4 then:=«1»; <= «0»;- Колійне реле 2 разомкнутоif; if; if; if; if;
- порушення парафазного або імпульсного сигналу на входах А і В Blok=«0» then <= «0»; if; if; process;
- знімання інформації з дорожнім реле 3; ПРОВОДИТЬСЯ ПОСТІЙНО: processP3_T1, P3_T2, P3_T3, P3_T4: STD_LOGIC; P3_nT1, P3_nT2, P3_nT3, P3_nT4: STD_LOGIC; P3_A1, P3_A2, P3_A3, P3_A4: STD_LOGIC; P3_B1, P3_B2, P3_B3, P3_B4: STD_LOGIC; Blok: STD_LOGIC:=« 0 »;
- ____
- тривалість імпульсів і провалів: 5 ms _ | | __ | | _P3_T «event and P3_T =» 1 «- Якщо прийшов фронт сигналу Тfor 1.5 ms; _A1:=P3_A; _B1:=P3_B; _T1:=P3_T; _nT1:=P3_nT; for 1.5 ms; _A2:=P3_A; _B2:=P3_B; _T2:=P3_T; _nT2:=P3_nT; for 3.5 ms; _A3:=P3_A; _B3:=P3_B; _T3:=P3_T; _nT3:=P3_nT; for 1.5 ms; _A4:=P3_A; _B4:=P3_B; _T4:=P3_T; _nT4:=P3_nT; P3_A1=P3_T1 and P3_A2=P3_T2 and P3_T1=P3_T2 then P3_B1=P3_nT1 and P3_B2=P3_nT2 and P3_nT1=P3_nT2 then P3_A3=P3_T3 and P3_A4= P3_T4 and P3_T3=P3_T4 then P3_B3=P3_nT3 and P3_B4=P3_nT4 and P3_nT3=P3_nT4 then P3_A1 /=P3_A3 and P3_A2 /=P3_A4 then:=»1«; <= »1 ';- Колійне реле 3 замкнутоif; if;
end if; if; if; P3_A1=P3_nT1 and P3_A2=P3_nT2 and P3_nT1=P3_nT2 then P3_B1=P3_T1 and P3_B2=P3_T2 and P3_T1=P3_T2 then P3_A3=P3_nT3 and P3_A4=P3_nT4 and P3_nT3=P3_nT4 then P3_B3=P3_T3 and P3_B4=P3_T4 and P3_T3=P3_T4 then P3_A1 /=P3_A3 and P3_A2 /=P3_A4 then:=«1»; <= «0»;- Колійне реле 3 разомкнутоif; if; if; if; if;
- порушення парафазного або імпульсного сигналу на входах А і В Blok=«0» then <= «0»; if; if; process;
- знімання інформації з вогневими РЕЛЕ 1 переїзної СВІТЛОФОРА 1;: processO1_T1, O1_T2, O1_T3, O1_T4: STD_LOGIC; O1_nT1, O1_nT2, O1_nT3, O1_nT4: STD_LOGIC; O1_A1, O1_A2, O1_A3, O1_A4: STD_LOGIC; O1_B1, O1_B2, O1_B3, O1_B4: STD_LOGIC; Blok: STD_LOGIC:=«0»;
- ____
- тривалість імпульсів і провалів: 5 ms _ | | __ | | _P1=«1»- Якщо переїзд закритif ClkL=«0» thenO1_T «event and O1_T =» 1 '- якщо прийшов фронт сигналу Тfor 1.5 ms; _A1:=O1_A; _B1:=O1_B; _T1:=O1_T; _nT1:=O1_nT; for 1.5 ms; _A2:=O1_A; _B2:=O1_B; _T2:=O1_T; _nT2:=O1_nT; for 3.5 ms; _A3:=O1_A; _B3:=O1_B; _T3:=O1_T; _nT3:=O1_nT; for 1.5 ms; _A4:=O1_A; _B4:=O1_B; _T4:=O1_T; _nT4...