1 function Lines = Draw_rect (Hsize, Vsize, Center, Color)
\r
3 Upper_left = Center + [-Hsize/2, Vsize/2];
\r
4 Upper_right = Center +[Hsize/2, Vsize/2];
\r
5 Lower_left = Center - [Hsize/2, Vsize/2];
\r
6 Lower_right = Center +[Hsize/2, -Vsize/2];
\r
8 Lines = line('XData', [Upper_left(1), Upper_right(1), Lower_right(1), ...
\r
9 Lower_left(1), Upper_left(1)], ...
\r
10 'YData', [Upper_left(2), Upper_right(2), Lower_right(2), ...
\r
11 Lower_left(2), Upper_left(2)], 'Color', Color, 'LineStyle', '-', ...
\r