%szinkronizálódó trajekt kirajzolása idõben (3D, 1D)

clear all;
close all;

kezd1=[50 50 50]; % Master kezdõpontja
kezd2=[-50 -50 -50]; % Slave rsz kezdõpontja

n=10;
xl=[-1 10];
yl=[-60 60];
figure;
for i=0.001:0.1:n
    
[t, x] = ode45('Lorenz',[0 i], [kezd1 kezd2]);

subplot(6,2,1);
plot(t,x(:,1));
xlabel('t');
ylabel('x1');
xlim(xl);
ylim(yl);

subplot(6,2,[7,9,11]);
plot3(x(:,1),x(:,2),x(:,3))
xlabel('x1');
ylabel('y1');
zlabel('z1');
xlim(yl);
ylim( yl);
zlim(yl);

subplot(6,2,3);
plot(t,x(:,2));
xlabel('t');
ylabel('y1');
xlim(xl);
ylim(yl);

subplot(6,2,5);
plot(t,x(:,3));
xlabel('t');
ylabel('z1');
xlim(xl);
ylim(yl);

subplot(6,2,2);
plot(t,x(:,4));
xlabel('t');
ylabel('x2');
xlim(xl);
ylim(yl);

subplot(6,2,4);
plot(t,x(:,5));
xlabel('t');
ylabel('y2');
xlim(xl);
ylim(yl);

subplot(6,2,6);
plot(t,x(:,6));
xlabel('t');
ylabel('z2');
xlim(xl);
ylim(yl);

subplot(6,2,[8,10,12]);
plot3(x(:,4),x(:,5),x(:,6))
xlabel('x2');
ylabel('y2');
zlabel('z2');
xlim(yl);
ylim( yl);
zlim(yl);

%waitforbuttonpress;
pause(0.1);
end