Source position: vdi.pas line 206
procedure vq_mouse(
handle: SmallInt;
out pstatus: SmallInt;
out x: SmallInt;
out y: SmallInt
);