function piapprox=buffoncalc(m)
   hit = 0;
   for l = 0 : (m-1)
       mp = rand(1);                    % Position des Mittelpunkts zwischen zwei Linien
       phi = (rand(1) * pi) - pi / 2;   % Winkel der Nadel
       xrechts = mp + cos(phi)/2;       % rechtes Ende der Nadel
       xlinks = mp - cos(phi)/2;        % linkes Ende der Nadel
       if xrechts >= 1 | xlinks <= 0
           hit = hit + 1;               % Trefferzähler
       end
   end
   hit;
   miss = m - hit;
   piapprox = m / hit * 2;               % Annäherung für Pi