#include <GL/glut.h>
#include <math.h>
#include <stdio.h>
#include <string.h>

// Define a constant for the value of PI
#define GL_PI 3.1415f


static float orbitDegreeZ = 0.0f;
static float orbitDegreeX = 0.0f;
static float zoom = 1.0f;

static float alfa = 0.0f;
static int showName = 1;

GLint i = 0;

static float red=1.0f, green=0.0f, blue=0.0f;


static int MenuID, SubMenuID, LightMenuID;

/*** megvilagitas ***/
static GLfloat ambientGray = 0.8f;
static GLfloat ambientLight[4];
static GLfloat lightDiff = 0.1f;

static int ambientEnabled = 1;
static int diffuseEnabled = 1;
static int spotEnabled = 1;
static GLfloat diffuseLight[] = { 0.7f, 0.7f, 0.7f, 1.0f};
static GLfloat diffusePos[] = { 0.0f, 50.0f, 70.0f, 1.0f };
static GLfloat spotDir[] = { 0.0f, 0.0f, -1.0f };
static GLfloat spotPos[] = {0.0f, 0.0f, -3.0f};

static int wire = 0;

void BitmaText(int x, int y, char *string) {
	int len, i;
	glRasterPos2f( x, y );
	len = (int) strlen(string);
	for (i=0; i < len; i++) {
		glutBitmapCharacter(GLUT_BITMAP_HELVETICA_18, string[i]);
	}
}

void StrokeText(char *string) {
	int len, i;
	len = (int) strlen(string);
	for (i=0; i < len; i++) {
		glutStrokeCharacter(GLUT_STROKE_ROMAN, string[i]);
	}
} 


void rotor() {
	
	glDisable(GL_CULL_FACE);
	
	glPushMatrix();
	
	glTranslatef(0.0,0.0,25.0);
	gluCylinder(gluNewQuadric(), 2.0,2.0,5,60,10);
	
	glTranslatef(0.0,0.0,5);
	glRotatef(alfa, 0.0,0.0,1.0);
	
	glColor3f(0.5f,0.5f,0.5f);
	glBegin(GL_POLYGON);
		glVertex3i(0,0,0);
		glVertex3i(-50,0,0);
		glVertex3i(-50,5,0);
		glVertex3i(0,5,0);
	glEnd();
	glBegin(GL_POLYGON);
		glVertex3i(0,0,0);
		glVertex3i(50,0,0);
		glVertex3i(50,-5,0);
		glVertex3i(0,-5,0);
	glEnd();
	
	glPopMatrix();
	
	glEnable(GL_CULL_FACE);
	
}

void kormany() {
	glPushMatrix();
	
	glTranslatef(70.0,0.0,30);
	glRotatef(90,-1.0,0.0,0.0);
	glScalef(0.2,0.2,0.2);
	
	rotor();
	
	glPopMatrix();
}

