function htwhandle(fp, fh, outputdir, imfilename, sizex, sizey)  
%HTWHANDLE   
%  HTWHANDLE(FP, fh, 'outputdir', 'imfilename', sizex, sizey)   
%    
%  sizex and sizey: in percent %; always <= 100  
%  Creates the image and an associated icon

%  
%  See also HTOPEN, HTCLOSE, HTWMATRIX, HTWTEXT, HTWPAR  
%   
%  Further Information:   
%       http://www.vision.ime.usp.br/~casado/matlab/htmltoolbox/
%
%  This program is free software; you can redistribute it and/or
%  modify it under the terms of the GNU General Public License
%  as published by the Free Software Foundation; either version 2
%  of the License, or (at your option) any later version.
%
%  This program is distributed in the hope that it will be useful,
%  but WITHOUT ANY WARRANTY; without even the implied warranty of
%  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
%  GNU General Public License for more details.
%
%  You should have received a copy of the GNU General Public License
%  along with this program; if not, write to the Free Software
%  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
%  
%   Copyright (c) 2000 by Andre Casado Castano and Roberto M. Cesar Jr. 
%   e-mail:casado@vision.ime.usp.br, cesar@ime.usp.br  
%   $Revision: 1.0 $  $Date: 2000/12/04 $  
  

if ((sizex>100) | (sizey>100))
 error('sizex or sizey > 100 in HTWHANDLE!');
end

print( fh, '-djpeg', [outputdir imfilename]);  

im = imread([outputdir imfilename]);
im = im(:,:,1);
[lins,cols] = size(im);

lstep = floor(100/sizey);
cstep = floor(100/sizex);

iconim = im(1:lstep:lins, 1:cstep:cols);

iconimfilename = ['icon_' imfilename];
imwrite(iconim, [outputdir iconimfilename], 'jpg');
  
fprintf(fp,'<a href="%s">',imfilename);  
  
fprintf(fp,'<img src="%s">', iconimfilename);  
  
fprintf(fp,'</a>\n');