% graphics interaction
%
x=[0 100 100 0 0];
y=[0 0 100 100 0];
h=figure;
set(gcf,'DefaultTextColor','red');
plot(x,y, 'g-');
title('Spirala r^2=teta');
%
%
x_origin=50;
y_origin=50;

x0=0+x_origin;
y0=0+y_origin;
m=5;
for i=1:3600
    teta_degree=i;
    teta_radian=teta_degree/180*pi;
    r=m*sqrt(teta_radian);
    x=r*cos(teta_radian)+x_origin;
    y=r*sin(teta_radian)+y_origin;
    line([x0 x] , [y0 y]);
    x0=x;
    y0=y;
end