nngetclk.m

Martin T.Hagan等著,戴葵等译,神经网络设计,机械工业出版社,一书的所有例程

function [x,y] = nngetclk(s)
%NNGETCLK Get coordinates by mouse click from user.
%
%	[X,Y] = NNGETCLK(S)
%	  S - String to display in axis (default = '< CLICK ME >').
%	Returns:
%	  X - Horizontal coordinate of mouse click.
%	  Y - Vertical coordinate.

% DEFAULT

if nargin < 1, s = '< CLICK ME>'; end

% DISPLAY TEXT, GET CLICK, REMOVE TEXT

th = nncentxt(s); set(th,'color',nndkblue);
[x,y] = ginput(1);
delete(th)