unit ECO_dsqv;
interface
uses
  dos

  ;

type   str2   = string[2];

var
  desqresult  :      byte;
  desqregs    : registers;
  desqversion :      word;


  function desqviewpresent:boolean;
  procedure starttask(x: str2);
  procedure giveupcpu;
  procedure giveupidle;
  procedure exittask;