% ShowGraphicsHandles
close all

% Orbit parameters...
a = 5; b = 3; theta = linspace(0,2*pi,361);
x = a*cos(theta); y = b*sin(theta);

% Display the orbit and the planet...
figureHandle = figure;
hold on
orbitHandle  = plot(x,y);
planetHandle  = plot(x(100),y(100),'.c','Markersize',30);
hold off
axis equal off
shg
pause(3)

% Move and resize the figure window...
set(figureHandle,'position',[400 400 600 400])
pause(2)
% Color it black...
set(figureHandle,'color',[0 0 0])
pause(2)
% Display the orbit in yellow...
set(orbitHandle,'color','yellow')
pause(2)
% Use a thicker line...
set(orbitHandle,'linewidth',2)
pause(2)
% Make the planet disappear for 2 seconds and make it red when it
% reappears..
set(planetHandle,'Visible','off')
pause(2)
set(planetHandle,'color','r')
set(planetHandle,'Visible','on')