Flaschenzug

% author: Andreas Kelbel
%
\documentclass{standalone}
% packages
  \usepackage{tikz}
	\usetikzlibrary{patterns}
	\tikzset{% 
		seil/.style={draw,color=blue,ultra thick},
		masse/.style={draw,ultra thick,fill=gray!80}
	}
  \usepackage{cmbright}		% font 
%
% macros
	\newcommand{\rolle}[4]{
		\begin{scope}[xshift=#1cm,yshift=#2cm]
			\fill[left color=gray,right color=gray!75,middle color=gray!25] (0,0) circle (.5cm) ;
			\fill[left color=gray!50, right color=gray!30, middle color=white] (0,0) circle (.4cm) ;
			\filldraw[fill=lightgray!50] (-.075,-#3) rectangle (.075,#4) ;
			\fill (0,0) circle (.5mm);
		\end{scope}
	}
%
\begin{document}
  \begin{tikzpicture}
% left pulley
	\begin{scope}
      \fill[pattern = north east lines] (0,0) rectangle ++(3.5,.25) ;
      \draw[thick] (0,0) -- ++(3.5,0) ;
      \draw[seil] (1,0) -- ++(-0,-5) arc (180:360:.5cm) -- ++(0,4) arc (180:30:.5cm) -- ++(300:1) node(a){} ;
      \draw[thick] (a)  +(210:.2) -- +(30:.2) ; 
      \draw[very thick] (1.5,-6) -- ++(0,1);
      \rolle{1.5}{-5}{.7}{.1}
      \rolle{2.5}{-1}{.1}{1}	
      \fill[masse] (1.2,-6) rectangle ++(.6,-.8) node[midway,white]{$m$} ;
    \end{scope}
% right pulley
	\begin{scope}[xshift=7cm]
      \fill[pattern = north east lines] (0,0) rectangle ++(3.5,.25) ;
      \draw[thick] (0,0) -- ++(3.5,0) ;
      \draw[seil] (1,0) -- ++(-0,-3) arc (180:360:.5cm) -- ++(0,2) arc (180:30:.5cm) -- ++(300:1) node(b){}
      -- ++(300:4) node(c){};
      \draw[thick, densely dotted] (b)  +(210:.2) -- +(30:.2) ; 
      \draw[thick] (c)  +(210:.2) -- +(30:.2) ;
      \draw[very thick,latex-latex] (b) ++(30:.5) -- ++(300:4) node[midway,above right]{$s$} ; 
      \draw[very thick] (1.5,-4) -- ++(0,1);
      \rolle{1.5}{-3}{.7}{.1}
      \rolle{2.5}{-1}{.1}{1}	
      \fill[masse] (1.2,-4) rectangle ++(.6,-.8) node[midway,white]{$m$} ;
    \end{scope}	
%
      \draw[densely dashed,thick] (0,-6.8) -- ++(10.5,0) ;
      \draw[densely dashed,thick] (10.5,-4.8) -- ++(-3.5,0) ;
      \draw[very thick,latex-latex] (10,-4.8) -- ++(0,-2) node[midway,right]{$h$} ; 	
  \end{tikzpicture}
\end{document}