void helicopter() {
	
	// orr
	glColor3f(0.0f,0.3f,1.0f);
	glBegin(GL_POLYGON);
		glVertex3i(-15,-10,25);
		glVertex3i(-15,10,25);
		glVertex3i(-35,5,15);
		glVertex3i(-35,-5,15);
		
		
	glEnd();
	
	/*  reflektor */
	glPushMatrix();
	glTranslatef( -17.0f,0.0f,0.0f );
	glRotatef( 45, 0.0f, 1.0f, 0.0f );
	glutSolidCone(3,3,15,15);
	
	glLightfv(GL_LIGHT2,GL_POSITION,spotPos);
	glLightfv(GL_LIGHT2,GL_SPOT_DIRECTION,spotDir);

	glPopMatrix();
	
	/*glColor3f(1.0f,0.0f,0.0f);*/
	glColor3f(red,green,blue);
	glBegin(GL_POLYGON);  // also
		glVertex3i(-35,-5,15);
		glVertex3i(-35,5,15);
		glVertex3i(-25,10,5);
		glVertex3i(-25,-10,5);
	glEnd();
	glBegin(GL_POLYGON);  // jobb also
		glVertex3i(-25,15,15);
		glVertex3i(-25,10,5);
		glVertex3i(-35,5,15);
	glEnd();
	glBegin(GL_POLYGON); // jobb felso
		
		
		glVertex3i(-15,10,25);
		glVertex3i(-25,15,15);
		glVertex3i(-35,5,15);
	glEnd();
	glBegin(GL_POLYGON);  // bal also
		glVertex3i(-35,-5,15);
		glVertex3i(-25,-10,5);
		glVertex3i(-25,-15,15);
	glEnd();
	glBegin(GL_POLYGON); // bal felso
		glVertex3i(-25,-15,15);
		glVertex3i(-15,-10,25);
		glVertex3i(-35,-5,15);
	glEnd();
	
	//torzs
	glBegin(GL_POLYGON); // teteje
		
		glVertex3i(-15,-10,25);
		glVertex3i(15,-10,25);
		glVertex3i(15,10,25);
		glVertex3i(-15,10,25);
	glEnd();
	glBegin(GL_POLYGON); // alja
		glVertex3i(-25,10,5);
		glVertex3i(15,10,5);
		glVertex3i(15,-10,5);
		glVertex3i(-25,-10,5);
	glEnd();
	glColor3f(1.0f,1.0f,1.0f);
	glBegin(GL_POLYGON);	// jobb felso
		glVertex3i(-15,10,25);
		glVertex3i(15,10,25);
		glVertex3i(15,15,15);
		glVertex3i(-25,15,15);
	glEnd();
	glBegin(GL_POLYGON);	// bal felso
		glVertex3i(-25,-15,15);
		glVertex3i(15,-15,15);
		glVertex3i(15,-10,25);
		glVertex3i(-15,-10,25);
	glEnd();
	
	glPushMatrix();
	glColor3f(0.0f,0.0f,0.8f);
	glTranslatef(-15.5,-15.5,15);
	glRotatef(63,1.0,0.0,0.0);
	glScalef(0.12f,0.08f,0.02f);
	glLineWidth(4);
	StrokeText("Heli");
	glPopMatrix();
	
	/*glColor3f(1.0f,0.0f,0.0f);*/
	glColor3f(red,green,blue);
	glBegin(GL_POLYGON);	// jobb also
		glVertex3i(-25,15,15);
		glVertex3i(15,15,15);
		glVertex3i(15,10,5);
		glVertex3i(-25,10,5);
	glEnd();
	glBegin(GL_POLYGON);	// bal also
		glVertex3i(-25,-10,5);
		glVertex3i(15,-10,5);
		glVertex3i(15,-15,15);
		glVertex3i(-25,-15,15);
	glEnd();
	
	//farokto
	glBegin(GL_POLYGON); // teteje
		glVertex3i(15,-10,25);
		glVertex3i(30,-7,25);
		glVertex3i(30,7,25);
		glVertex3i(15,10,25);
	glEnd();
	glBegin(GL_POLYGON); // alja
		glVertex3i(15,10,5);
		glVertex3i(30,7,20);
		glVertex3i(30,-7,20);
		glVertex3i(15,-10,5);
	glEnd();
	
	glBegin(GL_POLYGON);  // jobb felso
		glVertex3i(15,10,25);	
		glVertex3i(30,7,25);
		glVertex3i(30,7,20);
		glVertex3i(15,15,15);
	glEnd();
	glBegin(GL_POLYGON);  // bal felso
		glVertex3i(15,-15,15);
		glVertex3i(30,-7,20);
		glVertex3i(30,-7,25);
		glVertex3i(15,-10,25);	
	glEnd();
	
	glBegin(GL_POLYGON); // jobb also
		glVertex3i(15,15,15);
		glVertex3i(30,7,20);
		glVertex3i(15,10,5);
	glEnd();
	glBegin(GL_POLYGON); // bal also
		glVertex3i(15,-10,5);
		glVertex3i(30,-7,20);
		glVertex3i(15,-15,15);
	glEnd();
	
	// farok
	glBegin(GL_POLYGON); // teteje
		glVertex3i(30,-7,25);
		glVertex3i(70,-2,25);
		glVertex3i(70,2,25);
		glVertex3i(30,7,25);
	glEnd();
	glBegin(GL_POLYGON); // alja
		glVertex3i(30,7,20);
		glVertex3i(70,2,20);
		glVertex3i(70,-2,20);
		glVertex3i(30,-7,20);
	glEnd();
	
	glColor3f(1.0f,1.0f,1.0f);
	glBegin(GL_POLYGON); // jobb felso
	
		glVertex3i(30,7,25);
		glVertex3i(70,2,25);
		glVertex3i(70,2,20);
		glVertex3i(30,7,20);
	glEnd();
	glBegin(GL_POLYGON); // bal felso
		glVertex3i(30,-7,20);
		glVertex3i(70,-2,20);
		glVertex3i(70,-2,25);
		glVertex3i(30,-7,25);
	glEnd();
	
	glColor3f(0.0f,1.0f,0.0f);
	glBegin(GL_POLYGON); // vege
		glVertex3i(70,-2,20);
		glVertex3i(70,2,20);
		glVertex3i(70,2,25);
		glVertex3i(70,-2,25);
	glEnd();
	
	glBegin(GL_POLYGON);
		glVertex3i(70,2,25);
		glVertex3i(55,2,25);
		glVertex3i(70,0,35);
		glVertex3i(80,0,35);
	glEnd();
	glBegin(GL_POLYGON);
		
		
		
		glVertex3i(80,0,35);
		glVertex3i(70,0,35);
		glVertex3i(55,-2,25);
		glVertex3i(70,-2,25);
	glEnd();
	
	glBegin(GL_POLYGON);	
		
		glVertex3i(55,-2,25);
		glVertex3i(70,0,35);
		glVertex3i(55,2,25);
	glEnd();
	glBegin(GL_POLYGON);	
		glVertex3i(70,2,25);
		glVertex3i(80,0,35);
		glVertex3i(70,-2,25);
	glEnd();
	
	
	rotor();
	kormany();
	
}



