x(1)=cos(pi/4);
y(1)=1+sin(pi/4);
x(2)=cos(pi/2);
y(2)=1+sin(pi/2);
x(3)=cos(3*pi/4);
y(3)=1+sin(3*pi/4);
x(4)=cos(-pi/4);
y(4)=-1+sin(-pi/4);
x(5)=cos(-pi/2);
y(5)=-1+sin(-pi/2);
x(6)=cos(-3*pi/4);
y(6)=-1+sin(-3*pi/4);
x(7)=x(1);
y(7)=y(1);
%
% Drehung
delta=pi/8;
A=[cos(delta),-sin(delta);sin(delta),cos(delta)];
for i=1:length(x)
    xy=A*[x(i);y(i)];
    x(i)=xy(1);
    y(i)=xy(2);
end;
%
zeichnegeschlossenekurve(x,y);
    