#include "stdafx.h"
#define GL_PI 3.1415f

//para SELECCION: 
#define CARA3 10  //nombre para seleccion de 3a cara
#define BUFSIZE 512  //tamano de buffer para seleccion
GLuint selectBuf[BUFSIZE]; //buffer de seleccion

GLfloat xRot = 0.45f;
GLfloat yRot = 0.35f;
GLboolean bCull = glIsEnabled(GL_CULL_FACE);
GLboolean bDepth = glIsEnabled(GL_DEPTH_TEST);
GLboolean bOutline = (GLboolean)true;

GLenum shademode = GL_FLAT;
#define DELTATRANS        0.05f
GLfloat ex = 0.0f;
GLfloat ey = 75.0f;
GLfloat ez = -120.0f;
GLfloat delta = 0.01f;
GLfloat deltaR = 0.01f;
GLfloat  deltatrans = DELTATRANS;
#define CX                0.0f

#define CZ                0.0f

//para SELECCION de CARA 3: 
GLfloat initcolorcara3[3] = { 1.f, 0.f, 0.f }; //color inicial (rojo)
GLfloat color_de_cara3[3]; //color corriente de CARA 3


GLfloat iniLuz[4] = { 0.f, 100.f, 0.f, 1.f },
Luz[4], MatSombra[16],
Piso[] = { 0.f, 1.f, 0.f, 150 },
ALFA = 0.75f;
#define CY                Piso[3]
GLfloat cx = CX, cy = CY, cz = CZ;

#define    checkImageWidth 256
#define    checkImageHeight 256
#define subImageWidth 64
#define subImageHeight 64
static GLubyte checkImage[checkImageHeight][checkImageWidth][4];
static GLubyte otherImage[checkImageHeight][checkImageWidth][4];

static GLubyte subImage[subImageHeight][subImageWidth][4];

static GLuint texName[2];

void makeCheckImages(void)
{
	int i, j, c;

	for (i = 0; i < checkImageHeight; i++) {
		for (j = 0; j < checkImageWidth; j++) {
			c = ((((i & 0x8) == 0) ^ ((j & 0x8)) == 0)) * 255;
			checkImage[i][j][0] = (GLubyte)c;
			checkImage[i][j][1] = (GLubyte)c;
			checkImage[i][j][2] = (GLubyte)c;
			checkImage[i][j][3] = (GLubyte)255;

			c = ((((i & 0x10) == 0) ^ ((j & 0x10)) == 0)) * 255;
			otherImage[i][j][0] = (GLubyte)0;
			otherImage[i][j][1] = (GLubyte)0;
			otherImage[i][j][2] = (GLubyte)c;
			otherImage[i][j][3] = (GLubyte)255;
		}
	}

	for (i = 0; i < subImageHeight; i++) {
		for (j = 0; j < subImageWidth; j++) {
			c = ((((i & 0x4) == 0) ^ ((j & 0x4)) == 0)) * 255;
			subImage[i][j][0] = (GLubyte)c;
			subImage[i][j][1] = (GLubyte)0;
			subImage[i][j][2] = (GLubyte)0;
			subImage[i][j][3] = (GLubyte)255;
		}
	}
}
void initColors()
{

	for (int i = 0; i<3; i++){
		color_de_cara3[i] = initcolorcara3[i];
	}
}


void gltMakeShadowMatrix(GLfloat vPlaneEquation[],
	GLfloat vLightPos[], GLfloat destMat[])
{
	GLfloat dot;

	// Dot product of plane and light position
	dot = vPlaneEquation[0] * vLightPos[0] + vPlaneEquation[1] * vLightPos[1] +
		vPlaneEquation[2] * vLightPos[2] + vPlaneEquation[3] * vLightPos[3];

	// Now do the projection
	// First column
	destMat[0] = dot - vLightPos[0] * vPlaneEquation[0];
	destMat[4] = 0.0f - vLightPos[0] * vPlaneEquation[1];
	destMat[8] = 0.0f - vLightPos[0] * vPlaneEquation[2];
	destMat[12] = 0.0f - vLightPos[0] * vPlaneEquation[3];

	// Second column
	destMat[1] = 0.0f - vLightPos[1] * vPlaneEquation[0];
	destMat[5] = dot - vLightPos[1] * vPlaneEquation[1];
	destMat[9] = 0.0f - vLightPos[1] * vPlaneEquation[2];
	destMat[13] = 0.0f - vLightPos[1] * vPlaneEquation[3];

	// Third Column
	destMat[2] = 0.0f - vLightPos[2] * vPlaneEquation[0];
	destMat[6] = 0.0f - vLightPos[2] * vPlaneEquation[1];
	destMat[10] = dot - vLightPos[2] * vPlaneEquation[2];
	destMat[14] = 0.0f - vLightPos[2] * vPlaneEquation[3];

	// Fourth Column
	destMat[3] = 0.0f - vLightPos[3] * vPlaneEquation[0];
	destMat[7] = 0.0f - vLightPos[3] * vPlaneEquation[1];
	destMat[11] = 0.0f - vLightPos[3] * vPlaneEquation[2];
	destMat[15] = dot - vLightPos[3] * vPlaneEquation[3];
}

