Module: _savescr Library: Clipper 5.3
This module contains the following functions and procedures:
Note: Because this is raw decompiler output, the code is closer
to that seen in a .PPO file, rather than a .PRG file. In other
words, you must allow for the preprocessor conversions normally
performed based on the contents of STD.CH and other .CH files
#include "common.ch"
#include "inkey.ch"
//-----------------------------------------------------------------
// file-wide static variables
//
static Static1
//---------------------------------------------------[top]-
// __XRESTSCR
//
function __XRESTSCR
if ( Static1 != Nil )
restore screen from Static1[ 3 ]
SetPos(Static1[ 1 ], Static1[ 2 ])
endif
Static1 := Nil
return Nil
//---------------------------------------------------[top]-
// __XSAVESCR
//
function __XSAVESCR
Static1 := {Row(), Col(), SaveScreen(0, 0, MaxRow(), MaxCol())}
return Nil
//---EOF
Use your Browser's BACK button to return to Function Listings