function GridKreiseZeichnen(r,s)

%   r:      Integer, der den Radius des letzten Kreises angibt. 
%           Es wird in 0.01 Schritten ein Kreis gezeichnet, bis r erreicht wird
%   s:      Schrittweite, in der ein Kreisgrid gezeichnet werden soll

hold on
winkel = 0 : 0.1 : 2*pi;
r = r + 0.05;

for i = r : -s : 0.01
    
    [x, y] = pol2cart(winkel', i);
    plot(x, y, '-.', 'Color', [0.6, 0.6, 0.6]);
    clear x y;
    
end

x = -r : 0.01 : r;
y = -r : 0.01 : r;
plot(x, y, '-.', 'Color', [0.6, 0.6, 0.6]);
plot(fliplr(x), y, '-.', 'Color', [0.6, 0.6, 0.6]);
plot(x, zeros(size(x,2),1), '-.', 'Color', [0.6, 0.6, 0.6]);
plot(zeros(size(y,2),1), y, '-.', 'Color', [0.6, 0.6, 0.6]);

hold off