ULONG VideoControlTags (
/* SYNOPSIS */
struct ColorMap * cm,
Tag tag1,
...)
/* FUNCTION
This is the varargs version of graphics.library/VideoControl().
For information see graphics.library/VideoControl().
INPUTS
RESULT
NOTES
EXAMPLE
BUGS
SEE ALSO
graphics.library/VideoControl()
INTERNALS
HISTORY
*****************************************************************************/
{
AROS_SLOWSTACKTAGS_PRE(tag1)
retval = VideoControl (cm, AROS_SLOWSTACKTAGS_ARG(tag1));
AROS_SLOWSTACKTAGS_POST
} /* VideoControlTags */
void screen_ratio (struct Screen *screen)
{
struct TagItem vti[] =
{VTAG_VIEWPORTEXTRA_GET, 0,
VTAG_END_CM, 0};
struct ViewPortExtra *vpe;
ScreenWidth = screen->Width;
ScreenHeight = screen->Height;
if (screen->ViewPort.ColorMap)
{
if (VideoControl (screen->ViewPort.ColorMap, vti) == 0)
{
vpe = (struct ViewPortExtra *) vti[0].ti_Data;
ScreenWidth = vpe->DisplayClip.MaxX - vpe->DisplayClip.MinX + 1;
ScreenHeight = vpe->DisplayClip.MaxY - vpe->DisplayClip.MinY + 1;
}
}
}
