function slick(s)

if nargin == 0
   s = 4;
end

names = getNames();

b = char(zeros(s)+' ');
t = 1;

showBoard(b);
while ~done(b)
   m = getMove(s, names{t});
   while ~validMove(b, m, t)
      disp('oops - try again')
      m = getMove(s, names{t});
   end
   b = makeMove(b, m);
   t = 3 - t;
end
end

% --------------------------
function names = getNames()
names{1} = input('first player''s name: ','s');
names{2} = input('second player''s name: ','s');
end

% --------------------------
function showBoard(b)
disp('showing the board')
end

% ---------------------------
function m = getMove(s, n)
fprintf('%s, your move - ', n)
m = 1;
end

% --------------------------
function v = validMove(b, m, t)
disp('valid move?')
v = true;
end

% ---------------------------
function b = makeMove(b, m)
disp('making move')
end
 
% ---------------------------
function d = done(b)
disp('done?')
d = false;
end

