function [img]=rotate_p5(fname, org_suffix, rot_suffix, bcolor, rot_deg)

p5name = sprintf('%s_%s', fname, org_suffix);

img=readp5(p5name);

img = img+10;

img=imrotate(img,rot_deg,'bicubic','crop');

for i=1:size(img,1),
  for j=1:size(img,2),
    if img(i,j)==0,
      img(i,j) = bcolor+10;
     end
   end
end

img=img-10;

if rot_deg < 0,
 p5name=sprintf('%s_%s__%d', fname, rot_suffix, round(0-rot_deg));
else 
 p5name=sprintf('%s_%s_%d', fname, rot_suffix, round(rot_deg));
end
writep5check(img, p5name);

return;

