diff --git a/matlab/gsa/redform_screen.m b/matlab/gsa/redform_screen.m
index 0df22054621fc71dced1a8a37195fe1db3680eb3..d907c244408b39c4ef79f861c9588f4a151a30d4 100644
--- a/matlab/gsa/redform_screen.m
+++ b/matlab/gsa/redform_screen.m
@@ -99,7 +99,7 @@ for j=1:size(anamendo,1),
       end
     end
   end
-  if iplo<9 & iplo>0 & ifig,
+  if iplo<9 && iplo>0 && ifig,
     dyn_saveas(hh,[dirname,'/',M_.fname,'_', namendo,'_vs_shocks_',num2str(ifig)],options_);
     if ~options_.nodisplay
       close(hh);
@@ -117,7 +117,7 @@ for j=1:size(anamendo,1),
       if ~isempty(y0),
         if mod(iplo,9)==0,
           ifig=ifig+1;
-          figure('name',[namendo,' vs. lagged endogenous ',int2str(ifig)]),
+          hh=dyn_figure(options_,'name',[namendo,' vs. lagged endogenous ',int2str(ifig)]);
           iplo=0;
         end
         iplo=iplo+1;
@@ -145,7 +145,7 @@ for j=1:size(anamendo,1),
       end
     end
   end
-  if iplo<9 & iplo>0 & ifig,
+  if iplo<9 && iplo>0 && ifig,
     dyn_saveas(hh,[dirname,'/',M_.fname,'_', namendo,'_vs_lags_',num2str(ifig)],options_);      
   end
 end
diff --git a/matlab/gsa/stab_map_2.m b/matlab/gsa/stab_map_2.m
index b4de5b8cb3b445f218a87fb048d55848b2088c42..594fe91fa8e7d248f0c87ce079241a189481938d 100644
--- a/matlab/gsa/stab_map_2.m
+++ b/matlab/gsa/stab_map_2.m
@@ -119,7 +119,7 @@ for j=1:npar,
             
         end
     end
-    if ~options_.nograph && (j==(npar)) && j2>0,
+    if ~options_.nograph && (j==(npar)) && j2>0 && (mod(j2,12)~=0),
         dyn_saveas(hh,[dirname,'/',fig_nam_,int2str(ifig)],options_);
         if ~options_.nodisplay
             close(hh);