Subversion Repositories mdct

filename='lena512';
filenamet=strcat(filename,'.txt');
 
I = imread(filename,'bmp');
fid = fopen(filenamet,'w+');
[X,Y,Z] = size(I);
fprintf(fid, '%d\n',X);  % lines
fprintf(fid, '%d\n',Y);	 % pixels in line
for x = 1:X
   for y = 1:Y
      if I(x,y) < 16 
         fprintf(fid, '0%x', double(I(x,y)));
      else
      	fprintf(fid, '%x', double(I(x,y)));
   	end;     
   end;
   fprintf(fid,'\n');
end;
fclose(fid);