Program BOX c c Author: R N Caffin c c Basic Test routine for Plotter, HVPLOT Library and, optionally, the c PL Handler c Draws a box. c c Initialise the system call init() !Basic set-up and select device call select(1) !Choose pen call scale(-12.,+12.,-12.,+12.) !Set up the scale c Draw the box call jump(-10.0,-10.0) call draw(-10.0,+10.0) call draw(+10.0,+10.0) call draw(+10.0,-10.0) call draw(-10.0,-10.0) call labexy(0.,0.,1.0,0.,'Box') c Clean up call home !Return pen to holder and eject paper call check() !Check for errors call ploff !Disable the plotter c stop end