function snapshot(hfig)
%SNAPSHOT Set the figure for a picture

%
% Copyright (c) 1995 by Claudio Rivetti and Mark Young
% claudio@alice.uoregon.edu,    mark@alice.uoregon.edu
%

global oldpos oldKPF Handlefig hfig


if nargin ==0
  hfig=gcf;
end

oldpos = get(hfig, 'position');
oldKPF = get(hfig, 'KeyPressFcn');

set(hfig, 'KeyPressFcn', 'global oldpos oldKPF hfig; set(hfig, ''position'', oldpos, ''KeyPressFcn'', oldKPF);setuimenu(''on'');setuicontrols(''on'');set(hfig, ''KeyPressFcn'', '''')');
set(hfig, 'position', [0 0 1280 1025])

setuicontrols('off');
setuimenu('off');


return