// Called to draw scene
void RenderScene(void)
{
  int j = 0;
  
  // Clear the window with current clearing color
  glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);

 


  if (showName == 1) {
	glDisable(GL_LIGHTING);
	BitmaText(0,-60,"Nemeth Gabor");
  }
  
  if ( wire == 1 ) {
  glPolygonMode(GL_FRONT_AND_BACK, GL_LINE);
  } else {
  
	glEnable(GL_LIGHTING);
	/* kornyezo feny beallitasa */
	ambientLight[0] = ambientGray;
	ambientLight[1] = ambientGray;
	ambientLight[2] = ambientGray;
	ambientLight[3] = 1.0;
    glLightModelfv(GL_LIGHT_MODEL_AMBIENT, ambientLight);
  
  
	// Setup and enable light 0
	glLightfv(GL_LIGHT0, GL_AMBIENT, ambientLight);
	glLightfv(GL_LIGHT1, GL_DIFFUSE, diffuseLight);
	glLightfv(GL_LIGHT1, GL_POSITION, diffusePos);
	glLightf(GL_LIGHT2, GL_SPOT_CUTOFF, 60.0f);

	if (ambientEnabled == 1) {
		glEnable(GL_LIGHT0);
	} else {
		glDisable(GL_LIGHT0);
	}
	if (diffuseEnabled == 1) {
		glEnable(GL_LIGHT1);
	} else {
		glDisable(GL_LIGHT1);
	}
	if (spotEnabled == 1) {
		glEnable(GL_LIGHT2);
	} else {
		glDisable(GL_LIGHT2);
	}
	
	

	// Enable Material color tracking
	glEnable(GL_COLOR_MATERIAL);
	// Front material ambient and diffuse colors track glColor
	glColorMaterial(GL_FRONT, GL_AMBIENT_AND_DIFFUSE);

	glEnable(GL_NORMALIZE);
  } // END IF-ELSE WIRE 
  
    glPushMatrix();
	glRotatef(-50.0 + orbitDegreeX, 1.0f, 0.0f, 0.0f);
	glRotatef(orbitDegreeZ, 0.0f,0.0f,1.0f);
	
  
  helicopter();
 
  
  glPopMatrix();
  
  // Flush drawing commands
  glutSwapBuffers();
}

// This function does any needed initialization on the rendering
// context. 
void SetupRC()
{
  // Black background
  //glClearColor(0.0f, 0.0f, 0.0f, 1.0f );
  //glEnable(GL_DEPTH_TEST);
  
  glClearColor(0.0f, 0.0f, 0.0f, 1.0f );
  
  glEnable(GL_DEPTH_TEST);
  glFrontFace(GL_CCW);
  glEnable(GL_CULL_FACE);
  
  
  if ( !wire ) {
  
  glEnable(GL_COLOR_MATERIAL);
  glColorMaterial(GL_FRONT, GL_AMBIENT);
  }
 
}



void Timer(int value)
{
  //printf("Timer esemeny (%d)\n", value);
  alfa = alfa+5.0;
  if( alfa==360 ) alfa= 0;
  glutPostRedisplay();
  glutTimerFunc(2, Timer, value + 1);
}

void Idle()
{

  glutPostRedisplay();
}

void ChangeSizeOrtho(int w, int h)
{
  //GLfloat nRange = 25.0f;
  //GLfloat nRange = 30.0f;
  GLfloat nRange = 80.0f ;
  
  // Prevent a divide by zero
  if(h == 0)
    h = 1;
  
  // Set Viewport to window dimensions
  glViewport(0, 0, w, h);
  
  // Reset projection matrix stack
  glMatrixMode(GL_PROJECTION);
  glLoadIdentity();
  
  // Establish clipping volume (left, right, bottom, top, near, far)
  if (w <= h) 
    glOrtho (-nRange, nRange, -nRange*h/w, nRange*h/w, -nRange, nRange);
  else 
    glOrtho (-nRange*w/h, nRange*w/h, -nRange, nRange, -nRange, nRange);
  
  // Reset Model view matrix stack
  glMatrixMode(GL_MODELVIEW);
  glLoadIdentity();
}



