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

  Name:     shift() - shift a portion of the screen left or right
  Usage:    shift(<row>,<col>,<row2>,<col2>,<cols>,[<attrib>],[<char>]))
  Params:   integer <row>  - the top row
            integer <col>  - the left column
            integer <row2> - the bottom row
            integer <col2> - the right column

            integer <cols> - the number of columns to shift. If this
            number is 0, then the entire area is cleared. If this
            number is negative, then the area is shifted to the
            left. If the number is positive, then the area is
            shifted to the right.

            integer <attrib> - the color attribute to use for the
            shifted area, the inserted columns will have this color.
            If this parameter is left off or is -1 then Clipper's
            standard foreground color is used.

            string <char> - the character to use as the fill character
            in the new lines. Optional, if left off then a space is
            used. Useful to clear an area to a specified character.

  Returns:  nothing

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

                 shift(10,10,20,70,0)
                 * clears the screen at 10,10,20,70

                 shift(10,10,20,70,-1)
                 * shifts the screen 1 column to the left

                 shift(10,10,20,70,3,chr(177))
                 * shifts the screen 3 columns to the right
                 * and fills the 3 spaces on the left with chr(177)

            Using setscreen(), you can shift() the screen in a virtual
            window or screen.