Save all currently open figures

Description

function ret = savefigs()
 % This function allows you to quickly save all currently open figures with
 % a custom filename for each in multiple formats. To use the function
 % simply call savefigs with no arguments, then follow the prompts
 %
 % Upon execution this function will one-by-one bring each currently open
 % figure to the foreground. Then it will supply a text prompt in the main
 % console window asking you for a filename. It will save that figure to
 % that filename in the .fig, .emf, .png, and .eps formats.
 %
 % The formats that it saves in can be changed by commenting out or adding
 % lines below.
 %
 % Copyright 2010 Matthew Guidry
 % matt.guidry ATT gmail DOTT com (Email reformatted for anti-spam)
 figSize1 = 3;
 figSize2 = figSize1;
 hfigs = get(0, 'children') %Get list of figures
 for m = 1:length(hfigs)
 figure(hfigs(m)) %Bring Figure to
 foreground
 filename = input('Filename? (0 to skip)\n', 's') %Prompt user
 if strcmp(filename, '0') %Skip figure when
 user types 0
 continue
 else
 set(hfigs(m), 'PaperUnits','inches','PaperPosition',[0 0 figSize1
 figSize2]);
 saveas(hfigs(m), [filename '.fig']) %Matlab .FIG file
 print(hfigs(m),'-dtiffnocompression','-r300',filename)
 end
 end

https://se.mathworks.com/matlabcentral/answers/182574-save-all-the-plots