void luz(){
	glColor3f(1.0f, 1.0f, 0.0f);
	glPushMatrix();
	glTranslatef(Luz[0], Luz[1], Luz[2]);
	glScalef(5.f, 5.f, 5.f);
	glutSolidSphere(1., 20, 20);
	glPopMatrix();
}
void SetupRC()
{
	initColors();
	Luz[0] = iniLuz[0];
	Luz[1] = iniLuz[1];
	Luz[2] = iniLuz[2];
	Luz[3] = iniLuz[3];
	// Black background
	glClearColor(0.0f, 0.0f, 0.0f, 1.0f);
	/*generar buffers de texturas*/
	makeCheckImages();
	glPixelStorei(GL_UNPACK_ALIGNMENT, 1);

	glGenTextures(2, texName);
	glBindTexture(GL_TEXTURE_2D, texName[0]);

	glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT);
	glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT);
	glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
	glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
	glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, checkImageWidth, checkImageHeight,
		0, GL_RGBA, GL_UNSIGNED_BYTE, checkImage);

	glTexSubImage2D(GL_TEXTURE_2D, 0, 48, 170, subImageWidth,
		subImageHeight, GL_RGBA, GL_UNSIGNED_BYTE, subImage);
	glTexSubImage2D(GL_TEXTURE_2D, 0, 48, 48, subImageWidth,
		subImageHeight, GL_RGBA, GL_UNSIGNED_BYTE, subImage);
	glTexSubImage2D(GL_TEXTURE_2D, 0, 170, 48, subImageWidth,
		subImageHeight, GL_RGBA, GL_UNSIGNED_BYTE, subImage);
	glTexSubImage2D(GL_TEXTURE_2D, 0, 170, 170, subImageWidth,
		subImageHeight, GL_RGBA, GL_UNSIGNED_BYTE, subImage);

	glBindTexture(GL_TEXTURE_2D, texName[1]);
	glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT);
	glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT);
	glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
	glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
	glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA, checkImageWidth,
		checkImageHeight, 0, GL_RGBA, GL_UNSIGNED_BYTE,
		otherImage);
	/*FIN generacion buff textures*/

	// Set color shading model to flat
	glShadeModel(shademode);

	// Clockwise-wound polygons are front facing; this is reversed
	// because we are using triangle fans
	glFrontFace(GL_CW);
}


void cuadro_sin_color(){
	glBegin(GL_QUADS);
	glVertex3f(1.0f, 1.0f, .0f);
	glVertex3f(1.0f, -1.0f, .0f);
	glVertex3f(-1.0f, -1.0f, .0f);
	glVertex3f(-1.0f, 1.0f, .0f);
	glEnd();
}

void cuadro_con_textura_1(){
	glEnable(GL_TEXTURE_2D);
	glTexEnvf(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_DECAL);
	glBindTexture(GL_TEXTURE_2D, texName[0]);
	glBegin(GL_QUADS);
	glTexCoord2f(1.0, 1.0); glVertex3f(1.0f, 1.0f, .0f); //glVertex3f( 400.0f, -150.0f, -700.0f); //glVertex3f(-2.0, -1.0, 0.0);
	glTexCoord2f(1.0, 0.0); glVertex3f(1.0f, -1.0f, .0f);//glVertex3f(-400.0f, -150.0f, -700.0f); //glVertex3f(-2.0, 1.0, 0.0);
	glTexCoord2f(0.0, 0.0); glVertex3f(-1.0f, -1.0f, .0f);//glVertex3f(-400.0f, -150.0f, 200.0f); //glVertex3f(0.0, 1.0, 0.0);
	glTexCoord2f(0.0, 1.0); glVertex3f(-1.0f, 1.0f, .0f);//glVertex3f(400.0f, -150.0f, 200.0f);//glVertex3f(0.0, -1.0, 0.0);
	glEnd();

	glDisable(GL_TEXTURE_2D);
}

