progs/windml/ugltexcyl.c - third_party/mesa - Git at Google

 /*
  * Textured cylinder demo: lighting, texturing, reflection mapping.
  *
  * Brian Paul  May 1997  This program is in the public domain.
  *
  * Conversion to UGL/Mesa by Stephane Raimbault
  */

 /*
  * Revision 1.2  2001/09/10 19:21:13  brianp
  * WindML updates (Stephane Raimbault)
  *
  * Revision 1.1  2001/08/20 16:07:11  brianp
  * WindML driver (Stephane Raimbault)
  *
  * Revision 1.5  2001/03/27 17:35:26  brianp
  * set initial window pos
  *
  * Revision 1.4  2000/12/24 22:53:54  pesco
  * * demos/Makefile.am (INCLUDES): Added -I$(top_srcdir)/util.
  * * demos/Makefile.X11, demos/Makefile.BeOS-R4, demos/Makefile.cygnus:
  * Essentially the same.
  * Program files updated to include "readtex.c", not "../util/readtex.c".
  * * demos/reflect.c: Likewise for "showbuffer.c".
  *
  *
  * * Makefile.am (EXTRA_DIST): Added top-level regular files.
  *
  * * include/GL/Makefile.am (INC_X11): Added glxext.h.
  *
  *
  * * src/GGI/include/ggi/mesa/Makefile.am (EXTRA_HEADERS): Include
  * Mesa GGI headers in dist even if HAVE_GGI is not given.
  *
  * * configure.in: Look for GLUT and demo source dirs in $srcdir.
  *
  * * src/swrast/Makefile.am (libMesaSwrast_la_SOURCES): Set to *.[ch].
  * More source list updates in various Makefile.am's.
  *
  * * Makefile.am (dist-hook): Remove CVS directory from distribution.
  * (DIST_SUBDIRS): List all possible subdirs here.
  * (SUBDIRS): Only list subdirs selected for build again.
  * The above two applied to all subdir Makefile.am's also.
  *
  * Revision 1.3  2000/09/29 23:09:39  brianp
  * added fps output
  *
  * Revision 1.2  1999/10/21 16:39:06  brianp
  * added -info command line option
  *
  * Revision 1.1.1.1  1999/08/19 00:55:40  jtg
  * Imported sources
  *
  * Revision 3.3  1999/03/28 18:24:37  brianp
  * minor clean-up
  *
  * Revision 3.2  1998/11/05 04:34:04  brianp
  * moved image files to ../images/ directory
  *
  * Revision 3.1  1998/06/23 03:16:51  brianp
  * added Point/Linear sampling menu items
  *
  * Revision 3.0  1998/02/14 18:42:29  brianp
  * initial rev
  *
  */


 #include <stdio.h>
 #include <stdlib.h>
 #include <math.h>
 #include <tickLib.h>

 #include <ugl/ugl.h>
 #include <ugl/uglucode.h>
 #include <ugl/uglevent.h>
 #include <ugl/uglinput.h>

 #include <GL/uglmesa.h>
 #include <GL/glu.h>

 #include "../util/readtex.h"

 #define TEXTURE_FILE "Mesa/images/reflect.rgb"

 #define LIT 1
 #define TEXTURED 2
 #define REFLECT 3
 #define ANIMATE 10
 #define POINT_FILTER 20
 #define LINEAR_FILTER 21
 #define QUIT 100
 #define COUNT_FRAMES

 UGL_LOCAL UGL_EVENT_SERVICE_ID eventServiceId;
 UGL_LOCAL UGL_EVENT_Q_ID qId;
 UGL_LOCAL volatile UGL_BOOL stopWex;
 UGL_LOCAL UGL_MESA_CONTEXT umc;

 UGL_LOCAL GLuint CylinderObj;
 UGL_LOCAL GLboolean Animate;
 UGL_LOCAL GLboolean linearFilter;

 UGL_LOCAL GLfloat Xrot, Yrot, Zrot;
 UGL_LOCAL GLfloat DXrot, DYrot;

 UGL_LOCAL GLuint limit;
 UGL_LOCAL GLuint count;
 UGL_LOCAL GLuint tickStart, tickStop, tickBySec;

 UGL_LOCAL void cleanUp (void);

 UGL_LOCAL void drawGL(void)
     {
 #ifdef COUNT_FRAMES
     int time;
 #endif

     glClear( GL_COLOR_BUFFER_BIT );

     glPushMatrix();
     glRotatef(Xrot, 1.0, 0.0, 0.0);
     glRotatef(Yrot, 0.0, 1.0, 0.0);
     glRotatef(Zrot, 0.0, 0.0, 1.0);
     glScalef(5.0, 5.0, 5.0);
     glCallList(CylinderObj);

     glPopMatrix();

     uglMesaSwapBuffers();

     if (Animate)
 	{
 	Xrot += DXrot;
 	Yrot += DYrot;
 	}

 #ifdef COUNT_FRAMES
     if (count > limit)
         {
 	tickStop = tickGet ();
 	time = (tickStop-tickStart)/tickBySec;
 	printf (" %i fps\n", count/time);
 	tickStart = tickStop;
 	count = 0;
         }
     else
 	count++;
 #endif

     }

 UGL_LOCAL void echoUse(void)
     {
     printf("Keys:\n");
     printf("     Up/Down  Rotate on Y\n");
     printf("  Left/Right  Rotate on X\n");
     printf("           a  Toggle animation\n");
     printf("           f  Toggle point/linear filtered\n");
     printf("           l  Lit\n");
     printf("           t  Textured\n");
     printf("           r  Reflect\n");
     printf("         ESC  Exit\n");
     }

 UGL_LOCAL void readKey(UGL_WCHAR key)
     {
     float step = 3.0;
     switch (key)
 	{
 	case 'a':
 	    Animate = !Animate;
 	    break;
 	case 'f':
 	    if(linearFilter)
 		{
 		glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER,
 				GL_NEAREST);
 		glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER,
 				GL_NEAREST);
 		}
 	    else
 		{
 		glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER,
 				GL_LINEAR);
 		glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER,
 				GL_LINEAR);
 		}
 	    linearFilter = !linearFilter;
 	    break;
 	case 'l':
 	    glEnable(GL_LIGHTING);
 	    glDisable(GL_TEXTURE_2D);
 	    glDisable(GL_TEXTURE_GEN_S);
 	    glDisable(GL_TEXTURE_GEN_T);
 	    break;
 	case 't':
 	    glDisable(GL_LIGHTING);
 	    glEnable(GL_TEXTURE_2D);
 	    glDisable(GL_TEXTURE_GEN_S);
 	    glDisable(GL_TEXTURE_GEN_T);
 	    break;
 	case 'r':
 	    glDisable(GL_LIGHTING);
 	    glEnable(GL_TEXTURE_2D);
 	    glEnable(GL_TEXTURE_GEN_S);
 	    glEnable(GL_TEXTURE_GEN_T);
 	    break;
 	case UGL_UNI_UP_ARROW:
 	    Xrot += step;
 	    break;
 	case UGL_UNI_DOWN_ARROW:
 	    Xrot -= step;
 	    break;
 	case UGL_UNI_LEFT_ARROW:
 	    Yrot += step;
 	    break;
 	case UGL_UNI_RIGHT_ARROW:
 	    Yrot -= step;
 	    break;
 	case UGL_UNI_ESCAPE:
 	    stopWex = UGL_TRUE;
 	    break;
 	}
     }

 UGL_LOCAL void loopEvent(void)
     {
     UGL_EVENT event;
     UGL_INPUT_EVENT * pInputEvent;

     UGL_FOREVER
 	{
 	if (uglEventGet (qId, &event, sizeof (event), UGL_NO_WAIT)
 	    != UGL_STATUS_Q_EMPTY)
             {
 	    pInputEvent = (UGL_INPUT_EVENT *)&event;

 	    if (pInputEvent->header.type == UGL_EVENT_TYPE_KEYBOARD &&
 		pInputEvent->modifiers & UGL_KEYBOARD_KEYDOWN)
 		readKey(pInputEvent->type.keyboard.key);
 	    }

 	drawGL();
 	if (stopWex)
             break;
 	}
     }

 UGL_LOCAL void initGL(void)
     {
     GLUquadricObj *q = gluNewQuadric();
     CylinderObj = glGenLists(1);
     glNewList(CylinderObj, GL_COMPILE);

     glTranslatef(0.0, 0.0, -1.0);

     /* cylinder */
     gluQuadricNormals(q, GL_SMOOTH);
     gluQuadricTexture(q, GL_TRUE);
     gluCylinder(q, 0.6, 0.6, 2.0, 24, 1);

     /* end cap */
     glTranslatef(0.0, 0.0, 2.0);
     gluDisk(q, 0.0, 0.6, 24, 1);

     /* other end cap */
     glTranslatef(0.0, 0.0, -2.0);
     gluQuadricOrientation(q, GLU_INSIDE);
     gluDisk(q, 0.0, 0.6, 24, 1);

     glEndList();
     gluDeleteQuadric(q);

     /* lighting */
     glEnable(GL_LIGHTING);
     {
     GLfloat gray[4] = {0.2, 0.2, 0.2, 1.0};
     GLfloat white[4] = {1.0, 1.0, 1.0, 1.0};
     GLfloat teal[4] = { 0.0, 1.0, 0.8, 1.0 };
     glMaterialfv(GL_FRONT, GL_DIFFUSE, teal);
     glLightfv(GL_LIGHT0, GL_AMBIENT, gray);
     glLightfv(GL_LIGHT0, GL_DIFFUSE, white);
     glEnable(GL_LIGHT0);
     }

     /* fitering = nearest, initially */
     glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
     glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);

     glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_DECAL);
     glHint(GL_PERSPECTIVE_CORRECTION_HINT, GL_FASTEST);

     glTexGeni(GL_S, GL_TEXTURE_GEN_MODE, GL_SPHERE_MAP);
     glTexGeni(GL_T, GL_TEXTURE_GEN_MODE, GL_SPHERE_MAP);

     if (!LoadRGBMipmaps(TEXTURE_FILE, GL_RGB))
 	{
 	printf("Error: couldn't load texture image\n");
 	cleanUp();
 	exit(1);
 	}

     glEnable(GL_CULL_FACE);  /* don't need Z testing for convex objects */

     glEnable(GL_LIGHTING);

     glMatrixMode( GL_PROJECTION );
     glLoadIdentity();
     glFrustum( -1.0, 1.0, -1.0, 1.0, 10.0, 100.0 );
     glMatrixMode( GL_MODELVIEW );
     glLoadIdentity();
     glTranslatef( 0.0, 0.0, -70.0 );

     printf("GL_RENDERER   = %s\n", (char *) glGetString(GL_RENDERER));
     printf("GL_VERSION    = %s\n", (char *) glGetString(GL_VERSION));
     printf("GL_VENDOR     = %s\n", (char *) glGetString(GL_VENDOR));
     printf("GL_EXTENSIONS = %s\n", (char *) glGetString(GL_EXTENSIONS));

 #ifdef COUNT_FRAMES
     tickStart = tickGet ();
     tickBySec = sysClkRateGet ();
 #endif

     }

 UGL_LOCAL void cleanUp (void)
     {
     uglEventQDestroy (eventServiceId, qId);

     uglMesaDestroyContext();
     uglDeinitialize ();
     }

 void windMLTexCyl (UGL_BOOL windMLMode);

 void ugltexcyl (void)
     {
     taskSpawn ("tTexCyl", 210, VX_FP_TASK, 100000, (FUNCPTR)windMLTexCyl,
 	       UGL_FALSE,1,2,3,4,5,6,7,8,9);
     }

 void windMLTexCyl (UGL_BOOL windMLMode)
     {
     UGL_INPUT_DEVICE_ID keyboardDevId;
     GLsizei displayWidth, displayHeight;
     GLsizei x, y, w, h;

     CylinderObj = 0;
     Animate = GL_TRUE;
     linearFilter = GL_FALSE;
     Xrot = 0.0;
     Yrot = 0.0;
     Zrot = 0.0;
     DXrot = 1.0;
     DYrot = 2.5;
     limit = 100;
     count = 1;

     uglInitialize ();

     uglDriverFind (UGL_KEYBOARD_TYPE, 0,
 		   (UGL_UINT32 *)&keyboardDevId);

     uglDriverFind (UGL_EVENT_SERVICE_TYPE, 0, (UGL_UINT32 *)&eventServiceId);

     qId = uglEventQCreate (eventServiceId, 100);

     /* Double buffering */
     if (windMLMode)
        umc = uglMesaCreateNewContext(UGL_MESA_DOUBLE
 				     | UGL_MESA_WINDML_EXCLUSIVE, NULL);
     else
        umc = uglMesaCreateNewContext(UGL_MESA_DOUBLE, NULL);

     if (umc == NULL)
         {
 	uglDeinitialize ();
 	return;
 	}

     uglMesaMakeCurrentContext (umc, 0, 0, 1, 1);

     uglMesaGetIntegerv(UGL_MESA_DISPLAY_WIDTH, &displayWidth);
     uglMesaGetIntegerv(UGL_MESA_DISPLAY_HEIGHT, &displayHeight);

     h = (displayHeight*3)/4;
     w = h;
     x = (displayWidth-w)/2;
     y = (displayHeight-h)/2;

     uglMesaMoveToWindow(x, y);
     uglMesaResizeToWindow(w, h);

     initGL ();

     echoUse();

     stopWex = UGL_FALSE;
     loopEvent();

     cleanUp();

     return;
     }
	/*
	* Textured cylinder demo: lighting, texturing, reflection mapping.
	*
	* Brian Paul May 1997 This program is in the public domain.
	*
	* Conversion to UGL/Mesa by Stephane Raimbault
	*/

	/*
	* Revision 1.2 2001/09/10 19:21:13 brianp
	* WindML updates (Stephane Raimbault)
	*
	* Revision 1.1 2001/08/20 16:07:11 brianp
	* WindML driver (Stephane Raimbault)
	*
	* Revision 1.5 2001/03/27 17:35:26 brianp
	* set initial window pos
	*
	* Revision 1.4 2000/12/24 22:53:54 pesco
	* * demos/Makefile.am (INCLUDES): Added -I$(top_srcdir)/util.
	* * demos/Makefile.X11, demos/Makefile.BeOS-R4, demos/Makefile.cygnus:
	* Essentially the same.
	* Program files updated to include "readtex.c", not "../util/readtex.c".
	* * demos/reflect.c: Likewise for "showbuffer.c".
	*
	*
	* * Makefile.am (EXTRA_DIST): Added top-level regular files.
	*
	* * include/GL/Makefile.am (INC_X11): Added glxext.h.
	*
	*
	* * src/GGI/include/ggi/mesa/Makefile.am (EXTRA_HEADERS): Include
	* Mesa GGI headers in dist even if HAVE_GGI is not given.
	*
	* * configure.in: Look for GLUT and demo source dirs in $srcdir.
	*
	* * src/swrast/Makefile.am (libMesaSwrast_la_SOURCES): Set to *.[ch].
	* More source list updates in various Makefile.am's.
	*
	* * Makefile.am (dist-hook): Remove CVS directory from distribution.
	* (DIST_SUBDIRS): List all possible subdirs here.
	* (SUBDIRS): Only list subdirs selected for build again.
	* The above two applied to all subdir Makefile.am's also.
	*
	* Revision 1.3 2000/09/29 23:09:39 brianp
	* added fps output
	*
	* Revision 1.2 1999/10/21 16:39:06 brianp
	* added -info command line option
	*
	* Revision 1.1.1.1 1999/08/19 00:55:40 jtg
	* Imported sources
	*
	* Revision 3.3 1999/03/28 18:24:37 brianp
	* minor clean-up
	*
	* Revision 3.2 1998/11/05 04:34:04 brianp
	* moved image files to ../images/ directory
	*
	* Revision 3.1 1998/06/23 03:16:51 brianp
	* added Point/Linear sampling menu items
	*
	* Revision 3.0 1998/02/14 18:42:29 brianp
	* initial rev
	*
	*/


	#include <stdio.h>
	#include <stdlib.h>
	#include <math.h>
	#include <tickLib.h>

	#include <ugl/ugl.h>
	#include <ugl/uglucode.h>
	#include <ugl/uglevent.h>
	#include <ugl/uglinput.h>

	#include <GL/uglmesa.h>
	#include <GL/glu.h>

	#include "../util/readtex.h"

	#define TEXTURE_FILE "Mesa/images/reflect.rgb"

	#define LIT 1
	#define TEXTURED 2
	#define REFLECT 3
	#define ANIMATE 10
	#define POINT_FILTER 20
	#define LINEAR_FILTER 21
	#define QUIT 100
	#define COUNT_FRAMES

	UGL_LOCAL UGL_EVENT_SERVICE_ID eventServiceId;
	UGL_LOCAL UGL_EVENT_Q_ID qId;
	UGL_LOCAL volatile UGL_BOOL stopWex;
	UGL_LOCAL UGL_MESA_CONTEXT umc;

	UGL_LOCAL GLuint CylinderObj;
	UGL_LOCAL GLboolean Animate;
	UGL_LOCAL GLboolean linearFilter;

	UGL_LOCAL GLfloat Xrot, Yrot, Zrot;
	UGL_LOCAL GLfloat DXrot, DYrot;

	UGL_LOCAL GLuint limit;
	UGL_LOCAL GLuint count;
	UGL_LOCAL GLuint tickStart, tickStop, tickBySec;

	UGL_LOCAL void cleanUp (void);

	UGL_LOCAL void drawGL(void)
	{
	#ifdef COUNT_FRAMES
	int time;
	#endif

	glClear( GL_COLOR_BUFFER_BIT );

	glPushMatrix();
	glRotatef(Xrot, 1.0, 0.0, 0.0);
	glRotatef(Yrot, 0.0, 1.0, 0.0);
	glRotatef(Zrot, 0.0, 0.0, 1.0);
	glScalef(5.0, 5.0, 5.0);
	glCallList(CylinderObj);

	glPopMatrix();

	uglMesaSwapBuffers();

	if (Animate)
	{
	Xrot += DXrot;
	Yrot += DYrot;
	}

	#ifdef COUNT_FRAMES
	if (count > limit)
	{
	tickStop = tickGet ();
	time = (tickStop-tickStart)/tickBySec;
	printf (" %i fps\n", count/time);
	tickStart = tickStop;
	count = 0;
	}
	else
	count++;
	#endif

	}

	UGL_LOCAL void echoUse(void)
	{
	printf("Keys:\n");
	printf(" Up/Down Rotate on Y\n");
	printf(" Left/Right Rotate on X\n");
	printf(" a Toggle animation\n");
	printf(" f Toggle point/linear filtered\n");
	printf(" l Lit\n");
	printf(" t Textured\n");
	printf(" r Reflect\n");
	printf(" ESC Exit\n");
	}

	UGL_LOCAL void readKey(UGL_WCHAR key)
	{
	float step = 3.0;
	switch (key)
	{
	case 'a':
	Animate = !Animate;
	break;
	case 'f':
	if(linearFilter)
	{
	glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER,
	GL_NEAREST);
	glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER,
	GL_NEAREST);
	}
	else
	{
	glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER,
	GL_LINEAR);
	glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER,
	GL_LINEAR);
	}
	linearFilter = !linearFilter;
	break;
	case 'l':
	glEnable(GL_LIGHTING);
	glDisable(GL_TEXTURE_2D);
	glDisable(GL_TEXTURE_GEN_S);
	glDisable(GL_TEXTURE_GEN_T);
	break;
	case 't':
	glDisable(GL_LIGHTING);
	glEnable(GL_TEXTURE_2D);
	glDisable(GL_TEXTURE_GEN_S);
	glDisable(GL_TEXTURE_GEN_T);
	break;
	case 'r':
	glDisable(GL_LIGHTING);
	glEnable(GL_TEXTURE_2D);
	glEnable(GL_TEXTURE_GEN_S);
	glEnable(GL_TEXTURE_GEN_T);
	break;
	case UGL_UNI_UP_ARROW:
	Xrot += step;
	break;
	case UGL_UNI_DOWN_ARROW:
	Xrot -= step;
	break;
	case UGL_UNI_LEFT_ARROW:
	Yrot += step;
	break;
	case UGL_UNI_RIGHT_ARROW:
	Yrot -= step;
	break;
	case UGL_UNI_ESCAPE:
	stopWex = UGL_TRUE;
	break;
	}
	}

	UGL_LOCAL void loopEvent(void)
	{
	UGL_EVENT event;
	UGL_INPUT_EVENT * pInputEvent;

	UGL_FOREVER
	{
	if (uglEventGet (qId, &event, sizeof (event), UGL_NO_WAIT)
	!= UGL_STATUS_Q_EMPTY)
	{
	pInputEvent = (UGL_INPUT_EVENT *)&event;

	if (pInputEvent->header.type == UGL_EVENT_TYPE_KEYBOARD &&
	pInputEvent->modifiers & UGL_KEYBOARD_KEYDOWN)
	readKey(pInputEvent->type.keyboard.key);
	}

	drawGL();
	if (stopWex)
	break;
	}
	}

	UGL_LOCAL void initGL(void)
	{
	GLUquadricObj *q = gluNewQuadric();
	CylinderObj = glGenLists(1);
	glNewList(CylinderObj, GL_COMPILE);

	glTranslatef(0.0, 0.0, -1.0);

	/* cylinder */
	gluQuadricNormals(q, GL_SMOOTH);
	gluQuadricTexture(q, GL_TRUE);
	gluCylinder(q, 0.6, 0.6, 2.0, 24, 1);

	/* end cap */
	glTranslatef(0.0, 0.0, 2.0);
	gluDisk(q, 0.0, 0.6, 24, 1);

	/* other end cap */
	glTranslatef(0.0, 0.0, -2.0);
	gluQuadricOrientation(q, GLU_INSIDE);
	gluDisk(q, 0.0, 0.6, 24, 1);

	glEndList();
	gluDeleteQuadric(q);

	/* lighting */
	glEnable(GL_LIGHTING);
	{
	GLfloat gray[4] = {0.2, 0.2, 0.2, 1.0};
	GLfloat white[4] = {1.0, 1.0, 1.0, 1.0};
	GLfloat teal[4] = { 0.0, 1.0, 0.8, 1.0 };
	glMaterialfv(GL_FRONT, GL_DIFFUSE, teal);
	glLightfv(GL_LIGHT0, GL_AMBIENT, gray);
	glLightfv(GL_LIGHT0, GL_DIFFUSE, white);
	glEnable(GL_LIGHT0);
	}

	/* fitering = nearest, initially */
	glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
	glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);

	glTexEnvi(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_DECAL);
	glHint(GL_PERSPECTIVE_CORRECTION_HINT, GL_FASTEST);

	glTexGeni(GL_S, GL_TEXTURE_GEN_MODE, GL_SPHERE_MAP);
	glTexGeni(GL_T, GL_TEXTURE_GEN_MODE, GL_SPHERE_MAP);

	if (!LoadRGBMipmaps(TEXTURE_FILE, GL_RGB))
	{
	printf("Error: couldn't load texture image\n");
	cleanUp();
	exit(1);
	}

	glEnable(GL_CULL_FACE); /* don't need Z testing for convex objects */

	glEnable(GL_LIGHTING);

	glMatrixMode( GL_PROJECTION );
	glLoadIdentity();
	glFrustum( -1.0, 1.0, -1.0, 1.0, 10.0, 100.0 );
	glMatrixMode( GL_MODELVIEW );
	glLoadIdentity();
	glTranslatef( 0.0, 0.0, -70.0 );

	printf("GL_RENDERER = %s\n", (char *) glGetString(GL_RENDERER));
	printf("GL_VERSION = %s\n", (char *) glGetString(GL_VERSION));
	printf("GL_VENDOR = %s\n", (char *) glGetString(GL_VENDOR));
	printf("GL_EXTENSIONS = %s\n", (char *) glGetString(GL_EXTENSIONS));

	#ifdef COUNT_FRAMES
	tickStart = tickGet ();
	tickBySec = sysClkRateGet ();
	#endif

	}

	UGL_LOCAL void cleanUp (void)
	{
	uglEventQDestroy (eventServiceId, qId);

	uglMesaDestroyContext();
	uglDeinitialize ();
	}

	void windMLTexCyl (UGL_BOOL windMLMode);

	void ugltexcyl (void)
	{
	taskSpawn ("tTexCyl", 210, VX_FP_TASK, 100000, (FUNCPTR)windMLTexCyl,
	UGL_FALSE,1,2,3,4,5,6,7,8,9);
	}

	void windMLTexCyl (UGL_BOOL windMLMode)
	{
	UGL_INPUT_DEVICE_ID keyboardDevId;
	GLsizei displayWidth, displayHeight;
	GLsizei x, y, w, h;

	CylinderObj = 0;
	Animate = GL_TRUE;
	linearFilter = GL_FALSE;
	Xrot = 0.0;
	Yrot = 0.0;
	Zrot = 0.0;
	DXrot = 1.0;
	DYrot = 2.5;
	limit = 100;
	count = 1;

	uglInitialize ();

	uglDriverFind (UGL_KEYBOARD_TYPE, 0,
	(UGL_UINT32 *)&keyboardDevId);

	uglDriverFind (UGL_EVENT_SERVICE_TYPE, 0, (UGL_UINT32 *)&eventServiceId);

	qId = uglEventQCreate (eventServiceId, 100);

	/* Double buffering */
	if (windMLMode)
	umc = uglMesaCreateNewContext(UGL_MESA_DOUBLE
	\| UGL_MESA_WINDML_EXCLUSIVE, NULL);
	else
	umc = uglMesaCreateNewContext(UGL_MESA_DOUBLE, NULL);

	if (umc == NULL)
	{
	uglDeinitialize ();
	return;
	}

	uglMesaMakeCurrentContext (umc, 0, 0, 1, 1);

	uglMesaGetIntegerv(UGL_MESA_DISPLAY_WIDTH, &displayWidth);
	uglMesaGetIntegerv(UGL_MESA_DISPLAY_HEIGHT, &displayHeight);

	h = (displayHeight*3)/4;
	w = h;
	x = (displayWidth-w)/2;
	y = (displayHeight-h)/2;

	uglMesaMoveToWindow(x, y);
	uglMesaResizeToWindow(w, h);

	initGL ();

	echoUse();

	stopWex = UGL_FALSE;
	loopEvent();

	cleanUp();

	return;
	}