%Drehung
%File: Drehung.m

clear;
clf;

alfa=pi*2/20; %20 ° Drehung umgerechnet in RAD


% Objekt erzeugen
 object = [0,1,1,0,0;0,0,1,1,0];           % Rechteck  
 
 
 Drehmatrix = [cos(alfa),(-sin(alfa));sin(alfa),cos(alfa)];
 
 
 neu = Drehmatrix*object;
 
hold;
plot (object(1,:),object(2,:));

plot (neu(1,:),neu(2,:));