void SpecialKeys(int key, int x, int y) {
	
	
	   
		if (key == GLUT_KEY_UP   ) {
			orbitDegreeX += 1.0f;
		}
		if (key == GLUT_KEY_DOWN ) {
			orbitDegreeX -= 1.0f;
		}
		
		
		if (key == GLUT_KEY_LEFT ) {
			orbitDegreeZ -= 1.0f;
		}
		if (key == GLUT_KEY_RIGHT) {
			orbitDegreeZ += 1.0f;
		}
		
		if ( key == GLUT_KEY_F1 ) {
			ambientGray+=0.1f;
		}
		if ( key == GLUT_KEY_F2 ) {
			ambientGray-=0.1f;
		}
		
		if ( ambientGray > 1.0f ) {
			ambientGray = 1.0f;
		}
		if ( ambientGray < 0.0f ) {
			ambientGray = 0.0f;
		}
		
		
		if ( orbitDegreeX > 80.0f ) orbitDegreeX = 80.0f;
		if ( orbitDegreeX < -50.0f ) orbitDegreeX = -50.0f;
		
		if (orbitDegreeZ <= 360.0f) orbitDegreeZ -= 360.0f;
		if (orbitDegreeZ < 0.0f) orbitDegreeZ = 360.0f - orbitDegreeZ;
	
		glutPostRedisplay();

}


void ProcessMenu(int value) {
	if (value == 1) { /* latszik-e a nevem? */
		showName = 1- showName;
	}
	
	if (value == 2) { /* a helikopter szine zold lesz */
		red = 0.0f;
		green = 0.7f;
		blue = 0.0f;
	}
	
	if (value == 3 ) { /* a helikopter szine piros lesz */
		red = 1.0f;
		green = 0.0f;
		blue = 0.0f;
	}
	if (value == 4) { /* a helikopter szine sarga lesz */
		red = 1.0f;
		green = 1.0f;
		blue = 0.0f;
	}
	
	if (value == 6 ) { /* kilepes */
		exit(0);
	}
	
	if (value == 5) {
		wire = 1 - wire;
	}
	
	if (value == 11) {
		ambientEnabled = 1 - ambientEnabled;
	}
	if (value == 12) {
		diffuseEnabled = 1 - diffuseEnabled;
	}
	if (value == 13) {
		spotEnabled = 1 - spotEnabled;
	}
	
	
}

int main(int argc, char* argv[])
{
  // >> Inicializalas

 

  glutInit(&argc, argv);
  glutInitDisplayMode(GLUT_DOUBLE | GLUT_RGB | GLUT_DEPTH);
  glutInitWindowSize(300, 300);
  glutCreateWindow("GLUT Alap");


  /* Almenü készítése */
  SubMenuID = glutCreateMenu( ProcessMenu );
  glutAddMenuEntry( "Zold", 2 );
  glutAddMenuEntry( "Piros", 3 );
  glutAddMenuEntry( "Sarga", 4 );
  
  LightMenuID = glutCreateMenu( ProcessMenu );
  glutAddMenuEntry( "Ambient", 11 );
  glutAddMenuEntry( "Diffuse", 12 );
  glutAddMenuEntry( "Spot", 13);

  /* Főmenü készítése */
  MenuID = glutCreateMenu( ProcessMenu );
  glutAddMenuEntry( "Nev be/ki", 1 );
  glutAddSubMenu( "Helicopter color", SubMenuID ); /* Almenü hozzáadása */
  glutAddSubMenu( "Lights", LightMenuID ); /* Almenü hozzáadása */
  glutAddMenuEntry( "Drotvaz be/ki", 5 );
  glutAddMenuEntry( "Kilepes", 6 );
  glutAttachMenu( GLUT_RIGHT_BUTTON ); /* Menü a jobb egérgomb lenyomására jelenik majd meg. */



  // << Inicializalas

  // >> Callback fuggvenyek

  glutReshapeFunc(ChangeSizeOrtho); // Parhuzamos vetites
  //glutReshapeFunc(ChangeSizePerspective); // Perspektiv vetites

  glutSpecialFunc(SpecialKeys);
  //glutKeyboardFunc(Keyboard);
  //glutKeyboardFunc(Keyboard);
  glutDisplayFunc(RenderScene);
  glutTimerFunc(2, Timer, 1); // 1 mp mulva meghivodik a Timer() fuggveny
  glutIdleFunc(Idle); // Idle(), ha nem tortenik semmi
  
  // << Callback fuggvenyek

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