Реферат Автоматизація магістрального насосного агрегату НМ 1250-260

ти джерела живлення 9 і 7, негативні контакти 12 і 10 сполучені усередині. Харчування може надходити від сусідніх модулів, тим самим значно полегшуючи монтаж. ADAM - 3014 живиться від 24 В.

Малюнок Д.1 - Схема підключення ADAM - 3 014

Додаток Е

Лістинг керуючої програми

case ABC of

: Uv:=false ;:=false ;:=false ;:=false ;:= Zakryt raquo ;;:= Zakryt raquo ;;:= raquo ;;:= Vyklecen raquo ;; then ABC:=61; end_if; then ABC:=62; end_if; thenABC:=63; end_if;

: T1:=t # 0ms; TSTART (T1); ABC:=1;

: Uv:=true ;:= Otkryvaetsa raquo ;; gt;=t # 8sthenABC:=101; end_if ;:=64; end_if;

: TSTOP (T1); T2:=t # 0ms; ABC:=2;

: TSTART (T2) ;:=false ;:=true ;:= Otkryt raquo ;;:= Vklycaetsa raquo ;; gt;=t # 10sthen ABC:=101; end_if; Xadthen ABC:=65; end_if;

: TSTOP (T2); T1:=t # 0ms; TSTART (T1); ABC:=3;

::=true ;:= Otkryvaetsa raquo ;;:= Vklucen raquo ;; gt;=t # 8sthen ABC:=101; end_if; ABC:=4; end_if;

: TSTOP (T1) ;:= Otkryt raquo ;;:=false; thenABC:=0; end_if;

: I:=true ;:= ekstrenno zakryt raquo ;;:= ekstrenno zakryt raquo ;;:= ALARM raquo ;;:= ekstrenno vykl raquo ;; ( T1); (T2) ;:=false ;:=false ;:=false; ABC:=0; end_if;

: T1:=t # 0ms; TSTART (T1); ABC:=5;

: Uv:=true ;:= Otkryvaetsa raquo ;; gt;=t # 8sthenABC:=101; end_if ;:=66; end_if;

: TSTOP (T1); T2:=t # 0ms; TSTART (T2); ABC:=6;

: Uv:=false ;:= Otkryt raquo ;;:=true ;:= Otkryvaetsa raquo ;; gt;=t # 2sthenABC:=7; end_if;

: Uad:=true ;:= Vklucaetsa raquo ;; gt;=t # 10sthen ABC:=101; end_if; (Xn and Xad) then ABC:=8; end_if;

: sAD:= Vklycon raquo ;;:= Otkryt raquo ;;:=false; then ABC:=0; end_if;

: T1:=t # 0ms; TSTART (T1); ABC:=9;

: Uv:=true ;:= Vklycaetsa raquo ;; gt;=t # 8sthen ABC:=101; end_if; ABC:=67; end_if;

: TSTOP (T1); T2:=t # 0ms; TSTART (T2); ABC:=10;

: Uv:=false ;:= Otkryt raquo ;;:=true ;:= Otkryvaetsa raquo ;; gt;=t # 8sthen ABC:=101; end_if ;:=68; end_if;

: TSTOP (T2); T1:=t # 0ms; TSTART (T1); ABC:=11;

: Un:=false ;:= Otkryt raquo ;;:=true ;:= Vklucaetsa raquo ;; gt;=t # 10s then ABC:=101; end_if; Xad then ABC:=12; end_if;

: TSTOP (T1) ;:= Vklucen raquo ;; Xstop3 then ABC:=0; end_if;

end_case;