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

 restorescrn()       Restores a screen area
------------------------------------------------------------------------------
 Declaration
   screen.hdr

 Syntax
   proc restorescrn extern
   param value _HSCR hScreen

 Arguments
   hScreen is a saved screen handle.

 Return
   None.

 Description
   This procedure restores a screen area that was originally saved by the
   savescrn() function to hScreen.

 Example
   #define EXAMPLE_SCREEN
   #include example.hdr

   // Save a portion of the screen, get user input, and restore the screen
   
   proc Test_restorescrn
   vardef
      char( 20 ) cName
      _HSCR      hScreen
   enddef
   cName := "Christine"
   hScreen := savescrn( 8, 8, 12, 44 )
   @ 8, 8 to 12, 44
   @ 10, 10 say "Input Name: " get cName
   read
   restorescrn( hScreen )
   ? "Input was", cName
   endproc

   proc main
   Test_restorescrn()
   endproc