Mercurial > repos > public > sbplib
annotate +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 |
| rev | line source |
|---|---|
| 0 | 1 function [C,h] = prompt_line(s,varargin) |
| 2 default_arg('s',[]) | |
| 3 if ~isempty(s) | |
| 4 fprintf(s,varargin{:}); | |
| 5 end | |
| 6 | |
| 7 a = draw.prompt_point('Enter starting point\n'); | |
| 8 p = draw.point(a); | |
| 9 p.Color = Color.green; | |
| 10 p.MarkerSize = 24; | |
| 11 b = draw.prompt_point('Enter stopping point\n'); | |
| 12 p = draw.point(b); | |
| 13 p.Color = Color.red; | |
| 14 p.MarkerSize = 24; | |
| 15 | |
| 16 C = grid.Curve.line(a,b); | |
| 17 h = C.plot(); | |
| 18 uistack(h,'bottom'); | |
| 19 end |