m3 := m3 or m0; (** 开始运行 **)
if m3 then
begin
out_t(not ts102 & ts2, tc101, k150);
out_t(ts101, tc1, k40);
out_t(ts1, tc102, k150);
out_t(not ts102, tc2, k40);
m100 := ts101 & ts1; (** 正转运行 **)
m101 := not ts101 & ts2; (** 反转运行 **)
end;
d0 := tn101;
d1 := tn102;
d2 := tn1;
d3 := tn2;