void cuadro_con_textura_2(){
	glEnable(GL_TEXTURE_2D);
	glTexEnvf(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_DECAL);
	glBindTexture(GL_TEXTURE_2D, texName[1]);
	glBegin(GL_QUADS);
	glTexCoord2f(0.2, 1.); glVertex3f(1.0f, 1.0f, .0f); //glVertex3f( 400.0f, -150.0f, -700.0f); //glVertex3f(-2.0, -1.0, 0.0);
	glTexCoord2f(.8, 1.); glVertex3f(1.0f, -1.0f, .0f);//glVertex3f(-400.0f, -150.0f, -700.0f); //glVertex3f(-2.0, 1.0, 0.0);
	glTexCoord2f(1.0, 0.); glVertex3f(-1.0f, -1.0f, .0f);//glVertex3f(-400.0f, -150.0f, 200.0f); //glVertex3f(0.0, 1.0, 0.0);
	glTexCoord2f(0.0, 0.0); glVertex3f(-1.0f, 1.0f, .0f);//glVertex3f(400.0f, -150.0f, 200.0f);//glVertex3f(0.0, -1.0, 0.0);
	glEnd();
	glDisable(GL_TEXTURE_2D);
}

void lineas_en_piso_1(){
	glBegin(GL_LINES);
	int L = 10;
	for (int i = 0; i<L; i++){
		glVertex3f((1.f - 2.f*(float)i / L), 1.0f, .0f);
		glVertex3f((1.f - 2.f*(float)i / L), -1.0f, .0f);
	}
	glEnd();
}

void lineas_en_piso_2(){
	glBegin(GL_LINES);
	int L = 10;
	for (int i = 0; i<L; i++){
		glVertex3f(1.0f, (1.f - 2.f*(float)i / L), .0f);
		glVertex3f(-1.0f, (1.f - 2.f*(float)i / L), .0f);
	}
	glEnd();
}


void piso(){   /*función agregada 23/05/2018*/
	glColor4f(.7f, .7f, .7f, ALFA);
	glPushMatrix();
	glTranslatef(0.f, -Piso[3]/*-150.f*/, 50.f);
	glRotatef(270.f, 1.f, 0.f, 0.f);     //la version          glRotatef(90.f, 1.f, 0.f, 0.f);     
	// voltea el piso al la cara invisible
	glScalef(150.f, 150.f, 150.f); //piso 3 veces mas ancho que cubo
	glDisable(GL_DEPTH_TEST);
	cuadro_sin_color();
	glColor4f(0.f, 0.f, 0.f, ALFA);
	lineas_en_piso_1();
	lineas_en_piso_2();
	if (bDepth)  glEnable(GL_DEPTH_TEST);
	glPopMatrix();
}

void Stenc(){
	// turning off writing to the color buffer and depth buffer so we only 
	// write to stencil buffer
	glColorMask(GL_FALSE, GL_FALSE, GL_FALSE, GL_FALSE);
	glDepthMask(GL_FALSE);

	// enable stencil buffer
	glEnable(GL_STENCIL_TEST);

	// write a one to the stencil buffer everywhere we are about to draw
	glStencilFunc(GL_ALWAYS, 1, 0xFFFFFFFF);

	// this is to always pass a one to the stencil buffer where we draw
	glStencilOp(GL_REPLACE, GL_REPLACE, GL_REPLACE);

	// render the plane which the shadow will be on
	// color and depth buffer are disabled, only the stencil buffer
	// will be modified
	piso();//DrawFloor(0,0,0);

	// turn the color and depth buffers back on
	glColorMask(GL_TRUE, GL_TRUE, GL_TRUE, GL_TRUE);
	glDepthMask(GL_TRUE);

	// until stencil test is diabled, only write to areas where the
	// stencil buffer has a one. This is to draw the shadow only on
	// the floor.
	glStencilFunc(GL_EQUAL, 1, 0xFFFFFFFF);

	// don't modify the contents of the stencil buffer
	glStencilOp(GL_KEEP, GL_KEEP, GL_KEEP);
}

