__gnuplot_get_var__.m File Reference

Functions
endif	if (nargin< 2) print_usage()
endif	if (numel(h)==1 &&isfigure(h)) if(isempty(get(gcf
endif if(numel(ostream) < 1) error("__gnuplot_get_var__	fflush (ostream)
	if (err!=0)[gpin
endif if(err!=0) error("__gnuplot_get_var__	fputs (ostream, gp_cmd)
	fputs (ostream,"set print;\n")
	while (reading) str
	if (isnumeric(str{end})&&(str{end}==-1)) reading
	fclose (gpin)
else	fprintf (ostream,"set print \"-\";\n")
	while (isempty(str)) str
	if (isempty(str)) sleep(0.05)
endif	fclear (istream)
endwhile endif	str (str=="\n")
	if (!isempty(n_continue)) str(n_continue+1)
endif	if (isempty(fmt)) gp_var_value
endif unwind_protect_cleanup	if (use_mkfifo) unlink(gpin_name)
Variables
function	gp_var_value
endif __plot_stream__	ostream = __gnuplot_open_stream__ (2, h)
	err = fopen (gpin_name, "r")
	reading = true
	str = {}
	gp_cmd
	n_continue = strfind (str, " \\ ")

---

Function Documentation

endif fclear

(

istream

)

fclose

(

gpin

)

endif if (numel (ostream) < 1) error ("__gnuplot_get_var__ fflush

(

ostream

)

else fprintf	(	ostream	,
		"set print \"-\";\n"
	)

fputs	(	ostream	,
		"set print;\n"
	)

fputs	(	ostream	,
		gp_cmd
	)

endif unwind_protect_cleanup if

(

use_mkfifo

)

endif if

(

isempty(fmt)

)

if

(

!

isemptyn_continue

)

if

(

isempty(str)

)

if

(

isnumeric(str{end})&&(str{end}==-1)

)

if

(

err!

= 0

)

endif if

(

numel(h)

= = 1 && isfigure (h)

)

endif if

(

)

endwhile endif str

(

str

= ="\n"

)

while

(

isempty(str)

)

while

(

reading

)

---

Variable Documentation

err = fopen (gpin_name, "r")

gp_cmd

Initial value:

 sprintf ("\nif (exists(\"%s\")) print \"OCTAVE: \", %s; else print NaN\n",
                        gp_var_name(1:n), gp_var_name)

else gp_var_value

Initial value:

 __gnuplot_get_var__ (h, gp_var_name, fmt)

  if (nargin == 0)
    h = gcf ()

n_continue = strfind (str, " \\ ")

endif else ostream = __gnuplot_open_stream__ (2, h)

reading = true

str = {}