% Script PickUpStix

close all
figure
s = 'rgbmcy';
set(gcf,'color','k')
axis equal off
hold on
for k=1:100
    % Generate two randomly located points...
    P = MakePoint(randn,randn);
    Q = MakePoint(randn,randn);
    % Pick one of the six colors randomly,
    c = s(ceil(6*rand));
    DrawLS(P,Q,c)
end