void cubo(int mode){
	glPushMatrix();
	glScalef(0.5f, 0.5f, 0.5f);
	//primera cara
	glColor3f(0.0f, 1.0f, 0.0f);
	glPushMatrix();
	glTranslatef(0.f, 0.f, 50.f);
	glScalef(50.f, 50.f, 50.f);
	cuadro_con_textura_1();//    cuadro_sin_color();
	glPopMatrix();

	//2a cara
	glColor3f(1.0f, 1.0f, 0.0f);
	glPushMatrix();
	glRotatef(90.f, 0.f, 1.f, 0.f);
	glPushMatrix();
	glTranslatef(0.f, 0.f, 50.f);
	glScalef(50.f, 50.f, 50.f);
	cuadro_con_textura_2();//cuadro_sin_color();
	glPopMatrix();
	glPopMatrix();

	//3a cara
	if (mode == GL_SELECT)//para SELECCION: 
		glLoadName(CARA3); //<-  bautizando el objeto mientras se renderice 
	glColor3fv(color_de_cara3);
	//glColor3f(1.0f, .0f, 0.0f); //<- version previa a implementar seleccion
	glPushMatrix();
	glRotatef(180.f, 0.f, 1.f, 0.f);
	glPushMatrix();
	glTranslatef(0.f, 0.f, 50.f);
	glScalef(50.f, 50.f, 50.f);
	cuadro_sin_color();
	glPopMatrix();
	glPopMatrix();
	glPopMatrix();
}

void cubo_sin_color(){
	glPushMatrix();
	glScalef(0.5f, 0.5f, 0.5f);
	//primera cara         
	glPushMatrix();
	glTranslatef(0.f, 0.f, 50.f);
	glScalef(50.f, 50.f, 50.f);
	cuadro_sin_color();
	glPopMatrix();

	//2a cara         
	glPushMatrix();
	glRotatef(90.f, 0.f, 1.f, 0.f);
	glPushMatrix();
	glTranslatef(0.f, 0.f, 50.f);
	glScalef(50.f, 50.f, 50.f);
	cuadro_sin_color();
	glPopMatrix();
	glPopMatrix();

	//3a cara         
	glPushMatrix();
	glRotatef(180.f, 0.f, 1.f, 0.f);
	glPushMatrix();
	glTranslatef(0.f, 0.f, 50.f);
	glScalef(50.f, 50.f, 50.f);
	cuadro_sin_color();
	glPopMatrix();
	glPopMatrix();
	glPopMatrix();
}

void SombradeMiMundo(GLfloat datosdeLuz[], GLfloat
	datosdePlano[]){
	glPushMatrix();
	gltMakeShadowMatrix(Piso, Luz, MatSombra);
	glMultMatrixf(MatSombra);
	glColor4f(0.3f, 0.3f, 0.3f, ALFA);
	cubo_sin_color();//Objetos_de_MiMundo();
	glPopMatrix();
}



void RenderScene(int mode /*para SELECCION*/ )
{
	// Reset coordinate system
	glMatrixMode(GL_PROJECTION);
	if (mode == GL_RENDER)
	{
		glLoadIdentity();
	}
	gluPerspective(60.0, 1.0, 1.5, 1500.0);

	glMatrixMode(GL_MODELVIEW);
	glLoadIdentity();
	gluLookAt(ex, ey, ez, 0.0, 0.0, 0.0, 0.0, 1.0, 0.0);

	GLfloat x, y, angle;         // Storage for coordinates and angles
	int iPivot = 1;            // Used to flag alternating colors

	// Clear the window and the depth buffer
	glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT | GL_STENCIL_BUFFER_BIT);

	// Turn culling on if flag is set
	if (bCull)   glEnable(GL_CULL_FACE);
	else        glDisable(GL_CULL_FACE);

	// Enable depth testing if flag is set
	if (bDepth)  glEnable(GL_DEPTH_TEST);
	else        glDisable(GL_DEPTH_TEST);

	// Draw the back side as a wireframe only, if flag is set
	if (bOutline)glPolygonMode(GL_BACK, GL_LINE);
	else        glPolygonMode(GL_BACK, GL_FILL);

	// Save matrix state and do the rotation
	glPushMatrix();
	glRotatef(xRot, 1.0f, 0.0f, 0.0f);
	glRotatef(yRot, 0.0f, 1.0f, 0.0f);
	////////// paso 1 de reflejo /////////////////
	glFrontFace(GL_CCW); // swap orientation with respect to one in SetupRC                                                          
	glPushMatrix();
	glScalef(1.0f, -1.0f, 1.0f);  // geometry is mirrored by ground
	glTranslatef(0.0f, 2.0f*Piso[3]/*-2.0f*Piso[3]*/, 0.0f); //compensacion de nivel de psio                
	Stenc();
	cubo(mode);
	luz();
	glDisable(GL_STENCIL_TEST);
	glPopMatrix();
	glFrontFace(GL_CW);
	//////////fin paso 1 de reflejo /////////

	////////// paso 2 de reflejo: mezclar reflejo con piso (blending) ////////
	// Draw the ground transparently over the reflection

	glEnable(GL_BLEND);
	glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
	piso();


	////////// fin paso 2 de reflejo ////////
	glDisable(GL_DEPTH_TEST);
	Stenc();
	SombradeMiMundo(Luz, Piso);
	glDisable(GL_STENCIL_TEST);
	glDisable(GL_BLEND);
	if (bDepth)  glEnable(GL_DEPTH_TEST);
	cubo(mode);
	luz();
	glPopMatrix();	
}

