{**************************************************************************
                          WordUp Graphics Toolkit
                                 Demo File

 This file demonstrates the initialization of the graphics system in TP
 using the driver file VGA256.BGI. The graphics will merely be opened and
 closed in this example. See INITGRAPH in the TP Library Reference or
 Programmer's Guide for more information.

 The WGT system is not required for this process.
 **************************************************************************}

USES Graph;

VAR
   grDriver, grMode : INTEGER;

BEGIN
     { First tell Turbo to install our graphics driver }
     grDriver := INSTALLUSERDRIVER('VGA256',NIL);

     { Now give it a dummy value for the mode (only 1 is available with
       this driver file. }
     grMode := 0;

     { Now start up the graphics system (replace directory to show where
       your VGA256.BGI file is located }
     INITGRAPH(grDriver,grMode,'c:\tp\bgi');


     { Now shut it down as quickly as is was opened }
     CLOSEGRAPH;
END.