\documentclass{report}
\usepackage{german,sheet}
\begin{document}

\controller{I. Kl"ockl}
\descript{Beispielseite}
\sheet{BSP-123/I}
\thispagestyle{sheet}

\section{Logische Schiebeinstruktionen}
\unitlength=5mm
\begin{picture}(15,5)
\put(2,0){\framebox(8,1){}}\put(11,0){\framebox(1,1){C}}
\put(2,2){\framebox(8,1){}}\put(0,2){\framebox(1,1){C}}
\multiput(9.5,2.5)(-1,0){7}{\vector(-1,0){.5}}
\multiput(3,0)(1,0){7}{\line(0,1){1}}
\multiput(3,2)(1,0){7}{\line(0,1){1}}
\multiput(2.5,.5)(1,0){7}{\vector(1,0){.5}}
\put(11,2.5){\vector(-1,0){1}}
\put(2.5,2.5){\vector(-1,0){1.5}}
\put(1,.5){\vector(1,0){1}}
\put(9.5,.5){\vector(1,0){1.5}}
\put(13,0){\makebox(0,1)[l]{ROR}}
\put(13,2){\makebox(0,1)[l]{ROL}}
\put(2,3.5){\makebox(1,1){\small 7 (15)}}
\put(9,3.5){\makebox(1,1){\small 0}}
\put(2.5,2.5){\line(0,1){1}}\put(2.5,3.5){\line(1,0){8.5}}
\put(11,3.5){\line(0,-1){1}}
\put(1,.5){\line(0,1){1}}\put(1,1.5){\line(1,0){8.5}}
\put(9.5,1.5){\line(0,-1){1}}
\end{picture}

\vspace*{1cm}

\begin{picture}(15,5)
\put(2,0){\framebox(8,1){}}\put(11,0){\framebox(1,1){C}}
\put(2,2){\framebox(8,1){}}\put(0,2){\framebox(1,1){C}}
\multiput(9.5,2.5)(-1,0){7}{\vector(-1,0){.5}}
\multiput(2.5,.5)(1,0){7}{\vector(1,0){.5}}
\multiput(3,0)(1,0){7}{\line(0,1){1}}
\multiput(3,2)(1,0){7}{\line(0,1){1}}
\put(11,2.5){\vector(-1,0){1}}
\put(2.5,2.5){\vector(-1,0){1.5}}
\put(1,.5){\vector(1,0){1}}
\put(9.5,.5){\vector(1,0){1.5}}
\put(13,0){\makebox(0,1)[l]{RCR}}
\put(13,2){\makebox(0,1)[l]{RCL}}
\put(2,3.5){\makebox(1,1){\small 7 (15)}}
\put(9,3.5){\makebox(1,1){\small 0}}
\put(.5,3){\line(0,1){.5}}\put(.5,3.5){\line(1,0){10.5}}
\put(11,3.5){\line(0,-1){1}}
\put(1,.5){\line(0,1){1}}\put(1,1.5){\line(1,0){10.5}}
\put(11.5,1.5){\line(0,-1){.5}}
\end{picture}

\end{document}
