You can do what you want using tikz. I drew a rough picture like the one in your example using the following code
\documentclass{standalone}
\usepackage{tikz}
\begin{document}
\begin{tikzpicture}
%red vertical lines
\foreach \x in {0,1,...,8} {
\draw[color=red] (\x,0.5) -- +(0,3); };
%black lines with arrows
\draw[very thick,->] (0,2.5) -- +(0.5,0) -- +(0.5,-0.5);
\draw[very thick,->] (0.5,2) -- +(0,-0.5) -- +(1,-0.5) -- +(1,0);
\draw[very thick,->] (1.5,2) -- +(0,0.5) -- +(1,0.5) -- +(1,0);
\draw[very thick,->] (2.5,2) -- +(0,-0.5) -- +(0.5,-0.5) -- +(0.5,0.5) -- +(1,0.5) --+(1,0);
\draw[very thick,->] (3.5,2) -- +(0,-0.5) -- +(1,-0.5) -- +(1,0);
\draw[very thick,->] (4.5,2) -- +(0,0.5) -- +(0.5,0.5) -- +(0.5,-0.5) -- +(1,-0.5) -- +(1,0);
\draw[very thick,->] (5.5,2) -- +(0,0.5) -- +(1,0.5) -- +(1,0);
\draw[very thick,->] (6.5,2) -- +(0,-0.5) -- +(1,-0.5) -- +(1,0);
\draw[very thick] (7.5,2) -- +(0,0.5) -- +(0.5,0.5);
%numbers
\path (0.5,1) node{1};
\path (1.5,1) node{0};
\path (2.5,1) node{1};
\path (3.5,1) node{1};
\path (4.5,1) node{0};
\path (5.5,1) node{0};
\path (6.5,1) node{1};
\path (7.5,1) node{0};
\end{tikzpicture}
\end{document}
Which produces

Of course, the code above is inefficient and can be improved, but this will give you an idea of how TiKz works so that if you can't find a solution with timing, this will do.