{ =========================================================================== }
{ DESQ5X.pas - Unit to interface DESQview with TP 5.0       ver 5.X, 01-01-89 }
{                                                                             }
{ These are the routines that are published by Quarterdeck and have been      }
{ adapted for use in Turbo Pascal.  Only 96 bytes of code.                    }
{  by  James H. LeMay, CIS 76011,217                                          }
{  for Eagle Performance Software                                             }
{      P.O. Box 122237                                                        }
{      Ft. Worth, TX  76121-2237                                              }
{                                                                             }
{ Version 1.0 (06-05-88)                                                      }
{  - Initial release                                                          }
{ Version 4.2 (10-01-88)                                                      }
{  - Made In_DV a global variable with initialization to FALSE                }
{  - Revised DESQqwik.pas for QWIK42.TPU                                      }
{ Version 5.X (01-01-89)                                                      }
{  - Revised directives for TP5.                                              }
{ =========================================================================== }

{$A-,B-,D-,E-,F-,I-,L-,N-,O-,R-,S-,V-}

UNIT DESQ;

INTERFACE

const
  In_DV: boolean = false;

function  DV_Get_Version: word;
function  DV_Get_Video_Buffer (VideoSeg: word): word;
procedure DV_Pause;
procedure DV_Begin_Critical;
procedure DV_End_Critical;

IMPLEMENTATION

{$L DESQ5X.obj }
function  DV_Get_Version;      external;
function  DV_Get_Video_Buffer; external;
procedure DV_Pause;            external;
procedure DV_Begin_Critical;   external;
procedure DV_End_Critical;     external;

END.