{ DESQVIEW.INC: DesqView detectie en interactie routines }

{==========================================================================}
{ (c) Copyright Waterline Software Developent V.O.F. 1990-1994             }
{                                                                          }
{    Waterline Software Development V.O.F.                                 }
{    Wouter Sluislaan 12                                                   }
{    1461 AC  Zuidoostbeemster                                             }
{    The Netherlands                                                       }
{                                                                          }
{ It not allowed to use this user interface in any program not owned by    }
{ the Waterline Software Development V.O.F.                                }
{ Special conditions apply to programs distributed by the Waterline        }
{ Software Development V.O.F. If the source code of any of these programs  }
{ is distributed as well, it is NOT allowed to use the user interface in   }
{ your own programs. Violators may be prosecuted!                          }
{                                                                          }
{ Please contact the Waterline Software Development V.O.F. at the above    }
{ address for your licence to use the "Ramon" user interface. You will get }
{ the most recent copy of the "Ramon" user interface and the "Ramon" user  }
{ interface expert for free. This program helps you design your user       }
{ interfaces at an instance.                                               }
{                                                                          }
{ This copyright notice should remain in this file and all files that are  }
{ part of the user interface "Ramon".                                      }
{==========================================================================}

{ deze object file bevat een aantal routines om Desqview te kunnen   }
{ aanspreken. Dit moet nog eens uitgezocht worden zodat we die calls }
{ met wat inline assembly kunnen maken, dat is effe netter.          }

{$L DESQ10.OBJ}

{--------------------------------------------------------------------------}
{ DV_Get_Version                                                           }
{                                                                          }
{ Vraagt het versie nummer van DesqView op, geeft 0000 terug als DesqView  }
{ niet aanwezig is.                                                        }
{                                                                          }
FUNCTION DV_Get_Version; EXTERNAL;


{--------------------------------------------------------------------------}
{ DV_Get_Video_Buffer                                                      }
{                                                                          }
{ Vraagt aan DesqView waar deze de DirectVideo screen writes naartoe       }
{ wil hebben. Geef als invoer is het huidige video segment ($B800 ofzo)    }
{ als DesqView niet aanwezig is wordt dat meteen terug gegeven.            }
{                                                                          }
FUNCTION DV_Get_Video_Buffer; EXTERNAL;


{--------------------------------------------------------------------------}
{ DV_Pause                                                                 }
{                                                                          }
{ Geef de huidige TimeSlice terug aan DesqView, gebruik deze voor polling  }
{ routines, zoals een 'WHILE NOT KeyPressed' routine. DesqView vangt een   }
{ normale ReadKey wel af, en geef het programma pas weer tijd als er op    }
{ een toets gedrukt is.                                                    }
{                                                                          }
PROCEDURE DV_Pause; EXTERNAL;


{--------------------------------------------------------------------------}
{ DV_Begin_Critical                                                        }
{                                                                          }
{ Gebruik deze routine als er een kritische handeling moet worden          }
{ verricht, iets dat geen onderbreking mag hebben. Aanroepen van deze      }
{ routine heeft als resultaat dat je alle andere tasks effectief plat      }
{ legt.                                                                    }
{                                                                          }
PROCEDURE DV_Begin_Critical; EXTERNAL;


{--------------------------------------------------------------------------}
{ DV_End_Critical                                                          }
{                                                                          }
{ Omgekeerde van de vorige functie, de blokade van andere tasks wordt      }
{ opgeheven en ze kunnen allemaal weer vrolijk verder gaan.                }
{                                                                          }
PROCEDURE DV_End_Critical; EXTERNAL;

{ that's all folks! }