clear all
close all


% Mittelpunkt des n-Ecks
M = [2 3];
% Anzahl gesuchter Ecken
Num = 5;
% Erste Ecke in kartesischen Koordinaten
K(1,:)=[0 -1];
% Translation des Mittelpunkts auf den Ursprung
K(1,:) = K(1,:)-M;
% K_1 in Exponentialform
Bet = sqrt(K(1,1)^2+K(1,2)^2);
Arg = atan2(K(1,2),K(1,1));
% Berechnung der fehlenden Ecken
for i=1:Num-1
    K(i+1,1) = Bet*cos(Arg+2*pi*i/Num);
    K(i+1,2) = Bet*sin(Arg+2*pi*i/Num);
    K(i+1,:) = K(i+1,:) + M;
end
K(1,:) = K(1,:)+M;
% Ausgabe aller Ecken
for i=1:Num
    fprintf('Ecke Nr. %02d: %5.2f + i*(%5.2f) = %f exp(%5.2f*i)\n',...
        i,K(i,:),sqrt(K(i,1)^2+K(i,2)^2),atan2(K(i,2),K(i,1)));
end
% graphische Ausgabe des n-Ecks
grid on
plot(K(:,1),K(:,2),'r*');
print('nEck.eps', '-depsc');