diff scripts/plot/polar.m @ 6257:44c91c5dfe1d

[project @ 2007-01-30 19:16:52 by jwe]
author jwe
date Tue, 30 Jan 2007 19:16:55 +0000
parents 34f96dd5441b
children a5cd8b77e892
line wrap: on
line diff
--- a/scripts/plot/polar.m
+++ b/scripts/plot/polar.m
@@ -29,30 +29,30 @@
 
 ## Author: jwe
 
-function polar (x1, x2, fmt)
+function polar (varargin)
 
-  ## FIXME -- these plot states should really just be set
-  ## temporarily, probably inside an unwind_protect block, but there is
-  ## no way to determine their current values.
+  newplot ();
 
-  __gnuplot_raw__ ("set nologscale;\n");
-  __gnuplot_raw__ ("set nopolar;\n");
+  ## [h, varargin] = __plt_get_axis_arg__ ("semilogx", varargin{:});
+  h = gca ();
 
-  if (nargin == 3)
-    if (! ischar (fmt))
+  nargs = numel (varargin);
+
+  if (nargs == 3)
+    if (! ischar (varargin{3}))
       error ("polar: third argument must be a string");
     endif
-    __plr2__ (x1, x2, fmt);
+    __plr2__ (h, varargin{:});
   elseif (nargin == 2)
-    if (ischar (x2))
-      __plr1__ (x1, x2);
+    if (ischar (varargin{2}))
+      __plr1__ (h, varargin{:});
     else
       fmt = "";
-      __plr2__ (x1, x2, fmt);
+      __plr2__ (h, varargin{:}, fmt);
     endif
   elseif (nargin == 1)
     fmt = "";
-    __plr1__ (x1, fmt);
+    __plr1__ (h, varargin{:}, fmt);
   else
     print_usage ();
   endif