/* ======================================== */
/*  FINAL WRITER AREXX MACRO                */
/*    by Nigel S. Domaingue, 28/1/95        */
/*  Draw_Box                                */
/*  $Ver:  Draw_Box v1.0 (30/1/95)          */
/* ======================================== */

Options Results

/* Must determine the current page and the current */
/* scroll-position so that the box will be placed  */
/* in the field of view.                           */
/* Draws a 1"x 1" box.                             */

Status Page
CurPage = Result

Status ScrollPos
Parse VAR Result Left Top
Top = Top + 1
Left = Left + 1

GraphicTool
DrawBox CurPage Left Top 1 1
Redraw