workbench/libs/reqtools/rtgetvscreensize.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc:
   6     Lang: English
   7 */
   8
   9 #include <exec/types.h>
  10 #include <proto/exec.h>
  11 #include <proto/reqtools.h>
  12 #include <proto/intuition.h>
  13 #include <exec/libraries.h>
  14 #include <exec/memory.h>
  15 #include <aros/libcall.h>
  16
  17 #include "reqtools_intern.h"
  18
  19 /*****************************************************************************
  20
  21     NAME */
  22
  23     AROS_LH3(ULONG, rtGetVScreenSize,
  24
  25 /*  SYNOPSIS */
  26
  27         AROS_LHA(struct Screen *, screen, A0),
  28         AROS_LHA(ULONG *, widthptr, A1),
  29         AROS_LHA(ULONG *, heightptr, A2),
  30
  31 /*  LOCATION */
  32
  33         struct ReqToolsBase *, ReqToolsBase, 20, ReqTools)
  34
  35 /*  FUNCTION
  36         Use this function to get the size of the visible portion of a
  37         screen.
  38
  39         The value returned by rtGetVScreenSize() can be used for vertical
  40         spacing. It will be larger for interlaced and productivity screens.
  41         Using this number for spacing will assure your requester will look
  42         good on an interlaced and a non-interlaced screen.
  43
  44         Current return codes are 2 for non-interlaced and 4 for interlaced.
  45         These values may change in the future, don't depend on them too
  46         much. They will in any case remain of the same magnitude.
  47
  48     INPUTS
  49         screen - pointer to the screen.
  50         widthptr - address of an ULONG variable to hold the width.
  51         heightptr - address of an ULONG variable to hold the height.
  52
  53     RESULT
  54         spacing - vertical spacing for the screen.
  55
  56     NOTES
  57         This function is for the advanced ReqTools user.
  58
  59     EXAMPLE
  60
  61     BUGS
  62
  63     SEE ALSO
  64
  65     INTERNALS
  66
  67     HISTORY
  68
  69 ******************************************************************************/
  70 {
  71     AROS_LIBFUNC_INIT
  72
  73     int width, height, retval;
  74
  75     retval = GetVScreenSize(screen, &width, &height); /* general.c */
  76
  77     *widthptr  = (ULONG)width;
  78     *heightptr = (ULONG)height;
  79
  80     return (ULONG)retval;
  81
  82     AROS_LIBFUNC_EXIT
  83
  84 } /* rtGetVScreenSize */