Mercurial > repos > public > sbplib
diff +draw/prompt_line.m @ 0:48b6fb693025
Initial commit.
author | Jonatan Werpers <jonatan@werpers.com> |
---|---|
date | Thu, 17 Sep 2015 10:12:50 +0200 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/+draw/prompt_line.m Thu Sep 17 10:12:50 2015 +0200 @@ -0,0 +1,19 @@ +function [C,h] = prompt_line(s,varargin) + default_arg('s',[]) + if ~isempty(s) + fprintf(s,varargin{:}); + end + + a = draw.prompt_point('Enter starting point\n'); + p = draw.point(a); + p.Color = Color.green; + p.MarkerSize = 24; + b = draw.prompt_point('Enter stopping point\n'); + p = draw.point(b); + p.Color = Color.red; + p.MarkerSize = 24; + + C = grid.Curve.line(a,b); + h = C.plot(); + uistack(h,'bottom'); +end \ No newline at end of file