void display(void)
{
	glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT | GL_STENCIL_BUFFER_BIT);
	RenderScene(GL_RENDER);
	// Flush drawing commands
	glutSwapBuffers();
	glFlush();
}
// Called by GLUT library when the window has changed size

void ChangeSize(GLsizei w, GLsizei h)
{    // Set Viewport to window dimensions
	glViewport(0, 0, (GLsizei)w, (GLsizei)h);
	
	glMatrixMode(GL_MODELVIEW);
}

void SpecialKeys(int key, int x, int y)
{
	GLfloat dx, dy, dz, dx0, dy0, dz0;

	if (key == GLUT_KEY_UP)
	{//increase distance from camera to origin
		ex *= (1.0f + deltaR);  ey *= (1.0f + deltaR);    ez *= (1.0f + deltaR);
	}

	if (key == GLUT_KEY_DOWN)
	{//reduce distance from camera to origin (close up)
		ex *= (1.0f - deltaR); ey *= (1.0f - deltaR);    ez *= (1.0f - deltaR);
	}

	if (key == GLUT_KEY_LEFT)
		//Rotate camera around origin in Oxz plane
	{
		dx = -ez;     dz = ex;
		GLfloat s = sqrtf(ex*ex + ey*ey + ez*ez);
		ex += delta*dx;       ez += delta*dz;
		GLfloat s1 = sqrtf(ex*ex + ey*ey + ez*ez) / s;
		ex /= s1;    ey /= s1;    ey /= s1;
	}

	if (key == GLUT_KEY_RIGHT)
		//Rotate camera around origin in Oxz plane
	{
		dx = -ez;     dz = ex;
		GLfloat s = sqrtf(ex*ex + ey*ey + ez*ez);
		ex -= delta*dx;          ez -= delta*dz;
		GLfloat s1 = sqrtf(ex*ex + ey*ey + ez*ez) / s;
		ex /= s1;    ey /= s1;    ey /= s1;
	}


	if (key == GLUT_KEY_F1) bCull = !bCull;
	if (key == GLUT_KEY_F2)bDepth = !bDepth;
	if (key == GLUT_KEY_F3)bOutline = !bOutline;
	if (key == GLUT_KEY_F4)
	{
		if (shademode == GL_FLAT){ shademode = GL_SMOOTH; }
		else { if (shademode == GL_SMOOTH){ shademode = GL_FLAT; } };
		glShadeModel(shademode);
	}


	///////////#######################
	if (key == GLUT_KEY_F5)//Rotate camera around scene center in Oyz plane
	{
		dy0 = cz - ez;  dz0 = ey - cy;
		dy = cy - ey;    dz = cz - ez;
		GLfloat s = sqrtf(dy*dy + dz*dz);
		dy += delta*dy0;       dz += delta*dz0;
		GLfloat s1 = sqrtf(dy*dy + dz*dz) / s;
		dy /= s1;        dz /= s1;
		ey = cy - dy; ez = cz - dz;
		/* yRot += 0.5f;*/
	}

	if (key == GLUT_KEY_F6)//Rotate camera around scene center in Oyz plane
	{
		dy0 = cz - ez;  dz0 = ey - cy;
		dy = cy - ey;    dz = cz - ez;
		GLfloat s = sqrtf(dy*dy + dz*dz);
		dy -= delta*dy0;       dz -= delta*dz0;
		GLfloat s1 = sqrtf(dy*dy + dz*dz) / s;
		dy /= s1;        dz /= s1;
		ey = cy - dy; ez = cz - dz;
		/*yRot += 0.5f;*/
	}

	if (key == GLUT_KEY_F7)//Move light toward the center of ground 
	{
		dx = cx - Luz[0]; dy = cy - Luz[1];    dz = cz - Luz[2];
		dx *= (1.0 - deltatrans); dy *= (1.0 - deltatrans);
		dz *= (1.0 - deltatrans);
		Luz[0] = cx - dx;  Luz[1] = cy - dy; Luz[2] = cz - dz;//#####

		//    SetLightPos(wlightPos);
		// Calculate new projection matrix to draw shadow on the ground
		/*yRot += 0.5f;*/
	}
	if (key == GLUT_KEY_F8)//Move light outward the center of ground 
	{
		dx = cx - Luz[0]; dy = cy - Luz[1];    dz = cz - Luz[2];

		dx /= (1.0 - deltatrans); dy /= (1.0 - deltatrans);
		dz /= (1.0 - deltatrans);
		Luz[0] = cx - dx;  Luz[1] = cy - dy; Luz[2] = cz - dz;//#####

		//    SetLightPos(wlightPos);
		// Calculate new projection matrix to draw shadow on the ground
		/* yRot += 0.5f;*/
	}

	///////////############

	// Refresh the Window
	glutPostRedisplay();
}

