Click above to get retro games delivered to your door ever month!

SAVESCREEN()


Syntax:     SAVESCREEN(<expN1>, <expN2>, <expN3>, <expN4>)

Purpose:    To save a screen region to a memory variable for later
            display.

Arguments:  <expN1...expN4> are the coordinates of the screen region
            to save.

Returns:    A character string.

            SAVESCREEN() returns the specified screen region as a
            string.

Usage:      SAVESCREEN() is used to save a screen region to a memory
            variable.  To restore the partial screen, use RESTSCREEN().

            Typically, you would save and restore a screen region when
            using a pop-up menu or for dragging a screen object.

            Warning: SAVE SCREEN, RESTORE SCREEN, SAVESCREEN(), and
            RESTSCREEN() are not supported when either ANSI.OBJ or
            IBMANSI.OBJ is linked into the current program.

Library:    EXTEND.LIB


----------------------------------- Example --------------------------------

   The following user-defined function creates a pop-up menu using
   ACHOICE() in combination with SAVESCREEN() and RESTSCREEN(),
   returning the selection in the array of choices:

   FUNCTION PopUp
   PARAMETERS t, l, b, r, choices, ufunc, color
   PRIVATE winbuff, menuchoice, lastcolor

   * Save stuff.
   winbuff = SAVESCREEN(t, l, b, r)
   lastcolor = SETCOLOR(color)

   * Clear region and display menu.
   @ t, l TO b, r DOUBLE
   menuchoice = ACHOICE(t + 1, l + 1, b - 1, r - 1, choices, "", ufunc)

   * Clean up and go home.
   RESTSCREEN(t, l, b, r, winbuff)
   SET COLOR TO (lastcolor)

   RETURN menuchoice