//para SELECCION: 
void anallizename(int name)
{
	int i;
	if (name == CARA3){
		/*modificar color de CARA 3 si esta seleccionada*/
		for (i = 0; i<3; i++)
			color_de_cara3[i] *= 0.9f;
	}
	glutPostRedisplay();
}

//para SELECCION: 
void processHits(GLint hits, GLuint buffer[])
{
	if (hits == 0)   {/*reestablecer color inicial si 
					  la CARA 3 no fue seleccionada*/
		initColors();
		return;
	}

	unsigned int i, j, vptr;
	GLuint names, *ptr;

	ptr = (GLuint *)buffer;
	vptr = *ptr;
	for (i = 0; i < hits; i++) {    /*  recorrer todos toques (hits)  */
		names = *ptr;
		ptr += 3;
		vptr = *ptr;		

		for (j = 0; j < names; j++)  /* recorrer todos nombres 
									 para el toque corriente */
			anallizename(*ptr++);
	}
}


//para SELECCION: 
void pickCubeDetails(int button, int state, int x, int y)
{
	GLint hits;
	GLint viewport[4];
	if (button != GLUT_LEFT_BUTTON || state != GLUT_DOWN)
		return;
	glGetIntegerv(GL_VIEWPORT, viewport);
	glSelectBuffer(BUFSIZE, selectBuf);
	(void)glRenderMode(GL_SELECT);

	glInitNames();
	glPushName(0);

	glMatrixMode(GL_PROJECTION);
	glPushMatrix();
	glLoadIdentity();
	/*  crear region de 5x5 pixeles que marca la ubicacion 
	seleccionada de cursor     */
	gluPickMatrix((GLdouble)x, (GLdouble)(viewport[3] - y),
		5.0, 5.0, viewport);
	/*detectar los "toques" en la region */
	RenderScene(GL_SELECT);

	/*reestablecer matriz de proyeccion para rendering normal*/
	glMatrixMode(GL_PROJECTION);
	glPopMatrix();	

	hits = glRenderMode(GL_RENDER);
	processHits(hits, selectBuf);//procesar toques
	glutPostRedisplay(); /*solocitud de actualizar ventana grafica */
}



int main(int argc, char** argv)
{
	glutInit(&argc, argv);
	glutInitDisplayMode(/*GLUT_SINGLE*/GLUT_DOUBLE | GLUT_RGBA | GLUT_STENCIL);
	glutInitWindowSize(200, 200);
	glutInitWindowPosition(100, 100);
	glutCreateWindow(argv[0]);
	glutDisplayFunc(display);
	glutReshapeFunc(ChangeSize);
	glutSpecialFunc(SpecialKeys);

	glutMouseFunc(pickCubeDetails);

	SetupRC();
	glutMainLoop();
	return 0;
}